请老师写个突破前高平台回调至前高收买点的选股
[通达信] 7091
分段指标: MA03:=MA((C+O+H+L)/4,13),COLORMAGENTA,LINETHICK0; IF(C>MA03, MA03,DRAWNULL) ,COLORRED,LINETHICK0; IF(C<MA03, MA03,DRAWNULL) ,COLORGREEN,LINETHICK0; IF(C=MA03, MA03,DRAWNULL) ,COLORBLUE,LINETHICK0; SCMA3:=CROSS(C,MA03); XCMA3:=CROSS(MA03,C); SCJL:=BARSLAST(SCMA3); XCJL:=BARSLAST(XCMA3); ZGJJL:=HHVBARS(H,SCJL+1); ZDJJL:=LLVBARS(L,XCJL+1); SZL:=SCJL>=2 AND C>MA03; XDL:=XCJL>=2 AND C<MA03; SZL2:=SCJL=2 AND C>MA03; XDL2:=XCJL=2 AND C<MA03; SZL2JL:=BARSLAST(SZL2); XDL2JL:=BARSLAST(XDL2); SZFZ:=BACKSET(SZL,SCJL+1); XDFZ:=BACKSET(XDL,XCJL+1); JL:=BARSCOUNT(C); SZLFH1:=(SZL2JL<XDL2JL OR SZFZ OR (SZL2JL>0 AND COUNT(XDFZ,JL)=0)) AND C>MA03; XDLFH1:=(XDL2JL<SZL2JL OR XDFZ OR (XDL2JL>0 AND COUNT(SZFZ,JL)=0)) AND C<MA03; SZLFH:=IF(SZLFH1=1,1,0),LINETHICK0; XDLFH:=IF(XDLFH1=1,1,0),LINETHICK0; SZLFH22:=(SZL2JL<XDL2JL OR SZFZ OR (SZL2JL>0 AND COUNT(XDFZ,JL)=0)); XDLFH22:=(XDL2JL<SZL2JL OR XDFZ OR (XDL2JL>0 AND COUNT(SZFZ,JL)=0)); SZLFH2:=IF(SZLFH22=1,1,0),LINETHICK0; XDLFH2:=IF(XDLFH22=1,1,0),LINETHICK0; X1:=SZLFH AND REF(SZLFH,1)=0 AND REF(XDLFH22,1); Y1:=XDLFH AND REF(XDLFH,1)=0 AND REF(SZLFH22,1); X2:=SZLFH AND REF(SZLFH,1)=0 AND COUNT(REF(XDLFH OR SZLFH,1),JL)=0; Y2:=XDLFH AND REF(XDLFH,1)=0 AND COUNT(REF(XDLFH OR SZLFH,1),JL)=0; SZLFHJL:=BARSLAST(X1 OR X2)+1,LINETHICK0; XDLFHJL:=BARSLAST(Y1 OR Y2)+1,LINETHICK0; HH:=IF(SZFZ,H,0); LL:=IF(XDFZ,L,9999999); SZFHZGJJL:=HHVBARS(H,SZLFHJL); XDFHZDJJL:=LLVBARS(L,XDLFHJL); ZGFZ:=BACKSET(XDLFHJL=1 OR (BARSTATUS=2 AND SZLFHJL<XDLFHJL),SZFHZGJJL+1); ZDFZ:=BACKSET(SZLFHJL=1 OR (BARSTATUS=2 AND XDLFHJL<SZLFHJL),XDFHZDJJL+1); ZGFH:=ZGFZ>REF(ZGFZ,1); ZDFH:=ZDFZ>REF(ZDFZ,1); DRAWLINE(ZDFH,L,ZGFH,H,0),COLORRED,LINETHICK2; DRAWLINE(ZGFH,H,ZDFH,L,0),COLORGREEN,LINETHICK2; 量增: T1010:=COUNT(V>REF(V,1),3)=3; T2010:=COUNT(C>O AND C>REF(C,1),3)=3; T3:=MA(C,5)>REF(MA(C,5),1) AND MA(C,10)>REF(MA(C,10),1) AND MA(C,5)>MA(C,10); 量增:=T1010 AND T2010 AND T3; DRAWICON(量增,L,23); DRAWTEXT(量增,L-0.06,'量增'),COLOR0099FF; 买点: K3:=H>REF(H,1) AND C>=REF(H,1) AND O<=REF(C,1) AND L<REF(L,1) AND C>O AND REF(C,1)<REF(O,1); K4:=C>O AND H>REF(H,1) AND L>REF(L,1) AND REF(C,2)<REF(O,2) AND REF(L,2)>REF(L,1) AND REF(H,2)>REF(H,1) AND C>REF(H,1); K51:=REF(L,2)<REF(L,1) AND REF(L,2)<L AND REF(C,1)<REF(H,2) AND C>REF(H,2); K52:=REF(L,3)<REF(L,1) AND REF(L,3)>REF(L,2) AND REF(L,3)>L AND C>REF(H,3) AND REF(C,1)<REF(H,3) AND REF(C,2)<REF(H,3); K53:=REF(L,4)<REF(L,1) AND REF(L,4)>REF(L,2) AND REF(L,4)>REF(L,3) AND REF(L,4)>L AND C>REF(H,4) AND REF(C,1)<REF(H,4) AND REF(C,2)<REF(H,4) AND REF(C,3)<REF(H,4); K5:=K51 OR K52 OR K53; XG:=K4 OR K3 OR K5; DRAWTEXT(XG,L-0.05,'买点'),COLORWHITE; |
附件
延展阅读
楼主 |
2楼 |
3楼 |