diff options
| author | Steven Barth <steven@midlink.org> | 2008-08-31 11:16:52 +0000 |
|---|---|---|
| committer | Steven Barth <steven@midlink.org> | 2008-08-31 11:16:52 +0000 |
| commit | df52b711a78dbe8808628ae873acc1f3edefb1cf (patch) | |
| tree | 00b4c145e7ab0501a6de277478b659d51e50fc92 /contrib/luacurses/test/pair.lua | |
| parent | 36c76090638e80d1cb9ad2dd060aae65976f24c8 (diff) | |
Reorganise luacurses
Diffstat (limited to 'contrib/luacurses/test/pair.lua')
| -rw-r--r-- | contrib/luacurses/test/pair.lua | 18 |
1 files changed, 18 insertions, 0 deletions
diff --git a/contrib/luacurses/test/pair.lua b/contrib/luacurses/test/pair.lua new file mode 100644 index 000000000..f26980061 --- /dev/null +++ b/contrib/luacurses/test/pair.lua @@ -0,0 +1,18 @@ + +require("curses"); + +curses.initscr(); + +curses.start_color(); +curses.init_pair(1, curses.COLOR_BLUE, curses.COLOR_YELLOW); +curses.init_pair(2, curses.COLOR_CYAN, curses.COLOR_RED); + +for i = 1, 2 do + local r, f, b = curses.pair_content(i); + curses.attrset(curses.COLOR_PAIR(i)); + curses.addstr(f .. ", " .. b .. "\n"); +end + +curses.getch(); +curses.endwin(); + |