通达信淼小MDI优化 副图源码

NOTEXT1:60,POINTDOT;
 NOTEXT2:20,POINTDOT;
 PDI:"DMI.PDI",DOTLINE,COLORMAGENTA;
 MDI:"DMI.MDI",DOTLINE,COLORCYAN;
 ADX:"DMI.ADX",LINETHICK2,COLORWHITE;
 ADXR:"DMI.ADXR",LINETHICK2,COLORYELLOW;

空军战场:IF(MDI>REF(MDI,1) AND PDI<REF(PDI,1),ADX,DRAWNULL),LINETHICK2,COLORGREEN;
 DRAWICON(空军战场>0,60,39);
红军战场:IF(MDI<REF(MDI,1) AND PDI>REF(PDI,1),ADX,DRAWNULL),LINETHICK2,COLORRED;
 DRAWICON(红军战场>0,60,38);

出局:=REF(PDI,1)>60 AND REF(PDI,1)>REF(PDI,2) AND REF(PDI,1)>PDI;
 DRAWTEXT(出局,PDI,'止'),COLORGREEN;
进场:=REF(PDI,1)<20 AND REF(PDI,1)<REF(PDI,2) AND REF(PDI,1)<PDI;
 DRAWTEXT(进场,PDI,'启'),COLORRED;

顺势启动:=CROSS(ADX,ADXR),NODRAW;
 DRAWTEXT(顺势启动,ADX,'顺'),COLORYELLOW;
 DRAWICON(顺势启动,70,11);
逆势启动:=CROSS(ADXR,ADX),NODRAW;
 DRAWTEXT(逆势启动,ADX,'反'),COLORYELLOW;
 DRAWICON(逆势启动,70,12);

上攻:=CROSS(PDI,MDI),NODRAW;
回踩:=CROSS(MDI,PDI),NODRAW;
 DRAWICON(上攻,PDI,1);
 DRAWICON(回踩,PDI,2);

强势启动:=PDI>REF(PDI,1) AND PDI>ADX AND ADX>ADXR AND CROSS(ADX,ADXR) AND PDI>MDI AND EXIST(CROSS(PDI,MDI),3);
 DRAWICON(强势启动,PDI,33);