Guest User

[FS]BanSistem

a guest
Jul 12th, 2012
208
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
  1. /*                                                      Filter Script criado totalmente por Bruno Pereira!
  2.  
  3. Baixado da www.total-samp.com.br
  4.  
  5. Postado Por: Caozinho_DosCorre
  6.                                                             Contato: [email protected]
  7.                                                                     Skype: grt.figa
  8.                                                             Não retire os créditos, isso é muito feio :(
  9.                                                     Crie a pasta ContasBanidas e IPsBanidos no seu ScriptFiles
  10.                                                         Filter Script criado totalmente por Bruno Pereira!
  11. */
  12.  
  13. // ============= INCLUDES ============ //
  14. #include <a_samp>// Include do samp
  15. #include <SII>// DataBase
  16. #include <zcmd>// Processador de comandos
  17. #include <sscanf2>// Sei la como posso descrever isso '-'.
  18. // ============ CORES ============== //
  19. #define CINZA           0xB4B5B7FF
  20. #define VERMELHOCLARO   0xFF6347AA
  21. #define AZUL            0x33CCFFAA
  22. #define AMARELO         "{FFFF33}"
  23. #define BRANCO2         "{FFFFFF}"
  24. #define VERMELHO        "{FF0000}"
  25. #define DBanido         666
  26. static String[256], iddele;
  27.  
  28. public OnFilterScriptInit()
  29. {
  30.         print(" Carregando sistema de ban...");
  31.         print(" Sistema de Ban carregado com sucesso!");
  32.         print(" Sistema de Ban criado por Bruno Pereira");
  33.         return 1;
  34. }
  35. public OnPlayerConnect(playerid)
  36. {
  37.     SendClientMessage(playerid, -1, "Sistema de Ban criado por Bruno Pereira, não retire os créditos");
  38.     new Adm[21],
  39.         MotivoBan[100],
  40.         DataBan[20],
  41.         HoraBan[22];
  42.     format(String, 60, "ContasBanidas/%s.ini", pNome(playerid));// Formata a pasta!
  43.     if(fexist(String))// Verifica se a conta do Player está na pasta!
  44.     {
  45.         INI_Open(String);// Abre o arquivo!
  46.         INI_ReadString(Adm, "Admin", 21);// Le oque ta escrito em admin e armazena na variavel Adm.
  47.         INI_ReadString(MotivoBan, "Motivo", 100);
  48.         INI_ReadString(DataBan, "Data", 20);
  49.         INI_ReadString(HoraBan, "Hora", 22);
  50.         format(String, sizeof(String), "Olá %s, você está banido\n\n\t"AMARELO"Admin: "BRANCO2"%s\n\t"AMARELO"Motivo: "BRANCO2"%s\n\t"AMARELO"Data: "BRANCO2"%s\n\t"AMARELO"Hora: "BRANCO2"%s", pNome(playerid), Adm, MotivoBan, DataBan, HoraBan);
  51.         ShowPlayerDialog(playerid, DBanido, DIALOG_STYLE_MSGBOX, "BANIDO", String, "Fechar","");
  52.         INI_Close();// Fecha o arquivo!
  53.         SetPlayerPos(playerid, 1518.3723,-1675.2997,20.9211);
  54.         SetPlayerFacingAngle(playerid, 271.9657);
  55.         Kick(playerid);// Kick :)
  56.     }
  57.     new ip[16];
  58.     GetPlayerIp(playerid, ip, sizeof ip);
  59.     format(String, 60, "IPsBanidos/%s.ini", ip);
  60.     if(fexist(String))
  61.     {
  62.         INI_Open(String);
  63.         INI_ReadString(Adm, "Admin", 26);
  64.         INI_ReadString(MotivoBan, "Motivo", 100);
  65.         INI_ReadString(DataBan, "Data", 20);
  66.         INI_ReadString(HoraBan, "Hora", 22);
  67.         format(String, sizeof(String), "Olá %s, você está banido\n\n\t"AMARELO"Admin: "BRANCO2"%s\n\t"AMARELO"Motivo: "BRANCO2"%s\n\t"AMARELO"Data: "BRANCO2"%s\n\t"AMARELO"Hora: "BRANCO2"%s", pNome(playerid), Adm, MotivoBan, DataBan, HoraBan);
  68.         ShowPlayerDialog(playerid, DBanido, DIALOG_STYLE_MSGBOX, "BANIDO", String, "Fechar","");
  69.         INI_Close();
  70.         SetPlayerPos(playerid, 1518.3723,-1675.2997,20.9211);
  71.         SetPlayerFacingAngle(playerid, 271.9657);
  72.         Kick(playerid);
  73.     }
  74.     return 1;
  75. }
  76. stock pNome(playerid)
  77. {//Essa função irá returnar o nome do jogador, sendo assim não precisa toda vez usar new nome[MAX_PLAYER_NAME]; GetPlayerName e bla bla bla. By MiTToS
  78.     new nome[MAX_PLAYER_NAME];
  79.     GetPlayerName(playerid, nome, sizeof(nome));
  80.     return nome;
  81. }
  82. CMD:ban(playerid, params[])
  83. {
  84.     new
  85.         Dia,
  86.         Mes,
  87.         Ano,
  88.         Hora,
  89.         Minuto,
  90.         Segundo,
  91.         sStr[22],
  92.         sStr3[22],
  93.         sStr2[128];
  94.     new ip[16];
  95.     if(!IsPlayerAdmin(playerid))
  96.         return SendClientMessage(playerid, CINZA, "Você não tem permissão para usar esse comando!");
  97.     if(sscanf(params, "us[128]", iddele, sStr2))
  98.         return SendClientMessage(playerid, CINZA, "Use: /ban [id] [motivo]");
  99.     if(!IsPlayerConnected(iddele))
  100.         return SendClientMessage(playerid, CINZA, "Jogador não conectado");
  101.     getdate(Ano, Mes, Dia);
  102.     gettime(Hora, Minuto, Segundo);
  103.     GetPlayerIp(iddele, ip, sizeof ip);
  104.     format(String, 128, "O %s foi banido pelo admin %s, Motivo: %s", pNome(iddele), pNome(playerid), sStr2);
  105.     SendClientMessageToAll(VERMELHOCLARO,String);
  106.     format(sStr3, 14, "%d/%d/%d", Dia, Mes, Ano);
  107.     format(sStr, 22, "%d:%d:%d", Hora, Minuto, Segundo);
  108.     format(String, 40, "ContasBanidas/%s.ini", pNome(iddele));
  109.     if(INI_Open(String))
  110.     {
  111.         INI_WriteString("Admin", pNome(playerid));
  112.         INI_WriteString("Data", sStr3);
  113.         INI_WriteString("Hora", sStr);
  114.         INI_WriteString("Motivo",sStr2);
  115.         INI_Save();
  116.         INI_Close();
  117.     }
  118.     format(String, 50, "IPsBanidos/%s.ini", ip);
  119.     if(INI_Open(String))
  120.     {
  121.         INI_WriteString("Admin", pNome(playerid));
  122.         INI_WriteString("Data", sStr3);
  123.         INI_WriteString("Hora", sStr);
  124.         INI_WriteString("Motivo",sStr2);
  125.         INI_Save();
  126.         INI_Close();
  127.     }
  128.     Kick(iddele);
  129.     return 1;
  130. }
  131. CMD:desbanconta(playerid, params[])
  132. {
  133.     new conta[25];
  134.     if(!IsPlayerAdmin(playerid))
  135.         return SendClientMessage(playerid, CINZA, "Você não tem permissão para usar esse comando!");
  136.     if(sscanf(params, "s[25]", conta))
  137.         return SendClientMessage(playerid, CINZA, "Use: /desbanconta [Nome_Conta]");
  138.     format(String, 40, "ContasBanidas/%s.ini", conta);
  139.     if(fexist(String))
  140.     {
  141.         INI_Remove(String);
  142.         return SendClientMessage(playerid, AZUL, "Conta desbanida com sucesso, se você ainda não desbaniu o IP dele use /desbanip");
  143.     }
  144.     else
  145.     {
  146.         SendClientMessage(playerid, CINZA, "Essa conta não existe ou não esta banida! ");
  147.     }
  148.     return 1;
  149. }
  150. CMD:desbanip(playerid, params[])
  151. {
  152.     new IPBan[16];
  153.     if(!IsPlayerAdmin(playerid))
  154.         return SendClientMessage(playerid, CINZA, "Você não tem permissão para usar esse comando!");
  155.     if(sscanf(params, "s[16]", IPBan))
  156.         return SendClientMessage(playerid, CINZA, "Use: /desbanirip [IP]");
  157.     format(String, 40, "IPsBanidos/%s.ini", IPBan);
  158.     if(fexist(String))
  159.     {
  160.         INI_Remove(String);
  161.         return SendClientMessage(playerid, AZUL, "IP Desbanido com sucesso, se ainda não desbaniu a conta dele use /desbanconta");
  162.     }
  163.     else
  164.     {
  165.         SendClientMessage(playerid, CINZA, "Esse IP não existe ou não esta banido! ");
  166.     }
  167.     return 1;
  168. }
  169. /*                                                      Filter Script criado totalmente por Bruno Pereira!
  170.                                                             Contato: [email protected]
  171.                                                                     Skype: grt.figa
  172.                                                             Não retire os créditos, isso é muito feio :(
  173.                                                     Crie a pasta ContasBanidas e IPsBanidos no seu ScriptFiles
  174.                                                         Filter Script criado totalmente por Bruno Pereira!
  175. */
Advertisement
Add Comment
Please, Sign In to add comment