API tools faq
paste
Advertisement
Chip7

[FS] FilterScript Sex System v0.2

Chip7
Jul 6th, 2012
812
0
Never
Add comment
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
Pawn 10.18 KB | None | 0 0
raw download clone embed print report
  1. /*VISITE NOSSO SITE: http://www.sampknd.com/
  2.   SAMP KND MELHOR BLOG DE SAMP DO BRASIL
  3. */
  4.  
  5. #include <a_samp>
  6. #include <zcmd>
  7. #include <sscanf2>
  8.  
  9. forward RecuperandoAids(playerid);
  10.  
  11. #define Vermelho 0xFF0000FF
  12. #define ANIM 45
  13. #define OKAY 46
  14. #define FARMACIA 47
  15.  
  16. new PlayerInvited;
  17. new EmSexo[MAX_PLAYERS];
  18. new JaConvidou[MAX_PLAYERS];
  19. new Camisinhas[MAX_PLAYERS];
  20. new CuraAids[MAX_PLAYERS];
  21. new ComAids[MAX_PLAYERS];
  22. new TimerRec;
  23. public OnFilterScriptInit()
  24. {
  25.     printf("Sex System Loaded - Coded By : Break & .FuneraL.");
  26.     return 1;
  27. }
  28.  
  29. public OnFilterScriptExit()
  30. {
  31.     printf("Sex System Closed - Coded By : Break & .FuneraL.");
  32.     return 1;
  33. }
  34.  
  35. public OnPlayerConnect(playerid)
  36. {
  37.     JaConvidou[playerid] = 0;
  38.     EmSexo[playerid] = 0;
  39.     return 1;
  40. }
  41.  
  42. public OnPlayerDisconnect(playerid, reason)
  43. {
  44.     JaConvidou[playerid] = 0;
  45.     EmSexo[playerid] = 0;
  46.     return 1;
  47. }
  48.  
  49. CMD:convidarsexo(playerid, params[])
  50. {
  51.     new CsexoID, nome[24], Cnome[24], String[128];
  52.     if(sscanf(params, "i", CsexoID)) return SendClientMessage(playerid, Vermelho, "{00BFFF}[USO]:{E0FFFF} /convidarsexo [PlayerID]");
  53.     if(JaConvidou[playerid] == 1) return SendClientMessage(playerid, Vermelho, "{00BFFF}[ERRO]: {E0FFFF}Você Já Convidou Alguem Para Fazer Sexo.");
  54.     if(EmSexo[PlayerInvited] == 1) return SendClientMessage(playerid, Vermelho, "{00BFFF}[ERRO]: {E0FFFF}Este Player Ja Está fazendo sexo!");
  55.     if(ComAids[PlayerInvited] == 1) return SendClientMessage(playerid, Vermelho, "{00BFFF}[ERRO]:{E0FFFF}Voce Está com o virus!");
  56.     GetPlayerName(playerid, nome, sizeof(nome));
  57.     GetPlayerName(CsexoID, Cnome, sizeof(Cnome));
  58.     PlayerInvited  = playerid;
  59.     format(String, sizeof(String), "{00BFFF}[Sex-System]:{E0FFFF} Você Convidou {1E90FF}%s {E0FFFF}Para Fazer Sexo", Cnome);
  60.     SendClientMessage(playerid, -1, String);
  61.     format(String, sizeof(String), "{00BFFF}[Sex-System]:{1E90FF} %s {E0FFFF}Te Convidou Para Fazer Sexo, /aceitarsexo ou /rejeitar", nome);
  62.     SendClientMessage(CsexoID, -1, String);
  63.     JaConvidou[playerid] = 1;
  64.     EmSexo[PlayerInvited] = 1;
  65.     return 1;
  66. }
  67. CMD:aceitarsexo(playerid)
  68. {
  69.     new PlayerName[24], String[128];
  70.     if(EmSexo[playerid] == 1) return SendClientMessage(playerid, Vermelho, "[ERRO]{E0FFFF}: Você Já Está Fazendo Sexo com Alguém!");
  71.     if(Camisinhas[playerid] < 1)
  72.     {
  73.     ComAids[playerid] = 1;
  74.     ComAids[PlayerInvited] = 1;
  75.     }
  76.     Camisinhas[playerid]--;
  77.     Camisinhas[PlayerInvited]--;
  78.     format(String, sizeof(String), "{00BFFF}[Sex-System]:{1E90FF} %s {E0FFFF}Aceitou seu Convite, {FF1493}Divirta-se", PlayerName);
  79.     SendClientMessage(PlayerInvited, -1, String);
  80.     SendClientMessage(playerid, -1, "{00BFFF}[Sex-System]:{E0FFFF} Você Aceitou o Convite, Divirta-se");
  81.     SetPlayerPos(PlayerInvited, 197.3705,175.3568,1003.0234);
  82.     SetPlayerPos(playerid, 197.3318,176.0381,1003.0234);
  83.     ResetPlayerWeapons(playerid);
  84.     ResetPlayerWeapons(PlayerInvited);
  85.     ApplyAnimation(PlayerInvited,"FINALE","FIN_Land_Car",4.1,0,1,1,1,1);
  86.     ApplyAnimation(playerid,"MD_END","END_SC1_SMO",4.1,0,1,1,1,1);
  87.  
  88.     SetPlayerVirtualWorld(playerid, 3);
  89.     SetPlayerVirtualWorld(PlayerInvited, 3);
  90.  
  91.     SetPlayerInterior(playerid, 3);
  92.     SetPlayerInterior(PlayerInvited, 3);
  93.  
  94.     SetPlayerDrunkLevel(playerid, 3000);
  95.     SetPlayerDrunkLevel(PlayerInvited, 3000);
  96.  
  97.     SetPlayerTime(playerid, 24, 24);
  98.     SetPlayerTime(PlayerInvited, 24, 24);
  99.  
  100.     GivePlayerWeapon(playerid, 10, 1);
  101.     GivePlayerWeapon(PlayerInvited, 10, 1);
  102.  
  103.     ShowPlayerDialog(playerid, OKAY, DIALOG_STYLE_LIST, "{6495ED}Sex System Menu", "{00FFFF}Deseja Mesmo ?\n{00FFFF}Cancelar Sexo", "Confirmar","");
  104.     ShowPlayerDialog(PlayerInvited, OKAY, DIALOG_STYLE_LIST, "{6495ED}Sex System Menu", "{00FFFF}Deseja Mesmo ?\n{00FFFF}Cancelar Sexo", "Confirmar","");
  105.     return 1;
  106. }
  107. CMD:pararsexo(playerid)
  108. {
  109.     SpawnPlayer(playerid);
  110.     SpawnPlayer(PlayerInvited);
  111.     JaConvidou[PlayerInvited] = 0;
  112.     EmSexo[PlayerInvited] = 0;
  113.     JaConvidou[playerid] = 0;
  114.     EmSexo[playerid] = 0;
  115.     StopAudioStreamForPlayer(playerid);
  116.     return 1;
  117. }
  118.  
  119. CMD:rejeitar(playerid)
  120. {
  121.     SendClientMessage(playerid,-1,"{00BFFF}[Sex-System]: {E0FFFF}Voce Rejeitou fazer sexo!");
  122.     SendClientMessage(PlayerInvited,-1,"{00BFFF}[Sex-System]: {E0FFFF}O Sexo foi rejeitado");
  123.     JaConvidou[PlayerInvited] = 0;
  124.     JaConvidou[playerid] = 0;
  125.     EmSexo[PlayerInvited] = 1;
  126.     EmSexo[playerid] = 1;
  127.     return 1;
  128. }
  129. CMD:farmacia(playerid)
  130. {
  131.     new NomePlayer[24], StringP[128];
  132.     GetPlayerName(playerid, NomePlayer, 24);
  133.     format(StringP, sizeof(StringP), "{00BFFF}[Sex-System]:{1E90FF} %s {E0FFFF}Abriu a Farmácia Para Fazer Compras!", NomePlayer);
  134.     SendClientMessageToAll(-1, StringP);
  135.     ShowPlayerDialog(playerid, FARMACIA, DIALOG_STYLE_LIST, "Farmácia", "Camisinha\nVibrador Duplo\nVibrador Simples\nCura para a Aids","Comprar","Fechar");
  136.     return 1;
  137. }
  138. CMD:infosaude(playerid)
  139. {
  140.     new DSaude[400], StringS[150], NomePlayer[24], Status[30];
  141.     GetPlayerName(playerid, NomePlayer, 24);
  142.     if(ComAids[playerid] == 0) Status = "Não";
  143.     if(ComAids[playerid] == 1) Status = "Sim";
  144.     format(StringS, sizeof(StringS), "{E0FFFF}Nome: {1E90FF}%s\n\n", NomePlayer); strcat(DSaude, StringS);
  145.     format(StringS, sizeof(StringS), "{E0FFFF}Quantidade de Camisinhas : {1E90FF}%d\n", Camisinhas[playerid]); strcat(DSaude, StringS);
  146.     format(StringS, sizeof(StringS), "{E0FFFF}Com Aids ?:{1E90FF} %s", Status); strcat(DSaude, StringS);
  147.     ShowPlayerDialog(playerid, 10, DIALOG_STYLE_MSGBOX, "{1E90FF}Informações da sua Saude", DSaude, "Ok", "Fechar");
  148.     return 1;
  149. }
  150.  
  151. public OnPlayerKeyStateChange(playerid, newkeys, oldkeys)
  152. {
  153.     if(newkeys & KEY_YES)
  154.     {
  155.         ShowPlayerDialog(playerid, ANIM, DIALOG_STYLE_LIST, "{1E90FF}Escolha Seu Anim", "{00FFFF}De 4\n {00FFFF}Comer\n{00FFFF}Beijar\n{00FFFF}Anim 1\n{00FFFF}Anim 2", "Escolher", "sair");
  156.         return 1;
  157.     }
  158.     return 1;
  159. }
  160.  
  161. public OnPlayerDeath(playerid, killerid, reason)
  162. {
  163.  
  164.     StopAudioStreamForPlayer(playerid);
  165.     JaConvidou[PlayerInvited] = 0;
  166.     EmSexo[PlayerInvited] = 0;
  167.     JaConvidou[playerid] = 0;
  168.     EmSexo[playerid] = 0;
  169.     SendClientMessage(playerid,-1,"{00BFFF}[Sex-System]: {E0FFFF}Seu amor te matou =/");
  170.     SendClientMessage(PlayerInvited,-1,"{00BFFF}[Sex-System]: {E0FFFF}O Sexo acabou");
  171.     return 1;
  172. }
  173.  
  174. public OnDialogResponse(playerid, dialogid, response, listitem, inputtext[])
  175. {
  176.     if(dialogid == OKAY)
  177.     {
  178.         if(response)
  179.         {
  180.             if(listitem == 0)
  181.             {
  182.                 SendClientMessage(playerid,-1,"{00BFFF}[Sex-System]:{E0FFFF} Você Resolveu Seguir em Frente");
  183.                 SendClientMessage(playerid,-1,"{00BFFF}[Sex-System]: {E0FFFF}Para Mudar a Animação Pressione {00BFFF}'Y'");
  184.                 EmSexo[playerid] = 1;
  185.                 EmSexo[PlayerInvited] = 1;
  186.                 PlayAudioStreamForPlayer(playerid, "http://k003.kiwi6.com/hotlink/ti9du6x6n2/ah_wilson_vai.mp3");
  187.             }
  188.             if(listitem == 1)
  189.             {
  190.                 SpawnPlayer(PlayerInvited);
  191.                 SpawnPlayer(playerid);
  192.                 SendClientMessage(playerid,-1,"{00BFFF}[Sex-System]: {E0FFFF}Você Cancelou o Sexo");
  193.                 SendClientMessage(PlayerInvited,-1,"{00BFFF}[Sex-System]: {E0FFFF}Seu Parceiro Brochou na Hora H!");
  194.                 EmSexo[playerid] = 0;
  195.                 EmSexo[PlayerInvited] = 0;
  196.                 JaConvidou[playerid] = 0;
  197.                 JaConvidou[PlayerInvited] = 0;
  198.             }
  199.         }
  200.         return 1;
  201.     }
  202.     if(dialogid == ANIM)
  203.     {
  204.         if(response)
  205.         {
  206.             if(listitem == 0)
  207.             {
  208.                 ApplyAnimation(playerid,"FINALE","FIN_Land_Car",4.1,0,1,1,1,1);
  209.             }
  210.             if(listitem == 1)
  211.             {
  212.                 ApplyAnimation(playerid,"MD_END","END_SC1_SMO",4.1,0,1,1,1,1);
  213.             }
  214.             if(listitem == 2)
  215.             {
  216.                 ApplyAnimation(playerid,"KISSING", "Grlfrd_Kiss_02", 1.800001, 1, 0, 0, 1, 600);
  217.             }
  218.             if(listitem == 3)
  219.             {
  220.                 ApplyAnimation(playerid, "BLOWJOBZ", "BJ_COUCH_START_W", 4.0, 0, 0, 0, 1, 0);
  221.             }
  222.             if(listitem == 4)
  223.             {
  224.                 ApplyAnimation(playerid, "BLOWJOBZ", "BJ_COUCH_END_W", 4.0, 0, 0, 0, 1, 0);
  225.                 return 1;
  226.             }
  227.         }
  228.         return 1;
  229.     }
  230.     if(dialogid == FARMACIA)
  231.     {
  232.         if(response)
  233.         {
  234.             switch(listitem)
  235.             {
  236.                 case 0:
  237.                 {
  238.                     if(GetPlayerMoney(playerid) < 500) return SendClientMessage(playerid, -1, "{00BFFF}[Sex-System]: {E0FFFF}Você Não tem Dinheiro Suficiente para Realizar a Compra");
  239.                     SendClientMessage(playerid, -1, "{00BFFF}[Sex-System]: {E0FFFF}Você Comprou uma Camisinha");
  240.                     Camisinhas[playerid]++;
  241.                     GivePlayerMoney(playerid, -500);
  242.                     }
  243.                 case 1:
  244.                 {
  245.                     if(GetPlayerMoney(playerid) < 1000) return SendClientMessage(playerid, -1, "[Sex-System]: Você Não tem Dinheiro Suficiente para Realizar a Compra");
  246.                     SendClientMessage(playerid, -1, "{00BFFF}[Sex-System]: {E0FFFF}Você Comprou um Duplo Vibrador");
  247.                     GivePlayerWeapon(playerid, 10, 1);
  248.                     GivePlayerMoney(playerid, -1000);
  249.                     }
  250.                 case 2:
  251.                 {
  252.                     if(GetPlayerMoney(playerid) < 750) return SendClientMessage(playerid, -1, "[Sex-System]: {E0FFFF}Você Não tem Dinheiro Suficiente para Realizar a Compra");
  253.                     SendClientMessage(playerid, -1, "{00BFFF}[Sex-System]: {E0FFFF}Você Comprou um Vibrador Simples");
  254.                     GivePlayerWeapon(playerid, 11, 1);
  255.                     GivePlayerMoney(playerid, -750);
  256.                     }
  257.                 case 3:
  258.                 {
  259.                     if(GetPlayerMoney(playerid) < 20000) return SendClientMessage(playerid, -1, "[Sex-System]: Você Não tem Dinheiro Suficiente para Realizar a Compra");
  260.                     if(ComAids[playerid] == 1) return SendClientMessage(playerid,-1,"{00BFFF}[Sex-System]: {E0FFFF}Você Não possui aids");
  261.                     SendClientMessage(playerid, -1, "{00BFFF}[Sex-System]: Parabéns, Você Encontrou a Cura para a Aids, Gastou R$20.000 - Está Recuperado");
  262.                     CuraAids[playerid] = 1;
  263.                     ComAids[playerid] = 0;
  264.                     GivePlayerMoney(playerid, -20000);
  265.                     SendClientMessage(playerid, -1,"{00BFFF}[Sex-System]: {E0FFFF}Recuperando");
  266.                     TimerRec = SetTimerEx("RecuperandoAids", 15000, false, "i", playerid);
  267.                     }
  268.                 }
  269.             }
  270.         }
  271.     return 1;
  272. }
  273.  
  274. public RecuperandoAids(playerid)
  275. {
  276.     ComAids[playerid] = 0;
  277.     KillTimer(TimerRec);
  278.     SendClientMessage(playerid, -1,"{00BFFF}[Sex-System]: {E0FFFF}Recuperado");
  279.     return 1;
  280. }
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement
Public Pastes
Advertisement
We use cookies for various purposes including analytics. By continuing to use Pastebin, you agree to our use of cookies as described in the Cookies Policy.  OK, I Understand
Not a member of Pastebin yet?
Sign Up, it unlocks many cool features!