N:=BARSLAST(DATE<>REF(DATE,1))+1;
LASTHIGH:=REF(HHV(H,N),N);
LASTLOW:=REF(LLV(L,N),N);
LASTCLOSE:=REF(C,N);
P:(LASTHIGH+LASTLOW+LASTCLOSE)/3;
R1:(2*P)-LASTLOW;
S1:(2*P)-LASTHIGH;
R2:P+(LASTHIGH-LASTLOW);
S2:P-(LASTHIGH-LASTLOW);
R3:(2*P)+(LASTHIGH-(2*LASTLOW));
S3:(2*P)-((2*LASTHIGH)-LASTLOW);