求大神改错——副图公式，10学分奉上
论坛看到的一个公式，装通达信时显示错误，求大神根据原意修改成正确的。DIF1:=EMA(CLOSE,12)-EMA(CLOSE,26);DEA1:=EMA(DIF1,9);MACD1:=2*(DIF1-DEA1),STICK;MACD2:=EMA(MACD1,3);STICKLINE(MACD1>MACD2AND MACD1>0,0,MACD1,1,0),COLORRED;STICKLINE(MACD1>MACD2 ANDMACD1<0,0,MACD1,1,0),COLORGREEN;STICKLINE(MACD1<MACD2,0,MACD1,1,0),COLORCBCBC0;STICKLINE(MACD1>=0ORMACD1<=0,0,0,50,1),COLORWHITE;DIF:DIF1,COLOR33FF33;DEA:DEA1,COLORYELLOW;MACD:MACD1,NODRAW,COLORMAGENTA;RSV:=(CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9))*100;K:=SMA(RSV,3,1),COLORWHITE;D:=SMA(K,3,1),COLORYELLOW;J:=3*K-2*D,COLORFF00FF;MM:=IF(MACD<0,MACD,0); JJ:=MM> REF(MM,1); ZZ:=REF(JJ,1)=1; 准备:=(JJ AND ZZ)*DEA;JH:=HHV(MAX(K,MAX(D,J)),250);DH:=HHV(MAX(DIF,DEA),250);SH:=INTPART(JH/DH)/2;DIFF50:=SH*DIF+50,COLORFFFF00;DEA50:=SH*DEA+50,COLORBLUE;{萃富网-股票公式网站 WWW.CUIV.COM}缩头:=IF(1.5*(DIFF50-DEA50)>0 ANDREF(1.5*(DIFF50-DEA50),1)>REF(1.5*(DIFF50-DEA50),2) AND1.5*(DIFF50-DEA50)< REF(1.5*(DIFF50-DEA50),1),1,0);缩脚:=IF(1.5*(DIFF50-DEA50)<0 ANDREF(1.5*(DIFF50-DEA50),1)< REF(1.5*(DIFF50-DEA50),2) AND1.5*(DIFF50-DEA50)>REF(1.5*(DIFF50-DEA50),1),1,0);杀多:=IF(1.5*(DIFF50-DEA50)<0 ANDREF(1.5*(DIFF50-DEA50),1)> REF(1.5*(DIFF50-DEA50),2) AND1.5*(DIFF50-DEA50)<REF(1.5*(DIFF50-DEA50),1),1,0);诱空:=IF(1.5*(DIFF50-DEA50)>0 ANDREF(1.5*(DIFF50-DEA50),1)< REF(1.5*(DIFF50-DEA50),2) AND1.5*(DIFF50-DEA50)>REF(1.5*(DIFF50-DEA50),1),1,0);阻力:=IF(CROSS(C,MA(C,20)) ORCROSS(C,MA(C,60)),10,0);DRAWTEXT(FILTER(杀多,3) AND 杀多,MACD+0.1,'杀多'),COLORFF00FF;DRAWTEXT(FILTER(缩头,3) AND 缩头,MACD+0.1,'卖'),COLORFF00FF;DRAWTEXT(FILTER(诱空,3) AND 诱空,MACD+0.1,'?洗'),COLOR00FF00;DRAWTEXT(FILTER(缩脚,3) AND 缩脚,MACD-0.1,'买'),COLOR00FF00;IF(MACD>=REF(MACD,1),DIF1,DRAWNULL),COLORRED,LINETHICK2;DRAWICON(CROSS(DIF1,DEA1),DIF1*1.00,5);DRAWICON(CROSS(DEA1,DIF1),DIF1*1.00,6);http://att.178448.com/forum/201612/10/215115icc17wz0l4llbacb.png
页:
[1]