;;Ҫɾ
[@Normal]
{
#IF
#ACT
goto @Normal_2
#ELSEACT
goto @Normal_2

[@Normal_2]
#IF
#SAY
<Click Here To See What Pets You Can Rent/@TamingNormal(99,1)>\

[@TamingNormal()]
#IF
#ACT
Mov D0 %ARG(1)
Mov D1 %ARG(2)
#IF
#SAY
Here is the pets you can rent:\\
{FCOLOR/10}Level 7: <Spitting Spider/@TamingMon(SpittingSpider,100)>\
;-----------------------------------------------------
#IF
CheckLevel 11
#SAY
{FCOLOR/10}Level 11: 
<Oma/@TamingMon(Oma,500)>\
#ELSESAY
{FCOLOR/1}Level 11: {FCOLOR/12}\
Oma\\
;-----------------------------------------------------
#IF
CheckLevel 15
#SAY
{FCOLOR/10}Level 15: 
<Oma Fighter/@TamingMon(OmaFighter,700)>\
#ELSESAY
{FCOLOR/1}Level 15:{FCOLOR/12} \
Oma Fighter\\
;-----------------------------------------------------
#IF
CheckLevel 17
#SAY
{FCOLOR/10}Level 17: 
<Skeleton Axe Hurler/@TamingMon(SkeletonAxeHurler,800)>\
#ELSESAY
{FCOLOR/1}Level 17:{FCOLOR/12}\
Skeleton Axe Hurler\\
;-----------------------------------------------------
#IF
CheckLevel 20
#SAY
{FCOLOR/10}Level 20: 
<Skeleton Executioner/@TamingMon(SkeletonExecutioner,1000)>\
#ELSESAY
{FCOLOR/1}Level 20:{FCOLOR/12}\
Skeleton Executioner\\
;-----------------------------------------------------
#IF
CheckLevel 22
#SAY
{FCOLOR/10}Level 22: 
<Kektal/@TamingMon(Kektal,2100)> | <HoroBlaster/@TamingMon(HoroBlaster,2200)> | <Spiderfrog/@TamingMon(Spiderfrog,2300)>\
#ELSESAY
{FCOLOR/1}Level 22:{FCOLOR/12}\
 Kektal | HoroBlaster | Spiderfrog\\
;-----------------------------------------------------
#IF
CheckLevel 24
#SAY
{FCOLOR/10}Level 24: 
<SoldierAnt/@TamingMon(SoldierAnt,2400)> | <FeederAnt/@TamingMon(FeederAnt,2500)> | <ArmouredAnt/@ArmouredAnt(Oma,26000)>\
#ELSESAY
{FCOLOR/1}Level 24:{FCOLOR/12} SoldierAnt | FeederAnt | ArmouredAnt\
;-----------------------------------------------------
#IF
CheckLevel 26
#SAY
{FCOLOR/10}Level 26: 
<Centipede/@TamingMon(Centipede,3000)> | <GiantCaterpillar/@TamingMon(GiantCaterpillar,3200)>\
#ELSESAY
{FCOLOR/1}Level 26:{FCOLOR/12} Centipede | GiantCaterpillar\
;-----------------------------------------------------
#IF
CheckLevel 27
#SAY
{FCOLOR/10}Level 27: 
<JumpingWasp/@TamingMon(Centipede,3500)>  | <MutatedMaggot/@TamingMon(MutatedMaggot,3800)>\
#ELSESAY
{FCOLOR/1}Level 27:{FCOLOR/12} JumpingWasp | MutatedMaggot\
;-----------------------------------------------------
#IF
CheckLevel 29
#SAY
{FCOLOR/10}Level 29: 
<Tongs/@TamingMon(Tongs,4000)>\
#ELSESAY
{FCOLOR/1}Level 29:{FCOLOR/12} Tongs\
;-----------------------------------------------------
#IF
CheckLevel 30
#SAY
{FCOLOR/10}Level 30: 
<WedgeMoth/@TamingMon(WedgeMoth,4200)> | <RedBoar/@TamingMon(RedBoar,4500)> | <BlackBoar/@TamingMon(BlackBoar,4600)>\
#ELSESAY
{FCOLOR/1}Level 30:{FCOLOR/12} WedgeMoth | RedBoar | BlackBoar\
;-----------------------------------------------------
#IF
CheckLevel 31
#SAY
{FCOLOR/10}Level 31: 
<SnakeScorpion/@TamingMon(SnakeScorpion,5000)>\
#ELSESAY
{FCOLOR/1}Level 31:{FCOLOR/12} SnakeScorpion\
;-----------------------------------------------------
#IF
CheckLevel 32
#SAY
{FCOLOR/10}Level 32: 
<BoneSpearman/@TamingMon(BoneSpearman,5200)> | <BoneBlademan/@TamingMon(BoneBlademan,5400)>\
#ELSESAY
{FCOLOR/1}Level 32:{FCOLOR/12} BoneSpearman | BoneBlademan\
;-----------------------------------------------------
#IF
CheckLevel 33
#SAY
{FCOLOR/10}Level 33: 
<BoneArcher/@TamingMon(BoneArcher,5600)> | <BoneCaptain/@TamingMon(BoneCaptain,6000)>\
#ELSESAY
{FCOLOR/1}Level 33:{FCOLOR/12} BoneArcher | BoneCaptain\
;-----------------------------------------------------
#IF
CheckLevel 34
#SAY
{FCOLOR/10}Level 34: 
<SpiderBat/@TamingMon(SpiderBat,6200)> | <DarkArachnid/@TamingMon(DarkArachnid,6400)> | 
<VenomArachnid/@TamingMon(VenomArachnid,6500)>\
#ELSESAY
{FCOLOR/1}Level 34:{FCOLOR/12} SpiderBat | DarkArachnid | VenomArachnid\
;-----------------------------------------------------
#IF
CheckLevel 35
#SAY
{FCOLOR/10}Level 35: 
<SandShark/@TamingMon(SandShark,6600)> | <StoneGolem/@TamingMon(StoneGolem,6800)> | 
<EvilDesertHermit/@TamingMon(EvilDesertHermit,7000)>\
#ELSESAY
{FCOLOR/1}Level 35:{FCOLOR/12} SandShark | StoneGolem | EvilDesertHermit\
;-----------------------------------------------------
#IF
CheckLevel 36
#SAY
{FCOLOR/10}Level 36: 
<Numa/@TamingMon(Numa,7200)> | <NumaCaptain/@TamingMon(NumaCaptain,7400)> | 
<NumaMonk/@TamingMon(NumaMonk,7500)>\
#ELSESAY
{FCOLOR/1}Level 36:{FCOLOR/12} Numa | NumaCaptain | NumaMonk\
;-----------------------------------------------------
#IF
CheckLevel 37
#SAY
{FCOLOR/10}Level 37: 
<Dung/@TamingMon(Dung,7600)> | <Dark/@TamingMon(Dark/,7800)>\
#ELSESAY
{FCOLOR/1}Level 37:{FCOLOR/12} Dung | Dark\
;-----------------------------------------------------
#IF
CheckLevel 38
#SAY
{FCOLOR/10}Level 38: 
<WoomaInfidel/@TamingMon(WoomaInfidel1,8000)> | <FlamingWooma/@TamingMon(FlamingWooma1,8200)>\
#ELSESAY
{FCOLOR/1}Level 38:{FCOLOR/12} WoomaInfidel | FlamingWooma\
;-----------------------------------------------------
#IF
CheckLevel 39
#SAY
{FCOLOR/10}Level 39: 
<BigApe/@TamingMon(BigApe,8400)> | <EvilApe/@TamingMon(EvilApe,8500)>\
#ELSESAY
{FCOLOR/1}Level 39:{FCOLOR/12} BigApe | EvilApe\
;-----------------------------------------------------
#IF
CheckLevel 40
#SAY
{FCOLOR/10}Level 40: 
<Monkey/@TamingMon(Monkey,8600)> | <EvilMonkey/@TamingMon(EvilMonkey,8700)>\
#ELSESAY
{FCOLOR/1}Level 40:{FCOLOR/12} Monkey | EvilMonkey\
;-----------------------------------------------------
#IF
CheckLevel 41
#SAY
{FCOLOR/10}Level 41:
<EvilFanatic/@TamingMon(EvilFanatic1,9000)> | <EvilFanatic(Archer)/@TamingMon(EvilFanatic2,9200)> | 
<EvilElephant/@TamingMon(EvilElephant,9400)>\
#ELSESAY
{FCOLOR/1}Level 41:{FCOLOR/12} EvilFanatic(Archer),EvilFanatic,EvilElephant\
;-----------------------------------------------------
#IF
CheckLevel 42
#SAY
{FCOLOR/10}Level 42: 
<BigRat/@TamingMon(BigRat,9600)> | <ZumaArcher/@TamingMon(ZumaArcher,9800)>\
#ELSESAY
{FCOLOR/1}Level 42:{FCOLOR/12} BigRat | ZumaArcher\
;-----------------------------------------------------
#IF
CheckLevel 43
#SAY
{FCOLOR/10}Level 43: 
<ZumaStatue/@TamingMon(ZumaArcher,10000)> | <ZumaGuardian/@TamingMon(ZumaArcher,10200)> | 
<Minotaur/@TamingMon(Minotaur,10400)> \
#ELSESAY
{FCOLOR/1}Level 43:{FCOLOR/12} ZumaStatue | ZumaGuardian | Minotaur\
;-----------------------------------------------------
#IF
CheckLevel 44
#SAY
{FCOLOR/10}Level 44:{FCOLOR/12}Minotaur's: {FCOLOR/10}
<Ice/@TamingMon(IceMinotaur,10600)> | <Electric/@TamingMon(ElectricMinotaur,10800)> | 
<Wind/@TamingMon(WindMinotaur,11000)> | <Fire/@TamingMon(FireMinotaur,11200)>\
#ELSESAY
{FCOLOR/1}Level 44:{FCOLOR/12} Minotaur's: Ice | Electric | Wind | Fire\
;-----------------------------------------------------
#IF
CheckLevel 45
#SAY
{FCOLOR/10}Level 45: 
<RightGuard/@TamingMon(RightGuard,11400)> | <LeftGuard/@TamingMon(LeftGuard,11600)>\
#ELSESAY
{FCOLOR/1}Level 45:{FCOLOR/12} RightGuard | LeftGuard\
;-----------------------------------------------------
#IF
CheckLevel 46
#SAY
{FCOLOR/10}Level 46: 
<Dung/@TamingMon(Dung,11800)> | <Dark/@TamingMon(Dark,12000)>\
#ELSESAY
{FCOLOR/1}Level 46:{FCOLOR/12} Dung,Dark\
;-----------------------------------------------------
#IF
CheckLevel 47
#SAY
{FCOLOR/10}Level 47: 
<WoomaInfidel/@TamingMon(WoomaInfidel2,12200)> | <FlamingWooma/@TamingMon(FlamingWooma2,12400)>\
#ELSESAY
{FCOLOR/1}Level 47:{FCOLOR/12} WoomaInfidel | FlamingWooma\
;-----------------------------------------------------
#IF
CheckLevel 48
#SAY
{FCOLOR/10}Level 48: 
<FlameGriffin/@TamingMon(FlameGriffin,12400)> | <StoneGriffin/@TamingMon(StoneGriffin,12600)>\
#ELSESAY
{FCOLOR/1}Level 48:{FCOLOR/12} FlameGriffin | StoneGriffin\
;-----------------------------------------------------
#IF
CheckLevel 49
#SAY
{FCOLOR/10}Level 49: 
{FCOLOR/12}EvilPrietess:{FCOLOR/10} <(Red)/@TamingMon(EvilPrietess1,12800)> | <(Blue)/@TamingMon(EvilPrietess2,13000)> | 
<MutantCaptain/@TamingMon(MutantCaptain,13200)>\
#ELSESAY
{FCOLOR/1}Level 49:{FCOLOR/12} EvilPrietess: (Red) | (Blue) | MutantCaptain\
;-----------------------------------------------------
#IF
CheckLevel 50
#SAY
{FCOLOR/10}Level 50: 
<Shocktopus/@TamingMon(Shocktopus,13400)> | <Venoctopus/@TamingMon(Venoctopus,13600)> | 
<Ichthyo/@TamingMon(Ichthyo,13800)>\
#ELSESAY
{FCOLOR/1}Level 50:{FCOLOR/12} Shocktopus | Venoctopus | Ichthyo\
;-----------------------------------------------------
#IF
CheckLevel 51
#SAY
{FCOLOR/10}Level 51: 
<Marafin/@TamingMon(Marafin,14000)> | <HellHound/@TamingMon(HellHound,14200)> | 
<EvilSkirmisher/@TamingMon(EvilSkirmisher,14400)>\
#ELSESAY
{FCOLOR/1}Level 51:{FCOLOR/12} Marafin | HellHound | EvilSkirmisher\
;-----------------------------------------------------
#IF
CheckLevel 52
#SAY
{FCOLOR/10}Level 52: 
<LightInfantry/@TamingMon(LightInfantry,14600)> \
#ELSESAY
{FCOLOR/1}Level 52:{FCOLOR/12} LightInfantry\
;-----------------------------------------------------
#IF
CheckLevel 53
#SAY
{FCOLOR/10}Level 53: 
{FCOLOR/12}EvilPrietess:{FCOLOR/10} <(Red)/@TamingMon(EvilPrietess10,14800)> | <(Blue)/@TamingMon(EvilPrietess20,15000)> | 
<MutantCaptain/@TamingMon(MutantCaptain1,15200)>\
#ELSESAY
{FCOLOR/1}Level 53:{FCOLOR/12} EvilPrietess: (Red) | (Blue) | MutantCaptain\
;-----------------------------------------------------
#IF
CheckLevel 54
#SAY
{FCOLOR/10}Level 54: 
<BigRat/@TamingMon(BigRat,15400)> | <ZumaArcher/@TamingMon(ZumaArcher,15600)>\
#ELSESAY
{FCOLOR/1}Level 54:{FCOLOR/12} BigRat | ZumaArcher\
;-----------------------------------------------------
#IF
CheckLevel 55
#SAY
{FCOLOR/10}Level 55: 
<ZumaStatue/@TamingMon(ZumaStatue,15800)> | <ZumaGuardian/@TamingMon(ZumaGuardian,16000)>\
<Leave/@Exit>
#ELSESAY
{FCOLOR/1}Level 55:{FCOLOR/12} ZumaStatue | ZumaGuardian\
<Leave/@Exit>
;-----------------------------------------------------

[@TamingMon()]
#IF
#ACT
Mov A1 %ARG(1)
Mov D2 %ARG(2)
Mul D2 D1
Mov D3 %P9
#IF
#SAY
What level <$OUTPUT(A1)> do you want to tame? \ \
<Level 0/@TrainMon(0)>\
<Level 1/@TrainMon(1)>\
<Level 2/@TrainMon(2)>\
<Level 3/@TrainMon(3)>\
<Level 4/@TrainMon(4)>\
<Level 5/@TrainMon(5)>\
<Level 6/@TrainMon(6)>\
<Level 7/@TrainMon(7)>\\
<Leave/@Exit>\

[@TrainMon()]
#IF
#ACT
Mov D4 %ARG(1)

#IF
Equal D4 0
#ACT
Mov D5 %D3
goto @TrainMon-3
#ELSEACT
Mul D3 D4
Mov D5 %P9
goto @TrainMon-3

[@TrainMon-3]
#SAY
Please Confirm That This is Correct:\\
Monster Name: {FCOLOR/10}<$OUTPUT(A1)>{FCOLOR/12}\
Monster Level: {FCOLOR/10}<$OUTPUT(D4)>{FCOLOR/12}\
Monster Price: {FCOLOR/10}<$OUTPUT(D5)>{FCOLOR/12}\\
<Rent This Pet/@TamingMon_Result> \
<Leave/@exit>

[@TamingMon_Result]
#IF
checkgold %D5
checkmonrecall
#ACT
take Gold %D5
monrecall %A1 %D0 %D4
#SAY
There is your <$OUTPUT(A1)>. \ \
<Leave/@exit>
#ELSEACT
goto @TamingMon_Failed

[@TamingMon_Failed]
#IF
checkgold %D5
#SAY
Sorry.\
You do not have {FCOLOR/10}<$OUTPUT(D5)>{FCOLOR/12} Gold\\
<Leave/@exit>
#ELSESAY
You already have a pet...\\\
<Leave/@exit>
}
;;Ҫɾ