03:07
ОбновитьСмайлыУправление мини-чатом
МИНИ-ЧАТ
Главная страница!

 



 
          





Рекомендуем:





Последние Файлы GTA 4 Последние Файлы GTA-MP Реклама
Скрипт GTA 4 элементы Watch... 07.09.2014
Ferrari 360 Spider [EPM con... 13.12.2013
Porsche Cayenne Turbo 2012 ... 13.12.2013
Shelby Terlingua Mustang v1... 13.12.2013
Hamann Lamborghini Gallardo... 27.10.2013
[GM] The Big PEN1:LS v2.00 ... 04.12.2017
Dgun (AvnanceRP,SampRP,Dimo... 19.03.2016
SAMP скрипт SX Events (MySQ... 03.03.2016
Карта ASL мэрия для SAMP се... 03.03.2016
AIM для SA-MP 0.3.7 22.02.2016
Модератор форума: Alcoholik  
[FS] Sex
SeWeRДата: Пятница, 04.07.2008, 00:35 | Сообщение # 91
Мастер джэдай
Группа: I'm V.I.P.
Сообщений: 3069
Награды: 66
Город: Киев
Замечания: 20%
Статус:
okstyle, а че в паблик вылаживать не будут? crazy




OKStyle™Дата: Пятница, 04.07.2008, 07:51 | Сообщение # 92
Мастер джэдай
Группа: I'm V.I.P.
Сообщений: 2444
Награды: 16
Город: Оренбург
Репутация: 1174
Замечания: 40%
Статус:
Я сделаю именно по описанию автора идеи и выложу.

Только вот не получится заставить второго участника анимации стоять во время этого, особенно изнасилования :D


Да потому что когда человек делает на заказ он не старается. © kRiSyo
Кланяимся нофаму королю анимаций =))))))) © Manusya
В MTA - для вас все багоюзеры. Не юзают там +с только EFO и ACF. © SeWeR


Сообщение отредактировал okstyle - Пятница, 04.07.2008, 07:57
Lu-TennantДата: Пятница, 04.07.2008, 09:49 | Сообщение # 93
Местный
Группа: Продвинутые
Сообщений: 743
Награды: 5
Город: Yekaterinburg
Репутация: 13
Замечания: 60%
Статус:
А может фриз использовать? ))
P.S. Ты коп-то мой хоть поставь, типо автор идеи. crazy



С.Э.К.С. (от англ. G.E.C.K. - Garden of Eden Creation Kit)
TimeДата: Пятница, 04.07.2008, 11:08 | Сообщение # 94
Группа: I'm V.I.P.
Сообщений: 352
Награды: 13
Город: Samp-Rus.Com
Репутация: 308
Замечания: 0%
Статус:
Быстреебы зделали хочеться очень увидить!


[cut=Работы на SRC][FS]Sud v3.0
[FS]AdminHouse 2008 year
[MAP]PlaceDM
[MAP]DeathRace
[MAP]Ресторан, место отдыха
[MAP]Aвто-Базар[/cut]
[cut=Информация по ICQ]Если вы хотите приобрести ICQ 6dig, красивую или простую пишем мне в ICQ о цене договоримся, имеются inv,clear. Жду в ICQ в общем ;)[/cut]

OKStyle™Дата: Пятница, 04.07.2008, 11:18 | Сообщение # 95
Мастер джэдай
Группа: I'm V.I.P.
Сообщений: 2444
Награды: 16
Город: Оренбург
Репутация: 1174
Замечания: 40%
Статус:
Quote (Mite)
А может фриз использовать? ))

если фриз, то анимация не применяется, т.е. он будет стоять столбом.



Да потому что когда человек делает на заказ он не старается. © kRiSyo
Кланяимся нофаму королю анимаций =))))))) © Manusya
В MTA - для вас все багоюзеры. Не юзают там +с только EFO и ACF. © SeWeR
Lu-TennantДата: Пятница, 04.07.2008, 13:26 | Сообщение # 96
Местный
Группа: Продвинутые
Сообщений: 743
Награды: 5
Город: Yekaterinburg
Репутация: 13
Замечания: 60%
Статус:
Quote (okstyle)
если фриз, то анимация не применяется, т.е. он будет стоять столбом.

сделай анимацию приседания, или того, как ты типа в море сдох. fun
А чо, идея. crazy fun



