用DMI新編的MACD出現(xiàn)底背離公式加個背離畫線條件
2019/12/15 18:29:22
公式編寫說明：
各位老師好，請將DMI新編的MACD出現(xiàn)底背離時候加個自動畫線，源碼：N:=21;M:=6;M1:=20;TR1:=EMA(MAX(MAX(HIGH-LOW,ABS(HIGH-REF(CLOSE,1))),ABS(REF(CLOSE,1)-LOW)),N);HD :=HIGH-REF(HIGH,1);LD :=REF(LOW,1)-LOW;DMP:=EMA(IF(HD>0 AND HD>LD,HD,0),N);DMM:=EMA(IF(LD>0 AND LD>HD,LD,0),N);PDI:= DMP*100/TR1;MDI:= DMM*100/TR1;ADX: EMA((PDI-MDI)/(MDI+PDI)*100,M)*2;ADXR:EMA(ADX,M);ADMA:EMA(ADX,M1);OMD:(ADX-2*ADMA+ADXR)/2, COLORSTICK;DRAWBAND(ADX,RGB(155,50,50),ADXR,RGB(0,100,50));STICKLINE(OMD>REF(OMD,1) AND OMD>0,0,OMD,1,0),COLORRED;STICKLINE(OMD>REF(OMD,1) AND OMD<0,0,OMD,1,0),COLORGREEN;STICKLINE(OMD<REF(OMD,1),0,OMD,1,0),COLORCBCBC0;STICKLINE(OMD>=0 OR OMD<=0,0,0,50,1),COLORWHITE;ADX1:ADX,COLORRED;ADXR1:ADXR,COLORGREEN;ADMA1:ADMA;強:IF(ADX1>=ADXR1,ADX1,DRAWNULL),COLORRED,LINETHICK3;買入:IF(OMD>0 AND OMD-REF(OMD,1)>0,30,0);{OMD;}110;0;-110;
公式源碼示例：
N:=21;M:=6;M1:=20;
TR1:=EMA(MAX(MAX(HIGH-LOW,ABS(HIGH-REF(CLOSE,1))),ABS(REF(CLOSE,1)-LOW)),N);
HD :=HIGH-REF(HIGH,1);
LD :=REF(LOW,1)-LOW;
DMP:=EMA(IF(HD>0 AND HD>LD,HD,0),N);
DMM:=EMA(IF(LD>0 AND LD>HD,LD,0),N);
PDI:= DMP*100/TR1;
MDI:= DMM*100/TR1;
ADX: EMA((PDI-MDI)/(MDI+PDI)*100,M)*2;
ADXR:EMA(ADX,M);
ADMA:EMA(ADX,M1);
OMD:(ADX-2*ADMA+ADXR)/2, COLORSTICK;
DRAWBAND(ADX,RGB(155,50,50),ADXR,RGB(0,100,50));
STICKLINE(OMD>REF(OMD,1) AND OMD>0,0,OMD,1,0),colorred;
STICKLINE(OMD>REF(OMD,1) AND OMD<0,0,OMD,1,0),colorgreen;
STICKLINE(OMD<REF(OMD,1),0,OMD,1,0),COLORCBCBC0;
STICKLINE(OMD>=0 OR OMD<=0,0,0,50,1),colorwhite;
ADX1:ADX,colorred;
ADXR1:ADXR,colorgreen;
ADMA1:ADMA;
A1:= BARSLAST(REF(CROSS(ADX,ADXR),1));
底背離:=REF(C,A1+1)>C AND ADX>REF(ADX,A1+1) AND CROSS(ADX,ADXR) AND ADXR<0;
DRAWLINE(A1=0,ADXR,底背離,ADXR,0),COLORFFFFFF,LINETHICK2;
STICKLINE(底背離,ADXR,0,0.5,0),COLORFFFFFF;
DRAWTEXT(底背離,ADXR,'底背離'),COLORFFFFFF;
強:IF(ADX1>=ADXR1,ADX1,DRAWNULL),colorred,LINETHICK3;
買入:IF(OMD>0 AND OMD-REF(OMD,1)>0,30,0);
{OMD;}
110;
0;
-110;
看股 吧公式 www.kang uba.com
其它股票公式列表
