lib/slang/include/slang.hrl

   1 %%%----------------------------------------------------------------------
   2 %%% File    : slang.hrl
   3 %%% Author  : Claes Wikstrom <klacke@kaja.hemma.net>
   4 %%% Purpose :
   5 %%% Created : 22 Nov 2000 by Claes Wikstrom <klacke@kaja.hemma.net>
   6 %%%----------------------------------------------------------------------
   7
   8 -author('klacke@kaja.hemma.net').
   9
  10
  11 %% Keypad constants
  12 -define (SL_KEY_ERR,            16#FFFF).
  13 -define (SL_KEY_UP,             16#101).
  14 -define (SL_KEY_DOWN,           16#102).
  15 -define (SL_KEY_LEFT,           16#103).
  16 -define (SL_KEY_RIGHT,          16#104).
  17 -define (SL_KEY_PPAGE,          16#105).
  18 -define (SL_KEY_NPAGE,          16#106).
  19 -define (SL_KEY_HOME,           16#107).
  20 -define (SL_KEY_END,            16#108).
  21 -define (SL_KEY_A1,             16#109).
  22 -define (SL_KEY_A3,             16#10A).
  23 -define (SL_KEY_B2,             16#10B).
  24 -define (SL_KEY_C1,             16#10C).
  25 -define (SL_KEY_C3,             16#10D).
  26 -define (SL_KEY_REDO,           16#10E).
  27 -define (SL_KEY_UNDO,           16#10F).
  28 -define (SL_KEY_BACKSPACE,      16#110).
  29 -define (SL_KEY_ENTER,          16#111).
  30 -define (SL_KEY_IC,             16#112).
  31 -define (SL_KEY_DELETE,         16#113).
  32 -define (SL_KEY_F0,             16#200).
  33 -define (SL_KEY_F(X),           (?SL_KEY_F0 + X)).
  34
  35
  36
  37 %% define some common signal numbers
  38 -define(SIGINT,  1).
  39 -define(SIGTSTP, 2).
  40 -define(SIGQUIT, 3).
  41 -define(SIGTTOU, 4).
  42 -define(SIGTTIN, 5).
  43 -define(SIGWINCH,6).
  44
  45
  46
  47 %% variable defines
  48 -define(baud_rate,         1).
  49 -define(read_fd,           2).
  50 -define(abort_char,        3).
  51 -define(ignore_user_abort, 4).
  52 -define(input_buffer_len,  5).
  53 -define(keyboard_quit,     6).
  54 -define(last_key_char,     7).
  55 -define(rl_eof_char,       8).
  56 -define(rline_quit,        9).
  57 -define(screen_rows,       10).
  58 -define(screen_cols,       11).
  59 -define(tab_width,         12).
  60 -define(newline_behaviour, 13).
  61 -define(error,             14).
  62 -define(version,           15).
  63 -define(backspace_moves,   16).
  64 -define(display_eight_bit, 17).
  65
  66
  67 -define('NEWLINE_IGNORED',      0). %% default
  68 -define('NEWLINE_MOVES',        1). %%  moves to next line, column 0
  69 -define('NEWLINE_SCROLLS',      2). %% moves but scrolls at bottom of screen
  70 -define('NEWLINE_PRINTABLE',    3). %% prints as ^J
  71
  72
  73
  74
  75
  76 -ifdef (debug).
  77 -define(Debug(F, A),
  78    slang:debug(?FILE,?LINE, F, A)).
  79 -else.
  80 -define(Debug(F, A),debug_disabled).
  81 -endif.
  82
  83
  84