高仿通达信吸拉派落,相似度可达99%,已将线型换成圆点,方便查看,源码公开,欢迎深度优化!!!
VARA:=EMA(EMA(C,13),13);
KP:=(VARA-REF(VARA,1))/REF(VARA,1)*1000;
MM:=REF(KP,1);
吸:IF(KP<0 AND KP>MM,KP,DRAWNULL),LINETHICK3,CIRCLEDOT,COLORMAGENTA;
拉:IF(KP>0 AND KP>MM,KP,DRAWNULL),LINETHICK3,CIRCLEDOT,COLORRED;
派:IF(KP>0 AND KP<MM,KP,DRAWNULL),LINETHICK3,CIRCLEDOT,COLORGREEN;
落:IF(KP<0 AND KP<MM,KP,DRAWNULL),LINETHICK3,CIRCLEDOT,COLORBLUE;