26 lines
489 B
Plaintext
26 lines
489 B
Plaintext
|
|
if status = "PRELAUNCH" {
|
|
import("library/lib_ascent").
|
|
|
|
CORE:PART:GETMODULE("kOSProcessor"):DOEVENT("Open Terminal").
|
|
|
|
print "Waiting for Engine Start...".
|
|
WaitForEngineStart().
|
|
clearScreen.
|
|
|
|
sas off.
|
|
set profile to 0.7.
|
|
set turn_start to 1000.
|
|
set target_orbit to 150000.
|
|
|
|
Ascent(target_orbit, turn_start, profile, 3).
|
|
|
|
|
|
when altitude > 80000 then {
|
|
ag1 on.
|
|
}
|
|
|
|
CORE:PART:GETMODULE("kOSProcessor"):DOEVENT("Close Terminal").
|
|
sas on.
|
|
SHUTDOWN.
|
|
} |