Advertisement
Guest User

Untitled

a guest
Jul 2nd, 2013
130
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 2.26 KB | None | 0 0
  1. prontera,162,173,4 script SafeZoneEvent 100,{
  2. if(.event==2)end;
  3. select("[Join]");
  4. if(!.event)initnpctimer;
  5. warp "ggpro",19,19;
  6. set .event,1;
  7. close;
  8. OnTimer5000:
  9. mapannounce "ggpro","[System]:Game Start",bc_map;
  10. sleep 3000;
  11. for(set .@i,1;.@i<=10;set .@i,.@i+1)
  12. callsub Start;
  13. mapannounce "ggpro","[System]:Game Over",bc_map;
  14. sleep 3000;
  15. callsub WarpNoSafe;
  16. end;
  17. Start:
  18. set .event,2;
  19. set .e_x,rand(1,35);
  20. set .e_y,rand(1,35);
  21. set .e_t,5;
  22. callsub WarpShow,.e_x,.e_y;
  23. while(sleep(1000))
  24. if(set(.e_t,.e_t-1)<0)
  25. break;
  26. else
  27. callsub ShowEffect;
  28. callsub WarpNoSafe,.e_x,.e_y;
  29. sleep 1000;
  30. return;
  31. OnInit:
  32. callsub WarpNoSafe;
  33. end;
  34. WarpNoSafe:
  35. if(!getarg(0,0)&&!getarg(1,0))
  36. {
  37. mapwarp "ggpro","prontera",155,166;
  38. set .event,0;
  39. set .e_x,0;
  40. set .e_y,0;
  41. set .e_t,0;
  42. return;
  43. }
  44. areawarp "ggpro",0,0,40,getarg(1)-1,"prontera",150,180;
  45. areawarp "ggpro",0,getarg(1)+3,40,40,"prontera",150,180;
  46. areawarp "ggpro",0,getarg(1),getarg(0)-1,getarg(1)+2,"prontera",150,180;
  47. areawarp "ggpro",getarg(0)+3,getarg(1),40,getarg(1)+2,"prontera",150,180;
  48. return;
  49. ShowEffect:
  50. for(set .@i,1; .@i<=8; set .@i,.@i+1)
  51. initnpctimer "SafeZoneEvent#Effect"+.@i;
  52. return;
  53. WarpShow:
  54. movenpc "SafeZoneEvent#Effect1",getarg(0),getarg(1);
  55. movenpc "SafeZoneEvent#Effect2",getarg(0)+1,getarg(1);
  56. movenpc "SafeZoneEvent#Effect3",getarg(0)+2,getarg(1);
  57. movenpc "SafeZoneEvent#Effect4",getarg(0),getarg(1)+1;
  58. movenpc "SafeZoneEvent#Effect5",getarg(0),getarg(1)+2;
  59. movenpc "SafeZoneEvent#Effect6",getarg(0)+1,getarg(1)+2;
  60. movenpc "SafeZoneEvent#Effect7",getarg(0)+2,getarg(1)+2;
  61. movenpc "SafeZoneEvent#Effect8",getarg(0)+2,getarg(1)+1;
  62. return;
  63. }
  64. ggpro,1,1,0 script SafeZoneEvent#Effect1 139,{
  65. OnTimer1:
  66. specialeffect 59;
  67. end;
  68. }
  69. ggpro,1,1,0 duplicate(SafeZoneEvent#Effect1) SafeZoneEvent#Effect2 139
  70. ggpro,1,1,0 duplicate(SafeZoneEvent#Effect1) SafeZoneEvent#Effect3 139
  71. ggpro,1,1,0 duplicate(SafeZoneEvent#Effect1) SafeZoneEvent#Effect4 139
  72. ggpro,1,1,0 duplicate(SafeZoneEvent#Effect1) SafeZoneEvent#Effect5 139
  73. ggpro,1,1,0 duplicate(SafeZoneEvent#Effect1) SafeZoneEvent#Effect6 139
  74. ggpro,1,1,0 duplicate(SafeZoneEvent#Effect1) SafeZoneEvent#Effect7 139
  75. ggpro,1,1,0 duplicate(SafeZoneEvent#Effect1) SafeZoneEvent#Effect8 139
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement