九毛八公式指标
我想将MACD的参数按照SHORT 5 ， LONG 26 ，MID 50，修改。请哪位帮忙！！！！ 源码： W:=1; M:=1; MM:=9*M; SHORT:=MM*4/3; LONG:=MM*26/9; DIFF:=(EMA(CLOSE,SHORT)-EMA(CLOSE,LONG)); DEA:=EMA(DIFF,MM),COLOR58FF58; MACD:=2*(DIFF-DEA),COLORFFFF00,LINETHICK0; 红柱:DRAWBAND(MACD,RGB(180,50,50),0,RGB(0,128,0)); 绿柱:DRAWBAND(0,RGB(0,128,0),MACD,RGB(180,50,50)); AMACD:=ABS(MACD); {STICKLINE(MACD>=0 AND MACD>=REF(MACD,1),0,MACD,W,1),COLOR6058FF; STICKLINE(MACD>=0 AND MACD< REF(MACD,1),0,MACD,W,0),COLOR6058FF; STICKLINE(MACD<0 AND MACD>=REF(MACD,1),0,MACD,W,1),COLORFFFF00; STICKLINE(MACD<0 AND MACD< REF(MACD,1),0,MACD,W,0),COLORFFFF00;} 红柱面积 := IF (MACD>0,SUM(AMACD,BARSLAST(MACD<0)),0),LINETHICK0,COLORRED; 绿柱面积 := IF (MACD<0,SUM(AMACD,BARSLAST(MACD>0)),0),LINETHICK0,COLORBLUE; BV:=SUM(MACD,0); 红转绿:=CROSS(MACD,0); 绿转红:=CROSS(0,MACD); BC:=BARSLAST(红转绿 OR 绿转红)+1; 最高红柱子:IF(MACD>0,HHV(MACD,BC),0),NODRAW; 最低绿柱子:IF(MACD<0,LLV(MACD,BC),0),NODRAW; DRAWTEXT(绿转红 ,REF(最高红柱子,1),''+REF(INTPART((红柱面积)*10)/10,1)),COLORRED; DRAWTEXT(红转绿 ,REF(最低绿柱子,1),''+REF(INTPART((绿柱面积)*10)/10,1)),COLORRED; CDIFF:DIFF;CDEA:DEA;
公式模块：
W:=1;
M:=1; DIFF:=(EMA(CLOSE,5)-EMA(CLOSE,26)); DEA:=EMA(DIFF,50),COLOR58FF58; macd:=2*(DIFF-DEA),COLORFFFF00,LINETHICK0; 红柱:DRAWBAND(MacD,RGB(180,50,50),0,RGB(0,128,0)); 绿柱:DRAWBAND(0,RGB(0,128,0),MACD,RGB(180,50,50)); AMACD:=ABS(MACD); {STICKLINE(MACD>=0 AND MACD>=REF(MACD,1),0,MACD,W,1),COLOR6058FF; STICKLINE(MACD>=0 AND MACD< REF(MACD,1),0,MACD,W,0),COLOR6058FF; STICKLINE(MACD<0 AND MACD>=REF(MACD,1),0,MACD,W,1),COLORFFFF00; STICKLINE(MACD<0 AND MACD< REF(MACD,1),0,MACD,W,0),COLORFFFF00;} 红柱面积 := IF (MACD>0,SUM(AMACD,BArslAST(MACD<0)),0),LINETHICK0,COLORRED; 绿柱面积 := IF (MACD<0,SUM(AMACD,BARSLAST(MACD>0)),0),LINETHICK0,COLORBLUE; BV:=SUM(MACD,0); 红转绿:=crOSS(MACD,0); 绿转红:=CROSS(0,MACD); BC:=BARSLAST(红转绿 OR 绿转红)+1; 最高红柱子:IF(MACD>0,HHV(MACD,BC),0),NODRAW; 最低绿柱子:IF(MACD<0,LLV(MACD,BC),0),NODRAW; DRAWTEXT(绿转红 ,REF(最高红柱子,1),''+REF(INTPART((红柱面积)*10)/10,1)),COLORRED; DRAWTEXT(红转绿 ,REF(最低绿柱子,1),''+REF(INTPART((绿柱面积)*10)/10,1)),COLORRED; CDIFF:DIFF;CDEA:DEA;
