以下是通达信岛形反转主幅图选股源码
{岛形反转一网打尽主图}
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;
