Перейти к содержанию
Единые правила форума (ЕПФ)
Авторизация  
Подписчики 0
Alexsis Prime

Секс с Женой/Мужем v0.1

Автор Alexsis Prime, в Дополнительные скрипты

Рекомендуемые сообщения

Alexsis Prime    27

Alexsis Prime
Опубликовано

Вот решил создать урок посвященный сексу с Женой/Мужем v0.2.
Итак, давайте приступим. Откроем наш мод. Перейдем к концу мода.
Вставляем следующий код:

if(strcmp(cmd, "/propsesex", true) == 0||strcmp(cmd, "/prsex", true) == 0){if(IsPlayerConnected(playerid)){if(PlayerInfo[playerid][pMarried] > 1){if(!IsPlayerInAnyVehicle(playerid)){SendClientMessage(playerid, COLOR_GREY, "Сексом занимаются только в машинах.");return 1;}new Car = GetPlayerVehicleID(playerid);tmp = strtok(cmdtext, idx);if(!strlen(tmp)){SendClientMessage(playerid, COLOR_GRAD1, "Prime: /pr(opse)sex [playerid/PartOfName]");return 1;}//giveplayerid = strval(tmp);giveplayerid = ReturnUser(tmp);tmp = strtok(cmdtext, idx);if(IsPlayerConnected(giveplayerid)){if(giveplayerid != INVALID_PLAYER_ID){if (ProxDetectorS(8.0, playerid, giveplayerid)){if(giveplayerid == playerid) { SendClientMessage(playerid, COLOR_GREY, "* Вы не можете заниматься сексом с собой."); return 1; }if(IsPlayerInAnyVehicle(playerid) && IsPlayerInVehicle(giveplayerid, Car) || PlayerInfo[playerid][pMarriedTo] == giveplayerid){GetPlayerName(giveplayerid, giveplayer, sizeof(giveplayer));GetPlayerName(playerid, sendername, sizeof(sendername));if(PlayerInfo[playerid][pSex] == 1){format(string, sizeof(string), "* Вы занялись сексом с вашей женой.");SendClientMessage(giveplayerid, COLOR_LIGHTBLUE, string);}if(PlayerInfo[playerid][pSex] == 2){format(string, sizeof(string), "* Вы занялись сексом с вашим мужем.");SendClientMessage(giveplayerid, COLOR_LIGHTBLUE, string);}if(PlayerInfo[playerid][pSex] == 1){format(string, sizeof(string), " занялся сексом с женой.");Action(playerid, string);}else{format(string, sizeof(string), " занялась сексом с мужем.");Action(playerid, string);format(string, sizeof(string), " получает оргазм.", sendername);Action(playerid, string);}}else{SendClientMessage(playerid, COLOR_GREY, "Вы и другой игрок должны быть в одном автомобиле.");return 1;}}else{SendClientMessage(playerid, COLOR_GREY, "Этот игрок не рядом с вами!");return 1;}}}else{SendClientMessage(playerid, COLOR_GREY, "Игрок не в игре.");return 1;}}else{if(PlayerInfo[playerid][pSex] == 1){SendClientMessage(playerid, COLOR_GREY, "У вас нет жены!");}if(PlayerInfo[playerid][pSex] == 2){SendClientMessage(playerid, COLOR_GREY, "У вас нету мужа!");}}}//not connectedreturn 1;}
Ко всем форвардам:
forward Action(playerid, string[]);
Ко всем пабликам:
public Action(playerid, string[]){new sendername[MAX_PLAYER_NAME], action[256];GetPlayerName(playerid, sendername, sizeof(sendername));format(action, sizeof(action), "%s %s", sendername, string);ProxDetector(30.0, playerid, action, COLOR_PURPLE,COLOR_PURPLE,COLOR_PURPLE,COLOR_PURPLE,COLOR_PURPLE);SetPlayerChatBubble(playerid, string, COLOR_PURPLE, 30.0, 10000);}
[/font]Для этого в моде должны быть следующие значения:
pMarried

Бонус: Дрочка и Проверка по Полу

if(strcmp(cmd, "/дрочить", true) == 0 || strcmp(cmd, "/lhjxbnm", true) == 0){if(PlayerInfo[playerid][pSex] == 1)if(Drochit[playerid]==0){ApplyAnimation(playerid,"PAULNMAC","wank_loop",4.1,1,0,0,1,0);format(string, sizeof(string), "начинает дрочить.");Action(playerid, string);Drochit[playerid] = 1;}elseif(PlayerInfo[playerid][pSex] == 1)if(Drochit[playerid]==1){format(string, sizeof(string), "перестаёт дрочить.");Action(playerid, string);ClearAnimations(playerid);Drochit[playerid] = 0;}elseif(PlayerInfo[playerid][pSex] >= 2){SendClientMessage(playerid, COLOR_GREY, "Вы не можите дрочить, вы женщина!");}return 1;}
Ко всем new:
new Drochit[MAX_PLAYERS];



Что сделать:


1. Проверка по Sex-скиллу. Если Sex-скилл: 7 - то:Мужчина: КончилЖенщина: Получила оргазмбез таймеров2. Еще что-нибудь извращенское

Собственно-говоря это все!
  • Like 20

Поделиться сообщением

Ссылка на сообщение
Поделиться на другие сайты

Rustyk    453

Rustyk
Опубликовано

О БОООЖЕ :D

+

Поделиться сообщением

Ссылка на сообщение
Поделиться на другие сайты

Alexsis Prime    27

Alexsis Prime
Опубликовано (изменено)

О БОООЖЕ :D

+

 

кстати, щяс на проверке тема: "Продажа Prim[E]-RPG v5.5 + обновления [sAMP]", так этот кусочек кода из того мода, который я продаю. Изменено пользователем Alexsis Prime

Поделиться сообщением

Ссылка на сообщение
Поделиться на другие сайты

Sanek666    259

Sanek666
Опубликовано 



ApplyAnimation(playerid,"PAULNMAC","wank_loop",4.1,1,0,0,1,0);

вроде она анимация , чего сам просил)

  • Like 1

Поделиться сообщением

Ссылка на сообщение
Поделиться на другие сайты

Alexsis Prime    27

Alexsis Prime
Опубликовано (изменено) 

ApplyAnimation(playerid,"PAULNMAC","wank_loop",4.1,1,0,0,1,0);
вроде она анимация , чего сам просил)

 

щяс проверим, скоро выложу урок как сделать команду /дрочить + проверку по полу (М/Ж)

 

Клевый у меня мод:

Pawn compiler 3.2.3664 Copyright (c) 1997-2006, ITB CompuPhase

Header size: 10224 bytes
Code size: 1904564 bytes
Data size: 5722964 bytes
Stack/heap size: 16384 bytes; estimated max. usage: unknown, due to recursion
Total requirements: 7654136 bytes

Спс! Все работает, плюс поставил!

Изменено пользователем Alexsis Prime
  • Like 1

Поделиться сообщением

Ссылка на сообщение
Поделиться на другие сайты

Alexsis Prime    27

Alexsis Prime
Опубликовано (изменено)

[перенесено в первый пост]

Изменено пользователем Alexsis Prime

Поделиться сообщением

Ссылка на сообщение
Поделиться на другие сайты

Alexsis Prime    27

Alexsis Prime
Опубликовано

АП

Поделиться сообщением

Ссылка на сообщение
Поделиться на другие сайты

FVCKFISH    142

FVCKFISH
Опубликовано

:D я начал жалеть , что ушел из CR:MP .

Нравится поставил.

Поделиться сообщением

Ссылка на сообщение
Поделиться на другие сайты

7ucky    4

7ucky
Опубликовано

Маленький вопрос? А почему нельзя дрочить если персонаж женщина? http://gsgames.ru/forum/public/style_emoticons/default/biggrin.gif Этого что небывает в природе?Или если брать с тех. стороны то нет анимации? http://gsgames.ru/forum/public/style_emoticons/default/biggrin.gif

Поделиться сообщением

Ссылка на сообщение
Поделиться на другие сайты

meL    724

meL
Опубликовано

Маленький вопрос? А почему нельзя дрочить если персонаж женщина? http://gsgames.ru/forum/public/style_emoticons/default/biggrin.gif Этого что небывает в природе?Или если брать с тех. стороны то нет анимации? http://gsgames.ru/forum/public/style_emoticons/default/biggrin.gif

 

Скорее всего, из за того, что нету анимации http://gsgames.ru/forum/public/style_emoticons/default/wink.gif

Поделиться сообщением

Ссылка на сообщение
Поделиться на другие сайты

7ucky    4

7ucky
Опубликовано

 

Маленький вопрос? А почему нельзя дрочить если персонаж женщина? http://gsgames.ru/forum/public/style_emoticons/default/biggrin.gif Этого что небывает в природе?Или если брать с тех. стороны то нет анимации? http://gsgames.ru/forum/public/style_emoticons/default/biggrin.gif

 

Скорее всего, из за того, что нету анимации http://gsgames.ru/forum/public/style_emoticons/default/wink.gif

 

ну если это версия 0.2 то хотелось бы в следующей версии увидеть приатаченый вибратор и всётаки разрешить девушкам заниматся рукоблудством :-)

