on=@deathcorpse
serv.b <uid.<attack.max>.name> en cok damage'i verdi.
serv.b <attacker> kisi saldirdi
for 0 <eval <attacker>-1>
obj=<attacker.<dlocal._for>>
serv.b attackerlar : <obj.name>
endif
endfor
[function binekle]
serv.newnpc c_shire
new.p <src.p>
local.binekuid <new.uid>
serv.newitem i_memory
new.attr 04
new.more1 04
new.more2 <serv.time>
new.morep <uid.<local.binekuid>.p>
new.color memory_ipet
new.timer -1
new.link <src.uid>
new.cont <local.binekuid>
try uid.<local.binekuid>.flags <uid.<local.binekuid>.flags>&statf_pet
try uid.<local.binekuid>.update