神奇均线战法源码
原理解析：
输出EMA13:收盘价的13日指数移动平均,画白色,线宽为2
输出EMA34:收盘价的34日指数移动平均,画黄色
输出EMA55:收盘价的55日指数移动平均,COLORFF00FF
输出EMA120:收盘价的120日指数移动平均,COLORFFCC66
AR1赋值:EMA55> EMA34 AND EMA34> EMA13
AR2赋值:上次(收盘价-EMA13)/EMA13*100=2日前的EMA13
AR4赋值:统计AR2日中满足收盘价上穿EMA13的天数=1
AR5赋值:AR1 AND AR2 AND AR3 AND AR4
AR6赋值:AR5 AND AR5的10日过滤
当满足条件AR6时,在最低价-0.09位置书写文字,画黄色
当满足条件AR6时,在最高价和最低价位置之间画柱状线,宽度为0.5,1不为0则画空心柱.,画黄色
当满足条件AR6时,在开盘价和收盘价位置之间画柱状线,宽度为6,1不为0则画空心柱.,线宽为2,画黄色
BR1赋值:统计5日中满足(收盘价-1日前的收盘价)/1日前的收盘价*100位于0和5之间的天数=5
BR2赋值:(EMA13-EMA34)+(EMA34-EMA55)的绝对值/收盘价EMA55 AND (1日前的收盘价0.5
CR2赋值:成交量(手)>成交量(手)的5日简单移动平均*0.6
CR3赋值:统计3日中满足EMA13上穿EMA55的天数=1
CR4赋值:EMA34-EMA55的绝对值/EMA55=1日前的EMA55
CR6赋值:CR1ANDCR2ANDCR3ANDCR4ANDCR5的2日过滤
当满足条件CR6时,在最高价和最低价位置之间画柱状线,宽度为0.5,1不为0则画空心柱.,COLORF00FF0
当满足条件CR6时,在开盘价和收盘价位置之间画柱状线,宽度为6,1不为0则画空心柱.,线宽为2,COLORF00FF0
当满足条件CR6时,在最低价-0.09位置书写文字,COLORF00FF0
DR1赋值:EMA13> EMA34 AND EMA34CANDCEMA55ANDBETWEEN((收盘价-EMA55)/EMA55,0,0.02)的天数=1
DR6赋值:收盘价>1日前的收盘价
DR7赋值: DR1 AND DR5 AND DR6
DR8赋值:DR7 AND DR7的10日过滤
当满足条件DR8时,在最低价-0.09位置书写文字,COLORD6BA63
当满足条件DR8时,在最高价和最低价位置之间画柱状线,宽度为0.5,1不为0则画空心柱.,COLORD6BA63
当满足条件DR8时,在开盘价和收盘价位置之间画柱状线,宽度为6,1不为0则画空心柱.,线宽为2,COLORD6BA63
ER赋值:上次1日前的EMA55上穿EMA34距今天数 AND EMA34上穿EMA55
当满足条件ER时,在最低价-0.09位置书写文字,COLOR0099FF
当满足条件ER时,在最高价和最低价位置之间画柱状线,宽度为0.5,1不为0则画空心柱.,COLOR0099FF
当满足条件ER时,在开盘价和收盘价位置之间画柱状线,宽度为6,1不为0则画空心柱.,线宽为2,COLOR0099FF
FR赋值:上次1日前的EMA34上穿EMA13距今天数 AND EMA13上穿EMA34
当满足条件FR时,在最低价-0.09位置书写文字,画白色
当满足条件FR时,在最高价和最低价位置之间画柱状线,宽度为0.5,1不为0则画空心柱.,画白色
当满足条件FR时,在开盘价和收盘价位置之间画柱状线,宽度为6,1不为0则画空心柱.,线宽为2,画白色
GR1赋值:上次"乖离率的BIAS2"(6,13,24)位于0和5之间距今天数
GR2赋值:EMA13> EMA34 AND EMA34> EMA55 AND EMA13>1日前的EMA13
GR3赋值:统计GR1日中满足"乖离率的BIAS2"(6,13,24)>10ANDH=GR1日内最高价的最高值的天数
GR4赋值:最高价=GR1日内最高价的最高值
GR5赋值:"平滑异同平均的MACD"(12,26,9)=3日前的EMA13 AND EMA34>=1日前的EMA34 AND EMA55>=1日前的EMA55 AND 收盘价上穿EMA13 ANDCROSS(收盘价,EMA34) AND 收盘价上穿EMA55
当满足条件HR2ANDFILTER(HR2,10)时,在最低价-0.09位置书写文字,COLORFFC8FF
当满足条件HR2ANDFILTER(HR2,10)时,在最高价和最低价位置之间画柱状线,宽度为0.5,1不为0则画空心柱.,COLORFFC8FF
当满足条件HR2ANDFILTER(HR2,10)时,在开盘价和收盘价位置之间画柱状线,宽度为6,1不为0则画空心柱.,线宽为2,COLORFFC8FF
TIPTEXT(ISNULL(1日后的收盘价),0,' '),画红色
TIPTEXT(ISNULL(1日前的收盘价),0,'同花顺程序化交易')
（ ）
源码：
ema13:EMA(C,13),colorwhite,linethick2;
ema34:EMA(C,34),coloryellow;
ema55:EMA(C,55),colorff00ff;
ema120:EMA(C,120),colorffcc66;
ar1:=ema55> Ema34 AND ema34> Ema13;
ar2:=BARSLAST((C-ema13)/ema13*100=REF(ema13,2);
ar4:=COUNT(CROSS(C,ema13),ar2)=1;
ar5:=ar1 AND ar2 AND ar3 AND ar4;
ar6:=ar5 AND FILTER(ar5,10);
DRAWTEXT(ar6,L-0.09,'红杏出墙'),coloryellow;
STICKLINE(ar6,H,L,0.5,1),coloryellow;
STICKLINE(ar6,O,C,6,1),linethick2,coloryellow;
br1:=COUNT(BETWEEN((C-REF(C,1))/REF(C,1)*100,0,5) ,5)=5;
br2:=ABS((ema13-ema34)+(ema34-ema55))/Cema55 AND (REF(C,1)0.5;
cr2:=V> MA(V,5)*0.6;
cr3:=COUNT(CROSS(ema13,ema55),3)=1;
cr4:=ABS(ema34-ema55)/ema55=REF(ema55,1);
cr6:=FILTER(cr1 AND cr2 AND cr3 AND cr4 AND
cr5,2);
STICKLINE(cr6,H,L,0.5,1),colorf00ff0;
STICKLINE(cr6,O,C,6,1),linethick2,colorf00ff0;
DRAWTEXT(cr6,L-0.09,'红衣侠女'),colorf00ff0;
dr1:=ema13> Ema34 AND ema34C AND Cema55 AND BETWEEN((C-ema55)/ema55,0,0.02),dr4)=1;
dr6:=C> REF(C,1);
dr7:= dr1 AND dr5 AND dr6 ;
dr8:=dr7 AND FILTER(dr7 ,10);
DRAWTEXT(dr8,L-0.09,'黑客点击'),colord6ba63;
STICKLINE(dr8,H,L,0.5,1),colord6ba63;
STICKLINE(dr8,O,C,6,1),linethick2,colord6ba63;
er:=BARSLAST(REF(CROSS(ema55,ema34),1)) AND CROSS(ema34,ema55);
DRAWTEXT(er,L-0.09,'均线互换'),color0099ff;
STICKLINE(er,H,L,0.5,1),color0099ff;
STICKLINE(er,O,C,6,1),linethick2,color0099ff;
fr:=BARSLAST(REF(CROSS(ema34,ema13),1)) AND CROSS(ema13,ema34);
DRAWTEXT(fr,L-0.09,'梅开二度'),colorwhite;
STICKLINE(fr,H,L,0.5,1),colorwhite;
STICKLINE(fr,O,C,6,1),linethick2,colorwhite;
gr1:=BARSLAST(BETWEEN("bias.bias2"(6,13,24),0,5) );
gr2:=ema13> Ema34 AND ema34> Ema55 AND ema13> REF(ema13,1);
gr3:=COUNT("bias.bias2"(6,13,24)>10 AND H=HHV(H,gr1),gr1);
gr4:=H=HHV(H,gr1);
gr5:="macd.macd"(12,26,9)=REF(ema13,3) AND ema34>=REF(ema34,1) AND ema55>=REF(ema55,1) AND CROSS(C,ema13) AND
CROSS(C,ema34) AND CROSS(C,ema55);
DRAWTEXT(hr2 AND FILTER(hr2,10),L-0.09,'三线推进'),colorFFC8FF;
STICKLINE(hr2 AND FILTER(hr2,10),H,L,0.5,1),colorFFC8FF;
STICKLINE(hr2 AND FILTER(hr2,10),O,C,6,1),linethick2,colorFFC8FF;
TIPTEXT(ISNULL(REFX(CLOSE,1)),0,' '),colorred;
TIPTEXT(ISNULL(REF(CLOSE,1)),0,'');