通达信超强吸筹选股指标公式源码

通达信超强吸筹选股指标公式源码

源码正文：

N:=9{XG51};
M1:=3{XG51};
M2:=3{XG51};
P:=9{XG51};
RSV:=(CLOSE-LLV(LOW,N))/(HHV(HIGH,N)-LLV(LOW,N))*100{XG51};
K:=SMA(RSV,M1,1),COLORWHITE,LINETHICK2{XG51};
D:=Sma(K,M2,1),COLOR00FF00{XG51};
JJ:=P*(3*D-2*K),COLOR00FF00{XG51};
J:=((3 * K) - (2 * D)){XG51};
MAIRU:=  crOSS(K,D) AND K<20{XG51};
MAICHU:= CROSS(D,K) AND D>80{XG51};
VAR2:=REF(LOW,1){XG51};
VAR3:=SMA(Abs(LOW-VAR2),3,1)/SMA(MAX(LOW-VAR2,0),3,1)*100{XG51};
VAR4:=ema(IF(CLOSE*1.3,VAR3*10,VAR3/10),3){XG51};
VAR5:=LLV(LOW,13){XG51};
VAR6:=HHV(VAR4,13){XG51};
VAR7:=IF(MA(CLOSE,34),1,0){XG51};
VAR8:=EMA(IF(LOW<=VAR5,(VAR4+VAR6*2)/2,0),3)/618*VAR7{XG51};
VAR9:=IF(VAR8>100,100,VAR8){XG51};
吸筹:VAR9,LINETHICK2,COLORWHITE{XG51};
stICKLINE(VAR9>-120,0,VAR9,8,1),COLORLICYAN{XG51};
短线:(CLOSE- LLV(LOW,N))/(HHV(HIGH,N)-LLV(LOW,N))*100,COLORLIMAGENTA,LINETHICK2{XG51};
中线:SMA(短线,M1,1),COLORBLUE{XG51};
长线:SMA(中线,M2,1),COLORLIGREEN{XG51};
超强吸筹:IF(BArslAST(CROSS(中线,长线))<P AND CROSS(中线,长线) AND 中线<20,90,DRAWNULL),STICK,COLORFF937F{XG51};
STICKLINE(超强吸筹,0,90,1,1),COLORFF937F{XG51};
BB:=IF(BARSLAST(CROSS(中线,短线))>=3 AND CROSS(短线,中线) AND 中线<30,20,0){XG51};
STICKLINE(BB,0,20,7,1),COLORBLUE{XG51};
DRAWICON(BB>0,10,1){XG51};
AA:=IF(BARSLAST(CROSS(短线,中线))>=4 AND CROSS(中线,短线) AND 短线>50,20,0){XG51};
STICKLINE(AA,80,100,7,1),COLORRED{XG51};
DRAWICON(AA>0,90,2){X^G_5_1^C^N^{};