FBARS:=SYSPARAM(1)-1;
TJ:=BARSSINCE(CLOSE)>FBARS-50;
HH:=HIGH;
LL:=LOW;
OO:=OPEN;
CC:=CLOSE;
<%
vbars=ffl.vardata("fbars")
vh=ffl.vardata("hh")
vl=ffl.vardata("ll")
vo=ffl.vardata("oo")
vc=ffl.vardata("cc")
last=ubound(vh)
if last<101 then
b=last+1
else
b=0
for i=last-101 to last-51
vh(i)=vh(i+51)
vl(i)=vl(i+51)
vo(i)=vo(i+51)
vc(i)=vc(i+51)
next
a=(vh(last-51)+vl(last-51))/2
j=1
for i=last-49 to last
j=j+2
vh(i)=2*a-vl(i-j)
vl(i)=2*a-vh(i-j)
vo(i)=2*a-vc(i-j)
vc(i)=2*a-vo(i-j)
next
end if
ffl.vardata("hh")=vh
ffl.vardata("ll")=vl
ffl.vardata("oo")=vo
ffl.vardata("cc")=vc
ffl.varstartindex("hh")=b
ffl.varstartindex("ll")=b
ffl.varstartindex("oo")=b
ffl.varstartindex("cc")=b
%>
A:=BACKSET(ISLASTBAR,50);
STICKLINE(A AND CC>=OO,OO,CC,6,1),SHIFT50,colorFF00FF;
STICKLINE(A AND CC>=OO,LL,OO,0.1,1),SHIFT50,colorFF00FF;
STICKLINE(A AND CC>=OO,CC,HH,0.1,1),SHIFT50,colorFF00FF;
STICKLINE(A AND CC<OO,OO,CC,6,0),SHIFT50,colorFF00;
STICKLINE(A AND CC<OO,LL,HH,0.1,0),SHIFT50,colorFF00;
VERTLINE(ISLASTBAR),POINTDOT,colorFFFF;