tweaks to test setup + adjusted safty margin
This commit is contained in:
@@ -12,14 +12,13 @@ function TestSetup{
|
|||||||
return.
|
return.
|
||||||
}
|
}
|
||||||
print "Setting up test".
|
print "Setting up test".
|
||||||
lock throttle to 100.
|
lock throttle to 0.5.
|
||||||
lock steering to heading(90, 89).
|
lock steering to heading(90, 89, 0).
|
||||||
gear off.
|
gear off.
|
||||||
wait until apoapsis > tgt.
|
wait until apoapsis > tgt.
|
||||||
lock steering to up.
|
lock steering to up.
|
||||||
lock throttle to 0.
|
lock throttle to 0.
|
||||||
unlock throttle.
|
unlock throttle.
|
||||||
unlock steering.
|
|
||||||
}
|
}
|
||||||
|
|
||||||
function Landing{
|
function Landing{
|
||||||
@@ -71,6 +70,8 @@ function Landing{
|
|||||||
|
|
||||||
function WaitFalling{
|
function WaitFalling{
|
||||||
parameter targetSpeed is 100.
|
parameter targetSpeed is 100.
|
||||||
|
sas off.
|
||||||
|
wait until altitude < 10000.
|
||||||
print "Coasting to apoapsis.".
|
print "Coasting to apoapsis.".
|
||||||
rcs on.
|
rcs on.
|
||||||
lock steering to up.
|
lock steering to up.
|
||||||
@@ -89,7 +90,7 @@ function Descent {
|
|||||||
local lock vertSpeed to verticalSpeed.
|
local lock vertSpeed to verticalSpeed.
|
||||||
local lock localGravity to GetLocalGravity(altitude).
|
local lock localGravity to GetLocalGravity(altitude).
|
||||||
local lock drag to GetDragDir(localGravity, ship:up:vector).
|
local lock drag to GetDragDir(localGravity, ship:up:vector).
|
||||||
local lock burnDist to CalculateSuicideBurnAltitude(vertSpeed, localGravity, 80, drag).
|
local lock burnDist to CalculateSuicideBurnAltitude(vertSpeed, localGravity, 100, drag).
|
||||||
|
|
||||||
wait until burnDist >= curAlt.
|
wait until burnDist >= curAlt.
|
||||||
print "Starting Burn".
|
print "Starting Burn".
|
||||||
@@ -108,7 +109,7 @@ function Descent {
|
|||||||
|
|
||||||
print "Launch to start.".
|
print "Launch to start.".
|
||||||
WaitForEngineStart().
|
WaitForEngineStart().
|
||||||
TestSetup(5000).
|
TestSetup(10000).
|
||||||
WaitFalling(100).
|
WaitFalling(100).
|
||||||
Descent().
|
Descent().
|
||||||
Landing().
|
Landing().
|
||||||
|
|||||||
Reference in New Issue
Block a user