Advertisement
Guest User

lol

a guest
Oct 6th, 2010
324
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
Pawn 2.07 KB | None | 0 0
  1. #include a_samp
  2.  
  3. stock CriarArquivoLevels(playerid) //Cria o arquivo em Scriptfiles/Levels
  4. {
  5.     new formatted[40],Nomesz[25];
  6.     GetPlayerName(playerid,Nomesz,25);
  7.     format(formatted,40,"Levels/%s.subzero",Nomesz);
  8.     if(fexist(formatted)) return 0;
  9.     new File:SubZero=fopen(formatted,io_write);
  10.     fwrite(SubZero,"0");
  11.     fclose(SubZero);
  12.     return 1;
  13. }
  14. stock PegarLevel(playerid) //Retorna o level do player
  15. {
  16.     new Nomesz[25],strp[10],formatted[40];
  17.     GetPlayerName(playerid,Nomesz,25);
  18.     format(formatted,40,"Levels/%s.subzero",Nomesz);
  19.     if(fexist(formatted)) return 0;
  20.     new File:SubZero=fopen(formatted,io_read);
  21.     fread(SubZero,strp);
  22.     fclose(SubZero);
  23.     return strval(strp);
  24. }
  25. stock AddLevel(playerid) //Adiciona mais um level ao player
  26. {
  27.         new Nomesz[25],strp[10],formatted[40];
  28.     GetPlayerName(playerid,Nomesz,25);
  29.     format(formatted,40,"Levels/%s.subzero",Nomesz);
  30.     if(fexist(formatted)) return 0;
  31.     new File:SubZero=fopen(formatted,io_read);
  32.     fread(SubZero,strp);
  33.     fclose(SubZero);
  34.     new level=strval(strp);
  35.     new StakLine[10];
  36.     format(StakLine,10,"%d",level+1);
  37.     new File:SubZero2=fopen(formatted,io_write);
  38.     fwrite(SubZero2,StakLine);
  39.     fclose(SubZero2);
  40.     return 1;
  41. }
  42.  
  43. new Kills[MAX_PLAYERS]; //Guarda quantos o player matou
  44.  
  45. public OnPlayerDeath(playerid,killerid)
  46. {
  47.     Kills[killerid]++; //Adiciona mais um Kill
  48.     new Matou=Kills[killerid];
  49.     //Aqui, quantos kills e o level:
  50.     if(Matou==1&&PegarLevel(killerid)==0) { //Se ele matou 1 e está level 0
  51.         AddLevel(killerid);                 //Adiciona mais um level
  52.         Kills[killerid]=0;                  //Zera o contador de Kills
  53.     }
  54.     //Exemplo de outro:
  55.     if(Matou==10&&PegarLevel(killerid)==1) {//Se ele matou 10 e está level 1
  56.         AddLevel(killerid);                 //Adiciona mais um level
  57.         Kills[killerid]=0;                  //Zera o contador de Kills
  58.     }
  59.     //Fim
  60.     return 1;
  61. }
  62.  
  63. public OnPlayerConnect(playerid)
  64. {
  65.     CriarArquivoLevels(playerid); //cria o arquivo do player
  66.     return 1;
  67. }
  68.  
  69. public OnPlayerDisconnect(playerid)
  70. {
  71.     Kills[playerid]=0; //Ajusta os Kills para 0, para o próximo player
  72.     return 1;
  73. }
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement