Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- CLEARSCREEN.
- LOCK THROTTLE TO 1.0.
- PRINT "Counting Down...".
- FROM {local countdown is 10.} UNTIL countdown = 0 STEP {SET countdown to countdown - 1.} do {
- PRINT "..." + countdown.
- WAIT 1.
- }
- PRINT "LIFT OFF!".
- WHEN SHIP:MAXTHRUST = 0 THEN {
- Print "Staging.".
- STAGE.
- PRESERVE.
- }
- SET MYSTEER to HEADING(90,90).
- LOCK STEERING TO MYSTEER.
- SET TARVEL to 100.
- SET TARHEAD to 90.
- UNTIL APOAPSIS > 100000 {
- IF SHIP:VELOCITY:SURFACE:MAG < TARVEL {
- SET MYSTEER TO HEADING(90,TARHEAD).
- } ELSE {
- SET TARVEL to TARVEL + 100.
- SET TARHEAD to TARHEAD - 8.
- IF TARHEAD < 0 {
- SET TARHEAD to 0.
- } ELSE {
- //PRINT "Set New Pitch " + TARGEAD.
- }
- }
- }
- PRINT "Desired AP Achieved. Start Coast".
- //Coast to AP
- LOCK THROTTLE to 0.0.
- UNTIL SHIP:ALTITUDE > 77000 {
- wait 1.
- }
- PRINT "Blow Protective Payload Shell".
- STAGE. //Blow Protective Shell
- UNTIL PERIAPSIS > 100000 {
- LOCK STEERING TO HEADING(90,0).
- IF APOAPSIS < 100000 {
- LOCK THROTTLE to 0.5.
- } ELSE IF APOAPSIS >= 100000 AND ETA:APOAPSIS > 12 {
- LOCK THROTTLE to 0.0.
- } IF ETA:APOAPSIS <= 7 {
- LOCK THROTTLE to 1.0.
- }
- }
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement