@echo off
:Start
set password=%random%
if %password%==00 goto Start
if %password%==01 goto Start
echo GENERATING NUMBER
if %password% gtr 99 goto Start

echo dim speechobject > "Lower.vbs"
echo set speech = Wscript.CreateObject("SAPI.spVoice") >> "Lower.vbs"
echo speech.speak "Lower" >> "Lower.vbs"
echo dim speechobject > "Higher.vbs"
echo set speech = Wscript.CreateObject("SAPI.spVoice") >> "Higher.vbs"
echo speech.speak "Higher" >> "Higher.vbs"

:Menu
cls
set titlechosen="Start Menu"
title %titlechosen%
echo ===============================================
echo                   Start Menu
echo ===============================================
echo.
echo [1] Start Game
echo [2] Quit
echo.
set /p Opt=">> "
if %Opt%==1 goto StartGame
if %Opt%==2 goto Quit
goto Menu

:StartGame
cls
set titlechosen="Choose Difficulty"
title %titlechosen%
echo ===============================================
echo               Choose Difficulty
echo ===============================================
echo.
echo [1] Easy                           (15 Guesses)
echo [2] Medium                         (10 Guesses)
echo [3] Hard                            (5 Guesses)
echo.
set /p Opt=">> "
if %Opt%==1 goto Easy
if %Opt%==2 goto Medium
if %Opt%==3 goto Hard

:Easy
set Difficulty="Easy"
set guesses=15
goto round

:Medium
set Difficulty="Medium"
set guesses=10
goto round

:Easy
set Difficulty="Hard"
set guesses=5
goto round

:round
set c=%guesses%

:roundloop

if %c%==0 goto Lose

cls
set titlechosen="%c% More Guesses!"
title %titlechosen%
echo Guesses : %c%
echo ===============================================
echo                 Guesses Left
echo ===============================================
echo.
echo Guess my Number!
echo.
set /p Guess=">> "
if %Guess% gtr %password% goto Smaller
if %Guess% lss %password% goto Larger
if %Guess%==%password% goto Win
goto roundloop

:Smaller
start Lower.vbs
cls
set %c% = %c% - 1
goto roundloop

:Larger
start Higher.vbs
set %c% = %c% - 1
cls

pause
goto roundloop

:Win
echo Win
pause
:Lose
echo Lose
pause