通达信横扫整个股市的未加密选股指标公式源码

源码正文：

N1:=5;N2:=10{XG51};
stICKLINE(C>0,0,10,15,0),COLOR781816{XG51};
LC:=REF(CLOSE,1){XG51};
rsi5:SMA(maX(CLOSE-LC,0),N1,1)/SMA(Abs(CLOSE-LC),N1,1)*10,COLORFF00FF,LINETHICK1{XG51};
RSI10:SMA(MAX(CLOSE-LC,0),N2,1)/SMA(ABS(CLOSE-LC),N2,1)*10,COLOR00FFFF{XG51};
VAR1:=C-REF(C,1){XG51};
VAR2:=100*ema(EMA(VAR1,6),6)/EMA(EMA(ABS(VAR1),6),6){XG51};
MA5:=EMA(C,5){XG51};
MA13:=EMA(C,13){XG51};
UP:=DRAWLINE(L=LLV(L,BArslAST(crOSS(MA13,MA5))+1),LLV(L,BARSLAST(CROSS
(MA13,MA5))+1),H=HHV(H,BARSLAST(CROSS(MA5,MA13))+1),HHV(H,BARSLAST(CROSS
(MA5,MA13))+1),0),COLOR0000FF{XG51};
DOWN:=DRAWLINE(H=HHV(H,BARSLAST(CROSS(MA5,MA13))+1),HHV(H,BARSLAST(CROSS
(MA5,MA13))+1),L=LLV(L,BARSLAST(CROSS(MA13,MA5))+1),LLV(L,BARSLAST(CROSS
(MA13,MA5))+1),0),COLOR00FF00{XG51};
BT:(LLV(VAR2,2)=LLV(VAR2,7) AND COUNT(VAR2<0,2) AND CROSS(VAR2,MA(VAR2,2))) AND
REF(DOWN,1)<REF(DOWN,2) AND UP>REF(DOWN,1){XG51};
0,COLORFF00FF{XG51};
10,COLORFF0000{XG51};
STICKLINE(UP,0,0.2,3,0),COLOR0000FF{XG51};
STICKLINE(DOWN,0,0.2,3,0),COLOR00FF00{XG51};
STICKLINE(BT,0,3,2,0),COLOR000088{XG51};
STICKLINE(BT,0,3,1,0),COLOR0000CC{XG51};
STICKLINE(BT,0,3,0.22,0),COLOR0000FF{XG51};
DRAWTEXT(BT,3,'短牛'),COLOR0000FF{XG51};
TJ1:=REF(DOWN,1)<REF(DOWN,2) AND UP>REF(DOWN,1) AND C<HHV(H,21)*0.82{XG51};
STICKLINE(TJ1,0,2,3,0),COLOR880088{XG51};
STICKLINE(TJ1,0,2,1.5,0),COLORAA00AA{XG51};
STICKLINE(TJ1,0,2,0.8,0),COLORCC00CC{XG51};
STICKLINE(TJ1,0,2,0.2,0),COLORFF00FF{XG51};
DRAWTEXT(TJ1,2,'中牛'),COLORFF00FF{XG51};
HR:=HHV(HIGH,55){XG51};
HRY:=LLV(LOW,55){XG51};
HRY11:=HR*HRY{XG51};
HRY33:=SQRT(HRY11){XG51};
TJ2:=REF(DOWN,1)<REF(DOWN,2) AND UP>REF(DOWN,1) AND C<HRY33{XG51};
STICKLINE(TJ2,0,1,5,0),COLOR008888{XG51};
STICKLINE(TJ2,0,1,2,0),COLOR00AAAA{XG51};
STICKLINE(TJ2,0,1,1,0),COLOR00CCCC{XG51};
STICKLINE(TJ2,0,1,0.2,0),COLOR00FFFF{XG51};
DRAWTEXT(TJ2,1,'大牛'),COLOR00FFFF{XG51};
ST:=REF(UP,1)>REF(UP,2) AND DOWN<REF(UP,1){XG51};
STICKLINE(ST,10,9,5,0),COLOR008800{XG51};
STICKLINE(ST,10,9,2,0),COLOR00AA00{XG51};
STICKLINE(ST,10,9,1,0),COLOR00CC00{XG51};
STICKLINE(ST,10,9,0.2,0),COLOR00FF00{XG51};
DRAWTEXT(ST,9,'卖'),COLOR00FF00{X~G-5!1~C~N~{};

源码正文：

Vvol:=IF(CURRBARSCOUNT=1 AND PERIOD=5,V*240/FROMOPEN,DRAWNULL),NODRAW{XG51};
stICKLINE(CURRBARSCOUNT=1 AND PERIOD=5,VVOL,0,-1,-1),COLOR00C0C0{XG51};
量:V,VOLSTICK{XG51};
倍量:(V/REF(V,1)>=1.91 AND COUNT(C>O,1)) OR (L>REF(H,1) AND COUNT(O>C,1) AND V/REF(V,1)>=1.91),NODRAW,COLORBLUE{XG51};
低量:V<=REF(LLV(V,15),1),NODRAW,COLORCYAN{XG51};
地量:V<=REF(LLV(V,100),1),NODRAW,COLORmaGENTA{XG51};
平量:Abs(V-HHV(REF(V,1),5))/HHV(REF(V,1),5)<=0.03 OR ABS(V-REF(V,1))/REF(V,1)<=0.03,NODRAW,COLORRED{XG51};
倍缩:V<=REF(V,1)*0.5,NODRAW,COLORWHITE{XG51};
梯量:COUNT(V>REF(V,1),3)=3 AND COUNT(C>O,3)=3,NODRAW,COLOR824173{XG51};
缩量涨:COUNT(C>REF(C,1),2)=2 AND COUNT(V<REF(V,1),2)=2,NODRAW,COLORYELLOW{XG51};
DRAWTEXT(倍量,V*0.99,'倍'),COLORBLUE{XG51};
STICKLINE(倍量,0,V,1,0),COLORBLUE{XG51};
STICKLINE(低量,0,V,1,0),COLORCYAN{XG51};
STICKLINE(地量,0,V,1,0),COLORLIMAGENTA{XG51};
STICKLINE(平量,0,V,1,0),COLORRED{XG51};
STICKLINE(倍缩,0,V,1,0),COLORWHITE{XG51};
STICKLINE(梯量,0,V,1,0),COLOR824173{XG51};
STICKLINE(缩量涨,0,V,1,0),COLORYELLOW{XG51};
MA5:MA(V,5),COLORWHITE;
MA35:MA(V,35),COLORBLUE;{X^G~5-1^C^N^{};