第二讲：易理函数 [复制链接]

干支五行五行关系五行力度旺衰地支关系卦象

GANZHI(DATE, TIME, TYPE)：取得日期的年、月、日、时的干支代码
DATE为数组或常数，有效值范围（ 年月日 800101-1301231）),
表示19800101-20301231
TIME为数组或常数，有效值范围（ 时分秒 000000-235959）
TYPE为常数，取0--3，分别表示计算的是0=年、1=月、2=日、3=时的干支
返回六十甲子代码，有效值范围为(0-59)， 依次表示甲子、乙丑.....癸亥

ganzhi表示法：
0　 1 2　 3
年 月 日 时

例：
坐标线:0;1;2;3;}
年干支:DRAWYITEXT(date,1,ganzhi(date,0,0),0);
月干支:DRAWYITEXT(date,2,ganzhi(date,0,1),0);
日干支:DRAWYITEXT(date,3,ganzhi(date,0,2),0);

五行
取得天干、地支、八卦对应的五行代码
WUXING(X, TYPE)：TYPE为常数，取0--2，分别表示计算的是天干、地支、八卦对应的五行,X为对应的代码，数组或常数
返回五行代码，有效值范围为(0-4)， 依次表示金水木火土
wuxing
01　　2
天干 地支 八卦
0 12 3 4
金 水木 火 土

例：
drawyitext(date,1,ganzhi(date,0,2),0);
a:=wuxing(mod(ganzhi(date,0,2),12),1);
{取得日地支对应的五行代码}
drawtext(a=0,0,'金'),colorwhite;
drawtext(a=1,0,'水') colorgray;
drawtext(a=2,0,'木') colorgreen;
drawtext(a=3,0,'火') colorred;
drawtext(a=4,0,'土') coloryellow;

五行关系
取得五行相生相克反克的关系。WXGX(WX1, WX2)：WX1,WX2为五行代码的数组或常数，有效值范围为(0-4)， 依次表示金水木火土
返回五行生克关系代码，有效值范围为(0-3)，依次表示WX1无关WX2、WX1生WX2、WX1克X2、WX1反克WX2
五行序数的相生次序：0-1-2-3-4-0
五行序数的相克次序：0-2-4-1-3-0
五行序数的反克次序：0-3-1-4-2-0
wxgx 0 1 2 3
无关 生 克 反克

drawyitext(date,1,ganzhi(date,0,2),0);{日干支}
a:=wuxing(mod(ganzhi(date,0,2),12),1);{取得日地支对应的五行代码}
b:=WXGX(0,a);
drawtext(b=0,2,'金旺');
drawtext(b=1,2,'金生水');
drawtext(b=2,2,'金克木');
drawtext(b=3,2,'火克金');

取得不同时间的力度（旺相休囚死）对应的五行代码
WXLD( JI, LD):JI为四季数代码，春-0、夏-1、秋-2、冬-3、四季土-4
LD为五行四季力度代码，旺(4)、相(3)、休(2)、囚(1)、死(0);
返回五行代码， 依次表示金-0,水-1,木-2,火-3,土-4.
wxld 4 3 2 1 0
旺 相 休 囚 死
0 春 木 火 水 金 土
1 夏 火 土 木 水 金
2 秋 金 水 土 火 木
3 冬 水 木 金 土 火
4 四季 土 金 火 木 水
例：
土:wxld(0,0);{=4土死}
金:wxld(0,1);{=0金囚}
水:wxld(0,2);{=1水休}
火:wxld(0,3);{=3火相}
木:wxld(0,4);{=2木旺}

取得五行旺衰十二阶段（原生旺死绝）对应的地支代码
WXSS(WX, SS)，参数： WX为五行代码的数组或常数，SS五行盛衰十二阶段
返回：地支代码，0-11分别表示子、丑...亥 wxss 子 丑 寅 卯 辰 巳 午 未 申 酉 戍 亥
0 1 2 3 4 5 6 7 8 9 10 11
绝 胎 养 长生 沐浴 冠带 临官 帝旺 衰 病 死 墓
0 金 寅 卯 辰 巳 午 未 申 酉 戍 亥 子 丑
1 水 巳 午 未 申 酉 戍 亥 子 丑 寅 卯 辰
2 木 申 酉 戍 亥 子 丑 寅 卯 辰 巳 午 未
3 火 亥 子 丑 寅 卯 辰 巳 午 未 申 酉 戍
4 土 巳 午 未 申 酉 戍 亥 子 丑 寅 卯 辰

