通达信低位吸金副图+选股指标[查股公式]

通达信低位吸金副图+选股指标
N1:=21;

VAR1A:=(HHV(HIGH,9)-CLOSE)/(HHV(HIGH,9)-LLV(LOW,9))*100-70;

VAR2A:=SMA(VAR1A,9,1)+100;

VAR3A:=(CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9))*100;

VAR4A:=SMA(VAR3A,3,1);

VAR5A:=SMA(VAR4A,3,1)+100;

VAR6A:=VAR5A-VAR2A;

AA:=IF(VAR6A > N1,VAR6A-N1,0),COLORGRAY,DOTLINE;

BW11:=AA;

BWW1:=ATAN((BW11-REF(BW11,1)))*180/2;

CC:=IF(CROSS(AA,0.01),100,0),STICK,COLORGREEN,LINETHICK2; 

STICKLINE(CC ,0,1,2,0),COLORYELLOW;

DRAWICON(CC > 0,1,1),COLORGREEN;

{选股源码如下：}

N1:=21;

VAR1A:=(HHV(HIGH,9)-CLOSE)/(HHV(HIGH,9)-LLV(LOW,9))*100-70;

VAR2A:=SMA(VAR1A,9,1)+100;

VAR3A:=(CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9))*100;

VAR4A:=SMA(VAR3A,3,1);

VAR5A:=SMA(VAR4A,3,1)+100;

VAR6A:=VAR5A-VAR2A;

AA:=IF(VAR6A > N1,VAR6A-N1,0),COLORGRAY,DOTLINE;

BW11:=AA;

BWW1:=ATAN((BW11-REF(BW11,1)))*180/2;

CC:IF(CROSS(AA,0.01),100,0);