;************************************************************************
;
; FILE NAME: r1000pc.kbm
;
; version 1.0       January 5, 1987                        
;
; configuration file for IBM PC/XT standard keyboard
; 
; Used with Walker, Richer, Quinn, Inc. Reflection 2 software, which 
; emulates VT100 on IBM PC.  This file is designed for use of the IBM PC 
; with the Rational Environment.
;
; maps IBM keyboard to keypad of Rational Terminal, providing 
; single key sequences for Object...Mark
;                          Promote, Complete, Format
;                          cursor keys
;                          querty keys
;                          function keys
;          in all combinations of unshifted, shift, ctrl, alt
;
;***********************************************************************
;
keyboard-id =   PC      ; defines type of keyboard in use
                        ; values are  PC, AT, ENHANCED

                        
numlock     =   27 34 116 ; object

 ; user does not have ability to toggle NUM-LOCK
 ; NUM-LOCK must be "on" before starting emulator          
                    

scroll-lock =   27 34 117   ; region   
kp-3        =   27 34 118   ; window
kp-minus    =   27 34 119   ;image
kp-star     =   27 34 120   ; line
kp-1        =   27 34 121   ; word
kp-5        =   27 34 122   ; mark
kp-0        =   27 34 123   ; promote
kp-period   =   27 34 124   ; complete
kp-plus     =   27 34 125   ; format

ctrl numlock     =   27 38 116   ; C_object
ctrl scroll-lock =   27 38 117   ; C_region   
ctrl  pgdn        =   27 38 118  ; C_window
ctrl kp-minus    =   27 38 119   ; C_image
ctrl kp-star     =   27 38 120   ; C_line
ctrl end        =   27 38 121    ; C_word
ctrl center        =   27 38 122 ; C_mark
ctrl ins        =   27 38 123    ; C_promote
ctrl del   =   27 38 124         ; C_complete
ctrl kp-plus     =   27 38 125   ; C_format

alt numlock     =   27 42 116       ; M_object
alt scroll-lock =   27 42 117       ; M_region   
alt pgdn        =   27 42 118       ; M_window
;  alt kp-minus    =   27 42 119    ; M_image   --reserved below
alt kp-star     =   27 42 120       ; M_line
alt end        =   27 42 121        ; M_word
alt center        =   27 42 122     ; M_mark
alt ins        =   27 42 123        ; M_promote
alt del   =   27 42 124             ; M_complete     
;  alt kp-plus     =   27 42 125    ; M_format  --reserved below

ctrl alt numlock     =   27 46 116  ; CM_object 
ctrl alt scroll-lock =   27 46 117  ; CM_region   
ctrl alt pgdn        =   27 46 118  ; CM_window
ctrl alt kp-minus    =   27 46 119  ; CM_image
ctrl alt kp-star     =   27 46 120  ; CM_line   
ctrl alt end         =   27 46 121  ; CM_word
ctrl alt center      =   27 46 122  ; CM_mark
ctrl alt ins         =   27 46 123  ; CM_promote
; ---ctrl alt del         =   27 46 124  ;       CM_complete --not used: 
;                                                will reboot system on PC

ctrl alt kp-plus     =   27 46 125  ; CM_format
             

alt kp-minus    = 27 35 107 ;dash       
alt kp-plus     = 27 35 109 ;enter

kp-8            = 27 35 110 ;up
kp-2            = 27 35 111 ;down
kp-6            = 27 35 112 ;right
kp-4            = 27 35 113 ;left
kp-7            = 27 35 114 ;begin_of
kp-9            = 27 35 115 ;end_of
           
end     = 27 35 97        ;  1
down    = 27 35 98        ;  2
pgdn    = 27 35 99        ;  3
left    = 27 35 100       ;  4
center  = 27 35 101       ;  5  ; numeric keypad keys--return numeric arguments
right   = 27 35 102       ;  6  ; use with shifted keys
home    = 27 35 103       ;  7
up      = 27 35 104       ;  8
pgup    = 27 35 105       ;  9
ins     = 27 35 96        ;  0
                   
