@echo off
title bokebatch test
color 73
:pebkac
set /a grass=0
set /a health=5
set /a pp1=4
set /a pp2=3
set /a pp3=2
set /a pp4=1
set /a hit1=1
set /a hit2=2
set /a hit3=3
set /a hit4=4
set /a level=5
set /a exp=0
goto start
:ploke
cls
echo Pick your pokemon!
echo.
echo.
echo             Charmander/Squertile/Bulbasaure
echo.
echo.
set /p ploke1=
if %ploke1% equ charmander goto starter1
if %ploke1% equ squertile goto starter2
if %ploke1% equ bulbasaure goto starter3
goto ploke
:starter1
cls
echo You picked Charmander!
pause
cls
set move1=scratch
set move2=bite
set move3=ember
set move4=tackle
goto lap
:starter2
cls
echo You picked Squertile!
pause
cls
set move1=tackle
set move2=bubble
set move3=pound
set move4=scratch
goto lap
:starter3
cls
echo You picked Bulbasaure!
pause
cls
set move1=tackle
set move2=vinewhip
set move3=pound
set move4=scratch
goto lap
:a
set pokemonen1=Geodude
set moveen11=pound
set moveen21=RockThrow
set moveen41=Explosion
set moveen31=Rollout
goto %grass%
:b
set pokemonen1=Pidgy
set moveen11=pound
set moveen21=Peck
set moveen31=Wirlwind
set moveen41=Tornado
goto %grass%
:c
set pokemonen1=Rattata
set moveen11=Nip
set moveen21=Scratch
set moveen31=Bite
set moveen41=Claw
goto %grass%
:d
set pokemonen1=Zubat
set moveen11=Nip
set moveen21=Scratch
set moveen31=Screech
set moveen41=Bite
goto %grass%
:start
cls
echo pokebatch test
pause
goto ploke
:lap
cls
set /a grass=1
set /a enc=%random% %% 5
if %enc% equ 1 goto a
if %enc% equ 2 goto b
if %enc% equ 3 goto c
if %enc% equ 4 goto d
if %enc% equ 0 goto lap
:1
:batt
set /a hit11=1
set /a hit21=2
set /a hit31=3
set /a hit41=4
set /a pp11=4
set /a pp21=3
set /a pp31=2
set /a pp41=1
set /a health2=%random% %% 9
if %health2% equ 0 goto batt
if %health2% equ 1 goto batt
if %health2% equ 2 goto batt
if %health2% equ 3 goto batt
if %health2% equ 4 goto batt
goto ttab
:ttab
set pokemon1=%ploke1%
set pokemonen=%pokemonen1%
cls
echo Wild %pokemonen%, appeared!
pause
cls
echo Red: Go %pokemon1%
pause
:lj
cls
echo %pokemon1% HP:%health%
echo.
echo %pokemonen% HP:%health2%
echo.
echo.
echo %move1% / %move2% / %move3% / %move4%
echo   PP:%pp1%    PP:%pp2%    PP:%pp3%     PP:%pp4%
echo.
echo.
echo BAG
echo POKEMON
echo RUN
echo.
echo.
set /p qwert=
if %qwert% equ %move1% goto nextr1
if %qwert% equ %move2% goto nextr2
if %qwert% equ %move3% goto nextr3
if %qwert% equ %move4% goto nextr4
if %qwert% equ bag goto bagdemo
if %qwert% equ pokemon goto pokedemo
if %qwert% equ run goto rundemo
goto lj
:bagdemo
cls
echo BAG: POKEBALLS/STATS/MOVES/ITEMS/KEYITEMS/EXIT
echo.
echo.
set /p bag=
if %bag% equ pokeballs goto pokeballsdemo
if %bag% equ stats goto statsdemo
if %bag% equ moves goto movesdemo
if %bag% equ items goto itemsdemo
if %bag% equ keyitems goto keyitemsdemo
if %bag% equ exit goto lj
goto lj
:pokeballsdemo
cls
echo POKEBALLS: EXIT
echo.
set /p bag=
if %bag% equ exit goto bagdemo
goto pokeballsdemo
:statsdemo
cls
echo STAT ITEMS: EXIT
echo.
set /p bag=
if %bag% equ exit goto bagdemo
goto statsdemo
:movesdemo:
cls
echo MOVES: EXIT
echo.
set /p bag=
if %bag% equ exit goto bagdemo
goto movesdemo
:itemsdemo
cls
echo ITEMS: EXIT
echo.
set /p bag=
if %bag% equ exit goto bagdemo
goto itemsdemo
:keyitemsdemo
cls
echo KEY ITEMS: POKEDEX/EXIT
echo.
set /p bag=
if %bag% equ pokedex goto pokedexdemo
if %bag% equ exit goto bagdemo
goto keyitemsdemo
:pokedexdemo
cls
echo POKEDEX: NO RECORDED DATA/EXIT
echo.
set /p pokedex=
if %pokedex% equ exit goto keyitemsdemo
goto pokedexdemo
:pokedemo
cls
echo POKEMON: %pokemon1%/EXIT
echo.
set /p poke=
if %poke% equ %pokemon1% goto spritedemo
if %poke% equ %exit% goto lj
goto lj
:spritedemo
cls
echo %pokemon1%: HP:%health%/%move1%,PP:%pp1%/%move2%,PP:%pp2%/%move3%,PP:%pp3%/%move4%,PP:%pp4%/EXIT
echo.
set /p poke=
if %poke% equ exit goto pokedemo
goto spritedemo
pause
goto lj
:rundemo
cls
echo You can not get away.
pause
goto lj
:nextr1
if %pp1% equ 0 goto noexp1
cls
echo %pokemon1% used %move1% on %pokemonen%!
echo.
echo %pokemonen% lost %hit1% health!
pause
set /a health2=%health2%-%hit1%
set /a pp1=%pp1%-1
if %health2% equ 0 goto wineb1
if %health2% equ -1 goto wineb1
if %health2% equ -2 goto wineb1
if %health2% equ -3 goto wineb1
if %health2% equ -4 goto wineb1
goto battret
:nextr2
if %pp2% equ 0 goto noexp1
cls
echo %pokemon1% used %move2% on %pokemonen%!
echo.
echo %pokemonen% lost %hit2% health!
pause
set /a health2=%health2%-%hit2%
set /a pp2=%pp2%-1
if %health2% equ 0 goto wineb1
if %health2% equ -1 goto wineb1
if %health2% equ -2 goto wineb1
if %health2% equ -3 goto wineb1
if %health2% equ -4 goto wineb1
goto battret
:nextr3
if %pp3% equ 0 goto noexp1
cls
echo %pokemon1% used %move3% on %pokemonen%!
echo.
echo %pokemonen% lost %hit3% health!
pause
set /a health2=%health2%-%hit3%
set /a pp3=%pp3%-1
if %health2% equ 0 goto wineb1
if %health2% equ -1 goto wineb1
if %health2% equ -2 goto wineb1
if %health2% equ -3 goto wineb1
if %health2% equ -4 goto wineb1
goto battret
:nextr4
if %pp4% equ 0 goto noexp1
cls
echo %pokemon1% used %move4% on %pokemonen%!
echo.
echo %pokemonen% lost %hit4% health!
pause
set /a health2=%health2%-%hit4%
set /a pp4=%pp4%-1
if %health2% equ 0 goto wineb1
if %health2% equ -1 goto wineb1
if %health2% equ -2 goto wineb1
if %health2% equ -3 goto wineb1
if %health2% equ -4 goto wineb1
goto battret
:battret
set /a enmove1=%random% %% 5
if %enmove1% equ 0 goto battret
if %enmove1% equ 1 goto enatt1
if %enmove1% equ 2 goto enatt2
if %enmove1% equ 3 goto enatt3
if %enmove1% equ 4 goto enatt4
:enatt1
if %pp11% equ 0 goto battret
cls
echo %pokemonen% used %moveen11% on %pokemon1%!
echo.
echo %pokemon1% lost %hit11% health!
pause
set /a health=%health%-%hit11%
set /a pp11=%pp11%-1
if %health% equ 0 goto loseeb1
if %health% equ -1 goto loseeb1
if %health% equ -2 goto loseeb1
if %health% equ -3 goto loseeb1
if %health% equ -4 goto loseeb1
goto lj
:enatt2
if %pp21% equ 0 goto battret
cls
echo %pokemonen% used %moveen21% on %pokemon1%!
echo.
echo %pokemon1% lost %hit21% health!
pause
set /a health=%health%-%hit21%
set /a pp21=%pp21%-1
if %health% equ 0 goto loseeb1
if %health% equ -1 goto loseeb1
if %health% equ -2 goto loseeb1
if %health% equ -3 goto loseeb1
if %health% equ -4 goto loseeb1
goto lj
:enatt3
if %pp31% equ 0 goto battret
cls
echo %pokemonen% used %moveen31% on %pokemon1%!
echo.
echo %pokemon1% lost %hit31% health!
pause
set /a health=%health%-%hit31%
set /a pp31=%pp31%-1
if %health% equ 0 goto loseeb1
if %health% equ -1 goto loseeb1
if %health% equ -2 goto loseeb1
if %health% equ -3 goto loseeb1
if %health% equ -4 goto loseeb1
goto lj
:enatt4
if %pp41% equ 0 goto battret
cls
echo %pokemonen% used %moveen41% on %pokemon1%!
echo.
echo %pokemon1% lost %hit41% health!
pause
set /a health=%health%-%hit41%
set /a pp41=%pp41%-1
if %health% equ 0 goto loseeb1
if %health% equ -1 goto loseeb1
if %health% equ -2 goto loseeb1
if %health% equ -3 goto loseeb1
if %health% equ -4 goto loseeb1
goto lj
:wineb1
cls
echo YOU WIN!
pause
goto pebkac
:loseeb1
cls
echo You lose!
pause
goto pebkac
:noexp1
cls
echo %qwert% has no exp.
pause
goto lj