中国DOS联盟

呵呵。看了大家的脚本。深受启发。
于是写了这个玩。。
希望高手给我启发。。帮我精简代码。哈哈。

@echo off
set Year=%date:~4,4%
set /p y=请输入年份^>
call :SETYEAR %y%
if "%Isyear%"=="true" (
echo %y%是闰年
) else (
echo %y% 是平年
)
goto exit
:SETYEAR Inputyear
set Isyear=false
set /a Case_1_Year=%1 %% 4
set /a Case_2_Year=%1 %% 100
set /a Case_3_Year=%1 %% 400
if "%Case_2_Year%"=="0" (
if "%Case_3_Year%"=="0" (
set Isyear=true
goto :EOF
)
goto :EOF
)
if "%Case_1_Year%"=="0" set Isyear=true
goto :EOF
:exit
pause

@echo off
set /p y=请输入年份^>
set /a a=%y% %% 4
set /a b=%y% %% 100
set /a c=%y% %% 400
if "%a%"=="0" (
if not "%b%"=="0" goto :run
if "%c%"=="0" goto :run
goto :ping
) else goto :ping

:run
echo %y% 是闰年.
pause

:ping
echo %y% 是平年.
pause