Advertisement
Kovacs_Bela

[FS] HSZ-Like

Aug 22nd, 2012
84
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
Pawn 1.47 KB | None | 0 0
  1. // [FS] HSZ- Like by danix99 aka Sodear, and [R]obo[T]...
  2. // 2012 08 22
  3. #include <a_samp>
  4. #include <zcmd>
  5. #include <sscanf2>
  6. #define FILTERSCRIPT
  7.  
  8. new likes[MAX_PLAYERS], settimer;
  9. forward timer();
  10. public OnFilterScriptInit() return settimer = SetTimer("timer",60*1000*5,true);
  11. public timer() return SendClientMessageToAll(-1,"Ha lájkolni szeretnél egy playert, /like [playerid/név]");
  12. public OnFilterScriptExit() return KillTimer(settimer);
  13.  
  14. CMD:likes(playerid,params[])
  15. {
  16.     new pid,strng[128];
  17.     if(sscanf(params,"i",pid)) return SendClientMessage(playerid,-1,"/likes [playerid / name]");
  18.     if(!IsPlayerConnected(pid)) return SendClientMessage(playerid,0xff0000ff,"ERROR: Invalid Playerid");
  19.     format(strng,128,"Lájkok: %d",likes[pid]);
  20.     SendClientMessage(playerid,0x0000ffff,strng);
  21.     return 1;
  22. }
  23. CMD:like(playerid,params[])
  24. {
  25.     new pid,n1[24],n2[24],str[128];
  26.     if(sscanf(params,"u",pid)) return SendClientMessage(playerid,-1,"/like [playerid / name]");
  27.     if(!IsPlayerConnected(pid)) return SendClientMessage(playerid,0xff0000ff,"ERROR: Invalid Playerid");
  28.     GetPlayerName(playerid,n1,24);
  29.     GetPlayerName(pid,n2,24);
  30.     format(str,128,"Lájkoltad %s hozzászólását!",n2);
  31.     SendClientMessage(playerid,0x00ff00ff,str);
  32.     format(str,128,"%s lájkolta a hozzászólásod!! Lájkjaid: %d",n1,likes[pid);
  33.     SendClientMessage(pid,0xff0000ff,str);
  34.     format(str,128,"%s lájkolta %s hozzászólását!",n1,n2);
  35.     SendClientMessageToAll(0xffbb00ff,str);
  36.     likes[pid]++;
  37.     return 1;
  38. }
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement