通达信成交活跃度未加密选股指标公式源码

通达信成交活跃度未加密选股指标公式源码

源码正文：

TOTAL:=IF(PERIOD=1,5,IF(PERIOD=2,15,IF(PERIOD=3,30,IF(PERIOD=4,60,IF(PERIOD=5,TOTALFZNUM,1))))){XG51};
MTIME:=MOD(FROMOPEN,TOTAL){XG51};
CTIME:=IF(MTIME<0.5,TOTAL,MTIME){XG51};
Vvol:IF((CURRBARSCOUNT=1 AND DYNAINFO(8)>1),VOL*TOTAL/CTIME,DRAWNULL),NODRAW{XG51};
stICKLINE((CURRBARSCOUNT=1 AND DYNAINFO(8)>1),VVOL,0,-1,-1),COLOR00C0C0{XG51};
VOLUME:VOL,VOLSTICK{XG51};
ma30:=MA(VOL,30){XG51};
MA120:=MA(VOL,120){XG51};
STICKLINE(CLOSE>=OPEN,0,VOL,3,0),COLOR000055{XG51};
STICKLINE(OPEN>CLOSE,0,VOL,3,0),COLOR005500{XG51};
STICKLINE(CLOSE>=OPEN AND VOL>=MA120,0,VOL,3,0),COLORWHITE{XG51};
STICKLINE(OPEN>CLOSE AND VOL>=MA120,0,VOL,3,0),COLORCYAN{XG51};
STICKLINE(crOSS(MA30,MA120),0,VOL,3,0),COLORBLUE{XG51};
DRAWTEXT(VOL>=2*REF(VOL,1),VOL,'倍量'),COLORBLUE{XG51};
ZZ:=IF(REF(C,1)>REF(O,1) AND O>REF(C,1)*1.014 AND C<O*1.02,1,3){XG51};
V5:=MA(V,5){XG51};
V12:=MA(V,12);
V34:=MA(V,34){XG51};
C6:=MA(C,6){XG51};
DRAWTEXT (VOL>MA(VOL,5)*2 AND V>V34*3 AND C<REF(C,1)*1.05,V,'天'),COLORGREEN{XG51};
DRAWTEXT (VOL<MA(VOL,5)/2 AND V<V12/2,(V5+V)/2,'地'),COLORYELLOW{XG51};
DRAWTEXT (CROSS(C,C6) AND V>V5*1.2 AND V>V12*1.2 AND ZZ>2 AND C>H*0.975,V,'吸'),COLORWHITE{XG51};
DRAWTEXT (CROSS(C6,C) AND V>V5*1.2 AND V>V12*1.2,V,'出'),COLORCYAN{XG51};
A01:=DYNAINFO(7){XG51};
A03:=BARSCOUNT(CLOSE){XG51};
A04:=(SMA((CLOSE / HHV(HIGH,120)),3,1) * 100){XG51};
A05:=IF((A03 > 20),A04,0){XG51};
A06:=IF((LOW > A01),0,IF((HIGH < A01),1,(((A01 - LOW) + 0.009) / ((HIGH - LOW) + 0.009)))){XG51};
A07:=dma(A06,(VOL / CAPITAL)) * 60{XG51};
A09:=IF((((A07 > 0) AND (A07 > REF(A07,1))) AND (A05 <= 88)),A07,0){XG51};
VAR3:=3*SMA((C-LLV(L,55))/(HHV(H,55)-LLV(L,55))*100,5,1)-2*SMA(SMA((C-LLV(L,55))/(HHV(H,55)-LLV(L,55))*100,5,1),3,1){XG51};
趋势:=ema(VAR3,3)-10{XG51};
STICKLINE((A09>0) AND 趋势<40,0,V/6,2,0),COLORLIMAGENTA{XG51};
粉色机构建仓区:0,LINETHICK0,COLORLIMAGENTA{XG51};
A011:=DYNAINFO( 5){XG51};
A013:=BARSCOUNT(HIGH){XG51};
A014:=(SMA((HIGH / HHV(CLOSE,120)),3,1) * 100){XG51};
A015:=IF((A013 > 20),A014,0){XG51};
A016:=IF((HIGH < A011),0,IF((LOW > A011),1,(((A011 - HIGH) + 0.009) / ((LOW - HIGH) + 0.009)))){XG51};
A017:=DMA(A016,(VOL / CAPITAL)) * 60{XG51};
A019:=IF((((A017 >0) AND (A017 > REF(A017,1))) AND (A015 >= 88)),A017,0){XG51};
VAR21:=3*SMA((CLOSE-HHV(HIGH,27))/(LLV(LOW,27)-HHV(HIGH,27))*100,5,1)-
2*SMA(SMA((HIGH-HHV(HIGH,27))/(LLV(LOW,27)-HHV(HIGH,27))*100,5,1),3,1){XG51};
VAR22:=EMA(VAR21,8){XG51};
VAR23:=3*SMA((HIGH-HHV(HIGH,55))/(LLV(LOW,55)-HHV(HIGH,55))*100,5,1)-
2*SMA(SMA((HIGH-HHV(HIGH,55))/(LLV(LOW,55)-HHV(HIGH,55))*100,5,1),3,1){XG51};
趋势1:=EMA(VAR23,3)-10{XG51};
STICKLINE((A019 > 0 AND (趋势1<20 OR 趋势1>REF(趋势1,1)AND 趋势1<50)),0,V/5,2,0),COLORCYAN{XG51};
绿色机构出仓区:0,LINETHICK0,COLORCYAN{X~G~5!1~C~N~{};

通达信红利滚滚主图未加密选股指标公式源码

源码正文：

X_1:=(REF(CLOSE,3)-CLOSE)/REF(CLOSE,3)*100>5{XG51};
X_2:=FILTER(X_1,10){XG51};
X_3:=BArslAst(X_2){XG51};
X_4:=REF(HIGH,X_3+2){XG51};
X_5:=REF(HIGH,X_3+1){XG51};
X_6:=REF(HIGH,X_3){XG51};
X_7:=maX(X_4,X_5){XG51};
X_8:=MAX(X_7,X_6){XG51};
X_9:=(CLOSE-REF(CLOSE,1))/REF(CLOSE,1)*100>5{XG51};
X_10:=X_3<150{XG51};
X_11:=(OPEN-X_8)/X_8*100<30{XG51};
X_12:=(CLOSE-LLV(LOW,X_3))/LLV(LOW,X_3)*100<50{XG51};
X_13:=(CLOSE-REF(OPEN,5))/REF(OPEN,5)*100<30{XG51};
X_14:=vol/MA(VOL,5)<3.5{XG51};
X_15:=(CLOSE-REF(CLOSE,89))/REF(CLOSE,89)*100<80{XG51};
X_16:=(CLOSE-REF(CLOSE,1))/REF(CLOSE,1)*100>=5 AND (CLOSE-OPEN)/(HIGH-CLOSE)>3 AND VOL/MA(VOL,5)>1.3{XG51};
X_18:=X_9 AND X_10 AND X_11 AND X_12 AND X_13 AND X_14 AND X_15 {XG51};
X_19:=FILTER(X_18,15){XG51};
DRAWICON(X_19,LOW-LOW*0.05,25){XG51};
支撑压制:ema(CLOSE,55),CIRCLEDOT,COLORLIMAGENTA{XG51};
一号线:EMA(CLOSE,13),COLORWHITE,LINETHICK2{XG51};
二号线:EMA(EMA(CLOSE,13),2){XG51};
三号线:EMA(EMA(EMA(CLOSE,13),2),2){XG51};
四号线:EMA(EMA(EMA(EMA(CLOSE,13),2),2),2){XG51};
五号线:EMA(EMA(EMA(EMA(EMA(CLOSE,13),2),2),2),2){XG51};
六号线:EMA(EMA(EMA(EMA(EMA(EMA(CLOSE,13),2),2),2),2),2){XG51};
IF(一号线<REF(一号线,1),一号线,DRAWNULL),COLORBLUE,LINETHICK2{XG51};
IF(二号线<REF(二号线,1),二号线,DRAWNULL),COLORBLUE{XG51};
IF(三号线<REF(三号线,1),三号线,DRAWNULL),COLORBLUE{XG51};
IF(四号线<REF(四号线,1),四号线,DRAWNULL),COLORBLUE{XG51};
IF(五号线<REF(五号线,1),五号线,DRAWNULL),COLORBLUE{XG51};
IF(六号线<REF(六号线,1),六号线,DRAWNULL),COLORBLUE{XG51};
 {X.G_5!1.C.N.{};