N:=100;
WIDTH:=2;
CURRBARSCOUNT:=DATACOUNT-BARPOS+1;
B:=SLOPE(C,N);
A:=MA(C,N)-B*(N-1)/2;
Y:=REFX1(A,10000)+REFX1(B,10000)*(N-CURRBARSCOUNT-1);
D:=C-Y;
P1:=BACKSET(ISLASTBAR,N);
P2:=P1>REF(P1,1);
Y1:=FORCAST(C,N);
SD:=STD(D,N);
DRAWLINE1(P2,REFX(A,N-1),ISLASTBAR,Y1,1),COLORRED,LINETHICK2;
DRAWLINE1(P2,REFX1(A,N-1)+WIDTH*REFX1(SD,N-1),ISLASTBAR,Y1+WIDTH*SD,1),COLORBLUE;
DRAWLINE1(P2,REFX1(A,N-1)-WIDTH*REFX1(SD,N-1),ISLASTBAR,Y1-WIDTH*SD,1),COLORBLUE;
