[ITEMDEF i_staff_taming]
ID=i_staff_gnarled
NAME=taming staff
TYPE=t_weapon_mace_staff
VALUE=254
TWOHANDS=Y
LAYER=2
WEIGHT=10
DAM=5,10

On=@Create
color 2001
more2 0
timer -1
hitpoints 5

On=@DClick
if (<topobj.uid> != <src.uid>)
src.sysmessage Bunu kullanabilmeniz icin uzerinizde olmali.
elseif (<src.flags>&statf_hidden) || (<src.flags>&statf_invisible)
src.sysmessage Gizlenmis durumdayken bunu kullanamazsiniz.
elseif (<src.targ.region.defname> == a_townZoo)
src.sysmessage Bu bolgede taming yasaktir.
elseif (<timer> == -1)
target Hangi hayvani ehlilestirmek istiyorsunuz?
endif
return 1

On=@UnEquip
more2 0
timer -1
link -1

On=@Timer
if (<cont.flags>&statf_hidden) || (<cont.flags>&statf_invis)
cont.sysmessage Gizlenmis durumda olmaz
if (<cont.distance <link>> > 3)
cont.sysmessage Hayvana yeterince yakin degilsiniz.
link -1
more2 0
return 1
elseif !(<cont.canseelos <link>>)
cont.sysmessage @0481,6,6,0 Hayvani goremiyorsunuz
link -1
more2 0
return 1
elseif (<cont.distance <link.memoryfindtype.memory_ispawned.link.uid>> > 3)
cont.sysmessage Bu hayvan yuvasindan uzaklasmis.
link -1
more2 0
return 1

elseif (<more2> < 6)
dorand 10
cont.say Gel <link.name>, gel..
cont.say Sana zarar vermeyecegim <link.name>..
cont.say Sakin ol, <link.name>.
cont.say Her zaman senin gibi bir <link.name> sahibi olmak istemistim..
cont.say Cok tatlisin, <link.name>.
cont.say Gel bir tanem, gel canim..
cont.say Seni incitmeyecegim, <link.name>.
cont.say Arkadasin olmak istiyorum.
cont.say Gel <cont.sex babana/annene>, <link.name>.
cont.say Gel <link.name>, gel <cont.sex babana/annene>.
enddo
dorand 2
cont.anim 17
cont.anim 19
enddo
timer 2
more2 (<more2> + 1)
return 1
endif
more2 0

if !(<link.npc> == 1)
cont.sysmessage Bunu ehlilestiremezsiniz.
return 1
endif

if (rand(100) < 75)
if (<link.memoryfindtype.memory_ispawned>)
link.memoryfindtype.memory_ispawned.remove
endif
link.karma -50
link.memorydel <cont.uid>
link.newitem i_memory
link.act.attr 04
link.act.more1 04
link.act.more2 <serv.time>
link.act.morep <link.p>
link.act.color memory_ipet
link.act.timer -1
link.act.link <cont.uid>
link.act.cont <link.uid>
link.flags <link.flags>&statf_pet
cont.sysmessage <link.name> sizi sahibi olarak kabul etti.
if ((<cont.skilllock[35]> == 0) && (<cont.skilltotal> < 700.0))
if (<cont.taming> < 30.0)
if (rand(3) == 1)
cont.taming (<cont.taming> + 1)
endif
elseif (<cont.taming> < 50.0)
if (rand(6) == 1)
cont.taming (<cont.taming> + 1)
endif
elseif (<cont.taming> < 75.0)
if (rand(12) == 1)
cont.taming (<cont.taming> + 1)
endif
elseif (<cont.taming> < 100.0)
if (rand(24) == 1)
cont.taming (<cont.taming> + 1)
endif
endif
endif

if ((<cont.skilllock[2]> == 0) && (<cont.skilltotal> < 700.0))
if (<cont.animallore> < 30.0)
if (rand(2) == 1)
cont.animallore (<cont.animallore> + 1)
endif
elseif (<cont.animallore> < 50.0)
if (rand(4) == 1)
cont.animallore (<cont.animallore> + 1)
endif
elseif (<cont.animallore> < 75.0)
if (rand(8) == 1)
cont.animallore (<cont.animallore> + 1)
endif
elseif (<cont.animallore> < 100.0)
if (rand(16) == 1)
cont.animallore (<cont.animallore> + 1)
endif
endif
endif

link.tag.tamer <cont.uid>
link -1
else
cont.sysmessage Hayvani ehlillestirmeyi basaramadiniz.
link -1
endif
return 1

On=@TargOn_Char
if !(<src.targ.region.defname> == a_townZoo)
if ((<src.targ.npc> == 1)
if !(<src.targ.canseelos>)
src.sysmessage Hayvana ulasamiyorsunuz.
elseif (<src.targ.distance> > 3)
src.sysmessage Hayvana yeterince yakin degilsiniz.
elseif (<src.targ.memoryfindtype.memory_ipet>)
if (<src.targ.memoryfindtype.(memory_ipet|memory_guard).link> == <src.uid>)
src.sysmessage <src.targ.name> zaten size ait.
src.targ.flags <src.targ.flags>&statf_pet
else
src.sysmessage <src.targ.name> bir baskasina ait.
endif
elseif (<src.targ.memoryfindtype.memory_fight>)
src.sysmessage Hayvan su an musait degil.
elseif (<src.targ.memoryfindtype.memory_war_targ.link> == <src.uid>)
src.sysmessage Hayvan su an size cok kizgin.
elseif (<src.targ.findid.i_rune_summon_creature>)
src.sysmessage Buyu ile yaratilmis hayvanlari ehlilestiremezsiniz.
elseif (0<src.targ.tag.tamer> == 0<src.uid>) // tamerlar elele bug-free dunyaya
src.sysmessage Hayvan artik sizi umursamiyor.
elseif (<src.taming> < <src.targ.taming>)
src.anim 19
src.sysmessage <src.targ.name> icin taming skilliniz yeterli degil. (gerekli skill: <src.targ.taming>)
elseif (<src.animallore> < <src.targ.animallore>)
src.anim 19
src.sysmessage <src.targ.name> icin animal lore skilliniz yeterli degil. (gerekli skill: <src.targ.animallore>)
else // tame etmeye ba$la...
link <src.targ.uid>
src.anim 19
timer 2
endif
else
src.sysmessage Bunu ehlillestiremezsiniz.
endif
else
src.sysmessage Bu bolgede taming yasaktir.
endif
return 1

On=@TargOn_Item
return 1

,
13:40:ERROR:(tstaff.scp,342)Undefined symbol ''