С.Э.К.С. (от англ. G.E.C.K. - Garden of Eden Creation Kit)
DosДата: Пятница, 04.07.2008, 18:34 | Сообщение # 97
Новенький
Группа: Продвинутые
Сообщений: 11
Награды: 1
Репутация: 1
Замечания: 0%
Статус:
опа я тоже наподобии скриптег сделал уже
AlekseyДата: Пятница, 04.07.2008, 19:09 | Сообщение # 98
Советчик
Группа: Продвинутые
Сообщений: 1028
Награды: 5
Город: Челябинск
Репутация: 41
Замечания: 0%
Статус:
Dos, кидай сюда


вааааааааааййй..// :(0
npu3pakДата: Суббота, 05.07.2008, 01:54 | Сообщение # 99
Новенький
Группа: Продвинутые
Сообщений: 37
Награды: 1
Город: Донецк
Репутация: 1
Замечания: 0%
Статус:
Ну дык кто-нить вылажить уже наконец-то этот ФС или нет?


Вы только что начали читать предложение, чтение которого вы уже заканчиваете.
OKStyle™Дата: Суббота, 05.07.2008, 22:30 | Сообщение # 100
Мастер джэдай
Группа: I'm V.I.P.
Сообщений: 2444
Награды: 16
Город: Оренбург
Репутация: 1174
Замечания: 40%
Статус:
В начало:
Code
new wantkiss[MAX_PLAYERS];
new wantsex[MAX_PLAYERS];

В OnPlayerCommandText:

Code
    new cmd[30];
  new idx;
  cmd = strtok(cmdtext, idx);

if(!strcmp(cmd, "/pocelui", true))
{
  new tmp[30],PlayerName[30],string[256];
  tmp = strtok(cmdtext,idx);
  new otherplayer = strval(tmp);
   if(GetDistanceBetweenPlayers(playerid, otherplayer) < 2)
   {
    if(IsSkinFemale(otherplayer))
    {
     wantkiss[playerid]=1;
     wantkiss[otherplayer]=1;
     GetPlayerName(playerid,PlayerName,sizeof(PlayerName));
     format(string,sizeof(string)," Игрок %s предлагает вам поцеловаться. (/accpoc [id] - принять, /dispoc [id] - отказать)",PlayerName);
     SendClientMessage(otherplayer,0xFFFF00AA,string);
    }
    else
    {
     SendClientMessage(playerid,0xFF0000AA," Ваш оппонент мужского пола!");
    }
   }
   else
   {
    SendClientMessage(playerid,0xFF0000AA," Вы слишком далеко!");
   }
return 1;
}

if(!strcmp(cmd, "/accpoc", true))
{
  new tmp[30];
  tmp = strtok(cmdtext,idx);
  new otherplayer = strval(tmp);
   if(GetDistanceBetweenPlayers(playerid, otherplayer) < 2)
   {
    if(wantkiss[playerid]==1 && wantkiss[otherplayer]==1)
    {
     SendClientMessage(playerid,0x00FF00AA," Вы поцеловались!");
     SendClientMessage(otherplayer,0x00FF00AA," Вы поцеловались!");
     wantkiss[playerid]=0;
     ApplyAnimation(otherplayer,"KISSING","Grlfrd_Kiss_03",4.1,0,1,1,1,1);
     ApplyAnimation(playerid,"KISSING","Grlfrd_Kiss_03",4.1,0,1,1,1,1);
     wantkiss[otherplayer]=0;
    }
    else if(wantkiss[playerid]==0 || wantkiss[otherplayer]==0)
    {
     SendClientMessage(playerid,0x00FF00AA," Вам не предлагали целоваться!");
    }
   }
   else
   {
    SendClientMessage(playerid,0xFF0000AA," Вы слишком далеко!");
   }
return 1;
}

if(!strcmp(cmd, "/dispoc", true))
{
  new tmp[30];
  tmp = strtok(cmdtext,idx);
  new otherplayer = strval(tmp);
   if(GetDistanceBetweenPlayers(playerid, otherplayer) < 2)
   {
    if(wantkiss[playerid]==1 && wantkiss[otherplayer]==1)
    {
     SendClientMessage(playerid,0xFF0000AA," Вы отказались поцеловаться!");
     SendClientMessage(otherplayer,0x00FF00AA," С вами отказались поцеловаться!");
     wantkiss[playerid]=0;
     wantkiss[otherplayer]=0;
    }
    else if(wantkiss[playerid]==0 || wantkiss[otherplayer]==0)
    {
     SendClientMessage(playerid,0x00FF00AA," Вам не предлагали целоваться!");
    }
   }
   else
   {
    SendClientMessage(playerid,0xFF0000AA," Вы слишком далеко!");
   }
return 1;
}

