[@main]
#IF
ISUSERADMIN
#ACT
GOTO @test

#ELSEACT
GOTO @start

[@start]
#SAY
Welcome to RoP Leveling Caves <$USERNAME>.\
We currently have 10 Leveling caves available at the moment.\ 
Caves 1 to 5 are open to all players for general use\
for a small fee of gold and exptokens.\
Caves 6-10 are reserved for VIP members only.\
Once you are inside a leveling cave you will have 2 hours before\
you are summoned back to me.\ \

<I wish to use a Leveling cave/@tele>

[@tele]

#SAY
Please choose a cave you wish to enter.\ \

<Caves for all players/FCOLOR=14>\ 

<Cave 1/@cave1> <Level 0-40>   -   <Cave 2/@cave2> <Level 40-60>   -  <Cave 3/@cave3> <Level 60-80>\
<Cave 4/@cave4> <Level 80-100>   -   <Cave 5/@cave5> <Level 100+> \ \

<Caves for VIP members/FCOLOR=14>\ 


<Cave 6/@cave6>   -   <Cave 7/@cave7>   -   <Cave 8/@cave8>   -   <Cave 9/@cave9>   -   <Cave 10/@cave10> \ 

[@cave1]
#IF
CHECKHUM Level1 0
#SAY
There are currently no Miruins inside this cave.\
If you wish to use this cave you will need to give me the\
following items.\ \

1 x 25 Million Gold\
50 x ExpTokens\ \

<I have the required items you requested/@take1>\
<I will return once i have them/@exit>

#ELSESAY
Sorry <$USERNAME>.\
This cave is currently occupied.\
Please try another cave or try again later.\ \

<Exit/@exit>

[@take1]
#IF
CHECKLEVELEX < 40
#ACT
GOTO @take11

#ELSESAY
Sorry <$USERNAME>.\
You must be under level 40 to use this cave.\ \

<Exit/@exit>

[@take11]
#IF
CHECKITEM exptoken 50
#ACT
TAKE exptoken 50
TIMERECALL 120
MAPMOVE Level1
SENDMSG "You have 2 hours from now in this cave" 3
SENDMSG "After this time you will be teleported back to the LevelingRoom" 3

#ELSESAY
Sorry <$USERNAME>.\
It would appear that you do not have the items that i need.\
Please return to me with 25 Million Gold and 50 x Exptokens.\
Once you have these i would be happy to assist you.\ \

<Exit/@exit>

[@cave2]
#IF
CHECKHUM Level2 0
#SAY
There are currently no Miruins inside this cave.\
If you wish to use this cave you will need to give me the\
following items.\ \

50 x ExpTokens\

<I have the required items you requested/@take2>\
<I will return once i have them/@exit>

#ELSESAY
Sorry <$USERNAME>.\
This cave is currently occupied.\
Please try another cave or try again later.\ \

<Exit/@exit>

[@take2]
#IF
CHECKLEVELEX < 60
CHECKLEVELEX > 39
#ACT
GOTO @take22

#ELSESAY
Sorry <$USERNAME>.\
You must be under level 60  and above level 40 to use this cave.\ \

<Exit/@exit>

[@take22]
#IF
CHECKITEM exptoken 50
#ACT
TAKE exptoken 50
TIMERECALL 120
MAPMOVE Level2
SENDMSG "You have 2 hours from now in this cave" 3
SENDMSG "After this time you will be teleported back to the LevelingRoom" 3

#ELSESAY
Sorry <$USERNAME>.\
It would appear that you do not have the items that i need.\
Please return to me with 25 Million Gold and 50 x Exptokens.\
Once you have these i would be happy to assist you.\ \

<Exit/@exit>

[@cave3]
#IF
CHECKHUM Level3 0
#SAY
There are currently no Miruins inside this cave.\
If you wish to use this cave you will need to give me the\
following items.\ \

50 x ExpTokens\ \

<I have the required items you requested/@take3>\
<I will return once i have them/@exit>

#ELSESAY
Sorry <$USERNAME>.\
This cave is currently occupied.\
Please try another cave or try again later.\ \

<Exit/@exit>

[@take3]
#IF
CHECKLEVELEX < 80
CHECKLEVELEX > 59
#ACT
GOTO @take33
#ELSESAY
Sorry <$USERNAME>.\
You must be under level 80 and above level 60 to use this cave.\ \

<Exit/@exit>

[@take33]
#IF
CHECKITEM exptoken 50
#ACT
TAKE exptoken 50
TIMERECALL 120
MAPMOVE Level3
SENDMSG "You have 2 hours from now in this cave" 3
SENDMSG "After this time you will be teleported back to the LevelingRoom" 3
GOTO @spawn3

#ELSESAY
Sorry <$USERNAME>.\
It would appear that you do not have the items that i need.\
Please return to me with 25 Million Gold and 50 x Exptokens.\
Once you have these i would be happy to assist you.\ \

