hanyeguxing

回复 10# liupeng386

@echo off
:Y
setlocal enabledelayedexpansion
set X=20120209&set "Y=!X!"
if "%Y:~7,1%"=="" goto:E
if "%Y:~8%" neq "" goto:E
for /l %%a in (0,1,9) do if defined Y set "Y=!Y:%%a=!"
if defined Y goto:E
set /a Y=1%X:~0,4%-10000,M=1%X:~4,2%-100,D=1%X:~6,2%-100,"E=31+(M-M/8)%%2+^!(M-2)*(^!(Y%%4)&^!(^!(Y%%100))|^!(Y%%400)-2)","K=^!^!M&^!^!D&^!(M/13)&^!(D/E)&^!(Y/2201)&^!^!(Y/1801)"
if %K%==0 goto:E
pause&exit
:E
echo 出错&pause&endlocal&goto:Y
复制代码