Improvements to auto-launch script, inspired partially by the discussion at https://amyparent.com/blog/automating-rocket-launches.html

prog/rocket.ks

@@ -93,9 +93,9 @@ MakeMenu(
   MakeButton(rows[2], "LNCH"),
   List(
     List("Target Apoapsis", "SCALAR", "80000"),
-    List("Atmo TWR", "SCALAR", "1.8"),
-    List("Gravity Turn Alt", "SCALAR", "8000"),
-    List("Lead Angle", "SCALAR", "5"),
+    List("Initial Pitch", "SCALAR", "20"),
+    List("Lead Angle", "SCALAR", "2"),
+    List("Atmo TWR", "SCALAR", "2.0"),
     List("Minimum Pitch", "SCALAR", "5"),
     List("Autostage", "BOOL", true)
   ),
@@ -105,9 +105,9 @@ MakeMenu(
     Launch(
       options["Target Apoapsis"]:TEXT:ToNumber(),
       options["Atmo TWR"]:TEXT:ToNumber(),
-      options["Gravity Turn Alt"]:TEXT:ToNumber(),
       options["Lead Angle"]:TEXT:ToNumber(),
       options["Minimum Pitch"]:TEXT:ToNumber(),
+      options["Initial Pitch"]:TEXT:ToNumber(),
       options["Autostage"]:PRESSED
     ).
   }