通达信《周易解盘》实践探讨（附图、代码）

《周易解盘》实践探讨（附图、代码）征集卦词

《周易》是算命的吗？不完全是。搜科教台《易经的奥秘》讲座，先了解一下吧。
《易经》有卦，卦有6爻，也就是6个信息源。K线只能描述当日走势，用卦可以表达6个信息（初爻描述5日线，二爻描述10日线，三爻描述20日线，四爻描述60日线，五爻描述120日线，末爻描述250日线）。这样一个卦就能想象到K线基本走势。时间在变化，卦也在变化，一组卦象会不会揭示股市的运行规律有待于研究。
《易经》认为，万事万物都是有阴阳组成，爻也不例外。均线比昨天高称为阳爻，均线比昨天低称为阴爻，一组不同的均线变化就组成卦，这个卦不用摇千测字自动生成的，只要科学的解读、利用就可以了。我做一个模型做实验，先看看图片：

000000坤卦，熊到极致了，111111乾卦，牛到极致了，物极必反，这是自然规律，在变挂的时候进行操作肯定有收获。看看代码：

{参数
初爻   m1   0   999   3
二爻   m2   0   999   5
三爻   m3   0   999   10
四爻   m4   0   999   20
五爻   m5   0   999   60
末爻   m6   0   999   240
      m7   0   999   30
      m8   0   999   120
卦象开关X   0   1      0
}
 
初爻:=IF(MA(C,M1)>=REF(MA(C,M1),1) ,1,0);
二爻:=IF(MA(C,M2)>=REF(MA(C,M2),1) ,1,0);
三爻:=IF(MA(C,M3)>=REF(MA(C,M3),1) ,1,0);
四爻:=IF(MA(C,M4)>=REF(MA(C,M4),1) ,1,0);
五爻:=IF(MA(C,M5)>=REF(MA(C,M5),1) ,1,0);
末爻:=IF(MA(C,M6)>=REF(MA(C,M6),1) ,1,0);
卦象:=IF(末爻>0,
IF(五爻>0,IF(四爻>0,IF(三爻>0,IF(二爻>0,IF(初爻>0,'111111','111110'),IF(初爻>0,'111101','111100')),
                            IF(二爻>0,IF(初爻>0,'111011','111010'),IF(初爻>0,'111001','111000'))),
                   IF(三爻>0,IF(二爻>0,IF(初爻>0,'110111','110110'),IF(初爻>0,'110101','110100')),
                             IF(二爻>0,IF(初爻>0,'110011','110010'),IF(初爻>0,'110001','110000')))),
          IF(四爻>0,IF(三爻>0,IF(二爻>0,IF(初爻>0,'101111','101110'),IF(初爻>0,'101101','101100')),
                             IF(二爻>0,IF(初爻>0,'101011','101010'),IF(初爻>0,'101001','101000'))),
                    IF(三爻>0,IF(二爻>0,IF(初爻>0,'100111','100110'),IF(初爻>0,'100101','100100')),
                            IF(二爻>0,IF(初爻>0,'100011','100010'),IF(初爻>0,'100001','100000'))))),
IF(五爻>0,IF(四爻>0,IF(三爻>0,IF(二爻>0,IF(初爻>0,'011111','011110'),IF(初爻>0,'011101','011100')),
                            IF(二爻>0,IF(初爻>0,'011011','011010'),IF(初爻>0,'011001','011000'))),
                   IF(三爻>0,IF(二爻>0,IF(初爻>0,'010111','010110'),IF(初爻>0,'010101','010100')),
                            IF(二爻>0,IF(初爻>0,'010011','010010'),IF(初爻>0,'010001','010000')))),
         IF(四爻>0,IF(三爻>0,IF(二爻>0,IF(初爻>0,'001111','001110'),IF(初爻>0,'001101','001100')),
                            IF(二爻>0,IF(初爻>0,'001011','001010'),IF(初爻>0,'001001','001000'))),
                  IF(三爻>0,IF(二爻>0,IF(初爻>0,'000111','000110'),IF(初爻>0,'000101','000100')),
                            IF(二爻>0,IF(初爻>0,'000011','000010'),IF(初爻>0,'000001','000000'))))));
DRAWTEXT(ISLASTBAR or X,C*0.98,卦象);

这段代码贴到任意主图内都可以使用，提示超长去掉缩进的空格就行了。根据上诉代码，可以编写卦名、卦词等操作信息。另外我上传了《周易解盘》压缩包，内有我实验用的公式，和研究资料。卦象开关在调整指标参数里。对K线形态有研究的朋友，结合周易卦词编写股市卦词，发到网上大家一同研究。