这是采用另一种算法的。
LONG (2, 100, 26);
SHORT (1, 40, 12);
M (1, 60, 9);
DIF :(EMA(CLOSE,SHORT) - EMA(CLOSE,LONG)+EMA(OPen,SHORT) - EMA(open,LONG)+EMA(H,SHORT) - EMA(H,LONG)+EMA(L,SHORT) - EMA(L,LONG)+EMA(H-open,SHORT) - EMA(H-open,LONG)+EMA(open-L,SHORT) - EMA(open-l,LONG))*100/6;
DEA :EMA(DIF,M);
MACD := 2*(DIF-DEA);
MACD平均力度:SMA(MAX(MACD-REF(MACD,1),0),M,1)/SMA(ABS(MACD-REF(MACD,1)),M,1)*100-55,COLORSTICK
;
DIF平均力度:SMA(MAX(DiF-REF(DIF,1),0),M,1)/SMA(ABS(DIF-REF(DIF,1)),M,1)*100-38,drawnull
;
DEA平均力度:SMA(MAX(DEA-REF(DEA,1),0),9,1)/SMA(ABS(DEA-REF(DEA,1)),9,1)*100-45,drawnull
;
平均力度差:DIF平均力度-DEA平均力度,drawnull;
AR=SUM(HIGH-OPEN,LONG)/SUM(OPEN-LOW,LONG)*100;
BR=SUM(MAX(0,HIGH-REF(CLOSE,1)),LONG)/
SUM(MAX(0,REF(CLOSE,1)-LOW),LONG)*100;
STICKLINE(MACD平均力度>0 AND DIF平均力度>0 AND MACD平均力度> REF(MACD平均力度,1),0,MACD平均力度,7,0),COLORRED;
STICKLINE(DIF平均力度<0 AND MACD平均力度>0,0,MACD平均力度,7,0),COLORGREEN;
STICKLINE(MACD平均力度>=0 AND MACD平均力度< REF(MACD平均力度,1),0,MACD平均力度,6,1),COLOR6058FF;
STICKLINE(DIF平均力度>0 AND MACD平均力度<0,0,MACD平均力度,7,0),COLORYELLOW;< /p>
STICKLINE(DIF平均力度<0 AND MACD平均力度<0,0,MACD平均力度,7,0),COLORBLUE;
积极:MACD平均力度>0 AND DIF平均力度>0,COLORRED,drawnull;
减仓:DIF平均力度>0 AND MACD平均力度<0,COLORYELLOW,drawnull;< /p>
轻仓:DIF平均力度<0 AND MACD平均力度>0,COLORGREEN,drawnull;
空仓:DIF平均力度<0 AND MACD平均力度<0,COLORBLUE,drawnull;