U4EBPT3

Table Of Contents
  • [00022] EBCDIC TO 1403 CONV TABLE FOR ZIPCO
u4ebpt3.lst
ASM1130 CROSS ASSEMBLER V1.22 -- V2M12 -- Sun Nov  1 19:25:10 2020
 
Source File: \u4ebpt3.asm 
                             1 | *************************************************** U4L00010
                             2 | *                                                 * U4L00020
                             3 | *   SUBROUTINE NAME-                              * U4L00030
                             4 | *      FULL NAME- EBCDIC TO 1403 PRINTER CODE     * U4L00040
                             5 | *         CONVERSION TABLE SUBROUTINE             * U4L00050
                             6 | *      CODE NAME- EBPT3                           * U4L00060
                             7 | *   PURPOSE- EBPT3 IS A TABLE OF PACKED 8-BIT     * U4L00070
                             8 | *      1403 PRINTER CODES TO BE USED BY ZIPCO,    * U4L00080
                             9 | *      THE SPEED CONVERSION ROUTINE.              * U4L00090
                            10 | *   METHOD-                                       * U4L00100
                            11 | *         SEE IBM 1130 SUBROUTINE LIBRARY MANUAL  * U4L00110
                            12 | *   CAPABILITIES AND LIMITATIONS-                 * U4L00120
                            13 | *         SEE IBM 1130 SUBROUTINE LIBRARY MANUAL  * U4L00130
                            14 | *   SPECIAL FEATURES- NON-EXECUTABLE              * U4L00140
                            15 | *   ADDITIONAL INFORMATION-                       * U4L00150
                            16 | *      ESTIMATED EXECUTION TIME- N/A              * U4L00160
                            17 | *                                                 * U4L00170
                            18 | *************************************************** U4L00180
EBCDIC TO 1403 CONV TABLE FOR ZIPCO
 
                            20 |       ENT     EBPT3                                 U4L00200
