kos-kerboscripts/launch_rikerc.ks at master · rebootl/kos-kerboscripts · GitHub

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
//
// launch script for rocket: munrise 1
//
//CLEARSCREEN.

// lock stuff
LOCK THROTTLE TO 1.0.
LOCK STEERING TO HEADING(90, 90).

// countdown
PRINT "Counting down:".
//FROM { LOCAL countdown IS 10. } UNTIL countdown = 0 STEP
//     { SET countdown TO countdown - 1. } DO {
//    PRINT "..." + countdown.
//    WAIT 1.
//}
PRINT "3.. 2.. 1.. go..".
PRINT "Ignition...".
STAGE.
//WAIT UNTIL STAGE:READY.
//STAGE.
// -> use wait until here ??
//SET turn_init TO false.
//UNTIL turn_init = true {
//  IF SHIP:VELOCITY:SURFACE:MAG >= 100 {
//    LOCK STEERING TO HEADING(90, 90 - 90 * APOAPSIS / 80000).
//    turn_init = true.
//  }
//  WAIT 0.5.
//}
WAIT UNTIL SHIP:VELOCITY:SURFACE:MAG >= 100.
PRINT "Pitch over...".
LOCK STEERING TO HEADING(90, 90 - 90 * APOAPSIS / 80000).

//WAIT UNTIL SHIP:VELOCITY:SURFACE:MAG >= 250.
//PRINT "Enter gravity turn...".
//LOCK STEERING TO PROGRADE.
// -> stage boosters
//WAIT UNTIL SHIP:PARTSTAGGED("LFB1")[0]:FLAMEOUT.
//PRINT "Booster sep...".
// give some time to "unload"
//WAIT 2.
//STAGE.

WAIT UNTIL SHIP:APOAPSIS >= 75000.
PRINT "Apoapsis 75k, coasting...".
LOCK THROTTLE TO 0.

LOCK STEERING TO PROGRADE.

WAIT UNTIL ETA:APOAPSIS <= 30.
//wait until SHIP:ALTITUDE >= 78500.
PRINT "Circularize...".
LOCK THROTTLE TO 1.

WAIT UNTIL STAGE:LIQUIDFUEL = 0.
PRINT "1st stage empty - sep.".
PRINT "Stage, stage...!".
STAGE.
WAIT UNTIL STAGE:READY.
STAGE. // init 2nd stage

WAIT UNTIL SHIP:PERIAPSIS >= 75000.
LOCK THROTTLE TO 0.

//This sets the user's throttle setting to zero to prevent the throttle
//from returning to the position it was at before the script was run.
SET SHIP:CONTROL:PILOTMAINTHROTTLE TO 0.