[plevel 1]
yemekzehirle
[function yemekzehirle]
if (<src.poisoning> <98.0)
src.sysmessage @049,,1 Beceriniz Yetmiyor !
return 1
elseif !(<src.restest 1 i_zehir_bottle>)
src.sysmessage @049,,1 Zehir Siseniz Yok !
return 1
elseif !(<src.findtype.t_food>)
src.sysmessage @049,,1 Cantanizda Yemek Yok !
return 1
else
targetf f_zehirle
src.sysmessage @049,,1 Neyi Zehirliceksiniz ?
endif
[function f_zehirle]
obj=<argo>
if !(<obj.type>=t_food)
src.sysmessage @049,,1 Bu Bir Yemek Degil !
return 1
else
ctag0.dispid=<obj.dispid>
obj.remove
serv.newitem i_zehirli_yemek
new.bounce
new.dispid <ctag0.dispid>
src.sysmessage @049,,1 <obj.name>'yi Zehirlediniz !
src.consume 1 i_zehir_bottle
endif
[itemdef i_zehirli_yemek]
id i_bread_loaf
name Yemek
type t_script
on=@create
color 00
on=@dclick
src.sysmessage @049,,1 Zehirlendiniz !
src.poison 500
remove
return 1
on=@click
message <name>
return 1
[itemdef i_zehir_bottle]
id i_bottle
name Yemek Zehirleyici
type t_script
on=@create
color 040
attr attr_magic
on=@dclick
src.sysmessage @049,,1 Bunu Bu Sekilde Kullanamassiniz.
return 1
on=@click
message <name>
return 1
0
Total votes: 0
Yorumlar (0)