通达信主力控盘跟进未加密选股指标公式源码

通达信主力控盘跟进未加密选股指标公式源码

源码正文：

N:=35;M:=35;N1:=3{XG51};
B1:=(HHV(H,N)-C)/(HHV(H,N)-LLV(LOW,N))*100- M;
B2:=SMA(B1,N,1)+100;
B3:=(C-LLV(L,N))/(HHV(H,N)- LLV(L,N))*100;
B4:=Sma(B3,3,1);
B5:=SMA(B4,3,1)+100;
B6:=B5-B2;
控盘程度:(IF(B6>N1,B6-N1,0))*2.5,COLORBLUE;
控盘度:100,COLORWHITE;
stICKLINE( 控盘程度,0,控盘程度 ,2,0 ),COLOR00FFFF;
STICKLINE( 控盘程度 AND 控盘程度>100,100,控盘程度 ,2,0 ),COLORWHITE{X.G=5_1.C.N.{};

通达信欣喜量价未加密选股指标公式源码

源码正文：

额:AMOUNT/100000000,,COLORFFFFFF,NODRAW{XG51};
VAR110:=AMOUNT/((HIGH-LOW)*2-Abs(CLOSE-OPEN)){XG51};
入亿:IF(CLOSE>OPEN,VAR110*(HIGH-LOW),IF(CLOSE<OPEN,VAR110*((HIGH-OPEN)
+(CLOSE-LOW)),AMOUNT/2))/100000000,COLORWHITE,NODRAW{XG51};
出亿:IF(CLOSE>OPEN,0-VAR110*((HIGH-CLOSE)+(OPEN-LOW)),
IF(CLOSE<OPEN,0-VAR110*(HIGH-LOW),0-AMOUNT/2))/100000000,COLOR00FF00,NODRAW{XG51};
差亿:入亿+出亿,COLORWHITE,NODRAW{XG51};


量:=V/CONst(HHV(V,90))*30,COLORWHITE{XG51};

STICKLINE(CLOSE>=OPEN,0,量*1,2.4,0),COLOR000033{XG51};
STICKLINE(CLOSE>=OPEN,0,量*1,1.6,0),COLOR000055{XG51};
STICKLINE(CLOSE>=OPEN,0,量*1,0.8,0),COLOR000077{XG51};
STICKLINE(CLOSE>=OPEN,0,量*1,0.0,0),COLOR0000DD{XG51};
STICKLINE(CLOSE<=OPEN,0,量*1,2.4,0),COLOREC0000{XG51};
STICKLINE(CLOSE<=OPEN,0,量*1,1.6,0),COLORFF4600{XG51};
STICKLINE(CLOSE<=OPEN,0,量*1,0.8,0),COLORFF6300{XG51};
STICKLINE(CLOSE<=OPEN,0,量*1,0,0),COLORFF8B00{XG51};
倍量:(量/REF(量,1)>=1.91 AND COUNT(C>O,1)) OR (L>REF(H,1) AND COUNT(O>C,1) AND 量/REF(量,1)>=1.91),NODRAW,COLORBLUE{XG51};
STICKLINE(倍量,0,量,0.0001,0),COLOR00FFFF{XG51};
DRAWTEXT(倍量,量*0.99,'倍'),COLORBLUE,LINETHICK1{XG51};
VAR28:=LLV(LOW,21){XG51};
VAR29:=HHV(HIGH,21){XG51};
K:ema((CLOSE-VAR28)/(VAR29-VAR28)*50,6),COLORWHITE,LINETHICK1{XG51};
IF(K<= REF(K,1),K,DRAWNULL),COLORCYAN,LINETHICK1{XG51};
D:EMA(0.667*REF(K,1)+0.333*K,2),COLORCYAN,LINETHICK1{XG51};
IF(D>= REF(D,1),D,DRAWNULL),COLORLIMAGENTA,LINETHICK1{XG51};

VAR21:=(HHV(HIGH,8)-CLOSE)/(HHV(HIGH,8)-LLV(LOW,8))*100-70{XG51};
VAR22:=SMA(VAR21,8,1)+100{XG51};
VAR23:=(CLOSE-LLV(LOW,8))/(HHV(HIGH,8)-LLV(LOW,8))*100{XG51};
VAR24:=SMA(VAR23,3,1){XG51};
VAR25:=SMA(VAR24,3,1)+100{XG51};
VAR26:=VAR25-VAR22{XG51};
绿:IF(VAR26>100,VAR26-100,0),COLORCYAN,LINETHICK1{XG51};
IF(绿>=REF(绿,1),绿,DRAWNULL),COLORWHITE,LINETHICK1;

青:IF(REF(绿,1)>绿,绿,REF(绿,1)),COLORGREEN,LINETHICK0;{XG51};
IF(青>=REF(青,1),青,DRAWNULL),COLORLIMAGENTA,LINETHICK1{XG51};
STICKLINE(CROSS(0.9,1/VOL*1000>0.01 AND "kdj.J"<0),量<0,-3,1.2,0),COLORGREEN,LINETHICK1{XG51};
DRAWTEXT(CROSS(0.9,1/VOL*1000>0.01 AND "kdJ.J"<0),(量<0-3),'地量'),COLORGREEN,LINETHICK1{XG51};
2.5,COLOR00FFFF,LINETHICK1{XG51};
DRAWTEXT(ISLASTBAR,26,'强弱'),COLORWHITE,LINETHICK1{XG51};
25,COLOR00FFFF,LINETHICK1{XG51};
45,COLORLIRED,LINETHICK1{XG51};
-5,COLORRED{XG51};
Q_1:=C-REF(C,1){XG51};
Q_2:=100*EMA(EMA(Q_1,6),6)/EMA(EMA(ABS(Q_1),6),6){XG51};
Q_3:=CROSS(EMA(C,19),EMA(C,7)){XG51};
Q_4:=CROSS(EMA(C,7),EMA(C,19)){XG51};
Z1:=L=LLV(L,BArslAST(Q_3)+1){XG51};
Z2:=LLV(L,BARSLAST(Q_3)+1){XG51};
Z3:=H=HHV(H,BARSLAST(Q_4)+1){XG51};
Z4:=HHV(H,BARSLAST(Q_4)+1){XG51};
Q_A:DRAWLINE(Z1,Z2,Z3,Z4,0),COLORLIMAGENTA,LINETHICK2{XG51};
Y1:=H=HHV(H,BARSLAST(Q_4)+1){XG51};
Y2:=HHV(H,BARSLAST(Q_4)+1){XG51};
Y3:=L=LLV(L,BARSLAST(Q_3)+1){XG51};
Y4:=LLV(L,BARSLAST(Q_3)+1){XG51};
Q_B:DRAWLINE(Y1,Y2,Y3,Y4,0),COLORGREEN,LINETHICK2{XG51};
X1:=LLV(Q_2,2)=LLV(Q_2,7){XG51};
X2:=COUNT(Q_2<0,2){XG51};
X3:=CROSS(Q_2,MA(Q_2,2)){XG51};
X4:=REF(Q_B,1)<REF(Q_B,2){XG51};
X5:=Q_A>REF(Q_B,1){XG51};
买进:=(X1 AND X2 AND X3) AND X4 AND X5{XG51};
TJ:=IF(Q_A<REF(Q_A,1) AND Q_B=Q_A,1,0){XG51};
TJ1:=IF(Q_B<REF(Q_B,1) AND Q_B=Q_A,1,0){XG51};
IF(REF(TJ1,1)=0 AND TJ1>=1,45,-5),STICK,COLORWHITE,LINETHICK1;
堪称一绝:IF(REF(TJ,1)=0 AND TJ>=1,45,0),STICK,COLORCYAN,LINETHICK1{XG51};
STICKLINE(Q_B<REF(Q_B,1),0,-5,0,0)COLORCYAN{X*G-5.1*C*N*{};