通达信潜伏黄金坑指标公式和通达信MACD精髓指标公式源码

通达信潜伏黄金坑指标公式

N:=14;

M:=6;

NC:=14;

MTR:=SUM(MAX(MAX(HIGH-LOW,ABS(HIGH-REF(CLOSE,1))),ABS(REF(CLOSE,1)-LOW)),N);

HD :=HIGH-REF(HIGH,1);

LD :=REF(LOW,1)-LOW;

DMP:=SUM(IF(HD>0&&HD>LD,HD,0),N);

DMM:=SUM(IF(LD>0&&LD>HD,LD,0),N);

PDI: DMP*100/MTR;

MDI: DMM*100/MTR;

ADX: MA(ABS(MDI-PDI)/(MDI+PDI)*100,M);

ADXR:(ADX+REF(ADX,M))/2;

看多线:20,DOTLINE,COLORRED;

MA5:=MA(C,5);MA10:=MA(C,10);MA20:=MA(C,20);MA30:=MA(C,30);MA60:=MA(C,60);

MAX1:=MAX(MA5,MA10);

MAX2:=MAX(MAX1,MA20);

MAX3:=MAX(MAX2,MA30);

MAXH:=MAX(MAX3,MA60);

MIN1B:=MIN(MA5,MA10);

MIN2:=MIN(MIN1B,MA20);

MIN3:=MIN(MIN2,MA30);

MINL:=MIN(MIN3,MA60);

粘合度:=(MAXH-MINL)/MINL*100;

多头发散:=MA5>REF(MA5,1) AND MA5>MA10 AND MA10>=REF(MA10,1) AND MA10>MA20 AND MA20>=REF(MA20,1) AND MA20>MA30 AND MA30>=REF(MA30,1) AND MA30>MA60 AND MA60>=REF(MA60,1);

选股:BARSLASTCOUNT(粘合度<=5)=2 AND 多头发散;

DRAWTEXT(CROSS(PDI,MDI) AND EXIST(粘合度<=8,5) AND MA(C,20)-REF(MA(C,20),1)>REF(MA(C,20),1)-REF(MA(C,20),2)

AND MA(C,5)>REF(MA(C,5),1) AND MA(C,10)>REF(MA(C,10),1),38,'多'),COLORRED;

DRAWTEXT(CROSS(PDI,MDI) AND EXIST(粘合度<=8,5) AND MA(C,20)-REF(MA(C,20),1)>REF(MA(C,20),1)-REF(MA(C,20),2)

AND MA(C,5)>REF(MA(C,5),1) AND MA(C,10)>REF(MA(C,10),1),48,'看'),COLORRED;

DRAWTEXT(CROSS(MDI,PDI),38,'看'),COLORGREEN;

DRAWTEXT(CROSS(MDI,PDI),26,'空'),COLORGREEN;

DRAWTEXT(CROSS(PDI,MDI) AND ADX>20 AND ADXR>20 AND MA(C,10)>REF(MA(C,10),1)

,28,'主'),COLORRED;

DRAWTEXT(CROSS(PDI,MDI) AND ADX>20 AND ADXR>20 AND MA(C,10)>REF(MA(C,10),1)

,18,'升'),COLORRED;

DRAWTEXT(CROSS(PDI,ADX) AND CROSS(PDI,ADXR) AND MDIREF(ADX,1) AND ADXR>REF(ADXR,1)

AND ATAN((PDI/REF(PDI,1)-1)*100)*180/3.1416>60 AND

ATAN(((2*REF(MDI,1)-MDI)/REF(MDI,1)-1)*100)*180/3.1416>45,58,'走'),COLORRED;

DRAWTEXT(CROSS(PDI,ADX) AND CROSS(PDI,ADXR) AND MDIREF(ADX,1) AND ADXR>REF(ADXR,1)

AND ATAN((PDI/REF(PDI,1)-1)*100)*180/3.1416>60 AND

ATAN(((2*REF(MDI,1)-MDI)/REF(MDI,1)-1)*100)*180/3.1416>45,48,'牛'),COLORRED;

升1:=CROSS(ADXR,20) AND ATAN((ADXR/REF(ADXR,1)-1)*100)*180/3.1416>60;

升2:=CROSS(ADX,20) AND ATAN((ADX/REF(ADX,1)-1)*100)*180/3.1416>60;

升3:=CROSS(PDI,20) AND ATAN((PDI/REF(PDI,1)-1)*100)*180/3.1416>60;

升4:=CROSS(20,MDI) AND ATAN(((2*REF(MDI,1)-MDI)/REF(MDI,1)-1)*100)*180/3.1416>45;

反降:=MDI45;

升:=升1 OR 升2 OR 升3 OR 升4;

DRAWTEXT(升 AND 反降 AND ADX>20 AND ADXR>20 AND PDI>20 AND ADX>REF(ADX,1) AND PDI>=REF(PDI,1) AND MA(C,5)>REF(MA(C,5),1),46,'升'),COLORRED;

DRAWTEXT(升 AND 反降 AND ADX>20 AND ADXR>20 AND PDI>20 AND ADX>REF(ADX,1) AND PDI>=REF(PDI,1) AND MA(C,5)>REF(MA(C,5),1),36,'势'),COLORRED;

