~ubuntu-branches/debian/sid/ncurses/sid-200908151543

package <A HREF="terminal_interface__ads.htm#ref_42_9">Terminal_Interface</A>.<A NAME="ref_49_28" HREF="terminal_interface-curses__adb.htm#ref_50_33">Curses</A> is

pragma Preelaborate (<A HREF="terminal_interface__ads.htm#ref_42_9">Terminal_Interface</A>.<A HREF="terminal_interface-curses__ads.htm#ref_49_28">Curses</A>);

pragma Linker_Options ("-lncursesw");

<A NAME="ref_53_4">NC_Major_Version</A> : constant := 5; -- Major version of the library

<A NAME="ref_54_4">NC_Minor_Version</A> : constant := 6; -- Minor version of the library

<A NAME="ref_55_4">NC_Version</A> : constant String := "5.6"; -- Version of library

type <A NAME="ref_57_9">Window</A> is private;

<A NAME="ref_58_4">Null_Window</A> : constant <A HREF="terminal_interface-curses__ads.htm#ref_57_9">Window</A>;

type <A NAME="ref_60_9">Line_Position</A> is new Natural; -- line coordinate

type <A NAME="ref_61_9">Column_Position</A> is new Natural; -- column coordinate

subtype <A NAME="ref_63_12">Line_Count</A> is <A HREF="terminal_interface-curses__ads.htm#ref_60_9">Line_Position</A> range 1 .. <A HREF="terminal_interface-curses__ads.htm#ref_60_9">Line_Position</A>'Last;

-- Type to count lines. We do not allow null windows, so must be positive

subtype Column_Count is Column_Position range 1 .. Column_Position'Last;

subtype <A NAME="ref_65_12">Column_Count</A> is <A HREF="terminal_interface-curses__ads.htm#ref_61_9">Column_Position</A> range 1 .. <A HREF="terminal_interface-curses__ads.htm#ref_61_9">Column_Position</A>'Last;

-- Type to count columns. We do not allow null windows, so must be positive

type Key_Code is new Integer;

type <A NAME="ref_68_9">Key_Code</A> is new Integer;

-- That is anything including real characters, special keys and logical

-- request codes.

-- FIXME: The "-1" should be Curses_Err

subtype Real_Key_Code is Key_Code range -1 .. 8#777#;

subtype <A NAME="ref_73_12">Real_Key_Code</A> is <A HREF="terminal_interface-curses__ads.htm#ref_68_9">Key_Code</A> range -1 .. 8#777#;

-- This are the codes that potentially represent a real keystroke.

-- Not all codes may be possible on a specific terminal. To check the

-- availability of a special key, the Has_Key function is provided.

subtype Special_Key_Code is Real_Key_Code

range 8#400# .. Real_Key_Code'Last;

subtype <A NAME="ref_78_12">Special_Key_Code</A> is <A HREF="terminal_interface-curses__ads.htm#ref_73_12">Real_Key_Code</A>

range 8#400# .. <A HREF="terminal_interface-curses__ads.htm#ref_73_12">Real_Key_Code</A>'Last;

-- Type for a function- or special key number

subtype Normal_Key_Code is Real_Key_Code range

subtype <A NAME="ref_82_12">Normal_Key_Code</A> is <A HREF="terminal_interface-curses__ads.htm#ref_73_12">Real_Key_Code</A> range

Character'Pos (Character'First) .. Character'Pos (Character'Last);

-- This are the codes for regular (incl. non-graphical) characters.

-- Constants for function- and special keys

--

<A NAME="ref_89_4">Key_None</A> : constant <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> := 8#400#;

<A NAME="ref_90_4">Key_Code_Yes</A> : constant <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> := 8#400#;

<A NAME="ref_91_4">Key_Min</A> : constant <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> := 8#401#;

<A NAME="ref_92_4">Key_Break</A> : constant <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> := 8#401#;

<A NAME="ref_93_4">Key_Cursor_Down</A> : constant <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> := 8#402#;

<A NAME="ref_94_4">Key_Cursor_Up</A> : constant <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> := 8#403#;

100

<A NAME="ref_95_4">Key_Cursor_Left</A> : constant <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> := 8#404#;

101

<A NAME="ref_96_4">Key_Cursor_Right</A> : constant <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> := 8#405#;

102

<A NAME="ref_97_4">Key_Home</A> : constant <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> := 8#406#;

103

<A NAME="ref_98_4">Key_Backspace</A> : constant <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> := 8#407#;

104

<A NAME="ref_99_4">Key_F0</A> : constant <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> := 8#410#;

105

<A NAME="ref_100_4">Key_F1</A> : constant <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> := 8#411#;

106

<A NAME="ref_101_4">Key_F2</A> : constant <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> := 8#412#;

107

<A NAME="ref_102_4">Key_F3</A> : constant <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> := 8#413#;

108

<A NAME="ref_103_4">Key_F4</A> : constant <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> := 8#414#;

109

<A NAME="ref_104_4">Key_F5</A> : constant <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> := 8#415#;

110

<A NAME="ref_105_4">Key_F6</A> : constant <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> := 8#416#;

111

<A NAME="ref_106_4">Key_F7</A> : constant <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> := 8#417#;

112

<A NAME="ref_107_4">Key_F8</A> : constant <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> := 8#420#;

113

<A NAME="ref_108_4">Key_F9</A> : constant <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> := 8#421#;

114

<A NAME="ref_109_4">Key_F10</A> : constant <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> := 8#422#;

115

<A NAME="ref_110_4">Key_F11</A> : constant <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> := 8#423#;

116

<A NAME="ref_111_4">Key_F12</A> : constant <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> := 8#424#;

117

<A NAME="ref_112_4">Key_F13</A> : constant <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> := 8#425#;

118

<A NAME="ref_113_4">Key_F14</A> : constant <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> := 8#426#;

119

<A NAME="ref_114_4">Key_F15</A> : constant <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> := 8#427#;

120

<A NAME="ref_115_4">Key_F16</A> : constant <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> := 8#430#;

121

<A NAME="ref_116_4">Key_F17</A> : constant <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> := 8#431#;

122

<A NAME="ref_117_4">Key_F18</A> : constant <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> := 8#432#;

123

<A NAME="ref_118_4">Key_F19</A> : constant <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> := 8#433#;

124

<A NAME="ref_119_4">Key_F20</A> : constant <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> := 8#434#;

125

<A NAME="ref_120_4">Key_F21</A> : constant <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> := 8#435#;

126

<A NAME="ref_121_4">Key_F22</A> : constant <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> := 8#436#;

127

<A NAME="ref_122_4">Key_F23</A> : constant <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> := 8#437#;

128

<A NAME="ref_123_4">Key_F24</A> : constant <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> := 8#440#;

129

<A NAME="ref_124_4">Key_Delete_Line</A> : constant <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> := 8#510#;

130

<A NAME="ref_125_4">Key_Insert_Line</A> : constant <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> := 8#511#;

131

<A NAME="ref_126_4">Key_Delete_Char</A> : constant <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> := 8#512#;

132

<A NAME="ref_127_4">Key_Insert_Char</A> : constant <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> := 8#513#;

133

<A NAME="ref_128_4">Key_Exit_Insert_Mode</A> : constant <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> := 8#514#;

134

<A NAME="ref_129_4">Key_Clear_Screen</A> : constant <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> := 8#515#;

135

<A NAME="ref_130_4">Key_Clear_End_Of_Screen</A> : constant <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> := 8#516#;

136

<A NAME="ref_131_4">Key_Clear_End_Of_Line</A> : constant <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> := 8#517#;

137

<A NAME="ref_132_4">Key_Scroll_1_Forward</A> : constant <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> := 8#520#;

138

<A NAME="ref_133_4">Key_Scroll_1_Backward</A> : constant <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> := 8#521#;

139

<A NAME="ref_134_4">Key_Next_Page</A> : constant <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> := 8#522#;

140

<A NAME="ref_135_4">Key_Previous_Page</A> : constant <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> := 8#523#;

141

<A NAME="ref_136_4">Key_Set_Tab</A> : constant <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> := 8#524#;

142

<A NAME="ref_137_4">Key_Clear_Tab</A> : constant <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> := 8#525#;

143

<A NAME="ref_138_4">Key_Clear_All_Tabs</A> : constant <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> := 8#526#;

144

<A NAME="ref_139_4">Key_Enter_Or_Send</A> : constant <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> := 8#527#;

145

<A NAME="ref_140_4">Key_Soft_Reset</A> : constant <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> := 8#530#;

146

<A NAME="ref_141_4">Key_Reset</A> : constant <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> := 8#531#;

147

<A NAME="ref_142_4">Key_Print</A> : constant <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> := 8#532#;

148

<A NAME="ref_143_4">Key_Bottom</A> : constant <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> := 8#533#;

149

<A NAME="ref_144_4">Key_Upper_Left_Of_Keypad</A> : constant <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> := 8#534#;

150

<A NAME="ref_145_4">Key_Upper_Right_Of_Keypad</A> : constant <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> := 8#535#;

151

<A NAME="ref_146_4">Key_Center_Of_Keypad</A> : constant <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> := 8#536#;

152

<A NAME="ref_147_4">Key_Lower_Left_Of_Keypad</A> : constant <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> := 8#537#;

153

<A NAME="ref_148_4">Key_Lower_Right_Of_Keypad</A> : constant <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> := 8#540#;

154

<A NAME="ref_149_4">Key_Back_Tab</A> : constant <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> := 8#541#;

155

<A NAME="ref_150_4">Key_Beginning</A> : constant <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> := 8#542#;

156

<A NAME="ref_151_4">Key_Cancel</A> : constant <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> := 8#543#;

157

<A NAME="ref_152_4">Key_Close</A> : constant <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> := 8#544#;

158

<A NAME="ref_153_4">Key_Command</A> : constant <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> := 8#545#;

159

<A NAME="ref_154_4">Key_Copy</A> : constant <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> := 8#546#;

160

<A NAME="ref_155_4">Key_Create</A> : constant <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> := 8#547#;

161

<A NAME="ref_156_4">Key_End</A> : constant <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> := 8#550#;

162

<A NAME="ref_157_4">Key_Exit</A> : constant <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> := 8#551#;

163

<A NAME="ref_158_4">Key_Find</A> : constant <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> := 8#552#;

164

<A NAME="ref_159_4">Key_Help</A> : constant <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> := 8#553#;

165

<A NAME="ref_160_4">Key_Mark</A> : constant <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> := 8#554#;

166

<A NAME="ref_161_4">Key_Message</A> : constant <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> := 8#555#;

167

<A NAME="ref_162_4">Key_Move</A> : constant <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> := 8#556#;

168

<A NAME="ref_163_4">Key_Next</A> : constant <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> := 8#557#;

169

<A NAME="ref_164_4">Key_Open</A> : constant <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> := 8#560#;

170

<A NAME="ref_165_4">Key_Options</A> : constant <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> := 8#561#;

171

<A NAME="ref_166_4">Key_Previous</A> : constant <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> := 8#562#;

172

<A NAME="ref_167_4">Key_Redo</A> : constant <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> := 8#563#;

173

<A NAME="ref_168_4">Key_Reference</A> : constant <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> := 8#564#;

174

<A NAME="ref_169_4">Key_Refresh</A> : constant <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> := 8#565#;

175

<A NAME="ref_170_4">Key_Replace</A> : constant <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> := 8#566#;

176

<A NAME="ref_171_4">Key_Restart</A> : constant <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> := 8#567#;

177

<A NAME="ref_172_4">Key_Resume</A> : constant <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> := 8#570#;

178

<A NAME="ref_173_4">Key_Save</A> : constant <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> := 8#571#;

179

<A NAME="ref_174_4">Key_Shift_Begin</A> : constant <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> := 8#572#;

180

<A NAME="ref_175_4">Key_Shift_Cancel</A> : constant <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> := 8#573#;

181

<A NAME="ref_176_4">Key_Shift_Command</A> : constant <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> := 8#574#;

182

<A NAME="ref_177_4">Key_Shift_Copy</A> : constant <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> := 8#575#;

183

<A NAME="ref_178_4">Key_Shift_Create</A> : constant <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> := 8#576#;

184

<A NAME="ref_179_4">Key_Shift_Delete_Char</A> : constant <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> := 8#577#;

185

<A NAME="ref_180_4">Key_Shift_Delete_Line</A> : constant <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> := 8#600#;

186

<A NAME="ref_181_4">Key_Select</A> : constant <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> := 8#601#;

187

<A NAME="ref_182_4">Key_Shift_End</A> : constant <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> := 8#602#;

188

<A NAME="ref_183_4">Key_Shift_Clear_End_Of_Line</A> : constant <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> := 8#603#;

189

<A NAME="ref_184_4">Key_Shift_Exit</A> : constant <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> := 8#604#;

190

<A NAME="ref_185_4">Key_Shift_Find</A> : constant <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> := 8#605#;

191

<A NAME="ref_186_4">Key_Shift_Help</A> : constant <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> := 8#606#;

192

<A NAME="ref_187_4">Key_Shift_Home</A> : constant <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> := 8#607#;

193

<A NAME="ref_188_4">Key_Shift_Insert_Char</A> : constant <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> := 8#610#;

194

<A NAME="ref_189_4">Key_Shift_Cursor_Left</A> : constant <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> := 8#611#;

195

<A NAME="ref_190_4">Key_Shift_Message</A> : constant <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> := 8#612#;

196

<A NAME="ref_191_4">Key_Shift_Move</A> : constant <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> := 8#613#;

197

<A NAME="ref_192_4">Key_Shift_Next_Page</A> : constant <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> := 8#614#;

198

<A NAME="ref_193_4">Key_Shift_Options</A> : constant <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> := 8#615#;

199

<A NAME="ref_194_4">Key_Shift_Previous_Page</A> : constant <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> := 8#616#;

200

<A NAME="ref_195_4">Key_Shift_Print</A> : constant <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> := 8#617#;

201

<A NAME="ref_196_4">Key_Shift_Redo</A> : constant <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> := 8#620#;

202

<A NAME="ref_197_4">Key_Shift_Replace</A> : constant <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> := 8#621#;

203

<A NAME="ref_198_4">Key_Shift_Cursor_Right</A> : constant <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> := 8#622#;

204

<A NAME="ref_199_4">Key_Shift_Resume</A> : constant <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> := 8#623#;

205

<A NAME="ref_200_4">Key_Shift_Save</A> : constant <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> := 8#624#;

206

<A NAME="ref_201_4">Key_Shift_Suspend</A> : constant <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> := 8#625#;

207

<A NAME="ref_202_4">Key_Shift_Undo</A> : constant <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> := 8#626#;

208

<A NAME="ref_203_4">Key_Suspend</A> : constant <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> := 8#627#;

209

<A NAME="ref_204_4">Key_Undo</A> : constant <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> := 8#630#;

210

<A NAME="ref_205_4">Key_Mouse</A> : constant <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> := 8#631#;

211

Key_Resize : constant Special_Key_Code := 8#632#;

212

213

Key_Max : constant Special_Key_Code

214

:= Special_Key_Code'Last;

215

216

subtype User_Key_Code is Key_Code

217

range (Key_Max + 129) .. Key_Code'Last;

<A NAME="ref_88_4">Key_None</A> : constant <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> := 8#400#;

<A NAME="ref_89_4">Key_Code_Yes</A> : constant <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> := 8#400#;

<A NAME="ref_90_4">Key_Min</A> : constant <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> := 8#401#;

<A NAME="ref_91_4">Key_Break</A> : constant <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> := 8#401#;

<A NAME="ref_92_4">Key_Cursor_Down</A> : constant <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> := 8#402#;

<A NAME="ref_93_4">Key_Cursor_Up</A> : constant <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> := 8#403#;

<A NAME="ref_94_4">Key_Cursor_Left</A> : constant <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> := 8#404#;

100

<A NAME="ref_95_4">Key_Cursor_Right</A> : constant <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> := 8#405#;

101

<A NAME="ref_96_4">Key_Home</A> : constant <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> := 8#406#;

102

<A NAME="ref_97_4">Key_Backspace</A> : constant <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> := 8#407#;

103

<A NAME="ref_98_4">Key_F0</A> : constant <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> := 8#410#;

104

<A NAME="ref_99_4">Key_F1</A> : constant <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> := 8#411#;

105

<A NAME="ref_100_4">Key_F2</A> : constant <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> := 8#412#;

106

<A NAME="ref_101_4">Key_F3</A> : constant <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> := 8#413#;

107

<A NAME="ref_102_4">Key_F4</A> : constant <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> := 8#414#;

108

<A NAME="ref_103_4">Key_F5</A> : constant <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> := 8#415#;

109

<A NAME="ref_104_4">Key_F6</A> : constant <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> := 8#416#;

110

<A NAME="ref_105_4">Key_F7</A> : constant <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> := 8#417#;

111

<A NAME="ref_106_4">Key_F8</A> : constant <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> := 8#420#;

112

<A NAME="ref_107_4">Key_F9</A> : constant <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> := 8#421#;

113

<A NAME="ref_108_4">Key_F10</A> : constant <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> := 8#422#;

114

<A NAME="ref_109_4">Key_F11</A> : constant <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> := 8#423#;

115

<A NAME="ref_110_4">Key_F12</A> : constant <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> := 8#424#;

116

<A NAME="ref_111_4">Key_F13</A> : constant <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> := 8#425#;

117

<A NAME="ref_112_4">Key_F14</A> : constant <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> := 8#426#;

118

<A NAME="ref_113_4">Key_F15</A> : constant <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> := 8#427#;

119

<A NAME="ref_114_4">Key_F16</A> : constant <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> := 8#430#;

120

<A NAME="ref_115_4">Key_F17</A> : constant <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> := 8#431#;

121

<A NAME="ref_116_4">Key_F18</A> : constant <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> := 8#432#;

122

<A NAME="ref_117_4">Key_F19</A> : constant <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> := 8#433#;

123

<A NAME="ref_118_4">Key_F20</A> : constant <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> := 8#434#;

124

<A NAME="ref_119_4">Key_F21</A> : constant <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> := 8#435#;

125

<A NAME="ref_120_4">Key_F22</A> : constant <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> := 8#436#;

126

<A NAME="ref_121_4">Key_F23</A> : constant <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> := 8#437#;

127

<A NAME="ref_122_4">Key_F24</A> : constant <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> := 8#440#;

128

<A NAME="ref_123_4">Key_Delete_Line</A> : constant <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> := 8#510#;

129

<A NAME="ref_124_4">Key_Insert_Line</A> : constant <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> := 8#511#;

130

<A NAME="ref_125_4">Key_Delete_Char</A> : constant <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> := 8#512#;

131

<A NAME="ref_126_4">Key_Insert_Char</A> : constant <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> := 8#513#;

132

<A NAME="ref_127_4">Key_Exit_Insert_Mode</A> : constant <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> := 8#514#;

133

<A NAME="ref_128_4">Key_Clear_Screen</A> : constant <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> := 8#515#;

134

<A NAME="ref_129_4">Key_Clear_End_Of_Screen</A> : constant <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> := 8#516#;

135

<A NAME="ref_130_4">Key_Clear_End_Of_Line</A> : constant <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> := 8#517#;

136

<A NAME="ref_131_4">Key_Scroll_1_Forward</A> : constant <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> := 8#520#;

137

<A NAME="ref_132_4">Key_Scroll_1_Backward</A> : constant <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> := 8#521#;

138

<A NAME="ref_133_4">Key_Next_Page</A> : constant <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> := 8#522#;

139

<A NAME="ref_134_4">Key_Previous_Page</A> : constant <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> := 8#523#;

140

<A NAME="ref_135_4">Key_Set_Tab</A> : constant <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> := 8#524#;

141

<A NAME="ref_136_4">Key_Clear_Tab</A> : constant <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> := 8#525#;

142

<A NAME="ref_137_4">Key_Clear_All_Tabs</A> : constant <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> := 8#526#;

143

<A NAME="ref_138_4">Key_Enter_Or_Send</A> : constant <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> := 8#527#;

144

<A NAME="ref_139_4">Key_Soft_Reset</A> : constant <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> := 8#530#;

145

<A NAME="ref_140_4">Key_Reset</A> : constant <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> := 8#531#;

146

<A NAME="ref_141_4">Key_Print</A> : constant <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> := 8#532#;

147

<A NAME="ref_142_4">Key_Bottom</A> : constant <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> := 8#533#;

148

<A NAME="ref_143_4">Key_Upper_Left_Of_Keypad</A> : constant <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> := 8#534#;

149

<A NAME="ref_144_4">Key_Upper_Right_Of_Keypad</A> : constant <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> := 8#535#;

150

<A NAME="ref_145_4">Key_Center_Of_Keypad</A> : constant <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> := 8#536#;

151

<A NAME="ref_146_4">Key_Lower_Left_Of_Keypad</A> : constant <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> := 8#537#;

152

<A NAME="ref_147_4">Key_Lower_Right_Of_Keypad</A> : constant <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> := 8#540#;

153

<A NAME="ref_148_4">Key_Back_Tab</A> : constant <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> := 8#541#;

154

<A NAME="ref_149_4">Key_Beginning</A> : constant <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> := 8#542#;

155

<A NAME="ref_150_4">Key_Cancel</A> : constant <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> := 8#543#;

156

<A NAME="ref_151_4">Key_Close</A> : constant <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> := 8#544#;

157

<A NAME="ref_152_4">Key_Command</A> : constant <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> := 8#545#;

158

<A NAME="ref_153_4">Key_Copy</A> : constant <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> := 8#546#;

159

<A NAME="ref_154_4">Key_Create</A> : constant <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> := 8#547#;

160

<A NAME="ref_155_4">Key_End</A> : constant <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> := 8#550#;

161

<A NAME="ref_156_4">Key_Exit</A> : constant <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> := 8#551#;

162

<A NAME="ref_157_4">Key_Find</A> : constant <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> := 8#552#;

163

<A NAME="ref_158_4">Key_Help</A> : constant <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> := 8#553#;

164

<A NAME="ref_159_4">Key_Mark</A> : constant <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> := 8#554#;

165

<A NAME="ref_160_4">Key_Message</A> : constant <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> := 8#555#;

166

<A NAME="ref_161_4">Key_Move</A> : constant <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> := 8#556#;

167

<A NAME="ref_162_4">Key_Next</A> : constant <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> := 8#557#;

168

<A NAME="ref_163_4">Key_Open</A> : constant <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> := 8#560#;

169

<A NAME="ref_164_4">Key_Options</A> : constant <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> := 8#561#;

170

<A NAME="ref_165_4">Key_Previous</A> : constant <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> := 8#562#;

171

<A NAME="ref_166_4">Key_Redo</A> : constant <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> := 8#563#;

172

<A NAME="ref_167_4">Key_Reference</A> : constant <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> := 8#564#;

173

<A NAME="ref_168_4">Key_Refresh</A> : constant <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> := 8#565#;

174

<A NAME="ref_169_4">Key_Replace</A> : constant <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> := 8#566#;

175

<A NAME="ref_170_4">Key_Restart</A> : constant <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> := 8#567#;

176

<A NAME="ref_171_4">Key_Resume</A> : constant <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> := 8#570#;

177

<A NAME="ref_172_4">Key_Save</A> : constant <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> := 8#571#;

178

<A NAME="ref_173_4">Key_Shift_Begin</A> : constant <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> := 8#572#;

179

<A NAME="ref_174_4">Key_Shift_Cancel</A> : constant <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> := 8#573#;

180

<A NAME="ref_175_4">Key_Shift_Command</A> : constant <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> := 8#574#;

181

<A NAME="ref_176_4">Key_Shift_Copy</A> : constant <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> := 8#575#;

182

<A NAME="ref_177_4">Key_Shift_Create</A> : constant <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> := 8#576#;

183

<A NAME="ref_178_4">Key_Shift_Delete_Char</A> : constant <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> := 8#577#;

184

<A NAME="ref_179_4">Key_Shift_Delete_Line</A> : constant <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> := 8#600#;

185

<A NAME="ref_180_4">Key_Select</A> : constant <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> := 8#601#;

186

<A NAME="ref_181_4">Key_Shift_End</A> : constant <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> := 8#602#;

187

<A NAME="ref_182_4">Key_Shift_Clear_End_Of_Line</A> : constant <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> := 8#603#;

188

<A NAME="ref_183_4">Key_Shift_Exit</A> : constant <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> := 8#604#;

189

<A NAME="ref_184_4">Key_Shift_Find</A> : constant <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> := 8#605#;

190

<A NAME="ref_185_4">Key_Shift_Help</A> : constant <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> := 8#606#;

191

<A NAME="ref_186_4">Key_Shift_Home</A> : constant <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> := 8#607#;

192

<A NAME="ref_187_4">Key_Shift_Insert_Char</A> : constant <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> := 8#610#;

193

<A NAME="ref_188_4">Key_Shift_Cursor_Left</A> : constant <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> := 8#611#;

194

<A NAME="ref_189_4">Key_Shift_Message</A> : constant <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> := 8#612#;

195

<A NAME="ref_190_4">Key_Shift_Move</A> : constant <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> := 8#613#;

196

<A NAME="ref_191_4">Key_Shift_Next_Page</A> : constant <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> := 8#614#;

197

<A NAME="ref_192_4">Key_Shift_Options</A> : constant <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> := 8#615#;

198

<A NAME="ref_193_4">Key_Shift_Previous_Page</A> : constant <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> := 8#616#;

199

<A NAME="ref_194_4">Key_Shift_Print</A> : constant <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> := 8#617#;

200

<A NAME="ref_195_4">Key_Shift_Redo</A> : constant <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> := 8#620#;

201

<A NAME="ref_196_4">Key_Shift_Replace</A> : constant <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> := 8#621#;

202

<A NAME="ref_197_4">Key_Shift_Cursor_Right</A> : constant <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> := 8#622#;

203

<A NAME="ref_198_4">Key_Shift_Resume</A> : constant <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> := 8#623#;

204

<A NAME="ref_199_4">Key_Shift_Save</A> : constant <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> := 8#624#;

205

<A NAME="ref_200_4">Key_Shift_Suspend</A> : constant <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> := 8#625#;

206

<A NAME="ref_201_4">Key_Shift_Undo</A> : constant <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> := 8#626#;

207

<A NAME="ref_202_4">Key_Suspend</A> : constant <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> := 8#627#;

208

<A NAME="ref_203_4">Key_Undo</A> : constant <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> := 8#630#;

209

<A NAME="ref_204_4">Key_Mouse</A> : constant <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> := 8#631#;

210

<A NAME="ref_205_4">Key_Resize</A> : constant <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> := 8#632#;

211

212

<A NAME="ref_207_4">Key_Max</A> : constant <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A>

213

:= <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A>'Last;

214

215

subtype <A NAME="ref_210_12">User_Key_Code</A> is <A HREF="terminal_interface-curses__ads.htm#ref_68_9">Key_Code</A>

216

range (<A HREF="terminal_interface-curses__ads.htm#ref_207_4">Key_Max</A> + 129) .. <A HREF="terminal_interface-curses__ads.htm#ref_68_9">Key_Code</A>'Last;

218

217

-- This is reserved for user defined key codes. The range between Key_Max

219

218

-- and the first user code is reserved for subsystems like menu and forms.

220

219

221

220

-- For those who like to use the original key names we produce them were

222

221

-- they differ from the original. Please note that they may differ in

223

222

-- lower/upper case.

224

KEY_DOWN : <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> renames <A HREF="terminal_interface-curses__ads.htm#ref_93_4">Key_Cursor_Down</A>;

225

KEY_UP : <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> renames <A HREF="terminal_interface-curses__ads.htm#ref_94_4">Key_Cursor_Up</A>;

226

KEY_LEFT : <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> renames <A HREF="terminal_interface-curses__ads.htm#ref_95_4">Key_Cursor_Left</A>;

227

KEY_RIGHT : <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> renames <A HREF="terminal_interface-curses__ads.htm#ref_123_4">Key_Cursor_Right</A>;

228

KEY_DL : <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> renames <A HREF="terminal_interface-curses__ads.htm#ref_124_4">Key_Delete_Line</A>;

229

KEY_IL : <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> renames <A HREF="terminal_interface-curses__ads.htm#ref_125_4">Key_Insert_Line</A>;

230

KEY_DC : <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> renames <A HREF="terminal_interface-curses__ads.htm#ref_126_4">Key_Delete_Char</A>;

231

KEY_IC : <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> renames <A HREF="terminal_interface-curses__ads.htm#ref_127_4">Key_Insert_Char</A>;

232

KEY_EIC : <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> renames <A HREF="terminal_interface-curses__ads.htm#ref_128_4">Key_Exit_Insert_Mode</A>;

233

KEY_CLEAR : <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> renames <A HREF="terminal_interface-curses__ads.htm#ref_129_4">Key_Clear_Screen</A>;

234

KEY_EOS : <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> renames <A HREF="terminal_interface-curses__ads.htm#ref_130_4">Key_Clear_End_Of_Screen</A>;

235

KEY_EOL : <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> renames <A HREF="terminal_interface-curses__ads.htm#ref_131_4">Key_Clear_End_Of_Line</A>;

236

KEY_SF : <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> renames <A HREF="terminal_interface-curses__ads.htm#ref_132_4">Key_Scroll_1_Forward</A>;

237

KEY_SR : <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> renames <A HREF="terminal_interface-curses__ads.htm#ref_133_4">Key_Scroll_1_Backward</A>;

238

KEY_NPAGE : <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> renames <A HREF="terminal_interface-curses__ads.htm#ref_134_4">Key_Next_Page</A>;

239

KEY_PPAGE : <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> renames <A HREF="terminal_interface-curses__ads.htm#ref_135_4">Key_Previous_Page</A>;

240

KEY_STAB : <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> renames <A HREF="terminal_interface-curses__ads.htm#ref_136_4">Key_Set_Tab</A>;

241

KEY_CTAB : <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> renames <A HREF="terminal_interface-curses__ads.htm#ref_137_4">Key_Clear_Tab</A>;

242

KEY_CATAB : <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> renames <A HREF="terminal_interface-curses__ads.htm#ref_138_4">Key_Clear_All_Tabs</A>;

243

KEY_ENTER : <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> renames <A HREF="terminal_interface-curses__ads.htm#ref_139_4">Key_Enter_Or_Send</A>;

244

KEY_SRESET : <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> renames <A HREF="terminal_interface-curses__ads.htm#ref_142_4">Key_Soft_Reset</A>;

245

KEY_LL : <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> renames <A HREF="terminal_interface-curses__ads.htm#ref_143_4">Key_Bottom</A>;

246

KEY_A1 : <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> renames <A HREF="terminal_interface-curses__ads.htm#ref_144_4">Key_Upper_Left_Of_Keypad</A>;

247

KEY_A3 : <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> renames <A HREF="terminal_interface-curses__ads.htm#ref_145_4">Key_Upper_Right_Of_Keypad</A>;

248

KEY_B2 : <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> renames <A HREF="terminal_interface-curses__ads.htm#ref_146_4">Key_Center_Of_Keypad</A>;

249

KEY_C1 : <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> renames <A HREF="terminal_interface-curses__ads.htm#ref_147_4">Key_Lower_Left_Of_Keypad</A>;

250

KEY_C3 : <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> renames <A HREF="terminal_interface-curses__ads.htm#ref_148_4">Key_Lower_Right_Of_Keypad</A>;

251

KEY_BTAB : <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> renames <A HREF="terminal_interface-curses__ads.htm#ref_149_4">Key_Back_Tab</A>;

252

KEY_BEG : <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> renames <A HREF="terminal_interface-curses__ads.htm#ref_173_4">Key_Beginning</A>;

253

KEY_SBEG : <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> renames <A HREF="terminal_interface-curses__ads.htm#ref_174_4">Key_Shift_Begin</A>;

254

KEY_SCANCEL : <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> renames <A HREF="terminal_interface-curses__ads.htm#ref_175_4">Key_Shift_Cancel</A>;

255

KEY_SCOMMAND : <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> renames <A HREF="terminal_interface-curses__ads.htm#ref_176_4">Key_Shift_Command</A>;

256

KEY_SCOPY : <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> renames <A HREF="terminal_interface-curses__ads.htm#ref_177_4">Key_Shift_Copy</A>;

257

KEY_SCREATE : <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> renames <A HREF="terminal_interface-curses__ads.htm#ref_178_4">Key_Shift_Create</A>;

258

KEY_SDC : <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> renames <A HREF="terminal_interface-curses__ads.htm#ref_179_4">Key_Shift_Delete_Char</A>;

259

KEY_SDL : <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> renames <A HREF="terminal_interface-curses__ads.htm#ref_181_4">Key_Shift_Delete_Line</A>;

260

KEY_SEND : <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> renames <A HREF="terminal_interface-curses__ads.htm#ref_182_4">Key_Shift_End</A>;

261

KEY_SEOL : <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> renames <A HREF="terminal_interface-curses__ads.htm#ref_183_4">Key_Shift_Clear_End_Of_Line</A>;

262

KEY_SEXIT : <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> renames <A HREF="terminal_interface-curses__ads.htm#ref_184_4">Key_Shift_Exit</A>;

263

KEY_SFIND : <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> renames <A HREF="terminal_interface-curses__ads.htm#ref_185_4">Key_Shift_Find</A>;

264

KEY_SHELP : <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> renames <A HREF="terminal_interface-curses__ads.htm#ref_186_4">Key_Shift_Help</A>;

265

KEY_SHOME : <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> renames <A HREF="terminal_interface-curses__ads.htm#ref_187_4">Key_Shift_Home</A>;

266

KEY_SIC : <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> renames <A HREF="terminal_interface-curses__ads.htm#ref_188_4">Key_Shift_Insert_Char</A>;

267

KEY_SLEFT : <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> renames <A HREF="terminal_interface-curses__ads.htm#ref_189_4">Key_Shift_Cursor_Left</A>;

268

KEY_SMESSAGE : <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> renames <A HREF="terminal_interface-curses__ads.htm#ref_190_4">Key_Shift_Message</A>;

269

KEY_SMOVE : <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> renames <A HREF="terminal_interface-curses__ads.htm#ref_191_4">Key_Shift_Move</A>;

270

KEY_SNEXT : <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> renames <A HREF="terminal_interface-curses__ads.htm#ref_192_4">Key_Shift_Next_Page</A>;

271

KEY_SOPTIONS : <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> renames <A HREF="terminal_interface-curses__ads.htm#ref_193_4">Key_Shift_Options</A>;

272

KEY_SPREVIOUS : <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> renames <A HREF="terminal_interface-curses__ads.htm#ref_194_4">Key_Shift_Previous_Page</A>;

273

KEY_SPRINT : <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> renames <A HREF="terminal_interface-curses__ads.htm#ref_195_4">Key_Shift_Print</A>;

274

KEY_SREDO : <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> renames <A HREF="terminal_interface-curses__ads.htm#ref_196_4">Key_Shift_Redo</A>;

275

KEY_SREPLACE : <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> renames <A HREF="terminal_interface-curses__ads.htm#ref_197_4">Key_Shift_Replace</A>;

276

KEY_SRIGHT : <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> renames <A HREF="terminal_interface-curses__ads.htm#ref_198_4">Key_Shift_Cursor_Right</A>;

277

KEY_SRSUME : <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> renames <A HREF="terminal_interface-curses__ads.htm#ref_199_4">Key_Shift_Resume</A>;

278

KEY_SSAVE : <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> renames <A HREF="terminal_interface-curses__ads.htm#ref_200_4">Key_Shift_Save</A>;

279

KEY_SSUSPEND : <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> renames <A HREF="terminal_interface-curses__ads.htm#ref_201_4">Key_Shift_Suspend</A>;

280

KEY_SUNDO : Special_Key_Code renames Key_Shift_Undo;

223

KEY_DOWN : <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> renames <A HREF="terminal_interface-curses__ads.htm#ref_92_4">Key_Cursor_Down</A>;

224

KEY_UP : <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> renames <A HREF="terminal_interface-curses__ads.htm#ref_93_4">Key_Cursor_Up</A>;

225

KEY_LEFT : <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> renames <A HREF="terminal_interface-curses__ads.htm#ref_94_4">Key_Cursor_Left</A>;

226

KEY_RIGHT : <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> renames <A HREF="terminal_interface-curses__ads.htm#ref_95_4">Key_Cursor_Right</A>;

227

KEY_DL : <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> renames <A HREF="terminal_interface-curses__ads.htm#ref_123_4">Key_Delete_Line</A>;

228

KEY_IL : <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> renames <A HREF="terminal_interface-curses__ads.htm#ref_124_4">Key_Insert_Line</A>;

229

KEY_DC : <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> renames <A HREF="terminal_interface-curses__ads.htm#ref_125_4">Key_Delete_Char</A>;

230

KEY_IC : <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> renames <A HREF="terminal_interface-curses__ads.htm#ref_126_4">Key_Insert_Char</A>;

231

KEY_EIC : <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> renames <A HREF="terminal_interface-curses__ads.htm#ref_127_4">Key_Exit_Insert_Mode</A>;

232

KEY_CLEAR : <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> renames <A HREF="terminal_interface-curses__ads.htm#ref_128_4">Key_Clear_Screen</A>;

233

KEY_EOS : <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> renames <A HREF="terminal_interface-curses__ads.htm#ref_129_4">Key_Clear_End_Of_Screen</A>;

234

KEY_EOL : <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> renames <A HREF="terminal_interface-curses__ads.htm#ref_130_4">Key_Clear_End_Of_Line</A>;

