通达信岛形反转主幅图选股源码

{岛形反转一网打尽主图}
T:=BARSLAST(H<REF(L,1));
 TJ:=HHV(H,T+1);
 TJ1:=CROSS(C,REF(L,T+1));
 TJ2:=TJ<REF(L,T+1);
 XG:=REF(TJ2,1) AND TJ1;
 QF:=BACKSET(XG=1,T+2);
 QFT:=BARSLAST(CROSS(QF=1,0.5));
 ZF:=(REF(L,T+1)-LLV(L,T+1))/LLV(L,T+1)*100;
 NOTEXT:DRAWLINE(QFT=0,L,XG,REF(L,QFT),0),COLORYELLOW;
岛内振幅:IF(XG=1,ZF,DRAWNULL),NODRAW,COLORYELLOW;
突破价:IF(QF=1,REF(L,QFT),DRAWNULL),NODRAW,COLORYELLOW;
下缺口:IF(XG=1,REF(HHV(H,T+1),1),DRAWNULL),NODRAW,COLORYELLOW;
缺口差价:IF(XG=1,突破价-下缺口,DRAWNULL),NODRAW,COLORYELLOW;
突破幅度:IF(XG=1,(C/突破价-1)*100,DRAWNULL),NODRAW,COLORYELLOW;
突破量:IF(XG=1,VOL/REF(VOL,1),DRAWNULL),NODRAW,COLORYELLOW;

{岛形反转一网打尽选股}
T:=BARSLAST(H<REF(L,1));
 TJ:=HHV(H,T+1);
 TJ1:=CROSS(C,REF(L,T+1));
 TJ2:=TJ<REF(L,T+1);
 XG:REF(TJ2,1) AND TJ1;

 {我优化的主图}

T:=BARSLAST(H<REF(L,1));
 TJ:=HHV(H,T+1);
 TJ1:=CROSS(C,REF(L,T+1));
 TJ2:=TJ<REF(L,T+1);
突破幅度:=(C/REF(L,T+1)-1)*100;
突破量:=VOL/REF(VOL,1);
 ZF:=(REF(L,T+1)-LLV(L,T+1))/LLV(L,T+1)*100;
 XG:=REF(TJ2,1) AND TJ1 AND 突破量>2 AND ZF<10 AND 突破幅度>3;
 QF:=BACKSET(XG=1,T+2);
 QFT:=BARSLAST(CROSS(QF=1,0.5));
 DRAWLINE(QFT=0,L,XG,REF(L,QFT),0),COLORYELLOW;
 STICKLINE(XG=1,C,O,2,0),COLORLIRED;
 STICKLINE(XG=1,H,L,0,0),COLORLIRED;
 DRAWICON(XG=1,L*0.95,38);

{我优化的幅图}
T:=BARSLAST(H<REF(L,1));
 TJ:=HHV(H,T+1);
 TJ1:=CROSS(C,REF(L,T+1));
 TJ2:=TJ<REF(L,T+1);
突破幅度:=(C/REF(L,T+1)-1)*100;
突破量:=VOL/REF(VOL,1);
 ZF:=(REF(L,T+1)-LLV(L,T+1))/LLV(L,T+1)*100;
 XG:=REF(TJ2,1) AND TJ1 AND 突破量>2 AND ZF<10 AND 突破幅度>3;
 STICKLINE(XG=1,0,6.8,1.48,0),COLORLIRED;

{我优化的选股}

T:=BARSLAST(H<REF(L,1));
 TJ:=HHV(H,T+1);
 TJ1:=CROSS(C,REF(L,T+1));
 TJ2:=TJ<REF(L,T+1);
突破幅度:=(C/REF(L,T+1)-1)*100;
突破量:=VOL/REF(VOL,1);
 ZF:=(REF(L,T+1)-LLV(L,T+1))/LLV(L,T+1)*100;
 XG:REF(TJ2,1) AND TJ1 AND 突破量>2 AND ZF<10 AND 突破幅度>3;