Azcorn Cloak

[ITEMDEF I_AZCORN_CLOAK]
ID=i_cape
WEIGHT=10
TYPE=t_clothing
DYE=1
ARMOR=7


ON=@Create
NAME=Azcorns cloak of greater Invisibility
COLOR=02
ATTR=attr_newbie
HITS=9999

ON=@Equip
IF (<SRC.RESTEST 1 i_mem_azcorn2>)
SRC.MESSAGE Tekrar Kullanmak için bekleyiniz RETURN 1
ENDIF

SRC.INVISIBLE=01
SRC.MESSAGE Azcornun güçleri üzerinde olsun
ON=@UNEQUIP
SRC.INVISIBLE=00
SRC.MESSAGE The magic field wears off
IF !<SRC.RESTEST 1 I_MEM_AZCORN2>)
SRC.NEWITEM=i_mem_azcorn2
SRC.ACT.EQUIP
SRC.ACT.TIMER={180 360}
ENDIF


[ITEMDEF I_MEM_AZCORN]
ID=i_memory
TYPE=t_eq_script
NAME=AZCORN ON
CATEGORY=Memory Objects
SUBSECTION=NEVER PLACE!
DESCRIPTION=AZCORN Memory

ON=@CREATE
VAR.LOW=(SRC.STEALTH / 10)
VAR.HIGH=((SRC.STEALTH * 3)/10)
TIMER={<VAR.LOW VAR.HIGH>}

ON=@EQUIP
ATTR=attr_decay | attr_invis


ON=@TIMER
CONT.FINDLAYER(LAYER_CAPE).BOUNCE
CONT.NEWITEM=i_mem_azcorn2
CONT.ACT.TIMER={60 240}
CONT.ACT.EQUIP
REMOVE

[ITEMDEF I_MEM_AZCORN2]
ID=i_memory
TYPE=t_eq_script
NAME=AZCORN OFF
CATEGORY=Memory Objects
SUBSECTION=NEVER PLACE!
DESCRIPTION=AZCORN OFF Memory


ON=@EQUIP
ATTR=attr_decay | attr_invis


ON=@TIMER
REMOVE



[EOF]