Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- GLOBAL vehicle IS LIST(
- LEXICON(
- "name", "Booster",
- "massTotal", 64349,
- "massFuel", 52422,
- "gLim", 10,
- "minThrottle", 0.36,
- "engines", LIST(LEXICON("isp", 288.5, "thrust", 914.12)),
- "staging", LEXICON(
- "jettison", FALSE,
- "ignition", FALSE
- )
- ),
- LEXICON(
- "name", "Upper",
- "massTotal", 9631,
- "massFuel", 6666,
- "engines", LIST(LEXICON("isp", 465, "thrust", 110)),
- "staging", LEXICON(
- "jettison", TRUE,
- "waitBeforeJettison", 3,
- "ignition", TRUE,
- "waitBeforeIgnition", 3,
- "ullage", "none"
- )
- )
- ).
- GLOBAL sequence IS LIST(
- LEXICON("time", -3, "type", "stage", "message", "Ignition Main Engine"),
- LEXICON("time", 0, "type", "stage", "message", "Liftoff!"),
- LEXICON("time", 210, "type", "jettison", "message", "PLF jettison", "massLost", 1589)
- ).
- GLOBAL controls IS LEXICON(
- "launchTimeAdvance", 25,
- "verticalAscentTime", 30,
- "pitchOverAngle", 6,
- "upfgActivation", 160
- ).
- GLOBAL mission IS LEXICON(
- "payload", 1018,
- "periapsis", 200,
- "apoapsis", 200,
- "inclination", 28.61,
- "LAN", 134.9,
- "direction", "nearest"
- ).
- SET STEERINGMANAGER:ROLLTS TO 10.
- SWITCH TO 0.
- cd("/pegas").
- CLEARSCREEN.
- PRINT "Loaded boot file: EarthAscent!".
- run pegas.ks.
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement