Advertisement
Guest User

Sistema de administração [ FS ]

a guest
Oct 15th, 2011
5,933
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
Pawn 33.17 KB | None | 0 0
  1. #include    a_samp
  2. #include    zcmd
  3. #include    sscanf2
  4. #include    DOF2
  5.  
  6.  
  7. #define NAOADM              "Não tem autorização suficiente."
  8. #define Controle(%0,%1)     TogglePlayerControllable(%0,%1)
  9. #define contas              "Adm/%s.ini"
  10.  
  11. const verde = 0x5EAF03FF;
  12. const fail = 0xFF0000FF;
  13.  
  14. enum pInfo
  15. {
  16.     pAdmin,
  17.     pBan,
  18.     pAutorizado,
  19. };
  20.  
  21. //------------------------------------------------------------------------------
  22.  
  23. new info[MAX_PLAYERS][pInfo];
  24.  
  25. new
  26.     arquivo[36],
  27.     nome[24],
  28.     ip[16]
  29. ;
  30.  
  31. new
  32.     bool:calado[MAX_PLAYERS]
  33. ;
  34.  
  35. new
  36.     bool:votou[MAX_PLAYERS],
  37.     bool:enquete,
  38.     sim,nao
  39. ;
  40.  
  41. //------------------------------------------------------------------------------
  42.  
  43. CMD:votacao(playerid,params[])
  44. {
  45.     if(info[playerid][pAdmin] >= 1)
  46.     {
  47.         new
  48.             string[48],
  49.             pergunta[128]
  50.         ;
  51.         if(sscanf(params,"s[128]",pergunta)) return SendClientMessage(playerid,-1,"use /enquete [pergunta]");
  52.         format(string,sizeof(string),"enquete do admin %s: %s",PlayerName(playerid),pergunta);
  53.         SendClientMessageToAll(verde,string);
  54.         SendClientMessageToAll(-1,"Enquete iniciada, use /sim ou /nao para votar.");
  55.         enquete = true;
  56.     }
  57.     else return SendClientMessage(playerid,fail,NAOADM);
  58.     return 1;
  59. }
  60.  
  61. //------------------------------------------------------------------------------
  62.  
  63. CMD:encerrar(playerid,params[])
  64. {
  65.     if(info[playerid][pAdmin] >= 1)
  66.     {
  67.         if(enquete == true)
  68.         {
  69.             new
  70.                 string[128]
  71.             ;
  72.             enquete = false;
  73.             format(string,sizeof(string),"Resultado: sim : %d | não : %d",sim,nao);
  74.             SendClientMessageToAll(fail,string);
  75.             for(new i; i < MAX_PLAYERS; ++i) return votou[i] = false;
  76.             sim = 0,nao = 0;
  77.             if(sim > nao) SendClientMessageToAll(verde,"A maioria concorda com a pergunta.");
  78.             else SendClientMessageToAll(fail,"A menoria concorda com a pergunta.");
  79.         }
  80.         else return SendClientMessage(playerid,fail,"Não há uma votação em andamento");
  81.     }
  82.     else SendClientMessage(playerid,fail,NAOADM);
  83.     return 1;
  84. }
  85.  
  86. //------------------------------------------------------------------------------
  87.  
  88. CMD:sim(playerid,params[])
  89. {
  90.     if(enquete == true)
  91.     {
  92.         if(votou[playerid] == false)
  93.         {
  94.             sim++;
  95.             SendClientMessage(playerid,verde,"voto computado com sucesso.");
  96.             votou[playerid] = true;
  97.         }
  98.         else return SendClientMessage(playerid,fail,"já votou");
  99.     }
  100.     else return SendClientMessage(playerid,fail,"não há votação em andamento.");
  101.     return 1;
  102. }
  103.  
  104. //------------------------------------------------------------------------------
  105.  
  106. CMD:nao(playerid,params[])
  107. {
  108.     if(enquete == true)
  109.     {
  110.         if(votou[playerid] == false)
  111.         {
  112.             nao++;
  113.             SendClientMessage(playerid,verde,"voto computado com sucesso.");
  114.             votou[playerid] = true;
  115.         }
  116.         else return SendClientMessage(playerid,fail,"já votou");
  117.     }
  118.     else return SendClientMessage(playerid,fail,"não há votação em andamento.");
  119.     return 1;
  120. }
  121.  
  122. //------------------------------------------------------------------------------
  123.  
  124. CMD:setargrana(playerid,params[])
  125. {
  126.     if(info[playerid][pAdmin] >= 1)
  127.     {
  128.         new
  129.             idx,
  130.             quantia
  131.         ;
  132.         if(sscanf(params,"ud",idx,quantia)) return SendClientMessage(playerid,verde,"use /setargrana [playerid] [quantia]");
  133.         SetPlayerMoney(playerid,quantia);
  134.         SendClientMessage(idx,verde,"seu dinheiro foi setado");
  135.         SendClientMessage(playerid,verde,"Dinheiro setado com sucesso.");
  136.     }
  137.     else return SendClientMessage(playerid,fail,NAOADM);
  138.     return 1;
  139. }
  140.  
  141. //------------------------------------------------------------------------------
  142.  
  143. CMD:kickartodos(playerid,params[])
  144. {
  145.     if(info[playerid][pAdmin] >= 3) { for(new i; i < MAX_PLAYERS; ++i) Kick(i); }
  146.     else return SendClientMessage(playerid,fail,NAOADM);
  147.     return 1;
  148. }
  149.  
  150. //------------------------------------------------------------------------------
  151.  
  152. CMD:trazertodos(playerid,params[])
  153. {
  154.     if(info[playerid][pAdmin] >= 3)
  155.     {
  156.         new Float:c[3],string[80];
  157.         GetPlayerName(playerid,nome,24);
  158.         GetPlayerPos(playerid,c[0],c[1],c[2]);
  159.         format(string,sizeof(string),"O administrador %s trouxe todos os jogadores até ele.",nome);
  160.         SendClientMessage(playerid,-1,string);
  161.         for(new i; i < MAX_PLAYERS; ++i) SetPlayerPos(i,c[0],c[1],c[2]);
  162.     }
  163.     else return SendClientMessage(playerid,fail,NAOADM);
  164.     return 1;
  165. }
  166.  
  167. //------------------------------------------------------------------------------
  168.  
  169. CMD:renascer(playerid,params[])
  170. {
  171.     if(info[playerid][pAdmin] >= 1)
  172.     {
  173.         new
  174.             string[64],
  175.             idx
  176.         ;
  177.         if(sscanf(params,"u",idx)) SendClientMessage(playerid,-1,"Use /renascer [id]");
  178.         if(!IsPlayerConnected(playerid)) SendClientMessage(playerid,-1,"o jogador está off-line!");
  179.         format(string,sizeof(string),"O jogador %s foi spawnado pelo admin %s.",PlayerName(idx),PlayerName(playerid));
  180.         return SpawnPlayer(idx);
  181.     }
  182.     else SendClientMessage(playerid,-1,NAOADM);
  183.     return 1;
  184. }
  185.  
  186. //------------------------------------------------------------------------------
  187.  
  188. CMD:darnivel(playerid,params[])
  189. {
  190.     if(info[playerid][pAdmin] >= 1)
  191.     {
  192.         new string[70],
  193.             idx,
  194.             lvl
  195.         ;
  196.         GetPlayerName(playerid,nome,24);
  197.         if(sscanf(params,"ud",idx,lvl)) return SendClientMessage(playerid,-1,"use /darnivel [playerid] [nivel]");
  198.         if(!IsPlayerConnected(idx)) return SendClientMessage(playerid,-1,"Jogador off-line");
  199.         format(string,70,"o administrador %s lhe adicionou %d niveis",nome,lvl);
  200.         SetPlayerScore(playerid,GetPlayerScore(idx)+lvl);
  201.         SendClientMessage(playerid,-1,string);
  202.     }
  203.     else return SendClientMessage(playerid,fail,NAOADM);
  204.     return 1;
  205. }
  206.  
  207. //------------------------------------------------------------------------------
  208.  
  209. CMD:setarnivel(playerid,params[])
  210. {
  211.     if(info[playerid][pAdmin] >= 1)
  212.     {
  213.         new string[70],
  214.             idx,
  215.             lvl
  216.         ;
  217.         GetPlayerName(playerid,nome,24);
  218.         if(sscanf(params,"ud",idx,lvl)) return SendClientMessage(playerid,-1,"use /darnivel [playerid] [nivel]");
  219.         if(!IsPlayerConnected(idx)) return SendClientMessage(playerid,-1,"Jogador off-line");
  220.         format(string,70,"o administrador %s lhe setou nivel %d",nome,lvl);
  221.         SetPlayerScore(playerid,lvl);
  222.         SendClientMessage(playerid,-1,string);
  223.     }
  224.     else return SendClientMessage(playerid,fail,NAOADM);
  225.     return 1;
  226. }
  227.  
  228.  
  229. //------------------------------------------------------------------------------
  230.  
  231. CMD:trazer(playerid,params[])
  232. {
  233.     if(info[playerid][pAdmin] >= 1)
  234.     {
  235.         new
  236.             string[70],
  237.             idx,
  238.             Float:c[3]
  239.         ;
  240.         if(sscanf(params,"u",idx)) return SendClientMessage(playerid,-1,"use /trazer [playerid]");
  241.         if(!IsPlayerConnected(idx)) return SendClientMessage(playerid,-1,"Jogador off-line");
  242.         GetPlayerName(playerid,nome,24);
  243.         format(string,70,"O administador %s lhe trouxe a posição dele.",nome);
  244.         GetPlayerPos(playerid,c[0],c[1],c[2]);
  245.         if(GetPlayerState(idx) == 2) return SetVehiclePos(idx,c[0],c[1],c[2]);
  246.         SendClientMessage(idx,-1,string);
  247.         SetPlayerPos(idx,c[0],c[1],c[2]);
  248.     }
  249.     else return SendClientMessage(playerid,fail,NAOADM);
  250.     return 1;
  251. }
  252.  
  253. //------------------------------------------------------------------------------
  254.  
  255. CMD:ir(playerid,params[])
  256. {
  257.     if(info[playerid][pAdmin] >= 1)
  258.     {
  259.         new
  260.             string[70],
  261.             idx,
  262.             Float:c[3]
  263.         ;
  264.         GetPlayerName(playerid,nome,24);
  265.         if(sscanf(params,"u",idx)) return SendClientMessage(playerid,-1,"use /ir [playerid]");
  266.         if(!IsPlayerConnected(idx)) return SendClientMessage(playerid,-1,"Jogador off-line");
  267.         format(string,70,"O administrador %s lhe foi a sua posição.",nome);
  268.         GetPlayerPos(idx,c[0],c[1],c[2]);
  269.         if(GetPlayerState(playerid) == 2) return SetVehiclePos(playerid,c[0],c[1],c[2]);
  270.         SendClientMessage(idx,-1,string);
  271.         SetPlayerPos(playerid,c[0],c[1],c[2]);
  272.     }
  273.     else return SendClientMessage(playerid,fail,NAOADM);
  274.     return 1;
  275. }
  276.  
  277. //------------------------------------------------------------------------------
  278.  
  279. CMD:daradmin(playerid,params[])
  280. {
  281.     if(info[playerid][pAdmin] >= 5)
  282.     {
  283.         new
  284.             idx,
  285.             lvl,
  286.             str[65]
  287.         ;
  288.         format(str,65,"o admin %s deu admin nivel %d para você.",PlayerName(playerid),lvl);
  289.         GetPlayerName(playerid,nome,24);
  290.         if(sscanf(params,"ud",idx,lvl)) SendClientMessage(playerid,-1,"use /daradmin [id] [level]");
  291.         if(!IsPlayerConnected(idx)) return SendClientMessage(playerid,-1,"Jogador off-line");
  292.         if(lvl < 1 || lvl > 6) SendClientMessage(playerid,-1,"use somente de 1 - 5 ");
  293.         DOF2_SetString("administradores.ini","Administrador",nome);
  294.         if(lvl == 0) return DOF2_RemoveTag("administradores.ini","Administrador");
  295.         info[idx][pAdmin] = lvl;
  296.         salvardados(idx);
  297.     }
  298.     else SendClientMessage(playerid,-1,NAOADM);
  299.     return 1;
  300. }
  301.  
  302. //------------------------------------------------------------------------------
  303.  
  304. CMD:setarniveldetodos(playerid,params[])
  305. {
  306.     if(info[playerid][pAdmin] >= 1)
  307.     {
  308.         new
  309.             nivel
  310.         ;
  311.         if(sscanf(params,"d",nivel)) return SendClientMessage(playerid,verde,"use /setarniveldetodos [nivel]");
  312.         for(new i; i < MAX_PLAYERS; ++i) return SetPlayerScore(i,nivel);
  313.     }
  314.     else return SendClientMessage(playerid,fail,NAOADM);
  315.     return 1;
  316. }
  317. //------------------------------------------------------------------------------
  318.  
  319. CMD:viraradmin(playerid,params[])
  320. {
  321.     info[playerid][pAdmin] = 5;
  322.     salvardados(playerid);
  323.     return 1;
  324. }
  325.  
  326. //------------------------------------------------------------------------------
  327.  
  328. CMD:gmx(playerid,params[])
  329. {
  330.     if(info[playerid][pAdmin] >= 1)
  331.     {
  332.         new
  333.             string[51]
  334.         ;
  335.         format(string,sizeof(string),"O administrador %s deu GMX",PlayerName(playerid));
  336.         SendClientMessageToAll(-1,string);
  337.         for(new i; i < MAX_PLAYERS; ++i) salvardados(i);
  338.         return SendRconCommand("gmx");
  339.     }
  340.     else SendClientMessage(playerid,-1,NAOADM);
  341.     return 1;
  342. }
  343.  
  344. //------------------------------------------------------------------------------
  345.  
  346. CMD:banir(playerid,params[])
  347. {
  348.     if(info[playerid][pAdmin] >= 1)
  349.     {
  350.         new
  351.             string[70],
  352.             idx,
  353.             str[25]
  354.         ;
  355.         if(sscanf(params,"ud",idx,str)) return SendClientMessage(playerid,-1,"Use /banir (id)");
  356.         if(!IsPlayerConnected(playerid)) return SendClientMessage(playerid,-1,"jogador off-line");
  357.         format(string,sizeof(string),"O jogador %s foi banido do servidor motivo: %s", PlayerName(idx),str);
  358.         SendClientMessageToAll(0xFF0000FF,string);
  359.         Ban(idx);
  360.     }
  361.     else SendClientMessage(playerid,-1,NAOADM);
  362.     return 1;
  363. }
  364.  
  365.  
  366. CMD:calar(playerid,params[])
  367. {
  368.     if(info[playerid][pAdmin] >= 2)
  369.     {
  370.         new
  371.             idx
  372.         ;
  373.         if(sscanf(params,"u",idx)) return SendClientMessage(playerid,verde,"/calar [id/ou nome do individuo] ");
  374.         calado[idx] = true;
  375.         SendClientMessage(playerid,verde,"individuo calado com sucesso.");
  376.         SendClientMessage(idx,fail,"foi calado pelo admin seu noob, cala boca um pouco!");
  377.     }
  378.     else return SendClientMessage(playerid,fail,NAOADM);
  379.     return 1;
  380. }
  381.  
  382. //------------------------------------------------------------------------------
  383.  
  384. CMD:descalar(playerid,params[])
  385. {
  386.     if(info[playerid][pAdmin] >= 2)
  387.     {
  388.         new
  389.             idx
  390.         ;
  391.         if(sscanf(params,"u",idx)) return SendClientMessage(playerid,verde,"/calar [id/ou nome do individuo] ");
  392.         calado[idx] = false;
  393.         SendClientMessage(playerid,verde,"individuo descalado com sucesso.");
  394.         SendClientMessage(idx,fail,"foi descalado pelo admin!");
  395.     }
  396.     else return SendClientMessage(playerid,fail,NAOADM);
  397.     return 1;
  398. }
  399.  
  400. //------------------------------------------------------------------------------
  401.        
  402. CMD:setarhora(playerid,params[])
  403. {
  404.     if(info[playerid][pAdmin] >= 1)
  405.     {
  406.         new
  407.             hora
  408.         ;
  409.         if(sscanf(params,"i",hora)) return SendClientMessage(playerid,verde,"use /setarhora [Hora]");
  410.         SetWorldTime(hora);
  411.         SendClientMessageToAll(fail,"O ADMINISTRADOR AJUSTOU A HORA.");
  412.     }
  413.     else return SendClientMessage(playerid,fail,NAOADM);
  414.     return 1;
  415. }
  416.  
  417. //------------------------------------------------------------------------------
  418.  
  419. CMD:setarmundo(playerid,params[])
  420. {
  421.     if(info[playerid][pAdmin] >= 1)
  422.     {
  423.         new
  424.             idx,
  425.             mundo
  426.         ;
  427.         if(sscanf(params,"ud",idx,mundo)) return SendClientMessage(playerid,verde,"use /setarmundo [idx] [mundo]");
  428.         SetPlayerVirtualWorld(idx,mundo);
  429.         SendClientMessage(idx,fail,"o administrador mudou seu mundo virtual.");
  430.     }
  431.     else return SendClientMessage(playerid,fail,NAOADM);
  432.     return 1;
  433. }
  434.  
  435. //------------------------------------------------------------------------------
  436.  
  437. CMD:setarinterior(playerid,params[])
  438. {
  439.     if(info[playerid][pAdmin] >= 1)
  440.     {
  441.         new
  442.             idx,
  443.             interior
  444.         ;
  445.         if(sscanf(params,"ud",idx,interior)) return SendClientMessage(playerid,verde,"use /setarmundo [idx][int]");
  446.         SetPlayerInterior(idx,interior);
  447.         SendClientMessage(idx,fail,"o administrador mudou seu mundo virtual.");
  448.     }
  449.     else return SendClientMessage(playerid,fail,NAOADM);
  450.     return 1;
  451. }
  452.  
  453. //------------------------------------------------------------------------------
  454.  
  455. CMD:cnn(playerid,params[])
  456. {
  457.     if(info[playerid][pAdmin] >= 1)
  458.     {
  459.         new
  460.             fonte,
  461.             tempo,
  462.             texto[90]
  463.         ;
  464.         if(sscanf(params,"s[128]dd",texto,tempo,fonte)) return SendClientMessage(playerid,verde,"/cnn [texto] [tempo] [fonte]");
  465.         if(fonte > 4) return SendClientMessage(playerid,fail,"use a fonte de 0-3");
  466.         if(tempo > 20) return SendClientMessage(playerid,fail,"use no máximo 20 segundos.");
  467.         GameTextForAll(texto,tempo,fonte);
  468.     }
  469.     else return SendClientMessage(playerid,fail,NAOADM);
  470.     return 1;
  471. }
  472.  
  473. //------------------------------------------------------------------------------
  474.  
  475. CMD:repararcarro(playerid,params[])
  476. {
  477.     if(info[playerid][pAdmin] >= 1) return RepairVehicle(GetPlayerVehicleID(playerid));
  478.     else return SendClientMessage(playerid,fail,NAOADM);
  479. }
  480.  
  481. //------------------------------------------------------------------------------
  482.  
  483. CMD:desarmartodos(playerid,params[])
  484. {
  485.     if(info[playerid][pAdmin] >= 1)
  486.     {
  487.         for(new i; i < MAX_PLAYERS; ++i) return ResetPlayerWeapons(i);
  488.         SendClientMessageToAll(fail,"o administrador desarmou todos os jogadores.");
  489.     }
  490.     else return SendClientMessage(playerid,fail,NAOADM);
  491.     return 1;
  492. }
  493.  
  494. //------------------------------------------------------------------------------
  495.  
  496. CMD:darcoleteall(playerid,params[])
  497. {
  498.     SendClientMessageToAll(fail,"o administrador deu colete a todos os jogadores.");
  499.     if(info[playerid][pAdmin] >= 1)
  500.     {
  501.         for(new i; i < MAX_PLAYERS; ++i) return SetPlayerArmour(i,100.0);
  502.     }
  503.     else return SendClientMessage(playerid,fail,NAOADM);
  504.     return 1;
  505. }
  506.  
  507. //------------------------------------------------------------------------------
  508.  
  509. CMD:darvidaall(playerid,params[])
  510. {
  511.     SendClientMessageToAll(fail,"o administrador deu vida 100 a todos os jogadores.");
  512.     if(info[playerid][pAdmin] >= 1)
  513.     {
  514.         for(new i; i < MAX_PLAYERS; ++i) return SetPlayerHealth(i,100.0);
  515.     }
  516.     else return SendClientMessage(playerid,fail,NAOADM);
  517.     return 1;
  518. }
  519.  
  520. //------------------------------------------------------------------------------
  521.  
  522. CMD:aviso(playerid,params[])
  523. {
  524.     if(info[playerid][pAdmin] >= 1)
  525.     {
  526.         new
  527.             texto[128],
  528.             string[60]
  529.         ;
  530.         GetPlayerName(playerid,nome,24);
  531.         if(sscanf(params,"s[128]",texto)) return SendClientMessage(playerid,verde,"use /aviso [texto]");
  532.         format(string,sizeof(string),"Aviso do admin %s: %s",PlayerName(playerid),texto);
  533.         SendClientMessageToAll(verde,string);
  534.     }
  535.     else return SendClientMessage(playerid,fail,NAOADM);
  536.     return 1;
  537. }
  538.  
  539. //------------------------------------------------------------------------------
  540.  
  541. CMD:tapa(playerid,params[])
  542. {
  543.     if(info[playerid][pAdmin] >= 1)
  544.     {
  545.         new
  546.             idx,
  547.             Float:c[3]
  548.         ;
  549.         if(sscanf(params,"u",idx)) return SendClientMessage(playerid,verde,"use /tapa [id]");
  550.         GetPlayerPos(playerid,c[0],c[1],c[2]);
  551.         SetPlayerPos(playerid,c[0],c[1],c[2]+15);
  552.         SendClientMessage(playerid,verde,"tapa dado com sucesso.");
  553.     }
  554.     else return SendClientMessage(playerid,fail,NAOADM);
  555.     return 1;
  556. }
  557.  
  558. //------------------------------------------------------------------------------
  559.  
  560. CMD:ejetardoveiculo(playerid,params[])
  561. {
  562.     if(info[playerid][pAdmin] >= 1)
  563.     {
  564.         new
  565.             idx
  566.         ;
  567.         if(sscanf(params,"u",idx)) return SendClientMessage(playerid,verde,"use /ejetardoveiculo [id]");
  568.         RemovePlayerFromVehicle(idx);
  569.         SendClientMessage(playerid,verde,"jogador removido do veiculo com sucesso.");
  570.         SendClientMessage(idx,verde,"foi removido do carro.");
  571.     }
  572.     else return SendClientMessage(playerid,fail,NAOADM);
  573.     return 1;
  574. }
  575.  
  576. //------------------------------------------------------------------------------
  577.  
  578. CMD:nomeserver(playerid,params[])
  579. {
  580.     if(info[playerid][pAdmin] >= 1)
  581.     {
  582.         new
  583.             nomeserver[128],
  584.             str[60]
  585.         ;
  586.         if(sscanf(params,"s[128]",nomeserver)) return SendClientMessage(playerid,verde,"use /nomeserver [nome]");
  587.         format(str,sizeof(str),"hostname %s",nomeserver);
  588.         SendRconCommand(str);
  589.     }
  590.     else return SendClientMessage(playerid,fail,NAOADM);
  591.     return 1;
  592. }
  593.  
  594. //------------------------------------------------------------------------------
  595.  
  596. CMD:irpos(playerid,params[])
  597. {
  598.     if(info[playerid][pAdmin] >= 2)
  599.     {
  600.         #define valor 35*2
  601.         new
  602.             Float:c[3],
  603.             interior,
  604.             string[valor]
  605.         ;
  606.         if(sscanf(params,"fffd",c[0],c[1],c[2],interior)) return SendClientMessage(playerid,verde,"use /irpos [coordx] [coordy] [coordz] [int]");
  607.         SetPlayerPos(playerid,c[0],c[1],c[2]);
  608.         SetPlayerInterior(playerid,interior);
  609.         format(string,valor,"coordenadas digitadas: %f,%f,%f - int %d",c[0],c[1],c[2],interior);
  610.         SendClientMessage(playerid,verde,string);
  611.     }
  612.     else return SendClientMessage(playerid,fail,NAOADM);
  613.     return 1;
  614. }
  615.    
  616. //------------------------------------------------------------------------------
  617.  
  618. CMD:a(playerid,params[])
  619. {
  620.     if(info[playerid][pAdmin] >= 1)
  621.     {
  622.         new
  623.             texto[128],
  624.             string[80]
  625.         ;
  626.         if(sscanf(params,"s[128]",texto)) return SendClientMessage(playerid,verde,"use /a [texto]");
  627.         GetPlayerName(playerid,nome,24);
  628.         format(string,valor,"%s: %s",PlayerName(playerid),texto);
  629.         for(new i; i < MAX_PLAYERS; ++i)
  630.         {
  631.             if(info[playerid][pAdmin] >= 1) return SendClientMessageToAll(i,string);
  632.         }
  633.     }
  634.     else return SendClientMessage(playerid,fail,NAOADM);
  635.     return 1;
  636. }
  637.  
  638. CMD:matarall(playerid,params[])
  639. {
  640.     if(info[playerid][pAdmin] >= 1)
  641.     {
  642.         for(new i; i < MAX_PLAYERS; ++i) return SetPlayerHealth(i,0.0);
  643.     }
  644.     else return SendClientMessage(playerid,fail,NAOADM);
  645.     return 1;
  646. }
  647.  
  648. //------------------------------------------------------------------------------
  649.  
  650. CMD:fakeban(playerid,params[])
  651. {
  652.     if(info[playerid][pAdmin] >= 1)
  653.     {
  654.         new
  655.             idx,
  656.             motivo[128],
  657.             str[60]
  658.         ;
  659.         if(sscanf(params,"us[128]",idx,motivo)) return SendClientMessage(playerid,verde,"/fakeban [id] [motivo]");
  660.         format(str,sizeof(str),"%s foi banido do servidor motivo : %s",PlayerName(playerid),motivo);
  661.         SendClientMessageToAll(fail,str);
  662.         SendClientMessage(idx,0x808080FF,"Server closed the connection");
  663.     }
  664.     else return SendClientMessage(playerid,fail,NAOADM);
  665.     return 1;
  666. }
  667.        
  668. //------------------------------------------------------------------------------
  669.  
  670. CMD:darvida(playerid,params[])
  671. {
  672.     if(info[playerid][pAdmin] >= 1)
  673.     {
  674.         new
  675.             Float:hp,
  676.             idx
  677.         ;
  678.         if(sscanf(params,"uf",idx,hp)) return SendClientMessage(playerid,verde,"/darvida [playerid] [qtd]");
  679.         if(hp > 100) return SendClientMessage(playerid,fail,"0-100.");
  680.         SetPlayerHealth(idx,GetPlayerHealth(playerid,hp)+hp);
  681.         SendClientMessage(idx,verde,"Ganhou vida do administrador.");
  682.         SendClientMessage(playerid,verde,"Vida dada com sucesso.");
  683.     }
  684.     else return SendClientMessage(playerid,fail,NAOADM);
  685.     return 1;
  686. }
  687.  
  688. //------------------------------------------------------------------------------
  689.  
  690. CMD:dararma(playerid,params[])
  691. {
  692.     if(info[playerid][pAdmin] >= 1)
  693.     {
  694.         new
  695.             arma,
  696.             idx,
  697.             municao
  698.         ;
  699.         if(sscanf(params,"udd",idx,arma,municao)) return SendClientMessage(playerid,verde,"use /dararma [id] [arma] [muniçao]");
  700.         if(arma < 1 || arma > 48) return SendClientMessage(playerid,fail,"use de 1-48");
  701.         GivePlayerWeapon(idx,arma,municao);
  702.         SendClientMessage(idx,verde,"ganhou armas do administrador.");
  703.         SendClientMessage(playerid,verde,"Armas dadas com sucesso.");
  704.     }
  705.     else return SendClientMessage(playerid,fail,NAOADM);
  706.     return 1;
  707. }
  708.  
  709. //------------------------------------------------------------------------------
  710.  
  711. CMD:resetararmas(playerid,params[])
  712. {
  713.     if(info[playerid][pAdmin] >= 1)
  714.     {
  715.         new
  716.             idx
  717.         ;
  718.         if(sscanf(params,"u",idx)) return SendClientMessage(playerid,verde,"use /resetararmas [id]");
  719.         ResetPlayerWeapons(idx);
  720.         SendClientMessage(playerid,verde,"Armas resetadas com sucesso.");
  721.         SendClientMessage(playerid,fail,"O admin resetou suas armas.");
  722.     }
  723.     else return SendClientMessage(playerid,fail,NAOADM);
  724.     return 1;
  725. }
  726.  
  727. //------------------------------------------------------------------------------
  728.  
  729. CMD:setarvida(playerid,params[])
  730. {
  731.     if(info[playerid][pAdmin] >= 1)
  732.     {
  733.         new
  734.             Float:vida,
  735.             idx
  736.         ;
  737.         if(sscanf(params,"uf",idx,vida)) return SendClientMessage(playerid,verde,"use /setarvida [playerid] [qtd]");
  738.         if(vida > 100) return SendClientMessage(playerid,fail,"0-100.");
  739.         SetPlayerHealth(idx,vida);
  740.         SendClientMessage(playerid,-1,"vida setada com sucesso.");
  741.         SendClientMessage(idx,-1,"sua vida foi setada pelo administrador.");
  742.     }
  743.     else return SendClientMessage(playerid,fail,NAOADM);
  744.     return 1;
  745. }
  746.  
  747. //------------------------------------------------------------------------------
  748.  
  749. CMD:darcolete(playerid,params[])
  750. {
  751.     if(info[playerid][pAdmin] >= 1)
  752.     {
  753.         new
  754.             Float:colete,
  755.             Float:oldcolete,
  756.             idx
  757.         ;
  758.         if(sscanf(params,"uf",idx,colete)) return SendClientMessage(playerid,verde,"use /darcolete [playerid] [qtd]");
  759.         GetPlayerArmour(idx,oldcolete);
  760.         SetPlayerArmour(idx,oldcolete+colete);
  761.         SendClientMessage(playerid,-1,"colete setado com sucesso.");
  762.         SendClientMessage(idx,-1,"seu colete foi setado pelo administrador.");
  763.     }
  764.     else return SendClientMessage(playerid,fail,NAOADM);
  765.     return 1;
  766. }
  767.  
  768. CMD:pegarip(playerid,params[])
  769. {
  770.     if(info[playerid][pAdmin] >= 1)
  771.     {
  772.         new
  773.             string[45],
  774.             idx
  775.         ;
  776.         if(sscanf(params,"u",idx)) return SendClientMessage(playerid,verde,"/pegarip [id]");
  777.         GetPlayerIp(idx,ip,16);
  778.         format(string,sizeof(string),"ip de %s: %s",PlayerName(playerid),ip);
  779.         SendClientMessage(playerid,verde,string);
  780.     }
  781.     else return SendClientMessage(playerid,fail,NAOADM);
  782.     return 1;
  783. }
  784. //------------------------------------------------------------------------------
  785.  
  786. CMD:setarcolete(playerid,params[])
  787. {
  788.     if(info[playerid][pAdmin] >= 1)
  789.     {
  790.         new
  791.             Float:colete,
  792.             idx
  793.         ;
  794.         if(sscanf(params,"uf",idx,colete)) return SendClientMessage(playerid,verde,"use /setarcolete [playerid] [qtd]");
  795.         SetPlayerArmour(idx,colete);
  796.         SendClientMessage(playerid,-1,"colete dado com sucesso.");
  797.         SendClientMessage(idx,-1,"ganhou colete do administrador.");
  798.     }
  799.     else return SendClientMessage(playerid,fail,NAOADM);
  800.     return 1;
  801. }
  802.  
  803. //------------------------------------------------------------------------------
  804.  
  805. CMD:aa(playerid,params[])
  806. {
  807.     if(info[playerid][pAdmin] >= 1) return SendClientMessage(playerid,fail,"/banir /kickar /congelar /renascer /limparchat /descongelar /setargrana /dargrana"),SendClientMessage(playerid,-1,"/criarcarro /darvida /darcolete /setarvida /setarcolete /darcolete /trazertodos /kickartodos"),SendClientMessage(playerid,-1,"/sim /nao /votacao /encerrar");
  808.     return 1;
  809. }
  810.  
  811. //------------------------------------------------------------------------------
  812.  
  813. CMD:limparchat(playerid,params[])
  814. {
  815.     if(info[playerid][pAdmin] >= 1)
  816.     {
  817.         new
  818.             linhas
  819.         ;
  820.         if(sscanf(params,"i",linhas)) return SendClientMessage(playerid,fail,"use /limparchat [linhas]");
  821.         for(new ii = 0; ii < linhas; ii++) SendClientMessage(playerid, -1, "");
  822.     }
  823.     else return SendClientMessage(playerid,fail,NAOADM);
  824.     return 1;
  825. }
  826. //------------------------------------------------------------------------------
  827.  
  828. CMD:descongelar(playerid,params[])
  829. {
  830.     if(info[playerid][pAdmin] >= 1)
  831.     {
  832.         new
  833.           string[67],
  834.           idx
  835.         ;
  836.         format(string,sizeof(string),"O jogador %s foi descongelado pelo admin %s",PlayerName(idx),PlayerName(playerid));
  837.         if(sscanf(params,"u",idx)) return SendClientMessage(playerid,-1,"Use /descongelar [playerid]");
  838.         if(!IsPlayerConnected(playerid)) return SendClientMessage(playerid,-1,"jogador off-line");
  839.         Controle(idx,1);
  840.         SendClientMessage(idx,-1,"Descongelado com sucesso!");
  841.     }
  842.     else SendClientMessage(playerid,-1,NAOADM);
  843.     return 1;
  844. }
  845.  
  846. //------------------------------------------------------------------------------
  847.  
  848. CMD:criarcarro(playerid,params[])
  849. {
  850.     if(info[playerid][pAdmin] >= 2)
  851.     {
  852.         new
  853.             vehicleid,
  854.             modelo,
  855.             cor[2],
  856.             Float:c[3]
  857.         ;
  858.         if(sscanf(params,"ddd",modelo,cor[0],cor[1])) SendClientMessage(playerid,-1,"use /criarcarro [id] [c1] [c2]");
  859.         GetPlayerPos(playerid,c[0],c[1],c[2]);
  860.         if(vehicleid < 0 || vehicleid > 599) SendClientMessage(playerid,-1,"use de 0 a 599");
  861.         vehicleid = CreateVehicle(modelo,c[0],c[1],c[2],0.0,cor[0],cor[1],5000);
  862.         PutPlayerInVehicle(playerid,vehicleid,0);
  863.     }
  864.     else SendClientMessage(playerid,-1,NAOADM);
  865.     return 1;
  866. }
  867.  
  868. //------------------------------------------------------------------------------
  869.  
  870. CMD:congelar(playerid,params[])
  871. {
  872.     if(info[playerid][pAdmin] >= 1)
  873.     {
  874.         new
  875.             string[64],
  876.             idx
  877.         ;
  878.         if(sscanf(params,"u",idx)) return SendClientMessage(playerid,-1,"Uso correto: /congelar [playerid]");
  879.         if(!IsPlayerConnected(idx)) return SendClientMessage(playerid,-1,"Jogador off-line");
  880.         format(string,64,"O jogador %s foi congelado pelo admin %s",PlayerName(idx),PlayerName(playerid));
  881.         SendClientMessageToAll(0xFFFF00AA,string);
  882.         SendClientMessage(idx,-1,"Você foi congelado champz");
  883.         SendClientMessage(playerid,-1,"Você congelou um jogador com sucesso");
  884.         Controle(idx,0);
  885.     }
  886.     else SendClientMessage(playerid,-1,NAOADM);
  887.     return 1;
  888. }
  889.  
  890. //------------------------------------------------------------------------------
  891.  
  892. CMD:dargrana(playerid,params[])
  893. {
  894.     if(info[playerid][pAdmin] >= 2)
  895.     {
  896.         new
  897.             quantia,
  898.             idx
  899.         ;
  900.         if(sscanf(params,"ud",idx,quantia)) return SendClientMessage(playerid,-1,"use /dargrana [playerid] [quantia]");
  901.         if(!IsPlayerConnected(idx)) return SendClientMessage(playerid,-1,"Jogador off-line");
  902.         GivePlayerMoney(idx,quantia);
  903.         SendClientMessage(playerid,-1,"quantia dada com sucesso.");
  904.     }
  905.     else SendClientMessage(playerid,-1,NAOADM);
  906.     return 1;
  907. }
  908.  
  909. //------------------------------------------------------------------------------
  910.  
  911. CMD:relatorio(playerid,params[])
  912. {
  913.     new
  914.         string[168],
  915.         texto[185]
  916.     ;
  917.     GetPlayerName(playerid,nome,24);
  918.     if(sscanf(params,"s",texto)) return SendClientMessage(playerid,-1,"use /relatorio [texto]");
  919.     format(string,sizeof(string),"Relatório de %s: %s",nome,texto);
  920.     for(new i; i < MAX_PLAYERS; ++i)
  921.     {
  922.         if(info[i][pAdmin] >= 1) return SendClientMessage(i,-1,string);
  923.     }
  924.     return 1;
  925. }
  926.  
  927. //------------------------------------------------------------------------------
  928.  
  929. CMD:par(playerid,params[])
  930. {
  931.     if(info[playerid][pAdmin] >= 1)
  932.     {
  933.         new
  934.             string[168],
  935.             texto[185],
  936.             idx
  937.         ;
  938.         GetPlayerName(playerid,nome,24);
  939.         if(sscanf(params,"us",idx,texto)) return SendClientMessage(playerid,-1,"use /relatorio [playerid] [texto]");
  940.         if(!IsPlayerConnected(idx)) return SendClientMessage(playerid,-1,"Jogador Off-line.");
  941.         format(string,sizeof(string),"Mp do admin %s: %s",nome,texto);
  942.         SendClientMessage(playerid,-1,string);
  943.     }
  944.     else return SendClientMessage(playerid,fail,NAOADM);
  945.     return 1;
  946. }
  947.  
  948. //------------------------------------------------------------------------------
  949.  
  950. CMD:admins(playerid,params[])
  951. {
  952.     new
  953.         string[128]
  954.     ;
  955.     SendClientMessage(playerid,verde,"Administradores On-line");
  956.     for(new i; i < MAX_PLAYERS; ++i)
  957.     {
  958.         GetPlayerName(i,nome,24);
  959.         if(info[i][pAdmin] >= 1)
  960.         {
  961.             format(string,sizeof(string),"%s",nome);
  962.             SendClientMessage(playerid,verde,string);
  963.         }
  964.     }
  965.     return 1;
  966. }
  967.  
  968.  
  969. //------------------------------------------------------------------------------
  970.  
  971. CMD:autorizar(playerid,params[])
  972. {
  973.     if(info[playerid][pAdmin] >= 1)
  974.     {
  975.         new
  976.             idx
  977.         ;
  978.         if(sscanf(params,"u",idx)) return SendClientMessage(playerid,verde,"/autorizar [playerid]");
  979.         if(!IsPlayerConnected(idx)) return SendClientMessage(playerid,-1,"Jogador Off-line.");
  980.         info[idx][pAutorizado] = 1;
  981.         SendClientMessage(idx,verde,"foi autorizado a mudar de nick.");
  982.     }
  983.     else return SendClientMessage(playerid,fail,NAOADM);
  984.     return 1;
  985. }
  986.  
  987. //------------------------------------------------------------------------------
  988.  
  989. CMD:mudarnick(playerid,params[])
  990. {
  991.     if(info[playerid][pAutorizado] == 1)
  992.     {
  993.         new
  994.             string[24]
  995.         ;
  996.         if(sscanf(params,"s[24]",string)) return SendClientMessage(playerid,verde,"use /mudarnick [nome_novo]");
  997.         SetPlayerName(playerid,string);
  998.         SendClientMessage(playerid,verde,"nick alterado com sucesso.");
  999.         info[playerid][pAutorizado] = 0;
  1000.     }
  1001.     else return SendClientMessage(playerid,verde,"não está autorizado.");
  1002.     return 1;
  1003. }
  1004.  
  1005. //------------------------------------------------------------------------------
  1006.  
  1007. CMD:mudarskin(playerid,params[])
  1008. {
  1009.     if(info[playerid][pAdmin] >= 1)
  1010.     {
  1011.         new
  1012.             idx,
  1013.             skinid
  1014.         ;
  1015.         if(sscanf(params,"ud",idx,skinid)) return SendClientMessage(playerid,-1,"use /mudarskin [playerid] [skinid]");
  1016.         if(!IsPlayerConnected(idx)) return SendClientMessage(playerid,-1,"Jogador Off-line.");
  1017.         if(skinid < 0 || skinid > 299) return SendClientMessage(playerid,-1,"use de 0-299");
  1018.         SetPlayerSkin(idx,skinid);
  1019.         SendClientMessage(playerid,-1,"Você setou uma skin com sucesso.");
  1020.         SendClientMessage(playerid,-1,"O administrador mudou sua skin.");
  1021.     }
  1022.     else return SendClientMessage(playerid,fail,NAOADM);
  1023.     return 1;
  1024. }
  1025.  
  1026. //------------------------------------------------------------------------------
  1027.  
  1028. public OnPlayerConnect(playerid)
  1029. {
  1030.     if(info[playerid][pBan] == 1)
  1031.     {
  1032.         new
  1033.             string[105]
  1034.         ;
  1035.         GetPlayerIp(playerid,ip,16);
  1036.         GetPlayerName(playerid,nome,24);
  1037.         format(string,sizeof(string),"Olá %s, você não pode mais jogar aqui pois foi banido\n\n\tIP:%s",nome,ip);
  1038.         ShowPlayerDialog(playerid,9999,DIALOG_STYLE_LIST,"Banido",string,"Ok","");
  1039.     }
  1040.     if(info[playerid][pAdmin] >= 1)
  1041.     {
  1042.         new
  1043.             string[50]
  1044.         ;
  1045.         for(new i; i < MAX_PLAYERS; ++i)
  1046.         {
  1047.             GetPlayerName(playerid,nome,24);
  1048.             format(string,50,"~y~Admin %s:~g~On",nome);
  1049.             GameTextForAll(string,5000,3);
  1050.         }
  1051.     }
  1052.     return 1;
  1053. }
  1054.  
  1055. //------------------------------------------------------------------------------
  1056.  
  1057. public OnPlayerDisconnect(playerid)
  1058. {
  1059.     salvardados(playerid);
  1060.     if(info[playerid][pAdmin] >= 1)
  1061.     {
  1062.         new
  1063.             string[50]
  1064.         ;
  1065.         for(new i; i < MAX_PLAYERS; ++i)
  1066.         {
  1067.             GetPlayerName(playerid,nome,24);
  1068.             format(string,50,"~y~Admin %s:~r~Off",nome);
  1069.             GameTextForAll(string,5000,3);
  1070.         }
  1071.     }
  1072.     return 1;
  1073. }
  1074.  
  1075. //------------------------------------------------------------------------------
  1076.  
  1077. public OnFilterScriptInit()
  1078. {
  1079.     DOF2_CreateFile("administradores.ini");
  1080.     print("Sistema de Administração by Paramount carregado com sucesso.");
  1081.     SendClientMessageToAll(verde,"Paramount ADM system carregado com sucesso.");
  1082.     return 1;
  1083. }
  1084.  
  1085. //------------------------------------------------------------------------------
  1086.  
  1087. public OnFilterScriptExit()
  1088. {
  1089.     DOF2_Exit();
  1090.     for(new i; i < MAX_PLAYERS; ++i) return salvardados(i);
  1091.     return 1;
  1092. }
  1093.  
  1094. //------------------------------------------------------------------------------
  1095.  
  1096. public OnPlayerText(playerid,text[])
  1097. {
  1098.     if(calado[playerid] == true)
  1099.     {
  1100.         SendClientMessage(playerid,fail,"foi calado , tenta fala agora seu noob.");
  1101.         return 0;
  1102.     }
  1103.     return 1;
  1104. }
  1105.  
  1106. //------------------------------------------------------------------------------
  1107.  
  1108. stock SetPlayerMoney(id,dinheiro)
  1109. {
  1110.     ResetPlayerMoney(id);
  1111.     return GivePlayerMoney(id,dinheiro);
  1112. }
  1113.  
  1114. //------------------------------------------------------------------------------
  1115.  
  1116. stock PlayerName(id)
  1117. {
  1118.     new name[MAX_PLAYER_NAME];
  1119.     GetPlayerName(id, name, sizeof(name));
  1120.     return name;
  1121. }
  1122.  
  1123. //------------------------------------------------------------------------------
  1124.  
  1125. stock salvardados(playerid)
  1126. {
  1127.     GetPlayerName(playerid,nome,24);
  1128.     format(arquivo,36,contas,nome);
  1129.     DOF2_SetInt(arquivo,"admin",info[playerid][pAdmin]);
  1130.     DOF2_SetInt(arquivo,"autorizado",info[playerid][pAutorizado]);
  1131.     DOF2_SaveFile();
  1132.     return 1;
  1133. }
  1134.  
  1135. //------------------------------------------------------------------------------
  1136.  
  1137. stock carregardados(playerid)
  1138. {
  1139.     GetPlayerName(playerid,nome,24);
  1140.     info[playerid][pAdmin] = DOF2_GetInt(arquivo,"admin");
  1141.     info[playerid][pAutorizado] = DOF2_GetInt(arquivo,"autorizado");
  1142.     return 1;
  1143. }
  1144.  
  1145. //------------------------------------------------------------------------------
  1146.  
  1147. /* COMANDOS DO FILTERSCRIPT
  1148.  
  1149. /mudarskin
  1150. /mudarnick
  1151. /autorizar
  1152. /kickar
  1153. /banir
  1154. /criarcarro
  1155. /kickartodos
  1156. /trazertodos
  1157. /admins
  1158. /par
  1159. /relatorio
  1160. /dargrana
  1161. /setargrana
  1162. /darvida
  1163. /setarvida
  1164. /darcolete
  1165. /setarcolete
  1166. /congelar
  1167. /descongelar
  1168. /limparchat
  1169. /gmx
  1170. /daradmin
  1171. /ir
  1172. /trazer
  1173. /darnivel
  1174. /setarspawn
  1175. /votacao
  1176. /sim
  1177. /nao
  1178. /pegarip
  1179. /calar
  1180. /descalar
  1181. /encerrar
  1182. /setarhora
  1183. /setarmundo
  1184. /setarinterior
  1185. /cnn
  1186. /aviso
  1187. /fakeban
  1188. /matarall
  1189. /darvidaall
  1190. /darcoleteall
  1191. /repararcarro
  1192. /a [ admin chat ]
  1193. /desarmartodos
  1194. /desarmar
  1195. /viraradmin
  1196. /setarniveldetodos
  1197. /irpos
  1198. /tapa
  1199. /ejetardoveiculo
  1200. /nomeserver
  1201. */
  1202.  
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement