API tools faq
paste
Advertisement
Chip7

[FS] FilterScript FuneraL's Administration System

Chip7
Jul 21st, 2012
558
0
Never
Add comment
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
Pawn 61.47 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 <DOF2>
  7. #include <sscanf>
  8. #include <zcmd>
  9.  
  10. /* Definindo Filterscript */
  11.  
  12. #define FILTERSCRIPT
  13. #if defined FILTERSCRIPT
  14. #endif
  15.  
  16. /* Defines / Configurações */
  17.  
  18. #define RED 0xFF00000FF
  19. #define YELLOW 0xFFFF00FF
  20. #define GREEN 0x00FF00FF
  21. #define BLUE 0x0000FFFF
  22. #define PINK 0xFF69B4FF
  23. #define DARKGREEN 0x006400FF
  24. #define BRONZE 0xB8860BFF
  25. #define CINZA 0x9C9C9CFF
  26.  
  27. #define ADMIN_SPEC_TYPE_PLAYER 1
  28. #define ADMIN_SPEC_TYPE_NONE 0
  29.  
  30. #define Mensagem(%1,%2,%3) SendClientMessage(%1,%2,%3)
  31. #define MensagemParaTodos(%1,%2) SendClientMessageToAll(%1,%2)
  32.  
  33. #define LoginCase 1
  34. #define RegisterCase 2
  35. #define CommandsCase 3
  36. #define TeleVipCase 4
  37.  
  38. #define ContasSalvas "/Contas/%s.ini"
  39.  
  40. new
  41.     gString[1024],
  42.     gAdminName[24],
  43.     gPlayerName[24],
  44.     Float:pX,
  45.     Float:pY,
  46.     Float:pZ,
  47.     Avisos[MAX_PLAYERS],
  48.     SpectadorON[MAX_PLAYERS],
  49.     SpectadorMode[MAX_PLAYERS],
  50.     ObjetoAMover,
  51.     ObjetoAMover2,
  52.     VeiculoCriado[MAX_PLAYERS],
  53.     IDCarro[MAX_PLAYERS],
  54.     IDVeiculo,
  55.     ExpirarVIP[MAX_PLAYERS],
  56.     ExpirarBAN[MAX_PLAYERS]
  57. ;
  58.  
  59. /* Enumerator */
  60.  
  61. enum pInfo
  62. {
  63.     PlayerAdmin,
  64.     PlayerScore,
  65.     PlayerKills,
  66.     PlayerDeaths,
  67.     PlayerVip,
  68.     PlayerBanido
  69. };
  70.  
  71. new Informacoes[MAX_PLAYERS][pInfo];
  72.  
  73. public OnFilterScriptInit()
  74. {
  75.     print("FuneraL's Administration System Loaded :]");
  76.     AddStaticVehicleEx(411,-688.50000000,969.79998779,12.00000000,90.00000000,-1,-1,15); //Infernus
  77.     AddStaticVehicleEx(411,-688.59997559,966.79998779,12.00000000,90.00000000,-1,-1,15); //Infernus
  78.     AddStaticVehicleEx(411,-688.40002441,963.79998779,12.00000000,90.00000000,-1,-1,15); //Infernus
  79.     AddStaticVehicleEx(411,-680.09997559,966.79998779,12.00000000,90.00000000,-1,-1,15); //Infernus
  80.     AddStaticVehicleEx(452,-645.00000000,872.90002441,0.00000000,229.99993896,-1,-1,15); //Speeder
  81.     AddStaticVehicleEx(452,-648.59997559,868.09997559,0.00000000,229.99877930,-1,-1,15); //Speeder
  82.     AddStaticVehicleEx(522,-692.90002441,946.59997559,11.89999962,0.00000000,-1,-1,15); //NRG-500
  83.     AddStaticVehicleEx(522,-694.09997559,946.40002441,11.89999962,0.00000000,-1,-1,15); //NRG-500
  84.     AddStaticVehicleEx(522,-695.29998779,946.20001221,11.89999962,0.00000000,-1,-1,15); //NRG-500
  85.     AddStaticVehicleEx(522,-696.50000000,946.00000000,11.89999962,0.00000000,-1,-1,15); //NRG-500
  86.     CreateObject(987,-717.00000000,972.79998779,11.10000038,0.00000000,0.00000000,0.00000000); //object(elecfence_bar) (1)
  87.     CreateObject(987,-705.00000000,972.70001221,11.10000038,0.00000000,0.00000000,0.00000000); //object(elecfence_bar) (2)
  88.     CreateObject(987,-693.29998779,972.70001221,11.10000038,0.00000000,0.00000000,0.00000000); //object(elecfence_bar) (3)
  89.     CreateObject(987,-681.50000000,972.79998779,11.10000038,0.00000000,0.00000000,0.00000000); //object(elecfence_bar) (4)
  90.     CreateObject(987,-669.70001221,972.59997559,11.10000038,0.00000000,0.00000000,0.00000000); //object(elecfence_bar) (5)
  91.     CreateObject(987,-658.59997559,972.70001221,11.10000038,0.00000000,0.00000000,268.00000000); //object(elecfence_bar) (6)
  92.     CreateObject(987,-658.79998779,961.00000000,11.10000038,0.00000000,0.00000000,267.99499512); //object(elecfence_bar) (7)
  93.     CreateObject(987,-659.40002441,949.00000000,11.10000038,0.00000000,0.00000000,267.99499512); //object(elecfence_bar) (8)
  94.     CreateObject(987,-660.00000000,937.00000000,11.10000038,0.00000000,0.00000000,267.99499512); //object(elecfence_bar) (9)
  95.     CreateObject(987,-660.40002441,920.29998779,11.10000038,0.00000000,0.00000000,267.99499512); //object(elecfence_bar) (10)
  96.     CreateObject(987,-659.50000000,908.20001221,11.10000038,0.00000000,0.00000000,177.99499512); //object(elecfence_bar) (11)
  97.     CreateObject(987,-671.20001221,908.59997559,11.10000038,0.00000000,0.00000000,177.98950195); //object(elecfence_bar) (12)
  98.     CreateObject(987,-683.20001221,909.00000000,11.10000038,0.00000000,0.00000000,177.98950195); //object(elecfence_bar) (13)
  99.     CreateObject(987,-695.50000000,909.40002441,11.10000038,0.00000000,0.00000000,177.98950195); //object(elecfence_bar) (14)
  100.     CreateObject(987,-707.29998779,909.40002441,11.10000038,0.00000000,0.00000000,177.98950195); //object(elecfence_bar) (15)
  101.     CreateObject(987,-727.00000000,910.20001221,11.10000038,0.00000000,0.00000000,177.98950195); //object(elecfence_bar) (16)
  102.     CreateObject(987,-739.09997559,910.09997559,11.10000038,0.00000000,0.00000000,83.98950195); //object(elecfence_bar) (17)
  103.     CreateObject(987,-737.79998779,922.00000000,11.10000038,0.00000000,0.00000000,83.98498535); //object(elecfence_bar) (18)
  104.     CreateObject(987,-736.50000000,933.70001221,11.10000038,0.00000000,0.00000000,83.98498535); //object(elecfence_bar) (19)
  105.     CreateObject(987,-735.20001221,945.40002441,11.10000038,0.00000000,0.00000000,83.98498535); //object(elecfence_bar) (20)
  106.     CreateObject(987,-733.90002441,957.29998779,11.10000038,0.00000000,0.00000000,83.98498535); //object(elecfence_bar) (21)
  107.     CreateObject(987,-728.79998779,972.79998779,11.10000038,0.00000000,0.00000000,0.00000000); //object(elecfence_bar) (22)
  108.     CreateObject(987,-732.50000000,972.79998779,11.10000038,0.00000000,0.00000000,0.00000000); //object(elecfence_bar) (23)
  109.     CreateObject(987,-733.90002441,960.90002441,11.10000038,0.00000000,0.00000000,82.00000000); //object(elecfence_bar) (24)
  110.     CreateObject(2745,-688.20001221,948.00000000,12.39999962,0.00000000,0.00000000,182.00000000); //object(cj_stat_3) (1)
  111.     ObjetoAMover = CreateObject(976,-718.59997559,910.40002441,11.19999981,0.00000000,0.00000000,179.99993896); //object(phils_compnd_gate) (1)
  112.     ObjetoAMover2 = CreateObject(976,-660.40002441,926.50000000,11.19999981,0.00000000,0.00000000,267.99499512); //object(phils_compnd_gate) (2)
  113.     CreateObject(691,-712.00000000,966.20001221,11.30000019,0.00000000,4.00000000,86.99996948); //object(sm_veg_tree4_big) (1)
  114.     CreateObject(691,-668.00000000,951.90002441,11.30000019,0.00000000,3.99902344,86.99523926); //object(sm_veg_tree4_big) (2)
  115.     CreateObject(691,-691.79998779,919.59997559,11.30000019,0.00000000,3.99902344,86.99523926); //object(sm_veg_tree4_big) (3)
  116.     Create3DTextLabel("Portão 1\nBem Vindo a Casa VIP\nUse : /abrirpt1", 0xFF0000FF, -722.7346,909.6000,12.1305, 80.0, 0, 0);
  117.     Create3DTextLabel("Portao 2\nBem Vindo a Área de Navegação\nUse : /abrirpt2", 0xFF0000FF, -659.5804,922.1988,12.1267, 80.0, 0, 0);
  118.     return 1;
  119. }
  120.  
  121. public OnFilterScriptExit()
  122. {
  123.     print("FuneraL's Administration System Closed :[");
  124.     DOF2_Exit();
  125.     return 1;
  126. }
  127.  
  128. public OnPlayerConnect(playerid)
  129. {
  130.     if(Informacoes[playerid][PlayerBanido] == 1) return Mensagem(playerid, RED, "Banido do Servidor Temporariámente, Bye!"), Kick(playerid);
  131.     if(DOF2_FileExists(PlayerArchive(playerid)))
  132.     {
  133.         ShowPlayerDialog(playerid, LoginCase, DIALOG_STYLE_INPUT,"Logando no Servidor", "[FuneraL's Admin System]: Bem Vindo Novamente\nLogue-se com Sua Senha do Registro","Logar","Cancelar");
  134.     }
  135.     else
  136.     {
  137.         ShowPlayerDialog(playerid, RegisterCase, DIALOG_STYLE_INPUT,"Registrando no Servidor", "[FuneraL's Admin System]: Bem Vindo ao Servidor\nDigite sua Senha Abaixo Para Registrar-se","Registrar","Cancelar");
  138.     }
  139.     return 1;
  140. }
  141.  
  142. public OnPlayerDisconnect(playerid, reason)
  143. {
  144.     DOF2_SetInt(PlayerArchive(playerid), "Administrador", Informacoes[playerid][PlayerAdmin]);
  145.     DOF2_SetInt(PlayerArchive(playerid), "Grana", GetPlayerMoney(playerid));
  146.     DOF2_SetInt(PlayerArchive(playerid), "Score", Informacoes[playerid][PlayerScore]);
  147.     DOF2_SetInt(PlayerArchive(playerid), "Kills", Informacoes[playerid][PlayerKills]);
  148.     DOF2_SetInt(PlayerArchive(playerid), "Deaths", Informacoes[playerid][PlayerDeaths]);
  149.     DOF2_SetInt(PlayerArchive(playerid), "Vip", Informacoes[playerid][PlayerVip]);
  150.     DOF2_SaveFile();
  151.     return 1;
  152. }
  153.  
  154. public OnPlayerDeath(playerid, killerid, reason)
  155. {
  156.     Informacoes[playerid][PlayerDeaths]++;
  157.     Informacoes[killerid][PlayerKills]++;
  158.     SetPlayerScore(killerid, GetPlayerScore(killerid) + 1);
  159.     Informacoes[killerid][PlayerScore]++;
  160.     return 1;
  161. }
  162.  
  163. /*---------------------------------------------Comandos de Administrador---------------------------------------------*/
  164. CMD:creditos(playerid)
  165. {
  166.     new MessageBox[300];
  167.     format(gString, sizeof(gString), "Criadores do Filterscript de Administrador\n\n"); strcat(MessageBox, gString);
  168.     format(gString, sizeof(gString), "[iPs].FuneraL. - Programador Geral\n\n"); strcat(MessageBox, gString);
  169.     format(gString, sizeof(gString), "Includes e Tutoriais\n"); strcat(MessageBox, gString);
  170.     format(gString, sizeof(gString), "Y_Less - SSCANF Include\n"); strcat(MessageBox, gString);
  171.     format(gString, sizeof(gString), "Zeex - ZCMD Command Processor\n"); strcat(MessageBox, gString);
  172.     format(gString, sizeof(gString), "Double-O-Seven - DOF2 (Double-O-Files)\n"); strcat(MessageBox, gString);
  173.     format(gString, sizeof(gString), "SmiT - Tutorial Seguido para o Sistema de Salvamento\n"); strcat(MessageBox, gString);
  174.     format(gString, sizeof(gString), "@Riichard - Ajudou nas Ideias e Testes\n\n"); strcat(MessageBox, gString);
  175.     ShowPlayerDialog(playerid, 10, DIALOG_STYLE_MSGBOX, "Criadores do Filterscript", MessageBox, "Ok", "");
  176.     return 1;
  177. }
  178. CMD:ajudaadmin(playerid)
  179. {
  180.     if(Informacoes[playerid][PlayerAdmin] < 1) return Mensagem(playerid, RED, "Erro: Você Não Pode Utilizar este Comando Pois Não é Administrador");
  181.     ShowPlayerDialog(playerid, CommandsCase, DIALOG_STYLE_LIST, "Comandos de Administrador", "Administrador Nível 1\nAdministrador Nivel 2\nAdministrador Nivel 3\nAdministrador Nivel 4\nAdministrador Nivel 5\nAdministrador Nivel 6","Selecionar","Fechar");
  182.     return 1;
  183. }
  184. CMD:observar(playerid, params[])
  185. {
  186.     new VictimID;
  187.     if(Informacoes[playerid][PlayerAdmin] < 1) return Mensagem(playerid, RED, "Erro: Você Não tem Nível Suficiente de Administrador");
  188.     if(sscanf(params, "d", VictimID)) return Mensagem(playerid, RED, "Erro: /observar [ID]");
  189.     if(!IsPlayerConnected(VictimID)) return Mensagem(playerid, RED, "Erro: Jogador Não Conectado");
  190.     TogglePlayerSpectating(playerid, 1);
  191.     PlayerSpectatePlayer(playerid, VictimID);
  192.     SetPlayerInterior(playerid,GetPlayerInterior(VictimID));
  193.     SetPlayerVirtualWorld(playerid,GetPlayerVirtualWorld(VictimID));
  194.     SpectadorON[playerid] = VictimID;
  195.     SpectadorMode[playerid] = ADMIN_SPEC_TYPE_PLAYER;
  196.     GetPlayerName(playerid, gAdminName, sizeof(gAdminName));
  197.     GetPlayerName(VictimID, gPlayerName, sizeof(gPlayerName));
  198.     format(gString, sizeof(gString), ">> Admin-CMD: %s Está Observando o Jogador %s", gAdminName, gPlayerName);
  199.     for(new i = 0; i < MAX_PLAYERS; i++)
  200.     {
  201.         if(Informacoes[i][PlayerAdmin] >= 0)
  202.         {
  203.             Mensagem(i, -1, gString);
  204.         }
  205.     }
  206.     return 1;
  207. }
  208. CMD:tapa(playerid, params[])
  209. {
  210.     new VictimID;
  211.     if(Informacoes[playerid][PlayerAdmin] < 2) return Mensagem(playerid, RED, "Erro: Você Não tem Nível Suficiente de Administrador");
  212.     if(sscanf(params, "d", VictimID)) return Mensagem(playerid, RED, "Erro: /tapa [ID]");
  213.     if(!IsPlayerConnected(VictimID)) return Mensagem(playerid, RED, "Erro: Jogador Não Conectado");
  214.     GetPlayerPos(VictimID, pX, pY, pZ);
  215.     SetPlayerPos(VictimID, pX, pY, pZ+5);
  216.     GetPlayerName(playerid, gAdminName, sizeof(gAdminName));
  217.     GetPlayerName(VictimID, gPlayerName, sizeof(gPlayerName));
  218.     format(gString, sizeof(gString), ">> Admin-CMD: %s deu um Tapa no Jogador %s", gAdminName, gPlayerName);
  219.     for(new i = 0; i < MAX_PLAYERS; i++)
  220.     {
  221.         if(Informacoes[i][PlayerAdmin] >= 1)
  222.         {
  223.             Mensagem(i, RED, gString);
  224.         }
  225.     }
  226.     return 1;
  227. }
  228. CMD:tapao(playerid, params[])
  229. {
  230.     new VictimID;
  231.     if(Informacoes[playerid][PlayerAdmin] < 2) return Mensagem(playerid, RED, "Erro: Você Não tem Nível Suficiente de Administrador");
  232.     if(sscanf(params, "d", VictimID)) return Mensagem(playerid, RED, "Erro: /tapao [ID]");
  233.     if(!IsPlayerConnected(VictimID)) return Mensagem(playerid, RED, "Erro: Jogador Não Conectado");
  234.     GetPlayerPos(VictimID, pX, pY, pZ);
  235.     SetPlayerPos(VictimID, pX, pY, pZ+15);
  236.     GetPlayerName(playerid, gAdminName, sizeof(gAdminName));
  237.     GetPlayerName(VictimID, gPlayerName, sizeof(gPlayerName));
  238.     format(gString, sizeof(gString), ">> Admin-CMD: %s deu uma Super Bofetada no Jogador %s", gAdminName, gPlayerName);
  239.     for(new i = 0; i < MAX_PLAYERS; i++)
  240.     {
  241.         if(Informacoes[i][PlayerAdmin] >= 1)
  242.         {
  243.             Mensagem(i, RED, gString);
  244.         }
  245.     }
  246.     return 1;
  247. }
  248. CMD:explodir(playerid, params[])
  249. {
  250.     new VictimID;
  251.     if(Informacoes[playerid][PlayerAdmin] < 3) return Mensagem(playerid, RED, "Erro: Você Não tem Nível Suficiente de Administrador");
  252.     if(sscanf(params, "d", VictimID)) return Mensagem(playerid, RED, "Erro: /tapao [ID]");
  253.     if(!IsPlayerConnected(VictimID)) return Mensagem(playerid, RED, "Erro: Jogador Não Conectado");
  254.     GetPlayerPos(VictimID, pX, pY, pZ);
  255.     GetPlayerName(playerid, gAdminName, sizeof(gAdminName));
  256.     GetPlayerName(VictimID, gPlayerName, sizeof(gPlayerName));
  257.     format(gString, sizeof(gString), ">> Admin-CMD: %s Explodiu o Jogador %s", gAdminName, gPlayerName);
  258.     for(new i = 0; i < MAX_PLAYERS; i++)
  259.     {
  260.         if(Informacoes[i][PlayerAdmin] >= 1)
  261.         {
  262.             Mensagem(i, RED, gString);
  263.         }
  264.     }
  265.     CreateExplosion(pX, pY, pZ, 10, 20.0);
  266.     return 1;
  267. }
  268. CMD:avisar(playerid, params[])
  269. {
  270.     new VictimID, Motivo[120];
  271.     if(Informacoes[playerid][PlayerAdmin] < 1) return Mensagem(playerid, RED, "Erro: Você Não tem Nível Suficiente de Administrador");
  272.     if(sscanf(params, "ds[120]", VictimID, Motivo)) return Mensagem(playerid, RED, "Erro: /avisar [ID] [Motivo]");
  273.     if(!IsPlayerConnected(VictimID)) return Mensagem(playerid, RED, "Erro: Jogador Não Conectado");
  274.     GetPlayerName(playerid, gAdminName, sizeof(gAdminName));
  275.     GetPlayerName(VictimID, gPlayerName, sizeof(gPlayerName));
  276.     if(Avisos[playerid] == 0)
  277.     {
  278.         format(gString, sizeof(gString), ">> Admin-CMD: %s Levou um Aviso do Administrador %s [1/3]", gPlayerName, gAdminName);
  279.         MensagemParaTodos(RED, gString);
  280.     }
  281.     if(Avisos[playerid] == 1)
  282.     {
  283.         format(gString, sizeof(gString), ">> Admin-CMD: %s Levou um Aviso do Administrador %s [2/3]", gPlayerName, gAdminName);
  284.         MensagemParaTodos(RED, gString);
  285.     }
  286.     if(Avisos[playerid] == 2)
  287.     {
  288.         format(gString, sizeof(gString), ">> Admin-CMD: %s Levou um Aviso do Administrador %s [3/3]", gPlayerName, gAdminName);
  289.         MensagemParaTodos(RED, gString);
  290.         Kick(VictimID);
  291.     }
  292.     Avisos[VictimID]++;
  293.     return 1;
  294. }
  295. CMD:retiraravisos(playerid, params[])
  296. {
  297.     new VictimID;
  298.     if(Informacoes[playerid][PlayerAdmin] < 5) return Mensagem(playerid, RED, "Erro: Você Não tem Nível de Administrador Suficiente");
  299.     if(sscanf(params, "d", VictimID)) return Mensagem(playerid, RED, "Erro: /retiraravisos [ID]");
  300.     GetPlayerName(playerid, gAdminName, sizeof(gAdminName));
  301.     GetPlayerName(VictimID, gPlayerName, sizeof(gPlayerName));
  302.     format(gString, sizeof(gString), ">> Admin-CMD: %s Retirou os Avisos do Jogador %s", gAdminName, gPlayerName);
  303.     for(new i = 0; i < MAX_PLAYERS; i++)
  304.     {
  305.         if(Informacoes[i][PlayerAdmin] >= 1)
  306.         {
  307.             Mensagem(i, RED, gString);
  308.         }
  309.     }
  310.     Avisos[VictimID] = 0;
  311.     return 1;
  312. }
  313. CMD:a(playerid, params[])
  314. {
  315.     new Texto[150];
  316.     if(Informacoes[playerid][PlayerAdmin] < 1 && Informacoes[playerid][PlayerVip] < 3) return Mensagem(playerid, RED, "Erro: Você Não tem Nível Suficiente de Administrador");
  317.     if(sscanf(params, "s[150]", Texto)) return Mensagem(playerid, RED, "Erro: /a [Texto]");
  318.     GetPlayerName(playerid, gAdminName, sizeof(gAdminName));
  319.     format(gString, sizeof(gString), "{FF0000}(Admin-Chat) - {FFFFFF}%s{FF0000} Diz:{FFFFFF} %s", gAdminName, Texto);
  320.     for(new i = 0; i < MAX_PLAYERS; i++)
  321.     {
  322.         if(Informacoes[i][PlayerAdmin] >= 1 && Informacoes[i][PlayerVip] >= 3)
  323.         {
  324.             Mensagem(i, RED, gString);
  325.         }
  326.     }
  327.     return 1;
  328. }
  329. CMD:x9(playerid, params[])
  330. {
  331.     new VictimID, Motivo[150], gString2[200], gString3[200], gString4[200];
  332.     if(sscanf(params, "ds[150]", VictimID, Motivo)) return Mensagem(playerid, RED, "Erro: /x9 [ID] [Motivo]");
  333.     GetPlayerName(playerid, gAdminName, sizeof(gAdminName));
  334.     GetPlayerName(VictimID, gPlayerName, sizeof(gPlayerName));
  335.     format(gString, sizeof(gString), "[DENUNCIA]: %s Denunciou o Jogador %s Pelo Motivo: %s", gAdminName, gPlayerName, Motivo);
  336.     if(Informacoes[playerid][PlayerVip] == 1)
  337.     {
  338.         format(gString2, sizeof(gString2), "[DENUNCIA-Vip Bronze]: %s Denunciou o Jogador %s Pelo Motivo: %s", gAdminName, gPlayerName, Motivo);
  339.     }
  340.     if(Informacoes[playerid][PlayerVip] == 2)
  341.     {
  342.         format(gString3, sizeof(gString3), "[DENUNCIA-Vip Prata]: %s Denunciou o Jogador %s Pelo Motivo: %s", gAdminName, gPlayerName, Motivo);
  343.     }
  344.     if(Informacoes[playerid][PlayerVip] == 3)
  345.     {
  346.         format(gString4, sizeof(gString4), "[DENUNCIA-Vip Ouro]: %s Denunciou o Jogador %s Pelo Motivo: %s", gAdminName, gPlayerName, Motivo);
  347.     }
  348.     for(new i = 0; i < MAX_PLAYERS; i++)
  349.     {
  350.         if(Informacoes[i][PlayerAdmin] >= 1)
  351.         {
  352.             Mensagem(i, RED, gString);
  353.             Mensagem(i, BRONZE, gString2);
  354.             Mensagem(i, CINZA, gString3);
  355.             Mensagem(i, YELLOW, gString4);
  356.         }
  357.     }
  358.     return 1;
  359. }
  360. CMD:admins(playerid)
  361. {
  362.     new gString2[500], Nomeado[50];
  363.     for(new i = 0; i < MAX_PLAYERS; i++)
  364.     {
  365.         GetPlayerName(i, gAdminName, sizeof(gAdminName));
  366.         if(Informacoes[i][PlayerAdmin] >= 1)
  367.         {
  368.             if(Informacoes[i][PlayerAdmin] == 1) Nomeado = "Helper";
  369.             if(Informacoes[i][PlayerAdmin] == 2) Nomeado = "Moderador";
  370.             if(Informacoes[i][PlayerAdmin] == 3) Nomeado = "Administrador";
  371.             if(Informacoes[i][PlayerAdmin] == 4) Nomeado = "Administrador Geral";
  372.             if(Informacoes[i][PlayerAdmin] == 5) Nomeado = "Sub-Dono";
  373.             if(Informacoes[i][PlayerAdmin] == 6) Nomeado = "Dono";
  374.             format(gString, sizeof(gString), "{FF0000}Administrador:{FFFFFF} %s{FF0000} - Level{FFFFFF} %d{FF0000} - Hierarquia:{FFFFFF} %s\n", gAdminName, Informacoes[i][PlayerAdmin], Nomeado);
  375.             strcat(gString2, gString, sizeof(gString2));
  376.         }
  377.     }
  378.     if(Informacoes[playerid][PlayerAdmin] < 1)
  379.     {
  380.         format(gString, sizeof(gString), "Administração Offline no Momento!");
  381.         ShowPlayerDialog(playerid, 10, DIALOG_STYLE_MSGBOX, "Administração Online", gString, "Fechar", "");
  382.     }
  383.     ShowPlayerDialog(playerid, 10, DIALOG_STYLE_MSGBOX, "Administração Online", gString2, "Fechar", "");
  384.     return 1;
  385. }
  386. CMD:vips(playerid)
  387. {
  388.     new gString2[500], Nomeado[50];
  389.     for(new i = 0; i < MAX_PLAYERS; i++)
  390.     {
  391.         GetPlayerName(i, gAdminName, sizeof(gAdminName));
  392.         if(Informacoes[i][PlayerVip] >= 1)
  393.         {
  394.             if(Informacoes[i][PlayerVip] == 1) Nomeado = "Vip Bronze";
  395.             if(Informacoes[i][PlayerVip] == 2) Nomeado = "Vip Prata";
  396.             if(Informacoes[i][PlayerVip] == 3) Nomeado = "Vip Ouro";
  397.             format(gString, sizeof(gString), "{FF0000}Vip:{FFFFFF} %s{FF0000} - Level{FFFFFF} %d{FF0000} - Hierarquia:{FFFFFF} %s\n", gAdminName, Informacoes[i][PlayerVip], Nomeado);
  398.             strcat(gString2, gString, sizeof(gString2));
  399.         }
  400.     }
  401.     if(Informacoes[playerid][PlayerVip] < 1)
  402.     {
  403.         format(gString, sizeof(gString), "Não Há Vips Online!");
  404.         ShowPlayerDialog(playerid, 10, DIALOG_STYLE_MSGBOX, "Vips Online", gString, "Fechar", "");
  405.     }
  406.     ShowPlayerDialog(playerid, 10, DIALOG_STYLE_MSGBOX, "Vips Online", gString2, "Fechar", "");
  407.     return 1;
  408. }
  409. CMD:dizer(playerid, params[])
  410. {
  411.     new Fala[350], Texto[120], gString2[200];
  412.     if(Informacoes[playerid][PlayerAdmin] < 1) return Mensagem(playerid, RED, "Erro: Você Não tem Nível de Administrador Suficiente");
  413.     if(sscanf(params, "s[120]", Texto)) return Mensagem(playerid, RED, "Erro: /dizer [Texto]");
  414.     GetPlayerName(playerid, gAdminName, sizeof(gAdminName));
  415.     format(gString, sizeof(gString), "__________________Administração__________________"); strcat(Fala, gString);
  416.     format(gString2, sizeof(gString2), "%s : %s", gAdminName, Texto); strcat(Fala, gString2);
  417.     SendClientMessageToAll(RED, gString);
  418.     SendClientMessageToAll(RED, gString2);
  419.     return 1;
  420. }
  421. CMD:kick(playerid, params[])
  422. {
  423.     new VictimID, Motivo[120];
  424.     if(Informacoes[playerid][PlayerAdmin] < 2) return Mensagem(playerid, RED, "Erro: Você Não tem Nível de Administrador Suficiente");
  425.     if(sscanf(params, "ds[120]", VictimID, Motivo)) return Mensagem(playerid, RED, "Erro: /kick [ID] [Motivo]");
  426.     if(!IsPlayerConnected(VictimID)) return Mensagem(playerid, RED, "Erro: Jogador Não Conectado");
  427.     GetPlayerName(playerid, gAdminName, sizeof(gAdminName));
  428.     GetPlayerName(VictimID, gPlayerName, sizeof(gPlayerName));
  429.     format(gString, sizeof(gString), ">> Admin-CMD: %s Kickou o Jogador %s Pelo Motivo: %s", gAdminName, gPlayerName, Motivo);
  430.     MensagemParaTodos(RED, gString);
  431.     Kick(VictimID);
  432.     return 1;
  433. }
  434. CMD:ban(playerid, params[])
  435. {
  436.     new VictimID, Motivo[120];
  437.     if(Informacoes[playerid][PlayerAdmin] < 3) return Mensagem(playerid, RED, "Erro: Você Não tem Nível de Administrador Suficiente");
  438.     if(sscanf(params, "ds[120]", VictimID, Motivo)) return Mensagem(playerid, RED, "Erro: /ban [ID] [Motivo]");
  439.     if(!IsPlayerConnected(VictimID)) return Mensagem(playerid, RED, "Erro: Jogador Não Conectado");
  440.     GetPlayerName(playerid, gAdminName, sizeof(gAdminName));
  441.     GetPlayerName(VictimID, gPlayerName, sizeof(gPlayerName));
  442.     format(gString, sizeof(gString), ">> Admin-CMD: %s Baniu o Jogador %s Pelo Motivo: %s", gAdminName, gPlayerName, Motivo);
  443.     MensagemParaTodos(RED, gString);
  444.     Ban(VictimID);
  445.     return 1;
  446. }
  447. CMD:ir(playerid, params[])
  448. {
  449.     new VictimID;
  450.     if(Informacoes[playerid][PlayerAdmin] < 2) return Mensagem(playerid, RED, "Erro: Você Não tem Nível de Administrador Suficiente");
  451.     if(sscanf(params, "d", VictimID)) return Mensagem(playerid, RED, "Erro: /ir [ID]");
  452.     if(!IsPlayerConnected(VictimID)) return Mensagem(playerid, RED, "Erro: Jogador Não Conectado");
  453.     GetPlayerName(playerid, gAdminName, sizeof(gAdminName));
  454.     GetPlayerName(VictimID, gPlayerName, sizeof(gPlayerName));
  455.     format(gString, sizeof(gString), ">> Admin-CMD: Você Foi até o Jogador %s", gPlayerName);
  456.     Mensagem(playerid, RED, gString);
  457.     format(gString, sizeof(gString), ">> Admin-CMD: O Admin %s Foi até Você", gAdminName);
  458.     Mensagem(VictimID, RED, gString);
  459.     GetPlayerPos(VictimID, pX, pY, pZ);
  460.     SetPlayerPos(playerid, pX, pY, pZ);
  461.     return 1;
  462. }
  463. CMD:trazer(playerid, params[])
  464. {
  465.     new VictimID;
  466.     if(Informacoes[playerid][PlayerAdmin] < 2) return Mensagem(playerid, RED, "Erro: Você Não tem Nível de Administrador Suficiente");
  467.     if(sscanf(params, "d", VictimID)) return Mensagem(playerid, RED, "Erro: /trazer [ID]");
  468.     if(!IsPlayerConnected(VictimID)) return Mensagem(playerid, RED, "Erro: Jogador Não Conectado");
  469.     GetPlayerName(playerid, gAdminName, sizeof(gAdminName));
  470.     GetPlayerName(VictimID, gPlayerName, sizeof(gPlayerName));
  471.     format(gString, sizeof(gString), ">> Admin-CMD: Você Trouxe o Jogador %s Até Você", gPlayerName);
  472.     Mensagem(playerid, RED, gString);
  473.     format(gString, sizeof(gString), ">> Admin-CMD: O Admin %s Puxou Você para a Posição Dele", gAdminName);
  474.     Mensagem(VictimID, RED, gString);
  475.     GetPlayerPos(playerid, pX, pY, pZ);
  476.     SetPlayerPos(VictimID, pX, pY, pZ);
  477.     return 1;
  478. }
  479. CMD:darvida(playerid, params[])
  480. {
  481.     new VictimID, Health;
  482.     if(Informacoes[playerid][PlayerAdmin] < 3) return Mensagem(playerid, RED, "Erro: Você Não tem Nível de Administrador Suficiente");
  483.     if(sscanf(params, "dd", VictimID, Health)) return Mensagem(playerid, RED, "Erro: /darvida [ID] [Vida]");
  484.     if(Health < 0 || Health > 100) return Mensagem(playerid, RED, "Erro: Minimo de Vida é 0 e o Maximo Permitido é 100");
  485.     if(!IsPlayerConnected(VictimID)) return Mensagem(playerid, RED, "Erro: Jogador Não Conectado");
  486.     GetPlayerName(playerid, gAdminName, sizeof(gAdminName));
  487.     GetPlayerName(VictimID, gPlayerName, sizeof(gPlayerName));
  488.     format(gString, sizeof(gString), ">> Admin-CMD: %s deu %d de Vida para o Jogador %s", gAdminName, Health, gPlayerName);
  489.     for(new i = 0; i < MAX_PLAYERS; i++)
  490.     {
  491.         if(Informacoes[i][PlayerAdmin] >= 1)
  492.         {
  493.             Mensagem(i, RED, gString);
  494.         }
  495.     }
  496.     SetPlayerHealth(VictimID, Health);
  497.     return 1;
  498. }
  499. CMD:vidatodos(playerid, params[])
  500. {
  501.     new Health;
  502.     if(Informacoes[playerid][PlayerAdmin] < 5) return Mensagem(playerid, RED, "Erro: Você Não tem Nível de Administrador Suficiente");
  503.     if(sscanf(params, "d", Health)) return Mensagem(playerid, RED, "Erro: /vidatodos [Vida]");
  504.     if(Health < 0 || Health > 100) return Mensagem(playerid, RED, "Erro: Minimo de Vida é 0 e o Maximo Permitido é 100");
  505.     GetPlayerName(playerid, gAdminName, sizeof(gAdminName));
  506.     format(gString, sizeof(gString), ">> Admin-CMD: %s deu %d de Vida Para Todos os Jogadores", gAdminName, Health);
  507.     MensagemParaTodos(-1, gString);
  508.     for(new i = 0; i < MAX_PLAYERS; i++)
  509.     {
  510.         SetPlayerHealth(i, Health);
  511.     }
  512.     return 1;
  513. }
  514. CMD:coletetodos(playerid, params[])
  515. {
  516.     new Armor;
  517.     if(Informacoes[playerid][PlayerAdmin] < 5) return Mensagem(playerid, RED, "Erro: Você Não tem Nível de Administrador Suficiente");
  518.     if(sscanf(params, "d", Armor)) return Mensagem(playerid, RED, "Erro: /coletetodos [Colete]");
  519.     if(Armor < 0 || Armor > 100) return Mensagem(playerid, RED, "Erro: Minimo de Colete é 0 e o Maximo Permitido é 100");
  520.     GetPlayerName(playerid, gAdminName, sizeof(gAdminName));
  521.     format(gString, sizeof(gString), ">> Admin-CMD: %s deu %d de Colete Para Todos os Jogadores", gAdminName, Armor);
  522.     MensagemParaTodos(-1, gString);
  523.     for(new i = 0; i < MAX_PLAYERS; i++)
  524.     {
  525.         SetPlayerArmour(i, Armor);
  526.     }
  527.     return 1;
  528. }
  529. CMD:dardinheiro(playerid, params[])
  530. {
  531.     new VictimID, Dinheiro;
  532.     if(Informacoes[playerid][PlayerAdmin] < 4) return Mensagem(playerid, RED, "Erro: Você Não tem Nível de Administrador Suficiente");
  533.     if(sscanf(params, "dd", VictimID, Dinheiro)) return Mensagem(playerid, RED, "Erro: /dardinheiro [ID] [Grana]");
  534.     if(!IsPlayerConnected(VictimID)) return Mensagem(playerid, RED, "Erro: Jogador Não Conectado");
  535.     GetPlayerName(playerid, gAdminName, sizeof(gAdminName));
  536.     GetPlayerName(VictimID, gPlayerName, sizeof(gPlayerName));
  537.     format(gString, sizeof(gString), ">> Admin-CMD: %s deu %dR$ para o Jogador %s", gAdminName, Dinheiro, gPlayerName);
  538.     for(new i = 0; i < MAX_PLAYERS; i++)
  539.     {
  540.         if(Informacoes[i][PlayerAdmin] >= 1)
  541.         {
  542.             Mensagem(i, RED, gString);
  543.         }
  544.     }
  545.     GivePlayerMoney(VictimID, Dinheiro);
  546.     return 1;
  547. }
  548. CMD:setardinheiro(playerid, params[])
  549. {
  550.     new VictimID, Dinheiro;
  551.     if(Informacoes[playerid][PlayerAdmin] < 4) return Mensagem(playerid, RED, "Erro: Você Não tem Nível de Administrador Suficiente");
  552.     if(sscanf(params, "dd", VictimID, Dinheiro)) return Mensagem(playerid, RED, "Erro: /setardinheiro [ID] [Grana]");
  553.     if(!IsPlayerConnected(VictimID)) return Mensagem(playerid, RED, "Erro: Jogador Não Conectado");
  554.     GetPlayerName(playerid, gAdminName, sizeof(gAdminName));
  555.     GetPlayerName(VictimID, gPlayerName, sizeof(gPlayerName));
  556.     format(gString, sizeof(gString), ">> Admin-CMD: %s Setou o Dinheiro do Jogador %s para %dR$", gAdminName, gPlayerName, Dinheiro);
  557.     for(new i = 0; i < MAX_PLAYERS; i++)
  558.     {
  559.         if(Informacoes[i][PlayerAdmin] >= 1)
  560.         {
  561.             Mensagem(i, RED, gString);
  562.         }
  563.     }
  564.     ResetPlayerMoney(VictimID);
  565.     GivePlayerMoney(VictimID, Dinheiro);
  566.     return 1;
  567. }
  568. CMD:setarinterior(playerid, params[])
  569. {
  570.     new VictimID, Interior;
  571.     if(Informacoes[playerid][PlayerAdmin] < 5) return Mensagem(playerid, RED, "Erro: Você Não tem Nível de Administrador Suficiente");
  572.     if(sscanf(params, "dd", VictimID, Interior)) return Mensagem(playerid, RED, "Erro: /setarinterior [ID] [Interior]");
  573.     if(!IsPlayerConnected(VictimID)) return Mensagem(playerid, RED, "Erro: Jogador Não Conectado");
  574.     GetPlayerName(playerid, gAdminName, sizeof(gAdminName));
  575.     GetPlayerName(VictimID, gPlayerName, sizeof(gPlayerName));
  576.     format(gString, sizeof(gString), ">> Admin-CMD: %s Setou o Interior do Jogador %s para %d", gAdminName, gPlayerName, Interior);
  577.     for(new i = 0; i < MAX_PLAYERS; i++)
  578.     {
  579.         if(Informacoes[i][PlayerAdmin] >= 1)
  580.         {
  581.             Mensagem(i, RED, gString);
  582.         }
  583.     }
  584.     SetPlayerInterior(VictimID, Interior);
  585.     return 1;
  586. }
  587. CMD:setarvw(playerid, params[])
  588. {
  589.     new VictimID, VW;
  590.     if(Informacoes[playerid][PlayerAdmin] < 5) return Mensagem(playerid, RED, "Erro: Você Não tem Nível de Administrador Suficiente");
  591.     if(sscanf(params, "dd", VictimID, VW)) return Mensagem(playerid, RED, "Erro: /setarvw [ID] [Virtual World]");
  592.     if(!IsPlayerConnected(VictimID)) return Mensagem(playerid, RED, "Erro: Jogador Não Conectado");
  593.     GetPlayerName(playerid, gAdminName, sizeof(gAdminName));
  594.     GetPlayerName(VictimID, gPlayerName, sizeof(gPlayerName));
  595.     format(gString, sizeof(gString), ">> Admin-CMD: %s Setou o Virtual World do Jogador %s para %d", gAdminName, gPlayerName, VW);
  596.     for(new i = 0; i < MAX_PLAYERS; i++)
  597.     {
  598.         if(Informacoes[i][PlayerAdmin] >= 1)
  599.         {
  600.             Mensagem(i, RED, gString);
  601.         }
  602.     }
  603.     SetPlayerVirtualWorld(VictimID, VW);
  604.     return 1;
  605. }
  606. CMD:darcolete(playerid, params[])
  607. {
  608.     new VictimID, Armor;
  609.     if(Informacoes[playerid][PlayerAdmin] < 3) return Mensagem(playerid, RED, "Erro: Você Não tem Nível de Administrador Suficiente");
  610.     if(sscanf(params, "dd", VictimID, Armor)) return Mensagem(playerid, RED, "Erro: /darcolete [ID] [Colete]");
  611.     if(Armor < 0 || Armor > 100) return Mensagem(playerid, RED, "Erro: Minimo de Colete é 0 e o Maximo Permitido é 100");
  612.     if(!IsPlayerConnected(VictimID)) return Mensagem(playerid, RED, "Erro: Jogador Não Conectado");
  613.     GetPlayerName(playerid, gAdminName, sizeof(gAdminName));
  614.     GetPlayerName(VictimID, gPlayerName, sizeof(gPlayerName));
  615.     format(gString, sizeof(gString), ">> Admin-CMD: %s deu %d de Colete para o Jogador %s", gAdminName, Armor, gPlayerName);
  616.     for(new i = 0; i < MAX_PLAYERS; i++)
  617.     {
  618.         if(Informacoes[i][PlayerAdmin] >= 1)
  619.         {
  620.             Mensagem(i, RED, gString);
  621.         }
  622.     }
  623.     SetPlayerArmour(VictimID, Armor);
  624.     return 1;
  625. }
  626. CMD:congelar(playerid, params[])
  627. {
  628.     new VictimID;
  629.     if(Informacoes[playerid][PlayerAdmin] < 2) return Mensagem(playerid, RED, "Erro: Você Não tem Nível de Administrador Suficiente");
  630.     if(sscanf(params, "d", VictimID)) return Mensagem(playerid, RED, "Erro: /congelar [ID]");
  631.     if(!IsPlayerConnected(VictimID)) return Mensagem(playerid, RED, "Erro: Jogador Não Conectado");
  632.     GetPlayerName(playerid, gAdminName, sizeof(gAdminName));
  633.     GetPlayerName(VictimID, gPlayerName, sizeof(gPlayerName));
  634.     format(gString, sizeof(gString), ">> Admin-CMD: %s Congelou o Jogador %s", gAdminName, gPlayerName);
  635.     for(new i = 0; i < MAX_PLAYERS; i++)
  636.     {
  637.         if(Informacoes[i][PlayerAdmin] >= 1)
  638.         {
  639.             Mensagem(i, RED, gString);
  640.         }
  641.     }
  642.     TogglePlayerControllable(VictimID, 0);
  643.     return 1;
  644. }
  645. CMD:descongelar(playerid, params[])
  646. {
  647.     new VictimID;
  648.     if(Informacoes[playerid][PlayerAdmin] < 2) return Mensagem(playerid, RED, "Erro: Você Não tem Nível de Administrador Suficiente");
  649.     if(sscanf(params, "d", VictimID)) return Mensagem(playerid, RED, "Erro: /descongelar [ID]");
  650.     if(!IsPlayerConnected(VictimID)) return Mensagem(playerid, RED, "Erro: Jogador Não Conectado");
  651.     GetPlayerName(playerid, gAdminName, sizeof(gAdminName));
  652.     GetPlayerName(VictimID, gPlayerName, sizeof(gPlayerName));
  653.     format(gString, sizeof(gString), ">> Admin-CMD: %s Descongelou o Jogador %s", gAdminName, gPlayerName);
  654.     for(new i = 0; i < MAX_PLAYERS; i++)
  655.     {
  656.         if(Informacoes[i][PlayerAdmin] >= 1)
  657.         {
  658.             Mensagem(i, RED, gString);
  659.         }
  660.     }
  661.     TogglePlayerControllable(VictimID, 1);
  662.     return 1;
  663. }
  664. CMD:pm(playerid, params[])
  665. {
  666.     new VictimID, Mensagem[120];
  667.     if(sscanf(params, "ds[120]", VictimID, Mensagem)) return Mensagem(playerid, RED, "Erro: /pm [ID] [Mensagem]");
  668.     if(!IsPlayerConnected(VictimID)) return Mensagem(playerid, RED, "Erro: Jogador Não Conectado");
  669.     if(playerid == VictimID) return Mensagem(playerid, RED, "Erro: Você Não Pode Mandar PM a Si Mesmo!");
  670.     if(playerid != VictimID)
  671.     {
  672.         GetPlayerName(playerid, gAdminName, sizeof(gAdminName));
  673.         GetPlayerName(VictimID, gPlayerName, sizeof(gPlayerName));
  674.         format(gString, sizeof(gString), "PM Enviada Para %s: %s", gPlayerName, Mensagem);
  675.         Mensagem(playerid, RED, gString);
  676.         format(gString, sizeof(gString), "PM Recebida De %s: %s", gAdminName, Mensagem);
  677.         Mensagem(VictimID, RED, gString);
  678.     }
  679.     return 1;
  680. }
  681. CMD:dararma(playerid, params[])
  682. {
  683.     new VictimID, Arma, Balas;
  684.     if(Informacoes[playerid][PlayerAdmin] < 4) return Mensagem(playerid, RED, "Erro: Você Não tem Nível Suficiente de Administrador");
  685.     if(sscanf(params, "ddd", VictimID, Arma, Balas)) return Mensagem(playerid, RED, "Erro: /dararma [ID] [Arma] [Balas]");
  686.     if(Arma < 1 || Arma > 34) return Mensagem(playerid, RED, "Erro: Armas de 1 a 34");
  687.     if(Balas < 1 || Balas > 999) return Mensagem(playerid, RED, "Erro: Armas de 1 a 999");
  688.     if(!IsPlayerConnected(VictimID)) return Mensagem(playerid, RED, "Erro: Jogador Não Conectado");
  689.     GetPlayerName(playerid, gAdminName, sizeof(gAdminName));
  690.     GetPlayerName(VictimID, gPlayerName, sizeof(gPlayerName));
  691.     format(gString, sizeof(gString), ">> Admin-CMD: %s deu a Arma de ID %d com %d Munição Para o Jogador %s", gAdminName, Arma, Balas, gPlayerName);
  692.     for(new i = 0; i < MAX_PLAYERS; i++)
  693.     {
  694.         if(Informacoes[i][PlayerAdmin] >= 1)
  695.         {
  696.             Mensagem(i, RED, gString);
  697.         }
  698.     }
  699.     GivePlayerWeapon(VictimID, Arma, Balas);
  700.     return 1;
  701. }
  702. CMD:trancarserver(playerid, params[])
  703. {
  704.     new Senha[30];
  705.     if(Informacoes[playerid][PlayerAdmin] < 6 && !IsPlayerAdmin(playerid)) return Mensagem(playerid, RED, "Erro: Você Não tem Nível Suficiente de Administrador");
  706.     if(sscanf(params, "s[30]", Senha)) return Mensagem(playerid, RED, "Erro: /trancarserver [Senha]");
  707.     format(gString, sizeof(gString), ">> Admin-CMD: %s Mudou a Senha do Servidor Para %s", gAdminName, Senha);
  708.     for(new i = 0; i < MAX_PLAYERS; i++)
  709.     {
  710.         if(Informacoes[i][PlayerAdmin] >= 1)
  711.         {
  712.             Mensagem(i, RED, gString);
  713.         }
  714.     }
  715.     format(gString, sizeof(gString), "password %s", Senha);
  716.     SendRconCommand(gString);
  717.     return 1;
  718. }
  719. CMD:destrancarserver(playerid, params[])
  720. {
  721.     if(Informacoes[playerid][PlayerAdmin] < 6 && !IsPlayerAdmin(playerid)) return Mensagem(playerid, RED, "Erro: Você Não tem Nível Suficiente de Administrador");
  722.     format(gString, sizeof(gString), ">> Admin-CMD: %s Destrancou o Servidor!", gAdminName);
  723.     for(new i = 0; i < MAX_PLAYERS; i++)
  724.     {
  725.         if(Informacoes[i][PlayerAdmin] >= 1)
  726.         {
  727.             Mensagem(i, RED, gString);
  728.         }
  729.     }
  730.     format(gString, sizeof(gString), "password 0");
  731.     SendRconCommand(gString);
  732.     return 1;
  733. }
  734. CMD:resetarveiculos(playerid)
  735. {
  736.     if(Informacoes[playerid][PlayerAdmin] < 3) return Mensagem(playerid, RED, "Erro: Você Não tem Nível Suficiente de Administrador");
  737.     GetPlayerName(playerid, gAdminName, sizeof(gAdminName));
  738.     format(gString, sizeof(gString), ">> Admin-CMD: %s Respawnou Todos os Veículos Inutilizados", gAdminName);
  739.     for(new i = 0; i < MAX_PLAYERS; i++)
  740.     {
  741.         if(Informacoes[i][PlayerAdmin] >= 1)
  742.         {
  743.             Mensagem(i, RED, gString);
  744.         }
  745.     }
  746.     for(new i = 0; i <= MAX_VEHICLES; i++)
  747.     {
  748.        if(!IsVehicleOccupied(i))
  749.        {
  750.           SetVehicleToRespawn(i);
  751.        }
  752.     }
  753.     return 1;
  754. }
  755. CMD:falaroculto(playerid, params[])
  756. {
  757.     new Texto[200];
  758.     if(Informacoes[playerid][PlayerAdmin] < 5) return Mensagem(playerid, RED, "Erro: Você Não tem Nível Suficiente de Administrador");
  759.     if(sscanf(params, "s[200]", Texto)) return Mensagem(playerid, RED, "Erro: /falaroculto [Texto]");
  760.     format(gString, sizeof(gString), "Admin Oculto: %s", Texto);
  761.     MensagemParaTodos(RED, gString);
  762.     return 1;
  763. }
  764. CMD:tempban(playerid, params[])
  765. {
  766.     new VictimID, Horas, Motivo[200];
  767.     if(Informacoes[playerid][PlayerAdmin] < 1) return Mensagem(playerid, RED, "Erro: Você Não tem Nível de Administrador Suficiente");
  768.     if(sscanf(params, "dds[128]", VictimID, Horas, Motivo)) return Mensagem(playerid, RED, "Erro: /tempban [ID] [Horas] [Motivo]");
  769.     GetPlayerName(playerid, gAdminName, sizeof(gAdminName));
  770.     GetPlayerName(VictimID, gPlayerName, sizeof(gPlayerName));
  771.     format(gString, sizeof(gString), ">> Admin-CMD: %s Baniu o Jogador %s Temporariamente Pelo Motivo: %s", gAdminName, gPlayerName, Motivo);
  772.     for(new i = 0; i < MAX_PLAYERS; i++)
  773.     {
  774.         if(Informacoes[i][PlayerAdmin] >= 1)
  775.         {
  776.             Mensagem(i, RED, gString);
  777.         }
  778.     }
  779.     Informacoes[playerid][PlayerBanido] = 1;
  780.     SalvarDados(playerid);
  781.     Kick(playerid);
  782.     ExpirarBAN[playerid] = gettime() + Horas * 3600;
  783.     if(gettime() >= ExpirarBAN[playerid])
  784.     Informacoes[playerid][PlayerBanido] = 0;
  785.     return 1;
  786. }
  787. CMD:limparchat(playerid)
  788. {
  789.     if(Informacoes[playerid][PlayerAdmin] < 2) return Mensagem(playerid, RED, "Erro: Você Não tem Nível Suficiente de Administrador");
  790.     for(new i; i != 100; i++)
  791.     {
  792.         MensagemParaTodos(i, "");
  793.     }
  794.     return 1;
  795. }
  796. CMD:anunciar(playerid, params[])
  797. {
  798.     new Texto[200];
  799.     if(Informacoes[playerid][PlayerAdmin] < 2) return Mensagem(playerid, RED, "Erro: Você Não tem Nível Suficiente de Administrador");
  800.     if(sscanf(params, "s[200]", Texto)) return Mensagem(playerid, RED, "Erro: /anunciar [Texto]");
  801.     GetPlayerName(playerid, gAdminName, sizeof(gAdminName));
  802.     format(gString, sizeof(gString), "~r~Admin %s: ~w~%s", gAdminName, Texto);
  803.     GameTextForAll(gString, 5000, 5);
  804.     return 1;
  805. }
  806. CMD:anunciarvip(playerid, params[])
  807. {
  808.     new Texto[200];
  809.     if(Informacoes[playerid][PlayerVip] < 1) return Mensagem(playerid, RED, "Erro: Você Não tem Nível Suficiente de Administrador");
  810.     if(sscanf(params, "s[200]", Texto)) return Mensagem(playerid, RED, "Erro: /anunciarvip [Texto]");
  811.     GetPlayerName(playerid, gAdminName, sizeof(gAdminName));
  812.     format(gString, sizeof(gString), "~r~Vip %s: ~w~%s", gAdminName, Texto);
  813.     GameTextForAll(gString, 5000, 5);
  814.     return 1;
  815. }
  816. CMD:resetarconta(playerid, params[])
  817. {
  818.     new VictimID;
  819.     if(Informacoes[playerid][PlayerAdmin] < 6) return Mensagem(playerid, RED, "Erro: Você Não tem Nível Suficiente de Administrador");
  820.     if(sscanf(params, "d", VictimID)) return Mensagem(playerid, RED, "Erro: /resetarconta [ID]");
  821.     GetPlayerName(playerid, gAdminName, sizeof(gAdminName));
  822.     GetPlayerName(VictimID, gPlayerName, sizeof(gPlayerName));
  823.     format(gString, sizeof(gString), ">> Admin-CMD: %s Resetou a Conta do Jogador %s", gAdminName, gPlayerName);
  824.     for(new i = 0; i < MAX_PLAYERS; i++)
  825.     {
  826.         if(Informacoes[i][PlayerAdmin] >= 1)
  827.         {
  828.             Mensagem(i, RED, gString);
  829.         }
  830.     }
  831.     Informacoes[VictimID][PlayerAdmin] = 0;
  832.     ResetPlayerMoney(VictimID);
  833.     Informacoes[VictimID][PlayerKills] = 0;
  834.     Informacoes[VictimID][PlayerDeaths] = 0;
  835.     SetPlayerScore(VictimID, 0);
  836.     return 1;
  837. }
  838. CMD:matar(playerid, params[])
  839. {
  840.     new VictimID;
  841.     if(Informacoes[playerid][PlayerAdmin] < 1) return Mensagem(playerid, RED, "Erro: Você Não tem Nível Suficiente de Administrador");
  842.     if(sscanf(params, "d", VictimID)) return Mensagem(playerid, RED, "Erro: /matar [ID]");
  843.     GetPlayerName(playerid, gAdminName, sizeof(gAdminName));
  844.     GetPlayerName(VictimID, gPlayerName, sizeof(gPlayerName));
  845.     format(gString, sizeof(gString), ">> Admin-CMD: %s Matou o Jogador %s", gAdminName, gPlayerName);
  846.     for(new i = 0; i < MAX_PLAYERS; i++)
  847.     {
  848.         if(Informacoes[i][PlayerAdmin] >= 1)
  849.         {
  850.             Mensagem(i, RED, gString);
  851.         }
  852.     }
  853.     SetPlayerHealth(VictimID, 0);
  854.     return 1;
  855. }
  856. CMD:daradmin(playerid, params[])
  857. {
  858.     new VictimID, LevelAdmin;
  859.     if(Informacoes[playerid][PlayerAdmin] < 6 && !IsPlayerAdmin(playerid)) return Mensagem(playerid, RED, "Erro: Você Não tem Nível Suficiente de Administrador");
  860.     if(sscanf(params, "dd", VictimID, LevelAdmin)) return Mensagem(playerid, RED, "Erro: /daradmin [ID] [Level]");
  861.     if(LevelAdmin < 0 || LevelAdmin > 6) return Mensagem(playerid, RED, "Erro: Níveis de 0 a 6!");
  862.     if(!IsPlayerConnected(VictimID)) return Mensagem(playerid, RED, "Erro: Jogador Não Conectado");
  863.     GetPlayerName(playerid, gAdminName, sizeof(gAdminName));
  864.     GetPlayerName(VictimID, gPlayerName, sizeof(gPlayerName));
  865.     format(gString, sizeof(gString), ">> Admin-CMD: %s Deu Administrador Level %d Para o Jogador %s", gAdminName, LevelAdmin, gPlayerName);
  866.     for(new i = 0; i < MAX_PLAYERS; i++)
  867.     {
  868.         if(Informacoes[i][PlayerAdmin] >= 1)
  869.         {
  870.             Mensagem(i, RED, gString);
  871.         }
  872.     }
  873.     format(gString, sizeof(gString), ">> Admin-CMD: Você Foi Promovido pelo Administrador %s Para Nível %d de Admin", gAdminName, LevelAdmin);
  874.     Mensagem(VictimID, RED, gString);
  875.     Informacoes[VictimID][PlayerAdmin] = LevelAdmin;
  876.     SalvarDados(playerid);
  877.     return 1;
  878. }
  879. CMD:darvip(playerid, params[])
  880. {
  881.     new VictimID, Dias, LevelVIP;
  882.     if(Informacoes[playerid][PlayerAdmin] < 6 && !IsPlayerAdmin(playerid)) return Mensagem(playerid, RED, "Erro: Voce Não tem Nível Suficiente de Administrador");
  883.     if(sscanf(params, "ddd", VictimID, LevelVIP, Dias)) return Mensagem(playerid, RED, "Erro: /darvip [ID] [Level] [Dias]");
  884.     if(LevelVIP < 0 || LevelVIP > 3) return Mensagem(playerid, RED, "Erro: Level de 1 a 3!");
  885.     if(!IsPlayerConnected(VictimID)) return Mensagem(playerid, RED, "Erro: Jogador Não Conectado");
  886.     GetPlayerName(playerid, gAdminName, sizeof(gAdminName));
  887.     GetPlayerName(VictimID, gPlayerName, sizeof(gPlayerName));
  888.     format(gString, sizeof(gString), ">> Admin-CMD: %s Deu Level %d com %d Dias de VIP Para o Jogador %s", gAdminName, LevelVIP, Dias, gPlayerName);
  889.     MensagemParaTodos(RED, gString);
  890.     Informacoes[VictimID][PlayerVip] = LevelVIP;
  891.     SalvarDados(playerid);
  892.     ExpirarVIP[playerid] = gettime() + Dias * 86400;
  893.     if(gettime() >= ExpirarVIP[playerid])
  894.     Informacoes[playerid][PlayerVip] = 0;
  895.     return 1;
  896. }
  897. CMD:retirarvip(playerid, params[])
  898. {
  899.     new VictimID;
  900.     if(Informacoes[playerid][PlayerAdmin] < 6 && !IsPlayerAdmin(playerid)) return Mensagem(playerid, RED, "Erro: Voce Não tem Nível Suficiente de Administrador");
  901.     if(sscanf(params, "d", VictimID)) return Mensagem(playerid, RED, "Erro: /retirarvip [ID]");
  902.     if(!IsPlayerConnected(VictimID)) return Mensagem(playerid, RED, "Erro: Jogador Não Conectado");
  903.     GetPlayerName(playerid, gAdminName, sizeof(gAdminName));
  904.     GetPlayerName(VictimID, gPlayerName, sizeof(gPlayerName));
  905.     format(gString, sizeof(gString), ">> Admin-CMD: %s Retirou o VIP Do Jogador %s", gAdminName, gPlayerName);
  906.     MensagemParaTodos(RED, gString);
  907.     Informacoes[VictimID][PlayerVip] = 0;
  908.     SalvarDados(playerid);
  909.     return 1;
  910. }
  911. CMD:chatvip(playerid, params[])
  912. {
  913.     new TextVip[150];
  914.     if(Informacoes[playerid][PlayerVip] < 1) return Mensagem(playerid, RED, "Erro: Você Não é um Jogador VIP!");
  915.     if(sscanf(params, "s[150]", TextVip)) return Mensagem(playerid, RED, "Erro: /chatvip [Texto]");
  916.     GetPlayerName(playerid, gAdminName, sizeof(gAdminName));
  917.     format(gString, sizeof(gString), "[Chat VIP]: %s Level %d : %s", gAdminName, Informacoes[playerid][PlayerVip], TextVip);
  918.     for(new i = 0; i < MAX_PLAYERS; i++)
  919.     {
  920.         if(Informacoes[i][PlayerVip] == 1)
  921.         {
  922.             Mensagem(i, BRONZE, gString);
  923.         }
  924.         if(Informacoes[i][PlayerVip] == 2)
  925.         {
  926.             Mensagem(i, CINZA, gString);
  927.         }
  928.         if(Informacoes[i][PlayerVip] == 3)
  929.         {
  930.             Mensagem(i, YELLOW, gString);
  931.         }
  932.     }
  933.     return 1;
  934. }
  935. CMD:casavip(playerid)
  936. {
  937.     if(Informacoes[playerid][PlayerVip] < 1) return Mensagem(playerid, RED, "Erro: Você Não é VIP!");
  938.     Mensagem(playerid, RED, "Informação: Bem Vindo a Casa VIP!");
  939.     SetPlayerPos(playerid, -723.8144,902.7185,12.1712);
  940.     return 1;
  941. }
  942. CMD:abrirpt1(playerid)
  943. {
  944.     if(Informacoes[playerid][PlayerVip] < 1) return Mensagem(playerid, RED, "Erro: Você não é VIP!");
  945.     if(IsPlayerInRangeOfPoint(playerid, 10.0, -722.7346,909.6000,12.1305))
  946.     {
  947.         MoveObject(ObjetoAMover,-710.09997559,910.40002441,11.19999981,90.0);
  948.         Mensagem(playerid, RED, "Informação: Portão Aberto com Sucesso, Para Fechar use : /fecharpt1");
  949.     }
  950.     return 1;
  951. }
  952. CMD:abrirpt2(playerid)
  953. {
  954.     if(Informacoes[playerid][PlayerVip] < 1) return Mensagem(playerid, RED, "Erro: Você não é VIP!");
  955.     if(IsPlayerInRangeOfPoint(playerid, 10.0, -659.5804,922.1988,12.1267))
  956.     {
  957.         MoveObject(ObjetoAMover2,-660.90002441,920.00000000,11.19999981,90.0);
  958.         Mensagem(playerid, RED, "Informação: Portão Aberto com Sucesso, Para Fechar use : /fecharpt2");
  959.     }
  960.     return 1;
  961. }
  962. CMD:fecharpt1(playerid)
  963. {
  964.     if(Informacoes[playerid][PlayerVip] < 1) return Mensagem(playerid, RED, "Erro: Você não é VIP!");
  965.     if(IsPlayerInRangeOfPoint(playerid, 10.0, -722.7346,909.6000,12.1305))
  966.     {
  967.         MoveObject(ObjetoAMover2,-718.59997559,910.40002441,11.19999981,20.0);
  968.         Mensagem(playerid, RED, "Informação: Portão Fechado com Sucesso, Para Abrir use : /abrirpt1");
  969.     }
  970.     return 1;
  971. }
  972. CMD:fecharpt2(playerid)
  973. {
  974.     if(Informacoes[playerid][PlayerVip] < 1) return Mensagem(playerid, RED, "Erro: Você não é VIP!");
  975.     if(IsPlayerInRangeOfPoint(playerid, 10.0, -659.5804,922.1988,12.1267))
  976.     {
  977.         MoveObject(ObjetoAMover2,-660.40002441,926.50000000,11.19999981,20.0);
  978.         Mensagem(playerid, RED, "Informação: Portão Fechado com Sucesso, Para Abrir use : /abrirpt2");
  979.     }
  980.     return 1;
  981. }
  982. CMD:kitvip(playerid)
  983. {
  984.     if(Informacoes[playerid][PlayerVip] < 1) return Mensagem(playerid, RED, "Erro: Você não é VIP!");
  985.     GetPlayerName(playerid, gPlayerName, sizeof(gPlayerName));
  986.     format(gString, sizeof(gString), ">> VIP-CMD: %s Pegou seu Kit Vip!", gPlayerName);
  987.     MensagemParaTodos(RED, gString);
  988.     GivePlayerWeapon(playerid, 4, 1);
  989.     GivePlayerWeapon(playerid, 24, 9999);
  990.     GivePlayerWeapon(playerid, 26, 9999);
  991.     GivePlayerWeapon(playerid, 30, 9999);
  992.     GivePlayerWeapon(playerid, 34, 9999);
  993.     GivePlayerMoney(playerid, -1);
  994.     return 1;
  995. }
  996. CMD:v(playerid, params[])
  997. {
  998.     if(Informacoes[playerid][PlayerVip] < 2) return Mensagem(playerid, RED, "Erro: Você não é VIP!");
  999.     if(sscanf(params, "ddd", IDVeiculo)) return SendClientMessage(playerid, RED, "Erro:: /v [ID Veiculo]");
  1000.     if(IDVeiculo < 400 || IDVeiculo > 611) return SendClientMessage(playerid, RED, "Erro: ID Inválido, ID's de 400 a 611");
  1001.     if(VeiculoCriado[playerid] == 1) return SendClientMessage(playerid, RED, "Você já Possui um Veículo Criado, Use /deletarveiculo");
  1002.     GetPlayerPos(playerid, pX, pY, pZ);
  1003.     IDCarro[playerid] = CreateVehicle(IDVeiculo, pX, pY, pZ+5, 0.0, 0, 0, 60000);
  1004.     PutPlayerInVehicle(playerid, IDCarro[playerid], 0);
  1005.     SetVehicleVirtualWorld(IDCarro[playerid], GetPlayerVirtualWorld(playerid));
  1006.     LinkVehicleToInterior(IDCarro[playerid], GetPlayerInterior(playerid));
  1007.     VeiculoCriado[playerid] = 1;
  1008.     SendClientMessage(playerid, RED, ">> VIP-CMD: Você Criou um Veiculo, Para Deleta-lo Utilize: /deletarv!");
  1009.     return 1;
  1010. }
  1011. CMD:deletarv(playerid)
  1012. {
  1013.     if(Informacoes[playerid][PlayerVip] < 2) return Mensagem(playerid, RED, "Erro: Você não é VIP!");
  1014.     if(!IsPlayerInAnyVehicle(playerid)) return SendClientMessage(playerid, RED, "Você Não Está em um Veículo!");
  1015.     if(VeiculoCriado[playerid] == 0) return SendClientMessage(playerid, RED, "Você Não Criou um Veículo!");
  1016.     DestroyVehicle(IDCarro[playerid]);
  1017.     VeiculoCriado[playerid] = 0;
  1018.     SendClientMessage(playerid, RED, "Você Deletou Seu Veículo Com Sucesso, Para Cria-lo Novamente, Use /v!");
  1019.     return 1;
  1020. }
  1021. CMD:cmdsvip(playerid)
  1022. {
  1023.     new CaixaComandos[400];
  1024.     if(Informacoes[playerid][PlayerVip] == 1)
  1025.     {
  1026.         format(gString, sizeof(gString), "==========================================================\n"); strcat(CaixaComandos, gString);
  1027.         format(gString, sizeof(gString), "/chatvip, /casavip, /abrirpt1, /abrirpt2, /fecharpt1, /fecharpt2, /kitvip\n"); strcat(CaixaComandos, gString);
  1028.         format(gString, sizeof(gString), "/televip, /anunciarvip\n"); strcat(CaixaComandos, gString);
  1029.         format(gString, sizeof(gString), "==========================================================\n"); strcat(CaixaComandos, gString);
  1030.         ShowPlayerDialog(playerid, 10, DIALOG_STYLE_MSGBOX, "Vip Level 1 - CMDs", CaixaComandos, "Ok", "");
  1031.     }
  1032.     if(Informacoes[playerid][PlayerVip] == 2)
  1033.     {
  1034.         format(gString, sizeof(gString), "==========================================================\n"); strcat(CaixaComandos, gString);
  1035.         format(gString, sizeof(gString), "/chatvip, /casavip, /abrirpt1, /abrirpt2, /fecharpt1, /fecharpt2, /kitvip\n"); strcat(CaixaComandos, gString);
  1036.         format(gString, sizeof(gString), "/v, /deletarv, /televip, /anunciarvip\n"); strcat(CaixaComandos, gString);
  1037.         format(gString, sizeof(gString), "==========================================================\n"); strcat(CaixaComandos, gString);
  1038.         ShowPlayerDialog(playerid, 10, DIALOG_STYLE_MSGBOX, "Vip Level 2 - CMDs", CaixaComandos, "Ok", "");
  1039.     }
  1040.     if(Informacoes[playerid][PlayerVip] == 3)
  1041.     {
  1042.         format(gString, sizeof(gString), "==========================================================\n"); strcat(CaixaComandos, gString);
  1043.         format(gString, sizeof(gString), "/chatvip, /casavip, /abrirpt1, /abrirpt2, /fecharpt1, /fecharpt2, /kitvip, /a\n"); strcat(CaixaComandos, gString);
  1044.         format(gString, sizeof(gString), "/v, /deletarv, /televip, /anunciarvip\n"); strcat(CaixaComandos, gString);
  1045.         format(gString, sizeof(gString), "==========================================================\n"); strcat(CaixaComandos, gString);
  1046.         ShowPlayerDialog(playerid, 10, DIALOG_STYLE_MSGBOX, "Vip Level 3 - CMDs", CaixaComandos, "Ok", "");
  1047.     }
  1048.     return 1;
  1049. }
  1050. CMD:televip(playerid)
  1051. {
  1052.     if(Informacoes[playerid][PlayerVip] < 1) return Mensagem(playerid, RED, "Erro: Você Não é VIP!");
  1053.     ShowPlayerDialog(playerid, TeleVipCase, DIALOG_STYLE_LIST, "Teleportes VIP", "Warehouse 1\nWarehouse 2\nRC Battlefield\n8-Track\nDirt-Track\nKick Start", "Teleportar", "Cancelar");
  1054.     return 1;
  1055. }
  1056. /*---------------------------------------------Fim dos Comandos-----------------------------------------------------*/
  1057. public OnDialogResponse(playerid, dialogid, response, listitem, inputtext[])
  1058. {
  1059.     if(dialogid == RegisterCase)
  1060.     {
  1061.         if(!response)
  1062.         {
  1063.             Mensagem(playerid, RED, "[FuneraL's Admin System]: Você Não quis Registrar-se e Por esse Motivo foi Kickado!");
  1064.             Kick(playerid);
  1065.         }
  1066.         if(response)
  1067.         {
  1068.             if(!strlen(inputtext)) return Mensagem(playerid, RED, "[FuneraL's Admin System]: Você Digitou uma Senha Inválida ou Não Digitou nada, Por Favor, Registre-se com uma Senha Válida");
  1069.             if(strlen(inputtext) < 5) return Mensagem(playerid, RED, "[FuneraL's Admin System]: Senha Inválida , Válido Apenas com mais de 5 Characteres"), ShowPlayerDialog(playerid, RegisterCase, DIALOG_STYLE_INPUT, "Registrando no Servidor", "[FuneraL's Admin System]: Bem Vindo ao Servidor\nDigite sua Senha Abaixo Para Registrar-se","Registrar","Cancelar");
  1070.             if(strlen(inputtext) >= 5)
  1071.             {
  1072.                 DOF2_CreateFile(PlayerArchive(playerid), inputtext);
  1073.                 DOF2_SetInt(PlayerArchive(playerid), "Administrador", 0);
  1074.                 DOF2_SetInt(PlayerArchive(playerid), "Grana", 10000);
  1075.                 DOF2_SetInt(PlayerArchive(playerid), "Score", 0);
  1076.                 DOF2_SetInt(PlayerArchive(playerid), "Kills", 0);
  1077.                 DOF2_SetInt(PlayerArchive(playerid), "Deaths", 0);
  1078.                 DOF2_SaveFile();
  1079.                 Mensagem(playerid, RED, "Registrado com Sucesso no Servidor, Seus dados Serão Salvos!");
  1080.                 SpawnPlayer(playerid), GivePlayerMoney(playerid, 10000);
  1081.             }
  1082.         }
  1083.     }
  1084.     if(dialogid == LoginCase)
  1085.     {
  1086.         if(!response)
  1087.         {
  1088.             Mensagem(playerid, RED, "[FuneraL's Admin System]: Você Não Quis Logar e Por Esse Motivo foi Kickado!");
  1089.             Kick(playerid);
  1090.         }
  1091.         if(response)
  1092.         {
  1093.             if(DOF2_CheckLogin(PlayerArchive(playerid), inputtext))
  1094.             {
  1095.                 Mensagem(playerid, RED, "Logado com Sucesso! Bom Jogo");
  1096.                 CarregarDados(playerid);
  1097.             }
  1098.             else
  1099.             {
  1100.                 ShowPlayerDialog(playerid, LoginCase, DIALOG_STYLE_INPUT,"Logando no Servidor","[FuneraL's Admin System]: Digite a Senha Correta Para Logar no Servidor!","Logar","Cancelar");
  1101.             }
  1102.             return 1;
  1103.         }
  1104.     }
  1105.     if(dialogid == TeleVipCase)
  1106.     {
  1107.         if(!response) return Mensagem(playerid, RED, "Você Cancelou a Dialog de Teleportes Vip.!");
  1108.         if(response)
  1109.         {
  1110.             switch(listitem)
  1111.             {
  1112.                 case 0:
  1113.                 {
  1114.                     SetPlayerPos(playerid,1412.639892,-1.787510,1000.924377);
  1115.                     SetPlayerInterior(playerid, 1);
  1116.                     Mensagem(playerid, RED, ">> VIP-CMD: Bem Vindo a Warehouse 1!");
  1117.                 }
  1118.                 case 1:
  1119.                 {
  1120.                     SetPlayerPos(playerid,1302.519897,-1.787510,1001.028259);
  1121.                     SetPlayerInterior(playerid, 18);
  1122.                     Mensagem(playerid, RED, ">> VIP-CMD: Bem Vindo a Warehouse 2!");
  1123.                 }
  1124.                 case 2:
  1125.                 {
  1126.                     SetPlayerPos(playerid,-975.975708,1060.983032,1345.671875);
  1127.                     SetPlayerInterior(playerid, 10);
  1128.                     Mensagem(playerid, RED, ">> VIP-CMD: Bem Vindo ao RC Battlefield!");
  1129.                 }
  1130.                 case 3:
  1131.                 {
  1132.                     SetPlayerPos(playerid,-1398.065307,-217.028900,1051.115844);
  1133.                     SetPlayerInterior(playerid, 7);
  1134.                     Mensagem(playerid, RED, ">> VIP-CMD: Bem Vindo ao 8-Track!");
  1135.                 }
  1136.                 case 4:
  1137.                 {
  1138.                     SetPlayerPos(playerid,-1444.645507,-664.526000,1053.572998);
  1139.                     SetPlayerInterior(playerid, 4);
  1140.                     Mensagem(playerid, RED, ">> VIP-CMD: Bem Vindo ao Dirt-Track");
  1141.                 }
  1142.                 case 5:
  1143.                 {
  1144.                     SetPlayerPos(playerid,-1465.268676,1557.868286,1052.531250);
  1145.                     SetPlayerInterior(playerid, 14);
  1146.                     Mensagem(playerid, RED, ">> VIP-CMD: Bem Vindo ao Kick Start!");
  1147.                 }
  1148.             }
  1149.         }
  1150.         return 1;
  1151.     }
  1152.     if(dialogid == CommandsCase)
  1153.     {
  1154.         if(!response) return Mensagem(playerid, RED, "Você Cancelou a Dialog de Comandos!");
  1155.         if(response)
  1156.         {
  1157.             switch(listitem)
  1158.             {
  1159.                 case 0:
  1160.                 {
  1161.                     new CommandBox[700];
  1162.                     format(gString, sizeof(gString), "=================== Level 1 ===================\n\n"); strcat(CommandBox, gString);
  1163.                     format(gString, sizeof(gString), "/ajudaadmin, /dizer, /avisar, /matar, /observar, /tempban\n"); strcat(CommandBox, gString);
  1164.                     ShowPlayerDialog(playerid, 10, DIALOG_STYLE_MSGBOX, "Comandos de Administrador", CommandBox, "Ok", "Cancelar");
  1165.                     }
  1166.                 case 1:
  1167.                 {
  1168.                     new CommandBox[700];
  1169.                     format(gString, sizeof(gString), "=================== Level 1 ===================\n\n"); strcat(CommandBox, gString);
  1170.                     format(gString, sizeof(gString), "/ajudaadmin, /dizer, /avisar, /matar, /observar, /tempban\n"); strcat(CommandBox, gString);
  1171.                     format(gString, sizeof(gString), "=================== Level 2 ===================\n\n"); strcat(CommandBox, gString);
  1172.                     format(gString, sizeof(gString), "/tapa, /tapao, /kick, /ir, /trazer, /congelar, /descongelar, /limparchat, /anunciar\n"); strcat(CommandBox, gString);
  1173.                     ShowPlayerDialog(playerid, 10, DIALOG_STYLE_MSGBOX, "Comandos de Administrador", CommandBox, "Ok", "Cancelar");
  1174.                     }
  1175.                 case 2:
  1176.                 {
  1177.                     new CommandBox[700];
  1178.                     format(gString, sizeof(gString), "=================== Level 1 ===================\n\n"); strcat(CommandBox, gString);
  1179.                     format(gString, sizeof(gString), "/ajudaadmin, /dizer, /avisar, /matar, /observar, /tempban\n"); strcat(CommandBox, gString);
  1180.                     format(gString, sizeof(gString), "=================== Level 2 ===================\n\n"); strcat(CommandBox, gString);
  1181.                     format(gString, sizeof(gString), "/tapa, /tapao, /kick, /ir, /trazer, /congelar, /descongelar, /limparchat, /anunciar\n"); strcat(CommandBox, gString);
  1182.                     format(gString, sizeof(gString), "=================== Level 3 ===================\n\n"); strcat(CommandBox, gString);
  1183.                     format(gString, sizeof(gString), "/explodir, /ban, /darvida, /darcolete, /resetarveiculos\n"); strcat(CommandBox, gString);
  1184.                     ShowPlayerDialog(playerid, 10, DIALOG_STYLE_MSGBOX, "Comandos de Administrador", CommandBox, "Ok", "Cancelar");
  1185.                     }
  1186.                 case 3:
  1187.                 {
  1188.                     new CommandBox[700];
  1189.                     format(gString, sizeof(gString), "=================== Level 1 ===================\n\n"); strcat(CommandBox, gString);
  1190.                     format(gString, sizeof(gString), "/ajudaadmin, /dizer, /avisar, /matar, /observar, /tempban\n"); strcat(CommandBox, gString);
  1191.                     format(gString, sizeof(gString), "=================== Level 2 ===================\n\n"); strcat(CommandBox, gString);
  1192.                     format(gString, sizeof(gString), "/tapa, /tapao, /kick, /ir, /trazer, /congelar, /descongelar, /limparchat, /anunciar\n"); strcat(CommandBox, gString);
  1193.                     format(gString, sizeof(gString), "=================== Level 3 ===================\n\n"); strcat(CommandBox, gString);
  1194.                     format(gString, sizeof(gString), "/explodir, /ban, /darvida, /darcolete, /resetarveiculos\n"); strcat(CommandBox, gString);
  1195.                     format(gString, sizeof(gString), "=================== Level 4 ===================\n\n"); strcat(CommandBox, gString);
  1196.                     format(gString, sizeof(gString), "/dararma, /dardinheiro, /setardinheiro\n"); strcat(CommandBox, gString);
  1197.                     ShowPlayerDialog(playerid, 10, DIALOG_STYLE_MSGBOX, "Comandos de Administrador", CommandBox, "Ok", "Cancelar");
  1198.                     }
  1199.                 case 4:
  1200.                 {
  1201.                     new CommandBox[700];
  1202.                     format(gString, sizeof(gString), "=================== Level 1 ===================\n\n"); strcat(CommandBox, gString);
  1203.                     format(gString, sizeof(gString), "/ajudaadmin, /dizer, /avisar, /matar, /observar, /tempban\n"); strcat(CommandBox, gString);
  1204.                     format(gString, sizeof(gString), "=================== Level 2 ===================\n\n"); strcat(CommandBox, gString);
  1205.                     format(gString, sizeof(gString), "/tapa, /tapao, /kick, /ir, /trazer, /congelar, /descongelar, /limparchat, /anunciar\n"); strcat(CommandBox, gString);
  1206.                     format(gString, sizeof(gString), "=================== Level 3 ===================\n\n"); strcat(CommandBox, gString);
  1207.                     format(gString, sizeof(gString), "/explodir, /ban, /darvida, /darcolete, /resetarveiculos\n"); strcat(CommandBox, gString);
  1208.                     format(gString, sizeof(gString), "=================== Level 4 ===================\n\n"); strcat(CommandBox, gString);
  1209.                     format(gString, sizeof(gString), "/dararma, /dardinheiro, /setardinheiro\n"); strcat(CommandBox, gString);
  1210.                     format(gString, sizeof(gString), "=================== Level 5 ===================\n\n"); strcat(CommandBox, gString);
  1211.                     format(gString, sizeof(gString), "/retiraravisos, /setarinterior, /setarvw, /vidatodos, /coletetodos, /falaroculto\n"); strcat(CommandBox, gString);
  1212.                     ShowPlayerDialog(playerid, 10, DIALOG_STYLE_MSGBOX, "Comandos de Administrador", CommandBox, "Ok", "Cancelar");
  1213.                     }
  1214.                 case 5:
  1215.                 {
  1216.                     new CommandBox[700];
  1217.                     format(gString, sizeof(gString), "=================== Level 1 ===================\n\n"); strcat(CommandBox, gString);
  1218.                     format(gString, sizeof(gString), "/ajudaadmin, /dizer, /avisar, /matar, /observar, /tempban\n"); strcat(CommandBox, gString);
  1219.                     format(gString, sizeof(gString), "=================== Level 2 ===================\n\n"); strcat(CommandBox, gString);
  1220.                     format(gString, sizeof(gString), "/tapa, /tapao, /kick, /ir, /trazer, /congelar, /descongelar, /limparchat, /anunciar\n"); strcat(CommandBox, gString);
  1221.                     format(gString, sizeof(gString), "=================== Level 3 ===================\n\n"); strcat(CommandBox, gString);
  1222.                     format(gString, sizeof(gString), "/explodir, /ban, /darvida, /darcolete, /resetarveiculos\n"); strcat(CommandBox, gString);
  1223.                     format(gString, sizeof(gString), "=================== Level 4 ===================\n\n"); strcat(CommandBox, gString);
  1224.                     format(gString, sizeof(gString), "/dararma, /dardinheiro, /setardinheiro\n"); strcat(CommandBox, gString);
  1225.                     format(gString, sizeof(gString), "=================== Level 5 ===================\n\n"); strcat(CommandBox, gString);
  1226.                     format(gString, sizeof(gString), "/retiraravisos, /setarinterior, /setarvw, /vidatodos, /coletetodos, /falaroculto\n"); strcat(CommandBox, gString);
  1227.                     format(gString, sizeof(gString), "=================== Level 6 ===================\n\n"); strcat(CommandBox, gString);
  1228.                     format(gString, sizeof(gString), "/daradmin, /trancarserver, /destrancarserver, /resetarconta, /darvip, /retirarvip\n"); strcat(CommandBox, gString);
  1229.                     ShowPlayerDialog(playerid, 10, DIALOG_STYLE_MSGBOX, "Comandos de Administrador", CommandBox, "Ok", "Cancelar");
  1230.                     }
  1231.                 }
  1232.             }
  1233.         }
  1234.     return 1;
  1235. }
  1236.  
  1237.  
  1238. stock PlayerArchive(playerid)
  1239. {
  1240.     new StringArquivo[128], NomeArquivo[24];
  1241.     GetPlayerName(playerid, NomeArquivo, sizeof(NomeArquivo));
  1242.     format(StringArquivo, sizeof(StringArquivo), ContasSalvas, NomeArquivo);
  1243.     return StringArquivo;
  1244. }
  1245.  
  1246. stock CarregarDados(playerid)
  1247. {
  1248.     Informacoes[playerid][PlayerAdmin] = DOF2_GetInt(PlayerArchive(playerid), "Administrador");
  1249.     GivePlayerMoney(playerid, DOF2_GetInt(PlayerArchive(playerid), "Grana"));
  1250.     Informacoes[playerid][PlayerScore] = DOF2_GetInt(PlayerArchive(playerid), "Score");
  1251.     Informacoes[playerid][PlayerKills] = DOF2_GetInt(PlayerArchive(playerid), "Kills");
  1252.     Informacoes[playerid][PlayerDeaths] = DOF2_GetInt(PlayerArchive(playerid), "Morreu");
  1253.     Informacoes[playerid][PlayerVip] = DOF2_GetInt(PlayerArchive(playerid), "Vip");
  1254.     Informacoes[playerid][PlayerBanido] = DOF2_GetInt(PlayerArchive(playerid), "Banido");
  1255. }
  1256.  
  1257. stock SalvarDados(playerid)
  1258. {
  1259.     DOF2_SetInt(PlayerArchive(playerid), "Grana", GetPlayerMoney(playerid));
  1260.     DOF2_SetInt(PlayerArchive(playerid), "Administrador", Informacoes[playerid][PlayerAdmin]);
  1261.     DOF2_SetInt(PlayerArchive(playerid), "Score", GetPlayerScore(playerid));
  1262.     DOF2_SetInt(PlayerArchive(playerid), "Kills", Informacoes[playerid][PlayerKills]);
  1263.     DOF2_SetInt(PlayerArchive(playerid), "Morreu", Informacoes[playerid][PlayerDeaths]);
  1264.     DOF2_SetInt(PlayerArchive(playerid), "Vip", Informacoes[playerid][PlayerVip]);
  1265.     DOF2_SetInt(PlayerArchive(playerid), "Banido", Informacoes[playerid][PlayerBanido]);
  1266.     DOF2_SaveFile();
  1267.     return 1;
  1268. }
  1269.  
  1270. stock IsVehicleOccupied(vehicleid)
  1271. {
  1272.     for(new i = 0; i < MAX_PLAYERS; i++)
  1273.     {
  1274.         if(GetPlayerState(i) == PLAYER_STATE_DRIVER || GetPlayerState(i) == PLAYER_STATE_PASSENGER)
  1275.         {
  1276.             if(GetPlayerVehicleID(i) == vehicleid)
  1277.             {
  1278.                 return 1;
  1279.             }
  1280.         }
  1281.     }
  1282.     for(new i = 0; i < MAX_PLAYERS; i++)
  1283.     if(IsPlayerInVehicle(i, vehicleid) && GetPlayerState(i) == PLAYER_STATE_DRIVER)
  1284.     return 1;
  1285.     return 0;
  1286. }
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!