中国DOS联盟

写了一个...
昏倒....发了之后才发现是旧帖子....汗死...

@echo off

set str=^-^|^/^-^|^/

set f=1

set /a i=1

cls

setlocal enabledelayedexpansion

:test

     ping /n 1 127.1>nul

     if "%f%" == "1" (

       set/p=!str:~%i%,1!<nul 

       set f=0

       if "%i%" == "6" (set/a i=0) else (set/a i+=1)

       goto :test

      ) 

     :: echo %f% &pause

     set/p=<nul 

     set f=1

     goto :test

pause>nul

[ Last edited by crenel on 2007-4-16 at 04:15 PM ]

很有意思,收下了

@echo off

rem qwe1234567 字符动画



setlocal enabledelayedexpansion

set b=\^|/-\^|/-

set 速度=1



rem ASCII码的08就是退格特殊控制符

set 退格=





:b

for /l %%i in (0,1,200) do call :a %%i

goto :b

:a

set/a a=%1%%4

set/p=!b:~%a%,1!<nul

ping/n %速度% 127.1>nul

set/p=%退格%<nul

goto :eof

美化下redtek转动动画的效果:) 挖坟墓会不会被- -?

强啊！！！！！！！！！！！！！！！！！！！

你想要的是这种效果吧．

@echo off
:: 模拟进度，有剩余时间、已完成进度、进度条的显示
:: code by bg 2007-05-12 CMD@XP
color 2f
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

LS的高手好多啊

ding.,........shuo bu chu shen me l

强人

谢谢分享，学习啊

精彩！

@echo off
:kk
set /p=^\<nul
ping -n 1 127.0.0.1>nul
cls
set /p=^|<nul
ping -n 1 127.0.0.1>nul
cls
set /p=^/<nul
ping -n 1 127.0.0.1>nul
cls
goto kk

不错

看看~~~~~~~~~~~~~~~~~