通达信私人看股未加密选股指标公式源码

通达信私人看股未加密选股指标公式源码

源码正文：

aa:=vol/((high-low)*2-abs(close-open)){XG51};
买量:=if(close>open,aa*(high-low),if(close<open,aa*((high-open)+(close-low)),VOL/2)),linethick0,colorred{XG51};
卖量:=if(close>open,0-aa*((high-close)+(open-low)),if(close<open,0-aa*(high-low),0-vol/2)),linethick0,colorgreen{XG51};
进出量:=买量+卖量,color00ffff;stickline(进出量<0,0,进出量,1,0),colorff6600{XG51};
stickline(进出量<0,0,进出量,3,0),colorff9900{XG51};
stickline(进出量<0,0,进出量,1.5,0),colorffcc00{XG51};
stickline(进出量<0,0,进出量,0.5,0),colorcyan{XG51};
stickline(进出量>0,0,进出量,3,0),color000099{XG51};
stickline(进出量>0,0,进出量,3,0),color0000cc{XG51};
stickline(进出量>0,0,进出量,1.0,0),color0000ff{XG51};
stickline(进出量>0,0,进出量,0.5,0),colorcc66ff;n:=1;qj0:=(high+low+close)/3{XG51};
qj1:=if(high=low,1,high-max(open,close)){XG51};
qj2:=if(high=low,1,max(close,open)-qj0){XG51};
qj3:=if(high=low,1,min(open,close)-low){XG51};
qj4:=if(high=low,1,qj0-min(close,open)){XG51};
qj5:=vol/(if(high=low,4,high-low)){XG51};
qj6:="macd.dif">"macd.dea" and "macd.dea"<0{XG51};
qj7:="kdj.k">"kdj.d" and "kdj.d"<30{XG51};
qj8:="macd.dif"<"macd.dea"{XG51};
qj9:="kdj.k"<"kdj.d" and "kdj.k">80{XG51};
特大:qj4*qj5,nodraw;大单:qj3*qj5,nodraw{XG51};
中单:qj1*qj5,nodraw;小单:qj2*qj5,nodraw{XG51};
w1:=sum(大单,n)+sum(特大,n);w2:=sum(小单,n)+sum(中单,n){XG51};
量振1:=特大>大单 and 大单>小单{XG51};
量振2:=特大<小单 and 大单<小单{XG51};
标振1:=qj6 and qj7{XG51};
标振2:=qj8 and qj9{XG51};
a:=w1-w2;a0:=if(a>0,a,0);b0:=if(a<0,a,0){XG51};
stickline(a0,0,a0,1,0),color000044{XG51};
主力持仓:ema(100*(close-llv(low,34))/(hhv(high,34)-llv(low,34)),3),colorff00ff{XG51};
主力筹码集中度:(c)*100,colorred{X=G_5-1=C=N={};

通达信六线粘合未加密选股指标公式源码

源码正文：

ma1:=MA(CLOSE,5){XG51};
MA2:=MA(CLOSE,10){XG51};
MA3:=MA(CLOSE,20){XG51};
MA4:=MA(CLOSE,60){XG51};
MA5:=MA(CLOSE,120){XG51};
MA6:=MA(CLOSE,250){XG51};
A:MAX(MAX(MA1,MA2),MA3),LINETHICK0{XG51};
B:MIN(MIN(MA1,MA2),MA3),LINETHICK0{XG51};
三线粘合:IF(RANGE(100*(A-B)/B,0,5),100*(A-B)/B,DRAWNULL),LINETHICK1{XG51};
SA:=MAX(MAX(MA1,MA2),MAX(MA3,MA4)),LINETHICK0{XG51};
SB:=MIN(MIN(MA1,MA2),MIN(MA3,MA4)),LINETHICK0{XG51};
四线粘合:IF(RANGE(100*(SA-SB)/SB,0,10),100*(SA-SB)/SB,DRAWNULL),LINETHICK1{XG51};
WA:=MAX((MAX(MA1,MA2),MAX(MA3,MA4)),MA5),LINETHICK0{XG51};
WB:=MIN((MIN(MA1,MA2),MIN(MA3,MA4)),MA5),LINETHICK0{XG51};
五线粘合:IF(RANGE(100*(WA-WB)/WB,0,15),100*(WA-WB)/WB,DRAWNULL),LINETHICK0{XG51};
LA:=MAX((MAX(MA1,MA2),MAX(MA3,MA4)),MAX(MA5,MA6)),LINETHICK0{XG51};
LB:=MIN((MIN(MA1,MA2),MIN(MA3,MA4)),MIN(MA5,MA6)),LINETHICK0{XG51};
六线粘合:IF(RANGE(100*(LA-LB)/LB,0,20),100*(LA-LB)/LB,DRAWNULL),LINETHICK0{XG51};
五日乖离:(C-MA(C,5))/MA(C,5),NODRAW{X*G?5.1*C*N*{};