易语言代码转换成html代码

zhaoxinli2715

  

窗口程序集名	保 留	保 留	备 注
窗口程序集_启动窗口

子程序名	返回值类型	公开	备 注
__启动窗口_创建完毕

编辑框1.加入文本 (时间_取天干地支 (取现行时间 (), 5) ＋ #换行符 ＋ #换行符 )
编辑框1.加入文本 (子午流注之灵龟八法 (时间_取天干地支 (取现行时间 (), 3), 时间_取天干地支 (取现行时间 (), 4)) ＋ #换行符 )

子程序名	返回值类型	公开	备 注
子午流注之灵龟八法	文本型
参数名	类 型	参考	可空	数组	备 注
日干	文本型				当日的日天干地支
时干	文本型				当日的时辰天干地支

变量名	类 型	静态	数组	备 注
局_日天干	文本型
局_日地支	文本型
局_时天干	文本型
局_时地支	文本型
代数	整数型
余数	整数型
局_八法	文本型
局_符号	文本型
局_返回	文本型

局_日天干 ＝ 取文本左边 (日干, 2)
如果真 (局_日天干 ＝ “甲” 或 局_日天干 ＝ “己”)
代数 ＝ 10
如果真 (局_日天干 ＝ “乙” 或 局_日天干 ＝ “庚”)
代数 ＝ 9
如果真 (局_日天干 ＝ “丁” 或 局_日天干 ＝ “壬”)
代数 ＝ 8
如果真 (局_日天干 ＝ “丙” 或 局_日天干 ＝ “辛” 或 局_日天干 ＝ “戊” 或 局_日天干 ＝ “癸”)
代数 ＝ 7

局_日地支 ＝ 取文本右边 (日干, 2)
如果真 (局_日地支 ＝ “辰” 或 局_日地支 ＝ “戌” 或 局_日地支 ＝ “丑” 或 局_日地支 ＝ “未”)
代数 ＝ 代数 ＋ 10
如果真 (局_日地支 ＝ “申” 或 局_日地支 ＝ “酉”)
代数 ＝ 代数 ＋ 9
如果真 (局_日地支 ＝ “寅” 或 局_日地支 ＝ “卯”)
代数 ＝ 代数 ＋ 8
如果真 (局_日地支 ＝ “巳” 或 局_日地支 ＝ “亥” 或 局_日地支 ＝ “子” 或 局_日地支 ＝ “午”)
代数 ＝ 代数 ＋ 7

局_时天干 ＝ 取文本左边 (时干, 2)
如果真 (局_时天干 ＝ “甲” 或 局_时天干 ＝ “己”)
代数 ＝ 代数 ＋ 9
如果真 (局_时天干 ＝ “乙” 或 局_时天干 ＝ “庚”)
代数 ＝ 代数 ＋ 8
如果真 (局_时天干 ＝ “丙” 或 局_时天干 ＝ “辛”)
代数 ＝ 代数 ＋ 7
如果真 (局_时天干 ＝ “丁” 或 局_时天干 ＝ “壬”)
代数 ＝ 代数 ＋ 6
如果真 (局_时天干 ＝ “戊” 或 局_时天干 ＝ “癸”)
代数 ＝ 代数 ＋ 5

局_时地支 ＝ 取文本右边 (时干, 2)
如果真 (局_时地支 ＝ “子” 或 局_时地支 ＝ “午”)
代数 ＝ 代数 ＋ 9
如果真 (局_时地支 ＝ “丑” 或 局_时地支 ＝ “未”)
代数 ＝ 代数 ＋ 8
如果真 (局_时地支 ＝ “寅” 或 局_时地支 ＝ “申”)
代数 ＝ 代数 ＋ 7
如果真 (局_时地支 ＝ “卯” 或 局_时地支 ＝ “酉”)
代数 ＝ 代数 ＋ 6
如果真 (局_时地支 ＝ “辰” 或 局_时地支 ＝ “戌”)
代数 ＝ 代数 ＋ 5
如果真 (局_时地支 ＝ “巳” 或 局_时地支 ＝ “亥”)
代数 ＝ 代数 ＋ 4

' 在找余数时，阳日如遇到27数，不能以9除尽，应当除18，余9开列缺；阴日如遇30数，也应除24，余6开公孙。
' 阳数： 36 27
' 阴数： 30
调试输出 (代数)
如果真 (局_日天干 ＝ “甲” 或 局_日天干 ＝ “丙” 或 局_日天干 ＝ “戊” 或 局_日天干 ＝ “庚” 或 局_日天干 ＝ “壬”)
余数 ＝ 代数 ％ 9
如果真 (余数 ＝ 0)
余数 ＝ 9

如果真 (局_日天干 ＝ “乙” 或 局_日天干 ＝ “丁” 或 局_日天干 ＝ “己” 或 局_日天干 ＝ “辛” 或 局_日天干 ＝ “癸”)
余数 ＝ 代数 ％ 6
如果真 (余数 ＝ 0)
余数 ＝ 6


局_符号 ＝ “ ”
如果真 (余数 ＝ 3)
局_八法 ＝ “方位[东]” ＋ 局_符号 ＋ “卦象[震]” ＋ 局_符号 ＋ “开穴[外关]” ＋ 局_符号 ＋ “配穴[临泣]”
如果真 (余数 ＝ 4)
局_八法 ＝ “方位[东南]” ＋ 局_符号 ＋ “卦象[巽]” ＋ 局_符号 ＋ “开穴[临泣]” ＋ 局_符号 ＋ “配穴[外关]”
如果真 (余数 ＝ 9)
局_八法 ＝ “方位[南]” ＋ 局_符号 ＋ “卦象[离]” ＋ 局_符号 ＋ “开穴[列缺]” ＋ 局_符号 ＋ “配穴[照海]”
如果真 (余数 ＝ 2)
局_八法 ＝ “方位[西南]” ＋ 局_符号 ＋ “卦象[坤]” ＋ 局_符号 ＋ “开穴[照海]” ＋ 局_符号 ＋ “配穴[列缺]”
如果真 (余数 ＝ 7)
局_八法 ＝ “方位[西]” ＋ 局_符号 ＋ “卦象[兑]” ＋ 局_符号 ＋ “开穴[后溪]” ＋ 局_符号 ＋ “配穴[申脉]”
如果真 (余数 ＝ 6)
局_八法 ＝ “方位[西北]” ＋ 局_符号 ＋ “卦象[乾]” ＋ 局_符号 ＋ “开穴[公孙]” ＋ 局_符号 ＋ “配穴[内关]”
如果真 (余数 ＝ 1)
局_八法 ＝ “方位[北]” ＋ 局_符号 ＋ “卦象[坎]” ＋ 局_符号 ＋ “开穴[申脉]” ＋ 局_符号 ＋ “配穴[后溪]”
如果真 (余数 ＝ 8)
局_八法 ＝ “方位[东北]” ＋ 局_符号 ＋ “卦象[艮]” ＋ 局_符号 ＋ “开穴[内关]” ＋ 局_符号 ＋ “配穴[公孙]”
如果真 (余数 ＝ 5)
局_八法 ＝ “特殊定穴[5]” ＋ 局_符号 ＋ “男 → ” ＋ 局_符号 ＋ “开穴[照海]” ＋ 局_符号 ＋ “女 → ” ＋ “开穴[内关]”

局_返回 ＝ “余数:[” ＋ 到文本 (余数) ＋ “]” ＋ 局_符号 ＋ “ 灵龟八法:” ＋ 局_符号 ＋ 局_八法
返回 (局_返回)

子程序名	返回值类型	公开	备 注
时间_取天干地支	文本型
参数名	类 型	参考	可空	数组	备 注
日期时间	日期时间型
类型	整数型				1.年柱 2.月柱 3.日柱 4.时柱 5.全部

变量名	类 型	静态	数组	备 注
局_年柱	文本型
局_月柱	文本型
局_日柱	文本型
局_时柱	文本型
局_返回	文本型

如果真 (取四柱 (日期时间, 局_年柱, 局_月柱, 局_日柱, 局_时柱))
如果真 (类型 ＝ 1)
局_返回 ＝ 局_年柱
如果真 (类型 ＝ 2)
局_返回 ＝ 局_月柱
如果真 (类型 ＝ 3)
局_返回 ＝ 局_日柱
如果真 (类型 ＝ 4)
局_返回 ＝ 局_时柱
如果真 (类型 ＝ 5)
局_返回 ＝ 局_年柱 ＋ “年 ” ＋ 局_月柱 ＋ “月 ” ＋ 局_日柱 ＋ “日 ” ＋ 局_时柱 ＋ “时”

返回 (局_返回)

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

.版本 2<br /> .支持库 spec<br /> .支持库 CnCalendar<br /> <br /> .程序集 窗口程序集_启动窗口<br /> <br /> .子程序 __启动窗口_创建完毕<br /> <br /> 编辑框1.加入文本 (时间_取天干地支 (取现行时间 (), 5) ＋ #换行符 ＋ #换行符)<br /> 编辑框1.加入文本 (子午流注之灵龟八法 (时间_取天干地支 (取现行时间 (), 3), 时间_取天干地支 (取现行时间 (), 4)) ＋ #换行符)<br /> <br /> <br /> .子程序 子午流注之灵龟八法, 文本型, 公开<br /> .参数 日干, 文本型, , 当日的日天干地支<br /> .参数 时干, 文本型, , 当日的时辰天干地支<br /> .局部变量 局_日天干, 文本型<br /> .局部变量 局_日地支, 文本型<br /> .局部变量 局_时天干, 文本型<br /> .局部变量 局_时地支, 文本型<br /> .局部变量 代数, 整数型<br /> .局部变量 余数, 整数型<br /> .局部变量 局_八法, 文本型<br /> .局部变量 局_符号, 文本型<br /> .局部变量 局_返回, 文本型<br /> <br /> 局_日天干 ＝ 取文本左边 (日干, 2)<br /> .如果真 (局_日天干 ＝ “甲” 或 局_日天干 ＝ “己”)<br />     代数 ＝ 10<br /> .如果真结束<br /> .如果真 (局_日天干 ＝ “乙” 或 局_日天干 ＝ “庚”)<br />     代数 ＝ 9<br /> .如果真结束<br /> .如果真 (局_日天干 ＝ “丁” 或 局_日天干 ＝ “壬”)<br />     代数 ＝ 8<br /> .如果真结束<br /> .如果真 (局_日天干 ＝ “丙” 或 局_日天干 ＝ “辛” 或 局_日天干 ＝ “戊” 或 局_日天干 ＝ “癸”)<br />     代数 ＝ 7<br /> .如果真结束<br /> <br /> 局_日地支 ＝ 取文本右边 (日干, 2)<br /> .如果真 (局_日地支 ＝ “辰” 或 局_日地支 ＝ “戌” 或 局_日地支 ＝ “丑” 或 局_日地支 ＝ “未”)<br />     代数 ＝ 代数 ＋ 10<br /> .如果真结束<br /> .如果真 (局_日地支 ＝ “申” 或 局_日地支 ＝ “酉”)<br />     代数 ＝ 代数 ＋ 9<br /> .如果真结束<br /> .如果真 (局_日地支 ＝ “寅” 或 局_日地支 ＝ “卯”)<br />     代数 ＝ 代数 ＋ 8<br /> .如果真结束<br /> .如果真 (局_日地支 ＝ “巳” 或 局_日地支 ＝ “亥” 或 局_日地支 ＝ “子” 或 局_日地支 ＝ “午”)<br />     代数 ＝ 代数 ＋ 7<br /> .如果真结束<br /> <br /> 局_时天干 ＝ 取文本左边 (时干, 2)<br /> .如果真 (局_时天干 ＝ “甲” 或 局_时天干 ＝ “己”)<br />     代数 ＝ 代数 ＋ 9<br /> .如果真结束<br /> .如果真 (局_时天干 ＝ “乙” 或 局_时天干 ＝ “庚”)<br />     代数 ＝ 代数 ＋ 8<br /> .如果真结束<br /> .如果真 (局_时天干 ＝ “丙” 或 局_时天干 ＝ “辛”)<br />     代数 ＝ 代数 ＋ 7<br /> .如果真结束<br /> .如果真 (局_时天干 ＝ “丁” 或 局_时天干 ＝ “壬”)<br />     代数 ＝ 代数 ＋ 6<br /> .如果真结束<br /> .如果真 (局_时天干 ＝ “戊” 或 局_时天干 ＝ “癸”)<br />     代数 ＝ 代数 ＋ 5<br /> .如果真结束<br /> <br /> <br /> 局_时地支 ＝ 取文本右边 (时干, 2)<br /> .如果真 (局_时地支 ＝ “子” 或 局_时地支 ＝ “午”)<br />     代数 ＝ 代数 ＋ 9<br /> .如果真结束<br /> .如果真 (局_时地支 ＝ “丑” 或 局_时地支 ＝ “未”)<br />     代数 ＝ 代数 ＋ 8<br /> .如果真结束<br /> .如果真 (局_时地支 ＝ “寅” 或 局_时地支 ＝ “申”)<br />     代数 ＝ 代数 ＋ 7<br /> .如果真结束<br /> .如果真 (局_时地支 ＝ “卯” 或 局_时地支 ＝ “酉”)<br />     代数 ＝ 代数 ＋ 6<br /> .如果真结束<br /> .如果真 (局_时地支 ＝ “辰” 或 局_时地支 ＝ “戌”)<br />     代数 ＝ 代数 ＋ 5<br /> .如果真结束<br /> .如果真 (局_时地支 ＝ “巳” 或 局_时地支 ＝ “亥”)<br />     代数 ＝ 代数 ＋ 4<br /> .如果真结束<br /> <br /> <br /> ' 在找余数时，阳日如遇到27数，不能以9除尽，应当除18，余9开列缺；阴日如遇30数，也应除24，余6开公孙。<br /> ' 阳数： 36 27<br /> ' 阴数： 30<br /> <br /> 调试输出 (代数)<br /> .如果真 (局_日天干 ＝ “甲” 或 局_日天干 ＝ “丙” 或 局_日天干 ＝ “戊” 或 局_日天干 ＝ “庚” 或 局_日天干 ＝ “壬”)<br />     余数 ＝ 代数 ％ 9<br />     .如果真 (余数 ＝ 0)<br />         余数 ＝ 9<br />     .如果真结束<br /> <br /> .如果真结束<br /> .如果真 (局_日天干 ＝ “乙” 或 局_日天干 ＝ “丁” 或 局_日天干 ＝ “己” 或 局_日天干 ＝ “辛” 或 局_日天干 ＝ “癸”)<br />     余数 ＝ 代数 ％ 6<br />     .如果真 (余数 ＝ 0)<br />         余数 ＝ 6<br />     .如果真结束<br /> <br /> .如果真结束<br /> <br /> 局_符号 ＝ “ ”<br /> <br /> <br /> .如果真 (余数 ＝ 3)<br />     局_八法 ＝ “方位[东]” ＋ 局_符号 ＋ “卦象[震]” ＋ 局_符号 ＋ “开穴[外关]” ＋ 局_符号 ＋ “配穴[临泣]”<br /> <br /> .如果真结束<br /> .如果真 (余数 ＝ 4)<br />     局_八法 ＝ “方位[东南]” ＋ 局_符号 ＋ “卦象[巽]” ＋ 局_符号 ＋ “开穴[临泣]” ＋ 局_符号 ＋ “配穴[外关]”<br /> <br /> .如果真结束<br /> .如果真 (余数 ＝ 9)<br />     局_八法 ＝ “方位[南]” ＋ 局_符号 ＋ “卦象[离]” ＋ 局_符号 ＋ “开穴[列缺]” ＋ 局_符号 ＋ “配穴[照海]”<br /> <br /> .如果真结束<br /> .如果真 (余数 ＝ 2)<br />     局_八法 ＝ “方位[西南]” ＋ 局_符号 ＋ “卦象[坤]” ＋ 局_符号 ＋ “开穴[照海]” ＋ 局_符号 ＋ “配穴[列缺]”<br /> <br /> .如果真结束<br /> .如果真 (余数 ＝ 7)<br />     局_八法 ＝ “方位[西]” ＋ 局_符号 ＋ “卦象[兑]” ＋ 局_符号 ＋ “开穴[后溪]” ＋ 局_符号 ＋ “配穴[申脉]”<br /> <br /> .如果真结束<br /> .如果真 (余数 ＝ 6)<br />     局_八法 ＝ “方位[西北]” ＋ 局_符号 ＋ “卦象[乾]” ＋ 局_符号 ＋ “开穴[公孙]” ＋ 局_符号 ＋ “配穴[内关]”<br /> <br /> .如果真结束<br /> .如果真 (余数 ＝ 1)<br />     局_八法 ＝ “方位[北]” ＋ 局_符号 ＋ “卦象[坎]” ＋ 局_符号 ＋ “开穴[申脉]” ＋ 局_符号 ＋ “配穴[后溪]”<br /> <br /> .如果真结束<br /> .如果真 (余数 ＝ 8)<br />     局_八法 ＝ “方位[东北]” ＋ 局_符号 ＋ “卦象[艮]” ＋ 局_符号 ＋ “开穴[内关]” ＋ 局_符号 ＋ “配穴[公孙]”<br /> <br /> .如果真结束<br /> .如果真 (余数 ＝ 5)<br />     局_八法 ＝ “特殊定穴[5]” ＋ 局_符号 ＋ “男 → ” ＋ 局_符号 ＋ “开穴[照海]” ＋ 局_符号 ＋ “女 → ” ＋ “开穴[内关]”<br /> <br /> .如果真结束<br /> <br /> <br /> 局_返回 ＝ “余数:[” ＋ 到文本 (余数) ＋ “]” ＋ 局_符号 ＋ “ 灵龟八法:” ＋ 局_符号 ＋ 局_八法<br /> <br /> 返回 (局_返回)<br /> <br /> .子程序 时间_取天干地支, 文本型, 公开<br /> .参数 日期时间, 日期时间型<br /> .参数 类型, 整数型, , 1.年柱 2.月柱 3.日柱 4.时柱 5.全部<br /> .局部变量 局_年柱, 文本型<br /> .局部变量 局_月柱, 文本型<br /> .局部变量 局_日柱, 文本型<br /> .局部变量 局_时柱, 文本型<br /> .局部变量 局_返回, 文本型<br /> <br /> .如果真 (取四柱 (日期时间, 局_年柱, 局_月柱, 局_日柱, 局_时柱))<br />     .如果真 (类型 ＝ 1)<br />         局_返回 ＝ 局_年柱<br />     .如果真结束<br />     .如果真 (类型 ＝ 2)<br />         局_返回 ＝ 局_月柱<br />     .如果真结束<br />     .如果真 (类型 ＝ 3)<br />         局_返回 ＝ 局_日柱<br />     .如果真结束<br />     .如果真 (类型 ＝ 4)<br />         局_返回 ＝ 局_时柱<br />     .如果真结束<br />     .如果真 (类型 ＝ 5)<br />         局_返回 ＝ 局_年柱 ＋ “年 ” ＋ 局_月柱 ＋ “月 ” ＋ 局_日柱 ＋ “日 ” ＋ 局_时柱 ＋ “时”<br />     .如果真结束<br /> <br /> .如果真结束<br /> 返回 (局_返回)

问题：我用豆包和deepseek转换，但是公历转换成农历老是失败，html不是特别熟，麻烦帮我把这个代码转换成为html代码，能美化尽量美化下。

z573277679

示例.rar (2.94 KB, 下载次数: 17)

2025-12-27 11:48 上传

点击文件名下载附件

禁止千翻

这个配色听好看的，分享一下呗

z573277679

<html lang="zh-CN">
<head>

</body>
</html>

zhaoxinli2715

z573277679 发表于 2025-12-27 11:48

感谢 很漂亮啊