Basic example with black square cursor on orange background

exercise1/exercise1.lua

@@ -0,0 +1,50 @@
+function dump(o)
+   if type(o) == 'table' then
+      local s = '{ '
+      for k,v in pairs(o) do
+         if type(k) ~= 'number' then k = '"'..k..'"' end
+         s = s .. '['..k..'] = ' .. dump(v) .. ','
+      end
+      return s .. '} '
+   else
+      return tostring(o)
+   end
+end
+
+TICK_DELAY = 1 / 25
+
+local cursor = color_surface(8, 8, 0, 0, 0)
+
+function exercise1()
+    print("Hello World!")
+    warning("Hello Warning!")
+
+
+    img = fill_surface(VRESW, VRESH, 0xff, 0x77, 0x00)
+    cursor_setstorage(WORLDID)
+    
+    show_image(img)
+    show_image(cursor)
+end
+
+
+function exercise1_input(evtbl)
+    if evtbl.source ~= "mouse" then return end
+    if evtbl.samples == nil then return end
+    x, y = cursor_position()
+    sample = evtbl.samples[1]
+    if evtbl.subid == 0 then
+        move_cursor(sample, y)
+    elseif evtbl.subid == 1 then
+        move_cursor(x, sample)
+    else
+        warning("Unknown subid " .. evtbl.subid)
+    end
+
+end
+
+function exercise1_input_end()
+    x, y = cursor_position()
+    move_image(cursor, x, y, TICK_DELAY)
+    warning("" .. x .. ", " .. y)
+end