relative-gps coord system

sys/apis/gps.lua

@@ -31,13 +31,13 @@ function GPS.getPoint(timeout, debug)
   return pt
 end
 
-function GPS.getHeading()
+function GPS.getHeading(timeout)
 
   if not turtle then
     return
   end
 
-  local apt = GPS.locate()
+  local apt = GPS.locate(timeout)
   if not apt then
     return
   end
@@ -67,8 +67,8 @@ function GPS.getHeading()
   return 3
 end
 
-function GPS.getPointAndHeading()
-  local heading = GPS.getHeading()
+function GPS.getPointAndHeading(timeout)
+  local heading = GPS.getHeading(timeout)
   if heading then
     local pt = GPS.getPoint()
     if pt then

sys/apis/ui.lua

@@ -1260,6 +1260,8 @@ function UI.Device:runTransitions(transitions, canvas)
   canvas:blitClipped(self.device) -- and blit the remainder
   canvas:reset()
 
+  local queue = { } -- don't miss events while transition is running
+                    -- especially timers
   while true do
     for _,k in ipairs(Util.keys(transitions)) do
       local transition = transitions[k]
@@ -1270,7 +1272,17 @@ function UI.Device:runTransitions(transitions, canvas)
     if Util.empty(transitions) then
       break
     end
-    os.sleep() -- ?
+    local timerId = os.startTimer(0)
+    while true do
+      local e = { os.pullEvent() }
+      if e[1] == 'timer' and e[2] == timerId then
+        break
+      end
+      table.insert(queue, e)
+    end
+  end
+  for _, e in ipairs(queue) do
+    Event.processEvent(e)
   end
 end