通达信牛金追涨选股指标公式源码

通达信牛金追涨选股指标公式源码

源码正文：

VAR1:=ema(CLOSE,17) - Ema(CLOSE,34){XG51};
动力线:=SUM(VAR1-REF(VAR1,1),5)*100{XG51};
动力1:=EMA(动力线,5),COLORWHITE{XG51};
动力2:=EMA(动力线,10),COLORBLUE{XG51};
动力3:=EMA(动力线,17),COLORYELLOW{XG51};
动力:=IF(动力线>0 AND 动力线>REF(动力线,1),动力线,0){XG51};
动力线HX:=IF(动力线>0 AND 动力线<=REF(动力线,1),动力线,0){XG51};
动力线LX:=IF(动力线<0 AND 动力线<REF(动力线,1),动力线,0){XG51};
动力线LS:=IF(动力线<0 AND 动力线>REF(动力线,1),动力线,0){XG51};
DRAWBAND(动力3,RGB(60,10,0),动力2,RGB(60,10,0)){XG51};
DRAWBAND(动力3,RGB(6,30,40),动力2,RGB(6,30,40)){XG51};
DRAWBAND(动力1,RGB(255,0,255),动力2,RGB(0,255,0)){XG51};
DRAWBAND(动力1,RGB(255,10,0),动力2,RGB(0,255,10)){XG51};
N:=2;M:=3{XG51};
趋势线:=SMA(EMA(((C+L)/2-LLV(L,21))/(HHV((H+C)/2,21)-LLV(L,21))*100,3),7,1)-(13),LINETHICK2,COLORF0F000{XG51};
判断:=(SMA(((C+L)/2-LLV(L,21))/(HHV((H+C)/2,21)-LLV(L,21))*100,2,1)-8){XG51};
强势:判断>趋势线,COLORWHITE,NODRAW{XG51};
强1:stICKLINE(强势,32,35,4,2),COLORWHITE{XG51};
强2:STICKLINE(强势,-32,-35,4,2),COLORWHITE{XG51};
弱势:判断<趋势线,COLORLIBLUE,NODRAW{XG51};
弱1:STICKLINE(弱势,32,35,4,2),COLORLIBLUE{XG51};
弱2:STICKLINE(弱势,-32,-35,4,2),COLORLIBLUE{XG51};
VAR22:=REF(CLOSE,1){XG51};
VAR23:=SMA(MAX(CLOSE-VAR22,0),7,1)/SMA(Abs(CLOSE-VAR22),7,1)*100{XG51};
VAR24:=SMA(MAX(CLOSE-VAR22,0),13,1)/SMA(ABS(CLOSE-VAR22),13,1)*100{XG51};
VAR25:=BArslAST(VAR24<23)<=3 AND crOSS(VAR23,VAR24){XG51};
VAR26:=(CLOSE-MA(CLOSE,23))/MA(CLOSE,20)*100<-12.5{XG51};
VAR27:=LLV(LOW,5){XG51};
VAR28:=HHV(HIGH,10){XG51};
VAR29:=EMA((CLOSE-VAR27)/(VAR28-VAR27)*100,4){XG51};
VAR2A:=EMA(0.667*REF(VAR29,1)+0.333*VAR29,2){XG51};
底A:0-(-1)*VAR25 AND VAR26 AND CROSS(VAR29,VAR2A) AND VAR29<=25,COLORLIMAGENTA,NODRAW{XG51};
STICKLINE(底A>0,-24,-32,8,0),COLORLIMAGENTA{XG51};
VAR2:=1{XG51};
VAR3:=REF(HIGH,1)*1.1{XG51};
VAR4:=HIGH*1.1{XG51};
VAR5:=(VAR4*vol+VAR3*(CAPITAL-VOL))/CAPITAL{XG51};
VAR6:=REF(LOW,1)*0.9{XG51};
VAR7:=LOW*0.9{XG51};
VAR8:=(VAR7*VOL+VAR6*(CAPITAL-VOL))/CAPITAL{XG51};
VAR9:=EMA(VAR8,30){XG51};
VARA:=EMA(VAR5,30){XG51};
VARB:=VARA-2{XG51};
VARC:=IF(CLOSE<=VAR9,VARB,VARA){XG51};
VARD:=MA(CLOSE,80)-MA(CLOSE,10)/17{XG51};
底B:(VARC-VARB=0 AND VAR2 AND CROSS((EMA(EMA(EMA(CLOSE,N),N),N)-REF(EMA(EMA(EMA(CLOSE,N),N),N),1))/REF(EMA(EMA(EMA(CLOSE,N),N),N),1)*100,MA((EMA(EMA(EMA(CLOSE,N),N),N)-REF(EMA(EMA(EMA(CLOSE,N),N),N),1))/REF(EMA(EMA(EMA(CLOSE,N),N),N),1)*100,M))),COLORWHITE,NODRAW{XG51};
底1:STICKLINE(VARC-VARB=0 AND VAR2 AND CROSS((EMA(EMA(EMA(CLOSE,N),N),N)-REF(EMA(EMA(EMA(CLOSE,N),N),N),1))/REF(EMA(EMA(EMA(CLOSE,N),N),N),1)*100,MA((EMA(EMA(EMA(CLOSE,N),N),N)-REF(EMA(EMA(EMA(CLOSE,N),N),N),1))/REF(EMA(EMA(EMA(CLOSE,N),N),N),1)*100,M)),-24,-32,5,0),COLORWHITE{XG51};
顶部:CROSS(83,rsi),COLORCYAN{XG51};
顶1:STICKLINE(顶部,24,32,6,0),COLOR00FF00{XG51};
AA:=(MA(C,1)+MA(C,3)+MA(C,5)+MA(C,7)+MA(C,9))/5{XG51};
BB:=(MA(C,2)+MA(C,4)+MA(C,6)+MA(C,8)+MA(C,10))/5{XG51};
CC:=EMA(AA,2){XG51};
DD:=EMA(BB,5){XG51};
TJ0:=CROSS(CC,DD){XG51};
上:=EMA(C,3){XG51};
中:=EMA(C,5){XG51};
下:=EMA(中,5){XG51};
TJ1:=CROSS(上,中){XG51};
TJ2:=上>REF(上,1){XG51};
X1:=(C+L+H)/3{XG51};
BB5:=ATAN(EMA(X1,5)-REF(EMA(X1,5),1))*3.1416*10{XG51};
EMA3:=EMA(C,3){XG51};
TJ3:=BB5>1 AND EMA(X1,5)>REF(EMA(X1,3),1){XG51};
投A:TJ1 AND TJ2  AND TJ0 AND TJ3,COLOR0099EE,NODRAW{XG51};
STICKLINE(TJ1 AND TJ2  AND TJ0 AND TJ3,-24,-32,6,0),COLOR0066BB{XG51};
STICKLINE(TJ1 AND TJ2  AND TJ0 AND TJ3,-24,-32,3,0),COLOR0077CC{XG51};
STICKLINE(TJ1 AND TJ2  AND TJ0 AND TJ3,-24,-32,1,0),COLOR0088DD{XG51};
VAR11:=EMA(HHV(HIGH,500),21){XG51};
VAR12:=EMA(HHV(HIGH,250),21){XG51};
VAR13:=EMA(HHV(HIGH,90),21){XG51};
VAR14:=EMA(LLV(LOW,500),21){XG51};
VAR15:=EMA(LLV(LOW,250),21){XG51};
VAR16:=EMA(LLV(LOW,90),21){XG51};
VAR17:=EMA((VAR14*0.96+VAR15*0.96+VAR16*0.96+VAR11*0.558+VAR12*0.558+VAR13*0.558)/6,21){XG51};
VAR18:=EMA((VAR14*1.25+VAR15*1.23+VAR16*1.2+VAR11*0.55+VAR12*0.55+VAR13*0.65)/6,21){XG51};
VAR19:=EMA((VAR14*1.3+VAR15*1.3+VAR16*1.3+VAR11*0.68+VAR12*0.68+VAR13*0.68)/6,21){XG51};
VARA1:=EMA((VAR17*3+VAR18*2+VAR19)/6*1.738,21){XG51};
VARB1:=REF(LOW,1){XG51};
VARC1:=SMA(ABS(LOW-VARB1),3,1)/SMA(MAX(LOW-VARB1,0),3,1)*100{XG51};
VARD1:=EMA(IF(CLOSE*1.35<=VARA1,VARC1*10,VARC1/10),3){XG51};
VARE1:=LLV(LOW,30){XG51};
VARF1:=HHV(VARD1,30){XG51};
VAR20:=IF(MA(CLOSE,58),1,0){XG51};
投资1:=EMA(IF(LOW<=VARE1,(VARD1+VARF1*2)/2,0),3)/618*VAR20{XG51};
投B:(REF(投资1,2)<REF(投资1,1)AND 投资1>REF(投资1,1))*投资1,COLOR0033CC,NODRAW{XG51};
投资2:STICKLINE(投B,24,32,3,0),COLOR0033CC{XG51};
低:=REF(LLV(L,90),3){XG51};
低点:=REFDATE(低,DATE){XG51};
投C:低点=L AND ((C-L)>(O-C) OR (O-L)>(C-O)),COLORBLUE,NODRAW{XG51};
STICKLINE(投C,24,32,1.5,0),COLORBLUE{XG51};
投机1:=100*(C-LLV(L,5))/(HHV(C,5)-LLV(L,5)),COLOR0080FF,NODRAW{XG51};
投机2:=100*(C-LLV(L,30))/(HHV(C,30)-LLV(L,30)),COLOR0080FF,NODRAW{XG51};
投机:CROSS(投机1,投机2),COLOR0080FF,NODRAW{XG51};
STICKLINE(CROSS(投机1,投机2),24,32,0.5,1),COLOR0080FF{XG51};
B1:=(HHV(H,9)-C)/(HHV(H,9)-LLV(LOW,9))*100- 70{XG51};
B2:=SMA(B1,9,1)+100{XG51};
B3:=(C-LLV(L,9))/(HHV(H,9)- LLV(L,9))*100{XG51};
B4:=SMA(B3,3,1){XG51};
B5:=SMA(B4,3,1)+100{XG51};
B6:=B5-B2{XG51};
持股:IF(B6>60,B6-60,0),COLORMAGENTA,NODRAW{XG51};
持1:STICKLINE(REF(持股,1)<持股,24,22,4,0),COLORMAGENTA{XG51};
持2:STICKLINE(REF(持股,1)<持股,-24,-22,4,0),COLORMAGENTA{XG51};
B8:=(HHV(H,9)-C)/(HHV(H,9)-LLV(LOW,9))*100-70{XG51};
B9:=SMA(B8,9,1)+100{XG51};
B10:=(C-LLV(L,9))/(HHV(H,9)- LLV(L,9))*100{XG51};
B11:=SMA(B10,3,1){XG51};
B12:=SMA(B11,3,1)+100{XG51};
B13:=B12-B9{XG51};
持币:IF(B13<60,B13-60,0),COLORLIRED,NODRAW{XG51};
持3:STICKLINE(REF(持币,1)>持币,24,22,4,0),COLORLIRED{XG51};
持4:STICKLINE(REF(持币,1)>持币,-24,-22,4,0),COLORLIRED{XG51};
HHJSJDA:=(3*CLOSE+OPEN+LOW+HIGH)/6{XG51};
HHJSJDB:=(20*HHJSJDA+19*REF(HHJSJDA,1)+18*REF(HHJSJDA,2)+17*REF(HHJSJDA,3)+16*REF(HHJSJDA,4)+15*REF(HHJSJDA,5)+14*REF(HHJSJDA,6)
+13*REF(HHJSJDA,7)+12*REF(HHJSJDA,8)+11*REF(HHJSJDA,9)+10*REF(HHJSJDA,10)+9*REF(HHJSJDA,11)+8*REF(HHJSJDA,12)
+7*REF(HHJSJDA,13)+6*REF(HHJSJDA,14)+5*REF(HHJSJDA,15)+4*REF(HHJSJDA,16)+3*REF(HHJSJDA,17)+2*REF(HHJSJDA,18)+
REF(HHJSJDA,20))/210{XG51};
HHJSJDC:=MA(HHJSJDB,5){XG51};
QQ1:=MA(MA(CLOSE,3),3){XG51};
QQ2:=MA(MA(CLOSE,15),9){XG51};
XYSQS1:=(QQ1-REF(QQ1,1))/REF(QQ1,1)*10{XG51};
XYSQS2:=(QQ2-REF(QQ2,1))/REF(QQ2,1)*10{XG51};
XYSHSL:=EMA(VOL/CAPITAL*100,13){XG51};
STICKLINE(XYSQS2>=REF(XYSQS2,1)AND XYSHSL>1,-4,4,3,0),COLORBLUE{XG51};
STICKLINE(XYSQS2>=REF(XYSQS2,1)AND XYSHSL>1 AND C>HHJSJDB AND HHJSJDB>HHJSJDC,-2,2,3,0),COLORYELLOW{XG51};
追涨:IF(XYSQS2>=REF(XYSQS2,1) AND XYSHSL>1,XYSQS1*178,0),COLORLIMAGENTA,LINETHICK2;

TYP := (HIGH + LOW + CLOSE)/3{XG51};
cci:=(TYP-MA(TYP,14))/(0.015*AVEDEV(TYP,14)){XG51};
A:=REF(C,1){XG51};
RSI:=SMA(MAX(C-A,0),6,1)/SMA(ABS(C-A),6,1)*100{XG51};
A1:=(C/MA(C,5)-1)*100<-10{XG51};
A2:=(C/MA(C,13)-1)*100<-10{XG51};
A3:=(C/MA(C,34)-1)*100<-15{XG51};
A4:=RSI<18{XG51};
A5:=CCI<-120{XG51};
A6:=COUNT(ABS(C/REF(C,1)-1)*100>=6,30)>=1{XG51};
底部:=A1 AND A2 AND A3 AND A4 AND A5 AND A6{XG51};
STICKLINE(底部,-24,-32,3,0),COLORRED{X_G~5^1_C_N_{};