home *** CD-ROM | disk | FTP | other *** search
/ Fresh Fish 8 / FreshFishVol8-CD1.bin / useful / dev / c / rkrm / keymap / d.asm < prev    next >
Assembly Source File  |  1992-09-03  |  25KB  |  659 lines
  1. *
  2. * Copyright (c) 1992 Commodore-Amiga, Inc.
  3. * 
  4. * This example is provided in electronic form by Commodore-Amiga, Inc. for 
  5. * use with the "Amiga ROM Kernel Reference Manual: Devices", 3rd Edition, 
  6. * published by Addison-Wesley (ISBN 0-201-56775-X).
  7. * 
  8. * The "Amiga ROM Kernel Reference Manual: Devices" contains additional 
  9. * information on the correct usage of the techniques and operating system 
  10. * functions presented in these examples.  The source and executable code 
  11. * of these examples may only be distributed in free electronic form, via 
  12. * bulletin board or as part of a fully non-commercial and freely 
  13. * redistributable diskette.  Both the source and executable code (including 
  14. * comments) must be included, without modification, in any copy.  This 
  15. * example may not be published in printed form or distributed with any
  16. * commercial product.  However, the programming techniques and support
  17. * routines set forth in these examples may be used in the development
  18. * of original executable software products for Commodore Amiga computers.
  19. * 
  20. * All other rights reserved.
  21. * 
  22. * This example is provided "as-is" and is subject to change; no
  23. * warranties are made.  All use is at your own risk. No liability or
  24. * responsibility is assumed.
  25. *
  26. **********************************************************************
  27. *
  28. *   d.asm - d (GERMAN) A2000 key map
  29. *
  30. **********************************************************************
  31.  
  32.  
  33. **   Assemble and then link without startup code or linker libs
  34.  
  35. *------ Included Files -----------------------------------------------
  36.         INCLUDE         "exec/types.i"
  37.         INCLUDE         "devices/keymap.i"
  38. *---------------------------------------------------------------------
  39.         DC.L    0,0             ; ln_Succ, ln_Pred
  40.         DC.B    0,0             ; ln_Type, ln_Pri
  41.         DC.L    KMName          ; ln_Name
  42.         DC.L    KMLowMapType
  43.         DC.L    KMLowMap
  44.         DC.L    KMLCapsable
  45.         DC.L    KMLRepeatable
  46.         DC.L    KMHighMapType
  47.         DC.L    KMHighMap
  48.         DC.L    KMHCapsable
  49.         DC.L    KMHRepeatable
  50. *------ Key Translation Table ----------------------------------------
  51. *  Raw key codes
  52. *
  53. *  45   50  51  52  53  54   55  56  57  58  59
  54. *  00   01 02 03 04 05 06 07 08 09 0A 0B 0C 0D 41  46  5F    5A  5B  5C  5D
  55. *  42    10 11 12 13 14 15 16 17 18 19 1A 1B   44            3D  3E  3F  4A
  56. *  63 62  20 21 22 23 24 25 26 27 28 29 2A 2B        4C      2D  2E  2F  5E
  57. *  60 30   31 32 33 34 35 36 37 38 39 3A     61   4F 4D 4E   1D  1E  1F  43
  58. *     64  66                40             67 65             0F      3C
  59. *
  60. *---------------------------------------------------------------------
  61. *  German (D) mapping
  62. *
  63. *  ESC  F1  F2  F3  F4  F5   F6  F7  F8  F9  F10
  64. *  `~   1! 2" 3S 4$ 5% 6& 7/ 8( 9) 0= B? '` \| BS  DEL HELP  [{  ]}  /   *
  65. *  TAB   qQ wW eE rR tT zZ uU iI oO pP uU +*  RET            7   8   9   -
  66. *  CT CL  aA sS dD fF gG hH jJ kK lL oO aA #^        UC      4   5   6   +
  67. *  SH <>   yY xX cC vV bB nN mM ,; .: -_     SH   LC DC RC   1   2   3   ENT
  68. *     ALT AM              SPACE            AM ALT            0       .
  69. *
  70. *---------------------------------------------------------------------
  71. *   For comparison, here's the USA1 mapping
  72. *
  73. *  ESC  F1  F2  F3  F4  F5   F6  F7  F8  F9  F10
  74. *  `~   1! 2@ 3# 4$ 5% 6^ 7& 8* 9( 0) -_ =+ \| BS  DEL HELP  ((  ))  //  **
  75. *  TAB   qQ wW eE rR tT yY uU iI oO pP [{ ]}  RET            77  88  99  --
  76. *  CT CL  aA sS dD fF gG hH jJ kK lL ;: '" [2B]      UC      44  55  66  ++
  77. *  SH [30] zZ xX cC vV bB nN mM ,< .> /?     SH   LC DC RC   11  22  33 ENT
  78. *     ALT AM              SPACE            AM ALT            00      ..
  79. *
  80. *--------------------------------------------------------------------------
  81. *
  82. *       40      Space
  83. *       41      Backspace
  84. *       42      Tab
  85. *       43      Enter
  86. *       44      Return
  87. *       45      Escape
  88. *       46      Delete
  89. *       4A      Numeric Pad -
  90. *       4C      Cursor Up
  91. *       4D      Cursor Down
  92. *       4E      Cursor Forward
  93. *       4F      Cursor Backward
  94. *
  95. *       50-59   Function keys F1-F10
  96. *       5A      Numeric Pad [{  (A2000)
  97. *       5B      Numeric Pad ]}  (A2000)
  98. *       5C      Numeric Pad /   (A2000)
  99. *       5D      Numeric Pad *   (A2000)
  100. *       5E      Numeric Pad +   (A2000)
  101. *       5F      Help
  102. *
  103. *       60      Left Shift
  104. *       61      Right Shift
  105. *       62      Caps Lock
  106. *       63      Control
  107. *       64      Left Alt
  108. *       65      Right Alt
  109. *       66      Left Amiga
  110. *       67      Right Amiga
  111. *
  112. *       68      Left Mouse Button (not converted)
  113. *       69      Right Mouse Button (not converted)
  114. *       6A      Middle Mouse Button (not converted)
  115. *
  116. *---------------------------------------------------------------------
  117. KMLCapsable: ; NL means NULL (undefined) and RE means RESERVED
  118.         DC.B    %00000000       ; 7\ 6& 5% 4$ 3s 2" 1! []  07 - 00
  119.         DC.B    %00000000       ; 0N NL \| '` B? 0= 9) 8(  0F - 08
  120.         DC.B    %11111111       ; iI uU zZ tT rR eE wW qQ  17 - 10
  121.         DC.B    %00000111       ; 3N 2N 1N NL +* UU pP oO  1F - 18
  122.         DC.B    %11111111       ; kK jJ hH gG fF dD sS aA  27 - 20
  123.         DC.B    %00000111       ; 6N 5N 4N NL #' AA OO lL  2F - 28
  124.         DC.B    %11111110       ; mM nN bB vV cC xX yY <>  37 - 30
  125.         DC.B    %00000000       ; 9N 8N 7N .N NL -_ .: ,;  3F - 38
  126.  
  127. KMHCapsable:
  128.         DC.B    %00000000       ; 47 - 40
  129.         DC.B    %00000000       ; 4F - 48
  130.         DC.B    %00000000       ; 57 - 50
  131.         DC.B    %00000000       ; 5F - 58
  132.         DC.B    %00000000       ; 67 - 60
  133.         DC.B    %00000000       ; 6F - 68
  134.         DC.B    %00000000       ; 77 - 70
  135. KMLRepeatable:
  136.         DC.B    %11111111       ; 7\ 6& 5% 4$ 3s 2" 1! []  07 - 00
  137.         DC.B    %10111111       ; 0N NL \| '` B? 0= 9) 8(  0F - 08
  138.         DC.B    %11111111       ; iI uU zZ tT rR eE wW qQ  17 - 10
  139.         DC.B    %11101111       ; 3N 2N 1N NL +* UU pP oO  1F - 18
  140.         DC.B    %11111111       ; kK jJ hH gG fF dD sS aA  27 - 20
  141.         DC.B    %11101111       ; 6N 5N 4N NL #' AA OO lL  2F - 28
  142.         DC.B    %11111111       ; mM nN bB vV cC xX yY <>  37 - 30
  143.         DC.B    %11110111       ; 9N 8N 7N .N NL -_ .: ,;  3F - 38
  144. KMHRepeatable:
  145.         DC.B    %01000111       ; 47 - 40
  146.         DC.B    %11110100       ; 4F - 48
  147.         DC.B    %11111111       ; 57 - 50
  148.         DC.B    %01111111       ; 5F - 58
  149.         DC.B    %00000000       ; 67 - 60
  150.         DC.B    %00000000       ; 6F - 68
  151.         DC.B    %00000000       ; 77 - 70
  152. KMLowMapType:
  153.         DC.B    KC_VANILLA              ; []            $00
  154.         DC.B    KCF_SHIFT+KCF_ALT       ; 1!
  155.         DC.B    KCF_SHIFT+KCF_ALT       ; 2"
  156.         DC.B    KCF_SHIFT+KCF_ALT       ; 3s
  157.         DC.B    KCF_SHIFT+KCF_ALT       ; 4$
  158.         DC.B    KCF_SHIFT+KCF_ALT       ; 5%
  159.         DC.B    KC_VANILLA              ; 6&
  160.         DC.B    KCF_SHIFT+KCF_ALT       ; 7/
  161.         DC.B    KCF_SHIFT+KCF_ALT       ; 8(            $08
  162.         DC.B    KCF_SHIFT+KCF_ALT       ; 9)
  163.         DC.B    KCF_SHIFT+KCF_ALT       ; 0=
  164.         DC.B    KC_VANILLA              ; B?
  165.         DC.B    KCF_DEAD+KCF_SHIFT+KCF_ALT ; '`
  166.         DC.B    KC_VANILLA              ; \|
  167.         DC.B    KCF_NOP                 ;NL
  168.         DC.B    KC_NOQUAL               ; 0N
  169.         DC.B    KC_VANILLA              ; qQ            $10
  170.         DC.B    KC_VANILLA              ; wW
  171.         DC.B    KCF_DEAD+KC_VANILLA     ; eE
  172.         DC.B    KC_VANILLA              ; rR
  173.         DC.B    KC_VANILLA              ; tT
  174.         DC.B    KC_VANILLA              ; zZ
  175.         DC.B    KCF_DEAD+KC_VANILLA     ; uU
  176.         DC.B    KCF_DEAD+KC_VANILLA     ; iI
  177.         DC.B    KCF_DEAD+KC_VANILLA     ; oO            $18
  178.         DC.B    KC_VANILLA              ; pP
  179.         DC.B    KC_VANILLA              ; omlatuU
  180.         DC.B    KC_VANILLA              ; +*
  181.         DC.B    KCF_NOP                 ; NL
  182.         DC.B    KC_NOQUAL               ; 1N
  183.         DC.B    KC_NOQUAL               ; 2N
  184.         DC.B    KC_NOQUAL               ; 3N
  185.         DC.B    KCF_DEAD+KC_VANILLA     ; aA            $20
  186.         DC.B    KC_VANILLA              ; sS
  187.         DC.B    KC_VANILLA              ; d