标题: [求助]求助求助帮我改一下东西~谢谢 [打印本页]
作者: wzmlikelove 时间: 2008-4-21 20:31 标题: [求助]求助求助帮我改一下东西~谢谢
@echo off
:: 模拟进度，有剩余时间、已完成进度、进度条的显示
:: code by bg 2006-10-8 CMD@XP
color 1f
title.
mode con lines=10
rem 进度条 ▉▉▉▉▉
set work=0
set n=0
set mo=0
set number=0
rem all是总数
set all=60
set time=%all%
:show
:check
if %number% GTR %mo% set num=%num%▉&set /a mo=%mo%+1&goto check
:2
cls
echo 进度： %n% / %all% 剩余时间:%time%秒
echo.
echo.
echo 完成 %work% %%%
echo.
if not "%num%"=="" echo %num%
if not "%num%"=="" echo %num%
if %work%==100 goto end
ping 127.1 -n 1 >nul
set /a n=%n%+1
set /a time=%all%-%n%
set /a work=(%n%)*100/(%all%)
set /a number=%work%/3
set /a number=%number%+1
goto show
endlocal
:end
endlocal
pause>nul
exit
@echo off
:: code by jm 2006-11-30 CMD@XP
set var=">"
set/p=正在加载： <nul
ping -n 2 127.1>nul
for /l %%i in (1,1,20) do (
set/p=%var%<nul
ping -n 2 127.1>nul
)
echo.
echo.
pause
********************************************************
我想把上面这段放入下面这段我的批处理的前面，可是我试了好多次都不成功，希望各位大哥帮小弟一把！不胜感谢呀！
************************start
@echo off
title 自用批处理优化脚本 by:紫茗
color 0b
mode con cols=60 lines=30
echo 今天：%date% %time%
echo._____________________________________________________
echo.▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓
echo.§ ▓ §
echo.§ ▓ §
echo.§ ①网吧版服务优化 ▓ A:清理系统垃圾 §
echo.§ ②必要的注册表优化 ▓ §
echo.§ ③关闭危险的端口 ▓ §
echo.§ ④更改IE标题栏 ▓ §
echo.§ ⑤结束指定进程 ▓ §
echo.§ ⑥永久关闭默认共享 ▓ §
echo.§ ⑦修改IP网关DNS ▓ §
echo.§ ⑧重命名admin帐号 ▓ §
echo.§ ⑨查看进程使用的端口 ▓ §
echo.§ ▓ §
echo.§ ▓ §
echo.§ ▓ §
echo.§ ▓ §
echo.▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓
echo._____________________________________________________
SET Choice=
SET /P Choice=选择对应的序号,按回车就可以了:
IF NOT "%Choice%"=="" SET Choice=%Choice:~0,1%
IF /I "%Choice%"=="1" GOTO services
IF /I "%Choice%"=="2" GOTO reg
IF /I "%Choice%"=="3" GOTO duankou
IF /I "%Choice%"=="4" GOTO ie
IF /I "%Choice%"=="5" GOTO taskkill
IF /I "%Choice%"=="6" GOTO gongxiang
IF /I "%Choice%"=="7" GOTO ip
IF /I "%Choice%"=="8" GOTO gaiming
IF /I "%Choice%"=="9" GOTO kanduankou
IF /I "%Choice%"=="a" GOTO lj
IF /I "%Choice%"=="B" GOTO renipdns
IF /I "%Choice%"=="B" GOTO 修改XP计算机名
IF /I "%Choice%"=="C" GOTO 更改硬盘盘符
IF /I "%Choice%"=="D" GOTO findjc
IF /I "%Choice%"=="E" GOTO killjincheng
IF /I "%Choice%"=="F" GOTO 重命名administrator
IF /I "%Choice%"=="G" GOTO 察看硬件信息
IF /I "%Choice%"=="H" GOTO 全盘查找并清理指定文件
IF /I "%Choice%"=="I" GOTO kuozhan
IF /I "%Choice%"=="J" GOTO 注册表文件转批处理
IF /I "%Choice%"=="K" GOTO SXS.exe专杀
IF /I "%Choice%"=="L" GOTO fuwuyh
IF /I "%Choice%"=="M" GOTO zhucebiao
:lj
@echo off
echo ******************************************************
echo 等一下，一会儿就好 ……
@del /f /s /q %systemdrive%\\*.tmp
@del /f /s /q %systemdrive%\\*._mp
@del /f /s /q %systemdrive%\\*.log
@del /f /s /q %systemdrive%\\*.gid
@del /f /s /q %systemdrive%\\*.chk
@del /f /s /q %systemdrive%\\*.old
@del /f /s /q %systemdrive%\\recycled\\*.*
@del /f /s /q %windir%\\*.bak
@del /f /s /q %windir%\\prefetch\\*.*
@rd /s /q %windir%\\temp & md %windir%\\temp
@del /f /q %userprofile%\\cookies\\*.*
@del /f /q %userprofile%\\recent\\*.*
@del /f /s /q "%userprofile%\\Local Settings\\Temporary Internet Files\\*.*"
@del /f /s /q "%userprofile%\\Local Settings\\Temp\\*.*"
@del /f /s /q "%userprofile%\\recent\\*.*"
echo 清理完毕……
echo ***************************************************************************************
作者: wzmlikelove 时间: 2008-4-22 15:54
大家帮帮我呀。我只不过是想加个进度条
作者: general3154 时间: 2008-5-15 00:11
@echo off
mode con cols=113 lines=15 &color 9f
cls
echo.
echo 程序正在初始化. . .
echo.
echo ┌──────────────────────────────────────┐
set/p= ■<nul
for /L %%i in (1 1 38) do set /p a=■<nul&ping /n 1 127.0.0.1>nul
echo 100%%
echo └──────────────────────────────────────┘
pause
解说：“set /p a=■<nul”的意思是：只显示提示信息“■”且不换行，也不需手工输入任何信息，这样可以使每个“■”在同一行逐个输出。“ping /n 0 127.1>nul”是输出每个“■”的时间间隔，即每隔多少时间输出一个“■”。