通达信MACD精品未加密选股指标公式源码

源码正文：

dif:ema(CLOSE,13)-Ema(CLOSE,21){XG51};
DEA:EMA(DIF,2){XG51};
CD:(DIF-DEA)*7,COLORWHITE,LINETHICK2{XG51};
DRAWBAND(DIF,RGB(255,50,0),DEA,RGB(0,255,50)){XG51};
界: 0,COLORFFFF00,LINETHICK1{XG51};
DRAWTEXT(ISLAstBAR AND DIF>REF(DIF,1),DIF,' ↑趋势'),COLORFFFFFF{XG51};
DRAWTEXT(ISLASTBAR AND DIF<REF(DIF,1),DIF,' ↓趋势'),COLORFFFFFF{XG51};
DRAWTEXT(ISLASTBAR AND CD>REF(CD,1),CD,' ↑柱'),COLOR0000FF{XG51};
DRAWTEXT(ISLASTBAR AND CD<REF(CD,1),CD,' ↓柱'),COLOR00FF00{XG51};
STICKLINE((CD > 0),0,CD,1,0),COLOR0000CC{XG51};
STICKLINE((CD > 0),0,CD*0.9,1,0),COLOR0000EE{XG51};
STICKLINE((CD > 0),0,CD*0.8,1,0),COLOR0011FF{XG51};
STICKLINE((CD > 0),0,CD*0.7,1,0),COLOR0033FF{XG51};
STICKLINE((CD > 0),0,CD*0.6,1,0),COLOR0055FF{XG51};
STICKLINE((CD > 0),0,CD*0.5,1,0),COLOR0077FF{XG51};
STICKLINE((CD > 0),0,CD*0.4,1,0),COLOR0099FF{XG51};
STICKLINE((CD > 0),0,CD*0.3,1,0),COLOR00BBFF{XG51};
STICKLINE((CD > 0),0,CD*0.2,1,0),COLOR00ddfF{XG51};
STICKLINE((CD > 0),0,CD*0.1,1,0),COLOR00FFFF{XG51};
STICKLINE((CD < 0),0,CD,1,0),COLORCC0033{XG51};
STICKLINE((CD < 0),0,CD*0.9,1,0),COLOREE0033{XG51};
STICKLINE((CD < 0),0,CD*0.8,1,0),COLORFF1133{XG51};
STICKLINE((CD < 0),0,CD*0.7,1,0),COLORFF3333{XG51};
STICKLINE((CD < 0),0,CD*0.6,1,0),COLORFF5533{XG51};
STICKLINE((CD < 0),0,CD*0.5,1,0),COLORFF7733{XG51};
STICKLINE((CD < 0),0,CD*0.4,1,0),COLORFF9933{XG51};
STICKLINE((CD < 0),0,CD*0.3,1,0),COLORFFBB33{XG51};
STICKLINE((CD < 0),0,CD*0.2,1,0),COLORFFDD33{XG51};
STICKLINE((CD < 0),0,CD*0.1,1,0),COLORFFFF33{XG51};
DI:=EMA(C,12)-EMA(C,26){XG51};
DE:=EMA(DI,9){XG51};
DRAWICON(crOSS(DI,DE),DIF,17){XG51};
RSV:=(C-LLV(L,9))/(HHV(H,9)-LLV(L,9))*100{XG51};
K:=SMA(RSV,3,1){XG51};
D:=SMA(K,3,1){XG51};
DRAWICON(CROSS(K,D) AND K>20 AND D<50,CD,23){XG51};
DRAWTEXT(CROSS(K,D) AND K>20 AND D<50,CD,' kd金叉'),COLORFFFFFF{XG51};
RR2:=(3,15,1)<10{XG51};
RR3:=(3,15,1)<10{XG51};
RR4:=IF(RR2=1,50,0){XG51};
RR5:=IF(RR3=1,50,0){XG51};
底部:=IF(RR4=50,10,0){XG51};
DRAWICON(底部=10 AND REF(底部,1)=10 AND REF(底部,2)=0,0,9){XG51};
R1:=(C>REF(C,1) AND C>REF(C,2)){XG51};
R2:=(REF(R1,1) AND C<=REF(C,1) AND C>=REF(C,2)){XG51};
R3:=(REF(R2,1) AND C>=REF(C,1) AND C<=REF(C,2)){XG51};
R4:=(REF(R3,1) AND C<=REF(C,1) AND C>=REF(C,2)){XG51};
R5:=(REF(R4,1) AND C>=REF(C,1) AND C<=REF(C,2)){XG51};
R6:=(REF(R5,1) AND C<=REF(C,1) AND C>=REF(C,2)){XG51};
R7:=(REF(R6,1) AND C>=REF(C,1) AND C<=REF(C,2)){XG51};
R8:=(REF(R7,1) AND C<=REF(C,1) AND C>=REF(C,2)){XG51};
R9:=(REF(R8,1) AND C>=REF(C,1) AND C<=REF(C,2)){XG51};
RA:=(REF(R9,1) AND C<=REF(C,1) AND C>=REF(C,2)){XG51};
RB:=(REF(RA,1) AND C>=REF(C,1) AND C<=REF(C,2)){XG51};
RC:=(REF(RB,1) AND C<=REF(C,1) AND C>=REF(C,2)){XG51};
RD:=(C<REF(C,1) AND C<REF(C,2)){XG51};
RE:=(REF(RD,1) AND C>=REF(C,1) AND C<=REF(C,2)){XG51};
RF:=(REF(RE,1) AND C<=REF(C,1) AND C>=REF(C,2)){XG51};
R10:=(REF(RF,1) AND C>=REF(C,1) AND C<=REF(C,2)){XG51};
R11:=(REF(R10,1) AND C<=REF(C,1) AND C>=REF(C,2)){XG51};
R12:=(REF(R11,1) AND C>=REF(C,1) AND C<=REF(C,2)){XG51};
R13:=(REF(R12,1) AND C<=REF(C,1) AND C>=REF(C,2)){XG51};
R14:=(REF(R13,1) AND C>=REF(C,1) AND C<=REF(C,2)){XG51};
R15:=(REF(R14,1) AND C<=REF(C,1) AND C>=REF(C,2)){XG51};
R16:=(REF(R15,1) AND C>=REF(C,1) AND C<=REF(C,2)){XG51};
R17:=(REF(R16,1) AND C<=REF(C,1) AND C>=REF(C,2)){XG51};
R18:=(REF(R17,1) AND C>=REF(C,1) AND C<=REF(C,2)){XG51};
R19:=REF(RD OR RE OR RF OR R10 OR R11 OR R12 OR R13 OR R14 OR R15 OR R16 OR R17 OR R18,1) AND R1{XG51};
R1A:=((REF(R1 OR R2 OR R3 OR R4 OR R5 OR R6 OR R7 OR R8 OR R9 OR RA OR RB OR RC,1)) AND RD){XG51};
DRAWICON(R1A,DIF,15){XG51};
DRAWICON(R19,CD,1){X.G_5+1.C.N.{};

源码正文：

N:=30{XG51};
VAR1:=HHV(HIGH,9)-LLV(LOW,9){XG51};
VAR2:=HHV(HIGH,9)-CLOSE{XG51};
VAR3:=CLOSE-LLV(LOW,9){XG51};
VAR4:=VAR2/VAR1*100-70{XG51};
VAR5:=(CLOSE-LLV(LOW,60))/(HHV(HIGH,60)-LLV(LOW,60))*100{XG51};
VAR6:=(2*CLOSE+HIGH+LOW)/4{XG51};
VAR7:=SMA(VAR3/VAR1*100,3,1){XG51};
VAR8:=LLV(LOW,34){XG51};
VAR9:=Sma(VAR7,3,1)-SMA(VAR4,9,1){XG51};
VARA:=IF(VAR9>100,VAR9-100,0){XG51};
VARB:=HHV(HIGH,34){XG51};
AA:= VARA*2{XG51};
BB:= ema((VAR6-VAR8)/(VARB-VAR8)*100,13){XG51};
VARC:=EMA(0.667*REF(BB,1)+0.333*BB,2){XG51};
CC:= SMA(VAR5,20,1){XG51};
VARD:=SMA(AA,2,1)-AA{XG51};
VARE:=EMA(0.667*REF(BB,1)+0.333*BB,2)-BB{XG51};
VAR1A:=(HHV(HIGH,9)-CLOSE)/(HHV(HIGH,9)-LLV(LOW,9))*100-70{XG51};
VAR2A:=SMA(VAR1A,9,1)+100{XG51};
VAR3A:=(CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9))*100{XG51};
VAR4A:=SMA(VAR3A,3,1){XG51};
VAR5A:=SMA(VAR4A,3,1)+100{XG51};
VAR6A:=VAR5A-VAR2A{XG51};
准备抄底: IF(VAR6A>N,VAR6A-N,0),COLORFFFFFF{XG51};
LC:=REF(CLOSE,1){XG51};
rsi:=SMA(MAX(CLOSE-LC,0),6,1)/SMA(Abs(CLOSE-LC),6,1)*100{XG51};
E:=crOSS(83,RSI){XG51};
stICKLINE( E,E,55,1,0),COLOR00FFFF{XG51};
DRAWTEXT(E,50,' 逃顶'),COLORFF9966{XG51};
STICKLINE(REF(准备抄底,1)<准备抄底,准备抄底,REF(准备抄底,1),5,0),COLORFF00FF{XG51};
STICKLINE(REF(准备抄底,1)>准备抄底,准备抄底,REF(准备抄底,1),5,0),COLORFFCC66{X-G_5*1-C-N-{};