返回列表 发帖

[系统增强] 多功能批处理更新版本

昨晚本人花了将尽一个半小时终于学会了点wmic
学以致用,马上进行实战,用wimc将多功能批处理更新了,将尽花了偶三四个小时。又将其他代码优化了。呵呵,更新信息如下:

1. 去除了开始的动画改为自己查看
2. 建立自己的program files目录,使产品运行更加安全
3. 在更新2的基础上优化了代码。使程序运行加速
4. 修改产品9的功能查看系统信息改为查看电脑信息。更加齐全了资料。能显示BIOS,显示器,CPU等信息
5. 增加了查看系统进程和路径功能,显示出更多的进程,以防隐藏进程。


由于代码过长,请大家下载使用

正在学wmic的可以看下,呵呵
@mode con cols=105 lines=40&color 1f
@echo off
title 多功能批处理 MADE by 公孙轩辕 QQ:327828994
setlocal EnableDelayedExpansion
if not "%1"=="" color 1f&mode con cols=100 lines=40&echo 正在开始每日自动删除系统垃圾!&ping/n 3 127.1 >nul&call %1
for /l %%i in (0,1,15) do echo\
echo\
echo                                     程序准备中……
call :zb
for /l %%i in (0,1,1000) do ver>nul
:input
cls
title 多功能批处理 MADE by 公孙轩辕 QQ:327828994
cls
call :caidan
echo\&echo\&echo\
echo 请输入功能代号:
echo\
set sel=
set/p sel=
if "%sel%"=="" goto input
call :%sel%
if errorlevel 1 cls&msg * 输入错误的命令,想忽悠在下?&goto input
:use
call :select "IP Address" "ip"
call :select "DNS Servers" "dns"
call :select "Subnet Mask" "subnet"
call :select "Default Gateway" "gateway"
call :select "Physical Address" "phyaddr"
call :select "Dhcp Enabled" "dhcp"
goto :eof
:0
call :cl
cls
echo 获取网络信息……
call :use
cls
echo 自动获得IP:%dhcp%
echo 当前IP:%ip%
echo 当前DNS:%dns%
echo 网关:%gateway%
echo 子网掩码:%subnet%
ping 127.1>nul
call :cl
goto input
:1
title 设置静态IP
call :cl
cls
echo 请稍后……
call :use
@echo 正在设置静态IP地址……
netsh interface Ip set address "本地连接" source=static %ip% %subnet% %gateway% 1 >nul
@echo 静态IP地址设置成功,现在设置DNS地址……
Netsh interface IP set dns "本地连接" source=static %dns% both >nul
@echo DNS设置成功!
call :cl
call :0
:2
call :cl
cls
title 设置动态IP
@echo 开始设置动态IP地址……
NETSH INTERFACE ip set address "本地连接" source=dhcp >nul
@echo 设置动态IP地址成功!现在设置DNS……
NETSH INTERFACE ip set dns "本地连接" source=dhcp >nul
@echo 动态DNS地址设置成功!
call :0
:3
call :cl
cls
title QQ临时聊天
echo 请输入对方QQ号码:
echo\
set/p QQ=
start tencent://message/?uin=%QQ%
call :cl
goto input
:4
call :cl
cls
schtasks /query|find "每日" >nul
if errorlevel 1 echo 第一次使用需输入密码,无密码请直接按Enter键&echo\&echo (注意:输入错误的密码可能导致无法在正常时间运行)&goto not
if errorlevel 0 goto have
:not
echo call %windir%\everybat.bat :4 >%windir%\every.bat
SCHTASKS /create /ru %username% /st 22:00:00 /sc daily /tr %windir%\every.bat /tn 每日自动删除垃圾
:have
echo/&echo/
echo/
echo/
echo              ~正在删除COOKIES~~
del /f /s /q "%userprofile%\cookies\*.*"
echo/
echo/
echo               ~删除完成~
ping -n 2 127.1 >nul
echo/&echo/
echo/
echo/
echo               ~正在删除Temporary Internet Files~
del /f /s /q "%userprofile%\Local Settings\Temporary Internet Files\*.*"
rd /s /q "%userprofile%\Local Settings\Temporary Internet Files" & md "%userprofile%\Local Settings\Temporary Internet Files"
echo/&echo/
echo/
echo               ~删除完成~
ping -n 2 127.1 >nul
echo/&echo/
echo/
echo/
echo               ~正在删除IE TEMP~            
del /f /s /q "%userprofile%\Local Settings\Temp\*.*"
title     正在删除IE TEMP
echo/&echo/
echo/
echo               ~删除完成~
ping -n 2 127.1 >nul
echo/&echo/
echo/
echo/
echo               ~正在删除Windows TEMP~                       
del /f /s /q "%windir%\Temp\*.*"
echo/&echo/
echo/
echo               ~删除完成~
ping -n 2 127.1 >nul
echo/&echo/
echo/
echo/
echo               ~正在删除WINDOWS Prefetch~            
del /f /s /q "%windir%\Prefetch\*.*"
echo/&echo/
echo/
echo               ~删除完成~
ping -n 2 127.1 >nul
echo/&echo/
echo/
echo/
echo               ~正在删除Downloaded Program Files~   
title     正在删除Downloaded Program Files         
rd /q /s  "%windir%\Downloaded Program Files" &md "%windir%\Downloaded Program Files"
echo/&echo/
echo/
echo               ~删除完成~
ping -n 2 127.1 >nul
echo/&echo/
echo/
echo/
echo/&echo/
echo/
echo/
echo                ~正在清理缓存~  
SFC /PURGECACHE
echo/&echo/
echo/
echo/
echo/&echo/
echo/
echo/&echo/               ~清理系统缓存完成~
ping -n 2 127.1>nul
echo/&echo/
echo 已完成所有任务!
call :cl
goto input
:5
call :cl
cls
title 清理磁盘
cleanmgr
call :cl
goto input
:6
call :cl
cls
for /f "skip=1 tokens=1,2 delims=\" %%i in ('fsutil fsinfo drives^|find /v ""') do (
set drive=%%i
set drive=!drive:~-2!
echo 正在检查!drive!磁盘
title 正在检查!drive!磁盘
echo\&echo\
chkdsk  !drive! /v
)
ping -n 2 127.1>nul
call :cl
goto input
:7
title 定时关机
call :cl
cls
echo 当前时间:%date%,%time%
echo\&echo 请输入定时关机时间。(需24小时制,如23:30。:为英文标点。)
set tim=
set/p tim=
at %tim% /INTERACTIVE shutdown -s -t 10 >nul
if errorlevel 1 msg * 输入错误,请重新输入!&goto 7
echo 设置成功!
ping -n 2 127.1>nul
call :cl
goto input
:8
title 网速检测
call :cl
cls
echo 检查是否连接互联网……
ping -n 2 www.baidu.com>nul
if errorlevel 1 msg * 互联网连接不通,无法检测! &goto input
if errorlevel 0 echo 已连接互联网,开始检测……&ping -n 1 127.1>nul
cls
echo                             正在检测与中国电信的连接速度……&echo\
call :sudu www.chinatelecom.com.cn
set dx=%ave%
call :lost
echo                             正在检测与中国网通的连接速度……&echo\
call :sudu www.chinanetcom.com.cn
set wt=%ave%
call :lost
echo                             正在检测与百度的连接速度……&echo\
call :sudu www.baidu.com
set bd=%ave%
call :lost
echo                             正在检测与腾讯的连接速度……&echo\
call :sudu www.qq.com
set qq=%ave%
call :lost
echo                             正在检测与网易的连接速度……&echo\
call :sudu www.163.com
set wy=%ave%
call :lost
set /a ave1=(%dx%+%wt%+%bd%+%qq%+%wy%)/5
echo\&echo\
echo                                                                             总体平均速度 :%ave1% 毫秒
echo\&echo\
if %ave1% leq 80 echo                                                                             总体连接速度 ………… 优&goto textfinished
if %ave1% leq 150 echo                                                                            总体连接速度 ………… 良&goto textfinished
if %ave1% leq 250 echo                                                                            总体连接速度 ………… 中&goto textfinished
if %ave1% gtr 250 echo                                                                            总体连接速度 ………… 差&goto textfinished
:textfinished
echo\
echo                                                               检测完成!
ping 127.1>nul
call :cl
goto input
:9
call :cl
cls
title 查看系统详细信息
echo\&echo\ >>%file%\system.txt&echo\ >>%file%\system.txt
set/p=正在加载BISO信息……<nul
wmic bios get name,VERSION,Manufacturer >%systemdrive%\progra~1\XuanYuan\tempaa.txt
for /f "tokens=1,2,3,6,7,9,10,11 skip=1 delims= " %%i in ('TYPE %systemdrive%\progra~1\XuanYuan\tempaa.txt') do (
call :qc
echo BISO信息:
echo BISO信息: >%file%\system.txt
echo\&echo\ >>%file%\system.txt
echo     BIOS生产商  :%%i  %%j  %%k
echo     BIOS生产日期:%%l
echo     BIOS生产时间:%%m  
echo     BIOS版本:     %%o%%p  %%n
echo     BIOS生产商  :%%i  %%j  %%k >>%file%\system.txt
echo     BIOS生产日期:%%l >>%file%\system.txt
echo     BIOS生产时间:%%m   >>%file%\system.txt
echo     BIOS版本:     %%o%%p  %%n >>%file%\system.txt
)
set/p=正在加载CD-Rom信息……<nul
wmic cdrom get name,id,Manufacturer >%systemdrive%\progra~1\XuanYuan\tempaa.txt
call :qc
echo CD-Rom 信息 :
echo CD-Rom 信息 : >>%file%\system.txt
echo\&echo\ >>%file%\system.txt
echo     盘符      类型             名称
echo     盘符      类型             名称 >>%file%\system.txt
echo\&echo\ >>%file%\system.txt
echo\ >>%file%\system.txt
for /f "skip=1 tokens=1,2,3 delims=  " %%i in ('type %systemdrive%\progra~1\XuanYuan\tempaa.txt') do (
echo     %%i    %%j
echo     %%i    %%j >>%file%\system.txt
echo\&echo\ >>%file%\system.txt
echo\ >>%file%\system.txt
)
set/p=正在加载系统管理信息……<nul
wmic computersystem get name,username,domain >%systemdrive%\progra~1\XuanYuan\tempaa.txt
call :qc
echo 系统管理信息:
echo 系统管理信息:>>%file%\system.txt
echo\&echo\ >>%file%\system.txt
for /f "skip=1 tokens=1,2,3 delims= " %%i in ('type %systemdrive%\progra~1\XuanYuan\tempaa.txt') do (
echo    主机名:         %%j
echo    当前用户:       %%k
echo    登陆域:         %%i
echo    主机名:         %%j >>%file%\system.txt
echo    当前用户:       %%k >>%file%\system.txt
echo    登陆域:         %%i >>%file%\system.txt
)
set/p=正在加载处理器信息……<nul
wmic cpu get Name,Version,DeviceID,MaxClockSpeed >%systemdrive%\progra~1\XuanYuan\tempaa.txt
call :qc
echo 处理器信息:
echo 处理器信息: >>%file%\system.txt
echo\&echo\ >>%file%\system.txt
echo      ID      频率(MHZ)       名称                                版本   
echo      ID      频率(MHZ)       名称                                版本  >>%file%\system.txt
echo\&echo\ >>%file%\system.txt&echo\ >>%file%\system.txt
call :fo
set/p=正在加载用户桌面信息……<nul
wmic desktop get Name,ScreenSaverExecutable,ScreenSaverTimeout >%systemdrive%\progra~1\XuanYuan\tempaa.txt
call :qc
echo 桌面信息:
echo 桌面信息: >>%file%\system.txt
echo\&echo\ >>%file%\system.txt
echo     用户                                 屏保地址               屏保等待时间(秒)
echo     用户                                 屏保地址               屏保等待时间(秒) >>%file%\system.txt
echo\&echo\ >>%file%\system.txt&echo\ >>%file%\system.txt
call :fo
set/p=正在加载显示器信息……<nul
wmic desktopmonitor get Caption,MonitorManufacturer,PixelsPerXLogicalInch,ScreenHeight,ScreenWidth >%systemdrive%\progra~1\XuanYuan\tempaa.txt
call:qc
echo 显示器信息:
echo 显示器信息: >>%file%\system.txt
echo\&echo\ >>%file%\system.txt
echo     名称                     类型       大小(dpi)              高像素         宽像素
echo     名称                     类型       大小(dpi)              高像素         宽像素 >>%file%\system.txt
echo\&echo\ >>%file%\system.txt&echo\ >>%file%\system.txt
call :fo
set/p=正在加载硬盘信息……<nul
wmic DISKDRIVE get Caption,Manufacturer, Size >%systemdrive%\progra~1\XuanYuan\tempaa.txt
call :qc
echo 硬盘信息:
echo 硬盘信息: >>%file%\system.txt
echo\&echo\ >>%file%\system.txt
echo     名称                    型号            大小(KB)
echo     名称                    型号            大小(KB) >>%file%\system.txt
echo\&echo\ >>%file%\system.txt&echo\ >>%file%\system.txt
call :fo
set/p=正在加载磁盘分区信息……<nul
wmic LOGICALDISK get Caption,Description,FileSystem,FreeSpace,Size,VolumeName >%systemdrive%\progra~1\XuanYuan\tempaa.txt
call :qc
echo 磁盘分区信息:
echo 磁盘分区信息: >>%file%\system.txt
echo\&echo\ >>%file%\system.txt
echo     分区       类型        格式        剩余大小(KB) 总大小(KB)  标卷
echo     分区       类型        格式        剩余大小(KB) 总大小(KB)  标卷 >>%file%\system.txt
echo\&echo\ >>%file%\system.txt&echo\ >>%file%\system.txt
call :fo
set/p=正在加载系统信息……<nul
wmic OS get Caption,CSDVersion,TotalVirtualMemorySize,TotalVisibleMemorySize >%systemdrive%\progra~1\XuanYuan\tempaa.txt
call :qc
echo 系统信息:
echo 系统信息: >>%file%\system.txt
echo\&echo\ >>%file%\system.txt
echo     系统                                  版本         物理内存(KB)          虚拟内存(KB)
echo     系统                                  版本         物理内存(KB)          虚拟内存(KB) >>%file%\system.txt
echo\&echo\ >>%file%\system.txt&echo\ >>%file%\system.txt
call :fo
set/p=正在加载共享信息……<nul
wmic SHARE get Caption, Name,Path >%systemdrive%\progra~1\XuanYuan\tempaa.txt
call :qc
echo 共享信息:
echo 共享信息: >>%file%\system.txt
echo\&echo\ >>%file%\system.txt
echo     项目      名称     路径
echo     项目      名称     路径 >>%file%\system.txt
echo\&echo\ >>%file%\system.txt&echo\ >>%file%\system.txt
for /f "skip=1 tokens=1,* delims= " %%i in ('type %systemdrive%\progra~1\XuanYuan\tempaa.txt') do (
echo     %%i     %%j
echo     %%i     %%j >>%file%\system.txt
)
pause
del /f %systemdrive%\progra~1\XuanYuan\tempaa.txt >nul
start %file%\system.txt
goto input
:10
title 系统优化
call :cl
cls
@echo 加快搜索网上邻居的速度
@reg delete HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\Explorer\RemoteComputer\NameSpace /f
@echo 去掉右键“新建”中的RTF
@reg delete HKEY_CLASSES_ROOT\.rtf /v ShellNew /f
@echo 加速开机时间
@reg add "HKEY_LOCAL_MACHINE\SYSTEM\ControlSet001\Control\" /v "SystemStartOptions" /t reg_sz /d NODETECT /f
@echo 卸载无用DLL
@reg add "HKEY_LOCAL_MACHINE\SOFTWARE\MicrosoftWindowsCurrentVersion\explorer\" /v "AlwaysUnloadDLL" /t REG_DWORD /d 1 /f
@echo 禁止更改主页设置
@reg add "HKEY_CURRENT_USER\Software\Policies\Microsoft\Internet Explorer\Control Panel" /v "HomePage" /t reg_DWORD /d 00000001 /f
@echo 取消快捷方式的箭头
@reg add "HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Explorer" /v "Link" /t reg_binary /d 00 00 00 00 /f
@echo 关闭华医生
@reg add "HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows NT\CurrentVersion\AeDebug" /v "AUTO" /t reg_sz /d 0 /f
@echo 加速程序运行
@reg add "HKEY_LOCAL_MACHINE\SYSTEM\CurrentControlSet\Control\FileSystem" /v "ConfigFileAllocSize" /t reg_dword /d 000001f4 /f
@echo 关闭错误报告
@reg add "HKEY_LOCAL_MACHINE\SYSTEM\CurrentControlSet\Services\ERSvc" /v "Start" /t reg_dword /d 00000003 /f
@echo 关闭WEBCLINT服务
@reg add "HKEY_LOCAL_MACHINE\SYSTEM\CurrentControlSet\Services\WebClient" /v "Start" /t reg_dword /d 00000003 /f
@echo 硬件优化
@reg add "HKEY_LOCAL_MACHINE\SYSTEM\CurrentControlSet\Services\Vxd\BIOS" /v "CPUPriority" /t reg_dword /d 00000001 /f
@echo 停止磁盘空间不足警告
@reg add "HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\policies\Explorer" /v "NoLowDiskSpaceChecks" /t reg_dword /d 00000001 /f
@echo 关闭TIME服务
@reg add "HKEY_LOCAL_MACHINE\SYSTEM\CurrentControlSet\Services\W32Time" /v "Start" /t reg_dword /d 00000004 /f
@echo 禁止自动打开默认共享
@reg add "HKEY_LOCAL_MACHINE\SYSTEM\CurrentControlSet\Services\lanmanServer\parameters" /v "AutoShareServer" /t reg_dword /d 00000000 /f
@echo 禁止自动共享
@reg add "HKEY_LOCAL_MACHINE\SYSTEM\CurrentControlSet\Services\lanmanServer\parameters" /v "AutoShareWks" /t reg_dword /d 00000000 /f
@echo 关闭XP漫游
@reg add "HKEY_LOCAL_MACHINE\Software\Microsoft\Windows\CurrentVersion\Applets\Tour" /v "RunCount" /t reg_dword /d 00000000 /f
@reg add "HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Applets\Tour" /v "RunCount" /t reg_dword /d 00000000 /f
@echo 关闭XP信使服务
@reg add "HKEY_LOCAL_MACHINE\SYSTEM\CurrentControlSet\Services\Messenger" /v "Start" /t reg_dword /d 00000004 /f
@echo 关闭光盘自动运行
@reg add "HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Policies\Explorer" /v "NoDriveTypeAutoRun" /t reg_multi_sz /d 91,00,00,00 /f
@echo 关闭自动重启
@reg add "HKEY_LOCAL_MACHINE\SYSTEM\CurrentControlSet\Control\CrashControl" /v "AutoReboot" /t reg_dword /d 00000000 /f
@echo 加速屏幕刷新率
@reg add "HKEY_LOCAL_MACHINE\ystem\CurrentControlSet\Control\Update\" /v "UpdateMode" /t reg_sz /d 0 /f
@echo 加速窗口显示
@reg add "HKEY_CURRENT_USER\Control Panel\Desktop\WindowMetrics" /v "MinAniMate" /t reg_sz /d 0 /f
@echo 禁止启动时自动弹出错误信息
@reg add "HKEY_LOCAL_MACHINE\SYSTEM\CurrentControlSet\Control\Windows" /v "NoPopUpsOnBoot" /t reg_sz /d 1 /f
@echo 系统启动失败不写入系统日志
@reg add "HKEY_LOCAL_MACHINE\SYSTEM\ControlSet001\Control\CrashControl" /v "LogEvent" /t reg_dword /d 00000000 /f
@echo 不发送管理警报
@reg add "HKEY_LOCAL_MACHINE\SYSTEM\CurrentControlSet\Control\CrashControl" /v "SendAlert" /t reg_dword /d 00000000 /f
@echo 禁止远程修改注册表
@reg add "HKEY_LOCAL_MACHINE\SYSTEM\CurrentControlSet\Control\SecurePipeServers\winreg" /v "RemoteRegAccess" /t reg_dword /d 00000001 /f
@echo 未知文件直接选择打开方式
@reg add "HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\policies\system" /v "NoInternetOpenWith" /t reg_dword /d 00000001 /f
@echo 始终显示扩展名
reg add "HKCU\Software\Microsoft\Windows\CurrentVersion\Explorer\Advanced" /v HideFileExt /t reg_dword /d 00000000 /f
@echo 禁止保留文档记录
@REG ADD "HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Policies\Explorer" /V NORECENTDOCSHISTORY /T REG_DWORD /D 1 /F
@echo 关闭桌面清理向导
@reg add "HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Explorer\Desktop\CleanupWiz" /v "NoRun" /t reg_dword /d 00000001 /f
@echo 开启小键盘
@reg add "HKEY_USERS\.DEFAULT\Control Panel\Keyboard" /v "InitialKeyboardIndicators" /t reg_sz /d 2 /f
@echo 在系统属性里显示更多CPU信息
@reg add "HKEY_LOCAL_MACHINE\Hardware\Description\System\CentralProcessor\0 " /v "VendorIdentifier" /t reg_sz /d "Genuine Intel" /f
@echoIE的起始页面改为空白页
@reg add "HKEY_USERS\.DEFAULT\Software\Microsoft\Internet Explorer\Main " /v "Start page" /t reg_sz /d about:blank /f
@echo 扩充回收站右键功能
@reg add "HKEY_CLASSES_ROOT\CLSID\{645FF040-5081-101B-9F08-00AA002F954E}\ShellFolder" /v "Attributes" /t reg_dword /d 10 01 00 20  /f
@echo CD四倍加速
@reg add "HKEY_LOCAL_MACHINE\System\CurrentControlSet\Control\FileSystem\CDFS" /v "Prefetch" /t reg_dword /d 00000004 /f
@echo 快速关机
@reg add "HKEY_LOCAL_MACHINE\System\CourrentControlSet\Control\Shutdown" /v "FastReboot" /t reg_sz /d 1 /f
echo 解锁注册表
@reg  add "HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Policies\System" /v DisableRegistryTools /t reg_dword /d 00000000 /f
@echo 关闭XP自带ZIP支持
regsvr32 /u /s zipfldr.dll
echo ………………………………OK
@echo 关闭非法光机后的硬盘扫描
chkntfs /t:0
echo ………………………………OK
@echo 关闭远程连接的默认共享
@net share IPC$ /del
echo\
echo\
echo 优化完成!
call :cl
goto input
:11
title 显示局域网共享资源
call :cl
cls
for /f "tokens=1 delims=\\" %%i in ('net view^|find "\\"') do (
echo %%i >>%systemdrive%\progra~1\XuanYuan\share.txt
net view %%i
net view %%i >>%systemdrive%\progra~1\XuanYuan\share.txt
)
call :cl
start %systemdrive%\progra~1\XuanYuan\share.txt
goto input
:12
call :cl
cls
rundll32.exe user32.dll,LockWorkStation
goto input
:13
call :cl
cls
echo   进程                   路径  >%systemdrive%\progra~1\XuanYuan\tempa.txt
for /l %%i in (0,1,15) do echo\
echo                                     正在获取中……
wmic process get Caption,CommandLine >%systemdrive%\progra~1\XuanYuan\tempaa.txt
for /f "tokens=* skip=1" %%i in ('type %systemdrive%\progra~1\XuanYuan\tempaa.txt') do (
if not "%%i"=="" (
echo   %%i >>%systemdrive%\progra~1\XuanYuan\tempa.txt)
)
call :cl
start %systemdrive%\progra~1\XuanYuan\tempa.txt
goto input
:14
call :cl
cls
echo\&echo\&echo\&echo\&echo\
set/p=            <nul
@for /l %%b in (0,1,32) do (
@set ",=★多功能批处理由公孙轩辕制作,QQ:327828994。欢迎使用!"
set/p=!,:~%%b,1!<nul
set/p= ★<nul
for /l %%l in (1,1,600) do ver>nul
set/p=<nul)
for /l %%l in (1,1,1500) do ver>nul
echo\
echo\&echo\&echo\&echo\&echo\
set/p=             <nul
for /l %%i in (0,1,14) do (
set ",=获取本产品更多信息,请到 : "
set/p=!,:~%%i,1!<nul
for /l %%l in (1,1,600) do ver>nul
)
for /l %%a in (0,1,29) do (
set,=http://hi.baidu.com/huajinghua
set/p=!,:~%%a,1!<nul
for /l %%a in (1,1,500) do ver>nul
)
for /l %%a in (1,1,5000) do ver>nul
for /l %%i in (0,1,3) do (
for /l %%a in (0,1,29) do set/p=<nul
for /l %%a in (1,1,2000) do ver>nul
for /l %%a in (0,1,29) do set/p= <nul
for /l %%a in (1,1,2000) do ver>nul
for /l %%a in (0,1,29) do set/p=<nul
set/p=http://hi.baidu.com/huajinghua<nul
)
for /l %%i in (0,1,2) do (
for /l %%a in (0,1,29) do (
set/p=<nul
set/p= <nul
set/p=<nul
for /l %%i in (1,1,100) do ver>nul)
for /l %%i in (0,1,29) do (
set,=http://hi.baidu.com/huajinghua
call set/p=!,:~%%i,1!<nul
for /l %%a in (1,1,500) do ver>nul
))
for /l %%i in (0,1,2) do (
for /l %%a in (0,1,29) do set/p=<nul
for /l %%i in (0,1,29) do (
set/p= http://hi.baidu.com/huajinghua<nul
for /l %%a in (1,1,600) do ver>nul
for /l %%a in (0,1,29) do set/p=<nul
)
for /l %%i in (0,1,30) do (
set/p=http://hi.baidu.com/huajinghua <nul
for /l %%a in (1,1,600) do ver>nul
for /l %%a in (0,1,31) do set/p=<nul
)
set/p= http://hi.baidu.com/huajinghua<nul
)
echo\&echo\&echo\&echo\&echo\
set/p=                               按任意键返回主菜单<nul
pause >nul
goto input
:fo
for /f "skip=1 tokens=* delims= " %%i in ('type %systemdrive%\progra~1\XuanYuan\tempaa.txt') do (
echo     %%i
echo     %%i  >>%file%\system.txt
)
goto :eof
:select
ipconfig/all >%systemdrive%\progra~1\XuanYuan\ip.txt
for /f "tokens=2 delims=:" %%i in ('findstr /i /c:%1 %systemdrive%\progra~1\XuanYuan\ip.txt') do set "%~2=%%i"
goto :eof
:sudu
ping -n 3 %1 >%systemdrive%\progra~1\XuanYuan\ping.txt
for /f "tokens=3,6,9 delims=, " %%i in ('find /i "mini" %systemdrive%\progra~1\XuanYuan\ping.txt') do (
set min=%%i
set max=%%j
set ave=%%k
set min=!min:~0,-2!
set max=!max:~0,-2!
set ave=!ave:~0,-3!
echo 最小延迟 :!min! 毫秒
echo 最大延迟 :!max! 毫秒
echo 平均延迟 :!ave! 毫秒
if !ave! leq 80 echo 连接速度 ………… 优&goto :eof
if !ave! leq 150 echo 连接速度 ………… 良&goto :eof
if !ave! leq 250 echo 连接速度 ………… 中&goto :eof
if !ave! gtr 250 echo 连接速度 ………… 差&goto :eof
echo\)
goto :eof
:lost
for /f "tokens=11 delims= " %%i in ('find /i "lost" %systemdrive%\progra~1\XuanYuan\ping.txt') do (
set lo=%%i
set lo=!lo:~1!)
echo 丢包率  :       %lo%
goto :eof
:qc
for /l %%i in (1,1,100) do set/p=<nul
for /l %%i in (1,1,100) do set/p= <nul
echo\&echo\ >>%file%\system.txt
goto :eof
:caidan
echo\&echo\&echo\&echo\&echo                            多功能批处理 MADE BY 公孙轩辕 QQ:327828994
echo\&echo\&echo                                             ★菜单★ &echo\
echo                ======================================================================
echo                $                                                                    $
echo                $       0=查看本地连接详细信息                                       $
echo                $                                                                    $
echo                $       1=固定IP地址                       2=设置动态IP              $
echo                $                                                                    $
echo                $       3=发起QQ临时会话                   4=每日定时清理系统垃圾    $
echo                $                                                                    $
echo                $       5=清理磁盘                         6=检查硬盘错误            $
echo                $                                                                    $
echo                $       7=定时关机                         8=网速测试                $
echo                $                                                                    $
echo                $       9=查看电脑详细信息                 10=常用系统优化           $
echo                $                                                                    $
echo                $       11=显示局域网上的所有共享资源      12=锁定计算机             $
echo                $                                                                    $
echo                $       13=查看系统进程及路径              14=产品广告动画           $
echo                $                                                                    $
echo                ======================================================================
echo\&echo\
echo                                           (注释:等号左边的为功能代号,请输入左边的的代号!)  
goto :eof
:cl
for /l %%i in (1,1,40) do (
echo\
for /l %%a in (1,1,250) do ver>nul
)
goto :eof  
:zb
ver|find /i "XP" >nul
if errorlevel 1 msg * 抱歉!当前只支持XP系统。&exit
if not exist %systemdrive%\progra~1\XuanYuan md %systemdrive%\progra~1\XuanYuan>nul
echo %date%%time% >%systemdrive%\progra~1\XuanYuan\使用日志.txt
if exist %systemdrive%\progra~1\XuanYuan\tempaa.txt del /f %systemdrive%\progra~1\XuanYuan\tempaa.txt >nul
if exist %systemdrive%\progra~1\XuanYuan\tempa.txt del /f %systemdrive%\progra~1\XuanYuan\tempa.txt >nul
if exist %systemdrive%\progra~1\XuanYuan\ping.txt del /f %systemdrive%\progra~1\XuanYuan\ping.txt
if exist %systemdrive%\progra~1\XuanYuan\ip.txt del /f %systemdrive%\progra~1\XuanYuan\ip.txt >nul
if not exist %windir%\everybat.bat copy "%~f0" %windir%\everybat.bat >nul
if exist %systemdrive%\progra~1\XuanYuan\share.txt del /f %systemdrive%\progra~1\XuanYuan\share.txt>nul
goto :eof
产品更新信息:
======================
1. 去除了开始的动画改为自己查看
2. 建立自己的program files目录,使产品运行更加安全
3. 在更新2的基础上优化了代码。使程序运行加速
4. 修改产品9的功能查看系统信息改为查看电脑信息。更加齐全了资料。能显示BIOS,显示器,CPU等信息
5. 增加了查看系统进程和路径功能,显示出更多的进程,以防隐藏进程。
======================
谢谢您的支持!
                                                   --------公孙轩辕
                                                      13:36 2008-4-5COPY
1

评分人数

【新青年世界】
windows+R
cmd
start http:/hi.baidu.com/huajinghua

还没下,不过我还是会顶滴~~~~~~~~~
@set,=学无止境
@for /l %%b in (0,1,6) do @call set/p= %%,:~%%b,1%%<nul

TOP

顶,学了很多东西,楼主好人

TOP

很强大的样子,赞的!!!

TOP

没理由不回贴~ 好~

TOP

我下了个,很不错的东西,哈哈

TOP

非常不错!看到介绍就想流口水,呵呵

TOP

貌似很强大~
能公布下原代码吗?

TOP

代码那么多,看糊涂了
学习

TOP

下载了一定要回帖!!¬

TOP

好好,多谢,我拿去研究。

TOP



非常不错!看到介绍就想流口水

TOP

谢谢啦,新手正学习

TOP

挖塞!!LZ真是人才啊。  这个功能就强大了!!要是给别人装系统时直接输入10就能优化了。。免去了手动操做的麻烦了!!

TOP

我是新手下来看一看好看不你真强大啊

TOP

返回列表