Szögek megjelenítése

gamma2 = 220 (slider from 0 to 360, step 0.1)
rKisEpi2 = 0.1 (slider from 0 to 1, step 0.1)
béta2 = 219.9 (slider from 0 to 360, step 0.1)
alfa2 = 218 (slider from 0 to 360, step 0.1)
rEpiciklus2 = 0.1 (slider from 0.1 to 2, step 0.1)
rDeferens2 = 1.2 (slider from 1.2 to 5, step 0.1)
Föld = (-2.9, 3.7600000000000002)
Deferens2 = Circle(Föld, rDeferens2)
A = Point(Deferens2)
A' = Rotate(A, alfa2°, Föld)
Epiciklus2 = Circle(A', rEpiciklus2)
D = Point(Epiciklus2)
Bol = Rotate(D, béta2°, A')
KisEpi2 = Circle(Bol, rKisEpi2)
F = Point(KisEpi2)
Bolygó2 = Rotate(F, gamma2°, Bol)
gamma = 26.3 (slider from 0 to 360, step 0.1)
rKisEpi = 1 (slider from 0 to 1, step 0.1)
béta = 276.6 (slider from 0 to 360, step 0.1)
alfa = 165.1 (slider from 0 to 360, step 0.1)
rEpiciklus = 2 (slider from 0.1 to 2, step 0.1)
rDeferens = 4.7 (slider from 1.2 to 5, step 0.1)
Deferens = Circle(Föld, rDeferens)
B = Point(Deferens)
B' = Rotate(B, alfa°, Föld)
Epiciklus = Circle(B', rEpiciklus)
C = Point(Epiciklus)
Boly = Rotate(C, béta°, B')
KisEpi = Circle(Boly, rKisEpi)
E = Point(KisEpi)
Bolygó = Rotate(E, gamma°, Boly)
Idő = 3.3 (slider from 1 to 10, step 0.1)
CiklusDef = 0.22 (slider from 0.01 to 3, step 0.01)
CiklusEpi = 1.59 (slider from 0.01 to 3, step 0.01)
a = Ray(Föld, Bolygó)
c = Circle(Föld, 8.2)
Lá = Ray(Föld, Bolygó2)
Lászólagos = Intersect(c, a, 1.0)
Látszólagos2 = Intersect(c, Lá, 1.0)
CiklusDef2 = 0.49 (slider from 0.01 to 3, step 0.01)
CiklusEpi2 = 3 (slider from 0.01 to 3, step 0.01)
CiklusKisEpi = 2.85 (slider from 0.01 to 5, step 0.01)
CiklusKisEpi2 = 2.34 (slider from 0.01 to 3, step 0.01)
b = false