Advertisement
Poseidon2017

sistema de banimento

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