vars:yesterday_high(0);
vars:yesterday_low(0);
vars:yesterday_close(0);
vars:pivotline(0);
vars:B1(0);
vars:B2(0);
vars:S1(0);
vars:S2(0);
vars:LBOP(0);
vars:HBOP(0);

if date > date[1] then yesterday_high = HighD(1);
if date > date[1] then yesterday_low = LowD(1);
if date > date[1] then yesterday_close = CloseD(1);
if date > date[1] then pivotline = (yesterday_high + yesterday_low + yesterday_close)/3;
if date > date[1] then B1 = 2 * pivotline - yesterday_low;
if date > date[1] then B2 = pivotline - S1 + B1;
if date > date[1] then S1 = 2 * pivotline - yesterday_high;
if date > date[1] then S2 = pivotline - B1 + S1;
if date > date[1] then LBOP = (2 * pivotline) - ((2 * yesterday_high) - yesterday_low);
if date > date[1] then HBOP = (2 * pivotline) + (yesterday_high - ( 2 * yesterday_low));

Plot1(pivotline,"pivot");
Plot2(B1,"B1");
Plot3(B2,"B2");
Plot4(S1,"S1");
Plot5(S2,"S2");
Plot6(LBOP,"LBOP");
Plot7(HBOP,"HBOP");