del     = 27 35 108       ;  numeric dot 
 
backspace =   8           ; delete key 
return    =   13          ; carriage return



f1  =   27  34  112 ;explain     
f2  =   27  34  105 ;definition
f3  =   27  34  113 ;next item
f4  =   27 34   110 ;create command
f5  =   27 34   111 ;semanticize         ;first level of function keys
f6  =   27 34   109 ;edit
f7  =   27 34   101  ; debug run
f8 =   27 34    104  ; debug put   
  
  ;f9   keep open for emulator control functions
  ;f10   keep open for emulator control functions

                    


shift f1   =    27 34 107  ; prompt for  
shift f2   =    27 34 73   ; defin in place
shift f3   =    27 38 113  ; next item
shift f4   =    27 34 78   ; create body  
shift f5   =    27 34 108  ; install unit  
shift f6   =    27 34 77   ; demote unit  
shift f7   =    27 34 69   ; debug execute  
shift f8   =    27 34 102  ; show source  
shift f9   =    27 34 106  ; help  
shift f10  =    27 46 115  ; what object  
         
alt f1   =      27 42 112  ; show unused unit
alt f2   =      27 42 105  ; enclosing
alt f3   =      27 38 111  ; underlines off
alt f4   =      27 38 110  ; create directory
alt f5   =      27 38 108  ; code unit
alt f6   =      27 42 109  ; withdraw unit
alt f7   =      27 42 101  ; run returned
alt f8   =      27 34  70  ; break ~ default
alt f9   =      27 46 106  ; print
alt f10  =      27 42  75  ; checked out by user

ctrl  f1  =     27  34  79  ; show errors
ctrl  f2  =     27  38  105 ; other part
ctrl  f3  =     27  38  112 ; item off
ctrl  f4  =     27 38  110  ; create ada
ctrl  f5  =     27 34  76   ; install stub
ctrl  f6  =     27 38  109  ; source unit     
ctrl  f7  =     27 38  101  ; run local
ctrl  f8  =     27 34  103  ; stack
ctrl  f9  =     27  42  106 ; help on key
ctrl  f10 =     27  42  115 ; what locks
         
ctrl shift  f1  = 27 42  111 ;show unused
ctrl shift  f2  = 27 38  73  ;other part in place
ctrl shift  f3  = 27 38  107 ;cmvc check out
ctrl shift  f4  = 27 38  78  ; create world
ctrl shift  f5  = 27 42  108 ; install world
ctrl shift  f6  = 27 38  77  ; uncode this world
ctrl shift  f7  = 27 46  101 ; debug stop
ctrl shift  f8  = 27 38  102 ; debub break
ctrl shift  f9  = 27 34  114 ; job disable
ctrl shift  f10 = 27 46  75  ; checked out in view

ctrl alt  f1  = 27  42  111  ; show usage (unit)
ctrl alt  f2  = 27  46  105  ; home library
ctrl alt  f3  = 27  42  107  ; cmvc check in
ctrl alt  f4  = 27  46  110  ; create text
ctrl alt  f5  = 27  46  108  ; code this world
ctrl alt  f6  = 27  46 109   ; source this world
ctrl alt  f7  = 27  42  103  ; debug propogate
ctrl alt  f8  = 27  42  102  ; debug activate
ctrl alt  f9  = 27  38  114  ; job kill
ctrl alt  f10 = 27  34  75   ;  cmvc show out of date

shift alt  f1  = 27  46  111 ; show usage
shift alt  f2  = 27  42  73  ; enclosing in place
shift alt  f3  = 27  46  107 ; accept changes
shift alt  f4  = 27  46  78  ; create private part
shift alt  f5  = 27  42  76  ; install all worlds 
shift alt  f6  = 27  42  77  ; uncode all worlds
shift alt  f7  = 27  46  103 ; show exceptions
shift alt  f8  = 27  46  102 ; remove breaks
shift alt  f9  = 27  34  82  ; job enable
shift alt  f10 = 27  38  75  ; cmvc show info

