[通达信指标]升级版MACD红星主图公式

M12:=EMA(C+SLOPE(C,12),12),COLORMAGENTA;

M26:=EMA(C+SLOPE(C,26),26),COLORMAGENTA;

DIF:M26+EMA((M12-M26)+SLOPE((M12-M26),9),9),COLORWHITE;

DEA:=EMA(DIF+SLOPE(DIF,9),9);

M60:=EMA(C+SLOPE(C,63),63),COLOR00BB00;

DDA:M60+EMA((M12-M60)+SLOPE((M12-M60),63),63),COLOR7F00FF;

DDE:M60-EMA((M12-M60)+SLOPE((M12-M60),63),63),COLOR00BB00;

BBD:M60+MA((M12-REF(M12,1)+DIF-REF(DIF,1)+M26-REF(M26,1)+DEA-REF(DEA,1)+DDA-REF(DDA,1)+M60-REF(M60,1)+DDE-REF(DDE,1))/7,63),COLOR00CCCC;

OK:=((DIF/DEA+DEA/BBD+DIF/DDA+DDA/BBD+BBD/DDE)/5-1)*100;

DRAWTEXT(CROSS(OK,0),L*0.97,’★’),COLORRED;

MA6:=MA(C,6),COLOR0000FF;

MA18:=MA(C,18),COLOR0096FF;

MA30:=MA(C,30),COLOR00FF99;

MA60:=MA(C,60),COLORFF00FF;

AAF:=LLV(LOW,34),LINETHICK1,COLORFFFFCC;

BBF:=MA(AAF,4),LINETHICK1,COLORYELLOW;

LC:=REF(CLOSE,1); 

RSI:=SMA(MAX(CLOSE-LC,0),4.1,1)/SMA(ABS(CLOSE-LC),4.1,1)*100; 

TTS28:=SMA(MAX(CLOSE-LC,0),5.5,1)/SMA(ABS(CLOSE-LC),6,1)*100;

DRAWTEXT(FILTER(EMA(CLOSE,60)-EMA(CLOSE,12)>0 AND EMA(CLOSE,12)/LOW>1.15,5),LOW,’☆’),COLORFF00FF;

TTSA:=((AMOUNT)/(VOL))/(100);

TTSB:=((3)*(HIGH)+LOW+OPEN+(2)*(CLOSE))/(7);

TTSC:=((SUM(AMOUNT,7))/(TTSA))/(100);

TTSD:=DMA(TTSB,(VOL)/(TTSC));

TTSE:=((CLOSE-TTSD)/(TTSD))*(100);

TTSF:=((CLOSE-LLV(LOW,34))/(HHV(HIGH,34)-LLV(LOW,34)))*(100);

TTSJ:=MA(TTSE,20)+STD(TTSE,20);

BIAS18:=((CLOSE-MA(CLOSE,18))/(MA(CLOSE,18)))*(100);

AA:=SMA(TTSF,3,1);

SS:=(REF(BIAS18,1)>=5) AND CROSS(TTSJ,TTSE) AND (AA>79);

DRAWTEXT((REF(BIAS18,1)>=5) AND CROSS(TTSJ,TTSE) AND (AA>SS) AND CROSS(84,RSI),H*1.01,’☆’),LINETHICK7,COLORYELLOW;

DRAWTEXT(CROSS(84,RSI) AND CROSS(76,TTS28),H*1.01,’☆’),LINETHICK7,COLORYELLOW;

V1:=EMA(CLOSE,60)-EMA(CLOSE,300);

V2:=EMA(V1,300);

V3:=(CLOSE-LLV(LOW,8))/(HHV(HIGH,8)-LLV(LOW,8))*100;

CPX1103:=SMA(V3,2,1),LINETHICK3;

V5:=SMA(CPX1103,2,1);

STICKLINE((REF(BIAS18,1)>=5) AND CROSS(TTSJ,TTSE) AND (AA>SS) AND CROSS(84,RSI) AND CROSS(76,TTS28),C,O,8,0),COLORYELLOW,LINETHICK2;

STICKLINE(CPX1103>REF(CPX1103,1) AND REF(CPX1103,1)<REF(CPX1103,2) AND CPX1103<23 AND V5>REF(V5,1) AND AAF=BBF AND MA18<REF(MA18,1),C,O,8,0),COLORMAGENTA,LINETHICK2;

STICKLINE(CPX1103>REF(CPX1103,1)  AND CROSS(CPX1103,V5) AND V5<50 AND (AAF=BBF OR AAF>BBF) AND MA18<REF(MA18,1),C,O,8,0),COLORMAGENTA,LINETHICK2;

STICKLINE(CPX1103>REF(CPX1103,1)  AND CROSS(CPX1103,V5) AND V5<50  AND MA18>REF(MA18,1),C,O,8,0),COLORMAGENTA,LINETHICK2;