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

源码正文：

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

源码正文：

万手:vol/10000,LINETHICK0{XG51};
AA:=IF(CURRBARSCOUNT=1 AND PERIOD=5,VOL*240/FROMOPEN,DRAWNULL){XG51};
预测:AA/10000{XG51};
BB:=VOL/((HIGH-LOW)*2-Abs(CLOSE-OPEN)){XG51};
主动买:=IF(CLOSE>OPEN,BB*(HIGH-LOW),IF(CLOSE<OPEN,BB*((HIGH-OPEN)+(CLOSE-LOW)),VOL/2)){XG51};
主买:主动买/10000,COLORWHITE{XG51};
主动卖:=IF(CLOSE>OPEN,0-BB*((HIGH-CLOSE)+(OPEN-LOW)),IF(CLOSE<OPEN,0-BB*(HIGH-LOW),0-VOL/2)){XG51};
主卖:-主动卖/10000,COLORCYAN{XG51};
差额:(主动买+主动卖)/10000{XG51};
stICKLINE(CLOSE=REF(CLOSE,1),0,VOL,3.5,0),COLORRED{XG51};
STICKLINE(CLOSE>REF(CLOSE,1),0,VOL,3.5,0),COLORWHITE{XG51};
STICKLINE(CLOSE<REF(CLOSE,1),0,VOL,3.5,0),COLORCYAN{XG51};
STICKLINE(CURRBARSCOUNT=1 AND PERIOD=5,AA,1 , 3.5 , 0 ) , COLOR00FFFF {XG51};
STICKLINE(CURRBARSCOUNT=1 AND PERIOD=5,AA,1 , 3.2 , 0 ) , COLOR007777 {XG51};
STICKLINE(CURRBARSCOUNT=1 AND PERIOD=5,AA,1 , 2.7 , 0 ) , COLOR009999 {XG51};
STICKLINE(CURRBARSCOUNT=1 AND PERIOD=5,AA,1 , 2.1 , 0 ) , COLOR00BBBB {XG51};
STICKLINE(CURRBARSCOUNT=1 AND PERIOD=5,AA,1 , 1.5 , 0 ) , COLOR00ddeE {XG51};
STICKLINE(CURRBARSCOUNT=1 AND PERIOD=5,AA,1 , 0.9 , 0 ) , COLOR66FFFF {XG51};
STICKLINE(CURRBARSCOUNT=1 AND PERIOD=5,AA,1 , 0.2 , 0 ) , COLORFFFFFF {XG51};
STICKLINE(主动买>=0,VOL,-主动卖,3.2,0),COLOR000033{XG51};
STICKLINE(主动买>=0,VOL,-主动卖,2.7,0),COLOR000066{XG51};
STICKLINE(主动买>=0,VOL,-主动卖,2.1,0),COLOR000099{XG51};
STICKLINE(主动买>=0,VOL,-主动卖,1.5,0),COLOR0000CC{XG51};
STICKLINE(主动买>=0,VOL,-主动卖,0.9,0),COLOR0000FF{XG51};
STICKLINE(主动买>=0,VOL,-主动卖,0.2,0),COLORCC66FF{XG51};
STICKLINE(主动卖<=0,0,-主动卖,3.2,0),COLOR990000{XG51};
STICKLINE(主动卖<=0,0,-主动卖,2.7,0),COLORCC0000{XG51};
STICKLINE(主动卖<=0,0,-主动卖,2.1,0),COLORFF4400{XG51};
STICKLINE(主动卖<=0,0,-主动卖,1.5,0),COLORFF8800{XG51};
STICKLINE(主动卖<=0,0,-主动卖,0.9,0),COLORFFCC00{XG51};
STICKLINE(主动卖<=0,0,-主动卖,0.2,0),COLORGREEN{XG51};
币:IF(SAR(10,2,20)>=H,SAR(10,2,20),DRAWNULL),CIRCLEDOT,COLORYELLOW{XG51};
股:IF(SAR(10,2,20)<=L,SAR(10,2,20),DRAWNULL),CIRCLEDOT,COLORWHITE; WJ:=(H+L+C)/3{XG51};
V1:=IF(H=L,1,H-maX(O,C)){XG51};
V2:=IF(H=L,1,MAX(C,O)-WJ){XG51};
V3:=IF(H=L,1,MIN(O,C)-L){XG51};
V4:=IF(H=L,1,WJ-MIN(C,O)){XG51};
V5:=VOL/IF(H=L,4,H-L){XG51};
V6:=(V1*V5){XG51};
V7:=(V2*V5){XG51};
V8:=(V3*V5){XG51};
V9:=(V4*V5){XG51};
买盘:=(V9+V8){XG51};
卖盘:=(V6+V7){XG51};
买卖差:=买盘-卖盘{XG51};
ddx:=买卖差{XG51};
DX:=MA(买卖差,5)*20{XG51};
DDX1:SMA(DX,3,1),COLORFFFFFF{XG51};
DDX2:SMA(DDX1,3,1),COLOR00FFFF{XG51};
DDX3:(5*DDX2+4*REF(DDX2,1)+3*REF(DDX2,2)+2*REF(DDX2,3)+REF(DDX2,4))/15{X~G_5=1~C~N~{};