改成文華指標

作者：文華財經來源：cxh99.com 發布時間：2018年07月14日

咨詢內容： ?老師好，幫我改成文華指標：

{DMI新編}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);ADMA1:EMA(ADX,M1);OMD:(ADX-2*ADMA1+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:ADMA1;強:IF(ADX1>=ADXR1,ADX1,DRAWNULL),COLORRED,LINETHICK3;買入:IF(OMD>0 AND OMD-REF(OMD,1)>0,30,0);{OMD;}110;0;-110;
?
?來源:程序化99
文華技術人員： ?參考，

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); ADMA1:EMA(ADX,M1); OMD:(ADX-2*ADMA1+ADXR)/2, COLORSTICK; FILLRGN(C>0,ADX,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; 強:IF(ADX1>=ADXR1,ADX1,NULL),COLORRED,LINETHICK3; 買入:IF(OMD>0 AND OMD-REF(OMD,1)>0,30,0); 110; 0; -110;
?

?來源: www.tumamayizhan.com
文華客服： 老師好，上面的指標已裝了。但與原指標的圖還有不同，不同處：原先ADXg與ADXR金叉時所圍的面積是紅色的，：ADXg與ADXR死叉時所圍的面積是綠色的，現在全部是綠色的。能不能和原先的一樣？
?
網友回復： ??參考，
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);ADMA1:EMA(ADX,M1);OMD:(ADX-2*ADMA1+ADXR)/2, COLORSTICK;FILLRGN(ADX<ADXR,ADX,ADXR,RGB(0,100,50));FILLRGN(ADX>ADXR,ADX,ADXR,COLORRED);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;強:IF(ADX1>=ADXR1,ADX1,NULL),COLORRED,LINETHICK3;買入:IF(OMD>0 AND OMD-REF(OMD,1)>0,30,0);110;0;-110;