Here is something I made but haven't finished yet. You may be able to use this unless you're using a command for people to join the event instead of a physical portal. Also provided is a list of events ill be doing on my shard for more event ideas. This will probably have some initial flaws because I haven't really fully started working on my events just here and there so some of this may need fixed.
Code:
[DIALOG d_start_event]
0,0
page 0
resizepic 42 27 9200 361 356
resizepic 55 39 9200 333 31
dtext 185 45 0480 Event Startup
button 67 118 2117 2118 1 0 1
dtext 88 116 0480 1v1 Supplied
button 67 144 2117 2118 1 0 2
dtext 88 142 0480 1v1 Regular
button 67 168 2117 2118 1 0 3
dtext 88 166 0480 1v1 Replacement
button 67 194 2117 2118 1 0 4
dtext 88 192 0480 2v2 Supplied
button 67 221 2117 2118 1 0 5
dtext 88 219 0480 2v2 Regular
button 67 247 2117 2118 1 0 6
dtext 88 245 0480 2v2 Replacement
button 67 272 2117 2118 1 0 7
dtext 88 270 0480 FFA Supplied
button 67 298 2117 2118 1 0 8
dtext 88 296 0480 FFA Regular
button 67 324 2117 2118 1 0 9
dtext 88 322 0480 Capture The Flag
button 233 118 2117 2118 1 0 10
dtext 254 116 0480 Color Wars
button 233 143 2117 2118 1 0 11
dtext 254 141 0480 Death by Dice
button 233 168 2117 2118 1 0 12
dtext 254 166 0480 Open Duels
button 233 193 2117 2118 1 0 13
dtext 254 191 0480 Mud Wrestling
[DIALOG d_start_event text]
Event Startup
1v1 Supplied
1v1 Regular
1v1 Replacement
2v2 Supplied
2v2 Regular
2v2 Replacement
FFA Supplied
FFA Regular
Capture The Flag
Color Wars
Death by Dice
Open Duels
Mud Wrestling
[DIALOG d_start_event button]
ON=1
if <VAR.EVENTSTATUS> == 1
src.sysmessage An event is already in progress you cant start another event.
else
start_1v1_supply
endif
ON=2
if <VAR.EVENTSTATUS> == 1
src.sysmessage An event is already in progress you cant start another event.
else
start_1v1_regular
endif
ON=3
if <VAR.EVENTSTATUS> == 1
src.sysmessage An event is already in progress you cant start another event.
else
start_1v1_replacement
endif
ON=4
if <VAR.EVENTSTATUS> == 1
src.sysmessage An event is already in progress you cant start another event.
else
start_2v2_supply
endif
ON=5
if <VAR.EVENTSTATUS> == 1
src.sysmessage An event is already in progress you cant start another event.
else
start_2v2_regular
endif
ON=6
if <VAR.EVENTSTATUS> == 1
src.sysmessage An event is already in progress you cant start another event.
else
start_2v2_replacement
endif
ON=7
if <VAR.EVENTSTATUS> == 1
src.sysmessage An event is already in progress you cant start another event.
else
start_ffa_supply
endif
ON=8
if <VAR.EVENTSTATUS> == 1
src.sysmessage An event is already in progress you cant start another event.
else
start_ffa_regular
endif
ON=9
if <VAR.EVENTSTATUS> == 1
src.sysmessage An event is already in progress you cant start another event.
else
start_ctf
endif
ON=10
if <VAR.EVENTSTATUS> == 1
src.sysmessage An event is already in progress you cant start another event.
else
start_colorwars
endif
ON=11
if <VAR.EVENTSTATUS> == 1
src.sysmessage An event is already in progress you cant start another event.
else
start_deathbydice
endif
ON=12
if <VAR.EVENTSTATUS> == 1
src.sysmessage An event is already in progress you cant start another event.
else
start_open_duels
endif
ON=13
if <VAR.EVENTSTATUS> == 1
src.sysmessage An event is already in progress you cant start another event.
else
start_mud_wrestling
endif
[EOF]
///
[COMMENT Instructions]
Set up:
This script will enable you to start an event and place a moongate at the front of every bank. The system will spam for 10 minutes automatically and then close the portal
The Portal will take you to the pre-post duel pit area. All portals are the same except the britain bank portal which is the spammer portal and sends out the message
to clients.
.startevent
[DIALOG D_ENTER_DUEL_PITS]
270,170
SRC.CLOSEALLDIALOGS
PAGE 0
resizepic 20 0 5054 420 280
gumppictiled 29 10 400 20 2624
checkertrans 29 10 400 20
xmfhtmlgumpcolor 29 10 120 25 1062051 0 0 30849
gumppictiled 29 40 400 200 2624
checkertrans 29 40 400 200
IF (STRCMPI(<SRC.REGION.NAME>,Doom Gauntlet))
xmfhtmlgumpcolor 29 40 400 200 1062049 0 1 31393
ELSE
xmfhtmlgumpcolor 29 40 400 200 1062109 0 1 31393
ENDIF
gumppictiled 29 250 400 20 2624
checkertrans 29 250 400 20
button 29 250 4005 4006 1 0 1
xmfhtmlgumpcolor 64 250 70 25 1011011 0 0 32767
button 230 250 4005 4006 1 0 0
xmfhtmlgumpcolor 265 250 70 25 1060051 0 0 32767
[DIALOG D_ENTER_DUEL_PITS BUTTON]
ON=1
IF (<DISTANCE>>2)
REF1=<UID>
IF (!(<SRC.ISGM>))
FORCHARS 5
IF (<ISMYPET>)
GO Duel Pits
ENDIF
ENDFOR
ENDIF
SRC.GO Duel Pits
ENDIF
[PLEVEL 4]
.startevent
[FUNCTION startevent]
SRC.DIALOG D_START_EVENT
[DEFNAME portal_coord]
britain_bank 1431,1695,0,0
minoc_bank 2504,562,0,0
moonglow_bank 4472,1178,0,0
cove_bank 2234,1198,0,0
jhelom_bank 1324,3780,0,0
skara_bank 577,2131,0,0
trinsic_bank 1822,2825,0,0
wind_bank 5222,185,5,0
yew_bank 636,859,0,0
del_bank 5270,3991,37,0
vesp_bank 2899,673,0,0
occlo_bank 3690,2522,0,0
bucs_bank 2723,2188,0,0
serp_bank 2893,3475,15,0
papua_bank 5674,3142,12,0
//add Magincia Later
[PLEVEL 4]
.start_1v1_supply
[FUNCTION start_1v1_supply]
SERV.NEWITEM i_event_portal_spam_1v1_supply
NEW.P <def.britain_bank>
SERV.NEWITEM i_event_portal_1v1_supply
NEW.P <def.minoc_bank>
SERV.NEWITEM i_event_portal_1v1_supply
NEW.P <def.moonglow_bank>
SERV.NEWITEM i_event_portal_1v1_supply
NEW.P <def.cove_bank>
SERV.NEWITEM i_event_portal_1v1_supply
NEW.P <def.jhelom_bank>
SERV.NEWITEM i_event_portal_1v1_supply
NEW.P <def.skara_brae>
SERV.NEWITEM i_event_portal_1v1_supply
NEW.P <def.trinsic_bank>
SERV.NEWITEM i_event_portal_1v1_supply
NEW.P <def.wind_bank>
SERV.NEWITEM i_event_portal_1v1_supply
NEW.P <def.yew_bank>
SERV.NEWITEM i_event_portal_1v1_supply
NEW.P <def.del_bank>
SERV.NEWITEM i_event_portal_1v1_supply
NEW.P <def.vesp_bank>
SERV.NEWITEM i_event_portal_1v1_supply
NEW.P <def.occlo_bank>
SERV.NEWITEM i_event_portal_1v1_supply
NEW.P <def.bucs_bank>
SERV.NEWITEM i_event_portal_1v1_supply
NEW.P <def.serp_bank>
SERV.NEWITEM i_event_portal_1v1_supply
NEW.P <def.papua_bank>
[ITEMDEF i_event_portal_spam_1v1_supply]
ID=0F6C
NAME=1v1 Auto Supply Gate
CATEGORY=Custom Event System
SUBSECTION=Event Portals
DESCRIPTION=Spamming Portal
on=@create
COLOR=0485
ATTR=08012
TIMER=1
ON=@STEP
IF (<SRC.ACCOUNT.PLEVEL>>1)
SRC.GO Duel Pits
RETURN 1
ELSE
SRC.SDIALOG D_ENTER_DUEL_PITS
RETURN 1
ON=@TIMER
IF (<MOREX>=1)
SERV.ALLCLIENTS sysmessage @0482,0,1 1v1 Auto Supply in 10 Minutes!
SERV.ALLCLIENTS sysmessage @0482,0,1 To join the event visit any bank and pass through the event portal.
VAR.EVENTSTATUS=1
MOREX=2
TIMER=1
RETURN 1
ELSEIF (<MOREX>=120)
SERV.ALLCLIENTS sysmessage @0482,0,1 1v1 Auto Supply in 8 Minutes!
SERV.ALLCLIENTS sysmessage @0482,0,1 To join the event visit any bank and pass through the event portal.
MOREX=121
TIMER=1
RETURN 1
ELSEIF (<MOREX>=300)
SERV.ALLCLIENTS sysmessage @0482,0,1 1v1 Auto Supply in 5 Minutes!
SERV.ALLCLIENTS sysmessage @0482,0,1 To join the event visit any bank and pass through the event portal.
MOREX=301
TIMER=1
RETURN 1
ELSEIF (<MOREX>=480)
SERV.ALLCLIENTS sysmessage @0482,0,1 1v1 Auto Supply in 2 Minutes!
SERV.ALLCLIENTS sysmessage @0482,0,1 To join the event visit any bank and pass through the event portal.
MOREX=481
TIMER=1
RETURN 1
ELSEIF (<MOREX>=600)
SERV.ALLCLIENTS sysmessage @0482,0,1 1v1 Auto Supply *CLOSED*
REMOVE
VAR.EVENTSTATUS=0 //Add this to the end of every event script end.
RETURN 1
ELSE
TIMER=1
MOREX=<MOREX>+1
RETURN 1
ENDIF
[ITEMDEF i_event_portal_1v1_supply]
ID=0F6C
NAME=1v1 Auto Supply Gate
CATEGORY=Custom Event System
SUBSECTION=Event Portals
DESCRIPTION=1v1 Auto Supply Portal
on=@create
COLOR=0485
ATTR=08012
TIMER=1
ON=@STEP
IF (<SRC.ACCOUNT.PLEVEL>>1)
SRC.GO Duel Pits
RETURN 1
ELSE
SRC.SDIALOG D_ENTER_DUEL_PITS
RETURN 1
ON=@TIMER
IF (<MOREX>=1)
MOREX=2
TIMER=1
RETURN 1
ELSEIF (<MOREX>=120)
MOREX=121
TIMER=1
RETURN 1
ELSEIF (<MOREX>=300)
MOREX=301
TIMER=1
RETURN 1
ELSEIF (<MOREX>=480)
MOREX=481
RETURN 1
ELSEIF (<MOREX>=600)
REMOVE
RETURN 1
ELSE
TIMER=1
MOREX=<MOREX>+1
RETURN 1
ENDIF
//
[PLEVEL 4]
.start_1v1_regular
[FUNCTION start_1v1_regular]
SERV.NEWITEM i_event_portal_spam_1v1_regular
NEW.P <def.britain_bank>
SERV.NEWITEM i_event_portal_1v1_regular
NEW.P <def.minoc_bank>
SERV.NEWITEM i_event_portal_1v1_regular
NEW.P <def.moonglow_bank>
SERV.NEWITEM i_event_portal_1v1_regular
NEW.P <def.cove_bank>
SERV.NEWITEM i_event_portal_1v1_regular
NEW.P <def.jhelom_bank>
SERV.NEWITEM i_event_portal_1v1_regular
NEW.P <def.skara_brae>
SERV.NEWITEM i_event_portal_1v1_regular
NEW.P <def.trinsic_bank>
SERV.NEWITEM i_event_portal_1v1_regular
NEW.P <def.wind_bank>
SERV.NEWITEM i_event_portal_1v1_regular
NEW.P <def.yew_bank>
SERV.NEWITEM i_event_portal_1v1_regular
NEW.P <def.del_bank>
SERV.NEWITEM i_event_portal_1v1_regular
NEW.P <def.vesp_bank>
SERV.NEWITEM i_event_portal_1v1_regular
NEW.P <def.occlo_bank>
SERV.NEWITEM i_event_portal_1v1_regular
NEW.P <def.bucs_bank>
SERV.NEWITEM i_event_portal_1v1_regular
NEW.P <def.serp_bank>
SERV.NEWITEM i_event_portal_1v1_regular
NEW.P <def.papua_bank>
[ITEMDEF i_event_portal_spam_1v1_regular]
ID=0F6C
NAME=1v1 Regular Gate
CATEGORY=Custom Event System
SUBSECTION=Event Portals
DESCRIPTION=1v1 Regular Portal Spam
on=@create
COLOR=0485
ATTR=08012
TIMER=1
ON=@STEP
IF (<SRC.ACCOUNT.PLEVEL>>1)
SRC.GO Duel Pits
RETURN 1
ELSE
SRC.SDIALOG D_ENTER_DUEL_PITS
RETURN 1
ON=@TIMER
IF (<MOREX>=1)
SERV.ALLCLIENTS sysmessage @0482,0,1 1v1 Regular in 10 Minutes!
SERV.ALLCLIENTS sysmessage @0482,0,1 To join the event visit any bank and pass through the event portal.
VAR.EVENTSTATUS=1
MOREX=2
TIMER=1
RETURN 1
ELSEIF (<MOREX>=120)
SERV.ALLCLIENTS sysmessage @0482,0,1 1v1 Regular in 8 Minutes!
SERV.ALLCLIENTS sysmessage @0482,0,1 To join the event visit any bank and pass through the event portal.
MOREX=121
TIMER=1
RETURN 1
ELSEIF (<MOREX>=300)
SERV.ALLCLIENTS sysmessage @0482,0,1 1v1 Regular in 5 Minutes!
SERV.ALLCLIENTS sysmessage @0482,0,1 To join the event visit any bank and pass through the event portal.
MOREX=301
TIMER=1
RETURN 1
ELSEIF (<MOREX>=480)
SERV.ALLCLIENTS sysmessage @0482,0,1 1v1 Regular in 2 Minutes!
SERV.ALLCLIENTS sysmessage @0482,0,1 To join the event visit any bank and pass through the event portal.
MOREX=481
TIMER=1
RETURN 1
ELSEIF (<MOREX>=600)
SERV.ALLCLIENTS sysmessage @0482,0,1 1v1 Regular *CLOSED*
REMOVE
VAR.EVENTSTATUS=0 //Add this to the end of every event script end.
RETURN 1
ELSE
TIMER=1
MOREX=<MOREX>+1
RETURN 1
ENDIF
[ITEMDEF i_event_portal_1v1_regular]
ID=0F6C
NAME=1v1 Regular Gate
CATEGORY=Custom Event System
SUBSECTION=Event Portals
DESCRIPTION=1v1 Regular Portal
on=@create
COLOR=0485
ATTR=08012
TIMER=1
ON=@STEP
IF (<SRC.ACCOUNT.PLEVEL>>1)
SRC.GO Duel Pits
RETURN 1
ELSE
SRC.SDIALOG D_ENTER_DUEL_PITS
RETURN 1
ON=@TIMER
IF (<MOREX>=1)
MOREX=2
TIMER=1
RETURN 1
ELSEIF (<MOREX>=120)
MOREX=121
TIMER=1
RETURN 1
ELSEIF (<MOREX>=300)
MOREX=301
TIMER=1
RETURN 1
ELSEIF (<MOREX>=480)
MOREX=481
RETURN 1
ELSEIF (<MOREX>=600)
REMOVE
RETURN 1
ELSE
TIMER=1
MOREX=<MOREX>+1
RETURN 1
ENDIF
//
[PLEVEL 4]
.start_1v1_replacement
[FUNCTION start_1v1_Replacement]
SERV.NEWITEM i_event_portal_spam_1v1_Replacement
NEW.P <def.britain_bank>
SERV.NEWITEM i_event_portal_1v1_Replacement
NEW.P <def.minoc_bank>
SERV.NEWITEM i_event_portal_1v1_Replacement
NEW.P <def.moonglow_bank>
SERV.NEWITEM i_event_portal_1v1_Replacement
NEW.P <def.cove_bank>
SERV.NEWITEM i_event_portal_1v1_Replacement
NEW.P <def.jhelom_bank>
SERV.NEWITEM i_event_portal_1v1_Replacement
NEW.P <def.skara_brae>
SERV.NEWITEM i_event_portal_1v1_Replacement
NEW.P <def.trinsic_bank>
SERV.NEWITEM i_event_portal_1v1_Replacement
NEW.P <def.wind_bank>
SERV.NEWITEM i_event_portal_1v1_Replacement
NEW.P <def.yew_bank>
SERV.NEWITEM i_event_portal_1v1_Replacement
NEW.P <def.del_bank>
SERV.NEWITEM i_event_portal_1v1_Replacement
NEW.P <def.vesp_bank>
SERV.NEWITEM i_event_portal_1v1_Replacement
NEW.P <def.occlo_bank>
SERV.NEWITEM i_event_portal_1v1_Replacement
NEW.P <def.bucs_bank>
SERV.NEWITEM i_event_portal_1v1_Replacement
NEW.P <def.serp_bank>
SERV.NEWITEM i_event_portal_1v1_Replacement
NEW.P <def.papua_bank>
[ITEMDEF i_event_portal_spam_1v1_Replacement]
ID=0F6C
NAME=1v1 Replacement Gate
CATEGORY=Custom Event System
SUBSECTION=Event Portals
DESCRIPTION=1v1 Replacement Portal Spam
on=@create
COLOR=0485
ATTR=08012
TIMER=1
ON=@STEP
IF (<SRC.ACCOUNT.PLEVEL>>1)
SRC.GO Duel Pits
RETURN 1
ELSE
SRC.SDIALOG D_ENTER_DUEL_PITS
RETURN 1
ON=@TIMER
IF (<MOREX>=1)
SERV.ALLCLIENTS sysmessage @0482,0,1 1v1 Replacement in 10 Minutes!
SERV.ALLCLIENTS sysmessage @0482,0,1 To join the event visit any bank and pass through the event portal.
VAR.EVENTSTATUS=1
MOREX=2
TIMER=1
RETURN 1
ELSEIF (<MOREX>=120)
SERV.ALLCLIENTS sysmessage @0482,0,1 1v1 Replacement in 8 Minutes!
SERV.ALLCLIENTS sysmessage @0482,0,1 To join the event visit any bank and pass through the event portal.
MOREX=121
TIMER=1
RETURN 1
ELSEIF (<MOREX>=300)
SERV.ALLCLIENTS sysmessage @0482,0,1 1v1 Replacement in 5 Minutes!
SERV.ALLCLIENTS sysmessage @0482,0,1 To join the event visit any bank and pass through the event portal.
MOREX=301
TIMER=1
RETURN 1
ELSEIF (<MOREX>=480)
SERV.ALLCLIENTS sysmessage @0482,0,1 1v1 Replacement in 2 Minutes!
SERV.ALLCLIENTS sysmessage @0482,0,1 To join the event visit any bank and pass through the event portal.
MOREX=481
TIMER=1
RETURN 1
ELSEIF (<MOREX>=600)
SERV.ALLCLIENTS sysmessage @0482,0,1 1v1 Replacement *CLOSED*
REMOVE
VAR.EVENTSTATUS=0 //Add this to the end of every event script end.
RETURN 1
ELSE
TIMER=1
MOREX=<MOREX>+1
RETURN 1
ENDIF
[ITEMDEF i_event_portal_1v1_Replacement]
ID=0F6C
NAME=1v1 Replacement Gate
CATEGORY=Custom Event System
SUBSECTION=Event Portals
DESCRIPTION=1v1 Replacement Portal
on=@create
COLOR=0485
ATTR=08012
TIMER=1
ON=@STEP
IF (<SRC.ACCOUNT.PLEVEL>>1)
SRC.GO Duel Pits
RETURN 1
ELSE
SRC.SDIALOG D_ENTER_DUEL_PITS
RETURN 1
ON=@TIMER
IF (<MOREX>=1)
MOREX=2
TIMER=1
RETURN 1
ELSEIF (<MOREX>=120)
MOREX=121
TIMER=1
RETURN 1
ELSEIF (<MOREX>=300)
MOREX=301
TIMER=1
RETURN 1
ELSEIF (<MOREX>=480)
MOREX=481
RETURN 1
ELSEIF (<MOREX>=600)
REMOVE
RETURN 1
ELSE
TIMER=1
MOREX=<MOREX>+1
RETURN 1
ENDIF
//
[PLEVEL 4]
.start_2v2_supply
[FUNCTION start_2v2_supply]
SERV.NEWITEM i_event_portal_spam_2v2_supply
NEW.P <def.britain_bank>
SERV.NEWITEM i_event_portal_2v2_supply
NEW.P <def.minoc_bank>
SERV.NEWITEM i_event_portal_2v2_supply
NEW.P <def.moonglow_bank>
SERV.NEWITEM i_event_portal_2v2_supply
NEW.P <def.cove_bank>
SERV.NEWITEM i_event_portal_2v2_supply
NEW.P <def.jhelom_bank>
SERV.NEWITEM i_event_portal_2v2_supply
NEW.P <def.skara_brae>
SERV.NEWITEM i_event_portal_2v2_supply
NEW.P <def.trinsic_bank>
SERV.NEWITEM i_event_portal_2v2_supply
NEW.P <def.wind_bank>
SERV.NEWITEM i_event_portal_2v2_supply
NEW.P <def.yew_bank>
SERV.NEWITEM i_event_portal_2v2_supply
NEW.P <def.del_bank>
SERV.NEWITEM i_event_portal_2v2_supply
NEW.P <def.vesp_bank>
SERV.NEWITEM i_event_portal_2v2_supply
NEW.P <def.occlo_bank>
SERV.NEWITEM i_event_portal_2v2_supply
NEW.P <def.bucs_bank>
SERV.NEWITEM i_event_portal_2v2_supply
NEW.P <def.serp_bank>
SERV.NEWITEM i_event_portal_2v2_supply
NEW.P <def.papua_bank>
[ITEMDEF i_event_portal_spam_2v2_supply]
ID=0F6C
NAME=2v2 Auto Supply Gate
CATEGORY=Custom Event System
SUBSECTION=Event Portals
DESCRIPTION=Spamming Portal
on=@create
COLOR=0485
ATTR=08012
TIMER=1
ON=@STEP
IF (<SRC.ACCOUNT.PLEVEL>>1)
SRC.GO Duel Pits
RETURN 1
ELSE
SRC.SDIALOG D_ENTER_DUEL_PITS
RETURN 1
ON=@TIMER
IF (<MOREX>=1)
SERV.ALLCLIENTS sysmessage @0482,0,1 2v2 Auto Supply in 10 Minutes!
SERV.ALLCLIENTS sysmessage @0482,0,1 To join the event visit any bank and pass through the event portal.
VAR.EVENTSTATUS=1
MOREX=2
TIMER=1
RETURN 1
ELSEIF (<MOREX>=120)
SERV.ALLCLIENTS sysmessage @0482,0,1 2v2 Auto Supply in 8 Minutes!
SERV.ALLCLIENTS sysmessage @0482,0,1 To join the event visit any bank and pass through the event portal.
MOREX=121
TIMER=1
RETURN 1
ELSEIF (<MOREX>=300)
SERV.ALLCLIENTS sysmessage @0482,0,1 2v2 Auto Supply in 5 Minutes!
SERV.ALLCLIENTS sysmessage @0482,0,1 To join the event visit any bank and pass through the event portal.
MOREX=301
TIMER=1
RETURN 1
ELSEIF (<MOREX>=480)
SERV.ALLCLIENTS sysmessage @0482,0,1 2v2 Auto Supply in 2 Minutes!
SERV.ALLCLIENTS sysmessage @0482,0,1 To join the event visit any bank and pass through the event portal.
MOREX=481
TIMER=1
RETURN 1
ELSEIF (<MOREX>=600)
SERV.ALLCLIENTS sysmessage @0482,0,1 2v2 Auto Supply *CLOSED*
REMOVE
VAR.EVENTSTATUS=0 //Add this to the end of every event script end.
RETURN 1
ELSE
TIMER=1
MOREX=<MOREX>+1
RETURN 1
ENDIF
[ITEMDEF i_event_portal_2v2_supply]
ID=0F6C
NAME=2v2 Auto Supply Gate
CATEGORY=Custom Event System
SUBSECTION=Event Portals
DESCRIPTION=2v2 Auto Supply Portal
on=@create
COLOR=0485
ATTR=08012
TIMER=1
ON=@STEP
IF (<SRC.ACCOUNT.PLEVEL>>1)
SRC.GO Duel Pits
RETURN 1
ELSE
SRC.SDIALOG D_ENTER_DUEL_PITS
RETURN 1
ON=@TIMER
IF (<MOREX>=1)
MOREX=2
TIMER=1
RETURN 1
ELSEIF (<MOREX>=120)
MOREX=121
TIMER=1
RETURN 1
ELSEIF (<MOREX>=300)
MOREX=301
TIMER=1
RETURN 1
ELSEIF (<MOREX>=480)
MOREX=481
RETURN 1
ELSEIF (<MOREX>=600)
REMOVE
RETURN 1
ELSE
TIMER=1
MOREX=<MOREX>+1
RETURN 1
ENDIF
//
[PLEVEL 4]
.start_2v2_regular
[FUNCTION start_2v2_regular]
SERV.NEWITEM i_event_portal_spam_2v2_regular
NEW.P <def.britain_bank>
SERV.NEWITEM i_event_portal_2v2_regular
NEW.P <def.minoc_bank>
SERV.NEWITEM i_event_portal_2v2_regular
NEW.P <def.moonglow_bank>
SERV.NEWITEM i_event_portal_2v2_regular
NEW.P <def.cove_bank>
SERV.NEWITEM i_event_portal_2v2_regular
NEW.P <def.jhelom_bank>
SERV.NEWITEM i_event_portal_2v2_regular
NEW.P <def.skara_brae>
SERV.NEWITEM i_event_portal_2v2_regular
NEW.P <def.trinsic_bank>
SERV.NEWITEM i_event_portal_2v2_regular
NEW.P <def.wind_bank>
SERV.NEWITEM i_event_portal_2v2_regular
NEW.P <def.yew_bank>
SERV.NEWITEM i_event_portal_2v2_regular
NEW.P <def.del_bank>
SERV.NEWITEM i_event_portal_2v2_regular
NEW.P <def.vesp_bank>
SERV.NEWITEM i_event_portal_2v2_regular
NEW.P <def.occlo_bank>
SERV.NEWITEM i_event_portal_2v2_regular
NEW.P <def.bucs_bank>
SERV.NEWITEM i_event_portal_2v2_regular
NEW.P <def.serp_bank>
SERV.NEWITEM i_event_portal_2v2_regular
NEW.P <def.papua_bank>
[ITEMDEF i_event_portal_spam_2v2_regular]
ID=0F6C
NAME=2v2 Regular Gate
CATEGORY=Custom Event System
SUBSECTION=Event Portals
DESCRIPTION=2v2 Regular Portal Spam
on=@create
COLOR=0485
ATTR=08012
TIMER=1
ON=@STEP
IF (<SRC.ACCOUNT.PLEVEL>>1)
SRC.GO Duel Pits
RETURN 1
ELSE
SRC.SDIALOG D_ENTER_DUEL_PITS
RETURN 1
ON=@TIMER
IF (<MOREX>=1)
SERV.ALLCLIENTS sysmessage @0482,0,1 2v2 Regular in 10 Minutes!
SERV.ALLCLIENTS sysmessage @0482,0,1 To join the event visit any bank and pass through the event portal.
VAR.EVENTSTATUS=1
MOREX=2
TIMER=1
RETURN 1
ELSEIF (<MOREX>=120)
SERV.ALLCLIENTS sysmessage @0482,0,1 2v2 Regular in 8 Minutes!
SERV.ALLCLIENTS sysmessage @0482,0,1 To join the event visit any bank and pass through the event portal.
MOREX=121
TIMER=1
RETURN 1
ELSEIF (<MOREX>=300)
SERV.ALLCLIENTS sysmessage @0482,0,1 2v2 Regular in 5 Minutes!
SERV.ALLCLIENTS sysmessage @0482,0,1 To join the event visit any bank and pass through the event portal.
MOREX=301
TIMER=1
RETURN 1
ELSEIF (<MOREX>=480)
SERV.ALLCLIENTS sysmessage @0482,0,1 2v2 Regular in 2 Minutes!
SERV.ALLCLIENTS sysmessage @0482,0,1 To join the event visit any bank and pass through the event portal.
MOREX=481
TIMER=1
RETURN 1
ELSEIF (<MOREX>=600)
SERV.ALLCLIENTS sysmessage @0482,0,1 2v2 Regular *CLOSED*
REMOVE
VAR.EVENTSTATUS=0 //Add this to the end of every event script end.
RETURN 1
ELSE
TIMER=1
MOREX=<MOREX>+1
RETURN 1
ENDIF
[ITEMDEF i_event_portal_2v2_regular]
ID=0F6C
NAME=2v2 Regular Gate
CATEGORY=Custom Event System
SUBSECTION=Event Portals
DESCRIPTION=2v2 Regular Portal
on=@create
COLOR=0485
ATTR=08012
TIMER=1
ON=@STEP
IF (<SRC.ACCOUNT.PLEVEL>>1)
SRC.GO Duel Pits
RETURN 1
ELSE
SRC.SDIALOG D_ENTER_DUEL_PITS
RETURN 1
ON=@TIMER
IF (<MOREX>=1)
MOREX=2
TIMER=1
RETURN 1
ELSEIF (<MOREX>=120)
MOREX=121
TIMER=1
RETURN 1
ELSEIF (<MOREX>=300)
MOREX=301
TIMER=1
RETURN 1
ELSEIF (<MOREX>=480)
MOREX=481
RETURN 1
ELSEIF (<MOREX>=600)
REMOVE
RETURN 1
ELSE
TIMER=1
MOREX=<MOREX>+1
RETURN 1
ENDIF
//
[PLEVEL 4]
.start_2v2_replacement
[FUNCTION start_2v2_Replacement]
SERV.NEWITEM i_event_portal_spam_2v2_Replacement
NEW.P <def.britain_bank>
SERV.NEWITEM i_event_portal_2v2_Replacement
NEW.P <def.minoc_bank>
SERV.NEWITEM i_event_portal_2v2_Replacement
NEW.P <def.moonglow_bank>
SERV.NEWITEM i_event_portal_2v2_Replacement
NEW.P <def.cove_bank>
SERV.NEWITEM i_event_portal_2v2_Replacement
NEW.P <def.jhelom_bank>
SERV.NEWITEM i_event_portal_2v2_Replacement
NEW.P <def.skara_brae>
SERV.NEWITEM i_event_portal_2v2_Replacement
NEW.P <def.trinsic_bank>
SERV.NEWITEM i_event_portal_2v2_Replacement
NEW.P <def.wind_bank>
SERV.NEWITEM i_event_portal_2v2_Replacement
NEW.P <def.yew_bank>
SERV.NEWITEM i_event_portal_2v2_Replacement
NEW.P <def.del_bank>
SERV.NEWITEM i_event_portal_2v2_Replacement
NEW.P <def.vesp_bank>
SERV.NEWITEM i_event_portal_2v2_Replacement
NEW.P <def.occlo_bank>
SERV.NEWITEM i_event_portal_2v2_Replacement
NEW.P <def.bucs_bank>
SERV.NEWITEM i_event_portal_2v2_Replacement
NEW.P <def.serp_bank>
SERV.NEWITEM i_event_portal_2v2_Replacement
NEW.P <def.papua_bank>
[ITEMDEF i_event_portal_spam_2v2_Replacement]
ID=0F6C
NAME=2v2 Replacement Gate
CATEGORY=Custom Event System
SUBSECTION=Event Portals
DESCRIPTION=2v2 Replacement Portal Spam
on=@create
COLOR=0485
ATTR=08012
TIMER=1
ON=@STEP
IF (<SRC.ACCOUNT.PLEVEL>>1)
SRC.GO Duel Pits
RETURN 1
ELSE
SRC.SDIALOG D_ENTER_DUEL_PITS
RETURN 1
ON=@TIMER
IF (<MOREX>=1)
SERV.ALLCLIENTS sysmessage @0482,0,1 2v2 Replacement in 10 Minutes!
SERV.ALLCLIENTS sysmessage @0482,0,1 To join the event visit any bank and pass through the event portal.
VAR.EVENTSTATUS=1
MOREX=2
TIMER=1
RETURN 1
ELSEIF (<MOREX>=120)
SERV.ALLCLIENTS sysmessage @0482,0,1 2v2 Replacement in 8 Minutes!
SERV.ALLCLIENTS sysmessage @0482,0,1 To join the event visit any bank and pass through the event portal.
MOREX=121
TIMER=1
RETURN 1
ELSEIF (<MOREX>=300)
SERV.ALLCLIENTS sysmessage @0482,0,1 2v2 Replacement in 5 Minutes!
SERV.ALLCLIENTS sysmessage @0482,0,1 To join the event visit any bank and pass through the event portal.
MOREX=301
TIMER=1
RETURN 1
ELSEIF (<MOREX>=480)
SERV.ALLCLIENTS sysmessage @0482,0,1 2v2 Replacement in 2 Minutes!
SERV.ALLCLIENTS sysmessage @0482,0,1 To join the event visit any bank and pass through the event portal.
MOREX=481
TIMER=1
RETURN 1
ELSEIF (<MOREX>=600)
SERV.ALLCLIENTS sysmessage @0482,0,1 2v2 Replacement *CLOSED*
REMOVE
VAR.EVENTSTATUS=0 //Add this to the end of every event script end.
RETURN 1
ELSE
TIMER=1
MOREX=<MOREX>+1
RETURN 1
ENDIF
[ITEMDEF i_event_portal_2v2_Replacement]
ID=0F6C
NAME=2v2 Replacement Gate
CATEGORY=Custom Event System
SUBSECTION=Event Portals
DESCRIPTION=2v2 Replacement Portal
on=@create
COLOR=0485
ATTR=08012
TIMER=1
ON=@STEP
IF (<SRC.ACCOUNT.PLEVEL>>1)
SRC.GO Duel Pits
RETURN 1
ELSE
SRC.SDIALOG D_ENTER_DUEL_PITS
RETURN 1
ON=@TIMER
IF (<MOREX>=1)
MOREX=2
TIMER=1
RETURN 1
ELSEIF (<MOREX>=120)
MOREX=121
TIMER=1
RETURN 1
ELSEIF (<MOREX>=300)
MOREX=301
TIMER=1
RETURN 1
ELSEIF (<MOREX>=480)
MOREX=481
RETURN 1
ELSEIF (<MOREX>=600)
REMOVE
RETURN 1
ELSE
TIMER=1
MOREX=<MOREX>+1
RETURN 1
ENDIF
//
[PLEVEL 4]
.start_ffa_supplied
[FUNCTION start_ffa_supplied]
SERV.NEWITEM i_event_portal_spam_ffa_supplied
NEW.P <def.britain_bank>
SERV.NEWITEM i_event_portal_ffa_supplied
NEW.P <def.minoc_bank>
SERV.NEWITEM i_event_portal_ffa_supplied
NEW.P <def.moonglow_bank>
SERV.NEWITEM i_event_portal_ffa_supplied
NEW.P <def.cove_bank>
SERV.NEWITEM i_event_portal_ffa_supplied
NEW.P <def.jhelom_bank>
SERV.NEWITEM i_event_portal_ffa_supplied
NEW.P <def.skara_brae>
SERV.NEWITEM i_event_portal_ffa_supplied
NEW.P <def.trinsic_bank>
SERV.NEWITEM i_event_portal_ffa_supplied
NEW.P <def.wind_bank>
SERV.NEWITEM i_event_portal_ffa_supplied
NEW.P <def.yew_bank>
SERV.NEWITEM i_event_portal_ffa_supplied
NEW.P <def.del_bank>
SERV.NEWITEM i_event_portal_ffa_supplied
NEW.P <def.vesp_bank>
SERV.NEWITEM i_event_portal_ffa_supplied
NEW.P <def.occlo_bank>
SERV.NEWITEM i_event_portal_ffa_supplied
NEW.P <def.bucs_bank>
SERV.NEWITEM i_event_portal_ffa_supplied
NEW.P <def.serp_bank>
SERV.NEWITEM i_event_portal_ffa_supplied
NEW.P <def.papua_bank>
[ITEMDEF i_event_portal_spam_ffa_supplied]
ID=0F6C
NAME=FFA Supplied Gate
CATEGORY=Custom Event System
SUBSECTION=Event Portals
DESCRIPTION=FFA Supplied Portal Spam
on=@create
COLOR=0485
ATTR=08012
TIMER=1
ON=@STEP
IF (<SRC.ACCOUNT.PLEVEL>>1)
SRC.GO Duel Pits
RETURN 1
ELSE
SRC.SDIALOG D_ENTER_DUEL_PITS
RETURN 1
ON=@TIMER
IF (<MOREX>=1)
SERV.ALLCLIENTS sysmessage @0482,0,1 2v2 Supplied in 10 Minutes!
SERV.ALLCLIENTS sysmessage @0482,0,1 To join the event visit any bank and pass through the event portal.
VAR.EVENTSTATUS=1
MOREX=2
TIMER=1
RETURN 1
ELSEIF (<MOREX>=120)
SERV.ALLCLIENTS sysmessage @0482,0,1 FFA Supplied in 8 Minutes!
SERV.ALLCLIENTS sysmessage @0482,0,1 To join the event visit any bank and pass through the event portal.
MOREX=121
TIMER=1
RETURN 1
ELSEIF (<MOREX>=300)
SERV.ALLCLIENTS sysmessage @0482,0,1 FFA Supplied in 5 Minutes!
SERV.ALLCLIENTS sysmessage @0482,0,1 To join the event visit any bank and pass through the event portal.
MOREX=301
TIMER=1
RETURN 1
ELSEIF (<MOREX>=480)
SERV.ALLCLIENTS sysmessage @0482,0,1 FFA Supplied in 2 Minutes!
SERV.ALLCLIENTS sysmessage @0482,0,1 To join the event visit any bank and pass through the event portal.
MOREX=481
TIMER=1
RETURN 1
ELSEIF (<MOREX>=600)
SERV.ALLCLIENTS sysmessage @0482,0,1 FFA Supplied *CLOSED*
REMOVE
VAR.EVENTSTATUS=0 //Add this to the end of every event script end.
RETURN 1
ELSE
TIMER=1
MOREX=<MOREX>+1
RETURN 1
ENDIF
[ITEMDEF i_event_portal_ffa_supplied]
ID=0F6C
NAME=FFA Supplied Gate
CATEGORY=Custom Event System
SUBSECTION=Event Portals
DESCRIPTION=FFA Supplied Portal
on=@create
COLOR=0485
ATTR=08012
TIMER=1
ON=@STEP
IF (<SRC.ACCOUNT.PLEVEL>>1)
SRC.GO Duel Pits
RETURN 1
ELSE
SRC.SDIALOG D_ENTER_DUEL_PITS
RETURN 1
ON=@TIMER
IF (<MOREX>=1)
MOREX=2
TIMER=1
RETURN 1
ELSEIF (<MOREX>=120)
MOREX=121
TIMER=1
RETURN 1
ELSEIF (<MOREX>=300)
MOREX=301
TIMER=1
RETURN 1
ELSEIF (<MOREX>=480)
MOREX=481
RETURN 1
ELSEIF (<MOREX>=600)
REMOVE
RETURN 1
ELSE
TIMER=1
MOREX=<MOREX>+1
RETURN 1
ENDIF
//
[PLEVEL 4]
.start_ffa_Regular
[FUNCTION start_ffa_Regular]
SERV.NEWITEM i_event_portal_spam_ffa_Regular
NEW.P <def.britain_bank>
SERV.NEWITEM i_event_portal_ffa_Regular
NEW.P <def.minoc_bank>
SERV.NEWITEM i_event_portal_ffa_Regular
NEW.P <def.moonglow_bank>
SERV.NEWITEM i_event_portal_ffa_Regular
NEW.P <def.cove_bank>
SERV.NEWITEM i_event_portal_ffa_Regular
NEW.P <def.jhelom_bank>
SERV.NEWITEM i_event_portal_ffa_Regular
NEW.P <def.skara_brae>
SERV.NEWITEM i_event_portal_ffa_Regular
NEW.P <def.trinsic_bank>
SERV.NEWITEM i_event_portal_ffa_Regular
NEW.P <def.wind_bank>
SERV.NEWITEM i_event_portal_ffa_Regular
NEW.P <def.yew_bank>
SERV.NEWITEM i_event_portal_ffa_Regular
NEW.P <def.del_bank>
SERV.NEWITEM i_event_portal_ffa_Regular
NEW.P <def.vesp_bank>
SERV.NEWITEM i_event_portal_ffa_Regular
NEW.P <def.occlo_bank>
SERV.NEWITEM i_event_portal_ffa_Regular
NEW.P <def.bucs_bank>
SERV.NEWITEM i_event_portal_ffa_Regular
NEW.P <def.serp_bank>
SERV.NEWITEM i_event_portal_ffa_Regular
NEW.P <def.papua_bank>
[ITEMDEF i_event_portal_spam_ffa_Regular]
ID=0F6C
NAME=FFA Regular Gate
CATEGORY=Custom Event System
SUBSECTION=Event Portals
DESCRIPTION=FFA Regular Portal Spam
on=@create
COLOR=0485
ATTR=08012
TIMER=1
ON=@STEP
IF (<SRC.ACCOUNT.PLEVEL>>1)
SRC.GO Duel Pits
RETURN 1
ELSE
SRC.SDIALOG D_ENTER_DUEL_PITS
RETURN 1
ON=@TIMER
IF (<MOREX>=1)
SERV.ALLCLIENTS sysmessage @0482,0,1 2v2 Regular in 10 Minutes!
SERV.ALLCLIENTS sysmessage @0482,0,1 To join the event visit any bank and pass through the event portal.
VAR.EVENTSTATUS=1
MOREX=2
TIMER=1
RETURN 1
ELSEIF (<MOREX>=120)
SERV.ALLCLIENTS sysmessage @0482,0,1 FFA Regular in 8 Minutes!
SERV.ALLCLIENTS sysmessage @0482,0,1 To join the event visit any bank and pass through the event portal.
MOREX=121
TIMER=1
RETURN 1
ELSEIF (<MOREX>=300)
SERV.ALLCLIENTS sysmessage @0482,0,1 FFA Regular in 5 Minutes!
SERV.ALLCLIENTS sysmessage @0482,0,1 To join the event visit any bank and pass through the event portal.
MOREX=301
TIMER=1
RETURN 1
ELSEIF (<MOREX>=480)
SERV.ALLCLIENTS sysmessage @0482,0,1 FFA Regular in 2 Minutes!
SERV.ALLCLIENTS sysmessage @0482,0,1 To join the event visit any bank and pass through the event portal.
MOREX=481
TIMER=1
RETURN 1
ELSEIF (<MOREX>=600)
SERV.ALLCLIENTS sysmessage @0482,0,1 FFA Regular *CLOSED*
REMOVE
VAR.EVENTSTATUS=0 //Add this to the end of every event script end.
RETURN 1
ELSE
TIMER=1
MOREX=<MOREX>+1
RETURN 1
ENDIF
[ITEMDEF i_event_portal_ffa_Regular]
ID=0F6C
NAME=FFA Regular Gate
CATEGORY=Custom Event System
SUBSECTION=Event Portals
DESCRIPTION=FFA Regular Portal
on=@create
COLOR=0485
ATTR=08012
TIMER=1
ON=@STEP
IF (<SRC.ACCOUNT.PLEVEL>>1)
SRC.GO Duel Pits
RETURN 1
ELSE
SRC.SDIALOG D_ENTER_DUEL_PITS
RETURN 1
ON=@TIMER
IF (<MOREX>=1)
MOREX=2
TIMER=1
RETURN 1
ELSEIF (<MOREX>=120)
MOREX=121
TIMER=1
RETURN 1
ELSEIF (<MOREX>=300)
MOREX=301
TIMER=1
RETURN 1
ELSEIF (<MOREX>=480)
MOREX=481
RETURN 1
ELSEIF (<MOREX>=600)
REMOVE
RETURN 1
ELSE
TIMER=1
MOREX=<MOREX>+1
RETURN 1
ENDIF
//
[PLEVEL 4]
.start_ctf
[FUNCTION start_ctf]
SERV.NEWITEM i_event_portal_spam_ctf
NEW.P <def.britain_bank>
SERV.NEWITEM i_event_portal_ctf
NEW.P <def.minoc_bank>
SERV.NEWITEM i_event_portal_ctf
NEW.P <def.moonglow_bank>
SERV.NEWITEM i_event_portal_ctf
NEW.P <def.cove_bank>
SERV.NEWITEM i_event_portal_ctf
NEW.P <def.jhelom_bank>
SERV.NEWITEM i_event_portal_ctf
NEW.P <def.skara_brae>
SERV.NEWITEM i_event_portal_ctf
NEW.P <def.trinsic_bank>
SERV.NEWITEM i_event_portal_ctf
NEW.P <def.wind_bank>
SERV.NEWITEM i_event_portal_ctf
NEW.P <def.yew_bank>
SERV.NEWITEM i_event_portal_ctf
NEW.P <def.del_bank>
SERV.NEWITEM i_event_portal_ctf
NEW.P <def.vesp_bank>
SERV.NEWITEM i_event_portal_ctf
NEW.P <def.occlo_bank>
SERV.NEWITEM i_event_portal_ctf
NEW.P <def.bucs_bank>
SERV.NEWITEM i_event_portal_ctf
NEW.P <def.serp_bank>
SERV.NEWITEM i_event_portal_ctf
NEW.P <def.papua_bank>
[ITEMDEF i_event_portal_spam_ctf]
ID=0F6C
NAME=Capture the Flag Gate
CATEGORY=Custom Event System
SUBSECTION=Event Portals
DESCRIPTION=Capture the Flag Portal Spam
on=@create
COLOR=0485
ATTR=08012
TIMER=1
ON=@STEP
IF (<SRC.ACCOUNT.PLEVEL>>1)
SRC.GO Duel Pits
RETURN 1
ELSE
SRC.SDIALOG D_ENTER_DUEL_PITS
RETURN 1
ON=@TIMER
IF (<MOREX>=1)
SERV.ALLCLIENTS sysmessage @0482,0,1 Capture the Flag in 10 Minutes!
SERV.ALLCLIENTS sysmessage @0482,0,1 To join the event visit any bank and pass through the event portal.
VAR.EVENTSTATUS=1
MOREX=2
TIMER=1
RETURN 1
ELSEIF (<MOREX>=120)
SERV.ALLCLIENTS sysmessage @0482,0,1 Capture the Flag in 8 Minutes!
SERV.ALLCLIENTS sysmessage @0482,0,1 To join the event visit any bank and pass through the event portal.
MOREX=121
TIMER=1
RETURN 1
ELSEIF (<MOREX>=300)
SERV.ALLCLIENTS sysmessage @0482,0,1 Capture the Flag in 5 Minutes!
SERV.ALLCLIENTS sysmessage @0482,0,1 To join the event visit any bank and pass through the event portal.
MOREX=301
TIMER=1
RETURN 1
ELSEIF (<MOREX>=480)
SERV.ALLCLIENTS sysmessage @0482,0,1 Capture the Flag in 2 Minutes!
SERV.ALLCLIENTS sysmessage @0482,0,1 To join the event visit any bank and pass through the event portal.
MOREX=481
TIMER=1
RETURN 1
ELSEIF (<MOREX>=600)
SERV.ALLCLIENTS sysmessage @0482,0,1 Capture the Flag *CLOSED*
REMOVE
VAR.EVENTSTATUS=0 //Add this to the end of every event script end.
RETURN 1
ELSE
TIMER=1
MOREX=<MOREX>+1
RETURN 1
ENDIF
[ITEMDEF i_event_portal_ctf]
ID=0F6C
NAME=Capture the Flag Gate
CATEGORY=Custom Event System
SUBSECTION=Event Portals
DESCRIPTION=Capture the Flag Portal
on=@create
COLOR=0485
ATTR=08012
TIMER=1
ON=@STEP
IF (<SRC.ACCOUNT.PLEVEL>>1)
SRC.GO Duel Pits
RETURN 1
ELSE
SRC.SDIALOG D_ENTER_DUEL_PITS
RETURN 1
ON=@TIMER
IF (<MOREX>=1)
MOREX=2
TIMER=1
RETURN 1
ELSEIF (<MOREX>=120)
MOREX=121
TIMER=1
RETURN 1
ELSEIF (<MOREX>=300)
MOREX=301
TIMER=1
RETURN 1
ELSEIF (<MOREX>=480)
MOREX=481
RETURN 1
ELSEIF (<MOREX>=600)
REMOVE
RETURN 1
ELSE
TIMER=1
MOREX=<MOREX>+1
RETURN 1
ENDIF
//
[PLEVEL 4]
.start_colorwars
[FUNCTION start_colorwars]
SERV.NEWITEM i_event_portal_spam_colorwars
NEW.P <def.britain_bank>
SERV.NEWITEM i_event_portal_colorwars
NEW.P <def.minoc_bank>
SERV.NEWITEM i_event_portal_colorwars
NEW.P <def.moonglow_bank>
SERV.NEWITEM i_event_portal_colorwars
NEW.P <def.cove_bank>
SERV.NEWITEM i_event_portal_colorwars
NEW.P <def.jhelom_bank>
SERV.NEWITEM i_event_portal_colorwars
NEW.P <def.skara_brae>
SERV.NEWITEM i_event_portal_colorwars
NEW.P <def.trinsic_bank>
SERV.NEWITEM i_event_portal_colorwars
NEW.P <def.wind_bank>
SERV.NEWITEM i_event_portal_colorwars
NEW.P <def.yew_bank>
SERV.NEWITEM i_event_portal_colorwars
NEW.P <def.del_bank>
SERV.NEWITEM i_event_portal_colorwars
NEW.P <def.vesp_bank>
SERV.NEWITEM i_event_portal_colorwars
NEW.P <def.occlo_bank>
SERV.NEWITEM i_event_portal_colorwars
NEW.P <def.bucs_bank>
SERV.NEWITEM i_event_portal_colorwars
NEW.P <def.serp_bank>
SERV.NEWITEM i_event_portal_colorwars
NEW.P <def.papua_bank>
[ITEMDEF i_event_portal_spam_colorwars]
ID=0F6C
NAME=Color Wars Gate
CATEGORY=Custom Event System
SUBSECTION=Event Portals
DESCRIPTION=Color Wars Portal Spam
on=@create
COLOR=0485
ATTR=08012
TIMER=1
ON=@STEP
IF (<SRC.ACCOUNT.PLEVEL>>1)
SRC.GO Duel Pits
RETURN 1
ELSE
SRC.SDIALOG D_ENTER_DUEL_PITS
RETURN 1
ON=@TIMER
IF (<MOREX>=1)
SERV.ALLCLIENTS sysmessage @0482,0,1 Color Wars in 10 Minutes!
SERV.ALLCLIENTS sysmessage @0482,0,1 To join the event visit any bank and pass through the event portal.
VAR.EVENTSTATUS=1
MOREX=2
TIMER=1
RETURN 1
ELSEIF (<MOREX>=120)
SERV.ALLCLIENTS sysmessage @0482,0,1 Color Wars in 8 Minutes!
SERV.ALLCLIENTS sysmessage @0482,0,1 To join the event visit any bank and pass through the event portal.
MOREX=121
TIMER=1
RETURN 1
ELSEIF (<MOREX>=300)
SERV.ALLCLIENTS sysmessage @0482,0,1 Color Wars in 5 Minutes!
SERV.ALLCLIENTS sysmessage @0482,0,1 To join the event visit any bank and pass through the event portal.
MOREX=301
TIMER=1
RETURN 1
ELSEIF (<MOREX>=480)
SERV.ALLCLIENTS sysmessage @0482,0,1 Color Wars in 2 Minutes!
SERV.ALLCLIENTS sysmessage @0482,0,1 To join the event visit any bank and pass through the event portal.
MOREX=481
TIMER=1
RETURN 1
ELSEIF (<MOREX>=600)
SERV.ALLCLIENTS sysmessage @0482,0,1 Color Wars *CLOSED*
REMOVE
VAR.EVENTSTATUS=0 //Add this to the end of every event script end.
RETURN 1
ELSE
TIMER=1
MOREX=<MOREX>+1
RETURN 1
ENDIF
[ITEMDEF i_event_portal_colorwars]
ID=0F6C
NAME=Color Wars Gate
CATEGORY=Custom Event System
SUBSECTION=Event Portals
DESCRIPTION=Color Wars Portal
on=@create
COLOR=0485
ATTR=08012
TIMER=1
ON=@STEP
IF (<SRC.ACCOUNT.PLEVEL>>1)
SRC.GO Duel Pits
RETURN 1
ELSE
SRC.SDIALOG D_ENTER_DUEL_PITS
RETURN 1
ON=@TIMER
IF (<MOREX>=1)
MOREX=2
TIMER=1
RETURN 1
ELSEIF (<MOREX>=120)
MOREX=121
TIMER=1
RETURN 1
ELSEIF (<MOREX>=300)
MOREX=301
TIMER=1
RETURN 1
ELSEIF (<MOREX>=480)
MOREX=481
RETURN 1
ELSEIF (<MOREX>=600)
REMOVE
RETURN 1
ELSE
TIMER=1
MOREX=<MOREX>+1
RETURN 1
ENDIF
//
[PLEVEL 4]
.start_deathbydice
[FUNCTION start_deathbydice]
SERV.NEWITEM i_event_portal_spam_deathbydice
NEW.P <def.britain_bank>
SERV.NEWITEM i_event_portal_deathbydice
NEW.P <def.minoc_bank>
SERV.NEWITEM i_event_portal_deathbydice
NEW.P <def.moonglow_bank>
SERV.NEWITEM i_event_portal_deathbydice
NEW.P <def.cove_bank>
SERV.NEWITEM i_event_portal_deathbydice
NEW.P <def.jhelom_bank>
SERV.NEWITEM i_event_portal_deathbydice
NEW.P <def.skara_brae>
SERV.NEWITEM i_event_portal_deathbydice
NEW.P <def.trinsic_bank>
SERV.NEWITEM i_event_portal_deathbydice
NEW.P <def.wind_bank>
SERV.NEWITEM i_event_portal_deathbydice
NEW.P <def.yew_bank>
SERV.NEWITEM i_event_portal_deathbydice
NEW.P <def.del_bank>
SERV.NEWITEM i_event_portal_deathbydice
NEW.P <def.vesp_bank>
SERV.NEWITEM i_event_portal_deathbydice
NEW.P <def.occlo_bank>
SERV.NEWITEM i_event_portal_deathbydice
NEW.P <def.bucs_bank>
SERV.NEWITEM i_event_portal_deathbydice
NEW.P <def.serp_bank>
SERV.NEWITEM i_event_portal_deathbydice
NEW.P <def.papua_bank>
[ITEMDEF i_event_portal_spam_deathbydice]
ID=0F6C
NAME=Death by Dice Gate
CATEGORY=Custom Event System
SUBSECTION=Event Portals
DESCRIPTION=Death by Dice Portal Spam
on=@create
COLOR=0485
ATTR=08012
TIMER=1
ON=@STEP
IF (<SRC.ACCOUNT.PLEVEL>>1)
SRC.GO Duel Pits
RETURN 1
ELSE
SRC.SDIALOG D_ENTER_DUEL_PITS
RETURN 1
ON=@TIMER
IF (<MOREX>=1)
SERV.ALLCLIENTS sysmessage @0482,0,1 Death by Dice in 10 Minutes!
SERV.ALLCLIENTS sysmessage @0482,0,1 To join the event visit any bank and pass through the event portal.
VAR.EVENTSTATUS=1
MOREX=2
TIMER=1
RETURN 1
ELSEIF (<MOREX>=120)
SERV.ALLCLIENTS sysmessage @0482,0,1 Death by Dice in 8 Minutes!
SERV.ALLCLIENTS sysmessage @0482,0,1 To join the event visit any bank and pass through the event portal.
MOREX=121
TIMER=1
RETURN 1
ELSEIF (<MOREX>=300)
SERV.ALLCLIENTS sysmessage @0482,0,1 Death by Dice in 5 Minutes!
SERV.ALLCLIENTS sysmessage @0482,0,1 To join the event visit any bank and pass through the event portal.
MOREX=301
TIMER=1
RETURN 1
ELSEIF (<MOREX>=480)
SERV.ALLCLIENTS sysmessage @0482,0,1 Death by Dice in 2 Minutes!
SERV.ALLCLIENTS sysmessage @0482,0,1 To join the event visit any bank and pass through the event portal.
MOREX=481
TIMER=1
RETURN 1
ELSEIF (<MOREX>=600)
SERV.ALLCLIENTS sysmessage @0482,0,1 Death by Dice *CLOSED*
REMOVE
VAR.EVENTSTATUS=0 //Add this to the end of every event script end.
RETURN 1
ELSE
TIMER=1
MOREX=<MOREX>+1
RETURN 1
ENDIF
[ITEMDEF i_event_portal_deathbydice]
ID=0F6C
NAME=Death by Dice Gate
CATEGORY=Custom Event System
SUBSECTION=Event Portals
DESCRIPTION=Death by Dice Portal
on=@create
COLOR=0485
ATTR=08012
TIMER=1
ON=@STEP
IF (<SRC.ACCOUNT.PLEVEL>>1)
SRC.GO Duel Pits
RETURN 1
ELSE
SRC.SDIALOG D_ENTER_DUEL_PITS
RETURN 1
ON=@TIMER
IF (<MOREX>=1)
MOREX=2
TIMER=1
RETURN 1
ELSEIF (<MOREX>=120)
MOREX=121
TIMER=1
RETURN 1
ELSEIF (<MOREX>=300)
MOREX=301
TIMER=1
RETURN 1
ELSEIF (<MOREX>=480)
MOREX=481
RETURN 1
ELSEIF (<MOREX>=600)
REMOVE
RETURN 1
ELSE
TIMER=1
MOREX=<MOREX>+1
RETURN 1
ENDIF
//
[PLEVEL 4]
.start_open_duels
[FUNCTION start_open_duels]
SERV.NEWITEM i_event_portal_spam_open_duels
NEW.P <def.britain_bank>
SERV.NEWITEM i_event_portal_open_duels
NEW.P <def.minoc_bank>
SERV.NEWITEM i_event_portal_open_duels
NEW.P <def.moonglow_bank>
SERV.NEWITEM i_event_portal_open_duels
NEW.P <def.cove_bank>
SERV.NEWITEM i_event_portal_open_duels
NEW.P <def.jhelom_bank>
SERV.NEWITEM i_event_portal_open_duels
NEW.P <def.skara_brae>
SERV.NEWITEM i_event_portal_open_duels
NEW.P <def.trinsic_bank>
SERV.NEWITEM i_event_portal_open_duels
NEW.P <def.wind_bank>
SERV.NEWITEM i_event_portal_open_duels
NEW.P <def.yew_bank>
SERV.NEWITEM i_event_portal_open_duels
NEW.P <def.del_bank>
SERV.NEWITEM i_event_portal_open_duels
NEW.P <def.vesp_bank>
SERV.NEWITEM i_event_portal_open_duels
NEW.P <def.occlo_bank>
SERV.NEWITEM i_event_portal_open_duels
NEW.P <def.bucs_bank>
SERV.NEWITEM i_event_portal_open_duels
NEW.P <def.serp_bank>
SERV.NEWITEM i_event_portal_open_duels
NEW.P <def.papua_bank>
[ITEMDEF i_event_portal_spam_open_duels]
ID=0F6C
NAME=Open Duels Gate
CATEGORY=Custom Event System
SUBSECTION=Event Portals
DESCRIPTION=Open Duels Portal Spam
on=@create
COLOR=0485
ATTR=08012
TIMER=1
ON=@STEP
IF (<SRC.ACCOUNT.PLEVEL>>1)
SRC.GO Duel Pits
RETURN 1
ELSE
SRC.SDIALOG D_ENTER_DUEL_PITS
RETURN 1
ON=@TIMER
IF (<MOREX>=1)
SERV.ALLCLIENTS sysmessage @0482,0,1 Open Duels in 10 Minutes!
SERV.ALLCLIENTS sysmessage @0482,0,1 To join the event visit any bank and pass through the event portal.
VAR.EVENTSTATUS=1
MOREX=2
TIMER=1
RETURN 1
ELSEIF (<MOREX>=120)
SERV.ALLCLIENTS sysmessage @0482,0,1 Open Duels in 8 Minutes!
SERV.ALLCLIENTS sysmessage @0482,0,1 To join the event visit any bank and pass through the event portal.
MOREX=121
TIMER=1
RETURN 1
ELSEIF (<MOREX>=300)
SERV.ALLCLIENTS sysmessage @0482,0,1 Open Duels in 5 Minutes!
SERV.ALLCLIENTS sysmessage @0482,0,1 To join the event visit any bank and pass through the event portal.
MOREX=301
TIMER=1
RETURN 1
ELSEIF (<MOREX>=480)
SERV.ALLCLIENTS sysmessage @0482,0,1 Open Duels in 2 Minutes!
SERV.ALLCLIENTS sysmessage @0482,0,1 To join the event visit any bank and pass through the event portal.
MOREX=481
TIMER=1
RETURN 1
ELSEIF (<MOREX>=600)
SERV.ALLCLIENTS sysmessage @0482,0,1 Open Duels *CLOSED*
REMOVE
VAR.EVENTSTATUS=0 //Add this to the end of every event script end.
RETURN 1
ELSE
TIMER=1
MOREX=<MOREX>+1
RETURN 1
ENDIF
[ITEMDEF i_event_portal_open_duels]
ID=0F6C
NAME=Open Duels Gate
CATEGORY=Custom Event System
SUBSECTION=Event Portals
DESCRIPTION=Open Duels Portal
on=@create
COLOR=0485
ATTR=08012
TIMER=1
ON=@STEP
IF (<SRC.ACCOUNT.PLEVEL>>1)
SRC.GO Duel Pits
RETURN 1
ELSE
SRC.SDIALOG D_ENTER_DUEL_PITS
RETURN 1
ON=@TIMER
IF (<MOREX>=1)
MOREX=2
TIMER=1
RETURN 1
ELSEIF (<MOREX>=120)
MOREX=121
TIMER=1
RETURN 1
ELSEIF (<MOREX>=300)
MOREX=301
TIMER=1
RETURN 1
ELSEIF (<MOREX>=480)
MOREX=481
RETURN 1
ELSEIF (<MOREX>=600)
REMOVE
RETURN 1
ELSE
TIMER=1
MOREX=<MOREX>+1
RETURN 1
ENDIF
//
[PLEVEL 4]
.start_mud_wrestling
[FUNCTION start_mud_wrestling]
SERV.NEWITEM i_event_portal_spam_mud_wrestling
NEW.P <def.britain_bank>
SERV.NEWITEM i_event_portal_mud_wrestling
NEW.P <def.minoc_bank>
SERV.NEWITEM i_event_portal_mud_wrestling
NEW.P <def.moonglow_bank>
SERV.NEWITEM i_event_portal_mud_wrestling
NEW.P <def.cove_bank>
SERV.NEWITEM i_event_portal_mud_wrestling
NEW.P <def.jhelom_bank>
SERV.NEWITEM i_event_portal_mud_wrestling
NEW.P <def.skara_brae>
SERV.NEWITEM i_event_portal_mud_wrestling
NEW.P <def.trinsic_bank>
SERV.NEWITEM i_event_portal_mud_wrestling
NEW.P <def.wind_bank>
SERV.NEWITEM i_event_portal_mud_wrestling
NEW.P <def.yew_bank>
SERV.NEWITEM i_event_portal_mud_wrestling
NEW.P <def.del_bank>
SERV.NEWITEM i_event_portal_mud_wrestling
NEW.P <def.vesp_bank>
SERV.NEWITEM i_event_portal_mud_wrestling
NEW.P <def.occlo_bank>
SERV.NEWITEM i_event_portal_mud_wrestling
NEW.P <def.bucs_bank>
SERV.NEWITEM i_event_portal_mud_wrestling
NEW.P <def.serp_bank>
SERV.NEWITEM i_event_portal_mud_wrestling
NEW.P <def.papua_bank>
[ITEMDEF i_event_portal_spam_mud_wrestling]
ID=0F6C
NAME=Mud Wrestling Gate
CATEGORY=Custom Event System
SUBSECTION=Event Portals
DESCRIPTION=Mud Wrestling Portal Spam
on=@create
COLOR=0485
ATTR=08012
TIMER=1
ON=@STEP
IF (<SRC.ACCOUNT.PLEVEL>>1)
SRC.GO Duel Pits
RETURN 1
ELSE
SRC.SDIALOG D_ENTER_DUEL_PITS
RETURN 1
ON=@TIMER
IF (<MOREX>=1)
SERV.ALLCLIENTS sysmessage @0482,0,1 Mud Wrestling in 10 Minutes!
SERV.ALLCLIENTS sysmessage @0482,0,1 To join the event visit any bank and pass through the event portal.
VAR.EVENTSTATUS=1
MOREX=2
TIMER=1
RETURN 1
ELSEIF (<MOREX>=120)
SERV.ALLCLIENTS sysmessage @0482,0,1 Mud Wrestling in 8 Minutes!
SERV.ALLCLIENTS sysmessage @0482,0,1 To join the event visit any bank and pass through the event portal.
MOREX=121
TIMER=1
RETURN 1
ELSEIF (<MOREX>=300)
SERV.ALLCLIENTS sysmessage @0482,0,1 Mud Wrestling in 5 Minutes!
SERV.ALLCLIENTS sysmessage @0482,0,1 To join the event visit any bank and pass through the event portal.
MOREX=301
TIMER=1
RETURN 1
ELSEIF (<MOREX>=480)
SERV.ALLCLIENTS sysmessage @0482,0,1 Mud Wrestling in 2 Minutes!
SERV.ALLCLIENTS sysmessage @0482,0,1 To join the event visit any bank and pass through the event portal.
MOREX=481
TIMER=1
RETURN 1
ELSEIF (<MOREX>=600)
SERV.ALLCLIENTS sysmessage @0482,0,1 Mud Wrestling *CLOSED*
REMOVE
VAR.EVENTSTATUS=0 //Add this to the end of every event script end.
RETURN 1
ELSE
TIMER=1
MOREX=<MOREX>+1
RETURN 1
ENDIF
[ITEMDEF i_event_portal_mud_wrestling]
ID=0F6C
NAME=Mud Wrestling Gate
CATEGORY=Custom Event System
SUBSECTION=Event Portals
DESCRIPTION=Mud Wrestling Portal
on=@create
COLOR=0485
ATTR=08012
TIMER=1
ON=@STEP
IF (<SRC.ACCOUNT.PLEVEL>>1)
SRC.GO Duel Pits
RETURN 1
ELSE
SRC.SDIALOG D_ENTER_DUEL_PITS
RETURN 1
on=@dclick
trigger step
return 1
ON=@TIMER
IF (<MOREX>=1)
MOREX=2
TIMER=1
RETURN 1
ELSEIF (<MOREX>=120)
MOREX=121
TIMER=1
RETURN 1
ELSEIF (<MOREX>=300)
MOREX=301
TIMER=1
RETURN 1
ELSEIF (<MOREX>=480)
MOREX=481
RETURN 1
ELSEIF (<MOREX>=600)
REMOVE
RETURN 1
ELSE
TIMER=1
MOREX=<MOREX>+1
RETURN 1
ENDIF