235

KEY_SF : <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> renames <A HREF="terminal_interface-curses__ads.htm#ref_131_4">Key_Scroll_1_Forward</A>;

236

KEY_SR : <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> renames <A HREF="terminal_interface-curses__ads.htm#ref_132_4">Key_Scroll_1_Backward</A>;

237

KEY_NPAGE : <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> renames <A HREF="terminal_interface-curses__ads.htm#ref_133_4">Key_Next_Page</A>;

238

KEY_PPAGE : <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> renames <A HREF="terminal_interface-curses__ads.htm#ref_134_4">Key_Previous_Page</A>;

239

KEY_STAB : <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> renames <A HREF="terminal_interface-curses__ads.htm#ref_135_4">Key_Set_Tab</A>;

240

KEY_CTAB : <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> renames <A HREF="terminal_interface-curses__ads.htm#ref_136_4">Key_Clear_Tab</A>;

241

KEY_CATAB : <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> renames <A HREF="terminal_interface-curses__ads.htm#ref_137_4">Key_Clear_All_Tabs</A>;

242

KEY_ENTER : <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> renames <A HREF="terminal_interface-curses__ads.htm#ref_138_4">Key_Enter_Or_Send</A>;

243

KEY_SRESET : <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> renames <A HREF="terminal_interface-curses__ads.htm#ref_139_4">Key_Soft_Reset</A>;

244

KEY_LL : <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> renames <A HREF="terminal_interface-curses__ads.htm#ref_142_4">Key_Bottom</A>;

245

KEY_A1 : <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> renames <A HREF="terminal_interface-curses__ads.htm#ref_143_4">Key_Upper_Left_Of_Keypad</A>;

246

KEY_A3 : <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> renames <A HREF="terminal_interface-curses__ads.htm#ref_144_4">Key_Upper_Right_Of_Keypad</A>;

247

KEY_B2 : <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> renames <A HREF="terminal_interface-curses__ads.htm#ref_145_4">Key_Center_Of_Keypad</A>;

248

KEY_C1 : <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> renames <A HREF="terminal_interface-curses__ads.htm#ref_146_4">Key_Lower_Left_Of_Keypad</A>;

249

KEY_C3 : <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> renames <A HREF="terminal_interface-curses__ads.htm#ref_147_4">Key_Lower_Right_Of_Keypad</A>;

250

KEY_BTAB : <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> renames <A HREF="terminal_interface-curses__ads.htm#ref_148_4">Key_Back_Tab</A>;

251

KEY_BEG : <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> renames <A HREF="terminal_interface-curses__ads.htm#ref_149_4">Key_Beginning</A>;

252

KEY_SBEG : <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> renames <A HREF="terminal_interface-curses__ads.htm#ref_173_4">Key_Shift_Begin</A>;

253

KEY_SCANCEL : <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> renames <A HREF="terminal_interface-curses__ads.htm#ref_174_4">Key_Shift_Cancel</A>;

254

KEY_SCOMMAND : <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> renames <A HREF="terminal_interface-curses__ads.htm#ref_175_4">Key_Shift_Command</A>;

255

KEY_SCOPY : <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> renames <A HREF="terminal_interface-curses__ads.htm#ref_176_4">Key_Shift_Copy</A>;

256

KEY_SCREATE : <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> renames <A HREF="terminal_interface-curses__ads.htm#ref_177_4">Key_Shift_Create</A>;

257

KEY_SDC : <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> renames <A HREF="terminal_interface-curses__ads.htm#ref_178_4">Key_Shift_Delete_Char</A>;

258

KEY_SDL : <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> renames <A HREF="terminal_interface-curses__ads.htm#ref_179_4">Key_Shift_Delete_Line</A>;

259

KEY_SEND : <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> renames <A HREF="terminal_interface-curses__ads.htm#ref_181_4">Key_Shift_End</A>;

260

KEY_SEOL : <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> renames <A HREF="terminal_interface-curses__ads.htm#ref_182_4">Key_Shift_Clear_End_Of_Line</A>;

261

KEY_SEXIT : <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> renames <A HREF="terminal_interface-curses__ads.htm#ref_183_4">Key_Shift_Exit</A>;

262

KEY_SFIND : <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> renames <A HREF="terminal_interface-curses__ads.htm#ref_184_4">Key_Shift_Find</A>;

263

KEY_SHELP : <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> renames <A HREF="terminal_interface-curses__ads.htm#ref_185_4">Key_Shift_Help</A>;

264

KEY_SHOME : <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> renames <A HREF="terminal_interface-curses__ads.htm#ref_186_4">Key_Shift_Home</A>;

265

KEY_SIC : <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> renames <A HREF="terminal_interface-curses__ads.htm#ref_187_4">Key_Shift_Insert_Char</A>;

266

KEY_SLEFT : <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> renames <A HREF="terminal_interface-curses__ads.htm#ref_188_4">Key_Shift_Cursor_Left</A>;

267

KEY_SMESSAGE : <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> renames <A HREF="terminal_interface-curses__ads.htm#ref_189_4">Key_Shift_Message</A>;

268

KEY_SMOVE : <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> renames <A HREF="terminal_interface-curses__ads.htm#ref_190_4">Key_Shift_Move</A>;

269

KEY_SNEXT : <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> renames <A HREF="terminal_interface-curses__ads.htm#ref_191_4">Key_Shift_Next_Page</A>;

270

KEY_SOPTIONS : <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> renames <A HREF="terminal_interface-curses__ads.htm#ref_192_4">Key_Shift_Options</A>;

271

KEY_SPREVIOUS : <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> renames <A HREF="terminal_interface-curses__ads.htm#ref_193_4">Key_Shift_Previous_Page</A>;

272

KEY_SPRINT : <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> renames <A HREF="terminal_interface-curses__ads.htm#ref_194_4">Key_Shift_Print</A>;

273

KEY_SREDO : <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> renames <A HREF="terminal_interface-curses__ads.htm#ref_195_4">Key_Shift_Redo</A>;

274

KEY_SREPLACE : <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> renames <A HREF="terminal_interface-curses__ads.htm#ref_196_4">Key_Shift_Replace</A>;

275

KEY_SRIGHT : <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> renames <A HREF="terminal_interface-curses__ads.htm#ref_197_4">Key_Shift_Cursor_Right</A>;

276

KEY_SRSUME : <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> renames <A HREF="terminal_interface-curses__ads.htm#ref_198_4">Key_Shift_Resume</A>;

277

KEY_SSAVE : <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> renames <A HREF="terminal_interface-curses__ads.htm#ref_199_4">Key_Shift_Save</A>;

278

KEY_SSUSPEND : <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> renames <A HREF="terminal_interface-curses__ads.htm#ref_200_4">Key_Shift_Suspend</A>;

279

KEY_SUNDO : <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A> renames <A HREF="terminal_interface-curses__ads.htm#ref_201_4">Key_Shift_Undo</A>;

281

280

282

281

------------------------------------------------------------------------------

283

282

284

