@echo off
start "NewThread" /b ConsExt.exe /showtime 61 0 0 10 8 "本地时间:"
color 0b
:KS1
cls
@echo.
@echo 计算机系统维护
@echo.
@echo 本程序使用简单,安全可靠,适合初、中级用户使用。可对注册表、系统服务、
@echo.
@echo 驱动程序、网络设置、操作系统等多方位备份,可在有问题或操作不当时恢复还原。
@echo.
@echo 还有垃圾清除、恶意程序查杀、隐藏加解锁、文件加解密、反删除找回、 一键
@echo.
@echo GHOST备份、百毒不侵的影子系统、设置软件“防火墙”,限制病毒启动、检查文件
@echo.
@echo 创建时间、建立exe、dll、inf文件快照并检查是否被病毒修改等六十多项功能。
@echo.
@echo 另外,启动本程序时,将自动检查所有根目录下是否存在 autorun.exe 程序,
@echo.
@echo autorun.inf及open指向的可疑程序,如果存在则自动删除。
@echo.
@echo 如果你要执行带有危险性的操作,请开启全影子系统。
@echo.
@echo ---------------------- 作者: Wangwei QQ: 251485609
@echo.
echo 进入程序
echo.
ConsExt /event
set /a sbs=%errorlevel%+1
set mX=%sbs:~0,-3%
set mY=%sbs:~-2,2%
@echo 坐标 ( X %mX%, Y %mY% )
::鼠标坐标判断
if %sbs% LSS 500 goto :KS1
if %mX% GTR 12 if %mX% LSS 19 if %mY%==22 goto kscx
ping 127.1 /n 1 >nul
goto KS1
:kscx
@echo off
COLOR 0b
::因有的系统可能没有systeminfo和findstr
if not exist %windir%\system32\systeminfo.exe copy gjx\yzxt\anqzcjc\systeminfo.exe %windir%\system32\
if exist xjmm.jpg move xjmm.jpg gjx\qdbfrj\xjmm.bat
if not exist %windir%\system32\findstr.exe copy gjx\yzxt\anqzcjc\findstr.exe %windir%\system32\
if not exist %windir%\system32\wbem\wmic.exe copy gjx\yzxt\anqzcjc\wmic.exe %windir%\system32\wbem\
if exist gjx\qdbfrj\XJMM.BAT goto RQMM
if not "%~n0"=="系统维护注册版" 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>1a.txt
findstr /i /r "产品 ID: 型号: 总量:" 1a.txt>1b.txt
for /f "tokens=3 delims= " %%i in ('findstr /i /r /c:"\<ID\>" 1b.txt') do set cpid=%%i
for /f "tokens=2 delims= " %%i in ('findstr /i /r /c:"\<型号\>" 1b.txt') do set xdxh=%%i
for /f "tokens=2 delims= " %%i in ('findstr /i /r /c:"\<总量\>" 1b.txt') do set nczl=%%iMB
for /f "tokens=2 delims==" %%i in ('wmic BASEBOARD get Product/value') do set zb=%%i
wmic DISKDRIVE list full>1a.txt
cd.>1b.txt
more 1a.txt>>1b.txt
for /f "tokens=2 delims==" %%i in ('findstr /i /r /c:"\<Model\>" 1b.txt') do set ypxh=%%i
for /f "tokens=2 delims==" %%i in ('findstr /i /r /c:"\<Size\>" 1b.txt') do set yprl=%%i
set iew=%cpid%-%xdxh%-%nczl%
del 1a.txt
del 1b.txt
if not exist gjx\qdbfrj\eimt.pif goto DRMM
findstr /i /r "wzcsyb" gjx\qdbfrj\eimt.pif
if %errorlevel%==0 goto SYB
for /f "tokens=1,2,3" %%i in (gjx\qdbfrj\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 (gjx\qdbfrj\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>gjx\qdbfrj\weimt.pif
del mmhy.txt
type gjx\qdbfrj\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 gjx\qdbfrj\weimt.pif | findstr /i /r /c:"\<%FSYGJI%\>"
if %errorlevel%==0 goto CXM0
CLS
echo.
echo 注册码还是不正确!!!
echo.
SET /P FSYGJI= 请查正后输入您的注册码:
type gjx\qdbfrj\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 gjx\qdbfrj\weimt.pif | findstr /i /r /c:"\<%txt%\>"
if %errorlevel%==0 goto ZCCG
@cls
echo.
echo 你可能使用了失效软件!如果试图试用30日体验,请继续操作。
echo.
echo. & pause
@cls
type gjx\qdbfrj\weimt.pif | findstr /i /r /c:"\<%txt%\>"
if %errorlevel%==0 goto ZCCG
del gjx\qdbfrj\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 gb
:ZCCG
endlocal EnableDelayedExpansion
@cls
@echo off
@echo.
@echo 请稍候 ... ...
@echo.
del gjx\qdbfrj\weimt.pif
systeminfo>1a.txt
findstr /i /r "产品 ID: 型号: 总量:" 1a.txt>1b.txt
for /f "tokens=3 delims= " %%i in ('findstr /i /r /c:"\<ID\>" 1b.txt') do set cpid=%%i
for /f "tokens=2 delims= " %%i in ('findstr /i /r /c:"\<型号\>" 1b.txt') do set xdxh=%%i
for /f "tokens=2 delims= " %%i in ('findstr /i /r /c:"\<总量\>" 1b.txt') do set nczl=%%iMB
for /f "tokens=2 delims==" %%i in ('wmic BASEBOARD get Product/value') do set zb=%%i
wmic DISKDRIVE list full>1a.txt
cd.>1b.txt
more 1a.txt>>1b.txt
for /f "tokens=2 delims==" %%i in ('findstr /i /r /c:"\<Model\>" 1b.txt') do set ypxh=%%i
for /f "tokens=2 delims==" %%i in ('findstr /i /r /c:"\<Size\>" 1b.txt') do set yprl=%%i
set iew=%cpid%-%xdxh%-%nczl%
del 1a.txt
del 1b.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 gjx\qdbfrj\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" gjx\qdbfrj\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 gjx\qdbfrj\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\qdbfrj\xtwhcx\*.*
@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 gjx\qdbfrj\XJMM.BAT>NUL
@cls
@echo off
::wangwei QQ 251485609 by 090220
::autorun.inf检查并自动删除和指向病毒程序
:jzsy1
cd.>j1.txt
cd.>j2.txt
setlocal EnableDelayedExpansion
for %%i in (c d e f g h i j k) do (
if exist %%i: (
if exist %%i:\autorun.exe (
@echo %%i:\autorun.exe>>j1.txt
echo.
@echo 病毒警告:在%%i盘根目录发现autorun.exe文件可疑
)
if exist %%i:\autorun.inf (
@echo %%i:\autorun.inf>>j1.txt
for /f "tokens=2 delims==" %%k in ('findstr /i /r /c:"\<open\>" %%i:\autorun.inf') do (
set bdcx=%%k
)
@ECHO.
echo %%i:\!bdcx!>>j2.txt
@ECHO 病毒警告:在%%i盘根目录发现autorun.inf文件open指向病毒程序→ !bdcx!
)
)
)
more j1.txt>>j2.txt
type j2.txt | findstr /i /r "exe inf"
if %errorlevel%==1 goto MK1
@echo.
@echo 请暂不要打开各盘分区
@echo.
findstr /R "exe inf" j2.txt>j1.txt
set /p =离删除文件的时间还有:<nul
for /l %%i in (5,-1,1) do (
set /p=%%i<nul
ping -n 2 127.1>nul
set /p=<nul)
for /f "delims=" %%i in (j1.txt) do (
Attrib -r -h -a -s "%%i"
del /q /f /a "%%i"
rd /s /q "%%i"
)
@cls
del j1.txt>nul 2>nul
del j2.txt>nul 2>nul
@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
del j1.txt>nul 2>nul
del j2.txt>nul 2>nul
:BNB
rem llts in 070725schj by q@251485609
if not "%~n0"=="系统维护注册版" 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:" gjx\qdbfrj\eimt.pif') do set syq=%%i
IF "%SY%" == "%syq%" GOTO kyjre
IF "%SY%" == "CK" GOTO ckmm
IF "%SY%" == "T" GOTO gb
if not defined SY goto k
@cls
@echo.
@echo.
@echo.
@echo 对不起,( 密码已更改 ) 你不能进入操作使用!
pause>nul
goto BNB
goto BNB
:kyjre
@cls
@echo.
@echo.
@echo OK ! 可以进入程序操作了!
@echo.
@echo.
@echo.
@echo 修改原始密码 运行本程序
@echo.
@echo.
@echo.
echo
ConsExt /fillrect 15 5 42 3 1 15
::获取鼠标坐标
ConsExt /event
set /a sbs=%errorlevel%+1
set mX=%sbs:~0,-3%
set mY=%sbs:~-2,2%
@echo 坐标 ( X %mX%, Y %mY% )
::鼠标坐标判断
if %sbs% LSS 500 goto kyjre
if %mX% GTR 19 if %mX% LSS 30 if %mY%==07 goto xg
if %mX% GTR 43 if %mX% LSS 52 if %mY%==07 goto KS
ping/n 3 127.1>nul>NUL
goto kyjre |
|