Как самому посчитать camarilla pivots

вот скрипт для Омеги…
Input: Classik(True);
Vars: Point_Vra(0), R1(0), R2(0), R3(0), S1(0), S2(0), S3(0);

If Date <> Date[1] Then Value1=Open;

If Classik Then Point_Vra=(HIGH[1] of Data2 +LOW[1] of Data2 +CLOSE[1] of Data2+Value1)/4;
If Classik=False Then Point_Vra=(HIGH[1] of Data2 +LOW[1] of Data2 +2*CLOSE[1] of Data2)/4;

R1=2*Point_Vra — Low[1] of Data2;
R2=Point_Vra + High[1] of Data2 — Low[1] of Data2;
R3=R1 + High[1] of Data2 — Low[1] of Data2;

S1=2*Point_Vra — High[1] of Data2;
S2=Point_Vra — High[1] of Data2 + Low[1] of Data2;
S3=S1 — High[1] of Data2 + Low[1] of Data2;

Plot1(S1,«S1»);
Plot2(S2,«S2»);
Plot3(S3,«S3»);

и

Input: Classik(True);
Vars: Point_Vra(0), R1(0), R2(0), R3(0), S1(0), S2(0), S3(0);

If Date <> Date[1] Then Value1=Open;

If Classik Then Point_Vra=(HIGH[1] of Data2 +LOW[1] of Data2 +CLOSE[1] of Data2+Value1)/4;
If Classik=False Then Point_Vra=(HIGH[1] of Data2 +LOW[1] of Data2 +2*CLOSE[1] of Data2)/4;

R1=2*Point_Vra — Low[1] of Data2;
R2=Point_Vra + High[1] of Data2 — Low[1] of Data2;
R3=R1 + High[1] of Data2 — Low[1] of Data2;

S1=2*Point_Vra — High[1] of Data2;
S2=Point_Vra — High[1] of Data2 + Low[1] of Data2;
S3=S1 — High[1] of Data2 + Low[1] of Data2;

Plot1(Point_Vra,«Poin_Vra»);

Plot2(R1,«R1»);
Plot3(R2,«R2»);
Plot4(R3,«R3»);

О интересно. Спасибо!