【取古典时间2.0】当前地支时辰时刻

ttggnn

支持开源~！感谢分享

zaozi

这个可以

咔咔云

支持原创，感谢分享

小窗润轻风

有新意，收一个

荼泱

冷渣渣 发表于 2024-2-21 10:14
[e=0].版本 2

.子程序 时间_取当前时辰, 文本型

感谢指正，现已更新

胖子葛格

感谢大神分享~！

396384183

开源精神必须支持~

一指温柔

开源精神必须支持~

zzh233

非常棒 手机上一直装着古时钟 期待有一天可以 子时睡觉

冷渣渣

  

子程序名	返回值类型	公开	备 注
时间_取当前时辰	文本型
参数名	类 型	参考	可空	数组	备 注
当前时间	日期时间型

变量名	类 型	静态	数组	备 注
th	整数型
backerr	文本型
十二地支	文本型		12
i	整数型

th ＝ 取时间部分 (选择 (是否为空 (当前时间), 取现行时间 (), 当前时间), #小时 )
十二地支 ＝ { “子”, “丑”, “寅”, “卯”, “辰”, “巳”, “午”, “未”, “申”, “酉”, “戌”, “亥” }
i ＝ 取整 ( (th ＋ 1) ÷ 2) ％ 12 ＋ 1
返回 (十二地支 [i] ＋ “时”)

.版本 2<br /> <br /> .子程序 时间_取当前时辰, 文本型<br /> .参数 当前时间, 日期时间型, 可空<br /> .局部变量 th, 整数型<br /> .局部变量 backerr, 文本型<br /> .局部变量 十二地支, 文本型, , "12"<br /> .局部变量 i, 整数型<br /> <br /> th ＝ 取时间部分 (选择 (是否为空 (当前时间), 取现行时间 (), 当前时间), #小时)<br /> 十二地支 ＝ { “子”, “丑”, “寅”, “卯”, “辰”, “巳”, “午”, “未”, “申”, “酉”, “戌”, “亥” }<br /> i ＝ 取整 ((th ＋ 1) ÷ 2) ％ 12 ＋ 1<br /> 返回 (十二地支 <i> ＋ “时”)

为什么不这样写呢 少一步分割