ASM1130 CROSS ASSEMBLER V1.22 -- V2M12 -- Sun Nov 1 19:25:10 2020
Source File: \u4ebccp.asm
1 | *************************************************** U4I00010
2 | * * U4I00020
3 | * SUBROUTINE NAME- * U4I00030
4 | * FULL NAME- EBCDIC TO CONSOLE PRINTER CODE * U4I00040
5 | * CONVERSION TABLE SUBROUTINE. * U4I00050
6 | * CODE NAME-EBCCP * U4I00060
7 | * PURPOSE- EBCCP IS A TABLE OF PACKED 8-BIT * U4I00070
8 | * CONSOLE PRINTER CODES TO BE USED BY * U4I00080
9 | * ZIPCO,THE SPEED CONVERSION ROUTINE. * U4I00090
10 | * METHOD- * U4I00100
11 | * SEE IBM 1130 SUBROUTINE LIBRARY MANUAL * U4I00110
12 | * CAPABILITIES AND LIMITATIONS- * U4I00120
13 | * SEE IBM 1130 SUBROUTINE LIBRARY MANUAL * U4I00130
14 | * SPECIAL FEATURES- NON-EXECUTABLE * U4I00140
15 | * ADDITIONAL INFORMATION- * U4I00150
16 | * ESTIMATED EXECUTION TIME- N/A * U4I00160
17 | * * U4I00170
18 | *************************************************** U4I00180
EBCDIC TO CP CONV TABLE FOR ZIPCO
20 | ENT EBCCP U4I00200
0000 2121 21 | EBCCP DC /2121 NO GRAPHIC NULL U4I00210
0001 2121 22 | DC /2121 NO GRAPHIC NULL U4I00220
0002 2121 23 | DC /2121 NO GRAPHIC NULL U4I00230
0003 2121 24 | DC /2121 NO GRAPHIC NULL U4I00240
0004 2121 25 | DC /2121 NO GRAPHIC PF U4I00250
0005 2141 26 | DC /2141 NO GRAPHIC HT U4I00260
0006 2121 27 | DC /2121 NO GRAPHIC LC U4I00270
0007 2121 28 | DC /2121 NO GRAPHIC DEL U4I00280
0008 2121 29 | DC /2121 NO GRAPHIC NO GRAPHIC U4I00290
0009 2121 30 | DC /2121 NO GRAPHIC NO GRAPHIC U4I00300
000A 2121 31 | DC /2121 NO GRAPHIC NO GRAPHIC U4I00310
000B 2121 32 | DC /2121 NO GRAPHIC U4I00320
000C 2121 33 | DC /2121 NO GRAPHIC NO GRAPHIC U4I00330
000D 2121 34 | DC /2121 NO GRAPHIC NO GRAPHIC U4I00340
000E 2121 35 | DC /2121 NO GRAPHIC NO GRAPHIC U4I00350
000F 2121 36 | DC /2121 NO GRAPHIC U4I00360
0010 2121 37 | DC /2121 NO GRAPHIC NO GRAPHIC U4I00370
0011 2121 38 | DC /2121 NO GRAPHIC NO GRAPHIC U4I00380
0012 2121 39 | DC /2121 NO GRAPHIC NO GRAPHIC U4I00390
0013 2121 40 | DC /2121 NO GRAPHIC NO GRAPHIC U4I00400
0014 2105 41 | DC /2105 NO GRAPHIC RES U4I00410
0015 2181 42 | DC /2181 NO GRAPHIC NL U4I00420
0016 2111 43 | DC /2111 NO GRAPHIC BS U4I00430
0017 2121 44 | DC /2121 NO GRAPHIC IDL U4I00440
0018 2121 45 | DC /2121 NO GRAPHIC NO GRAPHIC U4I00450
0019 2121 46 | DC /2121 NO GRAPHIC NO GRAPHIC U4I00460
001A 2121 47 | DC /2121 NO GRAPHIC NO GRAPHIC U4I00470
001B 2121 48 | DC /2121 NO GRAPHIC NO GRAPHIC U4I00480
001C 2121 49 | DC /2121 NO GRAPHIC NO GRAPHIC U4I00490
001D 2121 50 | DC /2121 NO GRAPHIC NO GRAPHIC U4I00500
001E 2121 51 | DC /2121 NO GRAPHIC NO GRAPHIC U4I00510
001F 2121 52 | DC /2121 NO GRAPHIC NO GRAPHIC U4I00520
0020 2121 53 | DC /2121 NO GRAPHIC NO GRAPHIC U4I00530
0021 2121 54 | DC /2121 NO GRAPHIC NO GRAPHIC U4I00540
0022 2121 55 | DC /2121 NO GRAPHIC NO GRAPHIC U4I00550
0023 2121 56 | DC /2121 NO GRAPHIC NO GRAPHIC U4I00560
0024 2121 57 | DC /2121 NO GRAPHIC BYP U4I00570
0025 2103 58 | DC /2103 NO GRAPHIC LF U4I00580
0026 2121 59 | DC /2121 NO GRAPHIC EOB U4I00590
0027 2121 60 | DC /2121 NO GRAPHIC PRE U4I00600
0028 2121 61 | DC /2121 NO GRAPHIC NO GRAPHIC U4I00610
0029 2121 62 | DC /2121 NO GRAPHIC NO GRAPHIC U4I00620
002A 2121 63 | DC /2121 NO GRAPHIC NO GRAPHIC U4I00630
002B 2121 64 | DC /2121 NO GRAPHIC NO GRAPHIC U4I00640
002C 2121 65 | DC /2121 NO GRAPHIC NO GRAPHIC U4I00650
002D 2121 66 | DC /2121 NO GRAPHIC NO GRAPHIC U4I00660
002E 2121 67 | DC /2121 NO GRAPHIC NO GRAPHIC U4I00670
002F 2121 68 | DC /2121 NO GRAPHIC NO GRAPHIC U4I00680
0030 2121 69 | DC /2121 NO GRAPHIC NO GRAPHIC U4I00690
0031 2121 70 | DC /2121 NO GRAPHIC NO GRAPHIC U4I00700
0032 2121 71 | DC /2121 NO GRAPHIC NO GRAPHIC U4I00710
0033 2121 72 | DC /2121 NO GRAPHIC NO GRAPHIC U4I00720
0034 2121 73 | DC /2121 NO GRAPHIC PN U4I00730
0035 2109 74 | DC /2109 NO GRAPHIC RS U4I00740
0036 2121 75 | DC /2121 NO GRAPHIC UC U4I00750
0037 2121 76 | DC /2121 NO GRAPHIC EOT U4I00760
0038 2121 77 | DC /2121 NO GRAPHIC NO GRAPHIC U4I00770
0039 2121 78 | DC /2121 NO GRAPHIC NO GRAPHIC U4I00780
003A 2121 79 | DC /2121 NO GRAPHIC NO GRAPHIC U4I00790
003B 2121 80 | DC /2121 NO GRAPHIC NO GRAPHIC U4I00800
003C 2121 81 | DC /2121 NO GRAPHIC NO GRAPHIC U4I00810
003D 2121 82 | DC /2121 NO GRAPHIC NO GRAPHIC U4I00820
003E 2121 83 | DC /2121 NO GRAPHIC NO GRAPHIC U4I00830
003F 2121 84 | DC /2121 NO GRAPHIC NO GRAPHIC U4I00840
0040 2121 85 | DC /2121 (+ZERO) (SPACE) U4I00850
0041 3C21 86 | DC /3C21 A NO GRAPHIC U4I00860
0042 1821 87 | DC /1821 B NO GRAPHIC U4I00870
0043 1C21 88 | DC /1C21 C NO GRAPHIC U4I00880
0044 3021 89 | DC /3021 D NO GRAPHIC U4I00890
0045 3421 90 | DC /3421 E NO GRAPHIC U4I00900
0046 1021 91 | DC /1021 F NO GRAPHIC U4I00910
0047 1421 92 | DC /1421 G NO GRAPHIC U4I00920
0048 2421 93 | DC /2421 H NO GRAPHIC U4I00930
0049 2021 94 | DC /2021 I NO GRAPHIC U4I00940
004A 2102 95 | DC /2102 NO GRAPHIC ยข U4I00950
004B 2100 96 | DC /2100 NO GRAPHIC . U4I00960
004C 21DE 97 | DC /21DE NO GRAPHIC < U4I00970
004D 21FE 98 | DC /21FE NO GRAPHIC ( U4I00980
004E 21DA 99 | DC /21DA NO GRAPHIC + U4I00990
004F 21C6 100 | DC /21C6 NO GRAPHIC LOGICAL OR U4I01000
0050 2144 101 | DC /2144 (-ZERO) AND U4I01010
0051 7C21 102 | DC /7C21 J NO GRAPHIC U4I01020
0052 5821 103 | DC /5821 K NO GRAPHIC U4I01030
0053 5C21 104 | DC /5C21 L NO GRAPHIC U4I01040
0054 7021 105 | DC /7021 M NO GRAPHIC U4I01050
0055 7421 106 | DC /7421 N NO GRAPHIC U4I01060
0056 5021 107 | DC /5021 O NO GRAPHIC U4I01070
0057 5421 108 | DC /5421 P NO GRAPHIC U4I01080
0058 6421 109 | DC /6421 Q NO GRAPHIC U4I01090
0059 6021 110 | DC /6021 R NO GRAPHIC U4I01100
005A 2142 111 | DC /2142 NO GRAPHIC ! U4I01110
005B 2140 112 | DC /2140 NO GRAPHIC $ U4I01120
005C 21D6 113 | DC /21D6 NO GRAPHIC * U4I01130
005D 21F6 114 | DC /21F6 NO GRAPHIC ) U4I01140
005E 21D2 115 | DC /21D2 NO GRAPHIC ; U4I01150
005F 21F2 116 | DC /21F2 NO GRAPHIC LOGICAL NOT U4I01160
0060 2184 117 | DC /2184 NO GRAPHIC - U4I01170
0061 21BC 118 | DC /21BC NO GRAPHIC / U4I01180
0062 9821 119 | DC /9821 S NO GRAPHIC U4I01190
0063 9C21 120 | DC /9C21 T NO GRAPHIC U4I01200
0064 B021 121 | DC /B021 U NO GRAPHIC U4I01210
0065 B421 122 | DC /B421 V NO GRAPHIC U4I01220
0066 9021 123 | DC /9021 W NO GRAPHIC U4I01230
0067 9421 124 | DC /9421 X NO GRAPHIC U4I01240
0068 A421 125 | DC /A421 Y NO GRAPHIC U4I01250
0069 A021 126 | DC /A021 Z NO GRAPHIC U4I01260
006A 2121 127 | DC /2121 NO GRAPHIC NO GRAPHIC U4I01270
006B 2180 128 | DC /2180 NO GRAPHIC , U4I01280
006C 2106 129 | DC /2106 NO GRAPHIC % U4I01290
006D 21BE 130 | DC /21BE NO GRAPHIC UNDERSCORE U4I01300
006E 2146 131 | DC /2146 NO GRAPHIC > U4I01310
006F 2186 132 | DC /2186 NO GRAPHIC ? U4I01320
0070 C421 133 | DC /C421 0 NO GRAPHIC U4I01330
0071 FC21 134 | DC /FC21 1 NO GRAPHIC U4I01340
0072 D821 135 | DC /D821 2 NO GRAPHIC U4I01350
0073 DC21 136 | DC /DC21 3 NO GRAPHIC U4I01360
0074 F021 137 | DC /F021 4 NO GRAPHIC U4I01370
0075 F421 138 | DC /F421 5 NO GRAPHIC U4I01380
0076 D021 139 | DC /D021 6 NO GRAPHIC U4I01390
0077 D421 140 | DC /D421 7 NO GRAPHIC U4I01400
0078 E421 141 | DC /E421 8 NO GRAPHIC U4I01410
0079 E021 142 | DC /E021 9 NO GRAPHIC U4I01420
007A 2182 143 | DC /2182 NO GRAPHIC : U4I01430
007B 21C0 144 | DC /21C0 NO GRAPHIC # U4I01440
007C 2104 145 | DC /2104 NO GRAPHIC @ U4I01450
007D 21E6 146 | DC /21E6 NO GRAPHIC ' U4I01460
007E 21C2 147 | DC /21C2 NO GRAPHIC = U4I01470
007F 21E2 148 | DC /21E2 NO GRAPHIC QUOTE U4I01480
0080 149 | END U4I01490
There were no errors in this assembly
=== CROSS REFERENCES ==========================================================
Name Val Defd Referenced
EBCCP 0000R 21