同图

{DMI}
N:=20;
MTR:=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/MTR;
MDI: DMM*100/MTR;
FILLRGN(PDI,MDI,PDI>MDI,RGB(100,0,50),PDI<MDI,RGB(256,96,96));
ADX:EMA((PDI-MDI)/(PDI+MDI)*100,N),COLORFF00FF;
ADXR:EMA(ADX,N/2),COLOR00FF00;
ADMA:EMA(ADX,20),COLORRED,LINETHICK3;
partline(ADMA,ADMA<ref(ADMA,1),rgb(0,255,0)),COLORGREEN;
{LTSH}
WR:100-100*(HHV(HIGH,40)-CLOSE)/(HHV(HIGH,40)-LLV(LOW,40)),COLORFFFFFF,LINETHICK2;
见顶:100,COLOR0000FF,LINETHICK2;
见底:0,COLOR00FF00,LINETHICK2;
STICKLINE(WR=100,101,110,5,0),COLOR0000FF;
STICKLINE(WR=0,101,110,5,0),COLOR00FF00;
STICKLINE(WR<100 AND WR>=99,101,110,5,1),COLOR00FFFF;
STICKLINE(WR<=0.6 AND WR>0,101,110,5,0),COLOR00FFFF;
DRAWTEXT(CROSS( ADX,ADXR), ADX-0,'★张嘴'),COLORYELLOW;
DRAWTEXT(CROSS(ADXR, ADX),ADXR+0,'★闭嘴'),COLORFF00FF;

 

{DMI}
MTR:=EXPMEMA(MAX(MAX(HIGH-LOW,ABS(HIGH-REF(CLOSE,1))),ABS(REF(CLOSE,1)-LOW)),20);
HD :=HIGH-REF(HIGH,1);
LD :=REF(LOW,1)-LOW;
DMP:=EXPMEMA(IF(HD>0&&HD>LD,HD,0),20);
DMM:=EXPMEMA(IF(LD>0&&LD>HD,LD,0),20);
PDI: DMP*100/MTR;
MDI: DMM*100/MTR;
DRAWBAND(PDI,RGB(100,0,50),MDI,RGB(256,96,96));
ADX:EXPMEMA((PDI-MDI)/(PDI+MDI)*100,20),COLORFF00FF;
ADXR:EXPMEMA(ADX,20/2),COLOR00FF00;
ADMA:EMA(ADX,20),COLORRED,LINETHICK3;
IF(ADMA<REF(ADMA,3),ADMA,DRAWNULL),COLORGREEN,LINETHICK3;
{LTSH}
WR:100-100*(HHV(HIGH,40)-CLOSE)/(HHV(HIGH,40)-LLV(LOW,40)),COLORFFFFFF,LINETHICK2;
见顶:100,COLOR0000FF,LINETHICK2;
见底:0,COLOR00FF00,LINETHICK2;
极点:-110,COLORYELLOW,LINETHICK2;
STICKLINE(WR=100,101,110,5,0),COLOR0000FF;
STICKLINE(WR=0,101,110,5,0),COLOR00FF00;
STICKLINE(WR<100 AND WR>=99,101,110,5,1),COLOR00FFFF;
STICKLINE(WR<=0.6 AND WR>0,101,110,5,0),COLOR00FFFF;
DRAWTEXT(CROSS( ADX,ADXR), ADX-0,'★张嘴'),COLORYELLOW;
DRAWTEXT(CROSS(ADXR, ADX),ADXR+0,'★闭嘴'),COLORFF00FF;