例：

金:wxss(0,0);{=2金绝于寅}
水:wxss(1,0);{=5水绝于巳}
木:wxss(2,0);{=8木绝于申}
火:wxss(3,0);{=11火绝于亥}
土:wxss(4,0);{=5土绝于巳}

当前有所谓的传统与新派，大家可以根据各自的修改。

DZGX(DZ1, DZ2)：DZ1, DZ2为地支代码的数组或常数，有效值范围为(0-11)
返回： 返回地支关系代码，有效值范围为(0-5)，依次表示无关(0)、DZ1生DZ2(1)、DZ1克DZ2(2)、相冲(3)、相害(4)、DZ1刑DZ2(5) dzgx 子 丑 寅 卯 辰 巳 午 未 申 酉 戍 亥
0 1 2 3 4 5 6 7 8 9 10 11
无关 生 克 冲 害 刑

例：
子午:dzgx(0,6);{=3子午相冲}
卯巳:dzgx(3,5);{=1卯木生巳火}
辰亥:dzgx(4,11);{=2辰土克亥水}


DZXH(DZ1, DZ2, DZ3, DZ4)：DZ1, DZ2, DZ3, DZ4为地支代码的数组或常数，有效值范围为(0-11),若求六合，则DZ3为-1, DZ4除算申子辰化合成水局外为-1
返回： 返回合成的五行代码，有效值范围为(-1-4)，-1表示无相合关系 dzxh 子 丑 寅 卯 辰 巳 午 未 申 酉 戍 亥
0 1 2 3 4 5 6 7 8 9 10 11
金 水 木 火 土

dzxh(0,1,-1,-1);{返回4，表示子丑合而化土}
dzxh(8,0,4,-1);{返回1，表示申子辰化合成水局}

KGUA(TYPE, N)：TYPE取爻次序，为0表示以第一个周期为初爻，当前周期为上爻，不为0则反之
N为所取的周期数，为0取3个周期，不为0表示取6个周期
返回：K线卦象，若N为0，返回八卦代码(1-8)，否则返回六十四卦代码(11-88)，请参考易卦代码表
示例：KGUA(1, 1)以当前周期为初爻，取6个周期组成的某个六十四卦
升为阳，跌为阴，平盘则相对前收盘（如果也相等？）
反日k线：若改为阳线为阴爻，阴线为阳爻，则可写成 99－KGUA(1,1)

正K象:DRAWYITEXT(date,0,KGUA(1,1),1),coloryellow;{坐标线-1;0;1;}
反K象:DRAWYITEXT(date,1,99-KGUA(1,1),1),colorred;

zqdmnum zqdmsum numbersum

证券代码数,返回证券代码数，
如0001返回1，600001返回600001，指数返回1

证券代码数和,返回证券代码各位数字之和，
如0001返回1，600001返回7，指数返回3

数字之和,NUMBERSUM(NUMBER, N)
参数： NUMBER为待计算的数据,N表示小数点后取几位
返回： 各位数字之和
示例： NUMBERSUM(CLOSE, 2) 则收盘价为9.53时返回17


证券代码数:ZQDMNUM;
证券代码数和:ZQDMSUM;
收盘价:c;
收盘价和（２位）:NUMBERSUM(c,2)

:=INTPART(GANZHI(DATE,0,2)/10);
{得到该周期的旬代码(0-5)依次表示甲子旬…甲寅旬}
a:=(5-s)*2;{得到该周期的第一个旬空地支代码}
b:=a+1;{得到该周期的第二个旬空地支代码}
地支旬空:DRAWYITEXT(lday,15,a,0)