//////////////////// Fichero de programación de Viaje a la Luna //////////////////// Parámetros generales $ 1: 381.452,0.07089,111.0,26.2; semieje mayor Tierra-Luna // excent. órbita // áng. semieje mayor// áng. pos. inicial Luna $ 2: 6.378; radio Tierra $ 3: 1.737; radio Luna $ 4: 81.0; proporción Masa Tierra/Luna $ 5: 6.573; rádio órbita terrestre inicial $ 6: 305,7.0,6.77; Iny.T.L. tiempo,ac.inicial, coef.ac.lineal $ 7: 47.1,-16.2,1.160; ángulo inicial circular Luna 51.6(53.6 para retorno libre), ang. eyeción lunar, porcent. vel.escape lunar $ 8: 70,300; posición pantalla Tierra $ 9: 1000,380; posición pantalla Luna $10:1.6, 35; escalas pantalla Tierra y Luna $11:300,50; Saltos bucle rápido / lento $12:0.006,3.2; límite angular oposición Luna, distancia entrar orbita lunar Órden, parámetro, condición -H órbita de Hohmann 1 -h órbita de Hohmann 2 -c ajustar velocidad a órbita circular -v control de número de vueltas alrededor de la Luna -d despegue de la Luna -i incremento velocidad #l:1 ; retorno libre=0 #o:0 ; trayectoria sin Luna; 0= no dibuja //#r:0.9,2,<,15; Reducir velocidad 0.9, distancia Luna (2) < 15 //#c:2,0; Ajusta velocidad órbita circular Luna (2) en la vuelta 0 #v:2,11; Controla el número de vueltas alrededor de la Luna #H:2,0,1.90; Inicia Orbita de Hohmann 1 (lado oculto luna) en vueta 1, dist. perilunio #h:2,0,1.840; Inicia Orbita de Hohmann 2 (lado visible luna) en vueta 1, dist. perilunio #c:2,2; Ajusta velocidad órbita circular Luna (2) en la vuelta 1 //#h:2,4; Inicia Orbita de Hohmann 1 (lado oculto luna) en vueta 0 //#h:2,8; Inicia Orbita de Hohmann 1 (lado oculto luna) en vueta 0 #d:2,<,3; si la distancia menor 1.9 despegue Luna 0.99 vel. escape #i:320,0.0028,0.00; Incrementa las componentes de la velociad x,y para distancia Tierra < 310 #s:1,<,6.6; Detiene el programa cuando la distancia a la Tierra < 10