通达信突破乌顶主图指标公式源码

VAR1:=(OPEN-REF(HIGH,1))/REF(HIGH,1)*100>0;
VAR2:=(MAX(CLOSE,OPEN)-MIN(CLOSE,OPEN))/MIN(CLOSE,OPEN)*100>2 AND CLOSE<OPEN;
VAR3:=VAR1 AND VAR2;
VAR4:=BARSLAST(VAR3);
VAR5:=crOSS(CLOSE,REF(HIGH,VAR4)) AND VAR4<90 AND REF(VAR4,1);
DRAWTEXT(VAR5,LOW*0.995,'突破乌顶'),COLORYELLOW;
DRAWTEXT(VAR3,H*1.005,'乌顶'),COLORYELLOW;
DRAWTEXT(VAR3,H*1.005,'-------------------'),COLORYELLOW;