Crypton Robe

Crypton Robe

[ITEMDEF i_robe_crypton]
DEFNAME=i_robe_crypton
NAME=Crypton robe
ID=i_deathshroud
ARMOR=63
VALUE=75000
TYPE=t_clothing
SKILLMAKE=TAILORING 98.1, MAGERY 98.1, EVALUATINGINTEL 80.0
RESOURCES=50 i_cloth,1 i_crystal_crypton,1 i_scroll_crypton

ON=@Create
HITPOINTS=100
DORAND 5
color 07a1
color 07c3
color 07cd
color 07ed
color 0792
ENDDO
MOREY=00
attr=02

on=@click
message [ % <eval <hitpoints>> Yeni ]

ON=@Equip
src.light
if ( <src.magery><=98.1 )
src.sysmessage Henuz bunu giyecek kadar kudretli degilsiniz.
unequip
return 1
endif

if ( <src.evaluatingintel><=98.1 )
src.sysmessage Henuz bunu giyecek kadar kudretli degilsiniz.
unequip
return 1
endif


if ( <src.anatomy><=98.1 )
src.var.sysmessage 55
src.sysmessage Henuz bunu giyecek kadar kudretli degilsiniz.
unequip
return 1
endif

src.tag.icerobe 1
src.events +e_resistet

ON=@UnEquip
IF (<EVAL <src.tag.light>> = 1
src.findid.i_light.remove
src.nightsight=1
endif
src.tag.light=0
src.events -e_resistet

[function light]
if (<eval <src.tag.light>> = 0)
effect=3,0376a,2,10,1
sayua 0835,6,0,enu * Parildar *
sound=snd_spell_cure
src.newitem=i_light
src.act.equip
src.tag.light=1
src.nightsight=0
else
src.findid.i_light.remove
src.tag.light=0
src.nightsight=1
endif

[itemdef i_light]
ID=i_light_source
TYPE=t_script
NAME=light

ON=@Create
ATTR=attr_invis|attr_newbie


[EVENTS e_resistet]
ON=@SPELLEFFECT
If (<argn>==1) || (<argn>==3) || (<argn>==5) || (<argn>== || (<argn> == 51) || (<argn> == 20)
sayua 049,6,0,enu * Etkilenmez *
return 1
ENDIF

ON=@Gethit
IF (<src.findid.i_rune_clumsy>) || (<src.findid.i_rune_create_food>) || (<src.findid.i_rune_feeblemind>) || (<src.findid.i_rune_heal>) || (<src.findid.i_rune_magic_arrow>) || (<src.findid.i_rune_night_sight>) || (<src.findid.i_rune_reactive_armor>) || (<src.findid.i_rune_weaken>)
src.findid.i_rune_clumsy.remove
src.findid.i_rune_feeblemind.remove
src.findid.i_rune_magic_arrow.remove
src.findid.i_rune_weaken.remove
elseIF (<findid.i_rune_poison>)
if (rand(2) =1)
findid.i_rune_poison.remove
sayua 049,6,0,enu * Zehirin Etkisini Gecirir*
endif
ENDIF

[EVENTS e_lanet]
ON=@SpellCast
if (<argn>==
sayua 049,6,0,enu * Lanetlenir *
src.spelleffect=0
src.damage={0}
endif
return 1

ON=@GetHit
if (<argn>==
src.act.bounce i_lanet
src.sysmessage Lich tarafindan lanetlendiniz.
src.sysmessage Agirliginiz artik 50 artistir.

[itemdef i_lanet]
defname i_lanet
id i_hammer_smith
name lanet olsun
weight 50

ON=@Create
attr attr_invis|attr_decay


-------------------------------//kristal küreler
[ITEMDEF i_crystal_crypton]
ID=i_crystal_green_big
TYPE=t_script
VALUE=15000
WEIGHT=0.1
NAME=Crypton Crsytal
RESOURCES=12 i_ingot_silver,35 i_reag_daemon_bone,50 i_reag_dragon_blood
SKILLMAKE=TINKERING 98.2, MAGERY 80.0

ON=@Create
COLOR=0794
ATTR=02

ON=@DClick
RETURN 1

[ITEMDEF i_heart_balron]
ID=i_reag_worm_heart
NAME=Balron Heart

ON=@Create
COLOR=078c
ATTR=02

On=@DClick
RETURN 1

[ITEMDEF i_scroll_crypton]
DEFNAME=i_scroll_crypton
ID=i_scroll_blank
NAME=Mage's Scroll
RESOURCES=1 i_heart_balron,50 i_reag_dead_wood,10 i_scroll_blank
SKILLMAKE=98.1 INSCRIPTION,90.0 MAGERY

ON=@Create
COLOR=0794
ATTR=02

ON=@DClick
RETURN 1