diff --git a/lib/ui.ks b/lib/ui.ks
new file mode 100644
index 0000000..15232c0
--- /dev/null
+++ b/lib/ui.ks
@@ -0,0 +1,14 @@
+
+function makeRow {
+  parameter p.
+  return p:AddHLayout().
+}
+
+function makeButton {
+  parameter p.
+  parameter l.
+  parameter f.
+  local b is p:AddButton(l).
+  set b:onClick to f.
+  return b.
+}