[ITEMDEF i_elfo]
ID=i_moongate_red
NAME=Portale Razza Elfica
TYPE=t_telepad
ON=@CREATE
COLOR 016A
ON=@STEP
if <src.tag.RAZZA> != 0
SAYUA 0088a 3 0 1 "La tua Razza e' permanente!"
return 1
endif
if ((<src.body> == c_man) || (<src.body> == c_woman))
if (<src.body> == c_man)
SRC.NAME=<SRC.NAME> l'Elfo
else
SRC.NAME=<SRC.NAME> l'Elfa
endif
SRC.COLOR=016a
SRC.oskin 016a
src.TAG.RAZZA=1
src.EVENTS e_stat_elfo
src.say "Adesso sei un Elfo!"
SOUND=snd_SPELL_HEAL
IF <SRC.STR> >= 110 // Str Cap
say " Stat cap superato!"
SRC.STR=110
ENDIF
IF <SRC.INT> >= 60 // Int Cap
say " Stat cap superato!"
SRC.INT=60
ENDIF
IF <SRC.DEX> >= 190 // Dex Cap
say " Stat cap superato!"
SRC.DEX=190
ENDIF
[EVENTS e_stat_elfo]
ON=@EnvironChange
//IF !(<SRC.FINDID.i_rune_bless>)
IF ((<SRC.FLAGS> & STATF_POLYMORPH) || (<SRC.FINDLAYER(LAYER_SPELL_STATS)>) || (<SRC.FINDLAYER(LAYER_FLAG_Potion)>) || (<SRC.FINDLAYER(LAYER_FLAG_Hallucination)>))
return 1
endif
IF !((<SRC.FLAGS> & STATF_POLYMORPH) || (<SRC.FINDLAYER(LAYER_SPELL_STATS)>) || (<SRC.FINDLAYER(LAYER_FLAG_Potion)>) || (<SRC.FINDLAYER(LAYER_FLAG_Hallucination)>))
IF (<eval <SRC.STR>> > 110)
say @2545 Stat cap superato!
SRC.STR=110
ENDIF
IF (<eval <SRC.DEX>> > 190)
say @2444 Stat cap superato!
SRC.DEX=190
ENDIF
IF (<eval <SRC.INT>> > 60)
say @2441 Stat cap superato!
SRC.INT=60
ENDIF
IF (<EVAL <SRC.STR>+<SRC.DEX>+<SRC.INT>> > 301)
say @2545 Stat cap superato!
IF (<EVAL <SRC.DEX>> > <EVAL <SRC.INT>>)
SRC.INT=(<SRC.INT>+(-1))
RETURN 1
ENDIF
ENDIF
endif
ENDIF
[ITEMDEF i_elfo_alto]
ID=i_moongate_red
NAME=Portale Razza Elfo Alto
TYPE=t_telepad
ON=@CREATE
COLOR 0547
ON=@STEP
if <src.tag.raZZA> != 0
SAYUA 0088a 3 0 1 "La tua Razza e' permanente!"
return 1
endif
if ((<src.body> == c_man) || (<src.body> == c_woman))
if (<src.body> == c_man)
SRC.NAME=<SRC.NAME> l'Elfo Alto
else
SRC.NAME=<SRC.NAME> l'Elfa Alta
endif
SRC.COLOR=0547
SRC.oskin 0547
src.TAG.RAZZA=2
src.EVENTS e_stat_elfo_alto
sayua 0098c 003 54 0 "Adesso sei un Elfo Alto!"
SOUND=snd_SPELL_HEAL
IF <SRC.STR> >= 110 // Str Cap
src.say " Stat cap superato!"
SRC.STR=110
ENDIF
IF <SRC.INT> >= 190 // Int Cap
src.say " Stat cap superato!"
SRC.INT=190
ENDIF
IF <SRC.DEX> >= 60 // Dex Cap
src.say " Stat cap superato!"
SRC.DEX=60
ENDIF
[EVENTS e_stat_elfo_alto]
ON=@EnvironChange
//IF !(<SRC.FINDID.i_rune_bless>)
IF ((<SRC.FLAGS> & STATF_POLYMORPH) || (<SRC.FINDLAYER(LAYER_SPELL_STATS)>) || (<SRC.FINDLAYER(LAYER_FLAG_Potion)>) || (<SRC.FINDLAYER(LAYER_FLAG_Hallucination)>))
return 1
endif
IF !((<SRC.FLAGS> & STATF_POLYMORPH) || (<SRC.FINDLAYER(LAYER_SPELL_STATS)>) || (<SRC.FINDLAYER(LAYER_FLAG_Potion)>) || (<SRC.FINDLAYER(LAYER_FLAG_Hallucination)>))
IF (<eval <SRC.STR>> > 110)
say @2545 Stat cap superato!
SRC.STR=110
ENDIF
IF (<eval <SRC.DEX>> > 60)
say @2444 Stat cap superato!
SRC.DEX=60
ENDIF
IF (<eval <SRC.INT>> > 190)
say @2441 Stat cap superato!
SRC.INT=190
ENDIF
IF (<EVAL <SRC.STR>+<SRC.DEX>+<SRC.INT>> > 300)
say @2545 Stat cap superato!
IF (<EVAL <SRC.INT>> > <EVAL <SRC.DEX>>)
SRC.DEX=(<SRC.DEX>+(-1))
RETURN 1
ENDIF
ENDIF
ENDIF
endif
[ITEMDEF i_human]
ID=i_moongate_red
NAME=Portale Razza Umana
TYPE=t_telepad
ON=@CREATE
COLOR 040A
ON=@STEP
if <src.tag.RAZZA> != 0
SAYUA 0088a 3 0 1 "La tua Razza e' permanente!"
return 1
endif
if ((<src.body> == c_man) || (<src.body> == c_woman))
SRC.COLOR=040A
SRC.oskin 040A
src.TAG.RAZZA=6
src.EVENTS e_stat_HUMAN
src.events e_danno
src.say "Adesso sei un Umano!"
SOUND=snd_SPELL_HEAL
IF <SRC.STR> >= 120 // Str Cap
say " Stat cap superato!"
SRC.STR=120
ENDIF
IF <SRC.INT> >= 120 // Int Cap
say " Stat cap superato!"
SRC.INT=120
ENDIF
IF <SRC.DEX> >= 120 // Dex Cap
say " Stat cap superato!"
SRC.DEX=120
ENDIF
[EVENTS e_stat_human]
ON=@EnvironChange
//IF !(<SRC.FINDID.i_rune_bless>)
IF ((<SRC.FLAGS> & STATF_POLYMORPH) || (<SRC.FINDLAYER(LAYER_SPELL_STATS)>) || (<SRC.FINDLAYER(LAYER_FLAG_Potion)>) || (<SRC.FINDLAYER(LAYER_FLAG_Hallucination)>))
return 1
endif
IF !((<SRC.FLAGS> & STATF_POLYMORPH) || (<SRC.FINDLAYER(LAYER_SPELL_STATS)>) || (<SRC.FINDLAYER(LAYER_FLAG_Potion)>) || (<SRC.FINDLAYER(LAYER_FLAG_Hallucination)>))
IF (<eval <SRC.STR>> > 120)
say @2545 Stat cap superato!
SRC.STR=120
ENDIF
IF (<eval <SRC.DEX>> > 120)
say @2444 Stat cap superato!
SRC.DEX=120
ENDIF
IF (<eval <SRC.INT>> > 120)
say @2441 Stat cap superato!
SRC.INT=120
ENDIF
IF (<EVAL <SRC.STR>+<SRC.DEX>+<SRC.INT>> > 300)
say @2545 Stat cap superato!
IF (<EVAL <SRC.DEX>> > <EVAL <SRC.INT>>)
SRC.INT=(<SRC.INT>+(-1))
RETURN 1
ENDIF
IF (<EVAL <SRC.STR>+<SRC.DEX>+<SRC.INT>> > 300)
say @2545 Stat cap superato!
IF (<EVAL <SRC.INT>> > <EVAL <SRC.DEX>>)
SRC.DEX=(<SRC.DEX>+(-1))
RETURN 1
ENDIF
ENDIF
ENDIF
[ITEMDEF i_nano]
ID=i_moongate_red
NAME=Portale Razza Nani
TYPE=t_telepad
ON=@CREATE
COLOR 0465
ON=@STEP
if <src.tag.razza> != 0
SAYUA 0088a 3 0 1 "La tua Razza e' permanente!"
return 1
endif
if ((<src.body> == c_man) || (<src.body> == c_woman))
if (<src.body> == c_man)
SRC.NAME=<SRC.NAME> il Nano
else
SRC.NAME=<SRC.NAME> la Nana
endif
SRC.COLOR=0465
SRC.oskin 0465
src.TAG.RAZZA=3
src.EVENTS e_stat_nano
sayua 0098c 003 54 0 "Adesso sei un Nano!"
SOUND=snd_SPELL_HEAL
IF <SRC.STR> >= 150 // Str Cap
src.say " Stat cap superato!"
SRC.STR=150
ENDIF
IF <SRC.INT> >= 60 // Int Cap
src.say " Stat cap superato!"
SRC.INT=60
ENDIF
IF <SRC.DEX> >= 150 // Dex Cap
src.say " Stat cap superato!"
SRC.DEX=150
ENDIF
[EVENTS e_stat_nano]
ON=@EnvironChange
//IF !(<SRC.FINDID.i_rune_bless>)
IF ((<SRC.FLAGS> & STATF_POLYMORPH) || (<SRC.FINDLAYER(LAYER_SPELL_STATS)>) || (<SRC.FINDLAYER(LAYER_FLAG_Potion)>) || (<SRC.FINDLAYER(LAYER_FLAG_Hallucination)>))
return 1
endif
IF !((<SRC.FLAGS> & STATF_POLYMORPH) || (<SRC.FINDLAYER(LAYER_SPELL_STATS)>) || (<SRC.FINDLAYER(LAYER_FLAG_Potion)>) || (<SRC.FINDLAYER(LAYER_FLAG_Hallucination)>))
IF (<eval <SRC.STR>> > 150)
say @2545 Stat cap superato!
SRC.STR=150
ENDIF
IF (<eval <SRC.DEX>> > 150)
say @2444 Stat cap superato!
SRC.DEX=150
ENDIF
IF (<eval <SRC.INT>> > 60)
say @2441 Stat cap superato!
SRC.INT=60
ENDIF
IF (<EVAL <SRC.STR>+<SRC.DEX>+<SRC.INT>> > 300)
say @2545 Stat cap superato!
IF (<EVAL <SRC.DEX>> > <EVAL <SRC.INT>>)
SRC.INT=(<SRC.INT>+(-1))
RETURN 1
ENDIF
ENDIF
ENDIF
endif
[ITEMDEF i_orco]
ID=i_moongate_red
NAME=Portale Razza Orchi
TYPE=t_telepad
ON=@CREATE
COLOR 0034a
ON=@STEP
if <src.tag.raZZA> != 0
SAYUA 0088a 3 0 1 "La tua Razza e' permanente!"
return 1
endif
if ((<src.body> == c_man) || (<src.body> == c_woman))
if (<src.body> == c_man)
SRC.NAME=<SRC.NAME> l'Orco
else
SRC.NAME=<SRC.NAME> l'Orca
endif
SRC.COLOR=0034a
SRC.oskin 0034a
src.TAG.RAZZA=4
src.EVENTS e_stat_orco
sayua 0098c 003 54 0 "Adesso sei un Orco!"
SOUND=snd_SPELL_HEAL
IF <SRC.STR> >= 190 // Str Cap
src.say " Stat cap superato!"
SRC.STR=190
ENDIF
IF <SRC.INT> >= 20 // Int Cap
src.say " Stat cap superato!"
SRC.INT=20
ENDIF
IF <SRC.DEX> >= 120 // Dex Cap
src.say " Stat cap superato!"
SRC.DEX=120
ENDIF
[EVENTS e_stat_orco]
ON=@EnvironChange
//IF !(<SRC.FINDID.i_rune_bless>)
IF ((<SRC.FLAGS> & STATF_POLYMORPH) || (<SRC.FINDLAYER(LAYER_SPELL_STATS)>) || (<SRC.FINDLAYER(LAYER_FLAG_Potion)>) || (<SRC.FINDLAYER(LAYER_FLAG_Hallucination)>))
return 1
endif
IF !((<SRC.FLAGS> & STATF_POLYMORPH) || (<SRC.FINDLAYER(LAYER_SPELL_STATS)>) || (<SRC.FINDLAYER(LAYER_FLAG_Potion)>) || (<SRC.FINDLAYER(LAYER_FLAG_Hallucination)>))
IF (<eval <SRC.STR>> > 190)
say @2545 Stat cap superato!
SRC.STR=190
ENDIF
IF (<eval <SRC.DEX>> > 120)
say @2444 Stat cap superato!
SRC.DEX=120
ENDIF
IF (<eval <SRC.INT>> > 20)
say @2441 Stat cap superato!
SRC.INT=20
ENDIF
IF (<EVAL <SRC.STR>+<SRC.DEX>+<SRC.INT>> > 300)
say @2545 Stat cap superato!
IF (<EVAL <SRC.DEX>> > <EVAL <SRC.INT>>)
SRC.INT=(<SRC.INT>+(-1))
RETURN 1
ENDIF
ENDIF
ENDIF
endif
[ITEMDEF i_vampiro]
ID=i_moongate_red
NAME=Portale Razza Vampiri
TYPE=t_telepad
ON=@CREATE
COLOR 003c1
ON=@STEP
if <src.tag.razza> != 0
SAYUA 0088a 3 0 1 "La tua Razza e' permanente!"
return 1
endif
if ((<src.body> == c_man) || (<src.body> == c_woman))
if (<src.body> == c_man)
SRC.NAME=<SRC.NAME> il Vampiro
else
SRC.NAME=<SRC.NAME> la Vampira
endif
SRC.COLOR=0x7a
SRC.oskin 0x7a
src.TAG.RAZZA=5
src.EVENTS e_stat_vampiro
sayua 0098c 003 54 0 "Adesso sei un Vampiro!"
SOUND=snd_SPELL_HEAL
IF <SRC.STR> >= 150 // Str Cap
src.say " Stat cap superato!"
SRC.STR=150
ENDIF
IF <SRC.INT> >= 150 // Int Cap
src.say " Stat cap superato!"
SRC.INT=150
ENDIF
IF <SRC.DEX> >= 60 // Dex Cap
src.say " Stat cap superato!"
SRC.DEX=60
ENDIF
[EVENTS e_stat_vampiro]
ON=@EnvironChange
//IF !(<SRC.FINDID.i_rune_bless>)
IF ((<SRC.FLAGS> & STATF_POLYMORPH) || (<SRC.FINDLAYER(LAYER_SPELL_STATS)>) || (<SRC.FINDLAYER(LAYER_FLAG_Potion)>) || (<SRC.FINDLAYER(LAYER_FLAG_Hallucination)>))
return 1
endif
IF !((<SRC.FLAGS> & STATF_POLYMORPH) || (<SRC.FINDLAYER(LAYER_SPELL_STATS)>) || (<SRC.FINDLAYER(LAYER_FLAG_Potion)>) || (<SRC.FINDLAYER(LAYER_FLAG_Hallucination)>))
IF (<eval <SRC.STR>> > 150)
say @2545 Stat cap superato!
SRC.STR=150
ENDIF
IF (<eval <SRC.DEX>> > 60)
say @2444 Stat cap superato!
SRC.DEX=60
ENDIF
IF (<eval <SRC.INT>> > 150)
say @2441 Stat cap superato!
SRC.INT=150
ENDIF
IF (<EVAL <SRC.STR>+<SRC.DEX>+<SRC.INT>> > 300)
say @2545 Stat cap superato!
IF (<EVAL <SRC.INT>> > <EVAL <SRC.DEX>>)
SRC.DEX=(<SRC.DEX>+(-1))
RETURN 1
ENDIF
ENDIF
ENDIF
endif
[ITEMDEF i_reset]
ID=i_moongate_red
NAME=Portale Razza Reset
TYPE=t_telepad
ON=@CREATE
COLOR 2444
ON=@STEP
src.tag.razza = 0
src.oskin 000
src.color=000
src.events -0
[eof]