通达信主图宝塔线去除K线技巧

TICKLINE(C>0,H,L,3,0),COLORBLACK;{背景色是什么就填什么颜色}
OO:=REF(C,1);
HH:=MAX(C,OO);
LL:=MIN(C,OO);
ZY:=REF(C,1)>REF(LL,1);{昨天收阳}
ZD:=REF(C,1)<REF(HH,1);{昨天收阴}
STICKLINE(C>=OO,LL,HH,2,0),COLORRED;
STICKLINE(C<OO,LL,HH,2,0),COLOR008000;

STICKLINE(ZY AND C>=REF(OO,1),LL,HH,2,0),COLORRED;
STICKLINE(ZY AND C<REF(OO,1),HH,REF(OO,1),2,0),COLORRED;
STICKLINE(ZY AND C<REF(OO,1),REF(OO,1),C,2,0),COLOR008000;

STICKLINE(ZD AND C<=REF(OO,1),LL,HH,2,0),COLOR008000;
STICKLINE(ZD AND C>REF(OO,1),LL,REF(OO,1),2,0),COLOR008000;
STICKLINE(ZD AND C>REF(OO,1),REF(OO,1),C,2,0),COLORRED;
MA(C,30);