年龄取生肖

田心南

大佬帮我绕下，用这个代码改，我给绕懵了年龄取生肖

  

子程序名	返回值类型	公开	备 注
年龄取生肖	文本型
参数名	类 型	参考	可空	数组	备 注
号码	文本型

变量名	类 型	静态	数组	备 注
年份	整数型
生肖	文本型

生肖 ＝ “鼠牛虎兔龙蛇马羊猴鸡狗猪”
调试输出 ( (到整数 (号码) ％ 12 ＋ 1) × 4)
生肖 ＝ 取文本中间 (生肖, 到整数 (号码) ％ 12 － 1, 2)
返回 (生肖)

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

.版本 2<br /> .支持库 spec<br /> <br /> .子程序 年龄取生肖, 文本型<br /> .参数 号码, 文本型<br /> .局部变量 年份, 整数型<br /> .局部变量 生肖, 文本型<br /> <br /> 生肖 ＝ “鼠牛虎兔龙蛇马羊猴鸡狗猪”<br /> 调试输出 ((到整数 (号码) ％ 12 ＋ 1) × 4)<br /> 生肖 ＝ 取文本中间 (生肖, 到整数 (号码) ％ 12 － 1, 2)<br /> 返回 (生肖)

liantan

  

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

年龄 ＝ 22
调试输出 (取年属相 (到整数 (取年份 (取现行时间 ()) － 年龄), ))

i支持库列表	支持库注释
spec	特殊功能支持库
CnCalendar	农历日期支持库

.版本 2<br /> .支持库 spec<br /> .支持库 CnCalendar<br /> <br /> .局部变量 年龄, 整数型<br /> <br /> 年龄 ＝ 22<br /> 调试输出 (取年属相 (到整数 (取年份 (取现行时间 ()) － 年龄), ))

qcby

年份获取天干地支纪年法日期和生肖代码
https://bbs.125.la/forum.php?mod=viewthread&tid=14687305
(出处: 精易论坛)

田心南

qcby 发表于 2023-6-9 19:56
年份获取天干地支纪年法日期和生肖代码
https://bbs.125.la/forum.php?mod=viewthread&tid=14687305
(出处: ...

就是看这个来的，不一样

菜鸟路过

  

子程序名	返回值类型	公开	备 注
生肖转换	文本型
参数名	类 型	参考	可空	数组	备 注
年份	整数型

变量名	类 型	静态	数组	备 注
生肖	文本型		0
i	整数型

生肖 ＝ { “鸡”, “狗”, “猪”, “鼠”, “牛”, “虎”, “兔”, “龙”, “蛇”, “马”, “羊”, “猴” }
i ＝ 年份 ％ 12
如果真 (i ＝ 0)
i ＝ 12
返回 (生肖 [i])

.版本 2<br /> <br /> .子程序 生肖转换, 文本型<br /> .参数 年份, 整数型<br /> .局部变量 生肖, 文本型, , "0"<br /> .局部变量 i, 整数型<br /> <br /> 生肖 ＝ { “鸡”, “狗”, “猪”, “鼠”, “牛”, “虎”, “兔”, “龙”, “蛇”, “马”, “羊”, “猴” }<br /> i ＝ 年份 ％ 12<br /> .如果真 (i ＝ 0)<br />     i ＝ 12<br /> .如果真结束<br /> 返回 (生肖 <i>)