Files
harbour-core/harbour/include/inkey.ch
Przemyslaw Czerpak 93d3a46d84 2012-04-20 17:52 UTC+0200 Przemyslaw Czerpak (druzus/at/poczta.onet.pl)
* harbour/include/hbdefs.h
    * moved HB_WCHAR definition from hbapicdp.h to hbdefs.h

  * harbour/include/hbapicdp.h
  * harbour/include/hbcdpreg.h
  * harbour/src/rtl/cdpapi.c
  * harbour/src/rtl/cdpapihb.c
    + added support for custom sorting redirected from HVM
    + added support for custom character indexes in strings
    + added support for custom character flags (upper, lower, alpha, digit)
    + added support for custom upper/lower conversions
    + added support for CPs using unicode character values instead of
      ASCII ones
    + added new CP functions which respects custom CP settings:
        hb_cdpUpperWC(), hb_cdpTextLen(), hb_cdpTextPos(),
        hb_cdpTextPosEx(), hb_cdpTextGetU16(), hb_cdpTextPutU16(),
        hb_cdpCharEq(), hb_cdpCharCaseEq()
    + added new conversion functions:
        hb_cdpGetUC(), hb_cdpGetWC(), hb_cdpGetU16Ctrl()
    + added macros to detect codepage parameters:
         HB_CDP_ISBINSORT() - codepage uses simple binary sorting
         HB_CDP_ISCUSTOM()  - codepage uses custom string decoding
         HB_CDP_ISCHARIDX() - codepage use character indexes instead
                              of bytes ones
         HB_CDP_ISCHARUNI() - CHR(), ASC() and similar functions operates
                              on Unicode values instead of bytes
         HB_CDP_ISUTF8()    - codepage uses UTF-8 encoding

  * harbour/include/inkey.ch
    - removed HB_INKEY_EXTENDED - it was not used in Harbour
    + added new flag HB_INKEY_EXT - it allows to used different
      event encoding system with automatic translation to
      standard Clipper values. It will be used in the future
      as base for low level GTs code. Now it's possible to
      selectively switch to the new system. New codes are
      unique and do not interacts with Clipper.
    + added HB_INKEY_ALL macro - it's similar to INKEY_ALL but
      enables also GTEVENT keys.

  * harbour/include/hbgtcore.h
  * harbour/src/rtl/hbgtcore.c
    * changed character values in internal screen buffer to unicode.
      Warning: this modification interacts with SAVESCREE()/RESTSCREEN()
               data. Now all GTs uses extended definition. If somene
               has code which needs VGA like screen buffers returned
               by SAVESCREE() then it can be forced by
                  hb_gtInfo( HB_GTI_COMPATBUFFER, .t. )
               Anyhow it will for to use only one CP in output.
    + added new GT methods which operated on HB_WCHAR values
    * modified existing methods using HB_WCHAR/HB_USHORT parameters
      to operate on HB_WCHAR values
    + added codepage conversion code directly to core code so it can
      be eliminated from low level GT drivers which do not need some
      special operations on it.
    + added support for extended inkey codes, they allow to encoded
      unicode values, mouse events with flags, keyboard events with
      modifier flags (shift,alt,ctrl,...), etc.
      Now in low level GT code only unicode key values are used but
      I plan to updated all GTs and switch to new code - it should
      resolve many small problems inheriting with Clipper inkey codes.

  * harbour/include/hbapifs.h
    * moved hb_fsNameConvU16() definition from hbapicdp.h to hbapifs.h

  * harbour/include/hbxvm.h
    - removed comment copied by mistake from GT header file

  * harbour/include/hbwinuni.h
    * changed HB_CHARDUP() and HB_CHARDUPN() macros - now they
      operate on functions which can be used without active HVM.
      In such case ANSI CP is used as source encoding.
    + added new macros: HB_OSSTRDUP() and HB_OSSTRDUP2().
      They make conversions from OS encoding to HVM one.
      They can be used without active HVM and in such case ANSI CP
      is used as destination encoding.

  * harbour/include/hbapi.h
  * harbour/src/vm/cmdarg.c
    + added new function hb_cmdargProgName()
      It returns application name with path or NULL if not set,
      caller must free returned value with hb_xfree() if not NULL.
      The string is in HVM encoding so it does not need any additional
      encodings.
    * modified hb_cmdargString() to return strings in HVM encoding.
    % some small code optimizations
    ; NOTE: parameters passed to MS-WINDOWS GUI programs which use
            WinMain() instead of main() as startup entry are translated
            to ANSICP before they can be accessed by application.
            This can be eliminated though not for console programs
            using where C compiler makes such translation to main()
            parameters.
            in all systems parameters are passed to application
            startup and init functions before programmer can set OS CP.
            This can be resolved by adding:
               INIT PROC CLIPINIT()
                  SET( _SET_CODEPAGE, <userCP> )
                  SET( _SET_OSCODEPAGE, <systemCP> )
               RETURN
            to linked code. INIT procedures called CLIPINIT() are
            executed before any other ones.

  * harbour/include/hbapi.h
  * harbour/src/vm/set.c
    + added new functions for CP converisons which can be used with
      and without active HVM:
         hb_osStrEncode(), hb_osStrEncodeN(),
         hb_osStrDecode(), hb_osStrDecode2(),
         hb_osStrU16Encode(), hb_osStrU16EncodeN(),
         hb_osStrU16Decode(), hb_osStrU16Decode2(),

  * harbour/include/hbvm.h
  * harbour/src/vm/hvm.c
    + added new function hb_vmIsReady() - it's similar to hb_vmActive()
      but it also checks if current thread has active HVM stack.
    * moved hb_cdpReleaseAll() to the end of HVM cleanup code so
      CP conversions are longer active.

  * harbour/include/hbcomp.h
  * harbour/src/compiler/cmdcheck.c
  * harbour/src/compiler/hbusage.c
  * harbour/src/common/expropt2.c
    + added new compiler switch:
         -ku  - strings in user encoding
      Now it informs compiler that strings use custom encoding so some
      optimizations which are byte oriented cannot be used.
      It's possible that in the future we will change above definition
      to sth like: "strings in UTF8 encoding" but now I would like to
      keep more general.

  * harbour/src/vm/macro.c
    * inform macrocompiler about custom CPs using own character indexes
      to disable byte oriented optimizations.

  * harbour/include/hbapigt.h
  * harbour/src/rtl/gtapi.c
  * harbour/src/rtl/inkeyapi.c
    + added HB_B_*_W macros with unicode box character definitions
    + added HB_MBUTTON_* macros
    + added new GT functions: hb_gtHostCP() and hb_gtBoxCP() which
      allows to extract CPs used in translations by GTs.
    + added new function hb_inkeyKeyString() - it converts inkey value
      to corresponding string
    + added new function hb_inkeyKeyStd() - it converts new extended
      key value to standard Clipper one.

  * harbour/include/hbapifs.h
  * harbour/src/common/hbffind.c
    * moved OS codepage translations fully to hb_fsFind*() functions.
      It fixes few problems which existed before, i.e. double CP
      conversions in MS-Windows builds and simplifies upper level code.

  * harbour/src/pp/hbpp.c
  * harbour/src/rtl/direct.c
  * harbour/src/rtl/fssize.c
  * harbour/src/rtl/file.c
  * harbour/contrib/hbct/files.c
    * eliminated not longer necessary CP conversions in code calling
      hb_fsFind*() functions.

  * harbour/src/common/hbgete.c
    * moved OS codepage translations to hb_getenv(), hb_getenv_buffer()
      and hb_setenv() functions. It fixes few problems which existed
      before, i.e. double CP conversions in MS-Windows builds and
      simplifies upper level code.

  * harbour/src/rtl/net.c
  * harbour/src/rtl/gete.c
    * eliminated not longer necessary CP conversions in code calling
      hb_getenv()/hb_setenv() functions.
    ; NOTE: additional parameters in HB_GETENV() and HB_SETENV() which
            disabled CP conversions are not longer supported.
            They were strictly platform dependent and ignored in chosen
            cases (i.e. in MS-Windows UNICODE builds we always have to
            convert strings transferred between HVM and OS. If someone
            needs old functionality for other platform then he should
            temporary disable _SET_OSCODEPAGE.

  * harbour/src/common/hbver.c
  * harbour/src/common/hbfsapi.c
  * harbour/src/rtl/fstemp.c
  * harbour/src/rtl/fslink.c
    * eliminated HB_TCHAR_*() macros

  * harbour/src/common/strwild.c
    + added supprot for custom CPs using own character indexes in:
         hb_strMatchWild(),
         hb_strMatchWildExact(),
         hb_strMatchCaseWildExact()

  * harbour/src/nortl/nortl.c
    + added new dummy function replacement for binaries which are not
      linked with HVM.

  * harbour/src/rtl/filesys.c
    ! fixed double CP conversions in MS-Windows builds of hb_fsCurDirBuff()
    * use hb_vmIsReady() instead of hb_stackId() in file name conversions.
    * use hb_cmdargProgName() in hb_fsBaseDirBuff()

  * harbour/src/rtl/philes.c
    * use hb_cmdargProgName() in HB_PROGNAME() function.

  * harbour/src/rtl/gtcgi/gtcgi.c
  * harbour/src/rtl/gtstd/gtstd.c
  * harbour/src/rtl/gtpca/gtpca.c
  * harbour/src/rtl/gtdos/gtdos.c
  * harbour/src/rtl/gtos2/gtos2.c
  * harbour/src/rtl/gtwin/gtwin.c
  * harbour/src/rtl/gtwvt/gtwvt.h
  * harbour/src/rtl/gtwvt/gtwvt.c
  * harbour/src/rtl/gttrm/gttrm.c
  * harbour/src/rtl/gtcrs/gtcrs.c
  * harbour/src/rtl/gtsln/gtsln.c
  * harbour/src/rtl/gtsln/kbsln.c
  * harbour/src/rtl/gtsln/gtsln.h
  * harbour/src/rtl/gtxwc/gtxwc.h
  * harbour/src/rtl/gtxwc/gtxwc.c
  * harbour/contrib/gtwvg/gtwvg.c
  * harbour/contrib/gtwvg/gtwvg.h
  * harbour/contrib/gtalleg/gtalleg.c
  * harbour/contrib/hbqt/gtqtc/gtqtc.cpp
  * harbour/contrib/hbqt/gtqtc/gtqtc.h
    * updated to work with new unicode GT API
      please make tests with different GTs - I'm not able to test
      all of them, i.e. I do not have any OS2 machine.

  * harbour/src/rtl/box.c
  * harbour/src/rtl/oldbox.c
  * harbour/src/rtl/scroll.c
  * harbour/src/rtl/console.c
    * updated to work with new unicode GT API and
      CPs using custom character indexes

  * harbour/src/rtl/at.c
  * harbour/src/rtl/ati.c
  * harbour/src/rtl/rat.c
  * harbour/src/rtl/len.c
  * harbour/src/rtl/transfrm.c
  * harbour/src/rtl/left.c
  * harbour/src/rtl/right.c
  * harbour/src/rtl/substr.c
  * harbour/src/rtl/stuff.c
  * harbour/src/rtl/padc.c
  * harbour/src/rtl/padl.c
  * harbour/src/rtl/padr.c
    * updated to work with CPs using custom character indexes

  * harbour/src/rtl/chrasc.c
    + added support for HB_CDP_ISCHARUNI() CPs.

  * harbour/src/rtl/mlcfunc.c
    * rewritten from scratch to work with CPs using custom character
      indexes

  * harbour/src/rtl/accept.c
    * updated to work with unicode inkey values and
      CPs using custom character indexes

  * harbour/src/rtl/strmatch.c
    % small optimization

  * harbour/src/rtl/Makefile
  + harbour/src/rtl/chruni.c
    + added new PRG functions which allows to make byte/binary and
      unicode/character operations on strings:
         HB_UCHAR( <nCode> ) -> <cText>
            return string with U+nCode character in HVM CP encoding
         HB_BCHAR( <nCode> ) -> <cText>
            return 1 byte string with <nCode> value
         HB_UCODE( <cText> ) -> <nCode>
            return unicode value of 1-st character (not byte) in given string
         HB_BCODE( <cText> ) -> <nCode>
            return value of 1-st byte in given string
         HB_ULEN( <cText> ) -> <nChars>
            return string length in characters
         HB_BLEN( <cText> ) -> <nBytes>
            return string length in bytes
         HB_UPEEK( <cText>, <n> ) -> <nCode>
            return unicode value of <n>-th character in given string
         HB_BPEEK( <cText>, <n> ) -> <nCode>
            return value of <n>-th byte in given string
         HB_UPOKE( [@]<cText>, <n>, <nVal> ) -> <cText>
            change <n>-th character in given string to unicode <nVal> one and
            return modified text
         HB_BPOKE( [@]<cText>, <n>, <nVal> ) -> <cText>
            change <n>-th byte in given string to <nVal> and return modified
            text

  * harbour/src/rtl/hbdoc.prg
  * harbour/src/rtl/memvarhb.prg
    * use HB_BCHAR() for binary string definitions

  * harbour/src/rtl/hbi18n2.prg
    * use hb_utf8CHR( 0xFEFF ) instead of hardcoded binary sting and
      HB_BLEN() instead of LEN()

  * harbour/src/rtl/inkey.c
    + added new functions:
         HB_KEYCHAR( <nKey> ) -> <cChar>
         HB_KEYSTD( <nExtKey> ) -> <nClipKey>
    ! use HB_INKEY_ALL instead of INKEY_ALL in LASTKEY()

  * harbour/src/rtl/achoice.prg
  * harbour/src/rtl/browse.prg
  * harbour/src/rtl/menuto.prg
  * harbour/src/rtl/tgetlist.prg
  * harbour/src/rtl/teditor.prg
  * harbour/src/rtl/tlabel.prg
  * harbour/src/rtl/tpopup.prg
  * harbour/src/rtl/radiobtn.prg
  * harbour/src/rtl/radiogrp.prg
  * harbour/src/rtl/wait.prg
    * updated to work with unicode inkey() values

  * harbour/src/rtl/listbox.prg
    * use box.ch macros instead of explicit CHR(...) definitions

  * harbour/src/rtl/ttopbar.prg
    * updated to work with different type of CPs

  * harbour/src/rtl/scrollbr.prg
    * formatting

  * harbour/src/rtl/mouse53.c
    * use HB_MBUTTON_* macros instead of local ones

  * harbour/src/codepage/cp_utf8.c
  + harbour/src/codepage/uc16def.c
  + harbour/src/codepage/utf8sort.c
    * replaced UTF8ASC with new CP: UTF8EX
      This CP uses character indexes instead of bytes one
      and operates on unicode characters flags.
      Tables for upper/lower conversions and upper/lower/alpha/digit
      flags were generated automatically from
         http://www.unicode.org/Public/UNIDATA/UnicodeData.txt
      It also uses custom collation rules. It's very simple one
      level sorting based on UTF8 C collation.
      If someone needs some advanced sorting rules, then it's enough
      to create copy of this cp with user custom version of UTF8_cmp()
      and UTF8_cmpi() functions, i.e. they can be redirected to some
      external library like ICU (icu-project.org).

  * harbour/contrib/hbct/ctwin.c
  * harbour/contrib/hbct/ctwin.h
  * harbour/contrib/hbct/ctwfunc.c
    * added support for new unicode GT API

  * harbour/contrib/xhb/xhbfunc.c
    * redirected HB_CMDARGARGV() to HB_PROGNAME()

  * harbour/contrib/hbnf/origin.c
    * redirected FT_ORIGIN() to HB_PROGNAME()

  * harbour/contrib/hbnf/getenvrn.c
    ! windows version of FT_GETE() fully rewritten - it should
      fix well known problems reported to the devel list. Please test.
    % small optimization for other systems

  * harbour/contrib/hbfship/exec.c
    * use hb_cmdargProgName() in EXECNAME()

  + harbour/tests/uc16_gen.prg
    + added code which generates tables with unicode character flags
      from http://www.unicode.org/Public/UNIDATA/UnicodeData.txt.
      harbour/src/codepage/uc16def.c was generated by this code.

  * harbour/tests/inkeytst.prg
  * harbour/tests/wvtext.prg
  * harbour/tests/gtkeys.prg
    * use HB_INKEY_ALL

  * harbour/include/harbour.hbx
  * harbour/include/hbcpage.hbx
  * harbour/include/hblang.hbx
    * regenerated

   ; It was quite big peace of modifications and for sure not everything
     is well tested so please make test and report problems you will find.
   ; This is basic version which introduce to HVM CPs with custom encodings.
     Some contrib code has to be updated to work correctly with it.
     I hope that developers interesting in will make necessary updates.
     I haven't touched GTWVW code at all - sorry but it needs very serious
     work to make it production ready and fix all existing problems.
   ; Special thanks to OTC - this firm sponsored adding basic UTF8 support
     to HVM.
2012-04-20 15:55:44 +00:00

340 lines
18 KiB
Plaintext

/*
* $Id$
*/
/*
* Harbour Project source code:
* Header file for INKEY() function
*
* Copyright 1999 {list of individual authors and e-mail addresses}
* www - http://harbour-project.org
*
* This program is free software; you can redistribute it and/or modify
* it under the terms of the GNU General Public License as published by
* the Free Software Foundation; either version 2, or (at your option)
* any later version.
*
* This program is distributed in the hope that it will be useful,
* but WITHOUT ANY WARRANTY; without even the implied warranty of
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
* GNU General Public License for more details.
*
* You should have received a copy of the GNU General Public License
* along with this software; see the file COPYING. If not, write to
* the Free Software Foundation, Inc., 59 Temple Place, Suite 330,
* Boston, MA 02111-1307 USA (or visit the web site http://www.gnu.org/).
*
* As a special exception, the Harbour Project gives permission for
* additional uses of the text contained in its release of Harbour.
*
* The exception is that, if you link the Harbour libraries with other
* files to produce an executable, this does not by itself cause the
* resulting executable to be covered by the GNU General Public License.
* Your use of that executable is in no way restricted on account of
* linking the Harbour library code into it.
*
* This exception does not however invalidate any other reasons why
* the executable file might be covered by the GNU General Public License.
*
* This exception applies only to the code released by the Harbour
* Project under the name Harbour. If you copy code from other
* Harbour Project or Free Software Foundation releases into a copy of
* Harbour, as the General Public License permits, the exception does
* not apply to the code that you add in this way. To avoid misleading
* anyone as to the status of such modified files, you must delete
* this exception notice from them.
*
* If you write modifications of your own for Harbour, it is your choice
* whether to permit this exception to apply to your modifications.
* If you do not wish that, delete this exception notice.
*
*/
/* NOTE: This file is also used by C code. */
/* NOTE: Keystroke descriptions marked with an asterisk (*) are only */
/* available on enhanced keyboards (those with more than 84 keys) */
#ifndef HB_INKEY_CH_
#define HB_INKEY_CH_
/* Input event masks */
#define INKEY_MOVE 1
#define INKEY_LDOWN 2
#define INKEY_LUP 4
#define INKEY_RDOWN 8
#define INKEY_RUP 16
#define INKEY_MMIDDLE 32 /* Harbour extension middle button mask */
#define INKEY_MWHEEL 64 /* Harbour extension mouse wheel mask */
#define INKEY_KEYBOARD 128
#define INKEY_ALL 255
#define HB_INKEY_RAW 256 /* Harbour extension */
#define HB_INKEY_GTEVENT 1024 /* Harbour extension */
#define HB_INKEY_EXT 2048 /* Harbour extension */
#define HB_INKEY_ALL ( INKEY_ALL + HB_INKEY_GTEVENT )
/* Mouse events */
#define K_MOUSEMOVE 1001
#define K_LBUTTONDOWN 1002
#define K_LBUTTONUP 1003
#define K_RBUTTONDOWN 1004
#define K_RBUTTONUP 1005
#define K_LDBLCLK 1006
#define K_RDBLCLK 1007
#define K_MBUTTONDOWN 1008 /* Middle Button Down */
#define K_MBUTTONUP 1009 /* Middle Button Up */
#define K_MDBLCLK 1010 /* Middle Button Double Click */
#define K_MMLEFTDOWN 1011 /* Mouse Move Left Down (COMPATIBILITY with removed Clipper incompatible Harbour extension, isn't used anymore) */
#define K_MMRIGHTDOWN 1012 /* Mouse Move Right Down (COMPATIBILITY with removed Clipper incompatible Harbour extension, isn't used anymore) */
#define K_MMMIDDLEDOWN 1013 /* Mouse Move Middle Down (COMPATIBILITY with removed Clipper incompatible Harbour extension, isn't used anymore) */
#define K_MWFORWARD 1014 /* Mouse Wheel Forward */
#define K_MWBACKWARD 1015 /* Mouse Wheel Backward */
#define K_NCMOUSEMOVE 1016 /* Non-Client Area Mouse Movement */
#define K_MINMOUSE 1001
#define K_MAXMOUSE 1016
#define HB_K_RESIZE 1101
#define HB_K_CLOSE 1102
#define HB_K_GOTFOCUS 1103
#define HB_K_LOSTFOCUS 1104
#define HB_K_CONNECT 1105
#define HB_K_DISCONNECT 1106
/* Harbour extension - this marks that multi-characters keycode will be
returned - call Inkey() until ZERO will be returned
*/
#define HB_K_MULTICODE 4096
/* Cursor movement keys */
#define K_UP 5 /* Up arrow, Ctrl-E */
#define K_DOWN 24 /* Down arrow, Ctrl-X */
#define K_LEFT 19 /* Left arrow, Ctrl-S */
#define K_RIGHT 4 /* Right arrow, Ctrl-D */
#define K_HOME 1 /* Home, Ctrl-A */
#define K_END 6 /* End, Ctrl-F */
#define K_PGUP 18 /* PgUp, Ctrl-R */
#define K_PGDN 3 /* PgDn, Ctrl-C */
#define K_CTRL_UP 397 /* * Ctrl-Up arrow */
#define K_CTRL_DOWN 401 /* * Ctrl-Down arrow */
#define K_CTRL_LEFT 26 /* Ctrl-Left arrow, Ctrl-Z */
#define K_CTRL_RIGHT 2 /* Ctrl-Right arrow, Ctrl-B */
#define K_CTRL_HOME 29 /* Ctrl-Home, Ctrl-] */
#define K_CTRL_END 23 /* Ctrl-End, Ctrl-W */
#define K_CTRL_PGUP 31 /* Ctrl-PgUp, Ctrl-Hyphen */
#define K_CTRL_PGDN 30 /* Ctrl-PgDn, Ctrl-^ */
#define K_ALT_UP 408 /* * Alt-Up arrow */
#define K_ALT_DOWN 416 /* * Alt-Down arrow */
#define K_ALT_LEFT 411 /* * Alt-Left arrow */
#define K_ALT_RIGHT 413 /* * Alt-Right arrow */
#define K_ALT_HOME 407 /* * Alt-Home */
#define K_ALT_END 415 /* * Alt-End */
#define K_ALT_PGUP 409 /* * Alt-PgUp */
#define K_ALT_PGDN 417 /* * Alt-PgDn */
/* Misc. keys */
#define K_ENTER 13 /* Enter, Ctrl-M */
#define K_INTRO 13 /* */
#define K_RETURN 13 /* Return, Ctrl-M */
#define K_SPACE 32 /* Space bar */
#define K_ESC 27 /* Esc, Ctrl-[ */
#define K_CTRL_ENTER 10 /* Ctrl-Enter */
#define K_CTRL_RETURN 10 /* Ctrl-Return */
#define K_CTRL_RET 10 /* Ctrl-Return (Compatibility) */
#define K_CTRL_PRTSCR 379 /* * Ctrl-Print Screen */
#define K_CTRL_QUESTION 309 /* Ctrl-? */
#define K_ALT_ENTER 284 /* * Alt-Enter */
#define K_ALT_RETURN 284 /* * Alt-Return */
#define K_ALT_ESC 257 /* * Alt-Esc */
/* Keypad keys */
#define KP_CENTER 332 /* * Keypad 5 */
#define KP_ALT_ENTER 422 /* * Keypad Alt-Enter */
#define KP_CTRL_5 399 /* * Keypad Ctrl-5 */
#define KP_CTRL_SLASH 405 /* * Keypad Ctrl-/ */
#define KP_CTRL_ASTERISK 406 /* * Keypad Ctrl-* */
#define KP_CTRL_MINUS 398 /* * Keypad Ctrl-- */
#define KP_CTRL_PLUS 400 /* * Keypad Ctrl-+ */
#define KP_ALT_5 5 /* * Keypad Alt-5 */
#define KP_ALT_SLASH 420 /* * Keypad Alt-/ */
#define KP_ALT_ASTERISK 311 /* * Keypad Alt-* */
#define KP_ALT_MINUS 330 /* * Keypad Alt-- */
#define KP_ALT_PLUS 334 /* * Keypad Alt-+ */
/* Editing keys */
#define K_INS 22 /* Ins, Ctrl-V */
#define K_DEL 7 /* Del, Ctrl-G */
#define K_BS 8 /* Backspace, Ctrl-H */
#define K_TAB 9 /* Tab, Ctrl-I */
#define K_SH_TAB 271 /* Shift-Tab */
#define K_CTRL_INS 402 /* * Ctrl-Ins */
#define K_CTRL_DEL 403 /* * Ctrl-Del */
#define K_CTRL_BS 127 /* Ctrl-Backspace */
#define K_CTRL_TAB 404 /* * Ctrl-Tab */
#define K_ALT_INS 418 /* * Alt-Ins */
#define K_ALT_DEL 419 /* * Alt-Del */
#define K_ALT_BS 270 /* * Alt-Backspace */
#define K_ALT_TAB 421 /* * Alt-Tab */
#define K_CTRL_SH_TAB 423 /* * Ctrl-Shift-Tab */
#define K_SH_BS 423 /* * Shift-Backspace */
/* Control keys */
#define K_CTRL_A 1 /* Ctrl-A, Home */
#define K_CTRL_B 2 /* Ctrl-B, Ctrl-Right arrow */
#define K_CTRL_C 3 /* Ctrl-C, PgDn, Ctrl-ScrollLock */
#define K_CTRL_D 4 /* Ctrl-D, Right arrow */
#define K_CTRL_E 5 /* Ctrl-E, Up arrow */
#define K_CTRL_F 6 /* Ctrl-F, End */
#define K_CTRL_G 7 /* Ctrl-G, Del */
#define K_CTRL_H 8 /* Ctrl-H, Backspace */
#define K_CTRL_I 9 /* Ctrl-I, Tab */
#define K_CTRL_J 10 /* Ctrl-J */
#define K_CTRL_K 11 /* Ctrl-K */
#define K_CTRL_L 12 /* Ctrl-L */
#define K_CTRL_M 13 /* Ctrl-M, Return */
#define K_CTRL_N 14 /* Ctrl-N */
#define K_CTRL_O 15 /* Ctrl-O */
#define K_CTRL_P 16 /* Ctrl-P */
#define K_CTRL_Q 17 /* Ctrl-Q */
#define K_CTRL_R 18 /* Ctrl-R, PgUp */
#define K_CTRL_S 19 /* Ctrl-S, Left arrow */
#define K_CTRL_T 20 /* Ctrl-T */
#define K_CTRL_U 21 /* Ctrl-U */
#define K_CTRL_V 22 /* Ctrl-V, Ins */
#define K_CTRL_W 23 /* Ctrl-W, Ctrl-End */
#define K_CTRL_X 24 /* Ctrl-X, Down arrow */
#define K_CTRL_Y 25 /* Ctrl-Y */
#define K_CTRL_Z 26 /* Ctrl-Z, Ctrl-Left arrow */
/* Alt keys */
#define K_ALT_A 286 /* Alt-A */
#define K_ALT_B 304 /* Alt-B */
#define K_ALT_C 302 /* Alt-C */
#define K_ALT_D 288 /* Alt-D */
#define K_ALT_E 274 /* Alt-E */
#define K_ALT_F 289 /* Alt-F */
#define K_ALT_G 290 /* Alt-G */
#define K_ALT_H 291 /* Alt-H */
#define K_ALT_I 279 /* Alt-I */
#define K_ALT_J 292 /* Alt-J */
#define K_ALT_K 293 /* Alt-K */
#define K_ALT_L 294 /* Alt-L */
#define K_ALT_M 306 /* Alt-M */
#define K_ALT_N 305 /* Alt-N */
#define K_ALT_O 280 /* Alt-O */
#define K_ALT_P 281 /* Alt-P */
#define K_ALT_Q 272 /* Alt-Q */
#define K_ALT_R 275 /* Alt-R */
#define K_ALT_S 287 /* Alt-S */
#define K_ALT_T 276 /* Alt-T */
#define K_ALT_U 278 /* Alt-U */
#define K_ALT_V 303 /* Alt-V */
#define K_ALT_W 273 /* Alt-W */
#define K_ALT_X 301 /* Alt-X */
#define K_ALT_Y 277 /* Alt-Y */
#define K_ALT_Z 300 /* Alt-Z */
#define K_ALT_BACKQUOTE 297 /* Alt-` */
#define K_ALT_1 376 /* Alt-1 */
#define K_ALT_2 377 /* Alt-2 */
#define K_ALT_3 378 /* Alt-3 */
#define K_ALT_4 379 /* Alt-4 */
#define K_ALT_5 380 /* Alt-5 */
#define K_ALT_6 381 /* Alt-6 */
#define K_ALT_7 382 /* Alt-7 */
#define K_ALT_8 383 /* Alt-8 */
#define K_ALT_9 384 /* Alt-9 */
#define K_ALT_0 385 /* Alt-0 */
#define K_ALT_MINUS 386
#define K_ALT_EQUALS 387 /* * Alt-Equals */
#define K_ALT_OSB 282
#define K_ALT_CSB 283
#define K_ALT_BACKSLASH 299
#define K_ALT_SC 295
#define K_ALT_QUOTE 296
#define K_ALT_COMMA 307
#define K_ALT_PERIOD 308
#define K_ALT_SLASH 309 /* Alt-Slash (fyi Ctrl-? doesn't
work - maybe just under xp?) */
/* Function keys */
#define K_F1 28 /* F1, Ctrl-Backslash */
#define K_F2 -1 /* F2 */
#define K_F3 -2 /* F3 */
#define K_F4 -3 /* F4 */
#define K_F5 -4 /* F5 */
#define K_F6 -5 /* F6 */
#define K_F7 -6 /* F7 */
#define K_F8 -7 /* F8 */
#define K_F9 -8 /* F9 */
#define K_F10 -9 /* F10 */
#define K_F11 -40 /* * F11 */
#define K_F12 -41 /* * F12 */
/* Control-function keys */
#define K_CTRL_F1 -20 /* Ctrl-F1 */
#define K_CTRL_F2 -21 /* Ctrl-F2 */
#define K_CTRL_F3 -22 /* Ctrl-F4 */
#define K_CTRL_F4 -23 /* Ctrl-F3 */
#define K_CTRL_F5 -24 /* Ctrl-F5 */
#define K_CTRL_F6 -25 /* Ctrl-F6 */
#define K_CTRL_F7 -26 /* Ctrl-F7 */
#define K_CTRL_F8 -27 /* Ctrl-F8 */
#define K_CTRL_F9 -28 /* Ctrl-F9 */
#define K_CTRL_F10 -29 /* Ctrl-F10 */
#define K_CTRL_F11 -44 /* * Ctrl-F11 */
#define K_CTRL_F12 -45 /* * Ctrl-F12 */
/* Alt-function keys */
#define K_ALT_F1 -30 /* Alt-F1 */
#define K_ALT_F2 -31 /* Alt-F2 */
#define K_ALT_F3 -32 /* Alt-F3 */
#define K_ALT_F4 -33 /* Alt-F4 */
#define K_ALT_F5 -34 /* Alt-F5 */
#define K_ALT_F6 -35 /* Alt-F6 */
#define K_ALT_F7 -36 /* Alt-F7 */
#define K_ALT_F8 -37 /* Alt-F8 */
#define K_ALT_F9 -38 /* Alt-F9 */
#define K_ALT_F10 -39 /* Alt-F10 */
#define K_ALT_F11 -46 /* * Alt-F11 */
#define K_ALT_F12 -47 /* * Alt-F12 */
/* Shift-function keys */
#define K_SH_F1 -10 /* Shift-F1 */
#define K_SH_F2 -11 /* Shift-F2 */
#define K_SH_F3 -12 /* Shift-F3 */
#define K_SH_F4 -13 /* Shift-F4 */
#define K_SH_F5 -14 /* Shift-F5 */
#define K_SH_F6 -15 /* Shift-F6 */
#define K_SH_F7 -16 /* Shift-F7 */
#define K_SH_F8 -17 /* Shift-F8 */
#define K_SH_F9 -18 /* Shift-F9 */
#define K_SH_F10 -19 /* Shift-F10 */
#define K_SH_F11 -42 /* * Shift-F11 */
#define K_SH_F12 -43 /* * Shift-F12 */
#endif /* HB_INKEY_CH_ */