if(!strcmp(cmd, "/iznas", true))
{
  new tmp[30];
  tmp = strtok(cmdtext,idx);
  new otherplayer = strval(tmp);
   if(GetDistanceBetweenPlayers(playerid, otherplayer) < 2)
   {
    if(IsSkinFemale(otherplayer))
    {
     SendClientMessage(playerid,0xFF0000AA," Вы изнасиловали игрока!");
     SendClientMessage(otherplayer,0x00FF00AA," Вас изнасиловали!");
     LoopingAnim(otherplayer,"SNM","SPANKINGW",4.1,0,1,1,1,1);
     LoopingAnim(playerid,"SNM","SPANKEDW",4.1,0,1,1,1,1);
    }
    else
    {
     SendClientMessage(playerid,0xFF0000AA," Ваш оппонент мужского пола!");
    }
   }
   else
   {
    SendClientMessage(playerid,0xFF0000AA," Вы слишком далеко!");
   }
return 1;
}

if(!strcmp(cmd, "/sexon", true))
{
  new tmp[30];
  tmp = strtok(cmdtext,idx);
  new otherplayer = strval(tmp);
   if(GetDistanceBetweenPlayers(playerid, otherplayer) < 2)
   {
    if(IsSkinFemale(otherplayer))
    {
     wantsex[playerid]=1;
     wantsex[otherplayer]=1;
     GetPlayerName(playerid,PlayerName,sizeof(PlayerName));
     format(string,sizeof(string)," Игрок %s предлагает вам заняться сексом. (/accsex [id] - принять, /dissex [id] - отказать)",PlayerName);
     SendClientMessage(otherplayer,0xFFFF00AA,string);
    }
    else
    {
     SendClientMessage(playerid,0xFF0000AA," Ваш оппонент мужского пола!");
    }
   }
   else
   {
    SendClientMessage(playerid,0xFF0000AA," Вы слишком далеко!");
   }
return 1;
}

if(!strcmp(cmd, "/accsex", true))
{
  new tmp[30];
  tmp = strtok(cmdtext,idx);
  new otherplayer = strval(tmp);
   if(GetDistanceBetweenPlayers(playerid, otherplayer) < 2)
   {
    if(wantsex[playerid]==1 && wantsex[otherplayer]==1)
    {
     SendClientMessage(playerid,0x00FF00AA," Вы занялись сексом!");
     SendClientMessage(otherplayer,0x00FF00AA," Вы занялись сексом!");
     wantsex[playerid]=0;
     wantsex[otherplayer]=0;
     ApplyAnimation(otherplayer,"SNM","SPANKING_IDLEW",4.1,0,1,1,1,1);
     LoopingAnim(playerid,"SNM","SPANKINGP",4.1,0,1,1,1,1);
    }
    else if(wantsex[playerid]==0 || wantsex[otherplayer]==0)
    {
     SendClientMessage(playerid,0x00FF00AA," Вам не предлагали заняться сексом!");
    }
   }
   else
   {
    SendClientMessage(playerid,0xFF0000AA," Вы слишком далеко!");
   }
return 1;
}

if(!strcmp(cmd, "/dissex ", true) == 0)
{
  new tmp[30];
  tmp = strtok(cmdtext,idx);
  new otherplayer = strval(tmp);
   if(GetDistanceBetweenPlayers(playerid, otherplayer) < 2)
   {
    if(wantsex[playerid]==1 && wantsex[otherplayer]==1)
    {
     SendClientMessage(playerid,0xFF0000AA," Вы отказались заняться сексом!");
     SendClientMessage(otherplayer,0x00FF00AA," С вами отказались заняться сексом!");
     wantsex[playerid]=0;
     wantsex[otherplayer]=0;
    }
    else if(wantsex[playerid]==0 || wantsex[otherplayer]==0)
    {
     SendClientMessage(playerid,0x00FF00AA," Вам не предлагали заняться сексом!");
    }
   }
   else
   {
    SendClientMessage(playerid,0xFF0000AA," Вы слишком далеко!");
   }
return 1;
}

Вниз:

Code
LoopingAnim(playerid,animlib[],animname[], Float:Speed, looping, lockx, locky, lockz, lp)
{
     ApplyAnimation(playerid, animlib, animname, Speed, looping, lockx, locky, lockz, lp);
}

