Pct B Barics

[henry1224]

under the parameters tab

N double 3 2 100
SN double 8 3 100


A:= 100*(If((H>O),(H-O+C-L),(C-L)) / (If((H>O),(H-O+C-L),(C-L)) +
If(O>L,(O-L+H-C),(H-C))));
A2:MA(A,N),ColorGreen;
A3:MA(A2,SN),ColorRed;
FillRgn(A2>A3,A3,A2),Brush#50008000;
FillRgn(A2<A3,A3,A2),Brush#50800000;