中国DOS联盟

@echo off&setlocal enabledelayedexpansion

SET/a TT=62

:start

set p1=%date:~0,4%

set p2=%date:~5,2%

set p3=%date:~8,2%

for /l %%a in (1,1,3) do (

for /f "delims=0 tokens=*" %%i in ("!p%%a!") do set p%%a=%%i

)

if %p3% gtr %TT% goto ppp

:nxt

set/a p2-=1

if %p2% equ 0 set/a p1-=1&&set p2=12

SET/a PN1=%p1%%%4

set PN2=28

if %PN1% EQU 0 set pN2=29

for /f "tokens=%p2%" %%i in ("31 %pN2% 31 30 31 30 31 31 30 31 30 31") do set/a p3=%p3%+%%i

if %p3% leq %tt% goto nxt

:ppp

set/a p3=%p3%-%tt%

set p2=0%p2%

set p2=%p2:~-2,2%

set p3=0%p3%

set p3=%p3:~-2,2%

echo %p1%%p2%%p3%

SET/a TT-=1

if %tt% neq 0 goto start

pause