Guest User

Untitled

a guest
Jan 6th, 2012
137
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
Pawn 1.23 KB | None | 0 0
  1. #include <a_samp>
  2. #include <zcmd>
  3. #include <sscanf2>
  4.  
  5. #define SCM SendClientMessage
  6. new
  7.      filestr[36]
  8. ;
  9.  
  10. public OnPlayerConnect(playerid) {
  11.        format(filestr,36,"/Banovi/%s.txt",GetNameEx(playerid));
  12.        if(fexist(filestr)) return SCM(playerid,-1,"Banned"),Kick(playerid);
  13.        return true;
  14. }
  15.  
  16. CMD:ban(playerid,params[])
  17. {
  18.      new
  19.            id,
  20.            File:file
  21.      ;
  22.      // Napravi provjeru za admin ako hoćeš
  23.      if(sscanf(params,"u",id)) return SCM(playerid,-1,"/ban <id>");
  24.      format(filestr,36,"/Banovi/%s.txt",GetNameEx(id));
  25.      if(fexist(filestr)) return SCM(playerid,-1,"Taj je igrač već pod banom");
  26.      file = fopen(filestr,io_append);
  27.      fclose(file);
  28.      Kick(id);
  29.      SCM(playerid,-1,"Igrač banan");
  30.      return true;
  31. }
  32.  
  33. CMD:unban(playerid,params[])
  34. {
  35.       new
  36.             name[20]
  37.       ;
  38.       // Napravi provjeru za admin ako hoćeš
  39.       if(sscanf(params,"s[20]",name)) return SCM(playerid,-1,"/unban <ime>");
  40.       format(filestr,36,"/Banovi/%s.txt",name);
  41.       if(!fexist(filestr)) return SCM(playerid,-1,"Igrač nije banan");
  42.       fremove(filestr);
  43.       SCM(playerid,-1,"Igrač unbanan");
  44.       return true;
  45. }
  46.  
  47. stock GetNameEx(playerid)
  48. {
  49.     static
  50.             name[MAX_PLAYER_NAME]
  51.     ;
  52.     GetPlayerName(playerid, name, sizeof (name));
  53.     return name;
  54. }
Advertisement
Add Comment
Please, Sign In to add comment