///////////////////////////////////////////////////////////////////////
// *Scripter Name : Raskol Serna
// *Shard Name : The Rosario Game
// *Shard Address : www.rosario.gen.tr
// *Personal Address : www.raskolserna.com
// *Messenger and E-Mail : raskolserna@msn.com
// *Sphere Version : Specially 0.56b and maybe other releases
//
// *Bu kodlar TheRaskol tarafından yazılmış veya editlenmiştir.
// *The codes are written or were edited by TheRaskol (Raskol Serna).
///////////////////////////////////////////////////////////////////////

[ITEMDEF i_earth_robe]
NAME=earth death shroud
DEFNAME=i_earth_robe
ID=i_deathshroud
TYPE=T_armor_leather
ARMOR=40
Value=50000
SKILLMAKE=TAILORING 99.9
RESOURCES=72 i_cloth,152 i_garmoll_hides,162 i_garmoll_blood

on=@click
message [Strenght: %<eval (<more1L> * 100 ) / <more1H>>]
message a <name>
return 1


ON=@Equip
if (<src.tactics> > 0)
src.sysmessage @0845,1,1 Bunu giymek için Tactics Skilliniz olmamalıdır!
unequip
return 1
endif
IF ( <SRC.MAGERY><=99.8 )
src.sysmessage @0845,1,1 Bunu giymek için 99,8 Magery Skilline ihtiyacınız var!
UNEQUIP
RETURN 1
ENDIF

IF ( <SRC.EVALUATINGINTEL><=99.8 )
src.sysmessage @0845,1,1 Bunu giymek için 99,8 Evaluating Intelligence Skilline ihtiyacınız var!
UNEQUIP
RETURN 1
ENDIF
src.events +e_earthrobe

ON=@unEquip
src.events -e_earthrobe

ON=@Create
HITPOINTS=100
COLOR=07ad

[events e_earthrobe]
ON=@GetHit
if (<src.poisoning> >= 98.0) && (<src.poisoning> > <poisoning>)

elseif (<findid.i_rune_poison>)
sayua 68,6,6,1 * poison resist *
FINDID.i_rune_poison.remove
sfx snd_spell_poison
effect 3,0374a,1,15,1
endif

ON=@Spelleffect
if (<argn>==55) || (<argn>==12) || (<argn>==57) || (<argn>==39) || (<argn>==20)
sayua 68,6,6,1 * spell resist *
return 1
ENDIF