home *** CD-ROM | disk | FTP | other *** search
/ Usenet 1994 October / usenetsourcesnewsgroupsinfomagicoctober1994disk2.iso / x / volume10 / xt-examples / part02 / fragments / keymappingexample.c < prev    next >
Text File  |  1990-11-04  |  2KB  |  52 lines
  1. /***********************************************************
  2. Copyright 1990 by Digital Equipment Corporation, Maynard, Massachusetts.
  3.  
  4.                         All Rights Reserved
  5.  
  6. Permission to use, copy, modify, and distribute these examples for any
  7. purpose and without fee is hereby granted, provided that the above
  8. copyright notice appear in all copies and that both that copyright
  9. notice and this permission notice appear in supporting documentation,
  10. and that the name of Digital not be used in advertising or publicity
  11. pertaining to distribution of the software without specific, written
  12. prior permission.
  13.  
  14. DIGITAL AND THE AUTHORS DISCLAIM ALL WARRANTIES WITH REGARD TO THIS
  15. SOFTWARE, INCLUDING ALL IMPLIED WARRANTIES OF MERCHANTABILITY AND
  16. FITNESS, IN NO EVENT SHALL DIGITAL BE LIABLE FOR ANY SPECIAL, INDIRECT
  17. OR CONSEQUENTIAL DAMAGES OR ANY DAMAGES WHATSOEVER RESULTING FROM LOSS
  18. OF USE, DATA OR PROFITS, WHETHER IN AN ACTION OF CONTRACT, NEGLIGENCE
  19. OR OTHER TORTIOUS ACTION, ARISING OUT OF OR IN CONNECTION WITH THE USE
  20. OR PERFORMANCE OF THIS SOFTWARE.
  21.  
  22. ******************************************************************/
  23.  
  24. KeySym k;
  25. char ch;
  26.  
  27. /* Don't care about the modifiers, so pass NULL */
  28. k = XtGetActionKeysym(event, NULL);
  29.  
  30. if (k == NoSymbol) {
  31.     /* Not a keyboard event or no keysym for the keycode in the
  32.        event.  Do whatever is appropriate. */
  33. } else {
  34.     /* Compensate for servers that call a minus a hyphen */
  35.     if (k == XK_hyphen) k = XK_minus;
  36.  
  37.     if (k & 0xFF00 != 0) {
  38.     /* Not a keysym for an ISO Latin-1 character.  Do whatever
  39.        is appropriate.  If restricting to ASCII, mask with
  40.        0xFF80 instead. */
  41.     } else {
  42.     /* ISO Latin-1 keysyms are the same as the character */
  43.     ch = (char) k;
  44.  
  45.     /* If control is set, mask off high bits */
  46.     if (event->xkey.modifiers & ControlMask) ch &= 0x1F;
  47.     }
  48. }
  49.  
  50. /* Do whatever is appropriate with the character */
  51.  
  52.