__ZBT
_COMM       
_PAR       
_VAR        TYX2, D1, D2, D3, D4
_ZB        OPEN, CLOSE, HIGH, LOW
_LOCAL       
_RES        YK, GK, 红旗
_DEF        0.000
_CODE
IF REF(COUNT(CLOSEMA(REF(HHV((CLOSE+LOW+OPEN+HIGH)/4,40),1),3) & CLOSE>OPEN
THEN YK=1;
ELSE YK=0;
ENDIF;
TYX2=MA(REF(HHV((CLOSE+LOW+OPEN+HIGH)/4,10),1),3);
IF REF(COUNT(CLOSETYX2 & CLOSE>OPEN
THEN GK=1;
ELSE GK=0;
ENDIF;
KLINE(OPEN,HIGH,LOW,CLOSE,CLRYELLOW,YK=0);
KLINE(OPEN,(OPEN+CLOSE)/2,OPEN,(OPEN+CLOSE)/2,clrBlue,GK=0);
KLINE((OPEN+CLOSE)/2,CLOSE,(OPEN+CLOSE)/2,CLOSE,clrWHITE,GK=0);
D1=CLOSE=HHV(CLOSE,89);
D2=BLAST(D1,0);