通达信黑牛系统主图未加密选股指标公式源码

通达信黑牛系统主图未加密选股指标公式源码

源码正文：

所属地域:=stRCAT('所属地域：',DYBLOCK){XG51};
所属行业:=STRCAT('所属行业：',HYBLOCK){XG51};
所属概念:=STRCAT('所属概念：',GNBLOCK){XG51};
DRAWTEXT_FIX(1,0.00,0.01,0,所属地域),COLOR0080FF{XG51};
DRAWTEXT_FIX(1,0.00,0.08,0,所属行业),COLORBLUE{XG51};
DRAWTEXT_FIX(1,0.00,0.16,0,所属概念),COLORRED{XG51};
LCO:=REF(CLOSE,1){XG51};
rsiO:=((SMA(maX((CLOSE - LCO),0),3,1) / SMA(Abs((CLOSE - LCO)),3,1)) * 100){XG51};
Z1O:=MA(C,13){XG51};
ZX:=REF(Z1O,13/2+1){XG51};
DRAWICON(crOSS(ZX,C),H*1.01,2){XG51};
DRAWTEXT(CROSS(88,RSIO),HIGH * 1.02,'▼逃顶'),COLOR00FFFF{XG51};
VAR1:=CLOSE>REF(CLOSE,1) AND CLOSE>REF(CLOSE,2){XG51};
VAR2:=REF(VAR1,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2){XG51};
VAR3:=REF(VAR2,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2){XG51};
VAR4:=REF(VAR3,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2){XG51};
VAR5:=REF(VAR4,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2){XG51};
VAR6:=REF(VAR5,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2){XG51};
VAR7:=REF(VAR6,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2){XG51};
VAR8:=REF(VAR7,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2){XG51};
VAR9:=REF(VAR8,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2){XG51};
VARA:=REF(VAR9,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2){XG51};
VARB:=REF(VARA,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2){XG51};
VARC:=REF(VARB,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2){XG51};
STICKLINE(VAR1 OR VAR2 OR VAR3 OR VAR4 OR VAR5 OR VAR6 OR VAR7 OR VAR8 OR VAR9 OR VARA OR VARB OR VARC,CLOSE,REF(CLOSE,1),3.1,0),COLOR000055{XG51};
STICKLINE(VAR1 OR VAR2 OR VAR3 OR VAR4 OR VAR5 OR VAR6 OR VAR7 OR VAR8 OR VAR9 OR VARA OR VARB OR VARC,CLOSE,REF(CLOSE,1),2.7,0),COLOR000077{XG51};
STICKLINE(VAR1 OR VAR2 OR VAR3 OR VAR4 OR VAR5 OR VAR6 OR VAR7 OR VAR8 OR VAR9 OR VARA OR VARB OR VARC,CLOSE,REF(CLOSE,1),2.1,0),COLOR000099{XG51};
STICKLINE(VAR1 OR VAR2 OR VAR3 OR VAR4 OR VAR5 OR VAR6 OR VAR7 OR VAR8 OR VAR9 OR VARA OR VARB OR VARC,CLOSE,REF(CLOSE,1),1.5,0),COLOR0000BB{XG51};
STICKLINE(VAR1 OR VAR2 OR VAR3 OR VAR4 OR VAR5 OR VAR6 OR VAR7 OR VAR8 OR VAR9 OR VARA OR VARB OR VARC,CLOSE,REF(CLOSE,1),0.9,0),COLOR0000DD{XG51};
STICKLINE(VAR1 OR VAR2 OR VAR3 OR VAR4 OR VAR5 OR VAR6 OR VAR7 OR VAR8 OR VAR9 OR VARA OR VARB OR VARC,CLOSE,REF(CLOSE,1),0.3,0),COLOR0000FF{XG51};
VARD:=CLOSE<REF(CLOSE,1) AND CLOSE<REF(CLOSE,2){XG51};
VARE:=REF(VARD,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2){XG51};
VARF:=REF(VARE,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2){XG51};
VAR10:=REF(VARF,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2){XG51};
VAR11:=REF(VAR10,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2){XG51};
VAR12:=REF(VAR11,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2){XG51};
VAR13:=REF(VAR12,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2){XG51};
VAR14:=REF(VAR13,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2){XG51};
VAR15:=REF(VAR14,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2){XG51};
VAR16:=REF(VAR15,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2){XG51};
VAR17:=REF(VAR16,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2){XG51};
VAR18:=REF(VAR17,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2){XG51};
STICKLINE(VARD OR VARE OR VARF OR VAR10 OR VAR11 OR VAR12 OR VAR13 OR VAR14
OR VAR15 OR VAR16 OR VAR17 OR VAR18,CLOSE,REF(CLOSE,1),3.1,0),COLOR00AAFF{XG51};
STICKLINE(VARD OR VARE OR VARF OR VAR10 OR VAR11 OR VAR12 OR VAR13 OR VAR14
OR VAR15 OR VAR16 OR VAR17 OR VAR18,CLOSE,REF(CLOSE,1),2.7,0),COLOR00ddfF{XG51};
STICKLINE(VARD OR VARE OR VARF OR VAR10 OR VAR11 OR VAR12 OR VAR13 OR VAR14
OR VAR15 OR VAR16 OR VAR17 OR VAR18,CLOSE,REF(CLOSE,1),2.1,0),COLOR00EEFF{XG51};
STICKLINE(VARD OR VARE OR VARF OR VAR10 OR VAR11 OR VAR12 OR VAR13 OR VAR14
OR VAR15 OR VAR16 OR VAR17 OR VAR18,CLOSE,REF(CLOSE,1),1.5,0),COLOR22FFFF{XG51};
STICKLINE(VARD OR VARE OR VARF OR VAR10 OR VAR11 OR VAR12 OR VAR13 OR VAR14
OR VAR15 OR VAR16 OR VAR17 OR VAR18,CLOSE,REF(CLOSE,1),0.9,0),COLOR99FFFF{XG51};
STICKLINE(VARD OR VARE OR VARF OR VAR10 OR VAR11 OR VAR12 OR VAR13 OR VAR14
OR VAR15 OR VAR16 OR VAR17 OR VAR18,CLOSE,REF(CLOSE,1),0.3,0),COLORFFFFFF{XG51};
VAR19:=REF(VARD OR VARE OR VARF OR VAR10 OR VAR11 OR VAR12 OR VAR13 OR VAR14 OR VAR15 OR VAR16 OR VAR17 OR VAR18,1) AND VAR1{XG51};
STICKLINE(VAR19,REF(CLOSE,1),REF(CLOSE,2),3,0),COLORLIMAGENTA{XG51};
VAR1A:=REF(VAR1 OR VAR2 OR VAR3 OR VAR4 OR VAR5 OR VAR6 OR VAR7 OR VAR8 OR VAR9 OR VARA OR VARB OR VARC,1) AND VARD{XG51};
STICKLINE(VAR1A,REF(CLOSE,1),REF(CLOSE,2),3,0),COLOR008800{XG51};
RSV:=(CLOSE-LLV(LOW,19))/(HHV(HIGH,19)-LLV(LOW,19))*100{XG51};
K:=SMA(RSV,3,1){XG51};
D:=SMA(K,3,1){XG51};
J:=3*K-2*D{XG51};
RSV24:=(CLOSE-LLV(LOW,55))/(HHV(HIGH,55)-LLV(LOW,55))*100{XG51};
K24:=SMA(RSV24,3,1){XG51};
D24:=SMA(K24,3,1){XG51};
J24:=3*K24-2*D24{XG51};
A1:=BArslAST(REF(CROSS("macd.dif","MacD.DEA"),1)){XG51};
DRAWTEXT(REF(C,A1+1)>C AND REF("MACD.DIF",A1+1)<"MACD.DIF" AND CROSS("MACD.DIF","MACD.DEA")>0,L-0.02,'★M'),COLOR00FFFF{XG51};
A2:=BARSLAST(REF(CROSS("kdj.K","kdJ.D"),1)){XG51};
DRAWTEXT(REF(C,A2+1)>C AND REF("KDJ.K",A2+1)<"KDJ.K" AND CROSS("KDJ.K","KDJ.D"),L-0.10,'◎K'),COLORFF00FF{XG51};
A3:=BARSLAST(REF(CROSS("RSI.RSI1","RSI.RSI2"),1)){XG51};
DRAWTEXT(REF(C,A3+1)>C AND REF("RSI.RSI1",A3+1)<"RSI.RSI1" AND CROSS("RSI.RSI1","RSI.RSI2")>0,L-0.18,'◆R'),COLOR0000FF;{XG51};
C1:=BARSLAST(REF(CROSS("MACD.DEA","MACD.DIF"),1)){XG51};
DRAWTEXT(REF(C,C1+1)<C AND REF("MACD.DIF",C1+1)>"MACD.DIF" AND CROSS("MACD.DEA","MACD.DIF")>0,H+0.16,'★M'),COLOR00FF00;{XG51};
C2:=BARSLAST(REF(CROSS("KDJ.D","KDJ.K"),1)){XG51};
DRAWTEXT(REF(C,C2+1)<C AND REF("KDJ.K",C2+1)>"KDJ.K" AND CROSS("KDJ.D","KDJ.K")>0,H+0.08,'◎K'),COLORFFFFCC{XG51};
C3:=BARSLAST(REF(CROSS("RSI.RSI2","RSI.RSI1"),1)){XG51};
DRAWTEXT(REF(C,C3+1)<C AND REF("RSI.RSI1",C3+1)>"RSI.RSI1" AND CROSS("RSI.RSI2","RSI.RSI1")>0,H+0.04,'◆R'),COLORFF9900;{XG51};
重心:=(C+0.618*REF(C,1)+0.382*REF(C,1)+0.236*REF(C,3)+0.146*REF(C,4))/2.382{XG51};
【操盘线】:ema(((SLOPE(C,22)*20)+C),55),COLORBLUE,LINETHICK4{XG51};
【黄金线】:IF(重心>=【操盘线】,【操盘线】,DRAWNULL),COLORWHITE,LINETHICK2{XG51};
【空仓线】:IF(重心<【操盘线】,【操盘线】,DRAWNULL),COLORGREEN,LINETHICK2{XG51};
{XG51};
变:EMA(CLOSE,5),LINETHICK1,COLORBLUE{XG51};
金:IF(变>REF(变,1),变,DRAWNULL),COLORWHITE,LINETHICK1{XG51};
空:IF(变<REF(变,1),变,DRAWNULL),COLORCYAN,LINETHICK1{XG51};
涨停:=IF((C-REF(C,1))*100/REF(C,1)>=(10-0.01*100/REF(O,1)),1,0){XG51};
STICKLINE(涨停,O,C,1,0),COLORBLUE{XG51};
ZDF:=(C-REF(C,1))/REF(C,1)*100{XG51};
STICKLINE(ZDF<-9.9,O,C,1,0),COLORYELLOW{XG51};
{XG51};
生命线:MA(CLOSE,26),COLORWHITE,LINETHICK2{XG51};
STICKLINE(C>=生命线 AND C>=O,H,L,0,1),COLORWHITE{XG51};
STICKLINE(C>=生命线 AND C>=O,C,O,2.5,0),COLORWHITE{XG51};
DP:=IF(C=INDEXC,0,1);GJ:=AMOUNT/V/100 {XG51};
多头线:EMA(C,1.5),COLOR0000CC{XG51};
空头线:EMA(C,5),COLORLIMAGENTA{XG51};
均衡线:EMA(空头线,5),COLORCYAN{XG51};
VARF1:=COUNT(CROSS(多头线,均衡线),2)=1{XG51};
VARF2:=COUNT(CROSS(空头线,均衡线),2)=1{XG51};
ZAI:=FILTER(VARF1 AND VARF2,2){XG51};
DRAWTEXT(ZAI,均衡线*0.98,'↖黑牛'),COLOR00FF00{XG51};
mtm:=CLOSE-REF(CLOSE,1){XG51};
DX:=100*EMA(EMA(MTM,6),6)/EMA(EMA(ABS(MTM),6),6){XG51};
DY:=HHV(DX,2)=HHV(DX,7) AND COUNT(DX>50,2) AND CROSS(MA(DX,2),DX){XG51};
LC:=REF(CLOSE,1){XG51};
RSI:=SMA(MAX(CLOSE-LC,0),6,1)/SMA(ABS(CLOSE-LC),6,1)*100{XG51};
STICKLINE(ZDF>9.8,O,C,2.5,0),COLORWHITE{XG51};
STICKLINE(ZDF<-9.8,O,C,2.5,0),COLORYELLOW{XG51};
白买进:DRAWNULL,NODRAW,COLORRED{XG51};
黄加仓:DRAWNULL,NODRAW,COLORBLUE{XG51};
蓝跌:DRAWNULL,NODRAW,COLORYELLOW{XG51};
绿见顶:DRAWNULL,NODRAW,COLORCYAN{XG51};
红强势:DRAWNULL,NODRAW,COLORWHITE{XG51};
红蓝调整:DRAWNULL,NODRAW,COLORBROWN{XG51};
买进价:=((C-REF(MA(C,6),1))/6+MA(C,6))*1.004{XG51};
买进条件:=CROSS(C,买进价) AND 买进价>REF(买进价,1){X=G-5_1=C=N={};

通达信寻龙诀未加密选股指标公式源码

源码正文：

X1:=C<=REF(C,1) AND C<=O{XG51};
X2:=C<=REF(C,1) AND C>=O{XG51};
X3:=X1>0 OR X2>0{XG51};
XT0:=BArslAst(X3){XG51};
X4:=maX(REF(C,XT0),REF(O,XT0)){XG51};
X5:=REF(V,XT0){XG51};
YT:=XT0>0 AND C>X4 AND V>X4*1.1;YS:=IF(YT>0 AND REF(YT,1)=0,10,0){XG51};
XA1:=(CLOSE/REF(CLOSE,1)>1.098 OR C/O>1.098) AND V<HHV(V,21);
X0:=NOT(NAMELIKE('S') OR NAMELIKE('*S')) AND vol>1{XG51};
XA2:=BARSLAST(XA1);
XA31:=(L>=REF(L,XA2) AND (L-REF(L,XA2))<=0.03);
XA32:=(L>=REF(C,XA2)*0.99 AND (L-REF(C,XA2))<=0.03) ;
XA33:=(0>=REF(C,XA2)*0.99 AND (0-REF(C,XA2))<=0.03);
XA3:=XA31 OR XA32 OR XA33;
龙吟:YS>0 AND C>O AND C>REF(C,1) AND XA3 AND (XA2<21 OR COUNT(REF(XA2,1),21)>=1) AND X0,COLORBLUE;
YB:=(C-REF(C,1))*100/REF(C,1)>=9.9 AND L=H;
XA4:=(ATAN((MA(C,5)/REF(MA(C,5),1)-1)*100)*180/3.14115926);
XA5:=MA(XA4,5);
XA6:=PLOYLINE(crOSS(XA4,XA5),XA5);
XA7:=PLOYLINE(CROSS(XA5,XA4),XA4){XG51};
XA8:=COUNT(CROSS(XA4,XA5),XA6<REF(XA6,5) AND XA7>REF(XA7,5)){XG51};
XA9:=CROSS(ema(C,3),EMA(C,21)){XG51};
XA10:=CROSS(MA(C,3),MA(C,21));
XA11:=((MAX(C,O)-MIN(C,O))/MIN(C,O))*100{XG51};
XA12:=(CLOSE/REF(CLOSE,1)<=0.96 OR CLOSE/OPEN<=0.96) AND (V/HHV(V,20)<=0.618 OR VOL/REF(VOL,1)<=0.5 OR VOL<HHV(VOL,5));
XA13:=(CLOSE/REF(CLOSE,1)>=1.04 OR CLOSE/OPEN>=1.04) AND (V/HHV(V,20)<=0.618 OR VOL/REF(VOL,1)<=0.5 OR VOL<HHV(VOL,5))
AND C>REF(C,1) AND HIGH>LOW;
XA14:=O>REF(C,1) AND C>REF(C,1) AND H>(H,1){XG51};
XA15:=(REF(C<REF(C,1) AND V/REF(V,1)<0.67,2) OR REF(XA12,2) OR REF(XA13,2)) AND REF(XA11<3,1) AND REF(V,1)<REF(V,2) AND XA14{XG51};
XA16:=O>REF(CLOSE,1) AND CLOSE>OPEN AND CLOSE>REF(O,1);
XA17:=(REF(XA12,1) AND XA16 AND XA13) OR XA15{XG51};
XA18:=(CROSS(C,MA(C,5)) AND CROSS(C,MA(C,13)) AND CROSS(C,MA(C,21)) OR CROSS(C,MA(C,34)))
AND MA(C,5)>REF(MA(C,5),1){XG51};
XA19:=MA(C,5)>REF(MA(C,5),1) AND MA(C,5)>MA(C,10) AND MA(C,10)>=MA(C,20){XG51};
XA20:=XA18 AND 龙吟 AND NOT(YB) AND (XA8 OR XA10 OR XA9 OR CROSS(C,MA(C,20))){XG51};
XA21:=龙吟 AND (V/REF(V,1)>1.5 OR REF(V,1)/REF(V,2)<0.67) AND (XA8 OR XA10 OR XA9 OR CROSS(C,MA(C,20))) AND NOT(O/REF(C,1)>1.06)
AND NOT(YB) AND X0,COLORLIMAGENTA{XG51};
XA22:=C>O AND C>REF(C,1) AND XA17 AND (COUNT(龙吟,8)=1 OR XA18) AND NOT(YB)
AND (XA8 OR XA10 OR XA9 OR CROSS(C,MA(C,20))) AND X0,COLORCYAN;
龙跃:(XA20 OR XA21 OR XA22),COLORGREEN{XG51};
PX:=(MA(CLOSE,3)+MA(CLOSE,6)+MA(CLOSE,12)+MA(CLOSE,24))/4;
妖龙刺:REF(龙吟,1) AND C>O AND O>REF(C,1) AND CROSS(C,PX),COLORLIMAGENTA{XG51};
DRAWICON(妖龙刺,0.4,9),COLORLIMAGENTA;

{X=G+5~1=C=N={}