summary refs log blame commit diff stats
path: root/doc/print_keys.py
blob: f87a2a408ae3b609de5cc1e9b3ad113ba8a4b55f (plain) (tree)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
                     












                                                      
#!/usr/bin/env python
"""
You can use this tool to find out values of keypresses
"""

from curses import *

sep = '; '

@wrapper
def main(w):
	while True:
		w.addstr(str(w.getch()) + sep)
"nv">new-counter, x:num -> n:num/space:1 [ local-scope load-inputs 0:space/names:new-counter <- copy outer # setup outer space; it *must* come from 'new-counter' n/space:1 <- add n/space:1, x ] def main [ local-scope # counter A a:space/names:new-counter <- new-counter 34 # counter B b:space/names:new-counter <- new-counter 23 # increment both by 2 but in different ways increment-counter a, 1 b-value:num <- increment-counter b, 2 a-value:num <- increment-counter a, 1 # check results $print [Contents of counters], 10/newline $print [a: ], a-value, [ b: ], b-value, 10/newline ]