通达信3D生死主图未加密选股指标公式源码

源码正文：

M:=88;N1:=6{XG51};
VAR0A:=ema(Ema(EMA(CLOSE,2),2),2);MA13:=(MA(VAR0A,13)*0.99){XG51};
TLAMSENR:=MAX(MAX((HIGH-LOW),Abs((REF(CLOSE,1)-HIGH))),ABS((REF(CLOSE,1)-LOW))){XG51};
ATR:=MA(TLAMSENR,13);VAR1A:=(REF(CLOSE,1)-REF(ATR,1)){XG51};
生命线:=(HHV(VAR1A,12)),LINETHICK4,COLOR0080FF{XG51};
VAR1:=EMA(AMOUNT/vol/100,3);控盘成本:EMA(VAR1,M), POINTDOT,LINETHICK3,COLOR808080{XG51};
低吸伏击:EMA(VAR1,M)*0.85, POINTDOT,LINETHICK3,COLORFFFF00{XG51};
走势铁底:低吸伏击*0.87, POINTDOT,LINETHICK3,COLOR00FFFF{XG51};
stICKLINE(CLOSE> REF(CLOSE,1) ,HIGH,LOW,0,1 ),COLORWHITE;
STICKLINE(CLOSE> REF(CLOSE,1) ,OPEN,CLOSE,3,0 ),COLOR000055{XG51};
STICKLINE(CLOSE> REF(CLOSE,1) ,OPEN,CLOSE,2.7,0 ),COLOR000077;
STICKLINE(CLOSE> REF(CLOSE,1) ,OPEN,CLOSE,2.1,0 ),COLOR000099{XG51};
STICKLINE(CLOSE> REF(CLOSE,1) ,OPEN,CLOSE,1.5,0 ),COLOR0000BB{XG51};
STICKLINE(CLOSE> REF(CLOSE,1) ,OPEN,CLOSE,0.9,0 ),COLOR0000DD{XG51};
STICKLINE(CLOSE> REF(CLOSE,1) ,OPEN,CLOSE,0.3,0 ),COLOR0000FF{XG51};
STICKLINE(CLOSE= REF(CLOSE,1) ,HIGH,LOW,0,1 ),COLORRED{XG51};
STICKLINE(CLOSE= REF(CLOSE,1) ,OPEN,CLOSE,3,0 ),COLOR555555{XG51};
STICKLINE(CLOSE= REF(CLOSE,1) ,OPEN,CLOSE,2.7,0 ),COLOR777777;
STICKLINE(CLOSE= REF(CLOSE,1) ,OPEN,CLOSE,2.1,0 ),COLOR999999{XG51};
STICKLINE(CLOSE= REF(CLOSE,1) ,OPEN,CLOSE,1.5,0 ),COLORBBBBBB{XG51};
STICKLINE(CLOSE= REF(CLOSE,1) ,OPEN,CLOSE,0.9,0 ),COLORDDDDDD{XG51};
STICKLINE(CLOSE= REF(CLOSE,1) ,OPEN,CLOSE,0.3,0 ),COLORFFFFFF{XG51};
STICKLINE(CLOSE< REF(CLOSE,1) ,HIGH,LOW,0,1 ),COLORGREEN{XG51};
STICKLINE(CLOSE< REF(CLOSE,1) ,OPEN,CLOSE,3,0 ),COLOR990000{XG51};
STICKLINE(CLOSE< REF(CLOSE,1) ,OPEN,CLOSE,2.7,0 ),COLORCC0000;
STICKLINE(CLOSE< REF(CLOSE,1) ,OPEN,CLOSE,2.1,0 ),COLORFF4400{XG51};
STICKLINE(CLOSE< REF(CLOSE,1) ,OPEN,CLOSE,1.5,0 ),COLORFF8800{XG51};
STICKLINE(CLOSE< REF(CLOSE,1) ,OPEN,CLOSE,0.9,0 ),COLORFFCC00{XG51};
STICKLINE(CLOSE< REF(CLOSE,1) ,OPEN,CLOSE,0.3,0 ),COLORGREEN{XG51};
difF:=EMA(CLOSE,7)-EMA(CLOSE,13){XG51};
DEA:=EMA(DIFF,9){XG51};
VAR1AS:=dma(AMOUNT/VOL/100,VOL/CAPITAL){XG51};
价值:= VAR1AS, POINTDOT,LINETHICK2,COLORFF6600 {XG51};
低估: VAR1AS-VAR1AS*39/100, POINTDOT,LINETHICK3, COLOR88CC00{XG51};
高估: VAR1AS+VAR1AS*16/100, POINTDOT,LINETHICK3, COLORRED{XG51};
绿降:(46.18*EMA(CLOSE,10)-31.82*EMA(CLOSE,4))/14.36,COLOR800080,LINETHICK1;
LC:=REF(CLOSE,1){XG51};
rsi:=((SMA(MAX((CLOSE - LC),0),3,1) / SMA(ABS((CLOSE - LC)),3,1)) * 100){XG51};
FF:=EMA(CLOSE,3){XG51};
MA15:=EMA(CLOSE,21){XG51};
DRAWTEXT(crOSS(FF,MA15),(LOW * 0.99),'●'),COLOR0000FF{XG51};
X1:=HHV(H,3);X2:=LLV(L,3);XX:=(X1+X2)/2{XG51};
LYA1:=IF (H>REF(X1,1) AND C>REF(C,1),X2,IF (L<REF(X2,1) AND C<REF(C,1),
X1,DRAWNULL)){XG51};
LYA:=IF(LYA1=DRAWNULL,REF(LYA1,1),LYA1){XG51};
SNX2:=IF(LYA<H AND LYA>L,REF(LYA,1),LYA){XG51};
PLOYLINE(C>0,SNX2),LINETHICK2,COLOR0099FF{XG51};
卖:EMA(((SLOPE(CLOSE,21) * 20) + CLOSE),42),LINETHICK2,COLORDC5124{XG51};
A1:=3*EMA((C-LLV(L,30))/(HHV(H,30)-LLV(L,30))*100,5)-2*EMA((C-LLV(L,30))/(HHV(H,30)-LLV(L,30))*100,5){XG51};
A3:LLV(L,30),LINETHICK2,COLORFFCC00{XG51};
A4:=EMA(A1,5){XG51};
A5:=(HHV(H,34)-C)/(HHV(H,34)-LLV(L,34))*100{XG51};
DIFFP := EMA(CLOSE,12) - EMA(CLOSE,26){XG51};
DEAP :=EMA(DIFFP,9){XG51};
基础:=(DIFFP<-0.1 AND DIFFP>DEAP){XG51};
STICKLINE(CROSS(A1,A4) AND (A5-A4)>40 AND 基础 ,A3,A3*1.2,4,0),COLORWHITE{XG51};
MA05:MA(C,5)LINETHICK2,COLOR00CCFF{XG51};
MA10:=MA(C,10){XG51};
MA20:=MA(C,20){XG51};
MA30:=MA(C,30){XG51};
五日乖离率:=(C-MA05)/MA05*100{XG51};
BB05:=ATAN((MA05/REF(MA05,1)-1)*100)*180/3.1416{XG51};
速度5:=SMA(EMA((MA05-REF(MA05,1))/REF(MA05,1),3)*100,3,1){XG51};
加速度5:=EMA((速度5-REF(速度5,1)),3),NODRAW{XG51};
IF(BB05>30 AND MA05>REF(MA05,1), MA05,DRAWNULL),LINETHICK2,COLORWHITE{XG51};
BB10:=ATAN((MA10/REF(MA10,1)-1)*100)*180/3.1416{XG51};
IF(BB05<0 AND MA05<REF(MA05,1), MA05,DRAWNULL),LINETHICK2,COLORCYAN{XG51};
三拾日乖离率:=(C-MA30)/MA30*100,NODRAW{XG51};
VAR1P:=(MA20-MA30)>REF((MA20-MA30),1) AND MA20>REF(MA20,1) AND MA30>REF(MA30,1){XG51};
VAR2P:=(MA30-MA20)<REF((MA30-MA20),1) AND MA20<REF(MA20,1) AND MA30<REF(MA30,1){XG51};
BB30:=ATAN((MA30/REF(MA30,1)-1)*100)*180/3.1416{XG51};
强势狙击:=FILTER(BB30>30 AND BB10>45 AND CROSS(BB05,60),10){XG51};
加仓:=FILTER(COUNT(CROSS(BB05,30),5)>=1 AND MA05>REF(MA05,1) AND 三拾日乖离率>REF(三拾日乖离率,1) AND MA10>REF(MA10,1)
AND 加速度5>REF(加速度5,1) AND 速度5>REF(速度5,1) ,10) {XG51};
清仓:=FILTER(COUNT(CROSS(30,BB05),5)>=1 AND (C>MA30 OR O>MA30) AND MA05<REF(MA05,1) AND 三拾日乖离率<REF(三拾日乖离率,1) AND MA10<REF(MA10,1),10){XG51};
DRAWTEXT(加仓 ,LOW*0.98,'←加仓'),COLORWHITE{XG51};
JC:=CROSS(0,五日乖离率) AND 三拾日乖离率<REF(三拾日乖离率,1) AND MA10>REF(MA10,1) {XG51};
减仓:=FILTER(JC,10){XG51};
MR:=COUNT(CROSS(五日乖离率,0),3)>=1 AND 三拾日乖离率>REF(三拾日乖离率,1) AND MA05>REF(MA05,1) AND (C/REF(C,1)-1)*100>5 AND REF(C,1)<MA30{XG51};
买入:=FILTER(MR,10){XG51};
DRAWTEXT(减仓,HIGH*1.02,'←风险'),COLORGREEN{XG51};
DRAWTEXT(买入,LOW*0.98,'←买入'),COLORBLUE{XG51};
DRAWTEXT(清仓 ,HIGH*1.02,'←清仓'),COLORCYAN{XG51};
DRAWTEXT(强势狙击,LOW*0.98,'←强势狙击'),COLORBLUE{X.G~5~1.C.N.{};

源码正文：

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,COLORWHITE{XG51};
卖量:=IF(CLOSE>OPEN,0-AA*((HIGH-CLOSE)+(OPEN-LOW)),IF(CLOSE<OPEN,0-AA*(HIGH-LOW),0-VOL/2)),LINETHICK0,COLORCYAN{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),COLORGREEN{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;主力持仓:ema(100*(CLOSE-LLV(LOW,34))/(HHV(HIGH,34)-LLV(LOW,34)),3),COLORFF00FF;主力筹码集中度:WINNER(C)*100,COLORWHITE{X!G-5^1!C!N!{};