凯恩斯主图指标公式源码[通达信公式]

相关标签:

{凯恩斯}

原理解析：
A1赋值:日期 <= 13181231 输出七天线:收盘价的7日简单移动平均,画深灰色 输出工作线:(收盘价的14日指数移动平均) * A1,POINTDOT,线宽为4,画黄色 输出生命线:(收盘价的25日简单移动平均) * A1,线宽为2,画洋红色 输出不惑线:(收盘价的40日简单移动平均) * A1,画青色 输出姊妹线:(收盘价的56日指数移动平均) * A1,,POINTDOT,画白色 A3赋值:(((收盘价的21日线性回归斜率)*20)+收盘价)的68日指数移动平均 A4赋值:收盘价的10日指数移动平均 A5赋值:2日前的收盘价 A6赋值:((((收盘价-A5)和0的较大值)的6日[1日权重]移动平均) / ((收盘价-A5)的绝对值的6日[1日权重]移动平均)) * 100 A7赋值:如果((A6<(1日前的A6))AND(A6>79)),返回A6,否则返回0 A8赋值:21日内最低价的最低值 A9赋值:21日内最高价的最高值 A10赋值:(((收盘价-A8)/(A9-A8))*100)的5日指数移动平均 A11赋值:(((收盘价-A8)/(A9-A8))*50)的13日指数移动平均 A12赋值:((0.667*(1日前的A10))+(0.333*A10))的2日指数移动平均 A13赋值:55日内最低价的最低值 A14赋值:34日内最高价的最高值 A15赋值:(((收盘价-A13)/(A14-A13))*100)的3日指数移动平均 A16赋值:(A11 + A15) / 2 A17赋值:((0.667*(1日前的A15))+(0.333*A10))的2日指数移动平均 A18赋值:A16的5日指数移动平均 A19赋值:((0.667*(1日前的A18))+(0.333*A18))的2日指数移动平均 A20赋值:A10上穿A11 A21赋值:(A10上穿A19) AND (A19 < 30) A22赋值:A21 * 0.6 A23赋值:((收盘价 + 最低价) + 最高价) / 3 A24赋值:A23的6日指数移动平均 A25赋值:A24的5日指数移动平均 A26赋值:A24上穿A25 当满足条件A26时,在(最低价/1.015)位置画1号图标,线宽为2,画洋红色 当满足条件A4上穿A3时,在最低价*0.9位置书写文字,线宽为4,画黄色 当满足条件((收盘价>=工作线)AND(收盘价>=开盘价))时,在最高价和最低价位置之间画柱状线,宽度为0,1不为0则画空心柱.,画红色 当满足条件((收盘价>=工作线)AND(收盘价>=开盘价))时,在开盘价和收盘价位置之间画柱状线,宽度为2,1不为0则画空心柱.,画红色 当满足条件((收盘价>=工作线)AND(收盘价<=开盘价))时,在最高价和最低价位置之间画柱状线,宽度为0,0不为0则画空心柱.,画红色 当满足条件((收盘价>=工作线)AND(收盘价<=开盘价))时,在开盘价和收盘价位置之间画柱状线,宽度为2,0不为0则画空心柱.,画红色 当满足条件((收盘价<工作线)AND(收盘价>=开盘价))时,在最高价和最低价位置之间画柱状线,宽度为0,1不为0则画空心柱.,画绿色 当满足条件((收盘价<工作线)AND(收盘价>=开盘价))时,在开盘价和收盘价位置之间画柱状线,宽度为2,1不为0则画空心柱.,画绿色 当满足条件((收盘价<工作线)AND(收盘价<=开盘价))时,在最高价和最低价位置之间画柱状线,宽度为0,0不为0则画空心柱.,画绿色 当满足条件((收盘价<工作线)AND(收盘价<=开盘价))时,在开盘价和收盘价位置之间画柱状线,宽度为2,0不为0则画空心柱.,画绿色 当满足条件收阳线时,在横轴0.01纵轴0.9位置书写文字,画红色 当满足条件收阳线时,在横轴1纵轴1位置书写文字,画红色

 来源:程序化99（ WWW.CXH99.COM ）

源码：

A1:=DATE <= 13181231;七天线:MA(C,7),COLORGRAY;工作线:(EMA(C,14)) * A1,POINTDOT,LINETHICK4,COLORYELLOW;生命线:(MA(C,25)) * A1,LINETHICK2,COLORMAGENTA;不惑线:(MA(C,40)) * A1,COLORCYAN;姊妹线:(EMA(C,56)) * A1,,POINTDOT,COLORWHITE;{www.88gs.com}A3:=EMA((((SLOPE(C,21)) * 20) + C),68);A4:=EMA(C,10);A5:=REF(C,2);A6:=((SMA((MAX((C - A5),0)),6,1)) / (SMA(ABS((C - A5)),6,1))) * 100;A7:=IF(((A6 < (REF(A6,1))) AND (A6 > 79)),A6,0);A8:=LLV(L,21);A9:=HHV(H,21);A10:=EMA((((CLOSE - A8) / (A9 - A8)) * 100),5);A11:=EMA((((CLOSE - A8) / (A9 - A8)) * 50),13);A12:=EMA(((0.667 * (REF(A10,1))) + (0.333 * A10)),2);A13:=LLV(L,55);A14:=HHV(H,34);A15:=EMA((((C - A13) / (A14 - A13)) * 100),3);A16:=(A11 + A15) / 2;A17:=EMA(((0.667 * (REF(A15,1))) + (0.333 * A10)),2);A18:=EMA(A16,5);A19:=EMA(((0.667 * (REF(A18,1))) + (0.333 * A18)),2);A20:=CROSS(A10,A11);A21:=(CROSS(A10,A19)) AND (A19 < 30);A22:=A21 * 0.6;A23:=((C + L) + H) / 3;A24:=EMA(A23,6);A25:=EMA(A24,5);A26:=CROSS(A24,A25);DRAWICON(A26,(LOW / 1.015),1),LINETHICK2,COLORMAGENTA;DRAWTEXT(CROSS(A4,A3),L*0.9,'买!'),LINETHICK4,COLORYELLOW;STICKLINE(((C >= 工作线) AND (C >= O)),H,L,0,1),COLORRED;STICKLINE(((C >= 工作线) AND (C >= O)),O,C,2,1),COLORRED;STICKLINE(((C >= 工作线) AND (C <= O)),H,L,0,0),COLORRED;STICKLINE(((C >= 工作线) AND (C <= O)),O,C,2,0),COLORRED;STICKLINE(((C < 工作线) AND (C >= O)),H,L,0,1),COLORGREEN;STICKLINE(((C < 工作线) AND (C >= O)),O,C,2,1),COLORGREEN;STICKLINE(((C < 工作线) AND (C <= O)),H,L,0,0),COLORGREEN;STICKLINE(((C < 工作线) AND (C <= O)),O,C,2,0),COLORGREEN;
DRAWTEXT_FIX(C>O,0.01,0.9,0,' WWW.CXH99.COM '),COLORRED;
DRAWTEXT_FIX(C>O,1,1,0,'程序化交易模型'),COLORRED;

 

公式导入教程: 【通达信公式源码导入方法教程】 【同花顺公式源码导入方法教程】 【大智慧新一代公式源码导入方法教程】