about summary refs log tree commit diff stats
path: root/src/x.tlv
diff options
context:
space:
mode:
Diffstat (limited to 'src/x.tlv')
-rw-r--r--src/x.tlv42
1 files changed, 42 insertions, 0 deletions
diff --git a/src/x.tlv b/src/x.tlv
new file mode 100644
index 0000000..4204c72
--- /dev/null
+++ b/src/x.tlv
@@ -0,0 +1,42 @@
+- __teliva_timestamp: original
+  window:
+    >window = curses.stdscr()
+- __teliva_timestamp: original
+  n:
+    >n = 0
+- __teliva_timestamp: original
+  render:
+    >function render(window)
+    >  window:clear()
+    >  window:attron(curses.A_BOLD)
+    >  window:attron(curses.color_pair(6))
+    >  window:mvaddstr(10, 10, "     ")
+    >  window:mvaddstr(10, 11, n)
+    >  window:attroff(curses.color_pair(6))
+    >  window:attroff(curses.A_BOLD)
+    >  curses.refresh()
+    >end
+- __teliva_timestamp: original
+  menu:
+    >menu = {Enter="increment"}
+- __teliva_timestamp: original
+  update:
+    >function update(window)
+    >  local key = curses.getch()
+    >  if key == 10 then
+    >    n = n+1
+    >  end
+    >end
+- __teliva_timestamp: original
+  main:
+    >function main()
+    >  for i=1,7 do
+    >    curses.init_pair(i, 0, i)
+    >  end
+    >  curses.init_pair(255, 15, 1)  -- reserved for Teliva error messages
+    >
+    >  while true do
+    >    render(window)
+    >    update(window)
+    >  end
+    >end