Поделиться сообщением

Ссылка на сообщение
Поделиться на другие сайты

meL    724

meL
Опубликовано

 

 

Маленький вопрос? А почему нельзя дрочить если персонаж женщина? http://gsgames.ru/forum/public/style_emoticons/default/biggrin.gif Этого что небывает в природе?Или если брать с тех. стороны то нет анимации? http://gsgames.ru/forum/public/style_emoticons/default/biggrin.gif

 

Скорее всего, из за того, что нету анимации http://gsgames.ru/forum/public/style_emoticons/default/wink.gif

 

ну если это версия 0.2 то хотелось бы в следующей версии увидеть приатаченый вибратор и всётаки разрешить девушкам заниматся рукоблудством :-)

 

Ну у вас и мечты http://gsgames.ru/forum/public/style_emoticons/default/wink.gif

Поделиться сообщением

Ссылка на сообщение
Поделиться на другие сайты

7ucky    4

7ucky
Опубликовано

 

 

 

Маленький вопрос? А почему нельзя дрочить если персонаж женщина? http://gsgames.ru/forum/public/style_emoticons/default/biggrin.gif Этого что небывает в природе?Или если брать с тех. стороны то нет анимации? http://gsgames.ru/forum/public/style_emoticons/default/biggrin.gif

 

