[events e_bleeding]
On=@Hit
if (<src.flags>&statf_stone) || (<src.region.safe>)
return 0
elseif (<findlayer(1).type> == t_weapon_sword) && (<swordsmanship> >= 98.0)
if (rand(10) <= <eval (<tactics> / 20)>) && !(<src.findid.i_bleeding>) && !(<src.findid.i_bleeding2>)
src.damage {4 8}
src.hits (<src.hits> - 9)
src.skill fail
var.act <src.act.uid>
src.newitem i_bleeding
new.equip
new.link=<uid>
serv.newitem i_bleeding2
new.equip
new <var.act>
src.sayua 1153,6,6,0 *Olumcul Yara Alir*
return 1
endif
[events e_bleed]
On=@Death
findid.i_bleeding.remove
[itemdef i_bleeding]
name=osman aga bleed
id=i_gold
type=t_eq_script
weight=0
layer=layer_special
On=@Equip
src.events +e_bleed
timer 5
On=@UnEquip
cont.events -e_bleed
if !(<cont.flags>&statf_dead)
endif
On=@Timer
timer 5
cont.sayua 020,6,6,0 *Kan Kaybeder*
cont.damage {3 5} 0001 <link.uid>
cont.hits (<cont.hits> - 9)
attr attr_decay
return 1
[itemdef i_bleeding2]
name=Editin Osman Aga
id=i_gold
type=t_eq_script
weight=0
layer=layer_special
On=@Equip
src.events +e_bleed
timer 30
On=@UnEquip
cont.events -e_bleed
if !(<cont.flags>&statf_dead)
endif
On=@Timer
cont.findid.i_bleeding.remove
attr attr_decay
remove
return 1
[eof]
[itemdef i_halberd_asdsa]
id i_halberd
name asddsa
dam 30,60
speed 35
twohands Y
skill Swordsmanship
type t_weapon_sword
category asdas - Weapons
subsection asdas
description asdas Halberd
On=@Create
morey 100.0
hitpoints {90 91}
COLOR=099b
ON=@click
message @1153 a <name>
return 1
On=@Equip
if (<src.swordsmanship> < 100.0) && (<src.tactics> < 100.0) && (<src.anatomy> < 100.0) && (<src.healing> < 100.0)
src.sysmessage @0785,,1 Bu silahi kullanabilecek kadar yetnekli degilsiniz.
unequip
return 1
else
src.events +e_bleeding
endif
On=@UnEquip
src.events -e_bleeding
[EOF]
[events e_bleeding]
On=@Hit
if (<src.flags>&statf_stone) || (<src.region.safe>) || (<src.isevent.e_delucia>)
return 0
elseif (<findlayer(1).type> == t_weapon_sword) && (<swordsmanship> >= 98.0)
if ((rand(200) <= <eval (<tactics> / 40)>) && !(<src.findid.i_bleeding>) && !(<src.findid.i_bleeding2>)
src.damage {2 4}
src.hits (<src.hits> - 7)
src.skill fail
var.act <src.act.uid>
src.newitem i_bleeding
src.act.equip
src.newitem i_bleeding2
src.act.equip
src.act <var.act>
src.sayua 39,6,6,0 * Yara Alir *
src.sysmessage @0bb2,,1 <name> Tarafindan Yaralandin.
return 1
endif
endif
[events e_bleed]
On=@Death
findid.i_bleeding.remove
[itemdef i_bleeding]
name=Yara [Bleed]
id=i_gold
type=t_eq_script
weight=0
layer=layer_special
On=@Equip
src.events +e_bleed
timer 5
On=@UnEquip
cont.events -e_bleed
if !(<cont.flags>&statf_dead)
endif
On=@Timer
timer 5
cont.sayua 39,6,6,0 * Kan Kaybeder *
cont.damage {2 4}
cont.hits (<cont.hits> - 5)
cont.skill fail
attr attr_decay
return 1
[itemdef i_bleeding2]
name=Yara Bleed2
id=i_gold
type=t_eq_script
weight=0
layer=layer_special
On=@Equip
src.events +e_bleed
timer 31
On=@UnEquip
cont.events -e_bleed
if !(<cont.flags>&statf_dead)
endif
On=@Timer
cont.findid.i_bleeding.remove
attr attr_decay
remove
return 1