daedelus 
Journeyman

Posts: 69
Likes Given: 0
Likes Received: 2 in 1 posts
Joined: Aug 2012
Reputation: 0
![]()
|
duel pit fails
Spanish:
Intente crear un sistema automático poniendo simplemente .duelpit y que cree en cada una de las coordenadas una piedra para ingresar al duelpit. Después de 10 minutos se debería borrar. Pero no esta funcionando, porque a los 10 minutos no se borra y no crea todas las piedras que yo especifique.
English:
I Try to creating an automated system by simply putting. Duelpit and believes in each of the coordinates to enter a stone of duelpit. After 10 minutes the stone should be deleted. But not working, because after 10 minutes the stone don't delete.
The another problem is that, the stones don't be create completly, after ten minutes, the announcement again without put .duelpit.
Code:
[ITEMDEF I_GRAVEDUEL]
ID=I_GRAVE_STONE
NAME=Entrada DUEL PIT
CATEGORY=Mayo
SUBSECTION=Duel
DESCRIPTION=Piedra del Duel
on=@create
ATTR=ATTR_MOVE_NEVER
COLOR=0480
ON=@Dclick
SRC.GO 6074,449,-22
SRC.EVENTS +E_DUEL
[EVENTS E_DUEL]
SRC.TAG.OLDNAME=<SRC.NAME>
SRC.TAG.OLDCOLOR=<SRC.COLOR>
SRC.TAG.OLDKARMA=<SRC.KARMA>
SRC.TAG.OLDFAME=<SRC.FAME>
SRC.TAG.OLDKILLS=<SRC.KILLS>
SRC.NAME=<SRC.NAME>[DUEL PIT]
ON=@DEATH
SRC.GO 6091,442,-22
SRC.HITS=<SRC.STR>
RETURN 1
[ITEMDEF I_GRAVEDUEL2]
ID=I_GRAVE_STONE
NAME=Salida DUEL PIT
CATEGORY=Mayo
SUBSECTION=Duel
DESCRIPTION=Piedra del Duel 2
ON=@Dclick
SRC.GO 1336,1997,5,0
SRC.EVENTS -E_DUEL
SRC.EVENTS +E_DUEL2
[EVENTS E_DUEL2]
SRC.NAME=<SRC.TAG.OLDNAME>
SRC.COLOR=<SRC.TAG.OLDCOLOR>
SRC.KARMA=<SRC.TAG.OLDKARMA>
SRC.FAME=<SRC.TAG.OLDFAME>
SRC.KILLS=<SRC.TAG.OLDKILLS>
SRC.EVENTS -E_DUEL2
[ITEMDEF I_RESU]
ID=04
NAME=Ankh
ON=@CREATE
COLOR=COLOR_ICE
ON=@Dclick
SRC.RESURRECT
[ITEMDEF I_RESU2]
ID=05
NAME=Ankh
ON=@CREATE
COLOR=COLOR_ICE
ON=@Dclick
SRC.RESURRECT
[PLEVEL 4]
DUELPIT
[FUNCTION DUELPIT] //The first stone (brit) only can announce the event.
SERV.NEWITEM= I_GRAVEDUEL
NEW.P= 1431,1695,0,0 //BRIT
NEW.TIMER=1
NEW.MORE=10
SERV.B @0466 Se han creado las piedras para el Duel Pit!
ON=@TIMER
TIMER=60
IF ( <EVAL <MORE> > == 0 )
TIMER=-1
REMOVE <EVAL <TAG0.UID_ENTRADA> >
SERV.B @0466 Se han creado las piedras para el Duel Pit!
TAG0.UID_ENTRADA=
return 1
ELSE
SERV.B @0466 Quedan <MORE> minutos para que comience el Duel Pit.
MORE=<MORE>-1
return 1
IF (<MORE> == 0)
SERV.B @0466 Se cerro el acceso al duel pit.
REMOVE
ENDIF
SERV.NEWITEM= I_GRAVEDUEL
NEW.P= 2504,562,0,0 //MINOC
NEW.TIMER=1
NEW.MORE=10
ON=@TIMER
TIMER=60
IF ( <EVAL <MORE> > == 0 )
TIMER=-1
REMOVE <EVAL <TAG0.UID_ENTRADA> >
TAG0.UID_ENTRADA=
return 1
ELSE
MORE=<MORE>-1
return 1
IF (<MORE> == 0)
REMOVE
ENDIF
SERV.NEWITEM= I_GRAVEDUEL
NEW.P= 577,2131,0,0 //SKARA BRAE
NEW.TIMER=1
NEW.MORE=10
ON=@TIMER
TIMER=60
IF ( <EVAL <MORE> > == 0 )
TIMER=-1
REMOVE <EVAL <TAG0.UID_ENTRADA> >
TAG0.UID_ENTRADA=
return 1
ELSE
MORE=<MORE>-1
return 1
IF (<MORE> == 0)
REMOVE
ENDIF
SERV.NEWITEM= I_GRAVEDUEL
NEW.P= 4472,1178,0,0 //MOONGLOW
NEW.TIMER=1
NEW.MORE=10
ON=@TIMER
TIMER=60
IF ( <EVAL <MORE> > == 0 )
TIMER=-1
REMOVE <EVAL <TAG0.UID_ENTRADA> >
TAG0.UID_ENTRADA=
return 1
ELSE
MORE=<MORE>-1
return 1
IF (<MORE> == 0)
REMOVE
ENDIF
SERV.NEWITEM= I_GRAVEDUEL
NEW.P= 2234,1198,0,0 //COVE
NEW.TIMER=1
NEW.MORE=10
ON=@TIMER
TIMER=60
IF ( <EVAL <MORE> > == 0 )
TIMER=-1
REMOVE <EVAL <TAG0.UID_ENTRADA> >
TAG0.UID_ENTRADA=
return 1
ELSE
MORE=<MORE>-1
return 1
IF (<MORE> == 0)
REMOVE
ENDIF
SERV.NEWITEM= I_GRAVEDUEL
NEW.P= 5674,3142,12,0 //PAPUA
NEW.TIMER=1
NEW.MORE=10
ON=@TIMER
TIMER=60
IF ( <EVAL <MORE> > == 0 )
TIMER=-1
REMOVE <EVAL <TAG0.UID_ENTRADA> >
TAG0.UID_ENTRADA=
return 1
ELSE
MORE=<MORE>-1
return 1
IF (<MORE> == 0)
REMOVE
ENDIF
SERV.NEWITEM= I_GRAVEDUEL
NEW.P= 2893,3475,15,0 //SERPENT'S HOLD
NEW.TIMER=1
NEW.MORE=10
ON=@TIMER
TIMER=60
IF ( <EVAL <MORE> > == 0 )
TIMER=-1
REMOVE <EVAL <TAG0.UID_ENTRADA> >
TAG0.UID_ENTRADA=
return 1
ELSE
MORE=<MORE>-1
return 1
IF (<MORE> == 0)
REMOVE
ENDIF
SERV.NEWITEM= I_GRAVEDUEL
NEW.P= 2723,2188,0,0 //BUCCANNER'S DEN
NEW.TIMER=1
NEW.MORE=10
ON=@TIMER
TIMER=60
IF ( <EVAL <MORE> > == 0 )
TIMER=-1
REMOVE <EVAL <TAG0.UID_ENTRADA> >
TAG0.UID_ENTRADA=
return 1
ELSE
MORE=<MORE>-1
return 1
IF (<MORE> == 0)
REMOVE
ENDIF
SERV.NEWITEM= I_GRAVEDUEL
NEW.P= 5222,185,5,0 //WIND
NEW.TIMER=1
NEW.MORE=10
ON=@TIMER
TIMER=60
IF ( <EVAL <MORE> > == 0 )
TIMER=-1
REMOVE <EVAL <TAG0.UID_ENTRADA> >
TAG0.UID_ENTRADA=
return 1
ELSE
MORE=<MORE>-1
return 1
IF (<MORE> == 0)
REMOVE
ENDIF
SERV.NEWITEM= I_GRAVEDUEL
NEW.P= J1324,3780,0,0 //JHELOM
NEW.TIMER=1
NEW.MORE=10
ON=@TIMER
TIMER=60
IF ( <EVAL <MORE> > == 0 )
TIMER=-1
REMOVE <EVAL <TAG0.UID_ENTRADA> >
TAG0.UID_ENTRADA=
return 1
ELSE
MORE=<MORE>-1
return 1
IF (<MORE> == 0)
REMOVE
ENDIF
//SERV.NEWITEM= I_GRAVEDUEL
//NEW.P= MAGINCIA ADD LATER
SERV.NEWITEM= I_GRAVEDUEL
NEW.P= 3690,2522,0,0 //OCCLO
NEW.TIMER=1
NEW.MORE=10
ON=@TIMER
TIMER=60
IF ( <EVAL <MORE> > == 0 )
TIMER=-1
REMOVE <EVAL <TAG0.UID_ENTRADA> >
TAG0.UID_ENTRADA=
return 1
ELSE
MORE=<MORE>-1
return 1
IF (<MORE> == 0)
REMOVE
ENDIF
SERV.NEWITEM= I_GRAVEDUEL
NEW.P= 1822,2825,0,0 //TRINSIC
NEW.TIMER=1
NEW.MORE=10
ON=@TIMER
TIMER=60
IF ( <EVAL <MORE> > == 0 )
TIMER=-1
REMOVE <EVAL <TAG0.UID_ENTRADA> >
TAG0.UID_ENTRADA=
return 1
ELSE
MORE=<MORE>-1
return 1
IF (<MORE> == 0)
REMOVE
ENDIF
SERV.NEWITEM= I_GRAVEDUEL
NEW.P= 636,859,0,0 //YEW
NEW.TIMER=1
NEW.MORE=10
ON=@TIMER
TIMER=60
IF ( <EVAL <MORE> > == 0 )
TIMER=-1
REMOVE <EVAL <TAG0.UID_ENTRADA> >
TAG0.UID_ENTRADA=
return 1
ELSE
MORE=<MORE>-1
return 1
IF (<MORE> == 0)
REMOVE
ENDIF
[EoF]
Thanks
p.s.: Sorry for my english.
(This post was last modified: 08-15-2012 12:16 AM by daedelus.)
|
|