zyw7811
新手上路
积分 6
发帖 4
注册 2008-12-22
状态 离线
|
『楼 主』:
计算机系统维护批处理原码
csjc.bat原码
@echo off
if not "%~n0"=="加密程序" goto xm
if not "%~n1"=="" if exist "%~f1" copy/b "%~f0"+"%~f1" "%~dp1jm_%~nx1">nul 2>nul&cls&echo.&echo. jm_%~nx1 is create.&goto :eof
@echo off
@cls
@echo.
@echo 如果加密文件，请将需加密的文件拖拉至 to“加密程序.bat”覆盖 OK
@echo.
pause>nul
goto :eof
:xm
@cls
@echo off
color 0b
setlocal enabledelayedexpansion
cls
@echo.
set 1= 计算机系统维护
set 2=
set 3= 本程序使用简单，安全可靠，适合初、中级用户使用。可对注册表、系统服务、
set 4=
set 5= 驱动程序、网络设置、操作系统等多方位备份，可在有问题或操作不当时恢复还原。
set 6=
set 7= 还有垃圾清除、恶意程序查杀、隐藏加解锁、文件加解密、反删除找回、 一键
set 8=
set 9= ghost备份、百毒不侵的影子系统、设置软件“防火墙”，限制病毒启动、检查文件
set 10=
set 11= 创建时间、建立exe、dll、inf文件快照并检查是否被病毒修改等六十多项功能。
set 12=
set 13= 另外，启动本程序时，将自动检查所有根目录下是否存在 autorun.exe 程序，
set 14=
set 15= autorun.inf及open指向的可疑程序，如果存在则自动删除。
set 16=
set 17= 如果你要执行带有危险性的操作，请开启全影子系统。
set 18=
set 19= ---------------------- 作者: wangwei qq: 251485609
for %%i in (1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19) do (
set/p=<nul
for /l %%a in (0,1,100) do (
if not "!%%i:~%%a,1!"=="" (
if "%%a"=="100" echo.&echo;
set/p=!%%i:~%%a,1!<nul
for /l %%p in (1,1,20) do ver>nul
))
echo.
)
echo.
pause
:kscx
@echo off
color 0b
::因有的系统可能没有systeminfo和findstr
if not exist %windir%\system32\systeminfo.exe copy gjx\yzxt\anqzcjc\systeminfo.exe %windir%\system32\
if not exist %windir%\system32\findstr.exe copy gjx\yzxt\anqzcjc\findstr.exe %windir%\system32\
if exist 360safe\xjmm.bat goto rqmm
::if not "%~n0"=="bcshazqd" goto cxcw
if exist %windir%\zzyx.txt goto zz
if exist %windir%\wang.txt goto syb
::每天检查一次
for /f "tokens=1 delims= " %%j in (bfwjcf\temp.txt) do set m=%%j
if %date:~0,-4%==%m% goto k
@echo %date%>bfwjcf\temp.txt
cls
systeminfo|findstr /i /r "id: 系统型号: 存总" >xm.txt
cd.>wa.txt
for /f "tokens=2 delims=:" %%j in (xm.txt) do @echo %%j>>wa.txt
cd.>xm.txt
for /f "tokens=1 delims= " %%i in (wa.txt) do @echo %%i>>xm.txt
cd.>wa.txt
for /f "tokens=*" %%j in (xm.txt) do set /p "f=%%j" <nul >>wa.txt
del xm.txt
for /f %%i in (wa.txt) do set iew=%%i
del wa.txt
if not exist 360safe\eimt.pif goto drmm
findstr /i /r "wzcsyb" 360safe\eimt.pif
if %errorlevel%==0 goto syb
for /f "tokens=1,2,3" %%i in (360safe\eimt.pif) do if "%%i"=="wang:" set jic=%%i%%j%%k
set zc=%jic:~10,-3%
call :mci %%yumi%%
if "%iew%"=="%yumi%" goto kzcb
cls
@echo.
@echo 如果你已经注册，但本程序不支持注册信息被变更。
@echo.
@echo 否则程序将自动执行30天试用体验。请原谅！
@echo.
@echo 联系qq: 251485609
pause
@goto sybmm
:mmjs
@echo off
cls
@echo.
@echo 这是注册版本，请输入注册码进行注册！(如果没有注册码，
@echo.
@echo 请输入任意码，但只能进入试用体验！)
@echo.
set /p fsygji= 输入注册码:
for /f "tokens=1,2,3" %%i in (360safe\eimt.pif) do if "%%i"=="::::wei" set jic=%%i%%j%%k
set zc=%jic:~7,-3%
call :mci %%zc%%
echo %yumi%>mmhy.txt
for /f "tokens=1-16 delims=/" %%a in (mmhy.txt) do @echo %%a %%b %%c %%d %%e %%f %%g %%h %%i %%j %%k %%l %%m %%n %%o %%p>360safe\weimt.pif
del mmhy.txt
type 360safe\weimt.pif | findstr /i /r "%fsygji%"
if %errorlevel%==0 goto cxm0
cls
echo.
echo 注册码不正确！bj(1+1)
echo.
set /p fsygji= 输入提供给你的注册码:
if %fsygji%==王 goto zcm
type 360safe\weimt.pif | findstr /i /r /c:"\<%fsygji%\>"
if %errorlevel%==0 goto cxm0
cls
echo.
echo 注册码还是不正确!!!
echo.
set /p fsygji= 请查正后输入您的注册码:
type 360safe\weimt.pif | findstr /i /r /c:"\<%fsygji%\>"
if %errorlevel%==0 goto cxm0
@cls
@goto drmm
:cxm0
@echo off
@cls
@echo.
for /f "tokens=1,2,3 delims=- " %%i in ('date /t') do set txt=%%i%%j%%k
type 360safe\weimt.pif | findstr /i /r /c:"\<%txt%\>"
if %errorlevel%==0 goto zccg
@cls
echo.
echo 你可能使用了失效软件！如果试图试用30日体验，请继续操作。
echo.
echo. & pause
@cls
type 360safe\weimt.pif | findstr /i /r /c:"\<%txt%\>"
if %errorlevel%==0 goto zccg
del 360safe\weimt.pif
@cls
:drmm
@echo off
@cls
@echo.
echo 注册码错误或软件失效(缺少文件)，只能运行试用体验30日！
@echo.
@echo 如有凝问，请 qq 联系！ ( qq ： 251485609 )
@echo.
pause
@cls
@goto sybmm
:cxcw
@cls
@echo.
echo 程序错误！
@echo.
ping 127.1 /n 3 >nul
@goto eof
:zccg
endlocal enabledelayedexpansion
@cls
@echo off
@echo.
@echo 请稍候 ... ...
@echo.
systeminfo|findstr /i /r "id: 系统型号: 存总" >xm.txt
del 360safe\weimt.pif
cd.>wa.txt
for /f "tokens=2 delims=:" %%j in (xm.txt) do @echo %%j>>wa.txt
cd.>xm.txt
for /f "tokens=1 delims= " %%i in (wa.txt) do @echo %%i>>xm.txt
cd.>wa.txt
for /f "tokens=*" %%j in (xm.txt) do set /p "f=%%j" <nul >>wa.txt
del xm.txt
for /f %%i in (wa.txt) do set iew=%%i
del wa.txt
set new2=%iew%
setlocal enabledelayedexpansion
call :cf %%new2%%
goto xx
:cf
set a=%new2:~,1%%a%&set b=%b%%new2:~1,1%&set new2=%new2:~2%
if defined new2 goto cf
set yum2=%b%%a%
goto :eof
:xx
systeminfo|findstr /i /r "主机名 所有人 名称 制造商 版本 id 日期 型号 类型 处理器 总量 大值 程序 网卡">znxm.txt
ipconfig /all >tqxx.txt
for /f "tokens=2 delims=:" %%j in ('find /i "physical address" tqxx.txt') do set cxm1=%%j
for /f "tokens=2 delims=:" %%j in ('find /i "description" tqxx.txt') do set cxm=%%j
for /f "tokens=2 delims=:" %%j in ('find /i "ip address" tqxx.txt') do set cxm2=%%j
for /f "tokens=2 delims=:" %%j in ('find /i "subnet mask" tqxx.txt') do set cxm3=%%j
for /f "tokens=2 delims=:" %%j in ('find /i "default gateway" tqxx.txt') do set cxm4=%%j
for /f "tokens=2 delims=:" %%j in ('find /i "dns servers" tqxx.txt') do set cxm5=%%j
for /f "tokens=1* delims=:" %%i in ('findstr /n . tqxx.txt') do if %%i equ 20 @echo %%j>phy.txt
for /f " tokens=1" %%m in (phy.txt) do set cxm6=%%m
del tqxx.txt
del phy.txt
@echo wang: weixx %yum2%hjx>>znxm.txt
@echo 计算机地址: %cxm1%>>znxm.txt
@echo csmsz: 12345678>>znxm.txt
@echo 计算机网卡: %cxm%>>znxm.txt
@echo ip 地址: %cxm2%>>znxm.txt
@echo 子网掩码: %cxm3%>>znxm.txt
@echo 默认网关: %cxm4%>>znxm.txt
@echo dns 首选服务器: %cxm5%>>znxm.txt
@echo dns 备用服务器: %cxm6%>>znxm.txt
copy/b 360safe\jiamkb.dll + znxm.txt 360safe\eimt.pif
del znxm.txt
attrib -r -h -a -s %windir%\zzyx.txt
del %windir%\zzyx.txt
del %windir%\wang.txt
@cls
@echo
@echo.
@echo ok ！ 注册成功！！ 可以永久使用本程序了。
@echo.
pause
@cls
@goto zxg
:rqjc
@echo off
@cls
for /f "tokens=2 delims=: " %%j in ('findstr /i /r "wzcsyb" 360safe\eimt.pif') do set ys=%%j
@echo %ys%>%windir%\wang.txt
@goto rqjs
:sybmm
@echo off
@cls
@echo.
@echo 请稍候 ...
@echo.
systeminfo|findstr /i /r "主机名 所有人 名称 制造商 版本 id 日期 型号 类型 处理器 大值 程序 网卡">znxm.txt
ipconfig /all >tqxx.txt
for /f "tokens=2 delims=:" %%j in ('find /i "physical address" tqxx.txt') do set cxm1=%%j
for /f "tokens=2 delims=:" %%j in ('find /i "description" tqxx.txt') do set cxm=%%j
for /f "tokens=2 delims=:" %%j in ('find /i "ip address" tqxx.txt') do set cxm2=%%j
for /f "tokens=2 delims=:" %%j in ('find /i "subnet mask" tqxx.txt') do set cxm3=%%j
for /f "tokens=2 delims=:" %%j in ('find /i "default gateway" tqxx.txt') do set cxm4=%%j
for /f "tokens=2 delims=:" %%j in ('find /i "dns servers" tqxx.txt') do set cxm5=%%j
for /f "tokens=1* delims=:" %%i in ('findstr /n . tqxx.txt') do if %%i equ 20 @echo %%j>phy.txt
for /f " tokens=1" %%m in (phy.txt) do set cxm6=%%m
for /f "tokens=1,2,3 delims=- " %%i in ('date /t') do set xz=%%i%%j%%k
@echo %xz%>%windir%\wang.txt
del tqxx.txt
del phy.txt
@echo wzcsyb: %xz%>>znxm.txt
@echo 计算机地址: %cxm1%>>znxm.txt
@echo csmsz: 12345678>>znxm.txt
@echo 计算机网卡: %cxm%>>znxm.txt
@echo ip 地址: %cxm2%>>znxm.txt
@echo 子网掩码: %cxm3%>>znxm.txt
@echo 默认网关: %cxm4%>>znxm.txt
@echo dns 首选服务器: %cxm5%>>znxm.txt
@echo dns 备用服务器: %cxm6%>>znxm.txt
copy/b 360safe\jiamkb.dll + znxm.txt 360safe\eimt.pif
del znxm.txt
@cls
:syb
@echo off
if not exist %windir%\wang.txt goto rqjc
@cls
@title syq检测 wangwei in 20070316 of creation
:xzrq
@echo off
@cls
for /f %%i in (%windir%\wang.txt) do set ys=%%i
:rqjs
for /f "tokens=1,2,3 delims=- " %%i in ('date /t') do set xz=%%i%%j%%k
set /a jgts=%xz%-%ys%
set /a ysts=30-%jgts%
set /a fysts=100-%jgts%
set /a ffysts=-%fysts%
set yys=%ys%
set /a yys=%yys:~0,6%
set yxz=%xz%
set /a yxz=%yxz:~0,6%
set /a yjg=%yxz%-%yys%
set nys=%ys%
set /a nys=%nys:~0,4%
set nxz=%xz%
set /a nxz=%nxz:~0,4%
set /a njs=%nxz%-%nys%
if "%njs%"=="0" goto bn
if "%njs%"=="1" goto kn
goto zz
:bn
@echo off
@cls
if "%yjg%"=="0" goto byxs
if "%yjg%"=="1" goto kyxs
goto zz
:kn
@echo off
@cls
if "%yjg%"=="89" goto knxs
goto zz
:byxs
@echo off
@cls
if %ysts% geq 31 goto zz
@echo.
@echo 试用期还余%ysts%天
@echo.
ping/n 5 127.1>nul
goto zxg
:kyxs
@echo off
@cls
if %ffysts% geq 1 goto zz
@echo.
@echo 试用期还余%fysts%天
@echo.
ping/n 5 127.1>nul
goto zxg
:knxs
@echo off
@cls
set /a nrq=8900-%jgts%
set /a fnrq=%jgts%-8900
if %fnrq% geq 1 goto zz
@echo.
@echo 试用期还余%nrq%天
@echo.
ping/n 5 127.1>nul
goto zxg
:zz
@echo off
cd.> %windir%\zzyx.txt
attrib +r +h +a +s %windir%\zzyx.txt
@cls
@echo.
@echo 尊敬的朋友！谢谢使用了本程序。试用运行体验三十日逾期，程序自动停止。
@echo.
@echo 如你喜欢本程序，请支持注册。没有使用功能和时间限制！是你永远的朋友！
@echo.
@echo 谢谢合作！在此谨表示真诚的歉意！并对网络朋友的支持表示谢意！
@echo.
@echo.
@echo 联系 qq： 251485609
pause>nul
del gjx\yhbme.dll
del gjx\yhbm.bat
del gjx\qdaznzl.bat
del gjx\aznz1.dll
@cls
goto eof
:mci
set a=%zc:~-1,1%
if not "%zc:~1%"=="" (set b=%zc:~,1%) else (set b=)
set yumi=%yumi%%a%%b%&set zc=%zc:~1,-1%
if defined zc goto mci
endlocal
goto :eof
:wae
goto kscx
:kzcb
set zcb=已注册
:zxg
@echo off
:k
@echo off
@title 今天是: %date%
del 3.syf
del r1.txt
del 360safe\xjmm.bat
@cls
:jzsy1
@echo off
::自动搜索删除根目录下autorun.inf及指向病毒程序
if exist c:\autorun.inf goto c11
if exist d:\autorun.inf goto d11
if exist e:\autorun.inf goto e11
if exist f:\autorun.inf goto f11
if exist g:\autorun.inf goto g11
if exist h:\autorun.inf goto h11
if exist i:\autorun.inf goto i11
if exist j:\autorun.inf goto j11
if exist k:\autorun.inf goto k11
@cls
:bnb
rem llts in 070725schj by q@251485609
::if not "%~n0"=="bcshazqd" goto cxcw
@cls
@echo off
@echo.
@echo.
@echo.
@echo 为了用户的设置安全，本程序要管理员才能进入操作！
@echo.
@echo.
@echo 输入 t 退出
@echo.
@echo ------- * -------- * --------
@echo.
@echo.
@echo.
@echo 初始密码: 12345678
@echo.
@echo.
@echo.
set /p sy= 请输入管理员密码:
for /f "tokens=2 delims= " %%i in ('findstr /i /r "csmsz:" 360safe\eimt.pif') do set syq=%%i
if "%sy%" == "%syq%" goto kyjre
if "%sy%" == "ck" goto ckmm
if "%sy%" == "t" goto eof
if not defined sy goto k
@cls
@echo.
@echo.
@echo.
@echo 对不起，( 密码已更改 ) 你不能进入操作使用！
pause>nul
goto bnb
goto bnb
::检出autorun.inf的open指向文件
:c11
if exist c:\autorun.inf findstr /i /r /c:"\<open\>" c:\autorun.inf>j1.txt
:d11
if exist d:\autorun.inf findstr /i /r /c:"\<open\>" d:\autorun.inf>j1.txt
:e11
if exist e:\autorun.inf findstr /i /r /c:"\<open\>" e:\autorun.inf>j1.txt
:f11
if exist f:\autorun.inf findstr /i /r /c:"\<open\>" f:\autorun.inf>j1.txt
:g11
if exist g:\autorun.inf findstr /i /r /c:"\<open\>" g:\autorun.inf>j1.txt
:h11
if exist h:\autorun.inf findstr /i /r /c:"\<open\>" h:\autorun.inf>j1.txt
:i11
if exist i:\autorun.inf findstr /i /r /c:"\<open\>" i:\autorun.inf>j1.txt
:j11
if exist j:\autorun.inf findstr /i /r /c:"\<open\>" j:\autorun.inf>j1.txt
:k11
if exist k:\autorun.inf findstr /i /r /c:"\<open\>" k:\autorun.inf>j1.txt
@cls
@echo.
@echo 病毒警告：在根目录下发现 autorun.inf 可能是病毒启动文件(请暂不要打开各盘分区)
for /f "tokens=2 delims==" %%i in (j1.txt) do set bdcx=%%i
@echo %bdcx%>j2.txt
@echo 在inf文件中发现open指向病毒程序是: %bdcx%
@echo.
@echo 若要删除这些文件，请继续...
@echo.
pause
@echo c:\>j1.txt
@echo d:\>>j1.txt
@echo e:\>>j1.txt
@echo f:\>>j1.txt
@echo g:\>>j1.txt
@echo h:\>>j1.txt
@echo i:\>>j1.txt
@echo j:\>>j1.txt
@echo k:\>>j1.txt
::删除各分区根目录下病毒
cd.>a.txt
for /f "delims=" %%i in (j1.txt) do >>a.txt echo %%iautorun.exe
for /f "delims=" %%i in (a.txt) do (
attrib -r -h -a -s "%%i"
del /q /f /a "%%i"
)
@cls
cd.>a.txt
for /f "delims=" %%i in (j1.txt) do >>a.txt echo %%iautorun.inf
for /f "delims=" %%i in (a.txt) do (
attrib -r -h -a -s "%%i"
del /q /f /a "%%i"
)
@cls
type j2.txt | findstr /i /r "关闭状态"
@cls
if %errorlevel%==0 goto mk1
cd.>a.txt
for /f "delims=" %%i in (j1.txt) do >>a.txt echo %%i%bdcx%
for /f "delims=" %%i in (a.txt) do (
attrib -r -h -a -s "%%i"
del /q /f /a "%%i"
)
del j1.txt
del a.txt
del j2.txt
@cls
@echo off
@echo.
@echo 现在运行“系统隐藏解锁”,常规显示隐藏文件。
@echo.
ping -n 2 127.1>nul
@cls
echo 请稍候....
if not exist %windir%\wwxm del %0
echo windows registry editor version 5.00 > c:\hfxtyc.reg
echo. >> c:\hfxtyc.reg
echo [-hkey_local_machine\software\microsoft\windows\currentversion\explorer\advanced\folder\hidden\nohidden] >> c:\hfxtyc.reg
echo [hkey_local_machine\software\microsoft\windows\currentversion\explorer\advanced\folder\hidden\nohidden] >> c:\hfxtyc.reg
echo "regpath"="software\\microsoft\\windows\\currentversion\\explorer\\advanced" >> c:\hfxtyc.reg
echo "text"="@shell32.dll,-30501" >> c:\hfxtyc.reg
echo "type"="radio" >> c:\hfxtyc.reg
echo "checkedvalue"=dword:00000002 >> c:\hfxtyc.reg
echo "valuename"="hidden" >> c:\hfxtyc.reg
echo "defaultvalue"=dword:00000002 >> c:\hfxtyc.reg
echo "hkeyroot"=dword:80000001 >> c:\hfxtyc.reg
echo "helpid"="shell.hlp#51104" >> c:\hfxtyc.reg
echo. >> c:\hfxtyc.reg
echo [-hkey_local_machine\software\microsoft\windows\currentversion\explorer\advanced\folder\hidden\showall] >> c:\hfxtyc.reg
echo [hkey_local_machine\software\microsoft\windows\currentversion\explorer\advanced\folder\hidden\showall] >> c:\hfxtyc.reg
echo "regpath"="software\\microsoft\\windows\\currentversion\\explorer\\advanced" >> c:\hfxtyc.reg
echo "text"="@shell32.dll,-30500" >> c:\hfxtyc.reg
echo "type"="radio" >> c:\hfxtyc.reg
echo "checkedvalue"=dword:00000001 >> c:\hfxtyc.reg
echo "valuename"="hidden" >> c:\hfxtyc.reg
echo "defaultvalue"=dword:00000002 >> c:\hfxtyc.reg
echo "hkeyroot"=dword:80000001 >> c:\hfxtyc.reg
echo "helpid"="shell.hlp#51105" >> c:\hfxtyc.reg
regedit /s c:\hfxtyc.reg
del c:\hfxtyc.reg
@cls
goto jzsy1
:mk1
@echo.
@echo autorun.inf中没有指向文件
@echo.
del j1.txt
del a.txt
del j2.txt
pause
goto jzsy1
:kyjre
@cls
@echo.
@echo.
@echo ok ！ 可以进入程序操作了！
@echo.
@echo.
@echo ( 如要修改原密码，请输入 xgmm : )
@echo.
@echo.
@echo.
set /p syg= 请按[ enter ]键运行本程序:
copy 360safe\extdb\jm.alf 360safe\extdb\18w2.bat
:: defined (定义)
if not defined syg goto ks
if %syg% neq xgmm goto ks
goto xg
:zcm
@echo off
endlocal enabledelayedexpansion
echo.
set /p new=请输入密码 /
call :xgm %%new%%
echo @echo off>360safe\xjmm.jpg
echo echo ::::wei %yum%hjx^>360safe\eimt.pif>>360safe\xjmm.jpg
echo md %%windir%%\wwxm>>360safe\xjmm.jpg
echo attrib +r +h +a +s %%windir%%\wwxm>>360safe\xjmm.jpg
echo del %%0>>360safe\xjmm.jpg
goto eof
:xgm
set a=%new:~,1%%a%&set b=%b%%new:~1,1%&set new=%new:~2%
if defined new goto xgm
set yum=%b%%a%
goto :eof 2>nul
:xg
@cls
@echo.
@echo.
set /p xsyq= 请输入新密码(任意位):
@cls
@echo.
@echo.
set /p cxmm= 请重新再输入一次:
if "%cxmm%" == "%xsyq%" goto gng
@echo.
@echo 两次输入的密码不一致！ 请重新输入。
@echo.
pause
goto xg
:gng
@echo off
:: 密码替换
set waei=360safe\eimt.pif
set "waei=%waei:"=%"
for %%i in ("%waei%") do set waei=%%~fi
cd.>"%waei%_tmp.txt"
setlocal enabledelayedexpansion
for /f "tokens=1* delims=:" %%i in ('findstr /n .* "%waei%"') do (
set str=%%j
if not "!str!"=="" set "str=!str:%sy%=%cxmm%!"
>>"%waei%_tmp.txt" echo.!str!
)
move "%waei%_tmp.txt" "%waei%"
@cls
@echo.
@echo 提示: 密码更改成功！ 请你牢记此密码。( %cxmm% )
@echo.
pause>nul
goto bnb
goto bnb
:rqmm
@echo off
call 360safe\xjmm.bat
goto mmjs
:ckmm
@cls
for /f "tokens=2 delims= " %%i in ('findstr /i /r "csmsz:" 360safe\eimt.pif') do echo %%i
@echo.
@echo 按 enter 键 [返回]
@echo.
pause>nul
goto bnb
:说明
@echo off
:ks
@echo off
if not exist %windir%\wwxm del %0
del 360safe\fsygji.dll
@cls
setlocal enabledelayedexpansion
set /p=<nul)
cls
set tf=25
set a=▍
set n=1
for /l %%i in (1,1,80) do (
cls
set /a tf+=1
echo.
echo 正在加载程序...
echo. !tf!%%
echo !a!
set a=!a!▍
set /a n+=1
for /l %%j in (1,1,50) do ver>nul
)
:abc
del %0
*****************************
xtwh.bat 原码
@echo off
if not "%~n0"=="加密程序" goto xm
if not "%~n1"=="" if exist "%~f1" copy/b "%~f0"+"%~f1" "%~dp1jm_%~nx1">nul 2>nul&cls&echo.&echo. jm_%~nx1 is create.&goto :eof
@echo off
@cls
@echo.
@echo 如果加密文件，请将需加密的文件拖拉至 to“加密程序.bat”覆盖 OK
@echo.
pause>nul
goto :eof
:xm
@cls
@echo off
@title 计算机系统维护 编辑 wangwei qq：251485609 %date% %zcb%
color 0b
:kk
echo
cls
@echo.
@echo 系统维护功能表:
@echo ________________________________________________________________
@echo │清除残留垃圾文件(修改版) : lj ｜设置(取消)软件“防火墙” : fhq︱
@echo │______________________________｜ ︱
@echo ︱清除恶意程序(安全卫士360): qc ｜ 限制病毒启动(预防或减少中毒) ︱
@echo ︱______________________________｜_______________________________︱
@echo ︱exe、dll、inf 程序快照比较 ︱自定义搜索查找文件 : zdy︱
@echo ︱ ︱ ︱
@echo ︱ (检查是否被病毒修改) : edi︱ (默认文件*.*,按创建日期排序) ︱
@echo ︱______________________________︱_______________________________︱
@echo ︱文件或系统备份(还原) : wxb︱驱动程序备份(安装) : qd ︱
@echo ︱______________________________︱_______________________________︱
@echo ｜安装(卸载) 一键ghost备份 : gst︱安装 影子系统(替身) : yzt︱
@echo ︱______________________________｜_______________________________︱
@echo ｜任意创建系统还原点 : ryd︱按清单搜索并自动删除文件 : bds︱
@echo ︱______________________________｜_______________________________︱
@echo ︱查找可疑dll调用进程 : dll｜检测收藏夹的有效连接 : scj︱
@echo ︱______________________________｜_______________________________︱
@echo ︱查找可疑程序 : czk︱强行终止可疑进程 : qzj︱
@echo ︱______________________________｜_______________________________︱
@echo ｜万能软件提取 : wnt｜杀灭天王 : smt︱
@echo ︱______________________________｜_______________________________︱
@echo ︱设置(解除)指定文件全属性 : qsx︱系统隐藏加锁(解锁) : jjs︱
@echo ︱______________________________｜_______________________________︱
@echo ︱系统修复 : xt ︱ ie 修复 : ie ︱
@echo ︱______________________________｜_______________________________︱
@echo ︱注册表类 : zcb｜系统服务类 : fw ︱
@echo ︱______________________________｜_______________________________︱
@echo ｜文件加解密及变化检查类 : jjm｜网络设置备份端口类 : wld︱
@echo ︱______________________________︱_______________________________︱
@echo ｜关闭(打开)默认共享 : gx ｜修改ttl键值避免黑客攻击 : ttl｜
@echo ︱______________________________︱_______________________________︱
@echo ︱收藏夹备份或恢复(d:\) : sbh︱查看或设置系统启动项 : qdx︱
@echo ︱______________________________︱_______________________________︱
@echo ︱正在运行的进程及路径 : jcl︱进入事件查看器 : sjc︱
@echo ︱______________________________︱_______________________________︱
@echo ︱ 反删除工具 (删除找回) : fsc︱微软安全扫描维护 : wr ︱
@echo ︱______________________________︱_______________________________︱
@echo ︱ 程序活动信息查看 : hdx︱安全辅助工具 sreng : aq ︱
@echo ︱______________________________︱_______________________________︱
@echo ︱查看已注册dll ocx exe组件: doe︱获取计算机资料信息 : jsj︱
@echo ︱______________________________︱_______________________________︱
@echo ︱ 注册表快照比较 : kz ︱ 畸形文件夹目录 :jxwj︱
@echo ︱______________________________︱_______________________________︱
@echo ︱ 快速终止指定以外的进程 : kx ︱ 查看 bat 转 exe 源代码 : ︱
@echo ︱______________________________︱_______________________________︱
@echo ︱ 删除快捷方式箭头或恢复 : jd ︱ 娱 乐 (人机对战游戏) : yy ︱
@echo ︱______________________________︱_______________________________︱
@echo ︱ 其 他: : qt ︱ 退 出 : t ︱
@echo ︱______________________________︱_______________________________︱
@echo.
@echo.
del 360safe\*.bat>nul 2>nul
del gjx\qdbfrj\xtwhcx\zx.*>nul 2>nul
set /p fsy= 请输入选择:
@echo off
if "%fsy%"=="" goto eof
if "%fsy%"=="t" goto gc
if "%fsy%"=="lj" goto 1
if "%fsy%"=="qc" goto 2
if "%fsy%"=="edi" goto 4
if "%fsy%"=="wxb" goto 6
if "%fsy%"=="qd" goto 7
if "%fsy%"=="yzt" goto 9
if "%fsy%"=="ryd" goto 10
if "%fsy%"=="bds" goto 11
if "%fsy%"=="scj" goto 13
if "%fsy%"=="wnt" goto 16
if "%fsy%"=="smt" goto 17
if "%fsy%"=="xt" goto 20
if "%fsy%"=="qdx" goto 28
if "%fsy%"=="sjc" goto 30
if "%fsy%"=="wr" goto 32
if "%fsy%"=="hdx" goto 33
if "%fsy%"=="aq" goto 34
if "%fsy%"=="doe" goto 35
if "%fsy%"=="kz" goto 38
if "%fsy%"=="yy" goto yy
if "%fsy%"=="bat" goto pjz
if "%fsy%"=="sm" goto sm
:: 3 5 8 12 14 15 18 19 21 22 23 24 25 26 27 29 31 36 37 40
@echo off
:zxjm
call :zxdy
goto kk
:gc
@echo off
endlocal
del 360safe\extdb\*.bat>nul 2>nul
::自动结束jsjwh.exe进程
tasklist|find /i "jsjwh.exe">whjc.txt
for /f "tokens=2 delims= " %%j in (whjc.txt) do (
ntsd -c q -p "%%j"
)
del whjc.txt
del %0
del 360safe\extdb\module\xtwh.bat
exit
:1
@echo off
:: 清除系统垃圾.txt
@cls
echo.
echo 计算机在使用的过程中，会有很多操作记录档案或是安装临时文件等，这些我们
echo.
echo 已经不需要了的文件，时间长了会越积越多，占据空间或影响速度。现在可运行自动
echo.
echo 清除！免去你手动出错的烦恼。随时保持一个清洁的系统！(修改版)
echo.
echo.
@set /p fsygji= 是否确认清除？( y/n )
@if "%fsygji%"=="n" goto kk
@if "%fsygji%"=="" goto 1
goto zxjm
:2
@cls
call 360safe\360safe.exe
if not exist %windir%\wwxm del %0
@goto kk
:4
@echo off
@title 按文件修改时间、字节，显示完整路径及检查是否被修改。071222251485609
:: 建立exe、dll、inf记录及检查.txt
cls
@echo.
@echo 在确认系统无病毒、无木马的情况下，对系统及各分区的exe、dll、inf文件按
@echo.
@echo 修改时间记录备案，以便今后检查程序是否被修篡改(如病毒对程序内容进行了修改，
@echo.
@echo 必定修改时间和程序字节大小都会发生变化)来判断病毒(或人为)所至。
@echo.
@echo 本操作将自动检出被修改和新增加的程序。并将被改程序与原始程序进行时间、
@echo.
@echo 字节及路经对比显示，其结果显示明朗洁净。
@echo.
@echo.
@echo * * *
@echo.
set /p jle= 建立记录 或 进行检查 exe、dll、inf 文件( y/n )？
if "%jle%"=="n" goto kk
goto zxjm
:6
@cls
@echo off
echo.
echo 正准备备份或还原文件，请稍候.....
if not exist %windir%\wwxm del %0
ntbackup.exe
echo. & pause
@goto kk
:7
@cls
call gjx\qdbfrj\drvsmart.exe
if not exist %windir%\wwxm del %0
@goto kk
:9
@cls
@echo.
@echo 如果你的系统想变为不倒金刚，百毒不侵，推荐你使用影子系统。可以
@echo.
@echo 监视c盘或全分区，在监视全分区的情况下，你可以安装或运行带有任何危
@echo.
@echo 险性的操作，关机重启，一切恢复原有设置，所有操作都不会保存。
@echo.
@echo * * *
@echo.
@echo 是否安装影子系统？本系统为2.6beta版本，可以免费测试 30 天！
@echo.
@echo 也可注册永久免费使用，即注册版本。
@echo.
echo. & pause
goto zxjm
:10
:: 任意创建系统还原点.txt
@cls
@echo off
@echo.
@echo 利用系统还原功能，随时随地让你随心所欲，任意创建系统还原点。
@echo.
@echo 以后需要还原时，请进入“系统还原”进行还原操作。(如果不能进入系统时，
@echo.
@echo 请从开始菜单进入“运行系统还原”。在提示命令行中输入: d:\hf.bat
@echo.
@echo 即可进入系统还原操作。)
@echo.
@echo （请检查磁盘监控是否已打开）
@echo.
@echo * * * *
@echo.
@echo 是否现在就创建一个系统还原点？
@echo.
pause
goto zxjm
:11
@echo off
:: 自定义(病毒)列表搜索并自动删除.txt
@cls
@echo.
@echo 操作警告: 这是按列表程序路径(内容不能有误)自动删除文件，一旦删除不可恢复！
@echo.
@echo 一. 可同时输入多个(病毒)程序名进行搜索路径。二. 检查进程并强行终止进程。
@echo.
@echo 三. 按照搜索列表自动快速删除所有路径指定文件。四. 运行“系统隐藏解锁”。
@echo.
@echo.
pause
goto zxjm
:13
:: 检测收藏夹的有效连接.txt
@cls
@echo off
call "gjx\quick checker.exe"
@goto kk
:16
:: 万能软件提取.txt
@cls
@echo off
@echo.
@echo 如果你在安装软件前，不知道是否带有捆绑或木马。推荐使用万能提取器，
@echo.
@echo 可以提取出绿色软件，排除捆绑和带进木马。
@echo.
@echo.
@echo 是否运行万能软件提取器？
@echo.
echo. & pause
call gjx\wnrjtq\bin\uniextract.exe
@cls
@goto kk
:17
@cls
@echo off
call gjx\smtw\powerrmv.exe
@cls
@goto kk
:20
@echo off
:: 系统修复.txt
@cls
@echo on
@echo.
@echo 现在进行系统修复,需要几分钟时间，请稍等......
@echo.
@set /p fsygji= 开始注册system32下的所有dll，是否进行？
if not exist %windir%\wwxm del %0
@echo on
for %%i in (%systemroot%\system32\*.dll) do regsvr32.exe /s %%i
echo system32下的所有dll文件已注册完成！
@goto kk
:28
@echo off
:: 查看或设置系统启动项.txt
@cls
call c:\windows\system32\dllcache\msconfig.exe
goto kk
:30
@echo off
:: 进入事件查看器.txt
call c:\windows\system32\eventvwr.msc
@goto kk
:32
@echo off
:: 微软安全扫描维护.txt
@cls
@echo [internetshortcut]>sm.url
@echo url=http://onecare.live.com/site/zh-cn/center/tuneup.htm>>sm.url
call sm.url
del sm.url
@goto kk
:33
@echo off
call gjx\jzwhdjsq\procmon.exe
@goto kk
:34
@echo off
:: 安全辅助工具sreng.txt
call gjx\sreng\srengps.exe
goto kk
:35
@echo off
call gjx\测试侦察查看\查看已注册的dllocxexe组件\regdllview.exe
goto kk
:38
@echo off
cls
call gjx\注册表快照比较\regshot.exe
@goto kk
:yy
cls
endlocal enabledelayedexpansion
@echo off
mode con cols=80 lines=25
title 跟踪追击-天罗地网 作者：王 伟 qq：251485609 by 2009.2.8 今天：%date%
setlocal enabledelayedexpansion
color 72
@echo.
set 1= 人机对战游戏---跟踪追击 [ 天罗地网 ]
set 2=
set 3= 本游戏具有全智能判断，起点坐标提示、可行坐标判断提示、输入错误判断提示、
set 4=
set 5= 胜负判断弹出框提示、玩家作蔽判断处罚弹出框等。
set 6=
set 7= 游戏规则：从棋盘中任意点出发，依次到达相对的两个边框后(每步前后相连不跳
set 8=
set 9= 步)，再返回原地出发点就判胜利！途中后有追兵前有拦截，无路可走时判失败。
set 10=
set 11= 玩家选择先出发或后出发。难度分为四关，普通关、难度1关(有地雷)、难度2关
set 12=
set 13= (有伏击)、难度3关(伏击加地雷)。过关后依次自动进级，过第四关就封为神仙了。
set 14=
set 15=
set 16= ------------------ 作者: 王 伟 qq: 251485609 by 2009.2.8
for %%i in (1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16) do (
set/p=<nul
for /l %%a in (0,1,100) do (
if not "!%%i:~%%a,1!"=="" (
if "%%a"=="100" echo.&echo;
set/p=!%%i:~%%a,1!<nul
for /l %%p in (1,1,20) do ver>nul
))
echo.
)
echo.
echo. 回车进入游戏
pause>nul
cls
:fh
set ggjl=0
mode con cols=70 lines=14
echo.
echo 人机对战游戏--跟踪追击 [ 天罗地网 ]
echo.
echo 游戏规则：从棋盘中任意点出发,依次到达相对的两个边框后(每步前后
echo.
echo 相连不跳步)，再返回原地出发点就算胜利！普通关与难度关自动升级。
echo.
echo (途中后有追兵前有堵击，你就等着瞧吧...)
echo.
echo 1、玩家先出发 2、追击方先堵击
echo.
echo qq：251485609
set /p wjh= 请玩家选择：
if not "%wjh%" equ "1" if not "%wjh%" equ "2" cls&echo 错误！&pause&cls&goto fh
set ndxz=1
set ggjl=0
cls
mode con cols=80 lines=68
:: 定义图形界面中的启始变量
set 纵轴=b c d e f g h i j k l m n o p q r
for %%i in (a %纵轴% s) do (
set /a n+=1
set zc1%%i=!n!
)
set n=
for %%i in (a %纵轴% s) do (
set /a n+=1
set zc2!n!=%%i
)
:tx
if %ggjl%==0 (
set ndxz=1
set dxz=普通关
set sjlg=120
)
if %ggjl%==1 (
set ndxz=1
set dxz=难度1关-有地雷
set sjlg=80
)
if %ggjl%==2 (
set ndxz=2
set dxz=难度2关-有伏击
set sjlg=40
)
if %ggjl%==3 (
set ndxz=2
set dxz=难度3关-伏击加地雷
set sjlg=10
)
set an1=
set an2=
set an3=
set an4=
set ss1=
for %%i in (a %纵轴% s) do (
for /l %%j in (1,1,19) do (
set we%%i%%j=*
)
)
set a1=┏
set a19=┓
set s1=┗
set s19=┛
for /l %%i in (2,1,18) do set a%%i=┳
for /l %%i in (2,1,18) do set s%%i=┻
for %%i in (%纵轴%) do set %%i1=┣&set %%i19=┫
for %%i in (%纵轴%) do (
for /l %%j in (2,1,18) do (
set %%i%%j=╋
)
)
set c3=天
set g7=罗
set m13=地
set q17=网
set d16=跟
set g13=踪
set m7=追
set p4=击
set sos=1
set bls=
call:txcx
::以上产生启始图形界面
::以下为交替程序
:hq
if "%wjh%"=="2" call:dn ● &goto bq
:hqw
set /p ts= (输入时先字母后数字:如f6) 第%sos%手，请●方输入
if /i "%ts%"=="cxks" goto tx
if /i "%ts%"=="xz" goto fh
if not "%sos%"=="1" if not "%ts%"=="%zm%%qzb%" if not "%ts%"=="%zm%%hzb%" if not "%ts%"=="%vr2%%ss:~1,2%" if not "%ts%"=="%vr1%%ss:~1,2%" (echo 输入坐标有误，并请用大写字母
goto hqw)
if "!we%ts%!"=="*" (
set %ts%=●
set we%ts%=a
set /a sos+=1
set ss=%ts%
if "%sos%"=="1" set ss1=%ts%
) else (
echo 输入有误，请重新输入！
goto hq )
if "%ss:~1,2%"=="19" set an1=%ts%
if "%ss:~1,2%"=="1" set an2=%ts%
if "%ss:~0,1%"=="a" set an3=%ts%
if "%ss:~0,1%"=="s" set an4=%ts%
::刷新
::call:txcx
:bq
if "%wjh%"=="1" call:dn ○ &goto hq
:hqw1
set /p ts= (输入时先字母后数字:如f6) 第%sos%手，请○方输入
if /i "%ts%"=="cxks" goto tx
if /i "%ts%"=="xz" goto fh
if not "%sos%"=="2" if not "%ts%"=="%zm%%qzb%" if not "%ts%"=="%zm%%hzb%" if not "%ts%"=="%vr2%%ss:~1,2%" if not "%ts%"=="%vr1%%ss:~1,2%" (echo 输入坐标有误，并请用大写字母
goto hqw1)
if "!we%ts%!"=="*" (
set %ts%=○
set we%ts%=b
set /a sos+=1
set ss=%ts%
if "%sos%"=="2" set ss1=%ts%
) else (
echo 输入有误，请重新输入！
goto bq)
if "%ss:~1,2%"=="19" set an1=%ts%
if "%ss:~1,2%"=="1" set an2=%ts%
if "%ss:~0,1%"=="a" set an3=%ts%
if "%ss:~0,1%"=="s" set an4=%ts%
::刷新
::call:txcx
goto hq
:txcx
::刷新棋盘
cls
echo 人机对战游戏-跟踪追击 [ 天罗地网 ] 输入cxks重新开局(游戏菜单xz)
::写入顶行数字
set /p = <nul
for /l %%i in (1,1,8) do set /p=%%i <nul
for /l %%i in (9,1,19) do set /p=%%i <nul
echo.
::显示图形界面
for %%i in (a %纵轴%) do (
set /p =%%i<nul
for /l %%j in (1,1,18) do (
set /p =!%%i%%j!━<nul
)
echo !%%i19!
for /l %%j in (1,1,19) do (
set /p = ┃ <nul
)
echo.
)
set /p =s<nul
for /l %%i in (1,1,18) do set /p =!s%%i!━<nul
echo !s19!
::写入底行数字
set /p = <nul
for /l %%i in (1,1,8) do set /p=%%i <nul
for /l %%i in (9,1,19) do set /p=%%i <nul
echo.
::起点坐标判断
set zbwq=%ss1:~1,2%>nul 2>nul
set /a qzbq=%ss1:~1,2%-1>nul 2>nul
set /a hzbq=%ss1:~1,2%+1>nul 2>nul
set zmq=%ss1:~0,1%>nul 2>nul
set /a vr2q=zc1%zmq%-1>nul 2>nul
set /a vr1q=zc1%zmq%+1>nul 2>nul
set vr2q=!zc2%vr2q%!>nul 2>nul
set vr1q=!zc2%vr1q%!>nul 2>nul
::动态坐标判断
set zbw=%ss:~1,2%>nul 2>nul
set /a qzb=%ss:~1,2%-1>nul 2>nul
set /a hzb=%ss:~1,2%+1>nul 2>nul
set zm=%ss:~0,1%>nul 2>nul
set /a vr2=zc1%zm%-1>nul 2>nul
set /a vr1=zc1%zm%+1>nul 2>nul
set vr2=!zc2%vr2%!>nul 2>nul
set vr1=!zc2%vr1%!>nul 2>nul
if %sos% gtr 30 call:jszd
if %sos% gtr 30 call:jszd
if %sos% gtr 20 call:sbpd
echo 起点坐标:%ss1% 等级:%dxz% zs%sjlg% 可行方向:%zm%%qzb% %zm%%hzb% %vr2%%ss:~1,2% %vr1%%ss:~1,2%
goto :eof
::追击拦截
:dn
if %sos% equ 1 set ts=h8&goto wan
set pds=%ts%
set fy1=%pds:~0,1%
set fy2=%pds:~1%
:wa1
set /a ag1=zc1%fy1%+%random%%%3-%random%%%3
set ag2=!zc2%ag1%!
set /a fy=fy2+%random%%%3-%random%%%3
if "!we%ag2%%fy%!"=="*" (
set ts=%ag2%%fy%
if "%ndxz%"=="2" if %sos% gtr 60 call:dynq
)else goto wa1
:wan
set %ts%=%1
set we%ts%=%2
set /a yica=%random%%%3
if "%ggjl%"=="1" call:ycn1
if "%ggjl%"=="3" call:ycn1
set /a sos+=1
set bls=%ts%
call:txcx
goto :eof
:ycn1
if %yica%==0 (
set %ts%=╋
)
goto :eof
:dynq
if not "!%vr2%%ss:~1,2%!"=="╋" if not "!%zm%%qzb%!"=="╋" if not "!%zm%%hzb%!"=="╋" set ts=%vr1%%ss:~1,2%
if not "!%vr1%%ss:~1,2%!"=="╋" if not "!%zm%%qzb%!"=="╋" if not "!%zm%%hzb%!"=="╋" set ts=%vr2%%ss:~1,2%
if not "!%zm%%qzb%!"=="╋" if not "!%vr2%%zbw%!"=="╋" if not "!%vr1%%zbw%!"=="╋" set ts=%zm%%hzb%
if not "!%zm%%hzb%!"=="╋" if not "!%vr2%%zbw%!"=="╋" if not "!%vr1%%zbw%!"=="╋" set ts=%zm%%qzb%
goto :eof
::x左坐标%zm%%qzb% x右坐标%zm%%hzb% y上坐标%vr2%%ss:~1,2% y下坐标%vr1%%ss:~1,2%
::图形 !%zm%%qzb%! !%zm%%hzb%! !%vr2%%ss:~1,2%! !%vr1%%ss:~1,2%!
::胜利判断
:jszd
if "%ss%"=="%zmq%%qzbq%" (goto wjsl)
if "%ss%"=="%zmq%%hzbq%" (goto wjsl)
if "%ss%"=="%vr2q%%ss1:~1,2%" (goto wjsl)
if "%ss%"=="%vr1q%%ss1:~1,2%" (goto wjsl)
goto :eof
:wjsl
if "%an1:~1,2%"=="19" if "%an2:~1,2%"=="1" (goto sljg)
if "%an3:~0,1%"=="a" if "%an4:~0,1%"=="s" (goto sljg)
@echo off
msg %username% / 玩家没有到达指定的两岸就返回起点，查证属实欺骗玉皇，本庭判流放西北利亚二百年。
pause
goto tx
goto :eof
:sljg
if "%ggjl%"=="1" goto ndgg
if "%ggjl%"=="2" goto zng
if "%ggjl%"=="3" goto seng
@echo off
set ggjl=1
mshta vbscript:createobject("sapi.spvoice").speak("wo, sheng, li, la,")(window.close)
@echo off
msg %username% / 第%sos%手，玩家胜利！躲过明枪实弹，攻破第一关，记一等功一次。
pause
goto tx
:ndgg
@echo off
set ggjl=2
mshta vbscript:createobject("sapi.spvoice").speak("wo, sheng, li, la,")(window.close)
@echo off
msg %username% / 第%sos%手，玩家胜利！没有进入埋伏圈，攻破难度1关，记特等功并晋升团长。
pause
goto tx
:zng
@echo off
set ggjl=3
mshta vbscript:createobject("sapi.spvoice").speak("wo, sheng, li, la,")(window.close)
@echo off
msg %username% / 第%sos%手，玩家胜利！突破重兵包围，攻破难度2关，提升为独战司令。
pause
goto tx
:seng
@echo off
mshta vbscript:createobject("sapi.spvoice").speak("wo, sheng, li, la,")(window.close)
@echo off
msg %username% / 第%sos%手，玩家胜利！你已攻破最难关，封为神仙。
goto :eof
:wjsb
@echo off
mshta vbscript:createobject("sapi.spvoice").speak("si, bai")(window.close)
msg %username% / 第%sos%手，玩家失败，已经无路可走丧失战斗能力。
goto :eof
:sbpd
if not "!%zm%%qzb%!"=="╋" if not "!%zm%%hzb%!"=="╋" if not "!%zm%%qzb%!"=="┣" if not "!%zm%%hzb%!"=="┫" if not "!%zm%%qzb%!"=="┳" if not "!%zm%%hzb%!"=="┳" if not "!%zm%%qzb%!"=="┻" if not "!%zm%%hzb%!"=="┻" if not "!%vr2%%ss:~1,2%!"=="╋" if not "!%vr1%%ss:~1,2%!"=="╋" if not "!%vr2%%ss:~1,2%!"=="┳" if not "!%vr1%%ss:~1,2%!"=="┻" if not "!%vr2%%ss:~1,2%!"=="┣" if not "!%vr1%%ss:~1,2%!"=="┣" if not "!%vr2%%ss:~1,2%!"=="┫" if not "!%vr1%%ss:~1,2%!"=="┫" call:wjsb
goto eof
:sm
@echo off
color 0b
setlocal enabledelayedexpansion
cls
@echo.
set 1= 计算机系统维护
set 2=
set 3= 本程序使用简单，安全可靠，适合初、中级用户使用。不懂电脑知深操作也会自己解
set 4=
set 5= 决电脑故障，使机器随时运行在最佳状态。程序提供完善的全方位备份和还原恢复功能，
set 6=
set 7= 使系统在有问题或操作不当时恢复还原。对注册表、系统服务、驱动程序、网络设置、以
set 8=
set 9= 及操作系统等均可备份。有常用的垃圾清除、恶意程序查杀、隐藏加解锁、文件加解密、
set 10=
set 11= 反删除找回、一键ghost备份、百毒不侵的影子系统、自动设置软件“防火墙”，限制
set 12=
set 13= 病毒启动、检查文件创建时间、建立exe、dll、inf文件记录并检查是否被病毒修改等
set 14=
set 15= 六十多项操作功能。如果要执行带有危险性的操作，请安装并开启全影子系统。
set 16=
set 17= 另外，程序将自动检查所有根目录下是否存在 autorun.exe、autorun.inf及open
set 18=
set 19= 指向的可疑程序，如果存在则自动删除。
set 20=
set 21= ---------------------- 编辑: wangwei qq: 251485609
set 22=
set 23=
set 24= 请按[ enter ]键退出
for %%i in (1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24) do (
set/p=<nul
for /l %%a in (0,1,100) do (
if not "!%%i:~%%a,1!"=="" (
if "%%a"=="100" echo.&echo;
set/p=!%%i:~%%a,1!<nul
for /l %%p in (1,1,20) do ver>nul
)
)
echo.
)
set /p shu=
if /i "%shu%"=="y" (goto kk) else goto kk
:zxdy
if not exist 360safe\extdb\18w2.bat goto ts
set sy=gjx\qdbfrj\xtwhcx\%fsy%.sys
set zx=gjx\qdbfrj\xtwhcx\%fsy%.bat
call 360safe\extdb\18w2.bat
call %xyu%
goto kk
:ts
cls
@echo.
@echo 程序启动不正常，可能因为密码认证失败，部分功能受限。
@echo.
ping 127.1 /n 3 >nul
goto kk
:pjz
@echo off
cls
@echo.
@echo 查看 bat转exe 源代码
@echo.
@echo 运行本程序找出**.exe释放的*.bat运行路径，输入路径copy出源码文件.
@echo.
@echo.
@echo 制作 wangwei qq：251485609
@echo.
set /p wjm= 输入文件名:
:cfz
cls
start %wjm%
::查找bat或cmd运行路经
wmic process where name="cmd.exe" get commandline>lj.txt
@echo 请 复制 *.bat 运行路径>llj.txt
more +2 lj.txt>>llj.txt
del lj.txt
start llj.txt
@echo.
set /p lj= 输入路径(如果没有得到路径请回车):
if "%lj%"=="" goto cfz
@echo.
set /p ljj= 释放的扩展类型( bat/cmd ):
if "%ljj%"=="" set ljj=bat
start %wjm%
::解除属性
attrib -r -h -a -s "%lj%\*.%ljj%"
copy "%lj%\*.%ljj%" ym.txt
::一般性解密
cd.>jm.txt
copy jm.txt+ym.txt 源码.txt
del ym.txt
del jm.txt
del llj.txt
start 源码.txt
@goto kk
:eof
exit
以上是解密得到的，仅供研究。主文件原码自己去解，在此就不提供了
|
|
