burdaki bütün robeler birisinin üzerindeyken tıklanınca çantanıza geliyor acil yardım.
[function msgrobe]
var.act <act>
var.p <p>
newitem i_memory
act.p 6000 2000
var.regfla <act.region.flags>
act.region.flags <region.flags>
p 6000 2000
act.sayua <eval <var.msgrobe>> 0 0 1 <args>
p <var.p>
act.region.flags <var.regfla>
act.remove
act <var.act>
[ITEMDEF i_crystal_fire]
Name=fire crystal
DEFNAME=i_fire_crystal
id=i_crystal_green_big
VALUE=15000
ON=@CREATE
COLOR=080a
[ITEMDEF i_crystal_earth]
Name=earth crystal
DEFNAME=i_earth_crystal
id=i_crystal_green_big
VALUE=15000
ON=@CREATE
COLOR=07ad
[ITEMDEF i_crystal_energy]
Name=energy crystal
DEFNAME=i_energy_crystal
id=i_crystal_green_big
VALUE=15000
ON=@CREATE
COLOR=0796
[ITEMDEF i_crystal_newbie]
Name=blessed crystal
DEFNAME=i_newbie_crystal
id=i_crystal_green_big
VALUE=15000
ON=@CREATE
COLOR=0813
[ITEMDEF i_crystal_ice]
Name=ice crystal
DEFNAME=i_ice_crystal
id=i_crystal_green_big
VALUE=15000
ON=@CREATE
COLOR=0800
[ITEMDEF i_fire_robe]
// fire Robe
NAME=mage's robe
DEFNAME=i_robe_fire
ID=i_deathshroud
TYPE=T_armor_leather
ARMOR=40
DYE=0
DESCRIPTION=Mage Robe
SUBSECTION=Special Items
CATEGORY=Provisions - GM Items
SKILLMAKE=TAILORING 98.0, MAGERY 98.0, t_sewing_kit
RESOURCES=62 i_cloth, i_fire_crystal,10 i_reag_dragon_blood
VALUE=25000
On=@Click
message [fire]
message a <name>
return 1
ON=@Equip
if (<src.tactics> > 0)
var.msgrobe 0481
src.msgrobe Savas becerisini unutmalisiniz.
unequip
return 1
endif
IF ( <SRC.MAGERY> < 97.9 )
var.msgrobe 0481
src.msgrobe En az 98 Magery'niz olmali
UNEQUIP
RETURN 1
ENDIF
IF ( <SRC.EVALUATINGINTEL> < 97.9 )
var.msgrobe 0481
src.msgrobe En az 98 Evaluating Intelligence'iniz olmali.
UNEQUIP
RETURN 1
ENDIF
src.events +e_firerobe
ON=@unEquip
src.events -e_firerobe
ON=@Create
HITPOINTS=200
COLOR=080a
[ITEMDEF i_energy_robe]
//
NAME=mage's robe
DEFNAME=i_robe_energy
ID=i_deathshroud
TYPE=T_armor_leather
ARMOR=40
DYE=0
DESCRIPTION=Mage Robe
SUBSECTION=Special Items
CATEGORY=Provisions - GM Items
SKILLMAKE=TAILORING 98.0, MAGERY 98.0, t_sewing_kit
RESOURCES=24 i_cloth, i_earth_crystal,10 i_reag_dragon_blood
VALUE=25000
On=@Click
message [energy]
message a <name>
return 1
ON=@Equip
if (<src.tactics> > 0)
var.msgrobe 0481
src.msgrobe Savas becerisini unutmalisiniz.
unequip
return 1
endif
IF ( <SRC.MAGERY> < 97.9 )
var.msgrobe 0481
src.msgrobe En az 98 Magery'niz olmali
UNEQUIP
RETURN 1
ENDIF
IF ( <SRC.EVALUATINGINTEL> < 97.9 )
var.msgrobe 0481
src.msgrobe En az 98 Evaluating Intelligence'iniz olmali.
UNEQUIP
RETURN 1
ENDIF
src.events +e_energyrobe
ON=@unEquip
src.events -e_energyrobe
ON=@Create
HITPOINTS=200
COLOR=0796
[ITEMDEF i_earth_robe]
//
NAME=mage's robe
DEFNAME=i_robe_earth
ID=i_deathshroud
TYPE=T_armor_leather
ARMOR=40
DYE=0
DESCRIPTION=Mage Robe
SUBSECTION=Special Items
CATEGORY=Provisions - GM Items
SKILLMAKE=TAILORING 98.0, MAGERY 98.0, t_sewing_kit
RESOURCES=24 i_cloth, i_earth_crystal,10 i_reag_dragon_blood
VALUE=25000
On=@Click
message [earth]
message a <name>
return 1
ON=@Equip
if (<src.tactics> > 0)
var.msgrobe 0481
src.msgrobe Savas becerisini unutmalisiniz.
unequip
return 1
endif
IF ( <SRC.MAGERY> < 97.9 )
var.msgrobe 0481
src.msgrobe En az 98 Magery'niz olmali
UNEQUIP
RETURN 1
ENDIF
IF ( <SRC.EVALUATINGINTEL> < 97.9 )
var.msgrobe 0481
src.msgrobe En az 98 Evaluating Intelligence'iniz olmali.
UNEQUIP
RETURN 1
ENDIF
src.events +e_earthrobe
ON=@unEquip
src.events -e_earthrobe
ON=@Create
HITPOINTS=200
COLOR=07ad
[ITEMDEF i_robe_ice]
//
NAME=mage's robe
DEFNAME=i_ice_robe
ID=i_deathshroud
TYPE=T_armor_leather
ARMOR=40
DYE=0
DESCRIPTION=Mage Robe
SUBSECTION=Special Items
CATEGORY=Provisions - GM Items
SKILLMAKE=TAILORING 98.0, MAGERY 98.0, t_sewing_kit
RESOURCES=24 i_cloth, i_ice_crystal,10 i_reag_dragon_blood
VALUE=25000
On=@Click
message [ice]
message a <name>
return 1
ON=@Equip
if (<src.tactics> > 0)
var.msgrobe 0481
src.msgrobe Savas becerisini unutmalisiniz.
unequip
return 1
endif
IF ( <SRC.MAGERY> < 97.9 )
var.msgrobe 0481
src.msgrobe En az 98 Magery'niz olmali
UNEQUIP
RETURN 1
ENDIF
IF ( <SRC.EVALUATINGINTEL> < 97.9 )
var.msgrobe 0481
src.msgrobe En az 98 Evaluating Intelligence'iniz olmali.
UNEQUIP
RETURN 1
ENDIF
src.SPELLEFFECT s_protection,100.0
src.SPELLEFFECT s_reactive_armor,100.0
src.SPELLEFFECT s_night_sight,100.0
SOUND=snd_SPELL_PROTECTION
src.events +e_icerobe
ON=@unequip
src.events -e_icerobe
if (<src.tactics> > 0)
return 1
endif
IF ( <SRC.MAGERY> < 97.9 )
RETURN 1
ENDIF
IF ( <SRC.EVALUATINGINTEL> < 97.9 )
RETURN 1
ENDIF
src.findid.i_rune_protection.remove
src.findid.i_rune_reactive_armor.remove
src.findid.i_rune_night_sight.remove
ON=@Create
HITPOINTS=200
COLOR=0800
[events e_firerobe]
ON=@Spelleffect
if !(<restest 1 i_robe_fire>)
elseiF (<ARGN>=5)
sayua 036,0,0,0 * etkilenmez *
RETURN 1
ENDIF
if !(<restest 1 i_robe_fire>)
elseiF (<ARGN>=18)
sayua 036,0,0,0 * etkilenmez *
RETURN 1
ENDIF
if !(<restest 1 i_robe_fire>)
elseiF (<ARGN>=28)
sayua 036,0,0,0 * etkilenmez *
RETURN 1
ENDIF
if !(<restest 1 i_robe_fire>)
elseiF (<ARGN>=43)
sayua 036,0,0,0 * etkilenmez *
RETURN 1
ENDIF
if !(<restest 1 i_robe_fire>)
elseiF (<ARGN>=51)
sayua 036,0,0,0 * etkilenmez *
RETURN 1
ENDIF
[events e_icerobe]
ON=@Spelleffect
if !(<restest 1 i_robe_ice>)
elseIF (<ARGN>=41)
sayua 036,0,0,0 * etkilenmez *
RETURN 1
ENDIF
if !(<restest 1 i_robe_ice>)
elseIF (<ARGN>=54)
sayua 036,0,0,0 * etkilenmez *
RETURN 1
ENDIF
if !(<restest 1 i_robe_ice>)
elseIF (<ARGN>=26)
sayua 036,0,0,0 * etkilenmez *
RETURN 1
ENDIF
if !(<restest 1 i_robe_ice>)
elseIF (<ARGN>=7)
sayua 0481,6,0,enu * etkilenmez *
RETURN 1
ENDIF
if !(<restest 1 i_robe_ice>)
elseIF (<ARGN>=15)
sayua 0481,6,0,enu * etkilenmez *
RETURN 1
ENDIF
if !(<restest 1 i_robe_ice>)
elseIF (<ARGN>=6)
sayua 0481,6,0,enu * etkilenmez *
RETURN 1
ENDIF
if !(<restest 1 i_robe_smow>)
elseIF (<ARGN>=38)
sayua 036,0,0,0 * etkilenmez *
RETURN 1
ENDIF
if !(<restest 1 i_robe_ice>)
elseIF (<ARGN>=47)
sayua 036,0,0,0 * etkilenmez *
RETURN 1
ENDIF
[events e_earthrobe]
ON=@GetHit
if (<src.poisoning> >= 98.0) && (<src.poisoning> > <poisoning>)
elseif (<findid.i_rune_poison>)
sayua 036,0,0,0 * poison resist *
FINDID.i_rune_poison.remove
endif
ON=@Spelleffect
if !(<restest 1 i_robe_earth>)
elseIF (<ARGN>=57)
sayua 036,0,0,0 * etkilenmez *
RETURN 1
ENDIF
if !(<restest 1 i_robe_earth>)
elseIF (<ARGN>=55)
sayua 036,0,0,0 * etkilenmez *
RETURN 1
ENDIF
if !(<restest 1 i_robe_earth>)
elseIF (<ARGN>=12)
sayua 036,0,0,0 * etkilenmez *
RETURN 1
ENDIF
[events e_energyrobe]
ON=@Spelleffect
if !(<restest 1 i_robe_energy>)
elseIF (<ARGN>=42)
sayua 036,0,0,0 * etkilenmez *
RETURN 1
ENDIF
if !(<restest 1 i_robe_energy>)
elseIF (<ARGN>=1)
sayua 036,0,0,0 * etkilenmez *
RETURN 1
ENDIF
if !(<restest 1 i_robe_energy>)
elseIF (<ARGN>=3)
sayua 036,0,0,0 * etkilenmez *
RETURN 1
ENDIF
if !(<restest 1 i_robe_energy>)
elseIF (<ARGN>=8)
sayua 036,0,0,0 * etkilenmez *
RETURN 1
ENDIF
if !(<restest 1 i_robe_energy>)
elseIF (<ARGN>=27)
sayua 036,0,0,0 * etkilenmez *
RETURN 1
ENDIF
if !(<restest 1 i_robe_energy>)
elseIF (<ARGN>=46)
sayua 036,0,0,0 * etkilenmez *
RETURN 1
ENDIF
if !(<restest 1 i_robe_energy>)
elseIF (<ARGN>=1)
sayua 036,0,0,0 * etkilenmez *
RETURN 1
ENDIF
[EOF]
UYARI: Lutfen scriptleri CODE icinde koyunuz.
Bu konu Akillis tarafından düzenlendi(2007-12-02 01:58, 16 yıl önce)
