Oil Cloth Scpsi Arıyorum.??

[ITEMDEF i_oil_cloth]
DEFNAME=i_oil_cloth
ID=0e21
NAME=oil cloth
RESOURCES=i_cloth
WEIGHT=.1
DYE=0
VALUE=15
SKILLMAKE=TAILORING 74.6, t_sewing_kit
CATEGORY=Items by Professions
SUBSECTION=Tailor
DESCRIPTION=Oil Cloth
TYPE=t_normal

ON=@DClick
if !(<topobj.uid> == <src.uid>)
	src.sysmessage @1100 Bunu ancak cantanizda iken kullanabilirsiniz.
	return 1
endif
	TARGET @0790 Lutfen zehrini gecirmeye calisacaginiz silahi secin.
RETURN 1

ON=@TargOn_Char
	SRC.SYSMESSAGE @1100 Bu bir silah degil.
RETURN 1

ON=@TargOn_Item
IF (<SRC.TARG.UID>==<UID>)
	SRC.SYSMESSAGE @1100 Bu bir silah degil
ELSEIF (<SRC.TARG.morez> > 0)
	SRC.SysMessage @0780 Silahin zehrini gecirdiniz
	SRC.TARG.morez 0
	REMOVE
ELSE
	SRC.SYSMESSAGE @1100 Bu zehirli degil.
ENDIF
RETURN 1

[EOF]

[Function hata]
sysmessage @026,,1 <args>

[ITEMDEF i_oil_cloth]
ID=0ee9
NAME=oil bandage%s
WEIGHT=0.1
VALUE=7
TYPE=T_NORMAL

RESOURCES=1 i_cloth,1 i_oil_flask
SKILLMAKE=TAILORING 74.6, t_sewing_kit

CATEGORY=Items by Professions
SUBSECTION=Tailor
DESCRIPTION=Oil Bandage
TYPE=t_normal

ON=@DClick
if !(<topobj.uid> == <src.uid>)
src.hata Bunu sadece çantanızda kullanabilirsiniz.
return 1
else
target @0481,,1 Hangi silahın zehirini temizleyeceksiniz?
return 1
endif

ON=@TargOn_Char
src.hata Sadece silahların zehiri temizlenebilir.
return 1

ON=@TargOn_Item
if (STRMATCH(t_weapon_*,<src.targ.type>)) && !(<src.targ.type> == t_weapon_mace_staff) && !(STRMATCH(t_weapon_*bow*,<src.targ.type>))
  if (<src.targ.topobj.uid> == <src.uid>)
    if (<src.targ.morez> > 0)
    src.tamam Silahın zehirini temizlediniz.
    src.targ.morez=0
    src.consume 1 i_oil_cloth
    return 1
    else
    src.hata Bu silah zehirli değil.
    return 1
    endif
  else
  src.hata Silaha uzanamıyorsunuz.
  return 1
  endif
else
src.hata Bu bir silah değil.
return 1
endif