Working Pet Rent Release

Gangsta

LOMCN Veteran
Veteran
Loyal Member
Apr 30, 2004
302
3
65
This is not my script but i have changed some things 2 make it work correct

[@main]
#IF
checklevel 1
#SAY
Welcome <$USERNAME>\
What would u like to do?
<Buy a Tamed Mob/@next>\
<Level a Tamed Mob/@petlevel>\
<Leave/@exit>\

[@petlevel]
i can spawn mobs to level your\
pet\ \
<Ok spawn me some/@petlvl>\
<No thanks/@exit>\

[@petlvl]
#IF
checkmonmap b201 10
#ACT
goto @full
#ELSEACT
goto @spawn

[@full]
#SAY
The room already has over 10 monsers in it.\
Would you still like to teleport there althought i will not spawn\
any more mobs?\
<Sure/@movethere>\
<Back/@main>\

[@movethere]
#ACT
mapmove b201

[@spawn]
#ACT
Param1 b201
Param2 9
Param3 10
Mongen ScareCrow5 40 40
mapmove b201
give TownTeleport 1

[@next]
#IF
#ACT
goto @main-01
#ELSESAY
<Exit/@exit>

[@main-01]
#IF
checklevel 1
#SAY
Welcome <$USERNAME>\
People call me The Pet Giver!\
I am friends with many mobs in the world!\\
<Cool what can you do for me?/@main_0>\
<I don't like you.../@exit>\
<Admin (guild)/@admin>
#ELSESAY
Welcome <$USERNAME>\
People call me The Pet Giver!\
I am friends with many mobs in the world!\\
<Cool what can you do for me?/@main_0>\
<I don't like you.../@exit>\

[@main_0]
#IF
checklevel 1
#SAY
Well <$USERNAME>\
I can offer you many of the mobs in Mir...\
Depending on your level.. Do you wish to buy one?\\
<Yes please/@main_1>\
<Prices please/@Prices>\
<No.. go away FREAK!/@exit>
#ELSESAY
Sorry I can only give one Mob to each\
person.\\

<Leave/@exit>


[@Prices]
#IF
checklevel 28
#ACT
goto @lev28Price
break
#IF
checklevel 22
#ACT
goto @lev22Price
break
#IF
checklevel 15
#ACT
goto @lev15Price
break
#IF
checklevel 9
#ACT
goto @lev9Price
break
#IF
checklevel 1
#ACT
goto @lev1Price
break
#ELSEACT
#SAY
{FCOLOR/12}May I ask your level please?\
<1-8/@lev1Price>\
<9-14/@lev9Price>\
<15-21/@lev15Price>\
<22-27/@lev22Price>\
<28-35/@lev28Price>\
<Back please/@main_0>

[@lev1Price]
Hen - 500 gold\
Deer - 1,000 gold\
Oma - 3,500 gold\
<Back please/@main_0>

[@lev9Price]
Yeti - 4,000 gold\
Wolf - 4,500 gold\
Spitting Spider - 5,250 gold\
Bone Warrior - 7,000 gold\
<Back please/@main_0>

[@lev15Price]
CaveMaggot - 9,000 gold\
OmaFighter - 10,000 gold\
BoneElite - 50,000 gold\
<Back please/@main_0>

[@lev22Price]
Wooma Soldier - 12,000 gold\
Wooma Fighter - 14,000 gold\
Flaming Wooma - 15,000 gold\
Oma Warrior - 16,000 gold\
<Back please/@main_0>

[@lev28Price]
Snake Scorpion - 18,000 gold\
Red Evil Boar - 20,000 gold\
Black Evil Boar - 22,000 gold\
Lure Spider - 35,000 gold\
<Back please/@main_0>


[@main_1]
#IF
checklevel 28
#ACT
goto @lev28
break
#IF
checklevel 22
#ACT
goto @lev22
break
#IF
checklevel 15
#ACT
goto @lev15
break
#IF
checklevel 9
#ACT
goto @lev9
break
#IF
checklevel 1
#ACT
goto @lev1
break
#ELSEACT
#SAY
Please select your level as I am dumb\\