type<A HREF="terminal_interface-curses__ads.htm#ref_278_9"> </A>Color_Number is range<A HREF="interfac__ads.htm#ref_23_9"> </A>-1 .. Integer (Interfaces.C.short'Last);

285

for Color_Number'Size use Interfaces.C.short'Size;

283

type <A NAME="ref_278_9">Color_Number</A> is range -1 .. Integer (<A HREF="interfac__ads.htm#ref_38_9">Interfaces</A>.C.short'Last);

284

for <A HREF="terminal_interface-curses__ads.htm#ref_278_9">Color_Number</A>'Size use <A HREF="interfac__ads.htm#ref_38_9">Interfaces</A>.C.short'Size;

286

285

-- (n)curses uses a short for the color index

287

286

-- The model is, that a Color_Number is an index into an array of

288

287

-- (potentially) definable colors. Some of those indices are

289

288

-- predefined (see below), although they may not really exist.

290

289

291

<A NAME="ref_286_4">Default_Color</A> : constant <A HREF="terminal_interface-curses__ads.htm#ref_278_9">Color_Number</A> := -1;

292

<A NAME="ref_287_4">Black</A> : constant <A HREF="terminal_interface-curses__ads.htm#ref_278_9">Color_Number</A> := 0;

293

<A NAME="ref_288_4">Red</A> : constant <A HREF="terminal_interface-curses__ads.htm#ref_278_9">Color_Number</A> := 1;

294

<A NAME="ref_289_4">Green</A> : constant <A HREF="terminal_interface-curses__ads.htm#ref_278_9">Color_Number</A> := 2;

295

<A NAME="ref_290_4">Yellow</A> : constant <A HREF="terminal_interface-curses__ads.htm#ref_278_9">Color_Number</A> := 3;

296

<A NAME="ref_291_4">Blue</A> : constant <A HREF="terminal_interface-curses__ads.htm#ref_278_9">Color_Number</A> := 4;

297

<A NAME="ref_292_4">Magenta</A> : constant <A HREF="terminal_interface-curses__ads.htm#ref_278_9">Color_Number</A> := 5;

298

<A NAME="ref_293_4">Cyan</A> : constant <A HREF="terminal_interface-curses__ads.htm#ref_278_9">Color_Number</A> := 6;

299

White : constant Color_Number := 7;

290

<A NAME="ref_285_4">Default_Color</A> : constant <A HREF="terminal_interface-curses__ads.htm#ref_278_9">Color_Number</A> := -1;

291

<A NAME="ref_286_4">Black</A> : constant <A HREF="terminal_interface-curses__ads.htm#ref_278_9">Color_Number</A> := 0;

292

<A NAME="ref_287_4">Red</A> : constant <A HREF="terminal_interface-curses__ads.htm#ref_278_9">Color_Number</A> := 1;

293

<A NAME="ref_288_4">Green</A> : constant <A HREF="terminal_interface-curses__ads.htm#ref_278_9">Color_Number</A> := 2;

294

<A NAME="ref_289_4">Yellow</A> : constant <A HREF="terminal_interface-curses__ads.htm#ref_278_9">Color_Number</A> := 3;

295

<A NAME="ref_290_4">Blue</A> : constant <A HREF="terminal_interface-curses__ads.htm#ref_278_9">Color_Number</A> := 4;

296

<A NAME="ref_291_4">Magenta</A> : constant <A HREF="terminal_interface-curses__ads.htm#ref_278_9">Color_Number</A> := 5;

297

<A NAME="ref_292_4">Cyan</A> : constant <A HREF="terminal_interface-curses__ads.htm#ref_278_9">Color_Number</A> := 6;

298

<A NAME="ref_293_4">White</A> : constant <A HREF="terminal_interface-curses__ads.htm#ref_278_9">Color_Number</A> := 7;

300

299

301

type<A HREF="terminal_interface-curses__ads.htm#ref_295_9"> </A>RGB_Value is range<A HREF="interfac__ads.htm#ref_23_9"> </A>0 .. Integer (Interfaces.C.short'Last);

302

for RGB_Value'Size use Interfaces.C.short'Size;

300

type <A NAME="ref_295_9">RGB_Value</A> is range 0 .. Integer (<A HREF="interfac__ads.htm#ref_38_9">Interfaces</A>.C.short'Last);

301

for <A HREF="terminal_interface-curses__ads.htm#ref_295_9">RGB_Value</A>'Size use <A HREF="interfac__ads.htm#ref_38_9">Interfaces</A>.C.short'Size;

303

302

-- Some system may allow to redefine a color by setting RGB values.

304

303

305

type<A HREF="terminal_interface-curses__ads.htm#ref_299_9"> </A>Color_Pair is range 0 .. 255;

306

for Color_Pair'Size use 8;

307

subtype Redefinable_Color_Pair is Color_Pair range 1 .. 255;

304

type <A NAME="ref_299_9">Color_Pair</A> is range 0 .. 255;

305

for <A HREF="terminal_interface-curses__ads.htm#ref_299_9">Color_Pair</A>'Size use 8;

306

subtype <A NAME="ref_301_12">Redefinable_Color_Pair</A> is <A HREF="terminal_interface-curses__ads.htm#ref_299_9">Color_Pair</A> range 1 .. 255;

308

307

-- (n)curses reserves 1 Byte for the color-pair number. Color Pair 0

309

308

-- is fixed (Black & White). A color pair is simply a combination of

310

309

-- two colors described by Color_Numbers, one for the foreground and

311

310

-- the other for the background

312

311

313

type Character_Attribute_Set is

312

type <A NAME="ref_307_9">Character_Attribute_Set</A> is

314

313

record

315

<A NAME="ref_310_10">Stand_Out</A> : Boolean;

316

<A NAME="ref_311_10">Under_Line</A> : Boolean;

317

<A NAME="ref_312_10">Reverse_Video</A> : Boolean;

318

<A NAME="ref_313_10">Blink</A> : Boolean;

319

<A NAME="ref_314_10">Dim_Character</A> : Boolean;

320

<A NAME="ref_315_10">Bold_Character</A> : Boolean;

321

<A NAME="ref_316_10">Alternate_Character_Set</A> : Boolean;

322

<A NAME="ref_317_10">Invisible_Character</A> : Boolean;

323

<A NAME="ref_318_10">Protected_Character</A> : Boolean;

324

<A NAME="ref_319_10">Horizontal</A> : Boolean;

325

<A NAME="ref_320_10">Left</A> : Boolean;

326

<A NAME="ref_321_10">Low</A> : Boolean;

327

<A NAME="ref_322_10">Right</A> : Boolean;

328

<A NAME="ref_323_10">Top</A> : Boolean;

329

Vertical : Boolean;

314

<A NAME="ref_309_10">Stand_Out</A> : Boolean;

315

<A NAME="ref_310_10">Under_Line</A> : Boolean;

316

<A NAME="ref_311_10">Reverse_Video</A> : Boolean;

317

<A NAME="ref_312_10">Blink</A> : Boolean;

318

<A NAME="ref_313_10">Dim_Character</A> : Boolean;

319

<A NAME="ref_314_10">Bold_Character</A> : Boolean;

320

<A NAME="ref_315_10">Alternate_Character_Set</A> : Boolean;

321

<A NAME="ref_316_10">Invisible_Character</A> : Boolean;

322

<A NAME="ref_317_10">Protected_Character</A> : Boolean;

323

<A NAME="ref_318_10">Horizontal</A> : Boolean;

324

<A NAME="ref_319_10">Left</A> : Boolean;

325

<A NAME="ref_320_10">Low</A> : Boolean;

326

<A NAME="ref_321_10">Right</A> : Boolean;

327

<A NAME="ref_322_10">Top</A> : Boolean;

328

<A NAME="ref_323_10">Vertical</A> : Boolean;

330

329

end record;

331

pragma Convention (C, Character_Attribute_Set);

330

pragma Convention (C, <A HREF="terminal_interface-curses__ads.htm#ref_307_9">Character_Attribute_Set</A>);

332

331

333

for Character_Attribute_Set use

332

for <A HREF="terminal_interface-curses__ads.htm#ref_307_9">Character_Attribute_Set</A> use

334

333

record

335

Stand_Out at 0 range 0 .. 0;

336

Under_Line at 0 range 1 .. 1;

337

Reverse_Video at 0 range 2 .. 2;

338

Blink at 0 range 3 .. 3;

339

Dim_Character at 0 range 4 .. 4;

340

Bold_Character at 0 range 5 .. 5;

341

Alternate_Character_Set at 0 range 6 .. 6;

342

Invisible_Character at 0 range 7 .. 7;

343

Protected_Character at 0 range 8 .. 8;

344

Horizontal at 0 range 9 .. 9;

345

Left at 0 range 10 .. 10;

346

Low at 0 range 11 .. 11;

347

Right at 0 range 12 .. 12;

348

Top at 0 range 13 .. 13;

349

Vertical at 0 range 14 .. 14;

334

<A HREF="terminal_interface-curses__ads.htm#ref_309_10">Stand_Out</A> at 0 range 0 .. 0;

335

<A HREF="terminal_interface-curses__ads.htm#ref_310_10">Under_Line</A> at 0 range 1 .. 1;

336

<A HREF="terminal_interface-curses__ads.htm#ref_311_10">Reverse_Video</A> at 0 range 2 .. 2;

337

<A HREF="terminal_interface-curses__ads.htm#ref_312_10">Blink</A> at 0 range 3 .. 3;

338

<A HREF="terminal_interface-curses__ads.htm#ref_313_10">Dim_Character</A> at 0 range 4 .. 4;

339

<A HREF="terminal_interface-curses__ads.htm#ref_314_10">Bold_Character</A> at 0 range 5 .. 5;

340

<A HREF="terminal_interface-curses__ads.htm#ref_315_10">Alternate_Character_Set</A> at 0 range 6 .. 6;

341

<A HREF="terminal_interface-curses__ads.htm#ref_316_10">Invisible_Character</A> at 0 range 7 .. 7;

342

<A HREF="terminal_interface-curses__ads.htm#ref_317_10">Protected_Character</A> at 0 range 8 .. 8;

343

<A HREF="terminal_interface-curses__ads.htm#ref_318_10">Horizontal</A> at 0 range 9 .. 9;

344

<A HREF="terminal_interface-curses__ads.htm#ref_319_10">Left</A> at 0 range 10 .. 10;

345

<A HREF="terminal_interface-curses__ads.htm#ref_320_10">Low</A> at 0 range 11 .. 11;

346

<A HREF="terminal_interface-curses__ads.htm#ref_321_10">Right</A> at 0 range 12 .. 12;

347

<A HREF="terminal_interface-curses__ads.htm#ref_322_10">Top</A> at 0 range 13 .. 13;

348

<A HREF="terminal_interface-curses__ads.htm#ref_323_10">Vertical</A> at 0 range 14 .. 14;

350

349

end record;

351

for Character_Attribute_Set'Size use 16;

350

for <A HREF="terminal_interface-curses__ads.htm#ref_307_9">Character_Attribute_Set</A>'Size use 16;

352

351

-- Please note: this rep. clause is generated and may be

353

352

-- different on your system.

354

353

-- (n)curses uses all but the lowest 16 Bits for Attributes.

355

354

356

Normal_Video : constant Character_Attribute_Set := (others => False);

355

<A NAME="ref_350_4">Normal_Video</A> : constant <A HREF="terminal_interface-curses__ads.htm#ref_307_9">Character_Attribute_Set</A> := (others => False);

357

356

358

type Attributed_Character is

357

type <A NAME="ref_352_9">Attributed_Character</A> is

359

358

record

360

<A NAME="ref_355_10">Attr</A> : <A HREF="terminal_interface-curses__ads.htm#ref_299_9">Character_Attribute_Set</A>;

361

<A NAME="ref_356_10">Color</A> : Color_Pair;

362

Ch : Character;

359

<A NAME="ref_354_10">Attr</A> : <A HREF="terminal_interface-curses__ads.htm#ref_307_9">Character_Attribute_Set</A>;

360

<A NAME="ref_355_10">Color</A> : <A HREF="terminal_interface-curses__ads.htm#ref_299_9">Color_Pair</A>;

361

<A NAME="ref_356_10">Ch</A> : Character;

363

362

end record;

364

pragma Convention (C, Attributed_Character);

363

pragma Convention (C, <A HREF="terminal_interface-curses__ads.htm#ref_352_9">Attributed_Character</A>);

365

364

-- This is the counterpart for the chtype in C.

366

365

367

for Attributed_Character use

366

for <A HREF="terminal_interface-curses__ads.htm#ref_352_9">Attributed_Character</A> use

368

367

record

369

Ch at 0 range 0 .. 7;

370

Color at 0 range 8 .. 15;

371

Attr at 0 range 16 .. 31;

368

<A HREF="terminal_interface-curses__ads.htm#ref_356_10">Ch</A> at 0 range 0 .. 7;

369

<A HREF="terminal_interface-curses__ads.htm#ref_355_10">Color</A> at 0 range 8 .. 15;

370

<A HREF="terminal_interface-curses__ads.htm#ref_354_10">Attr</A> at 0 range 16 .. 31;

372

371

end record;

373

for Attributed_Character'Size use 32;

372

for <A HREF="terminal_interface-curses__ads.htm#ref_352_9">Attributed_Character</A>'Size use 32;

374

373

-- Please note: this rep. clause is generated and may be

375

374

-- different on your system.

376

375

377

Default_Character : constant Attributed_Character

378

:= (Ch => <A HREF="terminal_interface-curses__ads.htm#ref_299_9">Character</A>'First,

379

Color => Color_Pair'First,

380

Attr => (others => False)); -- preelaboratable Normal_Video

376

<A NAME="ref_371_4">Default_Character</A> : constant <A HREF="terminal_interface-curses__ads.htm#ref_352_9">Attributed_Character</A>

377

:= (<A HREF="terminal_interface-curses__ads.htm#ref_356_10">Ch</A> => Character'First,

378

<A HREF="terminal_interface-curses__ads.htm#ref_355_10">Color</A> => <A HREF="terminal_interface-curses__ads.htm#ref_299_9">Color_Pair</A>'First,

379

<A HREF="terminal_interface-curses__ads.htm#ref_354_10">Attr</A> => (others => False)); -- preelaboratable Normal_Video

381

380

382

type Attributed_String is array (Positive range <>) of Attributed_Character;

381

type Attributed_String is array (Positive range <>) of <A HREF="terminal_interface-curses__ads.htm#ref_352_9">Attributed_Character</A>;

383

382

pragma Pack (Attributed_String);

384

383

-- In this binding we allow strings of attributed characters.

385

384

386

385

------------------

387

386

-- Exceptions --

388

387

------------------

389

<A NAME="ref_384_4">Curses_Exception</A> : exception;

390

Wrong_Curses_Version : exception;

388

<A NAME="ref_383_4">Curses_Exception</A> : exception;

389

<A NAME="ref_384_4">Wrong_Curses_Version</A> : exception;

391

390

392

391

-- Those exceptions are raised by the ETI (Extended Terminal Interface)

393

392

-- subpackets for Menu and Forms handling.

394

393

--

395

<A NAME="ref_390_4">Eti_System_Error</A> : exception;

396

<A NAME="ref_391_4">Eti_Bad_Argument</A> : exception;

397

<A NAME="ref_392_4">Eti_Posted</A> : exception;

398

<A NAME="ref_393_4">Eti_Connected</A> : exception;

399

<A NAME="ref_394_4">Eti_Bad_State</A> : exception;

400

<A NAME="ref_395_4">Eti_No_Room</A> : exception;

401

<A NAME="ref_396_4">Eti_Not_Posted</A> : exception;

402

<A NAME="ref_397_4">Eti_Unknown_Command</A> : exception;

403

<A NAME="ref_398_4">Eti_No_Match</A> : exception;

404

<A NAME="ref_399_4">Eti_Not_Selectable</A> : exception;

405

<A NAME="ref_400_4">Eti_Not_Connected</A> : exception;

406

<A NAME="ref_401_4">Eti_Request_Denied</A> : exception;

407

<A NAME="ref_402_4">Eti_Invalid_Field</A> : exception;

408

Eti_Current : exception;

394

<A NAME="ref_389_4">Eti_System_Error</A> : exception;

395

<A NAME="ref_390_4">Eti_Bad_Argument</A> : exception;

396

<A NAME="ref_391_4">Eti_Posted</A> : exception;

397

<A NAME="ref_392_4">Eti_Connected</A> : exception;

398

<A NAME="ref_393_4">Eti_Bad_State</A> : exception;

399

<A NAME="ref_394_4">Eti_No_Room</A> : exception;

400

<A NAME="ref_395_4">Eti_Not_Posted</A> : exception;

401

<A NAME="ref_396_4">Eti_Unknown_Command</A> : exception;

402

<A NAME="ref_397_4">Eti_No_Match</A> : exception;

403

<A NAME="ref_398_4">Eti_Not_Selectable</A> : exception;

404

<A NAME="ref_399_4">Eti_Not_Connected</A> : exception;

405

<A NAME="ref_400_4">Eti_Request_Denied</A> : exception;

406

<A NAME="ref_401_4">Eti_Invalid_Field</A> : exception;

407

<A NAME="ref_402_4">Eti_Current</A> : exception;

409

408

410

409

--------------------------------------------------------------------------

411

410

-- External C variables

415

414

-- this is to use functions.

416

415

--------------------------------------------------------------------------

417

416

418

function Lines <A HREF="terminal_interface-curses__ads.htm#ref_412_13"> </A> return Line_Count;

419

pragma Inline (Lines);

420

421

function Columns return Column_Count;

422

pragma Inline (Columns);

423

424

function Tab_Size return Natural;

425

pragma Inline (Tab_Size);

426

427

function Number_Of_Colors return Natural;

428

pragma Inline (Number_Of_Colors);

429

430

function Number_Of_Color_Pairs return Natural;

431

pragma Inline (Number_Of_Color_Pairs);

432

433

ACS_Map : array (Character'Val (0) .. Character'Val (127)) of

434

Attributed_Character;

435

pragma Import (C, ACS_Map, "acs_map");

417

function <A NAME="ref_412_13" HREF="terminal_interface-curses__adb.htm#ref_2355_13">Lines</A> return <A HREF="terminal_interface-curses__ads.htm#ref_63_12">Line_Count</A>;

418

pragma Inline (<A HREF="terminal_interface-curses__ads.htm#ref_412_13">Lines</A>);

419

420

function <A NAME="ref_415_13" HREF="terminal_interface-curses__adb.htm#ref_2363_13">Columns</A> return <A HREF="terminal_interface-curses__ads.htm#ref_65_12">Column_Count</A>;

421

pragma Inline (<A HREF="terminal_interface-curses__ads.htm#ref_415_13">Columns</A>);

422

423

function <A NAME="ref_418_13" HREF="terminal_interface-curses__adb.htm#ref_2371_13">Tab_Size</A> return Natural;

424

pragma Inline (<A HREF="terminal_interface-curses__ads.htm#ref_418_13">Tab_Size</A>);

425

426

function <A NAME="ref_421_13" HREF="terminal_interface-curses__adb.htm#ref_2379_13">Number_Of_Colors</A> return Natural;

427

pragma Inline (<A HREF="terminal_interface-curses__ads.htm#ref_421_13">Number_Of_Colors</A>);

428

429

function <A NAME="ref_424_13" HREF="terminal_interface-curses__adb.htm#ref_2387_13">Number_Of_Color_Pairs</A> return Natural;

430

pragma Inline (<A HREF="terminal_interface-curses__ads.htm#ref_424_13">Number_Of_Color_Pairs</A>);

431

432

type C_ACS_Map is array (Character'Val (0) .. Character'Val (127))

433

of <A HREF="terminal_interface-curses__ads.htm#ref_352_9">Attributed_Character</A>;

434

<A NAME="ref_429_4">ACS_Map</A> : C_ACS_Map;

435

pragma Import (C, <A HREF="terminal_interface-curses__ads.htm#ref_429_4">ACS_Map</A>, "acs_map");

436

--

437

--

438

-- Constants for several characters from the Alternate Character Set

439

-- You must use this constants as indices into the ACS_Map array

439

-- You must use these constants as indices into the ACS_Map array

440

-- to get the corresponding attributed character at runtime.

441

--

442

<A NAME="ref_437_4">ACS_Upper_Left_Corner</A> : constant Character := 'l';

470

<A NAME="ref_465_4">ACS_Greater_Or_Equal</A> : constant Character := 'z';

471

<A NAME="ref_466_4">ACS_PI</A> : constant Character := '{';

472

<A NAME="ref_467_4">ACS_Not_Equal</A> : constant Character := '|';

473

ACS_Sterling : constant Character := '}';

473

<A NAME="ref_468_4">ACS_Sterling</A> : constant Character := '}';

474

475

-- |=====================================================================

476

-- | Man page <A HREF="../man/curs_initscr.3x.html">curs_initscr.3x</A>

477

-- |=====================================================================

478

-- | Not implemented: newterm, set_term, delscreen, curscr

478

-- | Not implemented: newterm, set_term, delscreen

479

480

-- #1A NAME="AFU_1"#2|

481

function Standard_Window return Window;

481

function <A NAME="ref_476_13" HREF="terminal_interface-curses__adb.htm#ref_2339_13">Standard_Window</A> return <A HREF="terminal_interface-curses__ads.htm#ref_57_9">Window</A>;

482

-- AKA: <A HREF="../man/curs_initscr.3x.html">stdscr</A>

483

pragma Inline (Standard_Window);

483

pragma Inline (<A HREF="terminal_interface-curses__ads.htm#ref_476_13">Standard_Window</A>);

484

485

-- #1A NAME="AFU_2"#2|

486

procedure Init_Screen;

486

function <A NAME="ref_481_13" HREF="terminal_interface-curses__adb.htm#ref_2347_13">Current_Window</A> return <A HREF="terminal_interface-curses__ads.htm#ref_57_9">Window</A>;

487

-- AKA: <A HREF="../man/curs_initscr.3x.html">curscr</A>

488

pragma Inline (<A HREF="terminal_interface-curses__ads.htm#ref_481_13">Current_Window</A>);

487

489

488

490

-- #1A NAME="AFU_3"#2|

489

procedure Init_Windows renames Init_Screen;

491

procedure <A NAME="ref_486_14" HREF="terminal_interface-curses__adb.htm#ref_98_14">Init_Screen</A>;

492

493

-- #1A NAME="AFU_4"#2|

494

procedure <A NAME="ref_489_14">Init_Windows</A> renames <A HREF="terminal_interface-curses__ads.htm#ref_486_14">Init_Screen</A>;

490

495

-- AKA: <A HREF="../man/curs_initscr.3x.html">initscr()</A>

491

pragma Inline (<A HREF="terminal_interface-curses__ads.htm#ref_483_14">Init_Screen</A>);

492

pragma Inline (Init_Windows);

496

pragma Inline (<A HREF="terminal_interface-curses__ads.htm#ref_486_14">Init_Screen</A>);

497

-- pragma Inline (Init_Windows);

493

498

494

-- #1A NAME="AFU_4"#2|

495

procedure End_Windows;

499

-- #1A NAME="AFU_5"#2|

500

procedure <A NAME="ref_495_14" HREF="terminal_interface-curses__adb.htm#ref_111_14">End_Windows</A>;

496

501

-- AKA: <A HREF="../man/curs_initscr.3x.html">endwin()</A>

497

procedure End_Screen renames End_Windows;

498

pragma Inline (<A HREF="terminal_interface-curses__ads.htm#ref_491_14">End_Windows</A>);

499

pragma Inline (End_Screen);

502

procedure <A NAME="ref_497_14">End_Screen</A> renames <A HREF="terminal_interface-curses__ads.htm#ref_495_14">End_Windows</A>;

503

pragma Inline (<A HREF="terminal_interface-curses__ads.htm#ref_495_14">End_Windows</A>);

504

-- pragma Inline (End_Screen);

500

505

501

-- #1A NAME="AFU_5"#2|

502

function Is_End_Window return Boolean;

506

-- #1A NAME="AFU_6"#2|

507

function <A NAME="ref_502_13" HREF="terminal_interface-curses__adb.htm#ref_121_13">Is_End_Window</A> return Boolean;

503

508

-- AKA: <A HREF="../man/curs_initscr.3x.html">isendwin()</A>

504

pragma Inline (Is_End_Window);

509

pragma Inline (<A HREF="terminal_interface-curses__ads.htm#ref_502_13">Is_End_Window</A>);

505

510

506

511

-- |=====================================================================

507

512

-- | Man page <A HREF="../man/curs_move.3x.html">curs_move.3x</A>

508

513

-- |=====================================================================

509

514

510

-- #1A NAME="AFU_6"#2|

511

procedure Move_Cursor (<A NAME="ref_506_27" HREF="terminal_interface-curses__adb.htm#ref_187_27">Win</A> : in <A HREF="terminal_interface-curses__ads.htm#ref_60_9">Window</A> := Standard_Window;

512

<A NAME="ref_507_27" HREF="terminal_interface-curses__adb.htm#ref_188_27">Line</A> : in <A HREF="terminal_interface-curses__ads.htm#ref_61_9">Line_Position</A>;

513

Column : in Column_Position);

515

-- #1A NAME="AFU_7"#2|

516

procedure <A NAME="ref_511_14" HREF="terminal_interface-curses__adb.htm#ref_133_14">Move_Cursor</A> (<A NAME="ref_511_27" HREF="terminal_interface-curses__adb.htm#ref_133_27">Win</A> : in <A HREF="terminal_interface-curses__ads.htm#ref_57_9">Window</A> := <A HREF="terminal_interface-curses__ads.htm#ref_476_13">Standard_Window</A>;

517

<A NAME="ref_512_27" HREF="terminal_interface-curses__adb.htm#ref_134_27">Line</A> : in <A HREF="terminal_interface-curses__ads.htm#ref_60_9">Line_Position</A>;

518

<A NAME="ref_513_27" HREF="terminal_interface-curses__adb.htm#ref_135_27">Column</A> : in <A HREF="terminal_interface-curses__ads.htm#ref_61_9">Column_Position</A>);

514

519

-- AKA: <A HREF="../man/curs_move.3x.html">wmove()</A>

515

520

-- AKA: move()

516

pragma Inline (Move_Cursor);

521

pragma Inline (<A HREF="terminal_interface-curses__ads.htm#ref_511_14">Move_Cursor</A>);

517

522

518

523

-- |=====================================================================

519

524

-- | Man page <A HREF="../man/curs_addch.3x.html">curs_addch.3x</A>

520

525

-- |=====================================================================

521

526

522

-- #1A NAME="AFU_7"#2|

523

procedure Add (<A NAME="ref_518_19" HREF="terminal_interface-curses__adb.htm#ref_202_19">Win</A> : in <A HREF="terminal_interface-curses__ads.htm#ref_352_9">Window</A> := Standard_Window;

524

Ch : in Attributed_Character);

527

-- #1A NAME="AFU_8"#2|

528

procedure <A NAME="ref_523_14" HREF="terminal_interface-curses__adb.htm#ref_148_14">Add</A> (<A NAME="ref_523_19" HREF="terminal_interface-curses__adb.htm#ref_148_19">Win</A> : in <A HREF="terminal_interface-curses__ads.htm#ref_57_9">Window</A> := <A HREF="terminal_interface-curses__ads.htm#ref_476_13">Standard_Window</A>;

529

<A NAME="ref_524_19" HREF="terminal_interface-curses__adb.htm#ref_149_19">Ch</A> : in <A HREF="terminal_interface-curses__ads.htm#ref_352_9">Attributed_Character</A>);

525

530

-- AKA: <A HREF="../man/curs_addch.3x.html">waddch()</A>

526

531

-- AKA: addch()

527

532

528

procedure Add (<A NAME="ref_523_19" HREF="terminal_interface-curses__adb.htm#ref_214_19">Win</A> : in Window := Standard_Window;

529

Ch : in Character);

533

procedure <A NAME="ref_528_14" HREF="terminal_interface-curses__adb.htm#ref_160_14">Add</A> (<A NAME="ref_528_19" HREF="terminal_interface-curses__adb.htm#ref_160_19">Win</A> : in <A HREF="terminal_interface-curses__ads.htm#ref_57_9">Window</A> := <A HREF="terminal_interface-curses__ads.htm#ref_476_13">Standard_Window</A>;

534

<A NAME="ref_529_19" HREF="terminal_interface-curses__adb.htm#ref_161_19">Ch</A> : in Character);

530

535

-- Add a single character at the current logical cursor position to

531

536

-- the window. Use the current windows attributes.

532

537

533

-- #1A NAME="AFU_8"#2|

534

procedure Add

535

(<A NAME="ref_530_7" HREF="terminal_interface-curses__adb.htm#ref_225_7">Win</A> : in <A HREF="terminal_interface-curses__ads.htm#ref_60_9">Window</A> := Standard_Window;

536

<A NAME="ref_531_7" HREF="terminal_interface-curses__adb.htm#ref_226_7">Line</A> : in <A HREF="terminal_interface-curses__ads.htm#ref_61_9">Line_Position</A>;

537

<A NAME="ref_532_7" HREF="terminal_interface-curses__adb.htm#ref_227_7">Column</A> : in <A HREF="terminal_interface-curses__ads.htm#ref_352_9">Column_Position</A>;

538

Ch : in Attributed_Character);

538

-- #1A NAME="AFU_9"#2|

539

procedure <A NAME="ref_534_14" HREF="terminal_interface-curses__adb.htm#ref_170_14">Add</A>

540

(<A NAME="ref_535_7" HREF="terminal_interface-curses__adb.htm#ref_171_7">Win</A> : in <A HREF="terminal_interface-curses__ads.htm#ref_57_9">Window</A> := <A HREF="terminal_interface-curses__ads.htm#ref_476_13">Standard_Window</A>;

541

<A NAME="ref_536_7" HREF="terminal_interface-curses__adb.htm#ref_172_7">Line</A> : in <A HREF="terminal_interface-curses__ads.htm#ref_60_9">Line_Position</A>;

542

<A NAME="ref_537_7" HREF="terminal_interface-curses__adb.htm#ref_173_7">Column</A> : in <A HREF="terminal_interface-curses__ads.htm#ref_61_9">Column_Position</A>;

543

<A NAME="ref_538_7" HREF="terminal_interface-curses__adb.htm#ref_174_7">Ch</A> : in <A HREF="terminal_interface-curses__ads.htm#ref_352_9">Attributed_Character</A>);

539

544

-- AKA: <A HREF="../man/curs_addch.3x.html">mvwaddch()</A>

540

545

-- AKA: mvaddch()

541

546

542

procedure Add

543

(<A NAME="ref_538_7" HREF="terminal_interface-curses__adb.htm#ref_244_7">Win</A> : in <A HREF="terminal_interface-curses__ads.htm#ref_60_9">Window</A> := Standard_Window;

544

<A NAME="ref_539_7" HREF="terminal_interface-curses__adb.htm#ref_245_7">Line</A> : in <A HREF="terminal_interface-curses__ads.htm#ref_61_9">Line_Position</A>;

545

<A NAME="ref_540_7" HREF="terminal_interface-curses__adb.htm#ref_246_7">Column</A> : in Column_Position;

546

Ch : in Character);

547

procedure <A NAME="ref_542_14" HREF="terminal_interface-curses__adb.htm#ref_189_14">Add</A>

548

(<A NAME="ref_543_7" HREF="terminal_interface-curses__adb.htm#ref_190_7">Win</A> : in <A HREF="terminal_interface-curses__ads.htm#ref_57_9">Window</A> := <A HREF="terminal_interface-curses__ads.htm#ref_476_13">Standard_Window</A>;

549

<A NAME="ref_544_7" HREF="terminal_interface-curses__adb.htm#ref_191_7">Line</A> : in <A HREF="terminal_interface-curses__ads.htm#ref_60_9">Line_Position</A>;

550

<A NAME="ref_545_7" HREF="terminal_interface-curses__adb.htm#ref_192_7">Column</A> : in <A HREF="terminal_interface-curses__ads.htm#ref_61_9">Column_Position</A>;

551

<A NAME="ref_546_7" HREF="terminal_interface-curses__adb.htm#ref_193_7">Ch</A> : in Character);

547

552

-- Move to the position and add a single character into the window

548

553

-- There are more Add routines, so the Inline pragma follows later

549

554

550

-- #1A NAME="AFU_9"#2|

551

procedure Add_With_Immediate_Echo

552

(<A NAME="ref_547_7" HREF="terminal_interface-curses__adb.htm#ref_259_7">Win</A> : in <A HREF="terminal_interface-curses__ads.htm#ref_352_9">Window</A> := Standard_Window;

553

Ch : in Attributed_Character);

555

-- #1A NAME="AFU_10"#2|

556

procedure <A NAME="ref_551_14" HREF="terminal_interface-curses__adb.htm#ref_204_14">Add_With_Immediate_Echo</A>

557

(<A NAME="ref_552_7" HREF="terminal_interface-curses__adb.htm#ref_205_7">Win</A> : in <A HREF="terminal_interface-curses__ads.htm#ref_57_9">Window</A> := <A HREF="terminal_interface-curses__ads.htm#ref_476_13">Standard_Window</A>;

558

<A NAME="ref_553_7" HREF="terminal_interface-curses__adb.htm#ref_206_7">Ch</A> : in <A HREF="terminal_interface-curses__ads.htm#ref_352_9">Attributed_Character</A>);

554

559

-- AKA: <A HREF="../man/curs_addch.3x.html">wechochar()</A>

555

560

-- AKA: echochar()

556

561

557

procedure Add_With_Immediate_Echo

558

(<A NAME="ref_553_7" HREF="terminal_interface-curses__adb.htm#ref_272_7">Win</A> : in Window := Standard_Window;

559

Ch : in Character);

562

procedure <A NAME="ref_557_14" HREF="terminal_interface-curses__adb.htm#ref_217_14">Add_With_Immediate_Echo</A>

563

(<A NAME="ref_558_7" HREF="terminal_interface-curses__adb.htm#ref_218_7">Win</A> : in <A HREF="terminal_interface-curses__ads.htm#ref_57_9">Window</A> := <A HREF="terminal_interface-curses__ads.htm#ref_476_13">Standard_Window</A>;

564

<A NAME="ref_559_7" HREF="terminal_interface-curses__adb.htm#ref_219_7">Ch</A> : in Character);

560

565

-- Add a character and do an immediate refresh of the screen.

561

566

pragma Inline (Add_With_Immediate_Echo);

562

567

565

570

-- |=====================================================================

566

571

-- Not Implemented: wcursyncup

567

572

568

-- #1A NAME="AFU_10"#2|

569

function Create

570

(<A NAME="ref_565_7" HREF="terminal_interface-curses__adb.htm#ref_283_21">Number_Of_Lines</A> : <A HREF="terminal_interface-curses__ads.htm#ref_65_12">Line_Count</A>;

571

<A NAME="ref_566_7" HREF="terminal_interface-curses__adb.htm#ref_284_21">Number_Of_Columns</A> : <A HREF="terminal_interface-curses__ads.htm#ref_60_9">Column_Count</A>;

572

<A NAME="ref_567_7" HREF="terminal_interface-curses__adb.htm#ref_285_21">First_Line_Position</A> : <A HREF="terminal_interface-curses__ads.htm#ref_61_9">Line_Position</A>;

573

First_Column_Position : Column_Position) return Window;

573

-- #1A NAME="AFU_11"#2|

574

function <A NAME="ref_569_13" HREF="terminal_interface-curses__adb.htm#ref_229_13">Create</A>

575

(<A NAME="ref_570_7" HREF="terminal_interface-curses__adb.htm#ref_229_21">Number_Of_Lines</A> : <A HREF="terminal_interface-curses__ads.htm#ref_63_12">Line_Count</A>;

576

<A NAME="ref_571_7" HREF="terminal_interface-curses__adb.htm#ref_230_21">Number_Of_Columns</A> : <A HREF="terminal_interface-curses__ads.htm#ref_65_12">Column_Count</A>;

577

<A NAME="ref_572_7" HREF="terminal_interface-curses__adb.htm#ref_231_21">First_Line_Position</A> : <A HREF="terminal_interface-curses__ads.htm#ref_60_9">Line_Position</A>;

578

<A NAME="ref_573_7" HREF="terminal_interface-curses__adb.htm#ref_232_21">First_Column_Position</A> : <A HREF="terminal_interface-curses__ads.htm#ref_61_9">Column_Position</A>) return <A HREF="terminal_interface-curses__ads.htm#ref_57_9">Window</A>;

574

579

-- Not Implemented: Default Number_Of_Lines, Number_Of_Columns

575

580

-- the C version lets them be 0, see the man page.

576

581

-- AKA: <A HREF="../man/curs_window.3x.html">newwin()</A>

577

pragma Inline (Create);

582

pragma Inline (<A HREF="terminal_interface-curses__ads.htm#ref_569_13">Create</A>);

578

583

579

584

function New_Window

580

(<A NAME="ref_575_7">Number_Of_Lines</A> : <A HREF="terminal_interface-curses__ads.htm#ref_65_12">Line_Count</A>;

581

<A NAME="ref_576_7">Number_Of_Columns</A> : <A HREF="terminal_interface-curses__ads.htm#ref_60_9">Column_Count</A>;

582

<A NAME="ref_577_7">First_Line_Position</A> : <A HREF="terminal_interface-curses__ads.htm#ref_61_9">Line_Position</A>;

583

First_Column_Position : Column_Position) return Window

584

renames Create;

585

pragma Inline (New_Window);

585

(<A NAME="ref_580_7">Number_Of_Lines</A> : <A HREF="terminal_interface-curses__ads.htm#ref_63_12">Line_Count</A>;

586

<A NAME="ref_581_7">Number_Of_Columns</A> : <A HREF="terminal_interface-curses__ads.htm#ref_65_12">Column_Count</A>;

587

<A NAME="ref_582_7">First_Line_Position</A> : <A HREF="terminal_interface-curses__ads.htm#ref_60_9">Line_Position</A>;

588

<A NAME="ref_583_7">First_Column_Position</A> : <A HREF="terminal_interface-curses__ads.htm#ref_61_9">Column_Position</A>) return <A HREF="terminal_interface-curses__ads.htm#ref_57_9">Window</A>

589

renames <A HREF="terminal_interface-curses__ads.htm#ref_569_13">Create</A>;

590

-- pragma Inline (New_Window);

586

591

587

-- #1A NAME="AFU_11"#2|

588

procedure Delete (Win : in out Window);

592

-- #1A NAME="AFU_12"#2|

593

procedure <A NAME="ref_588_14" HREF="terminal_interface-curses__adb.htm#ref_252_14">Delete</A> (<A NAME="ref_588_22" HREF="terminal_interface-curses__adb.htm#ref_252_22">Win</A> : in out <A HREF="terminal_interface-curses__ads.htm#ref_57_9">Window</A>);

589

594

-- AKA: <A HREF="../man/curs_window.3x.html">delwin()</A>

590

595

-- Reset Win to Null_Window

591

pragma Inline (Delete);

596

pragma Inline (<A HREF="terminal_interface-curses__ads.htm#ref_588_14">Delete</A>);

592

597

593

-- #1A NAME="AFU_12"#2|

594

function Sub_Window

595

(<A NAME="ref_590_7" HREF="terminal_interface-curses__adb.htm#ref_318_7">Win</A> : <A HREF="terminal_interface-curses__ads.htm#ref_63_12">Window</A> := Standard_Window;

596

<A NAME="ref_591_7" HREF="terminal_interface-curses__adb.htm#ref_319_7">Number_Of_Lines</A> : <A HREF="terminal_interface-curses__ads.htm#ref_65_12">Line_Count</A>;

597

<A NAME="ref_592_7" HREF="terminal_interface-curses__adb.htm#ref_320_7">Number_Of_Columns</A> : <A HREF="terminal_interface-curses__ads.htm#ref_60_9">Column_Count</A>;

598

<A NAME="ref_593_7" HREF="terminal_interface-curses__adb.htm#ref_321_7">First_Line_Position</A> : <A HREF="terminal_interface-curses__ads.htm#ref_61_9">Line_Position</A>;

599

First_Column_Position : Column_Position) return Window;

598

-- #1A NAME="AFU_13"#2|

599

function <A NAME="ref_594_13" HREF="terminal_interface-curses__adb.htm#ref_263_13">Sub_Window</A>

600

(<A NAME="ref_595_7" HREF="terminal_interface-curses__adb.htm#ref_264_7">Win</A> : <A HREF="terminal_interface-curses__ads.htm#ref_57_9">Window</A> := <A HREF="terminal_interface-curses__ads.htm#ref_476_13">Standard_Window</A>;

601

<A NAME="ref_596_7" HREF="terminal_interface-curses__adb.htm#ref_265_7">Number_Of_Lines</A> : <A HREF="terminal_interface-curses__ads.htm#ref_63_12">Line_Count</A>;

602

<A NAME="ref_597_7" HREF="terminal_interface-curses__adb.htm#ref_266_7">Number_Of_Columns</A> : <A HREF="terminal_interface-curses__ads.htm#ref_65_12">Column_Count</A>;

603

<A NAME="ref_598_7" HREF="terminal_interface-curses__adb.htm#ref_267_7">First_Line_Position</A> : <A HREF="terminal_interface-curses__ads.htm#ref_60_9">Line_Position</A>;

604

<A NAME="ref_599_7" HREF="terminal_interface-curses__adb.htm#ref_268_7">First_Column_Position</A> : <A HREF="terminal_interface-curses__ads.htm#ref_61_9">Column_Position</A>) return <A HREF="terminal_interface-curses__ads.htm#ref_57_9">Window</A>;

600

605

-- AKA: <A HREF="../man/curs_window.3x.html">subwin()</A>

601

pragma Inline (Sub_Window);

606

pragma Inline (<A HREF="terminal_interface-curses__ads.htm#ref_594_13">Sub_Window</A>);

602

607

603

-- #1A NAME="AFU_13"#2|

604

function Derived_Window

605

(<A NAME="ref_600_7" HREF="terminal_interface-curses__adb.htm#ref_346_7">Win</A> : <A HREF="terminal_interface-curses__ads.htm#ref_63_12">Window</A> := Standard_Window;

606

<A NAME="ref_601_7" HREF="terminal_interface-curses__adb.htm#ref_347_7">Number_Of_Lines</A> : <A HREF="terminal_interface-curses__ads.htm#ref_65_12">Line_Count</A>;

607

<A NAME="ref_602_7" HREF="terminal_interface-curses__adb.htm#ref_348_7">Number_Of_Columns</A> : <A HREF="terminal_interface-curses__ads.htm#ref_60_9">Column_Count</A>;

608

<A NAME="ref_603_7" HREF="terminal_interface-curses__adb.htm#ref_349_7">First_Line_Position</A> : <A HREF="terminal_interface-curses__ads.htm#ref_61_9">Line_Position</A>;

609

First_Column_Position : Column_Position) return Window;

608

-- #1A NAME="AFU_14"#2|

609

function <A NAME="ref_604_13" HREF="terminal_interface-curses__adb.htm#ref_291_13">Derived_Window</A>

610

(<A NAME="ref_605_7" HREF="terminal_interface-curses__adb.htm#ref_292_7">Win</A> : <A HREF="terminal_interface-curses__ads.htm#ref_57_9">Window</A> := <A HREF="terminal_interface-curses__ads.htm#ref_476_13">Standard_Window</A>;

611

<A NAME="ref_606_7" HREF="terminal_interface-curses__adb.htm#ref_293_7">Number_Of_Lines</A> : <A HREF="terminal_interface-curses__ads.htm#ref_63_12">Line_Count</A>;

612

<A NAME="ref_607_7" HREF="terminal_interface-curses__adb.htm#ref_294_7">Number_Of_Columns</A> : <A HREF="terminal_interface-curses__ads.htm#ref_65_12">Column_Count</A>;

613

<A NAME="ref_608_7" HREF="terminal_interface-curses__adb.htm#ref_295_7">First_Line_Position</A> : <A HREF="terminal_interface-curses__ads.htm#ref_60_9">Line_Position</A>;

614

<A NAME="ref_609_7" HREF="terminal_interface-curses__adb.htm#ref_296_7">First_Column_Position</A> : <A HREF="terminal_interface-curses__ads.htm#ref_61_9">Column_Position</A>) return <A HREF="terminal_interface-curses__ads.htm#ref_57_9">Window</A>;

610

615

-- AKA: <A HREF="../man/curs_window.3x.html">derwin()</A>

611

pragma Inline (Derived_Window);

616

pragma Inline (<A HREF="terminal_interface-curses__ads.htm#ref_604_13">Derived_Window</A>);

612

617

613

-- #1A NAME="AFU_14"#2|

614

function Duplicate (Win : Window) return Window;

618

-- #1A NAME="AFU_15"#2|

619

function <A NAME="ref_614_13" HREF="terminal_interface-curses__adb.htm#ref_319_13">Duplicate</A> (<A NAME="ref_614_24" HREF="terminal_interface-curses__adb.htm#ref_319_24">Win</A> : <A HREF="terminal_interface-curses__ads.htm#ref_57_9">Window</A>) return <A HREF="terminal_interface-curses__ads.htm#ref_57_9">Window</A>;

615

620

-- AKA: <A HREF="../man/curs_window.3x.html">dupwin()</A>

616

pragma Inline (Duplicate);

621

pragma Inline (<A HREF="terminal_interface-curses__ads.htm#ref_614_13">Duplicate</A>);

617

622

618

-- #1A NAME="AFU_15"#2|

619

procedure Move_Window (<A NAME="ref_614_27" HREF="terminal_interface-curses__adb.htm#ref_386_27">Win</A> : in <A HREF="terminal_interface-curses__ads.htm#ref_60_9">Window</A>;

620

<A NAME="ref_615_27" HREF="terminal_interface-curses__adb.htm#ref_387_27">Line</A> : in <A HREF="terminal_interface-curses__ads.htm#ref_61_9">Line_Position</A>;

621

Column : in Column_Position);

623

-- #1A NAME="AFU_16"#2|

624

procedure <A NAME="ref_619_14" HREF="terminal_interface-curses__adb.htm#ref_332_14">Move_Window</A> (<A NAME="ref_619_27" HREF="terminal_interface-curses__adb.htm#ref_332_27">Win</A> : in <A HREF="terminal_interface-curses__ads.htm#ref_57_9">Window</A>;

625

<A NAME="ref_620_27" HREF="terminal_interface-curses__adb.htm#ref_333_27">Line</A> : in <A HREF="terminal_interface-curses__ads.htm#ref_60_9">Line_Position</A>;

626

<A NAME="ref_621_27" HREF="terminal_interface-curses__adb.htm#ref_334_27">Column</A> : in <A HREF="terminal_interface-curses__ads.htm#ref_61_9">Column_Position</A>);

622

627

-- AKA: <A HREF="../man/curs_window.3x.html">mvwin()</A>

623

pragma Inline (Move_Window);

628

pragma Inline (<A HREF="terminal_interface-curses__ads.htm#ref_619_14">Move_Window</A>);

624

629

625

-- #1A NAME="AFU_16"#2|

626

procedure Move_Derived_Window (<A NAME="ref_621_35" HREF="terminal_interface-curses__adb.htm#ref_400_35">Win</A> : in <A HREF="terminal_interface-curses__ads.htm#ref_60_9">Window</A>;

627

<A NAME="ref_622_35" HREF="terminal_interface-curses__adb.htm#ref_401_35">Line</A> : in <A HREF="terminal_interface-curses__ads.htm#ref_61_9">Line_Position</A>;

628

Column : in Column_Position);

630

-- #1A NAME="AFU_17"#2|

631

procedure <A NAME="ref_626_14" HREF="terminal_interface-curses__adb.htm#ref_346_14">Move_Derived_Window</A> (<A NAME="ref_626_35" HREF="terminal_interface-curses__adb.htm#ref_346_35">Win</A> : in <A HREF="terminal_interface-curses__ads.htm#ref_57_9">Window</A>;

632

<A NAME="ref_627_35" HREF="terminal_interface-curses__adb.htm#ref_347_35">Line</A> : in <A HREF="terminal_interface-curses__ads.htm#ref_60_9">Line_Position</A>;

633

<A NAME="ref_628_35" HREF="terminal_interface-curses__adb.htm#ref_348_35">Column</A> : in <A HREF="terminal_interface-curses__ads.htm#ref_61_9">Column_Position</A>);

629

634

-- AKA: <A HREF="../man/curs_window.3x.html">mvderwin()</A>

630

pragma Inline (Move_Derived_Window);

635

pragma Inline (<A HREF="terminal_interface-curses__ads.htm#ref_626_14">Move_Derived_Window</A>);

631

636

632

-- #1A NAME="AFU_17"#2|

633

procedure Synchronize_Upwards (Win : in Window);

637

-- #1A NAME="AFU_18"#2|

638

procedure <A NAME="ref_633_14">Synchronize_Upwards</A> (<A NAME="ref_633_35" HREF="terminal_interface-curses__ads.htm#ref_633_14">Win</A> : in <A HREF="terminal_interface-curses__ads.htm#ref_57_9">Window</A>);

634

639

-- AKA: <A HREF="../man/curs_window.3x.html">wsyncup()</A>

635

640

pragma Import (C, Synchronize_Upwards, "wsyncup");

636

641

637

-- #1A NAME="AFU_18"#2|

638

procedure Synchronize_Downwards (Win : in Window);

642

-- #1A NAME="AFU_19"#2|

643

procedure <A NAME="ref_638_14">Synchronize_Downwards</A> (<A NAME="ref_638_37" HREF="terminal_interface-curses__ads.htm#ref_638_14">Win</A> : in <A HREF="terminal_interface-curses__ads.htm#ref_57_9">Window</A>);

639

644

-- AKA: <A HREF="../man/curs_window.3x.html">wsyncdown()</A>

640

645

pragma Import (C, Synchronize_Downwards, "wsyncdown");

641

646

642

-- #1A NAME="AFU_19"#2|

643

procedure Set_Synch_Mode (<A NAME="ref_638_30" HREF="terminal_interface-curses__adb.htm#ref_414_30">Win</A> : in Window := Standard_Window;

644

Mode : in Boolean := False);

647

-- #1A NAME="AFU_20"#2|

648

procedure <A NAME="ref_643_14" HREF="terminal_interface-curses__adb.htm#ref_360_14">Set_Synch_Mode</A> (<A NAME="ref_643_30" HREF="terminal_interface-curses__adb.htm#ref_360_30">Win</A> : in <A HREF="terminal_interface-curses__ads.htm#ref_57_9">Window</A> := <A HREF="terminal_interface-curses__ads.htm#ref_476_13">Standard_Window</A>;

649

<A NAME="ref_644_30" HREF="terminal_interface-curses__adb.htm#ref_361_30">Mode</A> : in Boolean := False);

645

650

-- AKA: <A HREF="../man/curs_window.3x.html">syncok()</A>

646

pragma Inline (Set_Synch_Mode);

651

pragma Inline (<A HREF="terminal_interface-curses__ads.htm#ref_643_14">Set_Synch_Mode</A>);

647

652

648

653

-- |=====================================================================

649

654

-- | Man page <A HREF="../man/curs_addstr.3x.html">curs_addstr.3x</A>

650

655

-- |=====================================================================

651

656

652

-- #1A NAME="AFU_20"#2|

653

procedure Add (<A NAME="ref_648_19" HREF="terminal_interface-curses__adb.htm#ref_426_19">Win</A> : in Window := Standard_Window;

654

<A NAME="ref_649_19" HREF="terminal_interface-curses__adb.htm#ref_427_19">Str</A> : in String;

655

Len : in Integer := -1);

657

-- #1A NAME="AFU_21"#2|

658

procedure <A NAME="ref_653_14" HREF="terminal_interface-curses__adb.htm#ref_372_14">Add</A> (<A NAME="ref_653_19" HREF="terminal_interface-curses__adb.htm#ref_372_19">Win</A> : in <A HREF="terminal_interface-curses__ads.htm#ref_57_9">Window</A> := <A HREF="terminal_interface-curses__ads.htm#ref_476_13">Standard_Window</A>;

659

<A NAME="ref_654_19" HREF="terminal_interface-curses__adb.htm#ref_373_19">Str</A> : in String;

660

<A NAME="ref_655_19" HREF="terminal_interface-curses__adb.htm#ref_374_19">Len</A> : in Integer := -1);

656

661

-- AKA: <A HREF="../man/curs_addstr.3x.html">waddnstr()</A>

657

662

-- AKA: waddstr()

658

663

-- AKA: addnstr()

659

664

-- AKA: addstr()

660

665

661

-- #1A NAME="AFU_21"#2|

662

procedure Add (<A NAME="ref_657_19" HREF="terminal_interface-curses__adb.htm#ref_445_7">Win</A> : in <A HREF="terminal_interface-curses__ads.htm#ref_60_9">Window</A> := Standard_Window;

663

<A NAME="ref_658_19" HREF="terminal_interface-curses__adb.htm#ref_446_7">Line</A> : in <A HREF="terminal_interface-curses__ads.htm#ref_61_9">Line_Position</A>;

664

<A NAME="ref_659_19" HREF="terminal_interface-curses__adb.htm#ref_447_7">Column</A> : in Column_Position;

665

<A NAME="ref_660_19" HREF="terminal_interface-curses__adb.htm#ref_448_7">Str</A> : in String;

666

Len : in Integer := -1);

666

-- #1A NAME="AFU_22"#2|

667

procedure <A NAME="ref_662_14" HREF="terminal_interface-curses__adb.htm#ref_390_14">Add</A> (<A NAME="ref_662_19" HREF="terminal_interface-curses__adb.htm#ref_391_7">Win</A> : in <A HREF="terminal_interface-curses__ads.htm#ref_57_9">Window</A> := <A HREF="terminal_interface-curses__ads.htm#ref_476_13">Standard_Window</A>;

668

<A NAME="ref_663_19" HREF="terminal_interface-curses__adb.htm#ref_392_7">Line</A> : in <A HREF="terminal_interface-curses__ads.htm#ref_60_9">Line_Position</A>;

669

<A NAME="ref_664_19" HREF="terminal_interface-curses__adb.htm#ref_393_7">Column</A> : in <A HREF="terminal_interface-curses__ads.htm#ref_61_9">Column_Position</A>;

670

<A NAME="ref_665_19" HREF="terminal_interface-curses__adb.htm#ref_394_7">Str</A> : in String;

671

<A NAME="ref_666_19" HREF="terminal_interface-curses__adb.htm#ref_395_7">Len</A> : in Integer := -1);

667

672

-- AKA: <A HREF="../man/curs_addstr.3x.html">mvwaddnstr()</A>

668

673

-- AKA: mvwaddstr()

669

674

-- AKA: mvaddnstr()

673

678

-- | Man page <A HREF="../man/curs_addchstr.3x.html">curs_addchstr.3x</A>

674

679

-- |=====================================================================

675

680

676

-- #1A NAME="AFU_22"#2|

677

procedure Add (<A NAME="ref_672_19" HREF="terminal_interface-curses__adb.htm#ref_457_7">Win</A> : in <A HREF="terminal_interface-curses__ads.htm#ref_376_9">Window</A> := Standard_Window;

678

<A NAME="ref_673_19" HREF="terminal_interface-curses__adb.htm#ref_458_7">Str</A> : in Attributed_String;

679

Len : in Integer := -1);

681

-- #1A NAME="AFU_23"#2|

682

procedure <A NAME="ref_677_14" HREF="terminal_interface-curses__adb.htm#ref_402_14">Add</A> (<A NAME="ref_677_19" HREF="terminal_interface-curses__adb.htm#ref_403_7">Win</A> : in <A HREF="terminal_interface-curses__ads.htm#ref_57_9">Window</A> := <A HREF="terminal_interface-curses__ads.htm#ref_476_13">Standard_Window</A>;

683

<A NAME="ref_678_19" HREF="terminal_interface-curses__adb.htm#ref_404_7">Str</A> : in Attributed_String;

684

<A NAME="ref_679_19" HREF="terminal_interface-curses__adb.htm#ref_405_7">Len</A> : in Integer := -1);

680

685

-- AKA: <A HREF="../man/curs_addchstr.3x.html">waddchnstr()</A>

681

686

-- AKA: waddchstr()

682

687

-- AKA: addchnstr()

683

688

-- AKA: addchstr()

684

689

685

-- #1A NAME="AFU_23"#2|

686

procedure Add (<A NAME="ref_681_19" HREF="terminal_interface-curses__adb.htm#ref_480_7">Win</A> : in <A HREF="terminal_interface-curses__ads.htm#ref_60_9">Window</A> := Standard_Window;

687

<A NAME="ref_682_19" HREF="terminal_interface-curses__adb.htm#ref_481_7">Line</A> : in <A HREF="terminal_interface-curses__ads.htm#ref_61_9">Line_Position</A>;

688

<A NAME="ref_683_19" HREF="terminal_interface-curses__adb.htm#ref_482_7">Column</A> : in <A HREF="terminal_interface-curses__ads.htm#ref_376_9">Column_Position</A>;

689

<A NAME="ref_684_19" HREF="terminal_interface-curses__adb.htm#ref_483_7">Str</A> : in Attributed_String;

690

Len : in Integer := -1);

690

-- #1A NAME="AFU_24"#2|

691

procedure <A NAME="ref_686_14" HREF="terminal_interface-curses__adb.htm#ref_425_14">Add</A> (<A NAME="ref_686_19" HREF="terminal_interface-curses__adb.htm#ref_426_7">Win</A> : in <A HREF="terminal_interface-curses__ads.htm#ref_57_9">Window</A> := <A HREF="terminal_interface-curses__ads.htm#ref_476_13">Standard_Window</A>;

692

<A NAME="ref_687_19" HREF="terminal_interface-curses__adb.htm#ref_427_7">Line</A> : in <A HREF="terminal_interface-curses__ads.htm#ref_60_9">Line_Position</A>;

693

<A NAME="ref_688_19" HREF="terminal_interface-curses__adb.htm#ref_428_7">Column</A> : in <A HREF="terminal_interface-curses__ads.htm#ref_61_9">Column_Position</A>;

694

<A NAME="ref_689_19" HREF="terminal_interface-curses__adb.htm#ref_429_7">Str</A> : in Attributed_String;

695

<A NAME="ref_690_19" HREF="terminal_interface-curses__adb.htm#ref_430_7">Len</A> : in Integer := -1);

691

696

-- AKA: <A HREF="../man/curs_addchstr.3x.html">mvwaddchnstr()</A>

692

697

-- AKA: mvwaddchstr()

693

698

-- AKA: mvaddchnstr()

700

705

-- | Not implemented: mvhline, mvwhline, mvvline, mvwvline

701

706

-- | use Move_Cursor then Horizontal_Line or Vertical_Line

702

707

703

-- #1A NAME="AFU_24"#2|

704

procedure Border

705

(<A NAME="ref_700_7" HREF="terminal_interface-curses__adb.htm#ref_492_7">Win</A> : in <A HREF="terminal_interface-curses__ads.htm#ref_352_9">Window</A> := Standard_Window;

706

<A NAME="ref_701_7" HREF="terminal_interface-curses__adb.htm#ref_493_7">Left_Side_Symbol</A> : in <A HREF="terminal_interface-curses__ads.htm#ref_352_9">Attributed_Character</A> := <A HREF="terminal_interface-curses__ads.htm#ref_371_4">Default_Character</A>;

707

<A NAME="ref_702_7" HREF="terminal_interface-curses__adb.htm#ref_494_7">Right_Side_Symbol</A> : in <A HREF="terminal_interface-curses__ads.htm#ref_352_9">Attributed_Character</A> := <A HREF="terminal_interface-curses__ads.htm#ref_371_4">Default_Character</A>;

708

<A NAME="ref_703_7" HREF="terminal_interface-curses__adb.htm#ref_495_7">Top_Side_Symbol</A> : in <A HREF="terminal_interface-curses__ads.htm#ref_352_9">Attributed_Character</A> := <A HREF="terminal_interface-curses__ads.htm#ref_371_4">Default_Character</A>;

709

<A NAME="ref_704_7" HREF="terminal_interface-curses__adb.htm#ref_496_7">Bottom_Side_Symbol</A> : in <A HREF="terminal_interface-curses__ads.htm#ref_352_9">Attributed_Character</A> := <A HREF="terminal_interface-curses__ads.htm#ref_371_4">Default_Character</A>;

710

<A NAME="ref_705_7" HREF="terminal_interface-curses__adb.htm#ref_497_7">Upper_Left_Corner_Symbol</A> : in <A HREF="terminal_interface-curses__ads.htm#ref_352_9">Attributed_Character</A> := <A HREF="terminal_interface-curses__ads.htm#ref_371_4">Default_Character</A>;

711

<A NAME="ref_706_7" HREF="terminal_interface-curses__adb.htm#ref_498_7">Upper_Right_Corner_Symbol</A> : in <A HREF="terminal_interface-curses__ads.htm#ref_352_9">Attributed_Character</A> := <A HREF="terminal_interface-curses__ads.htm#ref_371_4">Default_Character</A>;

712

<A NAME="ref_707_7" HREF="terminal_interface-curses__adb.htm#ref_499_7">Lower_Left_Corner_Symbol</A> : in <A HREF="terminal_interface-curses__ads.htm#ref_352_9">Attributed_Character</A> := <A HREF="terminal_interface-curses__ads.htm#ref_371_4">Default_Character</A>;

713

Lower_Right_Corner_Symbol : in Attributed_Character := Default_Character

708

-- #1A NAME="AFU_25"#2|

709

procedure <A NAME="ref_704_14" HREF="terminal_interface-curses__adb.htm#ref_437_14">Border</A>

710

(<A NAME="ref_705_7" HREF="terminal_interface-curses__adb.htm#ref_438_7">Win</A> : in <A HREF="terminal_interface-curses__ads.htm#ref_57_9">Window</A> := <A HREF="terminal_interface-curses__ads.htm#ref_476_13">Standard_Window</A>;

711

<A NAME="ref_706_7" HREF="terminal_interface-curses__adb.htm#ref_439_7">Left_Side_Symbol</A> : in <A HREF="terminal_interface-curses__ads.htm#ref_352_9">Attributed_Character</A> := <A HREF="terminal_interface-curses__ads.htm#ref_371_4">Default_Character</A>;

712

<A NAME="ref_707_7" HREF="terminal_interface-curses__adb.htm#ref_440_7">Right_Side_Symbol</A> : in <A HREF="terminal_interface-curses__ads.htm#ref_352_9">Attributed_Character</A> := <A HREF="terminal_interface-curses__ads.htm#ref_371_4">Default_Character</A>;

713

<A NAME="ref_708_7" HREF="terminal_interface-curses__adb.htm#ref_441_7">Top_Side_Symbol</A> : in <A HREF="terminal_interface-curses__ads.htm#ref_352_9">Attributed_Character</A> := <A HREF="terminal_interface-curses__ads.htm#ref_371_4">Default_Character</A>;

714

<A NAME="ref_709_7" HREF="terminal_interface-curses__adb.htm#ref_442_7">Bottom_Side_Symbol</A> : in <A HREF="terminal_interface-curses__ads.htm#ref_352_9">Attributed_Character</A> := <A HREF="terminal_interface-curses__ads.htm#ref_371_4">Default_Character</A>;

715

<A NAME="ref_710_7" HREF="terminal_interface-curses__adb.htm#ref_443_7">Upper_Left_Corner_Symbol</A> : in <A HREF="terminal_interface-curses__ads.htm#ref_352_9">Attributed_Character</A> := <A HREF="terminal_interface-curses__ads.htm#ref_371_4">Default_Character</A>;

716

<A NAME="ref_711_7" HREF="terminal_interface-curses__adb.htm#ref_444_7">Upper_Right_Corner_Symbol</A> : in <A HREF="terminal_interface-curses__ads.htm#ref_352_9">Attributed_Character</A> := <A HREF="terminal_interface-curses__ads.htm#ref_371_4">Default_Character</A>;

717

<A NAME="ref_712_7" HREF="terminal_interface-curses__adb.htm#ref_445_7">Lower_Left_Corner_Symbol</A> : in <A HREF="terminal_interface-curses__ads.htm#ref_352_9">Attributed_Character</A> := <A HREF="terminal_interface-curses__ads.htm#ref_371_4">Default_Character</A>;

718

<A NAME="ref_713_7" HREF="terminal_interface-curses__adb.htm#ref_446_7">Lower_Right_Corner_Symbol</A> : in <A HREF="terminal_interface-curses__ads.htm#ref_352_9">Attributed_Character</A> := <A HREF="terminal_interface-curses__ads.htm#ref_371_4">Default_Character</A>

714

719

);

715

720

-- AKA: <A HREF="../man/curs_border.3x.html">wborder()</A>

716

721

-- AKA: border()

717

pragma Inline (Border);

722

pragma Inline (<A HREF="terminal_interface-curses__ads.htm#ref_704_14">Border</A>);

718

723

719

-- #1A NAME="AFU_25"#2|

720

procedure Box

721

(<A NAME="ref_716_7" HREF="terminal_interface-curses__adb.htm#ref_529_7">Win</A> : in <A HREF="terminal_interface-curses__ads.htm#ref_352_9">Window</A> := Standard_Window;

722

<A NAME="ref_717_7" HREF="terminal_interface-curses__adb.htm#ref_530_7">Vertical_Symbol</A> : in <A HREF="terminal_interface-curses__ads.htm#ref_352_9">Attributed_Character</A> := <A HREF="terminal_interface-curses__ads.htm#ref_371_4">Default_Character</A>;

723

Horizontal_Symbol : in Attributed_Character := Default_Character);

724

-- #1A NAME="AFU_26"#2|

725

procedure <A NAME="ref_720_14" HREF="terminal_interface-curses__adb.htm#ref_474_14">Box</A>

726

(<A NAME="ref_721_7" HREF="terminal_interface-curses__adb.htm#ref_475_7">Win</A> : in <A HREF="terminal_interface-curses__ads.htm#ref_57_9">Window</A> := <A HREF="terminal_interface-curses__ads.htm#ref_476_13">Standard_Window</A>;

727

<A NAME="ref_722_7" HREF="terminal_interface-curses__adb.htm#ref_476_7">Vertical_Symbol</A> : in <A HREF="terminal_interface-curses__ads.htm#ref_352_9">Attributed_Character</A> := <A HREF="terminal_interface-curses__ads.htm#ref_371_4">Default_Character</A>;

728

<A NAME="ref_723_7" HREF="terminal_interface-curses__adb.htm#ref_477_7">Horizontal_Symbol</A> : in <A HREF="terminal_interface-curses__ads.htm#ref_352_9">Attributed_Character</A> := <A HREF="terminal_interface-curses__ads.htm#ref_371_4">Default_Character</A>);

724

729

-- AKA: <A HREF="../man/curs_border.3x.html">box()</A>

725

pragma Inline (Box);

730

pragma Inline (<A HREF="terminal_interface-curses__ads.htm#ref_720_14">Box</A>);

726

731

727

-- #1A NAME="AFU_26"#2|

728

procedure Horizontal_Line

729

(<A NAME="ref_724_7" HREF="terminal_interface-curses__adb.htm#ref_540_7">Win</A> : in Window := Standard_Window;

730

<A NAME="ref_725_7" HREF="terminal_interface-curses__adb.htm#ref_541_7">Line_Size</A> : in <A HREF="terminal_interface-curses__ads.htm#ref_352_9">Natural</A>;

731

Line_Symbol : in Attributed_Character := Default_Character);

732

-- #1A NAME="AFU_27"#2|

733

procedure <A NAME="ref_728_14" HREF="terminal_interface-curses__adb.htm#ref_485_14">Horizontal_Line</A>

734

(<A NAME="ref_729_7" HREF="terminal_interface-curses__adb.htm#ref_486_7">Win</A> : in <A HREF="terminal_interface-curses__ads.htm#ref_57_9">Window</A> := <A HREF="terminal_interface-curses__ads.htm#ref_476_13">Standard_Window</A>;

735

<A NAME="ref_730_7" HREF="terminal_interface-curses__adb.htm#ref_487_7">Line_Size</A> : in Natural;

736

<A NAME="ref_731_7" HREF="terminal_interface-curses__adb.htm#ref_488_7">Line_Symbol</A> : in <A HREF="terminal_interface-curses__ads.htm#ref_352_9">Attributed_Character</A> := <A HREF="terminal_interface-curses__ads.htm#ref_371_4">Default_Character</A>);

732

737

-- AKA: <A HREF="../man/curs_border.3x.html">whline()</A>

733

738

-- AKA: hline()

734

pragma Inline (Horizontal_Line);

739

pragma Inline (<A HREF="terminal_interface-curses__ads.htm#ref_728_14">Horizontal_Line</A>);

735

740

736

-- #1A NAME="AFU_27"#2|

737

procedure Vertical_Line

738

(<A NAME="ref_733_7" HREF="terminal_interface-curses__adb.htm#ref_557_7">Win</A> : in Window := Standard_Window;

739

<A NAME="ref_734_7" HREF="terminal_interface-curses__adb.htm#ref_558_7">Line_Size</A> : in <A HREF="terminal_interface-curses__ads.htm#ref_352_9">Natural</A>;

740

Line_Symbol : in Attributed_Character := Default_Character);

741

-- #1A NAME="AFU_28"#2|

742

procedure <A NAME="ref_737_14" HREF="terminal_interface-curses__adb.htm#ref_502_14">Vertical_Line</A>

743

(<A NAME="ref_738_7" HREF="terminal_interface-curses__adb.htm#ref_503_7">Win</A> : in <A HREF="terminal_interface-curses__ads.htm#ref_57_9">Window</A> := <A HREF="terminal_interface-curses__ads.htm#ref_476_13">Standard_Window</A>;

744

<A NAME="ref_739_7" HREF="terminal_interface-curses__adb.htm#ref_504_7">Line_Size</A> : in Natural;

745

<A NAME="ref_740_7" HREF="terminal_interface-curses__adb.htm#ref_505_7">Line_Symbol</A> : in <A HREF="terminal_interface-curses__ads.htm#ref_352_9">Attributed_Character</A> := <A HREF="terminal_interface-curses__ads.htm#ref_371_4">Default_Character</A>);

741

746

-- AKA: <A HREF="../man/curs_border.3x.html">wvline()</A>

742

747

-- AKA: vline()

743

pragma Inline (Vertical_Line);

748

pragma Inline (<A HREF="terminal_interface-curses__ads.htm#ref_737_14">Vertical_Line</A>);

744

749

745

750

-- |=====================================================================

746

751

-- | Man page <A HREF="../man/curs_getch.3x.html">curs_getch.3x</A>

747

752

-- |=====================================================================

748

753

-- Not implemented: mvgetch, mvwgetch

749

754

750

-- #1A NAME="AFU_28"#2|

751

function Get_Keystroke (Win : Window := Standard_Window)

752

return Real_Key_Code;

755

-- #1A NAME="AFU_29"#2|

756

function <A NAME="ref_751_13" HREF="terminal_interface-curses__adb.htm#ref_520_13">Get_Keystroke</A> (<A NAME="ref_751_28" HREF="terminal_interface-curses__adb.htm#ref_520_28">Win</A> : <A HREF="terminal_interface-curses__ads.htm#ref_57_9">Window</A> := <A HREF="terminal_interface-curses__ads.htm#ref_476_13">Standard_Window</A>)

757

return <A HREF="terminal_interface-curses__ads.htm#ref_73_12">Real_Key_Code</A>;

753

758

-- AKA: <A HREF="../man/curs_getch.3x.html">wgetch()</A>

754

759

-- AKA: getch()

755

760

-- Get a character from the keyboard and echo it - if enabled - to the

756

761

-- window.

757

762

-- If for any reason (i.e. a timeout) we couldn't get a character the

758

763

-- returned keycode is Key_None.

759

pragma Inline (Get_Keystroke);

764

pragma Inline (<A HREF="terminal_interface-curses__ads.htm#ref_751_13">Get_Keystroke</A>);

760

765

761

-- #1A NAME="AFU_29"#2|

762

procedure Undo_Keystroke (Key : in Real_Key_Code);

766

-- #1A NAME="AFU_30"#2|

767

procedure <A NAME="ref_762_14" HREF="terminal_interface-curses__adb.htm#ref_535_14">Undo_Keystroke</A> (<A NAME="ref_762_30" HREF="terminal_interface-curses__adb.htm#ref_535_30">Key</A> : in <A HREF="terminal_interface-curses__ads.htm#ref_73_12">Real_Key_Code</A>);

763

768

-- AKA: <A HREF="../man/curs_getch.3x.html">ungetch()</A>

764

pragma Inline (Undo_Keystroke);

769

pragma Inline (<A HREF="terminal_interface-curses__ads.htm#ref_762_14">Undo_Keystroke</A>);

765

770

766

-- #1A NAME="AFU_30"#2|

767

function Has_Key (Key : Special_Key_Code) return Boolean;

771

-- #1A NAME="AFU_31"#2|

772

function <A NAME="ref_767_13" HREF="terminal_interface-curses__adb.htm#ref_545_13">Has_Key</A> (<A NAME="ref_767_22" HREF="terminal_interface-curses__adb.htm#ref_545_22">Key</A> : <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A>) return Boolean;

768

773

-- AKA: <A HREF="../man/curs_getch.3x.html">has_key()</A>

769

pragma Inline (Has_Key);

774

pragma Inline (<A HREF="terminal_interface-curses__ads.htm#ref_767_13">Has_Key</A>);

770

775

771

776

-- |

772

777

-- | Some helper functions

773

778

-- |

774

function Is_Function_Key (Key : Special_Key_Code) return Boolean;

779

function <A NAME="ref_774_13" HREF="terminal_interface-curses__adb.htm#ref_557_13">Is_Function_Key</A> (<A NAME="ref_774_30" HREF="terminal_interface-curses__adb.htm#ref_557_30">Key</A> : <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A>) return Boolean;

775

780

-- Return True if the Key is a function key (i.e. one of F0 .. F63)

776

pragma Inline (Is_Function_Key);

781

pragma Inline (<A HREF="terminal_interface-curses__ads.htm#ref_774_13">Is_Function_Key</A>);

777

782

778

subtype Function_Key_Number is Integer range 0 .. 63;

783

subtype <A NAME="ref_778_12">Function_Key_Number</A> is Integer range 0 .. 63;

779

784

-- (n)curses allows for 64 function keys.

780

785

781

function Function_Key (Key : Real_Key_Code) return Function_Key_Number;

786

function <A NAME="ref_781_13" HREF="terminal_interface-curses__adb.htm#ref_569_13">Function_Key</A> (<A NAME="ref_781_27" HREF="terminal_interface-curses__adb.htm#ref_569_27">Key</A> : <A HREF="terminal_interface-curses__ads.htm#ref_73_12">Real_Key_Code</A>) return <A HREF="terminal_interface-curses__ads.htm#ref_778_12">Function_Key_Number</A>;

782

787

-- Return the number of the function key. If the code is not a

783

788

-- function key, a CONSTRAINT_ERROR will be raised.

784

pragma Inline (Function_Key);

789

pragma Inline (<A HREF="terminal_interface-curses__ads.htm#ref_781_13">Function_Key</A>);

785

790

786

function Function_Key_Code (Key : Function_Key_Number) return Real_Key_Code;

791

function <A NAME="ref_786_13" HREF="terminal_interface-curses__adb.htm#ref_580_13">Function_Key_Code</A> (<A NAME="ref_786_32" HREF="terminal_interface-curses__adb.htm#ref_580_32">Key</A> : <A HREF="terminal_interface-curses__ads.htm#ref_778_12">Function_Key_Number</A>) return <A HREF="terminal_interface-curses__ads.htm#ref_73_12">Real_Key_Code</A>;

787

792

-- Return the key code for a given function-key number.

788

pragma Inline (Function_Key_Code);

793

pragma Inline (<A HREF="terminal_interface-curses__ads.htm#ref_786_13">Function_Key_Code</A>);

789

794

790

795

-- |=====================================================================

791

796

-- | Man page <A HREF="../man/curs_attr.3x.html">curs_attr.3x</A>

796

801

-- PAIR_NUMBER

797

802

-- PAIR_NUMBER(c) is the same as c.Color

798

803

799

-- #1A NAME="AFU_31"#2|

800

procedure Standout (<A NAME="ref_795_24" HREF="terminal_interface-curses__adb.htm#ref_640_24">Win</A> : Window := Standard_Window;

801

On : Boolean := True);

804

-- #1A NAME="AFU_32"#2|

805

procedure <A NAME="ref_800_14" HREF="terminal_interface-curses__adb.htm#ref_586_14">Standout</A> (<A NAME="ref_800_24" HREF="terminal_interface-curses__adb.htm#ref_586_24">Win</A> : <A HREF="terminal_interface-curses__ads.htm#ref_57_9">Window</A> := <A HREF="terminal_interface-curses__ads.htm#ref_476_13">Standard_Window</A>;

806

<A NAME="ref_801_24" HREF="terminal_interface-curses__adb.htm#ref_587_24">On</A> : Boolean := True);

802

807

-- AKA: wstandout()

803

808

-- AKA: wstandend()

804

809

805

-- #1A NAME="AFU_32"#2|

806

procedure Switch_Character_Attribute

807

(<A NAME="ref_802_7" HREF="terminal_interface-curses__adb.htm#ref_661_7">Win</A> : in <A HREF="terminal_interface-curses__ads.htm#ref_307_9">Window</A> := Standard_Window;

808

<A NAME="ref_803_7" HREF="terminal_interface-curses__adb.htm#ref_662_7">Attr</A> : in Character_Attribute_Set := Normal_Video;

809

On : in Boolean := True); -- if False we switch Off.

810

-- #1A NAME="AFU_33"#2|

811

procedure <A NAME="ref_806_14" HREF="terminal_interface-curses__adb.htm#ref_606_14">Switch_Character_Attribute</A>

812

(<A NAME="ref_807_7" HREF="terminal_interface-curses__adb.htm#ref_607_7">Win</A> : in <A HREF="terminal_interface-curses__ads.htm#ref_57_9">Window</A> := <A HREF="terminal_interface-curses__ads.htm#ref_476_13">Standard_Window</A>;

813

<A NAME="ref_808_7" HREF="terminal_interface-curses__adb.htm#ref_608_7">Attr</A> : in <A HREF="terminal_interface-curses__ads.htm#ref_307_9">Character_Attribute_Set</A> := <A HREF="terminal_interface-curses__ads.htm#ref_350_4">Normal_Video</A>;

814

<A NAME="ref_809_7" HREF="terminal_interface-curses__adb.htm#ref_609_7">On</A> : in Boolean := True); -- if False we switch Off.

810

815

-- Switches those Attributes set to true in the list.

811

816

-- AKA: <A HREF="../man/curs_attr.3x.html">wattron()</A>

812

817

-- AKA: wattroff()

813

818

-- AKA: attron()

814

819

-- AKA: attroff()

815

820

816

-- #1A NAME="AFU_33"#2|

817

procedure Set_Character_Attributes

818

(<A NAME="ref_813_7" HREF="terminal_interface-curses__adb.htm#ref_689_7">Win</A> : in <A HREF="terminal_interface-curses__ads.htm#ref_307_9">Window</A> := Standard_Window;

819

<A NAME="ref_814_7" HREF="terminal_interface-curses__adb.htm#ref_690_7">Attr</A> : in <A HREF="terminal_interface-curses__ads.htm#ref_299_9">Character_Attribute_Set</A> := Normal_Video;

820

Color : in Color_Pair := Color_Pair'First);

821

-- #1A NAME="AFU_34"#2|

822

procedure <A NAME="ref_817_14" HREF="terminal_interface-curses__adb.htm#ref_634_14">Set_Character_Attributes</A>

823

(<A NAME="ref_818_7" HREF="terminal_interface-curses__adb.htm#ref_635_7">Win</A> : in <A HREF="terminal_interface-curses__ads.htm#ref_57_9">Window</A> := <A HREF="terminal_interface-curses__ads.htm#ref_476_13">Standard_Window</A>;

824

<A NAME="ref_819_7" HREF="terminal_interface-curses__adb.htm#ref_636_7">Attr</A> : in <A HREF="terminal_interface-curses__ads.htm#ref_307_9">Character_Attribute_Set</A> := <A HREF="terminal_interface-curses__ads.htm#ref_350_4">Normal_Video</A>;

825

<A NAME="ref_820_7" HREF="terminal_interface-curses__adb.htm#ref_637_7">Color</A> : in <A HREF="terminal_interface-curses__ads.htm#ref_299_9">Color_Pair</A> := <A HREF="terminal_interface-curses__ads.htm#ref_299_9">Color_Pair</A>'First);

821

826

-- AKA: <A HREF="../man/curs_attr.3x.html">wattrset()</A>

822

827

-- AKA: attrset()

823

pragma Inline (Set_Character_Attributes);

828

pragma Inline (<A HREF="terminal_interface-curses__ads.htm#ref_817_14">Set_Character_Attributes</A>);

824

829

825

-- #1A NAME="AFU_34"#2|

826

function Get_Character_Attribute

827

(Win : in Window := Standard_Window) return Character_Attribute_Set;

830

-- #1A NAME="AFU_35"#2|

831

function <A NAME="ref_826_13" HREF="terminal_interface-curses__adb.htm#ref_652_13">Get_Character_Attribute</A>

832

(<A NAME="ref_827_7" HREF="terminal_interface-curses__adb.htm#ref_652_38">Win</A> : in <A HREF="terminal_interface-curses__ads.htm#ref_57_9">Window</A> := <A HREF="terminal_interface-curses__ads.htm#ref_476_13">Standard_Window</A>) return <A HREF="terminal_interface-curses__ads.htm#ref_307_9">Character_Attribute_Set</A>;

828

833

-- AKA: <A HREF="../man/curs_attr.3x.html">wattr_get()</A>

829

834

-- AKA: attr_get()

830

835

831

-- #1A NAME="AFU_35"#2|

832

function Get_Character_Attribute

833

(Win : in Window := Standard_Window) return Color_Pair;

836

-- #1A NAME="AFU_36"#2|

837

function <A NAME="ref_832_13" HREF="terminal_interface-curses__adb.htm#ref_675_13">Get_Character_Attribute</A>

838

(<A NAME="ref_833_7" HREF="terminal_interface-curses__adb.htm#ref_675_38">Win</A> : in <A HREF="terminal_interface-curses__ads.htm#ref_57_9">Window</A> := <A HREF="terminal_interface-curses__ads.htm#ref_476_13">Standard_Window</A>) return <A HREF="terminal_interface-curses__ads.htm#ref_299_9">Color_Pair</A>;

834

839

-- AKA: <A HREF="../man/curs_attr.3x.html">wattr_get()</A>

835

840

pragma Inline (Get_Character_Attribute);

836

841

837

-- #1A NAME="AFU_36"#2|

838

procedure Set_Color (<A NAME="ref_833_25" HREF="terminal_interface-curses__adb.htm#ref_752_25">Win</A> : in <A HREF="terminal_interface-curses__ads.htm#ref_299_9">Window</A> := Standard_Window;

839

Pair : in Color_Pair);

842

-- #1A NAME="AFU_37"#2|

843

procedure <A NAME="ref_838_14" HREF="terminal_interface-curses__adb.htm#ref_698_14">Set_Color</A> (<A NAME="ref_838_25" HREF="terminal_interface-curses__adb.htm#ref_698_25">Win</A> : in <A HREF="terminal_interface-curses__ads.htm#ref_57_9">Window</A> := <A HREF="terminal_interface-curses__ads.htm#ref_476_13">Standard_Window</A>;

844

<A NAME="ref_839_25" HREF="terminal_interface-curses__adb.htm#ref_699_25">Pair</A> : in <A HREF="terminal_interface-curses__ads.htm#ref_299_9">Color_Pair</A>);

840

845

-- AKA: <A HREF="../man/curs_attr.3x.html">wcolor_set()</A>

841

846

-- AKA: color_set()

842

pragma Inline (Set_Color);

847

pragma Inline (<A HREF="terminal_interface-curses__ads.htm#ref_838_14">Set_Color</A>);

843

848

844

-- #1A NAME="AFU_37"#2|

845

procedure Change_Attributes

846

(<A NAME="ref_841_7" HREF="terminal_interface-curses__adb.htm#ref_768_7">Win</A> : in Window := Standard_Window;

847

<A NAME="ref_842_7" HREF="terminal_interface-curses__adb.htm#ref_769_7">Count</A> : in <A HREF="terminal_interface-curses__ads.htm#ref_307_9">Integer</A> := -1;

848

<A NAME="ref_843_7" HREF="terminal_interface-curses__adb.htm#ref_770_7">Attr</A> : in <A HREF="terminal_interface-curses__ads.htm#ref_299_9">Character_Attribute_Set</A> := Normal_Video;

849

Color : in Color_Pair := Color_Pair'First);

849

-- #1A NAME="AFU_38"#2|

850

procedure <A NAME="ref_845_14" HREF="terminal_interface-curses__adb.htm#ref_713_14">Change_Attributes</A>

851

(<A NAME="ref_846_7" HREF="terminal_interface-curses__adb.htm#ref_714_7">Win</A> : in <A HREF="terminal_interface-curses__ads.htm#ref_57_9">Window</A> := <A HREF="terminal_interface-curses__ads.htm#ref_476_13">Standard_Window</A>;

852

<A NAME="ref_847_7" HREF="terminal_interface-curses__adb.htm#ref_715_7">Count</A> : in Integer := -1;

853

<A NAME="ref_848_7" HREF="terminal_interface-curses__adb.htm#ref_716_7">Attr</A> : in <A HREF="terminal_interface-curses__ads.htm#ref_307_9">Character_Attribute_Set</A> := <A HREF="terminal_interface-curses__ads.htm#ref_350_4">Normal_Video</A>;

854

<A NAME="ref_849_7" HREF="terminal_interface-curses__adb.htm#ref_717_7">Color</A> : in <A HREF="terminal_interface-curses__ads.htm#ref_299_9">Color_Pair</A> := <A HREF="terminal_interface-curses__ads.htm#ref_299_9">Color_Pair</A>'First);

850

855

-- AKA: <A HREF="../man/curs_attr.3x.html">wchgat()</A>

851

856

-- AKA: chgat()

852

857

853

-- #1A NAME="AFU_38"#2|

854

procedure Change_Attributes

855

(<A NAME="ref_850_7" HREF="terminal_interface-curses__adb.htm#ref_791_7">Win</A> : in <A HREF="terminal_interface-curses__ads.htm#ref_60_9">Window</A> := Standard_Window;

856

<A NAME="ref_851_7" HREF="terminal_interface-curses__adb.htm#ref_792_7">Line</A> : in <A HREF="terminal_interface-curses__ads.htm#ref_61_9">Line_Position</A> := Line_Position'First;

857

<A NAME="ref_852_7" HREF="terminal_interface-curses__adb.htm#ref_793_7">Column</A> : in Column_Position := Column_Position'First;

858

<A NAME="ref_853_7" HREF="terminal_interface-curses__adb.htm#ref_794_7">Count</A> : in <A HREF="terminal_interface-curses__ads.htm#ref_307_9">Integer</A> := -1;

859

<A NAME="ref_854_7" HREF="terminal_interface-curses__adb.htm#ref_795_7">Attr</A> : in <A HREF="terminal_interface-curses__ads.htm#ref_299_9">Character_Attribute_Set</A> := Normal_Video;

860

Color : in Color_Pair := Color_Pair'First);

858

-- #1A NAME="AFU_39"#2|

859

procedure <A NAME="ref_854_14" HREF="terminal_interface-curses__adb.htm#ref_736_14">Change_Attributes</A>

860

(<A NAME="ref_855_7" HREF="terminal_interface-curses__adb.htm#ref_737_7">Win</A> : in <A HREF="terminal_interface-curses__ads.htm#ref_57_9">Window</A> := <A HREF="terminal_interface-curses__ads.htm#ref_476_13">Standard_Window</A>;

861

<A NAME="ref_856_7" HREF="terminal_interface-curses__adb.htm#ref_738_7">Line</A> : in <A HREF="terminal_interface-curses__ads.htm#ref_60_9">Line_Position</A> := <A HREF="terminal_interface-curses__ads.htm#ref_60_9">Line_Position</A>'First;

862

<A NAME="ref_857_7" HREF="terminal_interface-curses__adb.htm#ref_739_7">Column</A> : in <A HREF="terminal_interface-curses__ads.htm#ref_61_9">Column_Position</A> := <A HREF="terminal_interface-curses__ads.htm#ref_61_9">Column_Position</A>'First;

863

<A NAME="ref_858_7" HREF="terminal_interface-curses__adb.htm#ref_740_7">Count</A> : in Integer := -1;

864

<A NAME="ref_859_7" HREF="terminal_interface-curses__adb.htm#ref_741_7">Attr</A> : in <A HREF="terminal_interface-curses__ads.htm#ref_307_9">Character_Attribute_Set</A> := <A HREF="terminal_interface-curses__ads.htm#ref_350_4">Normal_Video</A>;

865

<A NAME="ref_860_7" HREF="terminal_interface-curses__adb.htm#ref_742_7">Color</A> : in <A HREF="terminal_interface-curses__ads.htm#ref_299_9">Color_Pair</A> := <A HREF="terminal_interface-curses__ads.htm#ref_299_9">Color_Pair</A>'First);

861

866

-- AKA: <A HREF="../man/curs_attr.3x.html">mvwchgat()</A>

862

867

-- AKA: mvchgat()

863

868

pragma Inline (Change_Attributes);

866

871

-- | Man page <A HREF="../man/curs_beep.3x.html">curs_beep.3x</A>

867

872

-- |=====================================================================

868

873

869

-- #1A NAME="AFU_39"#2|

870

procedure Beep;

874

-- #1A NAME="AFU_40"#2|

875

procedure <A NAME="ref_870_14" HREF="terminal_interface-curses__adb.htm#ref_749_14">Beep</A>;

871

876

-- AKA: <A HREF="../man/curs_beep.3x.html">beep()</A>

872

pragma Inline (Beep);

877

pragma Inline (<A HREF="terminal_interface-curses__ads.htm#ref_870_14">Beep</A>);

873

878

874

-- #1A NAME="AFU_40"#2|

875

procedure Flash_Screen;

879

-- #1A NAME="AFU_41"#2|

880

procedure <A NAME="ref_875_14" HREF="terminal_interface-curses__adb.htm#ref_759_14">Flash_Screen</A>;

876

881

-- AKA: <A HREF="../man/curs_beep.3x.html">flash()</A>

877

pragma Inline (Flash_Screen);

882

pragma Inline (<A HREF="terminal_interface-curses__ads.htm#ref_875_14">Flash_Screen</A>);

878

883

879

884

-- |=====================================================================

880

885

-- | Man page <A HREF="../man/curs_inopts.3x.html">curs_inopts.3x</A>

882

887

883

888

-- | Not implemented : typeahead

884

889

--

885

-- #1A NAME="AFU_41"#2|

886

procedure Set_Cbreak_Mode (SwitchOn : in Boolean := True);

890

-- #1A NAME="AFU_42"#2|

891

procedure <A NAME="ref_886_14" HREF="terminal_interface-curses__adb.htm#ref_769_14">Set_Cbreak_Mode</A> (<A NAME="ref_886_31" HREF="terminal_interface-curses__adb.htm#ref_769_31">SwitchOn</A> : in Boolean := True);

887

892

-- AKA: <A HREF="../man/curs_inopts.3x.html">cbreak()</A>

888

893

-- AKA: nocbreak()

889

pragma Inline (Set_Cbreak_Mode);

894

pragma Inline (<A HREF="terminal_interface-curses__ads.htm#ref_886_14">Set_Cbreak_Mode</A>);

890

895

891

-- #1A NAME="AFU_42"#2|

892

procedure Set_Raw_Mode (SwitchOn : in Boolean := True);

896

-- #1A NAME="AFU_43"#2|

897

procedure <A NAME="ref_892_14" HREF="terminal_interface-curses__adb.htm#ref_788_14">Set_Raw_Mode</A> (<A NAME="ref_892_28" HREF="terminal_interface-curses__adb.htm#ref_788_28">SwitchOn</A> : in Boolean := True);

893

898

-- AKA: <A HREF="../man/curs_inopts.3x.html">raw()</A>

894

899

-- AKA: noraw()

895

pragma Inline (Set_Raw_Mode);

900

pragma Inline (<A HREF="terminal_interface-curses__ads.htm#ref_892_14">Set_Raw_Mode</A>);

896

901

897

-- #1A NAME="AFU_43"#2|

898

procedure Set_Echo_Mode (SwitchOn : in Boolean := True);

902

-- #1A NAME="AFU_44"#2|

903

procedure <A NAME="ref_898_14" HREF="terminal_interface-curses__adb.htm#ref_807_14">Set_Echo_Mode</A> (<A NAME="ref_898_29" HREF="terminal_interface-curses__adb.htm#ref_807_29">SwitchOn</A> : in Boolean := True);

899

904

-- AKA: <A HREF="../man/curs_inopts.3x.html">echo()</A>

900

905

-- AKA: noecho()

901

pragma Inline (Set_Echo_Mode);

906

pragma Inline (<A HREF="terminal_interface-curses__ads.htm#ref_898_14">Set_Echo_Mode</A>);

902

907

903

-- #1A NAME="AFU_44"#2|

904

procedure Set_Meta_Mode (<A NAME="ref_899_29" HREF="terminal_interface-curses__adb.htm#ref_880_29">Win</A> : in Window := Standard_Window;

905

SwitchOn : in Boolean := True);

908

-- #1A NAME="AFU_45"#2|

909

procedure <A NAME="ref_904_14" HREF="terminal_interface-curses__adb.htm#ref_826_14">Set_Meta_Mode</A> (<A NAME="ref_904_29" HREF="terminal_interface-curses__adb.htm#ref_826_29">Win</A> : in <A HREF="terminal_interface-curses__ads.htm#ref_57_9">Window</A> := <A HREF="terminal_interface-curses__ads.htm#ref_476_13">Standard_Window</A>;

910

<A NAME="ref_905_29" HREF="terminal_interface-curses__adb.htm#ref_827_29">SwitchOn</A> : in Boolean := True);

906

911

-- AKA: <A HREF="../man/curs_inopts.3x.html">meta()</A>

907

pragma Inline (Set_Meta_Mode);

912

pragma Inline (<A HREF="terminal_interface-curses__ads.htm#ref_904_14">Set_Meta_Mode</A>);

908

913

909

-- #1A NAME="AFU_45"#2|

910

procedure Set_KeyPad_Mode (<A NAME="ref_905_31" HREF="terminal_interface-curses__adb.htm#ref_891_31">Win</A> : in Window := Standard_Window;

911

SwitchOn : in Boolean := True);

914

-- #1A NAME="AFU_46"#2|

915

procedure <A NAME="ref_910_14" HREF="terminal_interface-curses__adb.htm#ref_837_14">Set_KeyPad_Mode</A> (<A NAME="ref_910_31" HREF="terminal_interface-curses__adb.htm#ref_837_31">Win</A> : in <A HREF="terminal_interface-curses__ads.htm#ref_57_9">Window</A> := <A HREF="terminal_interface-curses__ads.htm#ref_476_13">Standard_Window</A>;

916

<A NAME="ref_911_31" HREF="terminal_interface-curses__adb.htm#ref_838_31">SwitchOn</A> : in Boolean := True);

912

917

-- AKA: <A HREF="../man/curs_inopts.3x.html">keypad()</A>

913

pragma Inline (Set_KeyPad_Mode);

918

pragma Inline (<A HREF="terminal_interface-curses__ads.htm#ref_910_14">Set_KeyPad_Mode</A>);

914

919

915

function Get_KeyPad_Mode (Win : in Window := Standard_Window)

920

function <A NAME="ref_915_13" HREF="terminal_interface-curses__adb.htm#ref_848_13">Get_KeyPad_Mode</A> (<A NAME="ref_915_30" HREF="terminal_interface-curses__adb.htm#ref_848_30">Win</A> : in <A HREF="terminal_interface-curses__ads.htm#ref_57_9">Window</A> := <A HREF="terminal_interface-curses__ads.htm#ref_476_13">Standard_Window</A>)

916

921

return Boolean;

917

922

-- This has no pendant in C. There you've to look into the WINDOWS

918

923

-- structure to get the value. Bad practice, not repeated in Ada.

919

924

920

type Half_Delay_Amount is range 1 .. 255;

925

type <A NAME="ref_920_9">Half_Delay_Amount</A> is range 1 .. 255;

921

926

922

-- #1A NAME="AFU_46"#2|

923

procedure Half_Delay (Amount : in Half_Delay_Amount);

927

-- #1A NAME="AFU_47"#2|

928

procedure <A NAME="ref_923_14" HREF="terminal_interface-curses__adb.htm#ref_857_14">Half_Delay</A> (<A NAME="ref_923_26" HREF="terminal_interface-curses__adb.htm#ref_857_26">Amount</A> : in <A HREF="terminal_interface-curses__ads.htm#ref_920_9">Half_Delay_Amount</A>);

924

929

-- AKA: <A HREF="../man/curs_inopts.3x.html">halfdelay()</A>

925

pragma Inline (Half_Delay);

930

pragma Inline (<A HREF="terminal_interface-curses__ads.htm#ref_923_14">Half_Delay</A>);

926

931

927

-- #1A NAME="AFU_47"#2|

928

procedure Set_Flush_On_Interrupt_Mode

929

(<A NAME="ref_924_7" HREF="terminal_interface-curses__adb.htm#ref_920_7">Win</A> : in Window := Standard_Window;

930

Mode : in Boolean := True);

932

-- #1A NAME="AFU_48"#2|

933

procedure <A NAME="ref_928_14" HREF="terminal_interface-curses__adb.htm#ref_867_14">Set_Flush_On_Interrupt_Mode</A>

934

(<A NAME="ref_929_7" HREF="terminal_interface-curses__adb.htm#ref_868_7">Win</A> : in <A HREF="terminal_interface-curses__ads.htm#ref_57_9">Window</A> := <A HREF="terminal_interface-curses__ads.htm#ref_476_13">Standard_Window</A>;

935

<A NAME="ref_930_7" HREF="terminal_interface-curses__adb.htm#ref_869_7">Mode</A> : in Boolean := True);

931

936

-- AKA: <A HREF="../man/curs_inopts.3x.html">intrflush()</A>

932

pragma Inline (Set_Flush_On_Interrupt_Mode);

937

pragma Inline (<A HREF="terminal_interface-curses__ads.htm#ref_928_14">Set_Flush_On_Interrupt_Mode</A>);

933

938

934

-- #1A NAME="AFU_48"#2|

935

procedure Set_Queue_Interrupt_Mode

936

(<A NAME="ref_931_7" HREF="terminal_interface-curses__adb.htm#ref_932_7">Win</A> : in Window := Standard_Window;

937

Flush : in Boolean := True);

939

-- #1A NAME="AFU_49"#2|

940

procedure <A NAME="ref_935_14" HREF="terminal_interface-curses__adb.htm#ref_879_14">Set_Queue_Interrupt_Mode</A>

941

(<A NAME="ref_936_7" HREF="terminal_interface-curses__adb.htm#ref_880_7">Win</A> : in <A HREF="terminal_interface-curses__ads.htm#ref_57_9">Window</A> := <A HREF="terminal_interface-curses__ads.htm#ref_476_13">Standard_Window</A>;

942

<A NAME="ref_937_7" HREF="terminal_interface-curses__adb.htm#ref_881_7">Flush</A> : in Boolean := True);

938

943

-- AKA: <A HREF="../man/curs_inopts.3x.html">qiflush()</A>

939

944

-- AKA: noqiflush()

940

pragma Inline (Set_Queue_Interrupt_Mode);

945

pragma Inline (<A HREF="terminal_interface-curses__ads.htm#ref_935_14">Set_Queue_Interrupt_Mode</A>);

941

946

942

-- #1A NAME="AFU_49"#2|

943

procedure Set_NoDelay_Mode

944

(<A NAME="ref_939_7" HREF="terminal_interface-curses__adb.htm#ref_951_7">Win</A> : in Window := Standard_Window;

945

Mode : in Boolean := False);

947

-- #1A NAME="AFU_50"#2|

948

procedure <A NAME="ref_943_14" HREF="terminal_interface-curses__adb.htm#ref_898_14">Set_NoDelay_Mode</A>

949

(<A NAME="ref_944_7" HREF="terminal_interface-curses__adb.htm#ref_899_7">Win</A> : in <A HREF="terminal_interface-curses__ads.htm#ref_57_9">Window</A> := <A HREF="terminal_interface-curses__ads.htm#ref_476_13">Standard_Window</A>;

950

<A NAME="ref_945_7" HREF="terminal_interface-curses__adb.htm#ref_900_7">Mode</A> : in Boolean := False);

946

951

-- AKA: <A HREF="../man/curs_inopts.3x.html">nodelay()</A>

947

pragma Inline (Set_NoDelay_Mode);

948

949

type Timeout_Mode is (Blocking, Non_Blocking, Delayed);

950

951

-- #1A NAME="AFU_50"#2|

952

procedure Set_Timeout_Mode (<A NAME="ref_947_32" HREF="terminal_interface-curses__adb.htm#ref_962_32">Win</A> : in <A HREF="terminal_interface-curses__ads.htm#ref_943_9">Window</A> := Standard_Window;

953

<A NAME="ref_948_32" HREF="terminal_interface-curses__adb.htm#ref_963_32">Mode</A> : in Timeout_Mode;

954

Amount : in Natural); -- in Milliseconds

952

pragma Inline (<A HREF="terminal_interface-curses__ads.htm#ref_943_14">Set_NoDelay_Mode</A>);

953

954

type <A NAME="ref_949_9">Timeout_Mode</A> is (<A NAME="ref_949_26">Blocking</A>, <A NAME="ref_949_36">Non_Blocking</A>, <A NAME="ref_949_50">Delayed</A>);

955

956

-- #1A NAME="AFU_51"#2|

957

procedure <A NAME="ref_952_14" HREF="terminal_interface-curses__adb.htm#ref_910_14">Set_Timeout_Mode</A> (<A NAME="ref_952_32" HREF="terminal_interface-curses__adb.htm#ref_910_32">Win</A> : in <A HREF="terminal_interface-curses__ads.htm#ref_57_9">Window</A> := <A HREF="terminal_interface-curses__ads.htm#ref_476_13">Standard_Window</A>;

958

<A NAME="ref_953_32" HREF="terminal_interface-curses__adb.htm#ref_911_32">Mode</A> : in <A HREF="terminal_interface-curses__ads.htm#ref_949_9">Timeout_Mode</A>;

959

<A NAME="ref_954_32" HREF="terminal_interface-curses__adb.htm#ref_912_32">Amount</A> : in Natural); -- in Milliseconds

955

960

-- AKA: <A HREF="../man/curs_inopts.3x.html">wtimeout()</A>

956

961

-- AKA: timeout()

957

962

-- Instead of overloading the semantic of the sign of amount, we

960

965

-- evaluated.

961

966

-- We don't inline this procedure.

962

967

963

-- #1A NAME="AFU_51"#2|

964

procedure Set_Escape_Timer_Mode

965

(<A NAME="ref_960_7" HREF="terminal_interface-curses__adb.htm#ref_986_7">Win</A> : in Window := Standard_Window;

966

Timer_Off : in Boolean := False);

968

-- #1A NAME="AFU_52"#2|

969

procedure <A NAME="ref_964_14" HREF="terminal_interface-curses__adb.htm#ref_931_14">Set_Escape_Timer_Mode</A>

970

(<A NAME="ref_965_7" HREF="terminal_interface-curses__adb.htm#ref_932_7">Win</A> : in <A HREF="terminal_interface-curses__ads.htm#ref_57_9">Window</A> := <A HREF="terminal_interface-curses__ads.htm#ref_476_13">Standard_Window</A>;

971

<A NAME="ref_966_7" HREF="terminal_interface-curses__adb.htm#ref_933_7">Timer_Off</A> : in Boolean := False);

967

972

-- AKA: <A HREF="../man/curs_inopts.3x.html">notimeout()</A>

968

pragma Inline (Set_Escape_Timer_Mode);

973

pragma Inline (<A HREF="terminal_interface-curses__ads.htm#ref_964_14">Set_Escape_Timer_Mode</A>);

969

974

970

975

-- |=====================================================================

971

976

-- | Man page <A HREF="../man/curs_outopts.3x.html">curs_outopts.3x</A>

972

977

-- |=====================================================================

973

978

974

-- #1A NAME="AFU_52"#2|

975

procedure Set_NL_Mode (SwitchOn : in Boolean := True);

979

-- #1A NAME="AFU_53"#2|

980

procedure <A NAME="ref_975_14" HREF="terminal_interface-curses__adb.htm#ref_945_14">Set_NL_Mode</A> (<A NAME="ref_975_27" HREF="terminal_interface-curses__adb.htm#ref_945_27">SwitchOn</A> : in Boolean := True);

976

981

-- AKA: <A HREF="../man/curs_outopts.3x.html">nl()</A>

977

982

-- AKA: nonl()

978

pragma Inline (Set_NL_Mode);

983

pragma Inline (<A HREF="terminal_interface-curses__ads.htm#ref_975_14">Set_NL_Mode</A>);

979

984

980

-- #1A NAME="AFU_53"#2|

981

procedure Clear_On_Next_Update

982

(<A NAME="ref_977_7" HREF="terminal_interface-curses__adb.htm#ref_1019_7">Win</A> : in Window := Standard_Window;

983

Do_Clear : in Boolean := True);

985

-- #1A NAME="AFU_54"#2|

986

procedure <A NAME="ref_981_14" HREF="terminal_interface-curses__adb.htm#ref_964_14">Clear_On_Next_Update</A>

987

(<A NAME="ref_982_7" HREF="terminal_interface-curses__adb.htm#ref_965_7">Win</A> : in <A HREF="terminal_interface-curses__ads.htm#ref_57_9">Window</A> := <A HREF="terminal_interface-curses__ads.htm#ref_476_13">Standard_Window</A>;

988

<A NAME="ref_983_7" HREF="terminal_interface-curses__adb.htm#ref_966_7">Do_Clear</A> : in Boolean := True);

984

989

-- AKA: <A HREF="../man/curs_outopts.3x.html">clearok()</A>

985

pragma Inline (Clear_On_Next_Update);

990

pragma Inline (<A HREF="terminal_interface-curses__ads.htm#ref_981_14">Clear_On_Next_Update</A>);

986

991

987

-- #1A NAME="AFU_54"#2|

988

procedure Use_Insert_Delete_Line

989

(<A NAME="ref_984_7" HREF="terminal_interface-curses__adb.htm#ref_1031_7">Win</A> : in Window := Standard_Window;

990

Do_Idl : in Boolean := True);

992

-- #1A NAME="AFU_55"#2|

993

procedure <A NAME="ref_988_14" HREF="terminal_interface-curses__adb.htm#ref_976_14">Use_Insert_Delete_Line</A>

994

(<A NAME="ref_989_7" HREF="terminal_interface-curses__adb.htm#ref_977_7">Win</A> : in <A HREF="terminal_interface-curses__ads.htm#ref_57_9">Window</A> := <A HREF="terminal_interface-curses__ads.htm#ref_476_13">Standard_Window</A>;

995

<A NAME="ref_990_7" HREF="terminal_interface-curses__adb.htm#ref_978_7">Do_Idl</A> : in Boolean := True);

991

996

-- AKA: <A HREF="../man/curs_outopts.3x.html">idlok()</A>

992

pragma Inline (Use_Insert_Delete_Line);

997

pragma Inline (<A HREF="terminal_interface-curses__ads.htm#ref_988_14">Use_Insert_Delete_Line</A>);

993

998

994

-- #1A NAME="AFU_55"#2|

995

procedure Use_Insert_Delete_Character

996

(<A NAME="ref_991_7" HREF="terminal_interface-curses__adb.htm#ref_1043_7">Win</A> : in Window := Standard_Window;

997

Do_Idc : in Boolean := True);

999

-- #1A NAME="AFU_56"#2|

1000

procedure <A NAME="ref_995_14" HREF="terminal_interface-curses__adb.htm#ref_988_14">Use_Insert_Delete_Character</A>

1001

(<A NAME="ref_996_7" HREF="terminal_interface-curses__adb.htm#ref_989_7">Win</A> : in <A HREF="terminal_interface-curses__ads.htm#ref_57_9">Window</A> := <A HREF="terminal_interface-curses__ads.htm#ref_476_13">Standard_Window</A>;

1002

<A NAME="ref_997_7" HREF="terminal_interface-curses__adb.htm#ref_990_7">Do_Idc</A> : in Boolean := True);

998

1003

-- AKA: <A HREF="../man/curs_outopts.3x.html">idcok()</A>

999

pragma Inline (Use_Insert_Delete_Character);

1004

pragma Inline (<A HREF="terminal_interface-curses__ads.htm#ref_995_14">Use_Insert_Delete_Character</A>);

1000

1005

1001

-- #1A NAME="AFU_56"#2|

1002

procedure Leave_Cursor_After_Update

1003

(<A NAME="ref_998_7" HREF="terminal_interface-curses__adb.htm#ref_1055_7">Win</A> : in Window := Standard_Window;

1004

Do_Leave : in Boolean := True);

1006

-- #1A NAME="AFU_57"#2|

1007

procedure <A NAME="ref_1002_14" HREF="terminal_interface-curses__adb.htm#ref_998_14">Leave_Cursor_After_Update</A>

1008

(<A NAME="ref_1003_7" HREF="terminal_interface-curses__adb.htm#ref_999_7">Win</A> : in <A HREF="terminal_interface-curses__ads.htm#ref_57_9">Window</A> := <A HREF="terminal_interface-curses__ads.htm#ref_476_13">Standard_Window</A>;

1009

<A NAME="ref_1004_7" HREF="terminal_interface-curses__adb.htm#ref_1000_7">Do_Leave</A> : in Boolean := True);

1005

1010

-- AKA: <A HREF="../man/curs_outopts.3x.html">leaveok()</A>

1006

pragma Inline (Leave_Cursor_After_Update);

1011

pragma Inline (<A HREF="terminal_interface-curses__ads.htm#ref_1002_14">Leave_Cursor_After_Update</A>);

1007

1012

1008

-- #1A NAME="AFU_57"#2|

1009

procedure Immediate_Update_Mode

1010

(<A NAME="ref_1005_7" HREF="terminal_interface-curses__adb.htm#ref_1067_7">Win</A> : in Window := Standard_Window;

1011

Mode : in Boolean := False);

1013

-- #1A NAME="AFU_58"#2|

1014

procedure <A NAME="ref_1009_14" HREF="terminal_interface-curses__adb.htm#ref_1010_14">Immediate_Update_Mode</A>

1015

(<A NAME="ref_1010_7" HREF="terminal_interface-curses__adb.htm#ref_1011_7">Win</A> : in <A HREF="terminal_interface-curses__ads.htm#ref_57_9">Window</A> := <A HREF="terminal_interface-curses__ads.htm#ref_476_13">Standard_Window</A>;

1016

<A NAME="ref_1011_7" HREF="terminal_interface-curses__adb.htm#ref_1012_7">Mode</A> : in Boolean := False);

1012

1017

-- AKA: <A HREF="../man/curs_outopts.3x.html">immedok()</A>

1013

pragma Inline (Immediate_Update_Mode);

1018

pragma Inline (<A HREF="terminal_interface-curses__ads.htm#ref_1009_14">Immediate_Update_Mode</A>);

1014

1019

1015

-- #1A NAME="AFU_58"#2|

1016

procedure Allow_Scrolling

1017

(<A NAME="ref_1012_7" HREF="terminal_interface-curses__adb.htm#ref_1079_7">Win</A> : in Window := Standard_Window;

1018

Mode : in Boolean := False);

1020

-- #1A NAME="AFU_59"#2|

1021

procedure <A NAME="ref_1016_14" HREF="terminal_interface-curses__adb.htm#ref_1020_14">Allow_Scrolling</A>

1022

(<A NAME="ref_1017_7" HREF="terminal_interface-curses__adb.htm#ref_1021_7">Win</A> : in <A HREF="terminal_interface-curses__ads.htm#ref_57_9">Window</A> := <A HREF="terminal_interface-curses__ads.htm#ref_476_13">Standard_Window</A>;

1023

<A NAME="ref_1018_7" HREF="terminal_interface-curses__adb.htm#ref_1022_7">Mode</A> : in Boolean := False);

1019

1024

-- AKA: <A HREF="../man/curs_outopts.3x.html">scrollok()</A>

1020

pragma Inline (Allow_Scrolling);

1025

pragma Inline (<A HREF="terminal_interface-curses__ads.htm#ref_1016_14">Allow_Scrolling</A>);

1021

1026

1022

function Scrolling_Allowed (Win : Window := Standard_Window) return Boolean;

1027

function <A NAME="ref_1022_13" HREF="terminal_interface-curses__adb.htm#ref_1032_13">Scrolling_Allowed</A> (<A NAME="ref_1022_32" HREF="terminal_interface-curses__adb.htm#ref_1032_32">Win</A> : <A HREF="terminal_interface-curses__ads.htm#ref_57_9">Window</A> := <A HREF="terminal_interface-curses__ads.htm#ref_476_13">Standard_Window</A>) return Boolean;

1023

1028

-- There is no such function in the C interface.

1024

pragma Inline (Scrolling_Allowed);

1029

pragma Inline (<A HREF="terminal_interface-curses__ads.htm#ref_1022_13">Scrolling_Allowed</A>);

1025

1030

1026

-- #1A NAME="AFU_59"#2|

1027

procedure Set_Scroll_Region

1028

(<A NAME="ref_1023_7" HREF="terminal_interface-curses__adb.htm#ref_1098_7">Win</A> : in <A HREF="terminal_interface-curses__ads.htm#ref_60_9">Window</A> := Standard_Window;

1029

<A NAME="ref_1024_7" HREF="terminal_interface-curses__adb.htm#ref_1099_7">Top_Line</A> : in <A HREF="terminal_interface-curses__ads.htm#ref_60_9">Line_Position</A>;

1030

Bottom_Line : in Line_Position);

1031

-- #1A NAME="AFU_60"#2|

1032

procedure <A NAME="ref_1027_14" HREF="terminal_interface-curses__adb.htm#ref_1041_14">Set_Scroll_Region</A>

1033

(<A NAME="ref_1028_7" HREF="terminal_interface-curses__adb.htm#ref_1042_7">Win</A> : in <A HREF="terminal_interface-curses__ads.htm#ref_57_9">Window</A> := <A HREF="terminal_interface-curses__ads.htm#ref_476_13">Standard_Window</A>;

1034

<A NAME="ref_1029_7" HREF="terminal_interface-curses__adb.htm#ref_1043_7">Top_Line</A> : in <A HREF="terminal_interface-curses__ads.htm#ref_60_9">Line_Position</A>;

1035

<A NAME="ref_1030_7" HREF="terminal_interface-curses__adb.htm#ref_1044_7">Bottom_Line</A> : in <A HREF="terminal_interface-curses__ads.htm#ref_60_9">Line_Position</A>);

1031

1036

-- AKA: <A HREF="../man/curs_outopts.3x.html">wsetscrreg()</A>

1032

1037

-- AKA: setscrreg()

1033

pragma Inline (Set_Scroll_Region);

1038

pragma Inline (<A HREF="terminal_interface-curses__ads.htm#ref_1027_14">Set_Scroll_Region</A>);

1034

1039

1035

1040

-- |=====================================================================

1036

1041

-- | Man page <A HREF="../man/curs_refresh.3x.html">curs_refresh.3x</A>

1037

1042

-- |=====================================================================

1038

1043

1039

-- #1A NAME="AFU_60"#2|

1040

procedure Update_Screen;

1044

-- #1A NAME="AFU_61"#2|

1045

procedure <A NAME="ref_1040_14" HREF="terminal_interface-curses__adb.htm#ref_1057_14">Update_Screen</A>;

1041

1046

-- AKA: <A HREF="../man/curs_refresh.3x.html">doupdate()</A>

1042

pragma Inline (Update_Screen);

1047

pragma Inline (<A HREF="terminal_interface-curses__ads.htm#ref_1040_14">Update_Screen</A>);

1043

1048

1044

-- #1A NAME="AFU_61"#2|

1045

procedure Refresh (Win : in Window := Standard_Window);

1049

-- #1A NAME="AFU_62"#2|

1050

procedure <A NAME="ref_1045_14" HREF="terminal_interface-curses__adb.htm#ref_1067_14">Refresh</A> (<A NAME="ref_1045_23" HREF="terminal_interface-curses__adb.htm#ref_1067_23">Win</A> : in <A HREF="terminal_interface-curses__ads.htm#ref_57_9">Window</A> := <A HREF="terminal_interface-curses__ads.htm#ref_476_13">Standard_Window</A>);

1046

1051

-- AKA: <A HREF="../man/curs_refresh.3x.html">wrefresh()</A>

1047

1052

-- There is an overloaded Refresh for Pads.

1048

1053

-- The Inline pragma appears there

1049

1054

-- AKA: refresh()

1050

1055

1051

-- #1A NAME="AFU_62"#2|

1052

procedure Refresh_Without_Update

1053

(Win : in Window := Standard_Window);

1056

-- #1A NAME="AFU_63"#2|

1057

procedure <A NAME="ref_1052_14" HREF="terminal_interface-curses__adb.htm#ref_1077_14">Refresh_Without_Update</A>

1058

(<A NAME="ref_1053_7" HREF="terminal_interface-curses__adb.htm#ref_1078_7">Win</A> : in <A HREF="terminal_interface-curses__ads.htm#ref_57_9">Window</A> := <A HREF="terminal_interface-curses__ads.htm#ref_476_13">Standard_Window</A>);

1054

1059

-- AKA: <A HREF="../man/curs_refresh.3x.html">wnoutrefresh()</A>

1055

1060

-- There is an overloaded Refresh_Without_Update for Pads.

1056

1061

-- The Inline pragma appears there

1057

1062

1058

-- #1A NAME="AFU_63"#2|

1059

procedure Redraw (Win : in Window := Standard_Window);

1063

-- #1A NAME="AFU_64"#2|

1064

procedure <A NAME="ref_1059_14" HREF="terminal_interface-curses__adb.htm#ref_1088_14">Redraw</A> (<A NAME="ref_1059_22" HREF="terminal_interface-curses__adb.htm#ref_1088_22">Win</A> : in <A HREF="terminal_interface-curses__ads.htm#ref_57_9">Window</A> := <A HREF="terminal_interface-curses__ads.htm#ref_476_13">Standard_Window</A>);

1060

1065

-- AKA: <A HREF="../man/curs_refresh.3x.html">redrawwin()</A>

1061

1066

1062

-- #1A NAME="AFU_64"#2|

1063

procedure Redraw (<A NAME="ref_1058_22" HREF="terminal_interface-curses__adb.htm#ref_1155_7">Win</A> : in <A HREF="terminal_interface-curses__ads.htm#ref_60_9">Window</A> := Standard_Window;

1064

<A NAME="ref_1059_22" HREF="terminal_interface-curses__adb.htm#ref_1156_7">Begin_Line</A> : in Line_Position;

1065

Line_Count : in Positive);

1067

-- #1A NAME="AFU_65"#2|

1068

procedure <A NAME="ref_1063_14" HREF="terminal_interface-curses__adb.htm#ref_1098_14">Redraw</A> (<A NAME="ref_1063_22" HREF="terminal_interface-curses__adb.htm#ref_1099_7">Win</A> : in <A HREF="terminal_interface-curses__ads.htm#ref_57_9">Window</A> := <A HREF="terminal_interface-curses__ads.htm#ref_476_13">Standard_Window</A>;

1069

<A NAME="ref_1064_22" HREF="terminal_interface-curses__adb.htm#ref_1100_7">Begin_Line</A> : in <A HREF="terminal_interface-curses__ads.htm#ref_60_9">Line_Position</A>;

1070

<A NAME="ref_1065_22" HREF="terminal_interface-curses__adb.htm#ref_1101_7">Line_Count</A> : in Positive);

1066

1071

-- AKA: <A HREF="../man/curs_refresh.3x.html">wredrawln()</A>

1067

1072

pragma Inline (Redraw);

1068

1073

1070

1075

-- | Man page <A HREF="../man/curs_clear.3x.html">curs_clear.3x</A>

1071

1076

-- |=====================================================================

1072

1077

1073

-- #1A NAME="AFU_65"#2|

1074

procedure Erase (Win : in Window := Standard_Window);

1078

-- #1A NAME="AFU_66"#2|

1079

procedure <A NAME="ref_1074_14" HREF="terminal_interface-curses__adb.htm#ref_1115_14">Erase</A> (<A NAME="ref_1074_21" HREF="terminal_interface-curses__adb.htm#ref_1115_21">Win</A> : in <A HREF="terminal_interface-curses__ads.htm#ref_57_9">Window</A> := <A HREF="terminal_interface-curses__ads.htm#ref_476_13">Standard_Window</A>);

1075

1080

-- AKA: <A HREF="../man/curs_clear.3x.html">werase()</A>

1076

1081

-- AKA: erase()

1077

pragma Inline (Erase);

1082

pragma Inline (<A HREF="terminal_interface-curses__ads.htm#ref_1074_14">Erase</A>);

1078

1083

1079

-- #1A NAME="AFU_66"#2|

1080

procedure Clear

1081

(Win : in Window := Standard_Window);

1084

-- #1A NAME="AFU_67"#2|

1085

procedure <A NAME="ref_1080_14" HREF="terminal_interface-curses__adb.htm#ref_1125_14">Clear</A>

1086

(<A NAME="ref_1081_7" HREF="terminal_interface-curses__adb.htm#ref_1125_21">Win</A> : in <A HREF="terminal_interface-curses__ads.htm#ref_57_9">Window</A> := <A HREF="terminal_interface-curses__ads.htm#ref_476_13">Standard_Window</A>);

1082

1087

-- AKA: <A HREF="../man/curs_clear.3x.html">wclear()</A>

1083

1088

-- AKA: clear()

1084

pragma Inline (Clear);

1089

pragma Inline (<A HREF="terminal_interface-curses__ads.htm#ref_1080_14">Clear</A>);

1085

1090

1086

-- #1A NAME="AFU_67"#2|

1087

procedure Clear_To_End_Of_Screen

1088

(Win : in Window := Standard_Window);

1091

-- #1A NAME="AFU_68"#2|

1092

procedure <A NAME="ref_1087_14" HREF="terminal_interface-curses__adb.htm#ref_1135_14">Clear_To_End_Of_Screen</A>

1093

(<A NAME="ref_1088_7" HREF="terminal_interface-curses__adb.htm#ref_1135_38">Win</A> : in <A HREF="terminal_interface-curses__ads.htm#ref_57_9">Window</A> := <A HREF="terminal_interface-curses__ads.htm#ref_476_13">Standard_Window</A>);

1089

1094

-- AKA: <A HREF="../man/curs_clear.3x.html">wclrtobot()</A>

1090

1095

-- AKA: clrtobot()

1091

pragma Inline (Clear_To_End_Of_Screen);

1096

pragma Inline (<A HREF="terminal_interface-curses__ads.htm#ref_1087_14">Clear_To_End_Of_Screen</A>);

1092

1097

1093

-- #1A NAME="AFU_68"#2|

1094

procedure Clear_To_End_Of_Line

1095

(Win : in Window := Standard_Window);

1098

-- #1A NAME="AFU_69"#2|

1099

procedure <A NAME="ref_1094_14" HREF="terminal_interface-curses__adb.htm#ref_1145_14">Clear_To_End_Of_Line</A>

1100

(<A NAME="ref_1095_7" HREF="terminal_interface-curses__adb.htm#ref_1145_36">Win</A> : in <A HREF="terminal_interface-curses__ads.htm#ref_57_9">Window</A> := <A HREF="terminal_interface-curses__ads.htm#ref_476_13">Standard_Window</A>);

1096

1101

-- AKA: <A HREF="../man/curs_clear.3x.html">wclrtoeol()</A>

1097

1102

-- AKA: clrtoeol()

1098

pragma Inline (Clear_To_End_Of_Line);

1103

pragma Inline (<A HREF="terminal_interface-curses__ads.htm#ref_1094_14">Clear_To_End_Of_Line</A>);

1099

1104

1100

1105

-- |=====================================================================

1101

1106

-- | Man page <A HREF="../man/curs_bkgd.3x.html">curs_bkgd.3x</A>

1102

1107

-- |=====================================================================

1103

1108

1104

-- #1A NAME="AFU_69"#2|

1109

-- #1A NAME="AFU_70"#2|

1105

1110

-- TODO: we could have Set_Background(Window; Character_Attribute_Set)

1106

1111

-- because in C it is common to see bkgdset(A_BOLD) or

1107

1112

-- bkgdset(COLOR_PAIR(n))

1108

procedure Set_Background

1109

(<A NAME="ref_1104_7" HREF="terminal_interface-curses__adb.htm#ref_1212_7">Win</A> : in <A HREF="terminal_interface-curses__ads.htm#ref_352_9">Window</A> := Standard_Window;

1110

Ch : in Attributed_Character);

1113

procedure <A NAME="ref_1108_14" HREF="terminal_interface-curses__adb.htm#ref_1155_14">Set_Background</A>

1114

(<A NAME="ref_1109_7" HREF="terminal_interface-curses__adb.htm#ref_1156_7">Win</A> : in <A HREF="terminal_interface-curses__ads.htm#ref_57_9">Window</A> := <A HREF="terminal_interface-curses__ads.htm#ref_476_13">Standard_Window</A>;

1115

<A NAME="ref_1110_7" HREF="terminal_interface-curses__adb.htm#ref_1157_7">Ch</A> : in <A HREF="terminal_interface-curses__ads.htm#ref_352_9">Attributed_Character</A>);

1111

1116

-- AKA: <A HREF="../man/curs_bkgd.3x.html">wbkgdset()</A>

1112

1117

-- AKA: bkgdset()

1113

pragma Inline (Set_Background);

1118

pragma Inline (<A HREF="terminal_interface-curses__ads.htm#ref_1108_14">Set_Background</A>);

1114

1119

1115

-- #1A NAME="AFU_70"#2|

1116

procedure Change_Background

1117

(<A NAME="ref_1112_7" HREF="terminal_interface-curses__adb.htm#ref_1222_7">Win</A> : in <A HREF="terminal_interface-curses__ads.htm#ref_352_9">Window</A> := Standard_Window;

1118

Ch : in Attributed_Character);

1120

-- #1A NAME="AFU_71"#2|

1121

procedure <A NAME="ref_1116_14" HREF="terminal_interface-curses__adb.htm#ref_1165_14">Change_Background</A>

1122

(<A NAME="ref_1117_7" HREF="terminal_interface-curses__adb.htm#ref_1166_7">Win</A> : in <A HREF="terminal_interface-curses__ads.htm#ref_57_9">Window</A> := <A HREF="terminal_interface-curses__ads.htm#ref_476_13">Standard_Window</A>;

1123

<A NAME="ref_1118_7" HREF="terminal_interface-curses__adb.htm#ref_1167_7">Ch</A> : in <A HREF="terminal_interface-curses__ads.htm#ref_352_9">Attributed_Character</A>);

1119

1124

-- AKA: <A HREF="../man/curs_bkgd.3x.html">wbkgd()</A>

1120

1125

-- AKA: bkgd()

1121

pragma Inline (Change_Background);

1126

pragma Inline (<A HREF="terminal_interface-curses__ads.htm#ref_1116_14">Change_Background</A>);

1122

1127

1123

-- #1A NAME="AFU_71"#2|

1128

-- #1A NAME="AFU_72"#2|

1124

1129

-- ? wbkgdget is not listed in curs_bkgd, getbkgd is thpough.

1125

function <A HREF="terminal_interface-curses__ads.htm#ref_352_9">Get_Background</A> (Win : Window := Standard_Window)

1126

return Attributed_Character;

1130

function <A NAME="ref_1125_13" HREF="terminal_interface-curses__adb.htm#ref_1177_13">Get_Background</A> (<A NAME="ref_1125_29" HREF="terminal_interface-curses__adb.htm#ref_1177_29">Win</A> : <A HREF="terminal_interface-curses__ads.htm#ref_57_9">Window</A> := <A HREF="terminal_interface-curses__ads.htm#ref_476_13">Standard_Window</A>)

1131

return <A HREF="terminal_interface-curses__ads.htm#ref_352_9">Attributed_Character</A>;

1127

1132

-- AKA: <A HREF="../man/curs_bkgd.3x.html">wbkgdget()</A>

1128

1133

-- AKA: bkgdget()

1129

pragma Inline (Get_Background);

1134

pragma Inline (<A HREF="terminal_interface-curses__ads.htm#ref_1125_13">Get_Background</A>);

1130

1135

1131

1136

-- |=====================================================================

1132

1137

-- | Man page <A HREF="../man/curs_touch.3x.html">curs_touch.3x</A>

1133

1138

-- |=====================================================================

1134

1139

1135

-- #1A NAME="AFU_72"#2|

1136

procedure Untouch (Win : in Window := Standard_Window);

1140

-- #1A NAME="AFU_73"#2|

1141

procedure <A NAME="ref_1136_14" HREF="terminal_interface-curses__adb.htm#ref_1212_14">Untouch</A> (<A NAME="ref_1136_23" HREF="terminal_interface-curses__adb.htm#ref_1212_23">Win</A> : in <A HREF="terminal_interface-curses__ads.htm#ref_57_9">Window</A> := <A HREF="terminal_interface-curses__ads.htm#ref_476_13">Standard_Window</A>);

1137

1142

-- AKA: <A HREF="../man/curs_touch.3x.html">untouchwin()</A>

1138

pragma Inline (Untouch);

1143

pragma Inline (<A HREF="terminal_interface-curses__ads.htm#ref_1136_14">Untouch</A>);

1139

1144

1140

-- #1A NAME="AFU_73"#2|

1141

procedure Touch (Win : in Window := Standard_Window);

1145

-- #1A NAME="AFU_74"#2|

1146

procedure <A NAME="ref_1141_14" HREF="terminal_interface-curses__adb.htm#ref_1203_14">Touch</A> (<A NAME="ref_1141_21" HREF="terminal_interface-curses__adb.htm#ref_1203_21">Win</A> : in <A HREF="terminal_interface-curses__ads.htm#ref_57_9">Window</A> := <A HREF="terminal_interface-curses__ads.htm#ref_476_13">Standard_Window</A>);

1142

1147

-- AKA: <A HREF="../man/curs_touch.3x.html">touchwin()</A>

1143

1148

1144

-- #1A NAME="AFU_74"#2|

1145

procedure Touch (<A NAME="ref_1140_21" HREF="terminal_interface-curses__adb.htm#ref_1277_21">Win</A> : in <A HREF="terminal_interface-curses__ads.htm#ref_60_9">Window</A> := Standard_Window;

1146

<A NAME="ref_1141_21" HREF="terminal_interface-curses__adb.htm#ref_1278_21">Start</A> : in Line_Position;

1147

Count : in Positive);

1149

-- #1A NAME="AFU_75"#2|

1150

procedure <A NAME="ref_1145_14" HREF="terminal_interface-curses__adb.htm#ref_1221_14">Touch</A> (<A NAME="ref_1145_21" HREF="terminal_interface-curses__adb.htm#ref_1221_21">Win</A> : in <A HREF="terminal_interface-curses__ads.htm#ref_57_9">Window</A> := <A HREF="terminal_interface-curses__ads.htm#ref_476_13">Standard_Window</A>;

1151

<A NAME="ref_1146_21" HREF="terminal_interface-curses__adb.htm#ref_1222_21">Start</A> : in <A HREF="terminal_interface-curses__ads.htm#ref_60_9">Line_Position</A>;

1152

<A NAME="ref_1147_21" HREF="terminal_interface-curses__adb.htm#ref_1223_21">Count</A> : in Positive);

1148

1153

-- AKA: <A HREF="../man/curs_touch.3x.html">touchline()</A>

1149

1154

pragma Inline (Touch);

1150

1155

1151

-- #1A NAME="AFU_75"#2|

1152

procedure Change_Lines_Status (<A NAME="ref_1147_35" HREF="terminal_interface-curses__adb.htm#ref_1242_35">Win</A> : in <A HREF="terminal_interface-curses__ads.htm#ref_60_9">Window</A> := Standard_Window;

1153

<A NAME="ref_1148_35" HREF="terminal_interface-curses__adb.htm#ref_1243_35">Start</A> : in Line_Position;

1154

<A NAME="ref_1149_35" HREF="terminal_interface-curses__adb.htm#ref_1244_35">Count</A> : in Positive;

1155

State : in Boolean);

1156

-- #1A NAME="AFU_76"#2|

1157

procedure <A NAME="ref_1152_14" HREF="terminal_interface-curses__adb.htm#ref_1186_14">Change_Lines_Status</A> (<A NAME="ref_1152_35" HREF="terminal_interface-curses__adb.htm#ref_1186_35">Win</A> : in <A HREF="terminal_interface-curses__ads.htm#ref_57_9">Window</A> := <A HREF="terminal_interface-curses__ads.htm#ref_476_13">Standard_Window</A>;

1158

<A NAME="ref_1153_35" HREF="terminal_interface-curses__adb.htm#ref_1187_35">Start</A> : in <A HREF="terminal_interface-curses__ads.htm#ref_60_9">Line_Position</A>;

1159

<A NAME="ref_1154_35" HREF="terminal_interface-curses__adb.htm#ref_1188_35">Count</A> : in Positive;

1160

<A NAME="ref_1155_35" HREF="terminal_interface-curses__adb.htm#ref_1189_35">State</A> : in Boolean);

1156

1161

-- AKA: <A HREF="../man/curs_touch.3x.html">wtouchln()</A>

1157

pragma Inline (Change_Lines_Status);

1162

pragma Inline (<A HREF="terminal_interface-curses__ads.htm#ref_1152_14">Change_Lines_Status</A>);

1158

1163

1159

-- #1A NAME="AFU_76"#2|

1160

function Is_Touched (<A NAME="ref_1155_25" HREF="terminal_interface-curses__adb.htm#ref_1286_7">Win</A> : <A HREF="terminal_interface-curses__ads.htm#ref_60_9">Window</A> := Standard_Window;

1161

Line : Line_Position) return Boolean;

1164

-- #1A NAME="AFU_77"#2|

1165

function <A NAME="ref_1160_13" HREF="terminal_interface-curses__adb.htm#ref_1229_13">Is_Touched</A> (<A NAME="ref_1160_25" HREF="terminal_interface-curses__adb.htm#ref_1230_7">Win</A> : <A HREF="terminal_interface-curses__ads.htm#ref_57_9">Window</A> := <A HREF="terminal_interface-curses__ads.htm#ref_476_13">Standard_Window</A>;

1166

<A NAME="ref_1161_25" HREF="terminal_interface-curses__adb.htm#ref_1231_7">Line</A> : <A HREF="terminal_interface-curses__ads.htm#ref_60_9">Line_Position</A>) return Boolean;

1162

1167

-- AKA: <A HREF="../man/curs_touch.3x.html">is_linetouched()</A>

1163

1168

1164

-- #1A NAME="AFU_77"#2|

1165

function Is_Touched (Win : Window := Standard_Window) return Boolean;

1169

-- #1A NAME="AFU_78"#2|

1170

function <A NAME="ref_1165_13" HREF="terminal_interface-curses__adb.htm#ref_1243_13">Is_Touched</A> (<A NAME="ref_1165_25" HREF="terminal_interface-curses__adb.htm#ref_1244_7">Win</A> : <A HREF="terminal_interface-curses__ads.htm#ref_57_9">Window</A> := <A HREF="terminal_interface-curses__ads.htm#ref_476_13">Standard_Window</A>) return Boolean;

1166

1171

-- AKA: <A HREF="../man/curs_touch.3x.html">is_wintouched()</A>

1167

1172

pragma Inline (Is_Touched);

1168

1173

1170

1175

-- | Man page <A HREF="../man/curs_overlay.3x.html">curs_overlay.3x</A>

1171

1176

-- |=====================================================================

1172

1177

1173

-- #1A NAME="AFU_78"#2|

1174

procedure Copy

1175

(<A NAME="ref_1170_7" HREF="terminal_interface-curses__adb.htm#ref_1313_7">Source_Window</A> : in <A HREF="terminal_interface-curses__ads.htm#ref_57_9">Window</A>;

1176

<A NAME="ref_1171_7" HREF="terminal_interface-curses__adb.htm#ref_1314_7">Destination_Window</A> : in <A HREF="terminal_interface-curses__ads.htm#ref_60_9">Window</A>;

1177

<A NAME="ref_1172_7" HREF="terminal_interface-curses__adb.htm#ref_1315_7">Source_Top_Row</A> : in <A HREF="terminal_interface-curses__ads.htm#ref_61_9">Line_Position</A>;

1178

<A NAME="ref_1173_7" HREF="terminal_interface-curses__adb.htm#ref_1316_7">Source_Left_Column</A> : in <A HREF="terminal_interface-curses__ads.htm#ref_60_9">Column_Position</A>;

1179

<A NAME="ref_1174_7" HREF="terminal_interface-curses__adb.htm#ref_1317_7">Destination_Top_Row</A> : in <A HREF="terminal_interface-curses__ads.htm#ref_61_9">Line_Position</A>;

1180

<A NAME="ref_1175_7" HREF="terminal_interface-curses__adb.htm#ref_1318_7">Destination_Left_Column</A> : in <A HREF="terminal_interface-curses__ads.htm#ref_60_9">Column_Position</A>;

1181

<A NAME="ref_1176_7" HREF="terminal_interface-curses__adb.htm#ref_1319_7">Destination_Bottom_Row</A> : in <A HREF="terminal_interface-curses__ads.htm#ref_61_9">Line_Position</A>;

1182

<A NAME="ref_1177_7" HREF="terminal_interface-curses__adb.htm#ref_1320_7">Destination_Right_Column</A> : in Column_Position;

1183

Non_Destructive_Mode : in Boolean := True);

1178

-- #1A NAME="AFU_79"#2|

1179

procedure <A NAME="ref_1174_14" HREF="terminal_interface-curses__adb.htm#ref_1256_14">Copy</A>

1180

(<A NAME="ref_1175_7" HREF="terminal_interface-curses__adb.htm#ref_1257_7">Source_Window</A> : in <A HREF="terminal_interface-curses__ads.htm#ref_57_9">Window</A>;

1181

<A NAME="ref_1176_7" HREF="terminal_interface-curses__adb.htm#ref_1258_7">Destination_Window</A> : in <A HREF="terminal_interface-curses__ads.htm#ref_57_9">Window</A>;

1182

<A NAME="ref_1177_7" HREF="terminal_interface-curses__adb.htm#ref_1259_7">Source_Top_Row</A> : in <A HREF="terminal_interface-curses__ads.htm#ref_60_9">Line_Position</A>;

1183

<A NAME="ref_1178_7" HREF="terminal_interface-curses__adb.htm#ref_1260_7">Source_Left_Column</A> : in <A HREF="terminal_interface-curses__ads.htm#ref_61_9">Column_Position</A>;

1184

<A NAME="ref_1179_7" HREF="terminal_interface-curses__adb.htm#ref_1261_7">Destination_Top_Row</A> : in <A HREF="terminal_interface-curses__ads.htm#ref_60_9">Line_Position</A>;

1185

<A NAME="ref_1180_7" HREF="terminal_interface-curses__adb.htm#ref_1262_7">Destination_Left_Column</A> : in <A HREF="terminal_interface-curses__ads.htm#ref_61_9">Column_Position</A>;

1186

<A NAME="ref_1181_7" HREF="terminal_interface-curses__adb.htm#ref_1263_7">Destination_Bottom_Row</A> : in <A HREF="terminal_interface-curses__ads.htm#ref_60_9">Line_Position</A>;

1187

<A NAME="ref_1182_7" HREF="terminal_interface-curses__adb.htm#ref_1264_7">Destination_Right_Column</A> : in <A HREF="terminal_interface-curses__ads.htm#ref_61_9">Column_Position</A>;

1188

<A NAME="ref_1183_7" HREF="terminal_interface-curses__adb.htm#ref_1265_7">Non_Destructive_Mode</A> : in Boolean := True);

1184

1189

-- AKA: <A HREF="../man/curs_overlay.3x.html">copywin()</A>

1185

pragma Inline (Copy);

1190

pragma Inline (<A HREF="terminal_interface-curses__ads.htm#ref_1174_14">Copy</A>);

1186

1191

1187

-- #1A NAME="AFU_79"#2|

1188

procedure Overwrite (<A NAME="ref_1183_25" HREF="terminal_interface-curses__adb.htm#ref_1349_7">Source_Window</A> : in <A HREF="terminal_interface-curses__ads.htm#ref_57_9">Window</A>;

1189

Destination_Window : in Window);

1192

-- #1A NAME="AFU_80"#2|

1193

procedure <A NAME="ref_1188_14" HREF="terminal_interface-curses__adb.htm#ref_1292_14">Overwrite</A> (<A NAME="ref_1188_25" HREF="terminal_interface-curses__adb.htm#ref_1293_7">Source_Window</A> : in <A HREF="terminal_interface-curses__ads.htm#ref_57_9">Window</A>;

1194

<A NAME="ref_1189_25" HREF="terminal_interface-curses__adb.htm#ref_1294_7">Destination_Window</A> : in <A HREF="terminal_interface-curses__ads.htm#ref_57_9">Window</A>);

1190

1195

-- AKA: <A HREF="../man/curs_overlay.3x.html">overwrite()</A>

1191

pragma Inline (Overwrite);

1196

pragma Inline (<A HREF="terminal_interface-curses__ads.htm#ref_1188_14">Overwrite</A>);

1192

1197

1193

-- #1A NAME="AFU_80"#2|

1194

procedure Overlay (<A NAME="ref_1189_23" HREF="terminal_interface-curses__adb.htm#ref_1361_7">Source_Window</A> : in <A HREF="terminal_interface-curses__ads.htm#ref_57_9">Window</A>;

1195

Destination_Window : in Window);

1198

-- #1A NAME="AFU_81"#2|

1199

procedure <A NAME="ref_1194_14" HREF="terminal_interface-curses__adb.htm#ref_1304_14">Overlay</A> (<A NAME="ref_1194_23" HREF="terminal_interface-curses__adb.htm#ref_1305_7">Source_Window</A> : in <A HREF="terminal_interface-curses__ads.htm#ref_57_9">Window</A>;

1200

<A NAME="ref_1195_23" HREF="terminal_interface-curses__adb.htm#ref_1306_7">Destination_Window</A> : in <A HREF="terminal_interface-curses__ads.htm#ref_57_9">Window</A>);

1196

1201

-- AKA: <A HREF="../man/curs_overlay.3x.html">overlay()</A>

1197

pragma Inline (Overlay);

1202

pragma Inline (<A HREF="terminal_interface-curses__ads.htm#ref_1194_14">Overlay</A>);

1198

1203

1199

1204

-- |=====================================================================

1200

1205

-- | Man page <A HREF="../man/curs_deleteln.3x.html">curs_deleteln.3x</A>

1201

1206

-- |=====================================================================

1202

1207

1203

-- #1A NAME="AFU_81"#2|

1204

procedure Insert_Delete_Lines

1205

(<A NAME="ref_1200_7" HREF="terminal_interface-curses__adb.htm#ref_1374_7">Win</A> : in Window := Standard_Window;

1206

Lines : in Integer := 1); -- default is to insert one line above

1208

-- #1A NAME="AFU_82"#2|

1209

procedure <A NAME="ref_1204_14" HREF="terminal_interface-curses__adb.htm#ref_1317_14">Insert_Delete_Lines</A>

1210

(<A NAME="ref_1205_7" HREF="terminal_interface-curses__adb.htm#ref_1318_7">Win</A> : in <A HREF="terminal_interface-curses__ads.htm#ref_57_9">Window</A> := <A HREF="terminal_interface-curses__ads.htm#ref_476_13">Standard_Window</A>;

1211

<A NAME="ref_1206_7" HREF="terminal_interface-curses__adb.htm#ref_1319_7">Lines</A> : in Integer := 1); -- default is to insert one line above

1207

1212

-- AKA: <A HREF="../man/curs_deleteln.3x.html">winsdelln()</A>

1208

1213

-- AKA: insdelln()

1209

pragma Inline (Insert_Delete_Lines);

1214

pragma Inline (<A HREF="terminal_interface-curses__ads.htm#ref_1204_14">Insert_Delete_Lines</A>);

1210

1215

1211

-- #1A NAME="AFU_82"#2|

1212

procedure Delete_Line (Win : in Window := Standard_Window);

1216

-- #1A NAME="AFU_83"#2|

1217

procedure <A NAME="ref_1212_14" HREF="terminal_interface-curses__adb.htm#ref_1329_14">Delete_Line</A> (<A NAME="ref_1212_27" HREF="terminal_interface-curses__adb.htm#ref_1329_27">Win</A> : in <A HREF="terminal_interface-curses__ads.htm#ref_57_9">Window</A> := <A HREF="terminal_interface-curses__ads.htm#ref_476_13">Standard_Window</A>);

1213

1218

-- AKA: <A HREF="../man/curs_deleteln.3x.html">wdeleteln()</A>

1214

1219

-- AKA: deleteln()

1215

pragma Inline (Delete_Line);

1220

pragma Inline (<A HREF="terminal_interface-curses__ads.htm#ref_1212_14">Delete_Line</A>);

1216

1221

1217

-- #1A NAME="AFU_83"#2|

1218

procedure Insert_Line (Win : in Window := Standard_Window);

1222

-- #1A NAME="AFU_84"#2|

1223

procedure <A NAME="ref_1218_14" HREF="terminal_interface-curses__adb.htm#ref_1335_14">Insert_Line</A> (<A NAME="ref_1218_27" HREF="terminal_interface-curses__adb.htm#ref_1335_27">Win</A> : in <A HREF="terminal_interface-curses__ads.htm#ref_57_9">Window</A> := <A HREF="terminal_interface-curses__ads.htm#ref_476_13">Standard_Window</A>);

1219

1224

-- AKA: <A HREF="../man/curs_deleteln.3x.html">winsertln()</A>

1220

1225

-- AKA: insertln()

1221

pragma Inline (Insert_Line);

1226

pragma Inline (<A HREF="terminal_interface-curses__ads.htm#ref_1218_14">Insert_Line</A>);

1222

1227

1223

1228

-- |=====================================================================

1224

1229

-- | Man page <A HREF="../man/curs_getyx.3x.html">curs_getyx.3x</A>

1225

1230

-- |=====================================================================

1226

1231

1227

-- #1A NAME="AFU_84"#2|

1228

procedure Get_Size

1229

(<A NAME="ref_1224_7" HREF="terminal_interface-curses__adb.htm#ref_1400_7">Win</A> : in Window := Standard_Window;

1230

<A NAME="ref_1225_7" HREF="terminal_interface-curses__adb.htm#ref_1401_7">Number_Of_Lines</A> : out <A HREF="terminal_interface-curses__ads.htm#ref_65_12">Line_Count</A>;

1231

Number_Of_Columns : out Column_Count);

1232

-- #1A NAME="AFU_85"#2|

1233

procedure <A NAME="ref_1228_14" HREF="terminal_interface-curses__adb.htm#ref_1342_14">Get_Size</A>

1234

(<A NAME="ref_1229_7" HREF="terminal_interface-curses__adb.htm#ref_1343_7">Win</A> : in <A HREF="terminal_interface-curses__ads.htm#ref_57_9">Window</A> := <A HREF="terminal_interface-curses__ads.htm#ref_476_13">Standard_Window</A>;

1235

<A NAME="ref_1230_7" HREF="terminal_interface-curses__adb.htm#ref_1344_7">Number_Of_Lines</A> : out <A HREF="terminal_interface-curses__ads.htm#ref_63_12">Line_Count</A>;

1236

<A NAME="ref_1231_7" HREF="terminal_interface-curses__adb.htm#ref_1345_7">Number_Of_Columns</A> : out <A HREF="terminal_interface-curses__ads.htm#ref_65_12">Column_Count</A>);

1232

1237

-- AKA: <A HREF="../man/curs_getyx.3x.html">getmaxyx()</A>

1233

pragma Inline (Get_Size);

1238

pragma Inline (<A HREF="terminal_interface-curses__ads.htm#ref_1228_14">Get_Size</A>);

1234

1239

1235

-- #1A NAME="AFU_85"#2|

1236

procedure Get_Window_Position

1237

(<A NAME="ref_1232_7" HREF="terminal_interface-curses__adb.htm#ref_1416_7">Win</A> : in Window := Standard_Window;

1238

<A NAME="ref_1233_7" HREF="terminal_interface-curses__adb.htm#ref_1417_7">Top_Left_Line</A> : out <A HREF="terminal_interface-curses__ads.htm#ref_61_9">Line_Position</A>;

1239

Top_Left_Column : out Column_Position);

1240

-- #1A NAME="AFU_86"#2|

1241

procedure <A NAME="ref_1236_14" HREF="terminal_interface-curses__adb.htm#ref_1362_14">Get_Window_Position</A>

1242

(<A NAME="ref_1237_7" HREF="terminal_interface-curses__adb.htm#ref_1363_7">Win</A> : in <A HREF="terminal_interface-curses__ads.htm#ref_57_9">Window</A> := <A HREF="terminal_interface-curses__ads.htm#ref_476_13">Standard_Window</A>;

1243

<A NAME="ref_1238_7" HREF="terminal_interface-curses__adb.htm#ref_1364_7">Top_Left_Line</A> : out <A HREF="terminal_interface-curses__ads.htm#ref_60_9">Line_Position</A>;

1244

<A NAME="ref_1239_7" HREF="terminal_interface-curses__adb.htm#ref_1365_7">Top_Left_Column</A> : out <A HREF="terminal_interface-curses__ads.htm#ref_61_9">Column_Position</A>);

1240

1245

-- AKA: <A HREF="../man/curs_getyx.3x.html">getbegyx()</A>

1241

pragma Inline (Get_Window_Position);

1246

pragma Inline (<A HREF="terminal_interface-curses__ads.htm#ref_1236_14">Get_Window_Position</A>);

1242

1247

1243

-- #1A NAME="AFU_86"#2|

1244

procedure Get_Cursor_Position

1245

(<A NAME="ref_1240_7" HREF="terminal_interface-curses__adb.htm#ref_1428_7">Win</A> : in <A HREF="terminal_interface-curses__ads.htm#ref_60_9">Window</A> := Standard_Window;

1246

<A NAME="ref_1241_7" HREF="terminal_interface-curses__adb.htm#ref_1429_7">Line</A> : out <A HREF="terminal_interface-curses__ads.htm#ref_61_9">Line_Position</A>;

1247

Column : out Column_Position);

1248

-- #1A NAME="AFU_87"#2|

1249

procedure <A NAME="ref_1244_14" HREF="terminal_interface-curses__adb.htm#ref_1380_14">Get_Cursor_Position</A>

1250

(<A NAME="ref_1245_7" HREF="terminal_interface-curses__adb.htm#ref_1381_7">Win</A> : in <A HREF="terminal_interface-curses__ads.htm#ref_57_9">Window</A> := <A HREF="terminal_interface-curses__ads.htm#ref_476_13">Standard_Window</A>;

1251

<A NAME="ref_1246_7" HREF="terminal_interface-curses__adb.htm#ref_1382_7">Line</A> : out <A HREF="terminal_interface-curses__ads.htm#ref_60_9">Line_Position</A>;

1252

<A NAME="ref_1247_7" HREF="terminal_interface-curses__adb.htm#ref_1383_7">Column</A> : out <A HREF="terminal_interface-curses__ads.htm#ref_61_9">Column_Position</A>);

1248

1253

-- AKA: <A HREF="../man/curs_getyx.3x.html">getyx()</A>

1249

pragma Inline (Get_Cursor_Position);

1254

pragma Inline (<A HREF="terminal_interface-curses__ads.htm#ref_1244_14">Get_Cursor_Position</A>);

1250

1255

1251

-- #1A NAME="AFU_87"#2|

1252

procedure Get_Origin_Relative_To_Parent

1253

(<A NAME="ref_1248_7" HREF="terminal_interface-curses__adb.htm#ref_1440_7">Win</A> : in <A HREF="terminal_interface-curses__ads.htm#ref_60_9">Window</A>;

1254

<A NAME="ref_1249_7" HREF="terminal_interface-curses__adb.htm#ref_1441_7">Top_Left_Line</A> : out <A HREF="terminal_interface-curses__ads.htm#ref_61_9">Line_Position</A>;

1255

<A NAME="ref_1250_7" HREF="terminal_interface-curses__adb.htm#ref_1442_7">Top_Left_Column</A> : out Column_Position;

1256

Is_Not_A_Subwindow : out Boolean);

1256

-- #1A NAME="AFU_88"#2|

1257

procedure <A NAME="ref_1252_14" HREF="terminal_interface-curses__adb.htm#ref_1398_14">Get_Origin_Relative_To_Parent</A>

1258

(<A NAME="ref_1253_7" HREF="terminal_interface-curses__adb.htm#ref_1399_7">Win</A> : in <A HREF="terminal_interface-curses__ads.htm#ref_57_9">Window</A>;

1259

<A NAME="ref_1254_7" HREF="terminal_interface-curses__adb.htm#ref_1400_7">Top_Left_Line</A> : out <A HREF="terminal_interface-curses__ads.htm#ref_60_9">Line_Position</A>;

1260

<A NAME="ref_1255_7" HREF="terminal_interface-curses__adb.htm#ref_1401_7">Top_Left_Column</A> : out <A HREF="terminal_interface-curses__ads.htm#ref_61_9">Column_Position</A>;

1261

<A NAME="ref_1256_7" HREF="terminal_interface-curses__adb.htm#ref_1402_7">Is_Not_A_Subwindow</A> : out Boolean);

1257

1262

-- AKA: <A HREF="../man/curs_getyx.3x.html">getparyx()</A>

1258

1263

-- Instead of placing -1 in the coordinates as return, we use a boolean

1259

1264

-- to return the info that the window has no parent.

1260

pragma Inline (Get_Origin_Relative_To_Parent);

1265

pragma Inline (<A HREF="terminal_interface-curses__ads.htm#ref_1252_14">Get_Origin_Relative_To_Parent</A>);

1261

1266

1262

1267

-- |=====================================================================

1263

1268

-- | Man page <A HREF="../man/curs_pad.3x.html">curs_pad.3x</A>

1264

1269

-- |=====================================================================

1265

1270

1266

-- #1A NAME="AFU_88"#2|

1267

function New_Pad (<A NAME="ref_1262_22" HREF="terminal_interface-curses__adb.htm#ref_1459_22">Lines</A> : <A HREF="terminal_interface-curses__ads.htm#ref_65_12">Line_Count</A>;

1268

Columns : Column_Count) return Window;

1271

-- #1A NAME="AFU_89"#2|

1272

function <A NAME="ref_1267_13" HREF="terminal_interface-curses__adb.htm#ref_1424_13">New_Pad</A> (<A NAME="ref_1267_22" HREF="terminal_interface-curses__adb.htm#ref_1424_22">Lines</A> : <A HREF="terminal_interface-curses__ads.htm#ref_63_12">Line_Count</A>;

1273

<A NAME="ref_1268_22" HREF="terminal_interface-curses__adb.htm#ref_1425_22">Columns</A> : <A HREF="terminal_interface-curses__ads.htm#ref_65_12">Column_Count</A>) return <A HREF="terminal_interface-curses__ads.htm#ref_57_9">Window</A>;

1269

1274

-- AKA: <A HREF="../man/curs_pad.3x.html">newpad()</A>

1270

pragma Inline (New_Pad);

1275

pragma Inline (<A HREF="terminal_interface-curses__ads.htm#ref_1267_13">New_Pad</A>);

1271

1276

1272

-- #1A NAME="AFU_89"#2|

1273

function Sub_Pad

1274

(<A NAME="ref_1269_7" HREF="terminal_interface-curses__adb.htm#ref_1475_7">Pad</A> : <A HREF="terminal_interface-curses__ads.htm#ref_63_12">Window</A>;

1275

<A NAME="ref_1270_7" HREF="terminal_interface-curses__adb.htm#ref_1476_7">Number_Of_Lines</A> : <A HREF="terminal_interface-curses__ads.htm#ref_65_12">Line_Count</A>;

1276

<A NAME="ref_1271_7" HREF="terminal_interface-curses__adb.htm#ref_1477_7">Number_Of_Columns</A> : <A HREF="terminal_interface-curses__ads.htm#ref_60_9">Column_Count</A>;

1277

<A NAME="ref_1272_7" HREF="terminal_interface-curses__adb.htm#ref_1478_7">First_Line_Position</A> : <A HREF="terminal_interface-curses__ads.htm#ref_61_9">Line_Position</A>;

1278

First_Column_Position : Column_Position) return Window;

1277

-- #1A NAME="AFU_90"#2|

1278

function <A NAME="ref_1273_13" HREF="terminal_interface-curses__adb.htm#ref_1439_13">Sub_Pad</A>

1279

(<A NAME="ref_1274_7" HREF="terminal_interface-curses__adb.htm#ref_1440_7">Pad</A> : <A HREF="terminal_interface-curses__ads.htm#ref_57_9">Window</A>;

1280

<A NAME="ref_1275_7" HREF="terminal_interface-curses__adb.htm#ref_1441_7">Number_Of_Lines</A> : <A HREF="terminal_interface-curses__ads.htm#ref_63_12">Line_Count</A>;

1281

<A NAME="ref_1276_7" HREF="terminal_interface-curses__adb.htm#ref_1442_7">Number_Of_Columns</A> : <A HREF="terminal_interface-curses__ads.htm#ref_65_12">Column_Count</A>;

1282

<A NAME="ref_1277_7" HREF="terminal_interface-curses__adb.htm#ref_1443_7">First_Line_Position</A> : <A HREF="terminal_interface-curses__ads.htm#ref_60_9">Line_Position</A>;

1283

<A NAME="ref_1278_7" HREF="terminal_interface-curses__adb.htm#ref_1444_7">First_Column_Position</A> : <A HREF="terminal_interface-curses__ads.htm#ref_61_9">Column_Position</A>) return <A HREF="terminal_interface-curses__ads.htm#ref_57_9">Window</A>;

1279

1284

-- AKA: <A HREF="../man/curs_pad.3x.html">subpad()</A>

1280

pragma Inline (Sub_Pad);

1285

pragma Inline (<A HREF="terminal_interface-curses__ads.htm#ref_1273_13">Sub_Pad</A>);

1281

1286

1282

-- #1A NAME="AFU_90"#2|

1283

procedure Refresh

1284

(<A NAME="ref_1279_7" HREF="terminal_interface-curses__adb.htm#ref_1503_7">Pad</A> : in <A HREF="terminal_interface-curses__ads.htm#ref_60_9">Window</A>;

1285

<A NAME="ref_1280_7" HREF="terminal_interface-curses__adb.htm#ref_1504_7">Source_Top_Row</A> : in <A HREF="terminal_interface-curses__ads.htm#ref_61_9">Line_Position</A>;

1286

<A NAME="ref_1281_7" HREF="terminal_interface-curses__adb.htm#ref_1505_7">Source_Left_Column</A> : in <A HREF="terminal_interface-curses__ads.htm#ref_60_9">Column_Position</A>;

1287

<A NAME="ref_1282_7" HREF="terminal_interface-curses__adb.htm#ref_1506_7">Destination_Top_Row</A> : in <A HREF="terminal_interface-curses__ads.htm#ref_61_9">Line_Position</A>;

1288

<A NAME="ref_1283_7" HREF="terminal_interface-curses__adb.htm#ref_1507_7">Destination_Left_Column</A> : in <A HREF="terminal_interface-curses__ads.htm#ref_60_9">Column_Position</A>;

1289

<A NAME="ref_1284_7" HREF="terminal_interface-curses__adb.htm#ref_1508_7">Destination_Bottom_Row</A> : in <A HREF="terminal_interface-curses__ads.htm#ref_61_9">Line_Position</A>;

1290

Destination_Right_Column : in Column_Position);

1287

-- #1A NAME="AFU_91"#2|

1288

procedure <A NAME="ref_1283_14" HREF="terminal_interface-curses__adb.htm#ref_1467_14">Refresh</A>

1289

(<A NAME="ref_1284_7" HREF="terminal_interface-curses__adb.htm#ref_1468_7">Pad</A> : in <A HREF="terminal_interface-curses__ads.htm#ref_57_9">Window</A>;

1290

<A NAME="ref_1285_7" HREF="terminal_interface-curses__adb.htm#ref_1469_7">Source_Top_Row</A> : in <A HREF="terminal_interface-curses__ads.htm#ref_60_9">Line_Position</A>;

1291

<A NAME="ref_1286_7" HREF="terminal_interface-curses__adb.htm#ref_1470_7">Source_Left_Column</A> : in <A HREF="terminal_interface-curses__ads.htm#ref_61_9">Column_Position</A>;

1292

<A NAME="ref_1287_7" HREF="terminal_interface-curses__adb.htm#ref_1471_7">Destination_Top_Row</A> : in <A HREF="terminal_interface-curses__ads.htm#ref_60_9">Line_Position</A>;

1293

<A NAME="ref_1288_7" HREF="terminal_interface-curses__adb.htm#ref_1472_7">Destination_Left_Column</A> : in <A HREF="terminal_interface-curses__ads.htm#ref_61_9">Column_Position</A>;

1294

<A NAME="ref_1289_7" HREF="terminal_interface-curses__adb.htm#ref_1473_7">Destination_Bottom_Row</A> : in <A HREF="terminal_interface-curses__ads.htm#ref_60_9">Line_Position</A>;

1295

<A NAME="ref_1290_7" HREF="terminal_interface-curses__adb.htm#ref_1474_7">Destination_Right_Column</A> : in <A HREF="terminal_interface-curses__ads.htm#ref_61_9">Column_Position</A>);

1291

1296

-- AKA: <A HREF="../man/curs_pad.3x.html">prefresh()</A>

1292

1297

pragma Inline (Refresh);

1293

1298

1294

-- #1A NAME="AFU_91"#2|

1295

procedure Refresh_Without_Update

1296

(<A NAME="ref_1291_7" HREF="terminal_interface-curses__adb.htm#ref_1533_7">Pad</A> : in <A HREF="terminal_interface-curses__ads.htm#ref_60_9">Window</A>;

1297

<A NAME="ref_1292_7" HREF="terminal_interface-curses__adb.htm#ref_1534_7">Source_Top_Row</A> : in <A HREF="terminal_interface-curses__ads.htm#ref_61_9">Line_Position</A>;

1298

<A NAME="ref_1293_7" HREF="terminal_interface-curses__adb.htm#ref_1535_7">Source_Left_Column</A> : in <A HREF="terminal_interface-curses__ads.htm#ref_60_9">Column_Position</A>;

1299

<A NAME="ref_1294_7" HREF="terminal_interface-curses__adb.htm#ref_1536_7">Destination_Top_Row</A> : in <A HREF="terminal_interface-curses__ads.htm#ref_61_9">Line_Position</A>;

1300

<A NAME="ref_1295_7" HREF="terminal_interface-curses__adb.htm#ref_1537_7">Destination_Left_Column</A> : in <A HREF="terminal_interface-curses__ads.htm#ref_60_9">Column_Position</A>;

1301

<A NAME="ref_1296_7" HREF="terminal_interface-curses__adb.htm#ref_1538_7">Destination_Bottom_Row</A> : in <A HREF="terminal_interface-curses__ads.htm#ref_61_9">Line_Position</A>;

1302

Destination_Right_Column : in Column_Position);

1299

-- #1A NAME="AFU_92"#2|

1300

procedure <A NAME="ref_1295_14" HREF="terminal_interface-curses__adb.htm#ref_1497_14">Refresh_Without_Update</A>

1301

(<A NAME="ref_1296_7" HREF="terminal_interface-curses__adb.htm#ref_1498_7">Pad</A> : in <A HREF="terminal_interface-curses__ads.htm#ref_57_9">Window</A>;

1302

<A NAME="ref_1297_7" HREF="terminal_interface-curses__adb.htm#ref_1499_7">Source_Top_Row</A> : in <A HREF="terminal_interface-curses__ads.htm#ref_60_9">Line_Position</A>;

1303

<A NAME="ref_1298_7" HREF="terminal_interface-curses__adb.htm#ref_1500_7">Source_Left_Column</A> : in <A HREF="terminal_interface-curses__ads.htm#ref_61_9">Column_Position</A>;

1304

<A NAME="ref_1299_7" HREF="terminal_interface-curses__adb.htm#ref_1501_7">Destination_Top_Row</A> : in <A HREF="terminal_interface-curses__ads.htm#ref_60_9">Line_Position</A>;

1305

<A NAME="ref_1300_7" HREF="terminal_interface-curses__adb.htm#ref_1502_7">Destination_Left_Column</A> : in <A HREF="terminal_interface-curses__ads.htm#ref_61_9">Column_Position</A>;

1306

<A NAME="ref_1301_7" HREF="terminal_interface-curses__adb.htm#ref_1503_7">Destination_Bottom_Row</A> : in <A HREF="terminal_interface-curses__ads.htm#ref_60_9">Line_Position</A>;

1307

<A NAME="ref_1302_7" HREF="terminal_interface-curses__adb.htm#ref_1504_7">Destination_Right_Column</A> : in <A HREF="terminal_interface-curses__ads.htm#ref_61_9">Column_Position</A>);

1303

1308

-- AKA: <A HREF="../man/curs_pad.3x.html">pnoutrefresh()</A>

1304

1309

pragma Inline (Refresh_Without_Update);

1305

1310

1306

-- #1A NAME="AFU_92"#2|

1307

procedure Add_Character_To_Pad_And_Echo_It

1308

(<A NAME="ref_1303_7" HREF="terminal_interface-curses__adb.htm#ref_1563_7">Pad</A> : in <A HREF="terminal_interface-curses__ads.htm#ref_352_9">Window</A>;

1309

Ch : in Attributed_Character);

1311

-- #1A NAME="AFU_93"#2|

1312

procedure <A NAME="ref_1307_14" HREF="terminal_interface-curses__adb.htm#ref_1527_14">Add_Character_To_Pad_And_Echo_It</A>

1313

(<A NAME="ref_1308_7" HREF="terminal_interface-curses__adb.htm#ref_1528_7">Pad</A> : in <A HREF="terminal_interface-curses__ads.htm#ref_57_9">Window</A>;

1314

<A NAME="ref_1309_7" HREF="terminal_interface-curses__adb.htm#ref_1529_7">Ch</A> : in <A HREF="terminal_interface-curses__ads.htm#ref_352_9">Attributed_Character</A>);

1310

1315

-- AKA: <A HREF="../man/curs_pad.3x.html">pechochar()</A>

1311

1316

1312

procedure Add_Character_To_Pad_And_Echo_It

1313

(<A NAME="ref_1308_7" HREF="terminal_interface-curses__adb.htm#ref_1576_7">Pad</A> : in Window;

1314

Ch : in Character);

1317

procedure <A NAME="ref_1312_14" HREF="terminal_interface-curses__adb.htm#ref_1540_14">Add_Character_To_Pad_And_Echo_It</A>

1318

(<A NAME="ref_1313_7" HREF="terminal_interface-curses__adb.htm#ref_1541_7">Pad</A> : in <A HREF="terminal_interface-curses__ads.htm#ref_57_9">Window</A>;

1319

<A NAME="ref_1314_7" HREF="terminal_interface-curses__adb.htm#ref_1542_7">Ch</A> : in Character);

1315

1320

pragma Inline (Add_Character_To_Pad_And_Echo_It);

1316

1321

1317

1322

-- |=====================================================================

1318

1323

-- | Man page <A HREF="../man/curs_scroll.3x.html">curs_scroll.3x</A>

1319

1324

-- |=====================================================================

1320

1325

1321

-- #1A NAME="AFU_93"#2|

1322

procedure Scroll (<A NAME="ref_1317_22" HREF="terminal_interface-curses__adb.htm#ref_1587_22">Win</A> : in Window := Standard_Window;

1323

Amount : in Integer := 1);

1326

-- #1A NAME="AFU_94"#2|

1327

procedure <A NAME="ref_1322_14" HREF="terminal_interface-curses__adb.htm#ref_1552_14">Scroll</A> (<A NAME="ref_1322_22" HREF="terminal_interface-curses__adb.htm#ref_1552_22">Win</A> : in <A HREF="terminal_interface-curses__ads.htm#ref_57_9">Window</A> := <A HREF="terminal_interface-curses__ads.htm#ref_476_13">Standard_Window</A>;

1328

<A NAME="ref_1323_22" HREF="terminal_interface-curses__adb.htm#ref_1553_22">Amount</A> : in Integer := 1);

1324

1329

-- AKA: <A HREF="../man/curs_scroll.3x.html">wscrl()</A>

1325

1330

-- AKA: scroll()

1326

1331

-- AKA: scrl()

1327

pragma Inline (Scroll);

1332

pragma Inline (<A HREF="terminal_interface-curses__ads.htm#ref_1322_14">Scroll</A>);

1328

1333

1329

1334

-- |=====================================================================

1330

1335

-- | Man page <A HREF="../man/curs_delch.3x.html">curs_delch.3x</A>

1331

1336

-- |=====================================================================

1332

1337

1333

-- #1A NAME="AFU_94"#2|

1334

procedure Delete_Character (Win : in Window := Standard_Window);

1338

-- #1A NAME="AFU_95"#2|

1339

procedure <A NAME="ref_1334_14" HREF="terminal_interface-curses__adb.htm#ref_1565_14">Delete_Character</A> (<A NAME="ref_1334_32" HREF="terminal_interface-curses__adb.htm#ref_1565_32">Win</A> : in <A HREF="terminal_interface-curses__ads.htm#ref_57_9">Window</A> := <A HREF="terminal_interface-curses__ads.htm#ref_476_13">Standard_Window</A>);

1335

1340

-- AKA: <A HREF="../man/curs_delch.3x.html">wdelch()</A>

1336

1341

-- AKA: delch()

1337

1342

1338

-- #1A NAME="AFU_95"#2|

1339

procedure Delete_Character

1340

(<A NAME="ref_1335_7" HREF="terminal_interface-curses__adb.htm#ref_1611_7">Win</A> : in <A HREF="terminal_interface-curses__ads.htm#ref_60_9">Window</A> := Standard_Window;

1341

<A NAME="ref_1336_7" HREF="terminal_interface-curses__adb.htm#ref_1612_7">Line</A> : in <A HREF="terminal_interface-curses__ads.htm#ref_61_9">Line_Position</A>;

1342

Column : in Column_Position);

1343

-- #1A NAME="AFU_96"#2|

1344

procedure <A NAME="ref_1339_14" HREF="terminal_interface-curses__adb.htm#ref_1575_14">Delete_Character</A>

1345

(<A NAME="ref_1340_7" HREF="terminal_interface-curses__adb.htm#ref_1576_7">Win</A> : in <A HREF="terminal_interface-curses__ads.htm#ref_57_9">Window</A> := <A HREF="terminal_interface-curses__ads.htm#ref_476_13">Standard_Window</A>;

1346

<A NAME="ref_1341_7" HREF="terminal_interface-curses__adb.htm#ref_1577_7">Line</A> : in <A HREF="terminal_interface-curses__ads.htm#ref_60_9">Line_Position</A>;

1347

<A NAME="ref_1342_7" HREF="terminal_interface-curses__adb.htm#ref_1578_7">Column</A> : in <A HREF="terminal_interface-curses__ads.htm#ref_61_9">Column_Position</A>);

1343

1348

-- AKA: <A HREF="../man/curs_delch.3x.html">mvwdelch()</A>

1344

1349

-- AKA: mvdelch()

1345

1350

pragma Inline (Delete_Character);

1348

1353

-- | Man page <A HREF="../man/curs_inch.3x.html">curs_inch.3x</A>

1349

1354

-- |=====================================================================

1350

1355

1351

-- #1A NAME="AFU_96"#2|

1352

function <A HREF="terminal_interface-curses__ads.htm#ref_352_9">Peek</A> (Win : Window := Standard_Window)

1353

return Attributed_Character;

1356

-- #1A NAME="AFU_97"#2|

1357

function <A NAME="ref_1352_13" HREF="terminal_interface-curses__adb.htm#ref_1590_13">Peek</A> (<A NAME="ref_1352_19" HREF="terminal_interface-curses__adb.htm#ref_1590_19">Win</A> : <A HREF="terminal_interface-curses__ads.htm#ref_57_9">Window</A> := <A HREF="terminal_interface-curses__ads.htm#ref_476_13">Standard_Window</A>)

1358

return <A HREF="terminal_interface-curses__ads.htm#ref_352_9">Attributed_Character</A>;

1354

1359

-- AKA: inch()

1355

1360

-- AKA: <A HREF="../man/curs_inch.3x.html">winch()</A>

1356

1361

1357

-- #1A NAME="AFU_97"#2|

1358

function Peek

1359

(<A NAME="ref_1354_7" HREF="terminal_interface-curses__adb.htm#ref_1635_7">Win</A> : <A HREF="terminal_interface-curses__ads.htm#ref_60_9">Window</A> := Standard_Window;

1360

<A NAME="ref_1355_7" HREF="terminal_interface-curses__adb.htm#ref_1636_7">Line</A> : <A HREF="terminal_interface-curses__ads.htm#ref_61_9">Line_Position</A>;

1361

Column : Column_Position) return Attributed_Character;

1362

-- #1A NAME="AFU_98"#2|

1363

function <A NAME="ref_1358_13" HREF="terminal_interface-curses__adb.htm#ref_1599_13">Peek</A>

1364

(<A NAME="ref_1359_7" HREF="terminal_interface-curses__adb.htm#ref_1600_7">Win</A> : <A HREF="terminal_interface-curses__ads.htm#ref_57_9">Window</A> := <A HREF="terminal_interface-curses__ads.htm#ref_476_13">Standard_Window</A>;

1365

<A NAME="ref_1360_7" HREF="terminal_interface-curses__adb.htm#ref_1601_7">Line</A> : <A HREF="terminal_interface-curses__ads.htm#ref_60_9">Line_Position</A>;

1366

<A NAME="ref_1361_7" HREF="terminal_interface-curses__adb.htm#ref_1602_7">Column</A> : <A HREF="terminal_interface-curses__ads.htm#ref_61_9">Column_Position</A>) return <A HREF="terminal_interface-curses__ads.htm#ref_352_9">Attributed_Character</A>;

1362

1367

-- AKA: <A HREF="../man/curs_inch.3x.html">mvwinch()</A>

1363

1368

-- AKA: mvinch()

1364

1369

-- More Peek's follow, pragma Inline appears later.

1367

1372

-- | Man page <A HREF="../man/curs_insch.3x.html">curs_insch.3x</A>

1368

1373

-- |=====================================================================

1369

1374

1370

-- #1A NAME="AFU_98"#2|

1371

procedure Insert (<A NAME="ref_1366_22" HREF="terminal_interface-curses__adb.htm#ref_1647_22">Win</A> : in <A HREF="terminal_interface-curses__ads.htm#ref_352_9">Window</A> := Standard_Window;

1372

Ch : in Attributed_Character);

1375

-- #1A NAME="AFU_99"#2|

1376

procedure <A NAME="ref_1371_14" HREF="terminal_interface-curses__adb.htm#ref_1612_14">Insert</A> (<A NAME="ref_1371_22" HREF="terminal_interface-curses__adb.htm#ref_1612_22">Win</A> : in <A HREF="terminal_interface-curses__ads.htm#ref_57_9">Window</A> := <A HREF="terminal_interface-curses__ads.htm#ref_476_13">Standard_Window</A>;

1377

<A NAME="ref_1372_22" HREF="terminal_interface-curses__adb.htm#ref_1613_22">Ch</A> : in <A HREF="terminal_interface-curses__ads.htm#ref_352_9">Attributed_Character</A>);

1373

1378

-- AKA: <A HREF="../man/curs_insch.3x.html">winsch()</A>

1374

1379

-- AKA: insch()

1375

1380

1376

-- #1A NAME="AFU_99"#2|

1377

procedure Insert (<A NAME="ref_1372_22" HREF="terminal_interface-curses__adb.htm#ref_1659_7">Win</A> : in <A HREF="terminal_interface-curses__ads.htm#ref_60_9">Window</A> := Standard_Window;

1378

<A NAME="ref_1373_22" HREF="terminal_interface-curses__adb.htm#ref_1660_7">Line</A> : in <A HREF="terminal_interface-curses__ads.htm#ref_61_9">Line_Position</A>;

1379

<A NAME="ref_1374_22" HREF="terminal_interface-curses__adb.htm#ref_1661_7">Column</A> : in <A HREF="terminal_interface-curses__ads.htm#ref_352_9">Column_Position</A>;

1380

Ch : in Attributed_Character);

1381

-- #1A NAME="AFU_100"#2|

1382

procedure <A NAME="ref_1377_14" HREF="terminal_interface-curses__adb.htm#ref_1623_14">Insert</A> (<A NAME="ref_1377_22" HREF="terminal_interface-curses__adb.htm#ref_1624_7">Win</A> : in <A HREF="terminal_interface-curses__ads.htm#ref_57_9">Window</A> := <A HREF="terminal_interface-curses__ads.htm#ref_476_13">Standard_Window</A>;

1383

<A NAME="ref_1378_22" HREF="terminal_interface-curses__adb.htm#ref_1625_7">Line</A> : in <A HREF="terminal_interface-curses__ads.htm#ref_60_9">Line_Position</A>;

1384

<A NAME="ref_1379_22" HREF="terminal_interface-curses__adb.htm#ref_1626_7">Column</A> : in <A HREF="terminal_interface-curses__ads.htm#ref_61_9">Column_Position</A>;

1385

<A NAME="ref_1380_22" HREF="terminal_interface-curses__adb.htm#ref_1627_7">Ch</A> : in <A HREF="terminal_interface-curses__ads.htm#ref_352_9">Attributed_Character</A>);

1381

1386

-- AKA: <A HREF="../man/curs_insch.3x.html">mvwinsch()</A>

1382

1387

-- AKA: mvinsch()

1383

1388

1385

1390

-- | Man page <A HREF="../man/curs_insstr.3x.html">curs_insstr.3x</A>

1386

1391

-- |=====================================================================

1387

1392

1388

-- #1A NAME="AFU_100"#2|

1389

procedure Insert (<A NAME="ref_1384_22" HREF="terminal_interface-curses__adb.htm#ref_1678_22">Win</A> : in Window := Standard_Window;

1390

<A NAME="ref_1385_22" HREF="terminal_interface-curses__adb.htm#ref_1679_22">Str</A> : in String;

1391

Len : in Integer := -1);

1393

-- #1A NAME="AFU_101"#2|

1394

procedure <A NAME="ref_1389_14" HREF="terminal_interface-curses__adb.htm#ref_1643_14">Insert</A> (<A NAME="ref_1389_22" HREF="terminal_interface-curses__adb.htm#ref_1643_22">Win</A> : in <A HREF="terminal_interface-curses__ads.htm#ref_57_9">Window</A> := <A HREF="terminal_interface-curses__ads.htm#ref_476_13">Standard_Window</A>;

1395

<A NAME="ref_1390_22" HREF="terminal_interface-curses__adb.htm#ref_1644_22">Str</A> : in String;

1396

<A NAME="ref_1391_22" HREF="terminal_interface-curses__adb.htm#ref_1645_22">Len</A> : in Integer := -1);

1392

1397

-- AKA: <A HREF="../man/curs_insstr.3x.html">winsnstr()</A>

1393

1398

-- AKA: winsstr()

1394

1399

-- AKA: insnstr()

1395

1400

-- AKA: insstr()

1396

1401

1397

-- #1A NAME="AFU_101"#2|

1398

procedure Insert (<A NAME="ref_1393_22" HREF="terminal_interface-curses__adb.htm#ref_1697_7">Win</A> : in <A HREF="terminal_interface-curses__ads.htm#ref_60_9">Window</A> := Standard_Window;

1399

<A NAME="ref_1394_22" HREF="terminal_interface-curses__adb.htm#ref_1698_7">Line</A> : in <A HREF="terminal_interface-curses__ads.htm#ref_61_9">Line_Position</A>;

1400

<A NAME="ref_1395_22" HREF="terminal_interface-curses__adb.htm#ref_1699_7">Column</A> : in Column_Position;

1401

<A NAME="ref_1396_22" HREF="terminal_interface-curses__adb.htm#ref_1700_7">Str</A> : in String;

1402

Len : in Integer := -1);

1402

-- #1A NAME="AFU_102"#2|

1403

procedure <A NAME="ref_1398_14" HREF="terminal_interface-curses__adb.htm#ref_1661_14">Insert</A> (<A NAME="ref_1398_22" HREF="terminal_interface-curses__adb.htm#ref_1662_7">Win</A> : in <A HREF="terminal_interface-curses__ads.htm#ref_57_9">Window</A> := <A HREF="terminal_interface-curses__ads.htm#ref_476_13">Standard_Window</A>;

1404

<A NAME="ref_1399_22" HREF="terminal_interface-curses__adb.htm#ref_1663_7">Line</A> : in <A HREF="terminal_interface-curses__ads.htm#ref_60_9">Line_Position</A>;

1405

<A NAME="ref_1400_22" HREF="terminal_interface-curses__adb.htm#ref_1664_7">Column</A> : in <A HREF="terminal_interface-curses__ads.htm#ref_61_9">Column_Position</A>;

1406

<A NAME="ref_1401_22" HREF="terminal_interface-curses__adb.htm#ref_1665_7">Str</A> : in String;

1407

<A NAME="ref_1402_22" HREF="terminal_interface-curses__adb.htm#ref_1666_7">Len</A> : in Integer := -1);

1403

1408

-- AKA: <A HREF="../man/curs_insstr.3x.html">mvwinsnstr()</A>

1404

1409

-- AKA: mvwinsstr()

1405

1410

-- AKA: mvinsnstr()

1410

1415

-- | Man page <A HREF="../man/curs_instr.3x.html">curs_instr.3x</A>

1411

1416

-- |=====================================================================

1412

1417

1413

-- #1A NAME="AFU_102"#2|

1414

procedure Peek (<A NAME="ref_1409_20" HREF="terminal_interface-curses__adb.htm#ref_1720_20">Win</A> : in Window := Standard_Window;

1415

<A NAME="ref_1410_20" HREF="terminal_interface-curses__adb.htm#ref_1721_20">Str</A> : out String;

1416

Len : in Integer := -1);

1418

-- #1A NAME="AFU_103"#2|

1419

procedure <A NAME="ref_1414_14" HREF="terminal_interface-curses__adb.htm#ref_1685_14">Peek</A> (<A NAME="ref_1414_20" HREF="terminal_interface-curses__adb.htm#ref_1685_20">Win</A> : in <A HREF="terminal_interface-curses__ads.htm#ref_57_9">Window</A> := <A HREF="terminal_interface-curses__ads.htm#ref_476_13">Standard_Window</A>;

1420

<A NAME="ref_1415_20" HREF="terminal_interface-curses__adb.htm#ref_1686_20">Str</A> : out String;

1421

<A NAME="ref_1416_20" HREF="terminal_interface-curses__adb.htm#ref_1687_20">Len</A> : in Integer := -1);

1417

1422

-- AKA: <A HREF="../man/curs_instr.3x.html">winnstr()</A>

1418

1423

-- AKA: winstr()

1419

1424

-- AKA: innstr()

1420

1425

-- AKA: instr()

1421

1426

1422

-- #1A NAME="AFU_103"#2|

1423

procedure Peek (<A NAME="ref_1418_20" HREF="terminal_interface-curses__adb.htm#ref_1750_7">Win</A> : in <A HREF="terminal_interface-curses__ads.htm#ref_60_9">Window</A> := Standard_Window;

1424

<A NAME="ref_1419_20" HREF="terminal_interface-curses__adb.htm#ref_1751_7">Line</A> : in <A HREF="terminal_interface-curses__ads.htm#ref_61_9">Line_Position</A>;

1425

<A NAME="ref_1420_20" HREF="terminal_interface-curses__adb.htm#ref_1752_7">Column</A> : in Column_Position;

1426

<A NAME="ref_1421_20" HREF="terminal_interface-curses__adb.htm#ref_1753_7">Str</A> : out String;

1427

Len : in Integer := -1);

1427

-- #1A NAME="AFU_104"#2|

1428

procedure <A NAME="ref_1423_14" HREF="terminal_interface-curses__adb.htm#ref_1714_14">Peek</A> (<A NAME="ref_1423_20" HREF="terminal_interface-curses__adb.htm#ref_1715_7">Win</A> : in <A HREF="terminal_interface-curses__ads.htm#ref_57_9">Window</A> := <A HREF="terminal_interface-curses__ads.htm#ref_476_13">Standard_Window</A>;

1429

<A NAME="ref_1424_20" HREF="terminal_interface-curses__adb.htm#ref_1716_7">Line</A> : in <A HREF="terminal_interface-curses__ads.htm#ref_60_9">Line_Position</A>;

1430

<A NAME="ref_1425_20" HREF="terminal_interface-curses__adb.htm#ref_1717_7">Column</A> : in <A HREF="terminal_interface-curses__ads.htm#ref_61_9">Column_Position</A>;

1431

<A NAME="ref_1426_20" HREF="terminal_interface-curses__adb.htm#ref_1718_7">Str</A> : out String;

1432

<A NAME="ref_1427_20" HREF="terminal_interface-curses__adb.htm#ref_1719_7">Len</A> : in Integer := -1);

1428

1433

-- AKA: <A HREF="../man/curs_instr.3x.html">mvwinnstr()</A>

1429

1434

-- AKA: mvwinstr()

1430

1435

-- AKA: mvinnstr()

1434

1439

-- | Man page <A HREF="../man/curs_inchstr.3x.html">curs_inchstr.3x</A>

1435

1440

-- |=====================================================================

1436

1441

1437

-- #1A NAME="AFU_104"#2|

1438

procedure Peek (<A NAME="ref_1433_20" HREF="terminal_interface-curses__adb.htm#ref_1762_7">Win</A> : in <A HREF="terminal_interface-curses__ads.htm#ref_376_9">Window</A> := Standard_Window;

1439

<A NAME="ref_1434_20" HREF="terminal_interface-curses__adb.htm#ref_1763_7">Str</A> : out Attributed_String;

1440

Len : in Integer := -1);

1442

-- #1A NAME="AFU_105"#2|

1443

procedure <A NAME="ref_1438_14" HREF="terminal_interface-curses__adb.htm#ref_1726_14">Peek</A> (<A NAME="ref_1438_20" HREF="terminal_interface-curses__adb.htm#ref_1727_7">Win</A> : in <A HREF="terminal_interface-curses__ads.htm#ref_57_9">Window</A> := <A HREF="terminal_interface-curses__ads.htm#ref_476_13">Standard_Window</A>;

1444

<A NAME="ref_1439_20" HREF="terminal_interface-curses__adb.htm#ref_1728_7">Str</A> : out Attributed_String;

1445

<A NAME="ref_1440_20" HREF="terminal_interface-curses__adb.htm#ref_1729_7">Len</A> : in Integer := -1);

1441

1446

-- AKA: <A HREF="../man/curs_inchstr.3x.html">winchnstr()</A>

1442

1447

-- AKA: winchstr()

1443

1448

-- AKA: inchnstr()

1444

1449

-- AKA: inchstr()

1445

1450

1446

-- #1A NAME="AFU_105"#2|

1447

procedure Peek (<A NAME="ref_1442_20" HREF="terminal_interface-curses__adb.htm#ref_1799_7">Win</A> : in <A HREF="terminal_interface-curses__ads.htm#ref_60_9">Window</A> := Standard_Window;

1448

<A NAME="ref_1443_20" HREF="terminal_interface-curses__adb.htm#ref_1800_7">Line</A> : in <A HREF="terminal_interface-curses__ads.htm#ref_61_9">Line_Position</A>;

1449

<A NAME="ref_1444_20" HREF="terminal_interface-curses__adb.htm#ref_1801_7">Column</A> : in <A HREF="terminal_interface-curses__ads.htm#ref_376_9">Column_Position</A>;

1450

<A NAME="ref_1445_20" HREF="terminal_interface-curses__adb.htm#ref_1802_7">Str</A> : out Attributed_String;

1451

Len : in Integer := -1);

1451

-- #1A NAME="AFU_106"#2|

1452

procedure <A NAME="ref_1447_14" HREF="terminal_interface-curses__adb.htm#ref_1763_14">Peek</A> (<A NAME="ref_1447_20" HREF="terminal_interface-curses__adb.htm#ref_1764_7">Win</A> : in <A HREF="terminal_interface-curses__ads.htm#ref_57_9">Window</A> := <A HREF="terminal_interface-curses__ads.htm#ref_476_13">Standard_Window</A>;

1453

<A NAME="ref_1448_20" HREF="terminal_interface-curses__adb.htm#ref_1765_7">Line</A> : in <A HREF="terminal_interface-curses__ads.htm#ref_60_9">Line_Position</A>;

1454

<A NAME="ref_1449_20" HREF="terminal_interface-curses__adb.htm#ref_1766_7">Column</A> : in <A HREF="terminal_interface-curses__ads.htm#ref_61_9">Column_Position</A>;

1455

<A NAME="ref_1450_20" HREF="terminal_interface-curses__adb.htm#ref_1767_7">Str</A> : out Attributed_String;

1456

<A NAME="ref_1451_20" HREF="terminal_interface-curses__adb.htm#ref_1768_7">Len</A> : in Integer := -1);

1452

1457

-- AKA: <A HREF="../man/curs_inchstr.3x.html">mvwinchnstr()</A>

1453

1458

-- AKA: mvwinchstr()

1454

1459

-- AKA: mvinchnstr()

1459

1464

-- | Man page <A HREF="../man/curs_getstr.3x.html">curs_getstr.3x</A>

1460

1465

-- |=====================================================================

1461

1466

1462

-- #1A NAME="AFU_106"#2|

1463

procedure Get (<A NAME="ref_1458_19" HREF="terminal_interface-curses__adb.htm#ref_1810_19">Win</A> : in Window := Standard_Window;

1464

<A NAME="ref_1459_19" HREF="terminal_interface-curses__adb.htm#ref_1811_19">Str</A> : out String;

1465

Len : in Integer := -1);

1467

-- #1A NAME="AFU_107"#2|

1468

procedure <A NAME="ref_1463_14" HREF="terminal_interface-curses__adb.htm#ref_1775_14">Get</A> (<A NAME="ref_1463_19" HREF="terminal_interface-curses__adb.htm#ref_1775_19">Win</A> : in <A HREF="terminal_interface-curses__ads.htm#ref_57_9">Window</A> := <A HREF="terminal_interface-curses__ads.htm#ref_476_13">Standard_Window</A>;

1469

<A NAME="ref_1464_19" HREF="terminal_interface-curses__adb.htm#ref_1776_19">Str</A> : out String;

1470

<A NAME="ref_1465_19" HREF="terminal_interface-curses__adb.htm#ref_1777_19">Len</A> : in Integer := -1);

1466

1471

-- AKA: <A HREF="../man/curs_getstr.3x.html">wgetnstr()</A>

1467

1472

-- AKA: wgetstr()

1468

1473

-- AKA: getnstr()

1470

1475

-- actually getstr is not supported because that results in buffer

1471

1476

-- overflows.

1472

1477

1473

-- #1A NAME="AFU_107"#2|

1474

procedure Get (<A NAME="ref_1469_19" HREF="terminal_interface-curses__adb.htm#ref_1840_7">Win</A> : in <A HREF="terminal_interface-curses__ads.htm#ref_60_9">Window</A> := Standard_Window;

1475

<A NAME="ref_1470_19" HREF="terminal_interface-curses__adb.htm#ref_1841_7">Line</A> : in <A HREF="terminal_interface-curses__ads.htm#ref_61_9">Line_Position</A>;

1476

<A NAME="ref_1471_19" HREF="terminal_interface-curses__adb.htm#ref_1842_7">Column</A> : in Column_Position;

1477

<A NAME="ref_1472_19" HREF="terminal_interface-curses__adb.htm#ref_1843_7">Str</A> : out String;

1478

Len : in Integer := -1);

1478

-- #1A NAME="AFU_108"#2|

1479

procedure <A NAME="ref_1474_14" HREF="terminal_interface-curses__adb.htm#ref_1804_14">Get</A> (<A NAME="ref_1474_19" HREF="terminal_interface-curses__adb.htm#ref_1805_7">Win</A> : in <A HREF="terminal_interface-curses__ads.htm#ref_57_9">Window</A> := <A HREF="terminal_interface-curses__ads.htm#ref_476_13">Standard_Window</A>;

1480

<A NAME="ref_1475_19" HREF="terminal_interface-curses__adb.htm#ref_1806_7">Line</A> : in <A HREF="terminal_interface-curses__ads.htm#ref_60_9">Line_Position</A>;

1481

<A NAME="ref_1476_19" HREF="terminal_interface-curses__adb.htm#ref_1807_7">Column</A> : in <A HREF="terminal_interface-curses__ads.htm#ref_61_9">Column_Position</A>;

1482

<A NAME="ref_1477_19" HREF="terminal_interface-curses__adb.htm#ref_1808_7">Str</A> : out String;

1483

<A NAME="ref_1478_19" HREF="terminal_interface-curses__adb.htm#ref_1809_7">Len</A> : in Integer := -1);

1479

1484

-- AKA: <A HREF="../man/curs_getstr.3x.html">mvwgetnstr()</A>

1480

1485

-- AKA: mvwgetstr()

1481

1486

-- AKA: mvgetnstr()

1488

1493

1489

1494

-- Not Implemented: slk_attr_on, slk_attr_off, slk_attr_set

1490

1495

1491

type Soft_Label_Key_Format is (<A NAME="ref_1486_35">Three_Two_Three</A>,

1492

<A NAME="ref_1487_35">Four_Four</A>,

1493

<A NAME="ref_1488_35">PC_Style</A>, -- ncurses specific

1494

<A NAME="ref_1489_9"> </A> PC_Style_With_Index); -- "

1495

type <A NAME="ref_1490_9">Label_Number</A> is new Positive range 1 .. <A NAME="ref_1490_49">12</A>;

1496

type Label_Justification is (Left, Centered, Right);

1496

type <A NAME="ref_1491_9">Soft_Label_Key_Format</A> is (<A NAME="ref_1491_35">Three_Two_Three</A>,

1497

<A NAME="ref_1492_35">Four_Four</A>,

1498

<A NAME="ref_1493_35">PC_Style</A>, -- ncurses specific

1499

<A NAME="ref_1494_35">PC_Style_With_Index</A>); -- "

1500

type <A NAME="ref_1495_9">Label_Number</A> is new Positive range 1 .. 12;

1501

type <A NAME="ref_1496_9">Label_Justification</A> is (<A NAME="ref_1496_33">Left</A>, <A NAME="ref_1496_39">Centered</A>, <A NAME="ref_1496_49">Right</A>);

1497

1502

1498

-- #1A NAME="AFU_108"#2|

1499

procedure Init_Soft_Label_Keys

1500

(Format : in Soft_Label_Key_Format := Three_Two_Three);

1503

-- #1A NAME="AFU_109"#2|

1504

procedure <A NAME="ref_1499_14" HREF="terminal_interface-curses__adb.htm#ref_1816_14">Init_Soft_Label_Keys</A>

1505

(<A NAME="ref_1500_7" HREF="terminal_interface-curses__adb.htm#ref_1817_7">Format</A> : in <A HREF="terminal_interface-curses__ads.htm#ref_1491_9">Soft_Label_Key_Format</A> := <A HREF="terminal_interface-curses__ads.htm#ref_1491_35">Three_Two_Three</A>);

1501

1506

-- AKA: <A HREF="../man/curs_slk.3x.html">slk_init()</A>

1502

pragma Inline (Init_Soft_Label_Keys);

1507

pragma Inline (<A HREF="terminal_interface-curses__ads.htm#ref_1499_14">Init_Soft_Label_Keys</A>);

1503

1508

1504

-- #1A NAME="AFU_109"#2|

1505

procedure Set_Soft_Label_Key (<A NAME="ref_1500_34" HREF="terminal_interface-curses__adb.htm#ref_1862_34">Label</A> : in Label_Number;

1506

<A NAME="ref_1501_34" HREF="terminal_interface-curses__adb.htm#ref_1863_34">Text</A> : in <A HREF="terminal_interface-curses__ads.htm#ref_1490_9">String</A>;

1507

Fmt : in Label_Justification := Left);

1509

-- #1A NAME="AFU_110"#2|

1510

procedure <A NAME="ref_1505_14" HREF="terminal_interface-curses__adb.htm#ref_1827_14">Set_Soft_Label_Key</A> (<A NAME="ref_1505_34" HREF="terminal_interface-curses__adb.htm#ref_1827_34">Label</A> : in <A HREF="terminal_interface-curses__ads.htm#ref_1495_9">Label_Number</A>;

1511

<A NAME="ref_1506_34" HREF="terminal_interface-curses__adb.htm#ref_1828_34">Text</A> : in String;

1512

<A NAME="ref_1507_34" HREF="terminal_interface-curses__adb.htm#ref_1829_34">Fmt</A> : in <A HREF="terminal_interface-curses__ads.htm#ref_1496_9">Label_Justification</A> := <A HREF="terminal_interface-curses__ads.htm#ref_1496_33">Left</A>);

1508

1513

-- AKA: <A HREF="../man/curs_slk.3x.html">slk_set()</A>

1509

1514

-- We don't inline this procedure

1510

1515

1511

-- #1A NAME="AFU_110"#2|

1512

procedure Refresh_Soft_Label_Keys;

1516

-- #1A NAME="AFU_111"#2|

1517

procedure <A NAME="ref_1512_14" HREF="terminal_interface-curses__adb.htm#ref_1846_14">Refresh_Soft_Label_Keys</A>;

1513

1518

-- AKA: <A HREF="../man/curs_slk.3x.html">slk_refresh()</A>

1514

pragma Inline (Refresh_Soft_Label_Keys);

1519

pragma Inline (<A HREF="terminal_interface-curses__ads.htm#ref_1512_14">Refresh_Soft_Label_Keys</A>);

1515

1520

1516

-- #1A NAME="AFU_111"#2|

1517

procedure Refresh_Soft_Label_Keys_Without_Update;

1521

-- #1A NAME="AFU_112"#2|

1522

procedure <A NAME="ref_1517_14" HREF="terminal_interface-curses__adb.htm#ref_1856_14">Refresh_Soft_Label_Keys_Without_Update</A>;

1518

1523

-- AKA: <A HREF="../man/curs_slk.3x.html">slk_noutrefresh()</A>

1519

pragma Inline (Refresh_Soft_Label_Keys_Without_Update);

1520

1521

-- #1A NAME="AFU_112"#2|

1522

procedure Get_Soft_Label_Key (<A NAME="ref_1517_34" HREF="terminal_interface-curses__adb.htm#ref_1901_34">Label</A> : in Label_Number;

1523

Text : out String);

1524

-- AKA: <A HREF="../man/curs_slk.3x.html">slk_label()</A>

1524

pragma Inline (<A HREF="terminal_interface-curses__ads.htm#ref_1517_14">Refresh_Soft_Label_Keys_Without_Update</A>);

1525

1526

-- #1A NAME="AFU_113"#2|

1527

function Get_Soft_Label_Key (Label : in Label_Number) return String;

1527

procedure <A NAME="ref_1522_14" HREF="terminal_interface-curses__adb.htm#ref_1866_14">Get_Soft_Label_Key</A> (<A NAME="ref_1522_34" HREF="terminal_interface-curses__adb.htm#ref_1866_34">Label</A> : in <A HREF="terminal_interface-curses__ads.htm#ref_1495_9">Label_Number</A>;

1528

<A NAME="ref_1523_34" HREF="terminal_interface-curses__adb.htm#ref_1867_34">Text</A> : out String);

1529

-- AKA: <A HREF="../man/curs_slk.3x.html">slk_label()</A>

1530

1531

-- #1A NAME="AFU_114"#2|

1532

function <A NAME="ref_1527_13" HREF="terminal_interface-curses__adb.htm#ref_1875_13">Get_Soft_Label_Key</A> (<A NAME="ref_1527_33" HREF="terminal_interface-curses__adb.htm#ref_1875_33">Label</A> : in <A HREF="terminal_interface-curses__ads.htm#ref_1495_9">Label_Number</A>) return String;

1528

1533

-- AKA: <A HREF="../man/curs_slk.3x.html">slk_label()</A>

1529

1534

-- Same as function

1530

1535

pragma Inline (Get_Soft_Label_Key);

1531

1536

1532

-- #1A NAME="AFU_114"#2|

1533

procedure Clear_Soft_Label_Keys;

1537

-- #1A NAME="AFU_115"#2|

1538

procedure <A NAME="ref_1533_14" HREF="terminal_interface-curses__adb.htm#ref_1883_14">Clear_Soft_Label_Keys</A>;

1534

1539

-- AKA: <A HREF="../man/curs_slk.3x.html">slk_clear()</A>

1535

pragma Inline (Clear_Soft_Label_Keys);

1540

pragma Inline (<A HREF="terminal_interface-curses__ads.htm#ref_1533_14">Clear_Soft_Label_Keys</A>);

1536

1541

1537

-- #1A NAME="AFU_115"#2|

1538

procedure Restore_Soft_Label_Keys;

1542

-- #1A NAME="AFU_116"#2|

1543

procedure <A NAME="ref_1538_14" HREF="terminal_interface-curses__adb.htm#ref_1893_14">Restore_Soft_Label_Keys</A>;

1539

1544

-- AKA: <A HREF="../man/curs_slk.3x.html">slk_restore()</A>

1540

pragma Inline (Restore_Soft_Label_Keys);

1545

pragma Inline (<A HREF="terminal_interface-curses__ads.htm#ref_1538_14">Restore_Soft_Label_Keys</A>);

1541

1546

1542

-- #1A NAME="AFU_116"#2|

1543

procedure Touch_Soft_Label_Keys;

1547

-- #1A NAME="AFU_117"#2|

1548

procedure <A NAME="ref_1543_14" HREF="terminal_interface-curses__adb.htm#ref_1903_14">Touch_Soft_Label_Keys</A>;

1544

1549

-- AKA: <A HREF="../man/curs_slk.3x.html">slk_touch()</A>

1545

pragma Inline (Touch_Soft_Label_Keys);

1550

pragma Inline (<A HREF="terminal_interface-curses__ads.htm#ref_1543_14">Touch_Soft_Label_Keys</A>);

1546

1551

1547

-- #1A NAME="AFU_117"#2|

1548

procedure Switch_Soft_Label_Key_Attributes

1549

(<A NAME="ref_1544_7" HREF="terminal_interface-curses__adb.htm#ref_1949_7">Attr</A> : in Character_Attribute_Set;

1550

On : in Boolean := True);

1552

-- #1A NAME="AFU_118"#2|

1553

procedure <A NAME="ref_1548_14" HREF="terminal_interface-curses__adb.htm#ref_1913_14">Switch_Soft_Label_Key_Attributes</A>

1554

(<A NAME="ref_1549_7" HREF="terminal_interface-curses__adb.htm#ref_1914_7">Attr</A> : in <A HREF="terminal_interface-curses__ads.htm#ref_307_9">Character_Attribute_Set</A>;

1555

<A NAME="ref_1550_7" HREF="terminal_interface-curses__adb.htm#ref_1915_7">On</A> : in Boolean := True);

1551

1556

-- AKA: <A HREF="../man/curs_slk.3x.html">slk_attron()</A>

1552

1557

-- AKA: slk_attroff()

1553

pragma Inline (Switch_Soft_Label_Key_Attributes);

1558

pragma Inline (<A HREF="terminal_interface-curses__ads.htm#ref_1548_14">Switch_Soft_Label_Key_Attributes</A>);

1554

1559

1555

-- #1A NAME="AFU_118"#2|

1556

procedure Set_Soft_Label_Key_Attributes

1557

(<A NAME="ref_1552_7" HREF="terminal_interface-curses__adb.htm#ref_1973_7">Attr</A> : in <A HREF="terminal_interface-curses__ads.htm#ref_299_9">Character_Attribute_Set</A> := Normal_Video;

1558

Color : in Color_Pair := Color_Pair'First);

1560

-- #1A NAME="AFU_119"#2|

1561

procedure <A NAME="ref_1556_14" HREF="terminal_interface-curses__adb.htm#ref_1937_14">Set_Soft_Label_Key_Attributes</A>

1562

(<A NAME="ref_1557_7" HREF="terminal_interface-curses__adb.htm#ref_1938_7">Attr</A> : in <A HREF="terminal_interface-curses__ads.htm#ref_307_9">Character_Attribute_Set</A> := <A HREF="terminal_interface-curses__ads.htm#ref_350_4">Normal_Video</A>;

1563

<A NAME="ref_1558_7" HREF="terminal_interface-curses__adb.htm#ref_1939_7">Color</A> : in <A HREF="terminal_interface-curses__ads.htm#ref_299_9">Color_Pair</A> := <A HREF="terminal_interface-curses__ads.htm#ref_299_9">Color_Pair</A>'First);

1559

1564

-- AKA: <A HREF="../man/curs_slk.3x.html">slk_attrset()</A>

1560

pragma Inline (Set_Soft_Label_Key_Attributes);

1561

1562

-- #1A NAME="AFU_119"#2|

1563

function Get_Soft_Label_Key_Attributes return Character_Attribute_Set;

1564

-- AKA: <A HREF="../man/curs_slk.3x.html">slk_attr()</A>

1565

pragma Inline (<A HREF="terminal_interface-curses__ads.htm#ref_1556_14">Set_Soft_Label_Key_Attributes</A>);

1565

1566

1567

-- #1A NAME="AFU_120"#2|

1567

function Get_Soft_Label_Key_Attributes return Color_Pair;

1568

function <A NAME="ref_1563_13" HREF="terminal_interface-curses__adb.htm#ref_1953_13">Get_Soft_Label_Key_Attributes</A> return <A HREF="terminal_interface-curses__ads.htm#ref_307_9">Character_Attribute_Set</A>;

1569

-- AKA: <A HREF="../man/curs_slk.3x.html">slk_attr()</A>

1570

1571

-- #1A NAME="AFU_121"#2|

1572

function <A NAME="ref_1567_13" HREF="terminal_interface-curses__adb.htm#ref_1963_13">Get_Soft_Label_Key_Attributes</A> return <A HREF="terminal_interface-curses__ads.htm#ref_299_9">Color_Pair</A>;

1568

1573

-- AKA: <A HREF="../man/curs_slk.3x.html">slk_attr()</A>

1569

1574

pragma Inline (Get_Soft_Label_Key_Attributes);

1570

1575

1571

-- #1A NAME="AFU_121"#2|

1572

procedure Set_Soft_Label_Key_Color (Pair : in Color_Pair);

1576

-- #1A NAME="AFU_122"#2|

1577

procedure <A NAME="ref_1572_14" HREF="terminal_interface-curses__adb.htm#ref_1973_14">Set_Soft_Label_Key_Color</A> (<A NAME="ref_1572_40" HREF="terminal_interface-curses__adb.htm#ref_1973_40">Pair</A> : in <A HREF="terminal_interface-curses__ads.htm#ref_299_9">Color_Pair</A>);

1573

1578

-- AKA: <A HREF="../man/curs_slk.3x.html">slk_color()</A>

1574

pragma Inline (Set_Soft_Label_Key_Color);

1579

pragma Inline (<A HREF="terminal_interface-curses__ads.htm#ref_1572_14">Set_Soft_Label_Key_Color</A>);

1575

1580

1576

1581

-- |=====================================================================

1577

1582

-- | Man page <A HREF="../man/keybound.3x.html">keybound.3x</A>

1582

1587

-- | Man page <A HREF="../man/keyok.3x.html">keyok.3x</A>

1583

1588

-- |=====================================================================

1584

1589

1585

-- #1A NAME="AFU_122"#2|

1586

procedure Enable_Key (<A NAME="ref_1581_26" HREF="terminal_interface-curses__adb.htm#ref_2019_26">Key</A> : in Special_Key_Code;

1587

Enable : in Boolean := True);

1590

-- #1A NAME="AFU_123"#2|

1591

procedure <A NAME="ref_1586_14" HREF="terminal_interface-curses__adb.htm#ref_1984_14">Enable_Key</A> (<A NAME="ref_1586_26" HREF="terminal_interface-curses__adb.htm#ref_1984_26">Key</A> : in <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A>;

1592

<A NAME="ref_1587_26" HREF="terminal_interface-curses__adb.htm#ref_1985_26">Enable</A> : in Boolean := True);

1588

1593

-- AKA: <A HREF="../man/keyok.3x.html">keyok()</A>

1589

pragma Inline (Enable_Key);

1594

pragma Inline (<A HREF="terminal_interface-curses__ads.htm#ref_1586_14">Enable_Key</A>);

1590

1595

1591

1596

-- |=====================================================================

1592

1597

-- | Man page <A HREF="../man/define_key.3x.html">define_key.3x</A>

1593

1598

-- |=====================================================================

1594

1599

1595

-- #1A NAME="AFU_123"#2|

1596

procedure Define_Key (<A NAME="ref_1591_26" HREF="terminal_interface-curses__adb.htm#ref_2032_26">Definition</A> : in <A HREF="terminal_interface-curses__ads.htm#ref_78_12">String</A>;

1597

Key : in Special_Key_Code);

1600

-- #1A NAME="AFU_124"#2|

1601

procedure <A NAME="ref_1596_14" HREF="terminal_interface-curses__adb.htm#ref_1997_14">Define_Key</A> (<A NAME="ref_1596_26" HREF="terminal_interface-curses__adb.htm#ref_1997_26">Definition</A> : in String;

1602

<A NAME="ref_1597_26" HREF="terminal_interface-curses__adb.htm#ref_1998_26">Key</A> : in <A HREF="terminal_interface-curses__ads.htm#ref_78_12">Special_Key_Code</A>);

1598

1603

-- AKA: <A HREF="../man/define_key.3x.html">define_key()</A>

1599

pragma Inline (Define_Key);

1604

pragma Inline (<A HREF="terminal_interface-curses__ads.htm#ref_1596_14">Define_Key</A>);

1600

1605

1601

1606

-- |=====================================================================

1602

1607

-- | Man page <A HREF="../man/curs_util.3x.html">curs_util.3x</A>

1606

1611

-- | putwin, getwin are in the child package PutWin

1607

1612

--

1608

1613

1609

-- #1A NAME="AFU_124"#2|

1610

procedure Key_Name (<A NAME="ref_1605_24" HREF="terminal_interface-curses__adb.htm#ref_144_24">Key</A> : in Real_Key_Code;

1611

Name : out String);

1614

-- #1A NAME="AFU_125"#2|

1615

procedure <A NAME="ref_1610_14" HREF="terminal_interface-curses__adb.htm#ref_90_14">Key_Name</A> (<A NAME="ref_1610_24" HREF="terminal_interface-curses__adb.htm#ref_90_24">Key</A> : in <A HREF="terminal_interface-curses__ads.htm#ref_73_12">Real_Key_Code</A>;

1616

<A NAME="ref_1611_24" HREF="terminal_interface-curses__adb.htm#ref_91_24">Name</A> : out String);

1612

1617

-- AKA: <A HREF="../man/curs_util.3x.html">keyname()</A>

1613

1618

-- The external name for a real keystroke.

1614

1619

1615

-- #1A NAME="AFU_125"#2|

1616

function Key_Name (Key : in Real_Key_Code) return String;

1620

-- #1A NAME="AFU_126"#2|

1621

function <A NAME="ref_1616_13" HREF="terminal_interface-curses__adb.htm#ref_62_13">Key_Name</A> (<A NAME="ref_1616_23" HREF="terminal_interface-curses__adb.htm#ref_62_23">Key</A> : in <A HREF="terminal_interface-curses__ads.htm#ref_73_12">Real_Key_Code</A>) return String;

1617

1622

-- AKA: <A HREF="../man/curs_util.3x.html">keyname()</A>

1618

1623

-- Same as function

1619

1624

-- We don't inline this routine

1620

1625

1621

-- #1A NAME="AFU_126"#2|

1622

procedure Un_Control (<A NAME="ref_1617_26" HREF="terminal_interface-curses__adb.htm#ref_2048_26">Ch</A> : in Attributed_Character;

1623

Str : out String);

1624

-- AKA: <A HREF="../man/curs_util.3x.html">unctrl()</A>

1625

1626

-- #1A NAME="AFU_127"#2|

1627

function Un_Control (Ch : in Attributed_Character) return String;

1627

procedure <A NAME="ref_1622_14" HREF="terminal_interface-curses__adb.htm#ref_2013_14">Un_Control</A> (<A NAME="ref_1622_26" HREF="terminal_interface-curses__adb.htm#ref_2013_26">Ch</A> : in <A HREF="terminal_interface-curses__ads.htm#ref_352_9">Attributed_Character</A>;

1628

<A NAME="ref_1623_26" HREF="terminal_interface-curses__adb.htm#ref_2014_26">Str</A> : out String);

1629

-- AKA: <A HREF="../man/curs_util.3x.html">unctrl()</A>

1630

1631

-- #1A NAME="AFU_128"#2|

1632

function <A NAME="ref_1627_13" HREF="terminal_interface-curses__adb.htm#ref_2022_13">Un_Control</A> (<A NAME="ref_1627_25" HREF="terminal_interface-curses__adb.htm#ref_2022_25">Ch</A> : in <A HREF="terminal_interface-curses__ads.htm#ref_352_9">Attributed_Character</A>) return String;

1628

1633

-- AKA: <A HREF="../man/curs_util.3x.html">unctrl()</A>

1629

1634

-- Same as function

1630

1635

pragma Inline (Un_Control);

1631

1636

1632

-- #1A NAME="AFU_128"#2|

1633

procedure Delay_Output (Msecs : in Natural);

1637

-- #1A NAME="AFU_129"#2|

1638

procedure <A NAME="ref_1633_14" HREF="terminal_interface-curses__adb.htm#ref_2030_14">Delay_Output</A> (<A NAME="ref_1633_28" HREF="terminal_interface-curses__adb.htm#ref_2030_28">Msecs</A> : in Natural);

1634

1639

-- AKA: <A HREF="../man/curs_util.3x.html">delay_output()</A>

1635

pragma Inline (Delay_Output);

1640

pragma Inline (<A HREF="terminal_interface-curses__ads.htm#ref_1633_14">Delay_Output</A>);

1636

1641

1637

-- #1A NAME="AFU_129"#2|

1638

procedure Flush_Input;

1642

-- #1A NAME="AFU_130"#2|

1643

procedure <A NAME="ref_1638_14" HREF="terminal_interface-curses__adb.htm#ref_2040_14">Flush_Input</A>;

1639

1644

-- AKA: <A HREF="../man/curs_util.3x.html">flushinp()</A>

1640

pragma Inline (Flush_Input);

1645

pragma Inline (<A HREF="terminal_interface-curses__ads.htm#ref_1638_14">Flush_Input</A>);

1641

1646

1642

1647

-- |=====================================================================

1643

1648

-- | Man page <A HREF="../man/curs_termattrs.3x.html">curs_termattrs.3x</A>

1644

1649

-- |=====================================================================

1645

1650

1646

-- #1A NAME="AFU_130"#2|

1647

function Baudrate return Natural;

1651

-- #1A NAME="AFU_131"#2|

1652

function <A NAME="ref_1647_13" HREF="terminal_interface-curses__adb.htm#ref_2050_13">Baudrate</A> return Natural;

1648

1653

-- AKA: <A HREF="../man/curs_termattrs.3x.html">baudrate()</A>

1649

pragma Inline (Baudrate);

1654

pragma Inline (<A HREF="terminal_interface-curses__ads.htm#ref_1647_13">Baudrate</A>);

1650

1655

1651

-- #1A NAME="AFU_131"#2|

1652

function Erase_Character return Character;

1656

-- #1A NAME="AFU_132"#2|

1657

function <A NAME="ref_1652_13" HREF="terminal_interface-curses__adb.htm#ref_2058_13">Erase_Character</A> return Character;

1653

1658

-- AKA: <A HREF="../man/curs_termattrs.3x.html">erasechar()</A>

1654

pragma Inline (Erase_Character);

1659

pragma Inline (<A HREF="terminal_interface-curses__ads.htm#ref_1652_13">Erase_Character</A>);

1655

1660

1656

-- #1A NAME="AFU_132"#2|

1657

function Kill_Character return Character;

1661

-- #1A NAME="AFU_133"#2|

1662

function <A NAME="ref_1657_13" HREF="terminal_interface-curses__adb.htm#ref_2066_13">Kill_Character</A> return Character;

1658

1663

-- AKA: <A HREF="../man/curs_termattrs.3x.html">killchar()</A>

1659

pragma Inline (Kill_Character);

1664

pragma Inline (<A HREF="terminal_interface-curses__ads.htm#ref_1657_13">Kill_Character</A>);

1660

1665

1661

-- #1A NAME="AFU_133"#2|

1662

function Has_Insert_Character return Boolean;

1666

-- #1A NAME="AFU_134"#2|

1667

function <A NAME="ref_1662_13" HREF="terminal_interface-curses__adb.htm#ref_2074_13">Has_Insert_Character</A> return Boolean;

1663

1668

-- AKA: <A HREF="../man/curs_termattrs.3x.html">has_ic()</A>

1664

pragma Inline (Has_Insert_Character);

1669

pragma Inline (<A HREF="terminal_interface-curses__ads.htm#ref_1662_13">Has_Insert_Character</A>);

1665

1670

1666

-- #1A NAME="AFU_134"#2|

1667

function Has_Insert_Line return Boolean;

1671

-- #1A NAME="AFU_135"#2|

1672

function <A NAME="ref_1667_13" HREF="terminal_interface-curses__adb.htm#ref_2086_13">Has_Insert_Line</A> return Boolean;

1668

1673

-- AKA: <A HREF="../man/curs_termattrs.3x.html">has_il()</A>

1669

pragma Inline (Has_Insert_Line);

1674

pragma Inline (<A HREF="terminal_interface-curses__ads.htm#ref_1667_13">Has_Insert_Line</A>);

1670

1675

1671

-- #1A NAME="AFU_135"#2|

1672

function Supported_Attributes return Character_Attribute_Set;

1676

-- #1A NAME="AFU_136"#2|

1677

function <A NAME="ref_1672_13" HREF="terminal_interface-curses__adb.htm#ref_2098_13">Supported_Attributes</A> return <A HREF="terminal_interface-curses__ads.htm#ref_307_9">Character_Attribute_Set</A>;

1673

1678

-- AKA: <A HREF="../man/curs_termattrs.3x.html">termattrs()</A>

1674

pragma Inline (Supported_Attributes);

1675

1676

-- #1A NAME="AFU_136"#2|

1677

procedure Long_Name (Name : out String);

1678

-- AKA: <A HREF="../man/curs_termattrs.3x.html">longname()</A>

1679

pragma Inline (<A HREF="terminal_interface-curses__ads.htm#ref_1672_13">Supported_Attributes</A>);

1679

1680

1681

-- #1A NAME="AFU_137"#2|

1681

function Long_Name return String;

1682

procedure <A NAME="ref_1677_14" HREF="terminal_interface-curses__adb.htm#ref_2108_14">Long_Name</A> (<A NAME="ref_1677_25" HREF="terminal_interface-curses__adb.htm#ref_2108_25">Name</A> : out String);

1683

-- AKA: <A HREF="../man/curs_termattrs.3x.html">longname()</A>

1684

1685

-- #1A NAME="AFU_138"#2|

1686

function <A NAME="ref_1681_13" HREF="terminal_interface-curses__adb.htm#ref_2116_13">Long_Name</A> return String;

1682

1687

-- AKA: <A HREF="../man/curs_termattrs.3x.html">longname()</A>

1683

1688

-- Same as function

1684

1689

pragma Inline (Long_Name);

1685

1690

1686

-- #1A NAME="AFU_138"#2|

1687

procedure Terminal_Name (Name : out String);

1688

-- AKA: <A HREF="../man/curs_termattrs.3x.html">termname()</A>

1689

1690

1691

-- #1A NAME="AFU_139"#2|

1691

function Terminal_Name return String;

1692

procedure <A NAME="ref_1687_14" HREF="terminal_interface-curses__adb.htm#ref_2124_14">Terminal_Name</A> (<A NAME="ref_1687_29" HREF="terminal_interface-curses__adb.htm#ref_2124_29">Name</A> : out String);

1693

-- AKA: <A HREF="../man/curs_termattrs.3x.html">termname()</A>

1694

1695

-- #1A NAME="AFU_140"#2|

1696

function <A NAME="ref_1691_13" HREF="terminal_interface-curses__adb.htm#ref_2132_13">Terminal_Name</A> return String;

1692

1697

-- AKA: <A HREF="../man/curs_termattrs.3x.html">termname()</A>

1693

1698

-- Same as function

1694

1699

pragma Inline (Terminal_Name);

1703

1708

-- In C you often see something like c = c | COLOR_PAIR(n);

1704

1709

-- This is equivalent to c.Color := n;

1705

1710

1706

-- #1A NAME="AFU_140"#2|

1707

procedure Start_Color;

1711

-- #1A NAME="AFU_141"#2|

1712

procedure <A NAME="ref_1707_14">Start_Color</A>;

1708

1713

-- AKA: <A HREF="../man/curs_color.3x.html">start_color()</A>

1709

1714

pragma Import (C, Start_Color, "start_color");

1710

1715

1711

-- #1A NAME="AFU_141"#2|

1712

procedure Init_Pair (<A NAME="ref_1707_25" HREF="terminal_interface-curses__adb.htm#ref_2175_25">Pair</A> : in <A HREF="terminal_interface-curses__ads.htm#ref_278_9">Redefinable_Color_Pair</A>;

1713

<A NAME="ref_1708_25" HREF="terminal_interface-curses__adb.htm#ref_2176_25">Fore</A> : in <A HREF="terminal_interface-curses__ads.htm#ref_278_9">Color_Number</A>;

1714

Back : in Color_Number);

1716

-- #1A NAME="AFU_142"#2|

1717

procedure <A NAME="ref_1712_14" HREF="terminal_interface-curses__adb.htm#ref_2140_14">Init_Pair</A> (<A NAME="ref_1712_25" HREF="terminal_interface-curses__adb.htm#ref_2140_25">Pair</A> : in <A HREF="terminal_interface-curses__ads.htm#ref_301_12">Redefinable_Color_Pair</A>;

1718

<A NAME="ref_1713_25" HREF="terminal_interface-curses__adb.htm#ref_2141_25">Fore</A> : in <A HREF="terminal_interface-curses__ads.htm#ref_278_9">Color_Number</A>;

1719

<A NAME="ref_1714_25" HREF="terminal_interface-curses__adb.htm#ref_2142_25">Back</A> : in <A HREF="terminal_interface-curses__ads.htm#ref_278_9">Color_Number</A>);

1715

1720

-- AKA: <A HREF="../man/curs_color.3x.html">init_pair()</A>

1716

pragma Inline (Init_Pair);

1721

pragma Inline (<A HREF="terminal_interface-curses__ads.htm#ref_1712_14">Init_Pair</A>);

1717

1722

1718

-- #1A NAME="AFU_142"#2|

1719

procedure Pair_Content (<A NAME="ref_1714_28" HREF="terminal_interface-curses__adb.htm#ref_2196_28">Pair</A> : in Color_Pair;

1720

<A NAME="ref_1715_28" HREF="terminal_interface-curses__adb.htm#ref_2197_28">Fore</A> : out <A HREF="terminal_interface-curses__ads.htm#ref_278_9">Color_Number</A>;

1721

Back : out Color_Number);

1723

-- #1A NAME="AFU_143"#2|

1724

procedure <A NAME="ref_1719_14" HREF="terminal_interface-curses__adb.htm#ref_2162_14">Pair_Content</A> (<A NAME="ref_1719_28" HREF="terminal_interface-curses__adb.htm#ref_2162_28">Pair</A> : in <A HREF="terminal_interface-curses__ads.htm#ref_299_9">Color_Pair</A>;

1725

<A NAME="ref_1720_28" HREF="terminal_interface-curses__adb.htm#ref_2163_28">Fore</A> : out <A HREF="terminal_interface-curses__ads.htm#ref_278_9">Color_Number</A>;

1726

<A NAME="ref_1721_28" HREF="terminal_interface-curses__adb.htm#ref_2164_28">Back</A> : out <A HREF="terminal_interface-curses__ads.htm#ref_278_9">Color_Number</A>);

1722

1727

-- AKA: <A HREF="../man/curs_color.3x.html">pair_content()</A>

1723

pragma Inline (Pair_Content);

1728

pragma Inline (<A HREF="terminal_interface-curses__ads.htm#ref_1719_14">Pair_Content</A>);

1724

1729

1725

-- #1A NAME="AFU_143"#2|

1726

function Has_Colors return Boolean;

1730

-- #1A NAME="AFU_144"#2|

1731

function <A NAME="ref_1726_13" HREF="terminal_interface-curses__adb.htm#ref_2182_13">Has_Colors</A> return Boolean;

1727

1732

-- AKA: <A HREF="../man/curs_color.3x.html">has_colors()</A>

1728

pragma Inline (Has_Colors);

1733

pragma Inline (<A HREF="terminal_interface-curses__ads.htm#ref_1726_13">Has_Colors</A>);

1729

1734

1730

-- #1A NAME="AFU_144"#2|

1731

procedure Init_Color (<A NAME="ref_1726_26" HREF="terminal_interface-curses__adb.htm#ref_2228_26">Color</A> : in <A HREF="terminal_interface-curses__ads.htm#ref_295_9">Color_Number</A>;

1732

<A NAME="ref_1727_26" HREF="terminal_interface-curses__adb.htm#ref_2229_26">Red</A> : in <A HREF="terminal_interface-curses__ads.htm#ref_295_9">RGB_Value</A>;

1733

<A NAME="ref_1728_26" HREF="terminal_interface-curses__adb.htm#ref_2230_26">Green</A> : in <A HREF="terminal_interface-curses__ads.htm#ref_295_9">RGB_Value</A>;

1734

Blue : in RGB_Value);

1735

-- #1A NAME="AFU_145"#2|

1736

procedure <A NAME="ref_1731_14" HREF="terminal_interface-curses__adb.htm#ref_2194_14">Init_Color</A> (<A NAME="ref_1731_26" HREF="terminal_interface-curses__adb.htm#ref_2194_26">Color</A> : in <A HREF="terminal_interface-curses__ads.htm#ref_278_9">Color_Number</A>;

1737

<A NAME="ref_1732_26" HREF="terminal_interface-curses__adb.htm#ref_2195_26">Red</A> : in <A HREF="terminal_interface-curses__ads.htm#ref_295_9">RGB_Value</A>;

1738

<A NAME="ref_1733_26" HREF="terminal_interface-curses__adb.htm#ref_2196_26">Green</A> : in <A HREF="terminal_interface-curses__ads.htm#ref_295_9">RGB_Value</A>;

1739

<A NAME="ref_1734_26" HREF="terminal_interface-curses__adb.htm#ref_2197_26">Blue</A> : in <A HREF="terminal_interface-curses__ads.htm#ref_295_9">RGB_Value</A>);

1735

1740

-- AKA: <A HREF="../man/curs_color.3x.html">init_color()</A>

1736

pragma Inline (Init_Color);

1741

pragma Inline (<A HREF="terminal_interface-curses__ads.htm#ref_1731_14">Init_Color</A>);

1737

1742

1738

-- #1A NAME="AFU_145"#2|

1739

function Can_Change_Color return Boolean;

1743

-- #1A NAME="AFU_146"#2|

1744

function <A NAME="ref_1739_13" HREF="terminal_interface-curses__adb.htm#ref_2211_13">Can_Change_Color</A> return Boolean;

1740

1745

-- AKA: <A HREF="../man/curs_color.3x.html">can_change_color()</A>

1741

pragma Inline (Can_Change_Color);

1746

pragma Inline (<A HREF="terminal_interface-curses__ads.htm#ref_1739_13">Can_Change_Color</A>);

1742

1747

1743

-- #1A NAME="AFU_146"#2|

1744

procedure Color_Content (<A NAME="ref_1739_29" HREF="terminal_interface-curses__adb.htm#ref_2257_29">Color</A> : in <A HREF="terminal_interface-curses__ads.htm#ref_295_9">Color_Number</A>;

1745

<A NAME="ref_1740_29" HREF="terminal_interface-curses__adb.htm#ref_2258_29">Red</A> : out <A HREF="terminal_interface-curses__ads.htm#ref_295_9">RGB_Value</A>;

1746

<A NAME="ref_1741_29" HREF="terminal_interface-curses__adb.htm#ref_2259_29">Green</A> : out <A HREF="terminal_interface-curses__ads.htm#ref_295_9">RGB_Value</A>;

1747

Blue : out RGB_Value);

1748

-- #1A NAME="AFU_147"#2|

1749

procedure <A NAME="ref_1744_14" HREF="terminal_interface-curses__adb.htm#ref_2223_14">Color_Content</A> (<A NAME="ref_1744_29" HREF="terminal_interface-curses__adb.htm#ref_2223_29">Color</A> : in <A HREF="terminal_interface-curses__ads.htm#ref_278_9">Color_Number</A>;

1750

<A NAME="ref_1745_29" HREF="terminal_interface-curses__adb.htm#ref_2224_29">Red</A> : out <A HREF="terminal_interface-curses__ads.htm#ref_295_9">RGB_Value</A>;

1751

<A NAME="ref_1746_29" HREF="terminal_interface-curses__adb.htm#ref_2225_29">Green</A> : out <A HREF="terminal_interface-curses__ads.htm#ref_295_9">RGB_Value</A>;

1752

<A NAME="ref_1747_29" HREF="terminal_interface-curses__adb.htm#ref_2226_29">Blue</A> : out <A HREF="terminal_interface-curses__ads.htm#ref_295_9">RGB_Value</A>);

1748

1753

-- AKA: <A HREF="../man/curs_color.3x.html">color_content()</A>

1749

pragma Inline (Color_Content);

1754

pragma Inline (<A HREF="terminal_interface-curses__ads.htm#ref_1744_14">Color_Content</A>);

1750

1755

1751

1756

-- |=====================================================================

1752

1757

-- | Man page <A HREF="../man/curs_kernel.3x.html">curs_kernel.3x</A>

1753

1758

-- |=====================================================================

1754

1759

-- | Not implemented: getsyx, setsyx

1755

1760

--

1756

type Curses_Mode is (Curses, Shell);

1761

type <A NAME="ref_1756_9">Curses_Mode</A> is (<A NAME="ref_1756_25">Curses</A>, <A NAME="ref_1756_33">Shell</A>);

1757

1762

1758

-- #1A NAME="AFU_147"#2|

1759

procedure Save_Curses_Mode (Mode : in Curses_Mode);

1763

-- #1A NAME="AFU_148"#2|

1764

procedure <A NAME="ref_1759_14" HREF="terminal_interface-curses__adb.htm#ref_2247_14">Save_Curses_Mode</A> (<A NAME="ref_1759_32" HREF="terminal_interface-curses__adb.htm#ref_2247_32">Mode</A> : in <A HREF="terminal_interface-curses__ads.htm#ref_1756_9">Curses_Mode</A>);

1760

1765

-- AKA: <A HREF="../man/curs_kernel.3x.html">def_prog_mode()</A>

1761

1766

-- AKA: def_shell_mode()

1762

pragma Inline (Save_Curses_Mode);

1767

pragma Inline (<A HREF="terminal_interface-curses__ads.htm#ref_1759_14">Save_Curses_Mode</A>);

1763

1768

1764

-- #1A NAME="AFU_148"#2|

1765

procedure Reset_Curses_Mode (Mode : in Curses_Mode);

1769

-- #1A NAME="AFU_149"#2|

1770

procedure <A NAME="ref_1765_14" HREF="terminal_interface-curses__adb.htm#ref_2265_14">Reset_Curses_Mode</A> (<A NAME="ref_1765_33" HREF="terminal_interface-curses__adb.htm#ref_2265_33">Mode</A> : in <A HREF="terminal_interface-curses__ads.htm#ref_1756_9">Curses_Mode</A>);

1766

1771

-- AKA: <A HREF="../man/curs_kernel.3x.html">reset_prog_mode()</A>

1767

1772

-- AKA: reset_shell_mode()

1768

pragma Inline (Reset_Curses_Mode);

1773

pragma Inline (<A HREF="terminal_interface-curses__ads.htm#ref_1765_14">Reset_Curses_Mode</A>);

1769

1774

1770

-- #1A NAME="AFU_149"#2|

1771

procedure Save_Terminal_State;

1775

-- #1A NAME="AFU_150"#2|

1776

procedure <A NAME="ref_1771_14" HREF="terminal_interface-curses__adb.htm#ref_2283_14">Save_Terminal_State</A>;

1772

1777

-- AKA: <A HREF="../man/curs_kernel.3x.html">savetty()</A>

1773

pragma Inline (Save_Terminal_State);

1778

pragma Inline (<A HREF="terminal_interface-curses__ads.htm#ref_1771_14">Save_Terminal_State</A>);

1774

1779

1775

-- #1A NAME="AFU_150"#2|

1776

procedure Reset_Terminal_State;

1780

-- #1A NAME="AFU_151"#2|

1781

procedure <A NAME="ref_1776_14" HREF="terminal_interface-curses__adb.htm#ref_2293_14">Reset_Terminal_State</A>;

1777

1782

-- AKA: <A HREF="../man/curs_kernel.3x.html">resetty();</A>

1778

pragma Inline (Reset_Terminal_State);

1783

pragma Inline (<A HREF="terminal_interface-curses__ads.htm#ref_1776_14">Reset_Terminal_State</A>);

1779

1784

1780

type Stdscr_Init_Proc is access

1781

function (<A NAME="ref_1776_17">Win</A> : <A HREF="terminal_interface-curses__ads.htm#ref_65_12">Window</A>;

1782

Columns :<A HREF="terminal_interface-curses__ads.htm#ref_1774_9"> </A>Column_Count) return Integer;

1783

pragma Convention (C, Stdscr_Init_Proc);

1785

type <A NAME="ref_1780_9">Stdscr_Init_Proc</A> is access

1786

function (<A NAME="ref_1781_17">Win</A> : <A HREF="terminal_interface-curses__ads.htm#ref_57_9">Window</A>;

1787

<A NAME="ref_1782_17">Columns</A> : <A HREF="terminal_interface-curses__ads.htm#ref_65_12">Column_Count</A>) return Integer;

1788

pragma Convention (C, <A HREF="terminal_interface-curses__ads.htm#ref_1780_9">Stdscr_Init_Proc</A>);

1784

1789

-- N.B.: the return value is actually ignored, but it seems to be

1785

1790

-- a good practice to return 0 if you think all went fine

1786

1791

-- and -1 otherwise.

1787

1792

1788

-- #1A NAME="AFU_151"#2|

1789

procedure Rip_Off_Lines (<A NAME="ref_1784_29" HREF="terminal_interface-curses__adb.htm#ref_2337_29">Lines</A> : in <A HREF="terminal_interface-curses__ads.htm#ref_1774_9">Integer</A>;

1790

Proc : in Stdscr_Init_Proc);

1793

-- #1A NAME="AFU_152"#2|

1794

procedure <A NAME="ref_1789_14" HREF="terminal_interface-curses__adb.htm#ref_2303_14">Rip_Off_Lines</A> (<A NAME="ref_1789_29" HREF="terminal_interface-curses__adb.htm#ref_2303_29">Lines</A> : in Integer;

1795

<A NAME="ref_1790_29" HREF="terminal_interface-curses__adb.htm#ref_2304_29">Proc</A> : in <A HREF="terminal_interface-curses__ads.htm#ref_1780_9">Stdscr_Init_Proc</A>);

1791

1796

-- AKA: <A HREF="../man/curs_kernel.3x.html">ripoffline()</A>

1792

1797

-- N.B.: to be more precise, this uses a ncurses specific enhancement of

1793

1798

-- ripoffline(), in which the Lines argument absolute value is the

1794

1799

-- number of lines to be ripped of. The official ripoffline() only

1795

1800

-- uses the sign of Lines to rip of a single line from bottom or top.

1796

pragma Inline (Rip_Off_Lines);

1797

1798

type Cursor_Visibility is (Invisible, Normal, Very_Visible);

1799

1800

-- #1A NAME="AFU_152"#2|

1801

procedure Set_Cursor_Visibility (Visibility : in out Cursor_Visibility);

1801

pragma Inline (<A HREF="terminal_interface-curses__ads.htm#ref_1789_14">Rip_Off_Lines</A>);

1802

1803

type <A NAME="ref_1798_9">Cursor_Visibility</A> is (<A NAME="ref_1798_31">Invisible</A>, <A NAME="ref_1798_42">Normal</A>, <A NAME="ref_1798_50">Very_Visible</A>);

1804

1805

-- #1A NAME="AFU_153"#2|

1806

procedure <A NAME="ref_1801_14" HREF="terminal_interface-curses__adb.htm#ref_2315_14">Set_Cursor_Visibility</A> (<A NAME="ref_1801_37" HREF="terminal_interface-curses__adb.htm#ref_2315_37">Visibility</A> : in out <A HREF="terminal_interface-curses__ads.htm#ref_1798_9">Cursor_Visibility</A>);

1802

1807

-- AKA: <A HREF="../man/curs_kernel.3x.html">curs_set()</A>

1803

pragma Inline (Set_Cursor_Visibility);

1808

pragma Inline (<A HREF="terminal_interface-curses__ads.htm#ref_1801_14">Set_Cursor_Visibility</A>);

1804

1809

1805

-- #1A NAME="AFU_153"#2|

1806

procedure Nap_Milli_Seconds (Ms : in Natural);

1810

-- #1A NAME="AFU_154"#2|

1811

procedure <A NAME="ref_1806_14" HREF="terminal_interface-curses__adb.htm#ref_2328_14">Nap_Milli_Seconds</A> (<A NAME="ref_1806_33" HREF="terminal_interface-curses__adb.htm#ref_2328_33">Ms</A> : in Natural);

1807

1812

-- AKA: <A HREF="../man/curs_kernel.3x.html">napms()</A>

1808

pragma Inline (Nap_Milli_Seconds);

1813

pragma Inline (<A HREF="terminal_interface-curses__ads.htm#ref_1806_14">Nap_Milli_Seconds</A>);

1809

1814

1810

1815

-- |=====================================================================

1811

1816

-- | Some useful helpers.

1812

1817

-- |=====================================================================

1813

type Transform_Direction is (From_Screen, To_Screen);

1814

procedure Transform_Coordinates

1815

(<A NAME="ref_1810_7" HREF="terminal_interface-curses__adb.htm#ref_2422_7">W</A> : in Window := Standard_Window;

1816

<A NAME="ref_1811_7" HREF="terminal_interface-curses__adb.htm#ref_2423_7">Line</A> : in out <A HREF="terminal_interface-curses__ads.htm#ref_61_9">Line_Position</A>;

1817

<A NAME="ref_1812_7" HREF="terminal_interface-curses__adb.htm#ref_2424_7">Column</A> : in out Column_Position;

1818

Dir : in Transform_Direction := From_Screen);

1818

type <A NAME="ref_1813_9">Transform_Direction</A> is (<A NAME="ref_1813_33">From_Screen</A>, <A NAME="ref_1813_46">To_Screen</A>);

1819

procedure <A NAME="ref_1814_14" HREF="terminal_interface-curses__adb.htm#ref_2396_14">Transform_Coordinates</A>

1820

(<A NAME="ref_1815_7" HREF="terminal_interface-curses__adb.htm#ref_2397_7">W</A> : in <A HREF="terminal_interface-curses__ads.htm#ref_57_9">Window</A> := <A HREF="terminal_interface-curses__ads.htm#ref_476_13">Standard_Window</A>;

1821

<A NAME="ref_1816_7" HREF="terminal_interface-curses__adb.htm#ref_2398_7">Line</A> : in out <A HREF="terminal_interface-curses__ads.htm#ref_60_9">Line_Position</A>;

1822

<A NAME="ref_1817_7" HREF="terminal_interface-curses__adb.htm#ref_2399_7">Column</A> : in out <A HREF="terminal_interface-curses__ads.htm#ref_61_9">Column_Position</A>;

1823

<A NAME="ref_1818_7" HREF="terminal_interface-curses__adb.htm#ref_2400_7">Dir</A> : in <A HREF="terminal_interface-curses__ads.htm#ref_1813_9">Transform_Direction</A> := <A HREF="terminal_interface-curses__ads.htm#ref_1813_33">From_Screen</A>);

1819

1824

-- This procedure transforms screen coordinates into coordinates relative

1820

1825

-- to the window and vice versa, depending on the Dir parameter.

1821

1826

-- Screen coordinates are the position informations on the physical device.

1824

1829

-- We don't inline this procedure

1825

1830

1826

1831

-- |=====================================================================

1827

-- | Man page <A HREF="../man/dft_fgbg.3x.html">dft_fgbg.3x</A>

1832

-- | Man page <A HREF="../man/default_colors.3x.html">default_colors.3x</A>

1828

1833

-- |=====================================================================

1829

1834

1830

-- #1A NAME="AFU_154"#2|

1831

procedure Use_Default_Colors;

1832

-- AKA: <A HREF="../man/dft_fgbg.3x.html">use_default_colors()</A>

1833

pragma Inline (Use_Default_Colors);

1834

1835

-- #1A NAME="AFU_155"#2|

1836

procedure Assume_Default_Colors (<A NAME="ref_1831_37" HREF="terminal_interface-curses__adb.htm#ref_2460_37">Fore</A> : <A HREF="terminal_interface-curses__ads.htm#ref_278_9">Color_Number</A> := <A HREF="terminal_interface-curses__ads.htm#ref_285_4">Default_Color</A>;

1837

Back : Color_Number := Default_Color);

1838

-- AKA: <A HREF="../man/dft_fgbg.3x.html">assume_default_colors()</A>

1839

pragma Inline (Assume_Default_Colors);

1836

procedure <A NAME="ref_1831_14" HREF="terminal_interface-curses__adb.htm#ref_2425_14">Use_Default_Colors</A>;

1837

-- AKA: <A HREF="../man/default_colors.3x.html">use_default_colors()</A>

1838

pragma Inline (<A HREF="terminal_interface-curses__ads.htm#ref_1831_14">Use_Default_Colors</A>);

1839

1840

-- #1A NAME="AFU_156"#2|

1841

procedure <A NAME="ref_1836_14" HREF="terminal_interface-curses__adb.htm#ref_2435_14">Assume_Default_Colors</A> (<A NAME="ref_1836_37" HREF="terminal_interface-curses__adb.htm#ref_2435_37">Fore</A> : <A HREF="terminal_interface-curses__ads.htm#ref_278_9">Color_Number</A> := <A HREF="terminal_interface-curses__ads.htm#ref_285_4">Default_Color</A>;

1842

<A NAME="ref_1837_37" HREF="terminal_interface-curses__adb.htm#ref_2436_37">Back</A> : <A HREF="terminal_interface-curses__ads.htm#ref_278_9">Color_Number</A> := <A HREF="terminal_interface-curses__ads.htm#ref_285_4">Default_Color</A>);

1843

-- AKA: <A HREF="../man/default_colors.3x.html">assume_default_colors()</A>

1844

pragma Inline (<A HREF="terminal_interface-curses__ads.htm#ref_1836_14">Assume_Default_Colors</A>);

1840

1845

1841

1846

-- |=====================================================================

1842

1847

-- | Man page <A HREF="../man/curs_extend.3x.html">curs_extend.3x</A>

1843

1848

-- |=====================================================================

1844

1849

1845

-- #1A NAME="AFU_156"#2|

1846

function Curses_Version return String;

1850

-- #1A NAME="AFU_157"#2|

1851

function <A NAME="ref_1846_13" HREF="terminal_interface-curses__adb.htm#ref_2450_13">Curses_Version</A> return String;

1847

1852

-- AKA: <A HREF="../man/curs_extend.3x.html">curses_version()</A>

1848

1853

1849

-- #1A NAME="AFU_157"#2|

1854

-- #1A NAME="AFU_158"#2|

1850

1855

-- The returnvalue is the previous setting of the flag

1851

function Use_Extended_Names (Enable : Boolean) return Boolean;

1856

function <A NAME="ref_1851_13" HREF="terminal_interface-curses__adb.htm#ref_2473_13">Use_Extended_Names</A> (<A NAME="ref_1851_33" HREF="terminal_interface-curses__adb.htm#ref_2473_33">Enable</A> : Boolean) return Boolean;

1852

1857

-- AKA: <A HREF="../man/curs_extend.3x.html">use_extended_names()</A>

1853

1858

1854

1859

-- |=====================================================================

1860

-- | Man page <A HREF="../man/curs_trace.3x.html">curs_trace.3x</A>

1861

-- |=====================================================================

1862

1863

-- #1A NAME="AFU_159"#2|

1864

procedure <A NAME="ref_1859_14" HREF="terminal_interface-curses__adb.htm#ref_2459_14">Curses_Free_All</A>;

1865

-- AKA: <A HREF="../man/curs_trace.3x.html">_nc_freeall()</A>

1866

1867

-- |=====================================================================

1855

1868

-- | Man page <A HREF="../man/curs_scr_dump.3x.html">curs_scr_dump.3x</A>

1856

1869

-- |=====================================================================

1857

1870

1858

-- #1A NAME="AFU_158"#2|

1859

procedure Screen_Dump_To_File (Filename : in String);

1871

-- #1A NAME="AFU_160"#2|

1872

procedure <A NAME="ref_1867_14" HREF="terminal_interface-curses__adb.htm#ref_2488_14">Screen_Dump_To_File</A> (<A NAME="ref_1867_35" HREF="terminal_interface-curses__adb.htm#ref_2488_35">Filename</A> : in String);

1860

1873

-- AKA: <A HREF="../man/curs_scr_dump.3x.html">scr_dump()</A>

1861

1874

1862

-- #1A NAME="AFU_159"#2|

1863

procedure Screen_Restore_From_File (Filename : in String);

1875

-- #1A NAME="AFU_161"#2|

1876

procedure <A NAME="ref_1871_14" HREF="terminal_interface-curses__adb.htm#ref_2501_14">Screen_Restore_From_File</A> (<A NAME="ref_1871_40" HREF="terminal_interface-curses__adb.htm#ref_2501_40">Filename</A> : in String);

1864

1877

-- AKA: <A HREF="../man/curs_scr_dump.3x.html">scr_restore()</A>

1865

1878

1866

-- #1A NAME="AFU_160"#2|

1867

procedure Screen_Init_From_File (Filename : in String);

1879

-- #1A NAME="AFU_162"#2|

1880

procedure <A NAME="ref_1875_14" HREF="terminal_interface-curses__adb.htm#ref_2514_14">Screen_Init_From_File</A> (<A NAME="ref_1875_37" HREF="terminal_interface-curses__adb.htm#ref_2514_37">Filename</A> : in String);

1868

1881

-- AKA: <A HREF="../man/curs_scr_dump.3x.html">scr_init()</A>

1869

1882

1870

-- #1A NAME="AFU_161"#2|

1871

procedure Screen_Set_File (Filename : in String);

1883

-- #1A NAME="AFU_163"#2|

1884

procedure <A NAME="ref_1879_14" HREF="terminal_interface-curses__adb.htm#ref_2527_14">Screen_Set_File</A> (<A NAME="ref_1879_31" HREF="terminal_interface-curses__adb.htm#ref_2527_31">Filename</A> : in String);

1872

1885

-- AKA: <A HREF="../man/curs_scr_dump.3x.html">scr_set()</A>

1873

1886

1874

1887

-- |=====================================================================

1890

1903

-- |=====================================================================

1891

1904

-- Not implemented: scanw, wscanw, mvscanw, mvwscanw, vwscanw, vw_scanw

1892

1905

1893

1894

1906

-- |=====================================================================

1895

1907

-- | Man page <A HREF="../man/resizeterm.3x.html">resizeterm.3x</A>

1896

1908

-- |=====================================================================

1900

1912

-- | Man page <A HREF="../man/wresize.3x.html">wresize.3x</A>

1901

1913

-- |=====================================================================

1902

1914

1903

-- #1A NAME="AFU_162"#2|

1904

procedure Resize (<A NAME="ref_1899_22" HREF="terminal_interface-curses__adb.htm#ref_2551_22">Win</A> : <A HREF="terminal_interface-curses__ads.htm#ref_63_12">Window</A> := Standard_Window;

1905

<A NAME="ref_1900_22" HREF="terminal_interface-curses__adb.htm#ref_2552_22">Number_Of_Lines</A> : <A HREF="terminal_interface-curses__ads.htm#ref_65_12">Line_Count</A>;

1906

Number_Of_Columns : Column_Count);

1915

-- #1A NAME="AFU_164"#2|

1916

procedure <A NAME="ref_1911_14" HREF="terminal_interface-curses__adb.htm#ref_2540_14">Resize</A> (<A NAME="ref_1911_22" HREF="terminal_interface-curses__adb.htm#ref_2540_22">Win</A> : <A HREF="terminal_interface-curses__ads.htm#ref_57_9">Window</A> := <A HREF="terminal_interface-curses__ads.htm#ref_476_13">Standard_Window</A>;

1917

<A NAME="ref_1912_22" HREF="terminal_interface-curses__adb.htm#ref_2541_22">Number_Of_Lines</A> : <A HREF="terminal_interface-curses__ads.htm#ref_63_12">Line_Count</A>;

1918

<A NAME="ref_1913_22" HREF="terminal_interface-curses__adb.htm#ref_2542_22">Number_Of_Columns</A> : <A HREF="terminal_interface-curses__ads.htm#ref_65_12">Column_Count</A>);

1907

1919

-- AKA: <A HREF="../man/wresize.3x.html">wresize()</A>

1908

1920

1909

1921

private

1910

type Window is new System.Storage_Elements.Integer_Address;

1911

Null_Window : constant Window := 0;

1922

type <A HREF="terminal_interface-curses__ads.htm#ref_57_9">Window</A> is new System.Storage_Elements.Integer_Address;

1923

<A HREF="terminal_interface-curses__ads.htm#ref_58_4">Null_Window</A> : constant <A HREF="terminal_interface-curses__ads.htm#ref_57_9">Window</A> := 0;

1912

1924

1913

1925

-- The next constants are generated and may be different on your

1914

1926

-- architecture.

1915

1927

--

1916

<A NAME="ref_1911_4">Offset_maxy</A> : constant Natural := 2; -- short

1917

<A NAME="ref_1912_4">Offset_maxx</A> : constant Natural := 3; -- short

1918

<A NAME="ref_1913_4">Offset_begy</A> : constant Natural := 4; -- short

1919

<A NAME="ref_1914_4">Offset_begx</A> : constant Natural := 5; -- short

1920

<A NAME="ref_1915_4">Offset_cury</A> : constant Natural := 0; -- short

1921

<A NAME="ref_1916_4">Offset_curx</A> : constant Natural := 1; -- short

1922

<A NAME="ref_1917_4">Offset_yoffset</A> : constant Natural := 36; -- short

1923

<A NAME="ref_1918_4">Offset_pary</A> : constant Natural := 13; -- int

1924

<A NAME="ref_1919_4">Offset_parx</A> : constant Natural := 12; -- int

1925

<A NAME="ref_1920_4">Offset_notimeout</A> : constant Natural := 24; -- char

1926

<A NAME="ref_1921_4">Offset_clear</A> : constant Natural := 25; -- char

1927

<A NAME="ref_1922_4">Offset_leaveok</A> : constant Natural := 26; -- char

1928

<A NAME="ref_1923_4">Offset_scroll</A> : constant Natural := 27; -- char

1929

<A NAME="ref_1924_4">Offset_idlok</A> : constant Natural := 28; -- char

1930

<A NAME="ref_1925_4">Offset_idcok</A> : constant Natural := 29; -- char

1931

<A NAME="ref_1926_4">Offset_immed</A> : constant Natural := 30; -- char

1932

<A NAME="ref_1927_4">Offset_sync</A> : constant Natural := 31; -- char

1933

<A NAME="ref_1928_4">Offset_use_keypad</A> : constant Natural := 32; -- char

1934

<A NAME="ref_1929_4">Sizeof_bool</A> : constant Natural := 1; -- bool

1935

Offset_XY : constant Natural := 1; -- int

1936

1937

type Curses_Bool is mod 2 ** <A HREF="terminal_interface-curses__ads.htm#ref_1931_9">Interfaces</A>.C.char'Size;

1938

Curses_Bool_False : constant Curses_Bool := 0;

1939

1940

end Terminal_Interface.Curses;

1928

<A NAME="ref_1923_4">Sizeof_bool</A> : constant Natural := 1; -- bool

1929

<A NAME="ref_1924_4">Offset_XY</A> : constant Natural := 1; -- int

1930

1931

type <A NAME="ref_1926_9">Curses_Bool</A> is mod 2 ** <A HREF="interfac__ads.htm#ref_38_9">Interfaces</A>.C.char'Size;

1932

<A NAME="ref_1927_4">Curses_Bool_False</A> : constant <A HREF="terminal_interface-curses__ads.htm#ref_1926_9">Curses_Bool</A> := 0;

1933

1934

end <A HREF="terminal_interface__ads.htm#ref_42_9">Terminal_Interface</A>.<A HREF="terminal_interface-curses__ads.htm#ref_49_28">Curses</A>;

1941

1935

</PRE></BODY></HTML>

Older »