ASM1130 CROSS ASSEMBLER V1.22 -- V2M12 -- Sun Nov 1 19:25:10 2020
Source File: \u4ebpa.asm
EBCDIC AND PTTC/8 SUBSET TABLE
2 | *************************************************** U4K00020
3 | * * U4K00030
4 | * SUBROUTINE NAME- * U4K00040
5 | * FULL NAME- EBCDIC AND PTTC/8 SUBSET TABLE * U4K00050
6 | * CODE NAME- EBPA * U4K00060
7 | * PURPOSE- THIS TABLE IS USED BY EBPRT,HOLEB, * U4K00070
8 | * PAPEB,PAPHL,PAPPR IN A TABLE LOOKUP CON- * U4K00080
9 | * VERSION TO OR FROM EITHER EBCDIC SUBSET * U4K00090
10 | * OR PTTC/8 SUBSET CODE. * U4K00100
11 | * METHOD-N/A * U4K00110
12 | * CAPABILITIES AND LIMITATIONS- N/A * U4K00120
13 | * SPECIAL FEATURES- N/A * U4K00130
14 | * ADDITIONAL INFORMATION- * U4K00140
15 | * ESTIMATED EXECUTION TIME- N/A * U4K00150
16 | * * U4K00160
17 | *************************************************** U4K00170
EBCDIC AND PTTC/8 SUBSET TABLE
19 | LIBR U4K00190
20 | ENT EBPA U4K00200
21 | * U4K00210
22 | * BITS 0-7 = EBCDIC, BITS 8-15 = PTTC/8 U4K00220
23 | * (BIT 8 = UPPER CASE INDICATOR) U4K00230
24 | * U4K00240
0000 0000 25 | EBPA DC 0 THE LOADER STORES THE TV U4K00250
0001 0000 26 | DC 0 ADDRESS IN THE THIRD WORD, U4K00260
0002 0000 27 | DC 0 SO THESE ARE NOT USED. U4K00270
0003 4010 28 | DC /4010 SPACE U4K00280
0004 4010 29 | DC /4010 SPACE U4K00290
0005 4010 30 | DC /4010 SPACE U4K00300
0006 056D 31 | DC /056D HORIZONTAL TAB U4K00310
0007 066E 32 | DC /066E LOWER CASE U4K00320
0008 077F 33 | DC /077F DELETE U4K00330
0009 144C 34 | DC /144C RESTORE U4K00340
000A 15DD 35 | DC /15DD NEW LINE U4K00350
000B 165E 36 | DC /165E BACKSPACE U4K00360
000C 253D 37 | DC /253D LINE FEED U4K00370
000D 263E 38 | DC /263E END OF BLOCK U4K00380
000E 350D 39 | DC /350D READER STOP U4K00390
000F 360E 40 | DC /360E UPPER CASE U4K00400
41 | * U4K00410
0010 4AA0 42 | DC /4AA0 CENT U4K00420
0011 4C82 43 | DC /4C82 LESS THAN U4K00430
0012 4FBB 44 | DC /4FBB LOGICAL OR U4K00440
0013 5ADB 45 | DC /5ADB EXCLAMATION POINT U4K00450
0014 5E93 46 | DC /5E93 SEMICOLON U4K00460
0015 5FEB 47 | DC /5FEB LOGICAL NOT U4K00470
0016 6C95 48 | DC /6C95 PERCENT U4K00480
0017 6DC0 49 | DC /6DC0 UNDERSCORE U4K00490
0018 6E87 50 | DC /6E87 GREATER THAN U4K00500
0019 6FB1 51 | DC /6FB1 QUESTION MARK U4K00510
001A 7A84 52 | DC /7A84 COLON U4K00520
001B 7B0B 53 | DC /7B0B POUND U4K00530
001C 7D96 54 | DC /7D96 APOSTROPHE U4K00540
001D 7F8B 55 | DC /7F8B QUOTE U4K00550
56 | * U4K00560
001E 4B6B 57 | DC /4B6B PERIOD U4K00570
001F 4D99 58 | DC /4D99 LEFT PARENTHESIS U4K00580
0020 5B5B 59 | DC /5B5B DOLLAR SIGN U4K00590
0021 5C88 60 | DC /5C88 ASTERISK U4K00600
0022 5D9A 61 | DC /5D9A RIGHT PARENTHESIS U4K00610
0023 6131 62 | DC /6131 SLASH U4K00620
0024 6B3B 63 | DC /6B3B COMMA U4K00630
0025 7C20 64 | DC /7C20 AT U4K00640
0026 7E81 65 | DC /7E81 EQUAL U4K00650
66 | * U4K00660
0027 E9A9 67 | DC /E9A9 Z U4K00670
0028 E8B8 68 | DC /E8B8 Y U4K00680
0029 E7B7 69 | DC /E7B7 X U4K00690
002A E6A6 70 | DC /E6A6 W U4K00700
002B E5A5 71 | DC /E5A5 V U4K00710
002C E4B4 72 | DC /E4B4 U U4K00720
002D E3A3 73 | DC /E3A3 T U4K00730
002E E2B2 74 | DC /E2B2 S U4K00740
75 | * U4K00750
002F D9C9 76 | DC /D9C9 R U4K00760
0030 D8D8 77 | DC /D8D8 Q U4K00770
0031 D7D7 78 | DC /D7D7 P U4K00780
0032 D6C6 79 | DC /D6C6 O (ALPHA) U4K00790
0033 D5C5 80 | DC /D5C5 N U4K00800
0034 D4D4 81 | DC /D4D4 M U4K00810
0035 D3C3 82 | DC /D3C3 L U4K00820
0036 D2D2 83 | DC /D2D2 K U4K00830
0037 D1D1 84 | DC /D1D1 J U4K00840
85 | * U4K00850
0038 C9F9 86 | DC /C9F9 I U4K00860
0039 C8E8 87 | DC /C8E8 H U4K00870
003A C7E7 88 | DC /C7E7 G U4K00880
003B C6F6 89 | DC /C6F6 F U4K00890
003C C5F5 90 | DC /C5F5 E U4K00900
003D C4E4 91 | DC /C4E4 D U4K00910
003E C3F3 92 | DC /C3F3 C U4K00920
003F C2E2 93 | DC /C2E2 B U4K00930
0040 C1E1 94 | DC /C1E1 A U4K00940
95 | * U4K00950
0041 F919 96 | DC /F919 9 U4K00960
0042 F808 97 | DC /F808 8 U4K00970
0043 F707 98 | DC /F707 7 U4K00980
0044 F616 99 | DC /F616 6 U4K00990
0045 F515 100 | DC /F515 5 U4K01000
0046 F404 101 | DC /F404 4 U4K01010
0047 F313 102 | DC /F313 3 U4K01020
0048 F202 103 | DC /F202 2 U4K01030
0049 F101 104 | DC /F101 1 U4K01040
004A F01A 105 | DC /F01A 0 (NUMERIC) U4K01050
106 | * U4K01060
004B 6040 107 | DC /6040 DASH U4K01070
004C 5070 108 | DC /5070 AMPERSAND U4K01080
004D 4EF0 109 | DC /4EF0 PLUS U4K01090
004E 4010 110 | DC /4010 SPACE U4K01100
004F 111 | END U4K01110
There were no errors in this assembly
=== CROSS REFERENCES ==========================================================
Name Val Defd Referenced
EBPA 0000R 25