[plevel 2]
binektenindir
[function binektenindir]
src.sysmessage @0481 Kimi Binekten Indiriceksiniz?
target
ON=@TARGON_CHAR
if (<src.account.plevel> < <targ.account.plevel>)
src.sysmessage @0481 Sizden Rutbeli Kisiyi Binekten Indiremezsiniz.
else
src.newitem i_inicekvar
src.targ.equip
endif
[itemdef i_inicekvar]
name=atdusur
id=i_gold
type=t_eq_script
weight=0
layer=layer_special
On=@Equip
if (<src.findlayer(25)>)
SRC.dclick
src.say @0481 Binekten Indirilir
ENDIF
On=@UnEquip
if !(<cont.flags>&statf_dead)
cont.flags <cont.flags>&~04
endif
On=@Timer
attr attr_decay
remove
return 1
ON=@TARGON_CHAR
if (<src.account.plevel> < <targ.account.plevel>)
src.sysmessage @0481 Sizden Rutbeli Kisiyi Binekten Indiremezsiniz.
else
src.targ.dismount
endif
[function binektenindir]
src.sysmessage @0481 Kimi Binekten Indiriceksiniz?
targetf f_binektenindir
[function f_binektenindir]
if (<src.account.plevel> < <argo.account.plevel>)
src.sysmessage @0481 Sizden Rutbeli Kisiyi Binekten Indiremezsiniz.
else
serv.newitem i_inicekvar
argo.equip
endif
[function binektenindir]
src.sysmessage @0481 Kimi Binekten Indiriceksiniz?
targetf f_binektenindir
[function f_binektenindir]
if (<src.account.plevel> < <argo.account.plevel>)
src.sysmessage @0481 Sizden Rutbeli Kisiyi Binekten Indiremezsiniz.
else
argo.dismount
endif
[function sayla]
src.sysmessage kimi saylayacaz ?
targetf sayla_2
[function sayla_2]
argo.say sayladim
return 1