<1-8/@lev1>\
<9-14/@lev9>\
<15-21/@lev15>\
<22-27/@lev22>\
<28-35/@lev28>

[@lev1]
#IF
checklevel 1
#SAY
Well, You Seem Worthy Of My Creatures.\
Please Make Your Choice:\
<Hen/@Hen> <Deer/@Deer>\
<Oma/@Oma>\
#ELSESAY
OI I DON'T LIKE PEOPLE WHO FOOL ME!

[@Hen]
#if
checkgold 500
checkslavecount < 5
#act
take gold 500
RECALLMOB Hen 5
close
#elsesay
You Alredy Have got 5 pets
Or Not Enought Cash
You Do Not Have\
Enough Gold To Purchase This Mob!

[@Deer]
#if
checkgold 1000
checkslavecount < 5
#act
take gold 1000
RECALLMOB Deer 5
close
#elsesay
You Alredy Have got 5 pets
Or Not Enought Cash
You Do Not Have\
Enough Gold To Purchase This Mob!

[@Oma]
#if
checkgold 3500
checkslavecount < 5
#act
take gold 3500
RECALLMOB Oma 5
close
#elsesay
You Alredy Have got 5 pets
Or Not Enought Cash
You Do Not Have\
Enough Gold To Purchase This Mob!
;-----------------------------------------------------------------------------------level 9

[@lev9]
#IF
checklevel 9
#SAY
Well, You Seem Worthy Of My Creatures.\
Please Make Your Choice:\
<Yeti/@Yeti> <Wolf/@Wolf>\
<BoneWarrior/@BoneWarrior> <SpittingSpider/@SpittingSpider>\
#ELSESAY
OI I DON'T LIKE PEOPLE WHO FOOL ME!

[@SpittingSpider]
#if
checkgold 5250
checkslavecount < 5
#act
take gold 5250
RECALLMOB SpittingSpider 5
close
#elsesay
You Alredy Have got 5 pets
Or Not Enought Cash
You Do Not Have\
Enough Gold To Purchase This Mob!

[@Yeti]
#if
checkgold 4000
checkslavecount < 5
#act
take gold 4000
RECALLMOB ForestYeti 5
close
#elsesay
You Alredy Have got 5 pets
Or Not Enought Cash
You Do Not Have\
Enough Gold To Purchase This Mob!

[@Wolf]
#if
checkgold 4500
checkslavecount < 5
#act
take gold 4500
RECALLMOB Wolf 5
close
#elsesay
You Alredy Have got 5 pets
Or Not Enought Cash
You Do Not Have\
Enough Gold To Purchase This Mob!

[@BoneWarrior]
#if
checkgold 7000
checkslavecount < 5
#act
take gold 7000
RECALLMOB BoneWarrior 5
close
#elsesay
You Alredy Have got 5 pets
Or Not Enought Cash
You Do Not Have\
Enough Gold To Purchase This Mob!

[@BoneElite]
#if
checkgold 50000
checkslavecount < 2
#act
take gold 50000
RECALLMOB BoneElite 2
close
#elsesay
You Alredy Have got 5 pets
Or Not Enought Cash
You Do Not Have\
Enough Gold To Purchase This Mob!


[@lev15]
#IF
checklevel 15
#SAY
Well, You Seem Worthy Of My Creatures.\
Please Make Your Choice:\
<CaveMaggot/@CaveMaggot><OmaFighter/@OmaFighter>\
<BoneElite/@BoneElite>\
#ELSESAY
OI I DON'T LIKE PEOPLE WHO FOOL ME!

[@CaveMaggot]
#if
checkgold 9000
checkslavecount < 5
#act
take gold 9000
RECALLMOB CaveMaggot 5
close
#elsesay
You Alredy Have got 5 pets
Or Not Enought Cash
You Do Not Have\
Enough Gold To Purchase This Mob!

