theta = theta + 1
phi = phi + 1

ltheta.Caption = theta
lphi.Caption = phi


translate_origin(1, 4) = -((r * Sin(phi)) * Sin(theta))
translate_origin(2, 4) = -(r * Cos(phi))
translate_origin(3, 4) = -((r * Sin(phi)) * Cos(theta))

rotate_y(1, 1) = Cos(-theta)
rotate_y(1, 3) = Sin(-theta)
rotate_y(3, 1) = -Sin(-theta)
rotate_y(3, 3) = Cos(-theta)

rotate_x(2, 2) = Cos(90 - phi)
rotate_x(2, 3) = -Sin(90 - phi)
rotate_x(3, 2) = Sin(90 - phi)
rotate_x(3, 3) = Cos(90 - phi)