Guest User

FS timebomb

a guest
Sep 2nd, 2013
751
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 1.60 KB | None | 0 0
  1. #include <a_samp>
  2. #include <zcmd>
  3. #include <sscanf>
  4. //=============================================
  5. #define COLOR_YELLOW 0xFFFF00FF
  6. #define COLOR_WHITE 0xFFFFFFAA
  7. //=============================================
  8. new BombObject[MAX_PLAYERS];
  9. //=============================================
  10. public OnFilterScriptInit()
  11. {
  12. print("\n--------------------------------------");
  13. print("Timebomb FS by TonyII");
  14. print("--------------------------------------\n");
  15. return 1;
  16. }
  17.  
  18. public OnFilterScriptExit()
  19. {
  20. return 1;
  21. }
  22.  
  23. forward TimeBomb(Float:BX, Float:BY, Float:BZ, playerid);
  24. public TimeBomb(Float:BX, Float:BY, Float:BZ, playerid)
  25. {
  26. CreateExplosion(BX, BY, BZ, 7, 10);
  27. DestroyObject(BombObject[playerid]);
  28. return 1;
  29. }
  30.  
  31. forward TBObject(Float:BX, Float:BY, Float:BZ, playerid);
  32. public TBObject(Float:BX, Float:BY, Float:BZ, playerid)
  33. {
  34. BombObject[playerid] = CreateObject(1654, BX, BY, BZ-0.97, 0, 90, 4);
  35. SendClientMessage(playerid, COLOR_YELLOW,"You've successfully planted a timebomb!");
  36. return 1;
  37. }
  38. //=============================================
  39. CMD:plantbomb(playerid, params[])
  40. {
  41. new seconds = strval(params);
  42. if(sscanf(params, "d", seconds)) return SendClientMessage(playerid, COLOR_WHITE, "/plantbomb [seconds]");
  43. new Float:BX, Float:BY, Float:BZ;
  44. GetPlayerPos(playerid, BX, BY, BZ);
  45. SetTimerEx("TimeBomb", seconds*1000, false, "fff", BX, BY, BZ);
  46. SetTimerEx("TBObject", 3000, false, "fff", BX, BY, BZ);//Without it the animation will shake because of the object blocking it.
  47. ApplyAnimation(playerid,"BOMBER","BOM_Plant",4.0,0,0,0,0,0);
  48. return 1;
  49. }
Advertisement
Add Comment
Please, Sign In to add comment