Resist Sistemi (Geliştirilmiş)

• wagner
• 2010-03-16 18:03
• 0 Yorumlar
• 2118 Görüntüleme

/// 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

Değerlendirmeler

Total votes: 0