<Exit/@exit>

[@cave4]
#IF
CHECKHUM Level4 0
#SAY
There are currently no Miruins inside this cave.\
If you wish to use this cave you will need to give me the\
following items.\ \

50 x ExpTokens\ \

<I have the required items you requested/@take4>\
<I will return once i have them/@exit>

#ELSESAY
Sorry <$USERNAME>.\
This cave is currently occupied.\
Please try another cave or try again later.\ \

<Exit/@exit>

[@take4]
#IF
CHECKLEVELEX < 100
CHECKLEVELEX > 79
#ACT
GOTO @take44

#ELSESAY
Sorry <$USERNAME>.\
You must be under level 100  and above level 80to use this cave.\ \

<Exit/@exit>

[@take44]
#IF
CHECKITEM exptoken 50
#ACT
TAKE exptoken 50
TIMERECALL 120
MAPMOVE Level4
SENDMSG "You have 2 hours from now in this cave" 3
SENDMSG "After this time you will be teleported back to the LevelingRoom" 3

#ELSESAY
Sorry <$USERNAME>.\
It would appear that you do not have the items that i need.\
Please return to me with 25 Million Gold and 50 x Exptokens.\
Once you have these i would be happy to assist you.\ \

<Exit/@exit>

[@cave5]
#IF
CHECKHUM Level5 0
#SAY
There are currently no Miruins inside this cave.\
If you wish to use this cave you will need to give me the\
following items.\ \

50 x ExpTokens\ \

<I have the required items you requested/@take5>\
<I will return once i have them/@exit>

#ELSESAY
Sorry <$USERNAME>.\
This cave is currently occupied.\
Please try another cave or try again later.\ \

<Exit/@exit>

[@take5]
#IF
CHECKLEVELEX > 99
#ACT
GOTO @take55

#ELSESAY
Sorry <$USERNAME>.\
You must be over level 100 to use this cave.\ \

<Exit/@exit>

[@take55]
#IF
CHECKITEM exptoken 50
#ACT
TAKE exptoken 50
TIMERECALL 120
MAPMOVE Level5
SENDMSG "You have 2 hours from now in this cave" 3
SENDMSG "After this time you will be teleported back to the LevelingRoom" 3

#ELSESAY
Sorry <$USERNAME>.\
It would appear that you do not have the items that i need.\
Please return to me with 25 Million Gold and 50 x Exptokens.\
Once you have these i would be happy to assist you.\ \

<Exit/@exit>



















;============================================================
;                     Caves for VIPs
;============================================================

[@cave6]
#IF
CHECKNAMELIST  ../Market_def/vip.txt
#ACT
GOTO @cave611

#ELSESAY
Sorry <$USERNAME>.\
It would appear that you are not a current VIP member.\
Please visit the forum and click the VIP tab to find out how to\
become a VIP member.\ \

<Exit/@exit>

[@cave611]
#IF
CHECKHUM Level6 0
#SAY
There are currently no Miruins inside this cave.\
You may use this cave as a valued VIP member once a day for free.\
Once you have teleported out you may not use it again untill the\
next day\
This can not be reset in case of laggouts or reboots.\ \

<I would like to enter now/@gocave46>\
<I will pop back later/@exit>

[@gocave46]
#IF
CHECKITEM LevelScroll 1
#ACT
TAKE LevelScroll 1
TIMERECALL 120
MAPMOVE Level6
SENDMSG "You have 2 hours from now in this cave" 3
SENDMSG "After this time you will be teleported back to the LevelingRoom" 3

#ELSESAY
Sorry <$USERNAME>.\
It would appear that you do not have a LevelScroll.\
You need 1 x LevelScroll and be a VIP to enter this cave.\ 
Please return when you have a scroll.\ \

<Exit/@exit>


[@cave7]
#IF
CHECKNAMELIST  ../Market_def/vip.txt
#ACT
GOTO @cave171

#ELSESAY
Sorry <$USERNAME>.\
It would appear that you are not a current VIP member.\
Please visit the forum and click the VIP tab to find out how to\
become a VIP member.\ \

<Exit/@exit>

[@cave171]
#IF
CHECKHUM Level7 0
#SAY
There are currently no Miruins inside this cave.\
You may use this cave as a valued VIP member once a day for free.\
Once you have teleported out you may not use it again untill the\
next day\
This can not be reset in case of laggouts or reboots.\ \

<I would like to enter now/@gocave7>\
<I will pop back later/@exit>

[@gocave7]
#IF
CHECKITEM LevelScroll 1
#ACT
TAKE LevelScroll 1
TIMERECALL 120
MAPMOVE Level7
SENDMSG "You have 2 hours from now in this cave" 3
SENDMSG "After this time you will be teleported back to the LevelingRoom" 3

