通达信YISHU主图指标 源码周易之梅花六数卦象
最近听了一个老师研究了20年股市改进的周易起卦预测股票走势的课程，按照老师课程和方法自己编写了一个自动计算上卦、下卦、变爻的数字显示和大吉卦及最差卦的指标显示，实际验证了牛诩老师推荐的符合形态特征的股票截图，请大家参照使用。
这个指标的创意来源于牛老师，编写思路是自己经过不断试错，用excel验证之后，参照微信通大局相关课程自己自主编写的，源代码还在不断修正改进中，所有数据基于历史数据，仅限于参照使用，不作为买卖依据和操作指引，请大家批评指正。
18年曾经在本论坛有个帖子，询问相关指标，至今无人回复，因为自己等级不够，不能联系原发帖作者，请见谅。
今天是2020年2月28日，是一个周四，有人看涨，有人看跌，尤其是华为公主事件之后，喜忧参半，祝愿A股大红。
版权来源于原创作者，如有侵权，请联系本人删除。
“yishu01.tn6”的导入密码：2020618
{通达信YISHU主图指标}
{周易之梅花六数卦象}
N:=6;
VAR1:=CLOSE;
VAR2:=OPEN;
VAR3:=HIGH;
VAR4:=LOW;
VAR5:=VOL;
{计算六数}
A1:=(VAR1+VAR2+VAR3+VAR4)/4;
A2:=MA(CLOSE,5);
A3:=MA(CLOSE,10);
A4:=MA(CLOSE,20);
A5:=MA(CLOSE,30);
A6:=MA(CLOSE,60);
{卦象判断}
B1:=IF(A1>REF(A1,1),1,0);
B2:=IF(A2>REF(A2,1),1,0);
B3:=IF(A3>REF(A3,1),1,0);
B4:=IF(A4>REF(A4,1),1,0);
B5:=IF(A5>REF(A5,1),1,0);
B6:=IF(A6>REF(A6,1),1,0);
{卦象编码}
GUA:=B1*32+B2*16+B3*8+B4*4+B5*2+B6;
{绘制卦象}
DRAWICON(GUA=63, LOW*0.98, 1);
DRAWICON(GUA=0, HIGH*1.02, 2);
DRAWICON(GUA>=32 AND GUA<63, (HIGH+LOW)/2, 3);
DRAWICON(GUA>0 AND GUA<32, (HIGH+LOW)/2, 4);
{主图显示}
MA5:MA(CLOSE,5),COLORWHITE;
MA10:MA(CLOSE,10),COLORYELLOW;
MA20:MA(CLOSE,20),COLORMAGENTA;
MA30:MA(CLOSE,30),COLORGREEN;
MA60:MA(CLOSE,60),COLORBLUE;
{卦象提示}
DRAWTEXT(GUA=63, LOW*0.95, '乾卦'),COLORRED;
DRAWTEXT(GUA=0, HIGH*1.05, '坤卦'),COLORGREEN;
DRAWTEXT(GUA>=32 AND GUA<63, (HIGH+LOW)/2, '阳卦'),COLORRED;
DRAWTEXT(GUA>0 AND GUA<32, (HIGH+LOW)/2, '阴卦'),COLORGREEN;
未来函数检测结果如下：
该公式没有未来函数
定制指标公式、软件请联系QQ或微信同号：88652583
N赋值:6
VAR1赋值:收盘价
VAR2赋值:开盘价
VAR3赋值:最高价
VAR4赋值:最低价
VAR5赋值:成交量(手)
A1赋值:(VAR1+VAR2+VAR3+VAR4)/4
A2赋值:收盘价的5日简单移动平均
A3赋值:收盘价的10日简单移动平均
A4赋值:收盘价的20日简单移动平均
A5赋值:收盘价的30日简单移动平均
A6赋值:收盘价的60日简单移动平均
B1赋值:如果A1>1日前的A1,返回1,否则返回0
B2赋值:如果A2>1日前的A2,返回1,否则返回0
B3赋值:如果A3>1日前的A3,返回1,否则返回0
B4赋值:如果A4>1日前的A4,返回1,否则返回0
B5赋值:如果A5>1日前的A5,返回1,否则返回0
B6赋值:如果A6>1日前的A6,返回1,否则返回0
GUA赋值:B1*32+B2*16+B3*8+B4*4+B5*2+B6
当满足条件GUA=63时,在最低价*0.98位置画1号图标
当满足条件GUA=0时,在最高价*1.02位置画2号图标
当满足条件GUA>=32ANDGUA<63时,在(最高价+最低价)/2位置画3号图标
当满足条件GUA>0ANDGUA<32时,在(最高价+最低价)/2位置画4号图标
输出MA5:收盘价的5日简单移动平均,画白色
输出MA10:收盘价的10日简单移动平均,画黄色
输出MA20:收盘价的20日简单移动平均,画洋红色
输出MA30:收盘价的30日简单移动平均,画绿色
输出MA60:收盘价的60日简单移动平均,画蓝色
当满足条件GUA=63时,在最低价*0.95位置书写文字,画红色
当满足条件GUA=0时,在最高价*1.05位置书写文字,画绿色
当满足条件GUA>=32ANDGUA<63时,在(最高价+最低价)/2位置书写文字,画红色
当满足条件GUA>0ANDGUA<32时,在(最高价+最低价)/2位置书写文字,画绿色
