43 lines
892 B
Plaintext
43 lines
892 B
Plaintext
// assumptions about helicopter builds:
|
|
// * AG10 toggles the rotor engine power. (with appropriate RPM set by default)
|
|
// * AG9 is unmapped.
|
|
// * Main throttle controls collective.
|
|
|
|
RunOncePath("lib/stabilize_helicopter").
|
|
RunOncePath("lib/ui").
|
|
|
|
clearguis().
|
|
|
|
global done is false.
|
|
on AG9 {
|
|
set done to true.
|
|
return true.
|
|
}
|
|
|
|
// Top-level elements.
|
|
local iface is gui(250, 300).
|
|
set iface:X to 200.
|
|
set iface:Y to 700.
|
|
local top is iface:AddVLayout().
|
|
local rows is List(MakeRow(top)).
|
|
|
|
set rows[0]:AddButton("HOVER"):onClick to {
|
|
Hover().
|
|
}.
|
|
|
|
set rows[0]:AddButton("LAND"):onClick to {
|
|
// todo: consider a more elaborate landing script that adjusts
|
|
// velocity as a function of altitude.
|
|
when SHIP:STATUS = "LANDED" then {
|
|
set done to true.
|
|
set SHIP:CONTROL:PILOTMAINTHROTTLE to 0.5.
|
|
toggle AG10.
|
|
BRAKES on.
|
|
}
|
|
Hover(-5).
|
|
}.
|
|
|
|
iface:show().
|
|
|
|
wait until false.
|