[通达信指标]一主一副 黄金轨道 MACD买卖信号

N:=11;

M1:=10;

M2:=9;

XA1:=1;

CPX:(1+M1/100)*MA(CLOSE,N);

CPXMA:(1-M2/100)*MA(CLOSE,N)*XA1;

ENE:(CPX+CPXMA)/2;

DRAWKLINE(HIGH,OPEN,LOW,CLOSE);

DRAWBMP(CROSS(LOW,CPXMA)*XA1,LOW*0.98,2);

XTTS11:=EMA(CLOSE,13)-EMA(CLOSE,55);

XTTS12:=EMA(0.618*REF(XTTS11,1)+0.382*XTTS11,3);

STICKLINE(XTTS11>=XTTS12,HIGH,LOW,0,0),COLORYELLOW;

STICKLINE(XTTS11>=XTTS12,OPEN,CLOSE,(-1),0),COLOR0099DD;

STICKLINE(XTTS11>=XTTS12,OPEN,CLOSE,2,0),COLOR00ABEE;

STICKLINE(XTTS11>=XTTS12,OPEN,CLOSE,1,0),COLOR00DDFF;

STICKLINE(XTTS11>=XTTS12,OPEN,CLOSE,0.1,0),COLORYELLOW;

STICKLINE(XTTS11<XTTS12,HIGH,LOW,0,0),COLORGREEN;

STICKLINE(XTTS11<XTTS12,OPEN,CLOSE,(-1),0),COLOR009900;

STICKLINE(XTTS11<XTTS12,OPEN,CLOSE,2,0),COLOR00AB00;

STICKLINE(XTTS11<XTTS12,OPEN,CLOSE,1,0),COLOR00DD00;

STICKLINE(XTTS11<XTTS12,OPEN,CLOSE,0.1,0),COLORGREEN;

TTS11:=REF(CLOSE,1);

TTS12:=EMA(HHV(HIGH,1),8);

TTS13:=EMA(CLOSE,8);

TTS14:=TTS13<REF(TTS13,1) AND CLOSE<TTS13;

TTS15:=IF(TTS12<REF(TTS12,1) OR TTS14,1,0);

TTS16:=SMA(MAX(CLOSE-TTS11,0),2,1)/SMA(ABS(CLOSE-TTS11),2,1)*100;

TTS17:=45;

TTS18:=20;

TTS19:=TTS16<TTS17 AND REF(TTS16,1)>TTS17;

TTS110:=TTS16<TTS18 AND REF(TTS16,1)>TTS18;

XG:=(COUNT(TTS15=1,4)=3 AND TTS15=0 AND OPEN<CLOSE AND (CLOSE-REF(CLOSE,1))/REF(CLOSE,1)>0.065)*10>=10 OR ((CLOSE-REF(CLOSE,1))/REF(CLOSE,1)>0.065 AND (REF(TTS110,1) OR REF(TTS19,1))),COLORYELLOW;

DRAWICON(XG,L,29);

STICKLINE(XG,L,L+(H-L)/2,2.7,0),COLORLIRED;

STICKLINE(XG,L+(H-L)/2,H,2.7,0),COLORMAGENTA;

DEA:=EMA(DIFF,9);

MACD:=2*(DIFF-DEA);

QZQ:=BARSLAST(REF(MACD,1)<0 AND MACD>0);

MACDJINCT:=REF(QZQ,1);

LLL1:=L=LLV(L,QZQ+10);

LLL2:=COUNT(LLL1,7)>0;

LLL3:=LLV(DIFF,QZQ-2)>LLV(DIFF,QZQ+10);

LLL4:=REF(LLL3,1);

LLL5:=LLL2 AND LLL4 AND CROSS(DIFF,DEA) AND COUNT(CROSS(DEA,DIFF),5)<2,COLORRED;

底背离:IF(LLL5,0.5,0),COLORRED,LINETHICK2;

EJ:=REF(COUNT(LLL5,QZQ+1)=1,1) AND CROSS(DIFF,DEA) AND DIFF<0;

黄金叉:IF(EJ,0.7,0),COLORMAGENTA,LINETHICK2;

QSC:=BARSLAST(REF(MACD,1)>0 AND MACD<0);

MACDSHICHAT:=REF(QSC,1);

HHH1:=H=HHV(H,QSC+10);

HHH2:=COUNT(HHH1,7)>0;

HHH3:=HHV(DIFF,QSC-2)<HHV(DIFF,QSC+10);

HHH4:=REF(HHH3,1);

HHH5:=HHH2 AND HHH4 AND CROSS(DEA ,DIFF) AND COUNT(CROSS(DIFF,DEA),5)<2,LINESTICK;

顶背离:IF(HHH5,0.5,0),COLORYELLOW,LINETHICK2;

DRAWTEXT(HHH5,0.4,’顶背离’),COLORLIBLUE;

DRAWTEXT(LLL5,0.4,’底背离’),COLORMAGENTA;

DRAWTEXT(EJ,0.6,’黄金叉’),COLORMAGENTA;