EdgeTalk

under the Parameters tab

N1 Double 5 3 150
N2 Double 15 6 200
N3 Double 45 9 300


Here is the code


A1:=Sum((O+H+L+C)/4,N1)/N1;
A2:=Sum((O+H+L+C)/4,N2)/N2;
A3:=Sum((O+H+L+C)/4,N3)/N3;
B1:MA(MA(ATAN(A1-Ref(A1,N1)),2),2),Width2,ColorLime;
B2:MA(MA(ATAN(A2-Ref(A2,N2)),2),2),Width2,ColorRed;
B3:MA(MA(ATAN(A3-Ref(A3,N3)),2),2),Width2,ColorBlue;
D1:MA(MA(ATAN(Ref(A1,N1)-A1),2),2),ColorGreen;
D2:MA(MA(ATAN(Ref(A2,N2)-A2),2),2),ColorDarkRed;
D3:MA(MA(ATAN(Ref(A3,N3)-A3),2),2),ColorDarkBlue;
Zero:0,ColorBlack;