0000 7F7F                   21 | EBPT3 DC      /7F7F      NO GRAPHIC   NUL           U4L00210
0001 7F7F                   22 |       DC      /7F7F      NO GRAPHIC   NO GRAPHIC    U4L00220
0002 7F7F                   23 |       DC      /7F7F      NO GRAPHIC   NO GRAPHIC    U4L00230
0003 7F7F                   24 |       DC      /7F7F      NO GRAPHIC   NO GRAPHIC    U4L00240
0004 7F7F                   25 |       DC      /7F7F      NO GRAPHIC   PF            U4L00250
0005 7F7F                   26 |       DC      /7F7F      NO GRAPHIC   HT            U4L00260
0006 7F7F                   27 |       DC      /7F7F      NO GRAPHIC   LC            U4L00270
0007 7F7F                   28 |       DC      /7F7F      NO GRAPHIC   DEL           U4L00280
0008 7F7F                   29 |       DC      /7F7F      NO GRAPHIC   NO GRAPHIC    U4L00290
0009 7F7F                   30 |       DC      /7F7F      NO GRAPHIC   NO GRAPHIC    U4L00300
000A 7F7F                   31 |       DC      /7F7F      NO GRAPHIC   NO GRAPHIC    U4L00310
000B 7F7F                   32 |       DC      /7F7F      NO GRAPHIC   NO GRAPHIC    U4L00320
000C 7F7F                   33 |       DC      /7F7F      NO GRAPHIC   NO GRAPHIC    U4L00330
000D 7F7F                   34 |       DC      /7F7F      NO GRAPHIC   NO GRAPHIC    U4L00340
000E 7F7F                   35 |       DC      /7F7F      NO GRAPHIC   NO GRAPHIC    U4L00350
000F 7F7F                   36 |       DC      /7F7F      NO GRAPHIC   NO GRAPHIC    U4L00360
0010 7F7F                   37 |       DC      /7F7F      NO GRAPHIC   NO GRAPHIC    U4L00370
0011 7F7F                   38 |       DC      /7F7F      NO GRAPHIC   NO GRAPHIC    U4L00380
0012 7F7F                   39 |       DC      /7F7F      NO GRAPHIC   NO GRAPHIC    U4L00390
0013 7F7F                   40 |       DC      /7F7F      NO GRAPHIC   NO GRAPHIC    U4L00400
0014 7F7F                   41 |       DC      /7F7F      NO GRAPHIC   RES           U4L00410
0015 7F7F                   42 |       DC      /7F7F      NO GRAPHIC   NL            U4L00420
0016 7F7F                   43 |       DC      /7F7F      NO GRAPHIC   BS            U4L00430
0017 7F7F                   44 |       DC      /7F7F      NO GRAPHIC   IDL           U4L00440
0018 7F7F                   45 |       DC      /7F7F      NO GRAPHIC   NO GRAPHIC    U4L00450
0019 7F7F                   46 |       DC      /7F7F      NO GRAPHIC   NO GRAPHIC    U4L00460
001A 7F7F                   47 |       DC      /7F7F      NO GRAPHIC   NO GRAPHIC    U4L00470
001B 7F7F                   48 |       DC      /7F7F      NO GRAPHIC   NO GRAPHIC    U4L00480
001C 7F7F                   49 |       DC      /7F7F      NO GRAPHIC   NO GRAPHIC    U4L00490
001D 7F7F                   50 |       DC      /7F7F      NO GRAPHIC   NO GRAPHIC    U4L00500
001E 7F7F                   51 |       DC      /7F7F      NO GRAPHIC   NO GRAPHIC    U4L00510
001F 7F7F                   52 |       DC      /7F7F      NO GRAPHIC   NO GRAPHIC    U4L00520
0020 7F7F                   53 |       DC      /7F7F      NO GRAPHIC   NO GRAPHIC    U4L00530
0021 7F7F                   54 |       DC      /7F7F      NO GRAPHIC   NO GRAPHIC    U4L00540
0022 7F7F                   55 |       DC      /7F7F      NO GRAPHIC   NO GRAPHIC    U4L00550
0023 7F7F                   56 |       DC      /7F7F      NO GRAPHIC   NO GRAPHIC    U4L00560
0024 7F7F                   57 |       DC      /7F7F      NO GRAPHIC   BYP           U4L00570
0025 7F7F                   58 |       DC      /7F7F      NO GRAPHIC   LF            U4L00580
0026 7F7F                   59 |       DC      /7F7F      NO GRAPHIC   EOB           U4L00590
0027 7F7F                   60 |       DC      /7F7F      NO GRAPHIC   PRE           U4L00600
0028 7F7F                   61 |       DC      /7F7F      NO GRAPHIC   NO GRAPHIC    U4L00610
0029 7F7F                   62 |       DC      /7F7F      NO GRAPHIC   NO GRAPHIC    U4L00620
002A 7F7F                   63 |       DC      /7F7F      NO GRAPHIC   NO GRAPHIC    U4L00630
002B 7F7F                   64 |       DC      /7F7F      NO GRAPHIC   NO GRAPHIC    U4L00640
002C 7F7F                   65 |       DC      /7F7F      NO GRAPHIC   NO GRAPHIC    U4L00650
002D 7F7F                   66 |       DC      /7F7F      NO GRAPHIC   NO GRAPHIC    U4L00660
002E 7F7F                   67 |       DC      /7F7F      NO GRAPHIC   NO GRAPHIC    U4L00670
002F 7F7F                   68 |       DC      /7F7F      NO GRAPHIC   NO GRAPHIC    U4L00680
0030 7F7F                   69 |       DC      /7F7F      NO GRAPHIC   NO GRAPHIC    U4L00690
0031 7F7F                   70 |       DC      /7F7F      NO GRAPHIC   NO GRAPHIC    U4L00700
0032 7F7F                   71 |       DC      /7F7F      NO GRAPHIC                 U4L00710
0033 7F7F                   72 |       DC      /7F7F      NO GRAPHIC   NO GRAPHIC    U4L00720
0034 7F7F                   73 |       DC      /7F7F      NO GRAPHIC   PN            U4L00730
0035 7F7F                   74 |       DC      /7F7F      NO GRAPHIC   RS            U4L00740
0036 7F7F                   75 |       DC      /7F7F      NO GRAPHIC   UC            U4L00750
0037 7F7F                   76 |       DC      /7F7F      NO GRAPHIC   EOT           U4L00760
0038 7F7F                   77 |       DC      /7F7F      NO GRAPHIC   NO GRAPHIC    U4L00770
0039 7F7F                   78 |       DC      /7F7F      NO GRAPHIC   NO GRAPHIC    U4L00780
003A 7F7F                   79 |       DC      /7F7F      NO GRAPHIC   NO GRAPHIC    U4L00790
003B 7F7F                   80 |       DC      /7F7F      NO GRAPHIC   NO GRAPHIC    U4L00800
003C 7F7F                   81 |       DC      /7F7F      NO GRAPHIC   NO GRAPHIC    U4L00810
003D 7F7F                   82 |       DC      /7F7F      NO GRAPHIC   NO GRAPHIC    U4L00820
003E 7F7F                   83 |       DC      /7F7F      NO GRAPHIC   NO GRAPHIC    U4L00830
003F 7F7F                   84 |       DC      /7F7F      NO GRAPHIC   NO GRAPHIC    U4L00840
0040 7F7F                   85 |       DC      /7F7F      (+ZERO)      (SPACE)       U4L00850
0041 647F                   86 |       DC      /647F      A            NO GRAPHIC    U4L00860
0042 257F                   87 |       DC      /257F      B            NO GRAPHIC    U4L00870
0043 267F                   88 |       DC      /267F      C            NO GRAPHIC    U4L00880
0044 677F                   89 |       DC      /677F      D            NO GRAPHIC    U4L00890
0045 687F                   90 |       DC      /687F      E            NO GRAPHIC    U4L00900
0046 297F                   91 |       DC      /297F      F            NO GRAPHIC    U4L00910
0047 2A7F                   92 |       DC      /2A7F      G            NO GRAPHIC    U4L00920
0048 6B7F                   93 |       DC      /6B7F      H            NO GRAPHIC    U4L00930
0049 2C7F                   94 |       DC      /2C7F      I            NO GRAPHIC    U4L00940
004A 7F7F                   95 |       DC      /7F7F      NO GRAPHIC   NO GRAPHIC    U4L00950
004B 7F6E                   96 |       DC      /7F6E      NO GRAPHIC   .             U4L00960
004C 7F7F                   97 |       DC      /7F7F      NO GRAPHIC   NO GRAPHIC    U4L00970
004D 7F57                   98 |       DC      /7F57      NO GRAPHIC   (             U4L00980
004E 7F6D                   99 |       DC      /7F6D      NO GRAPHIC   NO GRAPHIC    U4L00990
004F 7F7F                  100 |       DC      /7F7F      NO GRAPHIC   LOGICAL OR    U4L01000
0050 7F15                  101 |       DC      /7F15      NO GRAPHIC   AMPERSAND     U4L01010
0051 587F                  102 |       DC      /587F      J            NO GRAPHIC    U4L01020
0052 197F                  103 |       DC      /197F      K            NO GRAPHIC    U4L01030
0053 1A7F                  104 |       DC      /1A7F      L            NO GRAPHIC    U4L01040
0054 5B7F                  105 |       DC      /5B7F      M            NO GRAPHIC    U4L01050
0055 1C7F                  106 |       DC      /1C7F      N            NO GRAPHIC    U4L01060
0056 5D7F                  107 |       DC      /5D7F      O            NO GRAPHIC    U4L01070
0057 5E7F                  108 |       DC      /5E7F      P            NO GRAPHIC    U4L01080
0058 1F7F                  109 |       DC      /1F7F      Q            NO GRAPHIC    U4L01090
0059 207F                  110 |       DC      /207F      R            NO GRAPHIC    U4L01100
005A 7F7F                  111 |       DC      /7F7F      NO GRAPHIC   NO GRAPHIC    U4L01110
005B 7F62                  112 |       DC      /7F62      NO GRAPHIC   $             U4L01120
005C 7F23                  113 |       DC      /7F23      NO GRAPHIC   *             U4L01130
005D 7F2F                  114 |       DC      /7F2F      NO GRAPHIC   )             U4L01140
005E 7F7F                  115 |       DC      /7F7F      NO GRAPHIC   ;             U4L01150
005F 7F7F                  116 |       DC      /7F7F      NO GRAPHIC   LOGICAL NOT   U4L01160
0060 7F61                  117 |       DC      /7F61      NO GRAPHIC   -             U4L01170
0061 7F4C                  118 |       DC      /7F4C      NO GRAPHIC   /             U4L01180
0062 0D7F                  119 |       DC      /0D7F      S            NO GRAPHIC    U4L01190
0063 0E7F                  120 |       DC      /0E7F      T            NO GRAPHIC    U4L01200
0064 4F7F                  121 |       DC      /4F7F      U            NO GRAPHIC    U4L01210
0065 107F                  122 |       DC      /107F      V            NO GRAPHIC    U4L01220
0066 517F                  123 |       DC      /517F      W            NO GRAPHIC    U4L01230
0067 527F                  124 |       DC      /527F      X            NO GRAPHIC    U4L01240
0068 137F                  125 |       DC      /137F      Y            NO GRAPHIC    U4L01250
0069 547F                  126 |       DC      /547F      Z            NO GRAPHIC    U4L01260
006A 7F7F                  127 |       DC      /7F7F      NO GRAPHIC   NO GRAPHIC    U4L01270
006B 7F16                  128 |       DC      /7F16      NO GRAPHIC   ,             U4L01280
006C 7F7F                  129 |       DC      /7F7F      NO GRAPHIC   %             U4L01290
006D 7F7F                  130 |       DC      /7F7F      NO GRAPHIC   UNDERSCORE    U4L01300
006E 7F7F                  131 |       DC      /7F7F      NO GRAPHIC   >             U4L01310
006F 7F7F                  132 |       DC      /7F7F      NO GRAPHIC   ?             U4L01320
0070 497F                  133 |       DC      /497F      0            NO GRAPHIC    U4L01330
0071 407F                  134 |       DC      /407F      1            NO GRAPHIC    U4L01340
0072 017F                  135 |       DC      /017F      2            NO GRAPHIC    U4L01350
0073 027F                  136 |       DC      /027F      3            NO GRAPHIC    U4L01360
0074 437F                  137 |       DC      /437F      4            NO GRAPHIC    U4L01370
0075 047F                  138 |       DC      /047F      5            NO GRAPHIC    U4L01380
0076 457F                  139 |       DC      /457F      6            NO GRAPHIC    U4L01390
0077 467F                  140 |       DC      /467F      7            NO GRAPHIC    U4L01400
0078 077F                  141 |       DC      /077F      8            NO GRAPHIC    U4L01410
0079 087F                  142 |       DC      /087F      9            NO GRAPHIC    U4L01420
007A 7F7F                  143 |       DC      /7F7F      NO GRAPHIC   NO GRAPHIC    U4L01430
007B 7F7F                  144 |       DC      /7F7F      NO GRAPHIC   NO GRAPHIC    U4L01440
007C 7F7F                  145 |       DC      /7F7F      NO GRAPHIC   NO GRAPHIC    U4L01450
007D 7F0B                  146 |       DC      /7F0B      NO GRAPHIC   '             U4L01460
007E 7F4A                  147 |       DC      /7F4A      NO GRAPHIC   =             U4L01470
007F 7F7F                  148 |       DC      /7F7F      NO GRAPHIC   NO GRAPHIC    U4L01480
0080                       149 |       END                                           U4L01490
 
There were no errors in this assembly
 
=== CROSS REFERENCES ==========================================================
Name  Val   Defd  Referenced
EBPT3 0000R   21