/// Server Adı : Wagner Uo
/// Sistemleri Kendim Yazdim.Kendim Oynadim.
/// Son Gözden Geçirme : 30.05.2009
/// Yazan: Wagner
/// İyi Bi Script Gibi =)
[itemdef i_robe_level]
NAME=Resist Robe [Level 1]
DYE=1
ID=0204e
WEIGHT=5
ARMOR=80
RESOURCES=48 i_cloth
SKILLMAKE=TAILORING 100.0, t_sewing_kit
ON=@Create
COLOR=0796
HITPOINTS=100
tag.morex=1
morex=1
On=@Click
if (<tag.morex> == 1)
name Resist Robe [Level 1]
elseif (<tag.morex> == 2)
name Resist Robe [Level 2]
elseif (<tag.morex> == 3)
name Resist Robe [Level 3]
elseif (<tag.morex> == 4)
name Resist Robe [Level 4]
elseif (<tag.morex> == 5)
name Resist Robe [Level 5]
endif
if (<hitpoints> < 100)
message @38,1,1 [%<hitpoints> Saglam]
message @0481,1,1 <name>
return 1
else
message @38,1,1 [ <serv.servname> ]
message @0481,1,1 <name>
return 1
ON=@Equiptest
IF ((<SRC.magery> < 98.0) || ( <SRC.EVALUATINGINTEL> < 98.0 ) || ( <SRC.MEDITATION> < 98.0 ) || (<src.tactics> > 0.0) || (<src.wrestling> > 0.0) || (<src.swordsmanship> > 0.0) || (<src.fencing> > 0.0) || (<src.macefighting> > 0.0) || (<src.archery> > 0.0) )
SRC.SYSMESSAGE @0481,1,1 Bunun Gerekli Skiller 98.0 Magery 98.0 Eva 98.0 Meditation Ve Herhangi Bir Combat Skilliniz Olmamali
RETURN 1
endif
On=@equip
if (<tag.morex> == 1)
src.events +e_resist_level_1
name Resist Robe [Level 1]
elseif (<tag.morex> == 2)
src.events +e_resist_level_2
name Resist Robe [Level 2]
elseif (<tag.morex> == 3)
src.events +e_resist_level_3
name Resist Robe [Level 3]
elseif (<tag.morex> == 4)
src.events +e_resist_level_4
name Resist Robe [Level 4]
elseif (<tag.morex> == 5)
src.events +e_resist_level_5
name Resist Robe [Level 5]
endif
src.sayua 49,6,6,eng, Magic Protection Aktif
src.nightsight 1
src.effect=3,i_fire_column,16,16,16
ON=@UnEquip
src.events -e_resist_level_1
src.events -e_resist_level_2
src.events -e_resist_level_3
src.events -e_resist_level_4
src.events -e_resist_level_5
src.sayua 49,6,6,eng, Magic Protection Deaktif
[ITEMDEF i_scroll_resist1]
//Dying Tub
ID=i_scroll_blank
NAME=Uprage Scroll
TYPE=T_DYE_VAT
WEIGHT=10
CATEGORY=Items by Professions
SUBSECTION=Tailor
DESCRIPTION=Rare Dying Tub
On=@Create
color 080a
On=@click
message @077a,1,1 [Level 2]
message @38,1,1 Resist Robe Uprage Scroll
return 1
On=@DClick
if !(<src.targ.topobj.uid> == <src.uid>)
src.sysmessage @077a,1,1 Resist Uprage Scroll cantanizda olmali
return 1
endif
target Uprage Etmek Istediginiz robeyi Seciniz..
return 1
on=@targon_item
if !(<src.targ.topobj.uid> == <src.uid>)
src.sysmessage @077a,1,1 Robe Uzerinizde olmali
elseif ((<src.targ.tag.morex> > 2)
src.sysmessage @038,1,1 Bu Robe Zaten Level 2'un Uzerinde...
return 1
elseif !(<src.targ.baseid> =i_robe_level)
src.sysmessage @38,1,1 Bu bir resist robe degil
else
src.targ.tag.morex=2
consume 1
On=@TargOn_Char
src.sysmessage @077a,1,1 Canli varliklari boyayamazsiniz.
return 1
[ITEMDEF i_scroll_resist2]
//Dying Tub
ID=i_scroll_blank
NAME=Uprage Scroll
TYPE=T_DYE_VAT
WEIGHT=10
CATEGORY=Items by Professions
SUBSECTION=Tailor
DESCRIPTION=Rare Dying Tub
On=@Create
color 080a
On=@click
message @077a,1,1 [Level 3]
message @38,1,1 Resist Robe Uprage Scroll
return 1
On=@DClick
if !(<src.targ.topobj.uid> == <src.uid>)
src.sysmessage @077a,1,1 Resist Uprage Scroll cantanizda olmali
return 1
endif
target Uprage Etmek Istediginiz robeyi Seciniz..
return 1
on=@targon_item
if !(<src.targ.topobj.uid> == <src.uid>)
src.sysmessage @077a,1,1 Robe Uzerinizde olmali
elseif !((<src.targ.tag.morex> ==2)
src.sysmessage @38,1,1 bu robeynin level 3 olabilmesi icin once level 2 olması lzm
else
src.targ.tag.morex=3
src.sysmessage @38,1,1 Uprage Tamamlandi
consume 1
On=@TargOn_Char
src.sysmessage @077a,1,1 Canli varliklari boyayamazsiniz.
return 1
[ITEMDEF i_scroll_resist3]
//Dying Tub
ID=i_scroll_blank
NAME=Uprage Scroll
TYPE=T_DYE_VAT
WEIGHT=10
CATEGORY=Items by Professions
SUBSECTION=Tailor
DESCRIPTION=Rare Dying Tub
On=@Create
color 080a
On=@click
message @077a,1,1 [Level 4]
message @38,1,1 Resist Robe Uprage Scroll
return 1
On=@DClick
if !(<src.targ.topobj.uid> == <src.uid>)
src.sysmessage @077a,1,1 Resist Uprage Scroll cantanizda olmali
return 1
endif
target @038,1,1 Uprage Etmek Istediginiz robeyi Seciniz..
return 1
on=@targon_item
if !(<src.targ.topobj.uid> == <src.uid>)
src.sysmessage @077a,1,1 Robe Uzerinizde olmali
elseif !((<src.targ.tag.morex> ==3)
src.sysmessage @38,1,1 bu robeynin level 4 olabilmesi icin once level 3 olması lzm
else
src.targ.tag.morex=4
src.sysmessage @38,1,1 Uprage Tamamlandi
consume 1
On=@TargOn_Char
src.sysmessage @077a,1,1 Canli varliklari boyayamazsiniz.
return 1
[ITEMDEF i_scroll_resist4]
//Dying Tub
ID=i_scroll_blank
NAME=Uprage Scroll
TYPE=T_DYE_VAT
WEIGHT=10
CATEGORY=Items by Professions
SUBSECTION=Tailor
DESCRIPTION=Rare Dying Tub
On=@Create
color 080a
On=@click
message @077a,1,1 [Level 5]
message @38,1,1 Resist Robe Uprage Scroll
return 1
On=@DClick
if !(<src.targ.topobj.uid> == <src.uid>)
src.sysmessage @077a,1,1 Resist Uprage Scroll cantanizda olmali
return 1
endif
target Uprage Etmek Istediginiz robeyi Seciniz..
return 1
on=@targon_item
if !(<src.targ.topobj.uid> == <src.uid>)
src.sysmessage @077a,1,1 Robe Uzerinizde olmali
elseif !((<src.targ.tag.morex> ==4)
src.sysmessage @38,1,1 bu robeynin level 5 olabilmesi icin once level 4 olması lzm
else
src.targ.tag.morex=5
src.sysmessage @38,1,1 Uprage Tamamlandi
consume 1
On=@TargOn_Char
src.sysmessage @077a,1,1 Canli varliklari boyayamazsiniz.
return 1
[EVENTS e_resist_level_1]
ON=@SPELLEFFECT
If (<argn>==5)
sayua 49,6,6,eng, * Resist Magic Arrow *
SPELLEFFECT s_cure,1000
return 1
elseif (<argn>==1)
sayua 49,6,6,eng, * Resist Clumsy *
SPELLEFFECT s_cure,1000
return 1
endif
[EVENTS e_resist_level_2]
ON=@SPELLEFFECT
elseif (<argn>==5)
sayua 49,6,6,eng, * Magic Arrow *
SPELLEFFECT s_cure,1000
return 1
elseif (<argn>==1)
sayua 49,6,6,eng, * Resist Clumsy *
SPELLEFFECT s_cure,1000
return 1
elseif (<argn>==3)
sayua 49,6,6,eng, * Resist Feeblemind *
SPELLEFFECT s_cure,1000
return 1
elseif (<argn>==8)
sayua 49,6,6,eng, * Resist Weaken *
SPELLEFFECT s_cure,1000
return 1
endif
[EVENTS e_resist_level_3]
ON=@SPELLEFFECT
If (<argn>==5) || (<argn>==18) || (<argn>==28) || (<argn>==43) || (<argn>==51)
sayua 49,6,6,eng, *Resist Fire Damages*
SPELLEFFECT s_cure,1000
return 1
elseif (<argn>==1)
sayua 49,6,6,eng, * Resist Clumsy *
SPELLEFFECT s_cure,1000
return 1
elseif (<argn>==3)
sayua 49,6,6,eng, * Resist Feeblemind *
SPELLEFFECT s_cure,1000
return 1
elseif (<argn>==8)
sayua 49,6,6,eng, * Resist Weaken *
SPELLEFFECT s_cure,1000
return 1
endif
[EVENTS e_resist_level_4]
ON=@SPELLEFFECT
If (<argn>==5) || (<argn>==12) || (<argn>==28) || (<argn>==51) || (<argn>==46) || (<argn>==42)
sayua 49,6,6,eng, *Resist Fire Damage*
SPELLEFFECT s_cure,1000
return 1
elseif (<argn>==1)
sayua 49,6,6,eng, * Resist Clumsy *
SPELLEFFECT s_cure,1000
return 1
elseif (<argn>==3)
sayua 49,6,6,eng, * Resist Feeblemind *
SPELLEFFECT s_cure,1000
return 1
elseif (<argn>==8)
sayua 49,6,6,eng, * Resist Weaken *
SPELLEFFECT s_cure,1000
endif
[EVENTS e_resist_level_5]
ON=@SPELLEFFECT
If (<argn>==5) || (<argn>==18) || (<argn>==28) || (<argn>==51) || (<argn>==49) || (<argn>==45) || (<argn>==21) || (<argn>==57)
sayua 49,6,6,eng, *Resist Fire Damage*
SPELLEFFECT s_cure,1000
return 1
elseif (<argn>==1)
sayua 49,6,6,eng, * Resist Clumsy *
SPELLEFFECT s_cure,1000
return 1
elseif (<argn>==3)
sayua 49,6,6,eng, * Resist Feeblemind *
SPELLEFFECT s_cure,1000
return 1
elseif (<argn>==8)
sayua 49,6,6,eng, * Resist Weaken *
SPELLEFFECT s_cure,1000
endif
ON=@Gethit
IF (<src.findid.i_rune_poison>)
src.findid.i_rune_poison.remove
src.sayua 49,6,6,eng,* Poison'u Gecirir
endif
0
Total votes: 0
Yorumlar (0)