annabunches/kOS
1
0
Fork 0
Code Issues Pull Requests Projects Releases Wiki Activity

Add code to estimate at what distance from a grounded target we should burn to come to a stop over the target.

Browse Source
This commit is contained in:
Anna Rose
2021-08-10 18:08:00 -04:00
parent 224a076b8b
commit aa7e50cfff
3 changed files with 69 additions and 9 deletions
Download Patch File Download Diff File Expand all files Collapse all files

37
prog/rocket.ks
View File

@ -39,8 +39,8 @@ set btn:ONTOGGLE to {
MakeMenu(
stk,
MakeButton(rows[0], "SENSOR"),
List(
MakeButton(rows[0], "SENS"),
List(
List("Pressure", "RO", "-1"),
List("Temperature", "RO", "-1"),
List("Acceleration", "RO", "-1"),
@ -54,16 +54,21 @@ MakeMenu(
MakeMenu(
stk,
MakeButton(rows[0], "CONF"),
MakeButton(rows[0], "GRND"),
List(
List("Torque Epsilon Max", "SCALAR", "0.001"),
List("Max Stopping Time", "SCALAR", "2.0")
List("Burn Distance", "RO", "-1"),
List("Stopping Time", "RO", "-1"),
List("Stopping Distance", "RO", "-1"),
List("Stopping dV", "RO", "-1")
),
"Apply",
"",
{ parameter options. },
{
parameter options.
set STEERINGMANAGER:TORQUEEPSILONMAX to options["Torque Epsilon Max"]:TEXT:ToNumber().
set STEERINGMANAGER:MAXSTOPPINGTIME to options["Max Stopping Time"]:TEXT:ToNumber().
set options["Burn Distance"]:TEXT to TargetBurnDistance():TOSTRING.
set options["Stopping dV"]:TEXT to SHIP:VELOCITY:SURFACE:MAG:TOSTRING.
set options["Stopping Time"]:TEXT to BurnTime(SHIP:VELOCITY:SURFACE:MAG):TOSTRING.
set options["Stopping Distance"]:TEXT to StoppingDistance():TOSTRING.
}
).
@ -138,6 +143,22 @@ MakeMenu(
}
).
MakeMenu(
stk,
MakeButton(rows[2], "CONF"),
List(
List("Torque Epsilon Max", "SCALAR", "0.001"),
List("Max Stopping Time", "SCALAR", "2.0")
),
"Apply",
{
parameter options.
set STEERINGMANAGER:TORQUEEPSILONMAX to options["Torque Epsilon Max"]:TEXT:ToNumber().
set STEERINGMANAGER:MAXSTOPPINGTIME to options["Max Stopping Time"]:TEXT:ToNumber().
}
).
iface:show().
wait until false.