Van Glan Bloom
Journeyman
Posts: 104
Likes Given: 2
Likes Received: 3 in 3 posts
Joined: Jun 2013
Reputation: 0
|
RE: Daily Event Problem
This is all that was scripted for the event :
Code:
[FUNCTION oozegooze]
IF !(<VAR.OOZEGOOZE>)
VAR.OOZEGOOZE=1
SERV.NEWITEM=i_event_oozegooze_start
NEW.P=6120,1221
VAR.OOZEGOOZEUID=<NEW.UID>
NEW.P=6120,1221
VAR.OOZEGOOZEUID2=<NEW.UID>
SERV.NEWITEM=i_nude_stone
NEW.P=6122,1221
VAR.OOZEGOOZEUID3=<NEW.UID>
SERV.ALLCLIENTS SYSMESSAGE @09c1 [Ooze Gooze]: Event Gate is open! Located in Neutral Zone!
timerf 20,SERV.ALLCLIENTS SYSMESSAGE @09c1 [Ooze Gooze]: Event will start in 3 Minutes!
timerf 80,SERV.ALLCLIENTS SYSMESSAGE @09c1 [Ooze Gooze]: Event will start in 2 Minutes!
timerf 140,SERV.ALLCLIENTS SYSMESSAGE @09c1 [Ooze Gooze]: Event will start in 1 Minute!
timerf 170,SERV.ALLCLIENTS SYSMESSAGE @09c1 [Ooze Gooze]: Event will start in 30 seconds!
timerf 200,oozegooze_start
ELSE
SRC.SYSMESSAGE @09c1 An event is already being held.
ENDIF
[DEFNAME oozegooze_config]
oozegooze_timeruid 040003ea6
[FUNCTION oozegooze_start]
IF (<VAR.OOZEGOOZE_PLAYERS> > 1)
SERV.ALLCLIENTS SYSMESSAGE @09c1 [Ooze Gooze]: The Event has begun! Event Gate is now closed.
TRY UID.<def0.oozegooze_timeruid>.TIMER=1
ELSE
SERV.ALLCLIENTS SYSMESSAGE @09c1 [Ooze Gooze]: The Event was cancelled due to lack of players.
SERV.ALLCLIENTS oozegooze_cancel_search
VAR.OOZEGOOZE=0
VAR.OOZEGOOZE_PLAYERS=0
ENDIF
TRY UID.<VAR.OOZEGOOZEUID>.REMOVE
TRY UID.<VAR.OOZEGOOZEUID2>.REMOVE
TRY UID.<VAR.OOZEGOOZEUID3>.REMOVE
VAR.OOZEGOOZEUID=
VAR.OOZEGOOZEUID2=
VAR.OOZEGOOZEUID3=
[ITEMDEF i_event_oozegooze_start]
NAME=Event Gate
TYPE=t_normal
ID=i_moongate_red
ON=@CLICK
MESSAGE=@50 [Ooze Gooze]
ON=@STEP
IF (<SRC.ISPLAYER>) && !(<SRC.ISGM>)
IF (<SRC.FINDLAYER.21.COUNT>) || (<SRC.FINDLAYER.1>) || (<SRC.FINDLAYER.2>) || (<SRC.FINDLAYER.3>) || (<SRC.FINDLAYER.4>) || (<SRC.FINDLAYER.5>) || (<SRC.FINDLAYER.6>) || (<SRC.FINDLAYER.7>) || (<SRC.FINDLAYER.8>) || (<SRC.FINDLAYER.9>) || (<SRC.FINDLAYER.10>) || (<SRC.FINDLAYER.12>) || (<SRC.FINDLAYER.13>) || (<SRC.FINDLAYER.14>) || (<SRC.FINDLAYER.17>) || (<SRC.FINDLAYER.18>) || (<SRC.FINDLAYER.19>) || (<SRC.FINDLAYER.20>) || (<SRC.FINDLAYER.22>) || (<SRC.FINDLAYER.23>) || (<SRC.FINDLAYER.24>) || (<SRC.FINDLAYER.31>)
SRC.SYSMESSAGE @0025 [Ooze Gooze]: Your backpack must be empty and you must be naked.
RETURN 1
ENDIF
IF (<SRC.FINDLAYER.25>)
SRC.SYSMESSAGE @0025 [Ooze Gooze]: You need to be unmounted!
RETURN 1
ENDIF
VAR.OOZEGOOZE_PLAYERS=<VAR.OOZEGOOZE_PLAYERS>+1
SRC.oozegooze_go
SRC.UPDATE
ENDIF
[ITEMDEF i_event_ooze_timer]
NAME=Ooze Gooze Timer
TYPE=t_normal
ID=i_grave_stone
ON=@CREATE
ATTR=090
MORE1=0
ON=@TIMER
SERV.NEWNPC=c_event_ooze
IF !(<MORE1>)
LOCAL.X=5463
LOCAL.Y=1133
ELSE
LOCAL.X=<eval RAND(5463,5465)>
LOCAL.Y=<eval RAND(1133,1135)>
ENDIF
NEW.P=<dLOCAL.X>,<dLOCAL.Y>,22
NEW.UPDATE
serv.allclients f_broadcast_oozegooze @09c1 [Ooze Gooze]: An Ooze Gooze has been spawned!
MORE1 += 1
TIMER=<eval (30-<MORE1>)>
RETURN 1
[FUNCTION oozegooze_win]
SERV.ALLCLIENTS SYSMESSAGE @09c1 [Ooze Gooze]: <name> Won!
VAR.OOZEGOOZE_PLAYERS = 0
TAG0.ISINEVENT=0
KARMA=<eval <TAG0.OLD_KARMA>>
FAME=<eval <TAG0.OLD_FAME>>
KILLS=<eval <TAG0.OLD_KILLS>>
DEATHS=<eval <TAG0.OLD_DEATHS>>
TAG0.OLD_KARMA=
TAG0.OLD_FAME=
TAG0.OLD_KILLS=
TAG0.OLD_DEATHS=
EVENTS -e_event_oozegooze
FINDLAYER.22.REMOVE
SERV.NEWITEM=event_oozegooze_prize
NEW.CONT=<FINDLAYER.29>
REF1=<NEW>
SERV.NEWITEM=i_event_oozegooze_prize
NEW.TAG0.OWNER=<name>
NEW.CONT=<REF1>
VAR.OOZEGOOZE=0
VAR.OOZEGOOZE_PLAYERS=0
TRY UID.<def0.oozegooze_timeruid>.TIMER=-1
TRY UID.<def0.oozegooze_timeruid>.MORE1=0
FORCHARS 60
IF !(STRCMPI(<BASEID>,c_event_ooze))
REMOVE
ENDIF
ENDFOR
GO=6116,1243,1
MESSAGE @09c1 Thank you for participating!
[FUNCTION oozegooze_go]
TAG0.ISINEVENT=1
TAG0.OLD_KARMA=<KARMA>
TAG0.OLD_FAME=<FAME>
TAG0.OLD_KILLS=<KILLS>
TAG0.OLD_DEATHS=<DEATHS>
SPELLEFFECT s_night_sight 1000
EVENTS=e_event_oozegooze
P=5468,1132
UPDATE
SERV.NEWITEM=i_event_ooze_robe
NEW.EQUIP
MESSAGE @09c1 Run from the Ooze Gooze!
[FUNCTION oozegooze_cancel]
TAG0.ISINEVENT=0
KARMA=<eval <TAG0.OLD_KARMA>>
FAME=<eval <TAG0.OLD_FAME>>
KILLS=<eval <TAG0.OLD_KILLS>>
DEATHS=<eval <TAG0.OLD_DEATHS>>
TAG0.OLD_KARMA=
TAG0.OLD_FAME=
TAG0.OLD_KILLS=
TAG0.OLD_DEATHS=
EVENTS -e_event_oozegooze
FINDLAYER.22.REMOVE
GO=6116,1234,1
[FUNCTION oozegooze_capture]
serv.allclients f_broadcast_oozegooze @09c1 [Ooze Gooze]: <name> has been captured!
VAR.OOZEGOOZE_PLAYERS += -1
TAG0.ISINEVENT=0
KARMA=<eval <TAG0.OLD_KARMA>>
FAME=<eval <TAG0.OLD_FAME>>
KILLS=<eval <TAG0.OLD_KILLS>>
DEATHS=<eval <TAG0.OLD_DEATHS>>
TAG0.OLD_KARMA=
TAG0.OLD_FAME=
TAG0.OLD_KILLS=
TAG0.OLD_DEATHS=
EVENTS -e_event_oozegooze
FINDLAYER.22.REMOVE
GO=6116,1234,1
MESSAGE @09c1 Thank you for participating!
oozegooze_checkwin
[FUNCTION f_broadcast_oozegooze]
IF (<ISEVENT.e_event_oozegooze>) || (<ISGM>)
SYSMESSAGE=<ARGS>
ENDIF
[FUNCTION oozegooze_cancel_search]
IF (<ISEVENT.e_event_oozegooze>)
oozegooze_cancel
ENDIF
[FUNCTION oozegooze_checkwin]
IF (<VAR.OOZEGOOZE_PLAYERS> = 1)
SERV.ALLCLIENTS oozegooze_win_search
ENDIF
[FUNCTION oozegooze_win_search]
IF (<ISEVENT.e_event_oozegooze>)
oozegooze_win
ENDIF
[CHARDEF c_event_ooze]
NAME=Ooze Gooze
ID=c_slime
DAM=1
CAN=MT_WALK
ON=@CREATE
TAG.OVERRIDE.MOVERATE= 55
COLOR=020
FLAGS=<FLAGS> | statf_invul
STR={30 50}
DEX=90
INT={10 30}
WRESTLING=100.0
NPC=brain_monster
FAME=250
KARMA=-4000
ON=@HIT
IF !(<SRC.ISGM>)
SRC.oozegooze_capture
ENDIF
[EVENTS e_event_oozegooze]
ON=@LOGIN
IF !(<VAR.OOZEGOOZE>)
oozegooze_cancel
ELSE
VAR.OOZEGOOZE_PLAYERS += 1
ENDIF
ON=@LOGOUT
VAR.OOZEGOOZE_PLAYERS += -1
ON=@SPELLSELECT
IF !(<ISGM>)
SRC.SYSMESSAGE=You can't use spells here.
RETURN 1
ENDIF
ON=@SKILLSELECT
IF !(<ISGM>)
IF (<ARGN>==21) || (<ARGN>==47)
SRC.SYSMESSAGE=You can't hide here.
RETURN 1
ENDIF
ENDIF
ON=@HITTRY
RETURN 1
She always worked (at least on the first server where we used), but now of us in this problem spwan Monster
|
|
04-08-2014 01:32 AM |
|
|