Advertisement
Guest User

Untitled

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