通达信淼小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);
