AA:=SCALE*VOL;
BB:=(1-SCALE)*VOL;
NM:=BARSLAST(DATE<>REF(DATE,1))+1;
WW:=SUM(SCALE*VOL,6);
NN:=SUM((1-SCALE)*VOL,6);
SS:=WW-NN;
STICKLINE(SS>0,0,SS,COLORRED,0);
STICKLINE(SS<0,0,SS,COLORCYAN,0);