TahirUcar

SA-MP /tokatla Komutu

Feb 4th, 2017
135
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
Pawn 1.31 KB | None | 0 0
  1. #include <a_samp>
  2. #include <zcmd>
  3. #include <sscanf2>
  4.  
  5. #if defined FILTERSCRIPT
  6.  
  7. public OnFilterScriptInit()
  8. {
  9.     print("\n--------------------------------------");
  10.     print(" /tokatla komutu");
  11.     print("--------------------------------------\n");
  12.     return 1;
  13. }
  14.  
  15. public OnFilterScriptExit()
  16. {
  17.     return 1;
  18. }
  19.  
  20. #else
  21. #endif
  22.  
  23. CMD:tokatla(playerid,params[])
  24. {
  25.     if(!IsPlayerAdmin(playerid)) return SendClientMessage(playerid,-1,"Hata: Komutu kullanabilmek için RCON girişi yapmalısınız.");
  26.     new id, yukseklik;
  27.     if(sscanf(params,"dd",id,yukseklik)) return SendClientMessage(playerid,-1,"Kullanım: /tokatla [ID] [Yükseklik]");
  28.     if(!IsPlayerConnected(id)) return SendClientMessage(playerid,-1,"Hata: Böyle bir ID oyunda yok.");
  29.     if(id == playerid) return SendClientMessage(playerid, -1, "Hata: Kendinizi tokatlayamazsınız.");
  30.     if(yukseklik > 50) return SendClientMessage(playerid, -1, "Hata: Girdiğiniz değer çok fazla, en fazla 50 değerini girebilirsiniz.");
  31.     new Float:x,Float:y,Float:z;
  32.     GetPlayerPos(id,x,y,z);
  33.     SetPlayerPos(id,x,y,z+yukseklik);
  34.     new a[256];
  35.     format(a, sizeof(a), "Admin %s, %s adlı oyuncuyu tokatladı.", GetName(playerid), GetName(id));
  36.     SendClientMessageToAll(-1, a);
  37.     return 1;
  38. }
  39.  
  40. stock GetName(playerid)
  41. {
  42.     new name[24];
  43.     GetPlayerName(playerid,name,24);
  44.     return name;
  45. }
Advertisement
Add Comment
Please, Sign In to add comment