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

源码正文：

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,控盘程度 ,7,0 ),COLOR00FFFF;
STICKLINE( 控盘程度 AND 控盘程度>100,100,控盘程度 ,7,0 ),COLORWHITE{X*G!5~1*C*N*{};

源码正文：

VAT3:=REF(CLOSE,1){XG51};
VAT4:=SMA(maX(CLOSE-VAT3,0),6,1)/SMA(Abs(CLOSE-VAT3),6,1)*100{XG51};
我卖:(crOSS(80,VAT4))*82,stICK,LINETHICK3,COLOR9900CC {XG51};
DRAWTEXT(我卖,80,'→我卖'),COLORWHITE{XG51};
快逃: IF(CROSS((3*SMA((CLOSE-LLV(LOW,27))/(HHV(HIGH,27)-LLV(LOW,27))*100,5,1)-2*SMA(SMA((CLOSE-LLV(LOW,27))/(HHV(HIGH,27)-LLV(LOW,27))*100,5,1),3,1)),90),60,0),STICK,LINETHICK4,COLORCYAN{XG51};
DRAWTEXT(快逃,50,'→快逃'),COLORRED{XG51};
VARO2:=(CLOSE-LLV(LOW,26))/(HHV(HIGH,26)-LLV(LOW,26))*100{XG51};
VARO3:=SMA(SMA(VARO2,3,1),3,1){XG51};
VARO4:=ema(VARO3,5){XG51};
VARO5:=LLV(LOW,26){XG51};
VARO6:=HHV(HIGH,34){XG51};
VARO7:=EMA((CLOSE-VARO5)/(VARO6-VARO5)*4,4)*25{XG51};
底部雷达:IF(CROSS(VARO4,10) AND VARO4>10,25,0),STICK,COLORBLUE,LINETHICK4{XG51};
建仓区: IF((VARO7<10),80,100), ,LINETHICK2,COLOR00CCFF{XG51};
派发区: IF((VARO7>90),20,0), , LINETHICK2,COLOR00FF00{XG51};
DRAWTEXT(底部雷达,20,'底部雷达'),COLORBLUE{XG51};
买入: IF(CROSS((4*SMA((CLOSE-LLV(LOW,25))/(HHV(HIGH,25)-LLV(LOW,25))*100,5,1)-
3*SMA(SMA((CLOSE-LLV(LOW,25))/(HHV(HIGH,25)-LLV(LOW,25))*100,5,1),3,1)),(8)),58,0),STICK,COLOR0099FF,LINETHICK3{XG51};
DRAWTEXT(买入,45,'-我买'),COLOR66FFCC{XG51};
VAR1A:=(CLOSE-LLV(LOW,15))/(HHV(HIGH,15)-LLV(LOW,15))*100{XG51};
VAR1B:=SMA((SMA(VAR1A,4,1)-50)*2,3,1){XG51};
VAR1C:=(INDEXC-LLV(INDEXL,14))/(HHV(INDEXH,14)-LLV(INDEXL,14))*100{XG51};
VAR1D:=SMA(VAR1C,4,1){XG51};
VAR1E:=SMA(VAR1D,3,1){XG51};
VAR1F:=(HHV(HIGH,30)-CLOSE)/CLOSE*100{XG51};
VARE:=REF(LOW,1)*0.9{XG51};
VARF:=LOW*0.9{XG51};
VAR10:=(VARF*vol+VARE*(CAPITAL-VOL))/CAPITAL{XG51};
VAR11:=EMA(VAR10,30){XG51};
VAR12:=CLOSE-REF(CLOSE,1){XG51};
VAR13:=MAX(VAR12,0){XG51};
VAR14:=ABS(VAR12){XG51};
VAR15:=SMA(VAR13,7,1)/SMA(VAR14,7,1)*100{XG51};
VAR16:=SMA(VAR13,13,1)/SMA(VAR14,13,1)*100{XG51};
VAR17:=BARSCOUNT(CLOSE){XG51};
VAR18:=SMA(MAX(VAR12,0),6,1)/SMA(ABS(VAR12),6,1)*100{XG51};
VAR19:=(-200)*(HHV(HIGH,60)-CLOSE)/(HHV(HIGH,60)-LLV(LOW,60))+100{XG51};
VAR20:=VAR18<=25 AND VAR19<-95 AND VAR1F>20 AND VAR1B<-30 AND VAR1E<30 AND VAR11-CLOSE>=-0.25 AND VAR15<22 AND VAR16<28 AND VAR17>50{XG51};
STICKLINE(VAR20,0,95,5,0),LINETHICK2,COLORWHITE,{XG51};
DRAWTEXT(CROSS(VAR20,0.5) AND COUNT(VAR20=1,10)=1,60,'发射导弹 '),LINETHICK7 , COLORRED{X_G.5_1_C_N_{};