Yapan:MAestro
Tarih:22 Ekim 2009
[ITEMDEF i_sacma_robe]
ID=i_deathshroud
NAME=Admin Robe
TYPE=t_eq_script
ON=@Create
ATTR attr_decay
on=@click
message @96 Alaca Robe
return 1
ON=@DClick
EQUIP
RETURN 1
ON=@Equip
flash flashlink
TIMER 1
ON=@UnEquip
flash flashend
TIMER -1
ON=@Timer
IF !(0<TOPOBJ.ISCHAR>) || (0<TOPOBJ.NPC>)
RETURN 0
ENDIF
TAG.COLOR <EVAL {0775 0834}>
flash flashlayer
TIMER <EVAL {3 5}>
RETURN 1
[FUNCTION flash]
TRYP 0 <ARGS> layer_robe
TRYP 0 <ARGS> layer_horse
[FUNCTION flashlink]
IF (<SRC.FINDLAYER.<ARGS>>)
TRYP 0 TAG.<ARGS> <SRC.FINDLAYER.<ARGS>.UID>
TRYP 0 TAG.<ARGS>.COLOR <SRC.FINDLAYER.<ARGS>.COLOR>
ENDIF
[FUNCTION flashlayer]
IF (<CONT.UID.<TAG.<ARGS>>.ISITEM>)
TRYP 0 CONT.UID.<TAG.<ARGS>>.COLOR <TAG.COLOR>
ENDIF
[FUNCTION flashend]
IF (<CONT.UID.<TAG.<ARGS>>.ISITEM>)
TRYP 0 CONT.UID.<TAG.<ARGS>>.COLOR <TAG.<ARGS>.COLOR>
TRYP 0 TAG.<ARGS>
TRYP 0 TAG.<ARGS>.COLOR
ENDIF
[eof]
[function f_renkdegis]
if (<dctag0.degissin> == 1)
local.renk=<r1,1000>
obj=<uid>
obj.findlayer(layer_robe).color=<dlocal.renk>
obj.findlayer(layer_horse).color=<dlocal.renk>
obj.color=<dlocal.renk>
obj.updatex
obj.timerf 3,f_renkdegis
else
src.sysmessage @1153 islem bitti
endif
///robeye ekleyin
on=@equip
src.ctag.degissin=1
f_renkdegis
return 0
on=@unequip
src.ctag.degissin=
return 0
[defname color_flash]
color_flash { 084a 1 07d4 1 0846 1 06af 1 04dc 1 0840 1 0455 1 04c3 1 08ad 1 }
[function f_renkdegis]
if (<dctag0.degissin> == 1)
//local.renk=<r1,1000>
local.renk=<def.color_flash>
obj=<uid>
obj.findlayer(layer_robe).color=<dlocal.renk>
obj.findlayer(layer_horse).color=<dlocal.renk>
obj.color=<dlocal.renk>
obj.updatex
obj.timerf 3,f_renkdegis
else
src.sysmessage @1153 islem bitti
endif
///robeye ekleyin
on=@equip
src.ctag.degissin=1
f_renkdegis
return 0
on=@unequip
src.ctag.degissin=
return 0