DIFF:(EMA(CLOSE,P)/EMA(CLOSE,P1)-1)*100;
DEA:EMA(DIFF,9);
MACD:2*(DIFF-DEA),COLORSTICK;
PJ1:=SUM(IF(MACD<0,MACD,0),BARSLAST(MACD>0))/BARSLAST(MACD>0);
PJ2:=SUM(IF(MACD>0,MACD,0),BARSLAST(MACD<0))/BARSLAST(MACD<0);
PJMACD:IFELSE(PJ2>0,PJ2,PJ1),COLORCYAN;
PMJ1:=SUM(IFELSE(MACD<0,MACD,0),BARSLAST(MACD>0))/10;
PMJ2:=SUM(IFELSE(MACD>0,MACD,0),BARSLAST(MACD<0))/10;
ZMACD:IFELSE(MACD>0,PMJ2,PMJ1);
HXS:=CROSS(DEA,DIFF);
LXS:=CROSS(DIFF,DEA);
DRAWNUMBER(HXS,MACD,REF(ZMACD,1)*10,2,COLORMAGENTA);
DRAWNUMBER(LXS,MACD,REF(ZMACD,1)*10,2,COLORCYAN);
STICKLINE(MACD>=0 AND MACD>REF(MACD, 1), 0, MACD,COLORWHITE, 0);
STICKLINE(MACD>=0 AND MACD<=REF(MACD, 1), 0, MACD, COLORRED, 0);
STICKLINE(MACD<0 AND MACD<REF(MACD, 1), 0, MACD,COLORMAGENTA, 0);
STICKLINE(MACD<0 AND MACD>=REF(MACD, 1), 0, MACD,COLORGREEN, 0);
PARTLINE(ZMACD>0,ZMACD,COLORGREEN);
PARTLINE(ZMACD<0,ZMACD,COLORRED);
DRAWNUMBER(ISLASTBAR AND MACD>0,MACD*-1,ZMACD*10,2,COLORRED);
DRAWNUMBER(ISLASTBAR AND MACD<=0,MACD*-1,ZMACD*10,2,COLORGREEN);
模型僅供參考
論壇是我們溝通的平臺(tái) 目前暫無(wú)QQ溝通的服務(wù) 很抱歉。
您在WH6中使用如下模型
DIFF:(EMA(CLOSE,P)/EMA(CLOSE,P1)-1)*100;
DEA:EMA(DIFF,9);
MACD:2*(DIFF-DEA),COLORSTICK;
PJ1:=SUM(IFELSE(MACD<0,MACD,0),BARSLAST(MACD>0))/BARSLAST(MACD>0);
PJ2:=SUM(IFELSE(MACD>0,MACD,0),BARSLAST(MACD<0))/BARSLAST(MACD<0);
PJMACD:IFELSE(PJ2>0,PJ2,PJ1),COLORCYAN;
PMJ1:=SUM(IFELSE(MACD<0,MACD,0),BARSLAST(MACD>0))/10;
PMJ2:=SUM(IFELSE(MACD>0,MACD,0),BARSLAST(MACD<0))/10;
ZMACD:IFELSE(MACD>0,PMJ2,PMJ1);
HXS:=CROSS(DEA,DIFF);
LXS:=CROSS(DIFF,DEA);
DRAWNUMBER(HXS,MACD,REF(ZMACD,1)*10,2,COLORMAGENTA);
DRAWNUMBER(LXS,MACD,REF(ZMACD,1)*10,2,COLORCYAN);
STICKLINE(MACD>=0 AND MACD>REF(MACD, 1), 0, MACD,COLORWHITE, 0);
STICKLINE(MACD>=0 AND MACD<=REF(MACD, 1), 0, MACD, COLORRED, 0);
STICKLINE(MACD<0 AND MACD<REF(MACD, 1), 0, MACD,COLORMAGENTA, 0);
STICKLINE(MACD<0 AND MACD>=REF(MACD, 1), 0, MACD,COLORGREEN, 0);
PARTLINE(ZMACD>0,ZMACD,COLORGREEN);
PARTLINE(ZMACD<0,ZMACD,COLORRED);
DRAWNUMBER(ISLASTBAR AND MACD>0,MACD*-1,ZMACD*10,2,COLORRED);
DRAWNUMBER(ISLASTBAR AND MACD<=0,MACD*-1,ZMACD*10,2,COLORGREEN);
寫(xiě)入?yún)?shù) 如下圖