clicker-gamme.bat

mode con lines=29
mode con cols=40
color 0a
@echo off
set count=0
set total=0
set totalp=0
set ver=1.0 pre alpha
set clk=10
set a=0
set b=0
set c=0
set d=0
set e=0
set f=0
set g=0
set h=0
set i=0
set j=0
set k=0
set l=0
set m=10
set n=10
set o=10
set p=10
set q=10
set r=10
set s=10
set click=1
set chicken=0
set dog=0
set man=0
set upd=0
set math=6
set cheat=2147483647
set adm=1

:start
cls
if %adm%==1 goto main
@echo.
call :C 0a "            Welcome"
@echo.
call :C 0b "               To"
@echo.
call :C 0c "           Batch Clicker
@echo.
@echo.
@echo.
call :C 0a "           Q/q"&call :C 0b " = "&call :C 0a "Quit"
@echo.
call :C 0a "           M/m"&call :C 0b " = "&call :C 0a "menu"
@echo.
call :C 0a "          buyp"&call :C 0b " = "&call :C 0a "buy Pointer"
@echo.
call :C 0a "          buyb"&call :C 0b " = "&call :C 0a "buy batch file"
@echo.
call :C 0a "          buyh"&call :C 0b " = "&call :C 0a "buy human"
@echo.
call :C 0a "          buym"&call :C 0b " = "&call :C 0a "buy macro"
@echo.
call :C 0a "          buyn"&call :C 0b " = "&call :C 0a "buy botnet"
@echo.
call :C 0a "             -"&call :C 0b " = "&call :C 0a "click"
@echo.
call :C 0a "         H/h/?"&call :C 0b " = "&call :C 0a "Help"
@echo.
call :C 0a "         reset"&call :C 0b " = "&call :C 0a "Reset game"
@echo.
call :C 0a "       upgrade"&call :C 0b " = "&call :C 0a "upgrade all"
@echo.
call :C 0a "         H/h/?"&call :C 0b " = "&call :C 0a "Help"
@echo.
@echo.
@echo.
@echo.
call :C 0a "                By"
@echo.
call :C 0b "               TWIG"
@echo.
call :C 0c "             15"&call :C 0a "/"&call :C 0c "09"&call :C 0a "/"&call :C 0c "15"
@echo.
call :C 0d "          Version"&call :C 0a ":"&call :C 0f "%ver%"
@echo.
pause

:main
cls
@echo      total clicks(%total%)
@echo      total points(%totalp%)
@echo.
@echo      clicks(%a%)
@echo      pointers(%b%)
@echo      batch files(%c%)
@echo      humans(%d%)
@echo      macros(%e%)
@echo      botnets(%f%)
@echo.
@echo      pointer price(%m%(clicks))
@echo      batch file price(%n%(pointers))
@echo      human price(%o%(batch files))
@echo      macro price(%p%(humans))
@echo      botnet price(%q%(macros))
@echo      ?/h for help
@echo.
set /p input=     Choice:
if /i %input%==menu goto start
if /i %input%==q goto end
if %input%==q* goto rainbowext
if /i %input%==h goto help
if %input%==? goto help
if /i %input%==m goto start
if /i %input%==- goto click
if /i %input%==buyp goto clicker
if /i %input%==buyb goto chicken
if /i %input%==buyh goto dog
if /i %input%==buym goto macro
if /i %input%==buyn goto bot
if %input%==CheatA set /A a=a+%cheat%
if %input%==CheatB set /A b=b+%cheat%
if %input%==CheatC set /A c=c+%cheat%
if %input%==CheatD set /A d=d+%cheat%
if %input%==CheatE set /A e=e+%cheat%
if %input%==CheatF set /A f=f+%cheat%
if /i %input%==upgrade set /A upd=1&goto upgrade
if /i %input%==reset set /A a=0&set /A b=0&set /A c=0&set /A d=0&set /A e=0&set /A f=0&set /A totalp=0&set /A total=0&set /A m=10&set /A n=10&set /A o=10&set /A p=10&set /A q=10
goto main

:click
set /A a=a+1
set /A total=total+1
set /A totalp=totalp+1
set /A a=a+(b*11)+(c*120)+(d*1300)+(e*14000)+(f*150000)
set /A totalp=totalp+(b*11)+(c*120)+(d*1300)+(e*14000)+(f*150000)
@echo                 click
goto main

:clicker
if %a% gtr %m% goto clickerT
goto main

:clickerT
set /A b=b+1
set /A a=a-m
set /A m=(m+%math%)
if %upd% gtr 0 goto upgrade
goto main

:chicken
if %b% gtr %n% goto chickenT
goto main

:chickenT
set /A c=c+1
set /A b=b-n
set /A n=(n+%math%)
if %upd% gtr 0 goto upgrade
goto main

:dog
if %c% gtr %o% goto dogT
goto main

:dogT
set /A d=d+1
set /A c=c-o
set /A o=(o+%math%)
if %upd% gtr 0 goto upgrade
goto main


:macro
if %d% gtr %p% goto macroT
goto main

:macroT
set /A e=e+1
set /A d=d-p
set /A p=(p+%math%)
if %upd% gtr 0 goto upgrade
goto main

:bot
if %e% gtr %q% goto botT
goto main

:botT
set /A f=f+1
set /A e=e-q
set /A q=(q+%math%)
if %upd% gtr 0 goto upgrade
goto main

:upgrade
if %a% gtr %m% goto clickerT
if %b% gtr %n% goto chickenT
if %c% gtr %o% goto dogT
if %d% gtr %p% goto macroT
if %e% gtr %q% goto botT
set /A upd=0
goto main