[@OmaFighter]
#if
checkgold 10000
checkslavecount < 5
#act
take gold 10000
RECALLMOB OmaFighter 5
close
#elsesay
You Alredy Have got 5 pets
Or Not Enought Cash
You Do Not Have\
Enough Gold To Purchase This Mob!

[@BoneElite]
#if
checkgold 50000
checkslavecount < 2
#act
take gold 50000
RECALLMOB BoneElite 2
close
#elsesay
You Alredy Have got 5 pets
Or Not Enought Cash
You Do Not Have\
Enough Gold To Purchase This Mob!

;-------------------------------------------------------

[@lev22]
#IF
checklevel 22
#SAY
Well, You Seem Worthy Of My Creatures.\
Please Make Your Choice:\
<Wooma Soldier/@WoomaSoldier> <WoomaFighter/@WoomaFighter>\
<Flaming Wooma/@FlamingWooma> <OmaWarrior/@OmaWarrior>\
#ELSESAY
OI I DON'T LIKE PEOPLE WHO FOOL ME!

[@WoomaSoldier]
#if
checkgold 12000
checkslavecount < 5
#act
take gold 12000
RECALLMOB WoomaSoldier 5
close
#elsesay
You Alredy Have got 5 pets
Or Not Enought Cash
You Do Not Have\
Enough Gold To Purchase This Mob!

[@WoomaFighter]
#if
checkgold 14000
checkslavecount < 5
#act
take gold 14000
RECALLMOB WoomaFighter 5
close
#elsesay
You Alredy Have got 5 pets
Or Not Enought Cash
You Do Not Have\
Enough Gold To Purchase This Mob!

[@FlamingWooma]
#if
checkgold 15000
checkslavecount < 5
#act
take gold 15000
RECALLMOB FlamingWooma 5
close
#elsesay
You Alredy Have got 5 pets
Or Not Enought Cash
You Do Not Have\
Enough Gold To Purchase This Mob!

[@OmaWarrior]
#if
checkgold 16000
checkslavecount < 5
#act
take gold 16000
RECALLMOB OmaWarrior 5
close
#elsesay
You Do Not Have Enough Gold To Purchase This Mob!
;-----------------------------------------------------------


[@lev28]
#IF
checklevel 28
#SAY
Well, You Seem Worthy Of My Creatures.\
Please Make Your Choice:\
<Snake Scorpion/@SnakeScorpion> <Red Evil Boar/@RedBoar>\
<Black Evil Boar/@BlackBoar> <Lure Spider/@LureSpider>\
#ELSESAY
OI I DON'T LIKE PEOPLE WHO FOOL ME!

[@SnakeScorpion]
#if
checkgold 18000
checkslavecount < 5
#act
take gold 18000
RECALLMOB SnakeScorpion 5
close
#elsesay
You Alredy Have got 5 pets
Or Not Enought Cash
You Do Not Have\
Enough Gold To Purchase This Mob!

[@RedBoar]
#if
checkgold 20000
checkslavecount < 5
#act
take gold 20000
RECALLMOB RedBoar 5
close
#elsesay
You Alredy Have got 5 pets
Or Not Enought Cash
You Do Not Have\
Enough Gold To Purchase This Mob!

[@BlackBoar]
#if
checkgold 22000
checkslavecount < 5
#act
take gold 22000
RECALLMOB BlackBoar 5
close
#elsesay
You Alredy Have got 5 pets
Or Not Enought Cash
You Do Not Have\
Enough Gold To Purchase This Mob!

[@LureSpider]
#if
checkgold 35000
checkslavecount < 5
#act
take gold 35000
RECALLMOB LureSpider 5
close
#elsesay
You Alredy Have got 5 pets
Or Not Enought Cash
You Do Not Have\
Enough Gold To Purchase This Mob!


/Enjoy