boostback.ks

set done to false.
until done {
  set STEERINGMANAGER:MAXSTOPPINGTIME to 15.
  set STEERINGMANAGER:PITCHPID:KD to 1.
  set STEERINGMANAGER:YAWPID:KD to 1.
  set landingZone to vessel("My Mum Wonders About Me"):geoposition. //Target
  lock lngoff to (landingZone:lng - addons:tr:impactpos:lng) * 10472.
  lock latoff to (landingZone:lat - addons:tr:impactpos:lat) * 10472.
  set rm to 1.
  if rm = 1 {
    sas off.
    rcs on.
    toggle ag7. //Turn off all engines, but left the center
    toggle ag6. //Turn on two aditional engines
    lock steering to heading(;andingZone:heading, 180).
    wait 10.
    lock throttle to 1.
    print lngoff.
    rcs off.
    when latoff > 20 then {
      lock steering to heading(landingZone:heading+10, 180).
      preserve.
    }

    when latoff < -20 then {
      lock steering to heading(landingZone:heading-10, 180).
      preserve.
    }

    wait until lngoff > -4500.
    toggle brakes.
    lock throttle to 0.
    toggle ag6. //Turn off two engines
    wait 2.
    set done to true.
    set rm to 0.
  }
}

unlock steering.
unlock throttle.
wait 3.
print "Bb completed!".
rcs on.