The effect made by redtek is exactly what I wanted to say, thanks.
Union site: www.cn-dos.net Forum site: www.cn-dos.net/forum
DOS stands for freedom, openness and progress. Let us work hard, learn from the openness and GNU spirit of FreeDOS and Linux, and together build and grow a free GNU GPL world!
DigestI
View 24,454 Replies 57
Originally posted by 9527 at 2006-10-31 01:58:
Still the same sentence---it's all my fault, I shouldn't have drawn conclusions so early...
| Rater | Score | Time |
|---|---|---|
| redtek | +2 | 2006-10-31 02:37 |
Originally posted by kawakumo at 2006-10-31 04:21:
I don't know how to implement the effects of youxi01 and redtek in the same line?
[ Last edited by kawakumo on 2006-10-31 at 04:22 AM ]
| Rater | Score | Time |
|---|---|---|
| redtek | +2 | 2006-10-31 06:34 |
@echo off
setlocal enabledelayedexpansion
set b=/-\ /-\ **
set 速度=1
set 退格=
:b
for /l %%i in (0,1,200) do call :a %%i
goto :b
:a
set/a a=%1%%10
set/a c=%a%%%4
if %a% EQU 0 set/p=.<nul
if %c% EQU 3 (set/p=^|<nul) else (set/p=!b:~%a%,1!<nul)
ping/n %速度% 127.1>nul
set/p=%退格%<nul
goto :eof