递归火山软件开发平台

 找回密码
 立即注册

QQ登录

只需一步,快速开始

搜索
热搜: 火山 源码 类库

日柱1900-2200年算法(301年大全)

查看数: 3092 | 评论数: 4 | 收藏 0
关灯 | 提示:支持键盘翻页<-左 右->
    组图打开中,请稍候......
发布时间: 2023-8-19 13:54

正文摘要:

日柱1900-2200年算法(301年大全) ---------------------------------------------------------- 八字四柱中算”日柱”算法最难,网络上查找也不全面,有些1900年算错的,2100年后又没有了。 下面是其中的一种 ------ ...

回复

沉默流星 发表于 2023-8-20 14:34:30
山梦 发表于 2023-8-20 14:13
年柱算法很简单的。我这种算法,直接用农历年来算了。公历年另外算,也很简单的-------------------------- ...

可以啊
山梦 发表于 2023-8-20 14:13:53
本帖最后由 山梦 于 2023-8-20 14:15 编辑

年柱算法很简单的。我这种算法,直接用农历年来算了。公历年另外算,也很简单的-----------------------------------------------------------
<火山程序 类型 = "通常" 版本 = 1 />
变量 天干数组 <公开 静态 类型 = "文本型 [12]" 值 = {"甲","乙","丙","丁","戊","己","庚","辛","壬","癸","甲","乙"}>
变量 地支数组 <公开 静态 类型 = "文本型 [14]" 值 = {"子","丑","寅","卯","辰","巳","午","未","申","酉","戌","亥","子","丑"}>
<火山程序 类型 = "通常" 版本 = 1 />

变量 年柱 <类型 = 整数>
变量 年支 <类型 = 整数>
// -----年柱--------
年柱 = (农历年 - 3) % 10
如果真 (年柱 == 0)
{
    年柱 = 10
}
年柱天干 = 天干数组 [年柱 - 1]
年支 = (农历名 - 3) % 12
如果真 (年支 == 0)
{
    年支 = 12
}
年柱地支 = 地支数组 [年支 - 1]
-------------------------------------
月柱算法要根据  24节气中的“节”来确定 农历月。玄学的一般都是以节中的“立春”为正月,地支为寅。”惊蛰“为二月,地支为”卯“……以此类推,再用”五遁法“算出干。




wyc00 发表于 2023-8-20 11:37:07
测试正确,年柱,月柱算法也发出来啊

QQ|Archiver|手机版|小黑屋|递归火山软件开发平台 ( 鄂ICP备18029190号 )

GMT+8, 2024-11-24 11:00 , Processed in 0.083680 second(s), 22 queries .

Powered by Discuz! X3.4

© 2001-2017 Comsenz Inc.

快速回复 返回顶部 返回列表