about summary refs log tree commit diff stats
path: root/counter.tlv
blob: 036f4126e1efe1da025de55ff003a03ac63c1703 (plain) (blame)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
teliva_program = {
  window = [==[window = curses.stdscr()]==],
  n = [==[n = 0]==],
  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
  ]==],
  menu = [==[menu = {Enter="increment"}]==],
  update = [==[
function update(window)
  local key = curses.getch()
  if key == 10 then
    n = n+1
  end
end
  ]==],
  main = [==[
function main()
  for i=1,7 do
    curses.init_pair(i, 0, i)
  end

  while true do
    render(window)
    update(window)
  end
end
  ]==],
}