var 0:= VOL/CLOSE/2;
var 1:= SUM(IF(var 0 & gt; 100 and close & gtREF(CLOSE, 1), VAR0 0,0), 0);
var 2:= SUM(IF(var 0 & gt; 100 and close & ltREF(CLOSE, 1), VAR0 0,0), 0);
var 3:= SUM(IF(var 0 & lt; 100 and close & gtREF(CLOSE, 1), VAR0 0,0), 0);
var 4:= SUM(IF(var 0 & lt; 100 and close & ltREF(CLOSE, 1), VAR0 0,0), 0);
var 5:= var 1+var 2+var 3+var 4;
VAR6:=IF(ISLASTBAR, 100 * VAR 1/VAR5,0);
VAR7:=IF(ISLASTBAR, 100 * VAR2/VAR5,0);
VAR8:=IF(ISLASTBAR, 100 * VAR3/VAR5,0);
VAR9:=IF(ISLASTBAR, 100 * VAR4/VAR5,0);
Institutional purchase: = var 1, line thickness 9, color 031BFA;
Agency sales: =VAR2, LINETHICK9, COLORFFFF55.
Retail purchase: =VAR3, COLOR5FFFFF
Retail: =VAR4, COLOR55FF55
a787:= BARSSINCE(V & gt; 0)+ 1;
Average price is 787:=SUM(C*V, A787)/SUM(V, a787);
Machine: = filter ((cross (institutional buying, institutional selling) OR (institutional selling =0 and cross (institutional buying,10)) and c/dynainfo (3) >1.001and institutional buying >; Agency sales), 2400);
ZM: machine and c/dynainfo (3) > 0.013 and C>= average price 787 and c> dynainfo (3);