|
DataMuseum.dkPresents historical artifacts from the history of: CR80 Hard and Floppy Disks |
This is an automatic "excavation" of a thematic subset of
See our Wiki for more about CR80 Hard and Floppy Disks Excavated with: AutoArchaeologist - Free & Open Source Software. |
top - download
Length: 28290 (0x6e82) Types: TextFile Names: »ALTMID1.S«
└─⟦a930356b2⟧ Bits:30005138 8" CR80 Floppy CR80FD_0101 ( CR/D/1840 NAVN: CR80/FIRMWARE MASTER ) └─⟦789ae8b30⟧ └─ ⟦this⟧ »ALT.D!ALTMID1.S« └─⟦4c0434a26⟧ Bits:30005528 8" CR80 Floppy CR80FD_0108 ( CR/D/1839 KOPI AF CR1840 (CR801 FIRMWARE) ) └─⟦bb02f9661⟧ └─ ⟦this⟧ »ALT.D!ALTMID1.S«
;********************************************************************* * * * CPU CR80101 MICROPROGRAM SOURCE CODE FOR THE CR80 STANDARD * * AND ALTERNATIVE INSTRUCTION SET, VERSION 800918 * THE ALTERNATIVE INSTRUCTION SET INCLUDES THE INSTRUCTIONS * DESCRIBED IN DOCUMENT: COS/006/RSP/0001 * ( CR801/CROPS MICRO CODES , JOERGEN STAAL) * OPDATERET SIDST: 810413 * ( GMOB INKLUDERET) * * * *********************************************************************. ; C-N-C-N-C-N-C-N-C-N-C-N-C-N-C-N-C-N-C-N-C-N-C-N-C-N-C-N-C-N-C-N-C-N-C-N-C-N- . ; . ; ENTRIES AT MAP1, NOT MODIFIED (START:#000) . ; . ; C-N-C-N-C-N-C-N-C-N-C-N-C-N-C-N-C-N-C-N-C-N-C-N-C-N-C-N-C-N-C-N-C-N-C-N-C-N- . JMP MSC ERR TE GETBM BIT11; TRANSFER ERROR. ;UNSET. CLRBM BIT12,PASSD IBPSW. JMP UN GETBM BIT11,BW1 LDD,PSW LDPSW,IBTR. FI LL. FI LL. IOINT: JMP BI30 ARLDO W12,AND ZA,FINT; I/O INTERRUPT. CPIT: JMP BI20 SETBMSW BIT11,PASSD,IBPSW; CPU INTERRUPT. JMP BI10 GETBM BIT11,BTIME RAMF SUBR ZB;TIMER INTERRUPT. ;C1N1. JMP B110 ARW12ADD BASE,ADD DA AX2F,IBDP6. ;C1N2. JMP MAP ID2 MP2 ARW12ADD BASE,ADD DA AX2F,IBDP6,CURR. ;C1N3. JMP M1 ARW12ADD BASE,ADD DA AX2F,IBDP6,CURR. ;C2N1. JMP B211 ARW12ADD PROG,ADD DA AX2F,IBDP6,FNI. ;C2N2. JMP E13 ARW12ADD PROG,ADD DA AX2F,IBDP6,ZEROR. ;C1N4. JMP D111 ARW12ADD BASE,ADD DA AX2F,IBDP6,CURR. ;C3N1. JMP MAP ID2 MP2 ARLDO W12,PASSA AXR2,IOR. ;C4N1. JMP B411 SETX2,W11ADD BASE,PASSA AXR2. ;C4N2. LDCT F1NF ARW11ADD BASE,BW3 ALDD AXR1,IBPSW,CURR. JMP B422 ARW12ADD BASE,BW4 ALDD AXR2,IBIDR,CURR. ;C4N3. JMP B430 ARW12ADD BASE,BW2 ALDD AXR1,IBDP4,CURR. ;C4N4. CJP MAP ID2 MP2 CCTOP3,ARW11ADD BASE,PASSA AXR1,CURR. JMP MAP ID2 MPX2 ARW12ADD BASE,BW2 ALDD AXR2,IBIDR,CURR. ;C4N5. JSB SB45 ARW12ADD BASE,BW2 ALDD AXR1,IBDP4,CURR. JMP MAP IE1 MP1 ARINC PRPC,FNI. ;C4N6. JMP MAP ID2 MP2 ARW11ADD BASE,PASSA AXR1,CURR. ;C4N7. JMP B470 W11ADD BASE,BW2 ALDD AXR1,IBDP4. ;C4N8. JMP B470 W11ADD BASE,BW2 RAMA SUBR CIN DZ AXR1,IBDP4. ;C4N9. CJP B490 CCTOP3,ARW12ADD BASE,PASSA AXR2. JMP E16 W11ADD BASE,BXR2 RAMA SUBR ZB AXR1,CURR. ;C4NA. CJP B4A0 CCTOP3,ARW12ADD BASE,PASSA AXR2. JMP B4A1 W11ADD BASE,BXR2 RAMA SUBR ZB AXR1,CURR. C4NB: LDCT OPC O30 ZERO ARW12ADD BASE,PASSA AXR1,CURR. RPCT MAP ID2 MP2 BW3 LDD,IBIDR. LDCT F1NF . JMP MAP ID2 MP2 . ;C4NC. JSB MAP ID2 MP2 SETBO,AND ZA,OPRNINS. JMP MAP IE1 MP1 ARINC PRPC,FNI. ;C4ND. JMP B4D0 ARW11ADD BASE,BMOD ACLRB AXR1,OPRNINS,CURR. ;C4NE. JMP B4D1 ARW11ADD BASE,BMOD ACLRB AXR1,OPRNINS,CURR. C4NF: JMP B4F0 SETBO,AND ZA. ;C4N10. JMP B4111 ARW12ADD BASE,BW2 ALDD AXR1,IBDP4,CURR. ;C4N11. JMP B4111 ARW12ADD BASE,BW2 RAMA SUBR CIN DZ AXR1,IBDP4,CURR. ;C4N12. CJP B448 CCTOP3,ARW12ADD BASE,BW2 RAMA SUBR DZ AXR1, IBZERO,CURR. JMP B4120 ARW12ADD BASE,BW1 ALDD AXR2,IBIDR,CURR. ;C4N13. JMP MAP ID2 MP2 GETULO,OPRNINS. ;C5N1. LDCT F1NF ARW12ADD BASE,BW3 ALDD AXR2,IBPSW,CURR. L510: JMP B422 BW4 LDA AXR1. ;C5N2. JMP B520 BW2 LDD,IBDP4. ;C5N3. CJP MAP ID2 MP2 CCTOP3,BW2 RAMF ADD ZA AXR1. JMP B530 ARW12ADD BASE,PASSA AXR2,CURR. ;C5N4. CJP MAP ID2 MP2 CCTOP3,ARINC PRPC,SUBR CIN AB BXR1 AXR2. JMP B540 ARW12ADD BASE,PASSA AXR2,CURR. ;C5N5. CJP MAP ID2 MP2 CCTOP3,TROB,PASSA AXR2. JMP MAP ID2 MPX2 ARW12ADD BASE,PASSA AXR2,CURR. ;C5N6. CJP MAP ID2 MP2 CCTOP3. JMP MAP ID2 MPX2 ARW12ADD BASE,PASSA AXR2,CURR. ;C5N7. JSB SB57 BW2 LDD,IBDP4. JMP MAP IE1 MP1 ARINC PRPC,FNI. ;C5N8. JMP B580 ODR,PASSA AXR1. C5N9: LDCT OPC O30 ZERO QREG ADD ZA AXR1. RPCT MAP ID2 MP2 TROB,PASSD,IBDP8. LDCT F1NF . JMP MAP ID2 MP2 . ;C5NA. JMP E2 BXR2 LDA AXR1,OPRNINS. ;C5NB. JMP B5B0 ARINC PRPC,ODR,PASSA AXR1,OPRNINS,FNI. C5NC: JMP B5C0 SETBO,AND ZA. ;C5ND. JMP MAP ID2 MP2 ARINC PRPC,SUBR CIN DA AXR1,IBDP4. ;C5NE. JMP MAP ID2 MP2 ARINC PRPC,ADD DA AXR1,IBDP4. ;C5NF. JMP B5F0 ARW12ADD BASE,BW2 RAMA SUBR DZ AXR2,IBZERO,CURR. ;C5N10. CJP B5100 CCTOP3,BMOD CLRB. JMP B5101 ARINC PRPC,BXR1 RAMF SUBR ZA AXR1,OPRNINS,FNI. ;C6N1. JMP E11 ARADD PRPC,PASSD,IBDP10,FNI. ;C6N2. JMP E11 ARADD PRPC,SUBR CIN DZ,IBDP10,FNI. ;C7N1. JMP M2 BW2 LDD,IBDP8. ;C7N2. JMP M2 BW2 RAMF SUBR CIN DZ,IBDP8. ;C8N1. JMP B810 ARADD PRPC,BW1 LDD,IBDP8,FNI. ;C8N2. JMP B810 ARADD PRPC,BW1 RAMF SUBR CIN DZ,IBDP8,FNI. ;C9N1. JMP B910 ARW12ADD PROG,PASSD,IBDP8,ZEROR. ;C9N2. JMP E13 ARW12ADD PROG,PASSD,IBDP8,ZEROR. ;CAN1. JMP BA10 BREG RAMF SUBR ZB. ;CBN1. JMP UN GETBM BIT11,BW1 LDD,IBPSW. ;CCN1. JMP M1 TROBSW,BW3 LDD,IBDP8. ;CCN2. JMP B910 ARW12ADD BASE,PASSD,IBDP8,CURR. ; 2 INSTRUCTIONS WITH FIXED LOCATION, FIRST IS XXXXXXXXXX10 :. ; -----------------------------------------------------------. JMP BC32 ARLDO W12,BW1 LDD,IBTR,FNI. CCN3: JMP BC31 ARLDO W12,PASSD,IBDP8,ZEROR. ;CCN4. JMP OPC O6 CCN3 GETLM LNG6. ;CDN1. JMP BD10 QREG ADD DA AX2F,IBDP6. ;CDN2. JMP BD21 TRW11REG BASE,QREG ADD DA AX2F,IBDP6. ;CEN1. JMP M2 ARW12ADD BASE,PASSD,IBDP8,CURR. ;CEN2. JMP M2 W11ADD BASE,PASSD,IBDP8. ;CEN3. JMP M1 ARW12ADD BASE,PASSD,IBDP8,CURR. ;CEN4. JMP M1 ARW12ADD PROG,PASSD,IBDP8,ZEROR. ;CFN1. JMP OPC O63 BF11 GETLM LNG0,BW2 LDA AXR2. ;CFN2. JMP OPC O63 BF21 ARW12ADD BASE,BW1 ALDD AXR2,IBPSW. ;CFN3. JMP OPC O63 BF31 ARINC PRPC,OPRNINS,FNI. ;CFN4. JMP OPC O53 BF41 OPRNINS. ;CFN5. JMP OPC O64 BF51 GETLM LNG0,BW3 LDD,IBDP4. ;CFN6. LDCT OPC OIN ZERO TRW11REG BASE,BW3 LDD,IBDP4. JMP OPC O63 BF61 GETBM BIT4. ;C5N11. JMP E2 BXR2 RAMF EXOR AB AXR1,OPRNINS. B111: ARW12ADD BASE,ADD AB AX2F BW1. B110: JMP MAP ID2 MP2 ODR,PASSB BREG,CURW,INCREGI. B112: JMP MAP IE1 MP1 ARINC W12,ODR,PASSB BREG,CURW. B120: JMP MAP ID2 MP2 ARW12ADD BASE,ADD AB AX2F BW1,CURR. B121: JMP MAP IE1 MP1 ARW12REG W12,ODR,AND ZA,CURW. B126: JMP E8 TRW11REG W12,OPRNINS,BMOD CLRB. B127: JMP MAP IE1 MP1 BREG LDD,IBIDR. B210: ARW12ADD PROG,ADD AB AX2F BW1,FNI. B211: JMP E8 OPRNINS,TRW11REG W12,BMOD CLRB. B220: JMP E13 ARW12ADD PROG,ADD AB AX2F BW1,ZEROR. B310: JMP E2 ARW12ADD BASE,PASSA AXR1,OPRNINS,CURW. B410: W11ADD BASE,PASSA AXR2,X2TR. B411: LDCT OPC O30 ZERO BXR2 RAMF ADD DA AXR2 CIN,IBDP4. ARW12ADD BASE,BXR1 RAMA ADD DA AXR1 CIN,IBDP4,CURR. RPCT B412 ATSW11REG W11,ODR,PASSD,IBIDR,CURW. JMP B413 OPRNINS ; "END LOOP". B412: ARINC W12,OPRNINS,CURR ; "START LOOP". RPCT B412 ARINC W11,ODR,PASSD,IBIDR,CURW ; "LOOP". B413: JMP MAP IE1 MP1 ARINC PRPC, BMOD CLRB,FNI; "END LOOP". B420: ARADD W12,BW4 ALDD AXR2,IBIDR,CURR. B422: JMP B423 QREG DZ,IBIDR,PSW UPDCC. ; 4 INSTRUCTIONS WITH FIXED LOCATION, FIRST IS XXXXXXXXXX00 :. ; -----------------------------------------------------------. B423: RPCT OPC SQL B423 BW1 RAMQD AND ZA,SHIRL. RPCT OPC SQL B423 BW1 RAMQD ADD ZB,SHIRAL ; CNT<>0,SQL=0. JMP B424 TROB,PASSB BW3,OPRNINS ; CNT=0. RPCT OPC SQL B423 BW1 RAMQD ADD AB AW4 ; CNT <> 0, SQL=1. TROB,PASSB BW3,OPRNINS ; CNT=0. B424: CJP B425 CCTPSW NS. JMP B426 ARINC PRPC,BW1 RAMQD SUBR CIN AB AW4,FNI. B425: ARINC PRPC,BW1 RAMQD ADD ZB,SHIRAL,FNI. B426: ARW12REG W12,ODR,PASSQ,PSW LDPSW,IBTR,CURW. JMP MAP IE1 MP1 ARINC W12,ODR,PASSA AW1,CURW. B430: LDCT F1NF QREG ADD ZA AXR2,INCX2P. JMP B522 BW3 LDD,IBIDR. B440: JMP MAP ID2 MPX2 ARW12REG W12,BW2 LDD,IBIDR,CURR. B442: ARINC PRPC,X2TR. JMP B44D SETBO,PASSA AW2,OPRNINS,FNI. B443: JMP MAP IE1 MP1 BXR2 RAMF SUBR CIN DQ,PSW UPDCC,IBIDR. B444: ARINC PRPC,X2TR. JMP B44D CLRBO,PASSA AW2,OPRNINS,FNI. B446: JMP E14 ATSW11REG W11,ODR,ADD CIN ZA AW2,CURW. B448: ARINC PRPC,BMOD CLRB,OPRNINS,FNI. JMP MAP IE1 MP1 BXR2 RAMF EXOR DA AXR2,IBIDR. B44A: JMP MAP IE1 MP1 ARINC PRPC,BXR2 RAMF AND DA AXR2,IBIDR,FNI. BX44A: JMP MAP IE1 MP1 ARW12REG W12,ODR,AND DA AW2,IBIDR,CURW. B44C: JMP MAP IE1 MP1 ARINC PRPC,BXR2 RAMF OR DA AXR2,IBIDR,FNI. BX44C: JMP MAP IE1 MP1 ARW12REG W12,ODR,OR DA AW2,IBIDR,CURW. B44D: JMP MAP IE1 MP1 ARW12REG W11,ODR,PASSD,IBTR,CURW. B44E: JMP MAP IE1 MP1 BXR2 RAMF ADD DQ,PSW UPDCC,IBIDR. SB45: JMP MAP ID2 MP2 PASSD,IBIDR. B451: RTN OPRNINS. B460: JMP E2 ARLDO W12,ADD AB AXR2 BMOD,OPRNINS,IOW. B461: CJP B462 CCTOP3,ARW12ADD BASE,BW2 ALDD AMOD,IBIDR,CURR. JMP E15 ATSW11REG W11,ODR,SUBR ZA AW2,OPRNINS,CURW. B462: JMP E14 ATSW11REG W11,ODR,ADD CIN ZA AW2,OPRNINS,CURW. B470: JMP E3 ARINC PRPC,ODR,ADD AB AW2 BMOD,OPRNINS,FNI. B490: ARINC PRPC,BMOD CLRB,OPRNINS,FNI. JMP MAP IE1 MP1 ARINC W12,ODR,BXR2 RAMA ADD CIN ZB AXR1,CURW. B4A0: JSB S1 ARW11ADD BASE,BXR2 RAMA ADD CIN ZB AXR1,CURR. JMP MAP IE1 MP1 ARINC W12,ODR,PASSD,IBIDR,CURW. B4A1: ARINC PRPC,BMOD CLRB,OPRNINS,FNI. JMP MAP IE1 MP1 ARW12REG W11,ODR,PASSD,IBIDR,CURW. B4B0: JMP E2 ARDEC W12,ODR,PASSQ,CURW. B4C0: JPP E2 ODR,OR DA AW3,IBIDR,CURW. B4C1: RTN ODR,AND DA AW3,IBIDR,CURW. B4C2: ARINC PRPC,BW2 RAMF AND DA AW3,IBIDR,SEMFNI. CJP B4C4 CCT NZ,BW2 LDD,IBIDR. RTN ARW12REG W12,ODR,OR AB AW2 BW3,OPRNINS,CURW. B4C4: RTN ARDEC PRPC. B4C5: JMP MAP ID1 MPM1 TROB,PASSA AMOD. B4D0: JMP MAP IE1 MP1 ARINC PRPC,BXR2 LDD,IBIDR,FNI. B4D1: W12ADD BASE,ADD AB AXR2 BMOD. JMP E2 ARW12REG W12,ODR,PASSD,IBIDR,CURW. B4F0: ARW12ADD BASE,BW3 ALDD AXR1,IBTR,CURR. JMP MAP ID2 MP2 ARINC PRPC,AND DA AW3,IBIDR. B4F1: OPRNINS,FNI. JMP MAP IE1 MP1 ARW12REG W12,ODR,NOTRS DA AW1,IBTR,CURW. B4F2: JMP MAP IE1 MP1 ARW12REG W12,ODR,OR DA AW1,IBTR,CURW. B4100: JMP B4111 BW2 RAMF ADD DA AMOD,IBDP4. B4110: BW2 RAMF SUBR CIN DA AMOD,IBDP4. B4111: JMP MAP ID2 MP2 ARINC PRPC,SUBS CIN DA AW2,IBIDR. B4120: ARINC PRPC,QREG AND AB AW1 BMOD,OPRNINS,FNI. B4121: BW2 RAMF AND DA AW2,IBIDR. JMP E1 ARW12REG W12,ODR,OR AQ AW2,CURW. B4130: JMP E2 ODR,AND DA AW3,IBIDR,CURW. B520: LDCT F1NF QREG ADD ZA AXR2,INCX2P. JMP B522 BW3 RAMF OR ZA AXR1. B522: BXR2 RAMQU SUBR CIN AB AW3. B523: CJP B524 CCT S,SETBM BIT15,CLRB BMOD. RPCT B523 BXR2 RAMQU SUBR CIN AB AW3 ; S=0. CJP B525 CCT S,BXR2 RAMD ADD ZB ; COUNT=0. JMP B526 TROB,BW1 ALDD AW2,IBTR ; S=0. B524: RPCT B523 BXR2 RAMQU ADD AB AW3 ; S=1. CJP B525 CCT S,BXR2 RAMD ADD ZB ; COUNT=0. JMP B526 TROB,BW1 ALDD AW2,IBTR ;S=0. B525: TROB,BW1 ALDD AW2,IBTR ; S=1. BXR2 RAMF OR AB AW1,X2TR. JMP B527 ARINC PRPC,BXR2 RAMF ADD AB AW3,OPRNINS,FNI. B526: BXR2 RAMF NOTRS AB AW1,X2TR. ARINC PRPC,OPRNINS,FNI. B527: JMP MAP IE1 MP1 BXR2 RAMF EXNOR ZQ. B530: JMP MAP ID2 MPX2 ARINC PRPC,BMOD CLRB,OPRNINS,FNI. B540: JMP MAP ID2 MP2 ARW12REG PRPC,SUBR CIN DA AXR1,IBIDR. B550: JMP E7 SETBO,PASSA AXR1,OPRNINS,FNI. B552: JMP E7 CLRBO,PASSA AXR1,OPRNINS,FNI. B554: JMP E1 BXR1 LDD,IBTR. BX554: JMP MAP IE1 MP1 ARW12REG W12,ODR,BXR1 ALDD AXR1,IBIDR,CURW. B561: CJP B562 CCTPSW C,ARINC PRPC,OPRNINS,FNI. JMP MAP IE1 MP1 BXR2 RAMF SUBR AB AW2,PSW. B562: JMP MAP IE1 MP1 BXR2 RAMF SUBR CIN AB AW2,PSW. SB57: JMP MAP ID2 MP2 PASSA AXR1. B581: JMP MAP IE1 MP1 ARLDO W12,ADD DA AXR2,IBTR,IOW. B580: JMP E2 ARLDO W12,ADD AB AXR2 BMOD,OPRNINS,IOW. B594: ARINC PRPC,BMOD CLRB,OPRNINS,FNI. JMP MAP IE1 MP1 BXR1 RAMF ADD ZQ. B5B0: JMP MAP IE1 MP1 ARW12ADD BASE,PASSA AXR2,CURW. B5B1: JMP MAP IE1 MP1 ARW12ADD BASE,ADD DA AXR2,IBTR,CURW. B5C0: JMP MAP ID2 MP2 ARINC PRPC,AND DA AXR1,IBTR. B5E0: JMP MAP ID2 MP2 ARINC PRPC,SUBR CIN AB AW2 BXR1. B5F0: JMP B4121 ARINC PRPC,QREG AND AB AXR1 BMOD,OPRNINS,FNI. B5100: ARINC PRPC,BXR1 RAMF ADD CIN ZB,OPRNINS,FNI. JMP MAP IE1 MP1 BXR2 RAMF ADD CIN ZB. B5101: JMP MAP IE1 MP1 BXR2 RAMF SUBR ZB. FI LL. FI LL. FI LL. FI LL. FI LL. FI LL. FI LL. FI LL. FI LL. FI LL. FI LL. FI LL. FI LL. FI LL. FI LL. FI LL. FI LL. FI LL. FI LL. ; 4 INSTRUCTIONS WITH FIXED LOCATION, FIRST IS XXXXXXXX0000 :. ; -----------------------------------------------------------. TE: JMP B3BD BW2 RAMF SUBR DZ IBZERO; HW ERROR, EMERGENCY. JMP B3BF BW1 IBPSW DZ ADD RAMF BIT12 CLRBM; PARITY ERROR. JMP B3BC BW1 IBPSW DZ ADD RAMF BIT12 CLRBM; TIMEOUT. SETULM LNG5,AND ZA,X1TR; CPU CLEAR. JMP BF15 BW1 LDD,IBTR. ;AIOINT. JMP IOINT TRREG PRPC. ;ACPI. JMP CPIT TRREG PRPC. ;ATIMER. JMP MAP MP1 ID1, BTIME SUBR NOTCIN ZB RAMF. ;A1N2. JMP AL4A2 GETBM BIT8 BREG ZB ADD ALSNOP. ;A1N3. JMP AL4F5 BREG ZB ADD ALSNOP. ;A1N4. JMP AL548 IBPSW BW2 DZ ADD RAMF, GETLM LNG2. ;AIN5. JMP AL55A BW2 IBPSW DZ ADD RAMF, GETLM LNG2. ;A1N6. JMP AL567 ARW12ADD BASE PASSD IBDP8 CURR. UNSETN: JMP AL56B IBPSW PASSD CLRBM BIT12. ;A1N7. JMP AL5C2 BREG ZB ADD ALSNOP. ;A1N1. JMP AL3C0 BREG PASSB. FI LL. FI LL. FI LL. FI LL. FI LL. FI LL. FI LL. FI LL. ; C-M-C-M-C-M-C-M-C-M-C-M-C-M-C-M-C-M-C-M-C-M-C-M-C-M-C-M-C-M-C-M-C-M-C-M-C-M- . ; . ; ENTRIES AT MAP1, MODIFIED (START #108) . ; . ; C-M-C-M-C-M-C-M-C-M-C-M-C-M-C-M-C-M-C-M-C-M-C-M-C-M-C-M-C-M-C-M-C-M-C-M-C-M- . ;C1M1. JMP B111 BW1 RAMF ADD DA AMOD,IBDP6. ;C1M2. JMP B120 BW1 RAMF ADD DA AMOD,IBDP6. ;C1M3. JMP M1 ARW12ADD BASE, ADD DA AX2F,IBDP6,CURR. ;C2M1. JMP B210 BW1 RAMF ADD DA AMOD,IBDP6. ;C2M2. JMP B220 BW1 RAMF ADD DA AMOD,IBDP6. ;C1M4. JMP D111 ARW12ADD BASE,ADD DA AX2F,IBDP6,CURR. ;C3M1. JMP MAP ID2 MP2 ARLDO W12,ADD AB AXR2 BMOD,IOR. ;C4M1. JMP B410 EXTLM LNG4,SUBR ZB BMOD. ;C4M2. LDCT F1NF ARW11ADD BASE,BW3 ALDD AXR1,IBPSW,CURR. JMP B420 W12ADD BASE,BMOD ACLRB AMOD. ;C4M3. JMP B430 ARW12ADD BASE,BW2 ALDD AXR1,IBDP4,CURR. ;C4M4. CJP MAP ID2 MP2 CCTOP3,ARW11ADD BASE,BMOD ACLRB AXR1,CURR. JMP B440 W12ADD BASE, ADD DA AXR2,IBTR. ;C4M5. JSB SB45 ARW12ADD BASE,BW2 ALDD AXR1,IBDP4,CURR. JMP MAP ID1 MPM1 ARINC PRPC,PASSB BMOD,FNI. ;C4M6. JMP MAP ID2 MP2 ARW11ADD BASE,PASSA AXR1,CURR. ;C4M7. JMP B470 W11ADD BASE,BW2 ALDD AXR1,IBDP4. ;C4M8. JMP B470 W11ADD BASE,BW2 RAMA SUBR CIN DZ AXR1,IBDP4. ;C4M9. CJP B490 CCTOP3,ARW12ADD BASE,ADD AB AXR2 BMOD. JMP E16 W11ADD BASE,BXR2 RAMA SUBR ZB AXR1,CURR. ;C4MA. CJP B4A0 CCTOP3,ARW12ADD BASE, ADD AB AXR2 BMOD. JMP B4A1 W11ADD BASE,BXR2 RAMA SUBR ZB AXR1,CURR. ;C4MB. PASSD,IBTR4. CJP C4NB CCT NZ,BMOD CLRB,X2TR. JMP E1 ARINC PRPC,OPRNINS,FNI. FI LL. ;C4MC. JSB MAP ID2 MP2 SETBO,AND ZA,OPRNINS. JMP B4C5 ARINC PRPC,FNI. ;C4MD. JMP B4D0 ARW11ADD BASE,BMOD ACLRB AXR1,OPRNINS,CURR. ;C4ME. JMP B4D1 ARW11ADD BASE,PASSA AXR1,OPRNINS,CURR. ;C4MF. JMP C4NF BMOD CLRB,X2TR. ;C4M10. JMP B4100 ARW12ADD BASE,PASSA AXR1,CURR. ;C4M11. JMP B4110 ARW12ADD BASE,PASSA AXR1,CURR. ;C4M12. CJP B448 CCTOP3,ARW12ADD BASE,BW2 RAMA EXNOR DZ AXR1,IBTR, CURR. JMP B4120 ARW12ADD BASE,BW1 ALDD AXR2,IBIDR,CURR. ;C4M13. JMP MAP ID2 MP2 GETULO,OPRNINS. ;C5M1. LDCT F1NF W11ADD BASE,BMOD ACLRB AMOD. JMP L510 ARW12ADD W11,BW3 ALDD AXR2,IBPSW,CURR. ;C5M2. JMP B520 BW2 LDD,IBDP4. ;C5M3. CJP MAP ID2 MP2 CCTOP3,BW2 RAMF ADD ZA AXR1. JMP B530 ARW12ADD BASE,ADD AB AXR2 BMOD,CURR. ;C5M4. CJP MAP ID2 MP2 CCTOP3,ARINC PRPC,SUBR CIN AB BXR1 AXR2. JMP B540 ARW12ADD BASE,ADD AB AXR2 BMOD,CURR. ;C5M5. CJP MAP ID2 MP2 CCTOP3,TROB,PASSA AXR2. JMP MAP ID2 MPX2 ARW12ADD BASE, ADD AB AXR2 BMOD,CURR. ;C5M6. CJP MAP ID2 MP2 CCTOP3,BMOD CLRB. JMP MAP ID2 MPX2 ARW12ADD BASE, ADD DA AXR2,IBTR,CURR. ;C5M7. JSB SB57 BW2 LDD,IBDP4. JMP MAP ID1 MPM1 ARINC PRPC,PASSB BMOD,FNI. ;C5M8. JMP B580 ODR,PASSA AXR1. ;C5M9. PASSD,IBTR4. CJP C5N9 CCT NZ,BMOD CLRB,X2TR. JMP E1 ARINC PRPC,OPRNINS,FNI. FI LL. ;C5MA. JMP E2 BXR2 LDA AXR1,OPRNINS. ;C5MB. JMP B5B1 ARINC PRPC,ODR,BMOD ACLRB AXR1,OPRNINS,FNI. ;C5MC. JMP C5NC BMOD CLRB,X2TR. ;C5MD. JMP B5E0 BW2 RAMF ADD DA AMOD,IBDP4. ;C5ME. JMP B5E0 BW2 RAMF SUBR CIN DA AMOD,IBDP4. ;C5MF. JMP B5F0 ARW12ADD BASE,BW2 RAMA EXNOR DZ AXR2,IBTR,CURR. ;C5M10. CJP B5100 CCTOP3,BMOD CLRB. JMP B5101 ARINC PRPC,BXR1 RAMF SUBR ZA AXR1,OPRNINS,FNI. ;C6M1. JMP E11 ARADD PRPC,ADD DA AMOD,IBDP10,FNI. ;C6M2. JMP E11 ARADD PRPC,SUBR CIN DA AMOD,IBDP10,FNI. ;C7M1. JMP M2 BW2 RAMF ADD DA AMOD,IBDP8. ;C7M2. JMP M2 BW2 RAMF SUBR CIN DA AMOD,IBDP8. ;C8M1. JMP B811 ARADD PRPC,BW1 RAMF ADD DA AMOD,IBDP8,FNI. ;C8M2. JMP B811 ARADD PRPC,BW1 RAMF SUBR CIN DA AMOD,IBDP8,FNI. ;C9M1. JMP B910 ARW12ADD PROG,ADD DA AMOD,IBDP8,ZEROR. ;C9M2. JMP E13 ARW12ADD PROG,ADD DA AMOD,IBDP8,ZEROR. ;CAM1. JMP BA10 BREG RAMF SUBR ZB. ;CBM1. JMP UN GETBM BIT11,BW1 LDD,IBPSW. ;CCM1. JMP M1 TROBSW,BW3 LDD,IBDP8. ;CCM2. JMP B910 ARW12ADD BASE,ADD DA AMOD,IBDP8,CURR. FI LL. ;CCM3. JMP BC30 ARLDO W12,PASSD,IBDP8,ZEROR. ;CCM4. JMP OPC O6 CCN3 GETLM LNG6,BMOD CLRB. ;CDM1. JMP BD10 QREG ADD DA AX2F,IBDP6. ;CDM2. JMP BD20 QREG ADD DA AX2F,IBDP6. ;CEM1. JMP M2 ARW12ADD BASE,ADD DA AMOD,IBDP8,CURR. ;CEM2. JMP M2 W11ADD BASE,ADD DA AMOD,IBDP8. ;CEM3. JMP M1 ARW12ADD BASE,PASSD,IBDP8,CURR. ;CEM4. JMP M1 ARW12ADD PROG,PASSD,IBDP8,ZEROR. ;CFM1. JMP OPC O63 BF11 GETLM LNG0,BW2 RAMF ADD DA AXR2,IBTR. ;CFM2. JMP BF20 W11ADD BASE,BW1 ALDD AXR2,IBPSW. ;CFM3. JMP OPC O63 BF31 ARINC PRPC,OPRNINS,FNI. ;CFM4. JMP OPC O53 BF41 OPRNINS. ;CFM5. JMP OPC O64 BF51 GETLM LNG0,BW3 LDD,IBDP4. ;CFM6. LDCT OPC OIN ZERO W11ADD BASE,BW3 ALDD AMOD,IBDP4. JMP OPC O63 BF61 GETBM BIT4. ;C5M11. JMP E2 BXR2 RAMF EXOR AB AXR1,OPRNINS. B811: BMOD CLRB. B810: JMP MAP ID2 MP2 TRW11REG PRPC,BW1 RAMF ADD AB APROG,OPRNINS. B910: ARLDO W12,BW1 RAMF ADD DA APROG,IBIDR,FNI. JMP MAP ID2 MP2 TRW11REG PRPC,BMOD CLRB,OPRNINS. BA10: CJP E11 CCT Z. JMP E11 ARADD PRPC,SUBR CIN DA AMOD,IBDP8,FNI. BC30: BMOD CLRB. BC31: ARLDO W12,BW1 LDD,IBIDR,FNI. BC32: TRW11REG PRPC,BW1 RAMF ADD CIN ZB,OPRNINS. ARLDO PRPC,PASSA AW1,FNI. JMP MAP IE1 MP1 BR7 RAMF SUBS CIN DA APROG,IBTR. FI LL. FI LL. ; 4 INSTRUCTIONS WITH FIXED LOCATION, FIRST IS XXXXXXXXXX00 :. ; -----------------------------------------------------------. BD10: JMP OPC SQL BD10 GETLM LNG8,BW1 RAMQD ADD ZQ,SHIRLL. W11ADD BASE,BW2 ALDD AMOD,IBTR ; SQL=0. JMP BD11 ARW12ADD W11,BMOD ACLRB AW1,OPRNINS,CURR. W11ADD BASE,BW2 ALDD AMOD,IBTR ; SQL=1. ARW12ADD W11,BMOD ACLRB AW1,OPRNINS,SWPR. JMP MAP IE1 MP1 ARINC PRPC,BREG RAMF AND DA AW2,IBNINS,FNI. BD11: JMP MAP IE1 MP1 ARINC PRPC,BREG RAMF AND DA AW2,IBIDR,FNI. BD20: W11ADD BASE,BMOD ACLRB AMOD. ; 4 INSTRUCTIONS WITH FIXED LOCATION, FIRST IS XXXXXXXXXX00 :. ; -----------------------------------------------------------. BD21: JMP OPC SQL BD21 ARINC PRPC,BW1 RAMQD ADD ZQ,SHIRLL,OPRNINS,FNI. ODR,PASSB BREG ; SQL=0. JMP MAP IE1 MP1 ARW12ADD W11,PASSA AW1,LBW. TROBSW,PASSB BREG ; SQL=1. ODR,PASSD,IBTR. JMP MAP IE1 MP1 ARW12ADD W11,PASSA AW1,UBW. FI LL. FI LL. ; 16 INSTRUCTIONS WITH FIXED LOCATION, FIRST IS XXXXXXXX0000 :. ; ------------------------------------------------------------. BF11: JMP BF12 TROB,BW2 ACLRB AXR2,X1TR. JMP BF14 ARW12ADD BASE,BW2 ACLRB AW2,X1TR,CURR. JMP UN GETBM BIT11,BW1 LDD,IBPSW. JMP UN GETBM BIT11,BW1 LDD,IBPSW. JMP BF17 GETBM BIT1,INCX2P. JMP BF18 ARW12ADD BASE,BW1 RAMA ADD CIN DZ AW2,IBZERO,CURR. JMP BF19 GETBM BIT1,INCX2P. JMP BF1A ARW12ADD BASE,BW1 RAMA SUBR DZ AW2,IBZERO,CURR. JMP BF15 TROB,BW1 LDA AXR2,X1TR. JMP BF16 ARW12ADD BASE,PASSA AW2,X1TR,CURR. JMP BF1C ARINC PRPC,BMOD CLRB,OPRNINS,FNI. JMP BF1D ARW12ADD BASE,BMOD ACLRB AW2,OPRNINS,CURR. JMP BF1E TROBSW,BMOD ACLRB AXR2,OPRNINS. JMP BF1F ARW12ADD BASE,PASSA AW2,OPRNINS,SWPR. JMP E1 ARINC PRPC,OPRNINS,FNI. JMP E1 ARINC PRPC,OPRNINS,FNI. BF12: LDCT F1N7 ARLDO W12,PASSB BXR2,PSW LDPSW,IBTR. JSB SB1 TRW11REG BASE,QREG AND ZQ,INCX1P,CURR. JMP BF13 ARLDO PRPC,PASSA AW1,FNI. BF13: TROB,EXOR DA AW4,IBIDR. ARINC W12,ODR,PASSB BW3,PSW LDPSW,IBTR,CURW. GETBM BIT4,BW1 RAMF ADD CIN DZ,IBZERO. ARINC PRPC,ODR,SUBR ZB BW2,OPRNINS,FNI. JMP MAP IE1 MP1 ARW12ADD BASE,ADD CIN DA AW1,IBTR,CURW. BF14: LDCT F1N7 ARLDO W12,PASSD,IBIDR,PSW LDPSW. JSB SB1 TRW11REG BASE,QREG AND ZQ,INCX1P,CURR. JMP BF13 ARLDO PRPC,PASSA AW1,FNI. BF15: LDCT F1N7 ARLDO W12,PASSB BW1,PSW LDPSW,IBTR. JSB SB1 INCX1P,CURR. JMP BF100 ARLDO PRPC,PASSB BW1,PSW LDPSW,IBIDR,FNI. BF16: LDCT F1N7 ARLDO W12,PASSD,IBIDR,PSW LDPSW. JSB SB1 INCX1P,CURR. JMP BF100 ARLDO PRPC,PASSB BW1,PSW LDPSW,IBIDR,FNI. SB1: RPCT SB1 ARINC W12,BXR1 LDD,INCX1I,CURR. ARINC W12,BW1 LDD,IBIDR,CURR. LDO BASE,BW3 ALDD AW1,IBTR. ARINC W12,BMOD RAMF SUBS CIN DA AW1,IBIDR,CURR. GETBM BIT5. ARINC W12,BPROG LDD,IBIDR,CURR. LDO PROG,BW4 ALDD APROG,IBTR. ARINC W12,BW1 LDD IBIDR,CURR. RTN ARINC W12,BTIME LDD,IBIDR,CURR. BF17: JSB S1 BXR2 RAMF ADD DA AXR2,IBTR. JMP MAP IE1 MP1 BXR2 RAMF ADD DA AXR2,IBTR. BF18: JMP BF1B ARINC PRPC,BW1 RAMF ADD CIN ZB,OPRNINS,FNI. BF19: JSB S1 BXR2 RAMF SUBR CIN DA AXR2,IBTR. JMP MAP IE1 MP1 BXR2 RAMF SUBR CIN DA AXR2,IBTR. BF1A: ARINC PRPC,BW1 RAMF SUBR ZB,OPRNINS,FNI. BF1B: ARW12REG W12,ODR,ADD DA AW1,IBIDR,CURW. ARINC W12,BMOD CLRB,CURR. JMP MAP IE1 MP1 ODR,ADD DA AW1,IBIDR,CURW. BF1C: JMP MAP IE1 MP1 BTIME LDA AXR2. BF1D: JMP MAP IE1 MP1 ARINC PRPC,BTIME LDD,IBIDR,FNI. BF1E: JMP MAP IE1 MP1 ARINC PRPC,BXR2 LDD,IBTR,FNI. BF1F: JMP E2 ODR,PASSD,IBNINS,CURW. BF100: TROB,EXOR DA AW4,IBIDR. ARINC PRPC,OPRNINS,FNI. JMP MAP IE1 MP1 PSW LDPSW,IBTR. BF20: JMP OPC O63 BF21 ARW12ADD W11,BMOD ACLRB AMOD. FI LL. FI LL. FI LL. FI LL. FI LL. ; 16 INSTRUCTIONS WITH FIXED LOCATION, FIRST IS XXXXXXXX0000 :. ; ------------------------------------------------------------. BF21: JMP BF2A ARW12ADD BASE,PASSA AXR2,SWPR. JMP BF22 CURR. JMP E2 BXR2 RAMF EXNOR ZB,OPRNINS. JMP BF23 OPRNINS,CURR. JMP E1 ARINC PRPC,OPRNINS,FNI. JMP E1 ARINC PRPC,OPRNINS,FNI. JMP AL5C0 BW1 PASSB SETBM BIT12, OPRNINS. JMP AL5C0 BW1 PASSB SETBM BIT12 OPRNINS. JMP E2 BXR2 LDA ATIME,OPRNINS. JMP E2 ODR,PASSA ATIME,OPRNINS,CURW. JMP BF27 GETBM BIT5,OPRNINS. JMP BF28 ARINC PRPC,OPRNINS,FNI. JMP BF24 TROB,PASSA AXR2,OPRNINS. JMP BF25 GETBM BIT5,OPRNINS,CURR. JMP E2 BXR2 RAMF SUBS CIN ZB,OPRNINS. JMP BF26 OPRNINS,CURR. BF22: JMP BF2A ARW12ADD BASE,PASSD,IBIDR,SWPR. BF23: JMP E2 ODR,EXNOR DZ,IBIDR,CURW. BF24: JMP BF29 GETBM BIT5,BW1 LDD,PSW LDPSW,IBTR. BF25: JMP BF29 BW1 LDD,PSW LDPSW,IBIDR. BF26: JMP E2 ODR,SUBR CIN DZ,IBIDR,CURW. BF27: JMP MAP IE1 MP1 ARINC PRPC,BXR2 RAMF EXOR DA AW1,IBTR,FNI. BF28: GETBM BIT5. JMP MAP IE1 MP1 ARW12REG W12,ODR,EXOR DA AW1,IBTR,CURW. BF29: TROB,EXOR DA AW1,IBTR. JMP MAP IE1 MP1 ARINC PRPC,PSW LDPSW,IBTR,FNI. BF2A: JMP E1 ARW12REG PRPC,OPRNINS,FNI.