[新手上路]批处理新手入门导读[视频教程]批处理基础视频教程[视频教程]VBS基础视频教程[批处理精品]批处理版照片整理器
[批处理精品]纯批处理备份&还原驱动[批处理精品]CMD命令50条不能说的秘密[在线下载]第三方命令行工具[在线帮助]VBScript / JScript 在线参考
返回列表 发帖
给你代码,我也要分
  1. @echo off & setlocal enabledelayedexpansion
  2. set /a "p=1990-1+400,di1990_1_1=1990*365+p/4-p/100+p/400"
  3. for %%a in (y m d) do set /p "%%a=%%a: "
  4. set /a "p=y-1+400,m-=1,r=-di1990_1_1+d-1+y*365+p/4-p/100+p/400+m*31+(~(m-4)>>31)+(~(m-6)>>31)+(~(m-9)>>31)+(~(m-11)>>31)+((~(m-2)>>31)&-2-(^!^!(y&3)|(^!^!(y&0xf)&^!0x!y:~-2!))),r%%=5"
  5. if %r% lss 3 (echo 打鱼) else echo 晒网
复制代码
理解为: 1990.1.1  ~ 1990.1.3 打鱼, 1990.1.4 ~ 1990.1.5 晒网, ...
故余数就是 0 ~ 2 打鱼, 3,4 晒网

日历有: 简明万年历
1

评分人数

    • plp626: 都是O(1)型的;技术 + 1

TOP

返回列表