ctrl shift  alt  f1  = 27  46  79  ; show usage indirect
ctrl shift  alt  f2  = 27  46  73  ; enclosing library
ctrl shift  alt  f3  = 27  46  80  ; make inline
ctrl shift  alt  f4  = 27  46  81  ; make separate
ctrl shift  alt  f5  = 27  46  76  ; code all worlds
ctrl shift  alt  f6  = 27  46  77  ; source all worlds
ctrl shift  alt  f7  = 27  46  69  ; debug task display
ctrl shift  alt  f8  = 27  46  70  ; debug show breaks
ctrl shift  alt  f9  = 27  42  114 ; job connect
ctrl shift  alt  f10 = 27  46  83  ; show access list
 

alt up            = 27 43 110   ; M_up
alt down            = 27 43 111 ; M_down
alt right           = 27 43 112 ; M_right
alt left            = 27 43 113 ; M_left
alt home            = 27 43 114 ; M_begin_of
alt pgup            = 27 43 115 ; M_end_of
alt backspace       = 27 43 116 ; M_delete          
alt tab             = 27 43 117 ; M_tab
alt space           = 27 43 118 ; M_space


ctrl up              = 27 39 110 ; C_up
ctrl down            = 27 39 111 ; C_down
ctrl right           = 27 39 112 ; C_right
ctrl left            = 27 39 113 ; C_left
ctrl home            = 27 39 114 ; C_begin_of
ctrl pgup            = 27 39 115 ; C_end_of
ctrl backspace       = 27 39 116 ; C_delete                
ctrl tab             = 27 39 117 ; C_tab
ctrl space           = 27 39 118 ; C_space

alt ctrl up              = 27 47 110 ; CM_up
alt ctrl down            = 27 47 111 ; CM_down
alt ctrl right           = 27 47 112 ; CM_right
alt ctrl left            = 27 47 113 ; CM_left
alt ctrl home            = 27 47 114 ; CM_begin_of
alt ctrl pgup            = 27 47 115 ; CM_end_of
alt ctrl backspace       = 27 47 116 ; CM_delete
alt ctrl tab             = 27 47 117 ; CM_tab
alt ctrl space           = 27 47 118 ; CM_space
 

ctrl grave         =   27 37 106 ; C_grave
ctrl minus         =   27 37 107 ; C_minus
ctrl equal         =   27 37 108 ; C_equal
ctrl semicolon     =   27 37 109 ; C_semicolon
ctrl apostrophe    =   27 37 110 ; C_apostophe  
ctrl slash         =   27 37 111 ; C_slash
ctrl comma         =   27 37 112 ; C_comma
ctrl period        =   27 37 113 ; C_period
ctrl open-bracket  =   27 37 123 ; C_left bracket
ctrl close-bracket =   27 37 125 ; C_right bracket


alt grave      =   27 41 106   ; M_grave
alt minus      =   27 41 107   ; M_minus
alt equal      =   27 41 108   ; M_equal
alt semicolon  =   27 41 109   ; M_semicolon
alt apostrophe =   27 41 110   ; M_apostophe  
alt slash      =   27 41 111   ; M_slash
alt comma      =   27 41 112   ; M_comma
alt period     =   27 41 113   ; M_period
alt open-bracket =   27 41 123 ; M_left bracket
alt close-bracket =  27 41 125 ; M_right bracket

ctrl alt  grave      =   27 45 106   ; CM_grave
ctrl alt  minus      =   27 45 107   ; CM_minus
ctrl alt  equal      =   27 45 108   ; CM_equal
ctrl alt  semicolon  =   27 45 109   ; CM_semicolon
ctrl alt  apostrophe =   27 45 110   ; CM_apostophe  
ctrl alt  slash      =   27 45 111   ; CM_slash
ctrl alt  comma      =   27 45 112   ; CM_comma
ctrl alt  period     =   27 45 113   ; CM_period
ctrl alt  open-bracket =   27 45 123 ; CM_left bracket
ctrl alt  close-bracket =  27 45 125 ; CM_right bracket 
                                                

