;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
[@GamePointMain]
{
#IF
#SAY
Hiya, I can sort everything out relating\
to GamePoints\\
<[ Enter Levelling Cave ]/@EnterCave>\
<[ Transfer Items ]/@MakeGP>\
<[ Transfer GamePoints ]/@ExchangeGP>\\
<[ Exit ]/@exit>\\\

[@EnterCave]
#IF
CheckLevel 45
#SAY
What do you want to pay with?\
You can stay in for 30 Mins!\\
<[ 30 Mins - 2,500,000 Gold ]/@EnterCave145(30,2500000)>\
<[ 30 Mins - 10 Game Points ]/@EnterCave245(30,10)>\\
<[ 60 Mins - 5,000,000 Gold ]/@EnterCave145(60,5000000)>\
<[ 60 Mins - 20 Game Points ]/@EnterCave245(60,20)>\\
<[ 120 Mins - 9,000,000 Gold ]/@EnterCave145(120,9000000)>\
<[ 120 Mins - 36 Game Points ]/@EnterCave245(120,36)>\\
<[ Game Point Main Menu ]/@GamePointMain>\\\
#ELSESAY
What do you want to pay with?\
You can stay in for...\\
<[ 30 Mins - 1,250,000 Gold ]/@EnterCave1(30,1250000)>\
<[ 30 Mins - 5 Game Points ]/@EnterCave2(30,5)>\\
<[ 60 Mins - 2,500,000 Gold ]/@EnterCave1(60,2500000)>\
<[ 60 Mins - 10 Game Points ]/@EnterCave2(60,10)>\\
<[ 120 Mins - 4,500,000 Gold ]/@EnterCave1(120,4500000)>\
<[ 120 Mins - 18 Game Points ]/@EnterCave2(120,18)>\\
<[ Game Point Main Menu ]/@GamePointMain>\\\

[@EnterCave1()]
#IF
#ACT
Mov D1 %ARG(1)
Mov N1 %ARG(2)
#IF
CheckGold %N1
#ACT
Mov  A1  "Gold"
Take Gold %N1
TimeRecall %D1
Goto @CheckMove
#ELSESAY
You do not have <$OUTPUT(N1)> Gold!!!\\
<[ Game Point Main Menu ]/@GamePointMain>\\\

[@EnterCave2()]
#IF
#ACT
Mov D1 %ARG(1)
Mov N1 %ARG(2)
#IF
CheckItem GamePoint %N1
#ACT
TimeRecall %D1
Take  GamePoint %N1
Mov  A1  "GamePoint"
Goto @CheckMove45
#ELSESAY
You do not have <$OUTPUT(N1)> Game Points!!!\\
<[ Game Point Main Menu ]/@GamePointMain>\\\

[@EnterCave145()]
#IF
#ACT
Mov D1 %ARG(1)
Mov N1 %ARG(2)
#IF
CheckGold %N1
#ACT
Mov  A1  "Gold"
Take Gold %N1
TimeRecall %D1
Goto @CheckMove45
#ELSESAY
You do not have <$OUTPUT(N1)> Gold!!!\\
<[ Game Point Main Menu ]/@GamePointMain>\\\

[@EnterCave245()]
#IF
#ACT
Mov D1 %ARG(1)
Mov N1 %ARG(2)
#IF
CheckItem GamePoint %N1
#ACT
TimeRecall %D1
Take  GamePoint %N1
Mov  A1  "GamePoint"
Goto @CheckMove45
#ELSESAY
You do not have <$OUTPUT(N1)> Game Points!!!\\
<[ Game Point Main Menu ]/@GamePointMain>\\\

[@CheckMove]
#IF
CheckHum  D111  2
#ACT
Goto  @CheckMoveD112
#ELSEACT
Map D111
#ELSESAY
Moving... 

[@CheckMoveD112]
#IF
CheckHum  D112  2
#ACT
Goto  @CheckMoveD113
#ELSEACT
Map D112
#ELSESAY
Moving... 

[@CheckMoveD113]
#IF
CheckHum  D113  2
#ACT
Goto @RefundGP
#SAY
Sorry, the entire Cave System is FULL!\\
<[ Game Point Main Menu ]/@GamePointMain>\\\
#ELSEACT
Map D113
#ELSESAY
Moving... 

[@RefundGP]
#IF
Equal  A1  "Gold"
#ACT
Give %A1 %N1
#ELSEACT
Give %A1   %N1
Break


[@CheckMove45]
#IF
CheckHum  D121  2
#ACT
Goto  @CheckMoveD122
#ELSEACT
Map D121
#ELSESAY
Moving... 

[@CheckMoveD122]
#IF
CheckHum  D122  2
#ACT
Goto  @CheckMoveD123
#ELSEACT
Map D122
#ELSESAY
Moving... 

[@CheckMoveD123]
#IF
CheckHum  D123  2
#ACT
Goto @RefundGP45
#SAY
Sorry, the entire Cave System is FULL!\\
<[ Game Point Main Menu ]/@GamePointMain>\\\
#ELSEACT
Map D123
#ELSESAY
Moving... 

[@RefundGP45]
#IF
Equal  A1  "Gold"
#ACT
Give %A1 %N1
#ELSEACT
Give %A1 %N1
Break


[@ExchangeGP]
#SAY
What would you like for your well earned GP?\\
1 * <[ Integral(20) ]/@Integral20(1,1)> for 1 GamePoint\
5 * <[ Integral(20) ]/@Integral20(5,5)> for 5 GamePoints\
10 * <[ Integral(20) ]/@Integral20(10,10)> for 10 GamePoints\
20 * <[ Integral(20) ]/@Integral20(20,20)> for 20 GamePoints\\
<[ 250,000 Gold ]/@MilGold(250000,1)> for 1 GamePoint\
<[ 1,250,000 Gold ]/@MilGold(1250000,5)> for 5 GamePoints\
<[ 2,500,000 Gold ]/@MilGold(2500000,10)> for 10 GamePoints\
<[ 5,000,000 Gold ]/@MilGold(5000000,20)> for 20 GamePoints\\
<[ Game Point Main Menu ]/@GamePointMain>\\\

[@Integral20()]
#ACT
Mov  D1  %ARG(1)
Mov  D2  %ARG(2)
#IF
CheckItem GamePoint %D1
#ACT
Take GamePoint %D1
Give Integral(20) %D2
#ELSESAY
You do not have <$OUTPUT(D1)> GamePoints!\\
<[ Game Point Main Menu ]/@GamePointMain>\\\

[@MilGold()]
#ACT
Mov  D1  %ARG(1)
Mov  D2  %ARG(2)
#IF
CheckItem GamePoint %D2
#ACT
Take GamePoint %D2
Give Gold %D1
#ELSESAY
You do not have <$OUTPUT(D1)> GamePoints!\\
<[ Game Point Main Menu ]/@GamePointMain>\\\


[@MakeGP]
#IF
#SAY
Which Item do you have?\\
<[ Ring ]/@Rings>\
<[ Brace ]/@Braces>\
<[ Necklace ]/@Neckys>\
<[ 50+ None (Old) Item ]/@HighLevel>\
<[ Ancient Items ]/@AncientItems>\\
<[ Back to Main Menu ]/@Main>\
<[ Exit ]/@exit>\\\

[@AncientItems]
#SAY
Which Item do you want to convert?\
<[ AncientDarkPower ]/@Convert260(AncientDarkPower)>\
<[ AncientDragonRing(IG) ]/@Convert260(AncientDragonRing(IG))>\
<[ AncientDragonRing(GE) ]/@Convert260(AncientDragonRing(GE))>\
<[ AncientDragonRing(FU) ]/@Convert260(AncientDragonRing(FU))>\
<[ AncientDragonRing(VE) ]/@Convert260(AncientDragonRing(VE))>\
<[ AncientSangRing(SA) ]/@Convert260(AncientSangRing(SA))>\
<[ AncientSangRing(AT) ]/@Convert260(AncientSangRing(AT))>\
<[ AncientWarriorRing ]/@Convert260(AncientWarriorRing)>\
<[ AncientWizardRing(IG) ]/@Convert260(AncientWizardRing(IG))>\
<[ AncientWizardRing(GE) ]/@Convert260(AncientWizardRing(GE))>\
<[ AncientWizardRing(FU) ]/@Convert260(AncientWizardRing(FU))>\
<[ AncientWizardRing(VE) ]/@Convert260(AncientWizardRing(VE))>\
<[ AncientTaoistRing(SA) ]/@Convert260(AncientTaoistRing(SA))>\
<[ AncientTaoistRing(AT) ]/@Convert260(AncientTaoistRing(AT))>\
<[ AncientDarkBrace ]/@Convert260(AncientDarkBrace)>\
<[ AncientWarriorBrace ]/@Convert260(AncientWarriorBrace)>\
<[ AncientDragonBrace ]/@Convert260(AncientDragonBrace)>\
<[ AncientWizardBrace ]/@Convert260(AncientWizardBrace)>\
<[ AncientSangBrace ]/@Convert260(AncientSangBrace)>\
<[ AncientTaoistBrace ]/@Convert260(AncientTaoistBrace)>\
<[ AncientDarkNeck ]/@Convert260(AncientDarkNeck)>\
<[ AncientWarriorNeck ]/@Convert260(AncientWarriorNeck)>\
<[ AncientDragonNeck ]/@Convert260(AncientDragonNeck)>\
<[ AncientWizardNeck ]/@Convert260(AncientWizardNeck)>\
<[ AncientSangNecklace ]/@Convert260(AncientSangNecklace)>\
<[ AncientTaoistNeck ]/@Convert260(AncientTaoistNeck)>\
<[ AncientDeepBrace(War) ]/@Convert260(AncientDeepBrace(War))>\
<[ AncientDeepRing(War) ]/@Convert260(AncientDeepRing(War))>\
<[ AncientDeepNeck(War) ]/@Convert260(AncientDeepNeck(War))>\
<[ AncientDeepBrace(Wiz) ]/@Convert260(AncientDeepBrace(Wiz))>\
<[ AncientDeepRing(Wiz) ]/@Convert260(AncientDeepRing(Wiz))>\
<[ AncientDeepNeck(Wiz) ]/@Convert260(AncientDeepNeck(Wiz))>\
<[ AncientDeepBrace(Tao) ]/@Convert260(AncientDeepBrace(Tao))>\
<[ AncientDeepRing(Tao) ]/@Convert260(AncientDeepRing(Tao))>\
<[ AncientDeepNeck(Tao) ]/@Convert260(AncientDeepNeck(Tao))>\\
<[ Back to Main Menu ]/@Main>\
<[ Exit ]/@exit>\\\


[@Rings]
#SAY
Which Ring?\\
<[ PowerLord ]/@Elements1(PowerLord)>\
<[ DragonLord ]/@Elements1(DragonLord)>\
<[ SangHyoungLord ]/@Elements1(SangHyoungLord)>\
<[ DarkPower ]/@Elements1(DarkPower)>\
<[ DarkDragon ]/@Elements1(DarkDragon)>\
<[ DarkSangHyoung ]/@Elements1(DarkSangHyoung)>\
<[ Back to Main Menu ]/@Main>\
<[ Exit ]/@exit>\\\

[@Braces]
#SAY
Which Brace?\\
<[ FaultBrace ]/@Elements1(FaultBrace)>\
<[ OriginationBrace ]/@Elements1(OriginationBrace)>\
<[ WarSpiritWheel ]/@Elements1(WarSpiritWheel)>\
<[ DarkFaultBrace ]/@Elements1(DarkFaultBrace)>\
<[ DarkOriginationBrace ]/@Elements1(DarkOriginationBrace)>\
<[ DarkWarSpiritWheel ]/@Elements1(DarkWarSpiritWheel)>\
<[ LightFaultBrace ]/@Elements1(LightFaultBrace)>\
<[ LightOriginationBrace ]/@Elements1(LightOriginationBrace)>\
<[ LightWarSpiritWheel ]/@Elements1(LightWarSpiritWheel)>\
<[ Back to Main Menu ]/@Main>\
<[ Exit ]/@exit>\\\

[@Neckys]
#SAY
Which Necklace?\\
<[ LawOfMagic ]/@Elements1(LawOfMagic)>\
<[ SoulPurifier ]/@Elements1(SoulPurifier)>\
<[ ImperialValor ]/@Elements1(ImperialValor)>\
<[ DarkLawOfMagic ]/@Elements1(DarkLawOfMagic)>\
<[ DarkSoulPurifier ]/@Elements1(DarkSoulPurifier)>\
<[ DarkImperialValor ]/@Elements1(DarkImperialValor)>\
<[ LawOfMagicLight ]/@Elements1(LawOfMagicLight)>\
<[ SoulPurifierLight ]/@Elements1(SoulPurifierLight)>\
<[ ImperialValorLight ]/@Elements1(ImperialValorLight)>\\
<[ Back to Main Menu ]/@Main>\
<[ Exit ]/@exit>\\\

[@HighLevel]
#SAY
What type of item do you want to convert?\\
<[ Ring ]/@Ring60>\
<[ Brace ]/@Brace60>\
<[ Necky ]/@Necky60>\
<[ Helm ]/@Helm60>\
<[ Armour ]/@Armour60>\
<[ Footwear ]/@Boot60>\
<[ Weapon ]/@Weapon60>\\
<[ Back to Main Menu ]/@Main>\
<[ Exit ]/@exit>\\\

[@Boot60]
#SAY
Which Item do you want to convert?\
<[ BlackNobleBoots ]/@Convert260(BlackNobleBoots)>\
<[ FlameSaverBoots ]/@Convert260(FlameSaverBoots)>\
<[ ProtectionBoots ]/@Convert260(ProtectionBoots)>\
<[ BlueNobleBoots ]/@Convert260(BlueNobleBoots)>\
<[ RedNobleBoots ]/@Convert260(RedNobleBoots)>\
<[ ClassSwiftBoots ]/@Convert260(ClassSwiftBoots)>\
<[ BrownNobleBoots ]/@Convert260(BrownNobleBoots)>\
<[ AngelBoots ]/@Convert260(AngelBoots)>\
<[ RedProtectors ]/@Convert260(RedProtectors)>\
<[ PetiteBoots ]/@Convert260(PetiteBoots)>\
<[ GoldProtectorBoots ]/@Convert260(GoldProtectorBoots)>\
<[ GoldScaleBoots ]/@Convert260(GoldScaleBoots)>\
<[ DragonScaleBoots ]/@Convert260(DragonScaleBoots)>\
<[ Back to Main Menu ]/@Main>\
<[ Exit ]/@exit>\\\

[@Helm60]
#SAY
Which Item do you want to convert?\
<[ LiegeDefender ]/@Convert260(LiegeDefender)>\
<[ TigerDefender ]/@Convert260(TigerDefender)>\
<[ TurbanDefender ]/@Convert260(TurbanDefender)>\
<[ HelmOfPower ]/@Convert260(HelmOfPower)>\
<[ HelmOfMagic(DEF) ]/@Convert260(HelmOfMagic(DEF))>\
<[ HelmOfMagic(ATT) ]/@Convert260(HelmOfMagic(ATT))>\
<[ DarkHelmOfPower ]/@Convert260(DarkHelmOfPower)>\
<[ DarkHelmOfMagic(DEF) ]/@Convert260(DarkHelmOfMagic(DEF))>\
<[ DarkHelmOfMagic(ATT) ]/@Convert260(DarkHelmOfMagic(ATT))>\
<[ LightHelmOfPower ]/@Convert260(LightHelmOfPower)>\
<[ LightHelmOfMagic(DEF) ]/@Convert260(LightHelmOfMagic(DEF))>\
<[ LightHelmOfMagic(ATT) ]/@Convert260(LightHelmOfMagic(ATT))>\
<[ KingsHelm(IG) ]/@Convert260(KingsHelm(IG))>\
<[ KingsHelm(GE) ]/@Convert260(KingsHelm(GE))>\
<[ KingsHelm(FU) ]/@Convert260(KingsHelm(FU))>\
<[ KingsHelm(VE) ]/@Convert260(KingsHelm(VE))>\
<[ KingsHelm(SA) ]/@Convert260(KingsHelm(SA))>\
<[ KingsHelm(AT) ]/@Convert260(KingsHelm(AT))>\
<[ KingsHelm(PH) ]/@Convert260(KingsHelm(PH))>\
<[ KingsHelm ]/@Convert260(KingsHelm)>\
<[ SatanicHelmet ]/@Convert260(SatanicHelmet)>\
<[ HelmOfGod ]/@Convert260(HelmOfGod)>\
<[ UniversalHelm ]/@Convert260(UniversalHelm)>\
<[ EnmityHelmet ]/@Convert260(EnmityHelmet)>\
<[ Back to Main Menu ]/@Main>\
<[ Exit ]/@exit>\\\

[@Brace60]
#SAY
Which Item do you want to convert?\
<[ DarkMithrilGlove ]/@Convert260(DarkMithrilGlove)>\
<[ DarkDragonsClaw ]/@Convert260(DarkDragonsClaw)>\
<[ DarkAdamantineGlove ]/@Convert260(DarkAdamantineGlove)>\
<[ LightMithrilGlove ]/@Convert260(LightMithrilGlove)>\
<[ LightDragonsClaw ]/@Convert260(LightDragonsClaw)>\
<[ LightAdamantineGlove ]/@Convert260(LightAdamantineGlove)>\
<[ EmphaticBracelet ]/@Convert260(EmphaticBracelet)>\
<[ NobleBracelet ]/@Convert260(NobleBracelet)>\
<[ RaiderBracelet ]/@Convert260(RaiderBracelet)>\
<[ EmphaticShieldBracelet ]/@Convert260(EmphaticShieldBracelet)>\
<[ NobleShieldBracelet ]/@Convert260(NobleShieldBracelet)>\
<[ RaiderShieldBracelet ]/@Convert260(RaiderShieldBracelet)>\
<[ FearsomeGlove ]/@Convert260(FearsomeGlove)>\
<[ SupremeBracelet ]/@Convert260(SupremeBracelet)>\
<[ ShadowBracelet ]/@Convert260(ShadowBracelet)>\
<[ CollisionBrace ]/@Convert260(CollisionBrace)>\
<[ DominanceBrace ]/@Convert260(DominanceBrace)>\
<[ CoreBracelet ]/@Convert260(CoreBracelet)>\
<[ TempleBand(MC) ]/@Convert260(TempleBand(MC))>\
<[ TempleBand(SC) ]/@Convert260(TempleBand(SC))>\
<[ TempleBand(DC) ]/@Convert260(TempleBand(DC))>\
<[ Back to Main Menu ]/@Main>\
<[ Exit ]/@exit>\\\

[@Ring60]
#SAY
Which Item do you want to convert?\
<[ DevineRing ]/@Convert260(DevineRing)>\
<[ ChivalryRing ]/@Convert260(ChivalryRing)>\
<[ DevineChivalryRing ]/@Convert260(DevineChivalryRing)>\
<[ DevineBeastRing(IG) ]/@Convert260(DevineBeastRing(IG))>\
<[ DevineBeastRing(GE) ]/@Convert260(DevineBeastRing(GE))>\
<[ DevineBeastRing(VE) ]/@Convert260(DevineBeastRing(VE))>\
<[ DevineBeastRing(FU) ]/@Convert260(DevineBeastRing(FU))>\
<[ DevinationRing(SA) ]/@Convert260(DevinationRing(SA))>\
<[ DevinationRing(AT) ]/@Convert260(DevinationRing(AT))>\
<[ NobleRing ]/@Convert260(NobleRing)>\
<[ EmphaticRing ]/@Convert260(EmphaticRing)>\
<[ MagicShieldRing ]/@Convert260(MagicShieldRing)>\
<[ SurviveRing ]/@Convert260(SurviveRing)>\
<[ SpeedRing ]/@Convert260(SpeedRing)>\
<[ SurvivalBand ]/@Convert260(SurvivalBand)>\
<[ BloodStealerRing ]/@Convert260(BloodStealerRing)>\
<[ BreathStealerRing ]/@Convert260(BreathStealerRing)>\
<[ KillerRing ]/@Convert260(KillerRing)>\
<[ AdvancedSurviveRing ]/@Convert260(AdvancedSurviveRing)>\
<[ AdvancedSpeedRing ]/@Convert260(AdvancedSpeedRing)>\
<[ AdvancedSurvivalBand ]/@Convert260(AdvancedSurvivalBand)>\
<[ BodyStealerRing ]/@Convert260(BodyStealerRing)>\
<[ WindStealerRing ]/@Convert260(WindStealerRing)>\
<[ MurderousRing ]/@Convert260(MurderousRing)>\
<[ RotationRing(SA) ]/@Convert260(RotationRing(SA))>\
<[ RotationRing(AT) ]/@Convert260(RotationRing(AT))>\
<[ BeastRing ]/@Convert260(BeastRing)>\
<[ RotationRing ]/@Convert260(RotationRing)>\
<[ BeastRing(IG) ]/@Convert260(BeastRing(IG))>\
<[ BeastRing(VE) ]/@Convert260(BeastRing(VE))>\
<[ BeastRing(GE) ]/@Convert260(BeastRing(GE))>\
<[ BeastRing(FU) ]/@Convert260(BeastRing(FU))>\
<[ RaiderRing ]/@Convert260(RaiderRing)>\
<[ FearsomeRing ]/@Convert260(FearsomeRing)>\
<[ SupremeRing ]/@Convert260(SupremeRing)>\
<[ ShadowRing ]/@Convert260(ShadowRing)>\
<[ CollisionRing ]/@Convert260(CollisionRing)>\
<[ DominanceRing ]/@Convert260(DominanceRing)>\
<[ CoreRing ]/@Convert260(CoreRing)>\
<[ RingOfSpirit ]/@Convert260(RingOfSpirit)>\
<[ RingOfMagic ]/@Convert260(RingOfMagic)>\
<[ RingOfStrength ]/@Convert260(RingOfStrength)>\
<[ Back to Main Menu ]/@Main>\
<[ Exit ]/@exit>\\\

[@Necky60]
#SAY
Which Item do you want to convert?\
<[ EmphaticNecklace ]/@Convert260(EmphaticNecklace)>\
<[ NobleNecklace ]/@Convert260(NobleNecklace)>\
<[ RaiderNecklace ]/@Convert260(RaiderNecklace)>\
<[ FearsomeNecklace ]/@Convert260(FearsomeNecklace)>\
<[ SupremeNecklace ]/@Convert260(SupremeNecklace)>\
<[ ShadowNecklace ]/@Convert260(ShadowNecklace)>\
<[ CollisionNecky ]/@Convert260(CollisionNecky)>\
<[ DominanceNecky ]/@Convert260(DominanceNecky)>\
<[ CoreNecky ]/@Convert260(CoreNecky)>\
<[ KnowledgeNeck ]/@Convert260(KnowledgeNeck)>\
<[ HeartNeck ]/@Convert260(HeartNeck)>\
<[ PowerNeck ]/@Convert260(PowerNeck)>\
<[ Back to Main Menu ]/@Main>\
<[ Exit ]/@exit>\\\

[@Weapon60]
#SAY
Which Item do you want to convert?\
<[ SagakBlade ]/@Convert260(SagakBlade)>\
<[ DragonSagak ]/@Convert260(DragonSagak)>\
<[ GreatBlade ]/@Convert260(GreatBlade)>\
<[ DragonGreatBlade ]/@Convert260(DragonGreatBlade)>\
<[ WisdomStaff ]/@Convert260(WisdomStaff)>\
<[ DragonWisdomStaff ]/@Convert260(DragonWisdomStaff)>\
<[ WindBlade ]/@Convert260(WindBlade)>\
<[ SpiralSoulBlade ]/@Convert260(SpiralSoulBlade)>\
<[ EvilSpiritSword ]/@Convert260(EvilSpiritSword)>\
<[ AngelicBlade ]/@Convert260(AngelicBlade)>\
<[ NecromaticGlaive ]/@Convert260(NecromaticGlaive)>\
<[ HolyTaoFan ]/@Convert260(HolyTaoFan)>\
<[ DarkPowerGlaive ]/@Convert260(DarkPowerGlaive)>\
<[ DarkPowerFan ]/@Convert260(DarkPowerFan)>\
<[ DragonTreasure ]/@Convert260(DragonTreasure)>\
<[ ElementalSword ]/@Convert260(ElementalSword)>\
<[ PowerDagger ]/@Convert260(PowerDagger)>\
<[ SatanicBlade ]/@Convert260(SatanicBlade)>\
<[ SatanicStaff ]/@Convert260(SatanicStaff)>\
<[ SatanicWand ]/@Convert260(SatanicWand)>\
<[ ShadeDemon ]/@Convert260(ShadeDemon)>\
<[ EdgeShadeDemon ]/@Convert260(EdgeShadeDemon)>\
<[ DarkSnakeBlade ]/@Convert260(DarkSnakeBlade)>\
<[ EnmitySword ]/@Convert260(EnmitySword)>\
<[ SwordOfGod ]/@Convert260(SwordOfGod)>\
<[ Back to Main Menu ]/@Main>\
<[ Exit ]/@exit>\\\

[@Armour60]
#SAY
Which Item do you want to convert?\
<[ WarDemon(M) ]/@Convert260(WarDemon(M))>\
<[ WizDemon(M) ]/@Convert260(WizDemon(M))>\
<[ TaoDemon(M) ]/@Convert260(TaoDemon(M))>\
<[ LightWarriorCloth(M) ]/@Convert260(LightWarriorCloth(M))>\
<[ LightMageRobe(M) ]/@Convert260(LightMageRobe(M))>\
<[ LightTaoRobe(M) ]/@Convert260(LightTaoRobe(M))>\
<[ DarkWarriorCloth(M) ]/@Convert260(DarkWarriorCloth(M))>\
<[ DarkMageRobe(M) ]/@Convert260(DarkMageRobe(M))>\
<[ DarkTaoRobe(M) ]/@Convert260(DarkTaoRobe(M))>\
<[ KingsChampionArmour(M) ]/@Convert260(KingsChampionArmour(M))>\
<[ KingsMageRobe(M) ]/@Convert260(KingsMageRobe(M))>\
<[ KingsPaladinArmour(M) ]/@Convert260(KingsPaladinArmour(M))>\
<[ SatanicDeath(M) ]/@Convert260(SatanicDeath(M))>\
<[ PowerSatanic(M) ]/@Convert260(PowerSatanic(M))>\
<[ SoulSatanic(M) ]/@Convert260(SoulSatanic(M))>\
<[ ArmourOfGod(M) ]/@Convert260(ArmourOfGod(M))>\
<[ UniversalArmour(M) ]/@Convert260(UniversalArmour(M))>\
<[ WarDemon(F) ]/@Convert260(WarDemon(F))>\
<[ WizDemon(F) ]/@Convert260(WizDemon(F))>\
<[ TaoDemon(F) ]/@Convert260(TaoDemon(F))>\
<[ LightWarriorCloth(F) ]/@Convert260(LightWarriorCloth(F))>\
<[ LightMageRobe(F) ]/@Convert260(LightMageRobe(F))>\
<[ LightTaoRobe(F) ]/@Convert260(LightTaoRobe(F))>\
<[ DarkWarriorCloth(F) ]/@Convert260(DarkWarriorCloth(F))>\
<[ DarkMageRobe(F) ]/@Convert260(DarkMageRobe(F))>\
<[ DarkTaoRobe(F) ]/@Convert260(DarkTaoRobe(F))>\
<[ KingsChampionArmour(F) ]/@Convert260(KingsChampionArmour(F))>\
<[ KingsMageRobe(F) ]/@Convert260(KingsMageRobe(F))>\
<[ KingsPaladinArmour(F) ]/@Convert260(KingsPaladinArmour(F))>\
<[ SatanicDeath(F) ]/@Convert260(SatanicDeath(F))>\
<[ PowerSatanic(F) ]/@Convert260(PowerSatanic(F))>\
<[ SoulSatanic(F) ]/@Convert260(SoulSatanic(F))>\
<[ ArmourOfGod(F) ]/@Convert260(ArmourOfGod(F))>\
<[ UniversalArmour(F) ]/@Convert260(UniversalArmour(F))>\
<[ Back to Main Menu ]/@Main>\
<[ Exit ]/@exit>\\\


[@Elements1()]
#ACT
Mov   A1  %ARG(1)
#SAY
Which Flavour would you like to exchange?\\
<[ No Element ]/@Convert1(No)>\
<[ IG ]/@Convert1(IG)>\
<[ GE ]/@Convert1(GE)>\
<[ PH ]/@Convert1(PH)>\
<[ VE ]/@Convert1(VE)>\
<[ SA ]/@Convert1(SA)>\
<[ AT ]/@Convert1(AT)>\
<[ FU ]/@Convert1(FU)>\
<[ Back to Main Menu ]/@Main>\\\

[@Convert1()]
#ACT
Mov  A2  %ARG(1)
#IF
Equal  A2  "No"
#ACT
Goto @Convert2
Break
#IF
#ACT
Addstr  A1  "("
Addstr  A1  %A2
Addstr  A1  ")"
Goto @Convert2
Break

[@Convert2]
#SAY
Are you sure you want to convert your <$OUTPUT(A1)> into GamePoints?\\
<[ Yes, Convert it ]/@Convert3>\
<[ Back to Main Menu ]/@Main>\\\

[@Convert260()]
#ACT
Mov A1  %ARG(1)
#SAY
Are you sure you want to convert your <$OUTPUT(A1)> into GamePoints?\\
<[ Yes, Convert it ]/@Convert3>\
<[ Back to Main Menu ]/@Main>\\\

[@Convert3]
#IF
CheckItem   %A1   1
#ACT
Take  %A1   1
Give  GamePoint  1
#SAY
Thanks, there is your GamePoint\\
Please keep hold of it until Sting has sorted\
it out properly\\
<[ Convert Another ]/@GamePointMain>\
<[ Exit ]/@exit>\\\
#ELSESAY
You do not have a <$OUTPUT(A1)>\\
<[ Convert Another ]/@GamePointMain>\
<[ Exit ]/@exit>\\\
}
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
