Advertisement
Guest User

PEGAS boot file

a guest
May 24th, 2018
121
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 1.40 KB | None | 0 0
  1. GLOBAL vehicle IS LIST(
  2. LEXICON(
  3. "name", "Booster",
  4. "massTotal", 64349,
  5. "massFuel", 52422,
  6. "gLim", 10,
  7. "minThrottle", 0.36,
  8. "engines", LIST(LEXICON("isp", 288.5, "thrust", 914.12)),
  9. "staging", LEXICON(
  10. "jettison", FALSE,
  11. "ignition", FALSE
  12. )
  13. ),
  14. LEXICON(
  15. "name", "Upper",
  16. "massTotal", 9631,
  17. "massFuel", 6666,
  18. "engines", LIST(LEXICON("isp", 465, "thrust", 110)),
  19. "staging", LEXICON(
  20. "jettison", TRUE,
  21. "waitBeforeJettison", 3,
  22. "ignition", TRUE,
  23. "waitBeforeIgnition", 3,
  24. "ullage", "none"
  25. )
  26. )
  27. ).
  28. GLOBAL sequence IS LIST(
  29. LEXICON("time", -3, "type", "stage", "message", "Ignition Main Engine"),
  30. LEXICON("time", 0, "type", "stage", "message", "Liftoff!"),
  31. LEXICON("time", 210, "type", "jettison", "message", "PLF jettison", "massLost", 1589)
  32. ).
  33. GLOBAL controls IS LEXICON(
  34. "launchTimeAdvance", 25,
  35. "verticalAscentTime", 30,
  36. "pitchOverAngle", 6,
  37. "upfgActivation", 160
  38. ).
  39. GLOBAL mission IS LEXICON(
  40. "payload", 1018,
  41. "periapsis", 200,
  42. "apoapsis", 200,
  43. "inclination", 28.61,
  44. "LAN", 134.9,
  45. "direction", "nearest"
  46. ).
  47. SET STEERINGMANAGER:ROLLTS TO 10.
  48. SWITCH TO 0.
  49. cd("/pegas").
  50. CLEARSCREEN.
  51. PRINT "Loaded boot file: EarthAscent!".
  52. run pegas.ks.
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement