API tools faq
paste
Advertisement
Guest User

meu script

a guest
Mar 22nd, 2015
348
0
Never
Add comment
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
C 18.89 KB | None | 0 0
raw download clone embed print report
  1. /*--------------------------------MAP FLAG DOS EVNEOTS---------------------------------*/
  2.                 /*----------------BOMB PORING--------------*/
  3. quiz_01 mapflag nowarpto
  4. quiz_01 mapflag noskill
  5. quiz_01 mapflag nowarp
  6. quiz_01 mapflag noteleport
  7. quiz_01 mapflag nomemo
  8. quiz_01 mapflag nosave  SavePoint
  9. quiz_01 mapflag nobranch
  10. quiz_01 mapflag noicewall
  11. quiz_01 mapflag nopenalty
  12. quiz_01 mapflag nobranch
  13. quiz_01 mapflag noexp
  14. quiz_01 mapflag noreturn
  15. quiz_01 mapflag pvp_noparty
  16. quiz_01 mapflag restricted  1
  17.                 /*----------------FIM BOMB PORING--------------*/
  18. /*--------------------------------FIM MAP FLAG DOS EVNEOTS---------------------------------*/
  19.  
  20. prontera,156,175,4  script  evento  954,{
  21.     OnWhisperGlobal:
  22. switch ( $eventocheck ){
  23.         case 0:
  24.                 mes "[Eventos EquilibriumRO]";
  25.                 mes "Desculpe,"+ strcharinfo(0) +", no momento nenhum evento está ativo.";
  26.                 next;
  27.                     mes "[Eventos EquilibriumRO]";
  28.                     mes "Os eventos ocorerrão aleatóriamente cada 1 hora, em breve teremos um novo evento.";
  29.                 close;
  30.         break;
  31.         case 1:
  32.             if (BaseLevel < 1) goto NO;         // Check Base Level Before Register
  33.             if (Class > 0) goto event;          // Check Class Before Register
  34.             if (Strcharinfo(3) == quiz_01) goto NO;
  35.             event:
  36.                 mes "[^0000FFRegistry^000000]";
  37.                 mes "You dare to participate in the Bomb Survival Event?";
  38.                 next;
  39.                 switch(select("Bring it on !! ","Sorry, give me some time..")) {
  40.                     case 1:
  41.                         sc_end SC_ALL;              // Remove all their Buffs before they enter
  42.                         sc_start SC_DECREASEAGI,1200000,10;
  43.                         percentheal 100,100;
  44.                         sc_start SC_STRIPSHIELD,1200000,5;      //if they wearing a shield then will get this negative buffs
  45.                         sc_start SC_STRIPWEAPON,1200000,5;      //if they wearing a shield then will get this negative buffs
  46.                         sc_start SC_STRIPARMOR,1200000,5;       //if they wearing a shield then will get this negative buffs
  47.                         sc_start SC_STRIPHELM,1200000,5;        //if they wearing a shield then will get this negative buffs
  48.                         set BombRewarded,0;             //reset the rewarded players for last events
  49.                         warp "quiz_01",42,369;
  50.                         end;
  51.                     break;
  52.                     case 2:
  53.                         mes "[^0000FFRegistry^000000]";
  54.                         mes "Come back when your are ready.";
  55.                         close;
  56.                     break;
  57.             NO:
  58.                 mes "[^0000FFRegistry^000000]";
  59.                 mes "You must not a Novice , or with base level lower or equal to 1.";
  60.                 close;
  61.                 }
  62.         break;
  63.         case 2:
  64.             mes "[Eventos EquilibriumRO]";
  65.             mes "O Bomb Poring está ativo mas infelizmente não podemos mais aceitar incrições";
  66.             next;
  67.             mes "[Eventos EquilibriumRO]";
  68.             mes"Em pouco tempo pouco tempo teremos um novo evento aguarde.";
  69.             close;
  70.         break;
  71.         case 3:
  72.             delwaitingroom;
  73.             waitingroom "Nenhum evento ativo CASE 3", 0;
  74.         break;
  75.         case 4:
  76.             delwaitingroom;
  77.             waitingroom "Nenhum evento ativo CASE 4", 0;
  78.         break;
  79.         case 5:
  80.             delwaitingroom;
  81.             waitingroom "Nenhum evento ativo CASE 5", 0;
  82.         break;
  83. }
  84.  
  85. OnMinute12:
  86.     announce "Estamos sorteando um evento que irá começar em 1 minuto.", 0;
  87. end;
  88.  
  89. OnMinute13:
  90.     if(gettime(1)==0){
  91.         if ($@ran == 1){   
  92.             set $eventocheck, 1;
  93.             goto Evento_Um;}
  94.         if ($@ran == 2){   
  95.             set $eventocheck, 1;
  96.             goto Evento_Dois;}
  97.         if ($@ran == 3){   
  98.             set $eventocheck, 1;
  99.             goto Evento_Tres;}
  100.         if ($@ran == 4){   
  101.             set $eventocheck, 1;
  102.             goto Evento_Quatro;}
  103.     }
  104. end;
  105.  
  106. //-------------------AQUI COMEÇAM OS EVENTOS---------------
  107.  
  108. Evento_Um:
  109.     delwaitingroom;
  110.     waitingroom "BombPoring está:[ABERTO]", 0;
  111.     set $eventocheck, 1;
  112.     initnpctimer;
  113.     announce "Mestre dos Eventos: o evento sorteado foi: Bomb Poring vai começar em 3 minutos se preparem.",0;
  114.     killmonsterall "quiz_01";
  115.     disablenpc "Reward NPC";
  116.     sleep2 30000;
  117.     announce "Mestre dos Eventos: Para entrar no evento mande pm para npc:evento você ainda tem 2 minutos e meio",0;
  118.     sleep2 30000;
  119.     announce "Mestre dos Eventos:Se não conseguir mandar pm fale comigo em Prontera [xxx;xxx] você tem 2 minutos",0;
  120.     sleep2 15000;
  121.     announce "Mestre dos Eventos:Estamos aceitando inscrições me mande pm ou fale comigo em Prontera",0;
  122.     sleep2 3000;
  123.     announce "Bomb : Location : Prontera [ 156 , 185 ] l! ",0;
  124.     announce "Bomb : At the Centre of Prontera ",0;
  125.     sleep2 22000;
  126.     announce "Bomb : Location : Prontera [ 156 , 185 ] l! ",0;
  127.     announce "Bomb : At the Centre of Prontera ",0;
  128.     sleep2 20000;
  129.     announce "Bomb Event will begin in 1 minute!",0;
  130.     sleep2 1000;
  131.     announce "Bomb : Location : Prontera [ 156 , 185 ] l! ",0;
  132.     announce "Bomb : At the Centre of Prontera ",0;
  133.     sleep2 15000;
  134.     mapannounce "quiz_01","In 30 seconds the Bomb Event will start !!",0;
  135.     sleep2 30000;
  136.     announce "Mestre dos Eventos:Incrições para o Bomb Poring encerrada!! o Evento irá começar.",0,0x00FF00;
  137.     set $eventocheck, 2;
  138.     delwaitingroom;
  139.     waitingroom "BombPoring está:[Em Andamento]", 0;
  140.     sleep2 3000;
  141.     mapannounce "quiz_01","Bomb Event will begin in ~5~",0;
  142.     sleep2 1000;
  143.     mapannounce "quiz_01","Bomb Event will begin in ~4~",0;
  144.     sleep2 1000;
  145.     mapannounce "quiz_01","Bomb Event will begin in ~3~",0;
  146.     sleep2 1000;
  147.     mapannounce "quiz_01","Bomb Event will begin in ~2~",0;
  148.     sleep2 1000;
  149.     mapannounce "quiz_01","Bomb Event will begin in ~1~",0;
  150.     sleep2 1000;
  151.     mapannounce "quiz_01","Estamos sorteando um evento que irá começar em 1 minuto.", 0;
  152.    
  153. //----------------------ROUND ONE ----------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------
  154.  
  155.  
  156.     mapannounce "quiz_01","Round 1 !! The BOMB timing has Started to count down !!",0;
  157.     sleep2 2000;
  158.     mapannounce "quiz_01",getmapusers("quiz_01") +" players has joined the event.",0,0x00FF00;
  159.     sleep2 3000;
  160.     announce "Alright !! Let's BLOW it up !! ",bc_blue|bc_map;
  161.     sleep2 3000;
  162.     areamonster "quiz_01", 23, 361, 38, 376, "Timed Bomb",1904,5;
  163.     areamonster "quiz_01", 45, 362, 60, 376, "Timed Bomb",1904,5;
  164.     sleep2 13000;
  165.     areamonster "quiz_01", 23, 361, 38, 376, "Timed Bomb",1904,5;
  166.     areamonster "quiz_01", 45, 362, 60, 376, "Timed Bomb",1904,5;
  167.     sleep2 10000;
  168.     mapannounce "quiz_01","5 Second to go until next Round  !! ^^ !!",0;
  169.     sleep2 1000;
  170.     mapannounce "quiz_01","4 Second to go until next Round  !! ^^ !!",0;
  171.     sleep2 1000;
  172.     mapannounce "quiz_01","3 Second to go until next Round  !! ^^ !!",0;
  173.     sleep2 1000;
  174.     mapannounce "quiz_01","2 Second to go until next Round  !! ^^ !!",0;
  175.     sleep2 1000;
  176.     mapannounce "quiz_01","1 Second to go until next Round  !! ^^ !!",0;
  177.     sleep2 1000;
  178.     mapannounce "quiz_01","Round 1 Finished !! Please wait for next round !! ^^ !!",0;
  179.     killmonsterall "quiz_01";
  180.     sleep2 1000;
  181.  
  182. //----------------------ROUND TWO----------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------
  183.  
  184.     if(getmapusers("quiz_01") < 1) goto L_Lose;
  185.     mapannounce "quiz_01","Round 2 !! What  ?? The BOMB seem to be increased  !!",0;
  186.     sleep2 2000;
  187.     mapannounce "quiz_01",getmapusers("quiz_01") +" players has survived to this round.",0,0x00FF00;
  188.     sleep2 3000;
  189.     announce "Good Job !! Gratz to reach this stage !! ",bc_blue|bc_map;
  190.     sleep2 3000;
  191.     areamonster "quiz_01", 23, 361, 38, 376, "Timed Bomb",1904,1,"bomblose::OnMobDied";
  192.     areamonster "quiz_01", 45, 362, 60, 376, "Timed Bomb",1904,1,"bomblose1::OnMobDied";
  193.     areamonster "quiz_01", 23, 361, 38, 376, "Timed Bomb",1904,5;
  194.     areamonster "quiz_01", 45, 362, 60, 376, "Timed Bomb",1904,5;
  195.     sleep2 13000;
  196.     areamonster "quiz_01", 23, 361, 38, 376, "Timed Bomb",1904,3;
  197.     areamonster "quiz_01", 45, 362, 60, 376, "Timed Bomb",1904,3;
  198.     sleep2 10000;
  199.     mapannounce "quiz_01","5 Second to go until next Round  !! ^^ !!",0;
  200.     sleep2 1000;
  201.     mapannounce "quiz_01","4 Second to go until next Round  !! ^^ !!",0;
  202.     sleep2 1000;
  203.     mapannounce "quiz_01","3 Second to go until next Round  !! ^^ !!",0;
  204.     sleep2 1000;
  205.     mapannounce "quiz_01","2 Second to go until next Round  !! ^^ !!",0;
  206.     sleep2 1000;
  207.     mapannounce "quiz_01","1 Second to go until next Round  !! ^^ !!",0;
  208.     sleep2 1000;
  209.     mapannounce "quiz_01","Round 2 Finished !! Please wait for next round !! ^^ !!",0;
  210.     killmonsterall "quiz_01";
  211.     sleep2 1000;
  212.  
  213. //----------------------ROUND THREE ----------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------
  214.  
  215.     if(getmapusers("quiz_01") < 1) goto L_Lose;
  216.     mapannounce "quiz_01","Round 3 !! What  ?? The BOMB increased again   !!",0;
  217.     sleep2 2000;
  218.     mapannounce "quiz_01",getmapusers("quiz_01") +" players has survived to this round.",0,0x00FF00;
  219.     sleep2 3000;
  220.     announce "Keep In On !! 2 More Stage After this Stage !! ~ ",bc_blue|bc_map;
  221.     sleep2 3000;
  222.     areamonster "quiz_01", 23, 361, 38, 376, "Timed Bomb",1904,7;
  223.     areamonster "quiz_01", 45, 362, 60, 376, "Timed Bomb",1904,7;
  224.     sleep2 5000;
  225.     areamonster "quiz_01", 23, 361, 38, 376, "Timed Bomb",1904,5;
  226.     areamonster "quiz_01", 45, 362, 60, 376, "Timed Bomb",1904,5;
  227.     sleep2 10000;
  228.     areamonster "quiz_01", 23, 361, 38, 376, "Timed Bomb",1904,2,"bomblose::OnMobDied";
  229.     areamonster "quiz_01", 45, 362, 60, 376, "Timed Bomb",1904,2,"bomblose1::OnMobDied";
  230.     sleep2 7000;
  231.     mapannounce "quiz_01","5 Second to go until next Round  !! ^^ !!",0;
  232.     sleep2 1000;
  233.     mapannounce "quiz_01","4 Second to go until next Round  !! ^^ !!",0;
  234.     sleep2 1000;
  235.     mapannounce "quiz_01","3 Second to go until next Round  !! ^^ !!",0;
  236.     sleep2 1000;
  237.     mapannounce "quiz_01","2 Second to go until next Round  !! ^^ !!",0;
  238.     sleep2 1000;
  239.     mapannounce "quiz_01","1 Second to go until next Round  !! ^^ !!",0;
  240.     sleep2 1000;
  241.     mapannounce "quiz_01","Round 3 Finished !! Please wait for next round !! ^^ !!",0;
  242.     killmonsterall "quiz_01";
  243.     sleep2 1000;
  244.  
  245.  
  246. //----------------------ROUND FOUR ----------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------
  247.  
  248.     if(getmapusers("quiz_01") < 1) goto L_Lose;
  249.     mapannounce "quiz_01","Round 4 !! OMG ?? The BOMB increasing into a huge number  !!",0;
  250.     sleep2 2000;
  251.     mapannounce "quiz_01",getmapusers("quiz_01") +" players has survived to this round.",0,0x00FF00;
  252.     sleep2 3000;
  253.     announce "Incredible !! They Survive till this stage ~ ",bc_blue|bc_map;
  254.     sleep2 3000;
  255.     areamonster "quiz_01", 23, 361, 38, 376, "Timed Bomb",1904,1,"bomblose::OnMobDied";
  256.     areamonster "quiz_01", 45, 362, 60, 376, "Timed Bomb",1904,1,"bomblose1::OnMobDied";
  257.     areamonster "quiz_01", 23, 361, 38, 376, "Timed Bomb",1904,5;
  258.     areamonster "quiz_01", 45, 362, 60, 376, "Timed Bomb",1904,5;
  259.     sleep2 15000;
  260.     areamonster "quiz_01", 23, 361, 38, 376, "Timed Bomb",1904,2,"bomblose1::OnMobDied";
  261.     areamonster "quiz_01", 45, 362, 60, 376, "Timed Bomb",1904,2,"bomblose::OnMobDied";
  262.     sleep2 10000;
  263.     mapannounce "quiz_01","5 Second to go until next Round  !! ^^ !!",0;
  264.     sleep2 1000;
  265.     mapannounce "quiz_01","4 Second to go until next Round  !! ^^ !!",0;
  266.     sleep2 1000;
  267.     mapannounce "quiz_01","3 Second to go until next Round  !! ^^ !!",0;
  268.     sleep2 1000;
  269.     mapannounce "quiz_01","2 Second to go until next Round  !! ^^ !!",0;
  270.     sleep2 1000;
  271.     mapannounce "quiz_01","1 Second to go until next Round  !! ^^ !!",0;
  272.     sleep2 1000;
  273.     mapannounce "quiz_01","Round 4 Finished !! Please wait for next round !! ^^ !!",0;
  274.     killmonsterall "quiz_01";
  275.     sleep2 1000;
  276.  
  277.  
  278. //----------------------ROUND FIVE  ( FINAL )-----------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------
  279.  
  280.     if(getmapusers("quiz_01") < 1) goto L_Lose;
  281.     mapannounce "quiz_01","Final Round !! What  ?? The BOMB cant be stopped now  !! Damn it !!~ ",0;
  282.     sleep2 2000;
  283.     mapannounce "quiz_01",getmapusers("quiz_01") +" players has survived to this round.",0,0x00FF00;
  284.     sleep2 3000;
  285.     announce "OMG !!! They come to the FINAL STAGE !!! Who Will Survive till the END !?? ~ ",bc_blue|bc_all;
  286.     sleep2 3000;
  287.     areamonster "quiz_01", 23, 361, 38, 376, "Timed Bomb",1904,1,"bomblose::OnMobDied";
  288.     areamonster "quiz_01", 45, 362, 60, 376, "Timed Bomb",1904,1,"bomblose1::OnMobDied";
  289.     areamonster "quiz_01", 23, 361, 38, 376, "Timed Bomb",1904,15;
  290.     areamonster "quiz_01", 45, 362, 60, 376, "Timed Bomb",1904,15;
  291.     sleep2 18000;
  292.     areamonster "quiz_01", 23, 361, 38, 376, "Timed Bomb",1904,2,"bomblose1::OnMobDied";
  293.     areamonster "quiz_01", 45, 362, 60, 376, "Timed Bomb",1904,2,"bomblose::OnMobDied";
  294.     sleep2 2000;
  295.     mapannounce "quiz_01","Survive this round to get Reward ^^ !!",0;
  296.     sleep2 10000;
  297.     mapannounce "quiz_01","30 Second to go !! ^^ !!",0;
  298.     sleep2 1500;
  299.     mapannounce "quiz_01","15 Second to go  !! ^^ !!",0;
  300.     sleep2 5000;
  301.     mapannounce "quiz_01","10 Second to go  !! ^^ !!",0;
  302.     sleep2 1000;
  303.     mapannounce "quiz_01","9 Second to go   !! ^^ !!",0;
  304.     sleep2 1000;
  305.     mapannounce "quiz_01","8 Second to go   !! ^^ !!",0;
  306.     sleep2 1000;
  307.     mapannounce "quiz_01","7 Second to go  !! ^^ !!",0;
  308.     sleep2 1000;
  309.     mapannounce "quiz_01","6 Second to go    !! ^^ !!",0;
  310.     sleep2 1000;
  311.     mapannounce "quiz_01","5 Second to go    !! ^^ !!",0;
  312.     sleep2 1000;
  313.     mapannounce "quiz_01","4 Second to go    !! ^^ !!",0;
  314.     sleep2 1000;
  315.     mapannounce "quiz_01","3 Second to go    !! ^^ !!",0;
  316.     sleep2 1000;
  317.     mapannounce "quiz_01","2 Second to go    !! ^^ !!",0;
  318.     sleep2 1000;
  319.     mapannounce "quiz_01","1 Second to go    !! ^^ !!",0;
  320.     sleep2 1000;
  321.     if(getmapusers("quiz_01") < 1) goto L_Lose;
  322.     mapannounce "quiz_01","Congratulation to all SURVIVALS xD  !! ^^ !!",0;
  323.     killmonsterall "quiz_01";
  324.     goto L_Win;
  325.     sleep2 1000;
  326.    
  327.     end;
  328.  
  329. //----------------------When All Players LOSE / WIN--------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------
  330. //------------------Will Auto Check Every Round Before Start----------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------
  331.  
  332. L_Lose:
  333.     if ( getmapusers("quiz_01") == 0 ){
  334.     killmonsterall "quiz_01";
  335.     announce "'Bomb Event has ended. No one survived.",0;
  336.     stopnpctimer;
  337.     end;
  338. }
  339. L_Win:
  340.     if ( getmapusers("quiz_01") > 0 ){
  341.     mapannounce "quiz_01",getmapusers("quiz_01") +" players has survived the event.",0,0x00FF00;
  342.     goto Premio_Auto_Event;
  343.     sleep2 3000;
  344.     mapannounce "quiz_01","You have survive and WIN, approach the Reward NPC please.",0;
  345.     donpcevent "EventStart::VencedorWin";
  346.     end;
  347. }
  348.     stopnpctimer;  
  349.     end;
  350. OnTimer10000:
  351.     if(getmapusers("quiz_01") == 1){
  352.         killmonsterall "quiz_01";
  353.         mapannounce "quiz_01","You have survive and WIN, approach the Reward NPC please.",0;
  354.         goto Premio_Auto_Event;
  355.         end;
  356.     }  
  357.  
  358.  
  359. //-----------When Player Died He Will Be Warp Back -------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------
  360. //-----------But Will Increase Amount Of Bomb Poring At The Same Time--------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------
  361.  
  362. OnPCDieEvent:
  363.     getmapxy .@mapnvz$,.@xnvz,.@ynvz,0;
  364.     if ( .@mapnvz$ == "quiz_01") {
  365.     sleep2 1;
  366.     warp "prontera",155,155;
  367.     mapannounce "quiz_01","What a disaster !! The Bomb will be multiplied when someone had died in the Event !! .",0;
  368.     areamonster "quiz_01", 23, 361, 38, 376, "Timed Bomb",1904,1,"bomblose::OnMobDied";
  369.     areamonster "quiz_01", 45, 362, 60, 376, "Timed Bomb",1904,1,"bomblose1::OnMobDied";
  370.     atcommand "@alive "+ strcharinfo(0);
  371.     dispbottom "What A Bad Luck...Join Us Again Next Time  ^^. ";
  372.     }
  373. end;
  374.  
  375. Evento_Dois:
  376.     announce "Estamos sorteando um evento que irá começar em 2 minuto.", 0;
  377.     delwaitingroom;
  378.     waitingroom "BombPoring está:[ABERTO]", 0;
  379.     goto Evento_Um;
  380. end;
  381.  
  382. Evento_Tres:
  383.     announce "Estamos sorteando um evento que irá começar em 3 minuto.", 0;
  384.     delwaitingroom;
  385.     waitingroom "BombPoring está:[ABERTO]", 0;
  386.     goto Evento_Um;
  387. end;
  388.  
  389. Evento_Quatro:
  390.     announce "Estamos sorteando um evento que irá começar em 4 minuto.", 0;
  391.     delwaitingroom;
  392.     waitingroom "BombPoring está:[ABERTO]", 0;
  393.     goto Evento_Um;
  394. end;
  395. //------------------AQUI TERMINAM OS EVENTOS--------------
  396.  
  397. //--------AQUI COMEÇA A PRÊMIAÇÂO DE CADA EVENTO----------
  398.  
  399. Premio_Auto_Event:
  400.     switch( $eventocheck ) {
  401.         case 1: //--------> Evento_Um
  402.             enablenpc "Reward NPC";
  403.         case 2:
  404.         case 3:
  405.         case 4:
  406.            
  407.     }
  408.  
  409.  
  410. //--------AQUI ACABA A PRÊMIAÇÂO DE CADA EVENTO----------
  411.  
  412. OnInit:
  413.     set $@ran, rand(1,4); //----------> Quantidade de eventos a serem sorteados, só mexer se souber o que está fazendo.
  414.     set $eventocheck, 0; //----------> Para checar qual evento que está ativo
  415.     set $@eventowinner, 0; //---------> Não sei ainda.
  416.     set $premioevento, 7539; //----------> Prêmio do ganhador.
  417.     set $qntpremioevento, rand(1,30); //----------> Quantidade de item que o vencedor irá receber.
  418.     disablenpc "Reward NPC";
  419.     delwaitingroom;
  420.     waitingroom "Nenhum evento ativo", 0;
  421.  
  422.  
  423. end;
  424.  
  425. }
  426.  
  427.  
  428. quiz_01,42,369,3    script  Reward NPC  72,{
  429.  
  430.     if(BombRewarded == 1) goto L_End;
  431.     mes "[Reward NPC]";
  432.     mes "Please tell me your name.";
  433.     next;
  434.     input .@name$;
  435.     if(.@name$ != strcharinfo(0)) {
  436.         mes "[Reward NPC]";
  437.         mes "Are you sure that is your name?";
  438.         close;
  439.     }
  440.     mes "[Reward NPC]";
  441.     mes "Congrats. You've won.";
  442.     close2;
  443.     announce "Bomb Event : We have Survivor !! "+.@name$+" has won the Bomb Event!",0;
  444.     set $rewarditem, 7539;               //Change This item id and amount to what ever you want. Default = Poring Coins [ItemID 7539]
  445.     set $rand, rand(1,30);                  // Randomly picks from 1 to 30.
  446.     getitem $rewarditem,$rand;
  447.     set BombRewarded,1;             //to ensure player cant have chances to spam rewards
  448.     warp "prontera",155,155;
  449.     sleep2 1500;
  450.     if ( getmapusers("quiz_01") < 1 ){
  451.     disablenpc "Reward NPC";
  452.     }
  453.     end;
  454. L_End:
  455.     mes "[Reward NPC]";
  456.     mes "You have obtained the Rewards already ";
  457.     mes " OR ";
  458.     mes " You joined this game without Register yourself at Registry NPC.";
  459.     mes "So, dont blame me for not giving you rewards .";
  460.     close;
  461.  
  462. }
  463.  
  464. -   script  bomblose    -1,{
  465.  
  466. OnMobDied:
  467.     areamonster "quiz_01", 23, 361, 38, 376, "Timed Bomb",1904,1,"bomblose::OnMobDied";
  468.     areamonster "quiz_01", 45, 362, 60, 376, "Timed Bomb",1904,1,"bomblose1::OnMobDied";
  469.     end;
  470. }
  471.  
  472. -   script  bomblose1       -1,{
  473. OnMobDied:
  474.     areamonster "quiz_01", 23, 361, 38, 376, "Timed Bomb",1904,1,"bomblose1::OnMobDied";
  475.     areamonster "quiz_01", 45, 362, 60, 376, "Timed Bomb",1904,1,"bomblose::OnMobDied";
  476.     end;
  477. }
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement
Public Pastes
Advertisement
We use cookies for various purposes including analytics. By continuing to use Pastebin, you agree to our use of cookies as described in the Cookies Policy.  OK, I Understand
Not a member of Pastebin yet?
Sign Up, it unlocks many cool features!