Initial import

boot/high-altitude-cosmic.ks

@@ -0,0 +1,26 @@
+@lazyglobal off.
+wait until ship:unpacked.
+rcs off.
+
+runoncepath("0:/lib/common.ks").
+runoncepath("0:/lib/stage/thor.ks").
+runoncepath("0:/lib/stage/able.ks").
+
+local target_inclination is ship:latitude.
+local target_alt is 300_000.
+
+local hdg is launch_azimuth(target_inclination, target_alt).
+
+thor:launch(hdg, target_alt).
+stage.
+able:burn(hdg).
+
+rcs on.
+lock steering to heading(hdg, 0, -hdg).
+wait until steering_locked().
+stage.
+wait 1.
+set warpmode to "physics".
+set warp to 3.
+wait until ship:thrust = 0.
+set warp to 0.