MACD脉冲幅图公式 源码

TDXSTEP100:0.4,COLORBLUE;
DIF:EMA(CLOSE,12)-EMA(CLOSE,26);
DEA:EMA(DIF,9);
MACD:(DIF-DEA)*2,COLORSTICK;
A1:=1.5*(EXPMEMA(IF(REF(LOW,1)-LOW>0 AND REF(LOW,1)-LOW>HIGH-REF(HIGH,1),REF(LOW,1)-LOW,0),14)*100/EXPMEMA(MAX(MAX(HIGH-LOW,ABS(HIGH-REF(CLOSE,1))),ABS(REF(CLOSE,1)-LOW)),14)+EXPMEMA(IF(HIGH-REF(HIGH,1)>0 AND HIGH-REF(HIGH,1)>REF(LOW,1)-LOW,HIGH-REF(HIGH,1),0),14)*100/EXPMEMA(MAX(MAX(HIGH-LOW,ABS(HIGH-REF(CLOSE,1))),ABS(REF(CLOSE,1)-LOW)),14)-REF(EXPMEMA(IF(REF(LOW,1)-LOW>0 AND REF(LOW,1)-LOW>HIGH-REF(HIGH,1),REF(LOW,1)-LOW,0),14)*100/EXPMEMA(MAX(MAX(HIGH-LOW,ABS(HIGH-REF(CLOSE,1))),ABS(REF(CLOSE,1)-LOW)),14)+EXPMEMA(IF(HIGH-REF(HIGH,1)>0 AND HIGH-REF(HIGH,1)>REF(LOW,1)-LOW,HIGH-REF(HIGH,1),0),14)*100/EXPMEMA(MAX(MAX(HIGH-LOW,ABS(HIGH-REF(CLOSE,1))),ABS(REF(CLOSE,1)-LOW)),14),1))/(EXPMEMA(IF(REF(LOW,1)-LOW>0 AND REF(LOW,1)-LOW>HIGH-REF(HIGH,1),REF(LOW,1)-LOW,0),14)*100/EXPMEMA(MAX(MAX(HIGH-LOW,ABS(HIGH-REF(CLOSE,1))),ABS(REF(CLOSE,1)-LOW)),14)+EXPMEMA(IF(HIGH-REF(HIGH,1)>0 AND HIGH-REF(HIGH,1)>REF(LOW,1)-LOW,HIGH-REF(HIGH,1),0),14)*100/EXPMEMA(MAX(MAX(HIGH-LOW,ABS(HIGH-REF(CLOSE,1))),ABS(REF(CLOSE,1)-LOW)),14));
脉冲:MA(A1*(MA(EXPMEMA(IF(REF(LOW,1)-LOW>0 AND REF(LOW,1)-LOW>HIGH-REF(HIGH,1),REF(LOW,1)-LOW,0),14)*100/EXPMEMA(MAX(MAX(HIGH-LOW,ABS(HIGH-REF(CLOSE,1))),ABS(REF(CLOSE,1)-LOW)),14),1)/(EXPMEMA(IF(HIGH-REF(HIGH,1)>0 AND HIGH-REF(HIGH,1)>REF(LOW,1)-LOW,HIGH-REF(HIGH,1),0),14)*100/EXPMEMA(MAX(MAX(HIGH-LOW,ABS(HIGH-REF(CLOSE,1))),ABS(REF(CLOSE,1)-LOW)),14)))*(EXPMEMA(IF(REF(LOW,1)-LOW>0 AND REF(LOW,1)-LOW>HIGH-REF(HIGH,1),REF(LOW,1)-LOW,0),14)*100/EXPMEMA(MAX(MAX(HIGH-LOW,ABS(HIGH-REF(CLOSE,1))),ABS(REF(CLOSE,1)-LOW)),14)-EXPMEMA(IF(HIGH-REF(HIGH,1)>0 AND HIGH-REF(HIGH,1)>REF(LOW,1)-LOW,HIGH-REF(HIGH,1),0),14)*100/EXPMEMA(MAX(MAX(HIGH-LOW,ABS(HIGH-REF(CLOSE,1))),ABS(REF(CLOSE,1)-LOW)),14))/MA(EXPMEMA(IF(REF(LOW,1)-LOW>0 AND REF(LOW,1)-LOW>HIGH-REF(HIGH,1),REF(LOW,1)-LOW,0),14)*100/EXPMEMA(MAX(MAX(HIGH-LOW,ABS(HIGH-REF(CLOSE,1))),ABS(REF(CLOSE,1)-LOW)),14)-EXPMEMA(IF(HIGH-REF(HIGH,1)>0 AND HIGH-REF(HIGH,1)>REF(LOW,1)-LOW,HIGH-REF(HIGH,1),0),14)*100/EXPMEMA(MAX(MAX(HIGH-LOW,ABS(HIGH-REF(CLOSE,1))),ABS(REF(CLOSE,1)-LOW)),14),1),1)*0.5;