ctrl a =  27 36 97  
ctrl b =  27 36 98
ctrl c =  27 36 99
ctrl d =  27 36 100
ctrl e =  27 36 101 
ctrl f =  27 36 102
ctrl g =  27 36 103
ctrl h =  27 36 104
ctrl i =  27 36 105
ctrl j =  27 36 106   ; C_querty keys
ctrl k =  27 36 107
ctrl l =  27 36 108
ctrl m =  27 36 109
ctrl n =  27 36 110
ctrl o =  27 36 111
ctrl p =  27 36 112
ctrl q =  27 36 113
ctrl r =  27 36 114
ctrl s =  27 36 115
ctrl t =  27 36 116
ctrl u =  27 36 117
ctrl v =  27 36 118
ctrl w =  27 36 119
ctrl x =  27 36 120
ctrl y =  27 36 121
ctrl z =  27 36 122 
     

alt a =  27 40 97  
alt b =  27 40 98
alt c =  27 40 99
alt d =  27 40 100
alt e =  27 40 101 
alt f =  27 40 102
alt g =  27 40 103
alt h =  27 40 104
alt i =  27 40 105
alt j =  27 40 106   ; M_querty  keys
alt k =  27 40 107
alt l =  27 40 108
alt m =  27 40 109
alt n =  27 40 110
alt o =  27 40 111
alt p =  27 40 112
alt q =  27 40 113
alt r =  27 40 114
alt s =  27 40 115
alt t =  27 40 116
alt u =  27 40 117
alt v =  27 40 118
alt w =  27 40 119
;;------alt x =  27 40 120--- not used: Emulator exit sequence

      
alt y =  27 40 121
alt z =  27 40 122 
 

ctrl alt a =  27 44 97  
ctrl alt b =  27 44 98
ctrl alt c =  27 44 99
ctrl alt d =  27 44 100
ctrl alt e =  27 44 101 
ctrl alt f =  27 44 102
ctrl alt g =  27 44 103
ctrl alt h =  27 44 104
ctrl alt i =  27 44 105
ctrl alt j =  27 44 106   ; CM_querty keys
ctrl alt k =  27 44 107
ctrl alt l =  27 44 108
ctrl alt m =  27 44 109
ctrl alt n =  27 44 110
ctrl alt o =  27 44 111
ctrl alt p =  27 44 112
ctrl alt q =  27 44 113
ctrl alt r =  27 44 114
ctrl alt s =  27 44 115
ctrl alt t =  27 44 116
ctrl alt u =  27 44 117
ctrl alt v =  27 44 118
ctrl alt w =  27 44 119
;;------ctrl alt x =  27 44 120  not used: emulator exit sequence  

ctrl alt y =  27 44 121
ctrl alt z =  27 44 122 
 

ctrl zero  = 27 37  96 
ctrl one   = 27 37  97 
ctrl two   = 27 37  98
ctrl three = 27 37  99     ; C_querty numerals
ctrl four  = 27 37  100
ctrl five  = 27 37  101
ctrl six   = 27 37  102
ctrl seven = 27 37  103
ctrl eight = 27 37  104
ctrl nine  = 27 37  105
 

alt zero  = 27 41  96 
alt one   = 27 41  97 
alt two   = 27 41  98
alt three = 27 41  99     ; M_querty numerals
alt four  = 27 41  100
alt five  = 27 41  101
alt six   = 27 41  102
alt seven = 27 41  103
alt eight = 27 41  104
alt nine  = 27 41  105
                                                  

alt ctrl  zero  = 27 45  96 
alt ctrl  one   = 27 45  97 
alt ctrl  two   = 27 45  98
alt ctrl  three = 27 45  99     ; CM_querty numerals
alt ctrl  four  = 27 45  100
alt ctrl  five  = 27 45  101
alt ctrl  six   = 27 45  102
alt ctrl  seven = 27 45  103
alt ctrl  eight = 27 45  104
alt ctrl  nine  = 27 45  105
 