Скорее всего, из за того, что нету анимации http://gsgames.ru/forum/public/style_emoticons/default/wink.gif

 

ну если это версия 0.2 то хотелось бы в следующей версии увидеть приатаченый вибратор и всётаки разрешить девушкам заниматся рукоблудством :-)

 

Ну у вас и мечты http://gsgames.ru/forum/public/style_emoticons/default/wink.gif

 

Да ну почему мечты))Так просто скушно, дай думаю пофлужу на форуме)))

Поделиться сообщением

Ссылка на сообщение
Поделиться на другие сайты

meL    724

meL
Опубликовано

 

 

 

 

Маленький вопрос? А почему нельзя дрочить если персонаж женщина? http://gsgames.ru/forum/public/style_emoticons/default/biggrin.gif Этого что небывает в природе?Или если брать с тех. стороны то нет анимации? http://gsgames.ru/forum/public/style_emoticons/default/biggrin.gif

 

Скорее всего, из за того, что нету анимации http://gsgames.ru/forum/public/style_emoticons/default/wink.gif

 

ну если это версия 0.2 то хотелось бы в следующей версии увидеть приатаченый вибратор и всётаки разрешить девушкам заниматся рукоблудством :-)

 

Ну у вас и мечты http://gsgames.ru/forum/public/style_emoticons/default/wink.gif

 

