同花顺牛通道主图指标公式

安装后如下图，友情提示（指标只是辅助，不作建议） 所有程序均为免费分享。

不会安装点击  安装指南 步骤操作

N1:=5;
//www.honghaie.com
一本:MA(CLOSE, N1),colormagenta,LINETHICK3;
HH:=(20*H+19*REF(H,1)+18*REF(H,2)+17*REF(H,3)+16*REF(H,4)+15*REF(H,5)+14*REF(H,6)
+13*REF(H,7)+12*REF(H,8)+11*REF(H,9)+10*REF(H,10)+9*REF(H,11)+8*REF(H,12)
+7*REF(H,13)+6*REF(H,14)+5*REF(H,15)+4*REF(H,16)+3*REF(H,17)+2*REF(H,18)+
REF(H,20))/210,colorblue,LINETHICK1;
LL:=(20*L+19*REF(L,1)+18*REF(L,2)+17*REF(L,3)+16*REF(L,4)+15*REF(L,5)+14*REF(L,6)
+13*REF(L,7)+12*REF(L,8)+11*REF(L,9)+10*REF(L,10)+9*REF(L,11)+8*REF(L,12)
+7*REF(L,13)+6*REF(L,14)+5*REF(L,15)+4*REF(L,16)+3*REF(L,17)+2*REF(L,18)+
REF(L,20))/210,colorblue,LINETHICK1;
D90H:=EMA(HH,90),colorred,LINETHICK1;
D90L:=EMA(LL,90),colorred,LINETHICK1;
DGH:=(20*H+19*REF(H,1)+18*REF(H,2)+17*REF(H,3)+16*REF(H,4)+15*REF(H,5)+14*REF(H,6)
+13*REF(H,7)+12*REF(H,8)+11*REF(H,9)+10*REF(H,10)+9*REF(H,11)+8*REF(H,12)
+7*REF(H,13)+6*REF(H,14)+5*REF(H,15)+4*REF(H,16)+3*REF(H,17)+2*REF(H,18)+
REF(H,20))/210,colorblue,LINETHICK1;DDL:=(20*L+19*REF(L,1)+18*REF(L,2)+17*REF(L,3)+16*REF(L,4)+15*REF(L,5)+14*REF(L,6)
+13*REF(L,7)+12*REF(L,8)+11*REF(L,9)+10*REF(L,10)+9*REF(L,11)+8*REF(L,12)
+7*REF(L,13)+6*REF(L,14)+5*REF(L,15)+4*REF(L,16)+3*REF(L,17)+2*REF(L,18)+
REF(L,20))/210,colorblue,LINETHICK1;D90C:=D90H-D90L;D90D:=D90H+D90C*2,colorred,LINETHICK1;D90T:=D90L-D90C*2,colorred,LINETHICK1;G0:=(XMA(XMA(H,25),25)-XMA(XMA(L,25),25))*1+XMA(XMA(H,25),25),LINETHICK1,colorwhite;D0:=XMA(XMA(L,25),25)-(XMA(XMA(H,25),25)-XMA(XMA(L,25),25))*1,LINETHICK1,colorwhite;DTD:=D0>=D90T AND G0>=D90D;KTD:=G0<=D90D AND D0<=D90T;ZDD:=D0>=D90T AND G0<=D90D;BDD0:=(XMA(XMA(H,60),60)-XMA(XMA(L,60),60))*3+XMA(XMA(H,60),60),LINETHICK2,colorgreen;BDT0:=XMA(XMA(L,60),60)-(XMA(XMA(H,60),60)-XMA(XMA(L,60),60))*3,LINETHICK2,colorgreen;STICKLINE(DTD=1,G0,D0,5,0),COLOR000066;STICKLINE(KTD=1,G0,D0,5,0),COLOR003300;STICKLINE(ZDD=1,G0,D0,5,0),COLOR555555;
牛:(XMA(XMA(H,25),25)-XMA(XMA(L,25),25))*1+XMA(XMA(H,25),25),DOTLINE,colorcyan,LINETHICK3;
牛犊:XMA(XMA(L,25),25)-(XMA(XMA(H,25),25)-XMA(XMA(L,25),25))*1,DOTLINE,colorwhite;
BS:(XMA(XMA(H,60),60)-XMA(XMA(L,60),60))*2.2+XMA(XMA(H,60),60),DOTLINE,colorred;
SS:=XMA(XMA(L,25),25)-(XMA(XMA(H,25),25)-XMA(XMA(L,25),25))*1.5,DOTLINE,colorgreen;
BD:XMA(XMA(L,60),60)-(XMA(XMA(H,60),60)-XMA(XMA(L,60),60))*2.8,DOTLINE,colorgreen,LINETHICK3;
ZZ:=(牛+牛犊)/2,DOTLINE,coloryellow;
STICKLINE(1=1,D90H,D90L,5,0),colorligray;
DEA3:=EMA((EMA(CLOSE,3) - EMA(CLOSE,6)),9),colorgreen,LINETHICK2;
DEA3B:=REF(DEA3,1),colorwhite,LINETHICK0;
DEA33B:=EMA((EMA(EMA(CLOSE,3) - EMA(CLOSE,9),3) - EMA(EMA(CLOSE,3) - EMA(CLOSE,9),9)),9),colorwhite,LINETHICK0;
DEA333B:=REF(DEA33B,1),colorwhite,LINETHICK0;
STICKLINE(DEA3B<DEA3 OR DEA333B<DEA33B,L,H,0.0,0),colorred;
STICKLINE(DEA3B<DEA3 OR DEA333B<DEA33B,C,O,3,1),colorred;
STICKLINE(DEA3<DEA3B,L,H,0.0,0),colorgreen;
STICKLINE(DEA3<DEA3B,C,O,3,1),colorgreen;
白色点多定位1:=L<牛犊 AND H>牛犊;
白色点空定位1:=H>牛 AND L<牛;
STICKLINE(白色点多定位1=1,L,牛犊,3,0),colorwhite;
STICKLINE(白色点空定位1=1,H,牛,3,0),colorwhite;
白色点多定位2:=H<牛犊;
白色点空定位2:=L>牛;
STICKLINE(白色点多定位2=1,L,H,0.0,0),colorwhite;
STICKLINE(白色点多定位2=1,C,O,3,0),colorwhite;
STICKLINE(白色点空定位2=1,L,H,0.0,0),colorwhite;
STICKLINE(白色点空定位2=1,C,O,3,0),colorwhite;
多头红色点:=DEA3B<DEA3 OR DEA333B<DEA33B;
空头红色点:=DEA3B>DEA3 OR DEA333B>DEA33B;
多头红色点定位1:=白色点多定位1=1 AND 多头红色点=1;
空头红色点定位1:=白色点空定位1=1 AND 空头红色点=1;
STICKLINE(多头红色点定位1=1,L,牛犊,3,0),colormagenta;
STICKLINE(空头红色点定位1=1,H,牛,3,0),colormagenta;
多头红色点定位2:=白色点多定位2=1 AND 多头红色点=1;
空头红色点定位2:=白色点空定位2=1 AND 空头红色点=1;
STICKLINE(多头红色点定位2=1,L,H,0.0,0),colormagenta;
STICKLINE(多头红色点定位2=1,C,O,3,0),colormagenta;
STICKLINE(空头红色点定位2=1,L,H,0.0,0),colormagenta;
STICKLINE(空头红色点定位2=1,C,O,3,0),colormagenta;
多头多定位:=CROSS(牛犊,L) AND DTD=1;
多头平定位:=CROSS(H,牛) AND DTD=1 AND ZDD=0;
空头空定位:=CROSS(H,牛) AND KTD=1;
空头平定位:=CROSS(牛犊,L) AND KTD=1 AND ZDD=0;
震荡多定位:=CROSS(牛犊,L) AND ZDD=1;
震荡空定位:=CROSS(H,牛) AND ZDD=1;
DRAWTEXT(ISLASTBAR,牛,'卖'),colorwhite;
DRAWTEXT(ISLASTBAR,牛犊,'买'),colorwhite;
DRAWTEXT(ISLASTBAR,BS,'顶'),colorred;
DRAWTEXT(ISLASTBAR,BD,'底'),colorgreen;
DRAWICON(CROSS(一本,牛) ,一本,13);