通达信综合分时主图未加密选股指标公式源码

源码正文：

现价:CLOSE,COLORFFFFFF,LINETHICK2{XG51};
均价:SUM(C*V,240)/SUM(V,240),COLORBLUE,LINETHICK2{XG51};
H1:=maX(DYnaINFO(3),DYNAINFO(5)){XG51};
L11:=MIN(DYNAINFO(3),DYNAINFO(6)){XG51};
P1:=H1-L11{XG51};
阻力:L11+P1*7/8,COLOR00DD00{XG51};
支撑:L11+P1*0.5/8,COLORLIMAGENTA{XG51};
中:阻力*0.5+支撑*0.5,DOTLINE;
stICKLINE(crOSS(支撑,现价),中,现价,2,0),COLORBLUE,LINETHICK5;
STICKLINE(CROSS(现价,阻力),现价,中,2,0),COLORFFCC66,LINETHICK5;
DRAWTEXT(LONGCROSS(支撑,C,2),C,'--反弹'),COLORBLUE{XG51};
DRAWTEXT(LONGCROSS(C,阻力,2),C,'--出货'),COLORBLUE{XG51};
A1:=(Dvol/C)/2,NODRAW{XG51};
A2:=SUM(IF(A1>100 AND CLOSE>REF(CLOSE,1),A1,0),0){XG51};
A3:=SUM(IF(A1>100 AND CLOSE<REF(CLOSE,1),A1,0),0){XG51};
A4:=SUM(IF(A1<100 AND CLOSE>REF(CLOSE,1),A1,0),0){XG51};
A5:=SUM(IF(A1<100 AND CLOSE<REF(CLOSE,1),A1,0),0){XG51};
A6:=A2+A3+A4+A5{XG51};
A7:=IF((BARSTATUS=2),((100*A2)/A6),0){XG51};
A8:=((IF((BARSTATUS=2),((100*A3)/A6),0))){XG51};
A9:=((IF((BARSTATUS=2),((100*A4)/A6),0))){XG51};
A10:=((IF((BARSTATUS=2),((100*A5)/A6),0))){XG51};
机构买盘:=(A2),LINETHICK2{XG51};
机构卖盘:=(A3),LINETHICK2{XG51};
散户买盘:=(A4){XG51};
散户卖盘:=(A5){XG51};
机构买:=(A2),LINETHICK6,COLORWHITE{XG51};
机构卖:=(A3),LINETHICK6,COLORCYAN{XG51};
DD1:=1{XG51};
AAA1:=STRCAT(STRCAT('机构买',CON2STR((100*A2)/A6,0)),'%'){XG51};
AAA2:=STRCAT(STRCAT('机构卖',CON2STR((100*A3)/A6,0)),'%'){XG51};
AAA3:=STRCAT(STRCAT('净买入',CON2STR((100*(A2-A3))/A6,0)),'%'){XG51};
DRAWTEXT_FIX(DD1=1,0,0.04,0,AAA1),COLORWHITE{XG51};
DRAWTEXT_FIX(DD1=1,0,0.12,0,AAA2),COLORCYAN{XG51};
DRAWTEXT_FIX(DD1=1,0,0.20,0,AAA3),COLOR00FFFF{XG51};
A11:=C>REF(C,4){XG51};
NT:=BArslASTCOUNT(A11){XG51};
TJ11:=NT=9{XG51};
TJ13:=ISLASTBAR AND BETWEEN(NT,5,8){XG51};
AY:=(BacKSET(TJ11>0,9) OR BACKSET(TJ13>0,NT))*NT{XG51};
DRAWTEXT(AY>0,H*1.001,VAR2STR(AY,0)),COLORFF00FF{XG51};
DRAWTEXT(NT=9,H*1.001,'9'),COLORCYAN{XG51};
B1:=C<REF(C,4){XG51};
NT0:=BARSLASTCOUNT(B1){XG51};
TJ21:=NT0=9 {XG51};
TJ23:=ISLASTBAR AND BETWEEN(NT0,5,8){XG51};
AY1:=(BACKSET(TJ21>0,9) OR BACKSET(TJ23>0,NT0))*NT0{XG51};
DRAWTEXT(AY1>0,L*0.999,VAR2STR(AY1,0)),COLORFF00FF{XG51};
DRAWTEXT(NT0=9,L*0.999,'9'),COLORCYAN{XG51};
ZRS:=CONST(DYNAINFO(3)),NODRAW{XG51};
A12:=3.5*(ema(CLOSE,48)-EMA(CLOSE,104))+ZRS,COLORMAGENTA{XG51};
A22:=EMA(A12,36),COLORLIGREEN{XG51};
macd:=(A12-A22)*2+ZRS;
DRAWKLINE(H,O,L,C){XG51};
STICKLINE(A12>=A22,ZRS,MACD ,0,0),COLORWHITE{XG51};
STICKLINE(A12>=A22 AND MACD<REF(MACD,1),ZRS,MACD ,0,0),COLORBLUE{XG51};
STICKLINE(A12<A22,ZRS,MACD ,0,0),COLORGREEN{XG51};
STICKLINE(A12<A22 AND MACD>REF(MACD,1),ZRS,MACD ,0,0),COLORFFFFFF{X?G*5_1?C?N?{};

源码正文：

T1R:=xma(Xma(XMA(ema(CLOSE,1),2),2),2){XG51};
TR1:=EMA((T1R-REF(T1R,1))/REF(T1R,1),1)*1000,COLORFF00FF,NODRAW{XG51};
净:=XMA(TR1,11){XG51};
流:=EMA(净,11){XG51};
主力动向:=EMA(净+流,1)-XMA(净-流,2),COLORFF00FF,NODRAW{XG51};
MA1:XMA(主力动向,11),NODRAW{XG51};
MA3:EMA(MA1,2),NODRAW{XG51};
DRAWTEXT(crOSS(MA3,MA1),(MA3 *1.12),'潮退'),COLORBLUE{XG51};
DRAWTEXT(CROSS(0,MA1),2,'量能萎缩'),COLOR00FFFF{XG51};
DRAWTEXT(CROSS(MA1,0),-4,'量能续航'),COLORFF00FF{XG51};
DRAWTEXT(CROSS(MA1,MA3),(MA3 *1.2),'潮涨'),COLORBLUE{XG51};
stICKLINE(MA1>=0 AND MA1>=REF(MA1,1),0,MA1,1.2,1),COLORWHITE{XG51};
STICKLINE(MA1>=0 AND MA1<REF(MA1,1),0,MA1,1.2,0),COLORBLUE{XG51};
STICKLINE(MA1<0 AND MA1>=REF(MA1,1),0,MA1,1.5,0),COLORFF00FF{XG51};
STICKLINE(MA1<0 AND MA1<REF(MA1,1),0,MA1,1.2,1),COLORYELLOW{XG51};
STICKLINE(MA1<=0 AND MA1>=REF(MA1,1),0 ,MA1,3,0),COLORFF6600{XG51};
STICKLINE(MA1<=0 AND MA1>=REF(MA1,1),0,MA1,2,0),COLORFF9900{XG51};
STICKLINE(MA1<=0 AND MA1>=REF(MA1,1),0,MA1,1.5,0),COLORFFCC00{XG51};
STICKLINE(MA1<=0 AND MA1>=REF(MA1,1),0,MA1,0.5,0),COLORGREEN{XG51};
STICKLINE(MA1>=0 AND MA1>=REF(MA1,1),0,MA1,3,0),COLOR000099{XG51};
STICKLINE(MA1>=0 AND MA1>=REF(MA1,1),0,MA1,2,0),COLOR0000CC{XG51};
STICKLINE(MA1>=0 AND MA1>=REF(MA1,1),0,MA1,1.5,0),COLOR0000FF{XG51};
STICKLINE(MA1>=0 AND MA1>=REF(MA1,1),0,MA1,0.5,0),COLORCC66FF{X_G?5_1_C_N_{};