Да ну почему мечты))Так просто скушно, дай думаю пофлужу на форуме)))

 

Ну так флуд запрещен, аккуратнее http://gsgames.ru/forum/public/style_emoticons/default/wink.gif

Поделиться сообщением

Ссылка на сообщение
Поделиться на другие сайты

7ucky    4

7ucky
Опубликовано

 

 

 

 

 

Маленький вопрос? А почему нельзя дрочить если персонаж женщина? http://gsgames.ru/forum/public/style_emoticons/default/biggrin.gif Этого что небывает в природе?Или если брать с тех. стороны то нет анимации? http://gsgames.ru/forum/public/style_emoticons/default/biggrin.gif

 

Скорее всего, из за того, что нету анимации http://gsgames.ru/forum/public/style_emoticons/default/wink.gif

 

ну если это версия 0.2 то хотелось бы в следующей версии увидеть приатаченый вибратор и всётаки разрешить девушкам заниматся рукоблудством :-)

 

Ну у вас и мечты http://gsgames.ru/forum/public/style_emoticons/default/wink.gif

 

Да ну почему мечты))Так просто скушно, дай думаю пофлужу на форуме)))

 

Ну так флуд запрещен, аккуратнее http://gsgames.ru/forum/public/style_emoticons/default/wink.gif

 

Всё всё))Заканчиваем)))

Поделиться сообщением

Ссылка на сообщение
Поделиться на другие сайты

Sega    19

Sega
Опубликовано

Норм темка. Побольше бы таких. Надеюсь в следующей версии увидеть камеры для пыток и истязаний)

Поделиться сообщением

Ссылка на сообщение
Поделиться на другие сайты

Trateus    66

Trateus
Опубликовано
Разработчикам samp'a не до драчения было!

Поделиться сообщением

Ссылка на сообщение
Поделиться на другие сайты

Jockey    27

Jockey
Опубликовано

Сделано прикольно.

Поделиться сообщением

Ссылка на сообщение
Поделиться на другие сайты

Smolin    1,410

Smolin
Опубликовано

хоть код упростилhttp://gsgames.ru/forum/public/style_emoticons/default/wink.gif



if(strcmp(cmd, "/propsesex", true) == 0||strcmp(cmd, "/prsex", true) == 0)

{

if(IsPlayerConnected(playerid))

{

if(PlayerInfo[playerid][pMarried] > 1)

{

if(!IsPlayerInAnyVehicle(playerid)) return SendClientMessage(playerid, COLOR_GREY, "Сексом занимаются только в машинах.");

new Car = GetPlayerVehicleID(playerid);

tmp = strtok(cmdtext, idx);

if(!strlen(tmp)) return SendClientMessage(playerid, COLOR_GRAD1, "Prime: /pr(opse)sex [playerid/PartOfName]");

//giveplayerid = strval(tmp);

giveplayerid = ReturnUser(tmp);

tmp = strtok(cmdtext, idx);

if(IsPlayerConnected(giveplayerid))

{

if(giveplayerid != INVALID_PLAYER_ID)

{

if (ProxDetectorS(8.0, playerid, giveplayerid))

{

if(giveplayerid == playerid) { SendClientMessage(playerid, COLOR_GREY, "* Вы не можете заниматься сексом с собой."); return 1; }

if(IsPlayerInAnyVehicle(playerid) && IsPlayerInVehicle(giveplayerid, Car) || PlayerInfo[playerid][pMarriedTo] == giveplayerid)

{

GetPlayerName(giveplayerid, giveplayer, sizeof(giveplayer));

GetPlayerName(playerid, sendername, sizeof(sendername));

if(PlayerInfo[playerid][pSex] == 1)

{

format(string, sizeof(string), "* Вы занялись сексом с вашей женой.");

SendClientMessage(giveplayerid, COLOR_LIGHTBLUE, string);

}

if(PlayerInfo[playerid][pSex] == 2)

{

format(string, sizeof(string), "* Вы занялись сексом с вашим мужем.");

SendClientMessage(giveplayerid, COLOR_LIGHTBLUE, string);

}

if(PlayerInfo[playerid][pSex] == 1)

{

format(string, sizeof(string), " занялся сексом с женой.");

Action(playerid, string);

}

else

{

format(string, sizeof(string), " занялась сексом с мужем.");

Action(playerid, string);

format(string, sizeof(string), " получает оргазм.", sendername);

Action(playerid, string);

}

}

else return SendClientMessage(playerid, COLOR_GREY, "Вы и другой игрок должны быть в одном автомобиле.");

}

else return SendClientMessage(playerid, COLOR_GREY, "Этот игрок не рядом с вами!");

}

}

else return SendClientMessage(playerid, COLOR_GREY, "Игрок не в игре.");

}

else

{

if(PlayerInfo[playerid][pSex] == 1) return SendClientMessage(playerid, COLOR_GREY, "У вас нет жены!");

if(PlayerInfo[playerid][pSex] == 2) return SendClientMessage(playerid, COLOR_GREY, "У вас нету мужа!");

}

}//not connected

return 1;

}

