// --------------------------------------------------------
// -- Script Adı    : Staff Horse                 --
// -- Scripti Yazan    : Genius --
// -- En Son Düzenleyen    : ----          --
// -- Son Düzenleme Tarihi : 16.03.2008          --
// --------------------------------------------------------

[itemdef i_staff_Horse]
id i_deed
type t_script

on=@click
message @58,,1 [Staff Horse]
message @07a1,,1 Horse
return 1

on=@create
color 0455

on=@dclick
if (<src.account.plevel> < 2)
src.sysmessage @38,,1 Sadece yetkililer staff horse kullanabilir.
remove
return 1
endif
if (<topobj.uid> != <src.uid>)
src.sysmessage @38,,1 Staff horseye sadece çantanızdayken binebilirsiniz.
return 1
endif
if (<src.findlayer.25.uid>)
src.sysmessage @38,,1 Altınızda binek varken staff horse'ye binemezsiniz.
return 1
else
src.events +binekkontrol
src.newnpc c_staff
src.new.p <src.p>
src.new.color <color>
src.new.hits 100
src.new.mount
remove
return 1
endif

[chardef c_staff]
id=c_horse_brown_dk

on=@click
remove
return 1

[events binekkontrol]
on=@dismount
if (<argo.id> == c_staff)
src.newitem i_staff_horse
src.new.color <argo.color>
argo.remove
src.new.bounce
src.events -binekkontrol
return 1
endif

[eof]