ASM1130 CROSS ASSEMBLER V1.22 -- V2M12 -- Sun Nov 1 19:25:10 2020
Source File: \u4holcp.asm
1 | * JUNE 19,1967 U4O00010
2 | *************************************************** U4O00020
3 | * * U4O00030
4 | * SUBROUTINE NAME- * U4O00040
5 | * FULL NAME- HOLLERITH TO CONSOLE PRINTER * U4O00050
6 | * CODE CONVERSION TABLE. * U4O00060
7 | * CODE NAME- HOLCP * U4O00070
8 | * METHOD- * U4O00080
9 | * SEE IBM 1130 SUBROUTINE LIBRARY MANUAL * U4O00090
10 | * CAPABILITIES AND LIMITATIONS- * U4O00100
11 | * SEE IBM 1130 SUBROUTINE LIBRARY MANUAL * U4O00110
12 | * SPECIAL FEATURES- NON-EXECUTABLE * U4O00120
13 | * ADDITIONAL INFORMATION- * U4O00130
14 | * ESTIMATED EXECUTION TIME- N/A * U4O00140
15 | * * U4O00150
16 | *************************************************** U4O00160
HOLLERITH TO CONSOLE PRINTER
18 | ENT HOLCP U4O00180
0000 4421 19 | HOLCP DC /4421 & SPACE U4O00190
0001 20E0 20 | DC /20E0 I 9 U4O00200
0002 24E4 21 | DC /24E4 H 8 U4O00210
0003 2121 22 | DC /2121 NO GRAPHIC NO GRAPHIC U4O00220
0004 3CFC 23 | DC /3CFC A 1 U4O00230
0005 2121 24 | DC /2121 NO GRAPHIC NO GRAPHIC U4O00240
0006 2121 25 | DC /2121 NO GRAPHIC NO GRAPHIC U4O00250
0007 2121 26 | DC /2121 NO GRAPHIC NO GRAPHIC U4O00260
0008 18D8 27 | DC /18D8 B 2 U4O00270
0009 2121 28 | DC /2121 NO GRAPHIC NO GRAPHIC U4O00280
000A 0282 29 | DC /0282 ยข : U4O00290
000B 2121 30 | DC /2121 NO GRAPHIC NO GRAPHIC U4O00300
000C 1CDC 31 | DC /1CDC C 3 U4O00310
000D 2121 32 | DC /2121 NO GRAPHIC NO GRAPHIC U4O00320
000E 00C0 33 | DC /00C0 .PERIOD # U4O00330
000F 2121 34 | DC /2121 NO GRAPHIC NO GRAPHIC U4O00340
0010 30F0 35 | DC /30F0 D 4 U4O00350
0011 2121 36 | DC /2121 NO GRAPHIC NO GRAPHIC U4O00360
0012 DE04 37 | DC /DE04 < @ U4O00370
0013 2121 38 | DC /2121 NO GRAPHIC NO GRAPHIC U4O00380
0014 34F4 39 | DC /34F4 E 5 U4O00390
0015 4109 40 | DC /4109 HT RS U4O00400
0016 FEE6 41 | DC /FEE6 ( APOSTROPHE U4O00410
0017 2121 42 | DC /2121 NO GRAPHIC NO GRAPHIC U4O00420
0018 10D0 43 | DC /10D0 F 6 U4O00430
0019 2121 44 | DC /2121 NO GRAPHIC NO GRAPHIC U4O00440
001A DAC2 45 | DC /DAC2 + = U4O00450
001B 2121 46 | DC /2121 NO GRAPHIC NO GRAPHIC U4O00460
001C 14D4 47 | DC /14D4 G 7 U4O00470
001D 2121 48 | DC /2121 NO GRAPHIC NO GRAPHIC U4O00480
001E C6E2 49 | DC /C6E2 LOGICAL OR " U4O00490
001F 2121 50 | DC /2121 NO GRAPHIC NO GRAPHIC U4O00500
0020 21C4 51 | DC /21C4 NO GRAPHIC 0(ZERO) U4O00510
0021 21A0 52 | DC /21A0 NO GRAPHIC Z U4O00520
0022 21A4 53 | DC /21A4 NO GRAPHIC Y U4O00530
0023 2121 54 | DC /2121 NO GRAPHIC NO GRAPHIC U4O00540
0024 21BC 55 | DC /21BC NO GRAPHIC / U4O00550
0025 2121 56 | DC /2121 NO GRAPHIC NO GRAPHIC U4O00560
0026 2121 57 | DC /2121 NO GRAPHIC NO GRAPHIC U4O00570
0027 2121 58 | DC /2121 NO GRAPHIC NO GRAPHIC U4O00580
0028 2198 59 | DC /2198 NO GRAPHIC S U4O00590
0029 2121 60 | DC /2121 NO GRAPHIC NO GRAPHIC U4O00600
002A 2121 61 | DC /2121 NO GRAPHIC NO GRAPHIC U4O00610
002B 2121 62 | DC /2121 NO GRAPHIC NO GRAPHIC U4O00620
002C 219C 63 | DC /219C NO GRAPHIC T U4O00630
002D 2121 64 | DC /2121 NO GRAPHIC NO GRAPHIC U4O00640
002E 2180 65 | DC /2180 NO GRAPHIC ,(COMMA) U4O00650
002F 2121 66 | DC /2121 NO GRAPHIC NO GRAPHIC U4O00660
0030 21B0 67 | DC /21B0 NO GRAPHIC U U4O00670
0031 2121 68 | DC /2121 NO GRAPHIC NO GRAPHIC U4O00680
0032 2106 69 | DC /2106 NO GRAPHIC % U4O00690
0033 2121 70 | DC /2121 NO GRAPHIC NO GRAPHIC U4O00700
0034 21B4 71 | DC /21B4 NO GRAPHIC V U4O00710
0035 2103 72 | DC /2103 NO GRAPHIC LF U4O00720
0036 21BE 73 | DC /21BE NO GRAPHIC UNDERSCORE U4O00730
0037 2121 74 | DC /2121 NO GRAPHIC NO GRAPHIC U4O00740
0038 2190 75 | DC /2190 NO GRAPHIC W U4O00750
0039 2121 76 | DC /2121 NO GRAPHIC NO GRAPHIC U4O00760
003A 2146 77 | DC /2146 NO GRAPHIC > U4O00770
003B 2121 78 | DC /2121 NO GRAPHIC NO GRAPHIC U4O00780
003C 2194 79 | DC /2194 NO GRAPHIC X U4O00790
003D 2121 80 | DC /2121 NO GRAPHIC NO GRAPHIC U4O00800
003E 2186 81 | DC /2186 NO GRAPHIC ? U4O00810
003F 2121 82 | DC /2121 NO GRAPHIC NO GRAPHIC U4O00820
0040 2184 83 | DC /2184 NO GRAPHIC - U4O00830
0041 2160 84 | DC /2160 NO GRAPHIC R U4O00840
0042 2164 85 | DC /2164 NO GRAPHIC Q U4O00850
0043 2121 86 | DC /2121 NO GRAPHIC NO GRAPHIC U4O00860
0044 217C 87 | DC /217C NO GRAPHIC J U4O00870
0045 2121 88 | DC /2121 NO GRAPHIC NO GRAPHIC U4O00880
0046 2121 89 | DC /2121 NO GRAPHIC NO GRAPHIC U4O00890
0047 2121 90 | DC /2121 NO GRAPHIC NO GRAPHIC U4O00900
0048 2158 91 | DC /2158 NO GRAPHIC K U4O00910
0049 2121 92 | DC /2121 NO GRAPHIC NO GRAPHIC U4O00920
004A 2142 93 | DC /2142 NO GRAPHIC ! U4O00930
004B 2121 94 | DC /2121 NO GRAPHIC NO GRAPHIC U4O00940
004C 215C 95 | DC /215C NO GRAPHIC L U4O00950
004D 2121 96 | DC /2121 NO GRAPHIC NO GRAPHIC U4O00960
004E 2140 97 | DC /2140 NO GRAPHIC $ U4O00970
004F 2121 98 | DC /2121 NO GRAPHIC NO GRAPHIC U4O00980
0050 2170 99 | DC /2170 NO GRAPHIC M U4O00990
0051 2105 100 | DC /2105 NO GRAPHIC RES U4O01000
0052 21D6 101 | DC /21D6 NO GRAPHIC * U4O01010
0053 2121 102 | DC /2121 NO GRAPHIC NO GRAPHIC U4O01020
0054 2174 103 | DC /2174 NO GRAPHIC N U4O01030
0055 2181 104 | DC /2181 NO GRAPHIC NL U4O01040
0056 21F6 105 | DC /21F6 NO GRAPHIC ) U4O01050
0057 2121 106 | DC /2121 NO GRAPHIC NO GRAPHIC U4O01060
0058 2150 107 | DC /2150 NO GRAPHIC O U4O01070
0059 2111 108 | DC /2111 NO GRAPHIC BS U4O01080
005A 21D2 109 | DC /21D2 NO GRAPHIC ; U4O01090
005B 2121 110 | DC /2121 NO GRAPHIC NO GRAPHIC U4O01100
005C 2154 111 | DC /2154 NO GRAPHIC P U4O01110
005D 2121 112 | DC /2121 NO GRAPHIC NO GRAPHIC U4O01120
005E 21F2 113 | DC /21F2 NO GRAPHIC LOGICAL NOT U4O01130
005F 2121 114 | DC /2121 NO GRAPHIC NO GRAPHIC U4O01140
0060 2121 115 | DC /2121 NO GRAPHIC NO GRAPHIC U4O01150
0061 2121 116 | DC /2121 NO GRAPHIC NO GRAPHIC U4O01160
0062 2121 117 | DC /2121 NO GRAPHIC NO GRAPHIC U4O01170
0063 2121 118 | DC /2121 NO GRAPHIC NO GRAPHIC U4O01180
0064 2121 119 | DC /2121 NO GRAPHIC NO GRAPHIC U4O01190
0065 2121 120 | DC /2121 NO GRAPHIC NO GRAPHIC U4O01200
0066 2121 121 | DC /2121 NO GRAPHIC NO GRAPHIC U4O01210
0067 2121 122 | DC /2121 NO GRAPHIC NO GRAPHIC U4O01220
0068 2121 123 | DC /2121 NO GRAPHIC NO GRAPHIC U4O01230
0069 2121 124 | DC /2121 NO GRAPHIC NO GRAPHIC U4O01240
006A 2121 125 | DC /2121 NO GRAPHIC NO GRAPHIC U4O01250
006B 2121 126 | DC /2121 NO GRAPHIC NO GRAPHIC U4O01260
006C 2121 127 | DC /2121 NO GRAPHIC NO GRAPHIC U4O01270
006D 2121 128 | DC /2121 NO GRAPHIC NO GRAPHIC U4O01280
006E 2121 129 | DC /2121 NO GRAPHIC NO GRAPHIC U4O01290
006F 2121 130 | DC /2121 NO GRAPHIC NO GRAPHIC U4O01300
0070 2121 131 | DC /2121 NO GRAPHIC NO GRAPHIC U4O01310
0071 2121 132 | DC /2121 NO GRAPHIC NO GRAPHIC U4O01320
0072 2121 133 | DC /2121 NO GRAPHIC NO GRAPHIC U4O01330
0073 2121 134 | DC /2121 NO GRAPHIC NO GRAPHIC U4O01340
0074 2121 135 | DC /2121 NO GRAPHIC NO GRAPHIC U4O01350
0075 2121 136 | DC /2121 NO GRAPHIC NO GRAPHIC U4O01360
0076 2121 137 | DC /2121 NO GRAPHIC NO GRAPHIC U4O01370
0077 2121 138 | DC /2121 NO GRAPHIC NO GRAPHIC U4O01380
0078 2121 139 | DC /2121 NO GRAPHIC NO GRAPHIC U4O01390
0079 2121 140 | DC /2121 NO GRAPHIC NO GRAPHIC U4O01400
007A 2121 141 | DC /2121 NO GRAPHIC NO GRAPHIC U4O01410
007B 2121 142 | DC /2121 NO GRAPHIC NO GRAPHIC U4O01420
007C 2121 143 | DC /2121 NO GRAPHIC NO GRAPHIC U4O01430
007D 2121 144 | DC /2121 NO GRAPHIC NO GRAPHIC U4O01440
007E 2121 145 | DC /2121 NO GRAPHIC NO GRAPHIC U4O01450
007F 2121 146 | DC /2121 NO GRAPHIC NO GRAPHIC U4O01460
0080 147 | END U4O01470
There were no errors in this assembly
=== CROSS REFERENCES ==========================================================
Name Val Defd Referenced
HOLCP 0000R 19