Поделиться сообщением

Ссылка на сообщение
Поделиться на другие сайты

Trateus    66

Trateus
Опубликовано
Оптимизация в накауте!

Поделиться сообщением

Ссылка на сообщение
Поделиться на другие сайты

Trateus    66

Trateus
Опубликовано

Оптимизировал код до 36 строк!

if(strcmp(cmd, "/propsesex", true) == 0||strcmp(cmd, "/prsex", true) == 0)
{
if(IsPlayerConnected(playerid))
{
if(PlayerInfo[playerid][pMarried] > 1)
{
if(!IsPlayerInAnyVehicle(playerid)) return SendClientMessage(playerid, COLOR_GREY, "Сексом занимаются только в машинах.");
new Car = GetPlayerVehicleID(playerid); tmp = strtok(cmdtext, idx);
if(!strlen(tmp)) return SendClientMessage(playerid, COLOR_GRAD1, "Prime: /pr(opse)sex [playerid/PartOfName]");
giveplayerid = ReturnUser(tmp); tmp = strtok(cmdtext, idx);
if(IsPlayerConnected(giveplayerid)) return SendClientMessage(playerid,-1,"Игрок не в сети!");
if(giveplayerid != INVALID_PLAYER_ID)
{
if (ProxDetectorS(8.0, playerid, giveplayerid))
{
if(giveplayerid == playerid) return SendClientMessage(playerid, COLOR_GREY, "* Вы не можете заниматься сексом с собой.");
if(IsPlayerInAnyVehicle(playerid) && IsPlayerInVehicle(giveplayerid, Car) || PlayerInfo[playerid][pMarriedTo] == giveplayerid)
{
if(PlayerInfo[playerid][pSex] == 1) SendClientMessage(giveplayerid, COLOR_LIGHTBLUE, "* Вы занялись сексом с вашей женой.");
if(PlayerInfo[playerid][pSex] == 2) SendClientMessage(giveplayerid, COLOR_LIGHTBLUE, "* Вы занялись сексом с вашим мужем.");
if(PlayerInfo[playerid][pSex] == 1) Action(playerid, " занялся сексом с женой.");
else Action(playerid, " занялась сексом с мужем."),Action(playerid, " получает оргазм.");
}
else SendClientMessage(playerid, COLOR_GREY, "Вы и другой игрок должны быть в одном автомобиле.");
}
else SendClientMessage(playerid, COLOR_GREY, "Этот игрок не рядом с вами!");
}
}
else
{
if(PlayerInfo[playerid][pSex] == 1) return SendClientMessage(playerid, COLOR_GREY, "У вас нет жены!");
if(PlayerInfo[playerid][pSex] == 2) return SendClientMessage(playerid, COLOR_GREY, "У вас нету мужа!");
}
}
return true;
}

