dylan4021

Sistema de Sequestro [KoS]Dylan

Aug 9th, 2011
91
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
Pawn 7.71 KB | None | 0 0
  1. /*Feito por [KoS]Dylan*/
  2. /*Feito por [KoS]Dylan*/
  3.  
  4. #include <a_samp>
  5. #include <dini>
  6. #include <sscanf2>
  7. #include <ZCMD>
  8.  
  9. #define SalvarNoobs "/Sequestro/%s.ini"
  10.  
  11. new Sequestrado[MAX_PLAYERS];
  12. new Sequestrou[MAX_PLAYERS];
  13. new SaiuSequestrado[MAX_PLAYERS];
  14. new NomedoCara[MAX_PLAYER_NAME];
  15. new NomedoCara2[MAX_PLAYER_NAME];
  16. new Sstring[128];
  17. new dini_String[128];
  18. new Outroplayerid;
  19. new PrecoSequestro;
  20.  
  21. forward SoltarPreso(playerid);
  22.  
  23. public OnFilterScriptInit()
  24. {
  25.     print("** Sistema de Sequestro por [KoS]Dylan");
  26.     print("** Carregado Com Success");
  27.    
  28.     return 1;
  29. }
  30.  
  31. public OnFilterScriptExit()
  32. {
  33.     print("** Sistema de Sequestro por [KoS]Dylan");
  34.     print("** Descarregado Com Success");
  35.     return 1;
  36. }
  37.  
  38. public OnPlayerConnect(playerid)
  39. {
  40.     Sequestrado[playerid] = 0;
  41.     return 1;
  42. }
  43.  
  44. public OnPlayerDisconnect(playerid, reason)
  45. {
  46.     if(Sequestrado[playerid] == 1) {
  47.         GetPlayerName(playerid, NomedoCara, sizeof(NomedoCara));
  48.         format(Sstring, sizeof(Sstring), "**%s Saiu do servidor Sendo Sequestrado.",NomedoCara);
  49.         SendClientMessageToAll(0xFF0000B9, Sstring);
  50.         SaiuSequestrado[playerid] = 1;
  51.         GetPlayerName(playerid, NomedoCara, sizeof(NomedoCara));
  52.         format(dini_String,sizeof(dini_String),SalvarNoobs,NomedoCara);
  53.         //format(Sstring, sizeof(Sstring), "%d", SaiuSequestrado[playerid]);
  54.         dini_IntSet(dini_String,"SaiuSequestrado", SaiuSequestrado[playerid]);
  55.     }
  56.     print("** Sistema de Sequestro por [KoS]Dylan");
  57.     print("** Descarregado Com Success");
  58.     return 1;
  59. }
  60.  
  61. public OnPlayerSpawn(playerid)
  62. {
  63.     GetPlayerName(playerid, NomedoCara, sizeof(NomedoCara));
  64.     format(dini_String,sizeof(dini_String),SalvarNoobs,NomedoCara);
  65.     if(!fexist(dini_String)){dini_Create(dini_String);}
  66.     if(dini_Int(dini_String,"SaiuSequestrado") == 1) {
  67.         SetPlayerPos(playerid, 264.6288,77.5742,1001.0391);
  68.         SetPlayerInterior(playerid, 6);
  69.         SetTimerEx("SoltarPreso", 300000, false, "i", playerid);
  70.         SendClientMessage(playerid, 0xFF0000B9, "*Como você saiu Sequestrado , Ficara Preso por 5 Minutos.");
  71.     }
  72.     return 1;
  73. }
  74.  
  75. public SoltarPreso(playerid)
  76. {
  77.     SaiuSequestrado[playerid] = 0;
  78.     SpawnPlayer(playerid);
  79.     GetPlayerName(playerid, NomedoCara, sizeof(NomedoCara));
  80.     format(dini_String,sizeof(dini_String),SalvarNoobs,NomedoCara);
  81.     //format(Sstring, sizeof(Sstring), "%d", SaiuSequestrado[playerid]);
  82.     dini_IntSet(dini_String,"SaiuSequestrado", SaiuSequestrado[playerid]);
  83.     return 1;
  84. }
  85.  
  86. stock PlayerPerto(playerid)
  87. {
  88.     new Float:Poss[3];
  89.     GetPlayerPos(Outroplayerid, Poss[0], Poss[1], Poss[2]);
  90.     if(!IsPlayerInRangeOfPoint(Outroplayerid, 2.0, Poss[0], Poss[1], Poss[2])) return SendClientMessage(playerid, 0xFF0000B9, "[Erro]: Você esta longe do Player.");
  91.     return 1;
  92. }
  93.  
  94. CMD:sequestrar(playerid, params[])
  95. {
  96.     if(sscanf(params, "ud", Outroplayerid,PrecoSequestro)) return SendClientMessage(playerid, -1, "[Erro]: Use /sequestrar [ID/Nome] [Preco]");
  97.     if(Outroplayerid == playerid) return SendClientMessage(playerid, 0xFF0000B9, "Você não pode se Sequestrar");
  98.     if(!IsPlayerConnected(Outroplayerid)) return SendClientMessage(playerid, 0xFF0000B9, "Jogador Invalido/ Não Conectado");
  99.     if(PrecoSequestro < 0 || PrecoSequestro > 1000000) return SendClientMessage(playerid, 0xFF0000B9, "[Erro]: Dinheiro so entre 0 a 1000000");
  100.     if(!IsPlayerInAnyVehicle(playerid)) return SendClientMessage(playerid, 0xFF0000B9, "Você não está em um veiculo");
  101.     if(Sequestrado[Outroplayerid] == 1) return SendClientMessage(playerid, 0xFF0000B9, "[Erro]: Player jah está sendo Sequestrado");
  102.     if(PlayerPerto(Outroplayerid))
  103.     GetPlayerName(playerid, NomedoCara, sizeof(NomedoCara));
  104.     GetPlayerName(Outroplayerid, NomedoCara2, sizeof(NomedoCara2));
  105.     new vid = GetPlayerVehicleID(playerid);
  106.     PutPlayerInVehicle(Outroplayerid, vid, 3);
  107.     TogglePlayerControllable(Outroplayerid, 0);
  108.     Sequestrou[playerid] = 1;
  109.     Sequestrado[Outroplayerid] = 1;
  110.     format(Sstring, sizeof(Sstring), "*%s foi sequestrado por %s por R$%d", NomedoCara2, NomedoCara, PrecoSequestro);
  111.     SendClientMessageToAll(0x0000FF9C, Sstring);
  112.     return 1;
  113. }
  114.  
  115. CMD:ssoltar(playerid, params[])
  116. {
  117.     if(sscanf(params, "u", Outroplayerid,PrecoSequestro)) return SendClientMessage(playerid, -1, "[Erro]: Use /ssoltar [ID/Nome]");
  118.     if(Outroplayerid == playerid) return SendClientMessage(playerid, 0xFF0000B9, "Você não pode se Soltar");
  119.     if(!IsPlayerConnected(Outroplayerid)) return SendClientMessage(playerid, 0xFF0000B9, "Jogador Invalido/ Não Conectado");
  120.     if(Sequestrado[Outroplayerid] == 0) return SendClientMessage(playerid, 0xFF0000B9, "[Erro]: Player não está sendo Sequestrado");
  121.     if(PlayerPerto(Outroplayerid))
  122.     RemovePlayerFromVehicle(Outroplayerid);
  123.     TogglePlayerControllable(Outroplayerid, 1);
  124.     if(Sequestrou[playerid] == 1) {
  125.         format(Sstring, sizeof(Sstring), "*O Sequestrador soltou %s do Sequestro!!", NomedoCara2);
  126.         SendClientMessageToAll(0x0000FF9C, Sstring);
  127.     }
  128.     else if(Sequestrou[playerid] == 0) {
  129.         format(Sstring, sizeof(Sstring), "*%s Soltou %s do Sequestro!!", NomedoCara, NomedoCara2);
  130.         SendClientMessageToAll(0x0000FF9C, Sstring);
  131.         SendClientMessage(playerid, -1, "Como Recompensa do Governo você ganhou R$10000!");
  132.         GivePlayerMoney(playerid, 10000);
  133.     }
  134.     SetPlayerInterior(Outroplayerid, 0);
  135.     return 1;
  136. }
  137.  
  138. CMD:spagar(playerid, params[])
  139. {
  140.     if(sscanf(params, "u", Outroplayerid,PrecoSequestro)) return SendClientMessage(playerid, -1, "[Erro]: Use /spagar [ID/Nome]");
  141.     if(!IsPlayerConnected(Outroplayerid)) return SendClientMessage(playerid, 0xFF0000B9, "Jogador Invalido/ Não Conectado");
  142.     if(Sequestrou[Outroplayerid] == 0) return SendClientMessage(playerid, 0xFF0000B9, "[Erro]: Player não está Sequestrando ninguem");
  143.     if(Sequestrou[playerid] == 1) return SendClientMessage(playerid, 0xFF0000B9, "[Erro]: Você não pode pagar o sequestro");
  144.     if(Sequestrado[playerid] == 1) return SendClientMessage(playerid, 0xFF0000B9, "[Erro]: Você não pode pagar o sequestro");
  145.     format(Sstring, sizeof(Sstring), "*%s pagou o sequestro", NomedoCara, NomedoCara2);
  146.     SendClientMessageToAll(0x0000FF9C, Sstring);
  147.     GivePlayerMoney(Outroplayerid, PrecoSequestro);
  148.     GivePlayerMoney(playerid, -PrecoSequestro);
  149.     return 1;
  150. }
  151.  
  152. CMD:svendar(playerid, params[])
  153. {
  154.     if(sscanf(params, "u", Outroplayerid,PrecoSequestro)) return SendClientMessage(playerid, -1, "[Erro]: Use /svendar [ID/Nome]");
  155.     if(Outroplayerid == playerid) return SendClientMessage(playerid, 0xFF0000B9, "Você não pode se Vendar");
  156.     if(!IsPlayerConnected(Outroplayerid)) return SendClientMessage(playerid, 0xFF0000B9, "Jogador Invalido/ Não Conectado");
  157.     if(Sequestrado[Outroplayerid] == 0) return SendClientMessage(playerid, 0xFF0000B9, "[Erro]: Player não está Sequestrando ninguem");
  158.     if(Sequestrou[playerid] == 0) return SendClientMessage(playerid, 0xFF0000B9, "[Erro]: Você não é o sequestrador");
  159.     if(PlayerPerto(Outroplayerid))
  160.     SetPlayerInterior(Outroplayerid, 1);
  161.     return 1;
  162. }
  163.  
  164. CMD:sdesvendar(playerid, params[])
  165. {
  166.     if(sscanf(params, "u", Outroplayerid,PrecoSequestro)) return SendClientMessage(playerid, -1, "[Erro]: Use /sdesvendar [ID/Nome]");
  167.     if(Outroplayerid == playerid) return SendClientMessage(playerid, 0xFF0000B9, "Você não pode se Desvendar");
  168.     if(!IsPlayerConnected(Outroplayerid)) return SendClientMessage(playerid, 0xFF0000B9, "Jogador Invalido/ Não Conectado");
  169.     if(Sequestrado[Outroplayerid] == 0) return SendClientMessage(playerid, 0xFF0000B9, "[Erro]: Player não está Sequestrando ninguem");
  170.     if(Sequestrou[playerid] == 0) return SendClientMessage(playerid, 0xFF0000B9, "[Erro]: Você não é o sequestrador");
  171.     if(PlayerPerto(Outroplayerid))
  172.     SetPlayerInterior(Outroplayerid, 0);
  173.     return 1;
  174. }
  175.  
  176. /*Feito por [KoS]Dylan*/
  177. /*Feito por [KoS]Dylan*/
Advertisement
Add Comment
Please, Sign In to add comment