a:=hhvall(h)-llvall(l);

v1:=HHVALL(HHV(BARPOS,COUNT(C,0)));
v2:=llvALL(HHV(BARPOS,COUNT(C,0)));
b:=hhv(v,v1-v2);
d:=b/a*2;
e:=llvall(l)-a/2;
vx:=v/d+e;
MA1:MA(vx,5),PRECIS0,coloryellow;
MA2:MA(vx,10),PRECIS0,colorcyan;
stickline((c>o or c>ref(c,1)),e,vx,6,0),COLORRED;
stickline(c<o or c<=ref(c,1),e,vx,6,0),COLORgreen;