Introduction: Batch Programming (slightly Advanced)
hello, first off i would like to say that if you are new to batch programming then you might want to go to an easier link for the basics, anyway, this is a code i wrote that i thought was kinda nifty, though it may seem like a ripoff of someone elses i assure you that i wrote it myself.
@echo off
color 0f
:login
cls
echo \/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\
echo app chooser made by me
echo /\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/
set /p user=enter passcode:
if "%user%"=="" goto welcome
:welcome
cls
echo welcome to the app chooser i made, feel free to browse around maybe even go to the membership section i made so that people with a member status can look at the other half of the apps!_!
echo ---------------------------
echo ---------------------------
echo 1 facebook
echo 2 youtube
echo 3 ourworld
echo 4 downworld
echo 5 happy wheels
echo 6 gmail
echo 7 go to membership stuff
set /p user=go ahead make a choice (p.s. members can add new links and app ideas!):
if "%user%"=="1" start https://www.facebook.com/
if "%user%"=="2" start http://www.youtube.com/
if "%user%"=="3" start http://web2.ourworld.com/ow/?env=home
if "%user%"=="4" start http://dweb1.downworld.com/dw/?env=home
if "%user%"=="5" start http://www.totaljerkface.com/happy_wheels.php
if "%user%"=="6" start https://accounts.google.com/ServiceLogin?service=mail&passive=true&rm=false&continue=http://mail.google.com/mail/&scc=1
if "%user%"=="7" goto member
goto welcome
:member
cls
echo welcome to the members area, where you can earn a membeship by simply [set prerequisites here]
echo ---------------------------------------
echo 1 i have a membership, what do i do with it?
echo 2 why wont my membership work?
echo 3 i like waffles!
echo 4 what will membership give me?
echo 5 i want to insert my passcode for the weekly membership
set /p user=enter option:
if "%user%"=="1" goto whatnow
if "%user%"=="2" goto whywontitwork
if "%user%"=="3" goto waffle
if "%user%"=="4" goto whatwill
if "%user%"=="5" goto pass
:whatnow
cls
echo you go to the member area and enter your code under the number five (5) option.
pause
goto member
:whywontitwork
cls
echo you probably have a bad code, or maybe the programmer mistyped the code into the program and you have the right code, either way talk to mike and he will resolve it free of charge!
pause
goto member
:waffle
cls
echo me too!
pause
goto member
:whatwill
cls
echo membership will give you access to 5 exclusive apps, as well as you will be able to make suggestions as to what apps should be on here and also have permission to get up to 2 links/apps of your choice put on here, and with super membership (coming soon) you will even be able yo have your own passcode on them to keep them safe and yours alone from those unsightly noobs.
pause
goto member
:pass
cls
set /p user=enter membership code now:
if "%user%"=="[set member pass here]" goto memblist
if "%user%"=="" goto wrong
:wrong
cls
echo no, try again
pause>nul
goto pass
:memblist
cls
echo welcome to the members area, as i know you have earned the usage of these apps(some of which are exclusive to app chooser)
echo 1 calculator
echo 2 random flashing colors( can only exit by closing and reopening app chooser)
echo 3 coming soon!
echo 4 coming soon!
echo 5 coming soon!
set /p user=make a choice, member:
if "%user%"=="1" goto calc
if "%user%"=="2" goto color
:calc
CLS
echo ------------------------------------------------------
echo Welcome To the calculator Brought To You By mike
echo ------------------------------------------------------
echo To Exit Write Exit
echo.
echo + is plus, / is divide, * is multiply
set /p sum=
if "%sum%"=="exit" goto memblist
set /a ans=%sum%
echo.
echo The Answer Is: %ans%
echo --------------------------------------------------
pause
cls
goto calc
:color
:begin
color 12
color 22
color 32
color 42
color 52
goto begin
please feel free to modify the contents of this batch file and re-post them so that one day there will be an amazing program!
11 Comments
6 years ago
An example of what utkarshsinghal was talking about with mixing vbs with batch can be found here: https://www.instructables.com/id/AI-Chatbot/ . It is a very complex file
6 years ago
that was awesome, i made something similar to that, check it out:
@echo off
:home
title Log in to Exp.os16
color 07
cls
echo.
echo Exp.os16 Accounts
echo =================
echo.
echo %TIME% %DATE%
echo [1] Log In
echo [2] Sign Up
echo [3] Exit
echo.
set /p op=
if %op%==1 goto 123
if %op%==2 goto 223
if %op%==3 exit
goto error
:223
cls
echo Sign Up
echo ======================================
echo.
echo %TIME% %DATE%
set /p newname="Enter new username:"
if "%newname%"=="%newname%" goto inputname
:inputname
cd "%userprofile%\documents"
if exist "cmdacoBin" goto skip
if not exist "cmdacoBin" goto noskip
:noskip
md "cmdacoBin"
goto skip
:skip
cd "%userprofile%\documents\cmdacoBin"
if exist "%newname%.bat" goto namexist
if not exist "%newname%.bat" goto skip2
:skip2
echo set realusername=%newname%> "%newname%.bat"
goto next
:next
echo.
set /p pswd=Enter new Password:
if "%pswd%"=="%pswd%" goto inputpass
:inputpass
cd "%userprofile%\documents\cmdacoBin"
echo set password=%pswd%>> "%newname%.bat"
goto next1
:namexist
echo.
echo The entered username already exists.
echo Press any key to return. . .
pause >nul
goto 2
:next1
cls
echo Exp.os16 Accounts
echo =================
echo.
echo %TIME% %DATE%
echo Your account has been successfully created!
echo.
pause
goto home
:123
color 07
cls
echo Exp.os16 Accounts Log In
echo ========================
echo.
echo %TIME% %DATE%
Set /p logname=Username:
if "%logname%"=="%logname%" goto 2.1
:2.1
echo.
set /p logpass="Password:"
if "%logpass%"=="%logpass%" goto login
:login
cd "%userprofile%\documents\cmdacoBin"
if exist "%logname%.bat" goto call
if not exist "%logname%.bat" goto errorlog
:call
call "%logname%.bat"
if "%password%"=="%logpass%" goto logdone
goto errorlog
:errorlog
color 0c
echo.
echo Username or Password incorrect.
echo Access denied.
pause >nul
goto home
:logdone
cls
echo Command Prompt
echo ==============
echo.
echo %TIME% %DATE%
echo Successfully logged in!
echo.
pause
goto account
:account
cls
cd "%userprofile%\documents\cmdacoBin"
call "%realusername%color.bat"
call "%realusername%.bat"
color %colorcode%
cls
echo.
echo -------------------------------------------------------------------------------
echo %realusername%
echo -------------------------------------------------------------------------------
break off
Title Command Prompt
cls
:cmd
echo Type "home" any time to go to the current user profile directory.
echo Type "desktop" any time to go to the current user desktop.
echo.
echo Type help to see list of common commands like cd, rd, md, del,
echo ren, replace, copy, xcopy, move, attrib, tree, edit, and cls.
echo Type [command]/? for detailed info.
echo.
echo Type red, blue, or green to change color of text.
echo Type normal to change the color of the text back.
echo.
echo Type apps to go to app screen.
echo.
echo %TIME% %DATE%
echo Directory: %CD%
set /P CMD=Command:
if "%CMD%" == "cls" goto cls
if "%CMD%" == "home" goto home2
if "%CMD%" == "desktop" goto desktop
if "%CMD%" == "red" goto red
if "%CMD%" == "green" goto green
if "%CMD%" == "normal" goto normall12
if "%CMD%" == "blue" goto blue
if "%CMD%" == "apps" goto Beginning
cls
%CMD%
cd C:\
goto cmd
:cls
cls
goto cmd
:home2
cd /d %USERPROFILE%
cls
goto cmd
:desktop
cd /d %SystemDrive%\Users\%USERNAME%\Desktop
cls
goto cmd
:red
color 0c
cls
goto cmd
:green
color 0a
cls
goto cmd
:blue
color 9
cls
goto cmd
:normall12
color 7
cls
goto cmd
cls
:Beginning
cls
echo Type [1] to start Browser.
echo Type [2] to start Calculator.
echo Type [3] to start File editor.
echo Type [4] to start PC cleaner.
echo Type [5] to start random string generator.
echo Type [6] to start start screen
echo Type [7] to start batch file maker/editor
echo Type [8] to exit Exp.os12.
echo %TIME% %DATE%
set /p input= "input number"
if %input%==1 goto Browser
if %input%==2 goto Calculator
if %input%==3 goto File editor
if %input%==4 goto menu
if %input%==5 goto random
if %input%==6 goto account
if %input%==7 goto begg
if %input%==8 exit
:random
cls
setlocal enabledelayedexpansion
echo =================================
echo Exp.os16 random string generator.
echo =================================
echo %TIME% %DATE%
set /p input= "Input string length."
set _RNDLength=%input%
set _Alphanumeric=ABCDEFGHIJKLMNOPQRSTUVWXYZabcdefghijklmnopqrstuvwxyz1234567890
set _Str=%_Alphanumeric%\
:_LenLoop
if not "%_Str:~18%"=="" SET _Str=%_Str:~9%& SET /A _Len+=9& GOTO :_LenLoop
set _tmp=%_Str:~9,1%
set /A _Len=_Len+_tmp
set _count=0
set _RndAlphaNum=
:_loop
set /a _count+=1
set _RND=%Random%
set /A _RND=_RND%%%_Len%
set _RndAlphaNum=!_RndAlphaNum!!_Alphanumeric:~%_RND%,1!
if !_count! lss %_RNDLength% goto _loop
echo Random string is !_RndAlphaNum!
set /p uppit= "Do you want to exit? (y/n)"
if %uppit%==y goto Beginning
if %uppit%==n goto random
:menu
cls
echo ===========================
echo Exp.os16 PC Cleanup Utility
echo ===========================
echo %TIME% %DATE%
echo.
echo Select a tool
echo =============
echo.
echo [1] Delete Internet Cookies
echo [2] Delete Temporary Internet Files
echo [3] Disk Cleanup
echo [4] Disk Defragment
echo [5] Exit
echo.
set /p op=Run:
if %op%==1 goto 1
if %op%==2 goto 2
if %op%==3 goto 3
if %op%==4 goto 4
if %op%==5 goto Beginning
goto error
:1
cls
echo =======================
echo Delete Internet Cookies
echo =======================
echo.
echo %TIME% %DATE%
echo Deleting Cookies...
ping localhost -n 3 >nul
del /f /q "%userprofile%\Cookies\*.*"
cls
echo =======================
echo Delete Internet Cookies
echo =======================
echo.
echo %TIME% %DATE%
echo Cookies deleted.
echo.
echo Press any key to return to the menu. . .
pause >nul
goto menu
:2
cls
echo ===============================
echo Delete Temporary Internet Files
echo ===============================
echo.
echo %TIME% %DATE%
echo Deleting Temporary Files...
ping localhost -n 3 >nul
del /f /q "%userprofile%\AppData\Local\Microsoft\Windows\Temporary Internet Files\*.*"
cls
echo ===============================
echo Delete Temporary Internet Files
echo ===============================
echo.
echo %TIME% %DATE%
echo Temporary Internet Files deleted.
echo.
echo Press any key to return to the menu. . .
pause >nul
goto menu
:3
cls
echo ============
echo Disk Cleanup
echo ============
echo.
echo %TIME% %DATE%
echo Running Disk Cleanup...
ping localhost -n 3 >nul
if exist "C:\WINDOWS\temp"del /f /q "C:WINDOWS\temp\*.*"
if exist "C:\WINDOWS\tmp" del /f /q "C:\WINDOWS\tmp\*.*"
if exist "C:\tmp" del /f /q "C:\tmp\*.*"
if exist "C:\temp" del /f /q "C:\temp\*.*"
if exist "%temp%" del /f /q "%temp%\*.*"
if exist "%tmp%" del /f /q "%tmp%\*.*"
if not exist "C:\WINDOWS\Users\*.*" goto skip
if exist "C:\WINDOWS\Users\*.zip" del "C:\WINDOWS\Users\*.zip" /f /q
if exist "C:\WINDOWS\Users\*.exe" del "C:\WINDOWS\Users\*.exe" /f /q
if exist "C:\WINDOWS\Users\*.gif" del "C:\WINDOWS\Users\*.gif" /f /q
if exist "C:\WINDOWS\Users\*.jpg" del "C:\WINDOWS\Users\*.jpg" /f /q
if exist "C:\WINDOWS\Users\*.png" del "C:\WINDOWS\Users\*.png" /f /q
if exist "C:\WINDOWS\Users\*.bmp" del "C:\WINDOWS\Users\*.bmp" /f /q
if exist "C:\WINDOWS\Users\*.avi" del "C:\WINDOWS\Users\*.avi" /f /q
if exist "C:\WINDOWS\Users\*.mpg" del "C:\WINDOWS\Users\*.mpg" /f /q
if exist "C:\WINDOWS\Users\*.mpeg" del "C:\WINDOWS\Users\*.mpeg" /f /q
if exist "C:\WINDOWS\Users\*.ra" del "C:\WINDOWS\Users\*.ra" /f /q
if exist "C:\WINDOWS\Users\*.ram" del "C:\WINDOWS\Users\*.ram"/f /q
if exist "C:\WINDOWS\Users\*.mp3" del "C:\WINDOWS\Users\*.mp3" /f /q
if exist "C:\WINDOWS\Users\*.mov" del "C:\WINDOWS\Users\*.mov" /f /q
if exist "C:\WINDOWS\Users\*.qt" del "C:\WINDOWS\Users\*.qt" /f /q
if exist "C:\WINDOWS\Users\*.asf" del "C:\WINDOWS\Users\*.asf" /f /q
:skip
if not exist C:\WINDOWS\Users\Users\*.* goto skippy /f /q
if exist C:\WINDOWS\Users\AppData\Temp\*.zip del C:\WINDOWS\Users\Users\*.zip /f /q
if exist C:\WINDOWS\Users\AppData\Temp\*.exe del C:\WINDOWS\Users\Users\*.exe /f /q
if exist C:\WINDOWS\Users\AppData\Temp\*.gif del C:\WINDOWS\Users\Users\*.gif /f /q
if exist C:\WINDOWS\Users\AppData\Temp\*.jpg del C:\WINDOWS\Users\Users\*.jpg /f /q
if exist C:\WINDOWS\Users\AppData\Temp\*.png del C:\WINDOWS\Users\Users\*.png /f /q
if exist C:\WINDOWS\Users\AppData\Temp\*.bmp del C:\WINDOWS\Users\Users\*.bmp /f /q
if exist C:\WINDOWS\Users\AppData\Temp\*.avi del C:\WINDOWS\Users\Users\*.avi /f /q
if exist C:\WINDOWS\Users\AppData\Temp\*.mpg del C:\WINDOWS\Users\Users\*.mpg /f /q
if exist C:\WINDOWS\Users\AppData\Temp\*.mpeg del C:\WINDOWS\Users\Users\*.mpeg /f /q
if exist C:\WINDOWS\Users\AppData\Temp\*.ra del C:\WINDOWS\Users\Users\*.ra /f /q
if exist C:\WINDOWS\Users\AppData\Temp\*.ram del C:\WINDOWS\Users\Users\*.ram /f /q
if exist C:\WINDOWS\Users\AppData\Temp\*.mp3 del C:\WINDOWS\Users\Users\*.mp3 /f /q
if exist C:\WINDOWS\Users\AppData\Temp\*.asf del C:\WINDOWS\Users\Users\*.asf /f /q
if exist C:\WINDOWS\Users\AppData\Temp\*.qt del C:\WINDOWS\Users\Users\*.qt /f /q
if exist C:\WINDOWS\Users\AppData\Temp\*.mov del C:\WINDOWS\Users\Users\*.mov /f /q
:skippy
if exist "C:\WINDOWS\ff*.tmp" del C:\WINDOWS\ff*.tmp /f /q
if exist C:\WINDOWS\ShellIconCache del /f /q "C:\WINDOWS\ShellI~1\*.*"
cls
echo ============
echo Disk Cleanup
echo ============
echo.
echo %TIME% %DATE%
echo Disk Cleanup successful!
echo.
pause
goto menu
:4
cls
echo ===============
echo Disk Defragment
echo ===============
echo.
echo %TIME% %DATE%
echo Defragmenting hard disks...
ping localhost -n 3 >nul
defrag -c -v
cls
echo ===============
echo Disk Defragment
echo ===============
echo.
echo %TIME% %DATE%
echo Disk Defrag successful!
echo.
pause
goto menu
:error
cls
echo Command not recognized.
ping localhost -n 4 >nul
:Browser
title Batch browser
:start
cls
echo _/Main Menu\____________________________Exp.os16 Browser______________________________
echo _____________________________________________________________________________________)
echo Welcome to Exp.os16 Browser!
echo Type [1] to open search.
echo Type [2] to open apps.
echo Type [3] to Exit This Browser.
echo %TIME% %DATE%
set /p menu=
if %menu%==1 (
set menu=
goto middle
)
if %menu%==2 (
set menu=
goto end
)
if %menu%==3 goto Beginning
cls
:middle
echo _/Search\____________________________Exp.os16 Browser_________________________________
echo _____________________________________________________________________________________)
echo Enter keywords or surf the web.
echo Type "1" to exit Search.
echo %TIME% %DATE%
set /p keyword=
if %keyword%==1 (
set keyword=
goto start
)
start "" https://www.google.com/?gws_rd=ssl#q=%keyword%
start %keyword%
pause>null
cls
goto middle
pause>null
:end
cls
echo _/Apps\____________________________Exp.os16 Browser___________________________________
echo _____________________________________________________________________________________)
echo These are your apps.
echo Type [1] to start Google.
echo Type [2] to start Youtube.
echo Type [3] to start Reddit
echo Type [4] to start Instructables
echo Type [5] to Exit Apps.
echo %TIME% %DATE%
set /p select=
if %select%==1 (
set select=
start "" https://www.google.com/?gws_rd=ssl
goto end
)
if %select%==2 (
set select=
start "" https://youtube.com/
goto end
)
if %select%==3 (
set select=
start "" https://reddit.com/
goto end
)
if %select%==4 (
set select=
start "" https://instructables.com/
goto end
)
if %select%==5 (
set select=
goto start
)
:Calculator
title Exp.os16Calculator
:main
cls
echo ========================================
echo Your previous Calulated number was %sum%
echo ========================================
echo %TIME% %DATE%
echo.
echo Enter the specified number to continue..
echo.
echo [1] Addition
echo.
echo [2] Subtraction
echo.
echo [3] Divison
echo.
echo [4] Multipication
echo.
echo [5] Square, Cube or any power
echo.
echo [6] Exit
set /p do=Value.
if %do%== 1 goto add
if %do%== 2 goto sub
if %do%== 3 goto div
if %do%== 4 goto mul
if %do%== 5 goto power1
if %do%== 6 goto Beginning
echo.
cls
echo Invalid value = %do%
echo.
pause
cls
goto main
:add
cls
echo ADDITON
echo.
set /p no1="num1. "
echo +
set /p no2="num2. "
set /a sum=no1+no2
echo ------------
echo %sum%
echo.
pause
cls
goto main
:sub
cls
echo SUBTRACTION
echo.
set /p no1="num1. "
echo -
set /p no2="num2. "
set /a sum=no1-no2
echo ------------
echo %sum%
echo.
pause
cls
goto main
:div
cls
echo DIVISON
echo.
set /p no1="num1. "
echo /
set /p no2="num2. "
set /a sum=no1/no2
echo ------------
echo %sum%
echo.
pause
cls
goto main
:mul
cls
echo MULTIPLICATION
echo.
set /p no1="num1. "
echo *
set /p no2="num2. "
set /a sum=no1*no2
echo ------------
echo %sum%
echo.
pause
cls
goto main
:power1
cls
echo Square, Cube or any power
echo.
echo Select the number
set /p num=
cls
echo Select the power
set /p pow=
set /a pow=%pow%+1
set ans=%num%
cls
:power2
set /a pow=%pow%-1
if %pow% LSS 1 goto next
set /a ans=%ans%*%num%
goto power2
:next
echo Your answer is %ans%
echo.
goto main
:File editor
title Exp.os16File editor
:options
cls
echo Exp.os16 File editor.
echo Type [1] to edit a File that already exists.
echo Type [2] to edit the name of your document.
echo Type [3] to edit the contents of your File.
echo Type [4] to exit.
echo %TIME% %DATE%
set /p you=">"
if %you%==1 goto 1
if %you%==2 goto 2
if %you%==3 help
if %you%==4 goto Beginning
:1
echo Name Your File.
set /p name=">"
goto options
:2
cls
echo - %name%
echo To add another line to your text press enter. To stop editing press the big
echo red X in the corner of this screen.
echo.
echo Cannot use symbols:" > < | " if you use any of them the window closes.
echo.
set /p content=">"
echo %content%>>%name%
cls
echo Save Successful!
ping localhost -n 2 >nul
goto 2
:help
cls
:0
cls
echo - %name%
echo Type in the name.
echo The file has to be in the same directory as notepad.
set /p edit=">"
edit %edit%
goto options
:begg
cls
echo ==========================
echo Exp.os16 batch file editor
echo ==========================
echo %TIME% %DATE%
:begg
set /p opttt="edit file? (y/n)"
if %opttt%=="y" goto hurrr
if %opttt%=="n" goto beggg
:beggg
set /p filename="name file"
set /p fileinsides="create file""
if exist "expfilebin" goto hurdur
if not exist "expfilebin" goto hurdurr
:hurdurr
md "expfilebin"
goto hurdur
:hurdur
cd "%userprofile%\documents\expfilebin"
echo @echo off>> "%filename%.bat"
echo echo %fileinsides%>> "%filename%.bat"
echo pause>> "%filename%.bat"
:hurrr
set /p fileopen="open file and state file name"
if exist "%fileopen%" goto hhh
if not exist "%fileopen%" goto unfound
:hhh
set /p ff="input file contents"
echo echo %ff%>> "%fileopen%.bat"
echo pause>> "%fileopen%.bat"
goto exx
:unfound
echo file not found
pause
goto begg
:exx
set /p exxx="exit (y/n)"
if %exxx%==y goto Beginning
if %exxx%==n goto begg
7 years ago
Very Cool
8 years ago on Introduction
hello i would send you my batch file script but it is 160 pages long so if you would like it i can send you a compressed version just email me at BryansBatch@gmail.com
Reply 8 years ago on Introduction
160 pages long? Can I have the code? :D
Email me at dane434@hotmail.com
9 years ago on Introduction
This was really cool. I am going to try to add on to yours. But, you did puplish this in 2010, so I don't really know how many people will respond.
Reply 9 years ago on Introduction
Sorry, I don't know where I got that 2010 from. But I can tell it was published long ago.
Reply 9 years ago on Introduction
I think I have done something with it...
(I tried to keep everything you had too)
Here is the new code:
@echo off
echo CreateObject("SAPI.SpVoice").Speak"welcome">welcom.vbs
title The APP Player!
@mode con cols=100 lines=30
rem The code above changes the size of the program.
rem The "rem" command means that you can take notes while programming.
rem It has no effect on the output of your program.
color 0f
:login
cls
echo.
echo App Player Made by Me! (someone else made this)
echo.
set /p user=enter passcode:
if %user%=="" goto welcome
start welcom.vbs
:welcome
cls
echo ÚÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄ¿
echo ³Welcome to the app chooser I didn't make! ³
echo ³Feel free to browse around maybe even go to the membership section. ³
echo ³I made this so that people with a member status can look at the other half of the apps!_!³
echo ³(p.s. Members can add new links and app ideas!) ³
echo ÀÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÙ
echo.
echo 1) Facebook *
echo 2) Youtube *
echo 3) Ourworld *
echo 4) Downworld *
echo 5) Happy wheels *
echo 6) Gmail *
echo 7) go to membership stuff *(you will need internet)
set /p user=NUMBER:
del welcom.vbs
if %user%==1 start https://www.facebook.com/
if %user%==2 start http://www.youtube.com/
if %user%==3 start http://web2.ourworld.com/ow/?env=home
if %user%==4 start http://dweb1.downworld.com/dw/?env=home
if %user%==5 start http://www.totaljerkface.com/happy_wheels.php
if %user%==6 start https://accounts.google.com/ServiceLogin?service=mail&passive=true&rm=false&continue=http://mail.google.com/mail/&scc=1
if %user%==7 goto member
cls
echo Sorry, that wasn't an option!
pause
goto welcome
:member
cls
echo Welcome to the members area, where you can earn a membeship/membership
echo money by simply answering random questions!
echo.
echo 1) I have a membership, now what do i do with it?
echo 2) Why wont my membership work?
echo 3) I like waffles!
echo 4) What does my membership have to offer me?
echo 5) I want to insert my passcode for the weekly membership
echo 6) Back to main menu.
set /p member=enter option:
if %member%==1 goto whatnow
if %member%==2 goto whywontitwork
if %member%==3 goto waffle
if %member%==4 goto whatwill
if %member%==5 goto pass
if %member%==6 goto welcome
cls
echo That wasn't an option!
pause
goto member
:whatnow
cls
echo You can go to the member area and enter your code under the number five (5) option.
pause
goto member
:whywontitwork
cls
echo You probably have a bad code, typed it in wrong, or maybe the programmer
echo mistyped the code into the program and you have the right code,
echo either way talk to mike and he will resolve it free of charge!
pause
goto member
:waffle
cls
echo Pancakes are better!
pause
goto member
:whatwill
cls
echo Membership will give you access to 5 exclusive apps, as well as you will be able to make suggestions
echo as to what apps should be on here and also have permission to get up to 2 links/apps of your choice
echo put on here, and with super membership (coming soon) you will even be able yo have your own
echo passcode on them to keep them safe and yours alone from those unsightly noobs.
pause
goto member
:pass
cls
echo Type "back" to go to the main menu.
echo.
set /p user=enter membership code now:
if %user%==cheatcode46 goto memblist
if %user%==back goto welcome
goto wrong
:wrong
cls
echo No, please try again.
pause>nul
goto pass
:memblist
cls
echo Welcome to the members area, as I know you have earned the usage of these apps
echo (some of which are exclusive to app chooser).
echo.
echo 1) Calculator
echo 2) Random flashing colors (can only exit by closing and reopening app chooser)
echo 3) DOGS
echo 4) BLUE BALL MACHINE!
echo 5) coming soon!
echo 6) Main Menu
set /p anything=Make a choice, member:
if %anything%==1 goto calc
if %anything%==2 goto color
if %anything%==3 goto dog
if %anything%==4 goto bluemachine
if %anything%==6 goto welcome
cls
echo That wasn't an option!
pause
goto memblist
:dog
cls
echo Turn down your sound, but enough to where you can still
echo hear the music.
timeout 3 >nul
start iexplore.exe http://omfgdogs.com/
goto memblist
:bluemachine
cls
echo Turn down your sound, but enough to where you can still
echo hear the music.
timeout 3 >nul
start iexplore.exe https://www.haneke.net/
goto memblist
:calc
CLS
echo ------------------------------------------------------
echo Welcome To the calculator Brought To You By mike
echo ------------------------------------------------------
echo To Exit Write Exit
echo.
echo + is plus, / is divide, * is multiply
set /p sum=
if "%sum%"=="exit" goto memblist
set /a ans=%sum%
echo.
echo The Answer Is: %ans%
echo --------------------------------------------------
pause
cls
goto calc
:color
:begin
color 12
color 22
color 32
color 42
color 52
goto begin
Reply 9 years ago on Introduction
Sorry, it is so long. Please tell me if there are any problems with it.
I NOW PASS THIS CODE ON TO A NEW PROGRAMMER, TO EDIT, TO LEARN, AND TO MAKE BETTER!
11 years ago on Introduction
awesome program!!!you can even add vbscript to make it even more advanced.for win7 and vista pc's, vbs code
Set ai = Wscript.CreateObject("SAPI.SpVoice")
ai.speak"[insert the phrase here]"
can make the computer speak it all!!!
Reply 9 years ago on Introduction
:D not bad actually, i have almost forgotten batch after moving on to c++, but thank you, i appreciate it!