[通达信] 有劳高手将这个公式改为预警选股公式

要求：红方块开始缩短 至 白方块开始缩短的这段范围的预警选股。或者改成红方块开始缩短至最后一块白方块为止的预警选股。请改出，谢谢！
VAR6:=(2*C+H+L)/4;
VAR8:=LLV(LOW,34);
VARA:=HHV(HIGH,34);
防线B:=EMA((VAR6-VAR8)/(VARA-VAR8)*100,8);
B1:=EMA(防线B,5);
频约娇媚:STICKLINE(防线B>0 AND 防线B-B1>=0,79,80,6,0),COLOR00FF00;
连得龙子:STICKLINE(防线B>0 AND 防线B-B1<0,79,80,6,1),COLORRED;
只赚不赔:STICKLINE(防线B>0 AND 防线B-B1>=0,19,20,6,0),COLOR00FF00;
STICKLINE(防线B>0 AND 防线B-B1>=0,49,50,6,0);
STICKLINE(防线B>0 AND 防线B-B1<0,49,50,6,1),COLORRED;
吃么香香:STICKLINE(防线B>0 AND 防线B-B1<0,19,20,6,1),COLORRED;
一进一出:STICKLINE(防线B-B1>0,防线B,B1,8,1);
妙趣横生:STICKLINE(防线B-B1<0,防线B,B1,8,1),COLORRED;