@echo off

setlocal enableDelayedExpansion

title Slots LOADING...

color f0

:variables

set slot1=7

set slot2=7

set slot3=7

set bet=0

set money=100

set token=0

set useToken=0

:help

echo.Slots

echo.-----

echo.Betting: Type in a money value and it will bet that amount.

echo.Tokens: Type "token" to use a token and get a bonus after the bet.

echo. Takes the three slots, times them all, then times by 10.

echo. Ex: "3-2-6" = 360

echo.

echo.Winnings: Any 2 Slots the same equals the double slot times bet.

echo. EX: Double 4 with $10 bet = $40

echo.

echo. All 3 Slots the same equals the slot^2 times bet.

echo. EX: Triple 4 with $10 bet = $160

echo.

echo.Type "exit" to exit

pause>nul

:slots

mode con: cols=24 lines=24

title Slots $%money%

set /a bet=0

set /a betAmo=0

cls

if "%money%"=="0" (

goto end

)

echo. ___________

echo. : SLOTS :

echo. : [$ $ $] :

echo. :'---------':

echo. :_.-------._:

echo. : : %slot1%-%slot2%-%slot3% : :

echo. :_'-------'_:

echo. : :

echo. : [TOKEN] :

echo. : @%useToken% :

echo. : :

echo. :___________:

echo.

echo. ___________

echo. : __________:

echo. ::Bet: $%bet%

echo. ::

echo. ::$%money%

echo. ::

echo. ::@%token%

echo. ::__________

echo. :___________:

echo.

set /p betAmo="$"

if /i "%betAmo%"=="token" (

if "%token%" GEQ "1" (

if "%useToken%" LSS "9" (

set /a token-=1

set /a useToken+=1

goto slots

) else (

echo.Max tokens is 9

pause>nul

goto slots

)

)

)

if /i "%betAmo%"=="add token" (

set /a token+=10

goto slots

)

if /i "%betAmo%"=="set token" (

set /a token=10

goto slots

)

if /i "%betAmo%"=="add token use" (

set /a useToken+=10

goto slots

)

if /i "%betAmo%"=="set token use" (

set /a useToken=10

goto slots

)

if /i "%betAmo%"=="add money" (

set /a money+=100

)

if /i "%betAmo%"=="set money" (

set /a money=100

)

if /i "%betAmo%"=="exit" exit

set /a bet=%betAmo%

if "%bet%" LEQ "0" (

goto slots

)

if "%bet%" LEQ "%money%" (

set /a money-=%bet%

goto spin

) else (

echo.You bet more money than you have

pause>nul

goto slots

)

:spin

cls

set /a slot1=%random% %%7 +1

set /a slot2=%random% %%7 +1

set /a slot3=%random% %%7 +1

echo. ___________

echo. : SLOTS :

echo. :'---------':

echo. :_.-------._:

echo. : : %slot1%-%slot2%-%slot3% : :

echo. :_'-------'_:

echo. : :

echo. : :

echo. : :

echo. : :

echo. :___________:

echo.

if "%slot1%"=="%slot2%" (

if "%slot2%"=="%slot3%" (

set /a money+=%bet%*%slot1%*%slot1%

set /a token+=1

echo.+1 Token

)

)

if "%slot1%"=="%slot2%" (

set /a money+=%bet%*%slot1%

)

if "%slot2%"=="%slot3%" (

set /a money+=%bet%*%slot2%

)

if "%slot1%"=="%slot3%" (

set /a money+=%bet%*%slot1%

)

if "%useToken%" GEQ "1" (

set /a useToken-=1

echo.Used Token

set /a money+=%slot1%*%slot2%*%slot3%*10

)

echo.Continue

pause>nul

goto slots

:end

cls

echo.You have no more money!

pause>nul

cls

echo.@%token%

echo.@%useToken% in use

echo.

echo.You can use a token and get $150

set /p use="y/n:"

if /i "%use%"=="y" (

if "%useToken%" GEQ "1" (

set /a useToken-=1

set /a money=150

echo.You used 1 Token

pause>nul

goto slots

) else (

if "%token%" GEQ "1" (

set /a token-=1

set /a money=150

echo.You used 1 Token

pause>nul

goto slots

) else (

echo.You don't have any tokens! (Exit^^^)

pause>nul

exit

)

)

)

if /i "%use%"=="n" (

exit

)