通达信牛股寻踪未加密选股指标公式源码

源码正文：

VAR2:=REF(LOW,1){XG51};
VAR3:=SMA(Abs(LOW-VAR2),13,1)/Sma(MAX(LOW-VAR2,0),13,1)*100{XG51};
VAR4:=ema(IF(CLOSE*1.2,VAR3*13,VAR3/13),13){XG51};
VAR5:=LLV(LOW,34){XG51};
VAR6:=HHV(VAR4,34){XG51};
VAR7:=IF(LLV(LOW,55),1,0){XG51};
VAR8:=EMA(IF(LOW<=VAR5,(VAR4+VAR6*2)/2,0),3)/618*VAR7{XG51};
VAR9:=EMA(CLOSE,5){XG51};
VAR10:=(CLOSE-MA(CLOSE,34))/MA(CLOSE,34)*(-10){XG51};
VAR11:=EMA(IF(LOW<=VAR5,(VAR4+VAR6*2)/2,0),3)/618*VAR7*(-1){XG51};
VAR12:=EMA(CLOSE,5)*(-1){XG51};
stICKLINE(VAR8>REF(VAR8,1),0,VAR8,6,1),COLOR10FFFF,LINETHICK3{XG51};
备钱:IF(VAR8>REF(VAR8,1),0,VAR8),COLOR0FFFFF{XG51};
STICKLINE(VAR11>REF(VAR11,1),0,VAR11,6,1),COLORFFF810{XG51};
界:0,COLORFFFFFF,LINETHICK1{XG51};
XL1:=MA(LOW,2)*0.96{XG51};
XL2:=MA(LOW,26)*0.85{XG51};
XL3:=REF(XL1,1)<XL2 AND REF(XL1,1)<XL1 AND REF(XL1,1)<REF(XL1,2){XG51};
STICKLINE(XL3,0,VAR8*3,8,0),COLORWHITE{XG51};
启动:IF(XL3,0,VAR8*3),COLORWHITE{XG51};
VA:=(2*C+H+L)/4{XG51};
VB:=LLV(L,5){XG51};
VC:=HHV(H,5){XG51};
红线上穿买:EMA((VA-VB)/(VC-VB)*27,5),COLORWHITE{XG51};
红线下穿卖:EMA(红线上穿买,3),COLORFFFF00{XG51};
散户:= EMA(((2*CLOSE+HIGH+LOW)/4-LLV(LOW,5))/(HHV(HIGH,4)-LLV(LOW,5))*100,4){XG51};
庄家:= EMA(0.667*REF(散户,1)+0.333*散户,2){XG51};
DRAWTEXT(crOSS(散户,庄家) AND 散户<30,5,'低进'),COLOR00FF00{XG51};
DRAWTEXT(CROSS(散户,庄家) AND 散户<30,7,'●'),COLORFFFFFF{XG51};
DRAWTEXT(CROSS(庄家,散户) AND 散户>70,25,'高出'),COLOR00FF00{XG51};
DRAWTEXT(CROSS(庄家,散户) AND 散户>70,22,'●'),COLOR00FF00{XG51};
极品底:IF((MA(C,5)-C)/C>0.04 AND (MA(C,10)-MA(C,5))/MA(C,5)>0.04,23,0),LINETHICK2,COLORFF00FF{XG51};
DRAWICON(极品底=23,23,1),LINETHICK2,COLORFFFFFF{XG51};
RSV:=(((CLOSE - LLV(LOW,9)) / (HHV(HIGH,9) - LLV(LOW,9))) * 100){XG51};
K:=SMA(RSV,3,1){XG51};
D:=SMA(K,3,1){XG51};
J:=3*K-2*D{XG51};
X:=LLV(J,2)=LLV(J,8){XG51};
DRAWTEXT(CROSS(J,REF(J+0.01,1)) AND X AND J<19,3,'低进'),COLORFFFF00{XG51};
DRAWTEXT(CROSS(J,REF(J+0.01,1)) AND X AND J<19,7,'▲'),COLORWHITE{XG51};
DRAWTEXT(CROSS(J,REF(J+0.01,1)) AND X AND J<19,6,'▲'),COLORWHITE{XG51};
DRAWTEXT(CROSS(J,REF(J+0.01,1)) AND X AND J<19,5,'↑'),COLORWHITE{XG51};
QVAR1A:=((HHV(HIGH,21)-CLOSE)/(HHV(HIGH,21)-LLV(LOW,21)))*(100)-10{XG51};
QVAR1B:=((CLOSE-LLV(LOW,21))/(HHV(HIGH,21)-LLV(LOW,21)))*(100){XG51};
QVAR1C:=SMA(QVAR1B,13,8){XG51};
QVAR1D:=SMA(QVAR1A,21,8){XG51};
机会来临:=SMA(QVAR1C,13,8),COLORWHITE{XG51};
AAS:=FILTER((COUNT((机会来临-QVAR1D<(-65)),3)=3),34){XG51};
波段买点:IF(AAS,15,0),COLORFFFFFF,STICK,LINETHICK6{X-G-5~1-C-N-{};

源码正文：

macd2:=2*("maCD.dif"-"MacD.DEA"){XG51};
(CLOSE<0 AND crOSS("MACD.DIF",0),H*1.3),COLOR000080,NODRAW{XG51};
(CLOSE<0 AND CROSS(MACD2,0),H*1.3),COLOR000080,NODRAW{XG51};
(CLOSE<0 AND CROSS(0,"MACD.DIF"),H*1.3),COLOR808080,NODRAW{XG51};
(CLOSE<0 AND CROSS(0,MACD2),H*1.3),COLOR808080,NODRAW{XG51};
DU0:=CROSS("MACD.DIF",0){XG51};
UD0:=CROSS(0,"MACD.DIF"){XG51};
TDU0:=BArslAst(DU0){XG51};
TUD0:=BARSLAST(UD0){XG51};
DU3:=REF(DU0,1){XG51};
UD3:=REF(UD0,1){XG51};
TDU3:=BARSLAST(DU3){XG51};
TUD3:=BARSLAST(UD3){XG51};
UDGLINE:=IF(TDU3<TUD3,REF(HHV(HIGH,2),TDU3),REF(LLV(LOW,2),TUD3)){XG51};
JDU0:=REF(CLOSE,1)<=REF(UDGLINE,1) AND CLOSE>UDGLINE AND TDU0<TUD0{XG51};
JUD0:=REF(CLOSE,1)>=REF(UDGLINE,1) AND CLOSE<UDGLINE AND TUD0<TDU0{XG51};
JDU1:=JDU0 AND COUNT(JDU0,TDU0)=1{XG51};
JUD1:=JUD0 AND COUNT(JUD0,TUD0)=1{XG51};
JDU2:=JDU1 AND REF(BARSLAST(JUD1),1)<REF(BARSLAST(JDU1),1){XG51};
JUD2:=JUD1 AND REF(BARSLAST(JUD1),1)>REF(BARSLAST(JDU1),1){XG51};
JDU3:=JDU1 AND REF(BARSLAST(JUD1),1)>REF(BARSLAST(JDU1),1){XG51};
JUD3:=JUD1 AND REF(BARSLAST(JUD1),1)<REF(BARSLAST(JDU1),1){XG51};
bsLINE:=IF(BARSLAST(JDU2)<BARSLAST(JUD2),IF(REF(CROSS(0,MACD2),1),LLV(LOW,2),REF(LLV(LOW,2),BARSLAST(REF(CROSS(0,MACD2),1)))),IF(REF(CROSS(MACD2,0),1),HHV(HIGH,2),REF(HHV(HIGH,2),BARSLAST(REF(CROSS(MACD2,0),1))))){XG51};
STICKLINE(MACD2>=0,0,MACD2,2,1),COLORWHITE{XG51};
STICKLINE(MACD2>=0 AND MACD2<REF(MACD2,1),0,MACD2,2,0),COLORLICYAN{XG51};
STICKLINE(MACD2<0,0,MACD2,2,0),COLORGREEN{XG51};
STICKLINE(MACD2<0 AND MACD2>REF(MACD2,1),0,MACD2,2,1),COLORFF8000{XG51};
DEFUT:=BARSLAST(CROSS(MACD2,0)){XG51};
DEFDT:=BARSLAST(CROSS(0,MACD2)){XG51};
DEFUL:=IF(MACD2>=0,HHV(MACD2,DEFUT+1),REF(HHV(MACD2,DEFUT+1),DEFDT+1)){XG51};
DEFDL:=IF(MACD2<0,LLV(MACD2,DEFDT+1),REF(LLV(MACD2,DEFDT+1),DEFUT+1)){XG51};
DEFU2L:=REF(DEFUL,DEFUT+1){XG51};
DEFD2L:=REF(DEFDL,DEFDT+1){XG51};
DRAWICON(LLV(MACD2,4)>0 AND MACD2<REF(MACD2,1) AND REF(MACD2,1)>REF(MACD2,2) AND REF(MACD2,2)>REF(MACD2,3),MACD2,2){XG51};
DRAWICON(HHV(MACD2,4)<0 AND MACD2>REF(MACD2,1) AND REF(MACD2,1)<REF(MACD2,2) AND REF(MACD2,2)<REF(MACD2,3),MACD2,1){XG51};
DRAWICON((JUD1 OR BARSLAST(JDU1)>BARSLAST(JUD1)) AND MACD2>=0 AND REF(MACD2,1)<REF(DEFU2L,1) AND MACD2>DEFU2L,MACD2,5){XG51};
DRAWICON((JDU1 OR BARSLAST(JDU1)<BARSLAST(JUD1)) AND MACD2<0 AND REF(MACD2,1)>REF(DEFD2L,1) AND MACD2<DEFD2L,MACD2,3){XG51};
VAR111:=JDU1 OR BARSLAST(JDU1)<BARSLAST(JUD1){XG51};
VAR112:=HHV(MACD2,4)<0 AND MACD2>REF(MACD2,1) AND REF(MACD2,1)<REF(MACD2,2) AND REF(MACD2,2)<REF(MACD2,3){XG51};
SHORT:=12;LONG:=26;MID:=9{XG51};
VA:=IF(CLOSE>REF(CLOSE,1),vol,-VOL){XG51};
obv1:=SUM(IF(CLOSE=REF(CLOSE,1),0,VA),0){XG51};
OBV2:=ema(OBV1,3)-MA(OBV1,9){XG51};
OBV3:=EMA(IF(OBV2>0,OBV2,0),3){XG51};
MAC3:=MA(C,3){XG51};
DIF:EMA(CLOSE,SHORT)-EMA(CLOSE,LONG)COLORBLUE,LINETHICK2{XG51};
DEA:EMA(DIF,MID)COLORYELLOW{XG51};
DIF1:IF(DIF>REF(DIF,1),DIF,DRAWNULL),COLOR8000FF,LINETHICK2{XG51};
DIF2:IF(DIF<REF(DIF,1),DIF,DRAWNULL),COLORFF0080,LINETHICK2{XG51};
低位金叉:=CROSS(DIF,DEA) AND DIF<-0.1{XG51};
DRAWTEXT(低位金叉,-0.5,'★低位金叉'),COLORRED{XG51};
JCCOUNT:=COUNT(CROSS(DIF,DEA),BARSLAST(DEA>=0)){XG51};
二次金叉:=CROSS(DIF,DEA) AND DEA<0 AND COUNT(JCCOUNT=2,21)=1{XG51};
DRAWICON(二次金叉,DEA*0.9,1) {XG51};
DRAWTEXT(二次金叉,0.5,'★二次金叉'),COLORBLUE{XG51};
A1:=BARSLAST(REF(CROSS(DIF,DEA),1)){XG51};
底背离:=REF(CLOSE,A1+1)>CLOSE AND DIF>REF(DIF,A1+1) AND CROSS(DIF,DEA){XG51};
DRAWTEXT(底背离,-1,'▲底背离'),COLORFF00FF{XG51};
A2:=BARSLAST(REF(CROSS(DEA,DIF),1)){XG51};
顶背离:=REF(CLOSE,A2+1)<CLOSE AND REF(DIF,A2+1)>DIF AND CROSS(DEA,DIF){XG51};
DRAWTEXT(顶背离,1,'●顶背离'),COLORCYAN{XG51};
DRAWTEXT(低位金叉 AND 二次金叉 AND 底背离,0,'★三项全能'),COLORBLUE{X_G^5.1_C_N_{};