DRAWTEXT(ADXREF(MDI,1)

AND MA(C,5)

DRAWICON(CROSS(PDI,MDI),PDI,1);

DRAWICON(CROSS(MDI,PDI),MDI,2);

DRAWTEXT(CROSS(PDI,ADXR) AND ATAN((PDI/REF(PDI,1)-1)*100)*180/3.1416>60 AND MDI<=REF(MDI,1) AND MA(C,5)>REF(MA(C,5),1) AND PDI>MDI,22,'短'),COLORRED;

DRAWTEXT(CROSS(PDI,ADXR) AND ATAN((PDI/REF(PDI,1)-1)*100)*180/3.1416>60 AND MDI<=REF(MDI,1) AND MA(C,5)>REF(MA(C,5),1) AND PDI>MDI,18,'升'),COLORRED;

{黄金坑}

RR1:=MA(CLOSE,27);

RR2:=(CLOSE-RR1)/RR1*100;

RRA:=MA(RR2,2);

RRB:=BARSLAST(CROSS(-10,RRA)=1);

RRD:=RRA<-10 AND RRB>3;

黄金坑:=IF(RRD,-120,0);

{CCI}

TYP:=(HIGH+LOW+CLOSE)/3;

CCI:=(TYP-MA(TYP,NC))/(0.015*AVEDEV(TYP,NC));

DRAWTEXT(CROSS(CCI,0),66,'上'),COLORRED;

DRAWTEXT(CROSS(0,CCI),66,'下'),COLORGREEN;

DRAWTEXT(CROSS(CCI,100),56,'突'),COLORRED;

DRAWTEXT(CROSS(100,CCI),56,'落'),COLORGREEN;

DRAWTEXT(CROSS(100,CCI) AND MA(C,20)>REF(MA(C,20),1),60,'暂'),COLORGREEN;

叉1:=CROSS(ADX,0) AND ATAN((ADX/REF(ADX,1)-1)*100)*180/3.1416>60;

叉2:=CROSS(ADXR,0) AND ATAN((ADXR/REF(ADXR,1)-1)*100)*180/3.1416>60;

叉3:=CROSS(20,PDI) AND ATAN(((2*REF(PDI,1)-PDI)/REF(PDI,1)-1)*100)*180/3.1416>45;

叉4:=CROSS(MDI,20) AND ATAN((MDI/REF(MDI,1)-1)*100)*180/3.1416>45;

叉:=叉1 OR 叉2 OR 叉3 OR 叉4;

逆势:=MDI>REF(MDI,1) AND ATAN((MDI/REF(MDI,1)-1)*100)*180/3.1416>45 AND MDI>20;

DRAWTEXT(叉 AND 逆势 AND PDI<20 AND MDI>20 AND ADX>20 AND ADXR>20,54,'跌'),COLORGREEN;

DRAWTEXT(叉 AND 逆势 AND PDI<20 AND MDI>20 AND ADX>20 AND ADXR>20,50,'势'),COLORGREEN;

跌角1:=ATAN((ADXR/REF(ADXR,1)-1)*100)*180/3.1416>60 AND ATAN((ADXR/REF(ADXR,1)-1)*100)*180/3.1416>60

AND ATAN((MDI/REF(MDI,1)-1)*100)*180/3.1416>60 AND ADXR>20 AND ADX>20 AND MDI>20 AND MDI>REF(MDI,1);

DRAWTEXT(跌角1 AND ATAN(((2*REF(PDI,1)-PDI)/REF(PDI,1)-1)*100)*180/3.1416>45 AND MA(C,10)

DRAWTEXT(跌角1 AND ATAN(((2*REF(PDI,1)-PDI)/REF(PDI,1)-1)*100)*180/3.1416>45 AND MA(C,10)

潜伏:=CROSS(PDI,MDI) AND MA(C,5)>REF(MA(C,5),1) AND MA(C,10)>REF(MA(C,10),1) AND

MA(C,20)-REF(MA(C,20),1)>REF(MA(C,20),1)-REF(MA(C,20),2) AND EXIST(粘合度<=8,5);

潜伏2:=CROSS(PDI,MDI) AND MA(C,5)>REF(MA(C,5),1) AND MA(C,10)>REF(MA(C,10),1) AND

MA(C,20)-REF(MA(C,20),1)>REF(MA(C,20),1)-REF(MA(C,20),2) AND EXIST(粘合度<=8,5) AND EXIST(黄金坑,10);

DRAWTEXT(潜伏,14,'潜'),COLORYELLOW;

DRAWTEXT(潜伏,10,'伏'),COLORYELLOW;

DRAWTEXT(潜伏2,6,'潜'),COLORRED;

DRAWTEXT(潜伏2,2,'伏'),COLORRED;

通达信MACD精髓指标公式

DIFF:EMA(C,10)-EMA(C,25);

DEA:EMA(DIFF,10),COLORFFFF00;

MACD:(DIFF-DEA)*2,COLORSTICK;

M60:MA(DEA,5),COLORGREEN;

DRAWBAND(DIFF,RGB(255,0,0),M60,RGB(0,0,255));

DRAWBAND(DEA,RGB(255,0,0),M60,RGB(0,0,255));

DIF1:=EMA(C,12)-EMA(C,26);

DEA1:=EMA(DIF1,9);

AAA1:=(DIF1-DEA1)*25,COLORMAGENTA;

XP1:=0.03;

XP2:=AAA1-REF(AAA1,1);

WC:=REF(C,1),NODRAW;

WC1:=REF(C,2),NODRAW;

寻底:=WC=WC,NODRAW;

小荷:=C>O,NODRAW;

MCD3:=MA(MACD,5),COLORWHITE;

M5:MA(MCD3,5),COLORYELLOW;

MCD5:=MA(MACD,5),COLORYELLOW;

M10:MA(MCD5,10),COLORCC66FF;

XG:=寻底 AND 小荷 AND (CROSS(XP2,XP1));

爆:=(CROSS(XP2,XP1)) AND C>MA(C,60) AND V>REF(V,1)*1.75;

DRAWICON(XG OR 爆,0,1);

DRAWTEXT(XG OR 爆,0.02,' 爆'),COLORRED;