basic touch system impl

samples/bin/library/scripts/sample_08/sample_08.lua

@@ -11,8 +11,15 @@ end
 
 ---@param go gobject
 ---@param type string
----@param event any
+---@param event touchable_input_evt | touchable_mouse_evt
 function M:on_event(go, type, event)
+    if type == "touchable.mouse_evt" then
+        the_debug:trace(string.format(
+            "scene %q touched(%s %s)",
+            go.named and go.named.name or "---",
+            event.type,
+            event.button))
+    end
 end
 
 ---@param go gobject