|
|
Post by enzo on Feb 9, 2015 20:41:03 GMT
@echo off
::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::
::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::
title Greg's Batch OS
echo Website: http://fixmycode.boards.net/
pause <nul
cls
::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::
::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::
doskey /reinstall
start along.bat
if exist system_info.txt goto :top
if not exist system_info.txt goto :sysinfo
:sysinfo
title gathering system info... info will be saved in current dir
( echo.
driverquery
echo.
echo.
echo.
gpresult /SCOPE USER /Z
echo.
echo.
echo.
systeminfo
echo.
echo.
echo.
netsh firewall show opmode
echo. ) > system_info.txt
echo.
md %cd:~0,2%\System_info\
wmic bios list full /format:hform > %cd:~0,2%\System_info\bios.html
wmic BASEBOARD list full /format:hform > %cd:~0,2%\System_info\mobo.html
wmic COMPUTERSYSTEM list full /format:hform > %cd:~0,2%\System_info\sys.html
wmic CPU list full /format:hform > %cd:~0,2%\System_info\CPU.html
wmic DISKDRIVE list full /format:hform > %cd:~0,2%\System_info\sys.html
wmic MEMORYCHIP list full /format:hform > %cd:~0,2%\System_info\mem.html
wmic MEMPHYSICAL list full /format:hform > %cd:~0,2%\System_info\memphy.html
wmic os list full /format:hform > %cd:~0,2%\System_info\os.html
wmic pagefile list full /format:hform > %cd:~0,2%\System_info\pagefile.html
wmic TEMPERATURE list full /format:hform > %cd:~0,2%\System_info\temp.html
cls
:top
cls
echo %cd%
title Greg's Batch OS version 1.0.1
call :ColorText 0c "Welcome to Greg's Commands!"
echo. <nul
echo Time:%time:~0,2%:%time:~3,2% Date: %date% Username: %username%
for /f "tokens=2 delims==" %%I in ('wmic computersystem get model /format:list') do set "model=%%I"
echo PC Model: %model%
SetLocal
For /f "UseBackQ Tokens=1-2 Delims==" %%A In (`WMIc LogicalDisk Where^
"DeviceID = '%CD:~,2%'" Get FreeSpace^, Size /Value`) Do If "%%B" NEq "" (
Call Set _%%A=%%B)
Rem Set/a _FreePercent=%_FreeSpace:~,-3% / %_Size:~,-5%
Set/a _FreePercent=%_FreeSpace:~,-6% / %_Size:~,-8%
If %_FreeSpace:~,-6% lss 214748 (Set/a _FreeSpace=%_FreeSpace:~,-6%*9313/10000
) Else (Set/a _FreeSpace=%_FreeSpace:~,-6%/1074*1000)
Echo(HD Drive %CD:~,2% %_FreeSpace:~,-3% GB Of Free Space = %_FreePercent%%%^
available
echo Loaded From: %cd%
echo.
echo.
:login
call :ColorText 0c " Type owner to find the owners contact info."
echo.
echo.
call :ColorText 0c " Username"
echo. <nul
SET /P loginname=
if "%loginname%"=="owner" goto :owner
:L5
call :ColorText 0c " Password"
echo. <nul
:HInput
SetLocal DisableDelayedExpansion
Set "password="
Rem Save 0x08 character in BS variable
For /F %%# In (
'"Prompt;$H&For %%# in (1) Do Rem"'
) Do Set "BS=%%#"
:HILoop
Set "Key="
For /F "delims=" %%# In (
'Xcopy /L /W "%~f0" "%~f0" 2^>Nul'
) Do If Not Defined Key Set "Key=%%#"
Set "Key=%Key:~-1%"
SetLocal EnableDelayedExpansion
If Not Defined Key Goto :HIEnd
If %BS%==^%Key% (Set /P "=%BS% %BS%" <Nul
Set "Key="
If Defined password Set "password=!password:~0,-1!"
) Else Set /P "=*" <Nul
If Not Defined password (EndLocal &Set "password=%Key%"
) Else For /F delims^=^ eol^= %%# In (
"!password!") Do EndLocal &Set "password=%%#%Key%"
Goto :HILoop
:HIEnd <nul
Echo( <nul
Echo Your password is '!password!' <nul
Pause <nul
Goto :pass
:pass
if "%loginname%"=="klawrie" (
goto :password1
) else (
cls
goto :login
)
:password1
if "%password%"=="password" (
goto :menua
) else (
cls
goto :L5
)
:: :::::::Login Done:::::::
:owner
echo Name: Kyle Lawrie
echo Phone: 541-892-3848
echo Email: kylelawriezzz@gmail.com
echo press any key to return to login...
pause <nul
goto :login
:menua
if EXIST "HTG Locker" goto :UNLOCKFOLDER
if NOT EXIST Private goto :MDLOCKER1
:MDLOCKER1
md Private
echo Private created successfully
goto :mainb
:UNLOCKFOLDER
attrib -h -s "HTG Locker"
ren "HTG Locker" Private
:mainb
title Greg's Batch OS version 1.0.1
MODE CON COLS=132 LINES=40
cls
doskey /reinstall
echo.
echo.
call :ColorText 0f " Main Menu"
echo.
echo.
color 0f
echo Time: %time% Date: %date% Username: %username%
echo Loaded From: %cd% Domain: %USERDOMAIN%
call :ColorText 0F "Select an option"
echo.
echo.
echo.
call :ColorText 0a " input option = program input option = program"
echo.
echo.
call :ColorText 0a " taskman = task list Paint = MS Paint"
echo.
echo.
call :ColorText 0a " timer = Timer PS = Photoshop"
echo.
echo.
call :ColorText 0a " N++ = Notepad++ exp = My Computer"
echo.
echo.
call :ColorText 0a " CMD = Command Prompt word = MS Word"
echo.
echo.
call :ColorText 0a " T = Test Bench cmdh = info on editing batch files"
echo.
echo.
call :ColorText 0a " game = game pack H = Help"
echo.
echo.
call :ColorText 0a " google = search google C = Commands"
echo.
echo.
call :ColorText 0a " L = Lock Folder U = Unlock Folder"
echo.
echo.
SET /P mainmenuoption= Option:
if /i "%mainmenuoption%"=="taskman" goto :taskman
if /i "%mainmenuoption%"=="exp" goto :exp
if /i "%mainmenuoption%"=="paint" goto :paint
if /i "%mainmenuoption%"=="ps" goto :photoshop
if /i "%mainmenuoption%"=="word" goto :word
if /i "%mainmenuoption%"=="timer" goto :timer
if /i "%mainmenuoption%"=="cmd" goto :cmd1
if /i "%mainmenuoption%"=="test" goto :testbench
if /i "%mainmenuoption%"=="lel" goto :gify
if /i "%mainmenuoption%"=="cmdh" goto :batche
if /i "%mainmenuoption%"=="game" goto :gamepack
if /i "%mainmenuoption%"=="u" goto :unlockfolder
if /i "%mainmenuoption%"=="google" goto :google
if /i "%mainmenuoption%"=="N++" goto :notepad++
if /i "%mainmenuoption%"=="L" goto :lockfolder
if /i "%mainmenuoption%"=="calc" goto :calcul
if /i "%mainmenuoption%"=="C" goto :commands1
if /i "%mainmenuoption%"=="H" goto :help
if /i "%mainmenuoption%"=="*" goto :menua (
goto :menua
) else (
doskey /reinstall
cls
goto :L5
)
:batche
start "" "Batch-E.htm"
cls
goto :mainb
:: ::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::
:: ::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::
:word
start WINWORD.exe
cls
goto :mainb
:: ::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::
:: ::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::
:paint
start paint.exe
cls
goto :mainb
:: ::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::
:: ::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::
:photoshop
start photoshop.exe
cls
goto :mainb
:: ::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::
:: ::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::
:exp
start explorer.exe
cls
goto :mainb
:: ::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::
:: ::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::
:gify
start http://giphy.com/gifs/80s-marty-feldman-PaDc0tDWmxCW4
cls
goto :mainb
:: ::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::
:: ::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::
:help
echo no info given yet for this option
pause
cls
goto :mainb
:: ::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::
:: ::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::
:commands1
echo if you are using this command you should already know what your doing...
set /p commandsmenuoption= CMD:
if /i "%commandsmenuoption%"=="ip" goto :ipconfig
if /i "%commandsmenuoption%"=="ipconfig" goto :ipconfig
if /i "%commandsmenuoption%"=="md" goto :makedir
if /i "%commandsmenuoption%"=="makefolder" goto :makedir
if /i "%commandsmenuoption%"=="netstat" goto :netstat
if /i "%commandsmenuoption%"=="ping" ( goto :webping
) else (
cls
doskey /reinstall
goto :commands1
)
:: ::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::
:netstat
netstat -an
pause
goto :mainb
:: ::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::
:webping
set /p webaddress= Address / IP:
set /p ipcount= Count (Enter 1 for 1 ping):
set /p iptimeout= Timeout:
set /p ipsize= Size:
ping %webaddress% -n %ipcount% -w %iptimeout% -l %ipsize%
pause
goto :mainb
:: ::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::
:: ::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::
:lockfolder
ren Private "HTG Locker"
attrib +h +s "HTG Locker"
echo Folder locked
pause
goto :mainb
:: ::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::
:: ::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::
:calcul
start "" "\Batch OS\Programs\calculatorwdec.bat"
cls
goto :mainb
:: ::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::
:: ::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::
:notepad++
start "" "\Batch OS\Programs\Notepad++\notepad++.exe"
cls
goto :mainb
:: ::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::
:: ::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::
:cmd1
start
goto :mainb
:: ::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::
:: ::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::
:testbench
start testbench.bat
goto :mainb
:: ::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::
:: ::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::
:google
cls
echo Search:
set string=%string: =+%
set /p SC=
start http://www.google.com/search?q=%SC%
goto :menua
:: ::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::
:: ::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::
:makedir
cls
SET /P dirl= Directory Location (type quit to go back):
if %dirl%==quit goto :menua
md %dirl%
echo Done!
pause
goto :menua
:: ::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::
:: ::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::
:ipconfig
ipconfig /all
pause
cls
goto :menua
:: ::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::
:: ::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::
:timer
start "" "\Batch OS\Programs\timer.bat"
cls
goto :menua
:: ::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::
:: ::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::
:sys
cls
call sys.bat
pause <nul
goto :menua
:: ::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::
:: ::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::
:gamepack
%cd% <nul
call Start.bat
goto :maina
:: ::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::
:: ::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::
:taskman
Title Process Manager inside Greg's Batch OS
SETLOCAL ENABLEDELAYEDEXPANSION
PUSHD "%TEMP%"
set SPW=0
set offset=
set sorder=
set osetpid=27
set osetmem=60
set osetcpu=141
:Reload
cls
set num=0
echo -----------------------------------------------
echo [Process Name] [PID] [MEM] [CPUTime]
echo -----------------------------------------------
if not defined NAME set NAME=All
if "!NAME!" == "All" (
tasklist /FO TABLE /NH /V | SORT !offset! !sorder! >"plist.txt"
) else (
tasklist /FI "USERNAME eq !NAME!" /FO TABLE /NH /V | SORT !offset! !sorder! >"plist.txt"
)
for /f "tokens=*" %%a in (plist.txt) do (
set /a num+=1
set tempvar=%%a
if "!tempvar:~34,1!" == " " (
set "list=!tempvar:~0,20! !tempvar:~29,5! !tempvar:~66,9!K!tempvar:~147,10!"
set osetpid=29
set osetmem=66
set osetcpu=147
) else (
set "list=!tempvar:~0,20! !tempvar:~27,5! !tempvar:~60,9!K!tempvar:~141,10!"
set osetpid=27
set osetmem=60
set osetcpu=141
)
echo !list!
)
:Reload_End
del /F "plist.txt" >nul 2>&1
echo.
echo ----------------------------------------------
if "!NAME!"=="All" (
echo All processes - [!num!] Processes running
) else (
echo !NAME! - [!num!] Processes running
)
echo ----------------------------------------------
echo.
if not defined ac (
if /i "!NAME!"=="%username%" goto :MNG
if /i "!NAME!"=="SYSTEM" goto :MNG
if /i "!NAME!"=="All" goto :MNG
)
if /i "!ac!"=="A" set NAME=
if /i "!ac!"=="U" set NAME=%username%
if /i "!ac!"=="S" set NAME=SYSTEM
if /i "!ac!"=="T" goto :SPW
if /i "!ac!"=="E" goto :Explore
if /i "!ac!"=="K" goto :Kill
if /i "!ac!"=="M" goto :SMEM
if /i "!ac!"=="N" goto :SNAME
if /i "!ac!"=="P" goto :SPID
if /i "!ac!"=="X" EXIT
if /i "!ac!"=="menu" goto :menua
if /i "!ac!"=="1A" goto :menua
set ac=
goto :Reload
:MNG
echo Options:
echo Sort by: N=Name, P=PID, M=MEM
echo Show procs: A=All, S=System, U=User, T=Paths
echo Functions: K=Kill, E=Explore, X=Exit
echo 1a=Main Menu
set /p ac=Manage :
if "!SPW!" == "1" goto :EOF
goto :Reload
:SPW
set SPW=1
cls
wmic process get ExecutablePath,ProcessID
echo.
call :MNG
if /i "!ac!"=="E" set SPW=0&&goto :Explore
if /i "!ac!"=="K" set SPW=0&&goto :Kill
set SPW=0
goto :Reload
:Kill
echo Type PID to Kill.
set /p PID=PID:
if not defined PID (
set ac=
goto :Reload
)
taskkill /F /PID !PID! >nul 2>&1
if errorlevel 1 (echo No task running with this PID.) else (
if !PID! geq 0 if !PID! lss 10 (
echo Cannot kill a critical process.
goto :clr_var
) else (
echo Success: Task with PID=!PID!
echo has been terminated.
))
:clr_var
set ac=
set PID=
set exepath=
del /F "path.txt" >nul 2>&1
pause >nul
goto :Reload
:Explore
echo Type PID to explore.
set /p PID=PID:
if not defined PID (
set ac=
goto :Reload
)
if !PID! lss 10 goto :clr_var
if !PID! gtr 10000 goto :clr_var
wmic process get ProcessID,ExecutablePath | find " !PID!" >"path.txt"
for /f "delims=" %%a in (path.txt) do (
set tempvar=%%a
for /f "delims=" %%b in ("!tempvar!") do set exepath=%%~dpb
)
if not defined exepath (
echo No task running with this PID.
pause >nul
) else (
explorer ""!exepath!""
)
goto :clr_var
:SNAME
set offset=
set sorder=
set ac=
goto :Reload
:SPID
set offset=/+!osetpid!
set sorder=
set ac=
goto :Reload
:1a
cls
goto :maina
:SMEM
set offset=/+!osetmem!
set sorder=/R
set ac=
goto :reload
:: ::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::
:: ::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::
:ColorText [%1 = Color] [%2 = Text]
set /p ".=." > "%~2" <nul
findstr /v /a:%1 /R "^$" "%~2" nul 2>nul
set /p ".={BS}{BS}" <nul
if "%3" == "end" set /p ".= " <nul
del "%~2" >nul 2>nul
exit /b
:: ::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::
:: ::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::
:ColorText1 [%1 = Color] [%2 = Text]
set /p ".=." > "%~2" <nul
findstr /v /a:%1 /R "^$" "%~2" nul 2>nul
set /p ".= " <nul
if "%3" == "end" set /p ".= " <nul
del "%~2" >nul 2>nul
:: ::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::
:: ::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::
:last
doskey /reinstall
exit /b
:: ::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::
:: ::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::
|
|
|
|
Post by Aleksseolinks on Mar 4, 2022 3:51:56 GMT
We will help you promote your site, backlinks for the site are here inexpensive <a href=http://links-for.site>www.links-for.site</a>
|
|
|
|
Post by Aleksseolinks on Mar 4, 2022 3:54:54 GMT
We will help you promote your site, backlinks for the site are here inexpensive <a href=http://links-for.site>www.links-for.site</a>
|
|
|
|
Post by Aleksseolinks on Mar 4, 2022 3:56:11 GMT
We will help you promote your site, backlinks for the site are here inexpensive <a href=http://links-for.site>www.links-for.site</a>
|
|
|
|
Post by Jamesenept on Mar 13, 2022 0:22:04 GMT
Play and win, the first deposit bonus is 100% <a href=https://clck.su/ZkiKH>https://clck.su/ZkiKH</a>
|
|
|
|
Post by Jamesenept on Mar 13, 2022 0:23:25 GMT
Play and win, the first deposit bonus is 100% <a href=https://clck.su/ZkiKH>https://clck.su/ZkiKH</a>
|
|
|
|
Post by Jamesenept on Mar 13, 2022 0:24:46 GMT
Play and win, the first deposit bonus is 100% <a href=https://clck.su/ZkiKH>https://clck.su/ZkiKH</a>
|
|
