[ITEMDEF 02006]
//corpse (all corpses normally are here)
DEFNAME=i_corpse
TYPE=T_CORPSE
TDATA2=09
on=@dclick
if (<link> == <src.uid>)
//sorun
return 1
endif
on=@dclick
if (<link> == <src.uid>)
obj <src>
for 0 <eval <count>-1>
findcont.<dlocal._for>.cont <obj.findlayer.21>
endfor
return 1
endif
on=@itemdclick
if <act.type>==t_corpse
forcont <act> 0
cont=<src.findlayer(layer_pack)>
endfor
endif
on=@dclick
if (<link> == <src.uid>)
ref1 <src>
for <eval <count>-1> 0
ref2=<findcont.<dlocal._for>.uid>
if !(<ref2.type> == t_hair) && !(<ref2.type> == t_beard)
ref2.cont <ref1.findlayer.21>
endif
endfor
endif
on=@dclick
if (<link> == <src.uid>)
ref1 <src>
for <eval <count>-1> 0
ref2=<findcont.<dlocal._for>.uid>
if !(<ref2.type> == t_hair) && !(<ref2.type> == t_beard)
ref2.cont <ref1.findlayer.21>
ref1.giveitem
endif
endfor
endif
[FUNCTION giveitem]
?
[FUNCTION giveitem]
FOR 0 12
IF !(<isempty <argv[<dlocal._for>]>>)
serv.newitem <argv[<dlocal._for>]>
equip <new>
ENDIF
ENDFOR
on=@dclick
if (<link> == <src.uid>)
ref1 <src>
for <eval <count>-1> 0
ref2=<findcont.<dlocal._for>.uid>
if !(<ref2.type> == t_hair) && !(<ref2.type> == t_beard)
ref2.cont <ref1.findlayer.21>
ref1.giveitem i_xxx
endif
endfor
endif
[FUNCTION giveitem]
FOR 0 12
IF !(<isempty <argv[<dlocal._for>]>>)
serv.newitem <argv[<dlocal._for>]>
equip <new>
ENDIF
ENDFOR
serv.newitem <argv[<dlocal._for>]>
src.findid.<argv[<dlocal._for>]>.equip
on=@dclick
if (<link> == <src.uid>)
ref1 <src>
for <eval <count>-1> 0
ref2=<findcont.<dlocal._for>.uid>
if !(<ref2.type> == t_hair) && !(<ref2.type> == t_beard)
ref2.cont <ref1.findlayer.21>
ref1.giveitem <ref2>
endif
endfor
endif
[FUNCTION giveitem]
FOR 0 12
IF !(<isempty <argv[<dlocal._for>]>>)
src.findid.<argv[<dlocal._for>]>.equip
ENDIF
ENDFOR