『第
6 楼』:
@ECHO OFF
REM 设置是否显示消息提示,搜索路径,并获取系统语言(950繁体;437英文;936简体)
SET ISMSG=YES
SET TIMEOUT=2
SET PATH=%CD%;%CD%\TOOLS\;%PATH%
FOR /F "TOKENS=1,2 DELIMS=: " %%I IN ('CHCP') DO SET LAN=%%J
IF "%LAN%"=="936" GOTO :CHS
IF "%LAN%"=="950" GOTO :CHT
:CHT
CT.EXE /B /S /D "%%I"
:CHS
ECHO 系统维护天使V1.0可以实现如下功能
ECHO 1.全方位清理系统垃圾;2.全方位清理和免疫恶意软件;3.全方位优化系统
ECHO 提示:本程序不适合WIN9X机器;本程序可能使系统不稳定;本程序支持繁体和安静模式
ECHO.
ECHO ╔──────────────────────────────╗
ECHO │ │
ECHO │ 系统维护天使V1.0 │
ECHO │ 本程序由小布点(秋语)编写制作 │
ECHO │ 欢迎使用小布点制作的绿色软件和其他程序 │
ECHO │ 本程序可以自由复制,使用和发布,版权归作者本人所有 │
ECHO │ QQ:9399100 QQ群号:29946542 E-MAIL:xiaobudian528@sina.com │
ECHO │ │
ECHO ╚──────────────────────────2006─㊣╝
ECHO.
ECHO 正在进行清理前的准备工作,请稍候.........
PING 127.0.0.1 -n %TIMEOUT% >NULL
REM 获取IECACHE变量和系统环境变量SYSTEMP路径
REG EXPORT "HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Explorer\Shell Folders" "%TEMP%\IEC.TXT" & CLS
TYPE "%TEMP%\IEC.TXT" >"%TEMP%\IECOK.TXT"
FOR /F "tokens=1-2 DELIMS==" %%a in ('FINDSTR /I "Cache" "%TEMP%\IECOK.TXT"') DO SET IECACHE=%%b
REG EXPORT "HKEY_LOCAL_MACHINE\SYSTEM\CurrentControlSet\Control\Session Manager\Environment" "%TEMP%\TEMP.TXT" & CLS
TYPE "%TEMP%\TEMP.TXT" >"%TEMP%\TEMPOK.TXT"
FOR /F "tokens=1-2 DELIMS==" %%a in ('FINDSTR /I "TEMP" "%TEMP%\TEMPOK.TXT"') DO SET SYSTEMP=%%b
REM 提示清理前是否需要压缩备份重要数据,如果已存在备份则直接进行清理,
IF EXIST BACKUP IF EXIST BACKUP\*.RAR GOTO :PNOW
IF "%ISMSG%"=="NO" GOTO :PBACKUP
>msg.vbs Echo intAnswer = MsgBox("你还没有进行备份,建议清理前备份重要文件,现在就要备份吗?" , vbQuestion+vbYesNoCancel, "小不点温馨提示!")
>>msg.vbs Echo IF intAnswer = vbYes THEN
>>msg.vbs Echo Wscript.Echo "PBACKUP"
>>msg.vbs Echo ELSEIF intAnswer = vbNo THEN
>>msg.vbs Echo Wscript.Echo "PNOW"
>>msg.vbs Echo ELSE
>>msg.vbs Echo Wscript.Echo "END"
>>msg.vbs Echo END If
For /f "delims=" %%i In ('"cscript //nologo msg.vbs"') do (GOTO :%%i)
:PBACKUP
CLS
REM 1.如果是第一次备份建议先删除不必要的字体再备份(启用第二和第三句代码),需要保留的字体可以添加到FONTS.SVE中
ECHO 正在压缩备份系统字体文件,请稍等......
PING 127.0.0.1 -n %TIMEOUT% >NULL
REM FOR /F "EOL=;" %%i in (.\TOOLS\FONTS.SVE) DO (ATTRIB "%windir%\FONTS\%%i" +H)
REM DEL /Q/A:-R-H-S "%windir%\FONTS\*.*"
IF NOT EXIST BACKUP MD BACKUP
RAR.EXE A .\BACKUP\FONTS %windir%\FONTS & CLS
CLS
REM 2.备份系统帮助以及帮助中心支持文件
ECHO 正在压缩备份系统帮助以及帮助中心支持文件,请稍等......
PING 127.0.0.1 -n %TIMEOUT% >NULL
IF NOT EXIST BACKUP MD BACKUP
RAR.EXE A .\BACKUP\HELP %windir%\HELP & CLS
RAR.EXE A .\BACKUP\PCHealth %windir%\PCHealth & CLS
CLS
REM 3.备份系统驱动缓存和DLL缓存文件,备份DLL时使用chenhui的DLLCACHEMANAGER 1.0,参数如下:BACK备份,RESTORE恢复,autodelete恢复时指定时间内自动删除自己
ECHO 正在压缩备份系统驱动缓存和DLL缓存文件,请稍等......
PING 127.0.0.1 -n %TIMEOUT% >NULL
IF NOT EXIST BACKUP MD BACKUP
RAR A .\BACKUP\DrvCache "%windir%\Driver Cache"
START /WAIT DLLCM.EXE /BACK
CLS
REM 4.备份常见的输入法如MS拼音,繁简,韩日等输入法等
ECHO 正在压缩备份常见的输入法,请稍等......
PING 127.0.0.1 -n %TIMEOUT% >NULL
IF NOT EXIST BACKUP MD BACKUP
RAR A .\BACKUP\IMEMSPY "%windir%\system32\IME\PINTLGNT"
RAR A .\BACKUP\IMEMSPY "%windir%\system32\PINTLGNT.IME"
RAR A .\BACKUP\IMEMSPY "%windir%\system32\PINTLPAD.HLP"
RAR A .\BACKUP\IMEMSPY "%windir%\system32\PINTLPAE.HLP"
REG EXPORT "HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\MSSCIPY" .\BACKUP\IMEMSPY.SVR
RAR A .\BACKUP\IMECHT "%windir%\IME\CHTIME"
RAR A .\BACKUP\IMECHT "%windir%\system32\IME\CINTLGNT"
RAR A .\BACKUP\IMECHT "%windir%\system32\IME\TINTLGNT"
RAR A .\BACKUP\IMEKR "%windir%\IME\IMKR6_1"
RAR A .\BACKUP\IMEJP "%windir%\IME\IMEJP"
RAR A .\BACKUP\IMEJP "%windir%\IME\IMEJP98"
RAR A .\BACKUP\IMEJP "%windir%\IME\IMJP8_1"
RAR A .\BACKUP\IMEOTHER "%windir%\system32\WINSP.*"
RAR A .\BACKUP\IMEOTHER "%windir%\system32\WINZM.*"
CLS
REM 5.备份系统修复文件夹repair下的文件等
ECHO 正在压缩备份repair文件,请稍等......
PING 127.0.0.1 -n %TIMEOUT% >NULL
IF NOT EXIST BACKUP MD BACKUP
RAR A .\BACKUP\REPAIR "%windir%\REPAIR"
CLS
IF "%ISMSG%"=="NO" GOTO :PNOW
>msg.vbs Echo intAnswer = MsgBox("文件已经备份到当前目录的BACKUP下,下面将进行全面清理" , vbOkOnly, "小不点温馨提示!")
>>msg.vbs Echo IF intAnswer = vbOkOnly THEN
>>msg.vbs Echo Wscript.Echo "PNOW"
>>msg.vbs Echo END If
For /f "delims=" %%i In ('"cscript //nologo msg.vbs"') do (GOTO :%%i)
:PNOW
CLS
REM 1.清理字体,帮助,缓存,输入法等文件
ECHO ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ >PurgeL.TXT
ECHO -----------------已经清理的系统字体文件列表(可释放50M空间)----------------- >>PurgeL.TXT
ECHO 正在清理系统字体文件(可释放50M空间),请稍等......
PING 127.0.0.1 -n %TIMEOUT% >NULL
FOR /F "EOL=;" %%i in (.\TOOLS\FONTS.SVE) DO (ATTRIB "%windir%\FONTS\%%i" +H)
DEL /Q/A:-R-H-S "%windir%\FONTS\*.*" >>PurgeL.TXT & CLS
CLS
REM 2.清理帮助文件和帮助等支持文件
ECHO. >>PurgeL.TXT & CLS
ECHO ---------------已经清理的帮助及其支持文件列表(可释放70M空间)--------------- >>PurgeL.TXT
ECHO 正在清理帮助及其支持文件(可释放70M空间),请稍等......
PING 127.0.0.1 -n %TIMEOUT% >NULL
COPY /Y %windir%\PCHealth\Helpctr\binaries\msconfig.exe %windir%\system32\ & CLS
DEL /Q/F/S/A %windir%\PCHealth\*.* >>PurgeL.TXT & CLS
DEL /Q/F/S/A %windir%\HELP\*.* >>PurgeL.TXT & CLS
CLS
REM 3.删除驱动缓存和DLL缓存文件,如果无法清理则采用DEL法
ECHO. >>PurgeL.TXT & CLS
ECHO --------------已经清理的驱动和DLL缓存文件列表(可释放300M空间)-------------- >>PurgeL.TXT
ECHO 正在清理驱动和DLL缓存文件(可释放300M空间),请稍等......
PING 127.0.0.1 -n %TIMEOUT% >NULL
DEL /Q/S/A "%windir%\Driver Cache\*.*" >>PurgeL.TXT & CLS
REM SFC /PURGECACHE & CLS
REM IF %ERRORLEVEL%==0 GOTO GOON
REM DEL /Q/S/F/A %windir%\SYSTEM32\dllcache\*.* >>PurgeL.TXT & CLS
:GOON
CLS
REM 4.删除多余的MS拼音,繁简体和韩日以及其他输入法,注意的是恢复时要反向操作.
ECHO. >>PurgeL.TXT & CLS
ECHO -----------------已经清理的输入法文件列表(可释放100M空间)------------------ >>PurgeL.TXT
ECHO 正在清理输入法文件(可释放100M空间),请稍等......
PING 127.0.0.1 -n %TIMEOUT% >NULL
DEL /F/Q/S/A %windir%\system32\IME\PINTLGNT\*.* >>PurgeL.TXT & CLS
Regsvr32 Msimtf.dll /u /s & CLS
Regsvr32 Msctf.dll /u /s & CLS
REG DELETE "HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\MSSCIPY" /F & CLS
DEL /F/Q/S/A "%windir%\IME\CHTIME\*.*" >>PurgeL.TXT & CLS
DEL /F/Q/S/A "%windir%\system32\IME\CINTLGNT\*.*" >>PurgeL.TXT & CLS
DEL /F/Q/S/A "%windir%\system32\IME\TINTLGNT\*.*" >>PurgeL.TXT & CLS
DEL /F/Q/S/A "%windir%\IME\IMKR6_1\*.*" >>PurgeL.TXT & CLS
DEL /F/Q/S/A "%windir%\IME\IMEJP\*.*" >>PurgeL.TXT & CLS
DEL /F/Q/S/A "%windir%\IME\IMEJP98\*.*" >>PurgeL.TXT & CLS
DEL /F/Q/S/A "%windir%\IME\IMJP8_1\*.*" >>PurgeL.TXT & CLS
DEL /F/Q/S/A "%windir%\WINSP.*" >>PurgeL.TXT & CLS
DEL /F/Q/S/A "%windir%\WINZM.*" >>PurgeL.TXT & CLS
CLS
REM 5.删除REPAIR文件夹下的文件.
ECHO. >>PurgeL.TXT & CLS
ECHO -----------------已经清理的REPAIR文件列表(可释放10M空间)------------------- >>PurgeL.TXT
ECHO 正在清理REPAIR文件夹下的文件(可释放10M空间),请稍等......
PING 127.0.0.1 -n %TIMEOUT% >NULL
DEL /F/Q/S/A %windir%\REPAIR\*.* >>PurgeL.TXT & CLS
CLS
REM 1.清理IE的CACHE文件夹中的东西和系统盘中的其他垃圾文件.
ECHO. >>PurgeL.TXT & CLS
ECHO. >>PurgeL.TXT & CLS
ECHO ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ >>PurgeL.TXT
ECHO -----------------已经清理的系统垃圾文件列表(可释放20M空间)----------------- >>PurgeL.TXT
ECHO 正在清理系统垃圾文件(可释放20M空间),请稍等......
PING 127.0.0.1 -n %TIMEOUT% >NULL
RD /Q/S %IECACHE% & CLS
RD /Q/S %SYSTEMP% & IF NOT EXIST %SYSTEMP% MD %SYSTEMP% & CLS
RD /Q/S %TEMP% & IF NOT EXIST %TEMP% MD %TEMP% & CLS
RD /Q/S %windir%\temp & IF NOT EXIST %windir%\temp MD %windir%\temp & CLS
FOR /F %%A IN ('DIR /A/S/B %SystemDrive%\FOUND.*') DO (RD /Q/S %%A) & CLS
DEL /F/S/Q/A %SystemDrive%\recycled\*.* >>PurgeL.TXT & CLS
IF EXIST "%SystemDrive%\System Volume Information\" DEL /F/S/Q/A "%SystemDrive%\System Volume Information\*.*" >>PurgeL.TXT & CLS
DEL /F/S/Q %SystemDrive%\*.bak >>PurgeL.TXT & CLS
DEL /F/S/Q/A %SystemDrive%\*.tmp >>PurgeL.TXT & CLS
DEL /F/S/Q/A %SystemDrive%\*._mp >>PurgeL.TXT & CLS
DEL /F/S/Q/A %SystemDrive%\*.log >>PurgeL.TXT & CLS
DEL /F/S/Q/A %SystemDrive%\*.gid >>PurgeL.TXT & CLS
DEL /F/S/Q/A %SystemDrive%\*.chk >>PurgeL.TXT & CLS
DEL /F/S/Q/A %SystemDrive%\*.old >>PurgeL.TXT & CLS
DEL /F/S/Q/A %SystemDrive%\*.ftg >>PurgeL.TXT & CLS
DEL /F/S/Q/A %SystemDrive%\*.fts >>PurgeL.TXT & CLS
DEL /F/S/Q/A %SystemDrive%\*.syd >>PurgeL.TXT & CLS
DEL /F/S/Q/A %SystemDrive%\*.ms >>PurgeL.TXT & CLS
DEL /F/S/Q/A %SystemDrive%\*.dmp >>PurgeL.TXT & CLS
DEL /F/S/Q/A %SystemDrive%\*.wbk >>PurgeL.TXT & CLS
DEL /F/S/Q/A %SystemDrive%\*.xlk >>PurgeL.TXT & CLS
DEL /F/S/Q/A %SystemDrive%\*.wbk >>PurgeL.TXT & CLS
DEL /F/S/Q/A %SystemDrive%\*.dir >>PurgeL.TXT & CLS
DEL /F/S/Q/A %SystemDrive%\*.diz >>PurgeL.TXT & CLS
DEL /F/S/Q/A %SystemDrive%\*.cdr_ >>PurgeL.TXT & CLS
DEL /F/S/Q/A %SystemDrive%\*.#Res >>PurgeL.TXT & CLS
DEL /F/S/Q/A %SystemDrive%\*.$$$ >>PurgeL.TXT & CLS
DEL /F/S/Q/A %SystemDrive%\*.@@@ >>PurgeL.TXT & CLS
DEL /F/S/Q/A %SystemDrive%\*.--- >>PurgeL.TXT & CLS
DEL /F/S/Q/A %SystemDrive%\*.~* >>PurgeL.TXT & CLS
DEL /F/S/Q/A %SystemDrive%\~*.* >>PurgeL.TXT & CLS
DEL /F/S/Q/A %SystemDrive%\*.Thumbs.db >>PurgeL.TXT & CLS
DEL /F/S/Q/A %SystemDrive%\chklist.* >>PurgeL.TXT & CLS
REM 2.清理程序组和用户组中多余的程序和垃圾文件,主要有电影制作;桌面弹球;MS-zone游戏;安装信息和卸载信息;系统更新
REM 以及预存取10M;助理小狗3M;微软代理3M;激活8M;需要注意的是如果安装了杀毒等软件会在程序和用户组中产生大量垃圾文件,需要手动清理
ECHO. >>PurgeL.TXT & CLS
ECHO ------已经清理的程序组和用户组中的程序和垃圾文件列表(可释放100M空间)------- >>PurgeL.TXT
ECHO 正在清理程序组和用户组中多余的程序和垃圾文件(可释放100M空间),请稍等......
PING 127.0.0.1 -n %TIMEOUT% >NULL
RD /S/Q %SystemDrive%\"Program Files\Movie Maker" & CLS
RD /S/Q %SystemDrive%\"Program Files\Windows NT\Pinball" & CLS
RD /S/Q %SystemDrive%\"Program Files\MSN Gaming Zone" & CLS
RD /S/Q %SystemDrive%\"Program Files\InstallShield Installation Information" & CLS
RD /S/Q %SystemDrive%\"Program Files\Uninstall Information" & CLS
DEL /S/Q/F/A %SystemDrive%\"Program Files\WindowsUpdate\*.*" >>PurgeL.TXT & CLS
DEL /S/Q/F/A %SystemDrive%\"Windows Movie Maker.LNK" >>PurgeL.TXT & CLS
DEL /S/Q/F/A %SystemDrive%\"桌上弹球.LNK" >>PurgeL.TXT & CLS
DEL /S/Q/F/A "%USERPROFILE%\Cookies\*.*" >>PurgeL.TXT & CLS
DEL /S/Q/F/A "%USERPROFILE%\IconCache.db" >>PurgeL.TXT & CLS
DEL /S/Q/F/A "%USERPROFILE%\Recent\*.*" >>PurgeL.TXT & CLS
DEL /S/Q/F/A "%USERPROFILE%\Local Settings\Application Data\Microsoft\Terminal Server Client\*.*" >>PurgeL.TXT & CLS
REM DEL /Q/S/F/A %windir%\srchasst\*.* >>PurgeL.TXT & CLS
REM DEL /Q/S/F/A %windir%\msagent\*.* >>PurgeL.TXT & CLS
REM DEL /Q/S/F/A %windir%\prefetch\*.* >>PurgeL.TXT & CLS
REM DEL /Q/S/F/A %windir%\system32\oobe\*.* >>PurgeL.TXT & CLS
REM 3.清理升级和安装后的垃圾文件,注意的是Installer下的MSI文件删除后可能有些软件不能卸载,Downloaded Program Files下的文件删除后可能上网有问题.
ECHO. >>PurgeL.TXT & CLS
ECHO -------------已经清理升级和安装后的垃圾文件列表(可释放100M空间)------------ >>PurgeL.TXT
ECHO 正在清理升级和安装后的垃圾文件(可释放100M空间),请稍等......
PING 127.0.0.1 -n %TIMEOUT% >NULL
FOR /F %%i in ('DIR /A/B/S %windir%\$*') DO (RD /Q/S "%%i")
DEL /Q/S/F/A %windir%\KB*.LOG & CLS
RD /Q/S "%windir%\SoftwareDistribution\Download" & CLS
IF NOT EXIST "%windir%\SoftwareDistribution\Download" MD "%windir%\SoftwareDistribution\Download" & CLS
RD /Q/S "%windir%\Downloaded Installations" & CLS
IF NOT EXIST "%windir%\Downloaded Installations" MD "%windir%\Downloaded Installations" & CLS
DEL /Q/F %windir%\Installer\*.MSI >>PurgeL.TXT & CLS
IF EXIST "%windir%\Temporary TegoWeb Files" RS /Q/S "%windir%\Temporary TegoWeb Files" & CLS
REM DEL /Q/F/S/A "%windir%\Downloaded Program Files\*.*" >>PurgeL.TXT & CLS
REM 4.清理墙纸文件(替换为好看的墙纸)和一些多余的图片文件.
ECHO. >>PurgeL.TXT & CLS
ECHO ----------------已经清理的墙纸和图片文件列表(可释放10M空间)--------------- >>PurgeL.TXT
ECHO 正在清理清理的墙纸和图片文件(可释放10M空间),请稍等......
DEL /Q/F/S/A "%windir%\Web\Wallpaper\*.*" >>PurgeL.TXT & CLS
COPY ".\Wallpaper\*.*" "%windir%\Web\Wallpaper" & CLS
REM 提示清理清理完成并提示是否进行恶意软件,流行病毒的清理和免疫
IF "%ISMSG%"=="NO" GOTO :PEYNOW
>msg.vbs Echo intAnswer = MsgBox("垃圾文件清理完成,是否立即进行恶意软件,流行病毒的清理和免疫,免疫后将不能恢复!" , vbQuestion+vbYesNo, "小不点温馨提示!")
>>msg.vbs Echo IF intAnswer = vbYes THEN
>>msg.vbs Echo Wscript.Echo "PEYNOW"
>>msg.vbs Echo ELSEIF intAnswer = vbNo THEN
>>msg.vbs Echo Wscript.Echo "YHNOW"
>>msg.vbs Echo END If
For /f "delims=" %%i In ('"cscript //nologo msg.vbs"') do (GOTO :%%i)
:PEYNOW
CLS
REM 恶意软件,流行病毒的清理和免疫
ECHO. >>PurgeL.TXT & CLS
ECHO. >>PurgeL.TXT & CLS
ECHO *************************************************************************** >>PurgeL.TXT
ECHO -------------------已经清理的恶意软件,流行病毒文件列表--------------------- >>PurgeL.TXT
ECHO 正在清理恶意软件,流行病毒文件,请稍等......
PING 127.0.0.1 -n %TIMEOUT% >NULL
ECHO 正在进行恶意软件,流行病毒的免疫处理,请稍等......
PING 127.0.0.1 -n %TIMEOUT% >NULL
REM 提示是否进行全方位的系统优化
IF "%ISMSG%"=="NO" GOTO :YHNOW
>msg.vbs Echo intAnswer = MsgBox("现在要进行全方位的系统优化吗?优化后可以提升系统性能哟! ^_^ " , vbQuestion+vbYesNo, "小不点温馨提示!")
>>msg.vbs Echo IF intAnswer = vbYes THEN
>>msg.vbs Echo Wscript.Echo "YHNOW"
>>msg.vbs Echo ELSEIF intAnswer = vbNo THEN
>>msg.vbs Echo Wscript.Echo "END"
>>msg.vbs Echo END If
For /f "delims=" %%i In ('"cscript //nologo msg.vbs"') do (GOTO :%%i)
:YHNOW
CLS
REM 进行全方位的系统优化
ECHO. >>PurgeL.TXT & CLS
ECHO. >>PurgeL.TXT & CLS
ECHO *************************************************************************** >>PurgeL.TXT
ECHO --------------------------已经优化的系统项目列表--------------------------- >>PurgeL.TXT
ECHO 正在进行全方位的系统,请稍等......
PING 127.0.0.1 -n %TIMEOUT% >NULL
:END
DEL /F/S/Q null & CLS
DEL /F/S/Q msg.vbs & CLS
|
