anna/kOS
1
0
Fork 0
Code Pull requests Releases Activity Actions

Add helicopter hovering code that works.

Browse source
This commit is contained in:
Anna Rose Wiggins 2021-07-25 17:24:34 -04:00
parent c5e26ab1ec
commit 6d9b8fc554
5 changed files with 150 additions and 67 deletions
Download patch file Download diff file Expand all files Collapse all files

16
helicopter/init.ks
View file

@ -1,3 +1,7 @@
runoncepath("lib/control").
global done is false.
// Main UI.
local interface is gui(250, 300).
set interface:X to 200.
@ -8,9 +12,19 @@ local y is interface:AddVLayout().
local x is y:AddHLayout().
set x:AddButton("HOVER"):onClick to {
run "hover".
Stabilize().
}.
set x:AddButton("LAND"):onClick to {
Stabilize(-2).
}.
on AG9 {
set done to true.
return true.
}
interface:show().
wait until false.