@ECHO off
TITLE 爱情程序 作者:sky
:start
CLS
COLOR 1f
rem 使用COLOR命令对控制台输出颜色进行更改
MODE con: COLS=60 LINES=10
setlocal enabledelayedexpansion
:Main
cls
set day=%date%
set days=0
echo.&echo.
echo       今天时间是：%day%
echo.
rem ========把指定日期转换为天数========

for /f "tokens=1-3 delims=-/. " %%i in ("%day%") do (
    set /a sy=%%i, sm=100%%j %% 100, sd=100%%k %% 100
)

for /l %%i in (1,1,%sy%) do (
    set /a leap="^!(%%i %% 4) & ^!(^!(%%i %% 100)) | ^!(%%i %% 400)"
    set /a days=days+365+leap
)
:: (733874是初始天数设定）
set /a num=0, mday=0, max=28+leap
set str=0 31 %max% 31 30 31 30 31 31 30 31 30
for %%i in (%str%) do (
    set /a num+=1
    if !num! leq !sm! set /a mday+=%%i
)
set /a days=days+mday+sd-733874
set /a days-=input

echo       我爱你的时间是：%days% 天
pause>nul
goto Main
复制代码