I have been working on this batch os for a long time, and I can now say that I'm happy enough with it that I can post it to a major community.
Here is the source code, which can also be found at my website (osmiumsoft.wordpress.com). This is version 2.9
If you try it, please give feedback so I can improve this.
Code: Select all
::osmiumsoft.wordpress.com
::Do not claim this program as your own. If you have a revised version, please give credit or contact osmiumsoftwareofficial@gmail.com
echo off
title Osmium 64
mode 50,18
color 0f
setlocal enabledelayedexpansion
set color=0f
set theme=Original
if exist Addons (
if exist Users (
cd Users
goto login
) else goto installer
) else goto installer
:installer
set loader=
cls
echo.
echo System Installer
echo.
echo With your premission, Osmium 64 will create 3
echo folders necessary for the OS to run. These will
echo be created in the same folder that Osmium 64 is
echo in. If you give permission, the program will
echo immediately close, signifying that the setup
echo been completed.
echo.
choice /c:yn /n /m "Permission? (Y/N) "
if "%errorlevel%" =="2" exit
if "%errorlevel%" =="1" goto bypass
:bypass
if not exist "Osmium 64" mkdir "Osmium 64"
cd "Osmium 64"
if not exist Users mkdir Users
if not exist Addons mkdir Addons
cd ..
move /y "%cd%\Osmium 64.bat" "%cd%\Osmium 64" >nul
:login
mode 50,25
color 0f
set user=
set password=
set addondest=
set hscore=
set hscorename=
set karleon=
set perclick=
set freeplay=
set color=0f
set theme=Original
set wmplayerkill=
set musicdest=
set u=
cls
echo.
echo Login
echo.
echo C] Create User
echo X] Exit
echo.
echo --Users--
dir /b
echo.
set /p u="Enter your username: "
if not defined u goto login
set u=%u:|=%
set u=%u:/=%
set u=%u:\=%
set u=%u:"=%
if /i "%u%" =="X" exit
if /i "%u%" =="C" goto create
if not exist "%u%" (
goto logincreate
) else goto logincontinue
:logincreate
echo.
echo This user does not exist.
echo [PRESS ANY KEY]
pause >nul
goto login
:logincontinue
cd "%u%"
< info.sav (
set /p user=
set /p password=
set /p color=
set /p theme=
set /p addondest=
)
< whackem.sav (
set /p hscore=
set /p hscorename=
set /p avscore=
set /p avcount=
set /p avtotal=
)
< karleonclicker.sav (
set /p karleon=
set /p perclick=
)
< music.sav (
set /p wmplayerkill=
set /p musicdest=
)
goto enterpass
:create
mode 50,18
set user=
set n2=
cls
echo.
echo Create User
echo.
echo B] Back
echo.
set /p user="Enter a username: "
if not defined user goto create
set user=%user:|=%
set user=%user:/=%
set user=%user:\=%
set user=%user:"=%
set n2=%user: =%
if not defined n2 goto create
set n2=
if /i "%user%" =="B" (
set user=
goto login
)
if /i "%user%" =="C" (
echo.
echo This username is prohibited
echo [PRESS ANY KEY]
pause >nul
goto create
)
if /i "%user%" =="X" (
echo.
echo This username is prohibited
echo [PRESS ANY KEY]
pause >nul
goto create
)
if exist "%user%" (
echo.
echo This user already exists
echo [PRESS ANY KEY]
pause >nul
goto create
)
:cpass?
cls
echo.
echo Create Password
echo.
echo Do you want to create a password? This can be
echo changed later in settings.
echo.
echo Y] Yes
echo N] No
echo.
choice /c:yn /n
if "%errorlevel%" =="2" (
set password=
mkdir "%user%"
cd "%user%"
call :save
goto enterpass
)
if "%errorlevel%" =="1" goto cpass
goto cpass?
:cpass
set password=
cls
echo.
echo Create Password
echo.
echo Note any ^| or " chatacters will be removed
echo from your password if included.
echo.
echo B] Back
echo.
set /p password="Enter a secure password: "
if not defined password goto cpass
set password=%password:|=%
if not defined password goto cpass
set password=%password:"=%
if not defined password goto cpass
if /i "%password%" =="B" (
set password=
goto cpass?
)
mkdir "%user%"
cd "%user%"
call :save
goto deskm
:enterpass
set enter=
if not defined password goto deskm
cls
echo.
echo Enter Password
echo.
echo B] Back
echo.
set /p enter="Enter your password: "
if not defined enter goto enterpass
set enter=%enter:|=%
if not defined enter goto enterpass
set enter=%enter:"=%
if not defined enter goto enterpass
if /i "%enter%" =="B" (
cd ..
goto login
)
if "%enter%" =="%password%" goto deskm
echo.
echo Incorrect
echo [PRESS ANY KEY]
cd ..
pause >nul
goto login
:deskm
mode 50,18
:desk
for /f %%a in ('time /t') do (
set standardtime=%%a
)
call :save
color %color%
cls
echo.
echo Logged in as %user%
echo %date% - %standardtime%
echo.
echo i] System Information
echo P] Programs
echo S] Settings
echo X] Log out
echo.
choice /c:isxp /n
if "%errorlevel%" =="4" goto programs
if "%errorlevel%" =="3" if not "%user%" =="Guest User" (
call :save
cd ..
goto login
)
if "%errorlevel%" =="2" goto settings
if "%errorlevel%" =="1" goto info
goto desk
:info
mode 50,29
cls
echo.
echo Osmium 64
echo Version: 2.9
echo.
echo Username: %user%
echo Current color theme: %theme%
echo.
echo Update
echo.
echo 2.9 Released - 1/18/2018
echo -Added DVD/CD and removable drive compatibility
echo to Addons
echo -Added CD and removable drive compatibility to
echo Music Player
echo -Added Internet
echo -Changed 'Candy' theme
echo.
echo Visit osmiumsoft.wordpress.com/o64/versions for
echo a complete version log.
echo.
echo [PRESS ANY KEY]
pause >nul
goto deskm
:settings
cls
echo.
echo Settings
echo.
echo C] Themes
echo P] Password Protection
echo U] Change Username
echo D] Delete User Account
echo T] Transfer User Account
echo M] Music Player
echo.
echo B] Back
echo.
choice /c:cpubdtm /n
if "%errorlevel%" =="7" goto musicsetting
if "%errorlevel%" =="6" goto tranuser
if "%errorlevel%" =="5" goto deluser
if "%errorlevel%" =="4" goto deskm
if "%errorlevel%" =="3" goto rename
if "%errorlevel%" =="2" goto modp
if "%errorlevel%" =="1" goto colorthemes
goto settings
:musicsetting
call :save
cls
echo.
echo Music Player Settings
echo.
if not defined wmplayerkill echo Q] Quit music when exiting music player (OFF)
if "%wmplayerkill%" =="1" echo Q] Quit music when exiting music player (ON)
echo.
echo B] Back
echo.
choice /c:bq /n
if "%errorlevel%" =="2" (
if "%wmplayerkill%" =="1" (
set wmplayerkill=
goto musicsetting
)
if not defined wmplayerkill (
set wmplayerkill=1
taskkill /f /im wmplayer.exe /t >nul
cls
)
)
if "%errorlevel%" =="1" goto settings
goto musicsetting
:tranuser
cls
echo.
echo Transfer User Account
echo.
echo Transfer to...
echo E] Existing Account
echo N] New Account
echo.
echo B] Back
echo.
choice /c:enb /n
if "%errorlevel%" =="3" goto settings
if "%errorlevel%" =="2" goto trannew
if "%errorlevel%" =="1" goto tranexist
goto tranuser
:tranexist
set u=
cls
echo.
echo Transfer User Account
echo.
echo B] Back
echo.
echo --Users--
cd ..
dir /b
echo.
set /p u="Which user should your account be transfered to? "
if not defined u (
cd "%user%"
goto tranexist
)
set u=%u:|=%
set u=%u:/=%
set u=%u:\=%
set u=%u:"=%
if /i "%u%" =="%user%" (
echo.
echo You cannot transfer your account to your account
echo [PRESS ANY KEY]
pause >nul
cd "%user%"
goto tranexist
)
if /i "%u%" =="B" (
cd "%user%"
goto tranuser
)
if not exist "%u%" (
echo.
echo This user does not exist
echo [PRESS ANY KEY]
pause >nul
cd "%user%"
goto tranexist
)
cd "%u%"
< info.sav (
set /p u=
set /p p=
)
cd ..
cd "%user%"
goto tranexistpass
:tranexistpass
set pass=
set exist=1
if not defined p goto swallowscarryingcoconuts
cls
echo.
echo Transfer User Account
echo.
echo B] Back
echo.
echo Ask that user for permission to overwrite their
echo data, in the form of their password.
echo.
set /p pass="Enter their password: "
if not defined pass goto tranexistpass
set pass=%pass:|=%
if not defined pass goto tranexistpass
set pass=%pass:"=%
if not defined pass goto tranexistpass
if /i "%pass%" =="B" (
set u=
set p=
goto tranuser
)
if not "%pass%" =="%p%" (
echo.
echo Incorrect
echo [PRESS ANY KEY]
pause >nul
goto tranexistpass
)
:swallowscarryingcoconuts
cd ..
if not exist "%u%" mkdir "%u%"
cd "%u%"
if not exist Music mkdir Music
if not exist Notepad mkdir Notepad
(
echo.%u%
if "%exist%" =="1" echo.%password%
if "%new%" =="1" echo.%p%
echo.%color%
echo.%theme%
echo.%addondest%
) > info.sav
(
echo.%hscore%
echo.%hscorename%
echo.%avscore%
echo.%avcount%
echo.%avtotal%
) > whackem.sav
(
echo.%karleon%
echo.%perclick%
) > karleonclicker.sav
(
echo.%wmplayerkill%
echo.%musicdest%
) > music.sav
set exist=
set new=
cd ..
xcopy "%cd%\%user%\Music" "%cd%\%u%\Music" /e /y >nul
xcopy "%cd%\%user%\Notepad" "%cd%\%u%\Notepad" /e /y >nul
cd "%user%"
echo.
echo The account has been successfully transfered.
echo [PRESS ANY KEY]
pause >nul
set u=
set p=
goto settings
:trannew
set u=
set u2=
cls
echo.
echo Transfer User Account
echo.
echo B] Back
echo.
set /p u="Enter a username for the new account: "
if not defined u goto trannew
if /i "%u%" =="B" goto tranuser
set u=%u:|=%
set u=%u:/=%
set u=%u:\=%
set u=%u:"=%
set u2=%u: =%
if not defined u2 goto trannew
set u2=
if /i "%u%" =="C" (
echo.
echo This username is prohibited
echo [PRESS ANY KEY]
pause >nul
goto trannew
)
if /i "%u%" =="X" (
echo.
echo This username is prohibited
echo [PRESS ANY KEY]
pause >nul
goto trannew
)
cd ..
if exist "%u%" (
echo.
echo This username is already in use
echo [PRESS ANY KEY]
pause >nul
cd "%user%"
goto trannew
)
cd "%user%"
goto trannewpass?
:trannewpass?
cls
echo.
echo Transfer User Account
echo.
echo Do you want to create a password? This can be
echo changed later in settings.
echo.
echo Y] Yes
echo N] No
echo.
echo B] Back
echo.
choice /c:byn /n
if "%errorlevel%" =="3" (
set p=
set new=1
goto swallowscarryingcoconuts
)
if "%errorlevel%" =="2" goto trannewpass
if "%errorlevel%" =="1" goto tranuser
goto trannewpass?
:trannewpass
set p=
cls
echo.
echo Transfer User Account
echo.
echo Note any ^| or " chatacters will be removed
echo from your password if included.
echo.
echo B] Back
echo.
set /p p="Enter a password for the new account: "
if not defined p goto trannewpass
set p=%p:|=%
if not defined p goto trannewpass
set p=%p:"=%
if not defined p goto trannewpass
set new=1
goto swallowscarryingcoconuts
:deluser
cd ..
if not exist "%user%" goto delusererror
cd "%user%"
if not defined password goto deluserconfirm
set deluser=
cls
echo.
echo Delete %user%'s Account
echo.
echo B] Back
echo.
set /p deluser="Enter your password: "
if not defined deluser goto deluser
set deluser=%deluser:|=%
if not defined deluser goto deluser
set deluser=%deluser:"=%
if not defined deluser goto deluser
if /i "%deluser%" =="B" goto settings
if not "%deluser%" =="%password%" (
echo.
echo Incorrect password
echo [PRESS ANY KEY]
pause >nul
goto deluser
)
goto deluserconfirm
:delusererror
cls
echo.
echo Delete %user%'s Account
echo.
echo Osmium 64 could not find %user%'s save file.
pause >nul
goto settings
:deluserconfirm
cls
echo.
echo Delete %user%'s Account
echo.
echo Are you sure? (Y/N)
choice /c:yn /n
if "%errorlevel%" =="2" goto settings
if "%errorlevel%" =="1" echo.
cd ..
rd /s /q "%user%" >nul
echo Profile deleted
echo [PRESS ANY KEY]
pause >nul
goto login
:rename
set u=
set n2=
cls
echo.
echo Change Username
echo.
echo Current username: %user%
echo.
echo B] Back
echo.
set /p u=">"
if not defined u goto rename
if /i "%u%" =="B" goto settings
set u=%u:|=%
set u=%u:/=%
set u=%u:\=%
set u=%u:"=%
set n2=%u: =%
if not defined n2 goto rename
set n2=
if /i "%u%" =="C" (
echo.
echo This username is prohibited
echo [PRESS ANY KEY]
pause >nul
goto rename
)
if /i "%u%" =="X" (
echo.
echo This username is prohibited
echo [PRESS ANY KEY]
pause >nul
goto rename
)
if exist "%u%" (
echo.
echo This user already exists
echo [PRESS ANY KEY]
pause >nul
goto rename
)
set userold=%user%
set user=%u%
cd ..
ren "%userold%" "%user%"
cd %user%
set userold=
call :save
goto settings
:colorthemes
color %color%
call :save
cls
echo.
echo Themes
echo.
echo C] Commodore D] Candy
echo V] Vintage Grey A] Autumn
echo M] Matrix P] Purple
echo E] Error N] Nyan Blue
echo R] Rust G] Eggnog
echo W] Marble O] Original
echo.
echo B] Back
echo.
choice /c:bocvmedapwnrg /n
if "%errorlevel%" =="13" (
set color=f4
set theme=Eggnog
)
if "%errorlevel%" =="12" (
set color=4f
set theme=Rust
)
if "%errorlevel%" =="11" (
set color=1b
set theme=Nyan Blue
)
if "%errorlevel%" =="10" (
set color=f0
set theme=Marble
)
if "%errorlevel%" =="9" (
set color=5f
set theme=Purple
)
if "%errorlevel%" =="8" (
set color=ce
set theme=Autumn
)
if "%errorlevel%" =="7" (
set color=b1
set theme=Candy
)
if "%errorlevel%" =="6" (
set color=cf
set theme=Error
)
if "%errorlevel%" =="5" (
set color=0a
set theme=Matrix
)
if "%errorlevel%" =="4" (
set color=8a
set theme=Vintage Grey
)
if "%errorlevel%" =="3" (
set color=1f
set theme=Commodore
)
if "%errorlevel%" =="2" (
set color=0f
set theme=Original
)
if "%errorlevel%" =="1" goto settings
goto colorthemes
:modp
if not defined password goto modpn
cls
echo.
echo Password Protection
echo.
echo P] Change Password
echo D] Disable Password
echo.
echo B] Back
echo.
choice /c:pbd /n
if "%errorlevel%" =="3" goto disable
if "%errorlevel%" =="2" goto settings
if "%errorlevel%" =="1" goto modpc
goto modp
:modpn
if defined password goto modp
cls
echo.
echo Password Protection
echo.
echo D] Enable Password
echo.
echo B] Back
echo.
choice /c:db /n
if "%errorlevel%" =="2" goto settings
if "%errorlevel%" =="1" goto cpassdesk
goto modpn
:cpassdesk
set password=
cls
echo.
echo Create Password
echo.
echo Note any ^| or " chatacters will be removed
echo from your password if included.
echo.
echo B] Back
echo.
set /p password="Enter a secure password: "
if not defined password goto cpassdesk
set password=%password:|=%
if not defined password goto cpassdesk
set password=%password:"=%
if not defined password goto cpassdesk
if /i "%password%" =="B" (
set password=
goto modp
)
call :save
goto modp
:disable
set dis=
cls
echo.
echo Disable Password
echo.
echo B] Back
echo.
set /p dis="Enter your password: "
if not defined dis goto disable
set dis=%dis:|=%
if /i "%dis%" =="B" goto modp
if "%dis%" =="%password%" (
set password=
call :save
goto modpn
)
echo.
echo Incorrect password
echo [PRESS ANY KEY]
pause >nul
goto disable
)
goto modn
:modpc
set temp=
set tempc=
cls
echo.
echo Change Password
echo.
echo B] Back
echo.
set /p temp="Enter your password: "
if not defined temp goto modpc
set temp=%temp:|=%
if not defined temp goto modpc
set temp=%temp:"=%
if not defined temp goto modpc
if /i "%temp%" =="B" goto modp
if not "%temp%" =="%password%" (
echo Incorrect password
echo [PRESS ANY KEY]
pause >nul
goto modpc
)
:tempc
set tempc=
cls
echo.
echo Change Password
echo.
echo Note any ^| or " chatacters will be removed
echo from your password if included.
echo.
echo B] Back
echo.
set /p tempc="Enter a secure password: "
if not defined tempc goto tempc
set tempc=%tempc:|=%
if not defined tempc goto tempc
set tempc=%tempc:"=%
if not defined tempc goto tempc
if /i "%tempc%" =="B" goto modp
set password=%tempc%
call :save
goto settings
:programs
cls
echo.
echo Programs
echo.
echo U] Utilities
echo G] Games
echo A] Addons
echo.
echo B] Back
echo.
choice /c:ugba /n
if "%errorlevel%" =="4" goto addons
if "%errorlevel%" =="3" goto deskm
if "%errorlevel%" =="2" goto games
if "%errorlevel%" =="1" goto utilities
goto programs
:addons
set a=
if not defined addondest set addondest=1
call :save
cd ..
cd ..
cd Addons
mode 50,30
cls
echo.
echo Addons
echo.
if "%addondest%" =="1" echo C] Change Destination (Current: Addon Folder)
if "%addondest%" =="2" echo C] Change Destination (Current: DVD/CD Drive)
if "%addondest%" =="3" echo C] Change Destination (Current: Removable Drive)
echo O] Open Folder
echo.
echo B] Back
echo.
echo --Addons--
if "%addondest%" =="1" dir /b
if "%addondest%" =="2" if exist F:\ (
dir F:\ /b
) else echo Insert a disc.
if "%addondest%" =="3" if exist D:\ (
dir D:\ /b
) else echo Insert a removable drive.
echo.
set /p a=">"
if not defined a (
cd ..
cd Users
cd "%user%"
goto addons
)
set a=%a:|=%
set a=%a:^=%
set a=%a:/=%
set a=%a:\=%
set a=%a:"=%
set a=%a:.bat=%
if /i "%a%" =="B" (
cd ..
cd Users
cd %user%
mode 50,18
goto programs
)
if /i "%a%" =="C" (
if "%addondest%" =="1" set addondest=2
if "%addondest%" =="2" set addondest=3
if "%addondest%" =="3" set addondest=1
cd ..
cd Users
cd %user%
goto addons
)
if /i "%a%" =="O" (
if "%addondest%" =="1" %systemroot%\explorer.exe "%cd%"
if exist F:\ if "%addondest%" =="2" %systemroot%\explorer.exe F:\
if exist D:\ if "%addondest%" =="3" %systemroot%\explorer.exe D:\
cd ..
cd Users
cd %user%
goto addons
)
if "%addondest%" =="1" goto addon1
if "%addondest%" =="2" goto addon2
if "%addondest%" =="3" goto addon3
goto addons
:addon3
if not exist "D:\%a%".bat (
echo.
echo This file does not exist
echo [PRESS ANY KEY]
pause >nul
cd ..
cd Users
cd %user%
goto addons
)
call "D:\%A%".bat
title Osmium 64
mode 50,18
color %color%
goto addons
:addon2
if not exist "F:\%a%".bat (
echo.
echo This file does not exist
echo [PRESS ANY KEY]
pause >nul
cd ..
cd Users
cd %user%
goto addons
)
call "F:\%A%".bat
title Osmium 64
mode 50,18
color %color%
goto addons
:addon1
if not exist "%a%".bat (
echo.
echo This file does not exist
echo [PRESS ANY KEY]
pause >nul
cd ..
cd Users
cd %user%
goto addons
)
call "%a%".bat
title Osmium 64
mode 50,18
color %color%
goto addons
:utilities
cls
echo.
echo Utilities
echo.
echo C] Calculator
echo R] Reminders
echo N] Notepad
echo M] Music Player
echo I] Internet
echo.
echo B] Back
echo.
choice /c:crbnmi /n
if "%errorlevel%" =="6" goto internet
if "%errorlevel%" =="5" goto music
if "%errorlevel%" =="4" goto name
if "%errorlevel%" =="3" goto programs
if "%errorlevel%" =="2" goto reminder
if "%errorlevel%" =="1" goto calc
goto utilities
:internet
set a=
cls
echo.
echo Internet
echo.
echo B] Back
echo.
set /p a="URL: www."
if not defined a goto internet
set a=www.%a%
set a=%a:|=%
if not defined a goto internet
set a=%a:"=%
if not defined a goto internet
set a2=%a: =%
if not defined a goto internet
set a2=%a:/=%
if not defined a goto internet
set a2=%a:\=%
if not defined a2 goto internet
if /i "%a%" =="www.B" goto utilities
start %a%
goto internet
:calc
set prob=
set sol=
cls
echo.
echo Calculator
echo.
echo B] Back
echo.
set /p prob=">"
if not defined prob goto calc
set prob=%prob:|=%
if not defined prob goto calc
set prob=%prob:"=%
if not defined prob goto calc
if /i "%prob%" =="B" goto utilities
if "%prob%" =="|" goto calc
set /a sol=%prob% >nul
echo %prob% = %sol%
echo [PRESS ANY KEY]
pause >nul
goto calc
:reminder
mode 50,18
cls
echo.
echo Reminders
echo.
echo D] Delete Reminders
echo C] Clear Reminders
echo A] Add Reminders
echo V] View Reminders
echo.
echo B] Back
echo.
choice /c:dcabv /n
if "%errorlevel%" =="5" goto remview
if "%errorlevel%" =="4" goto utilities
if "%errorlevel%" =="3" goto remadd
if "%errorlevel%" =="2" goto remclear
if "%errorlevel%" =="1" goto remdel
goto reminder
:remadd
set a=
set a2=
set b=
set b2=
cls
echo.
echo Add Reminders
echo.
echo B] Back
echo.
echo What's your reminder?
set /p a=">"
if not defined a goto remadd
set a=%a:|=%
if not defined a goto remadd
set a=%a:"=%
if not defined a goto remadd
set a2=%a: =%
if not defined a2 goto remadd
if /i "%a%" =="B" goto reminder
cd Reminders
md "%a%"
cd ..
echo.
echo Success!
echo [PRESS ANY KEY]
pause >nul
goto remadd
:remclear
if not exist Reminders md Reminders
cls
echo.
echo Clear Reminders
echo.
echo Are you sure you want to erase all of your
echo reminders?
echo.
echo Y] Yes
echo N] No
echo.
choice /c:yn /n
if "%errorlevel%" =="2" goto reminder
if "%errorlevel%" =="1" echo.
rd /s /q Reminders >nul
md Reminders
echo Success!
echo [PRESS ANY KEY]
pause >nul
goto reminder
:remdel
if not exist Reminders md Reminders
mode 50,30
set a=
set a2=
cls
echo.
echo Delete Reminders
echo.
echo B] Back
echo.
cd Reminders
dir /b
cd ..
echo.
echo Which reminder do you want to delete?
echo.
set /p a=">"
if not defined a goto remdel
set a=%a:|=%
if not defined a goto remdel
set a=%a:"=%
if not defined a goto remdel
set a2=%a: =%
if not defined a2 goto remdel
if /i "%a%" =="B" goto reminder
cd Reminders
if not exist "%a%" (
echo.
echo This reminder does not exist
echo [PRESS ANY KEY]
pause >nul
cd ..
goto remdel
)
rd /s /q "%a%" >nul
cd ..
echo.
echo Success!
echo [PRESS ANY KEY]
pause >nul
goto remdel
:remview
mode 50,30
cls
echo.
echo View Reminders
echo.
echo B] Back
echo.
cd Reminders
dir /b
cd ..
echo.
choice /c:b /n
if "%errorlevel%" =="1" goto reminder
goto remview
:music
set m=
if not defined musicdest set musicdest=1
call :save
cd Music
cls
mode 50,30
cls
echo.
echo Music Player
echo.
if "%musicdest%" =="1" echo C] Change Destination (Current: Music Folder)
if "%musicdest%" =="2" echo C] Change Destination (Current: CD)
if "%musicdest%" =="3" echo C] Change Destination (Current: Removable Drive)
echo O] Open Folder
echo.
echo B] Back
echo.
echo --Music--
if "%musicdest%" =="1" dir /b
if "%musicdest%" =="2" if exist F:\ (
dir F:\ /b
) else echo Insert a disc.
if "%musicdest%" =="3" if exist D:\ (
dir D:\ /b
) else echo Insert a removable drive.
echo.
set /p m=">"
if not defined m (
cd ..
goto music
)
set m=%m:|=%
set m=%m:^=%
set m=%m:/=%
set m=%m:\=%
set m=%m:"=%
set m=%m:.mp3=%
if /i "%m%" =="B" (
if "%wmplayerkill%" =="1" taskkill /f /im wmplayer.exe /t >nul
cls
cd ..
mode 50,18
goto utilities
)
if /i "%m%" =="O" (
if "%musicdest%" =="1" %systemroot%\explorer.exe "%cd%"
if exist F:\ if "%musicdest%" =="2" %systemroot%\explorer.exe "F:\"
if exist D:\ if "%musicdest%" =="3" %systemroot%\explorer.exe "D:\"
cd ..
goto music
)
if /i "%m%" =="C" (
if "%musicdest%" =="1" set musicdest=2
if "%musicdest%" =="2" set musicdest=3
if "%musicdest%" =="3" set musicdest=1
cd ..
goto music
)
if "%musicdest%" =="1" goto music1
if "%musicdest%" =="2" goto music2
if "%musicdest%" =="3" goto music3
cd ..
goto music
:music3
if not exist "D:\%m%.mp3" (
echo.
echo This file does not exist
echo If it does, convert it to mp3
echo [PRESS ANY KEY]
pause >nul
cd ..
goto music
)
start wmplayer.exe "D:\%m%.mp3\" >nul
cd ..
goto music
:music2
if not exist "F:\%m%.mp3" (
echo.
echo This file does not exist
echo If it does, convert it to mp3
echo [PRESS ANY KEY]
pause >nul
cd ..
goto music
)
start wmplayer.exe "F:\%m%.mp3\" >nul
cd ..
goto music
:music1
if not exist "%m%.mp3" (
echo.
echo This file does not exist
echo If it does, convert it to mp3
echo [PRESS ANY KEY]
pause >nul
cd ..
goto music
)
start wmplayer.exe "%cd%\%m%.mp3\" >nul
cd ..
goto music
:games
mode 50,18
color %color%
title Osmium 64
cls
echo.
echo Games
echo.
echo K] Karleon Clicker
echo W] Whack'em
echo.
echo B] Back
echo.
choice /c:bwk /n
if "%errorlevel%" =="3" goto karleonclicker
if "%errorlevel%" =="2" goto menu
if "%errorlevel%" =="1" goto programs
goto games
:name
mode 50,18
cd %user%
cd Notepad
set name=
set ext=txt
set n2=
cls
echo.
echo Notepad
echo.
echo O] Open Folder
echo.
echo B] Back
echo.
set /p name="Enter your file name: "
if not defined name goto name
set name=%name:|=%
set name=%name:"=%
set name=%name:.=%
set n2=%name: =%
if not defined n2 goto name
set n2=
if not defined name goto name
if /i "%name%" =="O" (
%systemroot%\explorer.exe "%cd%"
goto name
)
if /i "%name%" =="B" (
set ext=
set name=
mode 50,18
cd ..
goto utilities
)
goto ext
:ext
set ext=
set n2=
cls
echo.
echo Notepad
echo.
echo O] Open Folder
echo.
echo B] Back
echo.
set /p ext="Enter your file extension: %name%."
if not defined ext goto ext
set ext=%ext:|=%
set n2=%ext: =%
if not defined n2 goto ext
set n2=
if not defined ext goto ext
if /i "%ext%" =="O" (
%systemroot%\explorer.exe "%cd%"
goto ext
)
if /i "%ext%" =="B" goto name
goto edit
:edit
mode 50,30
set txt=
cls
echo.
echo Notepad
echo.
echo O] Open Folder
echo.
echo B] Back
echo.
if /i not "%ext%" =="txt" echo You are editing %name%.%ext%
if /i "%ext%" =="txt" echo You are editing %name%
echo.
if exist "%name%.%ext%" type "%name%.%ext%"
set /p txt=
if not defined txt goto edit
set txt=%txt:"=%
if /i "%txt%" =="O" (
"%systemroot%\explorer.exe" "%cd%"
goto edit
)
if /i "%txt%" =="B" goto name
(echo.^%txt%) >> "%name%.%ext%"
goto edit
:karleonclicker
cls
color f0
mode 50,25
title Karleon Clicker
if not defined perclick set perclick=1
if not defined karleon set karleon=0
set cheat=
echo.
echo Karleon Clicker
echo.
echo Hit ENTER to generate karleons!
echo [PRESS ANY KEY]
pause >nul
goto karleon
:karleon
call :save
if %karleon% gtr 499999999 goto win
set k=
cls
echo.
echo Karleon Clicker
echo.
echo N] New Game
echo.
echo B] Back
echo.
if "%cheat%" =="1" echo Cheats enabled
if "%cheat%" =="1" echo.
echo Karleon: %karleon%
echo K/Click: %perclick%
echo.
echo C] Cursor: Costs 50K - +1K per click
if %karleon% gtr 999 echo P] Printer: Costs 1,000K - +5K per click
if %karleon% gtr 4999 echo L] Laser printer: Costs 5,000K - +25K per click
if %karleon% gtr 9999 echo S] Secretary: Costs 10,000K - +50K per click
if %karleon% gtr 49999 echo M] Mint: Costs 50,000 - +250K per click
if %karleon% gtr 99999 echo F] Factory: Costs 100,000 - +500K per click
if %karleon% gtr 999999 echo W] Wormhole: Costs 1,000,000 - +10,000K per click
if %karleon% gtr 9999999 echo R] Rusty spoon: Costs 10,000,000 - +100,000K per click
echo.
set /p k=">"
if not defined k goto generate
set k=%k:|=%
set k=%k:"=%
set k=%k:^=%
if /i "%k%" =="B" goto games
if /i "%k%" =="N" (
set karleon=
set cheat=
set perclick=
set freeplay=
goto karleonclicker
)
if /i "%k%" =="UUDDLRLRBA" goto cheat
if /i "%k%" =="WWSSADADBA" goto cheat
if /i "%k%" =="C" goto cursor
if /i "%k%" =="P" goto printer
if /i "%k%" =="L" goto laser
if /i "%k%" =="S" goto secretary
if /i "%k%" =="M" goto mint
if /i "%k%" =="F" goto factory
if /i "%k%" =="W" goto wormhole
if /i "%k%" =="R" goto spoon
goto karleon
:generate
set /a karleon=%karleon%+%perclick%
if "%cheat%" =="1" (
if %karleon% gtr 49 (
set /a karleon=%karleon%-50
set /a perclick=%perclick%+1
)
if %karleon% gtr 999 (
set /a karleon=%karleon%-1000
set /a perclick=%perclick%+5
)
if %karleon% gtr 4999 (
set /a karleon=%karleon%-5000
set /a perclick=%perclick%+25
)
if %karleon% gtr 9999 (
set /a karleon=%karleon%-10000
set /a perclick=%perclick%+50
)
if %karleon% gtr 49999 (
set /a karleon=%karleon%-50000
set /a perclick=%perclick%+250
)
if %karleon% gtr 99999 (
set /a karleon=%karleon%-100000
set /a perclick=%perclick%+500
)
if %karleon% gtr 999999 (
set /a karleon=%karleon%-1000000
set /a perclick=%perclick%+10000
)
if %karleon% gtr 9999999 (
set /a karleon=%karleon%-10000000
set /a perclick=%perclick%+100000
)
)
goto karleon
:cursor
if %karleon% gtr 49 (
set /a karleon=%karleon%-50
set /a perclick=%perclick%+1
)
goto karleon
:printer
if %karleon% gtr 999 (
set /a karleon=%karleon%-1000
set /a perclick=%perclick%+5
)
goto karleon
:laser
if %karleon% gtr 4999 (
set /a karleon=%karleon%-5000
set /a perclick=%perclick%+25
)
goto karleon
:secretary
if %karleon% gtr 9999 (
set /a karleon=%karleon%-10000
set /a perclick=%perclick%+50
)
goto karleon
:mint
if %karleon% gtr 49999 (
set /a karleon=%karleon%-50000
set /a perclick=%perclick%+250
)
goto karleon
:factory
if %karleon% gtr 99999 (
set /a karleon=%karleon%-100000
set /a perclick=%perclick%+500
)
goto karleon
:wormhole
if %karleon% gtr 999999 (
set /a karleon=%karleon%-1000000
set /a perclick=%perclick%+10000
)
goto karleon
:spoon
if %karleon% gtr 9999999 (
set /a karleon=%karleon%-10000000
set /a perclick=%perclick%+100000
)
goto karleon
:cheat
if not defined cheat (
set cheat=1
goto karleon
)
if "%cheat%" =="1" set cheat=
goto karleon
:win
set win=
cls
echo.
echo You won!
echo You last had %karleon% karleons!
echo.
echo [PRESS ANY KEY]
pause >nul
set karleon=0
set perclick=1
set cheat=
goto karleonclicker
:menu
mode 40,18
color e9
title Whack'em!
if not defined hscore set hscore=0
if not defined avscore set avscore=0
if not defined avcount set avcount=0
if not defined hscorename set hscorename=BLANK
set score=
cls
echo.
echo WHACK'EM
echo.
echo P]LAY C]LEAR SCORES
echo Q]UIT S]CORES
echo.
choice /c:pqsc /n
if %errorlevel% ==4 goto clearwhackem
if %errorlevel% ==3 goto champion
if %errorlevel% ==2 goto games
if %errorlevel% ==1 goto countwhackem
goto menu
:clearwhackem
cls
echo.
echo CLEAR SCORES
echo.
echo S]TATS H]IGH SCORE
echo B]ACK
choice /c:shb /n
if "%errorlevel%" =="3" goto menu
if "%errorlevel%" =="2" (
set hscore=0
set hscorename=BLANK
echo.
echo HIGH SCORE CLEARED
echo [PRESS ANY KEY]
pause >nul
goto clearwhackem
)
if "%errorlevel%" =="1" (
set avscore=0
set avcount=0
set avtotal=0
echo.
echo STATS CLEARED
echo [PRESS ANY KEY]
pause >nul
goto clearwhackem
)
goto clearwhackem
:champion
cls
echo.
echo SCORES
echo.
echo HIGH SCORE
echo %hscore% pts. - ^%hscorename%
echo.
echo AVERAGE SCORE
echo %avscore% pts.
echo.
echo GAMES PLAYED
if "%avcount%" =="1" echo %avcount% game
if not "%avcount%" =="1" echo %avcount% games
echo.
echo [PRESS ANY KEY]
pause >nul
goto menu
:countwhackem
cls
echo.
echo.
echo.
echo READY
echo.
echo.
echo 3
ping localhost /n 2 >nul
cls
echo.
echo.
echo.
echo READY
echo.
echo.
echo 2
ping localhost /n 2 >nul
cls
echo.
echo.
echo.
echo READY
echo.
echo.
echo 1
ping localhost /n 2 >nul
goto display
:display
set time=2
set score=0
set scoreup=10
set old=
set a=
set s=
set d=
goto loop
:loopclr
set a=
set s=
set d=
:loop
if "%a%" =="**" set old=a
if "%s%" =="**" set old=s
if "%d%" =="**" set old=d
set a=
set s=
set d=
set /a rand=%random%
if "%rand%" =="0" goto loop
if "%rand%" lss "14000" (
set a=**
if "%old%" =="a" goto loopclr
goto display2
)
if "%rand%" lss "25000" (
set s=**
if "%old%" =="s" goto loopclr
goto display2
)
if "%rand%" lss "32000" (
set d=**
if "%old%" =="d" goto loopclr
goto display2
)
if "%rand%" gtr "31999" goto loop
:display2
if "%score%" gtr "150" set time=1
cls
echo.
echo SCORE: %score%
echo.
echo P]AUSE Q]UIT
echo.
echo [A] %a%
echo [S] %s%
echo [D] %d%
echo.
choice /c:asdzpq /t %time% /d z /n
if "%errorlevel%" =="6" goto lose
if "%errorlevel%" =="5" goto whackempause
if "%errorlevel%" =="4" goto lose
if "%errorlevel%" =="3" goto d
if "%errorlevel%" =="2" goto s
if "%errorlevel%" =="1" goto a
goto loop
:whackempause
cls
echo.
echo GAME PAUSED
echo.
echo [PRESS ANY KEY]
pause >nul
goto loop
:a
if "%a%" =="**" (
set /a score=%score%+%scoreup%
goto loop
)
if not "%a%" =="**" goto lose
goto loop
:s
if "%s%" =="**" (
set /a score=%score%+%scoreup%
goto loop
)
if not "%s%" =="**" goto lose
goto loop
:d
if "%d%" =="**" (
set /a score=%score%+%scoreup%
goto loop
)
if not "%d%" =="**" goto lose
goto loop
:lose
color cf
if %score% gtr %hscore% goto highscorewhackem
set /a avtotal=%avtotal%+%score%
set /a avcount=%avcount%+1
set /a avscore=%avtotal%/%avcount%
call :save
cls
echo.
echo GAME OVER
echo.
echo YOUR SCORE WAS %score%
echo.
echo R]ETRY
echo Q]UIT
echo.
choice /c:rq /n
if "%errorlevel%" =="2" goto menu
if "%errorlevel%" =="1" (
color e9
goto countwhackem
)
goto lose
:highscorewhackem
set hscore=%score%
set /a avtotal=%avtotal%+%score%
set /a avcount=%avcount%+1
set /a avscore=%avtotal%/%avcount%
set score=
call :save
cls
echo.
echo GAME OVER
echo.
echo YOU BEAT THE HIGH SCORE!
echo.
set /p hscorename="HIGH SCORE NAME? "
if not defined hscorename goto highscorewhackem
set hscorename=%hscorename:|=%
set hscorename=%hscorename:"=%
set hscorename=%hscorename:^=%
echo.
echo R]ETRY
echo Q]UIT
echo.
choice /c:rq /n
if "%errorlevel%" =="2" goto menu
if "%errorlevel%" =="1" (
color e9
goto countwhackem
)
goto highscorewhackem
:save
if not exist Music mkdir Music
if not exist Notepad mkdir Notepad
if not exist Reminders mkdir Reminders
(
echo.%user%
echo.%password%
echo.%color%
echo.%theme%
echo.%addondest%
) > info.sav
(
echo.%hscore%
echo.%hscorename%
echo.%avscore%
echo.%avcount%
echo.%avtotal%
) > whackem.sav
(
echo.%karleon%
echo.%perclick%
) > karleonclicker.sav
(
echo.%wmplayerkill%
echo.%musicdest%
) > music.sav
exit /b