Поделиться сообщением

Ссылка на сообщение
Поделиться на другие сайты

Smolin    1,410

Smolin
Опубликовано

Оптимизировал код до 36 строк!

if(strcmp(cmd, "/propsesex", true) == 0||strcmp(cmd, "/prsex", true) == 0)
{
if(IsPlayerConnected(playerid))
{
if(PlayerInfo[playerid][pMarried] > 1)
{
if(!IsPlayerInAnyVehicle(playerid)) return SendClientMessage(playerid, COLOR_GREY, "Сексом занимаются только в машинах.");
new Car = GetPlayerVehicleID(playerid); tmp = strtok(cmdtext, idx);
if(!strlen(tmp)) return SendClientMessage(playerid, COLOR_GRAD1, "Prime: /pr(opse)sex [playerid/PartOfName]");
giveplayerid = ReturnUser(tmp); tmp = strtok(cmdtext, idx);
if(IsPlayerConnected(giveplayerid)) return SendClientMessage(playerid,-1,"Игрок не в сети!");
if(giveplayerid != INVALID_PLAYER_ID)
{
if (ProxDetectorS(8.0, playerid, giveplayerid))
{
if(giveplayerid == playerid) return SendClientMessage(playerid, COLOR_GREY, "* Вы не можете заниматься сексом с собой.");
if(IsPlayerInAnyVehicle(playerid) && IsPlayerInVehicle(giveplayerid, Car) || PlayerInfo[playerid][pMarriedTo] == giveplayerid)
{
if(PlayerInfo[playerid][pSex] == 1) SendClientMessage(giveplayerid, COLOR_LIGHTBLUE, "* Вы занялись сексом с вашей женой.");
if(PlayerInfo[playerid][pSex] == 2) SendClientMessage(giveplayerid, COLOR_LIGHTBLUE, "* Вы занялись сексом с вашим мужем.");
if(PlayerInfo[playerid][pSex] == 1) Action(playerid, " занялся сексом с женой.");
else Action(playerid, " занялась сексом с мужем."),Action(playerid, " получает оргазм.");
}
else SendClientMessage(playerid, COLOR_GREY, "Вы и другой игрок должны быть в одном автомобиле.");
}
else SendClientMessage(playerid, COLOR_GREY, "Этот игрок не рядом с вами!");
}
}
else
{
if(PlayerInfo[playerid][pSex] == 1) return SendClientMessage(playerid, COLOR_GREY, "У вас нет жены!");
if(PlayerInfo[playerid][pSex] == 2) return SendClientMessage(playerid, COLOR_GREY, "У вас нету мужа!");
}
}
return true;
}
возьму ка пример оптимизации для других(своих) комманд

Поделиться сообщением

Ссылка на сообщение
Поделиться на другие сайты

Alexsis Prime    27

Alexsis Prime
Опубликовано

Поднимаю тему

Поделиться сообщением

Ссылка на сообщение
Поделиться на другие сайты

Amfy    349

Amfy
Опубликовано
Выложите скриншоты в 1-ый пост, или тему закрываю из-за нарушения правил раздела.

Поделиться сообщением

Ссылка на сообщение
Поделиться на другие сайты

Amfy    349

Amfy
Опубликовано

Закрыто из-за нарушения правил раздела. Время на исправления давал!

Поделиться сообщением

Ссылка на сообщение
Поделиться на другие сайты
Гость
Эта тема закрыта для публикации ответов.
Авторизация  
Подписчики 0
Перейти к списку тем Дополнительные скрипты

  • Последние посетители   0 пользователей онлайн

    Ни одного зарегистрированного пользователя не просматривает данную страницу

×

Важная информация

Мы разместили cookie-файлы на ваше устройство, чтобы помочь сделать этот сайт лучше. Вы можете изменить свои настройки cookie-файлов, или продолжить без изменения настроек.

  Я принимаю