ASM1130 CROSS ASSEMBLER V1.22 -- V2M12 -- Sun Nov 1 19:25:08 2020 Source File: \t5ebctb.asm 1 | * JULY 6,1967 T5B00010 EBCTB 3 | * SINGLE DEVICE EBC TABLE T5B00030 4 | LIBR T5B00040 5 | *************************************************** T5B00050 6 | * * T5B00060 7 | *STATUS-VERSION 2, MODIFICATION 0 * T5B00070 8 | * * T5B00080 9 | *FUNCTION/OPERATION- * T5B00090 10 | * TABLE TO CONVERT DATA FROM EBC TO TYPEWRITER * T5B00100 11 | * CODE OR VICE-VERSA. BITS 0-7 OF EACH WORD * T5B00110 12 | * CONTAIN THE EBC CHARACTER REPRESENTATION * T5B00120 13 | * AND BITS 8-15 THE TYPEWRITER CODE. * T5B00130 14 | * THE TABLE ADDRESS IS OBTAINED FROM THE LIBF * T5B00140 15 | * TRANSFER VECTOR BY THE GETAD SUBROUTINE AND * T5B00150 16 | * IS USED BY THE HOLEZ SUBROUTINE FOR CONVERSION* T5B00160 17 | * * T5B00170 18 | *ENTRY POINTS- * T5B00180 19 | * * EBCTB * T5B00190 20 | * * T5B00200 21 | *INPUT-N/A * T5B00210 22 | * * T5B00220 23 | *OUTPUT-N/A * T5B00230 24 | * * T5B00240 25 | *EXTERNAL REFERENCES-N/A * T5B00250 26 | * * T5B00260 27 | *EXITS-N/A * T5B00270 28 | * * T5B00280 29 | *TABLES/WORK AREAS-N/A * T5B00290 30 | *ATTRIBUTES-RELOCATABLE * T5B00300 31 | * * T5B00310 32 | *NOTES-N/A * T5B00320 33 | * * T5B00330 34 | *************************************************** T5B00340 EBCTB 36 | ENT EBCTB T5B00360 37 | * T5B00370 38 | * THE FOLLOWING CHARACTERS ARE TYPE- T5B00380 39 | * WRITER CONTROL CHARACTERS AND ARE T5B00390 40 | * USED ONLY BY THE TYPEWRITER CONVERT T5B00400 41 | * SUBROUTINES WRTYZ AND TYPEZ T5B00410 42 | * T5B00420 0000 1611 43 | DC /1611 BACKSPACE T5B00430 0001 1581 44 | DC /1581 CARRIER RETURN T5B00440 0002 2503 45 | DC /2503 LINE FEED T5B00450 0003 1405 46 | DC /1405 SHIFT TO PRINT BLACK T5B00460 0004 3509 47 | DC /3509 SHIFT TO PRINT RED T5B00470 0005 0541 48 | DC /0541 TABULATE T5B00480 49 | * T5B00490 50 | * EBC-TYPEWRITER TABLE T5B00500 51 | * T5B00510 0006 4021 52 | DC /4021 BLANK T5B00520 0007 F0C4 53 | DC /F0C4 0 T5B00530 0008 F1FC 54 | DC /F1FC 1 T5B00540 0009 F2D8 55 | DC /F2D8 2 T5B00550 000A F3DC 56 | DC /F3DC 3 T5B00560 000B F4F0 57 | DC /F4F0 4 T5B00570 000C F5F4 58 | DC /F5F4 5 T5B00580 000D F6D0 59 | DC /F6D0 6 T5B00590 000E F7D4 60 | DC /F7D4 7 T5B00600 000F F8E4 61 | DC /F8E4 8 T5B00610 0010 F9E0 62 | DC /F9E0 9 T5B00620 0011 6084 63 | DC /6084 - T5B00630 0012 4B00 64 | DC /4B00 . T5B00640 0013 C534 65 | DC /C534 E T5B00650 0014 4EDA 66 | DC /4EDA PLUS T5B00660 0015 5044 67 | DC /5044 AMPERSAND T5B00670 0016 7EC2 68 | DC /7EC2 EQUAL T5B00680 0017 5DF6 69 | DC /5DF6 RIGHT PAREN T5B00690 0018 4DFE 70 | DC /4DFE LEFT PAREN T5B00700 0019 6B80 71 | DC /6B80 , T5B00710 001A 7DE6 72 | DC /7DE6 APOSTROPHE T5B00720 001B 61BC 73 | DC /61BC / T5B00730 001C 5CD6 74 | DC /5CD6 * T5B00740 001D 5B40 75 | DC /5B40 $ T5B00750 001E 4CDE 76 | DC /4CDE LESS THAN T5B00760 001F 6C06 77 | DC /6C06 PERCENT T5B00770 0020 7BC0 78 | DC /7BC0 POUND SIGN T5B00780 0021 7C04 79 | DC /7C04 AT SIGN T5B00790 0022 C13C 80 | DC /C13C A T5B00800 0023 C218 81 | DC /C218 B T5B00810 0024 C31C 82 | DC /C31C C T5B00820 0025 C430 83 | DC /C430 D T5B00830 0026 C610 84 | DC /C610 F T5B00840 0027 C714 85 | DC /C714 G T5B00850 0028 C824 86 | DC /C824 H T5B00860 0029 C920 87 | DC /C920 I T5B00870 002A D17C 88 | DC /D17C J T5B00880 002B D258 89 | DC /D258 K T5B00890 002C D35C 90 | DC /D35C L T5B00900 002D D470 91 | DC /D470 M T5B00910 002E D574 92 | DC /D574 N T5B00920 002F D650 93 | DC /D650 O T5B00930 0030 D754 94 | DC /D754 P T5B00940 0031 D864 95 | DC /D864 Q T5B00950 0032 D960 96 | DC /D960 R T5B00960 0033 E298 97 | DC /E298 S T5B00970 0034 E39C 98 | DC /E39C T T5B00980 0035 E4B0 99 | DC /E4B0 U T5B00990 0036 E5B4 100 | DC /E5B4 V T5B01000 0037 E690 101 | DC /E690 W T5B01010 0038 E794 102 | DC /E794 X T5B01020 0039 E8A4 103 | DC /E8A4 Y T5B01030 003A E9A0 104 | DC /E9A0 Z T5B01040 003B 0000 105 | X DC 0 T5B01050 0039R 106 | EBCTB EQU X-2 T5B01060 003C 107 | END T5B01070 There were no errors in this assembly === CROSS REFERENCES ========================================================== Name Val Defd Referenced EBCTB 0039R 106 X 003BR 105 106