ASM1130 CROSS ASSEMBLER V1.22 -- V2M12 -- Sun Nov 1 19:25:08 2020
Source File: \t5holtb.asm
1 | * JULY 6,1967 T5E00010
HOLTB
3 | * SINGLE DEVICE HOLLERITH TABLE T5E00030
4 | LIBR T5E00040
5 | *************************************************** T5E00050
6 | * * T5E00060
7 | *STATUS-VERSION 2, MODIFICATION 0 * T5E00070
8 | * * T5E00080
9 | *FUNCTION/OPERATION- * T5E00090
10 | * TABLE OF HOLLERITH CHARACTERS USED BY THE * T5E00100
11 | * HOLEZ SUBROUTINE IN CONJUNCTION WITH THE EBCTB* T5E00110
12 | * TABLE TO CONVERT FROM HOLLERITH TO EBC CODE OR* T5E00120
13 | * VICE VERSA * T5E00130
14 | * THE TABLE ADDRESS IS OBTAINED FROM THE LIBF * T5E00140
15 | * TRANSFER VECTOR BY THE GETAD SUBROUTINE. * T5E00150
16 | * * T5E00160
17 | *ENTRY POINTS- * T5E00170
18 | * *HOLTB * T5E00180
19 | * * T5E00190
20 | *INPUT-N/A * T5E00200
21 | * * T5E00210
22 | *OUTPUT-N/A * T5E00220
23 | * * T5E00230
24 | *EXTERNAL REFERENCES-N/A * T5E00240
25 | * * T5E00250
26 | *EXITS-N/A * T5E00260
27 | * * T5E00270
28 | *TABLES/WORK AREAS-N/A * T5E00280
29 | * * T5E00290
30 | *ATTRIBUTES-RELOCATABLE * T5E00300
31 | * * T5E00310
32 | *NOTES-N/A * T5E00320
33 | * * T5E00330
34 | *************************************************** T5E00340
HOLTB
36 | * T5E00360
37 | * HOLLERITH TABLE T5E00370
38 | * T5E00380
39 | ENT HOLTB T5E00390
40 | * T5E00400
0000 0000 41 | DC 0 BLANK T5E00410
0001 2000 42 | DC /2000 0 T5E00420
0002 1000 43 | DC /1000 1 T5E00430
0003 0800 44 | DC /0800 2 T5E00440
0004 0400 45 | DC /0400 3 T5E00450
0005 0200 46 | DC /0200 4 T5E00460
0006 0100 47 | DC /0100 5 T5E00470
0007 0080 48 | DC /0080 6 T5E00480
0008 0040 49 | DC /0040 7 T5E00490
0009 0020 50 | DC /0020 8 T5E00500
000A 0010 51 | DC /0010 9 T5E00510
000B 4000 52 | DC /4000 - T5E00520
000C 8420 53 | DC /8420 . T5E00530
000D 8100 54 | DC /8100 E T5E00540
000E 80A0 55 | DC /80A0 PLUS T5E00550
000F 8000 56 | DC /8000 AMPERSAND T5E00560
0010 00A0 57 | DC /00A0 EQUAL T5E00570
0011 4120 58 | DC /4120 RIGHT PAREN T5E00580
0012 8120 59 | DC /8120 LEFT PAREN T5E00590
0013 2420 60 | DC /2420 , T5E00600
0014 0120 61 | DC /0120 APOSTROPHE T5E00610
0015 3000 62 | DC /3000 / T5E00620
0016 4220 63 | DC /4220 * T5E00630
0017 4420 64 | DC /4420 $ T5E00640
0018 8220 65 | DC /8220 LESS THAN T5E00650
0019 2220 66 | DC /2220 PERCENT T5E00660
001A 0420 67 | DC /0420 POUND SIGN T5E00670
001B 0220 68 | DC /0220 AT SIGN T5E00680
001C 9000 69 | DC /9000 A T5E00690
001D 8800 70 | DC /8800 B T5E00700
001E 8400 71 | DC /8400 C T5E00710
001F 8200 72 | DC /8200 D T5E00720
0020 8080 73 | DC /8080 F T5E00730
0021 8040 74 | DC /8040 G T5E00740
0022 8020 75 | DC /8020 H T5E00750
0023 8010 76 | DC /8010 I T5E00760
0024 5000 77 | DC /5000 J T5E00770
0025 4800 78 | DC /4800 K T5E00780
0026 4400 79 | DC /4400 L T5E00790
0027 4200 80 | DC /4200 M T5E00800
0028 4100 81 | DC /4100 N T5E00810
0029 4080 82 | DC /4080 O T5E00820
002A 4040 83 | DC /4040 P T5E00830
002B 4020 84 | DC /4020 Q T5E00840
002C 4010 85 | DC /4010 R T5E00850
002D 2800 86 | DC /2800 S T5E00860
002E 2400 87 | DC /2400 T T5E00870
002F 2200 88 | DC /2200 U T5E00880
0030 2100 89 | DC /2100 V T5E00890
0031 2080 90 | DC /2080 W T5E00900
0032 2040 91 | DC /2040 X T5E00910
0033 2020 92 | DC /2020 Y T5E00920
0034 2010 93 | DC /2010 Z T5E00930
0035 0000 94 | X DC 0 T5E00940
0033R 95 | HOLTB EQU X-2 T5E00950
0036 96 | END T5E00960
There were no errors in this assembly
=== CROSS REFERENCES ==========================================================
Name Val Defd Referenced
HOLTB 0033R 95
X 0035R 94 95