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
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
|
#!/usr/bin/ruby
# Copyright (c) 2004 by Simon Kaczor <skaczor@cox.net>
# Example from the NCurses Programming HOWTO
# This example uses module functions that are documented in the ncurses man page.
# For a more rubyish approach that uses Ruby objects see form2.rb
#
# The original example contained the following copyright:
# Copyright (c) 2001 by Pradeep Padala. This document may be distributed
# under the terms set forth in the LDP license at linuxdoc.org/COPYRIGHT.html.
require 'ncursesw.rb'
begin
scr = Ncurses.initscr()
Ncurses.cbreak()
Ncurses.noecho()
Ncurses.keypad(scr, true)
#create some fields
fields = Array.new
fields.push(Ncurses::Form.new_field(1,10,4,18,0,0))
fields.push(Ncurses::Form.new_field(1,10,6,18,0,0))
# set field options
Ncurses::Form.set_field_back(fields[0], Ncurses::A_UNDERLINE)
Ncurses::Form.field_opts_off(fields[0], Ncurses::Form::O_AUTOSKIP)
Ncurses::Form.set_field_back(fields[1], Ncurses::A_UNDERLINE)
Ncurses::Form.field_opts_off(fields[1], Ncurses::Form::O_AUTOSKIP)
# create a form
form = Ncurses::Form.new_form(fields)
# post the form and refresh the screen
Ncurses::Form.post_form(form)
scr.refresh()
Ncurses.mvprintw(4, 10, "Value 1:")
Ncurses.mvprintw(6, 10, "Value 2:")
scr.refresh()
buf = ""
if not defined? Ncurses::Form.form_driver_w
raise NotImplementedError, "This example needs a ncurses version with the form_driver_w method"
end
# Loop through to get user requests
while(true) do
ret = Ncurses.get_wch()
ch = ret[1]
Ncurses.mvprintw(8, 10, "Got: #{ch.inspect} (#{[ch].pack("U")})")
case (ret[0])
when Ncurses::OK
# If this is a normal character, it gets Printed
#prbuf = fields[0].field_buffer 0
##buf = buf.force_encoding('utf-8') + [ch].pack('U')
#buf = prbuf + [ch].pack('U')
##buf = sbuf.force_encoding('utf-8') + [ch].pack('U')
#fields[0].set_field_buffer(0, buf)
#sbuf = fields[0].field_buffer 0
##fields[0].working.add_wch 'a'
#Ncurses.mvprintw(12, 10, "buf: #{sbuf}")
#Ncurses.mvprintw(13, 10, "pbuf: #{prbuf}")
#Ncurses.mvprintw(14, 10, "mbuf: #{buf}")
#Ncurses.wadd_wch(form.win, ch)
#buf = fields[0].field_buffer(0)
#buf = buf.force_encoding('utf-8') + [ch].pack("U")
#fields[0].set_field_buffer(0, buf)
#fields[0].set_field_buffer(0, [ch].pack("U"))
Ncurses::Form.form_driver_w(form, ret[0], ret[1])
#puts "{fields[0].methods}"
#puts "#{form.methods}"
#puts "#{fields[0].methods}"
#Ncurses.mvprintw(9, 10, "Type: OK ")
when Ncurses::KEY_CODE_YES
Ncurses.mvprintw(9, 10, "Type: KEY_CODE_YES")
case(ch)
when Ncurses::KEY_DOWN
# Go to next field
Ncurses::Form.form_driver(form, Ncurses::Form::REQ_NEXT_FIELD)
# Go to the end of the present buffer
# Leaves nicely at the last character
Ncurses::Form.form_driver(form, Ncurses::Form::REQ_END_LINE)
when Ncurses::KEY_UP
#Go to previous field
Ncurses::Form.form_driver(form, Ncurses::Form::REQ_PREV_FIELD)
Ncurses::Form.form_driver(form, Ncurses::Form::REQ_END_LINE);
end
else
Ncurses.mvprintw(9, 10, "Type: Unknown: #{ret[0].inspect} ")
end
end
# unpost and free form
Ncurses::Form.unpost_form(form);
Ncurses::Form.free_form(form)
Ncurses::Form.free_field(fields[0]);
Ncurses::Form.free_field(fields[1]);
#using class methods this time
# form = Ncurses::Form::FORM.new(fields)
# puts "Created form: #{form.inspect}\n"
# form.free()
ensure
# put the screen back in its normal state
Ncurses.echo()
Ncurses.nocbreak()
Ncurses.nl()
Ncurses.endwin()
end
|
