ASM1130 CROSS ASSEMBLER V1.22 -- V2M12 -- Sun Nov 1 19:25:10 2020 Source File: \u4prty.asm 1 | *************************************************** U4Q00010 2 | * * U4Q00020 3 | * SUBROUTINE NAME- * U4Q00030 4 | * FULL NAME- 1053 AND 1403 CODE TABLE * U4Q00040 5 | * CODE NAME- PRTY * U4Q00050 6 | * PURPOSE- THIS TABLE IS USED BY EBPRT,HOLPR, * U4Q00060 7 | * AND PAPPR IN A TABLE LOOKUP CONVERSION * U4Q00070 8 | * TO OR FROM EITHER 1053 OR 1403 PRINTER * U4Q00080 9 | * CODE. * U4Q00090 10 | * METHOD- N/A * U4Q00100 11 | * CAPABILITIES AND LIMITATIONS- N/A * U4Q00110 12 | * SPECIAL FEATURES- N/A * U4Q00120 13 | * ADDITIONAL INFORMATION- * U4Q00130 14 | * ESTIMATED EXECUTION TIME- N/A * U4Q00140 15 | * OTHER- EACH WORD REPRESENTS ONE CHARACTER, * U4Q00150 16 | * WHERE BITS 0-7 ARE THE 1053 CODE, AND * U4Q00160 17 | * BITS 8-15 ARE THE 1403 CODE. * U4Q00170 18 | * * U4Q00180 19 | *************************************************** U4Q00190 20 | LIBR U4Q00200 21 | ENT PRTY U4Q00210 0000 0000 22 | PRTY DC 0 U4Q00220 0001 0000 23 | DC 0 U4Q00230 0002 0000 24 | DC 0 U4Q00240 0003 217F 25 | DC /217F SPACE U4Q00250 0004 217F 26 | DC /217F SPACE U4Q00260 0005 217F 27 | DC /217F SPACE U4Q00270 0006 417F 28 | DC /417F HORIZONTAL TAB U4Q00280 0007 217F 29 | DC /217F LOWER CASE U4Q00290 0008 217F 30 | DC /217F DELETE U4Q00300 0009 057F 31 | DC /057F RESTORE U4Q00310 000A 817F 32 | DC /817F NEW LINE U4Q00320 000B 117F 33 | DC /117F BACKSPACE U4Q00330 000C 037F 34 | DC /037F LINE FEED U4Q00340 000D 217F 35 | DC /217F END OF BLOCK U4Q00350 000E 097F 36 | DC /097F READER STOP U4Q00360 000F 217F 37 | DC /217F UPPER CASE U4Q00370 38 | * U4Q00380 0010 027F 39 | DC /027F CENT U4Q00390 0011 DE7F 40 | DC /DE7F LESS THAN U4Q00400 0012 C67F 41 | DC /C67F LOGICAL OR U4Q00410 0013 427F 42 | DC /427F EXCLAMATION POINT U4Q00420 0014 D27F 43 | DC /D27F SEMICOLON U4Q00430 0015 F27F 44 | DC /F27F LOGICAL NOT U4Q00440 0016 067F 45 | DC /067F PRECENT U4Q00450 0017 BE7F 46 | DC /BE7F UNDERSCORE U4Q00460 0018 467F 47 | DC /467F GREATER THAN U4Q00470 0019 867F 48 | DC /867F QUESTION MARK U4Q00480 001A 827F 49 | DC /827F COLON U4Q00490 001B C07F 50 | DC /C07F POUND U4Q00500 001C E60B 51 | DC /E60B APOSTROPHE U4Q00510 001D E27F 52 | DC /E27F QUOTE U4Q00520 53 | * U4Q00530 001E 006E 54 | DC /006E PERIOD U4Q00540 001F FE57 55 | DC /FE57 LEFT PARENTHESIS U4Q00550 0020 4062 56 | DC /4062 DOLLAR SIGN U4Q00560 0021 D623 57 | DC /D623 ASTERISK U4Q00570 0022 F62F 58 | DC /F62F RIGHT PARENTHESIS U4Q00580 0023 BC4C 59 | DC /BC4C SLASH U4Q00590 0024 8016 60 | DC /8016 COMMA U4Q00600 0025 047F 61 | DC /047F AT U4Q00610 0026 C24A 62 | DC /C24A EQUAL U4Q00620 63 | * U4Q00630 0027 A054 64 | DC /A054 Z U4Q00640 0028 A413 65 | DC /A413 Y U4Q00650 0029 9452 66 | DC /9452 X U4Q00660 002A 9051 67 | DC /9051 W U4Q00670 002B B410 68 | DC /B410 V U4Q00680 002C B04F 69 | DC /B04F U U4Q00690 002D 9C0E 70 | DC /9C0E T U4Q00700 002E 980D 71 | DC /980D S U4Q00710 72 | * U4Q00720 002F 6020 73 | DC /6020 R U4Q00730 0030 641F 74 | DC /641F Q U4Q00740 0031 545E 75 | DC /545E P U4Q00750 0032 505D 76 | DC /505D O (ALPHA) U4Q00760 0033 741C 77 | DC /741C N U4Q00770 0034 705B 78 | DC /705B M U4Q00780 0035 5C1A 79 | DC /5C1A L U4Q00790 0036 5819 80 | DC /5819 K U4Q00800 0037 7C58 81 | DC /7C58 J U4Q00810 82 | * U4Q00820 0038 202C 83 | DC /202C I U4Q00830 0039 246B 84 | DC /246B H U4Q00840 003A 142A 85 | DC /142A G U4Q00850 003B 1029 86 | DC /1029 F U4Q00860 003C 3468 87 | DC /3468 E U4Q00870 003D 3067 88 | DC /3067 D U4Q00880 003E 1C26 89 | DC /1C26 C U4Q00890 003F 1825 90 | DC /1825 B U4Q00900 0040 3C64 91 | DC /3C64 A U4Q00910 92 | * U4Q00920 0041 E008 93 | DC /E008 9 U4Q00930 0042 E407 94 | DC /E407 8 U4Q00940 0043 D446 95 | DC /D446 7 U4Q00950 0044 D045 96 | DC /D045 6 U4Q00960 0045 F404 97 | DC /F404 5 U4Q00970 0046 F043 98 | DC /F043 4 U4Q00980 0047 DC02 99 | DC /DC02 3 U4Q00990 0048 D801 100 | DC /D801 2 U4Q01000 0049 FC40 101 | DC /FC40 1 U4Q01010 004A C449 102 | DC /C449 0 (NUMERIC) U4Q01020 103 | * U4Q01030 004B 8461 104 | DC /8461 DASH U4Q01040 004C 4415 105 | DC /4415 AMPERSAND U4Q01050 004D DA6D 106 | DC /DA6D PLUS U4Q01060 004E 217F 107 | DC /217F SPACE U4Q01070 004F 108 | END U4Q01080 There were no errors in this assembly === CROSS REFERENCES ========================================================== Name Val Defd Referenced PRTY 0000R 22