31 lines
441 B
Plaintext
31 lines
441 B
Plaintext
runoncepath("lib/control").
|
|
|
|
global done is false.
|
|
|
|
// Main UI.
|
|
local interface is gui(250, 300).
|
|
set interface:X to 200.
|
|
set interface:Y to 700.
|
|
|
|
// Main menu elements in here.
|
|
local y is interface:AddVLayout().
|
|
local x is y:AddHLayout().
|
|
|
|
set x:AddButton("HOVER"):onClick to {
|
|
Stabilize().
|
|
}.
|
|
|
|
set x:AddButton("LAND"):onClick to {
|
|
Stabilize(-2).
|
|
}.
|
|
|
|
|
|
on AG9 {
|
|
set done to true.
|
|
return true.
|
|
}
|
|
|
|
interface:show().
|
|
|
|
wait until false.
|