@echo off
:LWABOVAS
CD C:\
set timeleft=1
set countdown=3
set maindel=3
set health=100
set exp=0
set forestrem=Forest1
set attack=1
set slice=%damageval%
set swor=Trainer
set shiel=Trainer
set coin=5000
set smhealth=50
set rathealth=50
set gshealth=20
set aghealth=80
set ghealth=55
set delstat=Deleting
set deltimer=3
set locked=Locked
set unlocked=Unlocked
set castatus=%locked%
set empty=0
set fishingstatus=1
set fishingdel=3
set lvl=1
set maxhp=100
set bankval=0
set fdirect=mriver
set quickp=0
set version=v3.5
set combatpot=0
set title=Dungeons and DOS
set enemydam=0
set damageval=1
set shielprot=1
set ferrydel=2
set stkeyg=0
set iceroomc=0
set sthealth=60
set chaosact=0
set equalityval=0
set scaredval=0
set orderact=0
set hocc=0
set hooc=0
set icepalacec=0
set placestat=Unexplored
set placestat2=Unexplored
set placestat3=Unexplored
set placestat4=Unexplored
if not exist C:\RPG mkdir C:\RPG
if not exist C:\RPG\Profiles mkdir C:\RPG\Profiles
goto inb4startup1
:inb4startup1
cls
title %title%
set /a rantextgen=(%random%/2978)+1
if %rantextgen%==1 set rantxt=Better in Vista and 7!
if %rantextgen%==2 set rantxt=A Text Based RPG!
if %rantextgen%==3 set rantxt=Made by Michael Jay!
if %rantextgen%==4 set rantxt=Full of Swords and Monsters!
if %rantextgen%==5 set rantxt=Try battling the Sewer Monster!
if %rantextgen%==6 set rantxt=Made in MS-DOS!
if %rantextgen%==7 set rantxt=Inspired by Runescape!
if %rantextgen%==8 set rantxt=Remember to report bugs!
if %rantextgen%==9 set rantxt=Random text!
if %rantextgen%==10 set rantxt=Wake up in Hospital, fight Spiders!
if %rantextgen%==11 set rantxt=Over 2,000 lines of code!
goto inb4startup
:inb4startup
cls
echo -=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-
echo.
echo --=%title% %version%=--
echo.
echo --=%rantxt%=--
echo.
echo -=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-
pause >NUL
goto startup
:startup
cls
title %title%
if %countdown% LEQ 0 goto login
echo -=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-
echo.
echo --=Loading Config=--
echo.
echo --=%countdown% Seconds Remaining=--
echo.
echo -=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-
choice /c n /d n /t %timeleft% >NUL
set /a countdown=%countdown%-%timeleft%
goto startup
:login
cls
title %title% - Login
COLOR 07
echo --=%title% %version%=----=Lobby=--=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=
echo.
echo 1.) Log into existing account
echo 2.) Create a new account
echo 3.) Quick Play
echo.
echo 4.) Tools
echo 5.) Credits
echo.
echo -=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-
set /p input=">"
if %input%==1 goto oldaccb4
if %input%==2 goto newacc
if %input%==3 goto quickplay
if %input%==4 goto tools
if %input%==5 goto credits
goto login
:credits
cls
title %title% - Credits
echo --=%title% %version%=----=Credits=--=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=
echo.
echo --= Thanks to all Alpha testers =--
echo --= Written in MS-DOS, copyright of Microsoft =--
echo --= Programmed from scratch by Michael Jay [Oliver Orca] =--
echo --= Compiled version uses Onestop.mid, copyright of Microsoft =--
echo.
echo 1.) Return to Main Menu
echo.
echo -=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-
set /p input=">"
if %input%==1 goto login
goto credits
:tools
cls
title %title% - Tools
echo --=%title% %version%=----=Tools=--=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=
echo.
echo 1.) View all Created Accounts
echo 2.) Import Account
echo.
echo 3.) Return to Main Menu
echo.
echo -=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-
set /p input=">"
if %input%==1 goto acclist
if %input%==2 goto impacc
if %input%==3 goto login
goto tools
:impacc
cls
title %title% - Import Account
if not exist AccountImporter MKDIR AccountImporter
start C:\AccountImporter
echo -=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=
echo.
echo --=A folder has been made in the C:\ Directory=--
echo.
echo --=Place your Account Folder into the folder, and press Enter=--
echo.
echo -=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=
pause >NUL
goto impacc2
:impacc2
cls
title %title% - Import Account
echo -=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=
echo.
echo --=Enter your Account (Folder) Name=--
echo.
echo -=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=
set /p name=">"
if not exist "AccountImporter\%name%" goto accfolderu
XCOPY /S /V /Q /E "AccountImporter\*.*" "C:\RPG\Profiles"
goto impacc3
:accfolderu
cls
title %title% - "%name%" not an existing Account Folder
echo -=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=
echo.
echo --="%name%" was not an existing Account Folder=--
echo.
echo --=Press any Key to Continue=--=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=
pause >NUL
goto login
:impacc3
cls
title %title% - Account Imported
echo -=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=
echo.
echo --=Account "%name%" was successfully Imported=--
echo.
echo --=Press any Key to Continue=--=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=
pause >NUL
goto login
:quickplay
cls
title %title% - Quick Play
echo -=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=
echo.
echo --=In Quick Play Mode, you cannot Save your progress=--
echo.
echo --=Continue (Y/N)?=--
echo.
echo -=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=
set /p input=">"
if %input%==Y goto quickpmain
if %input%==N goto login
if %input%==y goto quickpmain
if %input%==n goto login
set quickp=1
goto quickplay
:oldaccb4
cls
title %title% - Login
echo -=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=
echo.
echo --=Please enter your Username=--
echo.
echo -=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=
set /p name=">"
if exist "C:\RPG\Profiles\%name%\%name%.dat" goto slot1log
goto incuser
:incuser
cls
title %title% - Nonexistant Account
echo -=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=
echo.
echo --="%name%" is not an existing Account=--
echo.
echo -=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=
choice /c n /d n /t %timeleft% >NUL
goto login
:acclist
cls
title %title% - Account List
echo -=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=
echo.
echo --=The Following is a list of all Accounts active=--
echo.
dir /b C:\RPG\Profiles\
echo.
echo --=Press R to Return to the Login Screen=--
echo.
echo -=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=
set /p input=">"
if %input%==R goto login
if %input%==r goto login
goto acclist
:slot1log
cls
title %title% - %name%'s Account
if not defined passr set /p passr=<"C:\RPG\Profiles\%name%\%name%.dat"
echo -=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=
echo.
echo --=Please enter %name%'s Password=--
echo.
echo -=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=
set /p passinput=">"
if %passinput%==%passr% goto acchome
goto incorrect
:incorrect
cls
title %title% - Incorrect Password
echo -=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=
echo.
echo --="%passinput%" was not the correct Password=--
echo.
echo -=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=
choice /c n /d n /t %timeleft% >NUL
goto login
:acchome
cls
title %title% - %name%'s Profile
if not exist "C:\RPG\Profiles\%name%\Preferences\Color.dat" echo 07 > "RPG\Profiles\%name%\Preferences\Color.dat"
set /p prefcl=<"C:\RPG\Profiles\%name%\Preferences\Color.dat"
COLOR %prefcl%
echo --=%name%'s Profile=--=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=
echo.
echo 1.) Play %title% %version%
echo 2.) Delete your Account
echo 3.) Delete all Game Data
echo.
echo 4.) Return to the Login Screen
echo.
echo -=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=
set /p input=">"
if %input%==1 goto main
if %input%==2 goto accdelconf
if %input%==3 goto gamedatconf
if %input%==4 goto login
goto acchome
:gamedatconf
cls
title %title% - Are you sure you wish to delete %name%'s Game Data?
echo -=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=
echo.
echo --=Are you sure you wish to delete %name%'s Game Data (Y/N)?=--
echo.
echo -=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=
set /p input=">"
if %input%==Y goto gamedatdel
if %input%==y goto gamedatdel
if %input%==N goto acchome
if %input%==n goto acchome
goto gamedatconf
:gamedatdel
cls
title %title% - Deleting %name%'s Game Data
if %deltimer% LEQ 0 goto login
set timeleft=3
echo -=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=
echo.
echo --=Deleting %name%'s Game Data=--
echo.
echo --=Status: %delstat%=--
echo.
echo -=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=
choice /c n /d n /t %deltimer% >NUL
DEL /Q /S "C:\RPG\Profiles\%name%\Data\*.*"
set delstat=Deleted!
choice /c n /d n /t %timeleft% >NUL
goto login
:accdelconf
cls
title %title% - Are you sure you wish to delete %name%'s Account?
echo -=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=
echo.
echo --=Are you sure you wish to delete %name%'s account (Y/N)?=--
echo.
echo -=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=
set /p input=">"
if %input%==Y goto accdel
if %input%==y goto accdel
if %input%==N goto acchome
if %input%==n goto acchome
goto accdelconf
:accdel
cls
title %title% - Deleting %name%'s Account
if %deltimer% LEQ 0 goto login
set timeleft=3
echo -=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=
echo.
echo --=Deleting %name%'s Account and saved Data=--
echo.
echo --=Status: %delstat%=--
echo.
echo -=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=
choice /c n /d n /t %deltimer% >NUL
RD /Q /S "C:\RPG\Profiles\%name%"
set delstat=Deleted!
choice /c n /d n /t %timeleft% >NUL
goto login
:newacc
cls
title %title% - Create a New Account
echo -=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=
echo.
echo --=Enter a Username=--
echo.
echo -=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=
set /p name=">"
if exist "C:\RPG\Profiles\%name%" goto alreadyexist
goto namecheck
:alreadyexist
cls
title %title% - %name% is an already active Account!
echo -=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=
echo.
echo --="%name%" is an already active Account!=--
echo.
echo -=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=
choice /c n /d n /t %timeleft% >NUL
goto login
:namecheck
cls
title %title% - Is your name: %name%?
echo -=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=
echo.
echo --=Is your Username: "%name%" (Y/N)?=--
echo.
echo -=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=
set /p input=">"
if %input%==Y mkdir "C:\RPG\Profiles\%name%"
if %input%==Y mkdir "C:\RPG\Profiles\%name%\Data"
if %input%==Y mkdir "C:\RPG\Profiles\%name%\Preferences"
if %input%==y mkdir "C:\RPG\Profiles\%name%"
if %input%==y mkdir "C:\RPG\Profiles\%name%\Data"
if %input%==y mkdir "C:\RPG\Profiles\%name%\Preferences"
if %input%==Y goto newpass
if %input%==y goto newpass
if %input%==N goto newacc
if %input%==n goto newacc
goto namecheck
:newpass
cls
title %title% - Create a New Account
echo -=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=
echo.
echo --=Enter a Password=--
echo.
echo -=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=
set /p password=">"
goto passcheck
:passcheck
cls
title %title% - Is your password: %password%?
echo -=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=
echo.
echo --=Is your Password: "%password%" (Y/N)?=--
echo.
echo -=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=
set /p input=">"
set /p passr=<"C:\RPG\Profiles\%name%\%name%.dat"
if %input%==Y echo %password% > "C:\RPG\Profiles\%name%\%name%.dat"
if %input%==y echo %password% > "C:\RPG\Profiles\%name%\%name%.dat"
if %input%==Y ATTRIB +H "C:\RPG\Profiles\%name%\%name%.dat"
if %input%==y ATTRIB +H "C:\RPG\Profiles\%name%\%name%.dat"
if %input%==Y goto login
if %input%==y goto login
if %input%==N goto newpass
if %input%==n goto newpass
goto passcheck
:quickpmain
cls
title %title% - Main Menu - Quick Play
set name=Anonymous
set mode=Quick
echo --=%title%=--=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=
echo.
echo 1.) Start a new game
echo 2.) Options
echo 3.) Instructions
echo 4.) Exit
echo.
echo -=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=
set /p input=">"
if %input%==1 goto qpchooseclass
if %input%==2 goto qpopt
if %input%==3 goto qpinst
if %input%==4 exit
goto quickpmain
:qpinst
cls
title %title% - Instructions
echo --=Instructions=--=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=
echo.
echo Battle Monsters, complete tasks, and level
echo up using the keys cooresponding to the
echo number (Or letter) next to the action you
echo wish to take.
echo.
echo --=Press any key to Continue=--=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-
pause >NUL
goto quickpmain
:qpopt
cls
title %title% - Options
echo --=Options=--=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-
echo.
echo 1.) Appearance
echo.
echo 2.) Return to Main Menu
echo.
echo -=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-
set /p input=">"
if %input%==1 goto opta
if %input%==2 goto quickpmain
goto qpopt
:qpchooseclass
cls
title %title% - Choose a Class
echo --=Choose a Class=--=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-
echo.
echo 1.) Warrior - Heroic
echo 2.) N/A
echo.
echo -=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=
set /p input=">"
if %input%==1 goto warc
if %input%==2 goto necc
goto qpchooseclass
:main
cls
title %title% - Main Menu
set mode=Normal
echo --=%title%=--=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=
echo.
echo 1.) Start a new game
echo 2.) Load an existing game
echo 3.) Options
echo 4.) Instructions
echo 5.) Exit
echo.
echo -=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=
set /p input=">"
if %input%==1 goto chooseclass
if %input%==2 goto choosesave
if %input%==3 goto opt
if %input%==4 goto inst
if %input%==5 exit
goto main
:inst
cls
title %title% - Instructions
echo --=Instructions=--=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-
echo.
echo Battle Monsters, complete tasks, and level
echo up using the keys cooresponding to the
echo number (Or letter) next to the action you
echo wish to take.
echo.
echo --=Press any key to Continue=--=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=
pause >NUL
goto main
:nodata
cls
title %title% - No game Data available
echo -=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=
echo.
echo --=Game Data could not be loaded for this Account=--
echo.
echo --=Press any Key to Continue=--=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=
pause >NUL
goto main
:choosesave
cls
title %title% - Load a Game
if not exist "C:\RPG\Profiles\%name%\Data\Mainload.dat" goto nodata
set /p coinlr=<"C:\RPG\Profiles\%name%\Data\Coin.dat"
set /p healthlr=<"C:\RPG\Profiles\%name%\Data\Health.dat"
set /p explr=<"C:\RPG\Profiles\%name%\Data\Exp.dat"
set /p sworlr=<"C:\RPG\Profiles\%name%\Data\Sword.dat"
set /p shiellr=<"C:\RPG\Profiles\%name%\Data\Shield.dat"
set /p lvllr=<"C:\RPG\Profiles\%name%\Data\Level.dat"
set /p bankvalr=<"C:\RPG\Profiles\%name%\Data\Bankgold.dat"
set /p slicevalr=<"C:\RPG\Profiles\%name%\Data\Sliceval.dat"
set /p maxhpvalr=<"C:\RPG\Profiles\%name%\Data\Maxhp.dat"
set /p frstatr=<"C:\RPG\Profiles\%name%\Data\FishingRod.dat"
set /p swordamr=<"C:\RPG\Profiles\%name%\Data\SworDamage.dat"
set /p shielprotr=<"C:\RPG\Profiles\%name%\Data\ShielProt.dat"
set /p prevroor=<"C:\RPG\Profiles\%name%\Data\PrevRoom.dat"
set /p stkeycr=<"C:\RPG\Profiles\%name%\Data\KeyGuards.dat"
set /p iceroomcr=<"C:\RPG\Profiles\%name%\Data\IceCaveColl.dat"
set /p ipcr=<"C:\RPG\Profiles\%name%\Data\IcePalaceCheck.dat"
set /p chaosr=<"C:\RPG\Profiles\%name%\Data\Chaos.dat"
set /p orderr=<"C:\RPG\Profiles\%name%\Data\Order.dat"
set /p chaosactr=<"C:\RPG\Profiles\%name%\Data\ChaosAct.dat"
set /p orderactr=<"C:\RPG\Profiles\%name%\Data\OrderAct.dat"
set /p equalvalr=<"C:\RPG\Profiles\%name%\Data\EqualityVal.dat"
set /p qslot1n=<"C:\RPG\Profiles\%name%\Data\QuestName.dat"
set /p qslot1s=<"C:\RPG\Profiles\%name%\Data\QuestStatus.dat"
set /p qslot1i=<"C:\RPG\Profiles\%name%\Data\QuestInfo.dat"
echo -=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-
echo.
echo --=Loading Game Data=--
echo.
echo -=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-
choice /c n /d n /t %timeleft% >NUL
set coin=%coinlr%
set health=%healthlr%
set exp=%explr%
set swor=%sworlr%
set shiel=%shiellr%
set lvl=%lvllr%
set bankval=%bankvalr%
set slice=%slicevalr%
set maxhp=%maxhpvalr%
set fishingstatus=%frstatr%
set damageval=%swordamr%
set shielprot=%shielprotr%
set loadroom=%prevroor%
set stkeyg=%stkeycr%
set iceroomc=%iceroomcr%
set icepalacec=%ipcr%
set hocc=%chaosr%
set hooc=%orderr%
set chaosact=%chaosactr%
set orderact=%orderactr%
set equalityval=%equalityvalr%
set qslot1=%qslot1n%
set qslot1stat=%qslot1s%
set qslotinf=%qslot1i%
goto %loadroom%
:opt
cls
title %title% - Options
echo --=Options=--=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=
echo.
echo 1.) Appearance
echo.
echo 2.) Return to Main Menu
echo.
echo -=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=
set /p input=">"
if %input%==1 goto opta
if %input%==2 goto main
goto opt
:opta
cls
title %title% - Options \ Appearance
if not defined bgcl set bgcl=0
if not defined txcl set txcl=7
echo --=Appearance=--=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-
echo.
echo --=Background Colors=--
echo.
echo 1.) Red
echo 2.) Green
echo 3.) Blue
echo 4.) Black
echo 5.) White
echo.
echo --=Text Colors=--
echo.
echo 6.) Red
echo 7.) Green
echo 8.) Blue
echo 9.) Black
echo 10.) White
echo.
echo 11.) Return to Options Screen
echo.
echo -=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=
set /p input=">"
if %input%==1 COLOR 4%txcl%
if %input%==2 COLOR A%txcl%
if %input%==3 COLOR 1%txcl%
if %input%==4 COLOR 0%txcl%
if %input%==5 COLOR 7%txcl%
if %input%==6 COLOR %bgcl%4
if %input%==7 COLOR %bgcl%A
if %input%==8 COLOR %bgcl%1
if %input%==9 COLOR %bgcl%0
if %input%==10 COLOR %bgcl%7
if %input%==11 echo %bgcl%%txcl% > "C:\RPG\Profiles\%name%\Preferences\Color.dat"
if %input%==1 set bgcl=4
if %input%==2 set bgcl=A
if %input%==3 set bgcl=1
if %input%==4 set bgcl=0
if %input%==5 set bgcl=7
if %input%==6 set txcl=4
if %input%==7 set txcl=A
if %input%==8 set txcl=1
if %input%==9 set txcl=0
if %input%==10 set txcl=7
if %input%==11 goto opt
goto opta
:chooseclass
cls
title %title% - Choose a Class
echo --=Choose a Class=--=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-
echo.
echo 1.) Warrior - Heroic
echo 2.) N/A
echo.
echo -=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=
set /p input=">"
if %input%==1 goto warc
if %input%==2 goto necc
goto chooseclass
:warc
cls
title %title% - Warrior
echo --=Warrior=--=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=
echo.
echo --=Description=--
echo.
echo A brave Knight of Alysiaum capable of powerful Melee
echo Attacks.
echo.
echo --=Choose the Warrior (Y/N)?=--
echo.
echo -=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=
set /p input=">"
set classt=Warrior
if %input%==Y goto begin
if %input%==y goto begin
if %input%==N goto chooseclass
if %input%==n goto chooseclass
goto warc
:necc
cls
title %title% - Necromancer
echo --=Necromancer=--=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=
echo.
echo --=Description=--
echo.
echo An old, yet powerful Wizard of the Perhaedian Kingdom,
echo capable of Black Magicks and summoning minions from
echo Hell.
echo.
echo --=Choose the Necromancer (Y/N)?=--
echo.
echo --=THE NECROMANCER IS CURRENTLY UNAVAILABLE=--=-=-=-=-=-=-=-=-=-=-=-=-=-=-
set /p input=">"
set classt=Necromancer
if %input%==Y goto begin
if %input%==y goto begin
if %input%==N goto chooseclass
if %input%==n goto chooseclass
goto necc
:begin
cls
title %title% - Awakening
set invroom=begin
if %health% GTR %maxhp% set health=%maxhp%
echo --=Health: %health%=----=Exp: %exp%=--=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=
echo.
echo --=You awaken in an Alysiaum Inn, ready for an Adventure=--
echo.
echo --=Where do you wish to go?=--
echo.
echo 1.) North - Lobby
echo.
echo 2.) Inventory
echo.
echo -=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-
set /p input=">"
if %input%==1 goto Lobby
if %input%==2 goto inventory
goto begin
:savegame
cls
title %title% - Saving Game Data
if %mode% == Quick goto unabletosave
echo -=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=
echo.
echo --=Saving your Game Data=--
echo.
echo -=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=
choice /c n /d n /t %timeleft% >NUL
echo %loadroom% > "C:\RPG\Profiles\%name%\Data\PrevRoom.dat"
echo %name% > "C:\RPG\Profiles\%name%\Data\Mainload.dat"
echo %coin% > "C:\RPG\Profiles\%name%\Data\Coin.dat"
echo %health% > "C:\RPG\Profiles\%name%\Data\Health.dat"
echo %exp% > "C:\RPG\Profiles\%name%\Data\Exp.dat"
echo %swor% > "C:\RPG\Profiles\%name%\Data\Sword.dat"
echo %shiel% > "C:\RPG\Profiles\%name%\Data\Shield.dat"
echo %lvl% > "C:\RPG\Profiles\%name%\Data\Level.dat"
echo %slice% > "C:\RPG\Profiles\%name%\Data\Sliceval.dat"
echo %maxhp% > "C:\RPG\Profiles\%name%\Data\Maxhp.dat"
echo %fishingstatus% > "C:\RPG\Profiles\%name%\Data\FishingRod.dat"
echo %damageval% > "C:\RPG\Profiles\%name%\Data\SworDamage.dat"
echo %shielprot% > "C:\RPG\Profiles\%name%\Data\ShielProt.dat"
echo %stkeyg% > "C:\RPG\Profiles\%name%\Data\KeyGuards.dat"
echo %iceroomc% > "C:\RPG\Profiles\%name%\Data\IceCaveColl.dat"
echo %icepalacec% > "C:\RPG\Profiles\%name%\Data\IcePalaceCheck.dat"
echo %hocc% > "C:\RPG\Profiles\%name%\Data\Chaos.dat"
echo %hooc% > "C:\RPG\Profiles\%name%\Data\Order.dat"
echo %chaosact% > "C:\RPG\Profiles\%name%\Data\ChaosAct.dat"
echo %orderact% > "C:\RPG\Profiles\%name%\Data\OrderAct.dat"
echo %equalityval% > "C:\RPG\Profiles\%name%\Data\EqualityVal.dat"
echo %qslot1% > "C:\RPG\Profiles\%name%\Data\QuestName.dat"
echo %qslot1stat% > "C:\RPG\Profiles\%name%\Data\QuestStatus.dat"
echo %qslotinf% > "C:\RPG\Profiles\%name%\Data\QuestInfo.dat"
goto inventory
:unabletosave
cls
title %title% - Unable to Save
echo -=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=
echo.
echo --=You cannot save in Quick Play mode!=--
echo.
echo --=Press any Key to Continue=--=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=
pause >NUL
goto begin
:Lobby
cls
title %title% - Lobby
set invroom=Lobby
if %health% GTR %maxhp% set health=%maxhp%
echo --=Health: %health%=----=Exp: %exp%=--=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=
echo.
echo --=You enter the Lobby of the Alysiaum Inn=--
echo.
echo --=Where do you wish to go?=--
echo.
echo 1.) North - Central Alysiaum [Square]
echo 2.) South - Bedroom
echo 3.) West - Southern Alysiaum [Slums]
echo.
echo 4.) Inventory
echo.
echo -=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=
set /p input=">"
if %input%==1 goto Square
if %input%==2 goto begin
if %input%==3 goto salysiaum
if %input%==4 goto inventory
goto lobby
:Square
cls
title %title% - Central Alysiaum [Square]
set invroom=Square
if %health% GTR %maxhp% set health=%maxhp%
echo --=Health: %health%=----=Exp: %exp%=--=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=
echo.
echo --=You enter a large Cobble square filled with people=--
echo.
echo --=Where do you wish to go?=--
echo.
echo 1.) North - Northern Alysiaum [Market]
echo 2.) East - Eastern Alysiaum [Castle]
echo 3.) South - Alysiaum Inn
echo 4.) West - Western Alysiaum [Commons]
echo.
echo 5.) Inventory
echo.
echo -=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=
set /p input=">"
if %input%==1 goto nalysiaum
if %input%==2 goto ealysiaum
if %input%==3 goto Lobby
if %input%==4 goto walysiaum
if %input%==5 goto inventory
goto Square
:nalysiaum
cls
title %title% - Northern Alysiaum [Market]
set invroom=nalysiaum
if %health% GTR %maxhp% set health=%maxhp%
echo --=Health: %health%=----=Exp: %exp%=--=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=
echo.
echo --=A series of Market Stalls dot the Courtyard=--
echo.
echo --=Where do you wish to go?=--
echo.
echo 1.) North - Smithery
echo 2.) East - Potion Shop
echo 3.) South - Central Alysiaum [Square]
echo 4.) West - Northwest Alysiaum [Pier]
echo.
echo 5.) Inventory
echo.
echo -=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=
set /p input=">"
if %input%==1 goto smithery
if %input%==2 goto potionshop
if %input%==3 goto Square
if %input%==4 goto pier
if %input%==5 goto inventory
goto nalysiaum
:potionshop
cls
title %title% - Potion Shop
echo --=Health: %health%=----=Exp: %exp%=----=Coins: %coin%=--=-=-=-=-
echo.
echo --=Healing Potions=--
echo.
echo 1.) Small Potion - 30 Coins [+20 Health]
echo 2.) Medium Potion - 60 Coins [+50 Health]
echo 3.) Large Potion - 90 Coins [+80 Health]
echo.
echo --=Combat Potions=--
echo.
echo 4.) Damage Boost Potion - 50 Coins [+3 Damage]
echo.
echo 5.) Return to Market
echo.
echo -=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-
set /p choice=">"
if %choice% == 1 set potcost=30
if %choice% == 2 set potcost=60
if %choice% == 3 set potcost=90
if %choice% == 4 set potcost=50
if %choice% == 1 set pottype=Small Healing
if %choice% == 2 set pottype=Medium Healing
if %choice% == 3 set pottype=Large Healing
if %choice% == 4 set pottype=Damage Boost
if %choice% == 1 set pothp=20
if %choice% == 2 set pothp=50
if %choice% == 3 set pothp=80
if %choice% == 1 goto potcheck
if %choice% == 2 goto potcheck
if %choice% == 3 goto potcheck
if %choice% == 4 goto potcheckc
if %choice% == 5 goto nalysiaum
goto potionshop
:potcheck
cls
title %title% - Potion Shop
set notenoughloc=potionshop
echo --=Health: %health%=----=Exp: %exp%=----=Coins: %coin%=--=-=-=-=-=-=-=-=-=-=-=-=-=-=-
echo.
echo --=Would you like to buy the %pottype% Potion for %potcost% Coins (Y/N)?=--
echo.
echo -=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-
set /p input=">"
if %health% GEQ %maxhp% goto fullhp
if %coin% LSS %potcost% goto notenough
if %input%==Y set /a health=%health%+%pothp%
if %input%==y set /a health=%health%+%pothp%
if %input%==Y set /a coin=%coin%-%potcost%
if %input%==y set /a coin=%coin%-%potcost%
if %input%==Y goto potionshop
if %input%==y goto potionshop
if %input%==N goto potionshop
if %input%==n goto potionshop
goto potcheck
:fullhp
cls
title %title% - Potion Shop
echo --=Health: %health%=----=Exp: %exp%=--=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-
echo.
echo --=Your Health is already at the maximum amount (%maxhp%)!=--
echo.
echo --=Press any Key to Continue=--=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-
pause >NUL
goto potionshop
:potcheckc
cls
title %title% - Potion Shop
set notenoughloc=potionshop
echo --=Health: %health%=----=Exp: %exp%=----=Coins: %coin%=--=-=-=-=-=-=-=-=-=-=-=-=-=-=-
echo.
echo --=Would you like to buy the %pottype% Potion for %potcost% Coins (Y/N)?=--
echo.
echo -=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-
set /p input=">"
if %coin% LSS %potcost% goto notenough
if %input%==Y set /a slice=%slice%+5
if %input%==y set /a slice=%slice%+5
if %input%==Y set /a coin=%coin%-%potcost%
if %input%==y set /a coin=%coin%-%potcost%
if %input%==Y goto potionshop
if %input%==y goto potionshop
if %input%==N goto potionshop
if %input%==n goto potionshop
set combatpot=1
goto potcheck
:smithery
cls
title %title% - Smithery
set notenoughloc=smithery
set slice=%damageval%
echo --=Health: %health%=----=Exp: %exp%=----=Coins: %coin%=--=-=-=-=-=-
echo.
echo --=Swords=--
echo.
echo 1.) Wooden Sword - 100 Coins [+1 Damage]
echo 2.) Iron Sword - 250 Coins [+3 Damage]
echo 3.) Steel Sword - 400 Coins [+6 Damage]
echo 4.) Nightmare Broadsword - 1,000 Coins [+15 Damage]
echo.
echo --=Shields=--
echo.
echo 5.) Wooden Shield - 120 Coins [-1 Enemy Damage]
echo 6.) Iron Shield - 270 Coins [-2 Ememy Damage]
echo 7.) Steel Shield - 420 Coins [-3 Enemy Damage]
echo 8.) Nightmare Kiteshield - 1,200 Coins [-5 Enemy Damage]
echo.
echo 9.) Sell
echo.
echo 10.) Return to Market
echo.
echo -=-=--=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-
set /p choice=">"
if %choice% == 1 set sworcost=100
if %choice% == 1 set swortype=Wooden
if %choice% == 2 set sworcost=250
if %choice% == 2 set swortype=Iron
if %choice% == 3 set sworcost=400
if %choice% == 3 set swortype=Steel
if %choice% == 4 set sworcost=1000
if %choice% == 4 set swortype=Nightmare
if %choice% == 5 set shielcost=120
if %choice% == 5 set shieltype=Wooden
if %choice% == 6 set shielcost=270
if %choice% == 6 set shieltype=Iron
if %choice% == 7 set shielcost=420
if %choice% == 7 set shieltype=Steel
if %choice% == 8 set shielcost=1200
if %choice% == 8 set shieltype=Nightmare
if %choice% == 1 set damagevals=1
if %choice% == 2 set damagevals=3
if %choice% == 3 set damagevals=6
if %choice% == 4 set damagevals=15
if %choice% == 5 set shielprots=1
if %choice% == 6 set shielprots=2
if %choice% == 7 set shielprots=3
if %choice% == 8 set shielprots=5
if %choice% == 1 goto sworcheck
if %choice% == 2 goto sworcheck
if %choice% == 3 goto sworcheck
if %choice% == 4 goto sworcheck
if %choice% == 5 goto shielcheck
if %choice% == 6 goto shielcheck
if %choice% == 7 goto shielcheck
if %choice% == 8 goto shielcheck
if %choice% == 9 goto smitherysell
if %choice% == 10 goto nalysiaum
goto smithery
:smitherysell
cls
title %title% - Sell
if %swor% == Wooden set sworcost=50
if %swor% == Iron set sworcost=100
if %swor% == Steel set sworcost=150
if %swor% == Nightmare set sworcost=400
if %swor% == Trainer set sworcost=N/A
if %swor% == Wooden set damagevals=1
if %swor% == Iron set damagevals=3
if %swor% == Steel set damagevals=6
if %swor% == Nightmare set damagevals=15
if %shiel% == Wooden set shielcost=60
if %shiel% == Iron set shielcost=110
if %shiel% == Steel set shielcost=200
if %shiel% == Nightmare set shielcost=500
if %shiel% == Trainer set shielcost=N/A
if %shiel% == Wooden set shielprots=1
if %shiel% == Iron set shielprots=2
if %shiel% == Steel set shielprots=3
if %shiel% == Nightmare set shielprots=5
if %shiel% == Trainer set shielprots=1
echo --=Health: %health%=----=Exp: %exp%=----=Coins: %coin%=--=-=-=-=-=-
echo.
echo 1.) Sell %swor% Sword [%sworcost% Coins]
echo 2.) Sell %shiel% Shield [%shielcost% Coins]
echo.
echo 3.) Return to Smithery
echo.
echo -=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-
set /p choice=">"
if %choice% == 1 goto sworscheck
if %choice% == 2 goto shielscheck
if %choice% == 3 goto smithery
goto smitherysell
:shielscheck
cls
title %title% - Sell
echo -=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-
echo.
echo --=Would you like to sell the %shiel% Shield for %shielcost% Coins (Y/N)?=--
echo.
echo -=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-
set /p input=">"
if %shiel% == Trainer goto unabletosell
if %input% == Y set shiel=Trainer
if %input% == y set shiel=Trainer
if %input% == Y set /a coin=%coin%+%shielcost%
if %input% == y set /a coin=%coin%+%shielcost%
if %input% == Y set /a shielprot=%shielprot%-%shielprots%
if %input% == y set /a shielprot=%shielprot%-%shielprots%
if %input% == Y goto smitherysell
if %input% == y goto smitherysell
if %input% == N goto smitherysell
if %input% == n goto smitherysell
goto shielscheck
:sworscheck
cls
title %title% - Sell
echo -=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-
echo.
echo --=Would you like to sell the %swor% Sword for %sworcost% Coins (Y/N)?=--
echo.
echo -=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-
set /p input=">"
if %swor% == Trainer goto unabletosell
if %input% == Y set swor=Trainer
if %input% == y set swor=Trainer
if %input% == Y set /a coin=%coin%+%sworcost%
if %input% == y set /a coin=%coin%+%sworcost%
if %input% == Y set /a damageval=%damageval%-%damagevals%
if %input% == y set /a damageval=%damageval%-%damagevals%
if %input% == Y goto smitherysell
if %input% == y goto smitherysell
if %input% == N goto smitherysell
if %input% == n goto smitherysell
goto sworscheck
:unabletosell
cls
title %title% - Unable to Sell
echo -=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-
echo.
echo --=You cannot fight monsters without a Sword or Shield!=--
echo.
echo --=Press any Key to Continue=--=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-
pause >NUL
goto smitherysell
:sworcheck
cls
title %title% - Smithery
echo -=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-
echo.
echo --=Would you like to buy the %swortype% Sword for %sworcost% Coins (Y/N)?=--
echo.
echo -=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-
set /p input=">"
if %coin% LSS %sworcost% goto notenough
if %input%==Y set swor=%swortype%
if %input%==Y set /a coin=%coin%-%sworcost%
if %input%==y set swor=%swortype%
if %input%==y set /a coin=%coin%-%sworcost%
if %input%==Y set /a damageval=%damageval%+%damagevals%
if %input%==y set /a damageval=%damageval%+%damagevals%
if %input%==N goto smithery
if %input%==n goto smithery
if %input%==Y goto smithery
if %input%==y goto smithery
goto sworcheck
:shielcheck
cls
title %title% - Smithery
echo -=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-
echo.
echo --=Would you like to buy the %shieltype% Sword for %shielcost% Coins (Y/N)?=--
echo.
echo -=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-
set /p input=">"
if %coin% LSS %shielcost% goto notenough
if %input%==Y set shiel=%shieltype%
if %input%==Y set /a coin=%coin%-%shielcost%
if %input%==y set shiel=%shieltype%
if %input%==y set /a coin=%coin%-%shielcost%
if %input%==Y set shielprot=%shielprots%
if %input%==y set shielprot=%shielprots%
if %input%==N goto smithery
if %input%==n goto smithery
if %input%==Y goto smithery
if %input%==y goto smithery
goto shielcheck
:notenough
cls
title %title% - Not enough Coins!
echo --=Health: %health%=----=Exp: %exp%=----=Coins: %coin%=--=-=-=-
echo.
echo --=You have insufficient Coins!=--
echo.
echo -=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-
choice /c n /d n /t %timeleft% >NUL
goto %notenoughloc%
:ealysiaum
cls
title %title% - Eastern Alysiaum [Castle]
set invroom=ealysiaum
set lvlupr=ealysiaum
if %health% GTR %maxhp% set health=%maxhp%
if %exp% GEQ 100 goto lvlup
echo --=Health: %health%=----=Exp: %exp%=--=-=-=-=-=-=-=-=-=-=-=-=-=-
echo.
echo --=A large and Royal castle stands before you=--
echo.
echo --=Where do you wish to go?=--
echo.
echo 1.) North - Fight Guards [Lvl. 20]
echo 2.) East - Alysiaum Castle
echo 3.) South - N/A
echo 4.) West - Central Alysiaum [Square]
echo.
echo 5.) Inventory
echo.
echo -=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-
set /p input=">"
if %input%==1 goto guardf
if %input%==2 goto acastle
if %input%==4 goto Square
if %input%==5 goto inventory
goto ealysiaum
:acastle
cls
title %title% - Alysiaum Castle
echo --=Health: %health%=----=Exp: %exp%=--=-=-=-=-=-=-=-=-=-=-=-=-=-=-
echo.
echo --=You enter a large hall of Marble floors and royal crests=--
echo.
echo --=Where do you wish to go?=--
echo.
echo 1.) North - N/A
echo 2.) East - Throne Room
echo 3.) South - N/A
echo 4.) West - East Alysiaum [Castle]
echo.
echo -=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-
set /p input=">"
if %input%==2 goto throneroom
if %input%==4 goto ealysiaum
goto acastle
:throneroom
cls
title %title% - Alysiaum Castle
echo --=Health: %health%=----=Exp: %exp%=--=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-
echo.
echo --=Guards block your path. You require higher privileges=--
echo.
echo --=Press any key to Continue=--=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-
pause >NUL
goto acastle
:guardf
cls
title %title% - Guard [Lvl. 20]
set invroom=guardf
if %health% GEQ %maxhp% set health=%maxhp%
if %health% LEQ 0 goto death
if %aghealth% LEQ 0 goto agdefeated
echo --=Health: %health%=----=Exp: %exp%=----=Enemy Health: %aghealth%=--=-=-=-
echo.
echo --=A Guard [Lvl. 20] has appeared!=--
echo.
echo --=What do you wish to do?=--
echo.
echo 1.) Slice [%slice% Damage - Attack]
echo.
echo 2.) Inventory
echo 3.) Run
echo.
echo -=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-
set /p input=">"
if %input%==1 set atype=Slice
if %input%==1 set adtype=%slice%
if %input%==1 goto guardfa
if %input%==2 goto guardfa
if %input%==2 goto inventory
if %input%==3 goto ealysiaum
goto guardf
:guardfa
cls
title %title% - Guard [Lvl. 20]
set /a aghealth=%aghealth%-%adtype%
set /a agra=(%random%/8191)+1
echo --=Health: %health%=----=Exp: %exp%=----=Enemy Health: %aghealth%=--=-=-=-
echo.
echo --=%name% [Lvl. %lvl%] used %atype% for %adtype% Damage!=--
echo.
echo --=Press any key to Continue=--=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-
pause >NUL
if %agra% == 1 set agat=Slash
if %agra% == 1 set enemydam=27
if %agra% == 2 set agat=Crush
if %agra% == 2 set enemydam=32
if %agra% == 3 set agat=Stab
if %agra% == 3 set enemydam=22
if %agra% == 4 set agat=Hack
if %agra% == 4 set enemydam==29
goto guardfaas
:guardfaas
cls
title %title% - Guard [Lvl. 20]
set /a health=%health%-%enemydam%
set /a health=%health%+%shielprot%
echo --=Health: %health%=----=Exp: %exp%=----=Enemy Health: %aghealth%=--=-=-=-
echo.
echo --=Guard [Lvl. 20] used %agat% for %enemydam% Damage!=--
echo.
echo --=%name%'s %shiel% Shield blocked for %shielprot% Damage!=--
echo.
echo --=Press any key to Continue=--=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-
pause >NUL
goto guardf
:agdefeated
cls
title %title% - Guard [Lvl. 20] Defeated!
set /a agcoin=(%random%/468)+28
set /a agexp=(%random%/655)+32
echo --=Health: %health%=----=Exp: %exp%=--=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-
echo.
echo --=You've defeated the Guard [Lvl. 20]!=--
echo.
echo --=Rewards=--
echo.
echo --=%agcoin% Coins=--
echo --=%agexp% Exp=--
echo.
echo --=Press any key to Continue=--=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-
pause >NUL
goto ealysiaum
:salysiaum
cls
title %title% - Southern Alysiaum [Slums]
set invroom=salysiaum
if %health% GTR %maxhp% set health=%maxhp%
if %lvl% GTR 10 set castatus=%unlocked%
echo --=Health: %health%=----=Exp: %exp%=--=-=-=-=-=-=-=-=-=-=-=-=-=-=-
echo.
echo --=The place is worn down and dirty, filled with rats=--
echo.
echo --=Where do you wish to go?=--
echo.
echo 1.) North - Alysiaum Inn
echo 2.) East - Alysiaum Sewers
echo 3.) South - N/A
echo 4.) West - Combat Arena [Lvl. 10 or Higher]
echo.
echo 5.) Inventory
echo.
echo -=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-
set /p input=">"
if %input%==1 goto Lobby
if %input%==2 goto asewers
if %input%==4 goto carena
if %input%==5 goto inventory
goto salysiaum
:carena
cls
title %title% - Unavailable
echo -=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-
echo.
echo --=The Combat Arena is currently Unavailable=--
echo.
echo --=Press any key to Continue=--=-=-=-=-=-=-=-=-=-=-
pause >NUL
goto salysiaum
:walysiaum
cls
title %title% - Western Alysiaum [Commons]
set invroom=walysiaum
if %health% GTR %maxhp% set health=%maxhp%
if not defined txcl set txcl=0
if not defined bgcl set bgcl=F
COLOR %txcl%%bgcl%
echo --=Health: %health%=----=Exp: %exp%=--=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-
echo.
echo --=You enter a clean area of Cobble roads and quaint Homes=--
echo.
echo --=Where do you wish to go?=--
echo.
echo 1.) North - Northwest Alysiaum [Pier]
echo 2.) East - Central Alysiaum [Square]
echo 3.) South - Alysiaum Bank
echo 4.) West - Tamaran Forest
echo.
echo 5.) Inventory
echo.
echo -=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-==-=-=-=-=-=-=-=-
set /p input=">"
if %input%==1 goto pier
if %input%==2 goto Square
if %input%==3 goto abank
if %input%==4 goto tforest
if %input%==5 goto inventory
goto walysiaum
:abank
cls
title %title% - Alysiaum Bank
set notenoughloc=abank
echo --=Health: %health%=----=Exp: %exp%=----=Coins: %coin%=--=-=-=-=-=-
echo.
echo 1.) Withdraw Money
echo 2.) Deposit Money
echo.
echo 3.) Return to Western Alysiaum [Commons]
echo.
echo -=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-
set /p input=">"
if %input%==1 goto withdraw
if %input%==2 goto deposit
if %input%==3 goto walysiaum
goto abank
:deposit
cls
title %title% - Alysiaum Bank [Deposit]
echo --=Health: %health%=----=Exp: %exp%=----=Coins: %coin%=--=-=-=-=-=-
echo.
echo --=How much would you like to Deposit?=--
echo.
echo -=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-
set /p coindep=">"
goto dipositecheck
:dipositecheck
cls
title %title% - Alysiaum Bank [Deposit]
if %coin% LSS %coindep% goto notenough
set /a coin=%coin%-%coindep%
set /a bankval=%bankval%+%coindep%
echo --=Health: %health%=----=Exp: %exp%=----=Coins: %coin%=--=-=-=-=-=-
echo.
echo --=You have deposited %coindep% Coins=--
echo.
echo --=Press any key to Continue=--=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-
pause >NUL
echo %coindep% > "RPG\Profiles\%name%\Data\Bankgold.dat"
goto abank
:withdraw
cls
title %title% - Alysiaum Bank [Withdraw]
if not defined bankval set bankval=0
echo --=Health: %health%=----=Exp: %exp%=----=Coins: %coin%=--=-=-=-=-=-=-
echo.
echo --=Your Bank account currently has: %bankval% Coins=--
echo.
echo --=Please enter an amount to Withdraw=--
echo.
echo -=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-
set /p coinwd=">"
goto withdrawcheck
:withdrawcheck
cls
title %title% - Alysiaum Bank [Withdraw]
if %bankval% LSS %coinwd% goto notenough
set /a coin=%coin%+%coinwd%
set /a bankval=%bankval%-%coinwd%
echo --=Health: %health%=----=Exp: %exp%=----=Coins: %coin%=--=-=-=-=-=-=-
echo.
echo --=You have withdrawn %coinwd% Coins=--
echo.
echo --=Press any key to Continue=--=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-
pause >NUL
goto abank
:tforest
cls
title %title% - Tamaran Forest
COLOR 2F
set invroom=tforest
set lvlupr=tforest
if %health% GTR %maxhp% set health=%maxhp%
if %exp% GEQ 100 goto lvlup
set gshealth=20
echo --=Health: %health%=----=Exp: %exp%=--=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-
echo.
echo --=An evil precense fills the vibrant Forest=--
echo.
echo --=Where do you wish to go?=--
echo.
echo 1.) North - Goblin Village
echo 2.) East - Western Alysiaum [Commons]
echo 3.) South - Fight Giant Spiders [Lvl. 3]
echo 4.) West - Moraine River
echo.
echo 5.) Inventory
echo.
echo -=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-
set /p input=">"
if %input%==1 goto gvillage
if %input%==2 goto walysiaum
if %input%==3 goto gspider
if %input%==4 goto mriver
if %input%==5 goto inventory
goto tforest
:gvillage
cls
title %title% - Goblin Village
set invroom=gvillage
set lvlupr=gvillage
if %health% GTR %maxhp% set health=%maxhp%
if %exp% GEQ 100 goto lvlup
set ghealth=55
COLOR 0F
echo --=Health: %health%=----=Exp: %exp%=--=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-
echo.
echo --=Masses of Goblins hourde around a Couldron emmitting a terrible smell=--
echo.
echo --=Where do you wish to go?=--
echo.
echo 1.) North - Fight Goblins [Lvl. 10]
echo 2.) East - N/A
echo 3.) South - Tamaran Forest
echo 4.) West - N/A
echo.
echo 5.) Inventory
echo.
echo -=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-
set /p input=">"
if %input%==1 goto gfight
if %input%==3 goto tforest
if %input%==5 goto inventory
goto gvillage
:gfight
cls
title %title% - Goblin [Lvl. 10]
set invroom=gfight
if %health% LEQ 0 goto death
if %ghealth% LEQ 0 goto gdefeated
echo --=Health: %health%=----=Exp: %exp%=----=Enemy Health: %ghealth%=--=-=-=-
echo.
echo --=A Goblin [Lvl. 10] has appeared!
echo.
echo --=What do you wish to do?=--
echo.
echo 1.) Slice [%slice% Damage - Attack]
echo.
echo 2.) Inventory
echo 3.) Run
echo.
echo -=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-
set /p input=">"
if %input%==1 set atype=Slice
if %input%==1 set adtype=%slice%
if %input%==1 goto gfighta
if %input%==1 goto gfighta
if %input%==2 goto inventory
if %input%==3 goto gvillage
goto gfight
:gfighta
cls
title %title% - Goblin [Lvl. 10]
set /a ghealth=%ghealth%-%adtype%
set /a grat=(%random%/10922)+1
echo --=Health: %health%=----=Exp: %exp%=----=Enemy Health: %ghealth%=--=-=-=-
echo.
echo --=%name% [Lvl. %lvl%] used %atype% for %adtype% Damage!=--
echo.
echo --=Press any key to Continue=--=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-
pause >NUL
if %grat% == 1 set gat=Crush
if %grat% == 1 set enemydam=14
if %grat% == 2 set gat=Charge
if %grat% == 2 set enemydam=11
if %grat% == 3 set gat=Spear
if %grat% == 3 set enemydam=21
goto gfightaa
:gfightaa
cls
title %title% - Goblin [Lvl. 10]
set /a health=%health%-%enemydam%
set /a health=%health%+%shielprot%
echo --=Health: %health%=----=Exp: %exp%=----=Enemy Health: %ghealth%=--=-=-=-
echo.
echo --=Goblin [Lvl. 10] used %gat% for %enemydam% Damage!=--
echo.
echo --=%name%'s %shiel% Shield blocked for %shielprot% Damage!=--
echo.
echo --=Press any key to Continue=--=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-
pause >NUL
goto gfight
:gdefeated
cls
title %title% - Goblin [Lvl. 10] Defeated!
set /a gcoin=(%random%/1424)+14
set /a gexp=(%random%/1560)+17
set /a coin=%coin%+%gcoin%
set /a exp=%exp%+%gexp%
echo --=Health: %health%=----=Exp: %exp%=--=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-
echo.
echo --=You've defeated the Goblin [Lvl. 10]!=--
echo.
echo --=Rewards=--
echo.
echo --=%gcoin% Coins=--
echo --=%gexp% Exp=--
echo.
echo --=Press any key to Continue=--=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-
pause >NUL
goto gvillage
:mriver
cls
title %title% - Moraine River
set invroom=mriver
if %health% GTR %maxhp% set health=%maxhp%
COLOR 1F
echo --=Health: %health%=----=Exp: %exp%=--=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-
echo.
echo --=A churning River bound to be filled with Fish stands before you=--
echo.
echo --=Where do you wish to go?=--
echo.
echo 1.) North - N/A
echo 2.) East - Tamaran Forest
echo 3.) South - Fishing Shop
echo 4.) West - Fishing [Requires Fishing Rod]
echo.
echo 5.) Inventory
echo.
echo -=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-
set /p input=">"
if %input%==2 goto tforest
if %input%==3 goto fshop
if %input%==4 goto mfishing
if %input%==5 goto inventory
goto mriver
:mfishing
if %fishingstatus%==0 goto fishingmr
goto needfr
:needfr
cls
title %title% - You require a Fishing Rod to Fish!
echo --=Health: %health%=----=Exp: %exp%=--=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-
echo.
echo --=You require a Fishing Rod! Buy one from the Fishing Shop=--
echo.
echo --=Press any key to Continue=--=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-
pause >NUL
goto mriver
:fishingmr
cls
title %title% - Fishing
set /a ranfish=(%random%/6553)+1
echo --=Health: %health%=----=Exp: %exp%=--=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-
echo.
echo --=You cast out your line, and attempt to catch a Fish=--
echo.
echo -=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-
choice /c n /d n /t %fishingdel% >NUL
if %ranfish%==1 set fishtype=Trout
if %ranfish%==1 set fishval=8
if %ranfish%==2 set fishtype=Bass
if %ranfish%==2 set fishval=12
if %ranfish%==3 set fishtype=Lobster
if %ranfish%==3 set fishval=15
if %ranfish%==1 goto fishcatch
if %ranfish%==2 goto fishcatch
if %ranfish%==3 goto fishcatch
if %ranfish%==4 goto nofish
if %ranfish%==5 goto nofish
:fishcatch
cls
title %title% - You've caught a %fishtype%!
echo --=Health: %health%=----=Exp: %exp%=--=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-
echo.
echo --=You've caught a %fishtype%! Do you wish to eat it now (Y/N)?=--
echo.
echo -=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-
set /p input=">"
if %input%==Y set /a health=%health%+%fishval%
if %input%==y set /a health=%health%+%fishval%
if %input%==Y goto mriver
if %input%==y goto mriver
if %input%==N goto mriver
if %input%==n goto mriver
goto fishcatch
:nofish
cls
title %title% - You've caught nothing!
echo --=Health: %health%=----=Exp: %exp%=--=-=-=-=-
echo.
echo --=You've caught nothing=--
echo.
echo --=Press any key to Continue=--=-=-=-=-=-=-=-=-=-
pause >NUL
goto mriver
:fshop
cls
title %title% - Fishing Shop
set notenoughloc=fshop
COLOR 0F
echo --=Health: %health%=----=Exp: %exp%=----=Coins: %coin%=--=-=-=-=-=-=-=-=-=-
echo.
echo --=Fish=--
echo.
echo 1.) Trout [25 Coins - 8 HP]
echo 2.) Bass [40 Coins - 12 HP]
echo 3.) Lobster [50 Coins - 15 HP]
echo 4.) Shark [100 Coins - 25 HP]
echo.
echo --=Fishing Equipment=--
echo.
echo 5.) Fishing Rod [30 Coins - Allows Fishing]
echo.
echo 6.) Return to Moraine River
echo.
echo -=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-
set /p input=">"
if %input%==1 set fishtype=Trout
if %input%==1 set fishcost=25
if %input%==1 set fishval=8
if %input%==2 set fishtype=Bass
if %input%==2 set fishcost=40
if %input%==2 set fishval=12
if %input%==3 set fishtype=Lobster
if %input%==3 set fishcost=50
if %input%==3 set fishval=15
if %input%==4 set fishtype=Shark
if %input%==4 set fishcost=100
if %input%==4 set fishval=25
if %input%==1 goto fishcheck
if %input%==2 goto fishcheck
if %input%==3 goto fishcheck
if %input%==4 goto fishcheck
if %input%==5 goto equipmentcheck
if %input%==6 goto mriver
goto fshop
:equipmentcheck
cls
title %title% - Fishing Shop
echo --=Health: %health%=----=Exp: %exp%=--=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-
echo.
echo --=Are you sure you wish to buy the Fishing Rod for 30 Coins (Y/N)?=--
echo.
echo -=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-
set /p input=">"
if %coin% LSS 30 goto notenough
if %input%==Y set fishingstatus=0
if %input%==Y set miscslot=Fishing Rod
if %input%==Y set /a coin=%coin%-30
if %input%==Y echo 0 > "C:\RPG\Profiles\%name%\Data\FishingRod.dat"
if %input%==y set fishingstatus=0
if %input%==y set miscslot=Fishing Rod
if %input%==y set /a coin=%coin%-30
if %input%==y echo 0 > "C:\RPG\Profiles\%name%\Data\FishingRod.dat"
if %input%==Y goto fshop
if %input%==y goto fshop
if %input%==N goto fshop
if %input%==n goto fshop
goto equipmentcheck
:fishcheck
cls
title %title% - Fishing Shop
echo --=Health: %health%=----=Exp: %exp%=----=Coins: %coin%=--=-=-=-=-=-=-=-=-=-
echo.
echo --=Would you like to buy a %fishtype% for %fishcost% Coins (Y/N)?=--
echo.
echo -=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-
set /p input=">"
if %coin% LSS %fishcost% goto notenough
if %input%==Y set food1=%fishtype%
if %input%==Y set food1amt=1
if %input%==Y set food1val=%fishval%
if %input%==Y set /a coin=%coin%-%fishcost%
if %input%==y set food1=%fishtype%
if %input%==y set food1amt=1
if %input%==y set food1val=%fishval%
if %input%==y set /a coin=%coin%-%fishcost%
if %input%==Y goto fshop
if %input%==y goto fshop
if %input%==N goto fshop
if %input%==n goto fshop
goto fishcheck
:gspider
cls
title %title% - Giant Spider [Lvl. 3]
set invroom=gspider
if %health% LEQ 0 goto death
if %gshealth% LEQ 0 goto gsdefeat
echo --=Health: %health%=----=Exp: %exp%=----=Enemy Health: %gshealth%=--=-=-=-
echo.
echo --=A Giant Spider [Lvl. 3] has appeared!=--
echo.
echo --=What do you wish to do?=--
echo.
echo 1.) Slice [%slice% Damage - Attack]
echo.
echo 2.) Inventory
echo 3.) Run
echo.
echo -=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-
set /p input=">"
if %input%==1 set atype=Slice
if %input%==1 set adtype=%slice%
if %input%==1 goto gspidera
if %input%==2 goto inventory
if %input%==3 goto tforest
goto gspider
:gspidera
cls
title %title% - Giant Spider [Lvl. 3]
set /a gshealth=%gshealth%-%adtype%
set /a gsat=(%random%/16383)+1
echo --=Health: %health%=----=Exp: %exp%=----=Enemy Health: %gshealth%=--=-=-
echo.
echo --=%name% [Lvl. %lvl%] used %atype% for %adtype% Damage!=--
echo.
echo --=Press any Key to Continue=--=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-
pause >NUL
if %gsat% == 1 set gsra=Impale
if %gsat% == 1 set enemydam=8
if %gsat% == 2 set gsra=Web Coffin
if %gsat% == 2 set enemydam=6
goto gspideraa
:gspideraa
cls
title %title% - Giant Spider [Lvl. 3]
set /a health=%health%-%enemydam%
set /a health=%health%+%shielprot%
echo --=Health: %health%=----=Exp: %exp%=----=Enemy Health: %shealth%=--=-=-=-=-=-=-=-
echo.
echo --=Giant Spider [Lvl. 3] used %gsra% for %enemydam% Damage!=--
echo.
echo --=%name%'s %shiel% Shield blocked for %shielprot% Damage!=--
echo.
echo --=Press any Key to Continue=--=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-
pause >NUL
goto gspider
:gsdefeat
cls
title %title% - Giant Spider [Lvl. 3] Defeated!
set /a gscoin=(%random%/2520)+6
set /a gsexp=(%random%/2340)+7
set /a coin=%coin%+%gscoin%
set /a exp=%exp%+%gsexp%
echo --=Health: %health%=----=Exp: %exp%=--=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-
echo.
echo --=You've defeated the Giant Spider [Lvl. 3]!=--
echo.
echo --=Rewards=--
echo.
echo --=%gscoin% Coins=--
echo --=%gsexp% Exp=--
echo.
echo --=Press any key to Continue=--=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-
pause >NUL
goto tforest
:asewers
cls
title %title% - Alysiaum Sewers
set invroom=asewers
set lvlupr=asewers
if %exp% GEQ 100 goto lvlup
if %health% LEQ 0 goto death
echo --=Health: %health%=----=Exp: %exp%=--=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-
echo.
echo --=You enter Sewers, engulfed in a terrible smell=--
echo.
echo --=Where do you wish to go?=--
echo.
echo 1.) North - Fight Sewer Monster [Lvl. 15]
echo 2.) East - Talk to Old Man
echo 3.) South - Fight Giant Rats [Lvl. 8]
echo 4.) West - Southern Alysiaum [Slums]
echo.
echo 5.) Inventory
echo.
echo -=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-
set /p input=">"
if %input%==1 goto fsewerm
if %input%==2 goto toldman
if %input%==3 goto fgiantr
if %input%==4 goto salysiaum
if %input%==5 goto inventory
goto asewers
:fgiantr
cls
title %title% - Giant Rat [Lvl. 8]
if %rathealth% LEQ 0 goto grdefeated
if %health% LEQ 0 goto death
if %health% GTR %maxhp% set health=%maxhp%
set invroom=fgiantrat
echo --=Health: %health%=----=Exp: %exp%=----=Enemy Health: %rathealth%=--=-
echo.
echo --=A wild Giant Rat [Lvl. 8] has appeared!=--
echo.
echo --=What do you wish to do?=--
echo.
echo 1.) Slice [%slice% Damage - Attack]
echo.
echo 2.) Inventory
echo 3.) Run
echo.
echo -=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-
set /p input=">"
if %input%==1 set atype=Slice
if %input%==1 set adtype=%slice%
if %input%==1 goto fgiantrata
if %input%==2 goto inventory
if %input%==3 goto asewers
goto fgiantr
:fgiantrata
cls
title %title% - Giant Rat [Lvl. 8]
set /a grrat=(%random%/16383)+1
set /a rathealth=%rathealth%-%adtype%
echo --=Health: %health%=----=Exp: %exp%=----=Enemy Health: %rathealth%=--=-
echo.
echo --=%name% [Lvl. %lvl%] used %atype% for %adtype% Damage!=--
echo.
echo --=Press any key to Continue=--=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-
pause >NUL
if %grrat% == 1 set grra=Gnaw
if %grrat% == 1 set enemydam=9
if %grrat% == 2 set grra=Pounce
if %grrat% == 2 set enemydam=4
goto fgiantrataa
:fgiantrataa
cls
title %title% - Giant Rat [Lvl. 8]
set /a health=%health%-%enemydam%
set /a health=%health%+%shielprot%
echo --=Health: %health%=----=Exp: %exp%=----=Enemy Health: %rathealth%=--=-
echo.
echo --=Giant Rat [Lvl. 8] used %grra% for %enemydam% Damage!=--
echo.
echo --=%name%'s %shiel% Shield blocked for %shielprot% Damage!=--
echo.
echo --=Press any key to Continue=--=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-
pause >NUL
goto fgiantr
:grdefeated
cls
title %title% - Giant Rat [Lvl. 8] Defeated!
set /a grcoin=(%random%/1310)+2
set /a grexp=(%random%/2520)+1
set /a coin=%coin%+%grcoin%
set /a exp=%exp%+%grexp%
echo --=Health: %health%=----=Exp: %exp%=--=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-
echo.
echo --=You've defeated the Giant Rat [Lvl. 8]!=--
echo.
echo --=Rewards=--
echo.
echo --=%grcoin% Coins=--
echo --=%grexp% Exp=--
echo.
echo --=Press any key to Continue=--=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-
pause >NUL
goto asewers
:fsewerm
cls
title %title% - Sewer Monster [Lvl. 15]
if %smhealth% LEQ 0 goto smdefeated
if %health% LEQ 0 goto death
if %health% GTR %maxhp% set health=%maxhp%
set invroom=fsewerm
echo --=Health: %health%=----=Exp: %exp%=----=Enemy Health: %smhealth%=--=-=-
echo.
echo --=A Wild Sewer Monster [Lvl. 15] Has Appeared!=--
echo.
echo --=What do you wish to do?=--
echo.
echo 1.) Slice [%slice% Damage - Attack]
echo.
echo 2.) Inventory
echo 3.) Run
echo.
echo -=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-
set /p input=">"
if %input%==1 set atype=Slice
if %input%==1 set adtype=%slice%
if %input%==1 goto fsewerma
if %input%==2 goto inventory
if %input%==3 goto asewers
goto fsewerm
:fsewerma
cls
title %title% - Sewer Monster [Lvl. 15]
set /a smhealth=%smhealth%-%damageval%
set /a smat=(%random%/8191)+1
echo --=Health: %health%=----=Exp: %exp%=----=Enemy Health: %smhealth%=--=-=-
echo.
echo --=%name% [Lvl. %lvl%] used %atype% for %damageval% Damage!=--
echo.
echo --=Press any Key to Continue=--=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-
pause >NUL
if %smat% == 1 set smra=Slash
if %smat% == 1 set enemydam=11
if %smat% == 2 set smra=Projectile Slude
if %smat% == 2 set enemydam=15
if %smat% == 3 set smra=Bite
if %smat% == 3 set enemydam=21
if %smat% == 4 set smra=Shriek
if %smat% == 4 set enemydam=7
goto fsewermaa
:fsewermaa
cls
title %title% - Sewer Monster [Lvl. 15]
set /a health=%health%-%enemydam%
set /a health=%health%+%shielprot%
echo --=Health: %health%=----=Exp: %exp%=----=Enemy Health: %smhealth%=--=-=-
echo.
echo --=Sewer Monster [Lvl. 15] used %smra% for %enemydam% Damage!=--
echo.
echo --=%name%'s %shiel% Shield blocked for %shielprot% Damage!=--
echo.
echo --=Press any Key to Continue=--=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-
pause >NUL
goto fsewerm
:smdefeated
cls
title %title% - Sewer Monster [Lvl. 15] Defeated!
set /a smcoin=(%random%/655)+23
set /a smexp=(%random%/963)+3
set /a coin=%coin%+%smcoin%
set /a exp=%exp%+%smexp%
echo --=Health: %health%=----=Exp: %exp%=--=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-
echo.
echo --=You've defeated the Sewer Monster [Lvl. 15]!=--
echo.
echo --=Rewards=--
echo.
echo --=%smcoin% Coins=--
echo --=%smexp% Exp=--
echo.
echo --=Press any Key to Continue=--=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-
pause >NUL
goto asewers
:inventory
cls
title %title% - %name%'s Inventory - Lvl. %lvl% %classt%
echo --=Health: %health%=----=Exp: %exp%=----=Coins: %coin%=--=-=-=-=-=-=-=-=-=-
echo.
echo --=%name%'s Inventory [Lvl. %lvl% %classt%]=--
echo.
echo --=Equipment=--
echo.
echo Sword: %swor% [+%damageval% Damage]
echo Shield: %shiel% [-%shielprot% Damage]
echo Misc: %miscslot%
echo.
echo --=Utilities=--
echo.
echo 1.) View Quest Log
echo.
echo 2.) Save your Game Progress
echo 3.) Return to previous Room
echo.
echo -=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-
set /p input=">"
if %input%==1 goto questlog
if %input%==2 set loadroom=%invroom%
if %input%==2 goto savegame
if %input%==3 goto %invroom%
goto inventory
:questlog
cls
title %title% - Quest Log
if not defined qslotinf set qslotinf=questlog
echo -=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-
echo.
echo 1.) %qslot1% [%qslot1stat%]
echo.
echo 2.) Return to Inventory
echo.
echo -=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-
set /p input=">"
if %input%==1 goto %qslotinf%
if %input%==2 goto inventory
goto questlog
:death
cls
title %title% - Death
set coin=0
set health=%maxhp%
echo --=You have Died=--=-=-=-=-=-=-=-=-=-
echo.
echo --=Do you wish to Continue (Y/N)?=--
echo.
echo -=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-
set /p input=">"
if %input%==Y goto begin
if %input%==y goto begin
if %input%==N exit
if %input%==n exit
:lvlup
cls
title %title% - Level Up!
set /a damageval=%damageval%+1
set /a maxhp=%maxhp%+5
echo --=Health: %health%=----=Exp: %exp%=--=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-
echo.
echo --=Congratulations, you're now Lvl. %lvl%!=--
echo.
echo --=Rewards=--
echo.
echo --=Slice Damage +1=----=Slice: %slice%=--
echo --=Max Health +5=----=Max Health: %maxhp%=--
echo.
echo --=Press any key to Continue=--=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-
pause >NUL
goto tforest
:toldman
cls
title %title% - Old Man
echo --=Health: %health%=----=Exp: %exp%=--=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-
echo.
echo --=The Old Man seems nervous=--
echo.
echo 1.) Question Him
echo 2.) Return to Alysiaum Sewers
echo.
echo -=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-
set /p input=">"
if %input%==1 goto questionoldman
if %input%==2 goto asewers
goto toldman
:questionoldman
cls
title %title% - Old Man
echo -=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=
echo.
echo --=You ask him if you can be of any help=--
echo.
echo --=Press any Key to Continue=--=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=
pause >NUL
goto oldmanresponse
:oldmanresponse
cls
title %title% - Old Man
echo -=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=
echo.
echo --=You... You are a Warrior, are you not? Perhaps you can stop them...=--
echo.
echo 1.) Stop who?
echo 2.) I haven't got time for your stories.
echo.
echo -=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=
set /p input=">"
if %input%==1 goto oldmanresponse2
if %input%==2 goto asewers
goto oldmanresponse
:oldmanresponse2
cls
title %title% - Old Man
echo -=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=
echo.
echo --= There are three powerful Demons in these lands, each a =--
echo --= master of it's own element. There is Aagrithore, Demon =--
echo --= of Fire and Chaos, Bacharia, Demon of Nature and Order =--
echo --= and lastly, V'eile, the Demon of Balance. Each one is  =--
echo --= of extreme evil, and are very dangerous.               =--
echo.
echo 1.) What can I do to help?
echo 2.) Sorry, but I have other things to do.
echo.
echo -=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=
set /p input=">"
if %input%==1 goto oldmanresponse3
if %input%==2 goto asewers
goto oldmanresponse2
:oldmanresponse3
cls
title %title% - Old Man
echo -=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=
echo.
echo --= Each Demon is guarded by servants of their dominant element. =--
echo --= Aagrithore resides in the Volcanic Wilderness to the North-  =--
echo --= West, Bacharia lives on the Island of Glasius off of the     =--
echo --= West coast of Alysiaum, and V'eile lies on his throne of ice =--
echo --= in Lothaire, the Polar island in the North. You must find    =--
echo --= and slay each one, or else we may all be in danger.          =--
echo.
echo 1.) Okay, I'll try my best [Accept Quest]
echo 2.) I cannot accept now [Decline Quest]
echo.
echo -=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=
set /p input=">"
if %input%==1 set qslot1=A Hellish Pest
if %input%==1 set qslot1stat=Unfinished
if %input%==1 set qslotinf=ahp
if %input%==1 goto ahpacc
if %input%==2 goto asewers
goto oldmanresponse3
:ahpacc
cls
title %title% - A Hellish Pest [Advanced]
echo -=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=
echo.
echo --= You have started a new Quest! Read the Quest Log to reflect on the Old =--
echo --= Man's words.                                                           =--
echo.
echo --=Press any Key to Continue=--=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=
pause >NUL
goto asewers
:ahp
cls
title %title% - A Hellish Pest [Information]
echo -=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-
echo.
echo --= The Old Man told me of three Demons plaguing this world, in the =--
echo --= Volcanic Wilderness, the island of Glasius, and the island of   =--
echo --= Lothaire. I should start with finding Aagrithore in the         =--
echo --= Volcanic Wilderness.                                            =--
echo.
echo --=Press any Key to Continue=--=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-
pause >NUL
goto questlog
:pier
cls
title %title% - Alysiaum Pier
set notenoughloc=pier
echo --=Health: %health%=----=Exp: %exp%=----=Coins: %coin%=--=-=-=-=-=-=-=-=-=-=-=-
echo.
echo 1.) North - Lothaire Island [Polar - 200 Coins]
echo 2.) East - Northern Alysiaum [Market]
echo 3.) South - Western Alysiaum [Commons]
echo 4.) West - Glasius Island [Tropical - 150 Coins]
echo.
echo -=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-
set /p input=">"
if %input%==1 goto lothcheck
if %input%==2 goto nalysiaum
if %input%==3 goto walysiaum
if %input%==4 goto glascheck
goto pier
:glascheck
cls
title %title% - Ferry to Glasis Island
set notenoughloc=glascheck
echo -=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-
echo.
echo --=Are you sure you wish to ferry to Glasius Island [150 Coins] (Y/N)?=--
echo.
echo -=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-
set /p input=">"
if %coin% LSS 150 goto notenough
if %input%==Y set /a coin=%coin%-150
if %input%==y set /a coin=%coin%-150
if %input%==Y set ferryloc=Glasius Island
if %input%==Y set ferrydir=glasius
if %input%==y set ferryloc=Glasius Island
if %input%==y set ferrydir=glasius
if %input%==Y goto lothferry
if %input%==y goto lothferry
if %input%==N goto pier
if %input%==n goto pier
:lothcheck
cls
title %title% - Ferry to Lothaire Island
set notenoughloc=lothcheck
echo -=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-
echo.
echo --=Are you sure you wish to ferry to Lothaire Island [200 Coins] (Y/N)?=--
echo.
echo -=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-
set /p input=">"
if %coin% LSS 200 goto notenough
if %input%==Y set /a coin=%coin%-200
if %input%==y set /a coin=%coin%-200
if %input%==Y set ferryloc=Lothaire Island
if %input%==Y set ferrydir=lothaire
if %input%==y set ferryloc=Lothaire Island
if %input%==y set ferrydir=lothaire
if %input%==Y goto lothferry
if %input%==y goto lothferry
if %input%==N goto pier
if %input%==n goto pier
goto lothcheck
:lothferry
cls
title %title% - Lothaire Ferry
set ferrydel=2
COLOR 1F
echo -=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-
echo.
echo --=You board the ferry and begin traveling to %ferryloc%=--
echo.
echo --=Press any Key to Continue=--=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-
pause >NUL
cls
echo -=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-
echo.
echo ......
echo.
echo -=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-
choice /c n /d n /t %ferrydel% >NUL
cls
set ferrydel=2
echo -=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-
echo.
echo ............
echo.
echo -=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-
choice /c n /d n /t %ferrydel% >NUL
cls
set ferrydel=2
echo -=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-
echo.
echo ..................
echo.
echo -=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-
choice /c n /d n /t %ferrydel% >NUL
cls
set ferrydel=2
echo -=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-
echo.
echo --=The Captain gives a sign. You are almost there=--
echo.
echo -=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-
choice /c n /d n /t %ferrydel% >NUL
cls
set ferrydel=2
echo -=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-
echo.
echo ........................
echo.
echo -=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-
choice /c n /d n /t %ferrydel% >NUL
cls
echo -=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-
echo.
echo --=After much traveling, you arrive at %ferryloc%=--
echo.
echo --=Press any Key to Continue=--=-=-=-=-=-=-=-=-=-=-=-=-
pause >NUL
goto %ferrydir%
:glasius
cls
title %title% - Glasius Island
set invroom=glasius
COLOR 2F
echo --=Health: %health%=----=Exp: %exp%=--=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-
echo.
echo --=You arrive on a wooden Dock leading to Glasius Island=--
echo.
echo 1.) North - Ocean
echo 2.) East - Ocean
echo 3.) South - Alysiaum Pier
echo 4.) West - Glasius Dock
echo.
echo 5.) Inventory
echo.
echo -=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=
set /p input=">"
if %input%==3 set ferrydir=pier
if %input%==3 set ferryloc=Alysiaum Pier
if %input%==3 goto lothferry
if %input%==4 goto gdock
if %input%==5 goto inventory
goto glasius
:gdock
cls
title --=Health: %health%=----=Exp: %exp%=--=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=
echo.
echo --=You stand upon a wooden dock overlooking Glasius and the Ocean=--
echo.
echo 1.) North - Ocean
echo 2.) East - Glasius Dock
echo 3.) South - Ocean
echo 4.) West - Glasius Village
echo.
echo 5.) Inventory
echo.
echo -=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=
set /p input=">"
if %input%==2 goto glasius
if %input%==4 goto glasvill
if %input%==5 goto inventory
goto gdock
:lothaire
cls
title %title% - Lothaire Island
set invroom=lothaire
COLOR F0
echo --=Health: %health%=----=Exp: %exp%=--=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-
echo.
echo --=Cold Winds toss loose snow around the base of the Polar Island=--
echo.
echo 1.) North - N/A
echo 2.) East - N/A
echo 3.) South - Alysiaum Pier
echo 4.) West - %placestat%
echo.
echo 5.) Inventory
echo.
echo -=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-
set /p input=">"
if %input%==3 set ferrydir=pier
if %input%==3 set ferryloc=Alysiaum Pier
if %input%==3 goto lothferry
if %input%==4 set placestat=Ice Wasteland
if %input%==4 goto icewaste
if %input%==5 goto inventory
goto lothaire
:icewaste
cls
title %title% - Lothaire Island - Ice Wasteland
set invroom=icewaste
COLOR F0
echo --=Health: %health%=----=Exp: %exp%=--=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-
echo.
echo --=The area is barren except for gradual Hills. Nothing seems to be moving=--
echo.
echo 1.) North - %placestat2%
echo 2.) East - Lothaire Village
echo 3.) South - N/A
echo 4.) West - %placestat3%
echo.
echo 5.) Inventory
echo.
echo -=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-
set /p input=">"
if %input%==1 set placestat2=Snow Mound
if %input%==1 goto snowmound
if %input%==2 goto lothaire
if %input%==4 set placestat3=Ice Warrior Outpost
if %input%==4 goto icewarout
if %input%==5 goto inventory
goto icewaste
:snowmound
cls
title %title% - Lothaire Island - Snow Mound
set invroom=snowmound
COLOR F0
echo --=Health: %health%=----=Exp: %exp%=--=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-
echo.
echo --=After inspection, you find an entrance to a Cave within a mound of Snow=--
echo.
echo 1.) North - Snow Cave
echo 2.) East - N/A
echo 3.) South - Ice Wasteland
echo 4.) West - N/A
echo.
echo 5.) Inventory
echo.
echo -=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-
set /p input=">"
if %input%==1 goto snowcavecheck
if %input%==3 goto icewaste
if %input%==5 goto inventory
goto snowmound
:snowcavecheck
cls
if %iceroomc% == 1 goto snowcaveunavail
if %iceroomc% == 0 goto snowcave
:snowcaveunavail
cls
title %title% - Lothaire Island - Snow Mound
echo -=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-
echo.
echo --=The Snow Cave has caved in. You are unable to enter it=--
echo.
echo --=Press any Key to Continue=--=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-
pause >NUL
goto snowmound
:snowcave
cls
title %title% - Lothaire Island - Snow Cave
COLOR 70
set invroom=snowcave
if %iceroomc% == 1 goto iceroomcoll
echo --=Health: %health%=----=Exp: %exp%=--=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=
echo.
echo --=Surprisingly, the Cave is dimly lit by Torches. You begin to hear movement=--
echo.
echo 1.) North - %placestat4%
echo 2.) East - N/A
echo 3.) South - Snow Mound [Outside]
echo 4.) West - N/A
echo.
echo 5.) Inventory
echo.
echo -=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=
set /p input=">"
if %input%==1 set placestat4=Ice Room
if %input%==1 goto iceroom
if %input%==3 goto snowmound
if %input%==5 goto inventory
goto snowcave
:iceroomcoll
cls
title %title% - Lothaire Island - Snow Cave
echo -=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=
echo.
echo --=After exiting the Ice Room, it caves in behind you=--
echo.
echo --=Press any Key to Continue=--=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=
pause >NUL
goto snowmound
:iceroom
cls
title %title% - Lothaire Island - Ice Room
set invroom=iceroom
set lvlupr=iceroom
echo --=Health: %health%=----=Exp: %exp%=--=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=
echo.
echo --=You come across a room of Ice accompanied by Snow Trolls=--
echo.
echo 1.) North - Fight Snow Trolls [Lvl. 25]
echo 2.) East - Take Ice Key
echo 3.) South - Snow Cave entrance
echo 4.) West - N/A
echo.
echo 5.) Inventory
echo.
echo -=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=
set /p input=">"
if %input%==1 goto snowtrollb
if %input%==2 goto icekeyc
if %input%==3 goto snowcave
if %input%==5 goto inventory
goto iceroom
:icekeyc
cls
if %stkeyg% == 0 goto icekeyst
if %stkeyg% == 1 goto icekey
:icekeyst
cls
title %title% - Lothaire Island - Ice Room
echo -=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-
echo.
echo --=Upon taking the Key, a Snow Troll begins you charge at you=--
echo.
echo --=Press any Key to Continue=--=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-
pause >NUL
goto snowtrollb
:icekey
cls
title %title% - Lothaire Island - Ice Room
set iceroomc=1
set icepalacec=1
echo -=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-
echo.
echo --=You grab the Ice Key. You may need it in the future=--
echo.
echo --=Press any Key to Continue=--=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-
pause >NUL
goto iceroom
:snowtrollb
cls
title %title% Snow Troll [Lvl. 25]
set invroom=snowtrollb
if %health% LEQ 0 goto death
if %sthealth% LEQ 0 goto stdefeat
set cantrunbat=snowtrollb
echo --=Health: %health%=----=Exp: %exp%=----=Enemy Health: %sthealth%=--=-=-=-=-=-=-=-=-=-=
echo.
echo --=A Snow Troll [Lvl. 25] has appeared!=--
echo.
echo --=What do you wish to do?=--
echo.
echo 1.) Slice [%slice% Damage]
echo.
echo 2.) Inventory
echo 3.) Run
echo.
echo -=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=
set /p input=">"
if %input%==1 set atype=Slice
if %input%==1 set adtype=%damageval%
if %input%==1 goto strolla
if %input%==2 goto inventory
if %input%==3 goto cantrun
goto snowtrollb
:strolla
cls
title %title% - Snow Troll [Lvl. 25]
set /a sthealth=%sthealth%-%adtype%
set /a strat=(%random%/16383)+1
echo --=Health: %health%=----=Exp: %exp%=----=Enemy Health: %sthealth%=--=-=-=-=-=-=-=-=-=-=
echo.
echo --=%name% [Lvl. %lvl%] used %atype% for %adtype% Damage!=--
echo.
echo --=Press any Key to Continue=--=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=
pause >NUL
if %strat% == 1 set stra=Ice Spear
if %strat% == 1 set enemydam=20
if %strat% == 2 set stra=Rock Throw
if %strat% == 2 set enemydam=25
goto strollaa
:strollaa
cls
title %title% - Snow Troll [Lvl. 25]
set /a health=%health%-%enemydam%
set /a health=%health%+%shielprot%
echo --=Health: %health%=----=Exp: %exp%=----=Enemy Health: %sthealth%=--=-=-=-=-=-=-=-=-=-=
echo.
echo --=Snow Troll [Lvl. 25] used %stra% for %enemydam% Damage!=--
echo.
echo --=%name%'s %shiel% Shield blocked for %shielprot% Damage!=--
echo.
echo --=Press any Key to Continue=--=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=
pause >NUL
goto snowtrollb
:stdefeat
cls
title %title% - Snow Troll [Lvl. 25] Defeated!
set /a stcoin=(%random%/385)+50
set /a stexp=(%random%/595)+30
set /a coin=%coin%+%stcoin%
set /a exp=%exp%+%stexp%
set stkeyg=1
echo --=Health: %health%=----=Exp: %exp%=--=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=
echo.
echo --=You've defeated the Snow Troll [Lvl. 25]!=--
echo.
echo --=Rewards=--
echo.
echo --=%stcoin% Coins=--
echo --=%stexp% Exp=--
echo.
echo --=Press any Key to Continue=--=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=
pause >NUL
goto iceroom
:cantrun
cls
title %title% - Snow Troll [Lvl. 25]
echo -=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=
echo.
echo --=Sorry, but you cannot run from this battle!=--
echo.
echo --=Press any Key to Continue=--=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=
pause >NUL
goto %cantrunbat%
:icewarout
cls
title %title% - Lothaire Island - Ice Warrior Outpost
set invroom=icewarout
echo --=Health: %health%=----=Exp: %exp%=--=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=
echo.
echo --=You find a small outpost of dangerous looking Ice Warriors=--
echo.
echo 1.) North - %placestat5%
echo 2.) East - Ice Wasteland
echo 3.) South - N/A
echo 4.) West - N/A
echo.
echo 5.) Inventory
echo.
echo -=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-
set /p input=">"
if %input%==1 set placestat5=Ice Palace
if %input%==1 goto icepalacec
if %input%==2 goto icewaste
goto iwout
:icepalacec
cls
if %icepalacec% == 0 goto needkeyipl
if %icepalacec% == 1 goto icepalace
:needkeyipl
cls
title %title% - Lothaire Island - Ice Palace
echo -=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-
echo.
echo --=The towering palace of Ice is blocked off by a large gate. You need a Key.=--
echo.
echo --=Press any Key to Continue=--=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-
pause >NUL
goto icewarout
:icepalace
cls
title %title% - Lothaire Island - Ice Palace
set invroom=icepalace
set /a equalityval=%chaosact%+%orderact%
echo --=Health: %health%=----=Exp: %exp%=--=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=
echo.
echo --=You enter an expansive hall of Intricately carved Ice=--
echo.
echo 1.) North - Throne of Equality
echo 2.) East - Hall of Chaos
echo 3.) South - Ice Warriot Outpost
echo 4.) West - Hall of Order
echo.
echo 5.) Inventory
echo 6.) Old Man
echo.
echo -=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-
set /p input=">"
if %input%==1 goto thofeqc
if %input%==2 goto hallofchaosc
if %input%==3 goto icewarout
if %input%==4 goto halloforderc
if %input%==5 goto inventory
if %input%==6 goto lothaireoldman
goto icepalace
:hallofchaosc
if %hocc% == 0 set chaosdir=yournotevil
if %hocc% == 1 goto hallofchaoscc
goto %chaosdir%
:halloforderc
if %hooc% == 0 set orderdir=yournotgood
if %hooc% == 1 goto hallofordercc
goto %orderdir%
:thofeqc
if %equalityval% == 0 goto yourenotequal
:yourenotequal
cls
title ???
echo -=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-
echo.
echo --=You're not ...e...q...u...a...l...=--
echo.
echo --=Press any Key to Continue=--=-=-=-=-=-=-=-=-=-=-=-=-=-=-
pause >NUL
goto icepalace
:lothaireoldman
cls
title %title - Lothaire Island - Fate
echo --=Health: %health%=----=Exp: %exp%=--=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=
echo.
echo --=A man sits on the floor. You can tell he is in great pain=--
echo.
echo 1.) Leave him
echo 2.) Help him
echo.
echo -=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-
set /p input=">"
if %input%==1 set hocc=1
if %input%==1 goto leavehim
if %input%==2 set hooc=1
if %input%==2 goto helphim
goto lothaireoldman
:leavehim
cls
title %title% - Lothaire Island
echo -=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-
echo.
echo --=You leave the Old Man to care for himself=--
echo.
echo --=Press any Key to Continue=--=-=-=-=-=-=-=-=-=-=-=-=-=-
pause >NUL
goto icepalace
:helphim
cls
title %title% - Lothaire Island
echo -=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-
echo.
echo --=You help the Old Man back to Health=--
echo.
echo --=Press any Key to Continue=--=-=-=-=-=-=-=-=-=-=-=-=-=-
pause >NUL
goto icepalace
:yournotevil
cls
title ???
echo -=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-
echo.
echo --=You're not ...e...v...i...l...=--
echo.
echo --=Press any Key to Continue=--=-=-=-=-=-=-=-=-=-=-=-=-=-
pause >NUL
goto icepalace
:yournotgood
cls
title ???
echo -=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-
echo.
echo --=You're not a ...h...e...r...o...=--
echo.
echo --=Press any Key to Continue=--=-=-=-=-=-=-=-=-=-=-=-=-=-
pause >NUL
goto icepalace
:hallofchaoscc
cls
if %chaosact%==1 goto chaosunavailable
if %chaosact%==0 goto hallofchaos
:hallofordercc
cls
if %orderact%==1 goto orderunavailable
if %orderact%==0 goto halloforder
:chaosunavailable
cls
title .......................................................
echo -=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-
echo.
echo --=...................................................=--
echo.
echo --=Press any Key to Continue=--=-=-=-=-=-=-=-=-=-=-=-=-=-
pause >NUL
goto icepalace
:orderunavailable
cls
title .......................................................
echo -=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-
echo.
echo --=...................................................=--
echo.
echo --=Press any Key to Continue=--=-=-=-=-=-=-=-=-=-=-=-=-=-
pause >NUL
goto icepalace
:hallofchaos
cls
title ???
echo --=Health: ???=----=Exp: ???=--=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-
echo.
echo 1.) Fight Old Man [Lvl. ???]
echo.
echo -=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-
set /p input=">"
if %input%==1 goto fightoldman
goto hallofchaos
:fightoldman
cls
title ..............................................................................
if %scaredval% GEQ 3 goto chaoshasdied
echo --=Health: ???=----=Exp: ???=----=Enemy Health: ???=--=-=-=-=-=-=-=-=-=-=-=-=-
echo.
echo --=Old Man [Lvl. ???] has appeared!=--
echo.
echo --=What do you wish to do=--
echo.
echo 1.) Pray (??? Damage)
echo.
echo -=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-
set /p input=">"
if %input%==1 set atype=Pray
if %input%==1 set adtype=???
if %input%==1 goto fightoldmana
goto fightoldman
:fightoldmana
cls
title ..............................................................................
echo --=Health: ???=----=Exp: ???=----=Enemy Health: ???=--=-=-=-=-=-=-=-=-=-=-=-=-
echo.
echo --=%name% used %atype% for %adtype% Damage!=--
echo.
echo --=Press any Key to Continue=--=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-
pause >NUL
goto fightoldmanaa
:fightoldmanaa
cls
title ..............................................................................
echo --=Health: ???=----=Exp: ???=----=Enemy Health: ???=--=-=-=-=-=-=-=-=-=-=-=-=-
echo.
echo --=Old Man [Lvl. ???] used ??? for ??? Damage!=--
echo.
echo --=Press any Key to Continue=--=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-
pause >NUL
goto fightoldmanaaa
:fightoldmanaaa
cls
title ..............................................................................
set /a scaredval=%scaredval%+1
echo -=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-
echo.
echo --=%name% is scared=--
echo.
echo --=Press any Key to Continue=--=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-
pause >NUL
goto fightoldman
:chaoshasdied
cls
title %title% - Lothaire Island
echo -=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-
echo.
echo --=You have defeated Chaos [Lvl. ???]=--
echo.
echo --=Rewards=--
echo.
echo --=Courage=--
echo.
echo --=Press any Key to Continue=--=-=-=-=-=-=-=-=-=-=-
pause >NUL
set chaosact=1
goto icepalace
:halloforder
cls
title ???
echo --=Health: ???=----=Exp: ???=--=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-
echo.