Advertisement
Don_Speed

DS BAN

Sep 8th, 2018
592
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
Pawn 7.63 KB | None | 0 0
  1. /*
  2.         ____                  _____                     __
  3.        / __ \____  ____      / ___/____  ___  ___  ____/ /
  4.       / / / / __ \/ __ \     \__ \/ __ \/ _ \/ _ \/ __  /
  5.      / /_/ / /_/ / / / /    ___/ / /_/ /  __/  __/ /_/ /
  6.      _____/\____/_/ /_/____/____/ .___/\___/\___/\__,_/
  7.                                /_/
  8.  
  9. */
  10. /*
  11. AddBan(playerid, jogadorid, motivo[]) - Ban permanentemente
  12. AddBanEx(playerid, jogadorid, motivo[], tempo) - Ban por tempo (tempo = dias)
  13. RemovedBan(playerid, name[]) - Remove ban
  14. LoadBanEx(playerid, name[]) - Carrega infoban para admin
  15. LoadBan(playerid) - Verifica se o jogador esta banido
  16.  
  17. */
  18. #include     a_samp
  19. #include     DOF2
  20.  
  21. #define      LOCALSALVABAN      "BrasilRolePlay/BanEx/%s.ini"
  22.  
  23.  
  24. new trocarnome[50], Frases[250];
  25.  
  26. stock AddBan(playerid, jogadorid, motivo[])
  27. {
  28.    format(trocarnome, sizeof(trocarnome), LOCALSALVABAN, DonPegaNome(jogadorid));
  29.    if(DOF2_FileExists(trocarnome))return true;
  30.    DOF2_CreateFile(trocarnome);
  31.    DOF2_SetString(trocarnome,"Nome",DonPegaNome(jogadorid));
  32.    DOF2_SetString(trocarnome,"Admin",DonPegaNome(playerid));
  33.    DOF2_SetString(trocarnome,"Motivo", motivo);
  34.    
  35.    format(Frases, sizeof Frases,"DSBan: %s baniu %s permanentemente.[Motivo: %s]",DonPegaNome(playerid), DonPegaNome(jogadorid), motivo);
  36.    SendClientMessageToAll(-1,Frases);
  37.    
  38.    
  39.    new Year,Month,Day;
  40.    getdate(Year,Month,Day);
  41.    
  42.    DOF2_SetInt(trocarnome,"BanDia", Day);//DOF2_GetInt(trocarnome,"BanDia")
  43.    DOF2_SetInt(trocarnome,"BanMes", Month);
  44.    DOF2_SetInt(trocarnome,"BanAno", Year);
  45.    DOF2_SetInt(trocarnome,"Tempo", "144");
  46.    DOF2_SaveFile();
  47.  
  48.    format(Frases, sizeof Frases,"        {FFFFFF}DS-Sistema Banimento\n\n\n\n\
  49.   Nick Banido: %s\nAdmin Baniu: %s\nMotivo: %s\n\nData do Ban: %d/%d/%d\n\n\
  50.   BAN ETERNO VLW TROUXA.",DOF2_GetString(trocarnome,"Nome"),DOF2_GetString(trocarnome,"Admin"),DOF2_GetString(trocarnome,"Motivo"), DOF2_GetInt(trocarnome,"BanDia"),DOF2_GetInt(trocarnome,"BanMes"), DOF2_GetInt(trocarnome,"BanAno"));
  51.    ShowPlayerDialog(jogadorid, 1000, DIALOG_STYLE_MSGBOX, "Sistema de Banimento", Frases, "Sair", #);
  52.    SetTimerEx("Carregando", 5000, false, "i", jogadorid);
  53.    return true;
  54. }
  55. stock AddBanEx(playerid, jogadorid, motivo[], tempo)//tempo = dias
  56. {
  57.    format(trocarnome, sizeof(trocarnome), LOCALSALVABAN, DonPegaNome(jogadorid));
  58.    if(DOF2_FileExists(trocarnome))return true;
  59.    DOF2_CreateFile(trocarnome);
  60.    DOF2_SetString(trocarnome,"Nome",DonPegaNome(jogadorid));
  61.    DOF2_SetString(trocarnome,"Admin",DonPegaNome(playerid));
  62.    DOF2_SetString(trocarnome,"Motivo", motivo);
  63.  
  64.  
  65.    format(Frases, sizeof Frases,"DSBan: %s baniu %s por %d dias.[Motivo: %s]",DonPegaNome(playerid), DonPegaNome(jogadorid), tempo, motivo);
  66.    SendClientMessageToAll(-1,Frases);
  67.  
  68.    new Year,Month,Day;
  69.    getdate(Year,Month,Day);
  70.  
  71.    DOF2_SetInt(trocarnome,"BanDia", Day);
  72.    DOF2_SetInt(trocarnome,"BanMes", Month);
  73.    DOF2_SetInt(trocarnome,"BanAno", Year);
  74.    DOF2_SetInt(trocarnome,"Tempo", (gettime() + (tempo * 24 * 60 * 60)));
  75.    DOF2_SaveFile();
  76.  
  77.    format(Frases, sizeof Frases,"{FFFFFF}DS-Sistema Banimento\n\n\n\n\
  78.   Nick Banido: %s\nAdmin Baniu: %s\nMotivo: %s\nData do Ban: %d/%d/%d\n\n\
  79.   Tempo para expirar banimento %d dias.",DOF2_GetString(trocarnome,"Nome"),DOF2_GetString(trocarnome,"Admin"),DOF2_GetString(trocarnome,"Motivo"), DOF2_GetInt(trocarnome,"BanDia"),DOF2_GetInt(trocarnome,"BanMes"), DOF2_GetInt(trocarnome,"BanAno"), tempo);
  80.    ShowPlayerDialog(jogadorid, 1000, DIALOG_STYLE_MSGBOX, "Sistema de Banimento", Frases, "Sair", #);
  81.    SetTimerEx("Carregando", 5000, false, "i", jogadorid);
  82.    return true;
  83. }
  84. stock LoadBanEx(playerid, name[])
  85. {
  86.    new DTemp;
  87.    DTemp = ((((DOF2_GetInt(trocarnome,"Tempo")- gettime()) / 60) / 60) / 24);
  88.    format(trocarnome, sizeof(trocarnome), LOCALSALVABAN, name);
  89.    if(DOF2_FileExists(trocarnome))return SendClientMessage(playerid, -1, "Erro jogador não esta banido.");
  90.    if(DTemp == 0)
  91.    {
  92.       format(Frases, sizeof Frases,"{FFFFFF}DS-Sistema Banimento\n\n\n\n\
  93.      Nick Banido: %s\nAdmin Baniu: %s\nMotivo: %s\nData do Ban: %d/%d/%d\n\n\
  94.      Tempo para expirar banimento e menos de 24 Horas.",DOF2_GetString(trocarnome,"Nome"),DOF2_GetString(trocarnome,"Admin"),DOF2_GetString(trocarnome,"Motivo"), DOF2_GetInt(trocarnome,"BanDia"),DOF2_GetInt(trocarnome,"BanMes"), DOF2_GetInt(trocarnome,"BanAno"));
  95.       ShowPlayerDialog(playerid, 1000, DIALOG_STYLE_MSGBOX, "Sistema de Banimento", Frases, "Sair", #);
  96.    }
  97.    else
  98.    {
  99.       format(Frases, sizeof Frases,"{FFFFFF}DS-Sistema Banimento\n\n\n\n\
  100.      Nick Banido: %s\nAdmin Baniu: %s\nMotivo: %s\nData do Ban: %d/%d/%d\n\n\
  101.      Tempo para expirar banimento %d dias.",DOF2_GetString(trocarnome,"Nome"),DOF2_GetString(trocarnome,"Admin"),DOF2_GetString(trocarnome,"Motivo"), DOF2_GetInt(trocarnome,"BanDia"),DOF2_GetInt(trocarnome,"BanMes"), DOF2_GetInt(trocarnome,"BanAno"), DTemp);
  102.       ShowPlayerDialog(playerid, 1000, DIALOG_STYLE_MSGBOX, "Sistema de Banimento", Frases, "Sair", #);
  103.    }
  104.    return true;
  105. }
  106. stock LoadBan(playerid)
  107. {
  108.    format(trocarnome, sizeof(trocarnome), LOCALSALVABAN, DonPegaNome(playerid));
  109.    if(!DOF2_FileExists(trocarnome))return true;
  110.    if(DOF2_GetInt(trocarnome,"Tempo") == 144)
  111.    {
  112.        format(Frases, sizeof Frases,"{FFFFFF}DS-Sistema Banimento\n\n\n\n\
  113.       Nick Banido: %s\nAdmin Baniu: %s\nMotivo: %s\nData do Ban: %d/%d/%d\n\n\
  114.       BAN ETERNO VLW TROUXA.",DOF2_GetString(trocarnome,"Nome"),DOF2_GetString(trocarnome,"Admin"),DOF2_GetString(trocarnome,"Motivo"), DOF2_GetInt(trocarnome,"BanDia"),DOF2_GetInt(trocarnome,"BanMes"), DOF2_GetInt(trocarnome,"BanAno"));
  115.        ShowPlayerDialog(playerid, 1000, DIALOG_STYLE_MSGBOX, "Sistema de Banimento", Frases, "Sair", #);
  116.        SetTimerEx("Carregando", 5000, false, "i", playerid);
  117.    }
  118.    else
  119.    {
  120.        new DTemp;
  121.        DTemp = ((((DOF2_GetInt(trocarnome,"Tempo")- gettime()) / 60) / 60) / 24);
  122.        if(gettime() >= DOF2_GetInt(trocarnome,"Tempo"))
  123.        {
  124.            SendClientMessage(playerid, -1,"Seu ban acabou");
  125.            DOF2_RemoveFile(trocarnome);
  126.        }
  127.        else if(gettime() <= DOF2_GetInt(trocarnome,"Tempo"))
  128.        {
  129.           if(DTemp == 0)
  130.           {
  131.              format(Frases, sizeof Frases,"{FFFFFF}DS-Sistema Banimento\n\n\n\n\
  132.             Nick Banido: %s\nAdmin Baniu: %s\nMotivo: %s\nData do Ban: %d/%d/%d\n\n\
  133.             Tempo para expirar banimento menos de 24 Horas.",DOF2_GetString(trocarnome,"Nome"),DOF2_GetString(trocarnome,"Admin"),DOF2_GetString(trocarnome,"Motivo"), DOF2_GetInt(trocarnome,"BanDia"),DOF2_GetInt(trocarnome,"BanMes"), DOF2_GetInt(trocarnome,"BanAno"));
  134.  
  135.           }
  136.           else
  137.           {
  138.              format(Frases, sizeof Frases,"{FFFFFF}DS-Sistema Banimento\n\n\n\n\
  139.             Nick Banido: %s\nAdmin Baniu: %s\nMotivo: %s\nData do Ban: %d/%d/%d\n\n\
  140.             Tempo para expirar banimento %d dias.",DOF2_GetString(trocarnome,"Nome"),DOF2_GetString(trocarnome,"Admin"),DOF2_GetString(trocarnome,"Motivo"), DOF2_GetInt(trocarnome,"BanDia"),DOF2_GetInt(trocarnome,"BanMes"), DOF2_GetInt(trocarnome,"BanAno"),DTemp);
  141.           }
  142.           ShowPlayerDialog(playerid, 1000, DIALOG_STYLE_MSGBOX, "Sistema de Banimento", Frases, "Sair", #);
  143.           SetTimerEx("Carregando", 5000, false, "i", playerid);
  144.        }
  145.    }
  146.    return true;
  147. }
  148. stock RemovedBan(playerid, name[])
  149. {
  150.    format(trocarnome, sizeof(trocarnome), LOCALSALVABAN, name);
  151.    if(!DOF2_FileExists(trocarnome))return SendClientMessage(playerid, -1, "Jogador não esta banido.");
  152.    DOF2_RemoveFile(trocarnome);
  153.    SendClientMessage(playerid, -1, "Jogador desbanido.");
  154.    return true;
  155. }
  156. forward Carregando(playerid);
  157. public Carregando(playerid) return Kick(playerid);
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement