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