#ELSESAY
Sorry <$USERNAME>.\
It would appear that you do not have a LevelScroll.\
You need 1 x LevelScroll and be a VIP to enter this cave.\ 
Please return when you have a scroll.\ \

<Exit/@exit>

[@cave8]
#IF
CHECKNAMELIST  ../Market_def/vip.txt
#ACT
GOTO @cave181

#ELSESAY
Sorry <$USERNAME>.\
It would appear that you are not a current VIP member.\
Please visit the forum and click the VIP tab to find out how to\
become a VIP member.\ \

<Exit/@exit>

[@cave181]
#IF
CHECKHUM Level8 0
#SAY
There are currently no Miruins inside this cave.\
You may use this cave as a valued VIP member once a day for free.\
Once you have teleported out you may not use it again untill the\
next day\
This can not be reset in case of laggouts or reboots.\ \

<I would like to enter now/@gocave8>\
<I will pop back later/@exit>

[@gocave8]
#IF
CHECKITEM LevelScroll 1
#ACT
TAKE LevelScroll 1
TIMERECALL 120
MAPMOVE Level8
SENDMSG "You have 2 hours from now in this cave" 3
SENDMSG "After this time you will be teleported back to the LevelingRoom" 3

#ELSESAY
Sorry <$USERNAME>.\
It would appear that you do not have a LevelScroll.\
You need 1 x LevelScroll and be a VIP to enter this cave.\ 
Please return when you have a scroll.\ \

<Exit/@exit>

[@cave9]
#IF
CHECKNAMELIST  ../Market_def/vip.txt
#ACT
GOTO @cave191

#ELSESAY
Sorry <$USERNAME>.\
It would appear that you are not a current VIP member.\
Please visit the forum and click the VIP tab to find out how to\
become a VIP member.\ \

<Exit/@exit>

[@cave191]
#IF
CHECKHUM Level9 0
#SAY
There are currently no Miruins inside this cave.\
You may use this cave as a valued VIP member once a day for free.\
Once you have teleported out you may not use it again untill the\
next day\
This can not be reset in case of laggouts or reboots.\ \

<I would like to enter now/@gocave9>\
<I will pop back later/@exit>

[@gocave9]
#IF
CHECKITEM LevelScroll 1
#ACT
TAKE LevelScroll 1
TIMERECALL 120
MAPMOVE Level9
SENDMSG "You have 2 hours from now in this cave" 3
SENDMSG "After this time you will be teleported back to the LevelingRoom" 3

#ELSESAY
Sorry <$USERNAME>.\
It would appear that you do not have a LevelScroll.\
You need 1 x LevelScroll and be a VIP to enter this cave.\ 
Please return when you have a scroll.\ \

<Exit/@exit>

[@cave10]
#IF
CHECKNAMELIST  ../Market_def/vip.txt
#ACT
GOTO @cave1101

#ELSESAY
Sorry <$USERNAME>.\
It would appear that you are not a current VIP member.\
Please visit the forum and click the VIP tab to find out how to\
become a VIP member.\ \

<Exit/@exit>

[@cave1101]
#IF
CHECKHUM Level10 0
#SAY
There are currently no Miruins inside this cave.\
You may use this cave as a valued VIP member once a day for free.\
Once you have teleported out you may not use it again untill the\
next day\
This can not be reset in case of laggouts or reboots.\ \

<I would like to enter now/@gocave10>\
<I will pop back later/@exit>

[@gocave10]
#IF
CHECKITEM LevelScroll 1
#ACT
TAKE LevelScroll 1
TIMERECALL 120
MAPMOVE Level10
SENDMSG "You have 2 hours from now in this cave" 3
SENDMSG "After this time you will be teleported back to the LevelingRoom" 3

#ELSESAY
Sorry <$USERNAME>.\
It would appear that you do not have a LevelScroll.\
You need 1 x LevelScroll and be a VIP to enter this cave.\ 
Please return when you have a scroll.\ \

<Exit/@exit>

[@nogo]
#SAY
Sorry <$USERNAME>.\
It would appear that you have already used a leveling cave today.\
Please feel free to use caves 1-5 but as a VIP member you may\
only use Caves 6-10 Once a day for free.\
Please come back tomorrow for your next two hours.\ \

<Exit/@exit>

[@test]
#SAY
Would you like to continue to the main script or go to the\
mapclear script ?.\ \

<Main script/@start>\
<Map Clear please/@mapclear>

[@mapclear]
#ACT
MONCLEAR Level1
MONCLEAR Level2
MONCLEAR Level3
MONCLEAR Level4
MONCLEAR Level5
MONCLEAR Level6
MONCLEAR Level7
MONCLEAR Level8
MONCLEAR Level9
MONCLEAR Level10

#SAY
All 10 leveling caves have been cleared.\ \

<Exit/@exit>