stock GetDistanceBetweenPlayers(playerid, playerid2)
{
  new Float:x1,Float:y1,Float:z1,Float:x2,Float:y2,Float:z2;
  new Float:tmpdis;
  GetPlayerPos(playerid,x1,y1,z1);
  GetPlayerPos(playerid2,x2,y2,z2);
  tmpdis = floatsqroot(floatpower(floatabs(floatsub(x2,x1)),2)+floatpower(floatabs(floatsub(y2,y1)),2)+floatpower(floatabs(floatsub(z2,z1)),2));
return floatround(tmpdis);
}

stock IsSkinFemale(skinid)   
{
  new Skins[] = {  
  9, 10, 11, 12, 13, 31, 39, 40, 41, 54, 55,  
  56, 63, 64, 69, 75, 76, 77, 85, 86, 87,  
  88, 89, 90, 92, 93, 129, 130, 131, 138,  
  140, 141, 145, 148, 150, 151, 152, 157,  
  169, 172, 178, 190, 191, 192, 193, 194,  
  195, 196, 197, 198, 199, 201, 205, 207,  
  211, 214, 215, 216, 218, 219, 224, 225,  
  226, 231, 232, 233, 237, 238, 243, 244,  
  245, 246, 251, 256, 257, 263, 298
  };
   for(new i = 0; i < sizeof(Skins); i++)   
   {   
    if(skinid == i) return 1;   
   }
  #pragma unused Skins
return 0;   
}

strtok(const string[], &index)
{
  new length = strlen(string);
   while ((index < length) && (string[index] <= ' '))
   {
    index++;
   }
  new offset = index;
  new result[20];
   while ((index < length) && (string[index] > ' ') && ((index - offset) < (sizeof(result) - 1)))
   {
    result[index - offset] = string[index];
    index++;
   }
  result[index - offset] = EOS;
return result;
}

Скачать уже готовый скрипт (PWN+AMX) в RAR-архиве:

@ filehoster.ru
Пароль: gtasource.ru


Да потому что когда человек делает на заказ он не старается. © kRiSyo
Кланяимся нофаму королю анимаций =))))))) © Manusya
В MTA - для вас все багоюзеры. Не юзают там +с только EFO и ACF. © SeWeR


Сообщение отредактировал okstyle - Суббота, 05.07.2008, 22:34
theAloneДата: Суббота, 05.07.2008, 22:52 | Сообщение # 101
Долгожитель
Группа: Пользователи
Сообщений: 1380
Награды: 1
Город: Москва
Репутация: 92
Замечания: 0%
Статус:
бугог crazy
SeWeRДата: Суббота, 05.07.2008, 22:59 | Сообщение # 102
Мастер джэдай
Группа: I'm V.I.P.
Сообщений: 3069
Награды: 66
Город: Киев
Замечания: 20%
Статус:
Зашел тестить и вот че с okstyle, мы замутили: lol


lol fun







Сообщение отредактировал $t1m - Суббота, 05.07.2008, 23:01
b0vverДата: Суббота, 05.07.2008, 23:08 | Сообщение # 103
Мастер джэдай
Группа: I'm V.I.P.
Сообщений: 2327
Награды: 36
Город: .
Замечания: 0%
Статус:
$t1m, ахиреть скриптег получился lol


Off.line
TimeДата: Суббота, 05.07.2008, 23:12 | Сообщение # 104
Группа: I'm V.I.P.
Сообщений: 352
Награды: 13
Город: Samp-Rus.Com
Репутация: 308
Замечания: 0%
Статус:
Прикольно замутили ! ! ! fun


[cut=Работы на SRC][FS]Sud v3.0
[FS]AdminHouse 2008 year
[MAP]PlaceDM
[MAP]DeathRace
[MAP]Ресторан, место отдыха
[MAP]Aвто-Базар[/cut]
[cut=Информация по ICQ]Если вы хотите приобрести ICQ 6dig, красивую или простую пишем мне в ICQ о цене договоримся, имеются inv,clear. Жду в ICQ в общем ;)[/cut]

theAloneДата: Суббота, 05.07.2008, 23:12 | Сообщение # 105
Долгожитель
Группа: Пользователи
Сообщений: 1380
Награды: 1
Город: Москва
Репутация: 92
Замечания: 0%
Статус:
Если его раскрутить он будт на всех серваках fun
Поиск:





 


 


 
Хостинг от uCoz samp.at.ua