ibm:ibm1130-lib:dmsr2v12:v1fchrx_lst
V1FCHRX
| Table Of Contents |
|---|
- v1fchrx.lst
ASM1130 CROSS ASSEMBLER V1.22 -- V2M12 -- Sun Nov 1 19:25:10 2020 Source File: \v1fchrx.asm 1 | *************************************************** V1G00010 2 | * * V1G00020 3 | * STATUS - VERSION 2, MODIFICATION 8 V1G00030 4 | * SUBROUTINE NAME- * V1G00040 5 | * FULL NAME- STANDARD PRECISION ANNOTATION * V1G00050 6 | * SUBROUTINE. * V1G00060 7 | * CODE NAME- FCHRX * V1G00070 8 | * PURPOSE- FORMS THE CHARACTERS SPECIFIED BY * V1G00080 9 | * COMPUTER OUTPUT DATA USING PARAMETERS FROM * V1G00090 10 | * THE CHARACTER SUBROUTINE (FCHAR). * V1G00100 11 | * METHOD- N/A * V1G00110 12 | * CAPABILITIES AND LIMITATIONS- SEE IBM * V1G00120 13 | * 1130/1800 PLOTTER SUBROUTINES MANUAL * V1G00130 14 | * (FORM C26-3755). * V1G00140 15 | * SPECIAL FEATURES- N/A * V1G00150 16 | * ADDITIONAL INFORMATION- N/A * V1G00160 17 | * * V1G00170 18 | *************************************************** V1G00180 19 | * V1G00190 20 | * THE CALL TO THE FCHRX ROUTINE V1G00200 21 | * IS AS FOLLOWS V1G00210 22 | * V1G00220 23 | * LIBF FCHRI V1G00230 24 | * DC 0 V1G00240 25 | * DC BUFFER OF CHARACTERS TO PLOT V1G00250 26 | * DC 0 V1G00260 27 | * V1G00270 28 | * LIBF WCHRI V1G00280 29 | * XR1 = BUFFER ADDRESS 2-8 V1G00290 30 | * XR2 = CHAR COUNT 2-8 V1G00300 31 | * V1G00310 32 | * LIBF FCHRX V1G00320 33 | * XR1 = XS+8 V1G00330 34 | * . V1G00340 35 | * . V1G00350 36 | * . V1G00360 37 | * . V1G00370 38 | * XS DEC X-SCALE (REAL) V1G00380 39 | * DEC Y-SCALE (REAL) V1G00390 40 | * DEC COS(THETA) V1G00400 41 | * DEC SIN(THETA) V1G00410 42 | * V1G00420 43 | SPR V1G00430 44 | LIBR V1G00440 45 | ENT FCHRX ENTRY FROM FCHAR CALL V1G00450 46 | ENT FCHRI ENTRY FROM FIO WRITE STMNT V1G00460 47 | ENT WCHRI ENTRY FROM FIO WRITE STMNT V1G00470 0000 6A0C 48 | WCHRI STX 2 CNT SET CHARACTER COUNT V1G00480 0001 6680 0000 49 | LDX I2 *-* SET EXIT V1G00490 0003 6A18 50 | STX 2 EXIT V1G00500 0004 6913 51 | STX 1 SV1 SAVE XR1 V1G00510 0005 6A14 52 | STX 2 SV2 SAVE XR2 V1G00520 0006 6600 014CR 53 | LDX L2 V SET XR2 WITH V V1G00530 0008 C035 54 | LD AN0 SET 1 CHARACTER/WORD SWITCH V1G00540 0009 D03D 55 | STO AN1 V1G00550 000A 6D00 00CCR 56 | STX L1 ADD SET BUFFER ADDRESS V1G00560 000C 702A 57 | MDX AN V1G00570 000D 0000 58 | CNT DC *-* CHARACTER COUNT V1G00580 000E 740A 00F1R 59 | XOX MDX L NLET,10 MAKE TEN MORE 2-8 V1G00590 0010 C2A5 60 | LD 2 NLET-V GET NUMBER OF LETTERS 2-8 V1G00600 0011 7401 00CFR 61 | MDX L SW3,1 TURN ON CNTRL SW 2-8 V1G00610 0013 706C 62 | MDX MB1 CALCULATE COORDINATES 2-8 V1G00620 0014 74FF 000DR 63 | XOX1 MDX L CNT,-1 SKIP IF BUFFER OUTPUTED V1G00630 0016 7027 64 | MDX AN0 V1G00640 0017 6500 0000 65 | RTN LDX L1 *-* RESTORE XR1 AND XR2 V1G00650 0018R 66 | SV1 EQU *-1 V1G00660 0019 6600 0000 67 | LDX L2 *-* V1G00670 001AR 68 | SV2 EQU *-1 V1G00680 001B 4C00 0000 69 | BSC L *-* EXIT V1G00690 001CR 70 | EXIT EQU *-1 RETURN V1G00700 001D 69FA 71 | FCHRI STX 1 SV1 SAVE XR1 V1G00710 001E 6580 0000 72 | LDX I1 *-* V1G00720 0020 6AF9 73 | STX 2 SV2 SAVE XR2 V1G00730 0021 6600 014CR 74 | LDX L2 V SET XR2 WITH V V1G00740 0023 C101 75 | LD 1 1 GET ADDRESS OF BUFFER V1G00750 0024 82A4 76 | A 2 H0002-V V1G00760 0025 D280 77 | STO 2 ADD-V V1G00770 0026 92A4 78 | S 2 H0002-V GET COUNT V1G00780 0027 D001 79 | STO *+1 V1G00790 0028 C400 0000 80 | LD L *-* LOAD COUNT V1G00800 002A 92A3 81 | S 2 H0001-V V1G00810 002B 1001 82 | SLA 1 V1G00820 002C D0E0 83 | STO CNT CHARACTER COUNT V1G00830 002D 7102 84 | MDX 1 2 V1G00840 002E 69ED 85 | STX 1 EXIT SET EXIT IF TEST FUNCTION V1G00850 002F C1FE 86 | LD 1 -2 V1G00860 0030 4C18 0017R 87 | BSC L RTN,+- BRANCH IF FIO TEST FUNCTION V1G00870 0032 7101 88 | MDX 1 1 V1G00880 0033 69E8 89 | STX 1 EXIT SET FOR NORMAL RETURN V1G00890 0034 C03A 90 | LD CN1 SET FOR MULTIPLE FIO V1G00900 0035 D011 91 | STO AN1 MODIFY INST TO SLA 16 V1G00910 0036 1010 92 | SLA 16 NORMALIZE SW1 V1G00920 0037 D281 93 | AN STO 2 SW1-V V1G00930 0038 10A0 94 | SLT 32 2-8 V1G00940 0039 D2A5 95 | STO 2 NLET-V CLEAR 2-8 V1G00950 003A DAA8 96 | STD 2 XLAST-V CLEAR XLAST,YLAST 2-8 V1G00960 003B C0D1 97 | LD CNT CHECK FOR ZERO COUNT V1G00970 003C 4C18 0017R 98 | BSC L RTN,+- BRANCH IF NO BUFFER V1G00980 003E C281 99 | AN0 LD 2 SW1-V SW1 NORMAL V1G00990 003F 4C20 0047R 100 | BSC L AN1,Z BRANCH IF N0 V1G01000 0041 6C00 00CDR 101 | STX L0 SW1 TAG SW1 V1G01010 0043 C480 00CCR 102 | LD I ADD GET LEFT CHARACTER V1G01020 0045 1808 103 | SRA 8 V1G01030 0046 7007 104 | MDX AN2 V1G01040 0047 1010 105 | AN1 SLA 16 -*- NORMALIZE SW1 V1G01050 0048 D281 106 | STO 2 SW1-V V1G01060 0049 C480 00CCR 107 | LD I ADD GET RIGHT CHARACTER V1G01070 004B E2A2 108 | AND 2 H00FF-V V1G01080 004C 7401 00CCR 109 | MDX L ADD,1 INCREMENT ADD V1G01090 110 | * STATEMENT REMOVED 2-8 V1G01100 004E D284 111 | AN2 STO 2 SVCH-V SAVE CHARACTER V1G01110 004F 6500 0123R 112 | LDX L1 TABLE POINT XR1 TO CHAR TABLE V1G01120 0051 C100 113 | AN3 LD 1 0 FETCH A CHARACTER V1G01130 0052 4C18 005FR 114 | BSC L AN4,+- BR IF END OF TABLE V1G01140 0054 1888 115 | SRT 8 V1G01150 0055 E2A2 116 | AND 2 H00FF-V COMPARE RIGHT 8 BITS WITH V1G01160 0056 F284 117 | EOR 2 SVCH-V *SAVED CHARACTER V1G01170 0057 4C18 0061R 118 | BSC L AN5,+- BRANCH IF MATCH V1G01180 0059 1808 119 | SRA 8 V1G01190 005A 1088 120 | SLT 8 V1G01200 005B D001 121 | STO *+1 V1G01210 005C 7500 0000 122 | MDX L1 *-* V1G01220 123 | * STATEMENT REMOVED 2-8 V1G01230 005E 70F2 124 | MDX AN3 TRY NEXT CHARACTER V1G01240 005F 6500 022BR 125 | AN4 LDX L1 LBLK-1 NOT IN TABLE, SUPPLY BLANK V1G01250 0061 7101 126 | AN5 MDX 1 1 V1G01260 0062 696E 127 | STX 1 STRNG V1G01270 0063 1010 128 | SLA 16 NORMALIZE SW2 V1G01280 0064 D069 129 | STO SW2 V1G01290 0065 D06E 130 | STO XN XN = 0 V1G01300 0066 D06F 131 | STO YN YN = 0 V1G01310 0067 C066 132 | CNO LD SW2 SW2 NORMAL V1G01320 0068 4C20 006FR 133 | BSC L CN1,Z BRANCH IF NO V1G01330 006A 6863 134 | STX 0 SW2 TAG SW2 V1G01340 006B C480 00D1R 135 | LD I STRNG GET LEFT COORDINATE V1G01350 006D 1808 136 | SRA 8 V1G01360 006E 7007 137 | MDX CN2 V1G01370 006F 1010 138 | CN1 SLA 16 NORMALIZE SW2 V1G01380 0070 D05D 139 | STO SW2 V1G01390 0071 C480 00D1R 140 | LD I STRNG GET RIGHT COORDINATE V1G01400 0073 E2A2 141 | AND 2 H00FF-V 2-8 V1G01410 0074 7401 00D1R 142 | MDX L STRNG,1 INCREMENT STRNG V1G01420 143 | * STATEMENT REMOVD 2-8 V1G01430 0076 1884 144 | CN2 SRT 4 SET UP XN+1,YN+1 V1G01440 0077 4C18 00C1R 145 | BSC L CNTL,+- IS CORDINATE A CONTROL V1G01450 0079 9075 146 | S H0001 V1G01460 007A D05A 147 | STO XN+1 V1G01470 007B 1804 148 | SRA 4 V1G01480 007C 1084 149 | SLT 4 V1G01490 007D 9071 150 | S H0001 V1G01500 007E D058 151 | STO YN+1 V1G01510 007F C055 152 | LD XN+1 CALCULATE DELTA X = V1G01520 0080 064D*6063 153 | MB1 LIBF FLOAT (XN+1)*SIZEX 2-8 V1G01530 0081 0651*7A00 154 | LIBF FMPY V1G01540 0082 00E0R 155 | DC XC V1G01550 0083 0651*7A00 156 | LIBF FMPY MULTIPLY C/FAC BY CONSTANT V1G01560 0084 00DCR 157 | DC C10 *IN C10 V1G01570 0085 0604*4100 158 | LIBF FADD ADD TO C/ADDR IN CP5 V1G01580 0086 00E8R 159 | DC CP5 V1G01590 0087 0918*99C0 160 | LIBF IFIX CONVERT TO FIXED POINT NO. V1G01600 0088 D04F 161 | STO DELTX V1G01610 0089 C045 162 | LD SW3 GET CNTRL SW 2-8 V1G01620 008A 4C20 00CAR 163 | BSC L MOD2,Z CONTINUE IF NOT ON 2-8 V1G01630 008C C04A 164 | LD YN+1 CALCULATE DELTA Y = V1G01640 008D 064D*6063 165 | LIBF FLOAT (YN+1)*SIZEY V1G01650 008E 0651*7A00 166 | LIBF FMPY MULTIPLY C/FAC BY C/YC V1G01660 008F 00E2R 167 | DC YC V1G01670 0090 0651*7A00 168 | LIBF FMPY MULTIPLY C/FAC BY V1G01680 0091 00DCR 169 | DC C10 *CONSTANT 10 V1G01690 0092 0604*4100 170 | LIBF FADD V1G01700 0093 00E8R 171 | DC CP5 V1G01710 0094 0918*99C0 172 | LIBF IFIX CONVERT C/FAC TO INTEGER V1G01720 0095 D043 173 | MB2 STO DELTY *AND PACK UP IN ACC 2-8 V1G01730 174 | * STATEMENTS REMOVED 2-8 V1G01740 0096 A03B 175 | M SINT V1G01750 0097 D852 176 | STD TEMP DOUBLE STORE V1G01760 0098 C03F 177 | LD DELTX V1G01770 0099 A039 178 | M COST V1G01780 009A 984F 179 | SD TEMP V1G01790 009B 8850 180 | AD ROUND V1G01800 009C 1081 181 | SLT 1 V1G01810 009D D03C 182 | STO X1 COMPUTED X1 2-8 V1G01820 183 | * STATEMENTS REMOVED 2-8 V1G01830 009E C03A 184 | LD DELTY COMPUTE Y1 AND PYN V1G01840 009F A033 185 | M COST V1G01850 00A0 D849 186 | STD TEMP V1G01860 00A1 C036 187 | LD DELTX V1G01870 00A2 A02F 188 | M SINT MULTIPLY BY INTEGER V1G01880 00A3 8846 189 | AD TEMP V1G01890 00A4 8847 190 | AD ROUND V1G01900 00A5 1081 191 | SLT 1 V1G01910 00A6 D034 192 | STO Y1 COMPUTED Y1 2-8 V1G01920 00A7 C027 193 | LD SW3 TEST IF CNTRL SW ON 2-8 V1G01930 00A8 4C20 00F6R 194 | BSC L MOD3,Z BRANCH IF ON 2-8 V1G01940 00AA C02F 195 | LD X1 2-8 V1G01950 00AB 9028 196 | S XN 2-8 V1G01960 00AC D02D 197 | STO X1 2-8 V1G01970 00AD 8026 198 | A XN 2-8 V1G01980 00AE D025 199 | STO XN 2-8 V1G01990 00AF C02B 200 | LD Y1 2-8 V1G02000 00B0 9025 201 | S YN V1G02010 00B1 D029 202 | STO Y1 COMPUTED Y1 V1G02020 00B2 8023 203 | A YN V1G02030 00B3 D022 204 | STO YN V1G02040 00B4 0625*50C0 205 | LIBF FINC UPDATE SYSTEM X,Y V1G02050 00B5 00DAR 206 | DC X1 V1G02060 00B6 00DBR 207 | DC Y1 V1G02070 00B7 27A1*74E3 208 | LIBF XYPLT MOVE THE PEN V1G02080 00B8 00DAR 209 | DC X1 V1G02090 00B9 00DBR 210 | DC Y1 V1G02100 00BA C037 211 | LD XINC 2-8 V1G02110 00BB 801E 212 | A X1 2-8 V1G02120 00BC D035 213 | STO XINC ACCUMULATE X INCR 2-8 V1G02130 00BD C035 214 | LD YINC 2-8 V1G02140 00BE 801C 215 | A Y1 2-8 V1G02150 00BF D033 216 | STO YINC ACCUMULATE Y INCR 2-8 V1G02160 00C0 70A6 217 | MDX CNO BRANCH TO TEST SW2 V1G02170 00C1 1804 218 | CNTL SRA 4 STOP CONTROL V1G02180 00C2 1084 219 | SLT 4 V1G02190 00C3 D004 220 | STO CNTLX SET CONTROL PARAMETER V1G02200 00C4 902A 221 | S H0001 IS IT END OF STRING V1G02210 00C5 4C18 000ER 222 | BSC L XOX,+- BRANCH IF YES V1G02220 00C7 174D*68C9 223 | LIBF PLOTI PLOT CONTROL V1G02230 00C8 0000 224 | CNTLX DC *-* CONTROL PARAMETER V1G02240 00C9 709D 225 | MDX CNO BRANCH TO TEST SW2 V1G02250 226 | * 2-8 V1G02260 00CA 1010 227 | MOD2 SLA 16 2-8 V1G02270 00CB 70C9 228 | MDX MB2 CONTINUE 2-8 V1G02280 229 | * V1G02290 230 | * PROGRAM CONSTANTS V1G02300 231 | * V1G02310 014CR 232 | V EQU *+128 V1G02320 00CC 0000 233 | ADD DC *-* ARRAY (ONE WORD INTEGER) V1G02330 00CD 0000 234 | SW1 DC *-* LEFT/RIGHT EBCDIC CHAR V1G02340 00CE 0000 235 | SW2 DC *-* LEFT/RIGHT VALUE IN TABLE V1G02350 00CF 0000 236 | SW3 DC *-* CONTROL SWITCH 2-8 V1G02360 00D0 0000 237 | SVCH DC *-* SAVED CHARACTER V1G02370 00D1 0000 238 | STRNG DC *-* COORDINATES, LEFT & RIGHT V1G02380 00D2 0000 239 | SINT DC *-* SAVED INTEGER V1G02390 00D3 7FFF 240 | COST DC /7FFF V1G02400 00D4 0000 241 | XN DC *-* V1G02410 00D5 0000 242 | DC *-* V1G02420 00D6 0000 243 | YN DC *-* V1G02430 00D7 0000 244 | DC *-* V1G02440 00D8 0000 245 | DELTX DC *-* V1G02450 00D9 0000 246 | DELTY DC *-* V1G02460 00DA 247 | BSS E 0 2-8 V1G02470 00DA 0000 248 | X1 DC *-* V1G02480 00DB 0000 249 | Y1 DC *-* V1G02490 00DC 5000 0084 250 | C10 DEC 10. V1G02500 00DE 7FFF 008F 251 | C32K DEC 32767. CONSTANT V1G02510 00E0 6666 667D 252 | XC DEC .1 CHAR SIZE X V1G02520 00E2 6666 667D 253 | YC DEC .1 CHAR SIZE Y V1G02530 00E4 0000 0000 254 | CCOS DEC 0. V1G02540 00E6 4000 0081 255 | CSIN DEC 1. V1G02550 00E8 4000 0080 256 | CP5 DEC .5 V1G02560 00EA 0000 257 | TEMP DC 0 V1G02570 00EB 0000 258 | DC 0 V1G02580 00EC 0000 259 | ROUND DC /0000 EVEN ADDRESS V1G02590 00ED 4000 260 | DC /4000 CONSTANT V1G02600 00EE 00FF 261 | H00FF DC /00FF MASK TO REMOVE LAST BITS V1G02610 00EF 0001 262 | H0001 DC /1 CONSTANT V1G02620 00F0 0002 263 | H0002 DC /2 CONSTANT V1G02630 00F1 0000 264 | NLET DC *-* NUMBER OF LETTERS 2-8 V1G02640 00F2 265 | BSS E 0 2-8 V1G02650 00F2 0000 266 | XINC DC *-* INCREMENT STORAGE 2-8 V1G02660 00F3 0000 267 | YINC DC *-* INCREMENT STORAGE 2-8 V1G02670 00F4 0000 268 | XLAST DC *-* LAST X COORDINATE 2-8 V1G02680 00F5 0000 269 | YLAST DC *-* LAST Y COORDINATE 2-8 V1G02690 270 | * 2-8 V1G02700 00F6 C0E3 271 | MOD3 LD X1 GET COORDINATE 2-8 V1G02710 00F7 90FC 272 | S XLAST SUBTRACT LAST COORD 2-8 V1G02720 00F8 90F9 273 | S XINC SUBTRACT COMPUTED COOR 2-8 V1G02730 00F9 D0F8 274 | STO XINC DIFFERENCE IN XINC 2-8 V1G02740 00FA C0E0 275 | LD Y1 DO SAME FOR Y 2-8 V1G02750 00FB 90F9 276 | S YLAST 2-8 V1G02760 00FC 90F6 277 | S YINC 2-8 V1G02770 00FD D0F5 278 | STO YINC 2-8 V1G02780 00FE 0625*50C0 279 | LIBF FINC UPDATE SYSTEM (X,Y) 2-8 V1G02790 00FF 00F2R 280 | DC XINC 2-8 V1G02800 0100 00F3R 281 | DC YINC 2-8 V1G02810 0101 27A1*74E3 282 | LIBF XYPLT MOVE PEN 2-8 V1G02820 0102 00F2R 283 | DC XINC 2-8 V1G02830 0103 00F3R 284 | DC YINC 2-8 V1G02840 0104 C8D5 285 | LDD X1 2-8 V1G02850 0105 D8EE 286 | STD XLAST UPDATE XLAST,YLAST 2-8 V1G02860 0106 10A0 287 | SLT 32 2-8 V1G02870 0107 D0C7 288 | STO SW3 TURN OFF CNTRL SW 2-8 V1G02880 0108 D8E9 289 | STD XINC CLEAR XINC,YINC 2-8 V1G02890 0109 4C00 0014R 290 | BSC L XOX1 RETURN 2-8 V1G02900 291 | * V1G02910 010B 7002 292 | FCHRX MDX *+2 V1G02920 010C 4C80 0000 293 | BSC I *-* RETURN V1G02930 010E 6902 294 | STX 1 YLP+1 V1G02940 010F 61F8 295 | LDX 1 -8 GET XC,YC,CCOS,CSIN V1G02950 0110 064C*49C0 296 | YLP LIBF FLDX V1G02960 0111 0000 297 | DC *-* V1G02970 0112 068A*35A7 298 | LIBF FSTOX V1G02980 0113 00E8R 299 | DC XC+8 V1G02990 0114 7102 300 | MDX 1 2 V1G03000 0115 70FA 301 | MDX YLP V1G03010 0116 064C*4000 302 | LIBF FLD SINT=SIN(ANGLE)*32768. V1G03020 0117 00E6R 303 | DC CSIN V1G03030 0118 0651*7A00 304 | LIBF FMPY MULTIPLY C/FAC V1G03040 0119 00DER 305 | DC C32K *BY 32,767. V1G03050 011A 0918*99C0 306 | LIBF IFIX CONVERT TO INTEGER V1G03060 011B D0B6 307 | STO SINT SAVE INTEGER V1G03070 011C 064C*4000 308 | LIBF FLD COST=COS(ANGLE)*32768. V1G03080 011D 00E4R 309 | DC CCOS V1G03090 011E 0651*7A00 310 | LIBF FMPY MULTIPLY BY 32,767 V1G03100 011F 00DER 311 | DC C32K V1G03110 0120 0918*99C0 312 | LIBF IFIX CONVERT TO INTEGER V1G03120 0121 D0B1 313 | STO COST *AND STORE V1G03130 0122 70E9 314 | MDX FCHRX+1 V1G03140 315 | * V1G03150 316 | * CHARACTER TABLE V1G03160 317 | * V1G03170 0123 C107 318 | TABLE DC 256*.A+LB-* V1G03180 0124 2100 319 | LA DC /2100 2,1 P.D. V1G03190 0125 466B 320 | DC /466B 4,6 6,11 V1G03200 0126 8646 321 | DC /8646 8,6 4,6 V1G03210 0127 86A1 322 | DC /86A1 8,6 10,1 V1G03220 0128 09B1 323 | DC /09B1 P.U. 11,1 V1G03230 0129 0100 324 | DC /0100 STOP V1G03240 012A C20A 325 | DC 256*.B+LC-* V1G03250 012B 2100 326 | LB DC /2100 2,1 P.D. V1G03260 012C 262B 327 | DC /262B 2,6 2,11 V1G03270 012D 9BAA 328 | DC /9BAA 9,11 10,10 V1G03280 012E A796 329 | DC /A796 10,7 9,6 V1G03290 012F 2696 330 | DC /2696 2,6 9,6 V1G03300 0130 A5A2 331 | DC /A5A2 10,5 10,2 V1G03310 0131 9121 332 | DC /9121 9,1 2,1 V1G03320 0132 09B1 333 | DC /09B1 P.U. 11,1 V1G03330 0133 0100 334 | DC /0100 STOP V1G03340 0134 C307 335 | DC 256*.C+LD-* V1G03350 0135 AA00 336 | LC DC /AA00 10,10 P.D. V1G03360 0136 9B3B 337 | DC /9B3B 9,11 3,11 V1G03370 0137 2A22 338 | DC /2A22 2,10 2,2 V1G03380 0138 3191 339 | DC /3191 3,1 9,1 V1G03390 0139 A209 340 | DC /A209 10,2 P.U. V1G03400 013A B101 341 | DC /B101 11,1 STOP V1G03410 013B C407 342 | DC 256*.D+LE-* V1G03420 013C 2100 343 | LD DC /2100 2,1 P.D. V1G03430 013D 2B9B 344 | DC /2B9B 2,11 V1G03440 013E AAA2 345 | DC /AAA2 10,10 10,2 V1G03450 013F 9121 346 | DC /9121 9,1 2,1 V1G03460 0140 09B1 347 | DC /09B1 P.U. 11,1 V1G03470 0141 0100 348 | DC /0100 STOP V1G03480 0142 C507 349 | DC 256*.E+LF-* V1G03490 0143 AB00 350 | LE DC /AB00 10,11 P.D. V1G03500 0144 2B26 351 | DC /2B26 2,11 2,6 V1G03510 0145 7626 352 | DC /7626 7,6 2,6 V1G03520 0146 21A1 353 | DC /21A1 2,1 10,1 V1G03530 0147 09B1 354 | DC /09B1 P.U. 11,1 V1G03540 0148 0100 355 | DC /0100 STOP V1G03550 0149 C606 356 | DC 256*.F+LG-* V1G03560 014A 2100 357 | LF DC /2100 2,1 P.D. V1G03570 014B 2676 358 | DC /2676 2,6 7,6 V1G03580 014C 262B 359 | DC /262B 2,6 2,11 V1G03590 014D AB09 360 | DC /AB09 10,11 P.U. V1G03600 014E B101 361 | DC /B101 11,1 V1G03610 014F C708 362 | DC 256*.G+LH-* V1G03620 0150 AA00 363 | LG DC /AA00 10,10 P.D. V1G03630 0151 9B3B 364 | DC /9B3B 9,11 3,11 V1G03640 0152 2A22 365 | DC /2A22 2,10 2,2 V1G03650 0153 3191 366 | DC /3191 3,1 9,1 V1G03660 0154 A2A6 367 | DC /A2A6 10,2 10,6 V1G03670 0155 7609 368 | DC /7609 7,6 P.U. V1G03680 0156 B101 369 | DC /B101 11,1 STOP V1G03690 0157 C807 370 | DC 256*.H+LI-* V1G03700 0158 2100 371 | LH DC /2100 2,1 P.D. V1G03710 0159 262B 372 | DC /262B 2,6 2,11 V1G03720 015A 26A6 373 | DC /26A6 2,6 10,6 V1G03730 015B ABA6 374 | DC /ABA6 10,11 10,6 V1G03740 015C A109 375 | DC /A109 10,1 P.U. V1G03750 015D B101 376 | DC /B101 11,1 STOP V1G03760 015E C907 377 | DC 256*.I+LJ-* V1G03770 015F 3100 378 | LI DC /3100 3,1 P.D. V1G03780 0160 6191 379 | DC /6191 6,1 9,1 V1G03790 0161 616B 380 | DC /616B 6,1 6,11 V1G03800 0162 3B6B 381 | DC /3B6B 3,11 V1G03810 0163 9B09 382 | DC /9B09 9,11 P.U. V1G03820 0164 B101 383 | DC /B101 11,1 STOP V1G03830 0165 D106 384 | DC 256*.J+LK-* V1G03840 0166 2300 385 | LJ DC /2300 2,3 P.D. V1G03850 0167 2231 386 | DC /2231 2,2 3,1 V1G03860 0168 91A2 387 | DC /91A2 9,1 10,2 V1G03870 0169 AB09 388 | DC /AB09 10,11 P.U. V1G03880 016A B101 389 | DC /B101 11,1 STOP V1G03890 016B D207 390 | DC 256*.K+LL-* V1G03900 016C 2100 391 | LK DC /2100 2,1 P.D. V1G03910 016D 252B 392 | DC /252B 2,5 2,11 V1G03920 016E 2558 393 | DC /2558 2,5 5,8 V1G03930 016F 8B58 394 | DC /8B58 8,11 5,8 V1G03940 0170 A109 395 | DC /A109 10,1 P.U. V1G03950 0171 B101 396 | DC /B101 11,1 STOP V1G03960 0172 D305 397 | DC 256*.L+LM-* V1G03970 0173 2B00 398 | LL DC /2B00 2,11 P.D. V1G03980 0174 21A1 399 | DC /21A1 2,1 10,1 V1G03990 0175 09B1 400 | DC /09B1 P.U. 11,1 V1G04000 0176 0100 401 | DC /0100 STOP V1G04010 0177 D406 402 | DC 256*.M+LN-* V1G04020 0178 2100 403 | LM DC /2100 2,1 P.D. V1G04030 0179 2B61 404 | DC /2B61 2,11 6,1 V1G04040 017A ABA1 405 | DC /ABA1 10,11 10,1 V1G04050 017B 09B1 406 | DC /09B1 P.U. 11,1 V1G04060 017C 0100 407 | DC /0100 STOP V1G04070 017D D505 408 | DC 256*.N+LO-* V1G04080 017E 2100 409 | LN DC /2100 2,1 P.D. V1G04090 017F 2BA1 410 | DC /2BA1 2,11 10,1 V1G04100 0180 AB09 411 | DC /AB09 10,11 P.U. V1G04110 0181 B101 412 | DC /B101 11,1 STOP V1G04120 0182 D608 413 | DC 256*.O+LP-* V1G04130 0183 2200 414 | LO DC /2200 2,2 P.D. V1G04140 0184 2A3B 415 | DC /2A3B 2,10 3,11 V1G04150 0185 9BAA 416 | DC /9BAA 9,11 10,10 V1G04160 0186 A291 417 | DC /A291 10,2 9,1 V1G04170 0187 3122 418 | DC /3122 3,1 2,2 V1G04180 0188 09B1 419 | DC /09B1 P.U. 11,1 V1G04190 0189 0100 420 | DC /0100 STOP V1G04200 018A D707 421 | DC 256*.P+LQ-* V1G04210 018B 2100 422 | LP DC /2100 2,1 P.D. V1G04220 018C 262B 423 | DC /262B 2,6 2,11 V1G04230 018D 9BAA 424 | DC /9BAA 9,11 10,10 V1G04240 018E A796 425 | DC /A796 10,7 9,6 V1G04250 018F 2609 426 | DC /2609 2,6 P.U. V1G04260 0190 B101 427 | DC /B101 11,1 STOP V1G04270 0191 D80B 428 | DC 256*.Q+LR-* V1G04280 0192 8300 429 | LQ DC /8300 8,3 P.D. V1G04290 0193 92A4 430 | DC /92A4 9,2 10,4 V1G04300 0194 A89A 431 | DC /A89A 10,8 9,10 V1G04310 0195 7B5B 432 | DC /7B5B 7,11 5,11 V1G04320 0196 3A28 433 | DC /3A28 3,10 2,8 V1G04330 0197 2432 434 | DC /2432 2,4 3,2 V1G04340 0198 5171 435 | DC /5171 5,1 7,1 V1G04350 0199 92A1 436 | DC /92A1 9,2 10,1 V1G04360 019A 09B1 437 | DC /09B1 P.U. 11,1 V1G04370 019B 0100 438 | DC /0100 STOP V1G04380 019C D909 439 | DC 256*.R+LS-* V1G04390 019D 2100 440 | LR DC /2100 2,1 P.D. V1G04400 019E 262B 441 | DC /262B 2,6 2,11 V1G04410 019F 9BAA 442 | DC /9BAA 9,11 10,10 V1G04420 01A0 A796 443 | DC /A796 10,7 9,6 V1G04430 01A1 5626 444 | DC /5626 5,6 2,6 V1G04440 01A2 56A1 445 | DC /56A1 5,6 10,1 V1G04450 01A3 09B1 446 | DC /09B1 P.U. 11,1 V1G04460 01A4 0100 447 | DC /0100 STOP V1G04470 01A5 E209 448 | DC 256*.S+LT-* V1G04480 01A6 2200 449 | LS DC /2200 2,2 P.D. V1G04490 01A7 3191 450 | DC /3191 3,1 9,1 V1G04500 01A8 A2A5 451 | DC /A2A5 10,2 10,5 V1G04510 01A9 9636 452 | DC /9636 9,6 3,6 V1G04520 01AA 272A 453 | DC /272A 2,7 2,10 V1G04530 01AB 3B9B 454 | DC /3B9B 3,11 9,11 V1G04540 01AC AA09 455 | DC /AA09 10,10 P.U. V1G04550 01AD B101 456 | DC /B101 11,1 STOP V1G04560 01AE E306 457 | DC 256*.T+LU-* V1G04570 01AF 6100 458 | LT DC /6100 6,1 P.D. V1G04580 01B0 6B2B 459 | DC /6B2B 6,11 2,11 V1G04590 01B1 6BAB 460 | DC /6BAB 6,11 10,11 V1G04600 01B2 09B1 461 | DC /09B1 P.U. 11,1 V1G04610 01B3 0100 462 | DC /0100 STOP V1G04620 01B4 E406 463 | DC 256*.U+LV-* V1G04630 01B5 2B00 464 | LU DC /2B00 2,11 P.D. V1G04640 01B6 2231 465 | DC /2231 2,2 3,1 V1G04650 01B7 91A2 466 | DC /91A2 9,1 10,2 V1G04660 01B8 AB09 467 | DC /AB09 10,11 P.U. V1G04670 01B9 B101 468 | DC /B101 11,1 STOP V1G04680 01BA E505 469 | DC 256*.V+LW-* V1G04690 01BB 2B00 470 | LV DC /2B00 2,11 P.D. V1G04700 01BC 61AB 471 | DC /61AB 6,1 10,11 V1G04710 01BD 09B1 472 | DC /09B1 P.U. 11,1 V1G04720 01BE 0100 473 | DC /0100 STOP V1G04730 01BF E606 474 | DC 256*.W+LX-* V1G04740 01C0 2B00 475 | LW DC /2B00 2,11 P.D. V1G04750 01C1 416B 476 | DC /416B 4,1 6,11 V1G04760 01C2 81AB 477 | DC /81AB 8,1 10,11 V1G04770 01C3 09B1 478 | DC /09B1 P.U. 11,1 V1G04780 01C4 0100 479 | DC /0100 STOP V1G04790 01C5 E707 480 | DC 256*.X+LY-* V1G04800 01C6 2100 481 | LX DC /2100 2,1 P.D. V1G04810 01C7 66AB 482 | DC /66AB 6,6 10,11 V1G04820 01C8 662B 483 | DC /662B 6,6 2,11 V1G04830 01C9 66A1 484 | DC /66A1 6,6 10,1 V1G04840 01CA 09B1 485 | DC /09B1 P.U. 11,1 V1G04850 01CB 0100 486 | DC /0100 STOP V1G04860 01CC E806 487 | DC 256*.Y+LZ-* V1G04870 01CD 2B00 488 | LY DC /2B00 2,11 P.D. V1G04880 01CE 66AB 489 | DC /66AB 6,6 10,11 V1G04890 01CF 6661 490 | DC /6661 6,6 6,1 V1G04900 01D0 09B1 491 | DC /09B1 P.U. 11,1 V1G04910 01D1 0100 492 | DC /0100 STOP V1G04920 01D2 E905 493 | DC 256*.Z+L0-* V1G04930 01D3 2B00 494 | LZ DC /2B00 2,11 P.D. V1G04940 01D4 AB21 495 | DC /AB21 10,11 2,1 V1G04950 01D5 A109 496 | DC /A109 10,1 P.U. V1G04960 01D6 B101 497 | DC /B101 11,1 STOP V1G04970 01D7 F00A 498 | DC 256*.0+L1-* V1G04980 01D8 3200 499 | L0 DC /3200 3,2 P.D. V1G04990 01D9 2428 500 | DC /2428 2,4 2,8 V1G05000 01DA 3A5B 501 | DC /3A5B 3,10 5,11 V1G05010 01DB 7B9A 502 | DC /7B9A 7,11 9,10 V1G05020 01DC A8A4 503 | DC /A8A4 10,8 10,4 V1G05030 01DD 9271 504 | DC /9271 9,2 7,1 V1G05040 01DE 5132 505 | DC /5132 5,1 3,2 V1G05050 01DF 09B1 506 | DC /09B1 P.U. 11,1 V1G05060 01E0 0100 507 | DC /0100 STOP V1G05070 01E1 F106 508 | DC 256*.1+L2-* V1G05080 01E2 3800 509 | L1 DC /3800 3,8 P.D. V1G05090 01E3 6B61 510 | DC /6B61 6,11 6,1 V1G05100 01E4 2161 511 | DC /2161 2,1 6,1 V1G05110 01E5 A109 512 | DC /A109 10,1 P.U. V1G05120 01E6 B101 513 | DC /B101 11,1 STOP V1G05130 01E7 F208 514 | DC 256*.2+L3-* V1G05140 01E8 2A00 515 | L2 DC /2A00 2,10 P.D. V1G05150 01E9 3B9B 516 | DC /3B9B 3,11 9,11 V1G05160 01EA AAA7 517 | DC /AAA7 10,10 10,7 V1G05170 01EB 9636 518 | DC /9636 9,6 3,6 V1G05180 01EC 2521 519 | DC /2521 2,5 2,1 V1G05190 01ED A109 520 | DC /A109 10,1 P.U. V1G05200 01EE B101 521 | DC /B101 11,1 STOP V1G05210 01EF F30A 522 | DC 256*.3+L4-* V1G05220 01F0 2A00 523 | L3 DC /2A00 2,10 P.D. V1G05230 01F1 3B9B 524 | DC /3B9B 3,11 9,11 V1G05240 01F2 AAA7 525 | DC /AAA7 10,10 10,7 V1G05250 01F3 9646 526 | DC /9646 9,6 4,6 V1G05260 01F4 96A5 527 | DC /96A5 9,6 10,5 V1G05270 01F5 A291 528 | DC /A291 10,2 9,1 V1G05280 01F6 3122 529 | DC /3122 3,1 2,2 V1G05290 01F7 09B1 530 | DC /09B1 P.U. 11,1 V1G05300 01F8 0100 531 | DC /0100 STOP V1G05310 01F9 F405 532 | DC 256*.4+L5-* V1G05320 01FA A400 533 | L4 DC /A400 10,4 P.D. V1G05330 01FB 249B 534 | DC /249B 2,4 9,11 V1G05340 01FC 9109 535 | DC /9109 9,1 P.U. V1G05350 01FD B101 536 | DC /B101 11,1 STOP V1G05360 01FE F508 537 | DC 256*.5+L6-* V1G05370 01FF 2200 538 | L5 DC /2200 2,2 P.D. V1G05380 0200 3191 539 | DC /3191 3,1 9,1 V1G05390 0201 A2A6 540 | DC /A2A6 10,2 10,6 V1G05400 0202 9727 541 | DC /9727 9,7 2,7 V1G05410 0203 2BAB 542 | DC /2BAB 2,11 10,11 V1G05420 0204 09B1 543 | DC /09B1 P.U. 11,1 V1G05430 0205 0100 544 | DC /0100 STOP V1G05440 0206 F60A 545 | DC 256*.6+L7-* V1G05450 0207 2500 546 | L6 DC /2500 2,5 P.D. V1G05460 0208 3696 547 | DC /3696 3,6 9,6 V1G05470 0209 A5A2 548 | DC /A5A2 10,5 10,2 V1G05480 020A 9131 549 | DC /9131 9,1 3,1 V1G05490 020B 2225 550 | DC /2225 2,2 2,5 V1G05500 020C 2A3B 551 | DC /2A3B 2,10 3,11 V1G05510 020D 9BAA 552 | DC /9BAA 9,11 10,10 V1G05520 020E 09B1 553 | DC /09B1 P.U. 11,1 V1G05530 020F 0100 554 | DC /0100 STOP V1G05540 0210 F705 555 | DC 256*.7+L8-* V1G05550 0211 2B00 556 | L7 DC /2B00 2,11 P.D. V1G05560 0212 AB21 557 | DC /AB21 10,11 2,1 V1G05570 0213 09B1 558 | DC /09B1 P.U. 11,1 V1G05580 0214 0100 559 | DC /0100 STOP V1G05590 0215 F80C 560 | DC 256*.8+L9-* V1G05600 0216 3100 561 | L8 DC /3100 3,1 P.D. V1G05610 0217 2225 562 | DC /2225 2,2 2,5 V1G05620 0218 3696 563 | DC /3696 3,6 9,6 V1G05630 0219 3627 564 | DC /3627 3,6 2,7 V1G05640 021A 2A3B 565 | DC /2A3B 2,10 3,11 V1G05650 021B 9BAA 566 | DC /9BAA 9,11 10,10 V1G05660 021C A796 567 | DC /A796 10,7 9,6 V1G05670 021D A5A2 568 | DC /A5A2 10,5 10,2 V1G05680 021E 9131 569 | DC /9131 9,1 3,1 V1G05690 021F 09B1 570 | DC /09B1 P.U. 11,1 V1G05700 0220 0100 571 | DC /0100 STOP V1G05710 0221 F90A 572 | DC 256*.9+LBLK-* V1G05720 0222 2200 573 | L9 DC /2200 2,2 P.D. V1G05730 0223 3191 574 | DC /3191 3,1 9,1 V1G05740 0224 A2A7 575 | DC /A2A7 10,2 10,7 V1G05750 0225 AA9B 576 | DC /AA9B 10,10 9,11 V1G05760 0226 3B2A 577 | DC /3B2A 3,11 2,10 V1G05770 0227 2736 578 | DC /2736 2,7 3,6 V1G05780 0228 96A7 579 | DC /96A7 9,6 10,7 V1G05790 0229 09B1 580 | DC /09B1 P.U. 11,1 V1G05800 022A 0100 581 | DC /0100 STOP V1G05810 022B 4002 582 | DC 256*. +LMIN-* V1G05820 022C B101 583 | LBLK DC /B101 11,1 STOP V1G05830 022D 6004 584 | DC 256*.-+LPLS-* V1G05840 022E 3600 585 | LMIN DC /3600 3,6 P.D. V1G05850 022F 9609 586 | DC /9609 9,6 V1G05860 0230 B101 587 | DC /B101 11,1 STOP V1G05870 0231 4E06 588 | DC 256*/4E+LDEC-* V1G05880 0232 3600 589 | LPLS DC /3600 3,6 P.D. V1G05890 0233 9666 590 | DC /9666 9,6 6,6 V1G05900 0234 6966 591 | DC /6966 6,9 6,6 V1G05910 0235 6309 592 | DC /6309 6,3 P.U. V1G05920 0236 B101 593 | DC /B101 11,1 STOP V1G05930 0237 4B06 594 | DC 256*..+LCOM-* V1G05940 0238 5400 595 | LDEC DC /5400 5,4 P.D. V1G05950 0239 5676 596 | DC /5676 5,6 7,6 V1G05960 023A 7454 597 | DC /7454 7,4 5,4 V1G05970 023B 09B1 598 | DC /09B1 P.U. 11,1 V1G05980 023C 0100 599 | DC /0100 STOP V1G05990 023D 6B07 600 | DC 256*.,+LASK-* V1G06000 023E 5100 601 | LCOM DC /5100 5,1 P.D. V1G06010 023F 7374 602 | DC /7374 7,3 7,4 V1G06020 0240 7656 603 | DC /7656 7,6 5,6 V1G06030 0241 5474 604 | DC /5474 5,4 7,4 V1G06040 0242 09B1 605 | DC /09B1 P.U. 11,1 V1G06050 0243 0100 606 | DC /0100 STOP V1G06060 0244 5C09 607 | DC 256*.*+LSLA-* V1G06070 0245 4400 608 | LASK DC /4400 4,4 P.D. V1G06080 0246 6688 609 | DC /6688 6,6 8,8 V1G06090 0247 6648 610 | DC /6648 6,6 4,8 V1G06100 0248 6684 611 | DC /6684 6,6 8,4 V1G06110 0249 6636 612 | DC /6636 6,6 3,6 V1G06120 024A 6696 613 | DC /6696 6,6 9,6 V1G06130 024B 09B1 614 | DC /09B1 P.U. 11,1 V1G06140 024C 0100 615 | DC /0100 STOP V1G06150 024D 6104 616 | DC 256*./+LEQU-* V1G06160 024E 2200 617 | LSLA DC /2200 2,2 P.D. V1G06170 024F AA09 618 | DC /AA09 10,10 P.U. V1G06180 0250 B101 619 | DC /B101 11,1 STOP V1G06190 0251 7E06 620 | DC 256*/7E+LRPN-* V1G06200 0252 3400 621 | LEQU DC /3400 3,4 P.D. V1G06210 0253 9409 622 | DC /9409 9,4 P.U. V1G06220 0254 3800 623 | DC /3800 3,8 P.D. V1G06230 0255 9809 624 | DC /9809 9,8 P.U. V1G06240 0256 B101 625 | DC /B101 11,1 STOP V1G06250 0257 5D05 626 | DC 256*.<+LLPN-* V1G06260 0258 4100 627 | LRPN DC /4100 4,1 P.D. V1G06270 0259 6369 628 | DC /6369 6,3 6,9 V1G06280 025A 4B09 629 | DC /4B09 4,11 P.U. V1G06290 025B B101 630 | DC /B101 11,1 STOP V1G06300 025C 4D05 631 | DC 256*.%+LDOL-* V1G06310 025D 8B00 632 | LLPN DC /8B00 8,11 P.D. V1G06320 025E 6963 633 | DC /6963 6,9 6,3 V1G06330 025F 8109 634 | DC /8109 8,1 P.U. V1G06340 0260 B101 635 | DC /B101 11,1 STOP V1G06350 0261 5B0C 636 | DC 256*.$+LQUO-* V1G06360 0262 3300 637 | LDOL DC /3300 3,3 P.D. V1G06370 0263 4282 638 | DC /4282 4,2 8,2 V1G06380 0264 9395 639 | DC /9395 9,3 9,5 V1G06390 0265 8646 640 | DC /8646 8,6 4,6 V1G06400 0266 3739 641 | DC /3739 3,7 3,9 V1G06410 0267 4A6A 642 | DC /4A6A 4,10 6,10 V1G06420 0268 8A99 643 | DC /8A99 8,10 9,9 V1G06430 0269 8A6A 644 | DC /8A6A 8,10 6,10 V1G06440 026A 6B61 645 | DC /6B61 6,11 6,1 V1G06450 026B 09B1 646 | DC /09B1 P.U. 11,1 V1G06460 026C 0100 647 | DC /0100 STOP V1G06470 026D 7D06 648 | DC 256*/7D+TABEN-*+1 V1G06480 026E 6700 649 | LQUO DC /6700 6,7 P.D. V1G06490 026F 695A 650 | DC /695A 6,9 5,10 V1G06500 0270 6B7A 651 | DC /6B7A 6,11 7,10 V1G06510 0271 6909 652 | DC /6909 6,9 P.U. V1G06520 0272 B101 653 | DC /B101 11,1 STOP V1G06530 0273 0000 654 | TABEN DC 0 V1G06540 0274 655 | END V1G06550 There were no errors in this assembly === CROSS REFERENCES ========================================================== Name Val Defd Referenced ADD 00CCR 233 56 77 102 107 109 AN 0037R 93 57 AN0 003ER 99 54 64 AN1 0047R 105 55 91 100 AN2 004ER 111 104 AN3 0051R 113 124 AN4 005FR 125 114 AN5 0061R 126 118 C10 00DCR 250 157 169 C32K 00DER 251 305 311 CCOS 00E4R 254 309 CN1 006FR 138 90 133 CN2 0076R 144 137 CNO 0067R 132 217 225 CNT 000DR 58 48 63 83 97 CNTL 00C1R 218 145 CNTLX 00C8R 224 220 COST 00D3R 240 178 185 313 CP5 00E8R 256 159 171 CSIN 00E6R 255 303 DELTX 00D8R 245 161 177 187 DELTY 00D9R 246 173 184 EXIT 001CR 70 50 85 89 FCHRI 001DR 71 FCHRX 010BR 292 314 H0001 00EFR 262 81 146 150 221 H0002 00F0R 263 76 78 H00FF 00EER 261 108 116 141 L0 01D8R 499 493 L1 01E2R 509 498 L2 01E8R 515 508 L3 01F0R 523 514 L4 01FAR 533 522 L5 01FFR 538 532 L6 0207R 546 537 L7 0211R 556 545 L8 0216R 561 555 L9 0222R 573 560 LA 0124R 319 LASK 0245R 608 600 LB 012BR 326 318 LBLK 022CR 583 125 572 LC 0135R 336 325 LCOM 023ER 601 594 LD 013CR 343 335 LDEC 0238R 595 588 LDOL 0262R 637 631 LE 0143R 350 342 LEQU 0252R 621 616 LF 014AR 357 349 LG 0150R 363 356 LH 0158R 371 362 LI 015FR 378 370 LJ 0166R 385 377 LK 016CR 391 384 LL 0173R 398 390 LLPN 025DR 632 626 LM 0178R 403 397 LMIN 022ER 585 582 LN 017ER 409 402 LO 0183R 414 408 LP 018BR 422 413 LPLS 0232R 589 584 LQ 0192R 429 421 LQUO 026ER 649 636 LR 019DR 440 428 LRPN 0258R 627 620 LS 01A6R 449 439 LSLA 024ER 617 607 LT 01AFR 458 448 LU 01B5R 464 457 LV 01BBR 470 463 LW 01C0R 475 469 LX 01C6R 481 474 LY 01CDR 488 480 LZ 01D3R 494 487 MB1 0080R 153 62 MB2 0095R 173 228 MOD2 00CAR 227 163 MOD3 00F6R 271 194 NLET 00F1R 264 59 60 95 ROUND 00ECR 259 180 190 RTN 0017R 65 87 98 SINT 00D2R 239 175 188 307 STRNG 00D1R 238 127 135 140 142 SV1 0018R 66 51 71 SV2 001AR 68 52 73 SVCH 00D0R 237 111 117 SW1 00CDR 234 93 99 101 106 SW2 00CER 235 129 132 134 139 SW3 00CFR 236 61 162 193 288 TABEN 0273R 654 648 TABLE 0123R 318 112 TEMP 00EAR 257 176 179 186 189 V 014CR 232 53 60 74 76 77 78 81 93 95 96 99 106 108 111 116 117 141 WCHRI 0000R 48 X1 00DAR 248 182 195 197 206 209 212 271 285 XC 00E0R 252 155 299 XINC 00F2R 266 211 213 273 274 280 283 289 XLAST 00F4R 268 96 272 286 XN 00D4R 241 130 147 152 196 198 199 XOX 000ER 59 222 XOX1 0014R 63 290 Y1 00DBR 249 192 200 202 207 210 215 275 YC 00E2R 253 167 YINC 00F3R 267 214 216 277 278 281 284 YLAST 00F5R 269 276 YLP 0110R 296 294 301 YN 00D6R 243 131 151 164 201 203 204
ibm/ibm1130-lib/dmsr2v12/v1fchrx_lst.txt · Last modified: 2023/08/06 13:34 by Site Administrator