模块名称：周易模块
作者：王军
版本：1.43
现有43个模块命令.
------------------------------
.版本 2
.子程序 地支取序数, 整数型, 公开, 输入地支文本,取得地支序数1-12,错误返回0
.参数 地支文本, 文本型, , “子”, “丑”, “寅”, “卯”, “辰”, “巳”, “午”, “未”, “申”, “酉”, “戌”, “亥”
.子程序 地支数取藏干, 文本型, 公开, 根据地支1-12取得藏干,错误返回空
.参数 数字, 整数型, , 1-12
.子程序 叠卦取上卦数, 整数型, 公开, 输入一个叠卦数1-64,返回上卦序数1-8,错误返回0
.参数 叠卦数, 整数型, , 1-64,叠卦数
.子程序 叠卦取下卦数, 整数型, 公开, 输入一个叠卦数1-64,返回下卦序数1-8,错误返回0
.参数 叠卦数, 整数型, , 1-64,叠卦数
.子程序 叠卦数卦象字符, 文本型, 公开, 输入叠卦数1-64,返回此叠卦的卦象字符串
.参数 叠卦数, 整数型, , 1-64
.子程序 叠卦数取卦名, 文本型, 公开, 输入1-64之间的一个数,取得中文六十四叠卦简单名,错误返回空
.参数 数字, 整数型, , 1-64
.子程序 叠卦数取卦全名, 文本型, 公开, 输入1-64之间的一个数,取得中文六十四叠卦全名,错误返回空
.参数 数字, 整数型, , 1-64
.子程序 叠卦数取互卦数, 整数型, 公开, 输入一个叠卦数1-64,返回互卦数1-64,失败返回0
.参数 叠卦数, 整数型, , 1-64
.子程序 动爻数取动爻数, 整数型, 公开, 输入动爻变化位置,1表示动,0不动,取得动爻序数1-64,以利于用位异或命令换算, 简单地容错验证了下,如果错误返回0
.参数 上爻数, 整数型, 可空, 1动,0不动
.参数 五爻数, 整数型, 可空, 1动,0不动
.参数 四爻数, 整数型, 可空, 1动,0不动
.参数 三爻数, 整数型, 可空, 1动,0不动
.参数 二爻数, 整数型, 可空, 1动,0不动
.参数 初爻数, 整数型, 可空, 1动,0不动
.子程序 干支取十天干旺衰, 文本型, 公开, 输入干支文本,取得十天干旺衰文本,错误返回空
.参数 干支文本, 文本型, , 六十甲子配对
.子程序 干支数取长生帝旺, 文本型, 公开, 输入天干地支两个参数,取得长生帝旺文本串,错误返回空
.参数 天干数, 整数型, , 1-10,天干数
.参数 地支数, 整数型, , 1-12,地支数
.子程序 取地支五行, 文本型, 公开, 输入地支序数1-12,返回五行文本,错误返回空.
.参数 地支序数, 整数型, , 1-12
.子程序 取天干五行, 文本型, 公开, 输入天干数字1-10,取得天干的五行文本,错误返回空
.参数 天干序数, 整数型, , 1-10
.子程序 上下卦数取叠卦数, 整数型, 公开, 输入上三爻数1-8,与下三爻数1-8,取得一个重卦数1-8,错误返回0
.参数 上卦数, 整数型, , 1-8
.参数 下卦数, 整数型, , 1-8
.子程序 十天干旺衰, 文本型, 公开, 输入天干1-10和地支1-12两个参数,取得十天干旺衰文本串,错误返回空
.参数 天干数, 整数型, , 1-10
.参数 地支数, 整数型, , 1-12
.子程序 数字取地支, 文本型, 公开, 根据1-12,返回天干中文地支,子丑寅卯辰巳午未申酉戌亥,错误返回空
.参数 数字, 整数型, , 1-12.备用:巳
.子程序 数字取卦名, 文本型, 公开, 输入1-8之间的一个数,求得中文八卦名,错误返回空
.参数 数字, 整数型, , 1-8
.子程序 数字取天干, 文本型, 公开, 根据1-10,返回天干中文天干,甲乙丙丁戊己庚辛壬癸,错误返回空
.参数 数字, 整数型, , 1-10,备用:己
.子程序 数字取五行, 文本型, 公开, 根据1-5数字,返回五行文本,土金水木火,错误返回空
.参数 数字, 整数型, , 1-5
.子程序 数字取长生帝旺, 文本型, 公开, 输入1-12数字,返回:1长生,2沐浴,3冠带,4临官,5帝旺,错误返回空
.参数 数字, 整数型, , 1-12,多项选择 (, , )
.子程序 数字取长生帝旺2, 文本型, 公开, 1长生,2沐浴,3冠带,4临官,5帝旺,错误返回空
.参数 数字, 整数型, , 1-12,多项选择 (, , )
.子程序 天干取序数, 整数型, 公开, 输入天干文本,取得天干序数1-10,错误返回0
.参数 天干文本, 文本型, , “甲”, “乙”, “丙”, “丁”, “戊”, “己”, “庚”, “辛”, “壬”, “癸”
15084340729[下载].rar
|
发表于 2023-5-22 15:08:43
粤ICP备14042591号-1
粤ICP14042591号