中国DOS联盟

@echo off&color 4a&mode con cols=35 lines=4

title 暂停使用ctrl+s键，任意键启动

set a=0&set b=0&set c=0&set d=0

for /l %%i in (1,1,100) do call,set cls=%%cls%%

echo.

:begin

set /a e+=1

if %e% equ 2 set e=0&set /a d+=1

if %d% equ 100 set d=0&set /a c+=1

if %c% equ 60 set c=0&set /a b+=1

if %b% equ 60 set b=0&set /a a+=1

if %b% lss 10 (

   if %c% lss 10 (

                 set /p=        　　%a%:0%b%:0%c%.%d%<nul

   ) else (

          set /p=        　　%a%:0%b%:%c%.%d%<nul

          ) 

) else ( 

        if %c% lss 10 (

                      set /p=        　　%a%:%b%:0%c%.%d%<nul

        ) else (

               set /p=        　　%a%:%b%:%c%.%d%<nul

               )

)          

set /p=%cls%<nul

goto begin

@echo off&title CtrL+s 键暂停，任意键启动

color 4a&mode con cols=35 lines=4&echo.

for /l %%i in (1,1,100) do call,set cls=%%cls%%

:loop

  set /a d=(d+1)%%100,c=(c+!d)%%60,b+=!(c+d),a+=!(b+c+d)

  for %%a in (a b c d) do call set a%%a=0%%%%a%%

  set /p=           %aa:~-2%:%ab:~-2%:%ac:~-2%.%ad:~-2%<nul

  set /p=%cls%<nul

goto loop