|
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: 63602 (0xf872)
Names: »F8047DSRC«
└─⟦defd908de⟧ Bits:30005536 8" CR80 Floppy CR80FD_0243 ( CR/D/2198 )
└─⟦6cf532d85⟧
└─ ⟦this⟧ »F8047DSRC«
0x0000…0020 57 4f 52 44 4c 45 4e 47 54 48 3d 35 36 20 2c 0a 20 50 52 4f 4d 57 49 44 54 48 3d 38 20 2c 0a 4a ┆WORDLENGTH=56 , PROMWIDTH=8 , J┆ 0x0020…0040 55 4d 50 44 45 44 3d 31 20 2c 0a 50 52 4f 4d 4c 45 4e 47 54 48 3d 31 30 32 34 0a 0a 2e 0a 0a 20 ┆UMPDED=1 , PROMLENGTH=1024 . ┆ 0x0040…0060 31 20 20 35 20 31 30 20 20 20 30 20 2c 0a 20 32 20 32 34 20 38 20 20 20 30 20 2c 0a 20 33 20 20 ┆1 5 10 0 , 2 24 8 0 , 3 ┆ 0x0060…0080 30 20 31 20 20 20 30 20 2c 0a 20 34 20 20 31 34 20 31 20 20 20 30 20 2c 0a 20 35 20 20 31 20 34 ┆0 1 0 , 4 14 1 0 , 5 1 4┆ 0x0080…00a0 20 20 20 31 20 2c 0a 20 36 20 31 35 20 32 20 20 20 31 20 2c 0a 20 37 20 31 37 20 32 20 20 20 30 ┆ 1 , 6 15 2 1 , 7 17 2 0┆ 0x00a0…00c0 20 2c 0a 20 38 20 31 39 20 33 20 20 20 30 20 2c 0a 20 39 20 32 32 20 32 20 20 20 31 20 2c 0a 31 ┆ , 8 19 3 0 , 9 22 2 1 , 1┆ 0x00c0…00e0 30 20 33 32 20 31 20 20 20 30 20 2c 0a 31 31 20 33 33 20 33 20 20 20 30 20 2c 0a 31 32 20 33 36 ┆0 32 1 0 , 11 33 3 0 , 12 36┆ 0x00e0…0100 20 34 20 20 20 30 20 2c 0a 31 33 20 34 30 20 37 20 31 32 35 20 2c 0a 31 34 20 34 37 20 31 20 20 ┆ 4 0 , 13 40 7 125 , 14 47 1 ┆ 0x0100…0120 20 31 20 2c 0a 31 35 20 34 38 20 31 20 20 20 31 20 2c 0a 31 36 20 34 39 20 31 20 20 20 31 20 2c ┆ 1 , 15 48 1 1 , 16 49 1 1 ,┆ 0x0120…0140 0a 31 37 20 35 30 20 31 20 20 20 31 20 2c 0a 31 38 20 35 31 20 31 20 20 20 31 20 2c 0a 31 39 20 ┆ 17 50 1 1 , 18 51 1 1 , 19 ┆ 0x0140…0160 35 32 20 32 20 20 20 30 20 2c 0a 32 30 20 35 34 20 32 20 20 20 32 20 2c 0a 2e 0a 0a 0a 20 55 4e ┆52 2 0 , 20 54 2 2 , . UN┆ 0x0160…0180 43 3d 31 2c 33 0a 20 43 4c 49 4e 3d 31 2c 34 0a 20 4a 5a 3d 31 35 2c 35 0a 20 43 4a 53 3d 31 34 ┆C=1,3 CLIN=1,4 JZ=15,5 CJS=14┆ 0x0180…01a0 2c 35 0a 20 4a 4d 50 3d 31 33 2c 35 0a 20 43 4a 50 3d 31 32 2c 35 0a 20 50 43 4c 43 3d 31 31 2c ┆,5 JMP=13,5 CJP=12,5 PCLC=11,┆ 0x01a0…01c0 35 0a 20 4a 52 50 3d 38 2c 35 0a 20 52 46 43 54 3d 37 2c 35 0a 20 52 50 43 54 3d 36 2c 35 0a 20 ┆5 JRP=8,5 RFCT=7,5 RPCT=6,5 ┆ 0x01c0…01e0 43 52 45 54 3d 35 2c 35 0a 20 43 4a 50 50 3d 34 2c 35 0a 20 4c 44 43 54 3d 33 2c 35 0a 20 45 4e ┆CRET=5,5 CJPP=4,5 LDCT=3,5 EN┆ 0x01e0…0200 4c 4f 3d 32 2c 35 0a 20 54 57 42 3d 30 2c 35 0a 0a 20 43 4c 42 59 3d 30 2c 36 0a 20 53 54 42 59 ┆LO=2,5 TWB=0,5 CLBY=0,6 STBY┆ 0x0200…0220 3d 33 2c 36 0a 0a 20 53 54 43 4d 3d 30 2c 37 0a 20 54 52 4b 3d 31 2c 37 0a 20 53 43 54 3d 32 2c ┆=3,6 STCM=0,7 TRK=1,7 SCT=2,┆ 0x0220…0240 37 0a 20 44 41 54 3d 33 2c 37 0a 0a 20 41 51 3d 30 2c 38 0a 20 41 42 3d 31 2c 38 0a 20 5a 51 3d ┆7 DAT=3,7 AQ=0,8 AB=1,8 ZQ=┆ 0x0240…0260 32 2c 38 0a 20 5a 41 3d 34 2c 38 0a 20 44 41 3d 35 2c 38 0a 20 44 51 3d 36 2c 38 0a 20 44 5a 3d ┆2,8 ZA=4,8 DA=5,8 DQ=6,8 DZ=┆ 0x0260…0280 37 2c 38 0a 0a 20 51 3d 30 2c 39 0a 20 42 41 3d 32 2c 39 0a 20 42 3d 33 2c 39 0a 0a 20 43 3d 31 ┆7,8 Q=0,9 BA=2,9 B=3,9 C=1┆ 0x0280…02a0 2c 31 30 0a 0a 20 41 44 44 3d 30 2c 31 31 0a 20 53 55 42 3d 31 2c 31 31 0a 20 42 55 53 3d 32 2c ┆,10 ADD=0,11 SUB=1,11 BUS=2,┆ 0x02a0…02c0 31 31 0a 20 20 4f 52 3d 33 2c 31 31 0a 20 41 4e 44 3d 34 2c 31 31 0a 20 49 41 4e 3d 35 2c 31 31 ┆11 OR=3,11 AND=4,11 IAN=5,11┆ 0x02c0…02e0 0a 20 45 58 4f 3d 36 2c 31 31 0a 20 45 58 4e 3d 37 2c 31 31 0a 0a 20 41 30 3d 30 2c 31 32 0a 20 ┆ EXO=6,11 EXN=7,11 A0=0,12 ┆ 0x02e0…0300 41 31 3d 31 2c 31 32 0a 20 41 32 3d 32 2c 31 32 0a 20 41 33 3d 33 2c 31 32 0a 20 41 34 3d 34 2c ┆A1=1,12 A2=2,12 A3=3,12 A4=4,┆ 0x0300…0320 31 32 0a 20 41 35 3d 35 2c 31 32 0a 20 41 36 3d 36 2c 31 32 0a 20 41 37 3d 37 2c 31 32 0a 20 41 ┆12 A5=5,12 A6=6,12 A7=7,12 A┆ 0x0320…0340 38 3d 38 2c 31 32 0a 20 41 39 3d 39 2c 31 32 0a 20 41 31 30 3d 31 30 2c 31 32 0a 20 41 31 31 3d ┆8=8,12 A9=9,12 A10=10,12 A11=┆ 0x0340…0360 31 31 2c 31 32 0a 20 41 31 32 3d 31 32 2c 31 32 0a 20 41 31 33 3d 31 33 2c 31 32 0a 20 41 31 34 ┆11,12 A12=12,12 A13=13,12 A14┆ 0x0360…0380 3d 31 34 2c 31 32 0a 20 41 31 35 3d 31 35 2c 31 32 0a 0a 20 43 4f 4e 44 3d 31 32 36 2c 31 33 0a ┆=14,12 A15=15,12 COND=126,13 ┆ 0x0380…03a0 20 52 44 59 3d 31 32 33 2c 31 33 0a 20 52 41 4d 3d 31 31 39 2c 31 33 0a 20 52 4c 3d 31 31 31 2c ┆ RDY=123,13 RAM=119,13 RL=111,┆ 0x03a0…03c0 31 33 0a 20 52 55 3d 39 35 2c 31 33 0a 20 44 41 4c 3d 36 33 2c 31 33 0a 20 4e 49 42 3d 31 32 37 ┆13 RU=95,13 DAL=63,13 NIB=127┆ 0x03c0…03e0 2c 31 33 0a 0a 20 52 49 43 3d 30 2c 31 34 0a 20 55 50 42 59 3d 30 2c 31 35 0a 20 55 4e 49 54 3d ┆,13 RIC=0,14 UPBY=0,15 UNIT=┆ 0x03e0…0400 30 2c 31 36 0a 20 57 49 43 3d 30 2c 31 37 0a 20 4c 41 54 43 48 3d 30 2c 31 38 0a 20 57 52 41 3d ┆0,16 WIC=0,17 LATCH=0,18 WRA=┆ 0x0400…0420 31 2c 31 39 0a 20 44 55 3d 32 2c 31 39 0a 20 44 4c 3d 33 2c 32 30 0a 20 4d 52 3d 30 2c 32 30 0a ┆1,19 DU=2,19 DL=3,20 MR=0,20 ┆ 0x0420…0440 20 42 49 54 31 3d 23 33 46 46 2c 31 0a 20 2e 0a 0a 0a 0a 20 20 20 20 3b 53 54 20 46 44 20 43 54 ┆ BIT1=#3FF,1 . ;ST FD CT┆ 0x0440…0460 52 4c 20 43 52 38 30 34 37 44 2f 30 31 30 41 42 2f 30 31 20 3b 2e 0a 20 20 20 20 3b 46 49 52 4d ┆RL CR8047D/010AB/01 ;. ;FIRM┆ 0x0460…0480 57 41 52 45 20 56 45 52 53 49 4f 4e 20 38 31 31 31 33 30 2f 42 42 50 20 3b 2e 0a 20 20 20 20 3b ┆WARE VERSION 811130/BBP ;. ;┆ 0x0480…04a0 42 55 49 4c 44 2d 49 4e 2d 54 45 53 54 20 49 4d 50 4c 45 4d 45 4e 54 45 44 20 3b 2e 0a 20 20 20 ┆BUILD-IN-TEST IMPLEMENTED ;. ┆ 0x04a0…04c0 20 3b 55 50 44 41 54 45 44 20 4c 41 53 54 3a 20 38 32 30 31 31 36 2e 0a 20 3b 2e 0a 42 49 54 3a ┆ ;UPDATED LAST: 820116. ;. BIT:┆ 0x04c0…04e0 20 20 20 55 4e 43 20 43 4a 50 20 54 32 39 31 30 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ UNC CJP T2910 ┆ 0x04e0…0500 20 20 20 53 54 42 59 20 4d 52 20 20 20 20 20 20 20 20 20 3b 53 45 54 20 42 55 53 59 20 4d 52 31 ┆ STBY MR ;SET BUSY MR1┆ 0x0500…0520 37 39 31 20 20 3b 2e 0a 20 20 20 20 20 20 20 4a 5a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆791 ;. JZ ┆ 0x0520…0540 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 53 54 42 59 20 4d 52 20 20 20 20 20 20 20 20 20 3b ┆ STBY MR ;┆ 0x0540…0560 32 39 31 30 20 45 52 52 4f 52 20 20 3b 2e 0a 20 20 20 20 20 20 20 55 4e 43 20 43 4a 53 20 42 49 ┆2910 ERROR ;. UNC CJS BI┆ 0x0560…0580 54 31 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 53 54 42 59 20 4d 52 20 20 20 ┆T1 STBY MR ┆ 0x0580…05a0 20 20 20 20 20 20 3b 54 52 59 20 52 45 53 45 54 20 43 4d 44 20 20 3b 2e 0a 20 3b 2e 0a 20 3b 2e ┆ ;TRY RESET CMD ;. ;. ;.┆ 0x05a0…05c0 0a 45 32 39 31 30 3a 20 55 4e 43 20 43 4a 50 20 4c 4f 43 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ E2910: UNC CJP LOC ┆ 0x05c0…05e0 20 20 20 20 20 20 20 20 53 54 42 59 20 4d 52 20 3b 2e 0a 0a 45 32 39 30 31 3a 20 20 55 4e 43 20 ┆ STBY MR ;. E2901: UNC ┆ 0x05e0…0600 43 4a 50 20 4c 4f 43 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 53 54 42 59 ┆CJP LOC STBY┆ 0x0600…0620 20 4d 52 20 3b 2e 0a 20 3b 2e 0a 45 49 42 55 53 3a 20 55 4e 43 20 43 4a 50 20 4c 4f 43 20 20 20 ┆ MR ;. ;. EIBUS: UNC CJP LOC ┆ 0x0620…0640 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 53 54 42 59 20 4d 52 20 3b 2e 0a 20 3b 2e ┆ STBY MR ;. ;.┆ 0x0640…0660 0a 45 41 42 42 55 53 3a 20 55 4e 43 20 43 4a 50 20 4c 4f 43 20 20 20 20 20 20 20 20 20 20 20 20 ┆ EABBUS: UNC CJP LOC ┆ 0x0660…0680 20 20 20 20 20 20 20 20 20 53 54 42 59 20 4d 52 20 3b 2e 0a 20 3b 2e 0a 45 52 41 4d 3a 20 20 20 ┆ STBY MR ;. ;. ERAM: ┆ 0x0680…06a0 55 4e 43 20 43 4a 50 20 4c 4f 43 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆UNC CJP LOC ┆ 0x06a0…06c0 53 54 42 59 20 4d 52 20 3b 2e 0a 20 3b 2e 0a 45 54 49 4d 45 52 3a 20 55 4e 43 20 43 4a 50 20 4c ┆STBY MR ;. ;. ETIMER: UNC CJP L┆ 0x06c0…06e0 4f 43 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 53 54 42 59 20 4d 52 20 3b ┆OC STBY MR ;┆ 0x06e0…0700 2e 0a 20 3b 2e 0a 45 31 37 39 31 3a 20 20 55 4e 43 20 43 4a 50 20 4c 4f 43 20 20 20 20 20 20 20 ┆. ;. E1791: UNC CJP LOC ┆ 0x0700…0720 20 20 20 20 20 20 20 20 20 20 20 20 20 20 53 54 42 59 20 4d 52 20 3b 2e 0a 20 3b 2e 0a 20 3b 2e ┆ STBY MR ;. ;. ;.┆ 0x0720…0740 0a 20 20 20 20 20 20 20 3b 2a 2a 2a 2a 2a 2a 20 20 20 32 39 30 31 20 54 45 53 54 20 53 55 42 52 ┆ ;****** 2901 TEST SUBR┆ 0x0740…0760 4f 55 54 49 4e 45 53 20 2a 2a 2a 2a 2a 2a 20 3b 2e 0a 54 32 39 30 31 31 3a 20 20 20 20 20 20 20 ┆OUTINES ****** ;. T29011: ┆ 0x0760…0780 20 20 41 4e 44 20 5a 41 20 41 30 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 42 20 4d 52 20 20 ┆ AND ZA A0 B MR ┆ 0x0780…07a0 20 20 20 20 20 20 20 20 20 20 3b 41 30 5f 30 30 20 59 3d 52 45 53 55 4c 54 20 5a 3d 31 20 3b 2e ┆ ;A0_00 Y=RESULT Z=1 ;.┆ 0x07a0…07c0 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 42 55 53 20 5a 41 20 41 30 20 20 20 20 20 20 20 ┆ BUS ZA A0 ┆ 0x07c0…07e0 20 20 20 20 20 20 20 20 42 20 4d 52 20 20 20 20 20 20 20 20 20 20 20 20 3b 41 30 5f 23 46 46 20 ┆ B MR ;A0_#FF ┆ 0x07e0…0800 59 3d 52 45 53 55 4c 54 20 5a 3d 30 20 3b 2e 0a 20 20 20 20 20 20 20 43 4a 50 20 45 32 39 31 30 ┆Y=RESULT Z=0 ;. CJP E2910┆ 0x0800…0820 20 20 20 20 20 20 20 41 4e 44 20 5a 41 20 41 30 20 20 20 20 20 20 20 42 20 4d 52 20 20 20 20 20 ┆ AND ZA A0 B MR ┆ 0x0820…0840 20 20 20 20 20 20 20 3b 5a 3d 31 20 3b 2e 0a 20 20 20 20 20 20 20 43 52 45 54 20 20 20 20 20 20 ┆ ;Z=1 ;. CRET ┆ 0x0840…0860 20 20 20 20 20 20 42 55 53 20 5a 41 20 41 30 20 20 20 20 20 20 20 42 20 4d 52 20 20 20 20 20 20 ┆ BUS ZA A0 B MR ┆ 0x0860…0880 20 20 20 20 20 20 3b 5a 3d 30 20 54 45 53 54 20 43 52 45 54 20 3b 2e 0a 20 20 20 20 20 20 20 55 ┆ ;Z=0 TEST CRET ;. U┆ 0x0880…08a0 4e 43 20 43 4a 50 20 45 32 39 31 30 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆NC CJP E2910 ┆ 0x08a0…08c0 20 4d 52 20 20 20 20 3b 52 45 54 55 52 4e 20 54 4f 20 4d 41 49 4e 20 50 52 4f 47 52 41 4d 20 3b ┆ MR ;RETURN TO MAIN PROGRAM ;┆ 0x08c0…08e0 2e 0a 20 3b 2e 0a 20 3b 2e 0a 20 3b 2e 0a 20 20 20 20 20 20 20 3b 2a 2a 2a 2a 2a 20 20 20 32 39 ┆. ;. ;. ;. ;***** 29┆ 0x08e0…0900 31 30 20 54 45 53 54 20 53 55 42 52 4f 55 54 49 4e 45 53 20 2a 2a 2a 2a 2a 2a 20 3b 2e 0a 20 3b ┆10 TEST SUBROUTINES ****** ;. ;┆ 0x0900…0920 2e 0a 54 32 39 31 30 31 3a 20 55 4e 43 20 43 52 45 54 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆. T29101: UNC CRET ┆ 0x0920…0940 20 20 20 20 20 20 20 20 20 20 20 20 4d 52 20 3b 2e 0a 20 20 20 20 20 20 20 55 4e 43 20 45 32 39 ┆ MR ;. UNC E29┆ 0x0940…0960 31 30 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 4d 52 20 3b 2e ┆10 MR ;.┆ 0x0960…0980 0a 20 3b 2e 0a 54 32 39 31 30 32 3a 20 55 4e 43 20 43 4a 53 20 54 32 39 31 30 33 20 20 20 20 20 ┆ ;. T29102: UNC CJS T29103 ┆ 0x0980…09a0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 4d 52 20 3b 2e 0a 20 20 20 20 20 20 20 55 4e 43 20 ┆ MR ;. UNC ┆ 0x09a0…09c0 43 4a 50 20 45 32 39 31 30 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 4d 52 ┆CJP E2910 MR┆ 0x09c0…09e0 20 3b 2e 0a 20 3b 2e 0a 54 32 39 31 30 33 3a 20 55 4e 43 20 43 4a 50 50 20 54 32 39 31 30 34 20 ┆ ;. ;. T29103: UNC CJPP T29104 ┆ 0x09e0…0a00 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 4d 52 20 3b 2e 0a 20 20 20 20 20 20 20 55 ┆ MR ;. U┆ 0x0a00…0a20 4e 43 20 43 4a 50 20 45 32 39 31 30 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆NC CJP E2910 ┆ 0x0a20…0a40 20 4d 52 20 20 20 20 3b 43 4f 4d 45 20 48 45 52 45 20 49 46 20 4a 50 50 20 44 45 46 45 43 54 20 ┆ MR ;COME HERE IF JPP DEFECT ┆ 0x0a40…0a60 3b 2e 0a 20 3b 2e 0a 54 32 39 31 30 34 3a 20 55 4e 43 20 43 52 45 54 20 20 20 20 20 20 20 20 20 ┆;. ;. T29104: UNC CRET ┆ 0x0a60…0a80 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 4d 52 20 20 20 20 3b 52 45 54 55 52 4e 20 54 ┆ MR ;RETURN T┆ 0x0a80…0aa0 4f 20 54 32 39 31 30 20 49 46 20 50 4f 50 20 4f 4b 20 3b 2e 0a 20 20 20 20 20 20 20 20 20 20 20 ┆O T2910 IF POP OK ;. ┆ 0x0aa0…0ac0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x0ac0…0ae0 20 20 20 20 3b 45 4c 53 45 20 52 45 54 55 52 4e 20 54 4f 20 54 32 39 31 30 32 2b 31 20 3b 2e 0a ┆ ;ELSE RETURN TO T29102+1 ;. ┆ 0x0ae0…0b00 54 32 39 31 30 35 3a 20 43 4a 53 20 45 32 39 31 30 20 20 20 20 20 20 20 41 4e 44 20 5a 41 20 41 ┆T29105: CJS E2910 AND ZA A┆ 0x0b00…0b20 30 20 20 20 20 20 20 20 42 20 4d 52 20 3b 2e 0a 20 20 20 20 20 20 20 43 4a 53 20 54 32 39 31 30 ┆0 B MR ;. CJS T2910┆ 0x0b20…0b40 33 20 20 20 20 20 20 42 55 53 20 5a 41 20 41 30 20 20 20 20 20 20 20 42 20 4d 52 20 20 20 20 3b ┆3 BUS ZA A0 B MR ;┆ 0x0b40…0b60 43 41 4c 4c 20 49 46 20 4f 4b 20 3b 2e 0a 20 20 20 20 20 20 20 55 4e 43 20 43 4a 50 20 45 32 39 ┆CALL IF OK ;. UNC CJP E29┆ 0x0b60…0b80 31 30 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 4d 52 20 20 20 20 3b 45 4c ┆10 MR ;EL┆ 0x0b80…0ba0 53 45 20 47 4f 54 4f 20 45 52 52 4f 52 20 4c 4f 4f 50 20 3b 2e 0a 20 3b 2e 0a 54 32 39 31 30 37 ┆SE GOTO ERROR LOOP ;. ;. T29107┆ 0x0ba0…0bc0 3a 20 55 4e 43 20 43 4a 53 20 54 32 39 31 30 38 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆: UNC CJS T29108 ┆ 0x0bc0…0be0 20 20 20 20 4d 52 20 20 20 20 3b 50 55 53 48 20 54 32 39 31 30 37 2b 31 20 54 4f 20 53 54 41 43 ┆ MR ;PUSH T29107+1 TO STAC┆ 0x0be0…0c00 4b 20 3b 2e 0a 20 20 20 20 20 20 20 55 4e 43 20 43 4a 50 20 45 32 39 31 30 20 20 20 20 20 20 20 ┆K ;. UNC CJP E2910 ┆ 0x0c00…0c20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 4d 52 20 20 20 20 3b 43 4f 4d 45 20 49 46 20 50 4f 50 ┆ MR ;COME IF POP┆ 0x0c20…0c40 20 45 52 52 4f 52 20 3b 2e 0a 20 3b 2e 0a 54 32 39 31 30 38 3a 20 20 20 20 20 20 20 20 20 20 20 ┆ ERROR ;. ;. T29108: ┆ 0x0c40…0c60 20 20 20 20 20 20 41 4e 44 20 5a 41 20 41 30 20 20 20 20 20 20 20 42 20 4d 52 20 20 20 20 3b 43 ┆ AND ZA A0 B MR ;C┆ 0x0c60…0c80 4c 45 41 52 20 52 45 47 20 30 20 3b 2e 0a 20 20 20 20 20 20 20 43 4a 50 50 20 54 32 39 31 30 39 ┆LEAR REG 0 ;. CJPP T29109┆ 0x0c80…0ca0 20 20 20 20 20 42 55 53 20 5a 41 20 41 30 20 20 20 20 20 20 20 42 20 4d 52 20 20 20 20 3b 46 4f ┆ BUS ZA A0 B MR ;FO┆ 0x0ca0…0cc0 52 43 45 20 54 48 45 20 4a 55 4d 50 20 43 4f 4e 44 49 54 49 4f 4e 20 3b 2e 0a 20 20 20 20 20 20 ┆RCE THE JUMP CONDITION ;. ┆ 0x0cc0…0ce0 20 55 4e 43 20 43 4a 50 20 45 32 39 31 30 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ UNC CJP E2910 ┆ 0x0ce0…0d00 20 20 20 4d 52 20 20 20 20 3b 45 52 52 4f 52 20 45 58 49 54 20 3b 2e 0a 20 3b 2e 0a 54 32 39 31 ┆ MR ;ERROR EXIT ;. ;. T291┆ 0x0d00…0d20 30 39 3a 20 55 4e 43 20 43 52 45 54 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆09: UNC CRET ┆ 0x0d20…0d40 20 20 20 20 20 20 4d 52 20 20 20 20 3b 52 45 54 55 52 4e 20 54 4f 20 4d 41 49 4e 4c 4f 4f 50 20 ┆ MR ;RETURN TO MAINLOOP ┆ 0x0d40…0d60 49 46 20 50 4f 50 20 3b 2e 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆IF POP ;. ┆ 0x0d60…0d80 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3b 57 41 53 20 4f 4b ┆ ;WAS OK┆ 0x0d80…0da0 2c 45 4c 53 45 20 52 45 54 20 54 4f 20 54 32 39 31 30 37 2b 31 20 3b 2e 0a 20 3b 2e 0a 20 54 32 ┆,ELSE RET TO T29107+1 ;. ;. T2┆ 0x0da0…0dc0 39 31 30 41 3a 20 4c 44 43 54 20 54 32 39 31 30 42 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆910A: LDCT T2910B ┆ 0x0dc0…0de0 20 20 20 20 20 20 20 4d 52 20 20 20 20 3b 52 45 47 5f 4a 55 4d 50 20 45 4e 54 52 59 20 3b 2e 0a ┆ MR ;REG_JUMP ENTRY ;. ┆ 0x0de0…0e00 20 20 20 20 20 20 20 4a 52 50 20 20 20 20 20 20 20 20 20 20 20 20 20 41 4e 44 20 5a 41 20 41 30 ┆ JRP AND ZA A0┆ 0x0e00…0e20 20 20 20 20 20 20 20 42 20 4d 52 20 20 20 20 3b 4a 55 4d 50 20 54 4f 20 4c 4f 43 20 54 32 39 31 ┆ B MR ;JUMP TO LOC T291┆ 0x0e20…0e40 30 42 20 3b 2e 0a 20 20 20 20 20 20 55 4e 43 20 43 4a 50 20 45 32 39 31 30 20 20 20 20 20 20 20 ┆0B ;. UNC CJP E2910 ┆ 0x0e40…0e60 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 4d 52 20 20 20 20 3b 2e 0a 20 3b 2e 0a 54 32 39 31 ┆ MR ;. ;. T291┆ 0x0e60…0e80 30 42 3a 20 55 4e 43 20 43 52 45 54 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆0B: UNC CRET ┆ 0x0e80…0ea0 20 20 20 20 20 20 4d 52 20 20 20 20 3b 43 4f 4d 45 20 48 45 52 45 20 49 46 20 4c 44 43 54 26 4a ┆ MR ;COME HERE IF LDCT&J┆ 0x0ea0…0ec0 52 50 20 57 41 53 53 20 3b 2e 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆RP WASS ;. ┆ 0x0ec0…0ee0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3b 4f 4b 20 3b 2e ┆ ;OK ;.┆ 0x0ee0…0f00 0a 20 3b 2e 0a 20 3b 2e 0a 54 32 39 31 30 43 3a 20 4c 44 43 54 20 31 28 23 46 46 29 20 20 20 20 ┆ ;. ;. T2910C: LDCT 1(#FF) ┆ 0x0f00…0f20 41 4e 44 20 5a 41 20 20 41 30 20 20 20 20 20 20 42 20 4d 52 20 20 20 20 3b 4c 4f 41 44 20 43 4f ┆AND ZA A0 B MR ;LOAD CO┆ 0x0f20…0f40 55 4e 54 45 52 20 52 30 5f 30 20 3b 2e 0a 20 20 20 20 20 20 20 52 50 43 54 20 4c 4f 43 20 20 20 ┆UNTER R0_0 ;. RPCT LOC ┆ 0x0f40…0f60 20 20 20 20 20 53 55 42 20 5a 41 20 41 30 20 20 20 20 20 20 20 42 20 4d 52 20 20 20 20 3b 44 45 ┆ SUB ZA A0 B MR ;DE┆ 0x0f60…0f80 43 52 45 4d 45 4e 54 20 43 4f 55 4e 54 45 52 20 3b 2e 0a 20 20 20 20 20 20 20 43 4a 50 20 45 32 ┆CREMENT COUNTER ;. CJP E2┆ 0x0f80…0fa0 39 31 30 20 20 20 20 20 20 20 4f 52 20 20 5a 41 20 41 30 20 20 20 20 20 20 20 20 20 4d 52 20 20 ┆910 OR ZA A0 MR ┆ 0x0fa0…0fc0 20 20 3b 2e 0a 20 20 20 20 20 20 20 55 4e 43 20 43 52 45 54 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ;. UNC CRET ┆ 0x0fc0…0fe0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 4d 52 20 20 20 20 3b 43 4f 4d 45 20 49 46 20 43 4e 54 ┆ MR ;COME IF CNT┆ 0x0fe0…1000 3d 52 30 20 3b 2e 0a 54 32 39 31 30 44 3a 20 55 4e 43 20 50 43 4c 43 20 31 28 23 46 46 29 20 41 ┆=R0 ;. T2910D: UNC PCLC 1(#FF) A┆ 0x1000…1020 4e 44 20 5a 41 20 41 30 20 20 20 20 20 20 42 20 4d 52 20 20 20 20 3b 4c 4f 41 44 20 43 4f 55 4e ┆ND ZA A0 B MR ;LOAD COUN┆ 0x1020…1040 54 45 52 2b 53 54 41 43 4b 20 3b 2e 0a 20 20 20 20 20 20 20 52 46 43 54 20 20 20 20 20 20 20 20 ┆TER+STACK ;. RFCT ┆ 0x1040…1060 20 20 20 20 53 55 42 20 5a 41 20 41 30 20 20 20 20 20 20 20 42 20 4d 52 20 20 20 20 3b 44 43 52 ┆ SUB ZA A0 B MR ;DCR┆ 0x1060…1080 20 43 4f 55 4e 54 45 52 20 41 30 5f 41 30 2b 31 20 3b 2e 0a 20 20 20 20 20 20 20 43 4a 50 20 45 ┆ COUNTER A0_A0+1 ;. CJP E┆ 0x1080…10a0 32 39 31 30 20 20 20 20 20 20 20 4f 52 20 5a 41 20 41 30 20 20 20 20 20 20 20 20 20 20 4d 52 20 ┆2910 OR ZA A0 MR ┆ 0x10a0…10c0 20 20 20 3b 2e 0a 20 20 20 20 20 20 20 55 4e 43 20 43 52 45 54 20 20 20 20 20 20 20 20 20 20 20 ┆ ;. UNC CRET ┆ 0x10c0…10e0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 4d 52 20 3b 2e 0a 20 3b 2e 0a 20 20 20 20 20 20 20 ┆ MR ;. ;. ┆ 0x10e0…1100 3b 2a 2a 2a 2a 2a 20 20 20 31 37 39 31 20 54 45 53 54 20 53 55 42 52 4f 55 54 49 4e 20 20 20 2a ┆;***** 1791 TEST SUBROUTIN *┆ 0x1100…1120 2a 2a 2a 2a 0a 20 20 20 20 20 20 20 20 45 4e 54 52 59 3a 20 20 52 31 30 3d 20 50 52 45 56 49 4f ┆**** ENTRY: R10= PREVIO┆ 0x1120…1140 55 53 20 53 54 41 54 45 0a 20 20 20 20 20 20 20 20 45 58 49 54 3a 20 20 20 52 38 20 3d 20 43 55 ┆US STATE EXIT: R8 = CU┆ 0x1140…1160 52 52 45 4e 54 20 53 54 41 54 45 20 4f 46 20 49 4e 50 55 54 20 52 45 47 49 53 54 45 52 0a 20 20 ┆RRENT STATE OF INPUT REGISTER ┆ 0x1160…1180 20 20 20 20 20 20 20 20 20 20 20 20 20 20 52 31 30 3d 20 4c 41 53 54 20 53 54 41 54 45 20 4f 46 ┆ R10= LAST STATE OF┆ 0x1180…11a0 20 53 54 50 55 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 52 31 20 44 45 53 54 52 4f 45 ┆ STPU R1 DESTROE┆ 0x11a0…11c0 44 2e 0a 0a 57 31 53 54 50 55 3a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 41 4e 44 20 ┆D. W1STPU: AND ┆ 0x11c0…11e0 5a 41 20 41 31 20 20 20 20 20 20 20 42 20 20 20 20 20 20 20 3b 43 4c 45 41 52 20 43 4f 55 4e 54 ┆ZA A1 B ;CLEAR COUNT┆ 0x11e0…1200 20 52 45 47 2e 0a 57 31 53 54 3a 20 20 20 4c 44 43 54 20 31 28 23 32 30 29 20 20 20 20 20 4f 52 ┆ REG. W1ST: LDCT 1(#20) OR┆ 0x1200…1220 20 20 44 5a 20 41 38 20 43 4f 4e 44 20 20 42 20 20 20 20 20 20 20 3b 52 45 41 44 20 49 4e 50 55 ┆ DZ A8 COND B ;READ INPU┆ 0x1220…1240 54 20 52 45 47 2e 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 32 28 23 34 30 29 20 20 20 20 20 41 ┆T REG. 2(#40) A┆ 0x1240…1260 4e 44 20 44 41 20 41 38 20 20 20 20 20 20 20 51 20 20 20 20 20 20 20 3b 4d 41 53 4b 20 53 54 50 ┆ND DA A8 Q ;MASK STP┆ 0x1260…1280 55 20 42 49 54 2e 0a 20 20 20 20 20 20 20 20 43 52 45 54 20 20 20 20 20 20 20 20 20 20 20 20 49 ┆U BIT. CRET I┆ 0x1280…12a0 41 4e 20 41 51 20 41 31 30 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3b 52 45 54 55 52 4e 20 49 ┆AN AQ A10 ;RETURN I┆ 0x12a0…12c0 46 20 50 4f 53 20 45 44 47 45 2e 0a 20 20 20 20 20 20 20 20 52 50 43 54 20 57 31 53 54 20 20 20 ┆F POS EDGE. RPCT W1ST ┆ 0x12c0…12e0 20 20 20 20 4f 52 20 20 5a 51 20 41 31 30 20 20 20 20 20 20 42 20 20 20 20 20 20 20 3b 55 50 44 ┆ OR ZQ A10 B ;UPD┆ 0x12e0…1300 41 54 45 20 53 54 41 54 45 20 52 45 47 2e 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ATE STATE REG. ┆ 0x1300…1320 20 20 20 20 20 43 20 41 44 44 20 5a 41 20 41 31 20 20 20 20 20 20 20 42 20 20 20 20 20 20 20 3b ┆ C ADD ZA A1 B ;┆ 0x1320…1340 49 4e 43 52 45 4d 45 4e 54 20 4c 4f 4f 50 20 43 4e 54 2e 0a 20 20 20 20 20 20 20 20 43 4a 50 20 ┆INCREMENT LOOP CNT. CJP ┆ 0x1340…1360 57 31 53 54 20 20 20 20 20 20 20 20 4f 52 20 20 5a 41 20 41 31 20 20 20 20 20 20 20 20 20 20 20 ┆W1ST OR ZA A1 ┆ 0x1360…1380 20 20 20 20 3b 4c 4f 4f 50 20 4d 41 58 20 31 30 20 4d 53 45 43 2e 0a 20 20 20 55 4e 43 20 20 43 ┆ ;LOOP MAX 10 MSEC. UNC C┆ 0x1380…13a0 4a 50 20 45 31 37 39 31 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆JP E1791 ┆ 0x13a0…13c0 20 20 20 20 20 20 20 3b 54 48 45 4e 20 47 49 56 45 20 55 50 2e 0a 0a 20 20 20 20 20 20 20 3b 2a ┆ ;THEN GIVE UP. ;*┆ 0x13c0…13e0 2a 2a 2a 2a 20 20 20 32 39 31 30 20 54 45 53 54 20 4d 41 49 4e 4c 4f 4f 50 20 2a 2a 2a 2a 2a 20 ┆**** 2910 TEST MAINLOOP ***** ┆ 0x13e0…1400 3b 2e 0a 20 3b 2e 0a 54 32 39 31 30 3a 20 20 55 4e 43 20 43 4a 53 20 54 32 39 31 30 31 20 20 20 ┆;. ;. T2910: UNC CJS T29101 ┆ 0x1400…1420 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 4d 52 20 20 20 3b 54 45 53 54 20 43 41 4c ┆ MR ;TEST CAL┆ 0x1420…1440 4c 2f 52 45 54 20 3b 2e 0a 20 20 20 20 20 20 20 55 4e 43 20 43 4a 53 20 54 32 39 31 30 32 20 20 ┆L/RET ;. UNC CJS T29102 ┆ 0x1440…1460 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 4d 52 20 20 20 20 3b 54 45 53 54 20 4a 50 ┆ MR ;TEST JP┆ 0x1460…1480 50 20 3b 2e 0a 20 3b 2e 0a 20 20 20 20 20 20 20 3b 54 48 45 20 46 4f 4c 4c 4f 57 49 4e 47 20 32 ┆P ;. ;. ;THE FOLLOWING 2┆ 0x1480…14a0 39 30 31 20 54 45 53 54 20 4d 55 53 54 20 42 45 20 50 45 52 46 4f 52 4d 45 44 20 42 45 46 4f 52 ┆901 TEST MUST BE PERFORMED BEFOR┆ 0x14a0…14c0 45 20 3b 2e 0a 20 20 20 20 20 20 20 3b 54 45 53 54 20 4f 46 20 32 39 31 30 20 43 4f 4e 44 49 54 ┆E ;. ;TEST OF 2910 CONDIT┆ 0x14c0…14e0 49 4f 4e 41 4c 20 4a 55 4d 50 20 46 41 43 49 4c 49 54 49 45 53 20 20 3b 2e 0a 20 3b 2e 0a 20 20 ┆IONAL JUMP FACILITIES ;. ;. ┆ 0x14e0…1500 20 20 20 20 20 55 4e 43 20 43 4a 53 20 54 32 39 30 31 31 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ UNC CJS T29011 ┆ 0x1500…1520 20 20 20 20 20 20 20 4d 52 20 20 20 20 20 3b 54 45 53 54 20 5a 45 52 4f 20 46 4c 41 47 20 4f 4e ┆ MR ;TEST ZERO FLAG ON┆ 0x1520…1540 20 3b 2e 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ;. ┆ 0x1540…1560 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3b 4a 55 4d 50 53 2f 52 45 54 20 3b 2e ┆ ;JUMPS/RET ;.┆ 0x1560…1580 0a 20 20 20 20 20 20 20 55 4e 43 20 43 4a 53 20 54 32 39 31 30 35 20 20 20 20 20 20 20 20 20 20 ┆ UNC CJS T29105 ┆ 0x1580…15a0 20 20 20 20 20 20 20 20 20 20 4d 52 20 20 20 20 3b 54 45 53 54 20 43 4a 53 20 3b 2e 0a 20 20 20 ┆ MR ;TEST CJS ;. ┆ 0x15a0…15c0 20 20 20 20 55 4e 43 20 43 4a 53 20 54 32 39 31 30 37 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ UNC CJS T29107 ┆ 0x15c0…15e0 20 20 20 20 20 20 4d 52 20 20 20 20 3b 54 45 53 54 20 43 4a 50 50 20 3b 2e 0a 20 20 20 20 20 20 ┆ MR ;TEST CJPP ;. ┆ 0x15e0…1600 20 55 4e 43 20 43 4a 53 20 54 32 39 31 30 41 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ UNC CJS T2910A ┆ 0x1600…1620 20 20 20 4d 52 20 20 20 20 3b 54 45 53 54 20 4c 44 43 54 20 3b 2e 0a 20 20 20 20 20 20 20 55 4e ┆ MR ;TEST LDCT ;. UN┆ 0x1620…1640 43 20 43 4a 53 20 54 32 39 31 30 43 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆C CJS T2910C ┆ 0x1640…1660 4d 52 20 20 20 20 3b 54 45 53 54 20 52 50 43 54 2f 44 43 52 20 41 4c 55 20 52 45 47 20 30 20 3b ┆MR ;TEST RPCT/DCR ALU REG 0 ;┆ 0x1660…1680 2e 0a 20 20 20 20 20 20 20 55 4e 43 20 43 4a 53 20 54 32 39 31 30 44 20 20 20 20 20 20 20 20 20 ┆. UNC CJS T2910D ┆ 0x1680…16a0 20 20 20 20 20 20 20 20 20 20 20 4d 52 20 20 20 20 3b 54 45 53 54 20 52 46 43 54 20 3b 2e 0a 20 ┆ MR ;TEST RFCT ;. ┆ 0x16a0…16c0 3b 2e 0a 20 20 20 20 20 20 20 3b 2a 2a 2a 2a 2a 20 54 45 53 54 20 32 39 30 31 20 4c 4f 47 49 43 ┆;. ;***** TEST 2901 LOGIC┆ 0x16c0…16e0 41 4c 20 46 55 4e 43 54 49 4f 4e 53 20 2a 2a 2a 2a 2a 20 3b 2e 0a 20 3b 2e 0a 41 32 39 30 31 30 ┆AL FUNCTIONS ***** ;. ;. A29010┆ 0x16e0…1700 3a 20 4c 44 43 54 20 31 28 23 30 45 29 20 20 20 20 20 41 4e 44 20 5a 41 20 41 31 20 20 20 20 20 ┆: LDCT 1(#0E) AND ZA A1 ┆ 0x1700…1720 20 20 42 20 4d 52 20 20 20 20 3b 4c 4f 41 44 20 43 4e 54 52 20 43 4c 45 41 52 20 52 45 47 20 31 ┆ B MR ;LOAD CNTR CLEAR REG 1┆ 0x1720…1740 20 3b 2e 0a 20 20 20 20 20 20 20 52 50 43 54 20 4c 4f 43 20 20 20 20 20 20 43 20 41 44 44 20 5a ┆ ;. RPCT LOC C ADD Z┆ 0x1740…1760 41 20 41 31 20 20 20 20 20 20 20 42 20 4d 52 20 20 20 20 3b 50 52 45 53 45 54 20 52 45 47 20 31 ┆A A1 B MR ;PRESET REG 1┆ 0x1760…1780 20 54 4f 20 23 30 46 20 3b 2e 0a 20 20 20 20 20 20 20 43 4a 50 20 41 32 39 30 31 31 20 20 20 20 ┆ TO #0F ;. CJP A29011 ┆ 0x1780…17a0 20 20 4f 52 20 5a 41 20 20 41 31 20 20 20 20 20 20 20 20 20 4d 52 20 20 20 20 3b 49 53 20 52 45 ┆ OR ZA A1 MR ;IS RE┆ 0x17a0…17c0 47 20 31 20 3d 49 20 30 20 3b 2e 0a 20 20 20 20 20 20 20 55 4e 43 20 43 4a 50 20 45 32 39 30 31 ┆G 1 =I 0 ;. UNC CJP E2901┆ 0x17c0…17e0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 4d 52 20 20 20 20 3b 4e 4f 20 3b ┆ MR ;NO ;┆ 0x17e0…1800 2e 0a 20 3b 2e 0a 41 32 39 30 31 31 3a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 4f 52 ┆. ;. A29011: OR┆ 0x1800…1820 20 20 5a 41 20 41 31 20 20 20 20 20 20 20 51 20 4d 52 20 3b 2e 0a 20 20 20 20 20 20 20 20 20 20 ┆ ZA A1 Q MR ;. ┆ 0x1820…1840 20 20 20 20 20 20 20 20 20 20 20 20 20 4f 52 20 20 5a 51 20 41 30 20 20 20 20 20 20 20 42 20 4d ┆ OR ZQ A0 B M┆ 0x1840…1860 52 20 20 20 20 3b 43 4f 50 59 20 52 31 20 54 4f 20 52 30 20 3b 2e 0a 20 20 20 20 20 20 20 4c 44 ┆R ;COPY R1 TO R0 ;. LD┆ 0x1860…1880 43 54 20 31 28 23 45 46 29 20 20 20 20 20 41 4e 44 20 5a 41 20 41 32 20 20 20 20 20 20 20 42 20 ┆CT 1(#EF) AND ZA A2 B ┆ 0x1880…18a0 4d 52 20 20 20 20 3b 50 52 45 53 45 54 20 41 32 20 54 4f 20 23 46 30 20 3b 2e 0a 20 20 20 20 20 ┆MR ;PRESET A2 TO #F0 ;. ┆ 0x18a0…18c0 20 20 52 50 43 54 20 4c 4f 43 20 20 20 20 20 20 43 20 41 44 44 20 5a 41 20 41 32 20 20 20 20 20 ┆ RPCT LOC C ADD ZA A2 ┆ 0x18c0…18e0 20 20 42 20 4d 52 20 3b 2e 0a 20 20 20 20 20 20 20 43 4a 50 20 41 32 39 30 31 32 20 20 20 20 20 ┆ B MR ;. CJP A29012 ┆ 0x18e0…1900 20 4f 52 20 20 5a 41 20 41 32 20 20 20 20 20 20 20 20 20 4d 52 20 20 20 20 3b 54 45 53 54 20 52 ┆ OR ZA A2 MR ;TEST R┆ 0x1900…1920 45 53 55 4c 54 20 3b 2e 0a 20 20 20 20 20 20 20 55 4e 43 20 43 4a 50 20 45 32 39 30 31 20 20 20 ┆ESULT ;. UNC CJP E2901 ┆ […truncated at 200 lines…]