:end
mode con lines=6
mode con cols=25
color 0F
@echo.
@echo   thankyou for playing
@echo            xx
@echo           TWIG
@echo.
pause
cls
@echo next time you
@echo quit try q*
PING 1.1.1.1 -n 1 -w 25 >NUL
exit

:rainbowext
mode con lines=6
mode con cols=25
color 01
@echo.
@echo   thankyou for playing
@echo            xx
@echo           TWIG
@echo.
PING 1.1.1.1 -n 1 -w 10 >NUL
color 02
@echo.
@echo   thankyou for playing
@echo            xx
@echo           TWIG
@echo.
PING 1.1.1.1 -n 1 -w 10 >NUL
color 03
@echo.
@echo   thankyou for playing
@echo            xx
@echo           TWIG
@echo.
PING 1.1.1.1 -n 1 -w 10 >NUL
color 04
@echo.
@echo   thankyou for playing
@echo            xx
@echo           TWIG
@echo.
PING 1.1.1.1 -n 1 -w 10 >NUL
color 05
@echo.
@echo   thankyou for playing
@echo            xx
@echo           TWIG
@echo.
PING 1.1.1.1 -n 1 -w 10 >NUL
color 06
@echo.
@echo   thankyou for playing
@echo            xx
@echo           TWIG
@echo.
PING 1.1.1.1 -n 1 -w 10 >NUL
color 07
@echo.
@echo   thankyou for playing
@echo            xx
@echo           TWIG
@echo.
PING 1.1.1.1 -n 1 -w 10 >NUL
color 08
@echo.
@echo   thankyou for playing
@echo            xx
@echo           TWIG
@echo.
PING 1.1.1.1 -n 1 -w 10 >NUL
color 09
@echo.
@echo   thankyou for playing
@echo            xx
@echo           TWIG
@echo.
PING 1.1.1.1 -n 1 -w 10 >NUL
color 0a
@echo.
@echo   thankyou for playing
@echo            xx
@echo           TWIG
@echo.
PING 1.1.1.1 -n 1 -w 10 >NUL
color 0b
@echo.
@echo   thankyou for playing
@echo            xx
@echo           TWIG
@echo.
PING 1.1.1.1 -n 1 -w 10 >NUL
color 0c
@echo.
@echo   thankyou for playing
@echo            xx
@echo           TWIG
@echo.
PING 1.1.1.1 -n 1 -w 10 >NUL
set /A count=count+1
if %count% gtr 4 goto end
goto rainbowext

:c
setlocal enableDelayedExpansion
:::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::

:colorPrint Color  Str  [/n]
setlocal
set "s=%~2"
call :colorPrintVar %1 s %3
exit /b

:colorPrintVar  Color  StrVar  [/n]
if not defined DEL call :initColorPrint
setlocal enableDelayedExpansion
pushd .
':
cd \
set "s=!%~2!"
:: The single blank line within the following IN() clause is critical - DO NOT REMOVE
for %%n in (^"^

^") do (
  set "s=!s:\=%%~n\%%~n!"
  set "s=!s:/=%%~n/%%~n!"
  set "s=!s::=%%~n:%%~n!"
)
for /f delims^=^ eol^= %%s in ("!s!") do (
  if "!" equ "" setlocal disableDelayedExpansion
  if %%s==\ (
    findstr /a:%~1 "." "\'" nul
    <nul set /p "=%DEL%%DEL%%DEL%"
  ) else if %%s==/ (
    findstr /a:%~1 "." "/.\'" nul
    <nul set /p "=%DEL%%DEL%%DEL%%DEL%%DEL%"
  ) else (
    >colorPrint.txt (echo %%s\..\')
    findstr /a:%~1 /f:colorPrint.txt "."
    <nul set /p "=%DEL%%DEL%%DEL%%DEL%%DEL%%DEL%%DEL%"
  )
)
if /i "%~3"=="/n" echo(
popd
exit /b


:initColorPrint
for /f %%A in ('"prompt $H&for %%B in (1) do rem"') do set "DEL=%%A %%A"
<nul >"%temp%\'" set /p "=."
subst ': "%temp%" >nul
exit /b


:cleanupColorPrint
2>nul del "%temp%\'"
2>nul del "%temp%\colorPrint.txt"
>nul subst ': /d
exit /b

:help
cls
@echo.
@echo.
@echo.
call :C 0a "           Q/q"&call :C 0b " = "&call :C 0a "Quit"
@echo.
call :C 0a "           M/m"&call :C 0b " = "&call :C 0a "menu"
@echo.
call :C 0a "          buyp"&call :C 0b " = "&call :C 0a "buy Pointer"
@echo.
call :C 0a "          buyb"&call :C 0b " = "&call :C 0a "buy batch file"
@echo.
call :C 0a "          buyh"&call :C 0b " = "&call :C 0a "buy human"
@echo.
call :C 0a "          buym"&call :C 0b " = "&call :C 0a "buy macro"
@echo.
call :C 0a "          buyn"&call :C 0b " = "&call :C 0a "buy botnet"
@echo.
call :C 0a "             -"&call :C 0b " = "&call :C 0a "click"
@echo.
call :C 0a "         reset"&call :C 0b " = "&call :C 0a "Reset game"
@echo.
call :C 0a "       upgrade"&call :C 0b " = "&call :C 0a "upgrade all"
@echo.
call :C 0a "         H/h/?"&call :C 0b " = "&call :C 0a "Help"
@echo.
@echo.
@echo.
pause
goto main