[ITEMDEF i_staff_taming]
ID=i_staff_quarter
NAME=Taming Staff
VALUE=290
TWOHANDS=Y
LAYER=2
WEIGHT=10
DAM=5,10
On=@Create
color 2001
attr attr_newbie || attr_decay
hitpoints 99
on=@dclick
if (<src.ctag0.tametekrar> > 0)
src.sys_error Şu anda zaten hayvan evcilleştiriyorsunuz.
elif (<region.safe> == 1)
src.sys_error Korumalı alanlarda bunu kullanamazsınız.
elif (<topobj.uid> != <src.uid>)
src.sys_error Bunu kullanabilmeniz için üzerinizde olmalı.
elif (<src.flags>&statf_hidden) || (<src.flags>&statf_invisible)
src.sys_error Gizlenmiş durumdayken kullanamazsınız.
else
equip
targetf f_tamebasla
src.sys_normal Hangi hayvani evcillestirmek istiyorsunuz?
endif
return 1
[function f_tamebasla]
if !(<argo.npc> == 1)
src.sys_error Bunu evcilleştiremezsiniz.
elif !(<argo.canseelos>)
src.sys_error Hayvana ulaşamıyorsunuz.
elif (<argo.distance> > 3)
src.sys_error Hayvan size uzak kaldı
elif (<argo.owner> == <src.uid>)
src.sys_error <argo.name> zaten sizin.
elif !(<argo.owner> == 0)
src.sys_error <argo.name> nin bir sahibi var.
elif (<argo.memoryfindtype.memory_fight>)
src.sys_error Hayvan şu an müsait değil.
elseif (<argo.memoryfindtype.memory_war_targ.ref1> == <src.uid>)
src.sysmessage @95,,1 Hayvan şu an size çok kızgın.
elseif (<argo.findid.i_rune_summon_creature>)
src.sys_error Büyü ile yaratılmış hayvanları evcilleştiremezsiniz.
elseif (<argo.tag0.tamer> == <src.uid>)
src.sys_error Hayvan artik sizi umursamıyor.
elseif (<src.taming> < <argo.taming>)
src.anim 19
src.sys_error <argo.name>'yi evcilleştirmek için <argo.taming> taming yeteneği gerekmektedir.
elseif (<src.animallore> < <argo.animallore>)
src.anim 19
src.sys_error <argo.name>'yi evcilleştirmek için <argo.taming> animal lore yeteneği gerekmektedir.
else
src.anim 19
ctag0.tametekrar 1
timerf 2,f_tamebaslat <argo.uid>
face <argo>
endif
return 1
[function f_tamebaslat]
ref1 <args>
src.events e_taming
if (<src.tag0.tamebozuldu> == 1)
src.sys_error Hayvan evcilleştirme işleminiz bozuldu
ctag0.tametekrar 0
events -e_taming
return 1
elif !(<ref1.canseelos>)
sys_error Hayvana ulaşamıyorsunuz.
ctag0.tametekrar 0
events -e_taming
return 1
elif (<ref1.owner> == <src.uid>)
sys_error <argo.name> zaten sizin.
ctag0.tametekrar 0
events -e_taming
return 1
elif !(<ref1.owner> == 0)
sys_error <argo.name> nin bir sahibi var.
ctag0.tametekrar 0
events -e_taming
return 1
elif !strmatch('<findlayer.2.baseid>','i_staff_taming')
sys_error Elinizde Taming Staff yokken hayvan evcilleştiremezsiniz.
ctag0.tametekrar 0
events -e_taming
return 1
elif (<ref1.memoryfindtype.memory_ispawned.ref1.uid>)
if (<ref1.distance <ref1.memoryfindtype.memory_ispawned.ref1.uid>> > 3)
sys_error Bu hayvan yuvasından uzakta.
ctag0.tametekrar 0
events -e_taming
return 1
endif
elif (<flags>&statf_hidden) || (<flags>&statf_invisible)
sys_error Gizlenmiş durumdayken evcilleştiremezsiniz.
ctag0.tametekrar 0
events -e_taming
return 1
elif !(<ref1.npc> == 1)
sys_error Bunu evcilleştiremesiniz.
ctag0.tametekrar 0
events -e_taming
return 1
endif
if !(<ctag0.tametekrar> == 7)
dorand 7
local.msg Sana zarar vermeyeceğim.
local.msg Her zaman senin gibi <ref1.name>'m olsun istemiştim.
local.msg Sakin ol <ref1.name>.
local.msg Arkadaşın olmak istiyorum.
local.msg Çok tatlısın <ref1.name>.
Local.msg Yeni sahibin olmak istiyorum.
local.msg Sana çok iyi davranıcağım, söz veriyorum.
enddo
say_norm <local.msg>
face <ref1>
ctag0.tametekrar += 1
timerf 2,f_tamebaslat <ref1>
dorand 2
anim 17
anim 19
enddo
else
if (rand(100) < 75)
if (<ref1.memoryfindtype.memory_ispawned>)
ref1.memoryfindtype.memory_ispawned.remove
endif
ref1.karma -50
ref1.memorydel <uid>
newitem i_memory
new.attr 04
new.more1 04
new.more2 <serv.time>
new.morep <ref1.p>
new.color memory_ipet
new.timer -1
new.link <uid>
new.cont <ref1.uid>
ref1.flags <ref1.flags>&statf_pet
ref1.flags <ref1.flags>&statf_pet
/////////////////////////////////////
//// SKİLL GAİN MEVZULARI BURAYA ////
/////////////////////////////////////
sys_normal <ref1.name> sizi sahibi olarak kabul etti.
ctag0.tametekrar 0
events -e_taming
if (<ref1.id>==c_cow_brown) || (<ref1.id>==c_cow_bw) || (<ref1.id>==c_bull_brown_dk) || (<ref1.id>==c_bull_brown_lt) || (<ref1.id>==c_pig_big) || (<ref1.id>==c_sheep_woolly) || (<ref1.id>==c_sheep_shorn) || (<ref1.id>==c_dog) || (<ref1.id>==c_cat) || (<ref1.id>==c_chicken) || (<ref1.id>==c_pig) || (<ref1.id>==c_goat) || (<ref1.id>==c_sheep_woolly) || (<ref1.id>==c_bull_brown_dk))
timerf 30,ref1.remove
src.sys_error 30 saniye içinde Küçültmezseniz, <ref1.name> Silinicektir!
endif
return 1
else
sys_error <ref1.name> evcilleştirilemedi
ctag0.tametekrar 0
events -e_taming
return 1
endif
return 1
endif
[function memorydel] // memory silen loop
if (0<args>)
if (<findid.i_memory.link> == <args>)
findid.i_memory.remove
memorydel <args>
endif
endif
[events e_taming]
on=@gethit
tag0.tamebozuldu 1
on=@hit
src.tag0.tamebozuldu 1
on=@death
src.tag0.tamebozudu 1
on=@spelleffect
obj.tag0.tamebozuldu 1
on=@spellcast
obj.tag0.tamebozuldu 1
0 Total votes: 0
Yorumlar (0)