File: DJFPAB.LS of Disk: Test/Tests/LISTING-FILES10
(Source file text)
/DJFPAB PAL8-V50X 06-OCT-90 PAGE 1 /DJFPAB 7421 MQL=7421 7501 MQA=7501 7431 SWAB=7431 7447 SWBA=7447 7403 SCL=7403 7403 ACS=7403 7405 MUY=7405 7407 DVI=7407 7411 NMI=7411 7413 SHL=7413 7415 ASR=7415 7417 LSR=7417 7441 SCA=7441 7443 DAD=7443 7445 DST=7445 7451 DPSZ=7451 7573 DPIC=7573 7575 DCM=7575 7457 SAM=7457 6000 SKON=6000 6003 SRQ=6003 6004 GTF=6004 6005 RTF=6005 6006 SGT=6006 6007 CAF=6007 6204 CINT=6204 6254 SINT=6254 6264 CUF=6264 6274 SUF=6274 6771 SDSS=6771 6102 SPL=6102 6101 SBE=6101 6103 CAL=6103 6030 KCF=6030 6040 TFL=6040 6041 TSF=6041 6042 TCF=6042 6044 TPC=6044 6045 TSK=6045 6046 TLS=6046 6170 LBM=6170 6171 RBM=6171 6162 RLB=6162 6173 RMR=6173 6174 MBC=6174 6175 RACA=6175 6176 RACB=6176 6177 RACC=6177 /DJFPAB PAL8-V50X 06-OCT-90 PAGE 1-1 6551 FPINT=6551 6552 FPICL=6552 6553 FPCOM=6553 6554 FPHLT=6554 6555 FPST=6555 6556 FPRST=6556 6557 FPIST=6557 6567 FPEP=6567 6550 FFST=6550 6561 FMODE=6561 6563 FMRB=6563 6564 FMRP=6564 6565 FMDO=6565 /FPP OPCODES: 0000 FLDA=0000 1000 FADD=1000 2000 FSUB=2000 3000 FDIV=3000 4000 FMUL=4000 5000 FADDM=5000 6000 FSTA=6000 7000 FMULM=7000 0400 LONG=400 /TWO-WORD ADDRESSING 0200 BASE=200 /BASEPAGE ADDRESSING 0600 IND=600 /INDIRECT ADDRESSING 0000 FEXIT=0000 0004 FNORM=0004 0005 STARTF=0005 0006 STARTD=0006 0007 JAC=0007 0020 ATX=0020 0030 XTA=0030 0050 STARTE=0050 0100 LDX=0100 1030 JA=1030 1040 JNE=1040 3000 TRAP3=3000 6200 LXM=6200 6210 GTS=6210 6220 RTS=6220 6230 RXM=6230 6240 LRR=6240 6250 RRR=6250 6260 LUSR=6260 6270 RUSR=6270 6304 RTM=6304 6314 SKME=6314 /DJFPAB PAL8-V50X 06-OCT-90 PAGE 1-2 6324 SKMM=6324 6334 LTM=6334 6344 LRM=6344 6364 SMME=6364 6374 CMME=6374 /STATI - FPRST FPIST 4000 DPMOD=4000 2000 TRPEX=2000 1000 HLTEX=1000 0400 DIVEX=0400 0200 MANOV=0200 0100 EXPOV=0100 0040 EXPUN=0040 0020 MMINS=0020 0010 LOCKO=0010 0004 EPMOD=0004 0002 FPPAU=0002 0001 FPRUN=0001 /COMMANDS - FPCOM 4000 DPSEL=4000 2000 EXPEX=2000 1000 MEM4K=1000 0400 FPENA=0400 0360 FPCON=0360 0010 LOCON=0010 0001 FIELD 1 0000 *0000 010000 4450 JMS I 0050 /10000-4450 $( 010001 0070 AND 0070 /10001-0070 @8 010002 0000 AND 0000 /10002-0000 @@ 010003 1720 1720 /10003-1720 OP 010004 7000 NOP /10004-7000 8@ 010005 7000 NOP /10005-7000 8@ 010006 7000 NOP /10006-7000 8@ 010007 0422 AND I 0022 /10007-0422 DR 010010 2330 2330 /10010-2330 SX 010011 2300 2300 /10011-2300 S@ 010012 7773 MQA MQL CLA DPIC /10012-7773 ?; 010013 0303 0303 /10013-0303 CC 010014 1400 TAD I 0000 /10014-1400 L@ 010015 0000 AND 0000 /10015-0000 @@ 010016 2330 2330 /10016-2330 SX 010017 1510 TAD I 0110 /10017-1510 MH 010020 7756 SPA SNA CLA OSR HLT /10020-7756 ?. 010021 0411 AND I 0011 /10021-0411 DI 010022 2205 2205 /10022-2205 RE 010023 0324 0324 /10023-0324 CT 010024 0016 AND 0016 /10024-0016 @N 010025 0000 AND 0000 /10025-0000 @@ 010026 0016 AND 0016 /10026-0016 @N 010027 0016 AND 0016 /10027-0016 @N 010030 0016 AND 0016 /10030-0016 @N /DJFPAB PAL8-V50X 06-OCT-90 PAGE 1-3 010031 0000 AND 0000 /10031-0000 @@ 010032 7200 CLA /10032-7200 :@ 010033 1660 1660 /10033-1660 N0 010034 7414 SKP OSR /10034-7414 <L 010035 7453 7453 /10035-7453 <+ 010036 1505 TAD I 0105 /10036-1505 ME 010037 1242 1242 /10037-1242 J" 010040 1400 TAD I 0000 /10040-1400 L@ 010041 1406 TAD I 0006 /10041-1406 LF 010042 0600 0600 /10042-0600 F@ 010043 0531 AND I 0131 /10043-0531 EY 010044 0505 AND I 0105 /10044-0505 EE 010045 1203 1203 /10045-1203 JC 010046 0731 0731 /10046-0731 GY 010047 1322 1322 /10047-1322 KR 010050 1343 1343 /10050-1343 K# 010051 1523 XAPTPR, APTPRE /10051-1523 MS 010052 1634 XSKFLG, PRSKFG /10052-1634 N\ 010053 1671 XSTATC, STATCK /10053-1671 N9 010054 2011 XREGSR, REGSRD /10054-2011 PI 010055 2200 2200 /10055-2200 R@ 010056 2231 2231 /10056-2231 RY 010057 2312 2312 /10057-2312 SJ 010060 2344 2344 /10060-2344 S$ 010061 2471 XCHAPT, APTCHK /10061-2471 T9 010062 2617 XIDXCH, IDXCHK /10062-2617 VO 010063 2400 ISZ I 0000 /10063-2400 T@ 010064 0747 0747 /10064-0747 G' 010065 3055 XENVSE, ENVSET /10065-3055 X- 010066 0122 NUMTST, TSTNUM /10066-0122 AR 010067 0156 XCODE, CODE /10067-0156 A. 010070 0145 XCNSTP, CNTSTP /10070-0145 A% 010071 0165 AND 0165 /10071-0165 A5 010072 0167 X6400, C6400 /10072-0167 A7 010073 7200 X7200, 7200 /10073-7200 :@ 010074 7200 XAPT, APT /10074-7200 :@ 010075 7201 XFPCAD, FPCADR /10075-7201 :A 010076 7220 CLA CML /10076-7220 :P 010077 7221 CLA CML IAC /10077-7221 :Q 010100 7222 INDX7, INDEX+7 /10100-7222 :R 010101 0000 AND 0000 /10101-0000 @@ 010102 0123 YALL, NALL /10102-0123 AS 010103 2643 2643 /10103-2643 V# 010104 2650 2650 /10104-2650 V( 010105 2655 2655 /10105-2655 V- 010106 2707 2707 /10106-2707 WG 010107 2714 2714 /10107-2714 WL 010110 2721 2721 /10110-2721 WQ 010111 3252 3252 /10111-3252 Z* 010112 3265 3265 /10112-3265 Z5 010113 4511 4511 /10113-4511 %I 010114 3240 3240 /10114-3240 Z 010115 2502 2502 /10115-2502 UB 010116 3544 3544 /10116-3544 ]$ 010117 0000 AND 0000 /10117-0000 @@ /DJFPAB PAL8-V50X 06-OCT-90 PAGE 1-4 010120 0000 AND 0000 /10120-0000 @@ 010121 0000 AND 0000 /10121-0000 @@ 010122 0000 AND 0000 /10122-0000 @@ 010123 0000 AND 0000 /10123-0000 @@ 010124 0000 AND 0000 /10124-0000 @@ 010125 0000 AND 0000 /10125-0000 @@ 010126 0000 AND 0000 /10126-0000 @@ 010127 0000 AND 0000 /10127-0000 @@ 010130 0000 AND 0000 /10130-0000 @@ 010131 0000 AND 0000 /10131-0000 @@ 010132 0000 AND 0000 /10132-0000 @@ 010133 0000 AND 0000 /10133-0000 @@ 010134 0000 AND 0000 /10134-0000 @@ 010135 0000 AND 0000 /10135-0000 @@ 010136 0000 AND 0000 /10136-0000 @@ 010137 0000 AND 0000 /10137-0000 @@ 010140 0000 AND 0000 /10140-0000 @@ 010141 0000 AND 0000 /10141-0000 @@ 010142 1541 TAD I 0141 /10142-1541 M! 010143 3166 DCA 0166 /10143-3166 Y6 010144 1177 TAD 0177 /10144-1177 I? 010145 3010 DCA 0010 /10145-3010 XH 010146 3011 DCA 0011 /10146-3011 XI 010147 7346 CLA CLL CMA RTL /10147-7346 ;& 010150 3123 DCA 0123 /10150-3123 YS 010151 6224 RIF /10151-6224 2T 010152 1155 TAD 0155 /10152-1155 I- 010153 3157 DCA 0157 /10153-3157 Y/ 010154 1410 TAD I 0010 /10154-1410 LH 010155 6201 CDF 0 /10155-6201 2A 010156 3411 DCA I 0011 /10156-3411 \I 010157 6201 CDF 0 /10157-6201 2A 010160 2123 ISZ 0123 /10160-2123 QS 010161 5154 JMP 0154 /10161-5154 ), 010162 2141 ISZ 0141 /10162-2141 Q! 010163 5541 JMP I 0141 /10163-5541 -! 010164 6244 RMF /10164-6244 2$ 010165 5403 JMP I 0003 /10165-5403 ,C 010166 0000 AND 0000 /10166-0000 @@ 010167 0407 AND I 0007 /10167-0407 DG 010170 1503 TAD I 0103 /10170-1503 MC 010171 0102 AND 0102 /10171-0102 AB 010172 2326 2326 /10172-2326 SV 010173 2570 2570 /10173-2570 U8 010174 7772 7772 /10174-7772 ?: 010175 0410 0410 /10175-0410 DH 010176 1320 1320 /10176-1320 KP 010177 0163 AND 0163 /10177-0163 A3 010200 6552 TST20X, FPICL /10200-6552 5* 010201 1377 TAD (20 /10201-1377 K? 010202 6201 CDF 0 /10202-6201 2A 010203 3466 DCA I NUMTST /10203-3466 \6 010204 1376 TAD (242 /10204-1376 K> 010205 3467 DCA I XCODE /10205-3467 \7 /DJFPAB PAL8-V50X 06-OCT-90 PAGE 1-5 010206 3470 DCA I XCNSTP /10206-3470 \8 010207 6211 CDF 10 /10207-6211 2I 010210 6202 CIF 0 /10210-6202 2B 010211 4451 JMS I XAPTPR /10211-4451 $) 010212 6201 CDF 0 /10212-6201 2A 010213 7201 CLA IAC /10213-7201 :A 010214 3474 DCA I XAPT /10214-3474 \< 010215 1375 TAD 0375 /10215-1375 K= 010216 3475 DCA I XFPCAD /10216-3475 \= 010217 1472 TAD I X6400 /10217-1472 L: 010220 6553 FPCOM /10220-6553 5+ 010221 7200 CLA /10221-7200 :@ 010222 1374 TAD 0374 /10222-1374 K< 010223 3500 DCA I INDX7 /10223-3500 ]@ 010224 6211 CDF 10 /10224-6211 2I 010225 1073 TAD X7200 /10225-1073 H; 010226 6555 FPST /10226-6555 5- 010227 7410 SKP /10227-7410 <H 010230 5234 JMP 0234 /10230-5234 *\ 010231 6202 CIF 0 /10231-6202 2B 010232 4452 JMS I XSKFLG /10232-4452 $* 010233 5200 JMP 0200 /10233-5200 *@ 010234 3101 DCA 0101 /10234-3101 YA 010235 2101 ISZ 0101 /10235-2101 QA 010236 5235 JMP 0235 /10236-5235 *] 010237 6202 CIF 0 /10237-6202 2B 010240 4452 JMS I XSKFLG /10240-4452 $* 010241 5200 JMP 0200 /10241-5200 *@ 010242 6202 CIF 0 /10242-6202 2B 010243 4453 JMS I XSTATC /10243-4453 $+ 010244 4000 JMS 0000 /10244-4000 @ 010245 5200 JMP 0200 /10245-5200 *@ 010246 6202 CIF 0 /10246-6202 2B 010247 4461 JMS I XCHAPT /10247-4461 $1 010250 1001 TAD 0001 /10250-1001 HA 010251 1673 TAD I 0273 /10251-1673 N; 010252 7213 CLA IAC RTR /10252-7213 :K 010253 7237 7237 /10253-7237 :_ 010254 1662 TAD I 0262 /10254-1662 N2 010255 0001 AND 0001 /10255-0001 @A 010256 7777 MQA MQL CLA SAM /10256-7777 ?? 010257 5777 JMP I 0377 /10257-5777 /? 010260 0004 AND 0004 /10260-0004 @D 010261 0005 AND 0005 /10261-0005 @E 010262 0006 AND 0006 /10262-0006 @F 010263 5200 JMP 0200 /10263-5200 *@ 010264 6552 FPICL /10264-6552 5* 010265 6202 CIF 0 /10265-6202 2B 010266 4451 JMS I XAPTPR /10266-4451 $) 010267 6201 CDF 0 /10267-6201 2A 010270 1373 TAD 0373 /10270-1373 K; 010271 3467 DCA I XCODE /10271-3467 \7 010272 7201 CLA IAC /10272-7201 :A /DJFPAB PAL8-V50X 06-OCT-90 PAGE 1-6 010273 3474 DCA I XAPT /10273-3474 \< 010274 1372 TAD 0372 /10274-1372 K: 010275 3475 DCA I XFPCAD /10275-3475 \= 010276 1471 TAD I 0071 /10276-1471 L9 010277 6553 FPCOM /10277-6553 5+ 010300 7200 CLA /10300-7200 :@ 010301 1371 TAD 0371 /10301-1371 K9 010302 3477 DCA I 0077 /10302-3477 \? 010303 6211 CDF 10 /10303-6211 2I 010304 1073 TAD X7200 /10304-1073 H; 010305 6555 FPST /10305-6555 5- 010306 7410 SKP /10306-7410 <H 010307 5313 JMP 0313 /10307-5313 +K 010310 6202 CIF 0 /10310-6202 2B 010311 4452 JMS I XSKFLG /10311-4452 $* 010312 5264 JMP 0264 /10312-5264 *4 010313 3101 DCA 0101 /10313-3101 YA 010314 2101 ISZ 0101 /10314-2101 QA 010315 5314 JMP 0314 /10315-5314 +L 010316 6202 CIF 0 /10316-6202 2B 010317 4452 JMS I XSKFLG /10317-4452 $* 010320 5264 JMP 0264 /10320-5264 *4 010321 6202 CIF 0 /10321-6202 2B 010322 4453 JMS I XSTATC /10322-4453 $+ 010323 0010 AND 0010 /10323-0010 @H 010324 5264 JMP 0264 /10324-5264 *4 010325 6202 CIF 0 /10325-6202 2B 010326 4461 JMS I XCHAPT /10326-4461 $1 010327 0001 AND 0001 /10327-0001 @A 010330 1677 TAD I 0277 /10330-1677 N? 010331 7213 CLA IAC RTR /10331-7213 :K 010332 7245 CLA CMA IAC RAL /10332-7245 :% 010333 7356 7356 /10333-7356 ;. 010334 3777 DCA I 0377 /10334-3777 _? 010335 3777 DCA I 0377 /10335-3777 _? 010336 7777 MQA MQL CLA SAM /10336-7777 ?? 010337 0004 AND 0004 /10337-0004 @D 010340 0005 AND 0005 /10340-0005 @E 010341 0006 AND 0006 /10341-0006 @F 010342 5200 JMP 0200 /10342-5200 *@ 010343 5770 JMP I 0370 /10343-5770 /8 010344 2014 ISZ 0014 /10344-2014 PL 010345 3205 DCA 0205 /10345-3205 ZE 010346 0070 AND 0070 /10346-0070 @8 010347 7710 SPA CLA /10347-7710 ?H 010350 1401 TAD I 0001 /10350-1401 LA 010351 5626 JMP I 0226 /10351-5626 .V 010352 0007 AND 0007 /10352-0007 @G 010353 3700 DCA I 0300 /10353-3700 _@ 010354 3023 DCA 0023 /10354-3023 XS 010355 7600 7600 /10355-7600 >@ 010356 0171 AND 0171 /10356-0171 A9 010357 3517 DCA I 0117 /10357-3517 ]O /DJFPAB PAL8-V50X 06-OCT-90 PAGE 1-7 010360 2473 ISZ I 0073 /10360-2473 T; 010361 6141 6141 /10361-6141 1! 010362 0600 AND I 0200 /10362-0600 F@ 010363 3401 DCA I 0001 /10363-3401 \A 010364 7204 CLA RAL /10364-7204 :D 010365 6344 LRM /10365-6344 3$ 010366 2215 ISZ 0215 /10366-2215 RM 010367 2223 ISZ 0223 /10367-2223 RS 010370 0400 AND I 0000 /10370-0400 D@ 010371 0006 AND 0006 /10371-0006 @F 010372 1673 TAD I 0273 /10372-1673 N; 010373 0321 AND 0321 /10373-0321 CQ 010374 0005 AND 0005 /10374-0005 @E 010375 1667 TAD I 0267 /10375-1667 N7 /AND 0242 /10376-0242 B" /AND 0020 /10377-0020 @P 010376 0242 010377 0020 0400 PAGE 010400 6552 FPICL /10400-6552 5* 010401 6202 CIF 0 /10401-6202 2B 010402 4451 JMS I XAPTPR /10402-4451 $) 010403 6201 CDF 0 /10403-6201 2A 010404 1377 TAD 0577 /10404-1377 K? 010405 3467 DCA I XCODE /10405-3467 \7 010406 7201 CLA IAC /10406-7201 :A 010407 3474 DCA I XAPT /10407-3474 \< 010410 1376 TAD 0576 /10410-1376 K> 010411 3475 DCA I XFPCAD /10411-3475 \= 010412 1471 TAD I 0071 /10412-1471 L9 010413 6553 FPCOM /10413-6553 5+ 010414 7330 CLA CLL CML RAR /10414-7330 ;X 010415 6567 FPEP /10415-6567 57 010416 1375 TAD 0575 /10416-1375 K= 010417 3476 DCA I 0076 /10417-3476 \> 010420 6211 CDF 10 /10420-6211 2I 010421 1073 TAD X7200 /10421-1073 H; 010422 6555 FPST /10422-6555 5- 010423 7410 SKP /10423-7410 <H 010424 5230 JMP 0430 /10424-5230 *X 010425 6202 CIF 0 /10425-6202 2B 010426 4452 JMS I XSKFLG /10426-4452 $* 010427 5200 JMP 0400 /10427-5200 *@ 010430 3101 DCA 0101 /10430-3101 YA 010431 2101 ISZ 0101 /10431-2101 QA 010432 5231 JMP 0431 /10432-5231 *Y 010433 6202 CIF 0 /10433-6202 2B 010434 4452 JMS I XSKFLG /10434-4452 $* 010435 5200 JMP 0400 /10435-5200 *@ 010436 6202 CIF 0 /10436-6202 2B 010437 4453 JMS I XSTATC /10437-4453 $+ 010440 0014 AND 0014 /10440-0014 @L 010441 5200 JMP 0400 /10441-5200 *@ 010442 6202 CIF 0 /10442-6202 2B /DJFPAB PAL8-V50X 06-OCT-90 PAGE 1-8 010443 4461 JMS I XCHAPT /10443-4461 $1 010444 1001 TAD 0001 /10444-1001 HA 010445 1703 TAD I 0503 /10445-1703 OC 010446 7213 CLA IAC RTR /10446-7213 :K 010447 7267 CLA CMA CML IAC RTL /10447-7267 :7 010450 1663 TAD I 0463 /10450-1663 N3 010451 7777 MQA MQL CLA SAM /10451-7777 ?? 010452 5777 JMP I 0577 /10452-5777 /? 010453 7777 MQA MQL CLA SAM /10453-7777 ?? 010454 1010 TAD 0010 /10454-1010 HH 010455 0202 AND 0402 /10455-0202 BB 010456 3030 DCA 0030 /10456-3030 XX 010457 5200 JMP 0400 /10457-5200 *@ 010460 6201 CDF 0 /10460-6201 2A 010461 1502 TAD I YALL /10461-1502 MB 010462 6211 CDF 10 /10462-6211 2I 010463 7640 SZA CLA /10463-7640 > 010464 5774 JMP I 0574 /10464-5774 /< 010465 5773 JMP I 0573 /10465-5773 /; 010466 4450 JMS I 0050 /10466-4450 $( 010467 4475 JMS I 0075 /10467-4475 $= 010470 7410 SKP /10470-7410 <H 010471 4450 JMS I 0050 /10471-4450 $( 010472 4447 JMS I 0047 /10472-4447 $' 010473 4446 JMS I 0046 /10473-4446 $& 010474 1375 TAD 0575 /10474-1375 K= 010475 3140 DCA 0140 /10475-3140 Y 010476 4455 JMS I 0055 /10476-4455 $- 010477 4511 JMS I 0111 /10477-4511 %I 010500 4500 JMS I 0100 /10500-4500 %@ 010501 6001 ION /10501-6001 0A 010502 4502 JMS I 0102 /10502-4502 %B 010503 4503 JMS I 0103 /10503-4503 %C 010504 4450 JMS I 0050 /10504-4450 $( 010505 4507 JMS I 0107 /10505-4507 %G 010506 7610 SKP CLA /10506-7610 >H 010507 4450 JMS I 0050 /10507-4450 $( 010510 4460 JMS I 0060 /10510-4460 $0 010511 7301 CLA CLL IAC /10511-7301 ;A 010512 4500 JMS I 0100 /10512-4500 %@ 010513 4456 JMS I 0056 /10513-4456 $. 010514 4503 JMS I 0103 /10514-4503 %C 010515 4450 JMS I 0050 /10515-4450 $( 010516 4507 JMS I 0107 /10516-4507 %G 010517 4450 JMS I 0050 /10517-4450 $( 010520 7200 CLA /10520-7200 :@ 010521 2117 ISZ 0117 /10521-2117 QO 010522 4450 JMS I 0050 /10522-4450 $( 010523 3117 DCA 0117 /10523-3117 YO 010524 4500 JMS I 0100 /10524-4500 %@ 010525 6001 ION /10525-6001 0A 010526 4503 JMS I 0103 /10526-4503 %C 010527 4450 JMS I 0050 /10527-4450 $( /DJFPAB PAL8-V50X 06-OCT-90 PAGE 1-9 010530 4507 JMS I 0107 /10530-4507 %G 010531 7610 SKP CLA /10531-7610 >H 010532 4450 JMS I 0050 /10532-4450 $( 010533 4504 JMS I 0104 /10533-4504 %D 010534 4503 JMS I 0103 /10534-4503 %C 010535 7610 SKP CLA /10535-7610 >H 010536 4450 JMS I 0050 /10536-4450 $( 010537 4475 JMS I 0075 /10537-4475 $= 010540 7610 SKP CLA /10540-7610 >H 010541 4450 JMS I 0050 /10541-4450 $( 010542 4447 JMS I 0047 /10542-4447 $' 010543 0000 AND 0000 /10543-0000 @@ 010544 0000 AND 0000 /10544-0000 @@ 010545 0000 AND 0000 /10545-0000 @@ 010546 0000 AND 0000 /10546-0000 @@ 010547 0000 AND 0000 /10547-0000 @@ 010550 0000 AND 0000 /10550-0000 @@ 010551 0000 AND 0000 /10551-0000 @@ 010552 0000 AND 0000 /10552-0000 @@ 010553 0000 AND 0000 /10553-0000 @@ 010554 0000 AND 0000 /10554-0000 @@ 010555 0000 AND 0000 /10555-0000 @@ 010556 0000 AND 0000 /10556-0000 @@ 010557 0000 AND 0000 /10557-0000 @@ 010560 0000 AND 0000 /10560-0000 @@ 010561 0000 AND 0000 /10561-0000 @@ 010562 0000 AND 0000 /10562-0000 @@ 010563 0000 AND 0000 /10563-0000 @@ 010564 0000 AND 0000 /10564-0000 @@ 010565 0000 AND 0000 /10565-0000 @@ 010566 0000 AND 0000 /10566-0000 @@ 010567 0000 AND 0000 /10567-0000 @@ 010570 0000 AND 0000 /10570-0000 @@ 010571 0000 AND 0000 /10571-0000 @@ 010572 0000 AND 0000 /10572-0000 @@ 010573 0600 AND I 0400 /10573-0600 F@ 010574 0200 AND 0400 /10574-0200 B@ 010575 0006 AND 0006 /10575-0006 @F 010576 1677 TAD I 0477 /10576-1677 N? 010577 0436 AND I 0036 /10577-0436 D^ 010600 6552 TST21X, FPICL /10600-6552 5* 010601 6202 CIF 0 /10601-6202 2B 010602 4465 JMS I XENVSE /10602-4465 $5 010603 0021 AND 0021 /10603-0021 @Q TSTNUM 010604 0621 AND I 0621 /10604-0621 FQ CODE 010605 0000 AND 0000 /10605-0000 @@ MCODE 010606 0000 AND 0000 /10606-0000 @@ FPCF 010607 7446 SZA OSR HLT /10607-7446 <& FPCADR 010610 6400 6400 /10610-6400 4@ FPCOM 010611 0000 AND 0000 /10611-0000 @@ FPEP 010612 5200 JMP 0600 /10612-5200 *@ 010613 3101 DCA 0101 /10613-3101 YA 010614 2101 ISZ 0101 /10614-2101 QA 010615 5214 JMP 0614 /10615-5214 *L /DJFPAB PAL8-V50X 06-OCT-90 PAGE 1-10 010616 6202 CIF 0 /10616-6202 2B 010617 4452 JMS I XSKFLG /10617-4452 $* 010620 5200 JMP 0600 /10620-5200 *@ 010621 6202 CIF 0 /10621-6202 2B 010622 4453 JMS I XSTATC /10622-4453 $+ 010623 4200 JMS 0600 /10623-4200 "@ 010624 5200 JMP 0600 /10624-5200 *@ 010625 6202 CIF 0 /10625-6202 2B 010626 4461 JMS I XCHAPT /10626-4461 $1 010627 0000 AND 0000 /10627-0000 @@ 010630 7453 7453 /10630-7453 <+ 010631 7213 CLA IAC RTR /10631-7213 :K 010632 7234 7234 /10632-7234 :\ 010633 7455 7455 /10633-7455 <- 010634 0001 AND 0001 /10634-0001 @A 010635 4000 JMS 0000 /10635-4000 @ 010636 0000 AND 0000 /10636-0000 @@ 010637 0004 AND 0004 /10637-0004 @D 010640 0005 AND 0005 /10640-0005 @E 010641 0006 AND 0006 /10641-0006 @F 010642 5200 JMP 0600 /10642-5200 *@ 010643 6202 CIF 0 /10643-6202 2B 010644 4465 JMS I XENVSE /10644-4465 $5 010645 0021 AND 0021 /10645-0021 @Q TSTNUM 010646 0663 AND I 0663 /10646-0663 F3 CODE 010647 0000 AND 0000 /10647-0000 @@ MCODE 010650 0000 AND 0000 /10650-0000 @@ FPCF 010651 7456 SNA OSR HLT /10651-7456 <. FPCADR 010652 2410 ISZ I 0010 /10652-2410 TH FPCOM 010653 0000 AND 0000 /10653-0000 @@ FPEP 010654 5200 JMP 0600 /10654-5200 *@ 010655 3101 DCA 0101 /10655-3101 YA 010656 2101 ISZ 0101 /10656-2101 QA 010657 5256 JMP 0656 /10657-5256 *. 010660 6202 CIF 0 /10660-6202 2B 010661 4452 JMS I XSKFLG /10661-4452 $* 010662 5200 JMP 0600 /10662-5200 *@ 010663 6202 CIF 0 /10663-6202 2B 010664 4453 JMS I XSTATC /10664-4453 $+ 010665 0110 AND 0110 /10665-0110 AH 010666 5200 JMP 0600 /10666-5200 *@ 010667 6202 CIF 0 /10667-6202 2B 010670 4461 JMS I XCHAPT /10670-4461 $1 010671 0000 AND 0000 /10671-0000 @@ 010672 7465 7465 /10672-7465 <5 010673 7213 CLA IAC RTR /10673-7213 :K 010674 7234 7234 /10674-7234 :\ 010675 7473 7473 /10675-7473 <; 010676 4000 JMS 0000 /10676-4000 @ 010677 2525 ISZ I 0125 /10677-2525 UU 010700 2525 ISZ I 0125 /10700-2525 UU 010701 0004 AND 0004 /10701-0004 @D /DJFPAB PAL8-V50X 06-OCT-90 PAGE 1-11 010702 0005 AND 0005 /10702-0005 @E 010703 0006 AND 0006 /10703-0006 @F 010704 5200 JMP 0600 /10704-5200 *@ 010705 6202 CIF 0 /10705-6202 2B 010706 4465 JMS I XENVSE /10706-4465 $5 010707 0021 AND 0021 /10707-0021 @Q TSTNUM 010710 0725 AND I 0725 /10710-0725 GU CODE 010711 0000 AND 0000 /10711-0000 @@ MCODE 010712 0000 AND 0000 /10712-0000 @@ FPCF 010713 7474 SNA SZL OSR /10713-7474 << FPCADR 010714 2410 ISZ I 0010 /10714-2410 TH FPCOM 010715 4000 JMS 0000 /10715-4000 @ FPEP 010716 5200 JMP 0600 /10716-5200 *@ 010717 3101 DCA 0101 /10717-3101 YA 010720 2101 ISZ 0101 /10720-2101 QA 010721 5320 JMP 0720 /10721-5320 +P 010722 6202 CIF 0 /10722-6202 2B 010723 4452 JMS I XSKFLG /10723-4452 $* 010724 5200 JMP 0600 /10724-5200 *@ 010725 6202 CIF 0 /10725-6202 2B 010726 4453 JMS I XSTATC /10726-4453 $+ 010727 0054 AND 0054 /10727-0054 @, 010730 5200 JMP 0600 /10730-5200 *@ 010731 6202 CIF 0 /10731-6202 2B 010732 4461 JMS I XCHAPT /10732-4461 $1 010733 0000 AND 0000 /10733-0000 @@ 010734 7501 MQA /10734-7501 =A 010735 7213 CLA IAC RTR /10735-7213 :K 010736 7234 7234 /10736-7234 :\ 010737 7512 SPA HLT /10737-7512 =J 010740 4001 JMS 0001 /10740-4001 A 010741 2222 ISZ 0622 /10741-2222 RR 010742 2222 ISZ 0622 /10742-2222 RR 010743 2222 ISZ 0622 /10743-2222 RR 010744 2222 ISZ 0622 /10744-2222 RR 010745 2223 ISZ 0623 /10745-2223 RS 010746 5200 JMP 0600 /10746-5200 *@ 010747 6201 CDF 0 /10747-6201 2A 010750 1502 TAD I YALL /10750-1502 MB 010751 6211 CDF 10 /10751-6211 2I 010752 7640 SZA CLA /10752-7640 > 010753 5200 JMP 0600 /10753-5200 *@ 010754 5777 JMP I 0777 /10754-5777 /? 010755 5750 JMP I 0750 /10755-5750 /( 010756 0000 AND 0000 /10756-0000 @@ 010757 7200 CLA /10757-7200 :@ 010760 0777 AND I 0777 /10760-0777 G? 010761 7233 CLA CML IAC RTR /10761-7233 :[ 010762 6544 6544 /10762-6544 5$ 010763 7231 CLA CML IAC RAR /10763-7231 :Y 010764 0037 AND 0037 /10764-0037 @_ 010765 7252 CLA CMA RTR /10765-7252 :* /DJFPAB PAL8-V50X 06-OCT-90 PAGE 1-12 010766 7300 CLA CLL /10766-7300 ;@ 010767 0007 AND 0007 /10767-0007 @G 010770 4506 JMS I 0106 /10770-4506 %F 010771 4450 JMS I 0050 /10771-4450 $( 010772 6001 ION /10772-6001 0A 010773 7000 NOP /10773-7000 8@ 010774 0017 AND 0017 /10774-0017 @O 010775 3124 DCA 0124 /10775-3124 YT 010776 0006 AND 0006 /10776-0006 @F 010777 1000 TAD 0000 /10777-1000 H@ 011000 6552 TST22X, FPICL /11000-6552 5* 011001 3101 DCA 0101 /11001-3101 YA 011002 6202 CIF 0 /11002-6202 2B 011003 4465 JMS I XENVSE /11003-4465 $5 011004 0022 AND 0022 /11004-0022 @R TSTNUM 011005 1107 TAD 0107 /11005-1107 IG CODE 011006 0000 AND 0000 /11006-0000 @@ MCODE 011007 0001 AND 0001 /11007-0001 @A FPCF 011010 1137 TAD 0137 /11010-1137 I_ FPCADR 011011 2410 ISZ I 0010 /11011-2410 TH FPCOM 011012 4000 JMS 0000 /11012-4000 @ FPEP 011013 5200 JMP 1000 /11013-5200 *@ 011014 6556 FPRST /11014-6556 5. 011015 0377 AND 1177 /11015-0377 C? 011016 7640 SZA CLA /11016-7640 > 011017 5225 JMP 1025 /11017-5225 *U 011020 2101 ISZ 0101 /11020-2101 QA 011021 5214 JMP 1014 /11021-5214 *L 011022 6202 CIF 0 /11022-6202 2B 011023 4452 JMS I XSKFLG /11023-4452 $* 011024 5200 JMP 1000 /11024-5200 *@ 011025 6202 CIF 0 /11025-6202 2B 011026 4462 JMS I XIDXCH /11026-4462 $2 011027 0000 AND 0000 /11027-0000 @@ 011030 7701 MQA CLA /11030-7701 ?A 011031 0000 AND 0000 /11031-0000 @@ 011032 0000 AND 0000 /11032-0000 @@ 011033 0000 AND 0000 /11033-0000 @@ 011034 0000 AND 0000 /11034-0000 @@ 011035 0000 AND 0000 /11035-0000 @@ 011036 0077 AND 0077 /11036-0077 @? 011037 5200 JMP 1000 /11037-5200 *@ 011040 3101 DCA 0101 /11040-3101 YA 011041 6555 FPST /11041-6555 5- 011042 7410 SKP /11042-7410 <H 011043 5247 JMP 1047 /11043-5247 *' 011044 6202 CIF 0 /11044-6202 2B 011045 4452 JMS I XSKFLG /11045-4452 $* 011046 5200 JMP 1000 /11046-5200 *@ 011047 6556 FPRST /11047-6556 5. 011050 0377 AND 1177 /11050-0377 C? 011051 7640 SZA CLA /11051-7640 > /DJFPAB PAL8-V50X 06-OCT-90 PAGE 1-13 011052 5260 JMP 1060 /11052-5260 *0 011053 2101 ISZ 0101 /11053-2101 QA 011054 5247 JMP 1047 /11054-5247 *' 011055 6202 CIF 0 /11055-6202 2B 011056 4452 JMS I XSKFLG /11056-4452 $* 011057 5200 JMP 1000 /11057-5200 *@ 011060 6202 CIF 0 /11060-6202 2B 011061 4462 JMS I XIDXCH /11061-4462 $2 011062 0000 AND 0000 /11062-0000 @@ 011063 0000 AND 0000 /11063-0000 @@ 011064 0000 AND 0000 /11064-0000 @@ 011065 0000 AND 0000 /11065-0000 @@ 011066 0000 AND 0000 /11066-0000 @@ 011067 0000 AND 0000 /11067-0000 @@ 011070 0000 AND 0000 /11070-0000 @@ 011071 7777 MQA MQL CLA SAM /11071-7777 ?? 011072 5200 JMP 1000 /11072-5200 *@ 011073 3101 DCA 0101 /11073-3101 YA 011074 6555 FPST /11074-6555 5- 011075 7410 SKP /11075-7410 <H 011076 5302 JMP 1102 /11076-5302 +B 011077 6202 CIF 0 /11077-6202 2B 011100 4452 JMS I XSKFLG /11100-4452 $* 011101 5200 JMP 1000 /11101-5200 *@ 011102 2101 ISZ 0101 /11102-2101 QA 011103 5302 JMP 1102 /11103-5302 +B 011104 6202 CIF 0 /11104-6202 2B 011105 4452 JMS I XSKFLG /11105-4452 $* 011106 5200 JMP 1000 /11106-5200 *@ 011107 6202 CIF 0 /11107-6202 2B 011110 4453 JMS I XSTATC /11110-4453 $+ 011111 0014 AND 0014 /11111-0014 @L 011112 5200 JMP 1000 /11112-5200 *@ 011113 6202 CIF 0 /11113-6202 2B 011114 4461 JMS I XCHAPT /11114-4461 $1 011115 0001 AND 0001 /11115-0001 @A 011116 1160 TAD 0160 /11116-1160 I0 011117 7213 CLA IAC RTR /11117-7213 :K 011120 7223 CLA CML IAC BSW /11120-7223 :S 011121 7222 CLA CML BSW /11121-7222 :R 011122 0001 AND 0001 /11122-0001 @A 011123 0002 AND 0002 /11123-0002 @B 011124 0003 AND 0003 /11124-0003 @C 011125 0004 AND 0004 /11125-0004 @D 011126 0005 AND 0005 /11126-0005 @E 011127 0006 AND 0006 /11127-0006 @F 011130 5200 JMP 1000 /11130-5200 *@ 011131 6201 CDF 0 /11131-6201 2A 011132 1502 TAD I YALL /11132-1502 MB 011133 6211 CDF 10 /11133-6211 2I /DJFPAB PAL8-V50X 06-OCT-90 PAGE 1-14 011134 7640 SZA CLA /11134-7640 > 011135 5200 JMP 1000 /11135-5200 *@ 011136 5776 JMP I 1176 /11136-5776 /> 011137 0101 AND 0101 /11137-0101 AA 011140 7701 MQA CLA /11140-7701 ?A 011141 0107 AND 0107 /11141-0107 AG 011142 0077 AND 0077 /11142-0077 @? 011143 0001 AND 0001 /11143-0001 @A 011144 0111 AND 0111 /11144-0111 AI 011145 0077 AND 0077 /11145-0077 @? 011146 0117 AND 0117 /11146-0117 AO 011147 7700 SMA CLA /11147-7700 ?@ 011150 0001 AND 0001 /11150-0001 @A 011151 2111 ISZ 0111 /11151-2111 QI 011152 1155 TAD 0155 /11152-1155 I- 011153 4001 JMS 0001 /11153-4001 A 011154 1153 TAD 0153 /11154-1153 I+ 011155 2171 ISZ 0171 /11155-2171 Q9 011156 1160 TAD 0160 /11156-1160 I0 011157 0000 AND 0000 /11157-0000 @@ 011160 4001 JMS 0001 /11160-4001 A 011161 1160 TAD 0160 /11161-1160 I0 011162 1431 TAD I 0031 /11162-1431 LY 011163 5015 JMP 0015 /11163-5015 (M 011164 1716 TAD I 1116 /11164-1716 ON 011165 7437 MQL LSR /11165-7437 <_ 011166 3737 DCA I 1137 /11166-3737 __ 011167 7607 CLA DVI /11167-7607 >G 011170 7050 CMA RAR /11170-7050 8( 011171 5000 JMP 0000 /11171-5000 (@ 011172 5124 JMP 0124 /11172-5124 )T 011173 2516 ISZ I 0116 /11173-2516 UN 011174 4474 JMS I 0074 /11174-4474 $< 011175 0012 AND 0012 /11175-0012 @J 011176 1200 TAD 1000 /11176-1200 J@ 011177 0002 AND 0002 /11177-0002 @B 011200 7200 TST23X, CLA /11200-7200 :@ 011201 6552 FPICL /11201-6552 5* 011202 1342 TAD 1342 /11202-1342 K" 011203 3351 DCA 1351 /11203-3351 [) 011204 1343 TAD 1343 /11204-1343 K# 011205 3353 DCA 1353 /11205-3353 [+ 011206 1344 TAD 1344 /11206-1344 K$ 011207 3355 DCA 1355 /11207-3355 [- 011210 1200 TAD 1200 /11210-1200 J@ 011211 3161 DCA 0161 /11211-3161 Y1 011212 1346 TAD 1346 /11212-1346 K& 011213 3345 DCA 1345 /11213-3345 [% 011214 1377 TAD 1377 /11214-1377 K? 011215 3225 DCA 1225 /11215-3225 ZU 011216 1225 TAD 1225 /11216-1225 JU 011217 3246 DCA 1246 /11217-3246 Z& 011220 6202 CIF 0 /11220-6202 2B /DJFPAB PAL8-V50X 06-OCT-90 PAGE 1-15 011221 4465 JMS I XENVSE /11221-4465 $5 011222 0023 AND 0023 /11222-0023 @S TSTNUM 011223 1240 TAD 1240 /11223-1240 J CODE 011224 0000 AND 0000 /11224-0000 @@ MCODE 011225 0001 AND 0001 /11225-0001 @A FPCF 011226 1351 TAD 1351 /11226-1351 K) FPCADR 011227 2410 ISZ I 0010 /11227-2410 TH FPCOM 011230 4000 JMS 0000 /11230-4000 @ FPEP 011231 5200 JMP 1200 /11231-5200 *@ 011232 3101 DCA 0101 /11232-3101 YA 011233 2101 ISZ 0101 /11233-2101 QA 011234 5233 JMP 1233 /11234-5233 *[ 011235 6202 CIF 0 /11235-6202 2B 011236 4452 JMS I XSKFLG /11236-4452 $* 011237 5200 JMP 1200 /11237-5200 *@ 011240 6202 CIF 0 /11240-6202 2B 011241 4453 JMS I XSTATC /11241-4453 $+ 011242 2014 ISZ 0014 /11242-2014 PL 011243 5200 JMP 1200 /11243-5200 *@ 011244 6202 CIF 0 /11244-6202 2B 011245 4461 JMS I XCHAPT /11245-4461 $1 011246 0001 AND 0001 /11246-0001 @A 011247 1357 TAD 1357 /11247-1357 K/ 011250 7213 CLA IAC RTR /11250-7213 :K 011251 7223 CLA CML IAC BSW /11251-7223 :S 011252 1355 TAD 1355 /11252-1355 K- 011253 0001 AND 0001 /11253-0001 @A 011254 0002 AND 0002 /11254-0002 @B 011255 0003 AND 0003 /11255-0003 @C 011256 0004 AND 0004 /11256-0004 @D 011257 0005 AND 0005 /11257-0005 @E 011260 0006 AND 0006 /11260-0006 @F 011261 5200 JMP 1200 /11261-5200 *@ 011262 7000 NOP /11262-7000 8@ 011263 2353 ISZ 1353 /11263-2353 S+ 011264 1246 TAD 1246 /11264-1246 J& 011265 1376 TAD 1376 /11265-1376 K> 011266 3246 DCA 1246 /11266-3246 Z& 011267 1246 TAD 1246 /11267-1246 J& 011270 3225 DCA 1225 /11270-3225 ZU 011271 2345 ISZ 1345 /11271-2345 S% 011272 5220 JMP 1220 /11272-5220 *P 011273 7201 CLA IAC /11273-7201 :A 011274 3246 DCA 1246 /11274-3246 Z& 011275 1343 TAD 1343 /11275-1343 K# 011276 3353 DCA 1353 /11276-3353 [+ 011277 1346 TAD 1346 /11277-1346 K& 011300 3345 DCA 1345 /11300-3345 [% 011301 1347 TAD 1347 /11301-1347 K' 011302 3262 DCA 1262 /11302-3262 Z2 011303 2351 ISZ 1351 /11303-2351 S) 011304 1375 TAD 1375 /11304-1375 K= 011305 1246 TAD 1246 /11305-1246 J& /DJFPAB PAL8-V50X 06-OCT-90 PAGE 1-16 011306 3246 DCA 1246 /11306-3246 Z& 011307 1246 TAD 1246 /11307-1246 J& 011310 3225 DCA 1225 /11310-3225 ZU 011311 2345 ISZ 1345 /11311-2345 S% 011312 5220 JMP 1220 /11312-5220 *P 011313 7201 CLA IAC /11313-7201 :A 011314 3246 DCA 1246 /11314-3246 Z& 011315 1342 TAD 1342 /11315-1342 K" 011316 3351 DCA 1351 /11316-3351 [) 011317 1346 TAD 1346 /11317-1346 K& 011320 3345 DCA 1345 /11320-3345 [% 011321 1350 TAD 1350 /11321-1350 K( 011322 3262 DCA 1262 /11322-3262 Z2 011323 2355 ISZ 1355 /11323-2355 S- 011324 1374 TAD 1374 /11324-1374 K< 011325 1246 TAD 1246 /11325-1246 J& 011326 3246 DCA 1246 /11326-3246 Z& 011327 1246 TAD 1246 /11327-1246 J& 011330 3225 DCA 1225 /11330-3225 ZU 011331 2345 ISZ 1345 /11331-2345 S% 011332 5220 JMP 1220 /11332-5220 *P 011333 6201 CDF 0 /11333-6201 2A 011334 1502 TAD I YALL /11334-1502 MB 011335 6211 CDF 10 /11335-6211 2I 011336 7640 SZA CLA /11336-7640 > 011337 5200 JMP 1200 /11337-5200 *@ 011340 6203 CIF CDF 0 /11340-6203 2C 011341 5773 JMP I 1373 /11341-5773 /; 011342 1110 TAD 0110 /11342-1110 IH 011343 1100 TAD 0100 /11343-1100 I@ 011344 4000 JMS 0000 /11344-4000 @ 011345 4000 JMS 0000 /11345-4000 @ 011346 7771 MQA MQL CLA DPSZ /11346-7771 ?9 011347 5303 JMP 1303 /11347-5303 +C 011350 5323 JMP 1323 /11350-5323 +S 011351 1110 TAD 0110 /11351-1110 IH 011352 7223 CLA CML IAC BSW /11352-7223 :S 011353 1100 TAD 0100 /11353-1100 I@ 011354 7213 CLA IAC RTR /11354-7213 :K 011355 4000 JMS 0000 /11355-4000 @ 011356 1355 TAD 1355 /11356-1355 K- 011357 4447 JMS I 0047 /11357-4447 $' 011360 0077 AND 0077 /11360-0077 @? 011361 0241 AND 1241 /11361-0241 B! 011362 2031 ISZ 0031 /11362-2031 PY 011363 3470 DCA I XCNSTP /11363-3470 \8 011364 6400 6400 /11364-6400 4@ 011365 7775 MQA MQL CLA DCM /11365-7775 ?= 011366 6737 6737 /11366-6737 7_ 011367 0017 AND 0017 /11367-0017 @O 011370 0125 AND 0125 /11370-0125 AU 011371 0252 AND 1252 /11371-0252 B* 011372 0016 AND 0016 /11372-0016 @N 011373 3000 DCA 0000 /11373-3000 X@ 011374 1000 TAD 0000 /11374-1000 H@ /DJFPAB PAL8-V50X 06-OCT-90 PAGE 1-17 011375 0100 AND 0100 /11375-0100 A@ 011376 0010 AND 0010 /11376-0010 @H 011377 0001 AND 0001 /11377-0001 @A 011400 7200 TST24X, CLA /11400-7200 :@ 011401 1377 TAD 1577 /11401-1377 K? 011402 3011 DCA 0011 /11402-3011 XI 011403 1376 TAD 1576 /11403-1376 K> 011404 3012 DCA 0012 /11404-3012 XJ 011405 1375 TAD 1575 /11405-1375 K= 011406 3267 DCA 1467 /11406-3267 Z7 011407 1411 TAD I 0011 /11407-1411 LI 011410 6201 CDF 0 /11410-6201 2A 011411 3412 DCA I 0012 /11411-3412 \J 011412 6211 CDF 10 /11412-6211 2I 011413 2267 ISZ 1467 /11413-2267 R7 011414 5207 JMP 1407 /11414-5207 *G 011415 1374 TAD 1574 /11415-1374 K< 011416 6201 CDF 0 /11416-6201 2A 011417 3467 DCA I XCODE /11417-3467 \7 011420 6211 CDF 10 /11420-6211 2I 011421 6552 FPICL /11421-6552 5* 011422 6561 FMODE /11422-6561 51 011423 6202 CIF 0 /11423-6202 2B 011424 4436 JMS I 0036 /11424-4436 $^ 011425 0373 AND 1573 /11425-0373 C; 011426 7041 CMA IAC /11426-7041 8! 011427 3267 DCA 1467 /11427-3267 Z7 011430 1271 TAD 1471 /11430-1271 J9 011431 6553 FPCOM /11431-6553 5+ 011432 7200 CLA /11432-7200 :@ 011433 1272 TAD 1472 /11433-1272 J: 011434 7440 SZA /11434-7440 < 011435 6567 FPEP /11435-6567 57 011436 7200 CLA /11436-7200 :@ 011437 1073 TAD X7200 /11437-1073 H; 011440 6555 FPST /11440-6555 5- 011441 7000 NOP /11441-7000 8@ 011442 6565 FMDO /11442-6565 55 011443 2267 ISZ 1467 /11443-2267 R7 011444 5242 JMP 1442 /11444-5242 *" 011445 6202 CIF 0 /11445-6202 2B 011446 4436 JMS I 0036 /11446-4436 $^ 011447 7710 SPA CLA /11447-7710 ?H 011450 5260 JMP 1460 /11450-5260 *0 011451 6564 FMRP /11451-6564 54 011452 7421 MQL /11452-7421 <Q 011453 7200 CLA /11453-7200 :@ 011454 6563 FMRB /11454-6563 53 011455 2270 ISZ 1470 /11455-2270 R8 011456 5255 JMP 1455 /11456-5255 *- 011457 5200 JMP 1400 /11457-5200 *@ 011460 6554 FPHLT /11460-6554 5, 011461 6565 FMDO /11461-6565 55 011462 6565 FMDO /11462-6565 55 /DJFPAB PAL8-V50X 06-OCT-90 PAGE 1-18 011463 6565 FMDO /11463-6565 55 011464 6565 FMDO /11464-6565 55 011465 6565 FMDO /11465-6565 55 011466 5200 JMP 1400 /11466-5200 *@ 011467 0000 AND 0000 /11467-0000 @@ 011470 0000 AND 0000 /11470-0000 @@ 011471 2770 ISZ I 1570 /11471-2770 W8 011472 0000 AND 0000 /11472-0000 @@ 011473 0001 AND 0001 /11473-0001 @A 011474 1506 TAD I 0106 /11474-1506 MF 011475 7213 CLA IAC RTR /11475-7213 :K 011476 7223 CLA CML IAC BSW /11476-7223 :S 011477 0000 AND 0000 /11477-0000 @@ 011500 0001 AND 0001 /11500-0001 @A 011501 0002 AND 0002 /11501-0002 @B 011502 0003 AND 0003 /11502-0003 @C 011503 0004 AND 0004 /11503-0004 @D 011504 0005 AND 0005 /11504-0005 @E 011505 0006 AND 0006 /11505-0006 @F 011506 0000 AND 0000 /11506-0000 @@ 011507 0000 AND 0000 /11507-0000 @@ 011510 0000 AND 0000 /11510-0000 @@ 011511 0000 AND 0000 /11511-0000 @@ 011512 0000 AND 0000 /11512-0000 @@ 011513 0000 AND 0000 /11513-0000 @@ 011514 0000 AND 0000 /11514-0000 @@ 011515 1773 TAD I 1573 /11515-1773 O; 011516 3270 DCA 1470 /11516-3270 Z8 011517 1270 TAD 1470 /11517-1270 J8 011520 1372 TAD 1572 /11520-1372 K: 011521 3271 DCA 1471 /11521-3271 Z9 011522 1270 TAD 1470 /11522-1270 J8 011523 1371 TAD 1571 /11523-1371 K9 011524 3272 DCA 1472 /11524-3272 Z: 011525 1270 TAD 1470 /11525-1270 J8 011526 1370 TAD 1570 /11526-1370 K8 011527 3273 DCA 1473 /11527-3273 Z; 011530 1671 TAD I 1471 /11530-1671 N9 011531 7041 CMA IAC /11531-7041 8! 011532 1267 TAD 1467 /11532-1267 J7 011533 7640 SZA CLA /11533-7640 > 011534 5274 JMP 1474 /11534-5274 *< 011535 1672 TAD I 1472 /11535-1672 N: 011536 7041 CMA IAC /11536-7041 8! 011537 1266 TAD 1466 /11537-1266 J6 011540 7710 SPA CLA /11540-7710 ?H 011541 5274 JMP 1474 /11541-5274 *< 011542 1673 TAD I 1473 /11542-1673 N; 011543 7041 CMA IAC /11543-7041 8! 011544 1266 TAD 1466 /11544-1266 J6 011545 7740 SMA SZA CLA /11545-7740 ? 011546 5274 JMP 1474 /11546-5274 *< 011547 4141 JMS 0141 /11547-4141 !! 011550 6200 LXM /11550-6200 2@ 011551 4447 JMS I 0047 /11551-4447 $' /DJFPAB PAL8-V50X 06-OCT-90 PAGE 1-19 011552 0000 AND 0000 /11552-0000 @@ 011553 0000 AND 0000 /11553-0000 @@ 011554 0000 AND 0000 /11554-0000 @@ 011555 0000 AND 0000 /11555-0000 @@ 011556 0000 AND 0000 /11556-0000 @@ 011557 0000 AND 0000 /11557-0000 @@ 011560 4230 JMS 1430 /11560-4230 "X 011561 4230 JMS 1430 /11561-4230 "X 011562 4230 JMS 1430 /11562-4230 "X 011563 4230 JMS 1430 /11563-4230 "X 011564 4230 JMS 1430 /11564-4230 "X 011565 4230 JMS 1430 /11565-4230 "X 011566 4250 JMS 1450 /11566-4250 "( 011567 4250 JMS 1450 /11567-4250 "( 011570 1640 TAD I 1440 /11570-1640 N 011571 1620 TAD I 1420 /11571-1620 NP 011572 1600 TAD I 1400 /11572-1600 N@ 011573 3777 DCA I 1577 /11573-3777 _? 011574 1400 TAD I 0000 /11574-1400 L@ 011575 7767 MQA MQL CLA SWBA /11575-7767 ?7 011576 7177 7177 /11576-7177 9? 011577 1472 TAD I 0072 /11577-1472 L: 011600 0001 FPCA4, 0001 /FPAUSE /11600-0001 @A 011601 0002 0002 /FCLA /11601-0002 @B 011602 0000 0000 /FEXIT /11602-0000 @@ 011603 0050 0050 /STARTE /11603-0050 @( 011604 4001 4001 /TRAP4 1 /11604-4001 A 011605 1604 1604 / 1604 /11605-1604 ND 011606 0032 FPCA10, 0032 /XTA 2 /11606-0032 @Z 011607 0040 0040 /FNOP /11607-0040 @ 011610 3001 3001 /TRAP3 1 /11610-3001 XA 011611 1610 1610 / 1610 /11611-1610 NH 011612 0000 0000 /FEXIT /11612-0000 @@ 011613 0000 AND 0000 /11613-0000 @@ 011614 1131 TAD 0131 /11614-1131 IY 011615 1612 TAD I 1612 /11615-1612 NJ 011616 0000 AND 0000 /11616-0000 @@ 011617 0401 AND I 0001 /11617-0401 DA 011620 1661 TAD I 1661 /11620-1661 N1 011621 1001 TAD 0001 /11621-1001 HA 011622 1657 TAD I 1657 /11622-1657 N/ 011623 1011 TAD 0011 /11623-1011 HI 011624 1655 TAD I 1655 /11624-1655 N- 011625 1021 TAD 0021 /11625-1021 HQ 011626 1631 TAD I 1631 /11626-1631 NY 011627 3000 DCA 0000 /11627-3000 X@ 011630 1627 TAD I 1627 /11630-1627 NW 011631 1041 TAD 0041 /11631-1041 H! 011632 1635 TAD I 1635 /11632-1635 N] 011633 3000 DCA 0000 /11633-3000 X@ 011634 1633 TAD I 1633 /11634-1633 N[ 011635 1051 TAD 0051 /11635-1051 H) 011636 1641 TAD I 1641 /11636-1641 N! /DJFPAB PAL8-V50X 06-OCT-90 PAGE 1-20 011637 3000 DCA 0000 /11637-3000 X@ 011640 1637 TAD I 1637 /11640-1637 N_ 011641 1061 TAD 0061 /11641-1061 H1 011642 1653 TAD I 1653 /11642-1653 N+ 011643 1071 TAD 0071 /11643-1071 H9 011644 1651 TAD I 1651 /11644-1651 N) 011645 1030 TAD 0030 /11645-1030 HX 011646 7324 CLA CLL CML RAL /11646-7324 ;T 011647 3000 DCA 0000 /11647-3000 X@ 011650 1647 TAD I 1647 /11650-1647 N' 011651 3000 DCA 0000 /11651-3000 X@ 011652 1651 TAD I 1651 /11652-1651 N) 011653 3000 DCA 0000 /11653-3000 X@ 011654 1653 TAD I 1653 /11654-1653 N+ 011655 3000 DCA 0000 /11655-3000 X@ 011656 1655 TAD I 1655 /11656-1655 N- 011657 3000 DCA 0000 /11657-3000 X@ 011660 1657 TAD I 1657 /11660-1657 N/ 011661 7777 MQA MQL CLA SAM /11661-7777 ?? 011662 5777 JMP I 1777 /11662-5777 /? 011663 7777 MQA MQL CLA SAM /11663-7777 ?? 011664 1010 TAD 0010 /11664-1010 HH 011665 0202 AND 1602 /11665-0202 BB 011666 3030 DCA 0030 /11666-3030 XX 011667 1110 TAD 0110 /11667-1110 IH 011670 7237 7237 /11670-7237 :_ 011671 0777 AND I 1777 /11671-0777 G? 011672 0000 AND 0000 /11672-0000 @@ 011673 1110 TAD 0110 /11673-1110 IH 011674 7245 CLA CMA IAC RAL /11674-7245 :% 011675 0666 AND I 1666 /11675-0666 F6 011676 0000 AND 0000 /11676-0000 @@ 011677 1110 TAD 0110 /11677-1110 IH 011700 7267 CLA CMA CML IAC RTL /11700-7267 :7 011701 0651 AND I 1651 /11701-0651 F) 011702 0000 AND 0000 /11702-0000 @@ 011703 1700 MCOD2, 1700 /11703-1700 O@ 011704 0000 0000 /11704-0000 @@ 011705 1701 TAD I 1701 /11705-1701 OA 011706 0000 AND 0000 /11706-0000 @@ 011707 1702 TAD I 1702 /11707-1702 OB 011710 7777 MQA MQL CLA SAM /11710-7777 ?? 011711 1703 TAD I 1703 /11711-1703 OC 011712 0000 AND 0000 /11712-0000 @@ 011713 1704 TAD I 1704 /11713-1704 OD 011714 0001 AND 0001 /11714-0001 @A 011715 1705 TAD I 1705 /11715-1705 OE 011716 7776 SPA SNA SZL CLA OSR HLT /11716-7776 ?> 011717 1706 TAD I 1706 /11717-1706 OF 011720 0002 AND 0002 /11720-0002 @B 011721 1707 TAD I 1707 /11721-1707 OG 011722 7773 MQA MQL CLA DPIC /11722-7773 ?; 011723 1710 TAD I 1710 /11723-1710 OH 011724 0003 AND 0003 /11724-0003 @C /DJFPAB PAL8-V50X 06-OCT-90 PAGE 1-21 011725 1711 TAD I 1711 /11725-1711 OI 011726 7772 SPA SNA SZL CLA HLT /11726-7772 ?: 011727 1712 TAD I 1712 /11727-1712 OJ 011730 0014 AND 0014 /11730-0014 @L 011731 1713 TAD I 1713 /11731-1713 OK 011732 7764 SMA SZA SNL CLA OSR /11732-7764 ?4 011733 1714 TAD I 1714 /11733-1714 OL 011734 2000 ISZ 0000 /11734-2000 P@ 011735 1715 TAD I 1715 /11735-1715 OM 011736 7751 MQA CLA DPSZ /11736-7751 ?) 011737 1716 TAD I 1716 /11737-1716 ON 011740 3777 DCA I 1777 /11740-3777 _? 011741 1717 TAD I 1717 /11741-1717 OO 011742 7750 SPA SNA CLA /11742-7750 ?( 011743 1720 TAD I 1720 /11743-1720 OP 011744 7705 MQA CLA MUY /11744-7705 ?E 011745 1333 TAD 1733 /11745-1333 K[ 011746 7776 7776 /11746-0000 @@ 7776 FOR Rev 50, 0 for 0 011747 1334 TAD 1734 /11747-1334 K\ 011750 0000 AND 0000 /11750-0000 @@ 011751 1335 TAD 1735 /11751-1335 K] 011752 7776 SPA SNA SZL CLA OSR HLT /11752-7776 ?> 011753 1336 TAD 1736 /11753-1336 K^ 011754 7776 SPA SNA SZL CLA OSR HLT /11754-7776 ?> 011755 1337 TAD 1737 /11755-1337 K_ 011756 0000 AND 0000 /11756-0000 @@ 011757 1340 TAD 1740 /11757-1340 K 011760 7772 SPA SNA SZL CLA HLT /11760-7772 ?: 011761 1341 TAD 1741 /11761-1341 K! 011762 7772 SPA SNA SZL CLA HLT /11762-7772 ?: 011763 1342 TAD 1742 /11763-1342 K" 011764 7764 SMA SZA SNL CLA OSR /11764-7764 ?4 011765 1343 TAD 1743 /11765-1343 K# 011766 7764 SMA SZA SNL CLA OSR /11766-7764 ?4 011767 1344 TAD 1744 /11767-1344 K$ 011770 7751 MQA CLA DPSZ /11770-7751 ?) 011771 1345 TAD 1745 /11771-1345 K% 011772 7751 MQA CLA DPSZ /11772-7751 ?) 011773 1721 TAD I 1721 /11773-1721 OQ 011774 7773 MQA MQL CLA DPIC /11774-7773 ?; 011775 1314 TAD 1714 /11775-1314 KL 011776 7773 MQA MQL CLA DPIC /11776-7773 ?; 011777 1315 TAD 1715 /11777-1315 KM 012000 0000 AND 0000 /12000-0000 @@ 012001 1316 TAD 2116 /12001-1316 KN 012002 7776 SPA SNA SZL CLA OSR HLT /12002-7776 ?> 012003 1317 TAD 2117 /12003-1317 KO 012004 0001 AND 0001 /12004-0001 @A 012005 1320 TAD 2120 /12005-1320 KP 012006 7776 SPA SNA SZL CLA OSR HLT /12006-7776 ?> 012007 1321 TAD 2121 /12007-1321 KQ 012010 7772 SPA SNA SZL CLA HLT /12010-7772 ?: 012011 1322 TAD 2122 /12011-1322 KR 012012 0003 AND 0003 /12012-0003 @C 012013 1323 TAD 2123 /12013-1323 KS /DJFPAB PAL8-V50X 06-OCT-90 PAGE 1-22 012014 7772 SPA SNA SZL CLA HLT /12014-7772 ?: 012015 1324 TAD 2124 /12015-1324 KT 012016 7764 SMA SZA SNL CLA OSR /12016-7764 ?4 012017 1325 TAD 2125 /12017-1325 KU 012020 0014 AND 0014 /12020-0014 @L 012021 1326 TAD 2126 /12021-1326 KV 012022 7764 SMA SZA SNL CLA OSR /12022-7764 ?4 012023 1327 TAD 2127 /12023-1327 KW 012024 7751 MQA CLA DPSZ /12024-7751 ?) 012025 1330 TAD 2130 /12025-1330 KX 012026 2000 ISZ 0000 /12026-2000 P@ 012027 1331 TAD 2131 /12027-1331 KY 012030 7751 MQA CLA DPSZ /12030-7751 ?) 012031 1332 TAD 2132 /12031-1332 KZ 012032 7773 MQA MQL CLA DPIC /12032-7773 ?; 012033 1722 TAD I 2122 /12033-1722 OR 012034 0002 AND 0002 /12034-0002 @B 012035 1723 TAD I 2123 /12035-1723 OS 012036 7773 MQA MQL CLA DPIC /12036-7773 ?; 012037 1724 TAD I 2124 /12037-1724 OT 012040 0001 AND 0001 /12040-0001 @A 012041 1725 TAD I 2125 /12041-1725 OU 012042 0002 AND 0002 /12042-0002 @B 012043 1726 TAD I 2126 /12043-1726 OV 012044 7705 MQA CLA MUY /12044-7705 ?E 012045 1727 TAD I 2127 /12045-1727 OW 012046 0003 AND 0003 /12046-0003 @C 012047 1730 TAD I 2130 /12047-1730 OX 012050 0014 AND 0014 /12050-0014 @L 012051 1731 TAD I 2131 /12051-1731 OY 012052 2000 ISZ 0000 /12052-2000 P@ 012053 1732 TAD I 2132 /12053-1732 OZ 012054 3777 DCA I 2177 /12054-3777 _? 012055 1733 TAD I 2133 /12055-1733 O[ 012056 7777 MQA MQL CLA SAM /12056-7777 ?? 012057 1734 TAD I 2134 /12057-1734 O\ 012060 3777 DCA I 2177 /12060-3777 _? 012061 1735 TAD I 2135 /12061-1735 O] 012062 7705 MQA CLA MUY /12062-7705 ?E 012063 1736 TAD I 2136 /12063-1736 O^ 012064 7750 SPA SNA CLA /12064-7750 ?( 012065 1737 TAD I 2137 /12065-1737 O_ 012066 3771 DCA I 2171 /12066-3771 _9 012067 1740 TAD I 2140 /12067-1740 O 012070 2015 ISZ 0015 /12070-2015 PM 012071 1741 TAD I 2141 /12071-1741 O! 012072 0001 AND 0001 /12072-0001 @A 012073 1742 TAD I 2142 /12073-1742 O" 012074 7775 MQA MQL CLA DCM /12074-7775 ?= 012075 1743 TAD I 2143 /12075-1743 O# 012076 1377 TAD 2177 /12076-1377 K? 012077 1744 TAD I 2144 /12077-1744 O$ 012100 0000 AND 0000 /12100-0000 @@ 012101 1745 TAD I 2145 /12101-1745 O% 012102 0000 AND 0000 /12102-0000 @@ /DJFPAB PAL8-V50X 06-OCT-90 PAGE 1-23 012103 1746 TAD I 2146 /12103-1746 O& 012104 4000 JMS 0000 /12104-4000 @ 012105 1747 TAD I 2147 /12105-1747 O' 012106 0030 AND 0030 /12106-0030 @X 012107 1750 TAD I 2150 /12107-1750 O( 012110 0110 AND 0110 /12110-0110 AH 012111 1751 TAD I 2151 /12111-1751 O) 012112 0660 AND I 2060 /12112-0660 F0 012113 1752 TAD I 2152 /12113-1752 O* 012114 2066 ISZ 0066 /12114-2066 P6 012115 1753 TAD I 2153 /12115-1753 O+ 012116 1200 TAD 2000 /12116-1200 J@ 012117 1754 TAD I 2154 /12117-1754 O, 012120 0000 AND 0000 /12120-0000 @@ 012121 1755 TAD I 2155 /12121-1755 O- 012122 1031 TAD 0031 /12122-1031 HY 012123 1756 TAD I 2156 /12123-1756 O. 012124 0000 AND 0000 /12124-0000 @@ 012125 1757 TAD I 2157 /12125-1757 O/ 012126 0001 AND 0001 /12126-0001 @A 012127 1760 TAD I 2160 /12127-1760 O0 012130 5033 JMP 0033 /12130-5033 ([ 012131 1761 TAD I 2161 /12131-1761 O1 012132 4002 JMS 0002 /12132-4002 B 012133 1762 TAD I 2162 /12133-1762 O2 012134 0004 AND 0004 /12134-0004 @D 012135 1763 TAD I 2163 /12135-1763 O3 012136 0011 AND 0011 /12136-0011 @I 012137 0165 AND 0165 /12137-0165 A5 012140 0022 AND 0022 /12140-0022 @R 012141 1764 TAD I 2164 /12141-1764 O4 012142 7777 MQA MQL CLA SAM /12142-7777 ?? 012143 1765 TAD I 2165 /12143-1765 O5 012144 7777 MQA MQL CLA SAM /12144-7777 ?? 012145 1766 TAD I 2166 /12145-1766 O6 012146 7777 MQA MQL CLA SAM /12146-7777 ?? 012147 0165 AND 0165 /12147-0165 A5 012150 7776 SPA SNA SZL CLA OSR HLT /12150-7776 ?> 012151 1767 TAD I 2167 /12151-1767 O7 012152 0000 AND 0000 /12152-0000 @@ 012153 1770 TAD I 2170 /12153-1770 O8 012154 0000 AND 0000 /12154-0000 @@ 012155 1771 TAD I 2171 /12155-1771 O9 012156 0030 AND 0030 /12156-0030 @X 012157 1772 TAD I 2172 /12157-1772 O: 012160 0000 AND 0000 /12160-0000 @@ 012161 1773 TAD I 2173 /12161-1773 O; 012162 0030 AND 0030 /12162-0030 @X 012163 1774 TAD I 2174 /12163-1774 O< 012164 0030 AND 0030 /12164-0030 @X 012165 0001 AND 0001 /12165-0001 @A 012166 0030 AND 0030 /12166-0030 @X 012167 0300 MCOD3, 0300 /12167-0300 C@ 012170 7200 7200 /12170-7200 :@ /DJFPAB PAL8-V50X 06-OCT-90 PAGE 1-24 012171 0321 0321 /12171-0321 CQ 012172 0000 0000 /12172-0000 @@ 012173 0107 AND 0107 /12173-0107 AG 012174 3746 DCA I 2146 /12174-3746 _& 012175 1000 TAD 0000 /12175-1000 H@ 012176 0000 AND 0000 /12176-0000 @@ 012177 0160 AND 0160 /12177-0160 A0 012200 0000 AND 0000 /12200-0000 @@ 012201 0163 AND 0163 /12201-0163 A3 012202 3747 DCA I 2347 /12202-3747 _' 012203 0300 MCOD4, AND 2300 /12203-0300 C@ 012204 7200 CLA /12204-7200 :@ 012205 0321 AND 2321 /12205-0321 CQ 012206 0001 AND 0001 /12206-0001 @A 012207 0321 AND 2321 /12207-0321 CQ 012210 1600 TAD I 2200 /12210-1600 N@ 012211 0321 AND 2321 /12211-0321 CQ 012212 7213 CLA IAC RTR /12212-7213 :K 012213 0307 AND 2307 /12213-0307 CG 012214 7223 CLA CML IAC BSW /12214-7223 :S 012215 0321 AND 2321 /12215-0321 CQ 012216 0001 AND 0001 /12216-0001 @A 012217 0321 AND 2321 /12217-0321 CQ 012220 0002 AND 0002 /12220-0002 @B 012221 0313 AND 2313 /12221-0313 CK 012222 0003 AND 0003 /12222-0003 @C 012223 0010 AND 0010 /12223-0010 @H 012224 0004 AND 0004 /12224-0004 @D 012225 0010 AND 0010 /12225-0010 @H 012226 0005 AND 0005 /12226-0005 @E 012227 0107 AND 0107 /12227-0107 AG 012230 0006 AND 0006 /12230-0006 @F 012231 0002 AND 0002 /12231-0002 @B 012232 0001 AND 0001 /12232-0001 @A 012233 0020 AND 0020 /12233-0020 @P 012234 0001 AND 0001 /12234-0001 @A 012235 1002 TAD 0002 /12235-1002 HB 012236 0002 AND 0002 /12236-0002 @B 012237 1050 TAD 0050 /12237-1050 H( 012240 0002 AND 0002 /12240-0002 @B 012241 1051 TAD 0051 /12241-1051 H) 012242 0002 AND 0002 /12242-0002 @B 012243 1052 TAD 0052 /12243-1052 H* 012244 0000 AND 0000 /12244-0000 @@ 012245 1053 TAD 0053 /12245-1053 H+ 012246 0000 AND 0000 /12246-0000 @@ 012247 1054 TAD 0054 /12247-1054 H, 012250 0000 AND 0000 /12250-0000 @@ 012251 1055 TAD 0055 /12251-1055 H- 012252 0000 AND 0000 /12252-0000 @@ 012253 0020 AND 0020 /12253-0020 @P 012254 0000 AND 0000 /12254-0000 @@ 012255 1000 TAD 0000 /12255-1000 H@ 012256 0000 AND 0000 /12256-0000 @@ /DJFPAB PAL8-V50X 06-OCT-90 PAGE 1-25 012257 1001 TAD 0001 /12257-1001 HA 012260 0000 AND 0000 /12260-0000 @@ 012261 0324 AND 2324 /12261-0324 CT 012262 0000 AND 0000 /12262-0000 @@ 012263 0327 AND 2327 /12263-0327 CW 012264 0000 AND 0000 /12264-0000 @@ 012265 0170 AND 0170 /12265-0170 A8 012266 0000 AND 0000 /12266-0000 @@ 012267 0332 AND 2332 /12267-0332 CZ 012270 0000 AND 0000 /12270-0000 @@ 012271 0336 AND 2336 /12271-0336 C^ 012272 0000 AND 0000 /12272-0000 @@ 012273 0341 AND 2341 /12273-0341 C! 012274 0000 AND 0000 /12274-0000 @@ 012275 0165 AND 0165 /12275-0165 A5 012276 0000 AND 0000 /12276-0000 @@ 012277 0165 AND 0165 /12277-0165 A5 012300 1603 TAD I 2203 /12300-1603 NC 012301 0165 AND 0165 /12301-0165 A5 012302 7213 CLA IAC RTR /12302-7213 :K 012303 0165 AND 0165 /12303-0165 A5 012304 7223 CLA CML IAC BSW /12304-7223 :S 012305 0351 AND 2351 /12305-0351 C) 012306 1600 TAD I 2200 /12306-1600 N@ 012307 0300 MCOD5, AND 2300 /12307-0300 C@ 012310 7200 CLA /12310-7200 :@ 012311 0321 AND 2321 /12311-0321 CQ 012312 0000 AND 0000 /12312-0000 @@ 012313 0321 AND 2321 /12313-0321 CQ 012314 4322 JMS 2322 /12314-4322 #R 012315 0321 AND 2321 /12315-0321 CQ 012316 7213 CLA IAC RTR /12316-7213 :K 012317 0307 AND 2307 /12317-0307 CG 012320 7223 CLA CML IAC BSW /12320-7223 :S 012321 0321 AND 2321 /12321-0321 CQ 012322 4015 JMS 0015 /12322-4015 M 012323 0321 AND 2321 /12323-0321 CQ 012324 0000 AND 0000 /12324-0000 @@ 012325 0313 AND 2313 /12325-0313 CK 012326 1111 TAD 0111 /12326-1111 II 012327 0010 AND 0010 /12327-0010 @H 012330 0000 AND 0000 /12330-0000 @@ 012331 0010 AND 0010 /12331-0010 @H 012332 0000 AND 0000 /12332-0000 @@ 012333 0107 AND 0107 /12333-0107 AG 012334 0001 AND 0001 /12334-0001 @A 012335 1004 TAD 0004 /12335-1004 HD 012336 0003 AND 0003 /12336-0003 @C 012337 1334 TAD 2334 /12337-1334 K\ 012340 0003 AND 0003 /12340-0003 @C 012341 1335 TAD 2335 /12341-1335 K] 012342 0003 AND 0003 /12342-0003 @C 012343 1336 TAD 2336 /12343-1336 K^ 012344 0000 AND 0000 /12344-0000 @@ /DJFPAB PAL8-V50X 06-OCT-90 PAGE 1-26 012345 1337 TAD 2337 /12345-1337 K_ 012346 0000 AND 0000 /12346-0000 @@ 012347 1340 TAD 2340 /12347-1340 K 012350 0000 AND 0000 /12350-0000 @@ 012351 1341 TAD 2341 /12351-1341 K! 012352 0000 AND 0000 /12352-0000 @@ 012353 1342 TAD 2342 /12353-1342 K" 012354 0000 AND 0000 /12354-0000 @@ 012355 1343 TAD 2343 /12355-1343 K# 012356 0000 AND 0000 /12356-0000 @@ 012357 1344 TAD 2344 /12357-1344 K$ 012360 0001 AND 0001 /12360-0001 @A 012361 1345 TAD 2345 /12361-1345 K% 012362 0001 AND 0001 /12362-0001 @A 012363 1005 TAD 0005 /12363-1005 HE 012364 1111 TAD 0111 /12364-1111 II 012365 1072 TAD 0072 /12365-1072 H: 012366 1111 TAD 0111 /12366-1111 II 012367 1133 TAD 0133 /12367-1133 I[ 012370 1111 TAD 0111 /12370-1111 II 012371 1134 TAD 0134 /12371-1134 I\ 012372 1111 TAD 0111 /12372-1111 II 012373 1135 TAD 0135 /12373-1135 I] 012374 0000 AND 0000 /12374-0000 @@ 012375 1136 TAD 0136 /12375-1136 I^ 012376 0001 AND 0001 /12376-0001 @A 012377 1137 TAD 0137 /12377-1137 I_ 012400 7777 MQA MQL CLA SAM /12400-7777 ?? 012401 1140 TAD 0140 /12401-1140 I 012402 0000 AND 0000 /12402-0000 @@ 012403 1141 TAD 0141 /12403-1141 I! 012404 7777 MQA MQL CLA SAM /12404-7777 ?? 012405 1142 TAD 0142 /12405-1142 I" 012406 0000 AND 0000 /12406-0000 @@ 012407 1143 TAD 0143 /12407-1143 I# 012410 7777 MQA MQL CLA SAM /12410-7777 ?? 012411 1144 TAD 0144 /12411-1144 I$ 012412 1111 TAD 0111 /12412-1111 II 012413 1145 TAD 0145 /12413-1145 I% 012414 6666 6666 /12414-6666 66 012415 1073 TAD 0073 /12415-1073 H; 012416 0000 AND 0000 /12416-0000 @@ 012417 1350 TAD 2550 /12417-1350 K( 012420 7777 MQA MQL CLA SAM /12420-7777 ?? 012421 1351 TAD 2551 /12421-1351 K) 012422 7777 MQA MQL CLA SAM /12422-7777 ?? 012423 1352 TAD 2552 /12423-1352 K* 012424 7777 MQA MQL CLA SAM /12424-7777 ?? 012425 1353 TAD 2553 /12425-1353 K+ 012426 7777 MQA MQL CLA SAM /12426-7777 ?? 012427 1354 TAD 2554 /12427-1354 K, 012430 7777 MQA MQL CLA SAM /12430-7777 ?? 012431 1355 TAD 2555 /12431-1355 K- 012432 7777 MQA MQL CLA SAM /12432-7777 ?? 012433 1356 TAD 2556 /12433-1356 K. /DJFPAB PAL8-V50X 06-OCT-90 PAGE 1-27 012434 7777 MQA MQL CLA SAM /12434-7777 ?? 012435 1357 TAD 2557 /12435-1357 K/ 012436 7777 MQA MQL CLA SAM /12436-7777 ?? 012437 1360 TAD 2560 /12437-1360 K0 012440 7777 MQA MQL CLA SAM /12440-7777 ?? 012441 0020 AND 0020 /12441-0020 @P 012442 6666 6666 /12442-6666 66 012443 1006 TAD 0006 /12443-1006 HF 012444 0004 AND 0004 /12444-0004 @D 012445 1007 TAD 0007 /12445-1007 HG 012446 0004 AND 0004 /12446-0004 @D 012447 1070 TAD 0070 /12447-1070 H8 012450 0004 AND 0004 /12450-0004 @D 012451 1334 TAD 2534 /12451-1334 K\ 012452 4015 JMS 0015 /12452-4015 M 012453 1335 TAD 2535 /12453-1335 K] 012454 7777 MQA MQL CLA SAM /12454-7777 ?? 012455 1336 TAD 2536 /12455-1336 K^ 012456 7777 MQA MQL CLA SAM /12456-7777 ?? 012457 1337 TAD 2537 /12457-1337 K_ 012460 0000 AND 0000 /12460-0000 @@ 012461 1340 TAD 2540 /12461-1340 K 012462 7777 MQA MQL CLA SAM /12462-7777 ?? 012463 1341 TAD 2541 /12463-1341 K! 012464 7777 MQA MQL CLA SAM /12464-7777 ?? 012465 1342 TAD 2542 /12465-1342 K" 012466 7777 MQA MQL CLA SAM /12466-7777 ?? 012467 1343 TAD 2543 /12467-1343 K# 012470 7777 MQA MQL CLA SAM /12470-7777 ?? 012471 1344 TAD 2544 /12471-1344 K$ 012472 7777 MQA MQL CLA SAM /12472-7777 ?? 012473 1345 TAD 2545 /12473-1345 K% 012474 7777 MQA MQL CLA SAM /12474-7777 ?? 012475 1071 TAD 0071 /12475-1071 H9 012476 6666 6666 /12476-6666 66 012477 1446 TAD I 0046 /12477-1446 L& 012500 6666 6666 /12500-6666 66 012501 1177 TAD 0177 /12501-1177 I? 012502 6666 6666 /12502-6666 66 012503 1200 TAD 2400 /12503-1200 J@ 012504 6666 6666 /12504-6666 66 012505 1201 TAD 2401 /12505-1201 JA 012506 7777 MQA MQL CLA SAM /12506-7777 ?? 012507 1215 TAD 2415 /12507-1215 JM 012510 6666 6666 /12510-6666 66 012511 1216 TAD 2416 /12511-1216 JN 012512 7777 MQA MQL CLA SAM /12512-7777 ?? 012513 1217 TAD 2417 /12513-1217 JO 012514 4001 JMS 0001 /12514-4001 A 012515 1220 TAD 2420 /12515-1220 JP 012516 6666 6666 /12516-6666 66 012517 1221 TAD 2421 /12517-1221 JQ 012520 6666 6666 /12520-6666 66 012521 1222 TAD 2422 /12521-1222 JR 012522 7777 MQA MQL CLA SAM /12522-7777 ?? /DJFPAB PAL8-V50X 06-OCT-90 PAGE 1-28 012523 1223 TAD 2423 /12523-1223 JS 012524 7777 MQA MQL CLA SAM /12524-7777 ?? 012525 1224 TAD 2424 /12525-1224 JT 012526 7777 MQA MQL CLA SAM /12526-7777 ?? 012527 1225 TAD 2425 /12527-1225 JU 012530 7777 MQA MQL CLA SAM /12530-7777 ?? 012531 1226 TAD 2426 /12531-1226 JV 012532 7777 MQA MQL CLA SAM /12532-7777 ?? 012533 1227 TAD 2427 /12533-1227 JW 012534 7777 MQA MQL CLA SAM /12534-7777 ?? 012535 1230 TAD 2430 /12535-1230 JX 012536 0000 AND 0000 /12536-0000 @@ 012537 1201 TAD 2401 /12537-1201 JA 012540 0000 AND 0000 /12540-0000 @@ 012541 1202 TAD 2402 /12541-1202 JB 012542 0000 AND 0000 /12542-0000 @@ 012543 1203 TAD 2403 /12543-1203 JC 012544 7777 MQA MQL CLA SAM /12544-7777 ?? 012545 1204 TAD 2404 /12545-1204 JD 012546 7777 MQA MQL CLA SAM /12546-7777 ?? 012547 1205 TAD 2405 /12547-1205 JE 012550 0000 AND 0000 /12550-0000 @@ 012551 1206 TAD 2406 /12551-1206 JF 012552 0000 AND 0000 /12552-0000 @@ 012553 1207 TAD 2407 /12553-1207 JG 012554 0000 AND 0000 /12554-0000 @@ 012555 1210 TAD 2410 /12555-1210 JH 012556 7776 SPA SNA SZL CLA OSR HLT /12556-7776 ?> 012557 1211 TAD 2411 /12557-1211 JI 012560 7777 MQA MQL CLA SAM /12560-7777 ?? 012561 1212 TAD 2412 /12561-1212 JJ 012562 7777 MQA MQL CLA SAM /12562-7777 ?? 012563 1204 TAD 2404 /12563-1204 JD 012564 5555 JMP I 0155 /12564-5555 -- 012565 1213 TAD 2413 /12565-1213 JK 012566 4000 JMS 0000 /12566-4000 @ 012567 1214 TAD 2414 /12567-1214 JL 012570 0000 AND 0000 /12570-0000 @@ 012571 1237 TAD 2437 /12571-1237 J_ 012572 0000 AND 0000 /12572-0000 @@ 012573 1240 TAD 2440 /12573-1240 J 012574 0000 AND 0000 /12574-0000 @@ 012575 1247 TAD 2447 /12575-1247 J' 012576 0000 AND 0000 /12576-0000 @@ 012577 1447 TAD I 0047 /12577-1447 L' 012600 0000 AND 0000 /12600-0000 @@ 012601 1451 TAD I 0051 /12601-1451 L) 012602 0000 AND 0000 /12602-0000 @@ 012603 1452 TAD I 0052 /12603-1452 L* 012604 4000 JMS 0000 /12604-4000 @ 012605 1347 TAD 2747 /12605-1347 K' 012606 4000 JMS 0000 /12606-4000 @ 012607 1350 TAD 2750 /12607-1350 K( 012610 4000 JMS 0000 /12610-4000 @ 012611 1351 TAD 2751 /12611-1351 K) /DJFPAB PAL8-V50X 06-OCT-90 PAGE 1-29 012612 5555 JMP I 0155 /12612-5555 -- 012613 1352 TAD 2752 /12613-1352 K* 012614 5555 JMP I 0155 /12614-5555 -- 012615 1353 TAD 2753 /12615-1353 K+ 012616 7777 MQA MQL CLA SAM /12616-7777 ?? 012617 1354 TAD 2754 /12617-1354 K, 012620 7777 MQA MQL CLA SAM /12620-7777 ?? 012621 1355 TAD 2755 /12621-1355 K- 012622 7776 SPA SNA SZL CLA OSR HLT /12622-7776 ?> 012623 1356 TAD 2756 /12623-1356 K. 012624 7776 SPA SNA SZL CLA OSR HLT /12624-7776 ?> 012625 1357 TAD 2757 /12625-1357 K/ 012626 0000 AND 0000 /12626-0000 @@ 012627 1360 TAD 2760 /12627-1360 K0 012630 0000 AND 0000 /12630-0000 @@ 012631 0020 AND 0020 /12631-0020 @P 012632 7777 MQA MQL CLA SAM /12632-7777 ?? 012633 0074 AND 0074 /12633-0074 @< 012634 3000 DCA 0000 /12634-3000 X@ 012635 1000 TAD 0000 /12635-1000 H@ 012636 4324 JMS 2724 /12636-4324 #T 012637 1001 TAD 0001 /12637-1001 HA 012640 4324 JMS 2724 /12640-4324 #T 012641 0324 AND 2724 /12641-0324 CT 012642 4324 JMS 2724 /12642-4324 #T 012643 0327 AND 2727 /12643-0327 CW 012644 7777 MQA MQL CLA SAM /12644-7777 ?? 012645 0170 AND 0170 /12645-0170 A8 012646 0000 AND 0000 /12646-0000 @@ 012647 0332 AND 2732 /12647-0332 CZ 012650 7776 SPA SNA SZL CLA OSR HLT /12650-7776 ?> 012651 0336 AND 2736 /12651-0336 C^ 012652 7777 MQA MQL CLA SAM /12652-7777 ?? 012653 0341 AND 2741 /12653-0341 C! 012654 5555 JMP I 0155 /12654-5555 -- 012655 0165 AND 0165 /12655-0165 A5 012656 4000 JMS 0000 /12656-4000 @ 012657 0165 AND 0165 /12657-0165 A5 012660 4326 JMS 2726 /12660-4326 #V 012661 0165 AND 0165 /12661-0165 A5 012662 7213 CLA IAC RTR /12662-7213 :K 012663 0165 AND 0165 /12663-0165 A5 012664 7223 CLA CML IAC BSW /12664-7223 :S 012665 0351 AND 2751 /12665-0351 C) 012666 4324 JMS 2724 /12666-4324 #T 012667 0300 MCOD6, AND 2700 /12667-0300 C@ 012670 7200 CLA /12670-7200 :@ 012671 0321 AND 2721 /12671-0321 CQ 012672 0000 AND 0000 /12672-0000 @@ 012673 0321 AND 2721 /12673-0321 CQ 012674 4543 JMS I 0143 /12674-4543 %# 012675 0321 AND 2721 /12675-0321 CQ 012676 7213 CLA IAC RTR /12676-7213 :K 012677 0307 AND 2707 /12677-0307 CG /DJFPAB PAL8-V50X 06-OCT-90 PAGE 1-30 012700 7223 CLA CML IAC BSW /12700-7223 :S 012701 0321 AND 2721 /12701-0321 CQ 012702 0001 AND 0001 /12702-0001 @A 012703 0321 AND 2721 /12703-0321 CQ 012704 0001 AND 0001 /12704-0001 @A 012705 0313 AND 2713 /12705-0313 CK 012706 1603 TAD I 2603 /12706-1603 NC 012707 0010 AND 0010 /12707-0010 @H 012710 0004 AND 0004 /12710-0004 @D 012711 0010 AND 0010 /12711-0010 @H 012712 0005 AND 0005 /12712-0005 @E 012713 0107 AND 0107 /12713-0107 AG 012714 0006 AND 0006 /12714-0006 @F 012715 1010 TAD 0010 /12715-1010 HH 012716 0005 AND 0005 /12716-0005 @E 012717 1074 TAD 0074 /12717-1074 H< 012720 0005 AND 0005 /12720-0005 @E 012721 1075 TAD 0075 /12721-1075 H= 012722 0005 AND 0005 /12722-0005 @E 012723 1334 TAD 2734 /12723-1334 K\ 012724 0005 AND 0005 /12724-0005 @E 012725 1335 TAD 2735 /12725-1335 K] 012726 0001 AND 0001 /12726-0001 @A 012727 1336 TAD 2736 /12727-1336 K^ 012730 0001 AND 0001 /12730-0001 @A 012731 1337 TAD 2737 /12731-1337 K_ 012732 0000 AND 0000 /12732-0000 @@ 012733 1340 TAD 2740 /12733-1340 K 012734 0004 AND 0004 /12734-0004 @D 012735 1341 TAD 2741 /12735-1341 K! 012736 0004 AND 0004 /12736-0004 @D 012737 1342 TAD 2742 /12737-1342 K" 012740 0005 AND 0005 /12740-0005 @E 012741 1343 TAD 2743 /12741-1343 K# 012742 0005 AND 0005 /12742-0005 @E 012743 1344 TAD 2744 /12743-1344 K$ 012744 0006 AND 0006 /12744-0006 @F 012745 1345 TAD 2745 /12745-1345 K% 012746 0006 AND 0006 /12746-0006 @F 012747 1076 TAD 0076 /12747-1076 H> 012750 1603 TAD I 2603 /12750-1603 NC 012751 1077 TAD 0077 /12751-1077 H? 012752 1603 TAD I 2603 /12752-1603 NC 012753 1240 TAD 2640 /12753-1240 J 012754 0001 AND 0001 /12754-0001 @A 012755 1241 TAD 2641 /12755-1241 J! 012756 0001 AND 0001 /12756-0001 @A 012757 1242 TAD 2642 /12757-1242 J" 012760 0001 AND 0001 /12760-0001 @A 012761 1243 TAD 2643 /12761-1243 J# 012762 0001 AND 0001 /12762-0001 @A 012763 1244 TAD 2644 /12763-1244 J$ 012764 4004 JMS 0004 /12764-4004 D 012765 1245 TAD 2645 /12765-1245 J% 012766 1603 TAD I 2603 /12766-1603 NC /DJFPAB PAL8-V50X 06-OCT-90 PAGE 1-31 012767 1246 TAD 2646 /12767-1246 J& 012770 0001 AND 0001 /12770-0001 @A 012771 1247 TAD 2647 /12771-1247 J' 012772 0000 AND 0000 /12772-0000 @@ 012773 1100 TAD 0100 /12773-1100 I@ 012774 0000 AND 0000 /12774-0000 @@ 012775 1447 TAD I 0047 /12775-1447 L' 012776 0000 AND 0000 /12776-0000 @@ 012777 1451 TAD I 0051 /12777-1451 L) 013000 0000 AND 0000 /13000-0000 @@ 013001 1452 TAD I 0052 /13001-1452 L* 013002 0001 AND 0001 /13002-0001 @A 013003 1347 TAD 3147 /13003-1347 K' 013004 0001 AND 0001 /13004-0001 @A 013005 1350 TAD 3150 /13005-1350 K( 013006 0001 AND 0001 /13006-0001 @A 013007 1357 TAD 3157 /13007-1357 K/ 013010 0001 AND 0001 /13010-0001 @A 013011 1360 TAD 3160 /13011-1360 K0 013012 0001 AND 0001 /13012-0001 @A 013013 0020 AND 0020 /13013-0020 @P 013014 1603 TAD I 3003 /13014-1603 NC 013015 1012 TAD 0012 /13015-1012 HJ 013016 0006 AND 0006 /13016-0006 @F 013017 1013 TAD 0013 /13017-1013 HK 013020 0006 AND 0006 /13020-0006 @F 013021 0020 AND 0020 /13021-0020 @P 013022 0006 AND 0006 /13022-0006 @F 013023 1014 TAD 0014 /13023-1014 HL 013024 0007 AND 0007 /13024-0007 @G 013025 1015 TAD 0015 /13025-1015 HM 013026 0007 AND 0007 /13026-0007 @G 013027 1011 TAD 0011 /13027-1011 HI 013030 0007 AND 0007 /13030-0007 @G 013031 1003 TAD 0003 /13031-1003 HC 013032 1603 TAD I 3003 /13032-1603 NC 013033 0020 AND 0020 /13033-0020 @P 013034 0000 AND 0000 /13034-0000 @@ 013035 1020 TAD 0020 /13035-1020 HP 013036 0050 AND 0050 /13036-0050 @( 013037 1021 TAD 0021 /13037-1021 HQ 013040 0050 AND 0050 /13040-0050 @( 013041 1022 TAD 0022 /13041-1022 HR 013042 0050 AND 0050 /13042-0050 @( 013043 1023 TAD 0023 /13043-1023 HS 013044 0000 AND 0000 /13044-0000 @@ 013045 0020 AND 0020 /13045-0020 @P 013046 0000 AND 0000 /13046-0000 @@ 013047 0074 AND 0074 /13047-0074 @< 013050 4001 JMS 0001 /13050-4001 A 013051 1000 TAD 0000 /13051-1000 H@ 013052 1604 TAD I 3004 /13052-1604 ND 013053 1001 TAD 0001 /13053-1001 HA 013054 1604 TAD I 3004 /13054-1604 ND 013055 0324 AND 3124 /13055-0324 CT /DJFPAB PAL8-V50X 06-OCT-90 PAGE 1-32 013056 1604 TAD I 3004 /13056-1604 ND 013057 0327 AND 3127 /13057-0327 CW 013060 1603 TAD I 3003 /13060-1603 NC 013061 0170 AND 0170 /13061-0170 A8 013062 0000 AND 0000 /13062-0000 @@ 013063 0332 AND 3132 /13063-0332 CZ 013064 0000 AND 0000 /13064-0000 @@ 013065 0336 AND 3136 /13065-0336 C^ 013066 0000 AND 0000 /13066-0000 @@ 013067 0341 AND 3141 /13067-0341 C! 013070 0001 AND 0001 /13070-0001 @A 013071 0165 AND 0165 /13071-0165 A5 013072 0001 AND 0001 /13072-0001 @A 013073 0165 AND 0165 /13073-0165 A5 013074 1606 TAD I 3006 /13074-1606 NF 013075 0165 AND 0165 /13075-0165 A5 013076 7213 CLA IAC RTR /13076-7213 :K 013077 0165 AND 0165 /13077-0165 A5 013100 7223 CLA CML IAC BSW /13100-7223 :S 013101 0351 AND 3151 /13101-0351 C) 013102 1604 TAD I 3004 /13102-1604 ND 013103 0300 MCOD7, AND 3100 /13103-0300 C@ 013104 7200 CLA /13104-7200 :@ 013105 0321 AND 3121 /13105-0321 CQ 013106 0000 AND 0000 /13106-0000 @@ 013107 0321 AND 3121 /13107-0321 CQ 013110 4736 JMS I 3136 /13110-4736 '^ 013111 0321 AND 3121 /13111-0321 CQ 013112 7213 CLA IAC RTR /13112-7213 :K 013113 0307 AND 3107 /13113-0307 CG 013114 7223 CLA CML IAC BSW /13114-7223 :S 013115 0321 AND 3121 /13115-0321 CQ 013116 0027 AND 0027 /13116-0027 @W 013117 0321 AND 3121 /13117-0321 CQ 013120 2002 ISZ 0002 /13120-2002 PB 013121 0313 AND 3113 /13121-0313 CK 013122 0003 AND 0003 /13122-0003 @C 013123 0010 AND 0010 /13123-0010 @H 013124 0004 AND 0004 /13124-0004 @D 013125 0010 AND 0010 /13125-0010 @H 013126 0005 AND 0005 /13126-0005 @E 013127 0107 AND 0107 /13127-0107 AG 013130 0006 AND 0006 /13130-0006 @F 013131 0070 AND 0070 /13131-0070 @8 013132 0017 AND 0017 /13132-0017 @O 013133 1031 TAD 0031 /13133-1031 HY 013134 0030 AND 0030 /13134-0030 @X 013135 1032 TAD 0032 /13135-1032 HZ 013136 0030 AND 0030 /13136-0030 @X 013137 1033 TAD 0033 /13137-1033 H[ 013140 0030 AND 0030 /13140-0030 @X 013141 1034 TAD 0034 /13141-1034 H\ 013142 7777 MQA MQL CLA SAM /13142-7777 ?? 013143 1064 TAD 0064 /13143-1064 H4 /DJFPAB PAL8-V50X 06-OCT-90 PAGE 1-33 013144 0030 AND 0030 /13144-0030 @X 013145 1334 TAD 3134 /13145-1334 K\ 013146 0001 AND 0001 /13146-0001 @A 013147 1335 TAD 3135 /13147-1335 K] 013150 2002 ISZ 0002 /13150-2002 PB 013151 1336 TAD 3136 /13151-1336 K^ 013152 2002 ISZ 0002 /13152-2002 PB 013153 1337 TAD 3137 /13153-1337 K_ 013154 0000 AND 0000 /13154-0000 @@ 013155 1340 TAD 3140 /13155-1340 K 013156 0004 AND 0004 /13156-0004 @D 013157 1341 TAD 3141 /13157-1341 K! 013160 0004 AND 0004 /13160-0004 @D 013161 1342 TAD 3142 /13161-1342 K" 013162 0005 AND 0005 /13162-0005 @E 013163 1343 TAD 3143 /13163-1343 K# 013164 0005 AND 0005 /13164-0005 @E 013165 1344 TAD 3144 /13165-1344 K$ 013166 0006 AND 0006 /13166-0006 @F 013167 1345 TAD 3145 /13167-1345 K% 013170 0006 AND 0006 /13170-0006 @F 013171 1065 TAD 0065 /13171-1065 H5 013172 0003 AND 0003 /13172-0003 @C 013173 1066 TAD 0066 /13173-1066 H6 013174 0003 AND 0003 /13174-0003 @C 013175 1260 TAD 3060 /13175-1260 J0 013176 0003 AND 0003 /13176-0003 @C 013177 1261 TAD 3061 /13177-1261 J1 013200 7777 MQA MQL CLA SAM /13200-7777 ?? 013201 1262 TAD 3262 /13201-1262 J2 013202 7777 MQA MQL CLA SAM /13202-7777 ?? 013203 1264 TAD 3264 /13203-1264 J4 013204 0013 AND 0013 /13204-0013 @K 013205 1265 TAD 3265 /13205-1265 J5 013206 0013 AND 0013 /13206-0013 @K 013207 1266 TAD 3266 /13207-1266 J6 013210 0013 AND 0013 /13210-0013 @K 013211 1267 TAD 3267 /13211-1267 J7 013212 7777 MQA MQL CLA SAM /13212-7777 ?? 013213 1270 TAD 3270 /13213-1270 J8 013214 0000 AND 0000 /13214-0000 @@ 013215 1273 TAD 3273 /13215-1273 J; 013216 1001 TAD 0001 /13216-1001 HA 013217 1274 TAD 3274 /13217-1274 J< 013220 0001 AND 0001 /13220-0001 @A 013221 1275 TAD 3275 /13221-1275 J= 013222 4002 JMS 0002 /13222-4002 B 013223 1276 TAD 3276 /13223-1276 J> 013224 0002 AND 0002 /13224-0002 @B 013225 1277 TAD 3277 /13225-1277 J? 013226 4003 JMS 0003 /13226-4003 C 013227 1067 TAD 0067 /13227-1067 H7 013230 0000 AND 0000 /13230-0000 @@ 013231 1073 TAD 0073 /13231-1073 H; 013232 0000 AND 0000 /13232-0000 @@ /DJFPAB PAL8-V50X 06-OCT-90 PAGE 1-34 013233 1350 TAD 3350 /13233-1350 K( 013234 0000 AND 0000 /13234-0000 @@ 013235 1351 TAD 3351 /13235-1351 K) 013236 1001 TAD 0001 /13236-1001 HA 013237 1352 TAD 3352 /13237-1352 K* 013240 1001 TAD 0001 /13240-1001 HA 013241 1353 TAD 3353 /13241-1353 K+ 013242 4002 JMS 0002 /13242-4002 B 013243 1354 TAD 3354 /13243-1354 K, 013244 4002 JMS 0002 /13244-4002 B 013245 1355 TAD 3355 /13245-1355 K- 013246 0002 AND 0002 /13246-0002 @B 013247 1356 TAD 3356 /13247-1356 K. 013250 0002 AND 0002 /13250-0002 @B 013251 1357 TAD 3357 /13251-1357 K/ 013252 4003 JMS 0003 /13252-4003 C 013253 1360 TAD 3360 /13253-1360 K0 013254 4003 JMS 0003 /13254-4003 C 013255 0020 AND 0020 /13255-0020 @P 013256 0001 AND 0001 /13256-0001 @A 013257 1040 TAD 0040 /13257-1040 H 013260 0022 AND 0022 /13260-0022 @R 013261 1041 TAD 0041 /13261-1041 H! 013262 0022 AND 0022 /13262-0022 @R 013263 1042 TAD 0042 /13263-1042 H" 013264 0022 AND 0022 /13264-0022 @R 013265 1043 TAD 0043 /13265-1043 H# 013266 7215 7215 /13266-7215 :M 013267 1333 TAD 3333 /13267-1333 K[ 013270 0001 AND 0001 /13270-0001 @A 013271 1334 TAD 3334 /13271-1334 K\ 013272 0001 AND 0001 /13272-0001 @A 013273 1335 TAD 3335 /13273-1335 K] 013274 1001 TAD 0001 /13274-1001 HA 013275 1336 TAD 3336 /13275-1336 K^ 013276 1001 TAD 0001 /13276-1001 HA 013277 1337 TAD 3337 /13277-1337 K_ 013300 0000 AND 0000 /13300-0000 @@ 013301 1340 TAD 3340 /13301-1340 K 013302 4002 JMS 0002 /13302-4002 B 013303 1341 TAD 3341 /13303-1341 K! 013304 4002 JMS 0002 /13304-4002 B 013305 1342 TAD 3342 /13305-1342 K" 013306 0002 AND 0002 /13306-0002 @B 013307 1343 TAD 3343 /13307-1343 K# 013310 0002 AND 0002 /13310-0002 @B 013311 1344 TAD 3344 /13311-1344 K$ 013312 4003 JMS 0003 /13312-4003 C 013313 1345 TAD 3345 /13313-1345 K% 013314 4003 JMS 0003 /13314-4003 C 013315 1044 TAD 0044 /13315-1044 H$ 013316 0001 AND 0001 /13316-0001 @A 013317 1045 TAD 0045 /13317-1045 H% 013320 0001 AND 0001 /13320-0001 @A 013321 1046 TAD 0046 /13321-1046 H& /DJFPAB PAL8-V50X 06-OCT-90 PAGE 1-35 013322 0001 AND 0001 /13322-0001 @A 013323 1147 TAD 0147 /13323-1147 I' 013324 0001 AND 0001 /13324-0001 @A 013325 1150 TAD 0150 /13325-1150 I( 013326 7777 MQA MQL CLA SAM /13326-7777 ?? 013327 1151 TAD 0151 /13327-1151 I) 013330 7777 MQA MQL CLA SAM /13330-7777 ?? 013331 1153 TAD 0153 /13331-1153 I+ 013332 0013 AND 0013 /13332-0013 @K 013333 1154 TAD 0154 /13333-1154 I, 013334 0013 AND 0013 /13334-0013 @K 013335 1155 TAD 0155 /13335-1155 I- 013336 0013 AND 0013 /13336-0013 @K 013337 1162 TAD 0162 /13337-1162 I2 013340 7777 MQA MQL CLA SAM /13340-7777 ?? 013341 1163 TAD 0163 /13341-1163 I3 013342 0000 AND 0000 /13342-0000 @@ 013343 1164 TAD 0164 /13343-1164 I4 013344 0006 AND 0006 /13344-0006 @F 013345 1157 TAD 0157 /13345-1157 I/ 013346 0005 AND 0005 /13346-0005 @E 013347 1160 TAD 0160 /13347-1160 I0 013350 0004 AND 0004 /13350-0004 @D 013351 1161 TAD 0161 /13351-1161 I1 013352 0003 AND 0003 /13352-0003 @C 013353 1047 TAD 0047 /13353-1047 H' 013354 2002 ISZ 0002 /13354-2002 PB 013355 0253 AND 3253 /13355-0253 B+ 013356 2002 ISZ 0002 /13356-2002 PB 013357 0020 AND 0020 /13357-0020 @P 013360 0003 AND 0003 /13360-0003 @C 013361 1012 TAD 0012 /13361-1012 HJ 013362 0006 AND 0006 /13362-0006 @F 013363 1013 TAD 0013 /13363-1013 HK 013364 0006 AND 0006 /13364-0006 @F 013365 0020 AND 0020 /13365-0020 @P 013366 0006 AND 0006 /13366-0006 @F 013367 1040 TAD 0040 /13367-1040 H 013370 0026 AND 0026 /13370-0026 @V 013371 1041 TAD 0041 /13371-1041 H! 013372 0026 AND 0026 /13372-0026 @V 013373 1042 TAD 0042 /13373-1042 H" 013374 0026 AND 0026 /13374-0026 @V 013375 1043 TAD 0043 /13375-1043 H# 013376 7221 CLA CML IAC /13376-7221 :Q 013377 1333 TAD 3333 /13377-1333 K[ 013400 0001 AND 0001 /13400-0001 @A 013401 1334 TAD 3534 /13401-1334 K\ 013402 0001 AND 0001 /13402-0001 @A 013403 1346 TAD 3546 /13403-1346 K& 013404 1001 TAD 0001 /13404-1001 HA 013405 1344 TAD 3544 /13405-1344 K$ 013406 1001 TAD 0001 /13406-1001 HA 013407 1345 TAD 3545 /13407-1345 K% 013410 0000 AND 0000 /13410-0000 @@ /DJFPAB PAL8-V50X 06-OCT-90 PAGE 1-36 013411 1044 TAD 0044 /13411-1044 H$ 013412 0001 AND 0001 /13412-0001 @A 013413 0253 AND 3453 /13413-0253 B+ 013414 0001 AND 0001 /13414-0001 @A 013415 0020 AND 0020 /13415-0020 @P 013416 0001 AND 0001 /13416-0001 @A 013417 0074 AND 0074 /13417-0074 @< 013420 4000 JMS 0000 /13420-4000 @ 013421 1000 TAD 0000 /13421-1000 H@ 013422 4742 JMS I 3542 /13422-4742 '" 013423 1001 TAD 0001 /13423-1001 HA 013424 4742 JMS I 3542 /13424-4742 '" 013425 0324 AND 3524 /13425-0324 CT 013426 4742 JMS I 3542 /13426-4742 '" 013427 0336 AND 3536 /13427-0336 C^ 013430 4003 JMS 0003 /13430-4003 C 013431 0341 AND 3541 /13431-0341 C! 013432 1001 TAD 0001 /13432-1001 HA 013433 0165 AND 0165 /13433-0165 A5 013434 0030 AND 0030 /13434-0030 @X 013435 0165 AND 0165 /13435-0165 A5 013436 4744 JMS I 3544 /13436-4744 '$ 013437 0165 AND 0165 /13437-0165 A5 013440 7213 CLA IAC RTR /13440-7213 :K 013441 0165 AND 0165 /13441-0165 A5 013442 7223 CLA CML IAC BSW /13442-7223 :S 013443 0351 AND 3551 /13443-0351 C) 013444 4742 JMS I 3542 /13444-4742 '" 013445 0300 MCOD10, AND 3500 /13445-0300 C@ 013446 7200 CLA /13446-7200 :@ 013447 0321 AND 3521 /13447-0321 CQ 013450 0001 AND 0001 /13450-0001 @A 013451 0321 AND 3521 /13451-0321 CQ 013452 1606 TAD I 3406 /13452-1606 NF 013453 0321 AND 3521 /13453-0321 CQ 013454 7213 CLA IAC RTR /13454-7213 :K 013455 0307 AND 3507 /13455-0307 CG 013456 7223 CLA CML IAC BSW /13456-7223 :S 013457 0321 AND 3521 /13457-0321 CQ 013460 0001 AND 0001 /13460-0001 @A 013461 0321 AND 3521 /13461-0321 CQ 013462 0002 AND 0002 /13462-0002 @B 013463 0313 AND 3513 /13463-0313 CK 013464 0003 AND 0003 /13464-0003 @C 013465 0010 AND 0010 /13465-0010 @H 013466 0004 AND 0004 /13466-0004 @D 013467 0010 AND 0010 /13467-0010 @H 013470 0005 AND 0005 /13470-0005 @E 013471 0107 AND 0107 /13471-0107 AG 013472 0006 AND 0006 /13472-0006 @F 013473 0072 AND 0072 /13473-0072 @: 013474 0032 AND 0032 /13474-0032 @Z 013475 1103 TAD 0103 /13475-1103 IC 013476 5252 JMP 3452 /13476-5252 ** /DJFPAB PAL8-V50X 06-OCT-90 PAGE 1-37 013477 1104 TAD 0104 /13477-1104 ID 013500 5252 JMP 3452 /13500-5252 ** 013501 1105 TAD 0105 /13501-1105 IE 013502 7777 MQA MQL CLA SAM /13502-7777 ?? 013503 1106 TAD 0106 /13503-1106 IF 013504 7777 MQA MQL CLA SAM /13504-7777 ?? 013505 1107 TAD 0107 /13505-1107 IG 013506 0027 AND 0027 /13506-0027 @W 013507 1110 TAD 0110 /13507-1110 IH 013510 0000 AND 0000 /13510-0000 @@ 013511 1070 TAD 0070 /13511-1070 H8 013512 0000 AND 0000 /13512-0000 @@ 013513 1334 TAD 3534 /13513-1334 K\ 013514 0000 AND 0000 /13514-0000 @@ 013515 1335 TAD 3535 /13515-1335 K] 013516 7777 MQA MQL CLA SAM /13516-7777 ?? 013517 1336 TAD 3536 /13517-1336 K^ 013520 7777 MQA MQL CLA SAM /13520-7777 ?? 013521 1337 TAD 3537 /13521-1337 K_ 013522 0000 AND 0000 /13522-0000 @@ 013523 1340 TAD 3540 /13523-1340 K 013524 0000 AND 0000 /13524-0000 @@ 013525 1341 TAD 3541 /13525-1341 K! 013526 0000 AND 0000 /13526-0000 @@ 013527 1342 TAD 3542 /13527-1342 K" 013530 0000 AND 0000 /13530-0000 @@ 013531 1343 TAD 3543 /13531-1343 K# 013532 0000 AND 0000 /13532-0000 @@ 013533 1344 TAD 3544 /13533-1344 K$ 013534 0000 AND 0000 /13534-0000 @@ 013535 1345 TAD 3545 /13535-1345 K% 013536 0000 AND 0000 /13536-0000 @@ 013537 1071 TAD 0071 /13537-1071 H9 013540 5252 JMP 3452 /13540-5252 ** 013541 1446 TAD I 0046 /13541-1446 L& 013542 5252 JMP 3452 /13542-5252 ** 013543 1177 TAD 0177 /13543-1177 I? 013544 5252 JMP 3452 /13544-5252 ** 013545 1200 TAD 3400 /13545-1200 J@ 013546 5252 JMP 3452 /13546-5252 ** 013547 1201 TAD 3401 /13547-1201 JA 013550 7777 MQA MQL CLA SAM /13550-7777 ?? 013551 1215 TAD 3415 /13551-1215 JM 013552 5252 JMP 3452 /13552-5252 ** 013553 1216 TAD 3416 /13553-1216 JN 013554 0000 AND 0000 /13554-0000 @@ 013555 1217 TAD 3417 /13555-1217 JO 013556 0013 AND 0013 /13556-0013 @K 013557 1220 TAD 3420 /13557-1220 JP 013560 5252 JMP 3452 /13560-5252 ** 013561 1221 TAD 3421 /13561-1221 JQ 013562 5252 JMP 3452 /13562-5252 ** 013563 1222 TAD 3422 /13563-1222 JR 013564 0000 AND 0000 /13564-0000 @@ 013565 1223 TAD 3423 /13565-1223 JS /DJFPAB PAL8-V50X 06-OCT-90 PAGE 1-38 013566 0000 AND 0000 /13566-0000 @@ 013567 1224 TAD 3424 /13567-1224 JT 013570 0000 AND 0000 /13570-0000 @@ 013571 1225 TAD 3425 /13571-1225 JU 013572 0000 AND 0000 /13572-0000 @@ 013573 1226 TAD 3426 /13573-1226 JV 013574 0000 AND 0000 /13574-0000 @@ 013575 1227 TAD 3427 /13575-1227 JW 013576 0000 AND 0000 /13576-0000 @@ 013577 1230 TAD 3430 /13577-1230 JX 013600 0000 AND 0000 /13600-0000 @@ 013601 1201 TAD 3601 /13601-1201 JA 013602 0000 AND 0000 /13602-0000 @@ 013603 1202 TAD 3602 /13603-1202 JB 013604 0000 AND 0000 /13604-0000 @@ 013605 1237 TAD 3637 /13605-1237 J_ 013606 0000 AND 0000 /13606-0000 @@ 013607 1240 TAD 3640 /13607-1240 J 013610 0000 AND 0000 /13610-0000 @@ 013611 1247 TAD 3647 /13611-1247 J' 013612 0000 AND 0000 /13612-0000 @@ 013613 1447 TAD I 0047 /13613-1447 L' 013614 0000 AND 0000 /13614-0000 @@ 013615 1451 TAD I 0051 /13615-1451 L) 013616 0000 AND 0000 /13616-0000 @@ 013617 1452 TAD I 0052 /13617-1452 L* 013620 0013 AND 0013 /13620-0013 @K 013621 1347 TAD 3747 /13621-1347 K' 013622 0013 AND 0013 /13622-0013 @K 013623 1350 TAD 3750 /13623-1350 K( 013624 0013 AND 0013 /13624-0013 @K 013625 1351 TAD 3751 /13625-1351 K) 013626 5252 JMP 3652 /13626-5252 ** 013627 1352 TAD 3752 /13627-1352 K* 013630 5252 JMP 3652 /13630-5252 ** 013631 1353 TAD 3753 /13631-1353 K+ 013632 0000 AND 0000 /13632-0000 @@ 013633 1354 TAD 3754 /13633-1354 K, 013634 0000 AND 0000 /13634-0000 @@ 013635 1355 TAD 3755 /13635-1355 K- 013636 0000 AND 0000 /13636-0000 @@ 013637 1356 TAD 3756 /13637-1356 K. 013640 0000 AND 0000 /13640-0000 @@ 013641 1357 TAD 3757 /13641-1357 K/ 013642 0000 AND 0000 /13642-0000 @@ 013643 1360 TAD 3760 /13643-1360 K0 013644 0000 AND 0000 /13644-0000 @@ 013645 0020 AND 0020 /13645-0020 @P 013646 0000 AND 0000 /13646-0000 @@ 013647 0020 AND 0020 /13647-0020 @P 013650 0040 AND 0040 /13650-0040 @ 013651 0074 AND 0074 /13651-0074 @< 013652 3001 DCA 0001 /13652-3001 XA 013653 1000 TAD 0000 /13653-1000 H@ 013654 1610 TAD I 3610 /13654-1610 NH /DJFPAB PAL8-V50X 06-OCT-90 PAGE 1-39 013655 1001 TAD 0001 /13655-1001 HA 013656 1610 TAD I 3610 /13656-1610 NH 013657 0324 AND 3724 /13657-0324 CT 013660 1610 TAD I 3610 /13660-1610 NH 013661 0327 AND 3727 /13661-0327 CW 013662 0000 AND 0000 /13662-0000 @@ 013663 0170 AND 0170 /13663-0170 A8 013664 0000 AND 0000 /13664-0000 @@ 013665 0332 AND 3732 /13665-0332 CZ 013666 0000 AND 0000 /13666-0000 @@ 013667 0336 AND 3736 /13667-0336 C^ 013670 0000 AND 0000 /13670-0000 @@ 013671 0341 AND 3741 /13671-0341 C! 013672 5252 JMP 3652 /13672-5252 ** 013673 0165 AND 0165 /13673-0165 A5 013674 0013 AND 0013 /13674-0013 @K 013675 0165 AND 0165 /13675-0165 A5 013676 1612 TAD I 3612 /13676-1612 NJ 013677 0165 AND 0165 /13677-0165 A5 013700 7213 CLA IAC RTR /13700-7213 :K 013701 0165 AND 0165 /13701-0165 A5 013702 7223 CLA CML IAC BSW /13702-7223 :S 013703 0351 AND 3751 /13703-0351 C) 013704 1610 TAD I 3610 /13704-1610 NH 013705 0300 MCOD11, AND 3700 /13705-0300 C@ 013706 7200 CLA /13706-7200 :@ 013707 0321 AND 3721 /13707-0321 CQ 013710 0770 AND I 3770 /13710-0770 G8 013711 0321 AND 3721 /13711-0321 CQ 013712 5306 JMP 3706 /13712-5306 +F 013713 0321 AND 3721 /13713-0321 CQ 013714 6543 6543 /13714-6543 5# 013715 0307 AND 3707 /13715-0307 CG 013716 1234 TAD 3634 /13716-1234 J\ 013717 0321 AND 3721 /13717-0321 CQ 013720 0001 AND 0001 /13720-0001 @A 013721 0321 AND 3721 /13721-0321 CQ 013722 0002 AND 0002 /13722-0002 @B 013723 0313 AND 3713 /13723-0313 CK 013724 0003 AND 0003 /13724-0003 @C 013725 0010 AND 0010 /13725-0010 @H 013726 0004 AND 0004 /13726-0004 @D 013727 0010 AND 0010 /13727-0010 @H 013730 0005 AND 0005 /13730-0005 @E 013731 0107 AND 0107 /13731-0107 AG 013732 0006 AND 0006 /13732-0006 @F 013733 0034 AND 0034 /13733-0034 @\ 013734 1100 TAD 0100 /13734-1100 I@ 013735 0020 AND 0020 /13735-0020 @P 013736 7213 CLA IAC RTR /13736-7213 :K 013737 0036 AND 0036 /13737-0036 @^ 013740 1110 TAD 0110 /13740-1110 IH 013741 0020 AND 0020 /13741-0020 @P 013742 7223 CLA CML IAC BSW /13742-7223 :S /DJFPAB PAL8-V50X 06-OCT-90 PAGE 1-40 013743 0050 AND 0050 /13743-0050 @( 013744 1121 TAD 0121 /13744-1121 IQ 013745 0052 AND 0052 /13745-0052 @* 013746 1612 TAD I 3612 /13746-1612 NJ 013747 0055 AND 0055 /13747-0055 @- 013750 1030 TAD 0030 /13750-1030 HX 013751 0020 AND 0020 /13751-0020 @P 013752 5314 JMP 3714 /13752-5314 +L 013753 0060 AND 0060 /13753-0060 @0 013754 1131 TAD 0131 /13754-1131 IY 013755 0062 AND 0062 /13755-0062 @2 013756 1612 TAD I 3612 /13756-1612 NJ 013757 0065 AND 0065 /13757-0065 @5 013760 1031 TAD 0031 /13760-1031 HY 013761 0020 AND 0020 /13761-0020 @P 013762 1616 TAD I 3616 /13762-1616 NN 013763 0014 AND 0014 /13763-0014 @L 013764 1030 TAD 0030 /13764-1030 HX 013765 0020 AND 0020 /13765-0020 @P 013766 5314 JMP 3714 /13766-5314 +L 013767 0014 AND 0014 /13767-0014 @L 013770 1030 TAD 0030 /13770-1030 HX 013771 0020 AND 0020 /13771-0020 @P 013772 7224 CLA CML RAL /13772-7224 :T 013773 0014 AND 0014 /13773-0014 @L 013774 1031 TAD 0031 /13774-1031 HY 013775 0020 AND 0020 /13775-0020 @P 013776 1616 TAD I 3616 /13776-1616 NN 013777 1000 TAD 0000 /13777-1000 H@ 014000 0000 AND 0000 /14000-0000 @@ 014001 1001 TAD 0001 /14001-1001 HA 014002 0000 AND 0000 /14002-0000 @@ 014003 0324 AND 4124 /14003-0324 CT 014004 0000 AND 0000 /14004-0000 @@ 014005 0327 AND 4127 /14005-0327 CW 014006 0003 AND 0003 /14006-0003 @C 014007 0170 AND 0170 /14007-0170 A8 014010 0006 AND 0006 /14010-0006 @F 014011 0332 AND 4132 /14011-0332 CZ 014012 0005 AND 0005 /14012-0005 @E 014013 0336 AND 4136 /14013-0336 C^ 014014 0004 AND 0004 /14014-0004 @D 014015 0341 AND 4141 /14015-0341 C! 014016 0002 AND 0002 /14016-0002 @B 014017 0165 AND 0165 /14017-0165 A5 014020 0001 AND 0001 /14020-0001 @A 014021 0165 AND 0165 /14021-0165 A5 014022 1617 TAD I 4017 /14022-1617 NO 014023 0165 AND 0165 /14023-0165 A5 014024 7213 CLA IAC RTR /14024-7213 :K 014025 0165 AND 0165 /14025-0165 A5 014026 7223 CLA CML IAC BSW /14026-7223 :S 014027 0351 AND 4151 /14027-0351 C) 014030 1612 TAD I 4012 /14030-1612 NJ /DJFPAB PAL8-V50X 06-OCT-90 PAGE 1-41 014031 0300 MCOD12, AND 4100 /14031-0300 C@ 014032 7200 CLA /14032-7200 :@ 014033 0321 AND 4121 /14033-0321 CQ 014034 0000 AND 0000 /14034-0000 @@ 014035 0321 AND 4121 /14035-0321 CQ 014036 7275 7275 /14036-7275 := 014037 0321 AND 4121 /14037-0321 CQ 014040 7213 CLA IAC RTR /14040-7213 :K 014041 0307 AND 4107 /14041-0307 CG 014042 7223 CLA CML IAC BSW /14042-7223 :S 014043 0321 AND 4121 /14043-0321 CQ 014044 0001 AND 0001 /14044-0001 @A 014045 0321 AND 4121 /14045-0321 CQ 014046 0002 AND 0002 /14046-0002 @B 014047 0313 AND 4113 /14047-0313 CK 014050 0003 AND 0003 /14050-0003 @C 014051 0010 AND 0010 /14051-0010 @H 014052 0004 AND 0004 /14052-0004 @D 014053 0010 AND 0010 /14053-0010 @H 014054 0005 AND 0005 /14054-0005 @E 014055 0107 AND 0107 /14055-0107 AG 014056 0006 AND 0006 /14056-0006 @F 014057 1002 TAD 0002 /14057-1002 HB 014060 0002 AND 0002 /14060-0002 @B 014061 1050 TAD 0050 /14061-1050 H( 014062 0002 AND 0002 /14062-0002 @B 014063 1051 TAD 0051 /14063-1051 H) 014064 0002 AND 0002 /14064-0002 @B 014065 1052 TAD 0052 /14065-1052 H* 014066 0000 AND 0000 /14066-0000 @@ 014067 1053 TAD 0053 /14067-1053 H+ 014070 0000 AND 0000 /14070-0000 @@ 014071 1054 TAD 0054 /14071-1054 H, 014072 0000 AND 0000 /14072-0000 @@ 014073 1055 TAD 0055 /14073-1055 H- 014074 0000 AND 0000 /14074-0000 @@ 014075 0020 AND 0020 /14075-0020 @P 014076 0000 AND 0000 /14076-0000 @@ 014077 0014 AND 0014 /14077-0014 @L 014100 1000 TAD 0000 /14100-1000 H@ 014101 0020 AND 0020 /14101-0020 @P 014102 7302 CLA CLL BSW /14102-7302 ;B 014103 0014 AND 0014 /14103-0014 @L 014104 1010 TAD 0010 /14104-1010 HH 014105 0020 AND 0020 /14105-0020 @P 014106 7306 CLA CLL RTL /14106-7306 ;F 014107 0014 AND 0014 /14107-0014 @L 014110 1020 TAD 0020 /14110-1020 HP 014111 0020 AND 0020 /14111-0020 @P 014112 7312 CLA CLL RTR /14112-7312 ;J 014113 0024 AND 0024 /14113-0024 @T 014114 1040 TAD 0040 /14114-1040 H 014115 0024 AND 0024 /14115-0024 @T 014116 1050 TAD 0050 /14116-1050 H( 014117 0024 AND 0024 /14117-0024 @T /DJFPAB PAL8-V50X 06-OCT-90 PAGE 1-42 014120 1060 TAD 0060 /14120-1060 H0 014121 0024 AND 0024 /14121-0024 @T 014122 1070 TAD 0070 /14122-1070 H8 014123 0014 AND 0014 /14123-0014 @L 014124 1031 TAD 0031 /14124-1031 HY 014125 0020 AND 0020 /14125-0020 @P 014126 1617 TAD I 4017 /14126-1617 NO 014127 0114 AND 0114 /14127-0114 AL 014130 0401 AND I 0001 /14130-0401 DA 014131 0141 AND 0141 /14131-0141 A! 014132 1661 TAD I 4061 /14132-1661 N1 014133 0010 AND 0010 /14133-0010 @H 014134 7777 MQA MQL CLA SAM /14134-7777 ?? 014135 0204 AND 4004 /14135-0204 BD 014136 5777 JMP I 4177 /14136-5777 /? 014137 0210 AND 4010 /14137-0210 BH 014140 7777 MQA MQL CLA SAM /14140-7777 ?? 014141 0212 AND 4012 /14141-0212 BJ 014142 1010 TAD 0010 /14142-1010 HH 014143 0214 AND 4014 /14143-0214 BL 014144 0202 AND 4002 /14144-0202 BB 014145 0020 AND 0020 /14145-0020 @P 014146 3030 DCA 0030 /14146-3030 XX 014147 0024 AND 0024 /14147-0024 @T 014150 1001 TAD 0001 /14150-1001 HA 014151 0024 AND 0024 /14151-0024 @T 014152 1011 TAD 0011 /14152-1011 HI 014153 0014 AND 0014 /14153-0014 @L 014154 1021 TAD 0021 /14154-1021 HQ 014155 0020 AND 0020 /14155-0020 @P 014156 1631 TAD I 4031 /14156-1631 NY 014157 0014 AND 0014 /14157-0014 @L 014160 1041 TAD 0041 /14160-1041 H! 014161 0020 AND 0020 /14161-0020 @P 014162 1635 TAD I 4035 /14162-1635 N] 014163 0014 AND 0014 /14163-0014 @L 014164 1051 TAD 0051 /14164-1051 H) 014165 0020 AND 0020 /14165-0020 @P 014166 1641 TAD I 4041 /14166-1641 N! 014167 0024 AND 0024 /14167-0024 @T 014170 1061 TAD 0061 /14170-1061 H1 014171 0024 AND 0024 /14171-0024 @T 014172 1071 TAD 0071 /14172-1071 H9 014173 0014 AND 0014 /14173-0014 @L 014174 1030 TAD 0030 /14174-1030 HX 014175 0020 AND 0020 /14175-0020 @P 014176 7324 CLA CLL CML RAL /14176-7324 ;T 014177 0114 AND 0114 /14177-0114 AL 014200 0400 AND I 0000 /14200-0400 D@ 014201 0141 AND 0141 /14201-0141 A! 014202 7354 7354 /14202-7354 ;, 014203 0010 AND 0010 /14203-0010 @H 014204 3777 DCA I 4377 /14204-3777 _? 014205 0204 AND 4204 /14205-0204 BD 014206 3777 DCA I 4377 /14206-3777 _? /DJFPAB PAL8-V50X 06-OCT-90 PAGE 1-43 014207 0210 AND 4210 /14207-0210 BH 014210 7777 MQA MQL CLA SAM /14210-7777 ?? 014211 0212 AND 4212 /14211-0212 BJ 014212 4040 JMS 0040 /14212-4040 014213 0214 AND 4214 /14213-0214 BL 014214 0505 AND I 0105 /14214-0505 EE 014215 0020 AND 0020 /14215-0020 @P 014216 6060 6060 /14216-6060 00 014217 0024 AND 0024 /14217-0024 @T 014220 1000 TAD 0000 /14220-1000 H@ 014221 0014 AND 0014 /14221-0014 @L 014222 1010 TAD 0010 /14222-1010 HH 014223 0020 AND 0020 /14223-0020 @P 014224 7334 7334 /14224-7334 ;\ 014225 0024 AND 0024 /14225-0024 @T 014226 1020 TAD 0020 /14226-1020 HP 014227 0014 AND 0014 /14227-0014 @L 014230 1040 TAD 0040 /14230-1040 H 014231 0020 AND 0020 /14231-0020 @P 014232 7342 CLA CLL CMA BSW /14232-7342 ;" 014233 0024 AND 0024 /14233-0024 @T 014234 1050 TAD 0050 /14234-1050 H( 014235 0014 AND 0014 /14235-0014 @L 014236 1060 TAD 0060 /14236-1060 H0 014237 0020 AND 0020 /14237-0020 @P 014240 7350 CLA CLL CMA RAR /14240-7350 ;( 014241 0014 AND 0014 /14241-0014 @L 014242 1070 TAD 0070 /14242-1070 H8 014243 0020 AND 0020 /14243-0020 @P 014244 7400 7400 /14244-7400 <@ 014245 1000 TAD 0000 /14245-1000 H@ 014246 0000 AND 0000 /14246-0000 @@ 014247 1001 TAD 0001 /14247-1001 HA 014250 0000 AND 0000 /14250-0000 @@ 014251 0324 AND 4324 /14251-0324 CT 014252 0000 AND 0000 /14252-0000 @@ 014253 0327 AND 4327 /14253-0327 CW 014254 7777 MQA MQL CLA SAM /14254-7777 ?? 014255 0170 AND 0170 /14255-0170 A8 014256 6060 6060 /14256-6060 00 014257 0332 AND 4332 /14257-0332 CZ 014260 0505 AND I 0105 /14260-0505 EE 014261 0336 AND 4336 /14261-0336 C^ 014262 4040 JMS 0040 /14262-4040 014263 0341 AND 4341 /14263-0341 C! 014264 3777 DCA I 4377 /14264-3777 _? 014265 0165 AND 0165 /14265-0165 A5 014266 3777 DCA I 4377 /14266-3777 _? 014267 0165 AND 0165 /14267-0165 A5 014270 7401 7401 /14270-7401 <A 014271 0165 AND 0165 /14271-0165 A5 014272 7213 CLA IAC RTR /14272-7213 :K 014273 0165 AND 0165 /14273-0165 A5 014274 7223 CLA CML IAC BSW /14274-7223 :S 014275 0351 AND 4351 /14275-0351 C) /DJFPAB PAL8-V50X 06-OCT-90 PAGE 1-44 014276 7356 7356 /14276-7356 ;. 014277 0300 MCOD13, AND 4300 /14277-0300 C@ 014300 7200 CLA /14300-7200 :@ 014301 0321 AND 4321 /14301-0321 CQ 014302 0000 AND 0000 /14302-0000 @@ 014303 0321 AND 4321 /14303-0321 CQ 014304 7401 7401 /14304-7401 <A 014305 0321 AND 4321 /14305-0321 CQ 014306 7213 CLA IAC RTR /14306-7213 :K 014307 0307 AND 4307 /14307-0307 CG 014310 7223 CLA CML IAC BSW /14310-7223 :S 014311 0321 AND 4321 /14311-0321 CQ 014312 0001 AND 0001 /14312-0001 @A 014313 0321 AND 4321 /14313-0321 CQ 014314 0002 AND 0002 /14314-0002 @B 014315 0313 AND 4313 /14315-0313 CK 014316 0003 AND 0003 /14316-0003 @C 014317 0010 AND 0010 /14317-0010 @H 014320 0004 AND 0004 /14320-0004 @D 014321 0010 AND 0010 /14321-0010 @H 014322 0005 AND 0005 /14322-0005 @E 014323 0107 AND 0107 /14323-0107 AG 014324 0006 AND 0006 /14324-0006 @F 014325 0114 AND 0114 /14325-0114 AL 014326 6000 SKON /14326-6000 0@ 014327 0141 AND 0141 /14327-0141 A! 014330 7405 MUY /14330-7405 <E 014331 1060 TAD 0060 /14331-1060 H0 014332 0000 AND 0000 /14332-0000 @@ 014333 1061 TAD 0061 /14333-1061 H1 014334 7405 MUY /14334-7405 <E 014335 0020 AND 0020 /14335-0020 @P 014336 7405 MUY /14336-7405 <E 014337 1010 TAD 0010 /14337-1010 HH 014340 0005 AND 0005 /14340-0005 @E 014341 1074 TAD 0074 /14341-1074 H< 014342 0005 AND 0005 /14342-0005 @E 014343 1101 TAD 0101 /14343-1101 IA 014344 0005 AND 0005 /14344-0005 @E 014345 1102 TAD 0102 /14345-1102 IB 014346 0005 AND 0005 /14346-0005 @E 014347 0020 AND 0020 /14347-0020 @P 014350 0005 AND 0005 /14350-0005 @E 014351 1014 TAD 0014 /14351-1014 HL 014352 0007 AND 0007 /14352-0007 @G 014353 1015 TAD 0015 /14353-1015 HM 014354 0007 AND 0007 /14354-0007 @G 014355 1011 TAD 0011 /14355-1011 HI 014356 0007 AND 0007 /14356-0007 @G 014357 1003 TAD 0003 /14357-1003 HC 014360 7405 MUY /14360-7405 <E 014361 0020 AND 0020 /14361-0020 @P 014362 0000 AND 0000 /14362-0000 @@ 014363 0112 AND 0112 /14363-0112 AJ /DJFPAB PAL8-V50X 06-OCT-90 PAGE 1-45 014364 6100 6100 /14364-6100 1@ 014365 0114 AND 0114 /14365-0114 AL 014366 6100 6100 /14366-6100 1@ 014367 0141 AND 0141 /14367-0141 A! 014370 7411 NMI /14370-7411 <I 014371 1060 TAD 0060 /14371-1060 H0 014372 0000 AND 0000 /14372-0000 @@ 014373 1061 TAD 0061 /14373-1061 H1 014374 7411 NMI /14374-7411 <I 014375 0020 AND 0020 /14375-0020 @P 014376 7411 NMI /14376-7411 <I 014377 1010 TAD 0010 /14377-1010 HH 014400 0005 AND 0005 /14400-0005 @E 014401 1074 TAD 0074 /14401-1074 H< 014402 0005 AND 0005 /14402-0005 @E 014403 1101 TAD 0101 /14403-1101 IA 014404 0005 AND 0005 /14404-0005 @E 014405 1102 TAD 0102 /14405-1102 IB 014406 0005 AND 0005 /14406-0005 @E 014407 0020 AND 0020 /14407-0020 @P 014410 0005 AND 0005 /14410-0005 @E 014411 1014 TAD 0014 /14411-1014 HL 014412 0007 AND 0007 /14412-0007 @G 014413 1015 TAD 0015 /14413-1015 HM 014414 0007 AND 0007 /14414-0007 @G 014415 1011 TAD 0011 /14415-1011 HI 014416 0007 AND 0007 /14416-0007 @G 014417 1003 TAD 0003 /14417-1003 HC 014420 7411 NMI /14420-7411 <I 014421 0020 AND 0020 /14421-0020 @P 014422 0000 AND 0000 /14422-0000 @@ 014423 0134 AND 0134 /14423-0134 A\ 014424 7001 IAC /14424-7001 8A 014425 0010 AND 0010 /14425-0010 @H 014426 0000 AND 0000 /14426-0000 @@ 014427 0141 AND 0141 /14427-0141 A! 014430 7414 SKP OSR /14430-7414 <L 014431 1060 TAD 0060 /14431-1060 H0 014432 0000 AND 0000 /14432-0000 @@ 014433 1061 TAD 0061 /14433-1061 H1 014434 7414 SKP OSR /14434-7414 <L 014435 0020 AND 0020 /14435-0020 @P 014436 7414 SKP OSR /14436-7414 <L 014437 1010 TAD 0010 /14437-1010 HH 014440 0005 AND 0005 /14440-0005 @E 014441 1074 TAD 0074 /14441-1074 H< 014442 0005 AND 0005 /14442-0005 @E 014443 1101 TAD 0101 /14443-1101 IA 014444 0005 AND 0005 /14444-0005 @E 014445 1102 TAD 0102 /14445-1102 IB 014446 0005 AND 0005 /14446-0005 @E 014447 0020 AND 0020 /14447-0020 @P 014450 0005 AND 0005 /14450-0005 @E 014451 1014 TAD 0014 /14451-1014 HL 014452 0007 AND 0007 /14452-0007 @G /DJFPAB PAL8-V50X 06-OCT-90 PAGE 1-46 014453 1015 TAD 0015 /14453-1015 HM 014454 0007 AND 0007 /14454-0007 @G 014455 1011 TAD 0011 /14455-1011 HI 014456 0007 AND 0007 /14456-0007 @G 014457 1003 TAD 0003 /14457-1003 HC 014460 7414 SKP OSR /14460-7414 <L 014461 0020 AND 0020 /14461-0020 @P 014462 0000 AND 0000 /14462-0000 @@ 014463 0132 AND 0132 /14463-0132 AZ 014464 7102 CLL BSW /14464-7102 9B 014465 0134 AND 0134 /14465-0134 A\ 014466 7102 CLL BSW /14466-7102 9B 014467 0010 AND 0010 /14467-0010 @H 014470 0000 AND 0000 /14470-0000 @@ 014471 0141 AND 0141 /14471-0141 A! 014472 7416 SKP OSR HLT /14472-7416 <N 014473 1060 TAD 0060 /14473-1060 H0 014474 0000 AND 0000 /14474-0000 @@ 014475 1061 TAD 0061 /14475-1061 H1 014476 7416 SKP OSR HLT /14476-7416 <N 014477 0020 AND 0020 /14477-0020 @P 014500 7416 SKP OSR HLT /14500-7416 <N 014501 1014 TAD 0014 /14501-1014 HL 014502 0007 AND 0007 /14502-0007 @G 014503 1015 TAD 0015 /14503-1015 HM 014504 0007 AND 0007 /14504-0007 @G 014505 1011 TAD 0011 /14505-1011 HI 014506 0007 AND 0007 /14506-0007 @G 014507 1003 TAD 0003 /14507-1003 HC 014510 7416 SKP OSR HLT /14510-7416 <N 014511 0020 AND 0020 /14511-0020 @P 014512 0000 AND 0000 /14512-0000 @@ 014513 1016 TAD 0016 /14513-1016 HN 014514 5067 JMP 0067 /14514-5067 (7 014515 1055 TAD 0055 /14515-1055 H- 014516 5067 JMP 0067 /14516-5067 (7 014517 0020 AND 0020 /14517-0020 @P 014520 5067 JMP 0067 /14520-5067 (7 014521 1026 TAD 0026 /14521-1026 HV 014522 5000 JMP 0000 /14522-5000 (@ 014523 1050 TAD 0050 /14523-1050 H( 014524 5000 JMP 0000 /14524-5000 (@ 014525 1055 TAD 0055 /14525-1055 H- 014526 5000 JMP 0000 /14526-5000 (@ 014527 0020 AND 0020 /14527-0020 @P 014530 0000 AND 0000 /14530-0000 @@ 014531 0114 AND 0114 /14531-0114 AL 014532 6000 SKON /14532-6000 0@ 014533 0141 AND 0141 /14533-0141 A! 014534 7424 SNL OSR /14534-7424 <T 014535 0010 AND 0010 /14535-0010 @H 014536 0000 AND 0000 /14536-0000 @@ 014537 1037 TAD 0037 /14537-1037 H_ 014540 0002 AND 0002 /14540-0002 @B 014541 1404 TAD I 0004 /14541-1404 LD /DJFPAB PAL8-V50X 06-OCT-90 PAGE 1-47 014542 0002 AND 0002 /14542-0002 @B 014543 1540 TAD I 0140 /14543-1540 M 014544 0002 AND 0002 /14544-0002 @B 014545 1541 TAD I 0141 /14545-1541 M! 014546 0002 AND 0002 /14546-0002 @B 014547 1450 TAD I 0050 /14547-1450 L( 014550 0000 AND 0000 /14550-0000 @@ 014551 1111 TAD 0111 /14551-1111 II 014552 0000 AND 0000 /14552-0000 @@ 014553 1112 TAD 0112 /14553-1112 IJ 014554 0000 AND 0000 /14554-0000 @@ 014555 1116 TAD 0116 /14555-1116 IN 014556 0000 AND 0000 /14556-0000 @@ 014557 1451 TAD I 0051 /14557-1451 L) 014560 0000 AND 0000 /14560-0000 @@ 014561 1452 TAD I 0052 /14561-1452 L* 014562 0000 AND 0000 /14562-0000 @@ 014563 1347 TAD 4547 /14563-1347 K' 014564 0000 AND 0000 /14564-0000 @@ 014565 1350 TAD 4550 /14565-1350 K( 014566 0000 AND 0000 /14566-0000 @@ 014567 1357 TAD 4557 /14567-1357 K/ 014570 0000 AND 0000 /14570-0000 @@ 014571 1361 TAD 4561 /14571-1361 K1 014572 0000 AND 0000 /14572-0000 @@ 014573 1013 TAD 0013 /14573-1013 HK 014574 0000 AND 0000 /14574-0000 @@ 014575 0020 AND 0020 /14575-0020 @P 014576 0000 AND 0000 /14576-0000 @@ 014577 0074 AND 0074 /14577-0074 @< 014600 3000 DCA 0000 /14600-3000 X@ 014601 1000 TAD 0000 /14601-1000 H@ 014602 7422 SNL HLT /14602-7422 <R 014603 1001 TAD 0001 /14603-1001 HA 014604 7422 SNL HLT /14604-7422 <R 014605 0324 AND 4724 /14605-0324 CT 014606 7422 SNL HLT /14606-7422 <R 014607 0336 AND 4736 /14607-0336 C^ 014610 0006 AND 0006 /14610-0006 @F 014611 0341 AND 4741 /14611-0341 C! 014612 0000 AND 0000 /14612-0000 @@ 014613 0165 AND 0165 /14613-0165 A5 014614 0000 AND 0000 /14614-0000 @@ 014615 0165 AND 0165 /14615-0165 A5 014616 7424 SNL OSR /14616-7424 <T 014617 0165 AND 0165 /14617-0165 A5 014620 7213 CLA IAC RTR /14620-7213 :K 014621 0165 AND 0165 /14621-0165 A5 014622 7223 CLA CML IAC BSW /14622-7223 :S 014623 0351 AND 4751 /14623-0351 C) 014624 7422 SNL HLT /14624-7422 <R 014625 0300 MCOD14, AND 4700 /14625-0300 C@ 014626 7200 CLA /14626-7200 :@ 014627 0321 AND 4721 /14627-0321 CQ /DJFPAB PAL8-V50X 06-OCT-90 PAGE 1-48 014630 0000 AND 0000 /14630-0000 @@ 014631 0321 AND 4721 /14631-0321 CQ 014632 6115 6115 /14632-6115 1M 014633 0321 AND 4721 /14633-0321 CQ 014634 7213 CLA IAC RTR /14634-7213 :K 014635 0307 AND 4707 /14635-0307 CG 014636 7223 CLA CML IAC BSW /14636-7223 :S 014637 0321 AND 4721 /14637-0321 CQ 014640 0001 AND 0001 /14640-0001 @A 014641 0321 AND 4721 /14641-0321 CQ 014642 0002 AND 0002 /14642-0002 @B 014643 0313 AND 4713 /14643-0313 CK 014644 0003 AND 0003 /14644-0003 @C 014645 0010 AND 0010 /14645-0010 @H 014646 0004 AND 0004 /14646-0004 @D 014647 0010 AND 0010 /14647-0010 @H 014650 0005 AND 0005 /14650-0005 @E 014651 0107 AND 0107 /14651-0107 AG 014652 0006 AND 0006 /14652-0006 @F 014653 1012 TAD 0012 /14653-1012 HJ 014654 0006 AND 0006 /14654-0006 @F 014655 1013 TAD 0013 /14655-1013 HK 014656 0006 AND 0006 /14656-0006 @F 014657 0020 AND 0020 /14657-0020 @P 014660 0006 AND 0006 /14660-0006 @F 014661 0134 AND 0134 /14661-0134 A\ 014662 1603 TAD I 4603 /14662-1603 NC 014663 0010 AND 0010 /14663-0010 @H 014664 0000 AND 0000 /14664-0000 @@ 014665 0141 AND 0141 /14665-0141 A! 014666 6122 6122 /14666-6122 1R 014667 0010 AND 0010 /14667-0010 @H 014670 2777 ISZ I 4777 /14670-2777 W? 014671 1037 TAD 0037 /14671-1037 H_ 014672 7777 MQA MQL CLA SAM /14672-7777 ?? 014673 1400 TAD I 0000 /14673-1400 L@ 014674 7777 MQA MQL CLA SAM /14674-7777 ?? 014675 1413 TAD I 0013 /14675-1413 LK 014676 7777 MQA MQL CLA SAM /14676-7777 ?? 014677 1344 TAD 4744 /14677-1344 K$ 014700 0002 AND 0002 /14700-0002 @B 014701 1345 TAD 4745 /14701-1345 K% 014702 0002 AND 0002 /14702-0002 @B 014703 1414 TAD I 0014 /14703-1414 LL 014704 0003 AND 0003 /14704-0003 @C 014705 1415 TAD I 0015 /14705-1415 LM 014706 0003 AND 0003 /14706-0003 @C 014707 1416 TAD I 0016 /14707-1416 LN 014710 0002 AND 0002 /14710-0002 @B 014711 1417 TAD I 0017 /14711-1417 LO 014712 3002 DCA 0002 /14712-3002 XB 014713 1420 TAD I 0020 /14713-1420 LP 014714 3002 DCA 0002 /14714-3002 XB 014715 1421 TAD I 0021 /14715-1421 LQ 014716 3002 DCA 0002 /14716-3002 XB /DJFPAB PAL8-V50X 06-OCT-90 PAGE 1-49 014717 1350 TAD 4750 /14717-1350 K( 014720 3002 DCA 0002 /14720-3002 XB 014721 1357 TAD 4757 /14721-1357 K/ 014722 3002 DCA 0002 /14722-3002 XB 014723 1360 TAD 4760 /14723-1360 K0 014724 3002 DCA 0002 /14724-3002 XB 014725 0020 AND 0020 /14725-0020 @P 014726 0002 AND 0002 /14726-0002 @B 014727 1020 TAD 0020 /14727-1020 HP 014730 0050 AND 0050 /14730-0050 @( 014731 1021 TAD 0021 /14731-1021 HQ 014732 0050 AND 0050 /14732-0050 @( 014733 1022 TAD 0022 /14733-1022 HR 014734 0050 AND 0050 /14734-0050 @( 014735 1023 TAD 0023 /14735-1023 HS 014736 0000 AND 0000 /14736-0000 @@ 014737 0020 AND 0020 /14737-0020 @P 014740 0000 AND 0000 /14740-0000 @@ 014741 0134 AND 0134 /14741-0134 A\ 014742 1604 TAD I 4604 /14742-1604 ND 014743 0010 AND 0010 /14743-0010 @H 014744 0000 AND 0000 /14744-0000 @@ 014745 0141 AND 0141 /14745-0141 A! 014746 6124 6124 /14746-6124 1T 014747 0010 AND 0010 /14747-0010 @H 014750 0001 AND 0001 /14750-0001 @A 014751 0010 AND 0010 /14751-0010 @H 014752 0675 AND I 4675 /14752-0675 F= 014753 0245 AND 4645 /14753-0245 B% 014754 7776 SPA SNA SZL CLA OSR HLT /14754-7776 ?> 014755 0247 AND 4647 /14755-0247 B' 014756 7777 MQA MQL CLA SAM /14756-7777 ?? 014757 0251 AND 4651 /14757-0251 B) 014760 0000 AND 0000 /14760-0000 @@ 014761 1037 TAD 0037 /14761-1037 H_ 014762 7777 MQA MQL CLA SAM /14762-7777 ?? 014763 1401 TAD I 0001 /14763-1401 LA 014764 7777 MQA MQL CLA SAM /14764-7777 ?? 014765 1422 TAD I 0022 /14765-1422 LR 014766 7777 MQA MQL CLA SAM /14766-7777 ?? 014767 1423 TAD I 0023 /14767-1423 LS 014770 0001 AND 0001 /14770-0001 @A 014771 1333 TAD 4733 /14771-1333 K[ 014772 0001 AND 0001 /14772-0001 @A 014773 1334 TAD 4734 /14773-1334 K\ 014774 0001 AND 0001 /14774-0001 @A 014775 1335 TAD 4735 /14775-1335 K] 014776 3002 DCA 0002 /14776-3002 XB 014777 1336 TAD 4736 /14777-1336 K^ 015000 3002 DCA 0002 /15000-3002 XB 015001 1337 TAD 5137 /15001-1337 K_ 015002 0000 AND 0000 /15002-0000 @@ 015003 1340 TAD 5140 /15003-1340 K 015004 0000 AND 0000 /15004-0000 @@ 015005 1341 TAD 5141 /15005-1341 K! /DJFPAB PAL8-V50X 06-OCT-90 PAGE 1-50 015006 0000 AND 0000 /15006-0000 @@ 015007 1342 TAD 5142 /15007-1342 K" 015010 0000 AND 0000 /15010-0000 @@ 015011 1343 TAD 5143 /15011-1343 K# 015012 0000 AND 0000 /15012-0000 @@ 015013 1344 TAD 5144 /15013-1344 K$ 015014 0000 AND 0000 /15014-0000 @@ 015015 1345 TAD 5145 /15015-1345 K% 015016 0000 AND 0000 /15016-0000 @@ 015017 1424 TAD I 0024 /15017-1424 LT 015020 0002 AND 0002 /15020-0002 @B 015021 1425 TAD I 0025 /15021-1425 LU 015022 0002 AND 0002 /15022-0002 @B 015023 1426 TAD I 0026 /15023-1426 LV 015024 0000 AND 0000 /15024-0000 @@ 015025 1427 TAD I 0027 /15025-1427 LW 015026 0000 AND 0000 /15026-0000 @@ 015027 1430 TAD I 0030 /15027-1430 LX 015030 0000 AND 0000 /15030-0000 @@ 015031 1431 TAD I 0031 /15031-1431 LY 015032 0000 AND 0000 /15032-0000 @@ 015033 1432 TAD I 0032 /15033-1432 LZ 015034 0000 AND 0000 /15034-0000 @@ 015035 1433 TAD I 0033 /15035-1433 L[ 015036 0030 AND 0030 /15036-0030 @X 015037 1434 TAD I 0034 /15037-1434 L\ 015040 0073 AND 0073 /15040-0073 @; 015041 1435 TAD I 0035 /15041-1435 L] 015042 0073 AND 0073 /15042-0073 @; 015043 1314 TAD 5114 /15043-1314 KL 015044 0073 AND 0073 /15044-0073 @; 015045 1315 TAD 5115 /15045-1315 KM 015046 0001 AND 0001 /15046-0001 @A 015047 1316 TAD 5116 /15047-1316 KN 015050 3002 DCA 0002 /15050-3002 XB 015051 1317 TAD 5117 /15051-1317 KO 015052 0675 AND I 5075 /15052-0675 F= 015053 1320 TAD 5120 /15053-1320 KP 015054 3002 DCA 0002 /15054-3002 XB 015055 1321 TAD 5121 /15055-1321 KQ 015056 0000 AND 0000 /15056-0000 @@ 015057 1322 TAD 5122 /15057-1322 KR 015060 7777 MQA MQL CLA SAM /15060-7777 ?? 015061 1323 TAD 5123 /15061-1323 KS 015062 0000 AND 0000 /15062-0000 @@ 015063 1324 TAD 5124 /15063-1324 KT 015064 0000 AND 0000 /15064-0000 @@ 015065 1325 TAD 5125 /15065-1325 KU 015066 0000 AND 0000 /15066-0000 @@ 015067 1326 TAD 5126 /15067-1326 KV 015070 0000 AND 0000 /15070-0000 @@ 015071 1327 TAD 5127 /15071-1327 KW 015072 0000 AND 0000 /15072-0000 @@ 015073 1330 TAD 5130 /15073-1330 KX 015074 7777 MQA MQL CLA SAM /15074-7777 ?? /DJFPAB PAL8-V50X 06-OCT-90 PAGE 1-51 015075 1331 TAD 5131 /15075-1331 KY 015076 0000 AND 0000 /15076-0000 @@ 015077 1332 TAD 5132 /15077-1332 KZ 015100 0002 AND 0002 /15100-0002 @B 015101 1436 TAD I 0036 /15101-1436 L^ 015102 7776 SPA SNA SZL CLA OSR HLT /15102-7776 ?> 015103 1260 TAD 5060 /15103-1260 J0 015104 0002 AND 0002 /15104-0002 @B 015105 1261 TAD 5061 /15105-1261 J1 015106 0002 AND 0002 /15106-0002 @B 015107 1262 TAD 5062 /15107-1262 J2 015110 0000 AND 0000 /15110-0000 @@ 015111 1263 TAD 5063 /15111-1263 J3 015112 0014 AND 0014 /15112-0014 @L 015113 1437 TAD I 0037 /15113-1437 L_ 015114 0014 AND 0014 /15114-0014 @L 015115 1440 TAD I 0040 /15115-1440 L 015116 0000 AND 0000 /15116-0000 @@ 015117 1441 TAD I 0041 /15117-1441 L! 015120 7777 MQA MQL CLA SAM /15120-7777 ?? 015121 1442 TAD I 0042 /15121-1442 L" 015122 0000 AND 0000 /15122-0000 @@ 015123 1443 TAD I 0043 /15123-1443 L# 015124 7777 MQA MQL CLA SAM /15124-7777 ?? 015125 1444 TAD I 0044 /15125-1444 L$ 015126 0000 AND 0000 /15126-0000 @@ 015127 1445 TAD I 0045 /15127-1445 L% 015130 3700 DCA I 5100 /15130-3700 _@ 015131 1446 TAD I 0046 /15131-1446 L& 015132 0001 AND 0001 /15132-0001 @A 015133 1177 TAD 0177 /15133-1177 I? 015134 0001 AND 0001 /15134-0001 @A 015135 1200 TAD 5000 /15135-1200 J@ 015136 0001 AND 0001 /15136-0001 @A 015137 1201 TAD 5001 /15137-1201 JA 015140 3700 DCA I 5100 /15140-3700 _@ 015141 1202 TAD 5002 /15141-1202 JB 015142 0000 AND 0000 /15142-0000 @@ 015143 1237 TAD 5037 /15143-1237 J_ 015144 7777 MQA MQL CLA SAM /15144-7777 ?? 015145 1240 TAD 5040 /15145-1240 J 015146 0000 AND 0000 /15146-0000 @@ 015147 1247 TAD 5047 /15147-1247 J' 015150 0000 AND 0000 /15150-0000 @@ 015151 1447 TAD I 0047 /15151-1447 L' 015152 0000 AND 0000 /15152-0000 @@ 015153 1451 TAD I 0051 /15153-1451 L) 015154 0000 AND 0000 /15154-0000 @@ 015155 1452 TAD I 0052 /15155-1452 L* 015156 0001 AND 0001 /15156-0001 @A 015157 1347 TAD 5147 /15157-1347 K' 015160 0001 AND 0001 /15160-0001 @A 015161 1350 TAD 5150 /15161-1350 K( 015162 0001 AND 0001 /15162-0001 @A 015163 1351 TAD 5151 /15163-1351 K) /DJFPAB PAL8-V50X 06-OCT-90 PAGE 1-52 015164 3700 DCA I 5100 /15164-3700 _@ 015165 1352 TAD 5152 /15165-1352 K* 015166 3700 DCA I 5100 /15166-3700 _@ 015167 1353 TAD 5153 /15167-1353 K+ 015170 7777 MQA MQL CLA SAM /15170-7777 ?? 015171 1354 TAD 5154 /15171-1354 K, 015172 7777 MQA MQL CLA SAM /15172-7777 ?? 015173 1355 TAD 5155 /15173-1355 K- 015174 0000 AND 0000 /15174-0000 @@ 015175 1356 TAD 5156 /15175-1356 K. 015176 0000 AND 0000 /15176-0000 @@ 015177 1357 TAD 5157 /15177-1357 K/ 015200 7777 MQA MQL CLA SAM /15200-7777 ?? 015201 1360 TAD 5360 /15201-1360 K0 015202 7777 MQA MQL CLA SAM /15202-7777 ?? 015203 0020 AND 0020 /15203-0020 @P 015204 0000 AND 0000 /15204-0000 @@ 015205 1000 TAD 0000 /15205-1000 H@ 015206 0000 AND 0000 /15206-0000 @@ 015207 1001 TAD 0001 /15207-1001 HA 015210 0000 AND 0000 /15210-0000 @@ 015211 0324 AND 5324 /15211-0324 CT 015212 0000 AND 0000 /15212-0000 @@ 015213 0327 AND 5327 /15213-0327 CW 015214 0000 AND 0000 /15214-0000 @@ 015215 0170 AND 0170 /15215-0170 A8 015216 7777 MQA MQL CLA SAM /15216-7777 ?? 015217 0332 AND 5332 /15217-0332 CZ 015220 0000 AND 0000 /15220-0000 @@ 015221 0336 AND 5336 /15221-0336 C^ 015222 7777 MQA MQL CLA SAM /15222-7777 ?? 015223 0341 AND 5341 /15223-0341 C! 015224 3700 DCA I 5300 /15224-3700 _@ 015225 0165 AND 0165 /15225-0165 A5 015226 0001 AND 0001 /15226-0001 @A 015227 0165 AND 0165 /15227-0165 A5 015230 6122 6122 /15230-6122 1R 015231 0165 AND 0165 /15231-0165 A5 015232 7213 CLA IAC RTR /15232-7213 :K 015233 0165 AND 0165 /15233-0165 A5 015234 7223 CLA CML IAC BSW /15234-7223 :S 015235 0351 AND 5351 /15235-0351 C) 015236 6126 6126 /15236-6126 1V 015237 0300 MCOD15, AND 5300 /15237-0300 C@ 015240 7200 CLA /15240-7200 :@ 015241 0321 AND 5321 /15241-0321 CQ 015242 0000 AND 0000 /15242-0000 @@ 015243 0321 AND 5321 /15243-0321 CQ 015244 7426 SNL OSR HLT /15244-7426 <V 015245 0321 AND 5321 /15245-0321 CQ 015246 7213 CLA IAC RTR /15246-7213 :K 015247 0307 AND 5307 /15247-0307 CG 015250 7223 CLA CML IAC BSW /15250-7223 :S 015251 0321 AND 5321 /15251-0321 CQ /DJFPAB PAL8-V50X 06-OCT-90 PAGE 1-53 015252 0001 AND 0001 /15252-0001 @A 015253 0321 AND 5321 /15253-0321 CQ 015254 0002 AND 0002 /15254-0002 @B 015255 0313 AND 5313 /15255-0313 CK 015256 0003 AND 0003 /15256-0003 @C 015257 0010 AND 0010 /15257-0010 @H 015260 0004 AND 0004 /15260-0004 @D 015261 0010 AND 0010 /15261-0010 @H 015262 0005 AND 0005 /15262-0005 @E 015263 0107 AND 0107 /15263-0107 AG 015264 0006 AND 0006 /15264-0006 @F 015265 0100 AND 0100 /15265-0100 A@ 015266 4205 JMS 5205 /15266-4205 "E 015267 0010 AND 0010 /15267-0010 @H 015270 0001 AND 0001 /15270-0001 @A 015271 0010 AND 0010 /15271-0010 @H 015272 0000 AND 0000 /15272-0000 @@ 015273 0245 AND 5245 /15273-0245 B% 015274 0000 AND 0000 /15274-0000 @@ 015275 0247 AND 5247 /15275-0247 B' 015276 0000 AND 0000 /15276-0000 @@ 015277 0251 AND 5251 /15277-0251 B) 015300 0000 AND 0000 /15300-0000 @@ 015301 1037 TAD 0037 /15301-1037 H_ 015302 0000 AND 0000 /15302-0000 @@ 015303 1402 TAD I 0002 /15303-1402 LB 015304 0000 AND 0000 /15304-0000 @@ 015305 1472 TAD I 0072 /15305-1472 L: 015306 0000 AND 0000 /15306-0000 @@ 015307 1450 TAD I 0050 /15307-1450 L( 015310 0001 AND 0001 /15310-0001 @A 015311 1111 TAD 0111 /15311-1111 II 015312 0000 AND 0000 /15312-0000 @@ 015313 1112 TAD 0112 /15313-1112 IJ 015314 0000 AND 0000 /15314-0000 @@ 015315 1113 TAD 0113 /15315-1113 IK 015316 0000 AND 0000 /15316-0000 @@ 015317 1114 TAD 0114 /15317-1114 IL 015320 0000 AND 0000 /15320-0000 @@ 015321 1115 TAD 0115 /15321-1115 IM 015322 0000 AND 0000 /15322-0000 @@ 015323 1116 TAD 0116 /15323-1116 IN 015324 0000 AND 0000 /15324-0000 @@ 015325 1451 TAD I 0051 /15325-1451 L) 015326 0000 AND 0000 /15326-0000 @@ 015327 1452 TAD I 0052 /15327-1452 L* 015330 0000 AND 0000 /15330-0000 @@ 015331 1347 TAD 5347 /15331-1347 K' 015332 0000 AND 0000 /15332-0000 @@ 015333 1350 TAD 5350 /15333-1350 K( 015334 0000 AND 0000 /15334-0000 @@ 015335 1351 TAD 5351 /15335-1351 K) 015336 0000 AND 0000 /15336-0000 @@ 015337 1352 TAD 5352 /15337-1352 K* 015340 0000 AND 0000 /15340-0000 @@ /DJFPAB PAL8-V50X 06-OCT-90 PAGE 1-54 015341 1353 TAD 5353 /15341-1353 K+ 015342 0000 AND 0000 /15342-0000 @@ 015343 1354 TAD 5354 /15343-1354 K, 015344 0000 AND 0000 /15344-0000 @@ 015345 1355 TAD 5355 /15345-1355 K- 015346 0000 AND 0000 /15346-0000 @@ 015347 1356 TAD 5356 /15347-1356 K. 015350 0000 AND 0000 /15350-0000 @@ 015351 1357 TAD 5357 /15351-1357 K/ 015352 0000 AND 0000 /15352-0000 @@ 015353 1361 TAD 5361 /15353-1361 K1 015354 0000 AND 0000 /15354-0000 @@ 015355 1362 TAD 5362 /15355-1362 K2 015356 0000 AND 0000 /15356-0000 @@ 015357 0020 AND 0020 /15357-0020 @P 015360 0000 AND 0000 /15360-0000 @@ 015361 0134 AND 0134 /15361-0134 A\ 015362 7607 CLA DVI /15362-7607 >G 015363 0010 AND 0010 /15363-0010 @H 015364 0000 AND 0000 /15364-0000 @@ 015365 0141 AND 0141 /15365-0141 A! 015366 7213 CLA IAC RTR /15366-7213 :K 015367 0010 AND 0010 /15367-0010 @H 015370 3777 DCA I 5377 /15370-3777 _? 015371 0010 AND 0010 /15371-0010 @H 015372 3777 DCA I 5377 /15372-3777 _? 015373 0245 AND 5245 /15373-0245 B% 015374 7777 MQA MQL CLA SAM /15374-7777 ?? 015375 0247 AND 5247 /15375-0247 B' 015376 4040 JMS 0040 /15376-4040 015377 0251 AND 5251 /15377-0251 B) 015400 0505 AND I 0105 /15400-0505 EE 015401 1037 TAD 0037 /15401-1037 H_ 015402 6060 6060 /15402-6060 00 015403 1402 TAD I 0002 /15403-1402 LB 015404 6060 6060 /15404-6060 00 015405 1472 TAD I 0072 /15405-1472 L: 015406 6060 6060 /15406-6060 00 015407 1473 TAD I 0073 /15407-1473 L; 015410 0000 AND 0000 /15410-0000 @@ 015411 1450 TAD I 0050 /15411-1450 L( 015412 3777 DCA I 5577 /15412-3777 _? 015413 1111 TAD 0111 /15413-1111 II 015414 0000 AND 0000 /15414-0000 @@ 015415 1112 TAD 0112 /15415-1112 IJ 015416 0000 AND 0000 /15416-0000 @@ 015417 1113 TAD 0113 /15417-1113 IK 015420 0000 AND 0000 /15420-0000 @@ 015421 1114 TAD 0114 /15421-1114 IL 015422 0000 AND 0000 /15422-0000 @@ 015423 1115 TAD 0115 /15423-1115 IM 015424 0000 AND 0000 /15424-0000 @@ 015425 1116 TAD 0116 /15425-1116 IN 015426 0000 AND 0000 /15426-0000 @@ 015427 1451 TAD I 0051 /15427-1451 L) /DJFPAB PAL8-V50X 06-OCT-90 PAGE 1-55 015430 0000 AND 0000 /15430-0000 @@ 015431 0353 AND 5553 /15431-0353 C+ 015432 0000 AND 0000 /15432-0000 @@ 015433 0357 AND 5557 /15433-0357 C/ 015434 0000 AND 0000 /15434-0000 @@ 015435 0361 AND 5561 /15435-0361 C1 015436 0000 AND 0000 /15436-0000 @@ 015437 0370 AND 5570 /15437-0370 C8 015440 0000 AND 0000 /15440-0000 @@ 015441 0370 AND 5570 /15441-0370 C8 015442 0000 AND 0000 /15442-0000 @@ 015443 0370 AND 5570 /15443-0370 C8 015444 0000 AND 0000 /15444-0000 @@ 015445 0020 AND 0020 /15445-0020 @P 015446 0000 AND 0000 /15446-0000 @@ 015447 0114 AND 0114 /15447-0114 AL 015450 0400 AND I 0000 /15450-0400 D@ 015451 0141 AND 0141 /15451-0141 A! 015452 7354 7354 /15452-7354 ;, 015453 0010 AND 0010 /15453-0010 @H 015454 3777 DCA I 5577 /15454-3777 _? 015455 0204 AND 5404 /15455-0204 BD 015456 3777 DCA I 5577 /15456-3777 _? 015457 0210 AND 5410 /15457-0210 BH 015460 7777 MQA MQL CLA SAM /15460-7777 ?? 015461 0212 AND 5412 /15461-0212 BJ 015462 4040 JMS 0040 /15462-4040 015463 0214 AND 5414 /15463-0214 BL 015464 0505 AND I 0105 /15464-0505 EE 015465 0020 AND 0020 /15465-0020 @P 015466 6060 6060 /15466-6060 00 015467 0100 AND 0100 /15467-0100 A@ 015470 3205 DCA 5405 /15470-3205 ZE 015471 0010 AND 0010 /15471-0010 @H 015472 0001 AND 0001 /15472-0001 @A 015473 0010 AND 0010 /15473-0010 @H 015474 0000 AND 0000 /15474-0000 @@ 015475 0245 AND 5445 /15475-0245 B% 015476 0000 AND 0000 /15476-0000 @@ 015477 0247 AND 5447 /15477-0247 B' 015500 0000 AND 0000 /15500-0000 @@ 015501 0251 AND 5451 /15501-0251 B) 015502 0000 AND 0000 /15502-0000 @@ 015503 1037 TAD 0037 /15503-1037 H_ 015504 0000 AND 0000 /15504-0000 @@ 015505 1403 TAD I 0003 /15505-1403 LC 015506 0000 AND 0000 /15506-0000 @@ 015507 1562 TAD I 0162 /15507-1562 M2 015510 0000 AND 0000 /15510-0000 @@ 015511 1630 TAD I 5430 /15511-1630 NX 015512 7776 SPA SNA SZL CLA OSR HLT /15512-7776 ?> 015513 1631 TAD I 5431 /15513-1631 NY 015514 0000 AND 0000 /15514-0000 @@ 015515 1000 TAD 0000 /15515-1000 H@ 015516 0000 AND 0000 /15516-0000 @@ /DJFPAB PAL8-V50X 06-OCT-90 PAGE 1-56 015517 1001 TAD 0001 /15517-1001 HA 015520 0000 AND 0000 /15520-0000 @@ 015521 0324 AND 5524 /15521-0324 CT 015522 0000 AND 0000 /15522-0000 @@ 015523 0327 AND 5527 /15523-0327 CW 015524 7777 MQA MQL CLA SAM /15524-7777 ?? 015525 0170 AND 0170 /15525-0170 A8 015526 6060 6060 /15526-6060 00 015527 0332 AND 5532 /15527-0332 CZ 015530 0505 AND I 0105 /15530-0505 EE 015531 0336 AND 5536 /15531-0336 C^ 015532 4040 JMS 0040 /15532-4040 015533 0341 AND 5541 /15533-0341 C! 015534 3777 DCA I 5577 /15534-3777 _? 015535 0165 AND 0165 /15535-0165 A5 015536 3777 DCA I 5577 /15536-3777 _? 015537 0165 AND 0165 /15537-0165 A5 015540 7433 MQL SHL /15540-7433 <[ 015541 0165 AND 0165 /15541-0165 A5 015542 7213 CLA IAC RTR /15542-7213 :K 015543 0165 AND 0165 /15543-0165 A5 015544 7223 CLA CML IAC BSW /15544-7223 :S 015545 0351 AND 5551 /15545-0351 C) 015546 7244 CLA CMA RAL /15546-7244 :$ 015547 0300 MCOD16, AND 5500 /15547-0300 C@ 015550 7200 CLA /15550-7200 :@ 015551 0321 AND 5521 /15551-0321 CQ 015552 0000 AND 0000 /15552-0000 @@ 015553 0107 AND 0107 /15553-0107 AG 015554 6530 6530 /15554-6530 5X 015555 0114 AND 0114 /15555-0114 AL 015556 0400 AND I 0000 /15556-0400 D@ 015557 0141 AND 0141 /15557-0141 A! 015560 6542 6542 /15560-6542 5" 015561 0010 AND 0010 /15561-0010 @H 015562 7777 MQA MQL CLA SAM /15562-7777 ?? 015563 0204 AND 5404 /15563-0204 BD 015564 5555 JMP I 0155 /15564-5555 -- 015565 0210 AND 5410 /15565-0210 BH 015566 5555 JMP I 0155 /15566-5555 -- 015567 0212 AND 5412 /15567-0212 BJ 015570 0077 AND 0077 /15570-0077 @? 015571 0214 AND 5414 /15571-0214 BL 015572 0770 AND I 5570 /15572-0770 G8 015573 0020 AND 0020 /15573-0020 @P 015574 7700 SMA CLA /15574-7700 ?@ 015575 0114 AND 0114 /15575-0114 AL 015576 6400 6400 /15576-6400 4@ 015577 0141 AND 0141 /15577-0141 A! 015600 7205 CLA IAC RAL /15600-7205 :E 015601 0222 AND 5622 /15601-0222 BR 015602 7777 MQA MQL CLA SAM /15602-7777 ?? 015603 0226 AND 5626 /15603-0226 BV 015604 5555 JMP I 0155 /15604-5555 -- /DJFPAB PAL8-V50X 06-OCT-90 PAGE 1-57 015605 0370 AND 5770 /15605-0370 C8 015606 5555 JMP I 0155 /15606-5555 -- 015607 0370 AND 5770 /15607-0370 C8 015610 0077 AND 0077 /15610-0077 @? 015611 0370 AND 5770 /15611-0370 C8 015612 0770 AND I 5770 /15612-0770 G8 015613 0020 AND 0020 /15613-0020 @P 015614 7700 SMA CLA /15614-7700 ?@ 015615 1012 TAD 0012 /15615-1012 HJ 015616 0006 AND 0006 /15616-0006 @F 015617 1013 TAD 0013 /15617-1013 HK 015620 0006 AND 0006 /15620-0006 @F 015621 0020 AND 0020 /15621-0020 @P 015622 0006 AND 0006 /15622-0006 @F 015623 0036 AND 0036 /15623-0036 @^ 015624 1110 TAD 0110 /15624-1110 IH 015625 0020 AND 0020 /15625-0020 @P 015626 7213 CLA IAC RTR /15626-7213 :K 015627 0102 AND 0102 /15627-0102 AB 015630 6200 LXM /15630-6200 2@ 015631 0226 AND 5626 /15631-0226 BV 015632 5555 JMP I 0155 /15632-5555 -- 015633 0020 AND 0020 /15633-0020 @P 015634 5555 JMP I 0155 /15634-5555 -- 015635 0114 AND 0114 /15635-0114 AL 015636 4400 JMS I 0000 /15636-4400 $@ 015637 0141 AND 0141 /15637-0141 A! 015640 6550 FFST /15640-6550 5( 015641 0010 AND 0010 /15641-0010 @H 015642 2020 ISZ 0020 /15642-2020 PP 015643 1037 TAD 0037 /15643-1037 H_ 015644 2020 ISZ 0020 /15644-2020 PP 015645 1402 TAD I 0002 /15645-1402 LB 015646 2020 ISZ 0020 /15646-2020 PP 015647 1472 TAD I 0072 /15647-1472 L: 015650 2020 ISZ 0020 /15650-2020 PP 015651 1473 TAD I 0073 /15651-1473 L; 015652 7777 MQA MQL CLA SAM /15652-7777 ?? 015653 1474 TAD I 0074 /15653-1474 L< 015654 2020 ISZ 0020 /15654-2020 PP 015655 1111 TAD 0111 /15655-1111 II 015656 0000 AND 0000 /15656-0000 @@ 015657 1112 TAD 0112 /15657-1112 IJ 015660 7777 MQA MQL CLA SAM /15660-7777 ?? 015661 1116 TAD 0116 /15661-1116 IN 015662 0000 AND 0000 /15662-0000 @@ 015663 1475 TAD I 0075 /15663-1475 L= 015664 0000 AND 0000 /15664-0000 @@ 015665 1532 TAD I 0132 /15665-1532 MZ 015666 0000 AND 0000 /15666-0000 @@ 015667 1533 TAD I 0133 /15667-1533 M[ 015670 0000 AND 0000 /15670-0000 @@ 015671 1556 TAD I 0156 /15671-1556 M. 015672 5555 JMP I 0155 /15672-5555 -- 015673 1557 TAD I 0157 /15673-1557 M/ /DJFPAB PAL8-V50X 06-OCT-90 PAGE 1-58 015674 3333 DCA 5733 /15674-3333 [[ 015675 1533 TAD I 0133 /15675-1533 M[ 015676 3333 DCA 5733 /15676-3333 [[ 015677 1556 TAD I 0156 /15677-1556 M. 015700 3333 DCA 5733 /15700-3333 [[ 015701 1557 TAD I 0157 /15701-1557 M/ 015702 6666 6666 /15702-6666 66 015703 1533 TAD I 0133 /15703-1533 M[ 015704 6666 6666 /15704-6666 66 015705 1556 TAD I 0156 /15705-1556 M. 015706 6666 6666 /15706-6666 66 015707 1557 TAD I 0157 /15707-1557 M/ 015710 5555 JMP I 0155 /15710-5555 -- 015711 1533 TAD I 0133 /15711-1533 M[ 015712 5555 JMP I 0155 /15712-5555 -- 015713 1556 TAD I 0156 /15713-1556 M. 015714 5555 JMP I 0155 /15714-5555 -- 015715 1557 TAD I 0157 /15715-1557 M/ 015716 3333 DCA 5733 /15716-3333 [[ 015717 1533 TAD I 0133 /15717-1533 M[ 015720 3333 DCA 5733 /15720-3333 [[ 015721 1556 TAD I 0156 /15721-1556 M. 015722 3333 DCA 5733 /15722-3333 [[ 015723 1557 TAD I 0157 /15723-1557 M/ 015724 6666 6666 /15724-6666 66 015725 1533 TAD I 0133 /15725-1533 M[ 015726 6666 6666 /15726-6666 66 015727 1556 TAD I 0156 /15727-1556 M. 015730 6666 6666 /15730-6666 66 015731 1557 TAD I 0157 /15731-1557 M/ 015732 5555 JMP I 0155 /15732-5555 -- 015733 1533 TAD I 0133 /15733-1533 M[ 015734 5555 JMP I 0155 /15734-5555 -- 015735 1556 TAD I 0156 /15735-1556 M. 015736 5555 JMP I 0155 /15736-5555 -- 015737 1557 TAD I 0157 /15737-1557 M/ 015740 3333 DCA 5733 /15740-3333 [[ 015741 1533 TAD I 0133 /15741-1533 M[ 015742 3333 DCA 5733 /15742-3333 [[ 015743 1556 TAD I 0156 /15743-1556 M. 015744 3333 DCA 5733 /15744-3333 [[ 015745 1557 TAD I 0157 /15745-1557 M/ 015746 6666 6666 /15746-6666 66 015747 1533 TAD I 0133 /15747-1533 M[ 015750 6666 6666 /15750-6666 66 015751 1556 TAD I 0156 /15751-1556 M. 015752 6666 6666 /15752-6666 66 015753 1557 TAD I 0157 /15753-1557 M/ 015754 5555 JMP I 0155 /15754-5555 -- 015755 1533 TAD I 0133 /15755-1533 M[ 015756 5555 JMP I 0155 /15756-5555 -- 015757 1556 TAD I 0156 /15757-1556 M. 015760 5555 JMP I 0155 /15760-5555 -- 015761 1557 TAD I 0157 /15761-1557 M/ 015762 3333 DCA 5733 /15762-3333 [[ /DJFPAB PAL8-V50X 06-OCT-90 PAGE 1-59 015763 1533 TAD I 0133 /15763-1533 M[ 015764 3333 DCA 5733 /15764-3333 [[ 015765 1556 TAD I 0156 /15765-1556 M. 015766 3333 DCA 5733 /15766-3333 [[ 015767 1557 TAD I 0157 /15767-1557 M/ 015770 6666 6666 /15770-6666 66 015771 1533 TAD I 0133 /15771-1533 M[ 015772 6666 6666 /15772-6666 66 015773 1556 TAD I 0156 /15773-1556 M. 015774 6666 6666 /15774-6666 66 015775 1557 TAD I 0157 /15775-1557 M/ 015776 5555 JMP I 0155 /15776-5555 -- 015777 1534 TAD I 0134 /15777-1534 M\ 016000 5555 JMP I 0155 /16000-5555 -- 016001 1125 TAD 0125 /16001-1125 IU 016002 5555 JMP I 0155 /16002-5555 -- 016003 1126 TAD 0126 /16003-1126 IV 016004 5555 JMP I 0155 /16004-5555 -- 016005 1127 TAD 0127 /16005-1127 IW 016006 5555 JMP I 0155 /16006-5555 -- 016007 1130 TAD 0130 /16007-1130 IX 016010 2715 ISZ I 6115 /16010-2715 WM 016011 1131 TAD 0131 /16011-1131 IY 016012 2715 ISZ I 6115 /16012-2715 WM 016013 1132 TAD 0132 /16013-1132 IZ 016014 1346 TAD 6146 /16014-1346 K& 016015 1535 TAD I 0135 /16015-1535 M] 016016 0000 AND 0000 /16016-0000 @@ 016017 1536 TAD I 0136 /16017-1536 M^ 016020 0000 AND 0000 /16020-0000 @@ 016021 1555 TAD I 0155 /16021-1555 M- 016022 5555 JMP I 0155 /16022-5555 -- 016023 1556 TAD I 0156 /16023-1556 M. 016024 3333 DCA 6133 /16024-3333 [[ 016025 1557 TAD I 0157 /16025-1557 M/ 016026 3333 DCA 6133 /16026-3333 [[ 016027 1536 TAD I 0136 /16027-1536 M^ 016030 3333 DCA 6133 /16030-3333 [[ 016031 1555 TAD I 0155 /16031-1555 M- 016032 3333 DCA 6133 /16032-3333 [[ 016033 3736 MDJFPA, DCA I 6136 /16033-3736 _^ 016034 4006 JMS 0006 /16034-4006 F 016035 2020 ISZ 0020 /16035-2020 PP 016036 5570 JMP I 0170 /16036-5570 -8 016037 0140 AND 0140 /16037-0140 A 016040 0411 AND I 0011 /16040-0411 DI 016041 0107 AND 0107 /16041-0107 AG 016042 1617 TAD I 6017 /16042-1617 NO 016043 2324 ISZ 6124 /16043-2324 ST 016044 1103 TAD 0103 /16044-1103 IC 016045 4004 JMS 0004 /16045-4004 D 016046 1206 TAD 6006 /16046-1206 JF 016047 2001 ISZ 0001 /16047-2001 PA 016050 5502 JMP I 0102 /16050-5502 -B /DJFPAB PAL8-V50X 06-OCT-90 PAGE 1-60 016051 0000 AND 0000 /16051-0000 @@ 016052 3736 MRUNAL, DCA I 6136 /16052-3736 _^ 016053 4022 JMS 0022 /16053-4022 R 016054 2516 ISZ I 0116 /16054-2516 UN 016055 4001 JMS 0001 /16055-4001 A 016056 1414 TAD I 0014 /16056-1414 LL 016057 4024 JMS 0024 /16057-4024 T 016060 0523 AND I 0123 /16060-0523 ES 016061 2423 ISZ I 0023 /16061-2423 TS 016062 7700 SMA CLA /16062-7700 ?@ 016063 3736 MCONTI, DCA I 6136 /16063-3736 _^ 016064 4003 JMS 0003 /16064-4003 C 016065 1716 TAD I 6116 /16065-1716 ON 016066 2411 ISZ I 0011 /16066-2411 TI 016067 1625 TAD I 6025 /16067-1625 NU 016070 0540 AND I 0140 /16070-0540 E 016071 7740 SMA SZA CLA /16071-7740 ? 016072 0000 AND 0000 /16072-0000 @@ 016073 3736 MUNINT, DCA I 6136 /16073-3736 _^ 016074 4025 JMS 0025 /16074-4025 U 016075 1604 TAD I 6004 /16075-1604 ND 016076 0506 AND I 0106 /16076-0506 EF 016077 1116 TAD 0116 /16077-1116 IN 016100 0504 AND I 0104 /16100-0504 ED 016101 4011 JMS 0011 /16101-4011 I 016102 1624 TAD I 6024 /16102-1624 NT 016103 0522 AND I 0122 /16103-0522 ER 016104 2225 ISZ 6025 /16104-2225 RU 016105 2024 ISZ 0024 /16105-2024 PT 016106 4000 JMS 0000 /16106-4000 @ 016107 4040 MSREQ, JMS 0040 /16107-4040 016110 2322 ISZ 6122 /16110-2322 SR 016111 7540 SMA SZA /16111-7540 = 016112 4000 JMS 0000 /16112-4000 @ 016113 3736 MCRLF, DCA I 6136 /16113-3736 _^ 016114 4000 JMS 0000 /16114-4000 @ 016115 3736 MTSTNO, DCA I 6136 /16115-3736 _^ 016116 4005 JMS 0005 /16116-4005 E 016117 1624 TAD I 6024 /16117-1624 NT 016120 0522 AND I 0122 /16120-0522 ER 016121 4024 JMS 0024 /16121-4024 T 016122 0523 AND I 0123 /16122-0523 ES 016123 2440 ISZ I 0040 /16123-2440 T 016124 1625 TAD I 6025 /16124-1625 NU 016125 1502 TAD I 0102 /16125-1502 MB 016126 0522 AND I 0122 /16126-0522 ER 016127 4040 JMS 0040 /16127-4040 016130 0000 AND 0000 /16130-0000 @@ /DJFPAB PAL8-V50X 06-OCT-90 PAGE 1-61 016131 3736 MSETSW, DCA I 6136 /16131-3736 _^ 016132 4023 JMS 0023 /16132-4023 S 016133 0524 AND I 0124 /16133-0524 ET 016134 2520 ISZ I 0120 /16134-2520 UP 016135 4003 JMS 0003 /16135-4003 C 016136 1716 TAD I 6116 /16136-1716 ON 016137 2422 ISZ I 0022 /16137-2422 TR 016140 1714 TAD I 6114 /16140-1714 OL 016141 4023 JMS 0023 /16141-4023 S 016142 2711 ISZ I 6111 /16142-2711 WI 016143 2403 ISZ I 0003 /16143-2403 TC 016144 1005 TAD 0005 /16144-1005 HE 016145 2340 ISZ 6140 /16145-2340 S 016146 7540 SMA SZA /16146-7540 = 016147 0000 AND 0000 /16147-0000 @@ 016150 4011 MINTST, JMS 0011 /16150-4011 I 016151 2340 ISZ 6140 /16151-2340 S 016152 1116 TAD 0116 /16152-1116 IN 016153 0317 AND 6117 /16153-0317 CO 016154 2222 ISZ 6022 /16154-2222 RR 016155 0503 AND I 0103 /16155-0503 EC 016156 2440 ISZ I 0040 /16156-2440 T 016157 2405 ISZ I 0005 /16157-2405 TE 016160 2324 ISZ 6124 /16160-2324 ST 016161 4016 JMS 0016 /16161-4016 N 016162 2515 ISZ I 0115 /16162-2515 UM 016163 0205 AND 6005 /16163-0205 BE 016164 2240 ISZ 6040 /16164-2240 R 016165 1417 TAD I 0017 /16165-1417 LO 016166 0340 AND 6140 /16166-0340 C 016167 0000 AND 0000 /16167-0000 @@ 016170 3736 PSHERR, DCA I 6136 /16170-3736 _^ 016171 4023 JMS 0023 /16171-4023 S 016172 2401 ISZ I 0001 /16172-2401 TA 016173 0313 AND 6113 /16173-0313 CK 016174 4020 JMS 0020 /16174-4020 P 016175 2523 ISZ I 0123 /16175-2523 US 016176 1040 TAD 0040 /16176-1040 H 016177 0522 AND I 0122 /16177-0522 ER 016200 2217 ISZ 6217 /16200-2217 RO 016201 2240 ISZ 6240 /16201-2240 R 016202 2205 ISZ 6205 /16202-2205 RE 016203 2324 ISZ 6324 /16203-2324 ST 016204 0122 AND 0122 /16204-0122 AR 016205 2411 ISZ I 0011 /16205-2411 TI 016206 1607 TAD I 6207 /16206-1607 NG 016207 4000 JMS 0000 /16207-4000 @ 016210 3736 POPERR, DCA I 6336 /16210-3736 _^ 016211 4023 JMS 0023 /16211-4023 S 016212 2401 ISZ I 0001 /16212-2401 TA 016213 0313 AND 6313 /16213-0313 CK 016214 4020 JMS 0020 /16214-4020 P /DJFPAB PAL8-V50X 06-OCT-90 PAGE 1-62 016215 1720 TAD I 6320 /16215-1720 OP 016216 4005 JMS 0005 /16216-4005 E 016217 2222 ISZ 6222 /16217-2222 RR 016220 1722 TAD I 6322 /16220-1722 OR 016221 4022 JMS 0022 /16221-4022 R 016222 0523 AND I 0123 /16222-0523 ES 016223 2401 ISZ I 0001 /16223-2401 TA 016224 2224 ISZ 6224 /16224-2224 RT 016225 1116 TAD 0116 /16225-1116 IN 016226 0740 AND I 6340 /16226-0740 G 016227 0000 AND 0000 /16227-0000 @@ 016230 3736 MSTAER, DCA I 6336 /16230-3736 _^ 016231 3640 DCA I 6240 /16231-3640 ^ 016232 0620 AND I 6220 /16232-0620 FP 016233 2040 ISZ 0040 /16233-2040 P 016234 2324 ISZ 6324 /16234-2324 ST 016235 0124 AND 0124 /16235-0124 AT 016236 2523 ISZ I 0123 /16236-2523 US 016237 4005 JMS 0005 /16237-4005 E 016240 2222 ISZ 6222 /16240-2222 RR 016241 1722 TAD I 6322 /16241-1722 OR 016242 4040 JMS 0040 /16242-4040 016243 4014 JMS 0014 /16243-4014 L 016244 1703 TAD I 6303 /16244-1703 OC 016245 7240 CLA CMA /16245-7240 : 016246 0000 AND 0000 /16246-0000 @@ 016247 3736 MSKPFG, DCA I 6336 /16247-3736 _^ 016250 4006 JMS 0006 /16250-4006 F 016251 2020 ISZ 0020 /16251-2020 PP 016252 4023 JMS 0023 /16252-4023 S 016253 1311 TAD 6311 /16253-1311 KI 016254 2040 ISZ 0040 /16254-2040 P 016255 0614 AND I 6214 /16255-0614 FL 016256 0107 AND 0107 /16256-0107 AG 016257 4005 JMS 0005 /16257-4005 E 016260 2222 ISZ 6222 /16260-2222 RR 016261 1722 TAD I 6322 /16261-1722 OR 016262 4014 JMS 0014 /16262-4014 L 016263 1703 TAD I 6303 /16263-1703 OC 016264 7240 CLA CMA /16264-7240 : 016265 0000 AND 0000 /16265-0000 @@ 016266 3736 MPCERR, DCA I 6336 /16266-3736 _^ 016267 4006 JMS 0006 /16267-4006 F 016270 2020 ISZ 0020 /16270-2020 PP 016271 4015 JMS 0015 /16271-4015 M 016272 2003 ISZ 0003 /16272-2003 PC 016273 4005 JMS 0005 /16273-4005 E 016274 2222 ISZ 6222 /16274-2222 RR 016275 1722 TAD I 6322 /16275-1722 OR 016276 4040 JMS 0040 /16276-4040 016277 4040 JMS 0040 /16277-4040 016300 4040 JMS 0040 /16300-4040 /DJFPAB PAL8-V50X 06-OCT-90 PAGE 1-63 016301 4014 JMS 0014 /16301-4014 L 016302 1703 TAD I 6303 /16302-1703 OC 016303 7240 CLA CMA /16303-7240 : 016304 0000 AND 0000 /16304-0000 @@ 016305 3736 MDBERR, DCA I 6336 /16305-3736 _^ 016306 4006 JMS 0006 /16306-4006 F 016307 2020 ISZ 0020 /16307-2020 PP 016310 4004 JMS 0004 /16310-4004 D 016311 0240 AND 6240 /16311-0240 B 016312 0522 AND I 0122 /16312-0522 ER 016313 2217 ISZ 6217 /16313-2217 RO 016314 2240 ISZ 6240 /16314-2240 R 016315 4040 JMS 0040 /16315-4040 016316 4040 JMS 0040 /16316-4040 016317 4040 JMS 0040 /16317-4040 016320 4014 JMS 0014 /16320-4014 L 016321 1703 TAD I 6303 /16321-1703 OC 016322 7240 CLA CMA /16322-7240 : 016323 0000 AND 0000 /16323-0000 @@ 016324 0103 MACFPP, AND 0103 /16324-0103 AC 016325 2425 ISZ I 0025 /16325-2425 TU 016326 0114 AND 0114 /16326-0114 AL 016327 4006 JMS 0006 /16327-4006 F 016330 2020 ISZ 0020 /16330-2020 PP 016331 0000 AND 0000 /16331-0000 @@ 016332 3736 MACTUA, DCA I 6336 /16332-3736 _^ 016333 4001 JMS 0001 /16333-4001 A 016334 0324 AND 6324 /16334-0324 CT 016335 2501 ISZ I 0101 /16335-2501 UA 016336 1472 TAD I 0072 /16336-1472 L: 016337 4000 JMS 0000 /16337-4000 @ 016340 0530 MEXPEC, AND I 0130 /16340-0530 EX 016341 2005 ISZ 0005 /16341-2005 PE 016342 0324 AND 6324 /16342-0324 CT 016343 0504 AND I 0104 /16343-0504 ED 016344 7240 CLA CMA /16344-7240 : 016345 0000 AND 0000 /16345-0000 @@ 016346 2324 MSTAT, ISZ 6324 /16346-2324 ST 016347 0124 AND 0124 /16347-0124 AT 016350 2523 ISZ I 0123 /16350-2523 US 016351 7240 CLA CMA /16351-7240 : 016352 0000 AND 0000 /16352-0000 @@ 016353 2324 MSTEP, ISZ 6324 /16353-2324 ST 016354 0520 AND I 0120 /16354-0520 EP 016355 7240 CLA CMA /16355-7240 : 016356 0000 AND 0000 /16356-0000 @@ 016357 2405 MTEST, ISZ I 0005 /16357-2405 TE 016360 2324 ISZ 6324 /16360-2324 ST /DJFPAB PAL8-V50X 06-OCT-90 PAGE 1-64 016361 7240 CLA CMA /16361-7240 : 016362 0000 AND 0000 /16362-0000 @@ 016363 0104 MADDRS, AND 0104 /16363-0104 AD 016364 0422 AND I 0022 /16364-0422 DR 016365 0523 AND I 0123 /16365-0523 ES 016366 2372 ISZ 6372 /16366-2372 S: 016367 4000 JMS 0000 /16367-4000 @ 016370 4011 MINCOR, JMS 0011 /16370-4011 I 016371 2340 ISZ 6340 /16371-2340 S 016372 1116 TAD 0116 /16372-1116 IN 016373 0317 AND 6317 /16373-0317 CO 016374 2222 ISZ 6222 /16374-2222 RR 016375 0503 AND I 0103 /16375-0503 EC 016376 2440 ISZ I 0040 /16376-2440 T 016377 0103 AND 0103 /16377-0103 AC 016400 4040 JMS 0040 /16400-4040 016401 4040 JMS 0040 /16401-4040 016402 4040 JMS 0040 /16402-4040 016403 4040 JMS 0040 /16403-4040 016404 4014 JMS 0014 /16404-4014 L 016405 1703 TAD I 6503 /16405-1703 OC 016406 4000 JMS 0000 /16406-4000 @ 016407 3736 MMCREV, DCA I 6536 /16407-3736 _^ 016410 4006 JMS 0006 /16410-4006 F 016411 2020 ISZ 0020 /16411-2020 PP 016412 4015 JMS 0015 /16412-4015 M 016413 1103 TAD 0103 /16413-1103 IC 016414 2217 ISZ 6417 /16414-2217 RO 016415 4003 JMS 0003 /16415-4003 C 016416 1704 TAD I 6504 /16416-1704 OD 016417 0540 AND I 0140 /16417-0540 E 016420 2205 ISZ 6405 /16420-2205 RE 016421 2640 ISZ I 6440 /16421-2640 V 016422 7540 SMA SZA /16422-7540 = 016423 0000 AND 0000 /16423-0000 @@ 016424 3736 MIRVRM, DCA I 6536 /16424-3736 _^ 016425 4011 JMS 0011 /16425-4011 I 016426 1603 TAD I 6403 /16426-1603 NC 016427 1722 TAD I 6522 /16427-1722 OR 016430 2205 ISZ 6405 /16430-2205 RE 016431 0324 AND 6524 /16431-0324 CT 016432 4022 JMS 0022 /16432-4022 R 016433 0526 AND I 0126 /16433-0526 EV 016434 4016 JMS 0016 /16434-4016 N 016435 2515 ISZ I 0115 /16435-2515 UM 016436 4011 JMS 0011 /16436-4011 I 016437 1640 TAD I 6440 /16437-1640 N 016440 2217 ISZ 6417 /16440-2217 RO 016441 1500 TAD I 0100 /16441-1500 M@ 016442 3736 MAPTER, DCA I 6536 /16442-3736 _^ /DJFPAB PAL8-V50X 06-OCT-90 PAGE 1-65 016443 4001 JMS 0001 /16443-4001 A 016444 2024 ISZ 0024 /16444-2024 PT 016445 4024 JMS 0024 /16445-4024 T 016446 0102 AND 0102 /16446-0102 AB 016447 1405 TAD I 0005 /16447-1405 LE 016450 4005 JMS 0005 /16450-4005 E 016451 2222 ISZ 6422 /16451-2222 RR 016452 1722 TAD I 6522 /16452-1722 OR 016453 4040 JMS 0040 /16453-4040 016454 1417 TAD I 0017 /16454-1417 LO 016455 0372 AND 6572 /16455-0372 C: 016456 4000 JMS 0000 /16456-4000 @ 016457 3736 MAPTHL, DCA I 6536 /16457-3736 _^ 016460 4006 JMS 0006 /16460-4006 F 016461 1404 TAD I 0004 /16461-1404 LD 016462 4040 JMS 0040 /16462-4040 016463 0620 AND I 6420 /16463-0620 FP 016464 0340 AND 6540 /16464-0340 C 016465 4011 JMS 0011 /16465-4011 I 016466 2240 ISZ 6440 /16466-2240 R 016467 4040 JMS 0040 /16467-4040 016470 0201 AND 6401 /16470-0201 BA 016471 2305 ISZ 6505 /16471-2305 SE 016472 4017 JMS 0017 /16472-4017 O 016473 2005 ISZ 0005 /16473-2005 PE 016474 2240 ISZ 6440 /16474-2240 R 016475 0530 AND I 0130 /16475-0530 EX 016476 2040 ISZ 0040 /16476-2040 P 016477 4015 JMS 0015 /16477-4015 M 016500 2327 ISZ 6527 /16500-2327 SW 016501 4040 JMS 0040 /16501-4040 016502 1423 TAD I 0023 /16502-1423 LS 016503 2740 ISZ I 6540 /16503-2740 W 016504 4014 JMS 0014 /16504-4014 L 016505 2327 ISZ 6527 /16505-2327 SW 016506 6140 6140 /16506-6140 1 016507 1423 TAD I 0023 /16507-1423 LS 016510 2762 ISZ I 6562 /16510-2762 W2 016511 4014 JMS 0014 /16511-4014 L 016512 2327 ISZ 6527 /16512-2327 SW 016513 6337 CIF CDF 134 /16513-6337 3_ 016514 3640 DCA I 6440 /16514-3640 ^ 016515 0000 AND 0000 /16515-0000 @@ 016516 3736 MNORUN, DCA I 6536 /16516-3736 _^ 016517 4016 JMS 0016 /16517-4016 N 016520 1724 TAD I 6524 /16520-1724 OT 016521 4022 JMS 0022 /16521-4022 R 016522 2516 ISZ I 0116 /16522-2516 UN 016523 1611 TAD I 6411 /16523-1611 NI 016524 1607 TAD I 6407 /16524-1607 NG 016525 4040 JMS 0040 /16525-4040 016526 4040 JMS 0040 /16526-4040 016527 4040 JMS 0040 /16527-4040 /DJFPAB PAL8-V50X 06-OCT-90 PAGE 1-66 016530 1417 TAD I 0017 /16530-1417 LO 016531 0372 AND 6572 /16531-0372 C: 016532 4000 JMS 0000 /16532-4000 @ 016533 3736 MDATBR, DCA I 6536 /16533-3736 _^ 016534 4004 JMS 0004 /16534-4004 D 016535 0124 AND 0124 /16535-0124 AT 016536 0140 AND 0140 /16536-0140 A 016537 0222 AND 6422 /16537-0222 BR 016540 0501 AND I 0101 /16540-0501 EA 016541 1340 TAD 6540 /16541-1340 K 016542 0522 AND I 0122 /16542-0522 ER 016543 2217 ISZ 6417 /16543-2217 RO 016544 2240 ISZ 6440 /16544-2240 R 016545 4040 JMS 0040 /16545-4040 016546 1417 TAD I 0017 /16546-1417 LO 016547 0372 AND 6572 /16547-0372 C: 016550 4000 JMS 0000 /16550-4000 @ 016551 3736 MRUNIN, DCA I 6536 /16551-3736 _^ 016552 4022 JMS 0022 /16552-4022 R 016553 2516 ISZ I 0116 /16553-2516 UN 016554 1611 TAD I 6411 /16554-1611 NI 016555 1607 TAD I 6407 /16555-1607 NG 016556 3736 DCA I 6536 /16556-3736 _^ 016557 0000 AND 0000 /16557-0000 @@ 016560 4040 MBADM0, JMS 0040 /16560-4040 016561 4040 JMS 0040 /16561-4040 016562 4040 JMS 0040 /16562-4040 016563 4040 JMS 0040 /16563-4040 016564 0201 AND 6401 /16564-0201 BA 016565 0440 AND I 0040 /16565-0440 D 016566 1517 TAD I 0117 /16566-1517 MO 016567 0425 AND I 0025 /16567-0425 DU 016570 1405 TAD I 0005 /16570-1405 LE 016571 4011 JMS 0011 /16571-4011 I 016572 2340 ISZ 6540 /16572-2340 S 016573 1570 TAD I 0170 /16573-1570 M8 016574 6461 6461 /16574-6461 41 016575 6000 SKON /16575-6000 0@ 016576 4040 MBADM1, JMS 0040 /16576-4040 016577 4040 JMS 0040 /16577-4040 016600 4040 JMS 0040 /16600-4040 016601 4040 JMS 0040 /16601-4040 016602 0201 AND 6601 /16602-0201 BA 016603 0440 AND I 0040 /16603-0440 D 016604 1517 TAD I 0117 /16604-1517 MO 016605 0425 AND I 0025 /16605-0425 DU 016606 1405 TAD I 0005 /16606-1405 LE 016607 4011 JMS 0011 /16607-4011 I 016610 2340 ISZ 6740 /16610-2340 S 016611 1570 TAD I 0170 /16611-1570 M8 016612 6461 6461 /16612-6461 41 /DJFPAB PAL8-V50X 06-OCT-90 PAGE 1-67 016613 6100 6100 /16613-6100 1@ 016614 2516 MUNEXI, ISZ I 0116 /16614-2516 UN 016615 0530 AND I 0130 /16615-0530 EX 016616 2005 ISZ 0005 /16616-2005 PE 016617 0324 AND 6724 /16617-0324 CT 016620 0504 AND I 0104 /16620-0504 ED 016621 4006 JMS 0006 /16621-4006 F 016622 2020 ISZ 0020 /16622-2020 PP 016623 4011 JMS 0011 /16623-4011 I 016624 1624 TAD I 6624 /16624-1624 NT 016625 0522 AND I 0122 /16625-0522 ER 016626 2225 ISZ 6625 /16626-2225 RU 016627 2024 ISZ 0024 /16627-2024 PT 016630 4022 JMS 0022 /16630-4022 R 016631 0521 AND I 0121 /16631-0521 EQ 016632 2505 ISZ I 0105 /16632-2505 UE 016633 2324 ISZ 6724 /16633-2324 ST 016634 4014 JMS 0014 /16634-4014 L 016635 1703 TAD I 6703 /16635-1703 OC 016636 7240 CLA CMA /16636-7240 : 016637 0000 AND 0000 /16637-0000 @@ 016640 3736 MXRERR, DCA I 6736 /16640-3736 _^ 016641 4011 JMS 0011 /16641-4011 I 016642 1604 TAD I 6604 /16642-1604 ND 016643 0530 AND I 0130 /16643-0530 EX 016644 4022 JMS 0022 /16644-4022 R 016645 0507 AND I 0107 /16645-0507 EG 016646 1123 TAD 0123 /16646-1123 IS 016647 2405 ISZ I 0005 /16647-2405 TE 016650 2240 ISZ 6640 /16650-2240 R 016651 0522 AND I 0122 /16651-0522 ER 016652 2217 ISZ 6617 /16652-2217 RO 016653 2240 ISZ 6640 /16653-2240 R 016654 4040 JMS 0040 /16654-4040 016655 1417 TAD I 0017 /16655-1417 LO 016656 0372 AND 6772 /16656-0372 C: 016657 4000 JMS 0000 /16657-4000 @ 016660 3736 MINDXP, DCA I 6736 /16660-3736 _^ 016661 4011 JMS 0011 /16661-4011 I 016662 2260 ISZ 6660 /16662-2260 R0 016663 4040 JMS 0040 /16663-4040 016664 1122 TAD 0122 /16664-1122 IR 016665 6140 6140 /16665-6140 1 016666 4011 JMS 0011 /16666-4011 I 016667 2262 ISZ 6662 /16667-2262 R2 016670 4040 JMS 0040 /16670-4040 016671 1122 TAD 0122 /16671-1122 IR 016672 6340 6340 /16672-6340 3 016673 4011 JMS 0011 /16673-4011 I 016674 2264 ISZ 6664 /16674-2264 R4 016675 4040 JMS 0040 /16675-4040 016676 1122 TAD 0122 /16676-1122 IR /DJFPAB PAL8-V50X 06-OCT-90 PAGE 1-68 016677 6540 6540 /16677-6540 5 016700 4011 JMS 0011 /16700-4011 I 016701 2266 ISZ 6666 /16701-2266 R6 016702 4040 JMS 0040 /16702-4040 016703 1122 TAD 0122 /16703-1122 IR 016704 6740 6740 /16704-6740 7 016705 3736 DCA I 6736 /16705-3736 _^ 016706 4000 JMS 0000 /16706-4000 @ 016707 3736 MPWRLO, DCA I 6736 /16707-3736 _^ 016710 4020 JMS 0020 /16710-4020 P 016711 1727 TAD I 6727 /16711-1727 OW 016712 0522 AND I 0122 /16712-0522 ER 016713 4014 JMS 0014 /16713-4014 L 016714 1727 TAD I 6727 /16714-1727 OW 016715 4006 JMS 0006 /16715-4006 F 016716 1401 TAD I 0001 /16716-1401 LA 016717 0740 AND I 6740 /16717-0740 G 016720 2305 ISZ 6705 /16720-2305 SE 016721 2440 ISZ I 0040 /16721-2440 T 016722 2205 ISZ 6605 /16722-2205 RE 016723 2324 ISZ 6724 /16723-2324 ST 016724 0122 AND 0122 /16724-0122 AR 016725 2411 ISZ I 0011 /16725-2411 TI 016726 1607 TAD I 6607 /16726-1607 NG 016727 0000 AND 0000 /16727-0000 @@ 016730 0412 MDJPAS, AND I 0012 /16730-0412 DJ 016731 0620 AND I 6620 /16731-0620 FP 016732 0155 AND 0155 /16732-0155 A- 016733 0240 AND 6640 /16733-0240 B 016734 2001 ISZ 0001 /16734-2001 PA 016735 2323 ISZ 6723 /16735-2323 SS 016736 0000 AND 0000 /16736-0000 @@ 016737 2405 MTST24, ISZ I 0005 /16737-2405 TE 016740 2324 ISZ 6724 /16740-2324 ST 016741 4062 JMS 0062 /16741-4062 2 016742 6440 6440 /16742-6440 4 016743 3736 DCA I 6736 /16743-3736 _^ 016744 0000 AND 0000 /16744-0000 @@ 016745 5723 JMP I 6723 /16745-5723 /S 016746 0002 AND 0002 /16746-0002 @B 016747 7607 CLA DVI /16747-7607 >G 016750 7402 HLT /16750-7402 <B 016751 1346 TAD 6746 /16751-1346 K& 016752 5737 JMP I 6737 /16752-5737 /_ 016753 0200 AND 6600 /16753-0200 B@ 016754 5000 JMP 0000 /16754-5000 (@ 016755 2513 ISZ I 0113 /16755-2513 UK 016756 2516 ISZ I 0116 /16756-2516 UN 016757 5152 JMP 0152 /16757-5152 )* 016760 5015 JMP 0015 /16760-5015 (M 016761 5124 JMP 0124 /16761-5124 )T /DJFPAB PAL8-V50X 06-OCT-90 PAGE 1-69 016762 6135 6135 /16762-6135 1] 016763 0007 AND 0007 /16763-0007 @G 016764 7771 MQA MQL CLA DPSZ /16764-7771 ?9 016765 6546 6546 /16765-6546 5& 016766 0003 AND 0003 /16766-0003 @C 016767 6550 6550 /16767-6550 5( 016770 6547 6547 /16770-6547 5' 016771 0037 AND 0037 /16771-0037 @_ 016772 6340 6340 /16772-6340 3 016773 0106 AND 0106 /16773-0106 AF 016774 6337 CIF CDF 134 /16774-6337 3_ 016775 6037 6037 /16775-6037 0_ 016776 0017 AND 0017 /16776-0017 @O 016777 7666 SZA SNL CLA OSR HLT /16777-7666 >6 0000 FIELD 0 0000 *0000 000000 0302 302 /00000-0302 CB 000001 5402 JMP I .+1 /00001-5402 ,B 000002 0400 INTRPT /00002-0400 D@ 000003 2741 2741 /00003-2741 W! 000004 7402 HLT /00004-7402 <B 000005 7402 HLT /00005-7402 <B 000006 7402 HLT /00006-7402 <B 000007 7402 HLT /00007-7402 <B 000010 0000 STACK, AND 0000 /00010-0000 @@ 000011 0000 AND 0000 /00011-0000 @@ 000012 0000 AND 0000 /00012-0000 @@ 000013 0000 AND 0000 /00013-0000 @@ 000014 0000 AND 0000 /00014-0000 @@ 000015 7777 MQA MQL CLA SAM /00015-7777 ?? 000016 0000 AND 0000 /00016-0000 @@ 000017 0000 AND 0000 /00017-0000 @@ 000020 0000 OPTS, AND 0000 /00020-0000 @@ 000021 0000 AND 0000 /00021-0000 @@ 000022 0000 X8MOD, AND 0000 /00022-0000 @@ 000023 0000 AND 0000 /00023-0000 @@ 000024 0000 AND 0000 /00024-0000 @@ 000025 0000 AND 0000 /00025-0000 @@ 000026 0000 AND 0000 /00026-0000 @@ 000027 0000 AND 0000 /00027-0000 @@ 000030 0000 AND 0000 /00030-0000 @@ 000031 0000 AND 0000 /00031-0000 @@ 000032 0000 AND 0000 /00032-0000 @@ 000033 0000 AND 0000 /00033-0000 @@ 000034 0000 AND 0000 /00034-0000 @@ 000035 0000 AND 0000 /00035-0000 @@ 000036 1505 XOPT, OPTRED /00036-1505 ME 000037 1242 MSG, MESG /00037-1242 J" 000040 1400 PUSH, PSHRTE /00040-1400 L@ 000041 1406 POP, POPRTE /00041-1406 LF 000042 0600 GETC, CGET /00042-0600 F@ 000043 0531 NUMPRT, PRTNUM /00043-0531 EY 000044 0505 LOOP, WAIT /00044-0505 EE /DJFPAB PAL8-V50X 06-OCT-90 PAGE 1-70 000045 1203 CHRPRT, PRTCHR /00045-1203 JC 000046 0731 0731 /00046-0731 GY 000047 1322 1322 /00047-1322 KR 000050 1343 STSMSG, MSGSTS /00050-1343 K# 000051 1523 PREAPT, APTPRE /00051-1523 MS 000052 1634 SKFGPR, PRSKFG /00052-1634 N\ 000053 1671 CKSTAT, STATCK /00053-1671 N9 000054 2011 RDREGS, REGSRD /00054-2011 PI 000055 2200 ACBAD, BADAC /00055-2200 R@ 000056 2231 BRKERR, ERRBRK /00056-2231 RY 000057 2312 ABORT, ORTAB /00057-2312 SJ 000060 2344 NORUN, RUNNO /00060-2344 S$ 000061 2471 CHKAPT, APTCHK /00061-2471 T9 000062 2617 CHKIDX, IDXCHK /00062-2617 VO 000063 2400 ROMVER, VERROM /00063-2400 T@ 000064 0747 XX8, X8TST /00064-0747 G' 000065 3055 SETENV, ENVSET /00065-3055 X- 000066 0001 C1, 1 /00066-0001 @A 000067 0003 C3, 3 /00067-0003 @C 000070 0004 C4, 4 /00070-0004 @D 000071 0005 C5, 5 /00071-0005 @E 000072 0007 C7, 7 /00072-0007 @G 000073 0011 C11, 11 /00073-0011 @I 000074 0012 C12, 12 /00074-0012 @J 000075 0015 C15, 15 /00075-0015 @M 000076 0023 C23, 23 /00076-0023 @S 000077 0077 C77, 77 /00077-0077 @? 000100 0177 C177, 177 /00100-0177 A? 000101 0200 C200, START /00101-0200 B@ ALSO 200 000102 0260 C260, 260 /00102-0260 B0 000103 0277 C277, 277 /00103-0277 B? 000104 1000 C1000, 1000 /00104-1000 H@ 000105 2000 C2000, 2000 /00105-2000 P@ 000106 3777 C3777, 3777 /00106-3777 _? 000107 4000 C4000, 4000 /00107-4000 @ 000110 5777 C5777, 5777 /00110-5777 /? 000111 7700 C7700, 7700 /00111-7700 ?@ 000112 7755 CM23, -23 /00112-7755 ?- 000113 7765 CM13, -13 /00113-7765 ?5 000114 7766 CM12, -12 /00114-7766 ?6 000115 7777 C7777, 7777 /00115-7777 ?? 000116 0000 INFLAG, AND 0000 /00116-0000 @@ 000117 0000 QFLAG, AND 0000 /00117-0000 @@ 000120 0000 AND 0000 /00120-0000 @@ 000121 0000 CTGONC, AND 0000 /00121-0000 @@ 000122 0000 TSTNUM, AND 0000 /00122-0000 @@ 000123 0000 NALL, AND 0000 /00123-0000 @@ 000124 0000 INPUT, AND 0000 /00124-0000 @@ 000125 0000 AC, AND 0000 /00125-0000 @@ 000126 0000 MQ, AND 0000 /00126-0000 @@ 000127 0000 GTFS, AND 0000 /00127-0000 @@ 000130 0000 AC1, AND 0000 /00130-0000 @@ 000131 0000 MQ1, AND 0000 /00131-0000 @@ 000132 0000 GTFS1, AND 0000 /00132-0000 @@ 000133 0000 AC2, AND 0000 /00133-0000 @@ /DJFPAB PAL8-V50X 06-OCT-90 PAGE 1-71 000134 0000 MQ2, AND 0000 /00134-0000 @@ 000135 0000 GTFS2, AND 0000 /00135-0000 @@ 000136 0000 NUMLEN, AND 0000 /00136-0000 @@ 000137 0000 CNT, AND 0000 /00137-0000 @@ 000140 0000 AND 0000 /00140-0000 @@ 000141 0000 AND 0000 /00141-0000 @@ 000142 0000 OCTNUM, AND 0000 /00142-0000 @@ 000143 0000 MSGSWI, AND 0000 /00143-0000 @@ 000144 0000 ONCONL, AND 0000 /00144-0000 @@ 000145 0000 CNTSTP, AND 0000 /00145-0000 @@ 000146 7200 APTP, APT /00146-7200 :@ 000147 0000 STATUS, AND 0000 /00147-0000 @@ 000150 0000 MPC, AND 0000 /00150-0000 @@ 000151 0000 MDB, AND 0000 /00151-0000 @@ 000152 0000 AND 0000 /00152-0000 @@ 000153 0000 TSTC, AND 0000 /00153-0000 @@ 000154 0000 TSTN, AND 0000 /00154-0000 @@ 000155 0000 TSTL, AND 0000 /00155-0000 @@ 000156 0000 CODE, AND 0000 /00156-0000 @@ 000157 0000 MCODE, AND 0000 /00157-0000 @@ 000160 0000 INTTEM, AND 0000 /00160-0000 @@ 000161 6203 CIFCDF, CIF CDF 0 /00161-6203 2C 000162 2370 C2370, EXPEX FPCON LOCON /00162-2370 S8 000163 2770 C2770, EXPEX FPENA FPCON LOCON /00163-2770 W8 000164 6410 C6410, DPSEL EXPEX FPENA LOCON /00164-6410 4H 000165 2410 C2410, EXPEX FPENA LOCON /00165-2410 TH 000166 2760 C2760, EXPEX FPENA FPCON /00166-2760 W0 000167 6400 C6400, DPSEL EXPEX FPENA /00167-6400 4@ 000170 7477 MQL SAM /00170-7477 <? 000171 7766 SMA SZA SNL CLA OSR HLT /00171-7766 ?6 000172 7776 SPA SNA SZL CLA OSR HLT /00172-7776 ?> 000173 7522 SMA SNL HLT /00173-7522 =R 000174 0240 0240 /00174-0240 B 000175 7540 SMA SZA /00175-7540 = 000176 0034 AND 0034 /00176-0034 @\ 000177 7000 NOP /00177-7000 8@ 0200 PAGE 000200 6007 START, CAF /00200-6007 0G 000201 7621 MQL CLA /00201-7621 >Q 000202 4343 JMS INIT /00202-4343 ## 000203 6001 ION /00203-6001 0A 000204 1022 TAD X8MOD /00204-1022 HR 000205 7700 SMA CLA /00205-7700 ?@ 000206 5211 JMP 0211 /00206-5211 *I 000207 2144 ISZ ONCONL /00207-2144 Q$ 000210 5777 JMP I 0377 /00210-5777 /? 000211 4437 JMS I MSG /00211-4437 $_ 000212 6033 MDJFPA /00212-6033 0[ 000213 4437 JMS I MSG /00213-4437 $_ 000214 6052 MRUNAL /00214-6052 0* 000215 4442 JMS I GETC /00215-4442 $" 000216 5223 JMP XTST /00216-5223 *S NO 000217 5213 JMP 0213 /00217-5213 *K ERROR 000220 5213 JMP 0213 /00220-5213 *K RETURN /DJFPAB PAL8-V50X 06-OCT-90 PAGE 1-72 000221 3122 DCA TSTNUM /00221-3122 YR YES 000222 5235 JMP XSET /00222-5235 *] 000223 4437 XTST, JMS I MSG /00223-4437 $_ 000224 6115 MTSTNO /00224-6115 1M 000225 4442 JMS I GETC /00225-4442 $" 000226 5223 JMP XTST /00226-5223 *S NO 000227 5223 JMP XTST /00227-5223 *S ERROR 000230 7410 SKP /00230-7410 <H RETURN 000231 5223 JMP XTST /00231-5223 *S YES 000232 1142 TAD OCTNUM /00232-1142 I" 000233 3122 DCA TSTNUM /00233-3122 YR 000234 2123 ISZ NALL /00234-2123 QS 000235 4437 XSET, JMS I MSG /00235-4437 $_ 000236 6131 MSETSW /00236-6131 1Y 000237 4436 JMS I XOPT /00237-4436 $^ 000240 4443 JMS I NUMPRT /00240-4443 $# 000241 1021 TAD 0021 /00241-1021 HQ 000242 7700 SMA CLA /00242-7700 ?@ 000243 5253 JMP 0253 /00243-5253 *+ 000244 4437 JMS I MSG /00244-4437 $_ 000245 6063 MCONTI /00245-6063 03 000246 4442 JMS I GETC /00246-4442 $" 000247 7000 NOP /00247-7000 8@ NO 000250 7000 NOP /00250-7000 8@ ERROR 000251 7000 NOP /00251-7000 8@ RETURN 000252 5266 JMP XRUN /00252-5266 *6 YES 000253 4442 JMS I GETC /00253-4442 $" 000254 5274 JMP XCONT /00254-5274 *< NO 000255 5235 JMP XSET /00255-5235 *] ERROR 000256 7410 SKP /00256-7410 <H RETURN 000257 5235 JMP XSET /00257-5235 *] YES 000260 1136 TAD NUMLEN /00260-1136 I^ 000261 1070 TAD C4 /00261-1070 H8 000262 7710 SPA CLA /00262-7710 ?H 000263 5266 JMP XRUN /00263-5266 *6 000264 1142 TAD OCTNUM /00264-1142 I" 000265 3020 DCA OPTS /00265-3020 XP 000266 4437 XRUN, JMS I MSG /00266-4437 $_ 000267 6551 MRUNIN /00267-6551 5) 000270 1123 TAD NALL /00270-1123 IS 000271 7640 SZA CLA /00271-7640 > 000272 5303 JMP XALL /00272-5303 +C 000273 5777 JMP I (TST1 /00273-5777 /? 000274 7307 XCONT, CLA CLL IAC RTL /00274-7307 ;G 000275 1136 TAD NUMLEN /00275-1136 I^ 000276 7710 SPA CLA /00276-7710 ?H 000277 5501 JMP I C200 /00277-5501 -A 000300 1142 TAD OCTNUM /00300-1142 I" 000301 3020 DCA OPTS /00301-3020 XP 000302 5501 JMP I C200 /00302-5501 -A 000303 3153 XALL, DCA TSTC /00303-3153 Y+ 000304 1376 TAD (TSNLST /00304-1376 K> 000305 3154 DCA TSTN /00305-3154 Y, 000306 1375 TAD (TSTLST /00306-1375 K= 000307 3155 DCA TSTL /00307-3155 Y- /DJFPAB PAL8-V50X 06-OCT-90 PAGE 1-73 000310 4311 JMS NEXTST /00310-4311 #I 000311 7402 NEXTST, HLT /00311-7402 <B 000312 1554 TAD I TSTN /00312-1554 M, 000313 7450 SNA /00313-7450 <( 000314 5324 JMP 0324 /00314-5324 +T 000315 1122 TAD TSTNUM /00315-1122 IR 000316 7650 SNA CLA /00316-7650 >( 000317 5334 JMP NEXOK /00317-5334 +\ 000320 2153 ISZ TSTC /00320-2153 Q+ 000321 2154 ISZ TSTN /00321-2154 Q, 000322 5312 JMP 0312 /00322-5312 +J 000323 4460 JMS I NORUN /00323-4460 $0 000324 1122 TAD TSTNUM /00324-1122 IR 000325 4443 JMS I NUMPRT /00325-4443 $# 000326 4437 JMS I MSG /00326-4437 $_ 000327 6150 MINTST /00327-6150 1( 000330 7240 CLA CMA /00330-7240 : 000331 1311 TAD NEXTST /00331-1311 KI 000332 4443 JMS I NUMPRT /00332-4443 $# 000333 5223 JMP 0223 /00333-5223 *S 000334 1155 NEXOK, TAD TSTL /00334-1155 I- 000335 1153 TAD TSTC /00335-1153 I+ 000336 3342 DCA NEXIND /00336-3342 [" 000337 1742 TAD I NEXIND /00337-1742 O" 000340 3342 DCA NEXIND /00340-3342 [" 000341 5742 JMP I NEXIND /00341-5742 /" 000342 0000 NEXIND, AND 0000 /00342-0000 @@ 000343 7402 INIT, HLT /00343-7402 <B 000344 6203 CIF CDF 0 /00344-6203 2C 000345 1374 TAD (-4 /00345-1374 K< 000346 3773 DCA I (CM4 /00346-3773 _; 000347 3123 DCA NALL /00347-3123 YS 000350 3145 DCA CNTSTP /00350-3145 Y% 000351 3116 DCA INFLAG /00351-3116 YN 000352 1076 TAD C23 /00352-1076 H> 000353 3010 DCA STACK /00353-3010 XH 000354 3117 DCA QFLAG /00354-3117 YO 000355 3120 DCA 0120 /00355-3120 YP 000356 3121 DCA CTGONC /00356-3121 YQ 000357 3143 DCA MSGSWI /00357-3143 Y# 000360 3144 DCA ONCONL /00360-3144 Y$ 000361 3152 DCA 0152 /00361-3152 Y* 000362 3772 DCA I 0372 /00362-3772 _: 000363 5743 JMP I INIT /00363-5743 /# 000364 7700 SMA CLA /00364-7700 ?@ 000365 0000 AND 0000 /00365-0000 @@ 000366 5337 JMP 0337 /00366-5337 +_ 000367 1400 TAD I 0000 /00367-1400 L@ 000370 1413 TAD I 0013 /00370-1413 LK 000371 7450 SNA /00371-7450 <( 000372 3054 DCA 0054 /00372-3054 X, /DCA 0051 /00373-3051 X) /DJFPAB PAL8-V50X 06-OCT-90 PAGE 1-74 /SPA SNA SZL CLA OSR /00374-7774 ?< /JMP I 0123 /00375-5523 -S /JMP I 0076 /00376-5476 ,> /DCA 0200 /00377-3200 Z@ 000373 3051 000374 7774 000375 5523 000376 5476 000377 3200 0400 PAGE 000400 6102 INTRPT, SPL /00400-6102 1B 000401 7410 SKP /00401-7410 <H 000402 5777 JMP I (INTSPL /00402-5777 /? 000403 3125 DCA AC /00403-3125 YU 000404 6004 GTF /00404-6004 0D 000405 3127 DCA GTFS /00405-3127 YW 000406 7701 MQA CLA /00406-7701 ?A 000407 3126 DCA MQ /00407-3126 YV 000410 7621 MQL CLA /00410-7621 >Q 000411 4440 JMS I 0040 /00411-4440 $ 000412 6041 TSF /00412-6041 0! 000413 7410 SKP /00413-7410 <H 000414 5776 JMP I (INTTSF /00414-5776 /> 000415 6031 KSF /00415-6031 0Y 000416 7410 SKP /00416-7410 <H 000417 5775 JMP I (INTKSF /00417-5775 /= 000420 6557 FPIST /00420-6557 5/ 000421 7410 SKP /00421-7410 <H 000422 5774 JMP I (INTFPI /00422-5774 /< 000423 6007 CAF /00423-6007 0G 000424 1000 TAD 0000 /00424-1000 H@ 000425 3160 DCA INTTEM /00425-3160 Y0 000426 1373 TAD (.-3 /00426-1373 K; 000427 4464 JMS I XX8 /00427-4464 $4 000430 4437 JMS I MSG /00430-4437 $_ 000431 6073 MUNINT /00431-6073 0; 000432 1160 TAD INTTEM /00432-1160 I0 000433 4443 JMS I NUMPRT /00433-4443 $# 000434 4447 JMS I 0047 /00434-4447 $' 000435 7410 SKP /00435-7410 <H 000436 5501 JMP I C200 /00436-5501 -A 000437 4772 JMS I (INIT /00437-4772 ': 000440 5771 JMP I (XRUN /00440-5771 /9 000441 7300 RETRN0, CLA CLL /00441-7300 ;@ 000442 1126 TAD MQ /00442-1126 IV 000443 7421 MQL /00443-7421 <Q 000444 6030 KCF /00444-6030 0X 000445 1127 TAD GTFS /00445-1127 IW 000446 6005 RTF /00446-6005 0E 000447 7200 CLA /00447-7200 :@ 000450 1125 TAD AC /00450-1125 IU 000451 5400 JMP I 0000 /00451-5400 ,@ /DJFPAB PAL8-V50X 06-OCT-90 PAGE 1-75 000452 7300 RETRN1, CLA CLL /00452-7300 ;@ 000453 1131 TAD MQ1 /00453-1131 IY 000454 7421 MQL /00454-7421 <Q 000455 6030 KCF /00455-6030 0X 000456 1132 TAD GTFS1 /00456-1132 IZ 000457 6005 RTF /00457-6005 0E 000460 7200 CLA /00460-7200 :@ 000461 1130 TAD AC1 /00461-1130 IX 000462 5400 JMP I 0000 /00462-5400 ,@ 000463 7300 RETRN2, CLA CLL /00463-7300 ;@ 000464 1134 TAD MQ2 /00464-1134 I\ 000465 7421 MQL /00465-7421 <Q 000466 6030 KCF /00466-6030 0X 000467 1135 TAD GTFS2 /00467-1135 I] 000470 6005 RTF /00470-6005 0E 000471 7200 CLA /00471-7200 :@ 000472 1133 TAD AC2 /00472-1133 I[ 000473 5400 JMP I 0000 /00473-5400 ,@ 000474 7402 SAV2, HLT /00474-7402 <B 000475 7200 CLA /00475-7200 :@ 000476 1125 TAD AC /00476-1125 IU 000477 3133 DCA AC2 /00477-3133 Y[ 000500 1126 TAD MQ /00500-1126 IV 000501 3134 DCA MQ2 /00501-3134 Y\ 000502 1127 TAD GTFS /00502-1127 IW 000503 3135 DCA GTFS2 /00503-3135 Y] 000504 5674 JMP I SAV2 /00504-5674 .< 000505 7402 WAIT, HLT /00505-7402 <B 000506 6001 ION /00506-6001 0A 000507 1152 TAD 0152 /00507-1152 I* 000510 7640 SZA CLA /00510-7640 > 000511 5323 JMP LP2 /00511-5323 +S 000512 7344 CLA CLL CMA RAL /00512-7344 ;$ 000513 7004 LP1, RAL /00513-7004 8D 000514 2330 ISZ SPIN /00514-2330 SX 000515 5314 JMP .-1 /00515-5314 +L 000516 2330 ISZ SPIN /00516-2330 SX 000517 5316 JMP .-1 /00517-5316 +N 000520 2330 ISZ SPIN /00520-2330 SX 000521 5320 JMP .-1 /00521-5320 +P 000522 5313 JMP LP1 /00522-5313 +K 000523 1150 LP2, TAD MPC /00523-1150 I( 000524 7421 MQL /00524-7421 <Q 000525 7200 CLA /00525-7200 :@ 000526 1151 TAD MDB /00526-1151 I) 000527 5325 JMP .-2 /00527-5325 +U 000530 0000 SPIN, AND 0000 /00530-0000 @@ 000531 7402 PRTNUM, HLT /00531-7402 <B 000532 3140 DCA 0140 /00532-3140 Y 000533 1143 TAD MSGSWI /00533-1143 I# 000534 1107 TAD C4000 /00534-1107 IG /DJFPAB PAL8-V50X 06-OCT-90 PAGE 1-76 000535 3143 DCA MSGSWI /00535-3143 Y# 000536 1370 TAD M4 /00536-1370 K8 000537 3362 DCA NUMCNT /00537-3362 [2 000540 1140 TAD 0140 /00540-1140 I 000541 7006 RTL /00541-7006 8F 000542 7004 RAL /00542-7004 8D 000543 3140 DCA 0140 /00543-3140 Y 000544 1140 TAD 0140 /00544-1140 I 000545 7004 RAL /00545-7004 8D 000546 0072 AND C7 /00546-0072 @: 000547 1102 TAD C260 /00547-1102 IB 000550 4445 JMS I CHRPRT /00550-4445 $% 000551 2362 ISZ NUMCNT /00551-2362 S2 000552 5340 JMP 0540 /00552-5340 + 000553 1361 TAD NUMSPC /00553-1361 K1 000554 4445 JMS I CHRPRT /00554-4445 $% 000555 1143 TAD MSGSWI /00555-1143 I# 000556 0106 AND C3777 /00556-0106 AF 000557 3143 DCA MSGSWI /00557-3143 Y# 000560 5731 JMP I PRTNUM /00560-5731 /Y 000561 0240 NUMSPC, 240 /00561-0240 B 000562 0000 NUMCNT, AND 0000 /00562-0000 @@ 000563 2503 ISZ I 0103 /00563-2503 UC 000564 0026 AND 0026 /00564-0026 @V 000565 0562 AND I 0162 /00565-0562 E2 000566 0032 AND 0032 /00566-0032 @Z 000567 0522 AND I 0122 /00567-0522 ER 000570 7774 M4, -4 /00570-7774 ?< /AND 0466 /00571-0266 B6 /AND 0543 /00572-0343 C# /AND I 0023 /00573-0423 DS /TAD I 0400 /00574-1600 N@ /TAD 0000 /00575-1000 H@ /TAD 0430 /00576-1230 JX /ISZ I 0537 /00577-2737 W_ 000571 0266 000572 0343 000573 0423 000574 1600 000575 1000 000576 1230 000577 2737 0600 PAGE 000600 7402 CGET, HLT /00600-7402 <B 000601 7200 CLA /00601-7200 :@ 000602 1325 TAD CM5 /00602-1325 KU 000603 3136 DCA NUMLEN /00603-3136 Y^ 000604 3142 DCA OCTNUM /00604-3142 Y" 000605 2116 ISZ INFLAG /00605-2116 QN 000606 1143 TAD MSGSWI /00606-1143 I# 000607 0105 AND C2000 /00607-0105 AE 000610 7640 SZA CLA /00610-7640 > 000611 5213 JMP 0613 /00611-5213 *K /DJFPAB PAL8-V50X 06-OCT-90 PAGE 1-77 000612 4444 JMS I LOOP /00612-4444 $$ 000613 1143 TAD MSGSWI /00613-1143 I# 000614 0110 AND C5777 /00614-0110 AH 000615 3143 DCA MSGSWI /00615-3143 Y# 000616 1377 TAD (WAIT+1 /00616-1377 K? 000617 3000 DCA 0000 /00617-3000 X@ 000620 4440 JMS I PUSH /00620-4440 $ 000621 3143 DCA MSGSWI /00621-3143 Y# 000622 1124 TAD INPUT /00622-1124 IT 000623 5224 JMP .+1 /00623-5224 *T 000624 1326 CGETY, TAD CM331 /00624-1326 KV 331 Y 000625 7450 SNA /00625-7450 <( 000626 5275 JMP CGY /00626-5275 *= 000627 1330 TAD C13 /00627-1330 KX 316 N 000630 7450 SNA /00630-7450 <( 000631 5300 JMP CGN /00631-5300 +@ 000632 1327 TAD C101 /00632-1327 KW 215 CR 000633 7450 SNA /00633-7450 <( 000634 5310 JMP CGCR /00634-5310 +H 000635 1067 TAD C3 /00635-1067 H7 212 LF 000636 7650 SNA CLA /00636-7650 >( 000637 5313 JMP CGLF /00637-5313 +K 000640 1124 TAD INPUT /00640-1124 IT 000641 1376 TAD (-260 /00641-1376 K> 0 000642 7710 SPA CLA /00642-7710 ?H 000643 5303 JMP CGERR /00643-5303 +C 000644 1124 TAD INPUT /00644-1124 IT 000645 1375 TAD (-270 /00645-1375 K= 8 000646 7700 SMA CLA /00646-7700 ?@ 000647 5303 JMP CGERR /00647-5303 +C 000650 2136 ISZ NUMLEN /00650-2136 Q^ 000651 5260 JMP CGNUM /00651-5260 *0 000652 4774 JMS I (SAV2 /00652-4774 '< 000653 1124 TAD INPUT /00653-1124 IT 000654 4445 JMS I CHRPRT /00654-4445 $% 000655 1103 TAD C277 /00655-1103 IC 000656 4445 JMS I CHRPRT /00656-4445 $% 000657 5316 JMP CGRET1 /00657-5316 +N 000660 1142 CGNUM, TAD OCTNUM /00660-1142 I" 000661 7106 CLL RTL /00661-7106 9F 000662 7004 RAL /00662-7004 8D 000663 3142 DCA OCTNUM /00663-3142 Y" 000664 1124 TAD INPUT /00664-1124 IT 000665 0072 AND C7 /00665-0072 @: 000666 1142 TAD OCTNUM /00666-1142 I" 000667 3142 DCA OCTNUM /00667-3142 Y" 000670 4774 JMS I (SAV2 /00670-4774 '< 000671 1124 TAD INPUT /00671-1124 IT 000672 4445 JMS I CHRPRT /00672-4445 $% 000673 4441 JMS I POP /00673-4441 $! 000674 5773 JMP I (RETRN2 /00674-5773 /; 000675 1124 CGY, TAD INPUT /00675-1124 IT 000676 4445 JMS I CHRPRT /00676-4445 $% 000677 5314 JMP CGRET3 /00677-5314 +L 000700 1124 CGN, TAD INPUT /00700-1124 IT /DJFPAB PAL8-V50X 06-OCT-90 PAGE 1-78 000701 4445 JMS I CHRPRT /00701-4445 $% 000702 5317 JMP CGRET0 /00702-5317 +O 000703 1124 CGERR, TAD INPUT /00703-1124 IT 000704 4445 JMS I CHRPRT /00704-4445 $% 000705 1103 TAD C277 /00705-1103 IC 000706 4445 JMS I CHRPRT /00706-4445 $% 000707 5316 JMP CGRET1 /00707-5316 +N 000710 4437 CGCR, JMS I MSG /00710-4437 $_ 000711 6113 MCRLF /00711-6113 1K 000712 5315 JMP CGRET2 /00712-5315 +M 000713 5317 CGLF, JMP CGRET0 /00713-5317 +O 000714 2200 CGRET3, ISZ CGET /00714-2200 R@ YES 000715 2200 CGRET2, ISZ CGET /00715-2200 R@ RETURN 000716 2200 CGRET1, ISZ CGET /00716-2200 R@ ERROR 000717 4441 CGRET0, JMS I POP /00717-4441 $! NO 000720 3116 DCA INFLAG /00720-3116 YN 000721 4437 JMS I MSG /00721-4437 $_ 000722 6113 MCRLF /00722-6113 1K 000723 6001 ION /00723-6001 0A 000724 5600 JMP I CGET /00724-5600 .@ 000725 7773 CM5, MQA MQL CLA DPIC /00725-7773 ?; 000726 7447 CM331, SWBA /00726-7447 <' 000727 0101 C101, AND C200 /00727-0101 AA 000730 0013 C13, AND 0013 /00730-0013 @K 000731 7402 HLT /00731-7402 <B 000732 7200 CLA /00732-7200 :@ 000733 1143 TAD MSGSWI /00733-1143 I# 000734 0105 AND C2000 /00734-0105 AE 000735 7640 SZA CLA /00735-7640 > 000736 7410 SKP /00736-7410 <H 000737 5731 JMP I 0731 /00737-5731 /Y 000740 1143 TAD MSGSWI /00740-1143 I# 000741 0110 AND C5777 /00741-0110 AH 000742 3143 DCA MSGSWI /00742-3143 Y# 000743 1331 TAD 0731 /00743-1331 KY 000744 3000 DCA 0000 /00744-3000 X@ 000745 4440 JMS I PUSH /00745-4440 $ 000746 5772 JMP I 0772 /00746-5772 /: 000747 7402 X8TST, HLT /00747-7402 <B 000750 3362 DCA 0762 /00750-3362 [2 000751 1022 TAD X8MOD /00751-1022 HR 000752 7700 SMA CLA /00752-7700 ?@ 000753 5747 JMP I 0747 /00753-5747 /' 000754 6002 IOF /00754-6002 0B 000755 7240 CLA CMA /00755-7240 : 000756 1362 TAD 0762 /00756-1362 K2 000757 6272 CIF 70 /00757-6272 2: 000760 5771 JMP I 0771 /00760-5771 /9 000761 7402 HLT /00761-7402 <B 000762 0000 AND 0000 /00762-0000 @@ 000763 0077 AND 0077 /00763-0077 @? 000764 0037 AND MSG /00764-0037 @_ 000765 7477 MQL SAM /00765-7477 <? /DJFPAB PAL8-V50X 06-OCT-90 PAGE 1-79 000766 7540 SMA SZA /00766-7540 = 000767 0777 AND I 0777 /00767-0777 G? 000770 0330 AND 0730 /00770-0330 CX 000771 6520 6520 /00771-6520 5P 000772 1004 TAD 0004 /00772-1004 HD /AND I 0063 /00773-0463 D3 /AND I 0074 /00774-0474 D< /SPA /00775-7510 =H /SMA SNL /00776-7520 =P /AND I 0106 /00777-0506 EF 000773 0463 000774 0474 000775 7510 000776 7520 000777 0506 1000 PAGE 001000 6036 INTKSF, KRB /01000-6036 0^ 001001 0100 AND C177 /01001-0100 A@ 001002 1101 TAD C200 /01002-1101 IA 001003 3124 DCA INPUT /01003-3124 YT 001004 1124 TAD INPUT /01004-1124 IT 001005 1377 TAD (-223 /01005-1377 K? ^S 001006 7450 SNA /01006-7450 <( 001007 5776 JMP I (CTRLS /01007-5776 /> 001010 1375 TAD (2 /01010-1375 K= ^Q 001011 7450 SNA /01011-7450 <( 001012 5332 JMP CTRLQ /01012-5332 +Z 001013 1074 TAD C12 /01013-1074 H< 001014 7450 SNA /01014-7450 <( 001015 5255 JMP CTRLG /01015-5255 *- ^G BELL 001016 1070 TAD C4 /01016-1070 H8 001017 7650 SNA CLA /01017-7650 >( 001020 5250 JMP 1050 /01020-5250 *( ^C 001021 1116 TAD INFLAG /01021-1116 IN 001022 7640 SZA CLA /01022-7640 > 001023 5246 JMP GETOUT /01023-5246 *& 001024 1143 TAD MSGSWI /01024-1143 I# 001025 7640 SZA CLA /01025-7640 > 001026 5240 JMP 1040 /01026-5240 * 001027 4774 JMS I (SAV2 /01027-4774 '< 001030 1124 TAD INPUT /01030-1124 IT 001031 4445 JMS I CHRPRT /01031-4445 $% 001032 1103 TAD C277 /01032-1103 IC 001033 4445 JMS I CHRPRT /01033-4445 $% 001034 4437 JMS I MSG /01034-4437 $_ 001035 6113 MCRLF /01035-6113 1K 001036 4441 JMS I POP /01036-4441 $! 001037 5773 JMP I (RETRN2 /01037-5773 /; 001040 1143 TAD MSGSWI /01040-1143 I# 001041 0110 AND C5777 /01041-0110 AH 001042 1105 TAD C2000 /01042-1105 IE 001043 3143 DCA MSGSWI /01043-3143 Y# 001044 4441 JMS I POP /01044-4441 $! /DJFPAB PAL8-V50X 06-OCT-90 PAGE 1-80 001045 5772 JMP I (RETRN0 /01045-5772 /: 001046 1124 GETOUT, TAD INPUT /01046-1124 IT 001047 5771 JMP I (CGETY /01047-5771 /9 001050 4441 JMS I POP /01050-4441 $! 001051 6203 CIF CDF 0 /01051-6203 2C 001052 6007 CAF /01052-6007 0G 001053 5654 JMP I .+1 /01053-5654 ., 001054 7600 7600 /01054-7600 >@ 001055 1143 CTRLG, TAD MSGSWI /01055-1143 I# 001056 0370 AND (4001 /01056-0370 C8 001057 7640 SZA CLA /01057-7640 > 001060 5323 JMP 1123 /01060-5323 +S 001061 1331 TAD CHRG /01061-1331 KY 001062 3124 DCA INPUT /01062-3124 YT 001063 1121 TAD CTGONC /01063-1121 IQ 001064 7650 SNA CLA /01064-7650 >( 001065 5271 JMP 1071 /01065-5271 *9 001066 6030 KCF /01066-6030 0X 001067 4767 JMS I (CTRLPR /01067-4767 '7 001070 5501 JMP I C200 /01070-5501 -A 001071 2121 ISZ CTGONC /01071-2121 QQ 001072 1125 TAD AC /01072-1125 IU 001073 3130 DCA AC1 /01073-3130 YX 001074 1126 TAD MQ /01074-1126 IV 001075 3131 DCA MQ1 /01075-3131 YY 001076 1127 TAD GTFS /01076-1127 IW 001077 3132 DCA GTFS1 /01077-3132 YZ 001100 4767 JMS I (CTRLPR /01100-4767 '7 001101 4437 JMS I MSG /01101-4437 $_ 001102 6107 MSREQ /01102-6107 1G 001103 4436 JMS I XOPT /01103-4436 $^ 001104 4443 JMS I NUMPRT /01104-4443 $# 001105 4442 JMS I GETC /01105-4442 $" 001106 5501 JMP I C200 /01106-5501 -A NO 001107 5301 JMP 1101 /01107-5301 +A ERROR 001110 7410 SKP /01110-7410 <H RETURN 001111 5301 JMP 1101 /01111-5301 +A YES 001112 1136 TAD NUMLEN /01112-1136 I^ 001113 1070 TAD C4 /01113-1070 H8 001114 7710 SPA CLA /01114-7710 ?H 001115 5320 JMP 1120 /01115-5320 +P 001116 1142 TAD OCTNUM /01116-1142 I" 001117 3020 DCA OPTS /01117-3020 XP 001120 3121 DCA CTGONC /01120-3121 YQ 001121 4441 JMS I POP /01121-4441 $! 001122 5766 JMP I (RETRN1 /01122-5766 /6 001123 1143 TAD MSGSWI /01123-1143 I# 001124 0110 AND C5777 /01124-0110 AH 001125 1105 TAD C2000 /01125-1105 IE 001126 3143 DCA MSGSWI /01126-3143 Y# 001127 4441 JMS I POP /01127-4441 $! 001130 5772 JMP I (RETRN0 /01130-5772 /: 001131 0307 CHRG, "G /01131-0307 CG /DJFPAB PAL8-V50X 06-OCT-90 PAGE 1-81 001132 3117 CTRLQ, DCA QFLAG /01132-3117 YO 001133 1120 TAD 0120 /01133-1120 IP 001134 7640 SZA CLA /01134-7640 > 001135 5340 JMP 1140 /01135-5340 + 001136 4441 JMS I POP /01136-4441 $! 001137 5772 JMP I 1172 /01137-5772 /: 001140 3120 DCA 0120 /01140-3120 YP 001141 6030 KCF /01141-6030 0X 001142 4441 JMS I POP /01142-4441 $! 001143 6001 ION /01143-6001 0A 001144 5765 JMP I 1165 /01144-5765 /5 001145 1040 TAD 0040 /01145-1040 H 001146 7004 RAL /01146-7004 8D 001147 3040 DCA 0040 /01147-3040 X 001150 5741 JMP I 1141 /01150-5741 /! 001151 1154 TAD TSTN /01151-1154 I, 001152 3014 DCA 0014 /01152-3014 XL 001153 1125 TAD AC /01153-1125 IU 001154 3041 DCA 0041 /01154-3041 X! 001155 6211 CDF 10 /01155-6211 2I 001156 3414 DCA I 0014 /01156-3414 \L 001157 2041 ISZ 0041 /01157-2041 P! 001160 5356 JMP 1156 /01160-5356 +. 001161 6203 CIF CDF 0 /01161-6203 2C 001162 5475 JMP I 0075 /01162-5475 ,= 001163 6211 CDF 10 /01163-6211 2I 001164 3441 DCA I 0041 /01164-3441 \! 001165 1205 TAD 1005 /01165-1205 JE /AND I 0052 /01166-0452 D* /TAD I 0074 /01167-1474 L< /JMS 0001 /01170-4001 A /AND I 1024 /01171-0624 FT /AND I 0041 /01172-0441 D! /AND I 0063 /01173-0463 D3 /AND I 0074 /01174-0474 D< /AND 0002 /01175-0002 @B /TAD 1000 /01176-1200 J@ /MQA DCM /01177-7555 =- 001166 0452 001167 1474 001170 4001 001171 0624 001172 0441 001173 0463 001174 0474 001175 0002 001176 1200 001177 7555 1200 PAGE 001200 2117 CTRLS, ISZ QFLAG /01200-2117 QO 001201 4441 JMS I POP /01201-4441 $! 001202 5777 JMP I (RETRN0 /01202-5777 /? /DJFPAB PAL8-V50X 06-OCT-90 PAGE 1-82 001203 7402 PRTCHR, HLT /01203-7402 <B 001204 3241 DCA CHRTEM /01204-3241 Z! 001205 1117 TAD QFLAG /01205-1117 IO 001206 7640 SZA CLA /01206-7640 > 001207 5237 JMP 1237 /01207-5237 *_ 001210 1241 TAD CHRTEM /01210-1241 J! 001211 0376 AND (300 /01211-0376 C> 001212 7640 SZA CLA /01212-7640 > 001213 5223 JMP 1223 /01213-5223 *S 001214 1241 TAD CHRTEM /01214-1241 J! 001215 0375 AND (40 /01215-0375 C= 001216 7650 SNA CLA /01216-7650 >( 001217 1374 TAD (100 /01217-1374 K< 001220 1101 TAD C200 /01220-1101 IA 001221 1241 TAD CHRTEM /01221-1241 J! 001222 3241 DCA CHRTEM /01222-3241 Z! 001223 2143 ISZ MSGSWI /01223-2143 Q# 001224 6001 ION /01224-6001 0A 001225 1241 TAD CHRTEM /01225-1241 J! 001226 6046 TLS /01226-6046 0& 001227 4444 JMS I LOOP /01227-4444 $$ 001230 4441 INTTSF, JMS I POP /01230-4441 $! 001231 6042 TCF /01231-6042 0" 001232 1143 TAD MSGSWI /01232-1143 I# 001233 0373 AND (7776 /01233-0373 C; 001234 3143 DCA MSGSWI /01234-3143 Y# 001235 6001 ION /01235-6001 0A 001236 5603 JMP I PRTCHR /01236-5603 .C 001237 2120 ISZ 0120 /01237-2120 QP 001240 4444 JMS I LOOP /01240-4444 $$ 001241 0000 CHRTEM, AND 0000 /01241-0000 @@ 001242 7402 MESG, HLT /01242-7402 <B 001243 7200 CLA /01243-7200 :@ 001244 1143 TAD MSGSWI /01244-1143 I# 001245 1107 TAD C4000 /01245-1107 IG 001246 3143 DCA MSGSWI /01246-3143 Y# 001247 1642 TAD I MESG /01247-1642 N" 001250 3317 DCA MSGADR /01250-3317 [O 001251 2242 ISZ MESG /01251-2242 R" 001252 6211 CDF 10 /01252-6211 2I 001253 1717 TAD I MSGADR /01253-1717 OO 001254 6201 CDF 0 /01254-6201 2A 001255 3320 DCA MSGWRD /01255-3320 [P 001256 1320 TAD MSGWRD /01256-1320 KP 001257 0111 AND C7700 /01257-0111 AI 001260 7002 BSW /01260-7002 8B 001261 4271 JMS MESDEC /01261-4271 "9 001262 4445 JMS I CHRPRT /01262-4445 $% 001263 1320 TAD MSGWRD /01263-1320 KP 001264 0077 AND C77 /01264-0077 @? 001265 4271 JMS MESDEC /01265-4271 "9 001266 4445 JMS I CHRPRT /01266-4445 $% 001267 2317 ISZ MSGADR /01267-2317 SO /DJFPAB PAL8-V50X 06-OCT-90 PAGE 1-83 001270 5252 JMP 1252 /01270-5252 ** 001271 7402 MESDEC, HLT /01271-7402 <B 001272 7450 SNA /01272-7450 <( 001273 5312 JMP MESEND /01273-5312 +J 001274 1372 TAD (-37 /01274-1372 K: 001275 7440 SZA /01275-7440 < 001276 5302 JMP .+4 /01276-5302 +B 001277 7200 CLA /01277-7200 :@ 001300 1371 TAD (215 /01300-1371 K9 001301 5671 JMP I MESDEC /01301-5671 .9 001302 1066 TAD C1 /01302-1066 H6 001303 7440 SZA /01303-7440 < 001304 5310 JMP .+4 /01304-5310 +H 001305 7200 CLA /01305-7200 :@ 001306 1370 TAD (212 /01306-1370 K8 001307 5671 JMP I MESDEC /01307-5671 .9 001310 1321 TAD MSG36 /01310-1321 KQ 001311 5671 JMP I MESDEC /01311-5671 .9 001312 1143 MESEND, TAD MSGSWI /01312-1143 I# 001313 0106 AND C3777 /01313-0106 AF 001314 3143 DCA MSGSWI /01314-3143 Y# 001315 6001 ION /01315-6001 0A 001316 5642 JMP I MESG /01316-5642 ." 001317 0000 MSGADR, AND 0000 /01317-0000 @@ 001320 0000 MSGWRD, AND 0000 /01320-0000 @@ 001321 0036 MSG36, 36 /01321-0036 @^ 001322 7402 HLT /01322-7402 <B 001323 4436 JMS I XOPT /01323-4436 $^ 001324 7710 SPA CLA /01324-7710 ?H 001325 5333 JMP 1333 /01325-5333 +[ 001326 1367 TAD 1367 /01326-1367 K7 001327 3000 DCA 0000 /01327-3000 X@ 001330 3135 DCA GTFS2 /01330-3135 Y] 001331 4440 JMS I PUSH /01331-4440 $ 001332 5766 JMP I 1366 /01332-5766 /6 001333 4436 JMS I XOPT /01333-4436 $^ 001334 7004 RAL /01334-7004 8D 001335 7700 SMA CLA /01335-7700 ?@ 001336 7410 SKP /01336-7410 <H 001337 2322 ISZ 1322 /01337-2322 SR 001340 3152 DCA 0152 /01340-3152 Y* 001341 4446 JMS I 0046 /01341-4446 $& 001342 5722 JMP I 1322 /01342-5722 /R 001343 7402 MSGSTS, HLT /01343-7402 <B 001344 4437 JMS I MSG /01344-4437 $_ 001345 6346 MSTAT /01345-6346 3& 001346 1147 TAD STATUS /01346-1147 I' 001347 4443 JMS I NUMPRT /01347-4443 $# 001350 4437 JMS I MSG /01350-4437 $_ 001351 6357 MTEST /01351-6357 3/ 001352 1122 TAD TSTNUM /01352-1122 IR /DJFPAB PAL8-V50X 06-OCT-90 PAGE 1-84 001353 4443 JMS I NUMPRT /01353-4443 $# 001354 4437 JMS I MSG /01354-4437 $_ 001355 6353 MSTEP /01355-6353 3+ 001356 1145 TAD CNTSTP /01356-1145 I% 001357 4443 JMS I NUMPRT /01357-4443 $# 001360 4437 JMS I MSG /01360-4437 $_ 001361 6113 MCRLF /01361-6113 1K 001362 5743 JMP I MSGSTS /01362-5743 /# 001363 4551 JMS I 0151 /01363-4551 %) 001364 1063 TAD ROMVER /01364-1063 H3 001365 3375 DCA 1375 /01365-3375 [= 001366 1055 TAD 0055 /01366-1055 H- 001367 1333 TAD 1333 /01367-1333 K[ /AND 1212 /01370-0212 BJ /AND 1215 /01371-0215 BM /MQA CLA SCA /01372-7741 ?! /7776 /01373-7776 ?> /AND 0100 /01374-0100 A@ /AND 0040 /01375-0040 @ /AND 1300 /01376-0300 C@ /AND I 0041 /01377-0441 D! 001370 0212 001371 0215 001372 7741 001373 7776 001374 0100 001375 0040 001376 0300 001377 0441 1400 PAGE 001400 7402 PSHRTE, HLT /01400-7402 <B 001401 4252 JMS STKCHK /01401-4252 "* 001402 5222 JMP PSHR /01402-5222 *R 001403 1000 TAD 0000 /01403-1000 H@ 001404 3410 DCA I STACK /01404-3410 \H 001405 5600 JMP I PSHRTE /01405-5600 .@ 001406 7402 POPRTE, HLT /01406-7402 <B 001407 7240 CLA CMA /01407-7240 : 001410 1010 TAD STACK /01410-1010 HH 001411 3010 DCA STACK /01411-3010 XH 001412 4252 JMS STKCHK /01412-4252 "* 001413 5232 JMP POPR /01413-5232 *Z 001414 1410 TAD I STACK /01414-1410 LH 001415 3000 DCA 0000 /01415-3000 X@ 001416 7240 CLA CMA /01416-7240 : 001417 1010 TAD STACK /01417-1010 HH 001420 3010 DCA STACK /01420-3010 XH 001421 5606 JMP I POPRTE /01421-5606 .F 001422 1200 PSHR, TAD PSHRTE /01422-1200 J@ 001423 3251 DCA PTEMP /01423-3251 Z) 001424 1076 TAD C23 /01424-1076 H> /DJFPAB PAL8-V50X 06-OCT-90 PAGE 1-85 001425 3010 DCA STACK /01425-3010 XH 001426 3143 DCA MSGSWI /01426-3143 Y# 001427 4437 JMS I MSG /01427-4437 $_ 001430 6170 PSHERR /01430-6170 18 001431 5241 JMP PSPR /01431-5241 *! 001432 1206 POPR, TAD POPRTE /01432-1206 JF 001433 3251 DCA PTEMP /01433-3251 Z) 001434 1076 TAD C23 /01434-1076 H> 001435 3010 DCA STACK /01435-3010 XH 001436 3143 DCA 0143 /01436-3143 Y# 001437 4437 JMS I MSG /01437-4437 $_ 001440 6210 POPERR /01440-6210 2H 001441 1251 PSPR, TAD PTEMP /01441-1251 J) 001442 4443 JMS I NUMPRT /01442-4443 $# 001443 1250 TAD STEMP /01443-1250 J( 001444 4443 JMS I NUMPRT /01444-4443 $# 001445 1160 TAD INTTEM /01445-1160 I0 001446 4443 JMS I NUMPRT /01446-4443 $# 001447 5501 JMP I C200 /01447-5501 -A 001450 0000 STEMP, AND 0000 /01450-0000 @@ 001451 0000 PTEMP, AND 0000 /01451-0000 @@ 001452 7402 STKCHK, HLT /01452-7402 <B 001453 7200 CLA /01453-7200 :@ 001454 1010 TAD STACK /01454-1010 HH 001455 1112 TAD CM23 /01455-1112 IJ 001456 7510 SPA /01456-7510 =H 001457 5265 JMP STKCHR /01457-5265 *5 001460 1114 TAD CM12 /01460-1114 IL 001461 7700 SMA CLA /01461-7700 ?@ 001462 5265 JMP STKCHR /01462-5265 *5 001463 2252 ISZ STKCHK /01463-2252 R* 001464 5652 JMP I STKCHK /01464-5652 .* 001465 1252 STKCHR, TAD STKCHK /01465-1252 J* 001466 4464 JMS I XX8 /01466-4464 $4 001467 1010 TAD STACK /01467-1010 HH 001470 3250 DCA STEMP /01470-3250 Z( 001471 1000 TAD 0000 /01471-1000 H@ 001472 3160 DCA INTTEM /01472-3160 Y0 001473 5652 JMP I STKCHK /01473-5652 .* 001474 7402 CTRLPR, HLT /01474-7402 <B 001475 4437 JMS I MSG /01475-4437 $_ 001476 6113 MCRLF /01476-6113 1K 001477 1304 TAD .+5 /01477-1304 KD 001500 4445 JMS I CHRPRT /01500-4445 $% 001501 1124 TAD INPUT /01501-1124 IT 001502 4445 JMS I CHRPRT /01502-4445 $% 001503 5674 JMP I CTRLPR /01503-5674 .< 001504 0336 "^ /01504-0336 C^ 001505 7402 OPTRED, HLT /01505-7402 <B 001506 7200 CLA /01506-7200 :@ 001507 6214 RDF /01507-6214 2L /DJFPAB PAL8-V50X 06-OCT-90 PAGE 1-86 001510 1161 TAD CIFCDF /01510-1161 I1 001511 3321 DCA 1521 /01511-3321 [Q 001512 6201 CDF 0 /01512-6201 2A 001513 1021 TAD 0021 /01513-1021 HQ 001514 7700 SMA CLA /01514-7700 ?@ 001515 5320 JMP 1520 /01515-5320 +P 001516 7604 CLA OSR /01516-7604 >D 001517 3020 DCA OPTS /01517-3020 XP 001520 1020 TAD OPTS /01520-1020 HP 001521 7402 HLT /01521-7402 <B 001522 5705 JMP I OPTRED /01522-5705 /E 001523 7402 APTPRE, HLT /01523-7402 <B 001524 7300 CLA CLL /01524-7300 ;@ 001525 6214 RDF /01525-6214 2L 001526 1161 TAD CIFCDF /01526-1161 I1 001527 3364 DCA APTPEX /01527-3364 [4 001530 6201 CDF 0 /01530-6201 2A 001531 1377 TAD (APT-1 /01531-1377 K? 001532 3011 DCA 0011 /01532-3011 XI 001533 3411 DCA I 0011 /01533-3411 \I FPCF: FIELD BITS 001534 1376 TAD (FPCA3 /01534-1376 K> 001535 3411 DCA I 0011 /01535-3411 \I FPCADR 001536 1375 TAD (INDEX /01536-1375 K= 001537 3411 DCA I 0011 /01537-3411 \I INDEX 001540 1374 TAD (BASEP /01540-1374 K< 001541 3411 DCA I 0011 /01541-3411 \I BASE 001542 3411 DCA I 0011 /01542-3411 \I OPER 001543 7201 CLA IAC /01543-7201 :A 001544 3411 DCA I 0011 /01544-3411 \I EXP 001545 7326 CLA CLL CML RTL /01545-7326 ;V 001546 3411 DCA I 0011 /01546-3411 \I 2 001547 7325 CLA CLL CML IAC RAL /01547-7325 ;U 001550 3411 DCA I 0011 /01550-3411 \I 3 001551 7307 CLA CLL IAC RTL /01551-7307 ;G 001552 3411 DCA I 0011 /01552-3411 \I 4 001553 1071 TAD C5 /01553-1071 H9 001554 3411 DCA I 0011 /01554-3411 \I 5 001555 7327 CLA CLL CML IAC RTL /01555-7327 ;W 001556 3411 DCA I 0011 /01556-3411 \I 6 001557 1373 TAD (-10 /01557-1373 K; 001560 3137 DCA CNT /01560-3137 Y_ 001561 3411 DCA I 0011 /01561-3411 \I CLEAR INDEXES 001562 2137 ISZ CNT /01562-2137 Q_ 001563 5361 JMP .-2 /01563-5361 +1 001564 7402 APTPEX, HLT /01564-7402 <B 001565 5723 JMP I APTPRE /01565-5723 /S 001566 5754 JMP I 1554 /01566-5754 /, 001567 4500 JMS I 0100 /01567-4500 %@ 001570 2301 ISZ 1501 /01570-2301 SA 001571 2605 ISZ I 1405 /01571-2605 VE 001572 4005 JMS 0005 /01572-4005 E /SPA SNA SZL CLA /01573-7770 ?8 /CLA CML IAC BSW /01574-7223 :S /DJFPAB PAL8-V50X 06-OCT-90 PAGE 1-87 /CLA IAC RTR /01575-7213 :K /DCA I 1546 /01576-3746 _& /7177 /01577-7177 9? 001573 7770 001574 7223 001575 7213 001576 3746 001577 7177 1600 PAGE 001600 3147 INTFPI, DCA STATUS /01600-3147 Y' 001601 1127 TAD GTFS /01601-1127 IW 001602 3233 DCA 1633 /01602-3233 Z[ 001603 1156 TAD CODE /01603-1156 I. 001604 7640 SZA CLA /01604-7640 > 001605 5227 JMP 1627 /01605-5227 *W 001606 1200 TAD 1600 /01606-1200 J@ 001607 4464 JMS I XX8 /01607-4464 $4 001610 4436 JMS I XOPT /01610-4436 $^ 001611 0104 AND C1000 /01611-0104 AD 001612 7640 SZA CLA /01612-7640 > 001613 5227 JMP 1627 /01613-5227 *W 001614 4437 JMS I MSG /01614-4437 $_ 001615 6614 MUNEXI /01615-6614 6L 001616 1000 TAD 0000 /01616-1000 H@ 001617 4443 JMS I NUMPRT /01617-4443 $# 001620 4437 JMS I MSG /01620-4437 $_ 001621 6560 MBADM0 /01621-6560 50 001622 4437 JMS I MSG /01622-4437 $_ 001623 6113 MCRLF /01623-6113 1K 001624 4450 JMS I STSMSG /01624-4450 $( 001625 4447 JMS I 0047 /01625-4447 $' 001626 7000 NOP /01626-7000 8@ 001627 4441 JMS I POP /01627-4441 $! 001630 1233 TAD 1633 /01630-1233 J[ 001631 6005 RTF /01631-6005 0E 001632 5556 JMP I CODE /01632-5556 -. 001633 0000 AND 0000 /01633-0000 @@ 001634 7402 PRSKFG, HLT /01634-7402 <B 001635 7200 CLA /01635-7200 :@ 001636 6214 RDF /01636-6214 2L 001637 1161 TAD CIFCDF /01637-1161 I1 001640 3267 DCA 1667 /01640-3267 Z7 001641 6201 CDF 0 /01641-6201 2A 001642 1234 TAD PRSKFG /01642-1234 J\505/5 001643 4464 JMS I XX8 /01643-4464 $4 001644 6556 FPRST /01644-6556 5. 001645 3147 DCA STATUS /01645-3147 Y' 001646 4436 JMS I XOPT /01646-4436 $^ 001647 0104 AND C1000 /01647-0104 AD 001650 7640 SZA CLA /01650-7640 > 001651 5264 JMP 1664 /01651-5264 *4 001652 4437 JMS I MSG /01652-4437 $_ 001653 6247 MSKPFG /01653-6247 2' /DJFPAB PAL8-V50X 06-OCT-90 PAGE 1-88 001654 7240 CLA CMA /01654-7240 : 001655 1234 TAD PRSKFG /01655-1234 J\ 001656 4443 JMS I NUMPRT /01656-4443 $# 001657 4437 JMS I MSG /01657-4437 $_ 001660 6560 MBADM0 /01660-6560 50 001661 4437 JMS I MSG /01661-4437 $_ 001662 6113 MCRLF /01662-6113 1K 001663 4450 JMS I STSMSG /01663-4450 $( 001664 2152 ISZ 0152 /01664-2152 Q* 001665 4447 JMS I 0047 /01665-4447 $' 001666 2234 ISZ PRSKFG /01666-2234 R\ 001667 7402 HLT /01667-7402 <B 001670 5634 JMP I PRSKFG /01670-5634 .\ 001671 7402 STATCK, HLT /01671-7402 <B 001672 7200 CLA /01672-7200 :@ 001673 6214 RDF /01673-6214 2L 001674 1161 TAD CIFCDF /01674-1161 I1 001675 3342 DCA ERRFLD /01675-3342 [" 001676 1671 TAD I STATCK /01676-1671 N9 001677 6201 CDF 0 /01677-6201 2A 001700 3344 DCA ERRTEM /01700-3344 [$ 001701 1344 TAD ERRTEM /01701-1344 K$ 001702 7041 CMA IAC /01702-7041 8! 001703 1147 TAD STATUS /01703-1147 I' 001704 7640 SZA CLA /01704-7640 > 001705 5310 JMP 1710 /01705-5310 +H 001706 2271 ISZ STATCK /01706-2271 R9 001707 5341 JMP 1741 /01707-5341 +! 001710 1271 TAD STATCK /01710-1271 J9 001711 4464 JMS I XX8 /01711-4464 $4 001712 4436 JMS I XOPT /01712-4436 $^ 001713 0104 AND C1000 /01713-0104 AD 001714 7650 SNA CLA /01714-7650 >( 001715 5320 JMP 1720 /01715-5320 +P 001716 2271 ISZ STATCK /01716-2271 R9 001717 5337 JMP 1737 /01717-5337 +_ 001720 4437 JMS I MSG /01720-4437 $_ 001721 6230 MSTAER /01721-6230 2X 001722 7240 CLA CMA /01722-7240 : 001723 1271 TAD STATCK /01723-1271 J9 001724 4443 JMS I NUMPRT /01724-4443 $# 001725 4437 JMS I MSG /01725-4437 $_ 001726 6332 MACTUA /01726-6332 3Z 001727 1147 TAD STATUS /01727-1147 I' 001730 4443 JMS I NUMPRT /01730-4443 $# 001731 4437 JMS I MSG /01731-4437 $_ 001732 6340 MEXPEC /01732-6340 3 001733 1344 TAD 1744 /01733-1344 K$ 001734 4443 JMS I NUMPRT /01734-4443 $# 001735 4450 JMS I STSMSG /01735-4450 $( 001736 2271 ISZ STATCK /01736-2271 R9 001737 2152 ISZ 0152 /01737-2152 Q* 001740 4447 JMS I 0047 /01740-4447 $' 001741 2271 ISZ STATCK /01741-2271 R9 /DJFPAB PAL8-V50X 06-OCT-90 PAGE 1-89 001742 7402 ERRFLD, HLT /01742-7402 <B 001743 5671 JMP I STATCK /01743-5671 .9 001744 0000 ERRTEM, AND 0000 /01744-0000 @@ 001745 7402 VERMSG, HLT /01745-7402 <B 001746 1144 TAD ONCONL /01746-1144 I$ 001747 7640 SZA CLA /01747-7640 > 001750 5745 JMP I VERMSG /01750-5745 /% 001751 1151 TAD MDB /01751-1151 I) 001752 4463 JMS I ROMVER /01752-4463 $3 001753 1374 TAD VER /01753-1374 K< 001754 3374 DCA VER /01754-3374 [< 001755 4437 JMS I MSG /01755-4437 $_ 001756 6407 MMCREV /01756-6407 4G 001757 1374 TAD VER /01757-1374 K< 001760 7002 BSW /01760-7002 8B 001761 0077 AND C77 /01761-0077 @? 001762 1102 TAD C260 /01762-1102 IB 001763 4445 JMS I CHRPRT /01763-4445 $% 001764 1374 TAD VER /01764-1374 K< 001765 0077 AND C77 /01765-0077 @? 001766 1102 TAD C260 /01766-1102 IB 001767 4445 JMS I CHRPRT /01767-4445 $% 001770 4437 JMS I MSG /01770-4437 $_ 001771 6113 MCRLF /01771-6113 1K 001772 2144 ISZ ONCONL /01772-2144 Q$ 001773 5745 JMP I VERMSG /01773-5745 /% 001774 0000 VER, 0000 /01774-0000 @@ 001775 7110 CLL RAR /01775-7110 9H 001776 5765 JMP I 1765 /01776-5765 /5 001777 0037 AND MSG /01777-0037 @_ 2000 PAGE 002000 7402 VERMS0, HLT /02000-7402 <B 002001 1144 TAD ONCONL /02001-1144 I$ 002002 7640 SZA CLA /02002-7640 > 002003 5600 JMP I VERMS0 /02003-5600 .@ 002004 1151 TAD MDB /02004-1151 I) 002005 4463 JMS I ROMVER /02005-4463 $3 002006 7002 BSW /02006-7002 8B 002007 3777 DCA I (VER /02007-3777 _? 002010 5600 JMP I VERMS0 /02010-5600 .@ 002011 7402 REGSRD, HLT /02011-7402 <B 002012 6563 FMRB /02012-6563 53 002013 3151 DCA MDB /02013-3151 Y) 002014 6564 FMRP /02014-6564 54 002015 3150 DCA MPC /02015-3150 Y( 002016 6556 FPRST /02016-6556 5. 002017 3147 DCA STATUS /02017-3147 Y' 002020 3300 DCA RRFMDB /02020-3300 [@ 002021 3277 DCA RRFMPC /02021-3277 Z? 002022 1145 TAD CNTSTP /02022-1145 I% /DJFPAB PAL8-V50X 06-OCT-90 PAGE 1-90 002023 7104 CLL RAL /02023-7104 9D 002024 1157 TAD MCODE /02024-1157 I/ 002025 3301 DCA RRIND /02025-3301 [A 002026 6211 CDF 10 /02026-6211 2I 002027 1701 TAD I RRIND /02027-1701 OA 002030 3275 DCA RRMPC /02030-3275 Z= 002031 2301 ISZ RRIND /02031-2301 SA 002032 1701 TAD I RRIND /02032-1701 OA 002033 3276 DCA RRMDB /02033-3276 Z> 002034 6201 CDF 0 /02034-6201 2A 002035 1611 TAD I REGSRD /02035-1611 NI 002036 7650 SNA CLA /02036-7650 >( 002037 5253 JMP 2053 /02037-5253 *+ 002040 1275 TAD RRMPC /02040-1275 J= 002041 7041 CMA IAC /02041-7041 8! 002042 1150 TAD MPC /02042-1150 I( 002043 7640 SZA CLA /02043-7640 > 002044 2277 ISZ RRFMPC /02044-2277 R? 002045 1276 TAD RRMDB /02045-1276 J> 002046 7041 CMA IAC /02046-7041 8! 002047 1151 TAD MDB /02047-1151 I) 002050 7640 SZA CLA /02050-7640 > 002051 2300 ISZ RRFMDB /02051-2300 S@ 002052 5256 JMP 2056 /02052-5256 *. 002053 2277 ISZ RRFMPC /02053-2277 R? 002054 2300 ISZ RRFMDB /02054-2300 S@ 002055 5256 JMP 2056 /02055-5256 *. 002056 1277 TAD RRFMPC /02056-1277 J? 002057 7650 SNA CLA /02057-7650 >( 002060 5263 JMP 2063 /02060-5263 *3 002061 4302 JMS ERRMPC /02061-4302 #B 002062 5273 JMP 2073 /02062-5273 *; 002063 1300 TAD RRFMDB /02063-1300 K@ 002064 7650 SNA CLA /02064-7650 >( 002065 5270 JMP 2070 /02065-5270 *8 002066 4335 JMS ERRMDB /02066-4335 #] 002067 5273 JMP 2073 /02067-5273 *; 002070 2211 ISZ REGSRD /02070-2211 RI 002071 2211 ISZ REGSRD /02071-2211 RI 002072 5611 JMP I REGSRD /02072-5611 .I 002073 2211 ISZ REGSRD /02073-2211 RI 002074 5611 JMP I REGSRD /02074-5611 .I 002075 0000 RRMPC, AND 0000 /02075-0000 @@ 002076 0000 RRMDB, AND 0000 /02076-0000 @@ 002077 0000 RRFMPC, AND 0000 /02077-0000 @@ 002100 0000 RRFMDB, AND 0000 /02100-0000 @@ 002101 0000 RRIND, AND 0000 /02101-0000 @@ 002102 7402 ERRMPC, HLT /02102-7402 <B 002103 1211 TAD REGSRD /02103-1211 JI 002104 4464 JMS I XX8 /02104-4464 $4 002105 4436 JMS I XOPT /02105-4436 $^ 002106 0104 AND C1000 /02106-0104 AD 002107 7640 SZA CLA /02107-7640 > 002110 5331 JMP 2131 /02110-5331 +Y /DJFPAB PAL8-V50X 06-OCT-90 PAGE 1-91 002111 4437 JMS I MSG /02111-4437 $_ 002112 6266 MPCERR /02112-6266 26 002113 7240 CLA CMA /02113-7240 : 002114 1211 TAD REGSRD /02114-1211 JI 002115 4443 JMS I NUMPRT /02115-4443 $# 002116 4437 JMS I MSG /02116-4437 $_ 002117 6560 MBADM0 /02117-6560 50 002120 4437 JMS I MSG /02120-4437 $_ 002121 6332 MACTUA /02121-6332 3Z 002122 1150 TAD MPC /02122-1150 I( 002123 4443 JMS I NUMPRT /02123-4443 $# 002124 4437 JMS I MSG /02124-4437 $_ 002125 6340 MEXPEC /02125-6340 3 002126 1275 TAD RRMPC /02126-1275 J= 002127 4443 JMS I NUMPRT /02127-4443 $# 002130 4450 JMS I STSMSG /02130-4450 $( 002131 2152 ISZ 0152 /02131-2152 Q* 002132 4447 JMS I 0047 /02132-4447 $' 002133 2302 ISZ ERRMPC /02133-2302 SB 002134 5702 JMP I ERRMPC /02134-5702 /B 002135 7402 ERRMDB, HLT /02135-7402 <B 002136 1211 TAD 2011 /02136-1211 JI 002137 4464 JMS I XX8 /02137-4464 $4 002140 4436 JMS I XOPT /02140-4436 $^ 002141 0104 AND C1000 /02141-0104 AD 002142 7640 SZA CLA /02142-7640 > 002143 5364 JMP 2164 /02143-5364 +4 002144 4437 JMS I MSG /02144-4437 $_ 002145 6305 MDBERR /02145-6305 3E 002146 7240 CLA CMA /02146-7240 : 002147 1211 TAD 2011 /02147-1211 JI 002150 4443 JMS I NUMPRT /02150-4443 $# 002151 4437 JMS I MSG /02151-4437 $_ 002152 6576 MBADM1 /02152-6576 5> 002153 4437 JMS I MSG /02153-4437 $_ 002154 6332 MACTUA /02154-6332 3Z 002155 1151 TAD MDB /02155-1151 I) 002156 4443 JMS I NUMPRT /02156-4443 $# 002157 4437 JMS I MSG /02157-4437 $_ 002160 6340 MEXPEC /02160-6340 3 002161 1276 TAD RRMDB /02161-1276 J> 002162 4443 JMS I NUMPRT /02162-4443 $# 002163 4450 JMS I STSMSG /02163-4450 $( 002164 2152 ISZ 0152 /02164-2152 Q* 002165 4447 JMS I 0047 /02165-4447 $' 002166 2335 ISZ ERRMDB /02166-2335 S] 002167 5735 JMP I ERRMDB /02167-5735 /] 002170 1375 TAD 2175 /02170-1375 K= 002171 3060 DCA 0060 /02171-3060 X0 002172 5774 JMP I 2174 /02172-5774 /< 002173 2752 ISZ I 2152 /02173-2752 W* 002174 2200 ISZ 2000 /02174-2200 R@ 002175 3600 DCA I 2000 /02175-3600 ^@ /DJFPAB PAL8-V50X 06-OCT-90 PAGE 1-92 002176 2052 ISZ 0052 /02176-2052 P* /TAD I 2174 /02177-1774 O< 002177 1774 2200 PAGE 002200 7402 BADAC, HLT /02200-7402 <B 002201 3140 DCA 0140 /02201-3140 Y 002202 1200 TAD BADAC /02202-1200 J@ 002203 4464 JMS I XX8 /02203-4464 $4 002204 4436 JMS I XOPT /02204-4436 $^ 002205 0104 AND C1000 /02205-0104 AD 002206 7640 SZA CLA /02206-7640 > 002207 5226 JMP 2226 /02207-5226 *V 002210 4437 JMS I MSG /02210-4437 $_ 002211 6113 MCRLF /02211-6113 1K 002212 1140 TAD 0140 /02212-1140 I 002213 4443 JMS I NUMPRT /02213-4443 $# 002214 4437 JMS I MSG /02214-4437 $_ 002215 6370 MINCOR /02215-6370 38 002216 7240 CLA CMA /02216-7240 : 002217 1200 TAD BADAC /02217-1200 J@ 002220 4443 JMS I NUMPRT /02220-4443 $# 002221 4437 JMS I MSG /02221-4437 $_ 002222 6576 MBADM1 /02222-6576 5> 002223 4437 JMS I MSG /02223-4437 $_ 002224 6113 MCRLF /02224-6113 1K 002225 4450 JMS I STSMSG /02225-4450 $( 002226 4447 JMS I 0047 /02226-4447 $' 002227 2200 ISZ BADAC /02227-2200 R@ 002230 5600 JMP I BADAC /02230-5600 .@ 002231 7402 ERRBRK, HLT /02231-7402 <B 002232 7421 MQL /02232-7421 <Q 002233 6214 RDF /02233-6214 2L 002234 6201 CDF 0 /02234-6201 2A 002235 1161 TAD CIFCDF /02235-1161 I1 002236 3307 DCA 2307 /02236-3307 [G 002237 7344 CLA CLL CMA RAL /02237-7344 ;$ 002240 1307 TAD 2307 /02240-1307 KG 002241 3265 DCA 2265 /02241-3265 Z5 002242 1265 TAD 2265 /02242-1265 J5 002243 3273 DCA 2273 /02243-3273 Z; 002244 7521 MQA MQL /02244-7521 =Q 002245 3311 DCA 2311 /02245-3311 [I 002246 1231 TAD ERRBRK /02246-1231 JY 002247 4464 JMS I XX8 /02247-4464 $4 002250 4436 JMS I XOPT /02250-4436 $^ 002251 0104 AND C1000 /02251-0104 AD 002252 7640 SZA CLA /02252-7640 > 002253 5304 JMP 2304 /02253-5304 +D 002254 4437 JMS I MSG /02254-4437 $_ 002255 6533 MDATBR /02255-6533 5[ 002256 7240 CLA CMA /02256-7240 : 002257 1231 TAD ERRBRK /02257-1231 JY 002260 4443 JMS I NUMPRT /02260-4443 $# /DJFPAB PAL8-V50X 06-OCT-90 PAGE 1-93 002261 4437 JMS I MSG /02261-4437 $_ 002262 6113 MCRLF /02262-6113 1K 002263 4437 JMS I MSG /02263-4437 $_ 002264 6332 MACTUA /02264-6332 3Z 002265 7402 HLT /02265-7402 <B 002266 1711 TAD I 2311 /02266-1711 OI 002267 6201 CDF 0 /02267-6201 2A 002270 4443 JMS I NUMPRT /02270-4443 $# 002271 4437 JMS I MSG /02271-4437 $_ 002272 6340 MEXPEC /02272-6340 3 002273 7402 HLT /02273-7402 <B 002274 1631 TAD I ERRBRK /02274-1631 NY 002275 6201 CDF 0 /02275-6201 2A 002276 4443 JMS I NUMPRT /02276-4443 $# 002277 4437 JMS I MSG /02277-4437 $_ 002300 6363 MADDRS /02300-6363 33 002301 1311 TAD 2311 /02301-1311 KI 002302 4443 JMS I NUMPRT /02302-4443 $# 002303 4450 JMS I STSMSG /02303-4450 $( 002304 4447 JMS I 0047 /02304-4447 $' 002305 2231 ISZ ERRBRK /02305-2231 RY 002306 2231 ISZ ERRBRK /02306-2231 RY 002307 7402 HLT /02307-7402 <B 002310 5631 JMP I ERRBRK /02310-5631 .Y 002311 0000 AND 0000 /02311-0000 @@ 002312 7402 ORTAB, HLT /02312-7402 <B 002313 4436 JMS I XOPT /02313-4436 $^ 002314 0100 AND C177 /02314-0100 A@ 002315 7041 CMA IAC /02315-7041 8! 002316 1145 TAD CNTSTP /02316-1145 I% 002317 1066 TAD C1 /02317-1066 H6 002320 7440 SZA /02320-7440 < 002321 5337 JMP 2337 /02321-5337 +_ 002322 6002 IOF /02322-6002 0B 002323 6554 FPHLT /02323-6554 5, 002324 6565 FMDO /02324-6565 55 002325 7000 NOP /02325-7000 8@ 002326 6565 FMDO /02326-6565 55 002327 6565 FMDO /02327-6565 55 002330 6565 FMDO /02330-6565 55 002331 6565 FMDO /02331-6565 55 002332 6565 FMDO /02332-6565 55 002333 6552 FPICL /02333-6552 5* 002334 7000 NOP /02334-7000 8@ 002335 6001 ION /02335-6001 0A 002336 5712 JMP I ORTAB /02336-5712 /J 002337 7710 SPA CLA /02337-7710 ?H 002340 5342 JMP 2342 /02340-5342 +" 002341 5343 JMP 2343 /02341-5343 +# 002342 2312 ISZ ORTAB /02342-2312 SJ 002343 5712 JMP I ORTAB /02343-5712 /J 002344 7402 RUNNO, HLT /02344-7402 <B 002345 7200 CLA /02345-7200 :@ /DJFPAB PAL8-V50X 06-OCT-90 PAGE 1-94 002346 1344 TAD RUNNO /02346-1344 K$ 002347 4464 JMS I XX8 /02347-4464 $4 002350 6556 FPRST /02350-6556 5. 002351 3147 DCA STATUS /02351-3147 Y' 002352 4437 JMS I MSG /02352-4437 $_ 002353 6516 MNORUN /02353-6516 5N 002354 7240 CLA CMA /02354-7240 : 002355 1344 TAD RUNNO /02355-1344 K$ 002356 4443 JMS I NUMPRT /02356-4443 $# 002357 4437 JMS I MSG /02357-4437 $_ 002360 6113 MCRLF /02360-6113 1K 002361 4450 JMS I STSMSG /02361-4450 $( 002362 5501 JMP I C200 /02362-5501 -A 002363 1053 TAD 0053 /02363-1053 H+ 002364 7001 IAC /02364-7001 8A 002365 0041 AND 0041 /02365-0041 @! 002366 3053 DCA 0053 /02366-3053 X+ 002367 2060 ISZ 0060 /02367-2060 P0 002370 2034 ISZ 0034 /02370-2034 P\ 002371 7610 SKP CLA /02371-7610 >H 002372 5775 JMP I 2375 /02372-5775 /= 002373 5774 JMP I 2374 /02373-5774 /< 002374 2400 ISZ I 0000 /02374-2400 T@ 002375 2403 ISZ I 0003 /02375-2403 TC 002376 2256 ISZ 2256 /02376-2256 R. 002377 4200 JMS 2200 /02377-4200 "@ 2400 PAGE 002400 7402 VERROM, HLT /02400-7402 <B 002401 7440 SZA /02401-7440 < 002402 7410 SKP /02402-7410 <H 002403 5266 JMP 2466 /02403-5266 *6 002404 1115 TAD C7777 /02404-1115 IM 002405 7440 SZA /02405-7440 < 002406 7410 SKP /02406-7410 <H 002407 5265 JMP 2465 /02407-5265 *5 002410 1115 TAD C7777 /02410-1115 IM 002411 7440 SZA /02411-7440 < 002412 7410 SKP /02412-7410 <H 002413 5264 JMP 2464 /02413-5264 *4 002414 1115 TAD C7777 /02414-1115 IM 002415 7440 SZA /02415-7440 < 002416 7410 SKP /02416-7410 <H 002417 5263 JMP 2463 /02417-5263 *3 002420 1070 TAD C4 /02420-1070 H8 002421 7440 SZA /02421-7440 < 002422 7410 SKP /02422-7410 <H 002423 5262 JMP 2462 /02423-5262 *2 002424 1066 TAD C1 /02424-1066 H6 002425 7440 SZA /02425-7440 < 002426 7410 SKP /02426-7410 <H 002427 5261 JMP 2461 /02427-5261 *1 002430 1067 TAD C3 /02430-1067 H7 002431 7440 SZA /02431-7440 < 002432 7410 SKP /02432-7410 <H /DJFPAB PAL8-V50X 06-OCT-90 PAGE 1-95 002433 5260 JMP 2460 /02433-5260 *0 002434 1066 TAD C1 /02434-1066 H6 002435 7440 SZA /02435-7440 < 002436 7410 SKP /02436-7410 <H 002437 5257 JMP 2457 /02437-5257 */ 002440 1267 TAD C21 /02440-1267 J7 002441 7440 SZA /02441-7440 < 002442 7410 SKP /02442-7410 <H 002443 5256 JMP 2456 /02443-5256 *. 002444 1270 TAD C44 /02444-1270 J8 002445 7440 SZA /02445-7440 < 002446 7410 SKP /02446-7410 <H 002447 5255 JMP 2455 /02447-5255 *- 002450 1377 TAD (.+1 /02450-1377 K? 002451 4464 JMS I XX8 /02451-4464 $4 002452 4437 JMS I MSG /02452-4437 $_ 002453 6424 MIRVRM /02453-6424 4T 002454 5600 JMP I VERROM /02454-5600 .@ 002455 7001 IAC /02455-7001 8A -73 002456 7001 IAC /02456-7001 8A -27 002457 7001 IAC /02457-7001 8A -6 002460 7001 IAC /02460-7001 8A -5 002461 7001 IAC /02461-7001 8A -2 002462 7001 IAC /02462-7001 8A -1 002463 7001 IAC /02463-7001 8A 3 002464 7001 IAC /02464-7001 8A 2 002465 7001 IAC /02465-7001 8A 1 002466 5600 JMP I VERROM /02466-5600 .@ 0 002467 0021 C21, 0021 /02467-0021 @Q 002470 0044 C44, 0044 /02470-0044 @$ 002471 7402 APTCHK, HLT /02471-7402 <B 002472 7300 CLA CLL /02472-7300 ;@ 002473 6214 RDF /02473-6214 2L 002474 1161 TAD CIFCDF /02474-1161 I1 002475 6201 CDF 0 /02475-6201 2A 002476 3373 DCA APTRET /02476-3373 [; 002477 7344 CLA CLL CMA RAL /02477-7344 ;$ 002500 1373 TAD APTRET /02500-1373 K; 002501 3312 DCA APTCDF /02501-3312 [J 002502 1312 TAD APTCDF /02502-1312 KJ 002503 3776 DCA I (APTNXT /02503-3776 _> 002504 1271 TAD APTCHK /02504-1271 J9 002505 3141 DCA 0141 /02505-3141 Y! 002506 1113 TAD CM13 /02506-1113 IK 002507 3137 DCA CNT /02507-3137 Y_ 002510 1375 TAD (APT-1 /02510-1375 K= 002511 3012 DCA 0012 /02511-3012 XJ 002512 7402 APTCDF, HLT /02512-7402 <B 002513 1671 TAD I APTCHK /02513-1671 N9 002514 6201 CDF 0 /02514-6201 2A 002515 7041 CMA IAC /02515-7041 8! 002516 1412 TAD I 0012 /02516-1412 LJ 002517 7640 SZA CLA /02517-7640 > 002520 5325 JMP 2525 /02520-5325 +U /DJFPAB PAL8-V50X 06-OCT-90 PAGE 1-96 002521 2271 ISZ APTCHK /02521-2271 R9 002522 2137 ISZ CNT /02522-2137 Q_ 002523 5312 JMP APTCDF /02523-5312 +J 002524 5371 JMP 2571 /02524-5371 +9 002525 1141 TAD 0141 /02525-1141 I! 002526 4464 JMS I XX8 /02526-4464 $4 002527 4436 JMS I XOPT /02527-4436 $^ 002530 0104 AND C1000 /02530-0104 AD 002531 7640 SZA CLA /02531-7640 > 002532 5364 JMP 2564 /02532-5364 +4 002533 6556 FPRST /02533-6556 5. 002534 3147 DCA STATUS /02534-3147 Y' 002535 4437 JMS I MSG /02535-4437 $_ 002536 6442 MAPTER /02536-6442 4" 002537 7240 CLA CMA /02537-7240 : 002540 1141 TAD 0141 /02540-1141 I! 002541 3012 DCA 0012 /02541-3012 XJ 002542 1012 TAD 0012 /02542-1012 HJ 002543 4443 JMS I NUMPRT /02543-4443 $# 002544 4437 JMS I MSG /02544-4437 $_ 002545 6113 MCRLF /02545-6113 1K 002546 4450 JMS I STSMSG /02546-4450 $( 002547 4437 JMS I MSG /02547-4437 $_ 002550 6457 MAPTHL /02550-6457 4/ 002551 1113 TAD CM13 /02551-1113 IK 002552 3137 DCA CNT /02552-3137 Y_ 002553 5776 JMP I (APTNXT /02553-5776 /> 002554 1412 APTNX2, TAD I 0012 /02554-1412 LJ 002555 4443 JMS I NUMPRT /02555-4443 $# 002556 2137 ISZ CNT /02556-2137 Q_ 002557 5354 JMP 2554 /02557-5354 +, 002560 4437 JMS I MSG /02560-4437 $_ 002561 6324 MACFPP /02561-6324 3T 002562 4437 JMS I MSG /02562-4437 $_ 002563 6113 MCRLF /02563-6113 1K 002564 1141 TAD 0141 /02564-1141 I! 002565 1074 TAD C12 /02565-1074 H< 002566 3271 DCA APTCHK /02566-3271 Z9 002567 4447 JMS I 0047 /02567-4447 $' 002570 2271 ISZ APTCHK /02570-2271 R9 002571 2271 ISZ APTCHK /02571-2271 R9 002572 4446 JMS I 0046 /02572-4446 $& 002573 7402 APTRET, HLT /02573-7402 <B 002574 5671 JMP I APTCHK /02574-5671 .9 /7177 /02575-7177 9? /ISZ I 2400 /02576-2600 V@ /ISZ I 0051 /02577-2451 T) 002575 7177 002576 2600 002577 2451 2600 PAGE 002600 7402 APTNXT, HLT /02600-7402 <B 002601 1412 TAD I 0012 /02601-1412 LJ 002602 6201 CDF 0 /02602-6201 2A /DJFPAB PAL8-V50X 06-OCT-90 PAGE 1-97 002603 4443 JMS I NUMPRT /02603-4443 $# 002604 2137 ISZ CNT /02604-2137 Q_ 002605 5200 JMP APTNXT /02605-5200 *@ 002606 4437 JMS I MSG /02606-4437 $_ 002607 6340 MEXPEC /02607-6340 3 002610 4437 JMS I MSG /02610-4437 $_ 002611 6113 MCRLF /02611-6113 1K 002612 1113 TAD CM13 /02612-1113 IK 002613 3137 DCA CNT /02613-3137 Y_ 002614 1377 TAD (APT-1 /02614-1377 K? 002615 3012 DCA 0012 /02615-3012 XJ 002616 5776 JMP I (APTNX2 /02616-5776 /> 002617 7402 IDXCHK, HLT /02617-7402 <B 002620 6214 RDF /02620-6214 2L 002621 1161 TAD CIFCDF /02621-1161 I1 002622 3335 DCA 2735 /02622-3335 [] 002623 7344 CLA CLL CMA RAL /02623-7344 ;$ 002624 1335 TAD 2735 /02624-1335 K] 002625 3236 DCA 2636 /02625-3236 Z^ 002626 1236 TAD 2636 /02626-1236 J^ 002627 3277 DCA 2677 /02627-3277 Z? 002630 1217 TAD IDXCHK /02630-1217 JO 002631 3141 DCA 0141 /02631-3141 Y! 002632 1375 TAD 2775 /02632-1375 K= 002633 3137 DCA CNT /02633-3137 Y_ 002634 1374 TAD 2774 /02634-1374 K< 002635 3012 DCA 0012 /02635-3012 XJ 002636 7402 HLT /02636-7402 <B 002637 1617 TAD I IDXCHK /02637-1617 NO 002640 7041 CMA IAC /02640-7041 8! 002641 6201 CDF 0 /02641-6201 2A 002642 1412 TAD I 0012 /02642-1412 LJ 002643 7640 SZA CLA /02643-7640 > 002644 5251 JMP 2651 /02644-5251 *) 002645 2217 ISZ IDXCHK /02645-2217 RO 002646 2137 ISZ CNT /02646-2137 Q_ 002647 5236 JMP 2636 /02647-5236 *^ 002650 5333 JMP 2733 /02650-5333 +[ 002651 1141 TAD 0141 /02651-1141 I! 002652 4464 JMS I XX8 /02652-4464 $4 002653 4436 JMS I XOPT /02653-4436 $^ 002654 0104 AND C1000 /02654-0104 AD 002655 7640 SZA CLA /02655-7640 > 002656 5325 JMP 2725 /02656-5325 +U 002657 6556 FPRST /02657-6556 5. 002660 3147 DCA STATUS /02660-3147 Y' 002661 4437 JMS I MSG /02661-4437 $_ 002662 6640 MXRERR /02662-6640 6 002663 7240 CLA CMA /02663-7240 : 002664 1141 TAD 0141 /02664-1141 I! 002665 3012 DCA 0012 /02665-3012 XJ 002666 1012 TAD 0012 /02666-1012 HJ 002667 4443 JMS I NUMPRT /02667-4443 $# 002670 4437 JMS I MSG /02670-4437 $_ /DJFPAB PAL8-V50X 06-OCT-90 PAGE 1-98 002671 6113 MCRLF /02671-6113 1K 002672 4450 JMS I STSMSG /02672-4450 $( 002673 4437 JMS I MSG /02673-4437 $_ 002674 6660 MINDXP /02674-6660 60 002675 1375 TAD 2775 /02675-1375 K= 002676 3137 DCA CNT /02676-3137 Y_ 002677 7402 HLT /02677-7402 <B 002700 1412 TAD I 0012 /02700-1412 LJ 002701 6201 CDF 0 /02701-6201 2A 002702 4443 JMS I NUMPRT /02702-4443 $# 002703 2137 ISZ CNT /02703-2137 Q_ 002704 5277 JMP 2677 /02704-5277 *? 002705 4437 JMS I MSG /02705-4437 $_ 002706 6340 MEXPEC /02706-6340 3 002707 4437 JMS I MSG /02707-4437 $_ 002710 6113 MCRLF /02710-6113 1K 002711 1375 TAD 2775 /02711-1375 K= 002712 3137 DCA CNT /02712-3137 Y_ 002713 1374 TAD 2774 /02713-1374 K< 002714 3012 DCA 0012 /02714-3012 XJ 002715 1412 TAD I 0012 /02715-1412 LJ 002716 4443 JMS I NUMPRT /02716-4443 $# 002717 2137 ISZ CNT /02717-2137 Q_ 002720 5315 JMP 2715 /02720-5315 +M 002721 4437 JMS I MSG /02721-4437 $_ 002722 6324 MACFPP /02722-6324 3T 002723 4437 JMS I MSG /02723-4437 $_ 002724 6113 MCRLF /02724-6113 1K 002725 7200 CLA /02725-7200 :@ 002726 1141 TAD 0141 /02726-1141 I! 002727 1072 TAD C7 /02727-1072 H: 002730 3217 DCA IDXCHK /02730-3217 ZO 002731 4447 JMS I 0047 /02731-4447 $' 002732 2217 ISZ IDXCHK /02732-2217 RO 002733 2217 ISZ IDXCHK /02733-2217 RO 002734 4446 JMS I 0046 /02734-4446 $& 002735 7402 HLT /02735-7402 <B 002736 5617 JMP I IDXCHK /02736-5617 .O 002737 1357 INTSPL, TAD 2757 /02737-1357 K/ 002740 3000 DCA 0000 /02740-3000 X@ 002741 7346 CLA CLL CMA RTL /02741-7346 ;& 002742 3140 DCA 0140 /02742-3140 Y 002743 2141 ISZ 0141 /02743-2141 Q! 002744 5343 JMP 2743 /02744-5343 +# 002745 2140 ISZ 0140 /02745-2140 Q 002746 5343 JMP 2743 /02746-5343 +# 002747 6007 CAF /02747-6007 0G 002750 6001 ION /02750-6001 0A 002751 5354 JMP 2754 /02751-5354 +, 002752 1373 TAD 2773 /02752-1373 K; 002753 4464 JMS I XX8 /02753-4464 $4 002754 4437 JMS I MSG /02754-4437 $_ 002755 6707 MPWRLO /02755-6707 7G 002756 5772 JMP I 2772 /02756-5772 /: /DJFPAB PAL8-V50X 06-OCT-90 PAGE 1-99 002757 5403 JMP I 0003 /02757-5403 ,C 002760 1055 TAD 0055 /02760-1055 H- 002761 3061 DCA 0061 /02761-3061 X1 002762 1060 TAD 0060 /02762-1060 H0 002763 4470 JMS I 0070 /02763-4470 $8 002764 7200 CLA /02764-7200 :@ 002765 4476 JMS I 0076 /02765-4476 $> 002766 3062 DCA 0062 /02766-3062 X2 002767 4514 JMS I 0114 /02767-4514 %L 002770 4511 JMS I 0111 /02770-4511 %I 002771 5772 JMP I 2772 /02771-5772 /: 002772 0266 AND 2666 /02772-0266 B6 002773 2737 ISZ I 2737 /02773-2737 W_ 002774 7212 CLA RTR /02774-7212 :J 002775 7770 SPA SNA SZL CLA /02775-7770 ?8 /ISZ I 0154 /02776-2554 U, /7177 /02777-7177 9? 002776 2554 002777 7177 3000 PAGE 003000 1022 TAD X8MOD /03000-1022 HR 003001 7700 SMA CLA /03001-7700 ?@ 003002 5212 JMP 3012 /03002-5212 *J 003003 6002 IOF /03003-6002 0B 003004 6201 CDF 0 /03004-6201 2A 003005 6272 CIF 70 /03005-6272 2: 003006 4777 JMS I (6500 /03006-4777 '? 003007 6203 CIF CDF 0 /03007-6203 2C 003010 6001 ION /03010-6001 0A 003011 5776 JMP I (TST1 /03011-5776 /> 003012 1253 TAD 3053 /03012-1253 J+ 003013 7640 SZA CLA /03013-7640 > 003014 5220 JMP 3020 /03014-5220 *P 003015 1252 TAD 3052 /03015-1252 J* 003016 7040 CMA /03016-7040 8 003017 3253 DCA 3053 /03017-3253 Z+ 003020 2253 ISZ 3053 /03020-2253 R+ 003021 5776 JMP I (TST1 /03021-5776 /> 003022 2254 ISZ 3054 /03022-2254 R, 003023 4436 JMS I XOPT /03023-4436 $^ 003024 0104 AND C1000 /03024-0104 AD 003025 7640 SZA CLA /03025-7640 > 003026 5241 JMP 3041 /03026-5241 *! 003027 4437 JMS I MSG /03027-4437 $_ 003030 6730 MDJPAS /03030-6730 7X 003031 1254 TAD 3054 /03031-1254 J, 003032 4443 JMS I NUMPRT /03032-4443 $# 003033 2251 ISZ 3051 /03033-2251 R) 003034 5241 JMP 3041 /03034-5241 *! 003035 1375 TAD (-4 /03035-1375 K= 003036 3251 DCA 3051 /03036-3251 Z) 003037 4437 JMS I MSG /03037-4437 $_ 003040 6113 MCRLF /03040-6113 1K 003041 4436 JMS I XOPT /03041-4436 $^ /DJFPAB PAL8-V50X 06-OCT-90 PAGE 1-100 003042 0374 AND (400 /03042-0374 C< 003043 7650 SNA CLA /03043-7650 >( 003044 5776 JMP I (TST1 /03044-5776 /> 003045 1373 TAD (.-1 /03045-1373 K; 003046 3000 DCA 0000 /03046-3000 X@ 003047 4440 JMS I PUSH /03047-4440 $ 003050 5772 JMP I (CTRLG /03050-5772 /: 003051 7774 CM4, SPA SNA SZL CLA OSR /03051-7774 ?< 003052 0350 AND 3150 /03052-0350 C( 003053 7770 SPA SNA SZL CLA /03053-7770 ?8 003054 0000 AND 0000 /03054-0000 @@ 003055 7402 ENVSET, HLT /03055-7402 <B 003056 6214 RDF /03056-6214 2L 003057 1161 TAD CIFCDF /03057-1161 I1 003060 3333 DCA 3133 /03060-3333 [[ 003061 7344 CLA CLL CMA RAL /03061-7344 ;$ 003062 1333 TAD 3133 /03062-1333 K[ 003063 3272 DCA 3072 /03063-3272 Z: 003064 1272 TAD 3072 /03064-1272 J: 003065 3307 DCA 3107 /03065-3307 [G 003066 1307 TAD 3107 /03066-1307 KG 003067 3314 DCA 3114 /03067-3314 [L 003070 6201 CDF 0 /03070-6201 2A 003071 4451 JMS I PREAPT /03071-4451 $) 003072 7402 HLT /03072-7402 <B 003073 1655 TAD I ENVSET /03073-1655 N- TSTNUM 003074 3122 DCA TSTNUM /03074-3122 YR 003075 2255 ISZ ENVSET /03075-2255 R- 003076 1655 TAD I ENVSET /03076-1655 N- CODE 003077 3156 DCA CODE /03077-3156 Y. 003100 2255 ISZ ENVSET /03100-2255 R- 003101 1655 TAD I ENVSET /03101-1655 N- MCODE FLD 1 003102 3157 DCA MCODE /03102-3157 Y/ 003103 2255 ISZ ENVSET /03103-2255 R- 003104 1655 TAD I ENVSET /03104-1655 N- FPCF 003105 6201 CDF 0 /03105-6201 2A 003106 3771 DCA I (APT /03106-3771 _9 003107 7402 HLT /03107-7402 <B 003110 2255 ISZ ENVSET /03110-2255 R- 003111 1655 TAD I ENVSET /03111-1655 N- FPCADR 003112 6201 CDF 0 /03112-6201 2A 003113 3770 DCA I (FPCADR /03113-3770 _8 003114 7402 HLT /03114-7402 <B 003115 2255 ISZ ENVSET /03115-2255 R- 003116 1655 TAD I ENVSET /03116-1655 N- FPCOM 003117 6553 FPCOM /03117-6553 5+ 003120 7200 CLA /03120-7200 :@ 003121 2255 ISZ ENVSET /03121-2255 R- 003122 1655 TAD I ENVSET /03122-1655 N- FPEP 003123 7440 SZA /03123-7440 < 003124 6567 FPEP /03124-6567 57 003125 6201 CDF 0 /03125-6201 2A 003126 3145 DCA CNTSTP /03126-3145 Y% 003127 2255 ISZ ENVSET /03127-2255 R- /DJFPAB PAL8-V50X 06-OCT-90 PAGE 1-101 003130 1146 TAD APTP /03130-1146 I& 003131 6555 FPST /03131-6555 5- 003132 5337 JMP 3137 /03132-5337 +_ 003133 7402 HLT /03133-7402 <B 003134 2255 ISZ ENVSET /03134-2255 R- 003135 7200 CLA /03135-7200 :@ 003136 5655 JMP I ENVSET /03136-5655 .- 003137 1255 TAD ENVSET /03137-1255 J- 003140 4464 JMS I XX8 /03140-4464 $4 003141 4452 JMS I SKFGPR /03141-4452 $* 003142 7410 SKP /03142-7410 <H 003143 2255 ISZ ENVSET /03143-2255 R- 003144 5333 JMP 3133 /03144-5333 +[ 003145 1371 TAD 3171 /03145-1371 K9 003146 3061 DCA 0061 /03146-3061 X1 003147 7344 CLA CLL CMA RAL /03147-7344 ;$ 003150 3035 DCA 0035 /03150-3035 X] 003151 3060 DCA 0060 /03151-3060 X0 003152 1367 TAD 3167 /03152-1367 K7 003153 4470 JMS I 0070 /03153-4470 $8 003154 7200 CLA /03154-7200 :@ 003155 1042 TAD GETC /03155-1042 H" 003156 4501 JMS I C200 /03156-4501 %A 003157 7200 CLA /03157-7200 :@ 003160 4466 JMS I 0066 /03160-4466 $6 003161 5364 JMP 3164 /03161-5364 +4 003162 4507 JMS I 0107 /03162-4507 %G 003163 4507 JMS I 0107 /03163-4507 %G 003164 5766 JMP I 3166 /03164-5766 /6 003165 3232 DCA 3032 /03165-3232 ZZ 003166 3200 DCA 3000 /03166-3200 Z@ 003167 3777 DCA I 3177 /03167-3777 _? /CLA IAC /03170-7201 :A /CLA /03171-7200 :@ /TAD 0055 /03172-1055 H- /DCA 0044 /03173-3044 X$ /AND I 0000 /03174-0400 D@ /SPA SNA SZL CLA OSR /03175-7774 ?< /DCA 3000 /03176-3200 Z@ /6500 /03177-6500 5@ 003170 7201 003171 7200 003172 1055 003173 3044 003174 0400 003175 7774 003176 3200 003177 6500 3200 PAGE 003200 7201 TST1, CLA IAC /03200-7201 :A 003201 3122 DCA TSTNUM /03201-3122 YR 003202 3156 DCA CODE /03202-3156 Y. 003203 6552 FPICL /03203-6552 5* /DJFPAB PAL8-V50X 06-OCT-90 PAGE 1-102 003204 6551 FPINT /03204-6551 5) 003205 5210 JMP 3210 /03205-5210 *H 003206 4452 JMS I SKFGPR /03206-4452 $* 003207 5200 JMP 3200 /03207-5200 *@ 003210 6557 FPIST /03210-6557 5/ 003211 5214 JMP 3214 /03211-5214 *L 003212 4452 JMS I SKFGPR /03212-4452 $* 003213 5200 JMP 3200 /03213-5200 *@ 003214 7240 CLA CMA /03214-7240 : 003215 6553 FPCOM /03215-6553 5+ 003216 4243 JMS 3243 /03216-4243 "# 003217 6567 FPEP /03217-6567 57 003220 4243 JMS 3243 /03220-4243 "# 003221 6561 FMODE /03221-6561 51 003222 4243 JMS 3243 /03222-4243 "# 003223 6563 FMRB /03223-6563 53 003224 4243 JMS 3243 /03224-4243 "# 003225 6564 FMRP /03225-6564 54 003226 4243 JMS 3243 /03226-4243 "# 003227 6565 FMDO /03227-6565 55 003230 4243 JMS 3243 /03230-4243 "# 003231 6562 6562 /03231-6562 52 003232 4243 JMS 3243 /03232-4243 "# 003233 6554 FPHLT /03233-6554 5, 003234 4243 JMS 3243 /03234-4243 "# 003235 6556 FPRST /03235-6556 5. 003236 3147 DCA STATUS /03236-3147 Y' 003237 4453 JMS I CKSTAT /03237-4453 $+ 003240 1014 HLTEX LOCKO EPMOD /03240-1014 HL 003241 5200 JMP 3200 /03241-5200 *@ 003242 5265 JMP 3265 /03242-5265 *5 003243 7402 HLT /03243-7402 <B 003244 7200 CLA /03244-7200 :@ 003245 7440 SZA /03245-7440 < 003246 5251 JMP 3251 /03246-5251 *) 003247 7240 CLA CMA /03247-7240 : 003250 5643 JMP I 3243 /03250-5643 .# 003251 6007 CAF /03251-6007 0G 003252 6001 ION /03252-6001 0A 003253 7344 CLA CLL CMA RAL /03253-7344 ;$ 003254 1243 TAD 3243 /03254-1243 J# 003255 3243 DCA 3243 /03255-3243 Z# 003256 1243 TAD 3243 /03256-1243 J# 003257 4455 JMS I ACBAD /03257-4455 $- 003260 5643 JMP I 3243 /03260-5643 .# 003261 7205 CLA IAC RAL /03261-7205 :E 003262 1243 TAD 3243 /03262-1243 J# 003263 3243 DCA 3243 /03263-3243 Z# 003264 5643 JMP I 3243 /03264-5643 .# 003265 7200 CLA /03265-7200 :@ 003266 6553 FPCOM /03266-6553 5+ 003267 6556 FPRST /03267-6556 5. 003270 3147 DCA STATUS /03270-3147 Y' /DJFPAB PAL8-V50X 06-OCT-90 PAGE 1-103 003271 4453 JMS I CKSTAT /03271-4453 $+ 003272 1000 HLTEX /03272-1000 H@ FPHLT 003273 5265 JMP 3265 /03273-5265 *5 003274 1164 TAD C6410 /03274-1164 I4 DPSEL EXPEX FPENA LOCON 003275 6553 FPCOM /03275-6553 5+ 003276 7041 CMA IAC /03276-7041 8! 003277 1164 TAD C6410 /03277-1164 I4 003300 7450 SNA /03300-7450 <( 003301 5304 JMP 3304 /03301-5304 +D 003302 4455 JMS I ACBAD /03302-4455 $- 003303 5274 JMP 3274 /03303-5274 *< 003304 6556 FPRST /03304-6556 5. 003305 3147 DCA STATUS /03305-3147 Y' 003306 4453 JMS I CKSTAT /03306-4453 $+ 003307 5010 DPMOD HLTEX LOCKO /03307-5010 (H 003310 5274 JMP 3274 /03310-5274 *< 003311 7330 CLA CLL CML RAR /03311-7330 ;X 003312 6567 FPEP /03312-6567 57 003313 7450 SNA /03313-7450 <( 003314 5317 JMP 3317 /03314-5317 +O 003315 4455 JMS I ACBAD /03315-4455 $- 003316 5311 JMP 3311 /03316-5311 +I 003317 6556 FPRST /03317-6556 5. 003320 3147 DCA STATUS /03320-3147 Y' 003321 4453 JMS I CKSTAT /03321-4453 $+ 003322 1014 HLTEX LOCKO EPMOD /03322-1014 HL 003323 5311 JMP 3311 /03323-5311 +I 003324 1107 TAD C4000 /03324-1107 IG 003325 6553 FPCOM /03325-6553 5+ 003326 6556 FPRST /03326-6556 5. 003327 3147 DCA STATUS /03327-3147 Y' 003330 4453 JMS I CKSTAT /03330-4453 $+ 003331 5000 DPMOD HLTEX /03331-5000 (@ 003332 5324 JMP 3324 /03332-5324 +T 003333 6552 FPICL /03333-6552 5* 003334 6556 FPRST /03334-6556 5. 003335 3147 DCA STATUS /03335-3147 Y' 003336 4453 JMS I CKSTAT /03336-4453 $+ 003337 0000 0000 /03337-0000 @@ 003340 5324 JMP 3324 /03340-5324 +T 003341 1164 TAD C6410 /03341-1164 I4 DPSEL EXPEX FPENA LOCON 003342 6553 FPCOM /03342-6553 5+ 003343 7330 CLA CLL CML RAR /03343-7330 ;X 003344 6567 FPEP /03344-6567 57 003345 6556 FPRST /03345-6556 5. 003346 3147 DCA STATUS /03346-3147 Y' 003347 4453 JMS I CKSTAT /03347-4453 $+ 003350 0014 LOCKO EPMOD /03350-0014 @L 003351 5341 JMP 3341 /03351-5341 +! 003352 6552 FPICL /03352-6552 5* 003353 6556 FPRST /03353-6556 5. 003354 3147 DCA STATUS /03354-3147 Y' 003355 4453 JMS I CKSTAT /03355-4453 $+ 003356 0010 LOCKO /03356-0010 @H 003357 5341 JMP 3341 /03357-5341 +! /DJFPAB PAL8-V50X 06-OCT-90 PAGE 1-104 003360 1164 TAD C6410 /03360-1164 I4 DPSEL EXPEX FPENA LOCON 003361 6553 FPCOM /03361-6553 5+ 003362 7200 CLA /03362-7200 :@ 003363 6567 FPEP /03363-6567 57 003364 6556 FPRST /03364-6556 5. 003365 3147 DCA STATUS /03365-3147 Y' 003366 4453 JMS I CKSTAT /03366-4453 $+ 003367 0010 LOCKO /03367-0010 @H 003370 5360 JMP 3360 /03370-5360 +0 003371 5777 JMP I (TST1B /03371-5777 /? 003372 7660 SZA SNL CLA /03372-7660 >0 003373 0040 AND 0040 /03373-0040 @ 003374 4060 JMS NORUN /03374-4060 0 003375 0101 AND 0101 /03375-0101 AA 003376 7746 SMA SZA CLA OSR HLT /03376-7746 ?& /DCA I 0000 /03377-3400 \@ 003377 3400 3400 PAGE 003400 7240 TST1B, CLA CMA /03400-7240 : 003401 7000 NOP /03401-7000 8@ 003402 6564 FMRP /03402-6564 54 003403 7450 SNA /03403-7450 <( 003404 5207 JMP 3407 /03404-5207 *G 003405 4455 JMS I ACBAD /03405-4455 $- 003406 5200 JMP 3400 /03406-5200 *@ 003407 7200 CLA /03407-7200 :@ 003410 1115 TAD C7777 /03410-1115 IM 003411 6561 FMODE /03411-6561 51 003412 6563 FMRB /03412-6563 53 003413 3232 DCA 3432 /03413-3232 ZZ 003414 7201 CLA IAC /03414-7201 :A 003415 1232 TAD 3432 /03415-1232 JZ 003416 7650 SNA CLA /03416-7650 >( 003417 5223 JMP 3423 /03417-5223 *S 003420 1232 TAD 3432 /03420-1232 JZ 003421 4455 JMS I ACBAD /03421-4455 $- 003422 5207 JMP 3407 /03422-5207 *G 003423 7200 CLA /03423-7200 :@ 003424 7000 NOP /03424-7000 8@ 003425 6561 FMODE /03425-6561 51 003426 6563 FMRB /03426-6563 53 003427 7450 SNA /03427-7450 <( 003430 5233 JMP 3433 /03430-5233 *[ 003431 4455 JMS I ACBAD /03431-4455 $- 003432 0000 AND 0000 /03432-0000 @@ 003433 7200 CLA /03433-7200 :@ 003434 1123 TAD NALL /03434-1123 IS 003435 7640 SZA CLA /03435-7640 > 003436 5777 JMP I (TST1 /03436-5777 /? 003437 5240 JMP 3440 /03437-5240 * 003440 7305 TST2, CLA CLL IAC RAL /03440-7305 ;E 003441 3122 DCA TSTNUM /03441-3122 YR /DJFPAB PAL8-V50X 06-OCT-90 PAGE 1-105 003442 3156 DCA CODE /03442-3156 Y. 003443 1515 TAD I C7777 /03443-1515 MM 003444 3776 DCA I (BATTMP /03444-3776 _> 003445 1375 TAD (MCOD2 /03445-1375 K= 003446 3157 DCA MCODE /03446-3157 Y/ 003447 6552 TST2LP, FPICL /03447-6552 5* 003450 3145 DCA CNTSTP /03450-3145 Y% 003451 1075 TAD C15 /03451-1075 H= 003452 3270 DCA STAT2 /03452-3270 Z8 003453 1162 TAD C2370 /03453-1162 I2 EXPEX FPCON LOCON 003454 6553 FPCOM /03454-6553 5+ 003455 7330 CLA CLL CML RAR /03455-7330 ;X 003456 6567 FPEP /03456-6567 57 003457 6561 FMODE /03457-6561 51 003460 6550 FFST /03460-6550 5( 003461 6551 FPINT /03461-6551 5) 003462 5265 JMP .+3 /03462-5265 *5 003463 4452 JMS I SKFGPR /03463-4452 $* 003464 5247 JMP TST2LP /03464-5247 *' 003465 6556 TST2L2, FPRST /03465-6556 5. 003466 3147 DCA STATUS /03466-3147 Y' 003467 4453 JMS I CKSTAT /03467-4453 $+ 003470 0015 STAT2, LOCKO EPMOD FPRUN /03470-0015 @M 003471 5247 JMP TST2LP /03471-5247 *' 003472 4454 JMS I RDREGS /03472-4454 $, 003473 4000 4000 /03473-4000 @ 003474 5247 JMP TST2LP /03474-5247 *' 003475 1352 TAD T2M21 /03475-1352 K* -21 003476 1145 TAD CNTSTP /03476-1145 I% 003477 7450 SNA /03477-7450 <( 003500 4774 JMS I (VERMS0 /03500-4774 '< 003501 1115 TAD C7777 /03501-1115 IM -22 003502 7440 SZA /03502-7440 < 003503 7410 SKP /03503-7410 <H 003504 4773 JMS I (VERMSG /03504-4773 '; 003505 1351 TAD T2M106 /03505-1351 K) -130 003506 7440 SZA /03506-7440 < 003507 5313 JMP .+4 /03507-5313 +K 003510 1372 TAD (14 /03510-1372 K: 003511 3270 DCA STAT2 /03511-3270 Z8 003512 5317 JMP .+5 /03512-5317 +O 003513 1115 TAD C7777 /03513-1115 IM -131 003514 7640 SZA CLA /03514-7640 > 003515 5317 JMP .+2 /03515-5317 +O 003516 5332 JMP 3532 /03516-5332 +Z 003517 4436 JMS I XOPT /03517-4436 $^ 003520 0101 AND C200 /03520-0101 AA 003521 7650 SNA CLA /03521-7650 >( 003522 5325 JMP .+3 /03522-5325 +U 003523 4457 JMS I ABORT /03523-4457 $/ 003524 5250 JMP TST2LP+1 /03524-5250 *( 003525 2145 ISZ CNTSTP /03525-2145 Q% 003526 7410 SKP /03526-7410 <H 003527 4460 JMS I NORUN /03527-4460 $0 003530 6565 FMDO /03530-6565 55 /DJFPAB PAL8-V50X 06-OCT-90 PAGE 1-106 003531 5265 JMP TST2L2 /03531-5265 *5 003532 6551 FPINT /03532-6551 5) 003533 7410 SKP /03533-7410 <H 003534 5337 JMP .+3 /03534-5337 +_ 003535 4452 JMS I SKFGPR /03535-4452 $* 003536 5247 JMP TST2LP /03536-5247 *' 003537 6555 FPST /03537-6555 5- 003540 5343 JMP 3543 /03540-5343 +# 003541 4452 JMS I SKFGPR /03541-4452 $* 003542 5247 JMP 3447 /03542-5247 *' 003543 1107 TAD C4000 /03543-1107 IG 003544 6553 FPCOM /03544-6553 5+ 003545 5771 JMP I (TST2NX /03545-5771 /9 003546 4452 JMS I SKFGPR /03546-4452 $* 003547 5247 JMP TST2LP /03547-5247 *' 003550 5771 JMP I (TST2NX /03550-5771 /9 003551 7672 T2M106, 7672 /03551-7672 >: 7670 003552 7757 T2M21, 7757 /03552-7757 ?/ 7761 003553 1054 TAD 0054 /03553-1054 H, 003554 1375 TAD 3575 /03554-1375 K= 003555 3054 DCA 0054 /03555-3054 X, 003556 2055 ISZ 0055 /03556-2055 P- 003557 1054 TAD 0054 /03557-1054 H, 003560 7700 SMA CLA /03560-7700 ?@ 003561 5766 JMP I 3566 /03561-5766 /6 003562 4506 JMS I 0106 /03562-4506 %F 003563 5772 JMP I 3572 /03563-5772 /: 003564 3035 DCA 0035 /03564-3035 X] 003565 0333 AND 3533 /03565-0333 C[ 003566 3316 DCA 3516 /03566-3316 [N 003567 0040 AND 0040 /03567-0040 @ 003570 4060 JMS NORUN /03570-4060 0 /DCA I 3400 /03571-3600 ^@ /AND 0014 /03572-0014 @L /TAD I 3545 /03573-1745 O% /ISZ 0000 /03574-2000 P@ /TAD I 3503 /03575-1703 OC /DCA I 3462 /03576-3662 ^2 /DCA 3400 /03577-3200 Z@ 003571 3600 003572 0014 003573 1745 003574 2000 003575 1703 003576 3662 003577 3200 3600 PAGE 003600 1107 TST2NX, TAD C4000 /03600-1107 IG 003601 7450 SNA /03601-7450 <( 003602 5205 JMP .+3 /03602-5205 *E 003603 4455 JMS I ACBAD /03603-4455 $- 003604 5777 JMP I (TST2LP /03604-5777 /? 003605 6556 FPRST /03605-6556 5. 003606 3147 DCA STATUS /03606-3147 Y' /DJFPAB PAL8-V50X 06-OCT-90 PAGE 1-107 003607 4453 JMS I CKSTAT /03607-4453 $+ 003610 0014 LOCKO EPMOD /03610-0014 @L 003611 5777 JMP I (TST2LP /03611-5777 /? 003612 6557 FPIST /03612-6557 5/ 003613 7410 SKP /03613-7410 <H 003614 5217 JMP .+3 /03614-5217 *O 003615 4452 JMS I SKFGPR /03615-4452 $* 003616 5777 JMP I (TST2LP /03616-5777 /? 003617 3147 DCA STATUS /03617-3147 Y' 003620 6551 FPINT /03620-6551 5) 003621 5224 JMP .+3 /03621-5224 *T 003622 4452 JMS I SKFGPR /03622-4452 $* 003623 5777 JMP I (TST2LP /03623-5777 /? 003624 7200 CLA /03624-7200 :@ 003625 4453 JMS I CKSTAT /03625-4453 $+ 003626 0014 LOCKO EPMOD /03626-0014 @L 003627 5777 JMP I (TST2LP /03627-5777 /? 003630 6556 FPRST /03630-6556 5. 003631 3147 DCA STATUS /03631-3147 Y' 003632 4453 JMS I CKSTAT /03632-4453 $+ 003633 0014 LOCKO EPMOD /03633-0010 @H WAS 14 IN ORIG 003634 5777 JMP I (TST2LP /03634-5777 /? 003635 1015 TAD 0015 /03635-1015 HM 003636 7040 CMA /03636-7040 8 003637 7650 SNA CLA /03637-7650 >( 003640 5245 JMP 3645 /03640-5245 *% 003641 1376 TAD (15 /03641-1376 K> 003642 4456 JMS I BRKERR /03642-4456 $. 003643 7777 MQA MQL CLA SAM /03643-7777 ?? 003644 5777 JMP I 3777 /03644-5777 /? 003645 1515 TAD I C7777 /03645-1515 MM 003646 7650 SNA CLA /03646-7650 >( 003647 5254 JMP 3654 /03647-5254 *, 003650 1115 TAD C7777 /03650-1115 IM 003651 4456 JMS I BRKERR /03651-4456 $. 003652 0000 AND 0000 /03652-0000 @@ 003653 5777 JMP I (TST2LP /03653-5777 /? 003654 1262 TAD BATTMP /03654-1262 J2 003655 3515 DCA I C7777 /03655-3515 ]M 003656 1123 TAD NALL /03656-1123 IS 003657 7640 SZA CLA /03657-7640 > 003660 5777 JMP I (TST2LP /03660-5777 /? 003661 5263 JMP TST3 /03661-5263 *3 003662 0000 BATTMP, AND 0000 /03662-0000 @@ 003663 6552 TST3, FPICL /03663-6552 5* 003664 6561 FMODE /03664-6561 51 003665 4465 JMS I SETENV /03665-4465 $5 003666 0003 3 /03666-0003 @C TSTNUM 003667 3721 REC3 /03667-3721 _Q CODE 003670 2167 MCOD3 /03670-2167 Q7 MCODE 003671 0000 0000 /03671-0000 @@ FPCF 003672 3746 FPCA3 /03672-3746 _& FPCADR 003673 2770 2770 /03673-2770 W8 FPCOM 003674 4000 4000 /03674-4000 @ FPEP /DJFPAB PAL8-V50X 06-OCT-90 PAGE 1-108 003675 5263 JMP TST3 /03675-5263 *3 ERR 003676 6556 FPRST /03676-6556 5. 003677 3147 DCA STATUS /03677-3147 Y' 003700 4453 JMS I CKSTAT /03700-4453 $+ 003701 0015 LOCKO EPMOD FPRUN /03701-0015 @M 003702 5263 JMP 3663 /03702-5263 *3 003703 4454 JMS I RDREGS /03703-4454 $, 003704 4000 JMS 0000 /03704-4000 @ 003705 5263 JMP 3663 /03705-5263 *3 003706 4436 JMS I XOPT /03706-4436 $^ 003707 0101 AND C200 /03707-0101 AA 003710 7650 SNA CLA /03710-7650 >( 003711 5314 JMP 3714 /03711-5314 +L 003712 4457 JMS I ABORT /03712-4457 $/ 003713 5264 JMP 3664 /03713-5264 *4 003714 2145 ISZ CNTSTP /03714-2145 Q% 003715 7410 SKP /03715-7410 <H 003716 4460 JMS I NORUN /03716-4460 $0 003717 6565 FMDO /03717-6565 55 003720 5276 JMP 3676 /03720-5276 *> 003721 7200 REC3, CLA /03721-7200 :@ 003722 4453 JMS I CKSTAT /03722-4453 $+ 003723 0014 LOCKO EPMOD /03723-0014 @L 003724 5263 JMP 3663 /03724-5263 *3 003725 4461 JMS I CHKAPT /03725-4461 $1 003726 0000 AND 0000 /03726-0000 @@ 003727 3747 DCA I 3747 /03727-3747 _' 003730 7213 CLA IAC RTR /03730-7213 :K 003731 7223 CLA CML IAC BSW /03731-7223 :S 003732 0000 AND 0000 /03732-0000 @@ 003733 0001 AND 0001 /03733-0001 @A 003734 0002 AND 0002 /03734-0002 @B 003735 0003 AND 0003 /03735-0003 @C 003736 0004 AND 0004 /03736-0004 @D 003737 0005 AND 0005 /03737-0005 @E 003740 0006 AND 0006 /03740-0006 @F 003741 5263 JMP 3663 /03741-5263 *3 003742 1123 TAD NALL /03742-1123 IS 003743 7640 SZA CLA /03743-7640 > 003744 5263 JMP 3663 /03744-5263 *3 003745 5775 JMP I 3775 /03745-5775 /= 003746 0000 FPCA3, AND 0000 /03746-0000 @@ 003747 5362 JMP 3762 /03747-5362 +2 003750 5364 JMP 3764 /03750-5364 +4 003751 5366 JMP 3766 /03751-5366 +6 003752 5370 JMP 3770 /03752-5370 +8 003753 3714 DCA I 3714 /03753-3714 _L 003754 3721 DCA I 3721 /03754-3721 _Q 003755 3671 DCA I 3671 /03755-3671 ^9 003756 4000 JMS 0000 /03756-4000 @ 003757 5014 JMP 0014 /03757-5014 (L 003760 0063 AND 0063 /03760-0063 @3 /DJFPAB PAL8-V50X 06-OCT-90 PAGE 1-109 003761 5010 JMP 0010 /03761-5010 (H 003762 0062 AND 0062 /03762-0062 @2 003763 4741 JMS I 3741 /03763-4741 '! 003764 5041 JMP 0041 /03764-5041 (! 003765 4635 JMS I 3635 /03765-4635 &] 003766 4670 JMS I 3670 /03766-4670 &8 003767 4600 JMS I 3600 /03767-4600 &@ 003770 4400 JMS I 0000 /03770-4400 $@ 003771 4777 JMS I 3777 /03771-4777 '? 003772 5004 JMP 0004 /03772-5004 (D 003773 5037 JMP 0037 /03773-5037 (_ 003774 0061 AND 0061 /03774-0061 @1 003775 4000 JMS 0000 /03775-4000 @ /AND 0015 /03776-0015 @M /DCA I 0047 /03777-3447 \' 003776 0015 003777 3447 4000 PAGE 004000 6552 TST4, FPICL /04000-6552 5* 004001 7307 CLA CLL IAC RTL /04001-7307 ;G 004002 3122 DCA TSTNUM /04002-3122 YR 004003 1377 TAD (REC4 /04003-1377 K? 004004 3156 DCA CODE /04004-3156 Y. 004005 3145 DCA CNTSTP /04005-3145 Y% 004006 1376 TAD (MCOD4 /04006-1376 K> 004007 3157 DCA MCODE /04007-3157 Y/ 004010 4451 JMS I PREAPT /04010-4451 $) 004011 1375 TAD (FPCA4 /04011-1375 K= 004012 3774 DCA I (FPCADR /04012-3774 _< 004013 7201 CLA IAC /04013-7201 :A 004014 3773 DCA I (APT /04014-3773 _; 004015 1164 TAD C6410 /04015-1164 I4 DPSEL EXPEX FPENA LOCON 004016 6553 FPCOM /04016-6553 5+ 004017 7330 CLA CLL CML RAR /04017-7330 ;X 004020 6567 FPEP /04020-6567 57 004021 6561 FMODE /04021-6561 51 004022 1146 TAD APTP /04022-1146 I& 004023 6555 FPST /04023-6555 5- 004024 7610 SKP CLA /04024-7610 >H 004025 5230 JMP 4030 /04025-5230 *X 004026 4452 JMS I SKFGPR /04026-4452 $* 004027 5200 JMP 4000 /04027-5200 *@ 004030 6556 FPRST /04030-6556 5. 004031 3147 DCA STATUS /04031-3147 Y' 004032 4453 JMS I CKSTAT /04032-4453 $+ 004033 0015 LOCKO EPMOD FPRUN /04033-0015 @M 004034 5200 JMP 4000 /04034-5200 *@ 004035 4454 JMS I RDREGS /04035-4454 $, 004036 4000 JMS 0000 /04036-4000 @ 004037 5200 JMP 4000 /04037-5200 *@ 004040 4436 JMS I XOPT /04040-4436 $^ 004041 0101 AND C200 /04041-0101 AA 004042 7650 SNA CLA /04042-7650 >( 004043 5246 JMP 4046 /04043-5246 *& /DJFPAB PAL8-V50X 06-OCT-90 PAGE 1-110 004044 4457 JMS I ABORT /04044-4457 $/ 004045 5201 JMP 4001 /04045-5201 *A 004046 2145 ISZ CNTSTP /04046-2145 Q% 004047 7410 SKP /04047-7410 <H 004050 4460 JMS I NORUN /04050-4460 $0 004051 6565 FMDO /04051-6565 55 004052 1145 TAD CNTSTP /04052-1145 I% 004053 1113 TAD CM13 /04053-1113 IK 004054 7640 SZA CLA /04054-7640 > 004055 5230 JMP 4030 /04055-5230 *X 004056 6556 FPRST /04056-6556 5. 004057 3147 DCA STATUS /04057-3147 Y' 004060 4453 JMS I CKSTAT /04060-4453 $+ 004061 0017 LOCKO EPMOD FPPAU FPRUN /04061-0017 @O 004062 5200 JMP 4000 /04062-5200 *@ 004063 4454 JMS I RDREGS /04063-4454 $, 004064 4000 JMS 0000 /04064-4000 @ 004065 5200 JMP 4000 /04065-5200 *@ 004066 6555 FPST /04066-6555 5- 004067 5273 JMP 4073 /04067-5273 *; 004070 2145 ISZ CNTSTP /04070-2145 Q% 004071 5230 JMP 4030 /04071-5230 *X 004072 4460 JMS I NORUN /04072-4460 $0 004073 7200 CLA /04073-7200 :@ 004074 4452 JMS I SKFGPR /04074-4452 $* 004075 5200 JMP 4000 /04075-5200 *@ 004076 5230 JMP 4030 /04076-5230 *X 004077 7200 REC4, CLA /04077-7200 :@ 004100 4453 JMS I CKSTAT /04100-4453 $+ 004101 0014 LOCKO EPMOD /04101-0014 @L 004102 5200 JMP 4000 /04102-5200 *@ 004103 4461 JMS I CHKAPT /04103-4461 $1 004104 1001 TAD 0001 /04104-1001 HA 004105 1603 TAD I 4003 /04105-1603 NC 004106 7213 CLA IAC RTR /04106-7213 :K 004107 7223 CLA CML IAC BSW /04107-7223 :S 004110 1600 TAD I 4000 /04110-1600 N@ 004111 0000 AND 0000 /04111-0000 @@ 004112 0000 AND 0000 /04112-0000 @@ 004113 0000 AND 0000 /04113-0000 @@ 004114 0000 AND 0000 /04114-0000 @@ 004115 0000 AND 0000 /04115-0000 @@ 004116 0000 AND 0000 /04116-0000 @@ 004117 5200 JMP 4000 /04117-5200 *@ 004120 1123 TAD NALL /04120-1123 IS 004121 7640 SZA CLA /04121-7640 > 004122 5200 JMP 4000 /04122-5200 *@ 004123 5772 JMP I 4172 /04123-5772 /: 004124 7772 SPA SNA SZL CLA HLT /04124-7772 ?: 004125 0000 AND 0000 /04125-0000 @@ 004126 0000 AND 0000 /04126-0000 @@ 004127 0000 AND 0000 /04127-0000 @@ 004130 0000 AND 0000 /04130-0000 @@ /DJFPAB PAL8-V50X 06-OCT-90 PAGE 1-111 004131 0000 AND 0000 /04131-0000 @@ 004132 0000 AND 0000 /04132-0000 @@ 004133 0000 AND 0000 /04133-0000 @@ 004134 0000 AND 0000 /04134-0000 @@ 004135 0000 AND 0000 /04135-0000 @@ 004136 0000 AND 0000 /04136-0000 @@ 004137 0000 AND 0000 /04137-0000 @@ 004140 1234 TAD 4034 /04140-1234 J\ 004141 7777 MQA MQL CLA SAM /04141-7777 ?? 004142 0000 AND 0000 /04142-0000 @@ 004143 0000 AND 0000 /04143-0000 @@ 004144 0411 AND I 0011 /04144-0411 DI 004145 2240 ISZ 4040 /04145-2240 R 004146 1420 TAD I 0020 /04146-1420 LP 004147 2472 ISZ I 0072 /04147-2472 T: 004150 7422 SNL HLT /04150-7422 <R 004151 1301 TAD 4101 /04151-1301 KA 004152 6072 6072 /04152-6072 0: 004153 5422 JMP I 0022 /04153-5422 ,R 004154 1302 TAD 4102 /04154-1302 KB 004155 6072 6072 /04155-6072 0: 004156 5705 JMP I 4105 /04156-5705 /E 004157 7564 SMA SZA SNL OSR /04157-7564 =4 004160 0000 AND 0000 /04160-0000 @@ 004161 0000 AND 0000 /04161-0000 @@ 004162 0000 AND 0000 /04162-0000 @@ 004163 0000 AND 0000 /04163-0000 @@ 004164 0000 AND 0000 /04164-0000 @@ 004165 0000 AND 0000 /04165-0000 @@ 004166 0000 AND 0000 /04166-0000 @@ 004167 0000 AND 0000 /04167-0000 @@ 004170 0000 AND 0000 /04170-0000 @@ 004171 0000 AND 0000 /04171-0000 @@ 004172 4200 JMS 4000 /04172-4200 "@ /CLA /04173-7200 :@ /CLA IAC /04174-7201 :A /TAD I 4000 /04175-1600 N@ /ISZ 4003 /04176-2203 RC /JMS 0077 /04177-4077 ? 004173 7200 004174 7201 004175 1600 004176 2203 004177 4077 4200 PAGE 004200 6552 TST5, FPICL /04200-6552 5* 004201 1071 TAD C5 /04201-1071 H9 004202 3122 DCA TSTNUM /04202-3122 YR 004203 1377 TAD (REC5 /04203-1377 K? 004204 3156 DCA CODE /04204-3156 Y. 004205 3145 DCA CNTSTP /04205-3145 Y% 004206 1376 TAD (MCOD5 /04206-1376 K> 004207 3157 DCA MCODE /04207-3157 Y/ 004210 1075 TAD C15 /04210-1075 H= /DJFPAB PAL8-V50X 06-OCT-90 PAGE 1-112 004211 3244 DCA 4244 /04211-3244 Z$ 004212 4451 JMS I PREAPT /04212-4451 $) 004213 1375 TAD (FPCA5 /04213-1375 K= 004214 3774 DCA I (FPCADR /04214-3774 _< 004215 1321 TAD C4015 /04215-1321 KQ 004216 3773 DCA I (FACEXP /04216-3773 _; 004217 1320 TAD C1111 /04217-1320 KP 004220 3772 DCA I (FACMA1 /04220-3772 _: 004221 3771 DCA I (FACMA0 /04221-3771 _9 004222 3770 DCA I (FACMA2 /04222-3770 _8 004223 3767 DCA I (FACMA3 /04223-3767 _7 004224 7201 CLA IAC /04224-7201 :A 004225 3766 DCA I (FACMA4 /04225-3766 _6 004226 1164 TAD C6410 /04226-1164 I4 DPSEL EXPEX FPINT LOCON 004227 6553 FPCOM /04227-6553 5+ 004230 7330 CLA CLL CML RAR /04230-7330 ;X 004231 6567 FPEP /04231-6567 57 004232 6561 FMODE /04232-6561 51 004233 1146 TAD APTP /04233-1146 I& 004234 6555 FPST /04234-6555 5- 004235 7410 SKP /04235-7410 <H 004236 5241 JMP 4241 /04236-5241 *! 004237 4452 JMS I SKFGPR /04237-4452 $* 004240 5200 JMP 4200 /04240-5200 *@ 004241 6556 FPRST /04241-6556 5. 004242 3147 DCA STATUS /04242-3147 Y' 004243 4453 JMS I CKSTAT /04243-4453 $+ 004244 0015 LOCKO EPMOD FPRUN /04244-0015 @M 004245 5200 JMP 4200 /04245-5200 *@ 004246 4454 JMS I RDREGS /04246-4454 $, 004247 4000 JMS 0000 /04247-4000 @ 004250 5200 JMP 4200 /04250-5200 *@ 004251 4436 JMS I XOPT /04251-4436 $^ 004252 0101 AND C200 /04252-0101 AA 004253 7650 SNA CLA /04253-7650 >( 004254 5257 JMP 4257 /04254-5257 */ 004255 4457 JMS I ABORT /04255-4457 $/ 004256 5201 JMP 4201 /04256-5201 *A 004257 2145 ISZ CNTSTP /04257-2145 Q% 004260 7410 SKP /04260-7410 <H 004261 4460 JMS I NORUN /04261-4460 $0 004262 6565 FMDO /04262-6565 55 004263 7200 CLA /04263-7200 :@ 004264 1145 TAD CNTSTP /04264-1145 I% 004265 1365 TAD 4365 /04265-1365 K5 004266 7640 SZA CLA /04266-7640 > 004267 5241 JMP 4241 /04267-5241 *! 004270 1364 TAD 4364 /04270-1364 K4 004271 3244 DCA 4244 /04271-3244 Z$ 004272 5241 JMP 4241 /04272-5241 *! 004273 7200 REC5, CLA /04273-7200 :@ 004274 4453 JMS I CKSTAT /04274-4453 $+ 004275 2014 TRPEX LOCKO EPMOD /04275-2014 PL 004276 5200 JMP 4200 /04276-5200 *@ 004277 4461 JMS I CHKAPT /04277-4461 $1 /DJFPAB PAL8-V50X 06-OCT-90 PAGE 1-113 004300 0000 AND 0000 /04300-0000 @@ 004301 4326 JMS 4326 /04301-4326 #V 004302 7213 CLA IAC RTR /04302-7213 :K 004303 7223 CLA CML IAC BSW /04303-7223 :S 004304 4324 JMS 4324 /04304-4324 #T 004305 4000 JMS 0000 /04305-4000 @ 004306 5555 JMP I 0155 /04306-5555 -- 004307 7777 MQA MQL CLA SAM /04307-7777 ?? 004310 7777 MQA MQL CLA SAM /04310-7777 ?? 004311 7776 SPA SNA SZL CLA OSR HLT /04311-7776 ?> 004312 0000 AND 0000 /04312-0000 @@ 004313 5200 JMP 4200 /04313-5200 *@ 004314 1123 TAD NALL /04314-1123 IS 004315 7640 SZA CLA /04315-7640 > 004316 5200 JMP 4200 /04316-5200 *@ 004317 5763 JMP I 4363 /04317-5763 /3 004320 1111 C1111, TAD 0111 /04320-1111 II 004321 4015 C4015, JMS 0015 /04321-4015 M 004322 0003 FPCA5, 0003 /FNEG /04322-0003 @C 004323 0004 0004 /FNORM /04323-0004 @D 004324 3000 3000 /TRAP3 0 /04324-3000 X@ 004325 4324 4324 / 4324 /04325-4324 #T 004326 0000 AND 0000 /04326-0000 @@ 004327 0000 AND 0000 /04327-0000 @@ 004330 0000 AND 0000 /04330-0000 @@ 004331 0000 AND 0000 /04331-0000 @@ 004332 0000 AND 0000 /04332-0000 @@ 004333 0000 AND 0000 /04333-0000 @@ 004334 0000 AND 0000 /04334-0000 @@ 004335 0000 AND 0000 /04335-0000 @@ 004336 0000 AND 0000 /04336-0000 @@ 004337 0000 AND 0000 /04337-0000 @@ 004340 0000 AND 0000 /04340-0000 @@ 004341 0000 AND 0000 /04341-0000 @@ 004342 0000 AND 0000 /04342-0000 @@ 004343 0000 AND 0000 /04343-0000 @@ 004344 0000 AND 0000 /04344-0000 @@ 004345 0000 AND 0000 /04345-0000 @@ 004346 0000 AND 0000 /04346-0000 @@ 004347 0000 AND 0000 /04347-0000 @@ 004350 0000 AND 0000 /04350-0000 @@ 004351 0000 AND 0000 /04351-0000 @@ 004352 0000 AND 0000 /04352-0000 @@ 004353 0000 AND 0000 /04353-0000 @@ 004354 0000 AND 0000 /04354-0000 @@ 004355 0000 AND 0000 /04355-0000 @@ 004356 0000 AND 0000 /04356-0000 @@ 004357 0000 AND 0000 /04357-0000 @@ 004360 0000 AND 0000 /04360-0000 @@ 004361 0000 AND 0000 /04361-0000 @@ 004362 0000 AND 0000 /04362-0000 @@ /DJFPAB PAL8-V50X 06-OCT-90 PAGE 1-114 004363 4400 JMS I 0000 /04363-4400 $@ 004364 2015 ISZ 0015 /04364-2015 PM 004365 7625 MQL CLA MUY /04365-7625 >U /CLA RTR /04366-7212 :J /CLA IAC RAR /04367-7211 :I /CLA RAR /04370-7210 :H /CLA RTL /04371-7206 :F /CLA IAC RTL /04372-7207 :G /CLA IAC RAL /04373-7205 :E /CLA IAC /04374-7201 :A /JMS 4322 /04375-4322 #R /ISZ 4307 /04376-2307 SG /JMS 4273 /04377-4273 "; 004366 7212 004367 7211 004370 7210 004371 7206 004372 7207 004373 7205 004374 7201 004375 4322 004376 2307 004377 4273 4400 PAGE 004400 6552 TST6, FPICL /04400-6552 5* 004401 7327 CLA CLL CML IAC RTL /04401-7327 ;W 004402 3122 DCA TSTNUM /04402-3122 YR 004403 1377 TAD (REC6 /04403-1377 K? 004404 3156 DCA CODE /04404-3156 Y. 004405 3145 DCA CNTSTP /04405-3145 Y% 004406 1376 TAD (MCOD6 /04406-1376 K> 004407 3157 DCA MCODE /04407-3157 Y/ 004410 4451 JMS I PREAPT /04410-4451 $) 004411 1375 TAD (FPCA6 /04411-1375 K= 004412 3774 DCA I (FPCADR /04412-3774 _< 004413 1373 TAD (1603 /04413-1373 K; 004414 3772 DCA I (FACMA1 /04414-3772 _: 004415 7201 CLA IAC /04415-7201 :A 004416 3771 DCA I (FACMA0 /04416-3771 _9 004417 1075 TAD C15 /04417-1075 H= 004420 3237 DCA 4437 /04420-3237 Z_ 004421 1164 TAD C6410 /04421-1164 I4 DPSEL EXPEX FPENA LOCON 004422 6553 FPCOM /04422-6553 5+ 004423 7330 CLA CLL CML RAR /04423-7330 ;X 004424 6567 FPEP /04424-6567 57 004425 6561 FMODE /04425-6561 51 004426 1146 TAD APTP /04426-1146 I& 004427 6555 FPST /04427-6555 5- 004430 7410 SKP /04430-7410 <H 004431 5234 JMP 4434 /04431-5234 *\ 004432 4452 JMS I SKFGPR /04432-4452 $* 004433 5200 JMP 4400 /04433-5200 *@ 004434 6556 FPRST /04434-6556 5. 004435 3147 DCA STATUS /04435-3147 Y' /DJFPAB PAL8-V50X 06-OCT-90 PAGE 1-115 004436 4453 JMS I CKSTAT /04436-4453 $+ 004437 0015 LOCKO EPMOD FPRUN /04437-0015 @M 004440 5200 JMP 4400 /04440-5200 *@ 004441 4454 JMS I RDREGS /04441-4454 $, 004442 4000 JMS 0000 /04442-4000 @ 004443 5200 JMP 4400 /04443-5200 *@ 004444 4436 JMS I XOPT /04444-4436 $^ 004445 0101 AND C200 /04445-0101 AA 004446 7650 SNA CLA /04446-7650 >( 004447 5252 JMP 4452 /04447-5252 ** 004450 4457 JMS I ABORT /04450-4457 $/ 004451 5201 JMP 4401 /04451-5201 *A 004452 6565 FMDO /04452-6565 55 004453 2145 ISZ CNTSTP /04453-2145 Q% 004454 7410 SKP /04454-7410 <H 004455 4460 JMS I NORUN /04455-4460 $0 004456 1145 TAD CNTSTP /04456-1145 I% 004457 1342 TAD 4542 /04457-1342 K" 004460 7440 SZA /04460-7440 < 004461 7410 SKP /04461-7410 <H 004462 5302 JMP 4502 /04462-5302 +B 004463 1112 TAD CM23 /04463-1112 IJ 004464 7440 SZA /04464-7440 < 004465 7410 SKP /04465-7410 <H 004466 5301 JMP 4501 /04466-5301 +A 004467 1341 TAD 4541 /04467-1341 K! 004470 7440 SZA /04470-7440 < 004471 7410 SKP /04471-7410 <H 004472 5305 JMP 4505 /04472-5305 +E 004473 1370 TAD 4570 /04473-1370 K8 004474 7640 SZA CLA /04474-7640 > 004475 7410 SKP /04475-7410 <H 004476 5310 JMP 4510 /04476-5310 +H 004477 7200 CLA /04477-7200 :@ 004500 5234 JMP 4434 /04500-5234 *\ 004501 1107 TAD C4000 /04501-1107 IG 004502 1340 TAD 4540 /04502-1340 K 004503 3237 DCA 4437 /04503-3237 Z_ 004504 5234 JMP 4434 /04504-5234 *\ 004505 1075 TAD C15 /04505-1075 H= 004506 3237 DCA 4437 /04506-3237 Z_ 004507 5234 JMP 4434 /04507-5234 *\ 004510 1367 TAD 4567 /04510-1367 K7 004511 3237 DCA 4437 /04511-3237 Z_ 004512 5234 JMP 4434 /04512-5234 *\ 004513 7200 REC6, CLA /04513-7200 :@ 004514 4453 JMS I CKSTAT /04514-4453 $+ 004515 2014 TRPEX LOCKO EPMOD /04515-2014 PL 004516 5200 JMP 4400 /04516-5200 *@ 004517 4461 JMS I CHKAPT /04517-4461 $1 004520 1001 TAD 0001 /04520-1001 HA 004521 1606 TAD I 4406 /04521-1606 NF 004522 7213 CLA IAC RTR /04522-7213 :K 004523 7223 CLA CML IAC BSW /04523-7223 :S /DJFPAB PAL8-V50X 06-OCT-90 PAGE 1-116 004524 1604 TAD I 4404 /04524-1604 ND 004525 0001 AND 0001 /04525-0001 @A 004526 0001 AND 0001 /04526-0001 @A 004527 1603 TAD I 4403 /04527-1603 NC 004530 0000 AND 0000 /04530-0000 @@ 004531 0000 AND 0000 /04531-0000 @@ 004532 0000 AND 0000 /04532-0000 @@ 004533 5200 JMP 4400 /04533-5200 *@ 004534 1123 TAD NALL /04534-1123 IS 004535 7640 SZA CLA /04535-7640 > 004536 5200 JMP 4400 /04536-5200 *@ 004537 5766 JMP I 4566 /04537-5766 /6 004540 0011 AND 0011 /04540-0011 @I 004541 7767 MQA MQL CLA SWBA /04541-7767 ?7 004542 7747 MQA CLA SWBA /04542-7747 ?' 004543 0005 FPCA6, 0005 /STARTF /04543-0005 @E 004544 0006 0006 /STARTD /04544-0006 @F 004545 0007 0007 /JAC /04545-0007 @G 004546 0727 0727 /FLDA % BASE+25X2+ /04546-0727 GW 004547 0727 0727 /FLDA % BASE+25X2+ /04547-0727 GW 004550 0327 0327 /FLDA BASE+405 /04550-0327 CW 004551 5333 5333 /FADDM BASE+421 /04551-5333 +[ 004552 0000 0000 /FEXIT /04552-0000 @@ 004553 0000 0000 /FEXIT /04553-0000 @@ 004554 7754 SPA SNA CLA OSR /04554-7754 ?, 004555 0000 AND 0000 /04555-0000 @@ 004556 0000 AND 0000 /04556-0000 @@ 004557 1061 TAD 0061 /04557-1061 H1 004560 7041 CMA IAC /04560-7041 8! 004561 1062 TAD 0062 /04561-1062 H2 004562 7650 SNA CLA /04562-7650 >( 004563 2356 ISZ 4556 /04563-2356 S. 004564 5756 JMP I 4556 /04564-5756 /. 004565 0003 AND 0003 /04565-0003 @C 004566 4600 JMS I 4400 /04566-4600 &@ 004567 2015 ISZ 0015 /04567-2015 PM 004570 7774 SPA SNA SZL CLA OSR /04570-7774 ?< /CLA RTL /04571-7206 :F /CLA IAC RTL /04572-7207 :G /TAD I 4403 /04573-1603 NC /CLA IAC /04574-7201 :A /JMS I 0143 /04575-4543 %# /ISZ I 4467 /04576-2667 V7 /JMS I 0113 /04577-4513 %K 004571 7206 004572 7207 004573 1603 004574 7201 004575 4543 004576 2667 004577 4513 4600 PAGE /DJFPAB PAL8-V50X 06-OCT-90 PAGE 1-117 004600 6552 TST7, FPICL /04600-6552 5* 004601 1072 TAD C7 /04601-1072 H: 004602 3122 DCA TSTNUM /04602-3122 YR 004603 1377 TAD (REC7 /04603-1377 K? 004604 3156 DCA CODE /04604-3156 Y. 004605 3145 DCA CNTSTP /04605-3145 Y% 004606 1376 TAD (MCOD7 /04606-1376 K> 004607 3157 DCA MCODE /04607-3157 Y/ 004610 4451 JMS I PREAPT /04610-4451 $) 004611 1375 TAD (2002 /04611-1375 K= 004612 3774 DCA I (FACMA0 /04612-3774 _< 004613 1373 TAD (FPCA7 /04613-1373 K; 004614 3772 DCA I (FPCADR /04614-3772 _: 004615 1371 TAD (27 /04615-1371 K9 004616 3770 DCA I (FACEXP /04616-3770 _8 004617 1367 TAD (30 /04617-1367 K7 004620 3766 DCA I (INDEX+7 /04620-3766 _6 004621 1075 TAD C15 /04621-1075 H= 004622 3241 DCA 4641 /04622-3241 Z! 004623 1164 TAD C6410 /04623-1164 I4 DPSEL EXPEX FPENA LOCON 004624 6553 FPCOM /04624-6553 5+ 004625 7330 CLA CLL CML RAR /04625-7330 ;X 004626 6567 FPEP /04626-6567 57 004627 6561 FMODE /04627-6561 51 004630 1146 TAD APTP /04630-1146 I& 004631 6555 FPST /04631-6555 5- 004632 7410 SKP /04632-7410 <H 004633 5236 JMP 4636 /04633-5236 *^ 004634 4452 JMS I SKFGPR /04634-4452 $* 004635 5200 JMP 4600 /04635-5200 *@ 004636 6556 FPRST /04636-6556 5. 004637 3147 DCA STATUS /04637-3147 Y' 004640 4453 JMS I CKSTAT /04640-4453 $+ 004641 0015 LOCKO EPMOD FPRUN /04641-0015 @M 004642 5200 JMP 4600 /04642-5200 *@ 004643 4454 JMS I RDREGS /04643-4454 $, 004644 4000 JMS 0000 /04644-4000 @ 004645 5200 JMP 4600 /04645-5200 *@ 004646 4436 JMS I XOPT /04646-4436 $^ 004647 0101 AND C200 /04647-0101 AA 004650 7650 SNA CLA /04650-7650 >( 004651 5254 JMP 4654 /04651-5254 *, 004652 4457 JMS I ABORT /04652-4457 $/ 004653 5201 JMP 4601 /04653-5201 *A 004654 2145 ISZ CNTSTP /04654-2145 Q% 004655 5257 JMP 4657 /04655-5257 */ 004656 4460 JMS I NORUN /04656-4460 $0 004657 6565 FMDO /04657-6565 55 004660 1145 TAD CNTSTP /04660-1145 I% 004661 1365 TAD (-130 /04661-1365 K5 004662 7450 SNA /04662-7450 <( 004663 5272 JMP 4672 /04663-5272 *: 004664 1364 TAD (-17 /04664-1364 K4 004665 7640 SZA CLA /04665-7640 > 004666 5236 JMP 4636 /04666-5236 *^ /DJFPAB PAL8-V50X 06-OCT-90 PAGE 1-118 004667 1363 TAD 4763 /04667-1363 K3 004670 3241 DCA 4641 /04670-3241 Z! 004671 5236 JMP 4636 /04671-5236 *^ 004672 1362 TAD 4762 /04672-1362 K2 004673 3241 DCA 4641 /04673-3241 Z! 004674 5236 JMP 4636 /04674-5236 *^ 004675 7200 REC7, CLA /04675-7200 :@ 004676 4453 JMS I CKSTAT /04676-4453 $+ 004677 6010 DPMOD TRPEX LOCKO /04677-6010 0H 004700 5200 JMP 4600 /04700-5200 *@ 004701 4461 JMS I CHKAPT /04701-4461 $1 004702 0000 AND 0000 /04702-0000 @@ 004703 4744 JMS I 4744 /04703-4744 '$ 004704 7213 CLA IAC RTR /04704-7213 :K 004705 7223 CLA CML IAC BSW /04705-7223 :S 004706 4742 JMS I 4742 /04706-4742 '" 004707 0030 AND 0030 /04707-0030 @X 004710 1001 TAD 0001 /04710-1001 HA 004711 0001 AND 0001 /04711-0001 @A 004712 0004 AND 0004 /04712-0004 @D 004713 0005 AND 0005 /04713-0005 @E 004714 0006 AND 0006 /04714-0006 @F 004715 5200 JMP 4600 /04715-5200 *@ 004716 4462 JMS I CHKIDX /04716-4462 $2 004717 0000 AND 0000 /04717-0000 @@ 004720 0000 AND 0000 /04720-0000 @@ 004721 0003 AND 0003 /04721-0003 @C 004722 0000 AND 0000 /04722-0000 @@ 004723 0000 AND 0000 /04723-0000 @@ 004724 0000 AND 0000 /04724-0000 @@ 004725 0001 AND 0001 /04725-0001 @A 004726 0030 AND 0030 /04726-0030 @X 004727 5200 JMP 4600 /04727-5200 *@ 004730 1123 TAD NALL /04730-1123 IS 004731 7640 SZA CLA /04731-7640 > 004732 5200 JMP 4600 /04732-5200 *@ 004733 5761 JMP I 4761 /04733-5761 /1 004734 7763 MQA MQL CLA DAD /04734-7763 ?3 004735 5252 JMP 4652 /04735-5252 ** 004736 0017 FPCA7, 0017 /ALN 7 /04736-0017 @O 004737 0022 0022 /ATX 2 /04737-0022 @R 004740 0006 0006 /STARTD /04740-0006 @F 004741 0026 0026 /ATX 6 /04741-0026 @V 004742 4000 4000 /TRAP4 0 /04742-4000 @ 004743 4742 4742 / 4742 /04743-4742 '" 004744 4507 JMS I 0107 /04744-4507 %G 004745 4507 JMS I 0107 /04745-4507 %G 004746 3060 DCA 0060 /04746-3060 X0 004747 3061 DCA 0061 /04747-3061 X1 /DJFPAB PAL8-V50X 06-OCT-90 PAGE 1-119 004750 1367 TAD 4767 /04750-1367 K7 004751 3034 DCA 0034 /04751-3034 X\ 004752 7330 CLA CLL CML RAR /04752-7330 ;X 004753 4470 JMS I 0070 /04753-4470 $8 004754 7200 CLA /04754-7200 :@ 004755 4477 JMS I 0077 /04755-4477 $? 004756 3062 DCA 0062 /04756-3062 X2 004757 4514 JMS I 0114 /04757-4514 %L 004760 4511 JMS I 0111 /04760-4511 %I 004761 5000 JMP 0000 /04761-5000 (@ 004762 4011 JMS 0011 /04762-4011 I 004763 6011 6011 /04763-6011 0I /MQA MQL CLA SCA /04764-7761 ?1 /SNA CLA /04765-7650 >( /CLA CML BSW /04766-7222 :R /AND 0030 /04767-0030 @X /CLA IAC RAL /04770-7205 :E /AND 0027 /04771-0027 @W /CLA IAC /04772-7201 :A /JMS I 4736 /04773-4736 '^ /CLA RTL /04774-7206 :F /ISZ 0002 /04775-2002 PB /DCA 0103 /04776-3103 YC /JMS I 4675 /04777-4675 &= 004764 7761 004765 7650 004766 7222 004767 0030 004770 7205 004771 0027 004772 7201 004773 4736 004774 7206 004775 2002 004776 3103 004777 4675 5000 PAGE 005000 6552 TST10, FPICL /05000-6552 5* 005001 1324 TAD 5124 /05001-1324 KT 005002 3122 DCA TSTNUM /05002-3122 YR 005003 1377 TAD (REC10 /05003-1377 K? 005004 3156 DCA CODE /05004-3156 Y. 005005 3145 DCA CNTSTP /05005-3145 Y% 005006 1376 TAD (MCOD10 /05006-1376 K> 005007 3157 DCA MCODE /05007-3157 Y/ 005010 1075 TAD C15 /05010-1075 H= 005011 3237 DCA 5037 /05011-3237 Z_ 005012 4451 JMS I PREAPT /05012-4451 $) 005013 1375 TAD (FPCA10 /05013-1375 K= 005014 3774 DCA I (FPCADR /05014-3774 _< 005015 1373 TAD (5252 /05015-1373 K; 005016 3772 DCA I (INDEX+2 /05016-3772 _: 005017 7201 CLA IAC /05017-7201 :A 005020 3771 DCA I (APT /05020-3771 _9 /DJFPAB PAL8-V50X 06-OCT-90 PAGE 1-120 005021 1164 TAD C6410 /05021-1164 I4 DPSEL EXPEX FPENA LOCON 005022 6553 FPCOM /05022-6553 5+ 005023 7330 CLA CLL CML RAR /05023-7330 ;X 005024 6567 FPEP /05024-6567 57 005025 6561 FMODE /05025-6561 51 005026 1146 TAD APTP /05026-1146 I& 005027 6555 FPST /05027-6555 5- 005030 7410 SKP /05030-7410 <H 005031 5234 JMP 5034 /05031-5234 *\ 005032 4452 JMS I SKFGPR /05032-4452 $* 005033 5200 JMP 5000 /05033-5200 *@ 005034 6556 FPRST /05034-6556 5. 005035 3147 DCA STATUS /05035-3147 Y' 005036 4453 JMS I CKSTAT /05036-4453 $+ 005037 0015 LOCKO EPMOD FPRUN /05037-0015 @M 005040 5200 JMP 5000 /05040-5200 *@ 005041 4454 JMS I RDREGS /05041-4454 $, 005042 4000 JMS 0000 /05042-4000 @ 005043 5200 JMP 5000 /05043-5200 *@ 005044 4436 JMS I XOPT /05044-4436 $^ 005045 0101 AND C200 /05045-0101 AA 005046 7650 SNA CLA /05046-7650 >( 005047 5252 JMP 5052 /05047-5252 ** 005050 4457 JMS I ABORT /05050-4457 $/ 005051 5201 JMP 5001 /05051-5201 *A 005052 2145 ISZ CNTSTP /05052-2145 Q% 005053 7410 SKP /05053-7410 <H 005054 4460 JMS I NORUN /05054-4460 $0 005055 6565 FMDO /05055-6565 55 005056 1145 TAD CNTSTP /05056-1145 I% 005057 1370 TAD (-103 /05057-1370 K8 005060 7640 SZA CLA /05060-7640 > 005061 5234 JMP 5034 /05061-5234 *\ 005062 1367 TAD 5167 /05062-1367 K7 005063 3237 DCA 5037 /05063-3237 Z_ 005064 5234 JMP 5034 /05064-5234 *\ 005065 7200 REC10, CLA /05065-7200 :@ 005066 4453 JMS I CKSTAT /05066-4453 $+ 005067 2014 TRPEX LOCKO EPMOD /05067-2014 PL 005070 5200 JMP 5000 /05070-5200 *@ 005071 4461 JMS I CHKAPT /05071-4461 $1 005072 1001 TAD 0001 /05072-1001 HA 005073 1612 TAD I 5012 /05073-1612 NJ 005074 7213 CLA IAC RTR /05074-7213 :K 005075 7223 CLA CML IAC BSW /05075-7223 :S 005076 1610 TAD I 5010 /05076-1610 NH 005077 0013 AND 0013 /05077-0013 @K 005100 5252 JMP 5052 /05100-5252 ** 005101 0000 AND 0000 /05101-0000 @@ 005102 0000 AND 0000 /05102-0000 @@ 005103 0000 AND 0000 /05103-0000 @@ 005104 0000 AND 0000 /05104-0000 @@ 005105 5200 JMP 5000 /05105-5200 *@ /DJFPAB PAL8-V50X 06-OCT-90 PAGE 1-121 005106 4462 JMS I CHKIDX /05106-4462 $2 005107 0000 AND 0000 /05107-0000 @@ 005110 0000 AND 0000 /05110-0000 @@ 005111 5252 JMP 5052 /05111-5252 ** 005112 0000 AND 0000 /05112-0000 @@ 005113 0000 AND 0000 /05113-0000 @@ 005114 0000 AND 0000 /05114-0000 @@ 005115 0000 AND 0000 /05115-0000 @@ 005116 0000 AND 0000 /05116-0000 @@ 005117 5200 JMP 5000 /05117-5200 *@ 005120 1123 TAD NALL /05120-1123 IS 005121 7640 SZA CLA /05121-7640 > 005122 5200 JMP 5000 /05122-5200 *@ 005123 5766 JMP I 5166 /05123-5766 /6 005124 0010 AND 0010 /05124-0010 @H 005125 7610 SKP CLA /05125-7610 >H 005126 4507 JMS I 0107 /05126-4507 %G 005127 4771 JMS I 5171 /05127-4771 '9 005130 3060 DCA 0060 /05130-3060 X0 005131 3061 DCA 0061 /05131-3061 X1 005132 1370 TAD 5170 /05132-1370 K8 005133 3034 DCA 0034 /05133-3034 X\ 005134 1060 TAD 0060 /05134-1060 H0 005135 4470 JMS I 0070 /05135-4470 $8 005136 7200 CLA /05136-7200 :@ 005137 4476 JMS I 0076 /05137-4476 $> 005140 3062 DCA 0062 /05140-3062 X2 005141 4514 JMS I 0114 /05141-4514 %L 005142 4511 JMS I 0111 /05142-4511 %I 005143 2060 ISZ 0060 /05143-2060 P0 005144 2034 ISZ 0034 /05144-2034 P\ 005145 5334 JMP 5134 /05145-5334 +\ 005146 5426 JMP I 0026 /05146-5426 ,V 005147 0000 AND 0000 /05147-0000 @@ 005150 4320 JMS 5120 /05150-4320 #P 005151 1727 TAD I 5127 /05151-1727 OW 005152 0522 AND I 0122 /05152-0522 ER 005153 4006 JMS 0006 /05153-4006 F 005154 0111 AND 0111 /05154-0111 AI 005155 1425 TAD I 0025 /05155-1425 LU 005156 2205 ISZ 5005 /05156-2205 RE 005157 4300 JMS 5100 /05157-4300 #@ 005160 0000 AND 0000 /05160-0000 @@ 005161 7200 CLA /05161-7200 :@ 005162 4512 JMS I 0112 /05162-4512 %J 005163 7006 RTL /05163-7006 8F 005164 7710 SPA CLA /05164-7710 ?H 005165 5426 JMP I 0026 /05165-5426 ,V 005166 5200 JMP 5000 /05166-5200 *@ 005167 2015 ISZ 0015 /05167-2015 PM /MQL CLA DCM /05170-7675 >= /CLA /05171-7200 :@ /7215 /05172-7215 :M /DJFPAB PAL8-V50X 06-OCT-90 PAGE 1-122 /JMP 5052 /05173-5252 ** /CLA IAC /05174-7201 :A /TAD I 5006 /05175-1606 NF /DCA I 0045 /05176-3445 \% /JMP 0065 /05177-5065 (5 005170 7675 005171 7200 005172 7215 005173 5252 005174 7201 005175 1606 005176 3445 005177 5065 5200 PAGE 005200 6552 TST11, FPICL /05200-6552 5* 005201 1073 TAD C11 /05201-1073 H; 005202 3122 DCA TSTNUM /05202-3122 YR 005203 1377 TAD (REC11 /05203-1377 K? 005204 3156 DCA CODE /05204-3156 Y. 005205 3145 DCA CNTSTP /05205-3145 Y% 005206 1376 TAD (MCOD11 /05206-1376 K> 005207 3157 DCA MCODE /05207-3157 Y/ 005210 1075 TAD C15 /05210-1075 H= 005211 3241 DCA 5241 /05211-3241 Z! 005212 4451 JMS I PREAPT /05212-4451 $) 005213 1375 TAD 5375 /05213-1375 K= 005214 3774 DCA I 5374 /05214-3774 _< 005215 1373 TAD 5373 /05215-1373 K; 005216 3772 DCA I 5372 /05216-3772 _: 005217 1371 TAD 5371 /05217-1371 K9 005220 3770 DCA I 5370 /05220-3770 _8 005221 1367 TAD 5367 /05221-1367 K7 005222 3766 DCA I 5366 /05222-3766 _6 005223 1164 TAD C6410 /05223-1164 I4 DPSEL EXPEX FPENA LOCON 005224 6553 FPCOM /05224-6553 5+ 005225 7330 CLA CLL CML RAR /05225-7330 ;X 005226 6567 FPEP /05226-6567 57 005227 6561 FMODE /05227-6561 51 005230 1146 TAD APTP /05230-1146 I& 005231 6555 FPST /05231-6555 5- 005232 7410 SKP /05232-7410 <H 005233 5236 JMP 5236 /05233-5236 *^ 005234 4452 JMS I SKFGPR /05234-4452 $* 005235 5200 JMP 5200 /05235-5200 *@ 005236 6556 FPRST /05236-6556 5. 005237 3147 DCA STATUS /05237-3147 Y' 005240 4453 JMS I CKSTAT /05240-4453 $+ 005241 0015 LOCKO EPMOD FPRUN /05241-0015 @M 005242 5200 JMP 5200 /05242-5200 *@ 005243 4454 JMS I RDREGS /05243-4454 $, 005244 4000 JMS 0000 /05244-4000 @ 005245 5200 JMP 5200 /05245-5200 *@ 005246 4436 JMS I XOPT /05246-4436 $^ 005247 0101 AND C200 /05247-0101 AA /DJFPAB PAL8-V50X 06-OCT-90 PAGE 1-123 005250 7650 SNA CLA /05250-7650 >( 005251 5254 JMP 5254 /05251-5254 *, 005252 4457 JMS I ABORT /05252-4457 $/ 005253 5201 JMP 5201 /05253-5201 *A 005254 2145 ISZ CNTSTP /05254-2145 Q% 005255 7410 SKP /05255-7410 <H 005256 4460 JMS I NORUN /05256-4460 $0 005257 6565 FMDO /05257-6565 55 005260 5236 JMP 5236 /05260-5236 *^ 005261 7200 REC11, CLA /05261-7200 :@ 005262 4453 JMS I CKSTAT /05262-4453 $+ 005263 0014 LOCKO EPMOD /05263-0014 @L 005264 5200 JMP 5200 /05264-5200 *@ 005265 4461 JMS I CHKAPT /05265-4461 $1 005266 1001 TAD 0001 /05266-1001 HA 005267 1617 TAD I 5217 /05267-1617 NO 005270 7213 CLA IAC RTR /05270-7213 :K 005271 7223 CLA CML IAC BSW /05271-7223 :S 005272 1612 TAD I 5212 /05272-1612 NJ 005273 0001 AND 0001 /05273-0001 @A 005274 0002 AND 0002 /05274-0002 @B 005275 0003 AND 0003 /05275-0003 @C 005276 0004 AND 0004 /05276-0004 @D 005277 0005 AND 0005 /05277-0005 @E 005300 0006 AND 0006 /05300-0006 @F 005301 5200 JMP 5200 /05301-5200 *@ 005302 1123 TAD NALL /05302-1123 IS 005303 7640 SZA CLA /05303-7640 > 005304 5200 JMP 5200 /05304-5200 *@ 005305 5765 JMP I 5365 /05305-5765 /5 005306 1100 TAD C177 /05306-1100 I@ 005307 7213 CLA IAC RTR /05307-7213 :K 005310 1110 TAD 0110 /05310-1110 IH 005311 7223 CLA CML IAC BSW /05311-7223 :S 005312 1121 TAD 0121 /05312-1121 IQ 005313 1612 TAD I 5212 /05313-1612 NJ 005314 1030 TAD 0030 /05314-1030 HX 005315 7224 CLA CML RAL /05315-7224 :T 005316 3276 DCA 5276 /05316-3276 Z> 005317 5274 JMP 5274 /05317-5274 *< 005320 3343 DCA 5343 /05320-3343 [# 005321 1020 TAD OPTS /05321-1020 HP 005322 7106 CLL RTL /05322-7106 9F 005323 7004 RAL /05323-7004 8D 005324 1343 TAD 5343 /05324-1343 K# 005325 3020 DCA OPTS /05325-3020 XP 005326 2344 ISZ 5344 /05326-2344 S$ 005327 5274 JMP 5274 /05327-5274 *< 005330 1375 TAD 5375 /05330-1375 K= 005331 7041 CMA IAC /05331-7041 8! 005332 1276 TAD 5276 /05332-1276 J> 005333 7650 SNA CLA /05333-7650 >( /DJFPAB PAL8-V50X 06-OCT-90 PAGE 1-124 005334 5656 JMP I 5256 /05334-5656 .. 005335 4516 JMS I 0116 /05335-4516 %N 005336 5347 JMP 5347 /05336-5347 +' 005337 4512 JMS I 0112 /05337-4512 %J 005340 4524 JMS I 0124 /05340-4524 %T 005341 4527 JMS I 0127 /05341-4527 %W 005342 5656 JMP I 5256 /05342-5656 .. 005343 0000 AND 0000 /05343-0000 @@ 005344 0000 AND 0000 /05344-0000 @@ 005345 4773 JMS I 5373 /05345-4773 '; 005346 5274 JMP 5274 /05346-5274 *< 005347 4323 JMS 5323 /05347-4323 #S 005350 2275 ISZ 5275 /05350-2275 R= 005351 0000 AND 0000 /05351-0000 @@ 005352 7743 MQA CLA DAD /05352-7743 ?# 005353 0000 AND 0000 /05353-0000 @@ 005354 3603 DCA I 5203 /05354-3603 ^C 005355 4300 JMS 5300 /05355-4300 #@ 005356 3607 DCA I 5207 /05356-3607 ^G 005357 4300 JMS 5300 /05357-4300 #@ 005360 0175 AND 0175 /05360-0175 A= 005361 0000 AND 0000 /05361-0000 @@ 005362 0275 AND 5275 /05362-0275 B= 005363 0000 AND 0000 /05363-0000 @@ 005364 0375 AND 5375 /05364-0375 C= 005365 5400 JMP I 0000 /05365-5400 ,@ 005366 7201 CLA IAC /05366-7201 :A 005367 5306 JMP 5306 /05367-5306 +F 005370 7202 CLA BSW /05370-7202 :B 005371 6543 6543 /05371-6543 5# 005372 7200 CLA /05372-7200 :@ 005373 0770 AND I 5370 /05373-0770 G8 005374 7203 CLA IAC BSW /05374-7203 :C 005375 1234 TAD 5234 /05375-1234 J\ /DCA I 5305 /05376-3705 _E /JMP 5261 /05377-5261 *1 005376 3705 005377 5261 5400 PAGE 005400 6552 TST12, FPICL /05400-6552 5* 005401 1074 TAD C12 /05401-1074 H< 005402 3122 DCA TSTNUM /05402-3122 YR 005403 1377 TAD (REC12 /05403-1377 K? 005404 3156 DCA CODE /05404-3156 Y. 005405 3145 DCA CNTSTP /05405-3145 Y% 005406 1376 TAD (MCOD12 /05406-1376 K> 005407 3157 DCA MCODE /05407-3157 Y/ 005410 4451 JMS I PREAPT /05410-4451 $) 005411 1375 TAD 5575 /05411-1375 K= 005412 3774 DCA I 5574 /05412-3774 _< 005413 1165 TAD C2410 /05413-1165 I5 005414 6553 FPCOM /05414-6553 5+ 005415 7330 CLA CLL CML RAR /05415-7330 ;X 005416 6567 FPEP /05416-6567 57 /DJFPAB PAL8-V50X 06-OCT-90 PAGE 1-125 005417 6561 FMODE /05417-6561 51 005420 1146 TAD APTP /05420-1146 I& 005421 6555 FPST /05421-6555 5- 005422 7410 SKP /05422-7410 <H 005423 5226 JMP 5426 /05423-5226 *V 005424 4452 JMS I SKFGPR /05424-4452 $* 005425 5200 JMP 5400 /05425-5200 *@ 005426 6556 FPRST /05426-6556 5. 005427 3147 DCA STATUS /05427-3147 Y' 005430 4453 JMS I CKSTAT /05430-4453 $+ 005431 0015 LOCKO EPMOD FPRUN /05431-0015 @M 005432 5200 JMP 5400 /05432-5200 *@ 005433 4454 JMS I RDREGS /05433-4454 $, 005434 4000 JMS 0000 /05434-4000 @ 005435 5200 JMP 5400 /05435-5200 *@ 005436 4436 JMS I XOPT /05436-4436 $^ 005437 0101 AND C200 /05437-0101 AA 005440 7650 SNA CLA /05440-7650 >( 005441 5244 JMP 5444 /05441-5244 *$ 005442 4457 JMS I ABORT /05442-4457 $/ 005443 5201 JMP 5401 /05443-5201 *A 005444 2145 ISZ CNTSTP /05444-2145 Q% 005445 7410 SKP /05445-7410 <H 005446 4460 JMS I NORUN /05446-4460 $0 005447 6565 FMDO /05447-6565 55 005450 5226 JMP 5426 /05450-5226 *V 005451 7200 REC12, CLA /05451-7200 :@ 005452 4453 JMS I CKSTAT /05452-4453 $+ 005453 0014 LOCKO EPMOD /05453-0014 @L 005454 5200 JMP 5400 /05454-5200 *@ 005455 4461 JMS I CHKAPT /05455-4461 $1 005456 0000 AND 0000 /05456-0000 @@ 005457 7401 7401 /05457-7401 <A 005460 7213 CLA IAC RTR /05460-7213 :K 005461 7223 CLA CML IAC BSW /05461-7223 :S 005462 7356 7356 /05462-7356 ;. 005463 3777 DCA I 5577 /05463-3777 _? 005464 3777 DCA I 5577 /05464-3777 _? 005465 7777 MQA MQL CLA SAM /05465-7777 ?? 005466 4040 JMS 0040 /05466-4040 005467 0505 AND I 0105 /05467-0505 EE 005470 6060 6060 /05470-6060 00 005471 5200 JMP 5400 /05471-5200 *@ 005472 1123 TAD NALL /05472-1123 IS 005473 7640 SZA CLA /05473-7640 > 005474 5200 JMP 5400 /05474-5200 *@ 005475 5773 JMP I 5573 /05475-5773 /; 005476 7777 TSNLST, MQA MQL CLA SAM /05476-7777 ?? 005477 7776 SPA SNA SZL CLA OSR HLT /05477-7776 ?> 005500 7775 MQA MQL CLA DCM /05500-7775 ?= 005501 7774 SPA SNA SZL CLA OSR /05501-7774 ?< 005502 7773 MQA MQL CLA DPIC /05502-7773 ?; /DJFPAB PAL8-V50X 06-OCT-90 PAGE 1-126 005503 7772 SPA SNA SZL CLA HLT /05503-7772 ?: 005504 7771 MQA MQL CLA DPSZ /05504-7771 ?9 005505 7770 SPA SNA SZL CLA /05505-7770 ?8 005506 7767 MQA MQL CLA SWBA /05506-7767 ?7 005507 7766 SMA SZA SNL CLA OSR HLT /05507-7766 ?6 005510 7765 MQA MQL CLA DST /05510-7765 ?5 005511 7764 SMA SZA SNL CLA OSR /05511-7764 ?4 005512 7763 MQA MQL CLA DAD /05512-7763 ?3 005513 7762 SMA SZA SNL CLA HLT /05513-7762 ?2 005514 7761 MQA MQL CLA SCA /05514-7761 ?1 005515 7760 SMA SZA SNL CLA /05515-7760 ?0 005516 7757 MQA CLA SAM /05516-7757 ?/ 005517 7756 SPA SNA CLA OSR HLT /05517-7756 ?. 005520 7755 7755 /05520-7755 ?- 005521 7754 SPA SNA CLA OSR /05521-7754 ?, 005522 0000 AND 0000 /05522-0000 @@ 005523 3200 TSTLST, DCA 5400 /05523-3200 Z@ 005524 3440 DCA I 0040 /05524-3440 \ 005525 3663 DCA I 5463 /05525-3663 ^3 005526 4000 JMS 0000 /05526-4000 @ 005527 4200 JMS 5400 /05527-4200 "@ 005530 4400 JMS I 0000 /05530-4400 $@ 005531 4600 JMS I 5400 /05531-4600 &@ 005532 5000 JMP 0000 /05532-5000 (@ 005533 5200 JMP 5400 /05533-5200 *@ 005534 5400 JMP I 0000 /05534-5400 ,@ 005535 5600 JMP I 5400 /05535-5600 .@ 005536 6000 SKON /05536-6000 0@ 005537 6200 LXM /05537-6200 2@ 005540 6400 6400 /05540-6400 4@ 005541 6600 6600 /05541-6600 6@ 005542 7145 CLL CMA IAC RAL /05542-7145 9% 005543 7150 CLL CMA RAR /05543-7150 9( 005544 7153 CLL CMA IAC RTR /05544-7153 9+ 005545 7156 7156 /05545-7156 9. 005546 7161 CLL CMA CML IAC /05546-7161 91 005547 1055 TAD ACBAD /05547-1055 H- 005550 4502 JMS I 0102 /05550-4502 %B 005551 3057 DCA 0057 /05551-3057 X/ 005552 1056 TAD 0056 /05552-1056 H. 005553 7041 CMA IAC /05553-7041 8! 005554 1057 TAD 0057 /05554-1057 H/ 005555 7640 SZA CLA /05555-7640 > 005556 5711 JMP I 5511 /05556-5711 /I 005557 2311 ISZ 5511 /05557-2311 SI 005560 5711 JMP I 5511 /05560-5711 /I 005561 0000 AND 0000 /05561-0000 @@ 005562 0000 AND 0000 /05562-0000 @@ 005563 2130 ISZ 0130 /05563-2130 QX 005564 7776 SPA SNA SZL CLA OSR HLT /05564-7776 ?> 005565 7252 CLA CMA RTR /05565-7252 :* 005566 7300 CLA CLL /05566-7300 ;@ 005567 0377 AND 5577 /05567-0377 C? 005570 0100 AND 0100 /05570-0100 A@ /DJFPAB PAL8-V50X 06-OCT-90 PAGE 1-127 005571 0160 AND 0160 /05571-0160 A0 005572 0017 AND 0017 /05572-0017 @O 005573 5600 JMP I 5400 /05573-5600 .@ 005574 7201 CLA IAC /05574-7201 :A 005575 7275 7275 /05575-7275 := /JMS 0031 /05576-4031 Y /JMP I 0051 /05577-5451 ,) 005576 4031 005577 5451 5600 PAGE 005600 6552 TST13, FPICL /05600-6552 5* 005601 6561 FMODE /05601-6561 51 005602 1075 TAD C15 /05602-1075 H= 005603 3220 DCA 5620 /05603-3220 ZP 005604 4465 JMS I SETENV /05604-4465 $5 005605 0013 13 /05605-0013 @K TSTNUM 005606 5706 REC13 /05606-5706 /F CODE 005607 4277 MCOD13 /05607-4277 "? MCODE 005610 0000 0000 /05610-0000 @@ FPCF 005611 7401 7401 /05611-7401 <A FPCADR 005612 2410 2410 /05612-2410 TH FPCOM 005613 4000 4000 /05613-4000 @ FPEP 005614 5200 JMP TST13 /05614-5200 *@ ERR 005615 6556 FPRST /05615-6556 5. 005616 3147 DCA STATUS /05616-3147 Y' 005617 4453 JMS I CKSTAT /05617-4453 $+ 005620 0015 LOCKO EPMOD FPRUN /05620-0015 @M 005621 5200 JMP 5600 /05621-5200 *@ 005622 4454 JMS I RDREGS /05622-4454 $, 005623 4000 JMS 0000 /05623-4000 @ 005624 5200 JMP 5600 /05624-5200 *@ 005625 4436 JMS I XOPT /05625-4436 $^ 005626 0101 AND C200 /05626-0101 AA 005627 7650 SNA CLA /05627-7650 >( 005630 5233 JMP 5633 /05630-5233 *[ 005631 4457 JMS I ABORT /05631-4457 $/ 005632 5201 JMP 5601 /05632-5201 *A 005633 2145 ISZ CNTSTP /05633-2145 Q% 005634 7410 SKP /05634-7410 <H 005635 4460 JMS I NORUN /05635-4460 $0 005636 6565 FMDO /05636-6565 55 005637 1145 TAD CNTSTP /05637-1145 I% 005640 1377 TAD 5777 /05640-1377 K? 005641 7440 SZA /05641-7440 < 005642 7410 SKP /05642-7410 <H 005643 5302 JMP 5702 /05643-5302 +B 005644 1376 TAD 5776 /05644-1376 K> 005645 7440 SZA /05645-7440 < 005646 7410 SKP /05646-7410 <H 005647 5303 JMP 5703 /05647-5303 +C 005650 1113 TAD CM13 /05650-1113 IK 005651 7440 SZA /05651-7440 < 005652 7410 SKP /05652-7410 <H 005653 5302 JMP 5702 /05653-5302 +B /DJFPAB PAL8-V50X 06-OCT-90 PAGE 1-128 005654 1376 TAD 5776 /05654-1376 K> 005655 7440 SZA /05655-7440 < 005656 7410 SKP /05656-7410 <H 005657 5303 JMP 5703 /05657-5303 +C 005660 1113 TAD CM13 /05660-1113 IK 005661 7440 SZA /05661-7440 < 005662 7410 SKP /05662-7410 <H 005663 5302 JMP 5702 /05663-5302 +B 005664 1376 TAD 5776 /05664-1376 K> 005665 7440 SZA /05665-7440 < 005666 7410 SKP /05666-7410 <H 005667 5303 JMP 5703 /05667-5303 +C 005670 1375 TAD 5775 /05670-1375 K= 005671 7440 SZA /05671-7440 < 005672 7410 SKP /05672-7410 <H 005673 5302 JMP 5702 /05673-5302 +B 005674 1374 TAD 5774 /05674-1374 K< 005675 7640 SZA CLA /05675-7640 > 005676 7410 SKP /05676-7410 <H 005677 5301 JMP 5701 /05677-5301 +A 005700 5215 JMP 5615 /05700-5215 *M 005701 1105 TAD C2000 /05701-1105 IE 005702 1107 TAD C4000 /05702-1107 IG 005703 1073 TAD C11 /05703-1073 H; 005704 3220 DCA 5620 /05704-3220 ZP 005705 5215 JMP 5615 /05705-5215 *M 005706 7200 REC13, CLA /05706-7200 :@ 005707 4453 JMS I CKSTAT /05707-4453 $+ 005710 6010 DPMOD TRPEX LOCKO /05710-6010 0H 005711 5200 JMP 5600 /05711-5200 *@ 005712 4461 JMS I CHKAPT /05712-4461 $1 005713 0000 AND 0000 /05713-0000 @@ 005714 7424 SNL OSR /05714-7424 <T 005715 7213 CLA IAC RTR /05715-7213 :K 005716 7223 CLA CML IAC BSW /05716-7223 :S 005717 7422 SNL HLT /05717-7422 <R 005720 0000 AND 0000 /05720-0000 @@ 005721 0000 AND 0000 /05721-0000 @@ 005722 0000 AND 0000 /05722-0000 @@ 005723 0004 AND 0004 /05723-0004 @D 005724 0005 AND 0005 /05724-0005 @E 005725 0006 AND 0006 /05725-0006 @F 005726 5200 JMP 5600 /05726-5200 *@ 005727 4462 JMS I CHKIDX /05727-4462 $2 005730 0002 AND 0002 /05730-0002 @B 005731 0000 AND 0000 /05731-0000 @@ 005732 0000 AND 0000 /05732-0000 @@ 005733 0000 AND 0000 /05733-0000 @@ 005734 0000 AND 0000 /05734-0000 @@ 005735 0000 AND 0000 /05735-0000 @@ 005736 0000 AND 0000 /05736-0000 @@ 005737 0000 AND 0000 /05737-0000 @@ /DJFPAB PAL8-V50X 06-OCT-90 PAGE 1-129 005740 5200 JMP 5600 /05740-5200 *@ 005741 1123 TAD NALL /05741-1123 IS 005742 7640 SZA CLA /05742-7640 > 005743 5200 JMP 5600 /05743-5200 *@ 005744 5773 JMP I 5773 /05744-5773 /; 005745 0054 AND 0054 /05745-0054 @, 005746 0055 AND 0055 /05746-0055 @- 005747 0056 AND 0056 /05747-0056 @. 005750 0057 AND 0057 /05750-0057 @/ 005751 0000 AND 0000 /05751-0000 @@ 005752 0060 AND 0060 /05752-0060 @0 005753 0061 AND 0061 /05753-0061 @1 005754 0062 AND 0062 /05754-0062 @2 005755 0000 AND 0000 /05755-0000 @@ 005756 4303 JMS 5703 /05756-4303 #C 005757 1704 TAD I 5704 /05757-1704 OD 005760 0575 AND I 0175 /05760-0575 E= 005761 0000 AND 0000 /05761-0000 @@ 005762 2003 ISZ 0003 /05762-2003 PC 005763 7500 SMA /05763-7500 =@ 005764 0403 AND I 0003 /05764-0403 DC 005765 7500 SMA /05765-7500 =@ 005766 7774 SPA SNA SZL CLA OSR /05766-7774 ?< 005767 2415 ISZ I 0015 /05767-2415 TM 005770 5256 JMP 5656 /05770-5256 *. 005771 3746 DCA I 5746 /05771-3746 _& 005772 4147 JMS 0147 /05772-4147 !' 005773 6000 SKON /05773-6000 0@ 005774 7736 SPA SZL CLA OSR HLT /05774-7736 ?^ 005775 7764 SMA SZA SNL CLA OSR /05775-7764 ?4 005776 7773 MQA MQL CLA DPIC /05776-7773 ?; 005777 7762 SMA SZA SNL CLA HLT /05777-7762 ?2 6000 PAGE 006000 6552 TST14, FPICL /06000-6552 5* 006001 1272 TAD 6072 /06001-1272 J: 006002 3122 DCA TSTNUM /06002-3122 YR 006003 1377 TAD (REC14 /06003-1377 K? 006004 3156 DCA CODE /06004-3156 Y. 006005 3145 DCA CNTSTP /06005-3145 Y% 006006 1376 TAD (MCOD14 /06006-1376 K> 006007 3157 DCA MCODE /06007-3157 Y/ 006010 1075 TAD C15 /06010-1075 H= 006011 3233 DCA 6033 /06011-3233 Z[ 006012 4451 JMS I PREAPT /06012-4451 $) 006013 1375 TAD 6175 /06013-1375 K= 006014 3774 DCA I 6174 /06014-3774 _< 006015 1165 TAD C2410 /06015-1165 I5 006016 6553 FPCOM /06016-6553 5+ 006017 7330 CLA CLL CML RAR /06017-7330 ;X 006020 6567 FPEP /06020-6567 57 006021 6561 FMODE /06021-6561 51 006022 1146 TAD APTP /06022-1146 I& 006023 6555 FPST /06023-6555 5- /DJFPAB PAL8-V50X 06-OCT-90 PAGE 1-130 006024 7410 SKP /06024-7410 <H 006025 5230 JMP 6030 /06025-5230 *X 006026 4452 JMS I SKFGPR /06026-4452 $* 006027 5200 JMP 6000 /06027-5200 *@ 006030 6556 FPRST /06030-6556 5. 006031 3147 DCA STATUS /06031-3147 Y' 006032 4453 JMS I CKSTAT /06032-4453 $+ 006033 0015 LOCKO EPMOD FPRUN /06033-0015 @M 006034 5200 JMP 6000 /06034-5200 *@ 006035 4454 JMS I RDREGS /06035-4454 $, 006036 4000 JMS 0000 /06036-4000 @ 006037 5200 JMP 6000 /06037-5200 *@ 006040 4436 JMS I XOPT /06040-4436 $^ 006041 0101 AND C200 /06041-0101 AA 006042 7650 SNA CLA /06042-7650 >( 006043 5246 JMP 6046 /06043-5246 *& 006044 4457 JMS I ABORT /06044-4457 $/ 006045 5201 JMP 6001 /06045-5201 *A 006046 2145 ISZ CNTSTP /06046-2145 Q% 006047 7410 SKP /06047-7410 <H 006050 4460 JMS I NORUN /06050-4460 $0 006051 6565 FMDO /06051-6565 55 006052 1145 TAD CNTSTP /06052-1145 I% 006053 1373 TAD 6173 /06053-1373 K; 006054 7440 SZA /06054-7440 < 006055 7410 SKP /06055-7410 <H 006056 5264 JMP 6064 /06056-5264 *4 006057 1372 TAD 6172 /06057-1372 K: 006060 7640 SZA CLA /06060-7640 > 006061 7410 SKP /06061-7410 <H 006062 5265 JMP 6065 /06062-5265 *5 006063 5230 JMP 6030 /06063-5230 *X 006064 1371 TAD 6171 /06064-1371 K9 006065 1075 TAD C15 /06065-1075 H= 006066 3233 DCA 6033 /06066-3233 Z[ 006067 5230 JMP 6030 /06067-5230 *X 006070 7200 REC14, CLA /06070-7200 :@ 006071 4453 JMS I CKSTAT /06071-4453 $+ 006072 0014 LOCKO EPMOD /06072-0014 @L 006073 5200 JMP 6000 /06073-5200 *@ 006074 4461 JMS I CHKAPT /06074-4461 $1 006075 0000 AND 0000 /06075-0000 @@ 006076 6122 6122 /06076-6122 1R 006077 7213 CLA IAC RTR /06077-7213 :K 006100 7223 CLA CML IAC BSW /06100-7223 :S 006101 6126 6126 /06101-6126 1V 006102 0001 AND 0001 /06102-0001 @A 006103 3700 DCA I 6100 /06103-3700 _@ 006104 0000 AND 0000 /06104-0000 @@ 006105 7777 MQA MQL CLA SAM /06105-7777 ?? 006106 0000 AND 0000 /06106-0000 @@ 006107 7777 MQA MQL CLA SAM /06107-7777 ?? 006110 5200 JMP 6000 /06110-5200 *@ /DJFPAB PAL8-V50X 06-OCT-90 PAGE 1-131 006111 1123 TAD NALL /06111-1123 IS 006112 7640 SZA CLA /06112-7640 > 006113 5200 JMP 6000 /06113-5200 *@ 006114 5770 JMP I 6170 /06114-5770 /8 006115 0006 AND 0006 /06115-0006 @F 006116 1603 TAD I 6003 /06116-1603 NC 006117 0050 AND 0050 /06117-0050 @( 006120 1604 TAD I 6004 /06120-1604 ND 006121 0000 AND 0000 /06121-0000 @@ 006122 2777 ISZ I 6177 /06122-2777 W? 006123 7777 MQA MQL CLA SAM /06123-7777 ?? 006124 0001 AND 0001 /06124-0001 @A 006125 0675 AND I 6075 /06125-0675 F= 006126 7776 SPA SNA SZL CLA OSR HLT /06126-7776 ?> 006127 7777 MQA MQL CLA SAM /06127-7777 ?? 006130 0000 AND 0000 /06130-0000 @@ 006131 7777 MQA MQL CLA SAM /06131-7777 ?? 006132 5440 JMP I 0040 /06132-5440 , 006133 6171 RBM /06133-6171 19 006134 0000 AND 0000 /06134-0000 @@ 006135 6144 6144 /06135-6144 1$ 006136 6147 6147 /06136-6147 1' 006137 6151 6151 /06137-6151 1) 006140 6153 6153 /06140-6153 1+ 006141 6156 6156 /06141-6156 1. 006142 6162 6162 /06142-6162 12 006143 6165 6165 /06143-6165 15 006144 2301 ISZ 6101 /06144-2301 SA 006145 2425 ISZ I 0025 /06145-2425 TU 006146 2200 ISZ 6000 /06146-2200 R@ 006147 2325 ISZ 6125 /06147-2325 SU 006150 1600 TAD I 6000 /06150-1600 N@ 006151 1517 TAD I 0117 /06151-1517 MO 006152 1600 TAD I 6000 /06152-1600 N@ 006153 2425 ISZ I 0025 /06153-2425 TU 006154 0523 AND I 0123 /06154-0523 ES 006155 0000 AND 0000 /06155-0000 @@ 006156 2705 ISZ I 6105 /06156-2705 WE 006157 0416 AND I 0016 /06157-0416 DN 006160 0523 AND I 0123 /06160-0523 ES 006161 0000 AND 0000 /06161-0000 @@ 006162 2410 ISZ I 0010 /06162-2410 TH 006163 2522 ISZ I 0122 /06163-2522 UR 006164 2300 ISZ 6100 /06164-2300 S@ 006165 0622 AND I 6022 /06165-0622 FR 006166 1100 TAD 0100 /06166-1100 I@ 006167 4302 JMS 6102 /06167-4302 #B 006170 6200 LXM /06170-6200 2@ 006171 3774 DCA I 6174 /06171-3774 _< 006172 7751 MQA CLA DPSZ /06172-7751 ?) 006173 7764 SMA SZA SNL CLA OSR /06173-7764 ?4 006174 7201 CLA IAC /06174-7201 :A 006175 6115 6115 /06175-6115 1M /JMS I 6025 /06176-4625 &U /6070 /06177-6070 08 /DJFPAB PAL8-V50X 06-OCT-90 PAGE 1-132 006176 4625 006177 6070 6200 PAGE 006200 6552 TST15, FPICL /06200-6552 5* 006201 1075 TAD C15 /06201-1075 H= 006202 3122 DCA TSTNUM /06202-3122 YR 006203 1377 TAD (REC15 /06203-1377 K? 006204 3156 DCA CODE /06204-3156 Y. 006205 3145 DCA CNTSTP /06205-3145 Y% 006206 1376 TAD (MCOD15 /06206-1376 K> 006207 3157 DCA MCODE /06207-3157 Y/ 006210 1075 TAD C15 /06210-1075 H= 006211 3253 DCA 6253 /06211-3253 Z+ 006212 4451 JMS I PREAPT /06212-4451 $) 006213 1375 TAD 6375 /06213-1375 K= 006214 3013 DCA 0013 /06214-3013 XK 006215 1374 TAD 6374 /06215-1374 K< 006216 3014 DCA 0014 /06216-3014 XL 006217 1414 TAD I 0014 /06217-1414 LL 006220 3413 DCA I 0013 /06220-3413 \K 006221 1414 TAD I 0014 /06221-1414 LL 006222 3413 DCA I 0013 /06222-3413 \K 006223 1414 TAD I 0014 /06223-1414 LL 006224 3413 DCA I 0013 /06224-3413 \K 006225 1414 TAD I 0014 /06225-1414 LL 006226 3413 DCA I 0013 /06226-3413 \K 006227 1414 TAD I 0014 /06227-1414 LL 006230 3413 DCA I 0013 /06230-3413 \K 006231 1414 TAD I 0014 /06231-1414 LL 006232 3413 DCA I 0013 /06232-3413 \K 006233 1373 TAD 6373 /06233-1373 K; 006234 3772 DCA I 6372 /06234-3772 _: 006235 1165 TAD C2410 /06235-1165 I5 006236 6553 FPCOM /06236-6553 5+ 006237 7330 CLA CLL CML RAR /06237-7330 ;X 006240 6567 FPEP /06240-6567 57 006241 6561 FMODE /06241-6561 51 006242 1146 TAD APTP /06242-1146 I& 006243 6555 FPST /06243-6555 5- 006244 7410 SKP /06244-7410 <H 006245 5250 JMP 6250 /06245-5250 *( 006246 4452 JMS I SKFGPR /06246-4452 $* 006247 5200 JMP 6200 /06247-5200 *@ 006250 6556 FPRST /06250-6556 5. 006251 3147 DCA STATUS /06251-3147 Y' 006252 4453 JMS I CKSTAT /06252-4453 $+ 006253 0015 LOCKO EPMOD FPRUN /06253-0015 @M 006254 5200 JMP 6200 /06254-5200 *@ 006255 4454 JMS I RDREGS /06255-4454 $, 006256 4000 JMS 0000 /06256-4000 @ 006257 5200 JMP 6200 /06257-5200 *@ 006260 4436 JMS I XOPT /06260-4436 $^ 006261 0101 AND C200 /06261-0101 AA 006262 7650 SNA CLA /06262-7650 >( /DJFPAB PAL8-V50X 06-OCT-90 PAGE 1-133 006263 5266 JMP 6266 /06263-5266 *6 006264 4457 JMS I ABORT /06264-4457 $/ 006265 5201 JMP 6201 /06265-5201 *A 006266 2145 ISZ CNTSTP /06266-2145 Q% 006267 7410 SKP /06267-7410 <H 006270 4460 JMS I NORUN /06270-4460 $0 006271 6565 FMDO /06271-6565 55 006272 1145 TAD CNTSTP /06272-1145 I% 006273 1371 TAD 6371 /06273-1371 K9 006274 7440 SZA /06274-7440 < 006275 7410 SKP /06275-7410 <H 006276 5310 JMP 6310 /06276-5310 +H 006277 1370 TAD 6370 /06277-1370 K8 006300 7440 SZA /06300-7440 < 006301 7410 SKP /06301-7410 <H 006302 5313 JMP 6313 /06302-5313 +K 006303 1367 TAD 6367 /06303-1367 K7 006304 7640 SZA CLA /06304-7640 > 006305 7410 SKP /06305-7410 <H 006306 5312 JMP 6312 /06306-5312 +J 006307 5250 JMP 6250 /06307-5250 *( 006310 1366 TAD 6366 /06310-1366 K6 006311 7410 SKP /06311-7410 <H 006312 1365 TAD 6365 /06312-1365 K5 006313 1075 TAD C15 /06313-1075 H= 006314 3253 DCA 6253 /06314-3253 Z+ 006315 5250 JMP 6250 /06315-5250 *( 006316 7200 REC15, CLA /06316-7200 :@ 006317 4453 JMS I CKSTAT /06317-4453 $+ 006320 0414 DIVEX LOCKO EPMOD /06320-0414 DL 006321 5200 JMP 6200 /06321-5200 *@ 006322 4461 JMS I CHKAPT /06322-4461 $1 006323 0000 AND 0000 /06323-0000 @@ 006324 7433 MQL SHL /06324-7433 <[ 006325 7213 CLA IAC RTR /06325-7213 :K 006326 7223 CLA CML IAC BSW /06326-7223 :S 006327 7244 CLA CMA RAL /06327-7244 :$ 006330 3777 DCA I 6377 /06330-3777 _? 006331 3777 DCA I 6377 /06331-3777 _? 006332 7777 MQA MQL CLA SAM /06332-7777 ?? 006333 4040 JMS 0040 /06333-4040 006334 0505 AND I 0105 /06334-0505 EE 006335 6060 6060 /06335-6060 00 006336 5200 JMP 6200 /06336-5200 *@ 006337 4462 JMS I CHKIDX /06337-4462 $2 006340 0000 AND 0000 /06340-0000 @@ 006341 0000 AND 0000 /06341-0000 @@ 006342 0000 AND 0000 /06342-0000 @@ 006343 0000 AND 0000 /06343-0000 @@ 006344 0000 AND 0000 /06344-0000 @@ 006345 0000 AND 0000 /06345-0000 @@ 006346 0000 AND 0000 /06346-0000 @@ /DJFPAB PAL8-V50X 06-OCT-90 PAGE 1-134 006347 0000 AND 0000 /06347-0000 @@ 006350 5200 JMP 6200 /06350-5200 *@ 006351 1123 TAD NALL /06351-1123 IS 006352 7640 SZA CLA /06352-7640 > 006353 5200 JMP 6200 /06353-5200 *@ 006354 5764 JMP I 6364 /06354-5764 /4 006355 7766 SMA SZA SNL CLA OSR HLT /06355-7766 ?6 006356 7271 CLA CMA CML IAC RAR /06356-7271 :9 006357 5557 JMP I 0157 /06357-5557 -/ 006360 6446 6446 /06360-6446 4& 006361 6437 6437 /06361-6437 4_ 006362 6451 6451 /06362-6451 4) 006363 6443 6443 /06363-6443 4# 006364 6400 6400 /06364-6400 4@ 006365 0400 AND I 0000 /06365-0400 D@ 006366 0020 AND 0020 /06366-0020 @P 006367 7756 SPA SNA CLA OSR HLT /06367-7756 ?. 006370 7745 MQA CLA DST /06370-7745 ?% 006371 7727 MQA MQL CLA DVI /06371-7727 ?W 006372 7201 CLA IAC /06372-7201 :A 006373 7426 SNL OSR HLT /06373-7426 <V 006374 7353 CLA CLL CMA IAC RTR /06374-7353 ;+ 006375 7212 CLA RTR /06375-7212 :J /JMP 6237 /06376-5237 *_ /CIF 114 /06377-6316 3N 006376 5237 006377 6316 6400 PAGE 006400 6552 TST16, FPICL /06400-6552 5* 006401 1377 TAD (16 /06401-1377 K? 006402 3122 DCA TSTNUM /06402-3122 YR 006403 7000 NOP /06403-7000 8@ 006404 3156 DCA CODE /06404-3156 Y. 006405 3145 DCA CNTSTP /06405-3145 Y% 006406 1376 TAD (MCOD16 /06406-1376 K> 006407 3157 DCA MCODE /06407-3157 Y/ 006410 1375 TAD 6575 /06410-1375 K= 006411 3233 DCA 6433 /06411-3233 Z[ 006412 4451 JMS I PREAPT /06412-4451 $) 006413 1374 TAD 6574 /06413-1374 K< 006414 3773 DCA I 6573 /06414-3773 _; 006415 1166 TAD C2760 /06415-1166 I6 006416 6553 FPCOM /06416-6553 5+ 006417 7330 CLA CLL CML RAR /06417-7330 ;X 006420 6567 FPEP /06420-6567 57 006421 6561 FMODE /06421-6561 51 006422 1146 TAD APTP /06422-1146 I& 006423 6555 FPST /06423-6555 5- 006424 7410 SKP /06424-7410 <H 006425 5230 JMP 6430 /06425-5230 *X 006426 4452 JMS I SKFGPR /06426-4452 $* 006427 5200 JMP 6400 /06427-5200 *@ 006430 6556 FPRST /06430-6556 5. /DJFPAB PAL8-V50X 06-OCT-90 PAGE 1-135 006431 3147 DCA STATUS /06431-3147 Y' 006432 4453 JMS I CKSTAT /06432-4453 $+ 006433 0005 EPMOD FPRUN /06433-0005 @E 006434 5200 JMP 6400 /06434-5200 *@ 006435 4454 JMS I RDREGS /06435-4454 $, 006436 4000 JMS 0000 /06436-4000 @ 006437 5200 JMP 6400 /06437-5200 *@ 006440 4436 JMS I XOPT /06440-4436 $^ 006441 0101 AND C200 /06441-0101 AA 006442 7650 SNA CLA /06442-7650 >( 006443 5246 JMP 6446 /06443-5246 *& 006444 4457 JMS I ABORT /06444-4457 $/ 006445 5201 JMP 6401 /06445-5201 *A 006446 2145 ISZ CNTSTP /06446-2145 Q% 006447 7410 SKP /06447-7410 <H 006450 4460 JMS I NORUN /06450-4460 $0 006451 6565 FMDO /06451-6565 55 006452 1145 TAD CNTSTP /06452-1145 I% 006453 1372 TAD 6572 /06453-1372 K: 006454 7440 SZA /06454-7440 < 006455 7410 SKP /06455-7410 <H 006456 5264 JMP 6464 /06456-5264 *4 006457 1371 TAD 6571 /06457-1371 K9 006460 7640 SZA CLA /06460-7640 > 006461 7410 SKP /06461-7410 <H 006462 5267 JMP 6467 /06462-5267 *7 006463 5230 JMP 6430 /06463-5230 *X 006464 1370 TAD 6570 /06464-1370 K8 006465 3233 DCA 6433 /06465-3233 Z[ 006466 5230 JMP 6430 /06466-5230 *X 006467 6552 FPICL /06467-6552 5* 006470 6556 FPRST /06470-6556 5. 006471 3147 DCA STATUS /06471-3147 Y' 006472 4453 JMS I CKSTAT /06472-4453 $+ 006473 0000 0000 /06473-0000 @@ 006474 5200 JMP 6400 /06474-5200 *@ 006475 4461 JMS I CHKAPT /06475-4461 $1 006476 0000 AND 0000 /06476-0000 @@ 006477 6530 6530 /06477-6530 5X 006500 7213 CLA IAC RTR /06500-7213 :K 006501 7223 CLA CML IAC BSW /06501-7223 :S 006502 0000 AND 0000 /06502-0000 @@ 006503 7777 MQA MQL CLA SAM /06503-7777 ?? 006504 5555 JMP I 0155 /06504-5555 -- 006505 5555 JMP I 0155 /06505-5555 -- 006506 0077 AND 0077 /06506-0077 @? 006507 0770 AND I 6570 /06507-0770 G8 006510 7700 SMA CLA /06510-7700 ?@ 006511 5200 JMP 6400 /06511-5200 *@ 006512 4462 JMS I CHKIDX /06512-4462 $2 006513 0000 AND 0000 /06513-0000 @@ 006514 5555 JMP I 0155 /06514-5555 -- /DJFPAB PAL8-V50X 06-OCT-90 PAGE 1-136 006515 5555 JMP I 0155 /06515-5555 -- 006516 0000 AND 0000 /06516-0000 @@ 006517 0000 AND 0000 /06517-0000 @@ 006520 0000 AND 0000 /06520-0000 @@ 006521 0000 AND 0000 /06521-0000 @@ 006522 0000 AND 0000 /06522-0000 @@ 006523 5200 JMP 6400 /06523-5200 *@ 006524 1123 TAD NALL /06524-1123 IS 006525 7640 SZA CLA /06525-7640 > 006526 5200 JMP 6400 /06526-5200 *@ 006527 5767 JMP I 6567 /06527-5767 /7 006530 0400 AND I 0000 /06530-0400 D@ 006531 6542 6542 /06531-6542 5" 006532 6400 6400 /06532-6400 4@ 006533 7205 CLA IAC RAL /06533-7205 :E 006534 0006 AND 0006 /06534-0006 @F 006535 1110 TAD 0110 /06535-1110 IH 006536 7213 CLA IAC RTR /06536-7213 :K 006537 6200 LXM /06537-6200 2@ 006540 4400 JMS I 0000 /06540-4400 $@ 006541 6550 FFST /06541-6550 5( 006542 7777 MQA MQL CLA SAM /06542-7777 ?? 006543 5555 JMP I 0155 /06543-5555 -- 006544 5555 JMP I 0155 /06544-5555 -- 006545 0077 AND 0077 /06545-0077 @? 006546 0770 AND I 6570 /06546-0770 G8 006547 7700 SMA CLA /06547-7700 ?@ 006550 2020 ISZ 0020 /06550-2020 PP 006551 2020 ISZ 0020 /06551-2020 PP 006552 0000 AND 0000 /06552-0000 @@ 006553 0002 AND 0002 /0FPCOM-0002 @B 006554 0005 AND 0005 /06554-0005 @E 006555 0000 AND 0000 /06555-0000 @@ 006556 0003 AND 0003 /06556-0003 @C 006557 0006 AND 0006 /06557-0006 @F 006560 0001 AND 0001 /06560-0001 @A 006561 0004 AND 0004 /06561-0004 @D 006562 0006 AND 0006 /06562-0006 @F 006563 4523 JMS I 0123 /06563-4523 %S 006564 2520 ISZ I 0120 /06564-2520 UP 006565 0522 AND I 0122 /06565-0522 ER 006566 2305 ISZ 6505 /06566-2305 SE 006567 6600 6600 /06567-6600 6@ 006570 4001 JMS 0001 /06570-4001 A 006571 7672 SNA SZL CLA HLT /06571-7672 >: 006572 7754 SPA SNA CLA OSR /06572-7754 ?, 006573 7201 CLA IAC /06573-7201 :A 006574 6530 6530 /06574-6530 5X 006575 0005 AND 0005 /06575-0005 @E /JMP I 0147 /06576-5547 -' /AND 0016 /06577-0016 @N 006576 5547 006577 0016 /DJFPAB PAL8-V50X 06-OCT-90 PAGE 1-137 6600 PAGE 006600 6552 TST17, FPICL /06600-6552 5* 006601 1377 TAD (17 /06601-1377 K? 006602 3122 DCA TSTNUM /06602-3122 YR 006603 3145 DCA CNTSTP /06603-3145 Y% 006604 1376 TAD (REC17 /06604-1376 K> 006605 3156 DCA CODE /06605-3156 Y. 006606 4451 JMS I PREAPT /06606-4451 $) 006607 1375 TAD 6775 /06607-1375 K= 006610 3774 DCA I 6774 /06610-3774 _< 006611 1165 TAD C2410 /06611-1165 I5 006612 6553 FPCOM /06612-6553 5+ 006613 7330 CLA CLL CML RAR /06613-7330 ;X 006614 6567 FPEP /06614-6567 57 006615 1146 TAD APTP /06615-1146 I& 006616 6555 FPST /06616-6555 5- 006617 5222 JMP 6622 /06617-5222 *R 006620 6554 FPHLT /06620-6554 5, 006621 5224 JMP 6624 /06621-5224 *T 006622 4452 JMS I SKFGPR /06622-4452 $* 006623 5200 JMP 6600 /06623-5200 *@ 006624 3140 DCA 0140 /06624-3140 Y 006625 2140 ISZ 0140 /06625-2140 Q 006626 5225 JMP 6625 /06626-5225 *U 006627 4452 JMS I SKFGPR /06627-4452 $* 006630 5200 JMP 6600 /06630-5200 *@ 006631 7200 REC17, CLA /06631-7200 :@ 006632 4453 JMS I CKSTAT /06632-4453 $+ 006633 0014 LOCKO EPMOD /06633-0014 @L 006634 5200 JMP 6600 /06634-5200 *@ 006635 4461 JMS I CHKAPT /06635-4461 $1 006636 0000 AND 0000 /06636-0000 @@ 006637 3747 DCA I 6747 /06637-3747 _' 006640 7213 CLA IAC RTR /06640-7213 :K 006641 7223 CLA CML IAC BSW /06641-7223 :S 006642 3746 DCA I 6746 /06642-3746 _& 006643 0001 AND 0001 /06643-0001 @A 006644 0002 AND 0002 /06644-0002 @B 006645 0003 AND 0003 /06645-0003 @C 006646 0004 AND 0004 /06646-0004 @D 006647 0005 AND 0005 /06647-0005 @E 006650 0006 AND 0006 /06650-0006 @F 006651 5200 JMP 6600 /06651-5200 *@ 006652 6552 FPICL /06652-6552 5* 006653 4465 JMS I SETENV /06653-4465 $5 006654 0017 0017 /06654-0017 @O TSTNUM 006655 6677 6677 /06655-6677 6? CODE 006656 0000 0000 /06656-0000 @@ MCODE 006657 0000 0000 /06657-0000 @@ FPCF 006660 7443 7443 /06660-7443 <# FPCADR 006661 2410 2410 /06661-2410 TH FPCOM 006662 4000 4000 /06662-4000 @ FPEP /DJFPAB PAL8-V50X 06-OCT-90 PAGE 1-138 006663 5252 JMP 6652 /06663-5252 ** ERR 006664 6556 FPRST /06664-6556 5. 006665 3147 DCA STATUS /06665-3147 Y' 006666 4453 JMS I CKSTAT /06666-4453 $+ 006667 0017 LOCKO EPMOD FPPAU FPRUN /06667-0017 @O 006670 5252 JMP 6652 /06670-5252 ** 006671 6554 FPHLT /06671-6554 5, 006672 3140 DCA 0140 /06672-3140 Y 006673 2140 ISZ 0140 /06673-2140 Q 006674 5273 JMP 6673 /06674-5273 *; 006675 4452 JMS I SKFGPR /06675-4452 $* 006676 5252 JMP 6652 /06676-5252 ** 006677 7200 CLA /06677-7200 :@ 006700 4453 JMS I CKSTAT /06700-4453 $+ 006701 1014 HLTEX LOCKO EPMOD /06701-1014 HL 006702 5252 JMP 6652 /06702-5252 ** 006703 4461 JMS I CHKAPT /06703-4461 $1 006704 0000 AND 0000 /06704-0000 @@ 006705 7443 DAD /06705-7443 <# 006706 7213 CLA IAC RTR /06706-7213 :K 006707 7223 CLA CML IAC BSW /06707-7223 :S 006710 7443 DAD /06710-7443 <# 006711 0001 AND 0001 /06711-0001 @A 006712 0002 AND 0002 /06712-0002 @B 006713 0003 AND 0003 /06713-0003 @C 006714 0004 AND 0004 /06714-0004 @D 006715 0005 AND 0005 /06715-0005 @E 006716 0006 AND 0006 /06716-0006 @F 006717 5252 JMP 6652 /06717-5252 ** 006720 6552 FPICL /06720-6552 5* 006721 1373 TAD 6773 /06721-1373 K; 006722 3156 DCA CODE /06722-3156 Y. 006723 4451 JMS I PREAPT /06723-4451 $) 006724 1372 TAD 6772 /06724-1372 K: 006725 3774 DCA I 6774 /06725-3774 _< 006726 1165 TAD C2410 /06726-1165 I5 006727 7330 CLA CLL CML RAR /06727-7330 ;X 006730 6567 FPEP /06730-6567 57 006731 1146 TAD APTP /06731-1146 I& 006732 6555 FPST /06732-6555 5- 006733 5336 JMP 6736 /06733-5336 +^ 006734 6554 FPHLT /06734-6554 5, 006735 5340 JMP 6740 /06735-5340 + 006736 4452 JMS I SKFGPR /06736-4452 $* 006737 5320 JMP 6720 /06737-5320 +P 006740 3140 DCA 0140 /06740-3140 Y 006741 2140 ISZ 0140 /06741-2140 Q 006742 5341 JMP 6741 /06742-5341 +! 006743 4452 JMS I SKFGPR /06743-4452 $* 006744 5320 JMP 6720 /06744-5320 +P 006745 7200 CLA /06745-7200 :@ 006746 4453 JMS I CKSTAT /06746-4453 $+ 006747 1014 HLTEX LOCKO EPMOD /06747-1014 HL /DJFPAB PAL8-V50X 06-OCT-90 PAGE 1-139 006750 5320 JMP 6720 /06750-5320 +P 006751 4461 JMS I CHKAPT /06751-4461 $1 006752 0000 AND 0000 /06752-0000 @@ 006753 4323 JMS 6723 /06753-4323 #S 006754 7213 CLA IAC RTR /06754-7213 :K 006755 7223 CLA CML IAC BSW /06755-7223 :S 006756 4322 JMS 6722 /06756-4322 #R 006757 0001 AND 0001 /06757-0001 @A 006760 7775 MQA MQL CLA DCM /06760-7775 ?= 006761 7774 SPA SNA SZL CLA OSR /06761-7774 ?< 006762 7773 MQA MQL CLA DPIC /06762-7773 ?; 006763 7772 SPA SNA SZL CLA HLT /06763-7772 ?: 006764 7772 SPA SNA SZL CLA HLT /06764-7772 ?: 006765 5320 JMP 6720 /06765-5320 +P 006766 5771 JMP I 6771 /06766-5771 /9 006767 2515 ISZ I C7777 /06767-2515 UM 006770 0205 AND 6605 /06770-0205 BE 006771 7000 NOP /06771-7000 8@ 006772 4322 JMS 6722 /06772-4322 #R 006773 6745 6745 /06773-6745 7% 006774 7201 CLA IAC /06774-7201 :A 006775 3746 DCA I 6746 /06775-3746 _& /6631 /06776-6631 6Y /AND 0017 /06777-0017 @O 006776 6631 006777 0017 7000 PAGE 007000 6552 FPICL /07000-6552 5* 007001 6554 FPHLT /07001-6554 5, 007002 4465 JMS I SETENV /07002-4465 $5 007003 0017 0017 /07003-0017 @O TSTNUM 007004 7020 7020 /07004-7020 8P CODE 007005 0000 0000 /07005-0000 @@ MCODE 007006 0000 0000 /07006-0000 @@ FPCF 007007 7433 7433 /07007-7433 <[ FPCADR 007010 2410 2410 /07010-2410 TH FPCOM 007011 4000 4000 /07011-4000 @ FPEP 007012 5200 JMP 7000 /07012-5200 *@ ERR 007013 3140 DCA 0140 /07013-3140 Y 007014 2140 ISZ 0140 /07014-2140 Q 007015 5214 JMP 7014 /07015-5214 *L 007016 4452 JMS I SKFGPR /07016-4452 $* 007017 5200 JMP 7000 /07017-5200 *@ 007020 7200 CLA /07020-7200 :@ 007021 4453 JMS I CKSTAT /07021-4453 $+ 007022 1014 HLTEX LOCKO EPMOD /07022-1014 HL 007023 5200 JMP 7000 /07023-5200 *@ 007024 4461 JMS I CHKAPT /07024-4461 $1 007025 0000 AND 0000 /07025-0000 @@ 007026 7435 MQL ASR /07026-7435 <] 007027 7213 CLA IAC RTR /07027-7213 :K /DJFPAB PAL8-V50X 06-OCT-90 PAGE 1-140 007030 7223 CLA CML IAC BSW /07030-7223 :S 007031 0111 AND 0111 /07031-0111 AI 007032 4000 JMS 0000 /07032-4000 @ 007033 5777 JMP I 7177 /07033-5777 /? 007034 7700 SMA CLA /07034-7700 ?@ 007035 7755 7755 /07035-7755 ?- 007036 7765 MQA MQL CLA DST /07036-7765 ?5 007037 7766 SMA SZA SNL CLA OSR HLT /07037-7766 ?6 007040 5200 JMP 7000 /07040-5200 *@ 007041 6554 FPHLT /07041-6554 5, 007042 4465 JMS I SETENV /07042-4465 $5 007043 0017 0017 /07043-0017 @O TSTNUM 007044 7060 7060 /07044-7060 80 CODE 007045 0000 0000 /07045-0000 @@ MCODE 007046 0000 0000 /07046-0000 @@ FPCF 007047 7435 7435 /07047-7435 <] FPCADR 007050 2410 2410 /07050-2410 TH FPCOM 007051 0000 0000 /07051-0000 @@ FPEP 007052 5241 JMP 7041 /07052-5241 *! ERR 007053 3140 DCA 0140 /07053-3140 Y 007054 2140 ISZ 0140 /07054-2140 Q 007055 5254 JMP 7054 /07055-5254 *, 007056 4452 JMS I SKFGPR /07056-4452 $* 007057 5241 JMP 7041 /07057-5241 *! 007060 7200 CLA /07060-7200 :@ 007061 4453 JMS I CKSTAT /07061-4453 $+ 007062 1010 HLTEX LOCKO /07062-1010 HH 007063 5200 JMP 7000 /07063-5200 *@ 007064 4461 JMS I CHKAPT /07064-4461 $1 007065 0000 AND 0000 /07065-0000 @@ 007066 7437 MQL LSR /07066-7437 <_ 007067 7213 CLA IAC RTR /07067-7213 :K 007070 7223 CLA CML IAC BSW /07070-7223 :S 007071 0103 AND 0103 /07071-0103 AC 007072 0200 AND 7000 /07072-0200 B@ 007073 0260 AND 7060 /07073-0260 B0 007074 0277 AND 7077 /07074-0277 B? 007075 0004 AND 0004 /07075-0004 @D 007076 0005 AND 0005 /07076-0005 @E 007077 0006 AND 0006 /07077-0006 @F 007100 5200 JMP 7000 /07100-5200 *@ 007101 6554 FPHLT /07101-6554 5, 007102 4465 JMS I SETENV /07102-4465 $5 007103 0017 AND 0017 /07103-0017 @O TSTNUM 007104 7120 CLL CML /07104-7120 9P CODE 007105 0000 AND 0000 /07105-0000 @@ MCODE 007106 0000 AND 0000 /07106-0000 @@ FPCF 007107 7437 MQL LSR /07107-7437 <_ FPCADR 007110 6400 6400 /07110-6400 4@ FPCOM 007111 0000 AND 0000 /07111-0000 @@ FPEP 007112 5301 JMP 7101 /07112-5301 +A 007113 3140 DCA 0140 /07113-3140 Y /DJFPAB PAL8-V50X 06-OCT-90 PAGE 1-141 007114 2140 ISZ 0140 /07114-2140 Q 007115 5314 JMP 7114 /07115-5314 +L 007116 4452 JMS I SKFGPR /07116-4452 $* 007117 5301 JMP 7101 /07117-5301 +A 007120 7200 CLA /07120-7200 :@ 007121 4453 JMS I CKSTAT /07121-4453 $+ 007122 5000 DPMOD HLTEX /07122-5000 (@ 007123 5301 JMP 7101 /07123-5301 +A 007124 4461 JMS I CHKAPT /07124-4461 $1 007125 0000 AND 0000 /07125-0000 @@ 007126 7441 SCA /07126-7441 <! 007127 7213 CLA IAC RTR /07127-7213 :K 007130 7223 CLA CML IAC BSW /07130-7223 :S 007131 0071 AND 0071 /07131-0071 @9 007132 0001 AND 0001 /07132-0001 @A 007133 0004 AND 0004 /07133-0004 @D 007134 0005 AND 0005 /07134-0005 @E 007135 0004 AND 0004 /07135-0004 @D 007136 0005 AND 0005 /07136-0005 @E 007137 0006 AND 0006 /07137-0006 @F 007140 5301 JMP 7101 /07140-5301 +A 007141 1123 TAD NALL /07141-1123 IS 007142 7640 SZA CLA /07142-7640 > 007143 5777 JMP I (TST17 /07143-5777 /? 007144 5345 JMP TST20 /07144-5345 +% 007145 7200 TST20, CLA /07145-7200 :@ 007146 6213 CIF CDF 10 /07146-6213 2K 007147 5776 JMP I (TST20X /07147-5776 /> 007150 7200 TST21, CLA /07150-7200 :@ 007151 6213 CIF CDF 10 /07151-6213 2K 007152 5775 JMP I (TST21X /07152-5775 /= 007153 7200 TST22, CLA /07153-7200 :@ 007154 6213 CIF CDF 10 /07154-6213 2K 007155 5774 JMP I (TST22X /07155-5774 /< 007156 7200 TST23, CLA /07156-7200 :@ 007157 6213 CIF CDF 10 /07157-6213 2K 007160 5773 JMP I (TST23X /07160-5773 /; 007161 4437 TST24, JMS I MSG /07161-4437 $_ 007162 6737 MTST24 /07162-6737 7_ 007163 6213 CIF CDF 10 /07163-6213 2K 007164 5765 JMP I .+1 /07164-5765 /5 007165 1400 TST24X /07165-1400 L@ 007166 7345 CLA CLL CMA IAC RAL /07166-7345 ;% 007167 7521 MQA MQL /07167-7521 =Q 007170 7360 CLA CLL CMA CML /07170-7360 ;0 007171 0277 AND 7077 /07171-0277 B? 007172 7335 7335 /07172-7335 ;] /TAD 7000 /07173-1200 J@ /TAD 0000 /07174-1000 H@ /AND I 7000 /07175-0600 F@ /AND 7000 /07176-0200 B@ /6600 /07177-6600 6@ 007173 1200 /DJFPAB PAL8-V50X 06-OCT-90 PAGE 1-142 007174 1000 007175 0600 007176 0200 007177 6600 7200 PAGE 007200 0000 APT, AND 0000 /07200-0000 @@ 007201 0000 FPCADR, AND 0000 /07201-0000 @@ 007202 0000 INDADR, AND 0000 /07202-0000 @@ 007203 0000 BASADR, AND 0000 /07203-0000 @@ 007204 0000 OPEADR, AND 0000 /07204-0000 @@ 007205 0000 FACEXP, AND 0000 /07205-0000 @@ 007206 0000 FACMA0, AND 0000 /07206-0000 @@ 007207 0000 FACMA1, AND 0000 /07207-0000 @@ 007210 0000 FACMA2, AND 0000 /07210-0000 @@ 007211 0000 FACMA3, AND 0000 /07211-0000 @@ 007212 0000 FACMA4, AND 0000 /07212-0000 @@ 007213 0000 INDEX, AND 0000 /07213-0000 @@ 007214 0000 AND 0000 /07214-0000 @@ 007215 0000 AND 0000 /07215-0000 @@ 007216 0000 AND 0000 /07216-0000 @@ 007217 0000 AND 0000 /07217-0000 @@ 007220 0000 AND 0000 /07220-0000 @@ 007221 0000 AND 0000 /07221-0000 @@ 007222 0000 AND 0000 /07222-0000 @@ 007223 0000 BASEP, AND 0000 /07223-0000 @@ 007224 0000 AND 0000 /07224-0000 @@ 007225 0000 AND 0000 /07225-0000 @@ 007226 0000 AND 0000 /07226-0000 @@ 007227 0000 AND 0000 /07227-0000 @@ 007230 7414 SKP OSR /07230-7414 <L 007231 0000 AND 0000 /07231-0000 @@ 007232 0000 AND 0000 /07232-0000 @@ 007233 7416 SKP OSR HLT /07233-7416 <N 007234 0000 AND 0000 /07234-0000 @@ 007235 0000 AND 0000 /07235-0000 @@ 007236 6122 6122 /07236-6122 1R 007237 0000 AND 0000 /07237-0000 @@ 007240 0000 AND 0000 /07240-0000 @@ 007241 6124 6124 /07241-6124 1T 007242 0001 AND 0001 /07242-0001 @A 007243 0000 AND 0000 /07243-0000 @@ 007244 0000 AND 0000 /07244-0000 @@ 007245 0000 AND 0000 /07245-0000 @@ 007246 0000 AND 0000 /07246-0000 @@ 007247 0000 AND 0000 /07247-0000 @@ 007250 0000 AND 0000 /07250-0000 @@ 007251 0000 AND 0000 /07251-0000 @@ 007252 7213 CLA IAC RTR /07252-7213 :K 007253 0000 AND 0000 /07253-0000 @@ 007254 0000 AND 0000 /07254-0000 @@ 007255 7452 SNA HLT /07255-7452 <* 007256 0000 AND 0000 /07256-0000 @@ /DJFPAB PAL8-V50X 06-OCT-90 PAGE 1-143 007257 0000 AND 0000 /07257-0000 @@ 007260 7463 MQL DAD /07260-7463 <3 007261 0000 AND 0000 /07261-0000 @@ 007262 0000 AND 0000 /07262-0000 @@ 007263 7502 SMA HLT /07263-7502 =B 007264 0000 AND 0000 /07264-0000 @@ 007265 0001 AND 0001 /07265-0001 @A 007266 1645 TAD I 7245 /07266-1645 N% 007267 0000 AND 0000 /07267-0000 @@ 007270 0000 AND 0000 /07270-0000 @@ 007271 7332 CLA CLL CML RTR /07271-7332 ;Z 007272 0000 AND 0000 /07272-0000 @@ 007273 0001 AND 0001 /07273-0001 @A 007274 1615 TAD I 7215 /07274-1615 NM 007275 0002 AND 0002 /07275-0002 @B 007276 1000 TAD 0000 /07276-1000 H@ 007277 7302 CLA CLL BSW /07277-7302 ;B 007300 3000 DCA 0000 /07300-3000 X@ 007301 7300 CLA CLL /07301-7300 ;@ 007302 1010 TAD 0010 /07302-1010 HH 007303 7306 CLA CLL RTL /07303-7306 ;F 007304 3000 DCA 0000 /07304-3000 X@ 007305 7304 CLA CLL RAL /07305-7304 ;D 007306 1020 TAD 0020 /07306-1020 HP 007307 7312 CLA CLL RTR /07307-7312 ;J 007310 3000 DCA 0000 /07310-3000 X@ 007311 7310 CLA CLL RAR /07311-7310 ;H 007312 1040 TAD 0040 /07312-1040 H 007313 7376 7376 /07313-7376 ;> 007314 1050 TAD 0050 /07314-1050 H( 007315 7374 7374 /07315-7374 ;< 007316 1060 TAD 0060 /07316-1060 H0 007317 7372 CLA CLL CMA CML RTR /07317-7372 ;: 007320 1070 TAD 0070 /07320-1070 H8 007321 7370 CLA CLL CMA CML RAR /07321-7370 ;8 007322 1031 TAD 0031 /07322-1031 HY 007323 1617 TAD I 7217 /07323-1617 NO 007324 0400 AND I 0000 /07324-0400 D@ 007325 7354 7354 /07325-7354 ;, 007326 1000 TAD 0000 /07326-1000 H@ 007327 7366 CLA CLL CMA CML RTL /07327-7366 ;6 007330 1010 TAD 0010 /07330-1010 HH 007331 7334 7334 /07331-7334 ;\ 007332 3000 DCA 0000 /07332-3000 X@ 007333 7332 CLA CLL CML RTR /07333-7332 ;Z 007334 1020 TAD 0020 /07334-1020 HP 007335 7364 CLA CLL CMA CML RAL /07335-7364 ;4 007336 1040 TAD 0040 /07336-1040 H 007337 7342 CLA CLL CMA BSW /07337-7342 ;" 007340 3000 DCA 0000 /07340-3000 X@ 007341 7340 CLA CLL CMA /07341-7340 ; 007342 1050 TAD 0050 /07342-1050 H( 007343 7362 CLA CLL CMA CML BSW /07343-7362 ;2 007344 1060 TAD 0060 /07344-1060 H0 007345 7350 CLA CLL CMA RAR /07345-7350 ;( /DJFPAB PAL8-V50X 06-OCT-90 PAGE 1-144 007346 3000 DCA 0000 /07346-3000 X@ 007347 7346 CLA CLL CMA RTL /07347-7346 ;& 007350 1070 TAD 0070 /07350-1070 H8 007351 7400 7400 /07351-7400 <@ 007352 3000 DCA 0000 /07352-3000 X@ 007353 7352 CLA CLL CMA RTR /07353-7352 ;* 007354 3777 DCA I 7377 /07354-3777 _? 007355 3777 DCA I 7377 /07355-3777 _? 007356 7777 MQA MQL CLA SAM /07356-7777 ?? 007357 4040 JMS 0040 /07357-4040 007360 0505 AND I 0105 /07360-0505 EE 007361 6060 6060 /07361-6060 00 007362 3000 DCA 0000 /07362-3000 X@ 007363 7362 CLA CLL CMA CML BSW /07363-7362 ;2 007364 3000 DCA 0000 /07364-3000 X@ 007365 7364 CLA CLL CMA CML RAL /07365-7364 ;4 007366 3000 DCA 0000 /07366-3000 X@ 007367 7366 CLA CLL CMA CML RTL /07367-7366 ;6 007370 3000 DCA 0000 /07370-3000 X@ 007371 7370 CLA CLL CMA CML RAR /07371-7370 ;8 007372 3000 DCA 0000 /07372-3000 X@ 007373 7372 CLA CLL CMA CML RTR /07373-7372 ;: 007374 3000 DCA 0000 /07374-3000 X@ 007375 7374 7374 /07375-7374 ;< 007376 3000 DCA 0000 /07376-3000 X@ 007377 7376 7376 /07377-7376 ;> 007400 0000 AND 0000 /07400-0000 @@ 007401 6000 SKON /07401-6000 0@ 007402 7405 MUY /07402-7405 <E 007403 0005 AND 0005 /07403-0005 @E 007404 0007 AND 0007 /07404-0007 @G 007405 6100 6100 /07405-6100 1@ 007406 7411 NMI /07406-7411 <I 007407 0005 AND 0005 /07407-0005 @E 007410 0007 AND 0007 /07410-0007 @G 007411 7001 IAC /07411-7001 8A 007412 0005 AND 0005 /07412-0005 @E 007413 0007 AND 0007 /07413-0007 @G 007414 7102 CLL BSW /07414-7102 9B 007415 0007 AND 0007 /07415-0007 @G 007416 5067 JMP 0067 /07416-5067 (7 007417 5000 JMP 0000 /07417-5000 (@ 007420 6000 SKON /07420-6000 0@ 007421 7424 SNL OSR /07421-7424 <T 007422 3000 DCA 0000 /07422-3000 X@ 007423 7422 SNL HLT /07423-7422 <R 007424 0000 AND 0000 /07424-0000 @@ 007425 0002 AND 0002 /07425-0002 @B 007426 4205 JMS 7405 /07426-4205 "E 007427 7607 CLA DVI /07427-7607 >G 007430 0400 AND I 0000 /07430-0400 D@ 007431 7354 7354 /07431-7354 ;, 007432 3205 DCA 7405 /07432-3205 ZE 007433 0510 AND I 0110 /07433-0510 EH 007434 0101 AND 0101 /07434-0101 AA /DJFPAB PAL8-V50X 06-OCT-90 PAGE 1-145 007435 0510 AND I 0110 /07435-0510 EH 007436 0076 AND 0076 /07436-0076 @> 007437 0530 AND I 0130 /07437-0530 EX 007440 0066 AND 0066 /07440-0066 @6 007441 4000 JMS 0000 /07441-4000 @ 007442 7441 SCA /07442-7441 <! 007443 0001 AND 0001 /07443-0001 @A 007444 4000 JMS 0000 /07444-4000 @ 007445 7444 SZA OSR /07445-7444 <$ 007446 0510 AND I 0110 /07446-0510 EH 007447 7353 CLA CLL CMA IAC RTR /07447-7353 ;+ 007450 1110 TAD 0110 /07450-1110 IH 007451 7234 7234 /07451-7234 :\ 007452 1775 TAD I 7575 /07452-1775 O= 007453 0000 AND 0000 /07453-0000 @@ 007454 0000 AND 0000 /07454-0000 @@ 007455 0001 AND 0001 /07455-0001 @A 007456 1110 TAD 0110 /07456-1110 IH 007457 7234 7234 /07457-7234 :\ 007460 0520 AND I 0120 /07460-0520 EP 007461 7463 MQL DAD /07461-7463 <3 007462 0103 AND 0103 /07462-0103 AC 007463 0002 AND 0002 /07463-0002 @B 007464 4636 JMS I 7436 /07464-4636 &^ 007465 0000 AND 0000 /07465-0000 @@ 007466 3777 DCA I 7577 /07466-3777 _? 007467 2525 ISZ I 0125 /07467-2525 UU 007470 2525 ISZ I 0125 /07470-2525 UU 007471 0002 AND 0002 /07471-0002 @B 007472 2000 ISZ 0000 /07472-2000 P@ 007473 0000 AND 0000 /07473-0000 @@ 007474 1110 TAD 0110 /07474-1110 IH 007475 7234 7234 /07475-7234 :\ 007476 0530 AND I 0130 /07476-0530 EX 007477 7474 SNA SZL OSR /07477-7474 << 007500 3767 DCA I 7567 /07500-3767 _7 007501 0000 AND 0000 /07501-0000 @@ 007502 7777 MQA MQL CLA SAM /07502-7777 ?? 007503 5555 JMP I 0155 /07503-5555 -- 007504 5555 JMP I 0155 /07504-5555 -- 007505 5555 JMP I 0155 /07505-5555 -- 007506 5555 JMP I 0155 /07506-5555 -- 007507 5555 JMP I 0155 /07507-5555 -- 007510 4001 JMS 0001 /07510-4001 A 007511 7400 7400 /07511-7400 <@ 007512 0000 AND 0000 /07512-0000 @@ 007513 0000 AND 0000 /07513-0000 @@ 007514 0000 AND 0000 /07514-0000 @@ 007515 0000 AND 0000 /07515-0000 @@ 007516 6032 KCC /07516-6032 0Z 007517 4321 JMS 7521 /07517-4321 #Q 007520 5706 JMP I 7506 /07520-5706 /F 007521 0000 AND 0000 /07521-0000 @@ 007522 6031 KSF /07522-6031 0Y 007523 5322 JMP 7522 /07523-5322 +R /DJFPAB PAL8-V50X 06-OCT-90 PAGE 1-146 007524 6036 KRB /07524-6036 0^ 007525 0366 AND 7566 /07525-0366 C6 007526 1364 TAD 7564 /07526-1364 K4 007527 7450 SNA /07527-7450 <( 007530 5763 JMP I 7563 /07530-5763 /3 007531 1362 TAD 7562 /07531-1362 K2 007532 7450 SNA /07532-7450 <( 007533 5761 JMP I 7561 /07533-5761 /1 007534 1362 TAD 7562 /07534-1362 K2 007535 7640 SZA CLA /07535-7640 > 007536 5322 JMP 7522 /07536-5322 +R 007537 5721 JMP I 7521 /07537-5721 /Q 007540 0000 AND 0000 /07540-0000 @@ 007541 4537 JMS I 0137 /07541-4537 %_ 007542 6760 6760 /07542-6760 70 007543 0023 AND 0023 /07543-0023 @S 007544 5740 JMP I 7540 /07544-5740 / 007545 1071 TAD C5 /07545-1071 H9 007546 5736 JMP I 7536 /07546-5736 /^ 007547 6014 6014 /07547-6014 0L 007550 6011 6011 /07550-6011 0I 007551 5350 JMP 7550 /07551-5350 +( 007552 6012 6012 /07552-6012 0J 007553 5344 JMP 7544 /07553-5344 +$ 007554 0300 AND 7500 /07554-0300 C@ 007555 0000 AND 0000 /07555-0000 @@ 007556 0000 AND 0000 /07556-0000 @@ 007557 0000 AND 0000 /07557-0000 @@ 007560 0000 AND 0000 /07560-0000 @@ 007561 0200 AND 7400 /07561-0200 B@ 007562 7771 MQA MQL CLA DPSZ /07562-7771 ?9 007563 7105 CLL IAC RAL /07563-7105 9E 007564 7775 MQA MQL CLA DCM /07564-7775 ?= 007565 7755 7755 /07565-7755 ?- 007566 0177 AND 0177 /07566-0177 A? 007567 6731 6731 /07567-6731 7Y 007570 6143 6143 /07570-6143 1# 007571 7402 HLT /07571-7402 <B 007572 5600 JMP I 7400 /07572-5600 .@ 007573 6713 6713 /07573-6713 7K 007574 7323 CLA CLL CML IAC BSW /07574-7323 ;S 007575 7333 CLA CLL CML IAC RTR /07575-7333 ;[ 007576 6602 6602 /07576-6602 6B 007577 6701 6701 /07577-6701 7A 007600 0000 AND 0000 /07600-0000 @@ 007601 0000 AND 0000 /07601-0000 @@ 007602 0000 AND 0000 /07602-0000 @@ 007603 0000 AND 0000 /07603-0000 @@ 007604 0000 AND 0000 /07604-0000 @@ 007605 0000 AND 0000 /07605-0000 @@ 007606 0000 AND 0000 /07606-0000 @@ 007607 0000 AND 0000 /07607-0000 @@ 007610 0000 AND 0000 /07610-0000 @@ 007611 0000 AND 0000 /07611-0000 @@ 007612 0000 AND 0000 /07612-0000 @@ /DJFPAB PAL8-V50X 06-OCT-90 PAGE 1-147 007613 0000 AND 0000 /07613-0000 @@ 007614 0000 AND 0000 /07614-0000 @@ 007615 0000 AND 0000 /07615-0000 @@ 007616 0000 AND 0000 /07616-0000 @@ 007617 0000 AND 0000 /07617-0000 @@ 007620 0000 AND 0000 /07620-0000 @@ 007621 0000 AND 0000 /07621-0000 @@ 007622 0000 AND 0000 /07622-0000 @@ 007623 0000 AND 0000 /07623-0000 @@ 007624 0000 AND 0000 /07624-0000 @@ 007625 0000 AND 0000 /07625-0000 @@ 007626 0000 AND 0000 /07626-0000 @@ 007627 0000 AND 0000 /07627-0000 @@ 007630 0000 AND 0000 /07630-0000 @@ 007631 0000 AND 0000 /07631-0000 @@ 007632 0000 AND 0000 /07632-0000 @@ 007633 0000 AND 0000 /07633-0000 @@ 007634 0000 AND 0000 /07634-0000 @@ 007635 0000 AND 0000 /07635-0000 @@ 007636 0000 AND 0000 /07636-0000 @@ 007637 0000 AND 0000 /07637-0000 @@ 007640 0000 AND 0000 /07640-0000 @@ 007641 0000 AND 0000 /07641-0000 @@ 007642 0000 AND 0000 /07642-0000 @@ 007643 0000 AND 0000 /07643-0000 @@ 007644 0000 AND 0000 /07644-0000 @@ 007645 0000 AND 0000 /07645-0000 @@ 007646 0000 AND 0000 /07646-0000 @@ 007647 0000 AND 0000 /07647-0000 @@ 007650 0000 AND 0000 /07650-0000 @@ 007651 0000 AND 0000 /07651-0000 @@ 007652 0000 AND 0000 /07652-0000 @@ 007653 0000 AND 0000 /07653-0000 @@ 007654 0000 AND 0000 /07654-0000 @@ 007655 0000 AND 0000 /07655-0000 @@ 007656 0000 AND 0000 /07656-0000 @@ 007657 0000 AND 0000 /07657-0000 @@ 007660 0000 AND 0000 /07660-0000 @@ 007661 0000 AND 0000 /07661-0000 @@ 007662 0000 AND 0000 /07662-0000 @@ 007663 0000 AND 0000 /07663-0000 @@ 007664 0000 AND 0000 /07664-0000 @@ 007665 0000 AND 0000 /07665-0000 @@ 007666 0000 AND 0000 /07666-0000 @@ 007667 0000 AND 0000 /07667-0000 @@ 007670 0000 AND 0000 /07670-0000 @@ 007671 0000 AND 0000 /07671-0000 @@ 007672 0000 AND 0000 /07672-0000 @@ 007673 0000 AND 0000 /07673-0000 @@ $ /DJFPAB PAL8-V50X 06-OCT-90 PAGE 2 ABORT 0057 CTRLG 1055 EXPOV 0100 INIT 0343 AC 0125 CTRLPR 1474 EXPUN 0040 INPUT 0124 ACBAD 0055 CTRLQ 1132 FACEXP 7205 INTFPI 1600 ACS 7403 CTRLS 1200 FACMA0 7206 INTKSF 1000 AC1 0130 CUF 6264 FACMA1 7207 INTRPT 0400 AC2 0133 C1 0066 FACMA2 7210 INTSPL 2737 APT 7200 C1000 0104 FACMA3 7211 INTTEM 0160 APTCDF 2512 C101 0727 FACMA4 7212 INTTSF 1230 APTCHK 2471 C11 0073 FADD 1000 JA 1030 APTNXT 2600 C1111 4320 FADDM 5000 JAC 0007 APTNX2 2554 C12 0074 FDIV 3000 JNE 1040 APTP 0146 C13 0730 FEXIT 0000 LBM 6170 APTPEX 1564 C15 0075 FFST 6550 LDX 0100 APTPRE 1523 C177 0100 FLDA 0000 LOCKO 0010 APTRET 2573 C200 0101 FMDO 6565 LOCON 0010 ASR 7415 C2000 0105 FMODE 6561 LONG 0400 ATX 0020 C21 2467 FMRB 6563 LOOP 0044 BADAC 2200 C23 0076 FMRP 6564 LP1 0513 BASADR 7203 C2370 0162 FMUL 4000 LP2 0523 BASE 0200 C2410 0165 FMULM 7000 LRM 6344 BASEP 7223 C260 0102 FNORM 0004 LRR 6240 BATTMP 3662 C2760 0166 FPCADR 7201 LSR 7417 BRKERR 0056 C277 0103 FPCA10 1606 LTM 6334 CAL 6103 C2770 0163 FPCA3 3746 LUSR 6260 CGCR 0710 C3 0067 FPCA4 1600 LXM 6200 CGERR 0703 C3777 0106 FPCA5 4322 MACFPP 6324 CGET 0600 C4 0070 FPCA6 4543 MACTUA 6332 CGETY 0624 C4000 0107 FPCA7 4736 MADDRS 6363 CGLF 0713 C4015 4321 FPCOM 6553 MANOV 0200 CGN 0700 C44 2470 FPCON 0360 MAPTER 6442 CGNUM 0660 C5 0071 FPENA 0400 MAPTHL 6457 CGRET0 0717 C5777 0110 FPEP 6567 MBADM0 6560 CGRET1 0716 C6400 0167 FPHLT 6554 MBADM1 6576 CGRET2 0715 C6410 0164 FPICL 6552 MBC 6174 CGRET3 0714 C7 0072 FPINT 6551 MCODE 0157 CGY 0675 C77 0077 FPIST 6557 MCOD10 3445 CHKAPT 0061 C7700 0111 FPPAU 0002 MCOD11 3705 CHKIDX 0062 C7777 0115 FPRST 6556 MCOD12 4031 CHRG 1131 DAD 7443 FPRUN 0001 MCOD13 4277 CHRPRT 0045 DCM 7575 FPST 6555 MCOD14 4625 CHRTEM 1241 DIVEX 0400 FSTA 6000 MCOD15 5237 CIFCDF 0161 DPIC 7573 FSUB 2000 MCOD16 5547 CINT 6204 DPMOD 4000 GETC 0042 MCOD2 1703 CKSTAT 0053 DPSEL 4000 GETOUT 1046 MCOD3 2167 CMME 6374 DPSZ 7451 GTFS 0127 MCOD4 2203 CM12 0114 DST 7445 GTFS1 0132 MCOD5 2307 CM13 0113 DVI 7407 GTFS2 0135 MCOD6 2667 CM23 0112 ENVSET 3055 GTS 6210 MCOD7 3103 CM331 0726 EPMOD 0004 HLTEX 1000 MCONTI 6063 CM4 3051 ERRBRK 2231 IDXCHK 2617 MCRLF 6113 CM5 0725 ERRFLD 1742 IND 0600 MDATBR 6533 CNT 0137 ERRMDB 2135 INDADR 7202 MDB 0151 CNTSTP 0145 ERRMPC 2102 INDEX 7213 MDBERR 6305 CODE 0156 ERRTEM 1744 INDX7 0100 MDJFPA 6033 CTGONC 0121 EXPEX 2000 INFLAG 0116 MDJPAS 6730 /DJFPAB PAL8-V50X 06-OCT-90 PAGE 2-1 MEM4K 1000 OPTS 0020 SCA 7441 TST23 7156 MESDEC 1271 ORTAB 2312 SCL 7403 TST23X 1200 MESEND 1312 POP 0041 SDSS 6771 TST24 7161 MESG 1242 POPERR 6210 SETENV 0065 TST24X 1400 MEXPEC 6340 POPR 1432 SHL 7413 TST3 3663 MINCOR 6370 POPRTE 1406 SINT 6254 TST4 4000 MINDXP 6660 PREAPT 0051 SKFGPR 0052 TST5 4200 MINTST 6150 PRSKFG 1634 SKME 6314 TST6 4400 MIRVRM 6424 PRTCHR 1203 SKMM 6324 TST7 4600 MMCREV 6407 PRTNUM 0531 SMME 6364 T2M106 3551 MMINS 0020 PSHERR 6170 SPIN 0530 T2M21 3552 MNORUN 6516 PSHR 1422 SPL 6102 VER 1774 MPC 0150 PSHRTE 1400 STACK 0010 VERMSG 1745 MPCERR 6266 PSPR 1441 START 0200 VERMS0 2000 MPWRLO 6707 PTEMP 1451 STARTD 0006 VERROM 2400 MQ 0126 PUSH 0040 STARTE 0050 WAIT 0505 MQ1 0131 QFLAG 0117 STARTF 0005 XALL 0303 MQ2 0134 RACA 6175 STATCK 1671 XAPT 0074 MRUNAL 6052 RACB 6176 STATUS 0147 XAPTPR 0051 MRUNIN 6551 RACC 6177 STAT2 3470 XCHAPT 0061 MSETSW 6131 RBM 6171 STEMP 1450 XCNSTP 0070 MSG 0037 RDREGS 0054 STKCHK 1452 XCODE 0067 MSGADR 1317 REC10 5065 STKCHR 1465 XCONT 0274 MSGSTS 1343 REC11 5261 STSMSG 0050 XENVSE 0065 MSGSWI 0143 REC12 5451 SUF 6274 XFPCAD 0075 MSGWRD 1320 REC13 5706 SWAB 7431 XIDXCH 0062 MSG36 1321 REC14 6070 SWBA 7447 XOPT 0036 MSKPFG 6247 REC15 6316 TRAP3 3000 XREGSR 0054 MSREQ 6107 REC17 6631 TRPEX 2000 XRUN 0266 MSTAER 6230 REC3 3721 TSNLST 5476 XSET 0235 MSTAT 6346 REC4 4077 TSTC 0153 XSKFLG 0052 MSTEP 6353 REC5 4273 TSTL 0155 XSTATC 0053 MTEST 6357 REC6 4513 TSTLST 5523 XTA 0030 MTSTNO 6115 REC7 4675 TSTN 0154 XTST 0223 MTST24 6737 REGSRD 2011 TSTNUM 0122 XX8 0064 MUNEXI 6614 RETRN0 0441 TST1 3200 X6400 0072 MUNINT 6073 RETRN1 0452 TST1B 3400 X7200 0073 MUY 7405 RETRN2 0463 TST10 5000 X8MOD 0022 MXRERR 6640 RLB 6162 TST11 5200 X8TST 0747 M4 0570 RMR 6173 TST12 5400 YALL 0102 NALL 0123 ROMVER 0063 TST13 5600 NEXIND 0342 RRFMDB 2100 TST14 6000 NEXOK 0334 RRFMPC 2077 TST15 6200 NEXTST 0311 RRIND 2101 TST16 6400 NMI 7411 RRMDB 2076 TST17 6600 NORUN 0060 RRMPC 2075 TST2 3440 NUMCNT 0562 RRR 6250 TST2LP 3447 NUMLEN 0136 RTM 6304 TST2L2 3465 NUMPRT 0043 RTS 6220 TST2NX 3600 NUMSPC 0561 RUNNO 2344 TST20 7145 NUMTST 0066 RUSR 6270 TST20X 0200 OCTNUM 0142 RXM 6230 TST21 7150 ONCONL 0144 SAM 7457 TST21X 0600 OPEADR 7204 SAV2 0474 TST22 7153 OPTRED 1505 SBE 6101 TST22X 1000 ERRORS DETECTED: 0 LINKS GENERATED: 0