Selam bir konuda yardımınıza ihtiyacım var.
Kod:
on=@Select
if (<src.IsTimerf.F_Taming>)
src.Sysmessage @38,,1 Bir önceki Tame işlemi devam ediyor. Iptal etmek için (Tab) tuşunu kullanabilirsiniz.
return 1
elif (<src.dcTag._Tame> >= 5)
src.cTag._Tame =
endif
on=@Start
if (<targ.Owner> == <SRC>)
src.Sysmessage @044,,1 <targ.Name> zaten size ait.
elif ((<targ.Owner>) && (<targ.Owner> != <SRC>)
src.Sysmessage @38,,1 <targ.Name> başkasına ait.
elif (<targ.Brain> != brain_Animal)
src.Sysmessage @38,,1 Sadece binilebilir hayvanlar.
elif (<src.distance <targ>> > 3)
src.Sysmessage @38,,1 Tame için uzak.
elif (<targ.memoryfindtype.memory_fight>)
src.Sysmessage @38,,1 Hayvan kızgın görünüyor.
elif (<targ.memoryfindtype.memory_war_targ.link> == <src.Uid>)
src.Sysmessage @38,,1 Hayvan şu an size cok kızgın.
elif (<targ.distance <targ.spawnitem>> > 5)
src.Sysmessage @38,,1 Hayvan yuvasından uzaklaşmış.
else
src.Sysmessage @0785,,1 Tame başlatıldı.
src.cTag._Tamer = <TARG>
src.Timerf 1,f_Taming
src.Events +e_Taming
endif
return 1
[events e_Taming]
on=@Hittry
src.Trigger @UserWarMode
on=@SpellCast
src.Trigger @UserWarMode
on=@Gethit
src.Trigger @UserWarMode
on=@Death
src.Trigger @UserWarMode
on=@UserWarMode
src.Sysmessage @38,,1 Tame iptal edildi.
src.Timerf Stop,f_Taming
src.Events -e_Taming
src.cTag._Tamer =
src.cTag._Tame =
return 1
[function f_Taming]
ref1 = <src.cTag._Tamer>
if (<ref1.distance <ref1.spawnitem>> > 5)
src.Sysmessage @38,,1 Hayvan yuvasından uzaklaşmış.
src.Trigger @UserWarMode
return 1
elif (<ref1.distance <src>> > 3)
src.Sysmessage @38,,1 Hayvan sana uzak.
src.Trigger @UserWarMode
return 1
endif
if !(<src.dcTag._Tame> >= 5)
dorand 10
src.Say @51,,1 Gel <ref1.Name>, gel..
src.Say @51,,1 Sana zarar vermeyeceğim <ref1.Name>..
src.Say @51,,1 Sakin ol, <ref1.Name>.
src.Say @51,,1 Her zaman senin gibi bir <ref1.Name> sahibi olmak istemiştim..
src.Say @51,,1 Cok tatlısın, <ref1.Name>.
src.Say @51,,1 Gel bir tanem, gel canım.
src.Say @51,,1 Seni incitmeyeceğim, <ref1.Name>.
src.Say @51,,1 Arkadaşın olmak istiyorum.
src.Say @51,,1 Gel <src.Sex babana/annene>, <ref1.Name>.
src.Say @51,,1 Gel <ref1.Name>, gel <src.Sex babana/annene>.
enddo
dorand 2
src.Anim 17
src.Anim 19
enddo
src.Face = <ref1>
src.cTag0._Tame ++
endif
if (<src.dcTag._Tame> >= 5)
if (<R5> == 1)
src.Sysmessage @38,,1 Tame başarısız oldu.
else
src.Sysmessage @0785,,1 <ref1.Name>, seni arkadaş kabul etti.
ref1.SpawnItem.DelObj = <ref1>
ref1.f_MakePetOf <src>
endif
src.Events -e_Taming
src.cTag._Tamer =
endif
if (<src.dcTag._Tame> >=5)
src.Timerf Stop,f_Taming
else
src.Timerf 2,f_Taming
endif
Bu işlemle hayvan evcilleştirildikten sonra neden hala spawn'a bağlı görünüyor? Spawn resetlendiğinde evcilleştirilmiş hayvan yok oluyor.
56c üzerinde memory_Ispawned hafızası kaldırılış yerine SpawnItem komutu getirilmiş fakat bu komut sadece okunabilir yazdırılabilir değil. Bu konu hakkında bir fikre sahip olan var mı? Buna çözüm olarak bir şey yapılabilir mi?
Kod:
ref1.SpawnItem.DelObj = <ref1> // Revizyonda yazmışlar baktığım halde gözden kaçırmışım yeni fark ettim bu komutla kaldırabiliyor muşuz. :)