天数转年数

瑾色长安

比如8650天。转成多少年多少月多少天这样

fire9

fire9 发表于 2024-6-1 00:29
https://bbs.125.la/forum.php?mod=viewthread&tid=14822384&highlight=%E5%A4%A9%E6%95%B0  这里有你的答 ...

  

变量名	类 型	静态	数组	备 注
t	整数型
l	整数型
y	整数型
m	整数型
d	整数型

t ＝ 3692
y ＝ 到整数 (t ÷ 365)
l ＝ t － y × 365
m ＝ l ÷ 30
d ＝ l ％ 30
调试输出 (到文本 (y) ＋ “年” ＋ 到文本 (m) ＋ “月” ＋ 到文本 (d) ＋ “天  (一年按365天，一个月按30天算)”)
‘* “10年1月12天  (一年按365天，一个月按30天算)”

i支持库列表	支持库注释
spec	特殊功能支持库

.版本 2<br /> .支持库 spec<br /> <br /> .局部变量 t, 整数型<br /> .局部变量 l, 整数型<br /> .局部变量 y, 整数型<br /> .局部变量 m, 整数型<br /> .局部变量 d, 整数型<br /> <br /> t ＝ 3692<br /> y ＝ 到整数 (t ÷ 365)<br /> l ＝ t － y × 365<br /> m ＝ l ÷ 30<br /> d ＝ l ％ 30<br /> 调试输出 (到文本 (y) ＋ “年” ＋ 到文本 (m) ＋ “月” ＋ 到文本 (d) ＋ “天  (一年按365天，一个月按30天算)”)<br /> <br /> ‘* “10年1月12天  (一年按365天，一个月按30天算)”

fire9

https://bbs.125.la/forum.php?mod ... =%E5%A4%A9%E6%95%B0  这里有你的答案

qq73s5456

  

子程序名	返回值类型	公开	备 注
子程序2

变量名	类 型	静态	数组	备 注
天数	整数型
时间	文本型

天数 ＝ 8650
时间 ＝ 时间_时间戳转文本 (到文本 (天数 × 24 × 60 × 60 × 1000), )
调试输出 (时间)

i支持库列表	支持库注释
spec	特殊功能支持库

.版本 2<br /> .支持库 spec<br /> <br /> .子程序 子程序2<br /> .局部变量 天数, 整数型<br /> .局部变量 时间, 文本型<br /> <br /> 天数 ＝ 8650<br /> <br /> 时间 ＝ 时间_时间戳转文本 (到文本 (天数 × 24 × 60 × 60 × 1000), )<br /> 调试输出 (时间)

* “1993-09-07 08:00:00”
上面是把天数按时间戳计算
如果要按年计算，你得 算上大小月，润年平年

笨来无一悟

汇编的写法 下面的备注删掉也不影响运行的

  

子程序名	返回值类型	公开	备 注
天到年月日	文本型
参数名	类 型	参考	可空	数组	备 注
天	整数型

变量名	类 型	静态	数组	备 注
年	整数型
月	整数型
日	整数型

年 ＝ 天 ＼ 365
天 ＝ 天 ％ 365
月 ＝ 天 ＼ 30
日 ＝ 天 ％ 30
返回 (到文本 (年) ＋ “年” ＋ 到文本 (月) ＋ “月” ＋ 到文本 (日) ＋ “日”)

子程序名	返回值类型	公开	备 注
天到年月日_汇编
参数名	类 型	参考	可空	数组	备 注
天	整数型
年	整数型				返回变量
月	整数型				返回变量
日	整数型				返回变量

置入代码 ({ 139, 69, 8, 49, 210, 187, 109, 1, 0, 0, 247, 243, 139, 77, 12, 137, 1, 137, 208, 49, 210, 187, 30, 0, 0, 0, 247, 243, 139, 77, 16, 137, 1, 139, 77, 20, 137, 17 })
' mov eax,[ebp+8]
' xor edx, edx
' mov ebx,365
' div ebx
' mov ecx,[ebp+12]
' mov [ecx],eax
' mov eax,edx
' xor edx, edx
' mov ebx,30
' div ebx
' mov ecx,[ebp+16]
' mov [ecx],eax
' mov ecx,[ebp+20]
' mov [ecx],edx

.版本 2<br /> <br /> .子程序 天到年月日, 文本型<br /> .参数 天, 整数型<br /> .局部变量 年, 整数型<br /> .局部变量 月, 整数型<br /> .局部变量 日, 整数型<br /> <br /> 年 ＝ 天 ＼ 365<br /> 天 ＝ 天 ％ 365<br /> 月 ＝ 天 ＼ 30<br /> 日 ＝ 天 ％ 30<br /> 返回 (到文本 (年) ＋ “年” ＋ 到文本 (月) ＋ “月” ＋ 到文本 (日) ＋ “日”)<br /> <br /> .子程序 天到年月日_汇编<br /> .参数 天, 整数型<br /> .参数 年, 整数型, 参考, 返回变量<br /> .参数 月, 整数型, 参考, 返回变量<br /> .参数 日, 整数型, 参考, 返回变量<br /> <br /> 置入代码 ({ 139, 69, 8, 49, 210, 187, 109, 1, 0, 0, 247, 243, 139, 77, 12, 137, 1, 137, 208, 49, 210, 187, 30, 0, 0, 0, 247, 243, 139, 77, 16, 137, 1, 139, 77, 20, 137, 17 })<br /> ' mov eax,[ebp+8]<br /> ' xor edx, edx<br /> ' mov ebx,365<br /> ' div ebx<br /> ' mov ecx,[ebp+12]<br /> ' mov [ecx],eax<br /> ' mov eax,edx<br /> ' xor edx, edx<br /> ' mov ebx,30<br /> ' div ebx<br /> ' mov ecx,[ebp+16]<br /> ' mov [ecx],eax<br /> ' mov ecx,[ebp+20]<br /> ' mov [ecx],edx

mytiger

你这得有个参考日期啊,没参考怎么计算平年和闰年?