home *** CD-ROM | disk | FTP | other *** search
/ Beijing Paradise BBS Backup / PARADISE.ISO / software / BBSDOORW / ZMENU_V2.ZIP / ZMNU3270.KBD < prev    next >
Encoding:
Text File  |  1990-04-22  |  2.2 KB  |  50 lines
  1. : Execute this file with a "source 3270_950.kbd" command
  2. : For Pro-YAM 17.26+ and ZCOMM
  3.         echo " IBM 3270/TVI 950 PC Key Mapping "
  4.         display novt100 no3101 lsi-adm3a :use TVI emulation
  5.         display overstrike
  6.         pN0     : Numlock switches
  7.         pK1     : Extended kbd used
  8.  
  9.         mk              :Clear old mapping
  10.  
  11.         :Mapping                :PC      Mainframe emulation TVI-950
  12.                                 :        Renex system emulator
  13.         mk  59  16 4 \x01@\r    :F1      PF1
  14.         mk  60  16 4 \x01A\r    :F2      PF2
  15.         mk  61  16 4 \x01B\r    :F3      PF3
  16.         mk  62  16 4 \x01C\r    :F4      PF4
  17.         mk  63  16 4 \x01D\r    :F5      PF5
  18.         mk  64  16 4 \x01E\r    :F6      PF6
  19.         mk  65  16 4 \x01F\r    :F7      PF7
  20.         mk 585 128 4 \x01F\r    :Ext PU  PF7
  21.         mk  73  16 4 \x01F\r    :Pad PU  PF7
  22.         mk  66  16 4 \x01G\r    :F8      PF8
  23.         mk 593 128 4 \x01G\r    :Ext PD  PF8
  24.         mk  81  16 4 \x01G\r    :Pad PD  PF8
  25.         mk  67  16 4 \x01H\r    :F9      PF9
  26.         mk  68  16 4 \x01I\r    :F10     PF10
  27.         mk 133  16 4 \x01J\r    :F11     PF11
  28.         mk 134 128 4 \x1BQ      :F12     PF12
  29.         mk 583 128 4 \x1E       :Ext Hom HOME
  30.         mk  71  16 4 \x1E       :Pad Hom HOME
  31.         mk  78 128 4 \x1A       :Pad +   CLEAR
  32.         mk 239 128 4 \x01\x2C\r :Pad /   PA1 / ATTN
  33.         mk  55 128 4 \x01\x2E\r :Pad *   PA2 / RESHOW
  34.         mk  41 128 4 \ER        :LC ~    EOF
  35.         mk 595 128 4 \x7F       :Ext Del Delete
  36.         mk  83  16 4 \x7F       :Pad Del Delete
  37.         mk 594 128 4 \EE        :Ext Ins Insert
  38.         mk  82  16 4 \EE        :Pad Ins Insert
  39.         mk 584 128 4 \x0B       :Ext x   CURSOR UP
  40.         mk  72  16 4 \x0B       :Pad x   CURSOR UP
  41.         mk 592 128 4 \x16       :Ext x   CURSOR DOWN
  42.         mk  80  16 4 \x16       :Pad x   CURSOR DOWN
  43.         mk 589 128 4 \x0C       :Ext x   CURSOR RIGHT (x'1A'-dos EOF)
  44.         mk  77  16 4 \x0C       :Pad x   CURSOR RIGHT
  45.         mk 587 128 4 \x08       :Ext x   CURSOR LEFT
  46.         mk  75  16 4 \x08       :Pad x   CURSOR LEFT
  47.         display mapkb
  48.         : set f5
  49.         : @ife dA echo "Alternate Keypad" ret; echo "Numeric Keypad"
  50.