Other Gold room event

[stydianx]

this event opens every 2 hours.

NPC announces 3 min before

NPC appears and announces the event is opened.

Players who joins are announced and is warped to this map: new_3-1

when player enters, -50% hp, automatically gain 1.000 zeny per second,

looses 500 SP and looses 1000 HP per second

There are no minimum player count but maximum of 20 players

Entrance fee is 100k gold and 1 silver coin.

Players may enter with or without a party.

skills are allowed inside.

event last for 1hour.

Players may leave but can't go back in again until next event.

Usable items are not allowed inside.

there is an NPC inside the event which can warp players out of the map and back to the players save point.

10 marine spheres appears and explodes within 5 sec. (if possible)

[Valiente]

Try this, I haven't tested it yet.

- script freakingevent#disable -1,{
OnInit:
disablenpc "munakajata";
disablenpc "escapepad";
setarray .npc$[0],"[Escape Pad]","[bat Mobile]";
set hptimer,0;
set isfirstime,0;
end;
}
- script freakingevent -1,{
OnClock000:
OnClock0200:
OnClock0400:
OnClock0600:
OnClock0800:
OnClock1000:
OnClock1200:
OnClock1400:
OnClock1600:
OnClock1800:
OnClock2000:
OnClock2200:
goto startfreakinevent;
startfreakinevent:
announce "A freaking event will begin in 3 minutes!",0;
sleep2 180000;
initnpctimer;
set hptimer,1;
announce "Talk to me now if you wanna join! The event has already started!",0;
enablenpc "munakajata";
enablenpc "escapepod";
OnTimer3600000:
announce "Event is finish!",0;
set isfirstime,0;
disablenpc "munakajata";
disablenpc "escapepad";
set hptimer,0;
warp "prontera",151,181;
stopnpctimer;
end;
}
prontera,104,68,3 script munakajata 413,{
  mes .npc$[1];
  mes "Hello, What can I do for you?";
  next;
  menu "Join the freaking event",-,"Leave",leave;
  if(isfirstime == 0){
  set isfirstime,1;
  set Hp,Hp/2;
  warp new_3-1,100,100;
  initnpctimer;
  goto chicken;
}
  else {
  mes "You can only register once per instance of this event!";
  close;
leave:
 close;
}
Chicken:
  OnTimer1000:
  getmapxy(.mapname$,.mapx,.mapy,0,strcharinfo(0));
  if(.mapname == "new_3-1"){
  set Hp,Hp-1000;
  set Sp,Sp-500;
  set Zeny,Zeny+1000;
  }
  if(hptimer == 0)
  stopnpctimer;
}
new_3-1,104,68,3 script escapepad 413,{
  mes .npc$[0];
  mes "Yo, wanna go?";
  next;
  warp "prontera",151,181;
}

If you want it to become a no potion room, put the healing items' ids here. Too lazy to do it myself. lol

Edited November 19, 2012 by Emistry
Please use [CODEBOX] or Attachments for long contents.

[stydianx]

Try this, I haven't tested it yet.

- script freakingevent#disable -1,{
OnInit:
disablenpc "munakajata";
disablenpc "escapepad";
setarray .npc$[0],"[Escape Pad]","[bat Mobile]";
set hptimer,0;
set isfirstime,0;
end;
}
- script freakingevent -1,{
OnClock000:
OnClock0200:
OnClock0400:
OnClock0600:
OnClock0800:
OnClock1000:
OnClock1200:
OnClock1400:
OnClock1600:
OnClock1800:
OnClock2000:
OnClock2200:
goto startfreakinevent;
startfreakinevent:
announce "A freaking event will begin in 3 minutes!",0;
sleep2 180000;
initnpctimer;
set hptimer,1;
announce "Talk to me now if you wanna join! The event has already started!",0;
enablenpc "munakajata";
enablenpc "escapepod";
OnTimer3600000:
announce "Event is finish!",0;
set isfirstime,0;
disablenpc "munakajata";
disablenpc "escapepad";
set hptimer,0;
warp "prontera",151,181;
stopnpctimer;
end;
}
prontera,104,68,3 script munakajata 413,{
  mes .npc$[1];
  mes "Hello, What can I do for you?";
  next;
  menu "Join the freaking event",-,"Leave",leave;
  if(isfirstime == 0){
  set isfirstime,1;
  set Hp,Hp/2;
  warp new_3-1,100,100;
  initnpctimer;
  goto chicken;
}
  else {
  mes "You can only register once per instance of this event!";
  close;
leave:
 close;
}
Chicken:
  OnTimer1000:
  getmapxy(.mapname$,.mapx,.mapy,0,strcharinfo(0));
  if(.mapname == "new_3-1"){
  set Hp,Hp-1000;
  set Sp,Sp-500;
  set Zeny,Zeny+1000;
  }
  if(hptimer == 0)
  stopnpctimer;
}
new_3-1,104,68,3 script escapepad 413,{
  mes .npc$[0];
  mes "Yo, wanna go?";
  next;
  warp "prontera",151,181;
}

If you want it to become a no potion room, put the healing items' ids here. Too lazy to do it myself. lol

there's a lot of errors a debugs:

[Error]: npc_enable: Attempted to hide a non-existing NPC 'escapepad' (flag=0).

[status]: Loading NPC file: npc/re/warps/dungeons/ecl_dun.txt

[Error]: script_rid2sd: fatal error ! player not attached!

[status]: Loading NPC file: npc/re/warps/dungeons/iz_dun.txt

[Error]: script:set: no player attached for player variable 'hptimer'

[Debug]: Function: set (2 parameters):

[Debug]: Data: variable name='hptimer'

[Debug]: Data: number value=0

[Debug]: Source (NPC): freakingevent#disable (invisible/not on a map)

[Error]: script_rid2sd: fatal error ! player not attached!

[Debug]: Function: set (2 parameters):

[Error]: script:set: no player attached for player variable 'hptimer'

[Debug]: Data: variable name='hptimer'

[Debug]: Data: number value=1

[Debug]: Source (NPC): freakingevent (invisible/not on a map)

[Emistry]

set hptimer,0;
set isfirstime,0;

these are player based variable...need to attach a player then only the script can run...

and...during OnInit...if you didnt / cant attach a player.... it will spam error ...coz no player it currently attach to it....

[stydianx]

set hptimer,0;
set isfirstime,0;

these are player based variable...need to attach a player then only the script can run...

and...during OnInit...if you didnt / cant attach a player.... it will spam error ...coz no player it currently attach to it....

ohhh.. so the errors are just normal for this one?

but it's still working?!

okay cool

[Valiente]

Sorry about that, haven't got the chance to derive the script. Anyway, just move the said lines in the munakajata npc object.