通达信最全135战法主图选股指标公式源码

通达信最全135战法主图选股指标公式源码

源码正文：

ema13:ma(C,13),COLORRED,LINETHICK2{XG51};
EMA34:MA(C,34),COLORBLUE{XG51};
EMA55:MA(C,55),COLORFF00FF{XG51};
HX1:=EMA13<EMA34 AND EMA34<EMA55{XG51};
HX2:=BArslAst((C-EMA13)/EMA13*100<-6){XG51};
HX3:=Abs(1-EMA55/REF(C,1))>0.1{XG51};
HX6:=BARSLAST(crOSS(EMA55,EMA34))>=20{XG51};
HX4:=ABS(1-REF(EMA13,1)/EMA13)<0.004 AND C<EMA34{XG51};
HX5:=REF(C,1)<EMA13 AND C>EMA13 AND C>O{XG51};
HX7:=HX1  AND HX4 AND HX5 {XG51};
HX8:=HX7 AND FILTER(HX7,10){XG51};
DRAWTEXT(HX8,L-0.4L,'1红杏出墙'),COLORBLUE{XG51};
BR1:=COUNT(BETWEEN(((C-O)/O)*100,0,5) ,5)=5{XG51};
BR2:=(ABS(EMA13-EMA34)+ABS(EMA34-EMA55))/C<0.1{XG51};
BR3:=C>EMA55 AND COUNT(L<EMA55,5)>=1{XG51};
MYSS:=BR1 AND BR2 AND BR3{XG51};
DRAWTEXT(MYSS AND FILTER(MYSS,5), L-0.4L,'1蚂蚁上树'),COLORBLUE{XG51};
MSQT1:=EMA55/EMA13>1.04 AND EMA13/C>1.03{XG51};
MSQT2:=O<=REF(L,1) AND REF(O,1)/REF(C,1)>1.03{XG51};
MSQT:= MSQT1 AND MSQT2{XG51};
DRAWTEXT(MSQT, L-0.4L,'1马失前蹄'),COLORBLUE{XG51};
JCFS1:=EMA55>EMA13 AND EMA13>C{XG51};
JCFS2:=O<=REF(L,1) AND C/O>1.05{XG51};
JCFS:= JCFS1 AND JCFS2{XG51};
DRAWTEXT(JCFS, L-0.4L,'1绝处逢生'),COLORBLUE{XG51};
JWCJ1:=C<O AND REF(C,1)<REF(O,1){XG51};
JWCJ2:=O<=REF(C,1) AND L>=REF(L,1){XG51};
JWCJ3:=REF(C,1)/REF(L,1)>1.02{XG51};
JWCJ4:=EMA13<EMA34 OR EMA13<EMA55{XG51};
JWCJ:=JWCJ1 AND JWCJ2 AND JWCJ3 AND JWCJ4{XG51};
DRAWTEXT(JWCJ, L-0.4L,'1金屋藏娇'),COLORBLUE{XG51};
RYHB1:=REF(O,1)<=REF(C,2) AND REF(C,1)<REF(O,1) AND ABS(1-REF(C,1)/REF(L,1))<0.02{XG51};
RYHB2:=C>O AND ABS(1-C/REF(O,1))<0.025 AND ABS(1-O/REF(C,1))<0.025{XG51};
RYHB3:=EMA13<REF(EMA13,1) OR ABS(1-EMA13/REF(EMA13,1))<0.01 AND (EMA13<EMA34 OR EMA13<EMA55){XG51};
RYHB4:=REF(L,1)<=LLV(REF(L,1),10){XG51};
RYHB:=RYHB1 AND RYHB2 AND RYHB3 AND RYHB4{XG51};
DRAWTEXT(RYHB , L-0.4L,'1日月合璧'),COLORBLUE{XG51};
PJCY1:=REF(O,1)/REF(C,1)>1.02{XG51};
PJCY2:=O<=REF(C,1) AND C>=REF(O,1){XG51};
PJCY3:=(ABS(1-REF(C,1)/EMA55)<0.05 OR ABS(1-C/EMA55)<0.05 OR ABS(1-MA(C,2)/EMA55)<0.05){XG51};
PJCY4:=EMA13>EMA55 OR EMA13>MA(EMA13,5){XG51};
PJCY:=PJCY1 AND PJCY2 AND PJCY3 AND PJCY4{XG51};
DRAWTEXT(PJCY, L-0.4L,'1破镜重圆'),COLORBLUE{XG51};
BBG1:=C>=REF(C,1) AND REF(C,1)>=REF(C,2){XG51};
BBG2:=V>=REF(V,1) AND REF(V,1)>=REF(V,2){XG51};
BBG3:=COUNT(C>=O,3)=3{XG51};
BBG:=BBG1 AND BBG2 AND BBG3{XG51};
DRAWTEXT(BBG AND FILTER(BBG,3), L-0.4L,'1步步高'),COLORBLUE{XG51};
DJ1:=EMA13>EMA34 AND EMA34<EMA55{XG51};
DJ2:=O>EMA55{XG51};
DJ3:=CROSS(EMA13,EMA55) OR ABS(1-EMA13/EMA55)<0.002{XG51};
DJ4:=O>C AND C<REF(C,1){XG51};
Hkdj:= DJ2 AND DJ3 AND DJ4{XG51};
DRAWTEXT(HkdJ AND FILTER(HKDJ,10),L,'2黑客点击'),COLORWHITE{XG51};
XN1:=ABS(1-HHV(EMA55,5)/LLV(EMA55,5))<0.02{XG51};
XN2:=CROSS(EMA13,EMA55) OR ABS(1-EMA13/EMA55)<0.002{XG51};
XN3:=C>O AND V>REF(V,1) AND C>EMA55{XG51};
HYXN:=XN1 AND XN2 AND XN3{XG51};
DRAWTEXT(HYXN AND FILTER(HYXN,5),L,'2红衣侠女'),COLORWHITE{XG51};
LY1:=COUNT(ABS(1-EMA55/EMA34)<0.1,20)>=16{XG51};
LY2:=COUNT(CROSS(EMA34,EMA13),40)>=1 AND COUNT(CROSS(EMA55,EMA13),40)>=1{XG51};
LY3:=CROSS(EMA13,EMA55){XG51};
HDLY:=LY1 AND LY2 AND LY3{XG51};
DRAWTEXT(HDLY AND FILTER(HDLY,5),L-0.3L,'2海底捞月'),COLORWHITE{XG51};
JXHH:=BARSLAST(REF(CROSS(EMA55,EMA34),1)) AND CROSS(EMA34,EMA55){XG51};
DRAWTEXT(JXHH,L-0.4L,'2均线互换'),COLORWHITE{XG51};
MKED1:=BARSLAST(REF(CROSS(EMA34,EMA13),1)){XG51};
MKED2:=COUNT(H>=EMA55,MKED1)=MKED1{XG51};
MKED:=MKED2 AND CROSS(EMA13,EMA34){XG51};
DRAWTEXT(MKED,L-0.2L,'2梅开二度'),COLORWHITE{XG51};
YY1:=C>EMA13 AND O<EMA13{XG51};
YY2:=C>EMA34 AND O<EMA34{XG51};
YY3:=C>EMA55 AND O<EMA55{XG51};
YYSX:=YY1 AND YY2 AND YY3{XG51};
DRAWTEXT(YYSX,L-0.2L,'2一阳三线'),COLORWHITE{XG51};
MAX3:=MAX(MAX(EMA13,EMA34),EMA55){XG51};
MIN3:=MIN(MIN(EMA13,EMA34),EMA55){XG51};
JG1:=ABS(EMA13-EMA34)<C*0.05{XG51};
JG2:=ABS(EMA34-EMA55)<C*0.05{XG51};
JG3:=C>=O*1.03 AND C>MAX3{XG51};
JG4:=O>MIN3 AND O<MAX3{XG51};
JG5:=C>REF(H,5){XG51};
JG6:=(C-EMA34)/EMA34<=0.15{XG51};
JG7:=V>MA(V,5) AND MA(V,10){XG51};
JGEQ:=JG1 AND JG2 AND JG3 AND JG4 AND JG5 AND JG6 AND JG7{XG51};
DRAWTEXT(JGEQ,L-0.2L,'2揭竿而起'),COLORWHITE{XG51};
MAX4:=MAX(MAX(MAX(EMA13,EMA34),EMA55),H){XG51};
MIN4:=MIN(MIN(MIN(EMA13,EMA34),EMA55),L){XG51};
SXTJ1:=HHV(MAX4,60){XG51};
SXTJ2:=LLV(MIN4,60){XG51};
SXTJ3:=EVERY(ABS(1-SXTJ1/SXTJ2)<0.3,20){XG51};
SXTJ:=SXTJ3 AND (YYSX OR JGEQ){XG51};
DRAWTEXT(SXTJ AND FILTER(SXTJ,10),L-0.2L,'2三线推进'),COLORWHITE{XG51};
STBJ1:=CROSS(dmi.pdi,DMI.mdi){XG51};
STBJ2:=ABS(1-DMI.ADX/DMI.ADXR)<0.1{XG51};
STBJ:=STBJ1 AND STBJ2{XG51};
DRAWTEXT(STBJ,L-0.2L,'2双蹄并进'),COLORWHITE{XG51};
TSWL1:=CROSS(EMA13,EMA34) AND EMA13<EMA55{XG51};
DRAWTEXT(TSWL1,L-0.2L,'2投石问路'),COLORWHITE{XG51};
SJJJ3:=REF(EMA55,1)>REF(EMA13,1){XG51};
SJJJ4:=ABS(1-(MAX(MAX(EMA34,EMA55),EMA13)/MIN(MIN(EMA13,EMA34),EMA55)))<0.005{XG51};
SJJJ:=SJJJ3 AND SJJJ4{XG51};
DRAWTEXT(SJJJ AND FILTER(SJJJ,5),L-0.2L,'2三军集结'),COLORWHITE{XG51};
三军集结:=SJJJ AND FILTER(SJJJ,5){XG51};
XG:三军集结,NODRAW{XG51};
LZ1:=REF(C,2)<REF(O,2) AND REF(C,1)<REF(O,1) AND C<O{XG51};
LZ2:=C<=REF(C,1) AND REF(C,1)<=REF(C,2){XG51};
LZ3:=MA(V,3)<REF(V,3){XG51};
LZ4:=REF(C,3)>EMA13 AND (C>EMA55 OR ABS(1-C/EMA55)<0.01){XG51};
LZHT:=LZ1 AND LZ2 AND LZ3 AND LZ4{XG51};
DRAWTEXT(LZHT AND FILTER(LZHT,5), H+0.2H,'3浪子回头'),COLORYELLOW{XG51};
ZSF1:=REF(C,4)>REF(O,4) AND (REF(C,4)>EMA13 OR REF(C,4)>EMA34) AND (ABS(1-REF(EMA55,4)/EMA55)<0.01 OR MA(EMA55,4)>REF(EMA55,5)){XG51};
ZSF2:=COUNT(ABS((1-REF(C,1)/C)*100)<3,4)=4 AND MA(V,4)<REF(V,4)*0.8{XG51};
ZSF:=ZSF1 AND ZSF2{XG51};
DRAWTEXT(ZSF AND FILTER(ZSF,4), H+0.2H,'3走四方'),COLORYELLOW{XG51};
ADCC1:=O/C>1.05 AND EMA13/EMA55<1.1 AND EMA13>MA(EMA13,5){XG51};
ADCC2:=O/REF(C,1)<1.03;{XG51};
ADCC:=ADCC1 AND ADCC2{XG51};
DRAWTEXT(ADCC, H+0.2H,'3暗度陈仓'),COLORYELLOW{XG51};
YSEN1:=REF(C,2)>REF(O,2) AND REF(C,1)<REF(O,1) AND C<O{XG51};
YSEN2:=REF(C,2)>EMA55 AND EMA13>EMA55 AND EMA13>=MA(EMA13,5){XG51};
YSEN3:=REF(V,2)>REF(V,1) AND REF(V,2)>V{XG51};
YSEN:=YSEN1 AND YSEN2 AND YSEN3{XG51};
DRAWTEXT(YSEN, H+0.2H,'3一石二鸟'),COLORYELLOW{XG51};
SFY1:=EMA13>EMA34 AND EMA34>EMA55{XG51};
SFY2:=REF(O,1)>=REF(C,2) AND O>=REF(C,1) AND REF(C,2)>=REF(O,2){XG51};
SFY3:=COUNT(C>O AND C/O<1.02,2)=2 OR COUNT(C<O AND O/C<1.02,2)=2{XG51};
SFY4:= V<REF(V,1){XG51};
SFY:=SFY1 AND SFY2 AND SFY3 AND SFY4{XG51};
DRAWTEXT(SFY AND FILTER(SFY,2), H+0.2H,'3双飞燕'),COLORYELLOW{XG51};
SJK1:=EMA13>EMA34 AND EMA34>EMA55{XG51};
SJK2:=COUNT(C<=O AND O/C<1.03,3)=3 AND COUNT(ABS(1-REF(C,1)/C)<1.03,2)=2{XG51};
SJK:=SJK1 AND SJK2{XG51};
DRAWTEXT(SJK AND FILTER(SJK,3), H+0.2H,'3三剑客'),COLORYELLOW{XG51};
SXWY1:=COUNT(C>=O AND C/O<1.03,4)=4{XG51};
SXWY2:=(ABS(EMA13-EMA34)+ABS(EMA34-EMA55))/C<0.1{XG51};
SXWY3:=EMA13<EMA55{XG51};
SXWY:=SXWY1 AND SXWY2 AND SXWY3{XG51};
DRAWTEXT(SXWY AND FILTER(SXWY,5), H+0.2H,'3四星望月'),COLORYELLOW{XG51};
XXDD1:=ABS(1-C/O)*100<=2.5 AND H/MAX(C,O)>1.03 AND REF(C,1)/REF(O,1)>1.05{XG51};
XXDD2:=O>=REF(C,1) AND ABS(1-REF(EMA13,1)/EMA55)<0.1{XG51};
XXDD:=XXDD1 AND XXDD2{XG51};
DRAWTEXT(XXDD,H+0.2H,'3星星点灯'),COLORYELLOW{XG51};
XNYR1:=REF(C,1)/REF(O,1)>1.05{XG51};
XNYR2:=O<=REF(C,1) AND ABS(1-C/O)<0.02{XG51};
XNYR3:=COUNT(JGEQ OR YYSX OR HYXN,10)>=1 AND COUNT(JGEQ OR YYSX OR HYXN,2)=0{XG51};
XNYR:=XNYR1 AND XNYR2 AND XNYR3{XG51};
DRAWTEXT(XNYR, H+0.2H,'3小鸟依人'),COLORYELLOW{XG51};
LGJY1:=O<=REF(C,1) AND V<REF(V,1) AND C<O{XG51};
LGJY2:=COUNT(JGEQ OR YYSX OR HYXN,2)=1{XG51};
LGJY:=LGJY1 AND LGJY2{XG51};
DRAWTEXT(LGJY, H+0.2H,'3立竿见影'),COLORYELLOW{XG51};
YYSX1:=C<EMA13 AND O>EMA13{XG51};
YYSX2:=C<EMA34 AND O>EMA34{XG51};
YYSX3:=C<EMA55 AND O>EMA55{XG51};
YYYSX:=YYSX1 AND YYSX2 AND YYSX3{XG51};
DRAWTEXT(YYYSX,H+0.4H,'4一阴三线'),COLORCYAN{XG51};
LJXS1:=O<REF(L,1) AND EMA13/EMA55>1.05 AND C<O{XG51};
DRAWTEXT(LJXS1,H+0.4H,'4落井下石'),COLORCYAN{XG51};
CZMG1:=REF(C,1)/REF(O,1)>1.05 AND REF(V,1)/REF(V,2)>2 AND HSL>3{XG51};
CZMG2:=C>O AND V<REF(V,1){XG51};
CZMG:=CZMG1 AND CZMG2{XG51};
DRAWTEXT(CZMG,H+0.4H,'4晨钟暮鼓'),COLORCYAN{XG51};
Y:=(EMA13-EMA55)/EMA13*100{XG51};
JHJX:=REF(Y,1)<=10 AND Y>10{XG51};
DRAWTEXT(JHJX,H+0.4H,'4见好就收'),COLORCYAN{XG51};
YZ1:=C/O>1.01 AND H/C>1.025 {XG51};
YZ2:=EMA13>MAX(EMA34,EMA55) AND C>1.05*EMA13 AND O>MA(C,11){XG51};
YZDX:=YZ1 AND YZ2{XG51};
DRAWTEXT(YZDX,H+0.4H,'4一枝独秀'),COLORCYAN{XG51};
DSGL1:=REF(C,1)>=REF(O,1){XG51};
DSGL2:=O/REF(C,1)>1.029 AND O/C>1.03 AND O/MAX(EMA13,EMA55)>1.03{XG51};
DSGL:=DSGL1 AND DSGL2{XG51};
DRAWTEXT(DSGL,H+0.4H,'4独上高楼'),COLORCYAN{XG51};
FDYB:=CROSS(EMA34,EMA13) AND EMA34>EMA55{XG51};
DRAWTEXT(FDYB,H+0.4H,'4分道扬镳'),COLORCYAN{XG51};
TCCW1:=REF(EMA55,1)<REF(EMA13,1){XG51};
TCCW2:=EMA13<LLV(REF(EMA13,1),5) AND ABS(1-(MAX(MAX(EMA34,EMA55),EMA13)/MIN(MIN(EMA13,EMA34),EMA55)))<0.008{XG51};
TCCW:=TCCW1 AND TCCW2{XG51};
DRAWTEXT(TCCW AND FILTER(TCCW,5),H+0.4H,'4突出重围'),COLORCYAN{XG51};
MXZD1:=C/O>1.07{XG51};
MXZD2:=EMA13>HHV(REF(EMA13,1),5) AND V>HHV(REF(V,1),10) AND V/MA(REF(V,1),5)>2{XG51};
MXZD:=MXZD1 AND MXZD2{XG51};
DRAWTEXT(MXZD,H+0.4H,'4明修栈道'),COLORCYAN{XG51};
TNDS1:=O/REF(C,1)>1.05 AND MIN(C,O)/L>1.03{XG51};
TNDS2:=C/MAX(EMA13,EMA55)>1.03 AND C>REF(C,1){XG51};
TNDS:=TNDS1 AND TNDS2{XG51};
DRAWTEXT(TNDS,H+0.4H,'4拖泥带水'),COLORCYAN{XG51};
JCTQ1:=C<O AND (EMA13/EMA55>1.1 OR (C/MIN(EMA13,EMA55)>1.1)) AND EMA13>MA(EMA13,5){XG51};
JCTQ2:=REF(O,1)>=REF(C,2) AND REF(C,1)>REF(O,1) AND O<=REF(C,1) AND C>REF(O,1){XG51};
JCTQ:=JCTQ1 AND JCTQ2{XG51};
DRAWTEXT(JCTQ,H+0.4H,'4金蝉脱壳'),COLORCYAN{XG51};
YJCX:=CROSS(EMA55,EMA13){XG51};
DRAWTEXT(YJCX,H+0.4H,'4一箭穿心'),COLORCYAN{XG51};
GHCQ1:=C<O AND O/C>=1.04{XG51};
GHCQ2:=O>EMA13 AND C<EMA13{XG51};
GHCQ3:=EMA13/EMA55>1.1 AND ABS(1-EMA13/MA(EMA13,3))<0.02{XG51};
GHCQ:=GHCQ1 AND GHCQ2 AND GHCQ3{XG51};
DRAWTEXT(GHCQ,H+0.4H,'4过河拆桥'),COLORCYAN{XG51};
GJTQ1:=O/REF(C,1)>1.02 AND L>REF(C,1){XG51};
GJTQ2:=V>MA(V,5){XG51};
GJTQ3:=EMA13/EMA55>1.1{XG51};
GJTQ:=GJTQ1 AND GJTQ2 AND GJTQ3{XG51};
DRAWTEXT(GJTQ,H+0.4H,'4狗急跳墙'),COLORCYAN{XG51};
YJFH1:=REF(C,1)>=REF(O,1){XG51};
YJFH2:=H/MAX(C,O)>=1.035 {XG51};
YJFH3:=V/MA(REF(V,1),11)>3 AND EMA13/EMA55>1.05{XG51};
YJFH:=YJFH1 AND YJFH2 AND YJFH3{XG51};
DRAWTEXT(YJFH,H+0.4H,'4一剑封喉'),COLORCYAN{XG51};
JWSZ1:=EMA13>MAX(EMA34,EMA55) AND EMA13/EMA55>1.1 AND REF(C,1)>1.04*EMA13 AND REF(C,1)/REF(O,1)>1.04{XG51};
JWSZ2:=ABS(1-C/O)<0.015 AND ABS(1-REF(C,1)/C)<0.02{XG51};
JWSZ:=JWSZ1 AND JWSZ2{XG51};
DRAWTEXT(JWSZ,H+0.4H,'4节外生枝'),COLORCYAN{XG51};
XLCD1:=REF(H,1)/MAX(REF(C,1),REF(O,1))>1.04{XG51};
XLCD2:=H<REF(H,1) AND O>=REF(C,1){XG51};
XLCD3:=EMA13/EMA55>1.05 AND C/EMA13>1.03{XG51};
XLCD:=XLCD1 AND XLCD2 AND XLCD3{XG51};
DRAWTEXT(XLCD,H+0.4H,'4笑里藏刀'),COLORCYAN{X.G?5_1.C.N.{};