DMI底背请老师改为同花顺主图可用并能注明

编写要求：

股票网解答：

网友求助：

TR := SUM(MAX(MAX(HIGH-LOW,ABS(HIGH-REF(CLOSE,1))),ABS(LOW-REF(CLOSE,1))),14);
HD := HIGH-REF(HIGH,1);
LD := REF(LOW,1)-LOW;
PDM:= SUM(IF(HD>0 AND HD>LD,HD,0),14);
MDM:= SUM(IF(LD>0 AND LD>HD,LD,0),14);
PDI:= PDM*100/TR;
MDI:= MDM*100/TR;
A4:=BARSLAST(REF(CROSS(PDI,MDI),1));
B4:=REF(C,A4+1)>C AND REF(pdi,A4+1)<pdi AND CROSS(pdi,mdi);
MDI:= MDM*100/TR;
C4:=BARSLAST(REF(CROSS(mdi,pdi),1));
D4:=REF(C,C+1)<C AND REF(mdi,C4+1)>mdi AND CROSS(mdi,pdi);
DMI顶背:IF(D4>0,0.1,0),colorblue,POINTDOT;
DMI底背:IF(B4>0,-0.1,0),COLOR0099FF,POINTDOT;

 

解答如下：

TR := SUM(MAX(MAX(HIGH-LOW,ABS(HIGH-REF(CLOSE,1))),ABS(LOW-REF(CLOSE,1))),14);
HD := HIGH-REF(HIGH,1);
LD := REF(LOW,1)-LOW;
PDM:= SUM(IF(HD>0 AND HD>LD,HD,0),14);
MDM:= SUM(IF(LD>0 AND LD>HD,LD,0),14);
PDI:= PDM*100/TR;
MDI:= MDM*100/TR;
A4:=BARSLAST(REF(CROSS(PDI,MDI),1));
底背:=REF(C,A4+1)>C AND REF(pdi,A4+1)<pdi AND CROSS(pdi,mdi);
MDI:= MDM*100/TR;
C4:=BARSLAST(REF(CROSS(mdi,pdi),1));
顶背:=REF(C,C+1)<C AND REF(mdi,C4+1)>mdi AND CROSS(mdi,pdi);
DRAWTEXT(顶背,H*1.05,'顶背');
DRAWTEXT(底背,L*0.95,'底背');

>