Guest User

Untitled

a guest
Nov 13th, 2012
611
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 1.42 KB | None | 0 0
  1.  
  2. #include <a_samp>
  3. #include <sscanf>
  4. #include <zcmd>
  5. #pragma tabsize 0
  6. #define Sec(%0) (( %0 ) * ( 1000 ))
  7. #define Min(%0) (( %0 ) * ( 1000*60 ))
  8. #define Sati(%0) (( %0 ) * ( 1000*60*60 ))
  9. public OnFilterScriptInit()
  10. {
  11. Create3DTextLabel("Iznajmljivanje rolera \n /iznajmirolere",0xF5FF00FF,1836.5167,-1443.3130,13.5962,70,0,1);
  12. AddStaticPickup(1239, 1,1836.5167,-1443.3130,13.5962,0);
  13. print("\n--------------------------------------");
  14. print(" Sistem rolera by Shock");
  15. print("--------------------------------------\n");
  16. return 1;
  17. }
  18. new iznajmio[MAX_PLAYERS];
  19. CMD:iznajmirolere(playerid,params[])
  20. {
  21. new string[128],vreme;
  22. if(IsPlayerInRangeOfPoint(playerid,1,1836.5167,-1443.3130,13.5962))
  23. {
  24. if(sscanf(params,"i",vreme)) return SendClientMessage(playerid, -1,"Koriscenje:/iznajmirolere [vreme]");
  25. iznajmio[playerid] = 1;
  26. GivePlayerMoney(playerid,-1000);
  27. SetTimerEx("Neiznajmljuje", Min(vreme),0,"i",playerid);
  28. SetPlayerSkin(playerid, 99);
  29. format(string, sizeof(string),"Uspesno ste iznajmili rolere na %imin.",vreme);
  30. SendClientMessage(playerid,-1,string);
  31. }
  32. else
  33. {
  34. SendClientMessage(playerid,-1,"Niste na mestu iznajmljivanja rolera");
  35. }
  36. return 1;
  37. }
  38. forward Neiznajmljuje(playerid);
  39. public Neiznajmljuje(playerid)
  40. {
  41. iznajmio[playerid] = 0;
  42. SetPlayerSkin(playerid,0);
  43. SendClientMessage(playerid,-1,"Vreme trajanja iznajmljivanja rolera je proslo, izgubili ste opremu!");
  44. }
Advertisement
Add Comment
Please, Sign In to add comment