ASM1130 CROSS ASSEMBLER V1.22 -- V2M12 -- Sun Nov 1 19:25:09 2020
Source File: \u2card1.asm
LIBF CARD1
2 | *************************************************** U2B00020
3 | * * U2B00030
4 | * SUBROUTINE NAME- * U2B00040
5 | * FULL NAME- N/A * U2B00050
6 | * CODE NAME- CARD1 * U2B00060
7 | * PURPOSE- * U2B00070
8 | * THIS 1130 SUBROUTINE OPERATES THE 1442 CARD * U2B00080
9 | * READER PUNCH. IT INITIATES REQUESTED OPERA- * U2B00090
10 | * TIONS, PROCESSES ANY COLUMN OR OPERATION * U2B00100
11 | * COMPLETE INTERRUPTS, AND, IF REQUESTED, * U2B00110
12 | * INITIATES ERROR RECOVERY PROCEDURES. * U2B00120
13 | * METHOD- * U2B00130
14 | * SEE IBM 1130 SUBROUTINE LIBRARY MANUAL * U2B00140
15 | * CAPABILITIES AND LIMITATIONS- * U2B00150
16 | * SEE IBM 1130 SUBROUTINE LIBRARY MANUAL * U2B00160
17 | * SPECIAL FEATURES- THIS SUBROUTINE USES A USER-* U2B00170
18 | * WRITTEN ERROR RECOVERY SUBROUTINE. * U2B00180
19 | * ADDITIONAL INFORMATION- * U2B00190
20 | * ESTIMATED EXECUTION TIME- * U2B00200
21 | * SEE IBM 1130 SUBROUTINE LIBRARY MANUAL * U2B00210
22 | * * U2B00220
23 | *************************************************** U2B00230
24 | LIBR U2B00240
0000 25 | 1130 ISS 01 CARD1 0 4 U2B00250
26 | *************************************************** U2B00260
27 | * LOADER DEFINED LOCATIONS * U2B00270
28 | *************************************************** U2B00280
0000 6979 29 | CARD1 STX 1 CR42+1 LIBF ENTRANCE (+0) U2B00290
0001 6580 0000 30 | LINK LDX I1 0 LOADER STORES TV ADDR (+2) U2B00300
0003 7006 31 | MDX CR10 U2B00310
0004 0000 32 | INT1 DC 0 COLUMN INTERRUPT (+4) U2B00320
0005 4C00 00A4R 33 | BSC L CR50 U2B00330
0007 0000 34 | INT2 DC 0 OP COMPLETE INTERRUPT (+7) U2B00340
0008 4C00 00BCR 35 | BSC L CR60 U2B00350
36 | *************************************************** U2B00360
37 | * LIBF PROCESSING * U2B00370
38 | *************************************************** U2B00380
39 | * THIS PORTION STORES CALLING SEQUENCE INFO * U2B00390
40 | * AND CHECKS THE DEVICE STATUS BEFORE ANY I/O * U2B00400
41 | * OPERATION IS INITIATED. A CALLING ERROR OR * U2B00410
42 | * NOT READY 1442 CAUSES AN ERROR EXIT TO * U2B00420
43 | * LOCATION 41. IF THE OPERATION WILL CAUSE * U2B00430
44 | * INTERRUPTS, THE ROUTINE IS SET BUSY AND THE * U2B00440
45 | * IOCS COUNTER IS INCREMENTED TO INDICATE * U2B00450
46 | * INTERRUPT(S) PENDING. * U2B00460
47 | *************************************************** U2B00470
000A 6A71 48 | CR10 STX 2 CR44+1 SAVE XR2 U2B00480
000B 2871 49 | STS CR46 SAVE STATUS U2B00490
000C D075 50 | STO TEMP SAVE A REG U2B00500
000D C100 51 | LD 1 0 XR1= ADDR OF CONTROL PARAM U2B00510
000E 180C 52 | SRA 12 IS FUNCTION TEST U2B00520
000F 4C20 0015R 53 | BSC L CR12,Z NO,BRANCH U2B00530
0011 C078 54 | LD RESTR+2 YES,IS PROGRAM BUSY U2B00540
0012 4818 55 | BSC +- YES,EXIT TO CALL+2 U2B00550
0013 7101 56 | MDX 1 +1 NO,EXIT TO CALL+3 U2B00560
0014 7061 57 | MDX CR38 GO EXIT U2B00570
0015 D012 58 | CR12 STO CR24+1 U2B00580
0016 907F 59 | S D0004 IS FUNCTION LEGAL U2B00590
0017 4C30 0020R 60 | BSC L CR16,Z- NO,ERROR U2B00600
0019 C070 61 | CR14 LD RESTR+2 IS ROUTINE BUSY U2B00610
001A 4C20 0019R 62 | BSC L CR14,Z YES,WAIT TILL NOT U2B00620
001C C100 63 | CR15 LD 1 0 NO,SET UP FOR FUNCTION U2B00630
001D 100C 64 | SLA 12 IS DEVICE 0 U2B00640
001E 4C18 0026R 65 | BSC L CR22,+- YES U2B00650
0020 C07C 66 | CR16 LD H1001 NO,LOAD ERROR CODE U2B00660
0021 71FF 67 | CR18 MDX 1 -1 U2B00670
0022 6D00 0028 68 | STX L1 $PRET STORE CALL ADDR IN $PRET U2B00680
0024 6129 69 | LDX 1 $PRET+1 U2B00690
0025 7052 70 | MDX CR40 SET EXIT FOR $PRET+1 U2B00700
0026 C066 71 | CR22 LD FEED SET UP IOCC FOR FUNC U2B00710
0027 6600 0000 72 | CR24 LDX L2 0 XR2 = FUNCTION CODE U2B00720
0029 8600 008ER 73 | A L2 SETUP-1 U2B00730
002B D05B 74 | STO INIT U2B00740
002C 9600 0092R 75 | S L2 SETUP+3 U2B00750
002E D056 76 | STO COLM+1 U2B00760
002F 085A 77 | CR26 XIO SENSE-1 IS DEVICE READY U2B00770
0030 4C04 0038R 78 | BSC L CR30,E NO U2B00780
0032 4E00 0033R 79 | CR28 BSC L2 CR28+1 YES,INITIATE FUNCTION U2B00790
0034 700E 80 | MDX CR32 = GET U2B00800
0035 700D 81 | MDX CR32 = PUT U2B00810
0036 7027 82 | MDX CR33A = FEED U2B00820
0037 7038 83 | MDX CR36 = STK U2B00830
0038 1801 84 | CR30 SRA 1 IS DEVICE BUSY U2B00840
0039 4C04 002FR 85 | BSC L CR26,E YES,WAIT U2B00850
003B 1003 86 | SLA 3 NO,IS ERROR BIT ON U2B00860
003C 4C10 0041R 87 | BSC L CR31,- NO U2B00870
003E C0E9 88 | LD CR24+1 YES,IS FUNCT GET/FEED U2B00880
003F 4804 89 | BSC E NO U2B00890
0040 D03F 90 | STO ERROR YES,SET SKIP CARD INDR U2B00900
0041 C05A 91 | CR31 LD H1000 LOAD NOT READY CODE U2B00910
0042 70DE 92 | MDX CR18 EXIT U2B00920
0043 C580 0001 93 | CR32 LD I1 1 INITIATE FUNCTION U2B00930
0045 4C08 0020R 94 | BSC L CR16,+ ERROR IF COUNT NEG OR 0 U2B00940
0047 D03E 95 | STO COUNT U2B00950
0048 D03F 96 | STO RESTR SAVE WORD COUNT U2B00960
0049 904E 97 | S D0080 IS WORD COUNT OVER +80 U2B00970
004A 4C30 0020R 98 | BSC L CR16,Z- YES,GO TO ERROR EXIT U2B00980
004C C101 99 | LD 1 1 NO U2B00990
004D D036 100 | STO COLM SAVE ADDR OF I/O AREA U2B01000
004E D03A 101 | STO RESTR+1 U2B01010
004F D007 102 | STO CR33+1 U2B01020
0050 7101 103 | MDX 1 +1 SET XR1 TO SKIP THIRD PARAM U2B01030
0051 72FF 104 | MDX 2 -1 IS FUNCTION =GET U2B01040
0052 7014 105 | MDX CR34 NO U2B01050
0053 6680 0086R 106 | CR32A LDX I2 COUNT U2B01060
0055 C03F 107 | LD D0001 STORE +1 IN DATA AREA U2B01070
0056 D600 0000 108 | CR33 STO L2 0 (NOT READ INDICATOR) U2B01080
0058 72FF 109 | MDX 2 -1 NEXT WORD U2B01090
0059 70FC 110 | MDX CR33 LOOP U2B01100
005A C02B 111 | LD COUNT GET WORD COUNT U2B01110
005B 8039 112 | A D0001 INCREASE WORD COUNT BY U2B01120
005C D029 113 | STO COUNT *+1 SO PROCESS LAST U2B01130
005D D02A 114 | STO RESTR COLUMN U2B01140
005E 082B 115 | CR33A XIO SENSE-1 YES,IS LAST CD INDR ON U2B01150
005F 1003 116 | SLA 3 U2B01160
0060 4C10 0067R 117 | BSC L CR34,- NO U2B01170
0062 0829 118 | XIO FEED-1 EJECT CARD U2B01180
0063 7200 119 | MDX 2 0 IS FUNCTION GET U2B01190
0064 70DC 120 | MDX CR31 NO U2B01200
0065 71FF 121 | MDX 1 -1 YES,SET XR1=LIBF+1 U2B01210
0066 70DA 122 | MDX CR31 U2B01220
0067 0822 123 | CR34 XIO SENSE-1 IS DEVICE READY 2-7 U2B01230
0068 4C04 009FR 124 | BSC L CR47,E BRANCH IF NOT READY 2-7 U2B01240
006A C101 125 | LD 1 1 SAVE USER RESTART SUBR U2B01250
006B D01E 126 | STO RESTR+2 *ADDRESS U2B01260
006C 7101 127 | MDX 1 +1 SET XR1 TO SKIP 2ND PARAM U2B01270
006D 7401 0032 128 | MDX L 50,+1 INCREMENT IOCS COUNTER U2B01280
006F 1000 129 | NOP U2B01290
0070 C00F 130 | CR36 LD ERROR IS SKIP CD INDR ON U2B01300
0071 4C18 0075R 131 | BSC L CR37,+- U2B01310
0073 0818 132 | XIO FEED-1 YES, FEED 1 CARD U2B01320
0074 7001 133 | MDX CR38 U2B01330
0075 0810 134 | CR37 XIO INIT-1 NO, INITIATE FUNCTION U2B01340
0076 7101 135 | CR38 MDX 1 +1 SET XR1 TO SKIP FIRST PARAM U2B01350
0077 C00A 136 | LD TEMP RESTORE A REG U2B01360
0078 6906 137 | CR40 STX 1 EXIT+1 SET UP EXIT U2B01370
0079 6500 0000 138 | CR42 LDX L1 *-* RESTORE XR1 U2B01380
007B 6600 0000 139 | CR44 LDX L2 *-* RESTORE XR2 U2B01390
007D 2000 140 | CR46 LDS *-* RESTORE STATUS U2B01400
007E 4C00 0000 141 | EXIT BSC L *-* RETURN TO USER U2B01410
142 | *************************************************** U2B01420
143 | * CONSTANTS * U2B01430
144 | *************************************************** U2B01440
0080 145 | BSS E 0 U2B01450
0080 0000 146 | SENSR DC 0 U2B01460
0081 1702 147 | DC /1702 SENSE-RESET,LEVEL 4 U2B01470
0082 0000 148 | TEMP DC 0 SAVE ACCUM U2B01480
0083 1701 149 | CHAR DC /1701 TEMP REG FOR INTERPTS (ODD) U2B01490
0084 0000 150 | COLM DC 0 IOCC FOR COLUMN I/O (EVEN) U2B01500
0085 0000 151 | DC 0 (ODD) U2B01510
0086 0000 152 | COUNT DC 0 NO. OF WDS TO TR U2B01520
0087 0000 153 | INIT DC 0 IOCC TO INITIATE I/O (ODD) U2B01530
0088 0000 154 | RESTR DC 0 RESTART INFO - COUNT U2B01540
0089 0000 155 | DC 0 - IOAR U2B01550
008A 0000 156 | DC 0 - ERROR ADDR U2B01560
008B 1700 157 | SENSE DC /1700 IOCC TO SENSE DEVICE (ODD) U2B01570
008C 0082R 158 | ADDR DC CHAR-1 ADDR TO REPLACE I/O AREA U2B01580
008D 1402 159 | FEED DC /1402 IOCC TO FEED CARD (ODD) U2B01590
0080R 160 | ERROR EQU SENSR SKIP CARD INDR U2B01600
008E 0000 161 | INDIC DC 0 FEED CHK (RD STATION) INDR U2B01610
008F 0002 162 | SETUP DC /0002 INITIATE READ START U2B01620
0090 FFFF 163 | DC /FFFF PUNCH START U2B01630
0091 0000 164 | DC /0000 FEED CYCLE U2B01640
0092 007E 165 | DC /007E STACKER SELECT U2B01650
0093 0204 166 | DC /0204 INITIATE READ COLUMN U2B01660
0094 0301 167 | DC /0301 PUNCH COLUMN U2B01670
0095 0001 168 | D0001 DC +1 DECIMAL CONSTANTS U2B01680
0096 0004 169 | D0004 DC +4 CONST TO CHECK FUNCTION U2B01690
0097 0008 170 | D0008 DC 8 CONST FOR PUNCH STOP BIT U2B01700
0098 0050 171 | D0080 DC +80 CONST TO CHECK WD COUNT U2B01710
0099 000F 172 | H000F DC /000F MASKS AND HEXADECIMAL CONS U2B01720
009A 0100 173 | H0100 DC /0100 MASK CONST U2B01730
009B 02FE 174 | H02FE DC /02FE MASK CONST U2B01740
009C 1000 175 | H1000 DC /1000 NOT READY ERROR CODE U2B01750
009D 1001 176 | H1001 DC /1001 ILLEGAL CALL ERROR CODE U2B01760
009E 1701 177 | SDSW DC /1701 SENSE DSW AREA CODE 2-2 U2B01770
008D 178 | $PST4 EQU /8D POST-OPERATIVE ERROR TRAP U2B01780
0028 179 | $PRET EQU /28 U2B01790
180 | * U2B01800
009F C088 181 | CR47 LD CR24+1 IS XR1 2-7 U2B01810
00A0 90EE 182 | S SETUP INCREASED 2-7 U2B01820
00A1 4808 183 | BSC + * 2-7 U2B01830
00A2 71FF 184 | MDX 1 -1 YES 2-7 U2B01840
00A3 7094 185 | MDX CR30 * 2-7 U2B01850
186 | *************************************************** U2B01860
187 | * COLUMN INTERRUPT PROCESSING * U2B01870
188 | *************************************************** U2B01880
189 | * THIS PORTION IS ENTERED FROM INTERPT LEVEL * U2B01890
190 | * SUBROUTINE 00. AFTER THE REQUESTED NO. OF * U2B01900
191 | * COLUMNS HAS BEEN READ, THE REMAINING COLUMN * U2B01910
192 | * INTERRUPTS ARE MERELY TURNED OFF AS THEY * U2B01920
193 | * OCCUR. WHEN THE LAST COLUMN REQUESTED IS * U2B01930
194 | * PUNCHED, AN INDICATION IS GIVEN TO THE 1442 * U2B01940
195 | * TO INITIATE AN OP COMPLETE INTERRUPT. * U2B01950
196 | *************************************************** U2B01960
00A4 C0F9 197 | CR50 LD SDSW 2-2 U2B01970
00A5 D0DD 198 | STO CHAR RESTORE SENSE IOCC U2B01980
00A6 08DB 199 | XIO CHAR-1 SENSE DEVICE STATUS WORD U2B01990
00A7 74FF 0086R 200 | MDX L COUNT,-1 ANY MORE COLUMNS U2B02000
00A9 700D 201 | MDX CR54 YES U2B02010
00AA 4C10 00AFR 202 | BSC L CR52,- IS READ CC INTERPT U2B02020
00AC 7401 0086R 203 | MDX L COUNT,+1 YES,SET COUNT TO SKIP U2B02030
00AE 700B 204 | MDX CR56 *NEXT CC U2B02040
00AF 7401 0084R 205 | CR52 MDX L COLM,+1 NO,SET FOR NEXT WORD U2B02050
00B1 C480 0084R 206 | LD I COLM STORE STOP PUNCH U2B02060
00B3 E8E3 207 | OR D0008 * BIT (BIT 12) IN U2B02070
00B4 D0CE 208 | STO CHAR * WORD & PUNCH FROM U2B02080
00B5 C0D6 209 | LD ADDR * TEMPORARY ADDRESS U2B02090
00B6 D0CD 210 | STO COLM U2B02100
00B7 7401 0084R 211 | CR54 MDX L COLM,+1 SET FOR NEXT I/O WORD U2B02110
00B9 08CA 212 | XIO COLM EXECUTE COLUMN I/O U2B02120
00BA 4C80 0004R 213 | CR56 BSC I INT1 RETURN TO INTERPT LEVEL U2B02130
214 | *************************************************** U2B02140
215 | * OP COMPLETE INTERRUPT PROCESSING * U2B02150
216 | *************************************************** U2B02160
217 | * THIS PORTION IS ENTERED FROM INTERPT LEVEL * U2B02170
218 | * SUBROUTINE 04. IF AN ERROR IS DETECTED, * U2B02180
219 | * THE SUBROUTINE EXITS TO THE USERS ERROR * U2B02190
220 | * ROUTINE VIA THE ERROR PARAMETER, AND * U2B02200
221 | * GIVES THE USER THE OPTION OF TERMINATING * U2B02210
222 | * OR RETRYING THE OPERATION. IF TERMINATION * U2B02220
223 | * IS SELECTED OR IF NO ERROR IS DETECTED, THE * U2B02230
224 | * ROUTINE IS SET NOT BUSY AND THE IOCS * U2B02240
225 | * COUNTER IS DECREMENTED TO INDICATE INTERPT * U2B02250
226 | * PROCESSING COMPLETED. OTHERWISE THE SUBRT * U2B02260
227 | * WAITS AT THE POST-OPERATIVE ERROR TRAP U2B02270
228 | * UNTIL THE 1442 IS READY AND THE OPERATOR * U2B02280
229 | * PUSHES START,AT WHICH TIME THE CARDS ARE * U2B02290
230 | * POSITIONED AND THE I/O OP IS RE-INITIATED. * U2B02300
231 | *************************************************** U2B02310
00BC 08C3 232 | CR60 XIO SENSR OP COMPLETE, SENSE W/RESET U2B02320
00BD 1003 233 | SLA 3 IS OPERATION OK U2B02330
00BE 4C02 00D9R 234 | BSC L CR70,C NO,ERROR U2B02340
00C0 4C10 00CDR 235 | CR61 BSC L CR62,- YES U2B02350
00C2 1810 236 | SRA 16 U2B02360
00C3 4480 008AR 237 | BSI I RESTR+2 NO,LAST CARD U2B02370
00C5 C0C6 238 | LD ADDR U2B02380
00C6 80CE 239 | A D0001 U2B02390
00C7 F0BC 240 | EOR COLM IS FUNCTION PUT U2B02400
00C8 4C20 00CDR 241 | BSC L CR62,Z NO U2B02410
00CA 7401 0087R 242 | MDX L INIT,+1 U2B02420
00CC 08B9 243 | XIO INIT-1 YES,EJECT LAST CARD U2B02430
00CD C0B2 244 | CR62 LD ERROR WAS THIS A SKIP OPERATION U2B02440
00CE 1000 245 | NOP 2-3 U2B02450
00CF 1010 246 | SLA 16 2-3 U2B02460
00D0 D0AF 247 | STO ERROR U2B02470
00D1 4C02 00E9R 248 | BSC L CR72,C YES, INITIATE FUNCTION U2B02480
00D3 D0B6 249 | CR64 STO RESTR+2 CLEAR ROUTINE BUSY INDR U2B02490
00D4 74FF 0032 250 | MDX L 50,-1 DECREMENT IOCS COUNTER U2B02500
00D6 1000 251 | NOP U2B02510
00D7 4C80 0007R 252 | CR66 BSC I INT2 RETURN TO INTERRUPT LEVEL U2B02520
00D9 D0B4 253 | CR70 STO INDIC SAVE FEED CHECK (READ STA- U2B02530
00DA C0BA 254 | LD D0001 TION) INDR. U2B02540
00DB 4480 008AR 255 | BSI I RESTR+2 U2B02550
00DD 4C18 00D3R 256 | BSC L CR64,+- RESTART NOT REQUESTED U2B02560
00DF C0A7 257 | LD INIT IS FUNCTION PUNCH U2B02570
00E0 4C04 00E9R 258 | BSC L CR72,E YES,DONT SKIP U2B02580
00E2 1801 259 | SRA 1 IS FUNCTION FEED U2B02590
00E3 4C04 00F7R 260 | BSC L CR73B,E YES U2B02600
00E5 C0A3 261 | LD RESTR+1 FUNCTION IS GET U2B02610
00E6 F09D 262 | EOR COLM WAS FIRST CC READ U2B02620
00E7 4C18 00FBR 263 | BSC L CR73E,+- NO,SKIP ONE CARD U2B02630
00E9 08A0 264 | CR72 XIO SENSE-1 IS DEVICE READY U2B02640
00EA 4C04 00FER 265 | BSC L CR75,E NO,GO TO ERROR TRAP U2B02650
00EC C093 266 | LD ERROR IS CARD SKIP NECESSARY U2B02660
00ED 4C18 00F1R 267 | BSC L CR73,+- NO U2B02670
00EF 089C 268 | XIO FEED-1 SKIP FIRST CARD U2B02680
00F0 70E6 269 | MDX CR66 U2B02690
00F1 C096 270 | CR73 LD RESTR REINITIATE I/O U2B02700
00F2 D093 271 | STO COUNT *OPERATION FROM U2B02710
00F3 C095 272 | LD RESTR+1 *SAVED INFORMATION U2B02720
00F4 D08F 273 | STO COLM U2B02730
00F5 0890 274 | XIO INIT-1 U2B02740
00F6 70E0 275 | MDX CR66 RETURN U2B02750
00F7 C096 276 | CR73B LD INDIC WAS ERROR FEED CHK(READ U2B02760
00F8 1004 277 | SLA 4 *STATION) U2B02770
00F9 4C28 00E9R 278 | BSC L CR72,Z+ YES,DONT SKIP U2B02780
00FB C099 279 | CR73E LD D0001 2-3 U2B02790
00FC D083 280 | STO ERROR SET BIT 1 OF INDR U2B02800
00FD 70EB 281 | MDX CR72 GO SENSE DEVICE READY U2B02810
282 | * U2B02820
283 | *EXIT TO POST-OPERATIVE ERROR TRAP WITH NOT READY U2B02830
284 | *ERROR CODE IN THE ACCUMULATOR. U2B02840
285 | * U2B02850
00FE C09D 286 | CR75 LD H1000 ERROR CODE INTO A REG U2B02860
00FF 4400 008D 287 | BSI L $PST4 U2B02870
0101 70E7 288 | MDX CR72 TRY AGAIN U2B02880
0102 289 | END U2B02890
There were no errors in this assembly
=== CROSS REFERENCES ==========================================================
Name Val Defd Referenced
$PRET 0028 179 68 69
$PST4 008D 178 287
ADDR 008CR 158 209 238
CARD1 0000R 29
CHAR 0083R 149 158 198 199 208
COLM 0084R 150 76 100 205 206 210 211 212 240 262 273
COUNT 0086R 152 95 106 111 113 200 203 271
CR10 000AR 48 31
CR12 0015R 58 53
CR14 0019R 61 62
CR15 001CR 63
CR16 0020R 66 60 94 98
CR18 0021R 67 92
CR22 0026R 71 65
CR24 0027R 72 58 88 181
CR26 002FR 77 85
CR28 0032R 79
CR30 0038R 84 78 185
CR31 0041R 91 87 120 122
CR32 0043R 93 80 81
CR32A 0053R 106
CR33 0056R 108 102 110
CR33A 005ER 115 82
CR34 0067R 123 105 117
CR36 0070R 130 83
CR37 0075R 134 131
CR38 0076R 135 57 133
CR40 0078R 137 70
CR42 0079R 138 29
CR44 007BR 139 48
CR46 007DR 140 49
CR47 009FR 181 124
CR50 00A4R 197 33
CR52 00AFR 205 202
CR54 00B7R 211 201
CR56 00BAR 213 204
CR60 00BCR 232 35
CR61 00C0R 235
CR62 00CDR 244 235 241
CR64 00D3R 249 256
CR66 00D7R 252 269 275
CR70 00D9R 253 234
CR72 00E9R 264 248 258 278 281 288
CR73 00F1R 270 267
CR73B 00F7R 276 260
CR73E 00FBR 279 263
CR75 00FER 286 265
D0001 0095R 168 107 112 239 254 279
D0004 0096R 169 59
D0008 0097R 170 207
D0080 0098R 171 97
ERROR 0080R 160 90 130 244 247 266 280
EXIT 007ER 141 137
FEED 008DR 159 71 118 132 268
H000F 0099R 172
H0100 009AR 173
H02FE 009BR 174
H1000 009CR 175 91 286
H1001 009DR 176 66
INDIC 008ER 161 253 276
INIT 0087R 153 74 134 242 243 257 274
INT1 0004R 32 213
INT2 0007R 34 252
LINK 0001R 30
RESTR 0088R 154 54 61 96 101 114 126 237 249 255 261 270 272
SDSW 009ER 177 197
SENSE 008BR 157 77 115 123 264
SENSR 0080R 146 160 232
SETUP 008FR 162 73 75 182
TEMP 0082R 148 50 136