SHARE
TWEET

[FS] FilterScript Sex System v0.2

Chip7 Jul 6th, 2012 468 Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
  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. }
RAW Paste Data
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!
 
Top