m = 1.6 (slider from -5 to 5, step 0.1)
a: y = m * x
n = 3 (slider from -5 to 5, step 0.1)
b: y = m * x + n
A = Point(a)
c = OrthogonalLine(A, xAxis)
B = Intersect(c, xAxis)
d = Segment(B, A)
C = Intersect(xAxis, a)
e = Segment(C, B)
α = Angle(e, a)
texto1: "tg α \; = \; m \; =  \;  \frac{ AB }{CB } =\frac{ " + d + "}{" + e + "} =" + (d / e) + "=tg" + α
texto2: "y=" + m + " \; x \; "
D = Point(b)
texto3: "y=" + m + " \; x \; +" + n
β = Angle(xAxis, b)