|
DataMuseum.dkPresents historical artifacts from the history of: RC3500 |
This is an automatic "excavation" of a thematic subset of
See our Wiki for more about RC3500 Excavated with: AutoArchaeologist - Free & Open Source Software. |
top - download
Length: 2313846 (0x234e76) Types: Rc489k_TapeFile
└─⟦2c55ea56f⟧ Bits:30001844 SW-save af projekt 1000, Alarm-system └─⟦this⟧
Dumping the first 0x40 bytes of each record 0x000000…000096 (2, 0) 64 75 6d 70 20 20 6d 74 6d 69 33 35 30 32 20 20 20 20 30 30 32 20 20 20 76 65 72 73 2e 20 32 35 30 36 38 31 2e 31 33 20 20 20 73 3d 34 20 20 20 72 63 33 35 30 32 76 35 20 20 20 20 0a 00 00 00 ┆dump mtmi3502 002 vers. 250681.13 s=4 rc3502v5 ┆ 0x000096…00012c (2, 1) 00 00 01 00 00 34 00 00 01 00 00 06 6d 61 70 33 35 30 33 00 00 00 00 00 00 00 06 6d 69 6e 69 00 00 00 00 00 00 00 00 7b 6e 9b 00 00 00 00 00 00 00 00 00 00 00 00 60 00 00 00 00 02 6d 69 6e 69 ┆ 4 map3503 mini {n ` mini┆ 0x00012c…000d38 (2, 2) 00 00 02 00 08 08 00 00 01 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ┆ ┆ 0x000d38…001344 (2, 3) 00 00 02 00 04 08 00 00 01 00 00 04 26 26 9f 91 57 4f 10 eb 42 39 28 28 28 28 28 28 28 28 28 28 28 28 28 28 28 28 28 28 28 28 28 28 28 28 98 8a 57 4f 19 eb 3d 2b 28 28 28 28 28 28 28 28 28 28 ┆ && WO B9(((((((((((((((((((((((( WO =+((((((((((┆ 0x001344…0013da (2, 4) 00 00 01 00 00 34 00 00 02 00 00 00 66 70 66 65 6a 6c 00 00 00 00 00 00 80 00 04 6b 6f 6d 6c 69 62 00 00 00 00 00 00 80 01 00 0c d0 00 00 00 00 03 c0 c6 00 10 00 60 00 00 00 00 02 64 69 73 63 ┆ 4 fpfejl komlib ` disc┆ 0x0013da…001470 (2, 5) 00 00 01 00 00 34 00 00 03 00 00 05 63 6f 6e 6e 65 63 74 62 73 00 00 00 00 00 05 64 69 73 63 00 00 00 00 00 00 00 00 80 01 22 0c 36 c3 6c 80 00 00 40 9c 00 50 00 60 00 00 00 00 02 64 69 73 63 ┆ 4 connectbs disc " 6 l @ P ` disc┆ 0x001470…00207c (2, 6) 00 00 02 00 08 08 00 00 03 00 00 00 01 80 10 80 10 00 01 a0 00 01 80 00 00 41 e9 01 00 00 01 10 00 06 80 00 02 90 00 80 00 00 80 00 00 80 00 00 00 20 00 00 df ff 00 c1 ea 00 00 01 00 c1 80 6c ┆ A l┆ 0x00207c…002388 (2, 7) 00 00 02 00 02 08 00 00 03 00 00 04 02 00 1e 02 20 00 01 30 00 06 80 00 01 70 00 01 a0 00 00 c1 e1 01 00 00 01 e0 00 00 b1 a9 01 10 00 00 a1 77 00 91 4d 00 30 77 01 90 00 00 70 4b 80 00 00 00 ┆ 0 p w M 0w pK ┆ 0x002388…00241e (2, 8) 00 00 01 00 00 34 00 00 04 00 00 2d 62 69 6e 35 39 00 00 00 00 00 00 00 00 00 2d 6d 69 6e 69 00 00 00 00 00 00 00 00 7b 9b 82 00 00 00 00 00 00 00 00 00 00 00 00 60 00 00 00 00 02 6d 69 6e 69 ┆ 4 -bin59 -mini { ` mini┆ 0x00241e…00302a (2, 9) 00 00 02 00 08 08 00 00 04 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ┆ ┆ 0x00302a…003c36 (2, 10) 00 00 02 00 08 08 00 00 04 00 00 04 40 40 40 40 40 40 4f 48 40 40 40 48 40 40 4f 48 40 40 40 48 48 40 40 40 40 40 40 4d 40 40 40 40 4f 40 4b 4b 4b 48 40 40 40 48 40 40 40 40 40 40 40 40 40 40 ┆ @@@@@@OH@@@H@@OH@@@HH@@@@@@M@@@@O@KKKH@@@H@@@@@@@@@@┆ 0x003c36…004842 (2, 11) 00 00 02 00 08 08 00 00 04 00 00 08 40 40 40 40 40 42 42 40 42 42 43 42 43 43 42 43 42 42 42 40 40 43 40 40 43 44 42 42 43 44 43 41 41 40 40 40 40 43 42 40 42 42 40 40 43 43 40 43 40 41 41 40 ┆ @@@@@BB@BBCBCCBCBBB@@C@@CDBBCDCAA@@@@CB@BB@@CC@C@AA@┆ 0x004842…00544e (2, 12) 00 00 02 00 08 08 00 00 04 00 00 0c 43 42 42 46 46 46 46 44 46 46 43 42 40 42 41 42 42 42 43 43 43 43 43 42 42 40 41 42 40 42 43 46 46 46 46 43 40 46 43 43 43 46 43 43 42 43 46 46 46 47 43 40 ┆ CBBFFFFDFFCB@BABBBCCCCCBB@AB@BCFFFFC@FCCCFCCBCFFFGC@┆ 0x00544e…00605a (2, 13) 00 00 02 00 08 08 00 00 04 00 00 10 41 41 41 41 41 41 4a 41 47 43 41 41 41 41 45 41 41 40 41 41 41 40 44 41 41 41 41 41 41 41 41 41 41 4d 40 41 41 40 41 40 41 45 40 40 41 48 41 41 41 41 47 41 ┆ AAAAAAJAGCAAAAEAA@AAA@DAAAAAAAAAAM@AA@A@AE@@AHAAAAGA┆ 0x00605a…006c66 (2, 14) 00 00 02 00 08 08 00 00 04 00 00 14 40 40 40 40 40 40 40 40 40 40 40 40 40 40 40 40 40 40 40 40 40 40 40 40 40 40 40 40 40 40 40 40 40 40 40 40 40 40 40 40 40 40 40 40 40 40 40 40 40 40 40 40 ┆ @@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@┆ 0x006c66…007872 (2, 15) 00 00 02 00 08 08 00 00 04 00 00 18 4d 4d 4d 4d 4a 4e 4e 4d 4e 4e 4e 4e 4d 4e 4e 4e 4a 4e 4e 4d 4e 4e 4e 4e 4e 49 4d 4d 4d 4e 4e 4e 4e 4e 4e 4a 4e 49 4a 4e 4e 4e 4d 4d 4a 4e 4e 4e 4e 4e 4e 4d ┆ MMMMJNNMNNNNMNNNJNNMNNNNNIMMMNNNNNNJNIJNNNMMJNNNNNNM┆ 0x007872…00847e (2, 16) 00 00 02 00 08 08 00 00 04 00 00 1c 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ┆ ┆ 0x00847e…00908a (2, 17) 00 00 02 00 08 08 00 00 04 00 00 20 47 4f 4f 4f 47 47 47 4f 4f 4f 4f 4f 43 4f 4f 47 4e 47 4f 47 47 47 47 4f 4e 4f 4f 47 4f 4f 4f 4f 4f 4f 4f 4f 4f 4f 4f 4f 4f 4f 4f 4f 4f 47 4f 4f 4f 4f 4f 4f ┆ GOOOGGGOOOOOCOOGNGOGGGGONOOGOOOOOOOOOOOOOOOOOGOOOOOO┆ 0x00908a…009c96 (2, 18) 00 00 02 00 08 08 00 00 04 00 00 24 4e 4e 4e 48 48 49 48 4e 49 48 4e 48 4e 48 4e 48 48 4e 49 49 4e 4e 48 48 4e 48 4e 4f 4e 48 4f 48 49 49 4e 49 49 4e 48 48 48 49 48 48 48 48 48 48 49 49 4e 49 ┆ $NNNHHIHNIHNHNHNHHNIINNHHNHNONHOHIINIINHHHIHHHHHHIINI┆ 0x009c96…00a8a2 (2, 19) 00 00 02 00 08 08 00 00 04 00 00 28 47 40 40 40 40 4c 4e 4a 4f 40 40 42 41 41 42 41 41 40 46 45 48 47 4b 41 44 4e 43 41 44 4e 42 45 44 4d 4f 48 47 46 4b 47 43 49 43 41 40 40 41 4f 41 40 40 41 ┆ (G@@@@LNJO@@BAABAA@FEHGKADNCADNBEDMOHGFKGCICA@@AOA@@A┆ 0x00a8a2…00abae (2, 20) 00 00 02 00 02 08 00 00 04 00 00 2c 40 40 43 40 49 49 46 4e 4b 41 4e 40 4e 49 41 40 41 47 41 41 4f 40 4e 47 40 4e 4e 41 4c 41 49 40 4e 43 40 46 47 42 4d 46 46 40 43 42 46 46 49 46 46 41 40 47 ┆ ,@@C@IIFNKAN@NIA@AGAAO@NG@NNALAI@NC@FGBMFF@CBFFIFFA@G┆ 0x00abae…00ac44 (2, 21) 00 00 01 00 00 34 00 00 05 00 00 c4 63 6f 6d 70 72 65 73 73 31 00 00 00 00 00 c4 64 69 73 63 00 00 00 00 00 00 00 00 75 51 d6 00 00 00 00 00 00 00 00 00 00 00 00 60 00 00 00 00 02 64 69 73 63 ┆ 4 compress1 disc uQ ` disc┆ 0x00ac44…00b850 (2, 22) 00 00 02 00 08 08 00 00 05 00 00 00 3b 3b 0a 3b 3b 20 62 65 67 69 6e 20 6c 6d 69 74 78 74 30 30 30 63 0a 3b 3b 0a 2e 6d 20 20 20 20 20 20 20 20 20 20 72 63 20 33 35 30 32 20 6d 69 63 72 6f 2d ┆ ;; ;; begin lmitxt000c ;; .m rc 3502 micro-┆ 0x00b850…00c45c (2, 23) 00 00 02 00 08 08 00 00 05 00 00 04 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3b 0a 6a 6d 7a 6e 65 3d 20 37 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3b ┆ ; jmzne= 7 ;┆ 0x00c45c…00d068 (2, 24) 00 00 02 00 08 08 00 00 05 00 00 08 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3b 0a 72 65 76 70 77 3d 20 39 30 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3b 0a 72 ┆ ; revpw= 90 ; r┆ 0x00d068…00dc74 (2, 25) 00 00 02 00 08 08 00 00 05 00 00 0c 65 0a 6e 69 6c 61 64 65 3d 20 31 32 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3b 20 73 61 20 61 64 64 72 65 73 73 20 6e 69 6c 6c 0a 6c 70 ┆ e nilade= 12 ; sa address nill lp┆ 0x00dc74…00e880 (2, 26) 00 00 02 00 08 08 00 00 05 00 00 10 20 3b 0a 20 20 20 2c 2c 63 72 74 6e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3b 0a 74 65 73 74 6d 6f 76 66 6f 6b 3a 20 20 20 20 20 20 ┆ ; ,,crtn ; testmovfok: ┆ 0x00e880…00f48c (2, 27) 00 00 02 00 08 08 00 00 05 00 00 14 72 3b 0a 3b 3b 63 6a 73 20 73 74 61 74 69 73 74 69 63 73 0a 20 20 20 72 64 3a 3d 73 69 63 2c 73 69 63 3a 3d 73 69 63 2b 2b 2c 2c 6a 6d 61 70 20 38 20 3b 20 ┆ r; ;;cjs statistics rd:=sic,sic:=sic++,,jmap 8 ; ┆ 0x00f48c…010098 (2, 28) 00 00 02 00 08 08 00 00 05 00 00 18 20 3b 20 64 3a 3d 20 70 72 2b 65 78 69 63 2d 31 3b 0a 20 20 20 77 33 3a 3d 72 64 78 2c 2c 63 6a 73 20 77 72 69 74 65 6e 65 78 74 20 20 20 20 20 3b 20 77 72 ┆ ; d:= pr+exic-1; w3:=rdx,,cjs writenext ; wr┆ 0x010098…010ca4 (2, 29) 00 00 02 00 08 08 00 00 05 00 00 1c 72 65 67 69 73 74 65 72 20 61 64 64 72 65 73 73 0a 20 20 20 77 30 3a 3d 77 30 2d 2d 77 30 2c 2c 63 6a 70 20 6d 72 71 31 30 20 20 20 20 20 20 3b 30 31 31 30 ┆ register address w0:=w0--w0,,cjp mrq10 ;0110┆ 0x010ca4…0118b0 (2, 30) 00 00 02 00 08 08 00 00 05 00 00 20 72 62 2c 65 72 72 64 3d 64 65 66 3b 0a 3b 3b 20 20 20 20 20 20 20 20 77 37 3d 20 69 66 20 6f 64 64 28 73 69 63 29 20 74 68 65 6e 20 6d 65 6d 28 73 69 62 2c ┆ rb,errd=def; ;; w7= if odd(sic) then mem(sib,┆ 0x0118b0…0124bc (2, 31) 00 00 02 00 08 08 00 00 05 00 00 24 20 20 20 20 20 20 20 20 20 3b 20 72 61 2e 70 73 3a 3d 20 72 61 2e 70 73 20 61 6e 64 20 2d 2c 6d 61 73 6b 3b 0a 20 20 20 7a 64 31 3a 3d 71 20 63 6c 72 20 77 ┆ $ ; ra.ps:= ra.ps and -,mask; zd1:=q clr w┆ 0x0124bc…0130c8 (2, 32) 00 00 02 00 08 08 00 00 05 00 00 28 20 72 20 2c 63 72 74 6e 20 3b 20 78 62 75 73 3a 3d 20 65 72 72 64 3b 20 64 3a 3d 20 64 2b 32 3b 20 72 65 61 64 3b 20 72 65 74 75 72 6e 3b 0a 2e 70 20 20 20 ┆ ( r ,crtn ; xbus:= errd; d:= d+2; read; return; .p ┆ 0x0130c8…013cd4 (2, 33) 00 00 02 00 08 08 00 00 05 00 00 2c 70 6c 65 76 65 6c 28 31 33 3a 31 35 29 3b 0a 20 20 20 62 64 3a 3d 71 2c 68 20 77 20 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3b 20 78 62 75 73 3a ┆ ,plevel(13:15); bd:=q,h w , ; xbus:┆ 0x013cd4…0148e0 (2, 34) 00 00 02 00 08 08 00 00 05 00 00 30 64 33 3d 7a 64 3a 20 20 20 20 20 20 20 20 20 20 6d 0a 3b 3b 20 20 20 72 64 30 3a 20 20 20 20 20 20 20 20 20 20 20 20 20 6b 0a 3b 3b 20 20 20 72 64 31 3d 72 ┆ 0d3=zd: m ;; rd0: k ;; rd1=r┆ 0x0148e0…0154ec (2, 35) 00 00 02 00 08 08 00 00 05 00 00 34 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 3b 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ 4 ; ┆ 0x0154ec…0160f8 (2, 36) 00 00 02 00 08 08 00 00 05 00 00 38 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3b 0a 72 65 61 64 6c 75 34 63 31 30 3a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3b 70 72 6f 63 20 ┆ 8 ; readlu4c10: ;proc ┆ 0x0160f8…016d04 (2, 37) 00 00 02 00 08 08 00 00 05 00 00 3c 70 65 2d 2d 2c 68 20 2c 20 20 20 20 20 20 20 20 20 20 3b 0a 20 20 20 77 31 3a 3d 77 31 2b 62 64 2c 68 20 77 20 73 2c 63 6a 73 20 72 65 61 64 31 32 74 3b 20 ┆ <pe--,h , ; w1:=w1+bd,h w s,cjs read12t; ┆ 0x016d04…017910 (2, 38) 00 00 02 00 08 08 00 00 05 00 00 40 3b 20 64 65 76 3a 3d 20 77 61 69 74 6d 65 6d 3b 20 72 65 61 64 6c 75 63 74 3b 0a 20 20 20 77 34 3a 3d 62 64 2c 68 20 77 20 73 2c 63 6a 73 20 72 65 61 64 6c ┆ @; dev:= waitmem; readluct; w4:=bd,h w s,cjs readl┆ 0x017910…01851c (2, 39) 00 00 02 00 08 08 00 00 05 00 00 44 62 79 74 65 3a 3d 20 67 65 74 62 79 74 65 74 28 77 61 69 74 6d 65 6d 29 3b 0a 20 20 20 77 34 3a 3d 71 2c 68 20 2c 63 6a 73 20 78 6d 69 74 77 6f 72 64 20 20 ┆ Dbyte:= getbytet(waitmem); w4:=q,h ,cjs xmitword ┆ 0x01851c…019128 (2, 40) 00 00 02 00 08 08 00 00 05 00 00 48 64 72 3b 0a 3b 3b 20 73 74 61 63 6b 3a 3a 20 2d 3e 20 3b 0a 3b 3b 0a 20 20 20 2c 2c 63 6a 73 20 72 65 61 64 62 63 6f 6e 74 20 20 20 20 20 20 20 20 20 20 20 ┆ Hdr; ;; stack:: -> ; ;; ,,cjs readbcont ┆ 0x019128…019d34 (2, 41) 00 00 02 00 08 08 00 00 05 00 00 4c 20 20 20 20 20 20 20 20 3b 70 72 6f 63 20 67 65 74 66 69 65 6c 64 3b 0a 20 20 20 63 3a 3d 33 2c 2c 2c 6c 64 63 74 20 33 20 20 20 20 20 20 20 20 20 20 20 20 ┆ L ;proc getfield; c:=3,,,ldct 3 ┆ 0x019d34…01a940 (2, 42) 00 00 02 00 08 08 00 00 05 00 00 50 20 20 20 20 20 20 20 20 20 20 20 20 3b 0a 20 20 20 77 33 3a 3d 77 33 20 61 6e 64 20 62 64 2c 68 20 77 20 73 2c 63 6a 70 20 6e 6f 74 20 7a 72 6f 20 73 65 74 ┆ P ; w3:=w3 and bd,h w s,cjp not zro set┆ 0x01a940…01b54c (2, 43) 00 00 02 00 08 08 00 00 05 00 00 54 6e 3a 0a 20 20 20 2c 2c 63 6a 73 20 67 65 74 73 61 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3b 20 62 2c 64 3a 3d 20 67 65 74 73 61 3b 0a 20 20 20 63 ┆ Tn: ,,cjs getsa ; b,d:= getsa; c┆ 0x01b54c…01c158 (2, 44) 00 00 02 00 08 08 00 00 05 00 00 58 65 61 64 63 6f 6e 74 20 20 20 20 20 20 20 20 20 20 20 20 20 3b 20 63 6f 6e 73 74 3a 3d 20 72 65 61 64 63 6f 6e 74 3b 0a 20 20 20 2c 2c 63 6a 70 20 77 72 66 ┆ Xeadcont ; const:= readcont; ,,cjp wrf┆ 0x01c158…01cd64 (2, 45) 00 00 02 00 08 08 00 00 05 00 00 5c 77 6f 72 64 3a 3d 20 77 61 69 74 6d 65 6d 3b 20 66 62 3a 3d 20 72 65 61 64 62 63 6f 6e 74 74 3b 0a 20 20 20 71 3a 3d 77 33 2c 2c 63 6a 70 20 67 65 74 66 69 ┆ \word:= waitmem; fb:= readbcontt; q:=w3,,cjp getfi┆ 0x01cd64…01d970 (2, 46) 00 00 02 00 08 08 00 00 05 00 00 60 73 20 61 6e 64 20 2d 2c 6d 61 73 6b 20 2b 20 6d 61 73 6b 0a 6d 62 73 65 74 31 30 3a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3b 20 ┆ `s and -,mask + mask mbset10: ; ┆ 0x01d970…01e57c (2, 47) 00 00 02 00 08 08 00 00 05 00 00 64 69 66 20 2c 20 73 74 76 69 20 2c 20 73 74 76 78 66 66 69 6e 20 3b 0a 3b 3b 0a 3b 3b 20 70 61 72 61 6d 3a 3a 20 6c 65 76 3a 20 62 79 74 65 2c 20 72 65 6c 3a ┆ dif , stvi , stvxffin ; ;; ;; param:: lev: byte, rel:┆ 0x01e57c…01f188 (2, 48) 00 00 02 00 08 08 00 00 05 00 00 68 20 20 20 20 20 20 20 20 20 20 20 20 20 3b 72 65 70 3a 0a 20 20 20 77 35 2c 73 2c 63 6a 70 20 7a 72 6f 20 66 65 74 63 68 20 20 20 20 20 20 20 20 20 3b 20 69 ┆ h ;rep: w5,s,cjp zro fetch ; i┆ 0x01f188…01fd94 (2, 49) 00 00 02 00 08 08 00 00 05 00 00 6c 33 2c 2c 63 6a 70 20 63 72 79 20 78 65 70 74 20 20 20 20 20 20 20 20 3b 20 69 66 20 6f 64 64 28 62 63 29 20 74 68 65 6e 20 65 78 70 65 63 74 69 6f 6e 28 65 ┆ l3,,cjp cry xept ; if odd(bc) then expection(e┆ 0x01fd94…0209a0 (2, 50) 00 00 02 00 08 08 00 00 05 00 00 70 20 20 20 77 35 3a 3d 72 64 77 2c 2c 63 6a 73 20 63 77 72 69 74 65 31 20 20 20 20 20 20 20 3b 20 63 77 72 69 74 65 31 28 72 31 61 2c 6e 69 6c 6c 29 3b 0a 20 ┆ p w5:=rdw,,cjs cwrite1 ; cwrite1(r1a,nill); ┆ 0x0209a0…0215ac (2, 51) 00 00 02 00 08 08 00 00 05 00 00 74 20 77 34 33 3a 20 20 20 20 20 20 20 20 20 20 20 20 20 6e 62 64 0a 3b 3b 20 77 38 37 3a 20 20 20 20 20 20 20 20 20 20 20 20 20 68 62 64 20 61 0a 3b 3b 20 77 ┆ t w43: nbd ;; w87: hbd a ;; w┆ 0x0215ac…0221b8 (2, 52) 00 00 02 00 08 08 00 00 05 00 00 78 3d 65 72 72 62 3a 3d 77 36 2c 2c 63 6a 73 20 6d 6d 61 35 20 20 20 20 20 3b 20 62 61 3a 3d 20 62 3b 20 73 65 6c 61 64 64 72 35 3b 0a 20 20 20 62 64 3a 3d 77 ┆ x=errb:=w6,,cjs mma5 ; ba:= b; seladdr5; bd:=w┆ 0x0221b8…022dc4 (2, 53) 00 00 02 00 08 08 00 00 05 00 00 7c 0a 73 65 74 72 65 66 73 68 77 74 3a 20 3b 3b 20 73 65 74 73 20 72 65 66 20 28 73 68 61 72 65 20 77 61 69 74 65 64 29 20 6f 66 20 72 65 63 65 69 76 65 72 20 ┆ | setrefshwt: ;; sets ref (share waited) of receiver ┆ 0x022dc4…0239d0 (2, 54) 00 00 02 00 08 08 00 00 05 00 00 80 20 20 20 77 34 3a 3d 77 36 2c 2c 63 6a 73 20 63 72 65 61 64 62 79 74 65 31 20 20 20 20 20 3b 0a 20 20 20 77 32 3a 3d 77 31 2c 73 2c 20 20 20 20 20 20 20 20 ┆ w4:=w6,,cjs creadbyte1 ; w2:=w1,s, ┆ 0x0239d0…0245dc (2, 55) 00 00 02 00 08 08 00 00 05 00 00 84 20 20 20 20 20 20 3b 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 20 20 3b 0a 2e 69 6e 73 74 72 75 63 74 69 6f 6e ┆ ; ; .instruction┆ 0x0245dc…0251e8 (2, 56) 00 00 02 00 08 08 00 00 05 00 00 88 20 20 20 3b 20 6a 75 6d 70 20 69 66 20 6c 65 76 3c 3e 30 0a 20 20 20 62 75 73 3a 3d 34 30 2c 2c 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3b 0a ┆ ; jump if lev<>0 bus:=40,,, ; ┆ 0x0251e8…025df4 (2, 57) 00 00 02 00 08 08 00 00 05 00 00 8c 6c 61 73 74 20 70 72 6f 63 65 73 73 0a 20 20 20 71 2d 72 64 77 2c 73 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3b 20 74 68 69 73 20 70 72 ┆ last process q-rdw,s, ; this pr┆ 0x025df4…026a00 (2, 58) 00 00 02 00 08 08 00 00 05 00 00 90 74 6f 70 20 6f 66 20 74 68 65 20 73 74 61 63 6b 2c 20 61 6e 64 0a 3b 3b 20 74 68 65 20 62 69 74 20 22 72 65 73 75 6d 65 20 69 6e 73 74 72 75 63 74 69 6f 6e ┆ top of the stack, and ;; the bit "resume instruction┆ 0x026a00…02760c (2, 59) 00 00 02 00 08 08 00 00 05 00 00 94 2e 20 20 31 20 20 31 20 20 2e 20 20 20 20 2e 20 20 31 20 20 2e 20 20 31 20 20 20 20 2e 20 20 20 20 20 36 35 0a 3b 3b 0a 3b 3b 20 72 65 76 73 6d 3a 20 20 2e ┆ . 1 1 . . 1 . 1 . 65 ;; ;; revsm: .┆ 0x02760c…028218 (2, 60) 00 00 02 00 08 08 00 00 05 00 00 98 20 3b 0a 70 72 65 70 73 65 74 36 3a 20 3b 3b 20 73 65 74 64 79 61 64 69 63 20 6f 72 20 73 65 74 73 74 0a 20 20 20 2c 2c 63 6a 73 20 72 65 61 64 6c 75 63 71 ┆ ; prepset6: ;; setdyadic or setst ,,cjs readlucq┆ 0x028218…028e24 (2, 61) 00 00 02 00 08 08 00 00 05 00 00 9c 20 20 20 20 20 20 20 20 3b 0a 20 20 20 77 33 3a 3d 77 34 2c 2c 63 6a 73 20 77 72 69 74 65 6e 65 78 74 20 20 20 20 20 20 3b 0a 20 20 20 77 33 3a 3d 77 38 2b ┆ ; w3:=w4,,cjs writenext ; w3:=w8+┆ 0x028e24…029a30 (2, 62) 00 00 02 00 08 08 00 00 05 00 00 a0 73 74 72 75 63 74 69 6f 6e 20 73 65 74 73 62 20 20 20 20 20 20 20 20 20 20 20 20 3b 20 73 65 74 20 73 75 62 73 65 74 0a 20 20 20 62 75 73 3a 3d 36 35 2c 2c ┆ struction setsb ; set subset bus:=65,,┆ 0x029a30…02a63c (2, 63) 00 00 02 00 08 08 00 00 05 00 00 a4 20 20 20 3b 0a 75 6e 73 64 69 76 30 3a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3b 0a 20 20 20 71 3a 3d 71 2d 2d 2c 2c 20 20 20 20 ┆ ; unsdiv0: ; q:=q--,, ┆ 0x02a63c…02b248 (2, 64) 00 00 02 00 08 08 00 00 05 00 00 a8 61 70 28 69 72 29 3b 0a 3b 3b 0a 2e 69 6e 73 74 72 75 63 74 69 6f 6e 20 74 6e 69 6c 6c 20 2c 20 74 70 72 65 70 20 20 20 20 3b 0a 3b 3b 0a 3b 3b 20 70 61 72 ┆ ap(ir); ;; .instruction tnill , tprep ; ;; ;; par┆ 0x02b248…02be54 (2, 65) 00 00 02 00 08 08 00 00 05 00 00 ac 63 74 69 6f 6e 20 6c 65 20 2c 20 70 72 65 70 64 79 61 64 20 20 20 20 3b 0a 20 20 20 63 3a 77 32 2d 77 33 2c 2c 63 6a 70 20 6e 6f 74 20 62 30 20 61 72 69 74 ┆ ction le , prepdyad ; c:w2-w3,,cjp not b0 arit┆ 0x02be54…02ca60 (2, 66) 00 00 02 00 08 08 00 00 05 00 00 b0 76 66 20 77 72 66 65 74 63 68 3b 74 65 73 74 20 6f 76 65 72 66 6c 6f 77 0a 20 20 20 2c 2c 63 6a 70 20 61 72 69 74 6f 76 66 20 20 20 20 20 20 20 20 20 20 20 ┆ vf wrfetch;test overflow ,,cjp aritovf ┆ 0x02ca60…02d66c (2, 67) 00 00 02 00 08 08 00 00 05 00 00 b4 75 3a 3d 73 6c 75 2b 32 2c 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3b 20 64 6f 6e 27 74 20 75 6e 73 74 61 63 6b 20 74 68 65 20 69 6e 64 65 78 0a 20 ┆ u:=slu+2,, ; don't unstack the index ┆ 0x02d66c…02e278 (2, 68) 00 00 02 00 08 08 00 00 05 00 00 b8 20 20 20 20 3b 0a 20 20 20 77 36 3a 3d 77 32 2c 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3b 77 30 36 3d 64 79 6e 61 6d 69 63 20 6c 69 6e ┆ ; w6:=w2,, ;w06=dynamic lin┆ 0x02e278…02ee84 (2, 69) 00 00 02 00 08 08 00 00 05 00 00 bc 20 20 20 20 20 20 3b 0a 20 20 20 77 36 3a 3d 77 31 20 61 6e 64 20 37 30 30 2c 2c 20 20 20 20 20 20 20 20 20 20 20 3b 0a 20 20 20 62 75 73 3a 3d 77 33 20 69 ┆ ; w6:=w1 and 700,, ; bus:=w3 i┆ 0x02ee84…02fa90 (2, 70) 00 00 02 00 08 08 00 00 05 00 00 c0 66 6f 72 20 64 3a 3d 20 30 20 73 74 65 70 20 32 20 75 6e 74 69 6c 20 2d 32 20 64 6f 0a 73 65 6c 66 74 34 31 30 3a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ for d:= 0 step 2 until -2 do selft410: ┆ 0x02fa90…02fb26 (2, 71) 00 00 01 00 00 34 00 00 06 00 00 01 68 6c 76 6a 6f 62 63 72 6f 73 73 00 00 00 01 6d 69 6e 69 00 00 00 00 00 00 00 00 77 c7 41 00 00 00 00 00 00 00 00 00 00 00 00 60 00 00 00 00 02 6d 69 6e 69 ┆ 4 hlvjobcross mini w A ` mini┆ 0x02fb26…02fe32 (2, 72) 00 00 02 00 02 08 00 00 06 00 00 00 6a 6f 62 20 68 6c 76 20 38 20 31 30 30 30 20 73 69 7a 65 20 39 35 30 30 30 20 74 69 6d 65 20 33 30 20 30 20 6f 75 74 70 75 74 20 31 30 30 30 30 30 30 2c 00 ┆ job hlv 8 1000 size 95000 time 30 0 output 1000000, ┆ 0x02fe32…02fec8 (2, 73) 00 00 01 00 00 34 00 00 07 00 00 01 6a 6f 62 35 00 00 00 00 00 00 00 00 00 00 01 64 69 73 63 00 00 00 00 00 00 00 00 7b 9c d7 00 00 00 00 00 00 00 00 00 00 00 00 60 00 00 00 00 02 64 69 73 63 ┆ 4 job5 disc { ` disc┆ 0x02fec8…0301d4 (2, 74) 00 00 02 00 02 08 00 00 07 00 00 00 6a 6f 62 20 66 68 20 35 20 31 30 30 30 20 73 69 7a 65 20 39 35 30 30 30 20 74 69 6d 65 20 33 30 20 30 20 6f 75 74 70 75 74 20 38 30 30 30 30 30 00 2c 0a 70 ┆ job fh 5 1000 size 95000 time 30 0 output 800000 , p┆ 0x0301d4…03026a (2, 75) 00 00 01 00 00 34 00 00 08 00 00 01 68 6c 76 6a 6f 62 70 61 72 6d 00 00 00 00 01 6d 69 6e 69 00 00 00 00 00 00 00 00 77 5b a6 00 00 00 00 00 00 00 00 00 00 00 00 60 00 00 00 00 02 6d 69 6e 69 ┆ 4 hlvjobparm mini w[ ` mini┆ 0x03026a…030576 (2, 76) 00 00 02 00 02 08 00 00 08 00 00 00 6a 6f 62 20 68 6c 76 20 32 20 31 30 30 30 20 73 69 7a 65 20 39 30 30 30 00 30 0a 73 70 61 6c 74 65 20 6c 6d 69 74 78 74 30 30 30 63 20 73 70 61 6c 74 65 72 ┆ job hlv 2 1000 size 9000 0 spalte lmitxt000c spalter┆ 0x030576…03060c (2, 77) 00 00 01 00 00 34 00 00 09 00 00 01 72 6f 66 66 6a 6f 62 00 00 00 00 00 00 00 01 64 69 73 63 00 00 00 00 00 00 00 00 79 25 0b 00 00 00 00 00 00 00 00 00 00 00 00 60 00 00 00 00 02 64 69 73 63 ┆ 4 roffjob disc y% ` disc┆ 0x03060c…030918 (2, 78) 00 00 02 00 02 08 00 00 09 00 00 00 6a 6f 62 20 68 65 61 20 33 20 32 30 30 20 64 65 76 69 20 35 30 20 62 75 66 20 31 30 20 73 69 7a 65 20 35 30 30 30 30 20 74 69 6d 65 20 32 39 20 30 20 20 70 ┆ job hea 3 200 devi 50 buf 10 size 50000 time 29 0 p┆ 0x030918…0309ae (2, 79) 00 00 01 00 00 34 00 00 0a 00 00 0b 6c 6d 69 74 78 74 30 39 30 00 00 00 00 00 0b 64 69 73 63 00 00 00 00 00 00 00 00 7b 6f 94 00 00 00 00 00 00 00 00 00 00 00 00 60 00 00 00 00 02 64 69 73 63 ┆ 4 lmitxt090 disc {o ` disc┆ 0x0309ae…0315ba (2, 80) 00 00 02 00 08 08 00 00 0a 00 00 00 3b 3b 0a 3b 3b 20 20 73 65 6c 66 64 69 61 67 6e 6f 73 74 69 63 20 74 65 73 74 20 72 6f 75 74 69 6e 65 73 2e 0a 3b 3b 0a 3b 3b 20 20 66 69 6c 65 3a 20 6c 6d ┆ ;; ;; selfdiagnostic test routines. ;; ;; file: lm┆ 0x0315ba…0321c6 (2, 81) 00 00 02 00 08 08 00 00 0a 00 00 04 66 66 2c 73 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3b 0a 73 65 6c 66 74 32 31 30 3a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ff,s, ; selft210: ┆ 0x0321c6…032ad2 (2, 82) 00 00 02 00 06 08 00 00 0a 00 00 08 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3b 0a 20 20 20 2c 2c 63 6a 70 20 73 65 6c 66 74 34 34 30 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ; ,,cjp selft440 ┆ 0x032ad2…032b68 (2, 83) 00 00 01 00 00 34 00 00 0b 00 00 01 70 72 65 63 72 6f 73 73 74 00 00 00 00 00 01 6d 69 6e 69 00 00 00 00 00 00 00 00 75 b2 45 00 00 00 00 00 00 00 00 00 00 00 00 60 00 00 00 00 02 6d 69 6e 69 ┆ 4 precrosst mini u E ` mini┆ 0x032b68…032e74 (2, 84) 00 00 02 00 02 08 00 00 0b 00 00 00 6a 6f 62 20 68 6c 76 20 32 20 31 30 30 30 20 74 69 6d 65 20 35 20 30 20 70 65 72 6d 20 6d 69 6e 69 20 31 30 30 30 20 31 30 0a 28 6d 6f 64 65 20 6c 69 73 74 ┆ job hlv 2 1000 time 5 0 perm mini 1000 10 (mode list┆ 0x032e74…032f0a (2, 85) 00 00 01 00 00 34 00 00 0c 00 04 1a 70 00 00 00 00 00 00 00 00 00 00 00 00 04 1a 64 69 73 63 00 00 00 00 00 00 00 00 7b a1 3b 00 00 00 00 00 00 00 00 00 00 00 00 60 00 00 00 00 02 64 69 73 63 ┆ 4 p disc { ; ` disc┆ 0x032f0a…033b16 (2, 86) 00 00 02 00 08 08 00 00 0c 00 00 00 66 69 6e 69 73 20 20 20 20 20 20 20 66 68 30 00 00 00 00 00 00 00 00 00 20 61 74 20 31 33 20 33 32 00 00 0a 00 00 00 2a 62 69 6e 35 3d 73 65 74 20 31 20 6d ┆ finis fh0 at 13 32 *bin5=set 1 m┆ 0x033b16…034722 (2, 87) 00 00 02 00 08 08 00 00 0c 00 00 04 20 20 20 3b 0a 21 20 20 33 37 30 21 20 20 20 20 20 20 20 20 20 20 20 6d 6f 6e 69 74 72 6c 65 76 20 3d 20 31 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ; ! 370! monitrlev = 1 ┆ 0x034722…03532e (2, 88) 00 00 02 00 08 08 00 00 0c 00 00 08 69 6e 0a 21 20 20 37 37 30 21 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3b 3b 0a 21 20 20 37 38 30 21 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3b 3b 20 69 ┆ in ! 770! ;; ! 780! ;; i┆ 0x03532e…035f3a (2, 89) 00 00 02 00 08 08 00 00 0c 00 00 0c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3b 0a 21 20 31 32 34 30 21 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 ┆ ; ! 1240! ┆ 0x035f3a…036b46 (2, 90) 00 00 02 00 08 08 00 00 0c 00 00 10 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3b 0a 21 20 31 36 33 30 21 20 20 20 20 20 20 20 20 20 20 20 69 6f 72 77 20 20 20 20 20 20 3d 20 32 33 ┆ ; ! 1630! iorw = 23┆ 0x036b46…037752 (2, 91) 00 00 02 00 08 08 00 00 0c 00 00 14 61 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 20 20 20 20 20 20 20 20 20 20 20 20 3b 0a 21 20 32 30 33 ┆ a ; ! 203┆ 0x037752…03835e (2, 92) 00 00 02 00 08 08 00 00 0c 00 00 18 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 20 20 20 20 20 20 20 20 20 20 3b 0a 21 20 32 34 32 30 21 20 ┆ ; ! 2420! ┆ 0x03835e…038f6a (2, 93) 00 00 02 00 08 08 00 00 0c 00 00 1c 20 20 20 20 20 20 20 20 3b 0a 21 20 32 38 30 30 21 20 20 20 20 20 20 20 20 20 20 20 73 76 73 77 36 20 20 20 20 20 3d 20 30 61 36 20 20 20 20 20 20 20 20 20 ┆ ; ! 2800! svsw6 = 0a6 ┆ 0x038f6a…039b76 (2, 94) 00 00 02 00 08 08 00 00 0c 00 00 20 20 20 20 20 3d 20 30 65 39 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 20 20 20 20 20 20 20 20 20 20 20 ┆ = 0e9 ┆ 0x039b76…03a782 (2, 95) 00 00 02 00 08 08 00 00 0c 00 00 24 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3b 0a 21 20 33 35 38 30 21 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ $ ; ! 3580! ┆ 0x03a782…03b38e (2, 96) 00 00 02 00 08 08 00 00 0c 00 00 28 20 20 20 20 20 20 20 20 72 65 61 72 64 20 20 20 20 20 3d 20 30 66 63 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 ┆ ( reard = 0fc ┆ 0x03b38e…03bf9a (2, 97) 00 00 02 00 08 08 00 00 0c 00 00 2c 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 3b 20 69 2f 6f 20 62 6c 6f 63 6b 20 69 6e 73 74 72 3a 20 6c 65 76 ┆ , ; i/o block instr: lev┆ 0x03bf9a…03cba6 (2, 98) 00 00 02 00 08 08 00 00 0c 00 00 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 20 20 20 20 3b 0a 21 20 20 20 39 30 21 20 21 20 30 30 33 20 33 65 38 21 20 20 20 ┆ 0 ; ! 90! ! 003 3e8! ┆ 0x03cba6…03d7b2 (2, 99) 00 00 02 00 08 08 00 00 0c 00 00 34 20 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3b 0a 21 20 20 34 36 30 21 20 20 20 20 20 20 20 20 20 20 20 73 65 74 73 6c 69 63 65 31 ┆ 4 , ; ! 460! setslice1┆ 0x03d7b2…03e3be (2, 100) 00 00 02 00 08 08 00 00 0c 00 00 38 30 33 33 20 30 33 66 21 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 2c 20 20 20 20 20 20 20 2c 63 6a 70 20 66 65 74 ┆ 8033 03f! , ,cjp fet┆ 0x03e3be…03efca (2, 101) 00 00 02 00 08 08 00 00 0c 00 00 3c 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 20 20 20 3b 0a 21 20 31 32 30 30 21 20 21 20 30 34 32 20 31 ┆ < ; ! 1200! ! 042 1┆ 0x03efca…03fbd6 (2, 102) 00 00 02 00 08 08 00 00 0c 00 00 40 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2c 20 20 20 20 20 20 20 2c 63 6a 70 20 63 72 20 6b 20 20 20 20 20 20 20 20 20 20 20 20 20 3b 0a ┆ @ , ,cjp cr k ; ┆ 0x03fbd6…0407e2 (2, 103) 00 00 02 00 08 08 00 00 0c 00 00 44 30 30 21 20 21 20 30 36 63 20 30 33 66 21 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 2c 20 20 20 20 20 20 20 2c 63 ┆ D00! ! 06c 03f! , ,c┆ 0x0407e2…0413ee (2, 104) 00 00 02 00 08 08 00 00 0c 00 00 48 35 2d 2d 77 35 20 20 20 20 2c 20 20 20 20 20 20 20 2c 63 6a 70 20 6d 72 71 37 20 20 20 20 20 20 20 20 20 20 20 20 20 3b 20 64 69 73 70 3a 3d 30 3b 20 74 69 ┆ H5--w5 , ,cjp mrq7 ; disp:=0; ti┆ 0x0413ee…041ffa (2, 105) 00 00 02 00 08 08 00 00 0c 00 00 4c 20 20 6d 72 71 37 61 3a 20 3b 3b 73 65 74 20 74 74 69 20 69 6e 74 65 72 72 75 70 74 0a 21 20 32 37 33 30 21 20 21 20 30 39 38 20 30 30 31 21 20 20 20 63 3a ┆ L mrq7a: ;;set tti interrupt ! 2730! ! 098 001! c:┆ 0x041ffa…042c06 (2, 106) 00 00 02 00 08 08 00 00 0c 00 00 50 30 30 31 21 20 20 20 7a 64 31 3a 3d 20 20 20 20 20 20 20 20 20 20 77 31 20 20 20 20 20 20 20 20 2c 20 20 20 20 20 20 20 2c 20 20 20 20 20 20 20 20 20 20 20 ┆ P001! zd1:= w1 , , ┆ 0x042c06…043812 (2, 107) 00 00 02 00 08 08 00 00 0c 00 00 54 77 31 2d 2d 20 20 20 20 20 20 2c 20 20 20 20 20 20 20 2c 63 6a 73 20 77 72 69 74 65 6e 65 78 74 20 20 20 20 20 20 20 20 3b 0a 21 20 33 35 32 30 21 20 21 20 ┆ Tw1-- , ,cjs writenext ; ! 3520! ! ┆ 0x043812…04441e (2, 108) 00 00 02 00 08 08 00 00 0c 00 00 58 62 36 35 6e 65 78 74 20 77 36 2c 77 35 2b 2b 20 20 20 77 33 20 20 20 20 31 20 20 20 20 20 31 20 20 20 20 20 20 20 20 20 20 6f 64 64 0a 21 20 20 33 35 30 21 ┆ Xb65next w6,w5++ w3 1 1 odd ! 350!┆ 0x04441e…04502a (2, 109) 00 00 02 00 08 08 00 00 0c 00 00 5c 20 20 20 70 61 67 65 20 20 32 38 0a 21 0a 21 20 20 37 39 30 21 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 ┆ \ page 28 ! ! 790! ┆ 0x04502a…045c36 (2, 110) 00 00 02 00 08 08 00 00 0c 00 00 60 20 20 20 20 20 20 20 20 20 65 72 72 6d 31 3a 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 20 20 20 20 20 ┆ ` errm1: ┆ 0x045c36…046842 (2, 111) 00 00 02 00 08 08 00 00 0c 00 00 64 66 66 2c 73 20 20 20 20 20 20 2c 63 72 74 6e 20 62 31 35 20 20 20 20 20 20 20 20 20 20 20 20 20 3b 20 77 34 3a 3d 6c 61 73 74 62 79 74 65 3b 20 64 65 66 69 ┆ dff,s ,crtn b15 ; w4:=lastbyte; defi┆ 0x046842…04744e (2, 112) 00 00 02 00 08 08 00 00 0c 00 00 68 20 2c 68 20 72 20 73 20 20 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3b 0a 21 20 31 39 30 30 21 20 21 20 30 66 62 20 30 66 64 21 20 ┆ h ,h r s , ; ! 1900! ! 0fb 0fd! ┆ 0x04744e…04805a (2, 113) 00 00 02 00 08 08 00 00 0c 00 00 6c 20 20 20 20 20 2c 68 20 72 20 20 20 20 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3b 0a 21 20 32 32 36 30 21 20 21 20 31 31 32 20 30 ┆ l ,h r , ; ! 2260! ! 112 0┆ 0x04805a…048c66 (2, 114) 00 00 02 00 08 08 00 00 0c 00 00 70 20 77 20 62 20 20 2c 63 6a 73 20 6d 6d 61 62 20 20 20 20 20 20 20 20 20 20 20 20 20 3b 0a 21 20 32 36 35 30 21 20 21 20 31 32 62 20 30 63 37 21 20 20 20 62 ┆ p w b ,cjs mmab ; ! 2650! ! 12b 0c7! b┆ 0x048c66…049872 (2, 115) 00 00 02 00 08 08 00 00 0c 00 00 74 6a 73 20 6d 6d 64 62 20 20 20 20 20 20 20 20 20 20 20 20 20 3b 0a 21 20 33 30 32 30 21 20 21 20 31 34 32 20 30 30 30 21 20 20 20 62 64 3a 3d 20 20 20 20 20 ┆ tjs mmdb ; ! 3020! ! 142 000! bd:= ┆ 0x049872…04a47e (2, 116) 00 00 02 00 08 08 00 00 0c 00 00 78 20 20 20 20 20 20 20 3b 20 72 65 6c 3a 3d 20 72 65 61 64 63 6f 6e 74 3b 0a 21 20 33 34 32 30 21 20 20 20 20 20 20 20 20 20 20 20 67 65 74 73 61 31 3a 20 20 ┆ x ; rel:= readcont; ! 3420! getsa1: ┆ 0x04a47e…04b08a (2, 117) 00 00 02 00 08 08 00 00 0c 00 00 7c 34 30 21 20 21 20 31 36 36 20 30 30 30 21 20 20 20 20 20 20 20 20 20 20 20 20 20 20 77 30 3a 3d 3e 77 30 20 20 20 20 20 20 20 2c 20 20 20 20 20 20 20 2c 72 ┆ |40! ! 166 000! w0:=>w0 , ,r┆ 0x04b08a…04bc96 (2, 118) 00 00 02 00 08 08 00 00 0c 00 00 80 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3b 0a 21 20 20 31 39 30 21 20 21 20 31 37 62 20 31 33 62 21 20 20 20 20 20 20 20 20 20 20 20 20 20 20 77 ┆ ; ! 190! ! 17b 13b! w┆ 0x04bc96…04c8a2 (2, 119) 00 00 02 00 08 08 00 00 0c 00 00 84 61 72 65 64 20 61 73 0a 21 20 20 35 39 30 21 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3b 3b 20 20 20 76 61 72 20 61 63 74 71 3a 20 61 72 72 61 79 28 6d 2e ┆ ared as ! 590! ;; var actq: array(m.┆ 0x04c8a2…04d4ae (2, 120) 00 00 02 00 08 08 00 00 0c 00 00 88 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3b 0a 21 20 20 39 35 30 21 20 21 20 31 61 32 20 31 31 33 21 20 20 20 20 20 20 20 20 20 20 20 ┆ ; ! 950! ! 1a2 113! ┆ 0x04d4ae…04e0ba (2, 121) 00 00 02 00 08 08 00 00 0c 00 00 8c 37 20 20 20 20 20 20 20 20 2c 20 20 20 20 20 20 20 2c 63 6a 73 20 73 65 74 6c 69 6e 74 20 20 20 20 20 20 20 20 20 20 3b 20 73 65 74 6c 69 6e 74 28 6e 62 64 ┆ 7 , ,cjs setlint ; setlint(nbd┆ 0x04e0ba…04ecc6 (2, 122) 00 00 02 00 08 08 00 00 0c 00 00 90 20 20 3b 3b 20 62 65 67 69 6e 20 6c 6d 69 74 78 74 30 33 30 0a 21 20 20 20 33 30 21 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3b 3b 0a 21 20 20 20 34 30 21 ┆ ;; begin lmitxt030 ! 30! ;; ! 40!┆ 0x04ecc6…04f8d2 (2, 123) 00 00 02 00 08 08 00 00 0c 00 00 94 20 20 20 20 20 20 20 20 3b 3b 20 20 20 20 20 20 72 64 32 3d 72 64 78 20 20 38 33 78 78 2c 20 77 68 65 72 65 20 78 78 3d 69 6e 73 74 72 75 63 74 69 6f 6e 20 ┆ ;; rd2=rdx 83xx, where xx=instruction ┆ 0x04f8d2…0504de (2, 124) 00 00 02 00 08 08 00 00 0c 00 00 98 3a 3d 77 35 2b 2b 20 20 20 20 20 20 2c 68 20 20 20 20 20 20 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3b 20 63 6f 75 6e 74 3a 3d 63 ┆ :=w5++ ,h , ; count:=c┆ 0x0504de…0510ea (2, 125) 00 00 02 00 08 08 00 00 0c 00 00 9c 20 31 66 36 20 32 31 33 21 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 2c 68 20 20 20 20 20 20 2c 63 6a 73 20 78 6d ┆ 1f6 213! ,h ,cjs xm┆ 0x0510ea…051cf6 (2, 126) 00 00 02 00 08 08 00 00 0c 00 00 a0 70 20 7a 72 6f 20 69 6f 62 78 65 70 74 20 20 20 20 20 20 3b 20 73 79 6e 63 20 69 74 72 3b 20 64 69 73 70 3a 3d 64 69 73 70 2b 31 3b 20 65 78 63 65 70 74 69 ┆ p zro iobxept ; sync itr; disp:=disp+1; excepti┆ 0x051cf6…052902 (2, 127) 00 00 02 00 08 08 00 00 0c 00 00 a4 20 20 20 20 20 20 20 20 3b 3b 0a 21 20 20 33 32 30 21 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3b 3b 20 70 72 6f 63 65 64 75 72 65 20 77 61 69 74 72 65 63 ┆ ;; ! 320! ;; procedure waitrec┆ 0x052902…05350e (2, 128) 00 00 02 00 08 08 00 00 0c 00 00 a8 21 20 20 37 34 30 21 20 21 20 32 32 38 20 30 30 35 21 20 20 20 20 20 20 20 20 20 20 20 20 20 20 77 31 3a 3d 69 6f 63 64 61 65 30 20 20 20 2c 68 20 20 20 20 ┆ ! 740! ! 228 005! w1:=iocdae0 ,h ┆ 0x05350e…05411a (2, 129) 00 00 02 00 08 08 00 00 0c 00 00 ac 20 2d 3e 20 72 65 67 6e 6f 3a 20 77 6f 72 64 3b 0a 21 20 31 31 38 30 21 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3b 3b 0a 21 20 31 31 39 30 21 20 21 20 32 ┆ -> regno: word; ! 1180! ;; ! 1190! ! 2┆ 0x05411a…054d26 (2, 130) 00 00 02 00 08 08 00 00 0c 00 00 b0 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 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3b 0a 21 ┆ ; !┆ 0x054d26…055932 (2, 131) 00 00 02 00 08 08 00 00 0c 00 00 b4 20 32 30 36 30 21 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3b 3b 20 70 61 72 61 6d 3a 3a 20 6e 6f 6e 65 3b 0a 21 20 32 30 37 30 21 20 20 20 20 20 20 20 20 ┆ 2060! ;; param:: none; ! 2070! ┆ 0x055932…05653e (2, 132) 00 00 02 00 08 08 00 00 0c 00 00 b8 20 2c 20 20 20 20 20 20 20 2c 63 6a 73 20 77 72 69 74 65 6e 65 78 74 20 20 20 20 20 20 20 20 3b 20 77 72 69 74 65 6e 65 78 74 28 62 2c 64 2c 73 61 64 2e 62 ┆ , ,cjs writenext ; writenext(b,d,sad.b┆ 0x05653e…05714a (2, 133) 00 00 02 00 08 08 00 00 0c 00 00 bc 20 20 20 20 20 3b 3b 20 70 72 6f 63 65 64 75 72 65 20 67 65 74 66 69 65 6c 64 28 77 6f 72 64 2c 66 62 79 74 65 29 3b 0a 21 20 20 34 32 30 21 20 20 20 20 20 ┆ ;; procedure getfield(word,fbyte); ! 420! ┆ 0x05714a…057d56 (2, 134) 00 00 02 00 08 08 00 00 0c 00 00 c0 20 20 20 20 2c 20 20 20 20 20 20 20 2c 72 70 63 74 20 6d 61 6b 65 6d 61 73 6b 20 20 20 20 20 20 20 20 3b 20 77 68 69 6c 65 20 62 6e 6f 3c 3e 30 20 64 6f 20 ┆ , ,rpct makemask ; while bno<>0 do ┆ 0x057d56…058962 (2, 135) 00 00 02 00 08 08 00 00 0c 00 00 c4 6b 3b 0a 21 20 31 31 39 30 21 20 21 20 32 61 38 20 30 30 30 21 20 20 20 20 20 20 20 20 20 20 20 20 20 20 77 33 3a 3d 2d 2d 77 33 20 20 20 20 20 20 2c 20 20 ┆ k; ! 1190! ! 2a8 000! w3:=--w3 , ┆ 0x058962…05956e (2, 136) 00 00 02 00 08 08 00 00 0c 00 00 c8 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3b 72 65 76 6c 2d 63 6f 6d 6d 6f 6e 3a 0a 21 20 31 36 32 30 21 20 21 20 32 62 37 20 30 64 ┆ ;revl-common: ! 1620! ! 2b7 0d┆ 0x05956e…05a17a (2, 137) 00 00 02 00 08 08 00 00 0c 00 00 cc 20 73 74 61 72 74 65 64 3b 0a 21 20 32 30 38 30 21 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3b 3b 0a 21 20 32 30 39 30 21 20 20 20 20 20 20 20 20 20 20 20 ┆ started; ! 2080! ;; ! 2090! ┆ 0x05a17a…05ad86 (2, 138) 00 00 02 00 08 08 00 00 0c 00 00 d0 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 3b 0a 21 0c 0a 21 72 63 33 35 6d 61 73 73 20 20 20 20 20 6c 6d 69 ┆ ; ! !rc35mass lmi┆ 0x05ad86…05b992 (2, 139) 00 00 02 00 08 08 00 00 0c 00 00 d4 2d 3e 20 6c 75 3a 20 61 64 64 72 3b 0a 21 20 32 39 33 30 21 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3b 3b 0a 21 20 32 39 34 30 21 20 21 20 32 65 34 20 30 ┆ -> lu: addr; ! 2930! ;; ! 2940! ! 2e4 0┆ 0x05b992…05c59e (2, 140) 00 00 02 00 08 08 00 00 0c 00 00 d8 20 3b 0a 21 20 33 34 32 30 21 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3b 3b 0a 21 20 33 34 33 30 21 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3b 3b 20 70 ┆ ; ! 3420! ;; ! 3430! ;; p┆ 0x05c59e…05d1aa (2, 141) 00 00 02 00 08 08 00 00 0c 00 00 dc 20 20 20 20 20 20 20 20 20 2c 20 20 20 20 20 20 20 2c 63 6a 73 20 72 65 61 64 62 63 6f 6e 74 20 20 20 20 20 20 20 20 3b 20 66 62 3a 3d 20 72 65 61 64 62 63 ┆ , ,cjs readbcont ; fb:= readbc┆ 0x05d1aa…05ddb6 (2, 142) 00 00 02 00 08 08 00 00 0c 00 00 e0 20 20 20 20 20 20 38 31 20 30 36 20 31 37 20 20 20 20 20 31 33 20 30 32 20 31 30 20 20 20 20 20 20 20 20 20 20 70 61 67 65 20 20 37 34 0a 21 0a 21 20 34 34 ┆ 81 06 17 13 02 10 page 74 ! ! 44┆ 0x05ddb6…05e9c2 (2, 143) 00 00 02 00 08 08 00 00 0c 00 00 e4 30 21 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3b 3b 0a 21 20 35 31 31 30 21 20 21 20 33 30 35 20 30 64 62 21 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ 0! ;; ! 5110! ! 305 0db! ┆ 0x05e9c2…05f5ce (2, 144) 00 00 02 00 08 08 00 00 0c 00 00 e8 76 78 77 66 69 6e 3a 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 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ vxwfin: ┆ 0x05f5ce…0601da (2, 145) 00 00 02 00 08 08 00 00 0c 00 00 ec 21 72 63 33 35 6d 61 73 73 20 20 20 20 20 6c 6d 69 74 78 74 30 35 30 20 20 20 20 20 20 38 31 20 30 36 20 31 37 20 20 20 20 20 31 33 20 30 32 20 31 30 20 20 ┆ !rc35mass lmitxt050 81 06 17 13 02 10 ┆ 0x0601da…060de6 (2, 146) 00 00 02 00 08 08 00 00 0c 00 00 f0 20 3b 3b 0a 21 20 36 37 30 30 21 20 20 20 20 20 20 20 20 20 20 20 73 74 76 73 62 66 69 6e 3a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ;; ! 6700! stvsbfin: ┆ 0x060de6…0619f2 (2, 147) 00 00 02 00 08 08 00 00 0c 00 00 f4 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 20 20 20 20 20 3b 72 65 70 3a 0a 21 20 37 31 36 30 21 20 21 ┆ ;rep: ! 7160! !┆ 0x0619f2…0625fe (2, 148) 00 00 02 00 08 08 00 00 0c 00 00 f8 74 69 6e 74 20 74 68 65 6e 20 72 65 70 0a 21 20 37 35 33 30 21 20 21 20 33 34 32 20 33 33 33 21 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ tint then rep ! 7530! ! 342 333! ┆ 0x0625fe…06320a (2, 149) 00 00 02 00 08 08 00 00 0c 00 00 fc 69 63 61 6c 3b 0a 21 20 37 39 30 30 21 20 21 20 33 35 35 20 30 63 38 21 20 20 20 20 20 20 20 20 20 20 20 20 20 20 77 36 3a 3d 62 64 20 20 20 20 20 20 20 20 ┆ ical; ! 7900! ! 355 0c8! w6:=bd ┆ 0x06320a…063e16 (2, 150) 00 00 02 00 08 08 00 00 0c 00 01 00 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3b 0a 21 20 38 32 34 30 21 20 21 20 33 36 63 20 31 33 37 21 20 20 20 72 61 3a 3d 20 20 20 ┆ , ; ! 8240! ! 36c 137! ra:= ┆ 0x063e16…064a22 (2, 151) 00 00 02 00 08 08 00 00 0c 00 01 04 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 2c 20 20 20 20 20 20 20 2c 63 6a 70 20 77 72 66 65 74 63 68 20 20 20 20 20 20 ┆ , ,cjp wrfetch ┆ 0x064a22…06562e (2, 152) 00 00 02 00 08 08 00 00 0c 00 01 08 30 32 21 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3b 0a 21 20 20 36 32 30 21 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ 02! ; ! 620! ┆ 0x06562e…06623a (2, 153) 00 00 02 00 08 08 00 00 0c 00 01 0c 6e 73 74 72 75 63 74 69 6f 6e 20 73 76 73 66 34 20 2c 20 6b 20 2c 20 73 74 76 73 66 66 69 6e 20 21 20 30 63 34 20 33 38 34 20 33 32 35 21 20 20 20 20 20 20 ┆ nstruction svsf4 , k , stvsffin ! 0c4 384 325! ┆ 0x06623a…066e46 (2, 154) 00 00 02 00 08 08 00 00 0c 00 01 10 6e 28 6c 70 75 73 68 65 33 29 3b 0a 21 20 20 32 38 30 21 20 21 20 33 39 35 20 30 31 35 21 20 20 20 20 20 20 20 20 20 20 20 20 20 20 71 3a 3d 20 6c 70 75 73 ┆ n(lpushe3); ! 280! ! 395 015! q:= lpus┆ 0x066e46…067a52 (2, 155) 00 00 02 00 08 08 00 00 0c 00 01 14 20 20 36 33 30 21 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3b 3b 20 73 74 61 63 6b 3a 3a 20 72 32 61 2c 20 72 31 61 3a 20 61 64 64 72 20 2d 3e 20 3b 0a 21 ┆ 630! ;; stack:: r2a, r1a: addr -> ; !┆ 0x067a52…06865e (2, 156) 00 00 02 00 08 08 00 00 0c 00 01 18 34 3b 0a 21 20 20 39 38 30 21 20 2e 70 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 20 20 20 20 20 20 20 ┆ 4; ! 980! .p ┆ 0x06865e…06926a (2, 157) 00 00 02 00 08 08 00 00 0c 00 01 1c 20 20 20 20 20 20 20 3b 20 69 66 20 6c 6f 63 6b 28 72 65 66 29 20 74 68 65 6e 20 67 6f 74 6f 20 6c 6f 63 6b 65 72 72 6f 72 3b 0a 21 20 31 33 35 30 21 20 21 ┆ ; if lock(ref) then goto lockerror; ! 1350! !┆ 0x06926a…069e76 (2, 158) 00 00 02 00 08 08 00 00 0c 00 01 20 0a 21 20 20 32 35 30 21 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3b 3b 0a 21 20 20 32 36 30 21 20 2e 70 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ! 250! ;; ! 260! .p ┆ 0x069e76…06aa82 (2, 159) 00 00 02 00 08 08 00 00 0c 00 01 24 63 33 35 6d 61 73 73 20 20 20 20 20 6c 6d 69 74 78 74 30 37 35 20 20 20 20 20 20 38 31 20 30 36 20 31 37 20 20 20 20 20 31 33 20 30 32 20 31 30 20 20 20 20 ┆ $c35mass lmitxt075 81 06 17 13 02 10 ┆ 0x06aa82…06b68e (2, 160) 00 00 02 00 08 08 00 00 0c 00 01 28 2c 20 20 20 20 20 20 20 2c 63 6a 70 20 63 77 72 69 74 65 36 35 20 20 20 20 20 20 20 20 20 3b 20 72 65 66 28 73 68 61 72 65 20 77 61 69 74 65 64 29 3a 3d 73 ┆ (, ,cjp cwrite65 ; ref(share waited):=s┆ 0x06b68e…06c29a (2, 161) 00 00 02 00 08 08 00 00 0c 00 01 2c 77 36 3a 3d 7a 64 30 20 20 20 20 20 20 20 2c 73 20 20 20 20 20 20 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3b 20 77 36 35 3a 3d 6c ┆ ,w6:=zd0 ,s , ; w65:=l┆ 0x06c29a…06cea6 (2, 162) 00 00 02 00 08 08 00 00 0c 00 01 30 20 72 65 73 65 72 76 65 61 20 20 20 20 20 20 20 20 20 3b 20 6c 62 64 20 61 3a 3d 77 32 31 3a 3d 6d 65 6d 28 68 62 64 20 61 29 0a 21 20 31 38 37 30 21 20 21 ┆ 0 reservea ; lbd a:=w21:=mem(hbd a) ! 1870! !┆ 0x06cea6…06dab2 (2, 163) 00 00 02 00 08 08 00 00 0c 00 01 34 20 32 32 31 30 21 20 2e 70 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 20 20 20 20 20 20 20 20 20 20 20 ┆ 4 2210! .p ┆ 0x06dab2…06e6be (2, 164) 00 00 02 00 08 08 00 00 0c 00 01 38 20 20 20 20 77 61 69 74 35 3a 20 3b 3b 20 63 68 61 69 6e 20 70 72 6f 63 65 73 73 20 74 6f 20 73 65 6d 0a 21 20 32 35 37 30 21 20 21 20 34 37 64 20 34 31 37 ┆ 8 wait5: ;; chain process to sem ! 2570! ! 47d 417┆ 0x06e6be…06f2ca (2, 165) 00 00 02 00 08 08 00 00 0c 00 01 3c 20 20 3b 20 69 66 20 73 68 70 74 72 3c 3e 6e 69 6c 6c 20 74 68 65 6e 20 67 6f 74 6f 20 77 61 69 74 78 65 70 74 0a 21 20 32 39 33 30 21 20 21 20 34 39 37 20 ┆ < ; if shptr<>nill then goto waitxept ! 2930! ! 497 ┆ 0x06f2ca…06fed6 (2, 166) 00 00 02 00 08 08 00 00 0c 00 01 40 20 20 20 20 20 20 77 36 3a 3d 77 34 20 20 20 20 20 20 20 20 2c 20 20 20 20 20 20 20 2c 63 6a 73 20 63 72 65 61 64 32 31 20 20 20 20 20 20 20 20 20 20 3b 20 ┆ @ w6:=w4 , ,cjs cread21 ; ┆ 0x06fed6…070ae2 (2, 167) 00 00 02 00 08 08 00 00 0c 00 01 44 20 20 20 20 20 20 20 20 20 20 20 20 20 20 77 30 3a 3d 34 20 20 20 20 20 20 20 20 20 2c 20 20 20 20 20 20 20 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ D w0:=4 , , ┆ 0x070ae2…0716ee (2, 168) 00 00 02 00 08 08 00 00 0c 00 01 48 20 20 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3b 20 74 65 73 74 20 69 66 20 74 68 65 20 70 72 6f 63 65 73 73 20 27 68 62 64 61 27 ┆ H , ; test if the process 'hbda'┆ 0x0716ee…0722fa (2, 169) 00 00 02 00 08 08 00 00 0c 00 01 4c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3b 0a 21 20 34 33 39 30 21 20 21 20 35 30 31 20 31 34 33 21 20 20 20 20 20 20 20 20 20 20 20 20 20 20 77 31 3a 3d ┆ L ; ! 4390! ! 501 143! w1:=┆ 0x0722fa…072f06 (2, 170) 00 00 02 00 08 08 00 00 0c 00 01 50 72 65 66 29 3b 0a 21 20 34 37 39 30 21 20 21 20 35 31 64 20 33 66 64 21 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 ┆ Pref); ! 4790! ! 51d 3fd! ┆ 0x072f06…073b12 (2, 171) 00 00 02 00 08 08 00 00 0c 00 01 54 20 20 3b 3b 20 65 6e 74 72 79 3a 20 72 61 3d 20 72 65 67 3b 20 73 70 62 20 64 65 66 3b 0a 21 20 35 32 34 30 21 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3b ┆ T ;; entry: ra= reg; spb def; ! 5240! ;┆ 0x073b12…07471e (2, 172) 00 00 02 00 08 08 00 00 0c 00 01 58 20 20 20 20 2c 20 20 20 20 20 20 20 2c 63 6a 70 20 62 30 20 6d 77 63 20 20 20 20 20 20 20 20 20 20 20 3b 0a 21 20 35 36 38 30 21 20 20 20 20 20 20 20 20 20 ┆ X , ,cjp b0 mwc ; ! 5680! ┆ 0x07471e…07532a (2, 173) 00 00 02 00 08 08 00 00 0c 00 01 5c 6c 29 3b 0a 21 20 36 31 33 30 21 20 21 20 35 35 30 20 34 30 34 21 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 2c 20 ┆ \l); ! 6130! ! 550 404! , ┆ 0x07532a…075f36 (2, 174) 00 00 02 00 08 08 00 00 0c 00 01 60 20 20 20 20 20 20 3b 0a 21 20 36 36 30 30 21 20 21 20 35 35 65 20 31 30 30 21 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 77 34 20 61 6e 64 20 70 ┆ ` ; ! 6600! ! 55e 100! w4 and p┆ 0x075f36…076b42 (2, 175) 00 00 02 00 08 08 00 00 0c 00 01 64 61 63 74 69 76 61 74 69 6f 6e 2e 0a 21 20 36 39 32 30 21 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3b 3b 0a 21 20 36 39 33 30 21 20 20 20 20 20 20 20 20 20 ┆ dactivation. ! 6920! ;; ! 6930! ┆ 0x076b42…07774e (2, 176) 00 00 02 00 08 08 00 00 0c 00 01 68 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3b 0a 21 20 37 32 38 30 21 20 21 20 35 38 66 20 31 31 64 21 20 20 20 20 20 20 20 20 20 20 ┆ h, ; ! 7280! ! 58f 11d! ┆ 0x07774e…07835a (2, 177) 00 00 02 00 08 08 00 00 0c 00 01 6c 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 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3b 20 65 6e 64 20 ┆ l ; end ┆ 0x07835a…078f66 (2, 178) 00 00 02 00 08 08 00 00 0c 00 01 70 20 20 20 20 20 20 20 20 20 77 30 3a 3d 77 30 2b 38 31 20 20 20 20 20 2c 20 20 20 20 20 20 20 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ p w0:=w0+81 , , ┆ 0x078f66…079b72 (2, 179) 00 00 02 00 08 08 00 00 0c 00 01 74 20 33 37 30 21 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3b 3b 20 73 65 74 65 71 2c 20 73 65 74 73 62 2c 20 73 65 74 73 70 3a 0a 21 20 20 33 38 30 21 20 20 ┆ t 370! ;; seteq, setsb, setsp: ! 380! ┆ 0x079b72…07a77e (2, 180) 00 00 02 00 08 08 00 00 0c 00 01 78 70 61 72 74 20 74 6f 20 63 6f 6e 74 72 6f 6c 20 74 68 65 20 6d 69 63 72 6f 70 72 6f 67 72 61 6d 20 66 6c 6f 77 2e 20 74 68 65 20 62 69 74 73 20 61 72 65 20 ┆ xpart to control the microprogram flow. the bits are ┆ 0x07a77e…07b38a (2, 181) 00 00 02 00 08 08 00 00 0c 00 01 7c 21 20 20 20 20 20 20 20 20 20 20 20 70 72 65 70 73 65 74 31 3a 20 3b 3b 20 73 65 74 63 72 0a 21 20 31 33 35 30 21 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ |! prepset1: ;; setcr ! 1350! ┆ 0x07b38a…07bf96 (2, 182) 00 00 02 00 08 08 00 00 0c 00 01 80 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 2c 20 20 20 20 20 20 20 2c 63 6a 70 20 63 72 79 20 73 74 61 63 6b 65 72 72 ┆ , ,cjp cry stackerr┆ 0x07bf96…07cba2 (2, 183) 00 00 02 00 08 08 00 00 0c 00 01 84 20 20 2c 20 20 20 20 20 20 20 2c 63 6a 73 20 72 65 61 64 6c 75 63 71 20 20 20 20 20 20 20 20 20 3b 0a 21 20 32 30 37 30 21 20 21 20 35 66 37 20 32 61 62 21 ┆ , ,cjs readlucq ; ! 2070! ! 5f7 2ab!┆ 0x07cba2…07d7ae (2, 184) 00 00 02 00 08 08 00 00 0c 00 01 88 20 67 65 74 73 65 74 6f 70 34 3b 20 6a 75 6d 70 20 69 66 20 6c 65 6e 67 74 68 31 3e 3d 63 6f 75 6e 74 65 72 0a 21 20 32 34 36 30 21 20 21 20 36 31 30 20 31 ┆ getsetop4; jump if length1>=counter ! 2460! ! 610 1┆ 0x07d7ae…07e3ba (2, 185) 00 00 02 00 08 08 00 00 0c 00 01 8c 20 20 20 20 20 20 20 20 77 37 20 20 20 20 20 20 20 20 2c 73 20 20 20 20 20 20 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3b 0a 21 20 ┆ w7 ,s , ; ! ┆ 0x07e3ba…07efc6 (2, 186) 00 00 02 00 08 08 00 00 0c 00 01 90 20 20 20 20 20 2c 20 20 20 20 20 20 20 2c 63 6a 73 20 70 72 65 70 73 65 74 20 20 20 20 20 20 20 20 20 20 3b 0a 21 20 33 31 39 30 21 20 20 20 20 20 20 20 20 ┆ , ,cjs prepset ; ! 3190! ┆ 0x07efc6…07fbd2 (2, 187) 00 00 02 00 08 08 00 00 0c 00 01 94 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 2c 20 20 20 20 20 20 20 2c 63 6a 73 20 61 64 76 61 6e 63 65 20 20 20 20 20 20 20 ┆ , ,cjs advance ┆ 0x07fbd2…0807de (2, 188) 00 00 02 00 08 08 00 00 0c 00 01 98 6f 3a 3d 6c 61 73 74 20 69 74 65 72 61 74 69 6f 6e 0a 21 20 33 39 36 30 21 20 21 20 36 36 38 20 36 36 61 21 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ o:=last iteration ! 3960! ! 668 66a! ┆ 0x0807de…0813ea (2, 189) 00 00 02 00 08 08 00 00 0c 00 01 9c 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 0a 21 20 20 31 34 30 21 20 20 20 20 20 20 20 20 20 20 20 75 6e 73 64 69 76 ┆ ; ! 140! unsdiv┆ 0x0813ea…081ff6 (2, 190) 00 00 02 00 08 08 00 00 0c 00 01 a0 20 20 20 20 20 20 3b 0a 21 20 20 35 38 30 21 20 21 20 36 38 65 20 30 63 38 21 20 20 20 20 20 20 20 20 20 20 20 20 20 20 77 33 3a 3d 62 64 20 20 20 20 20 20 ┆ ; ! 580! ! 68e 0c8! w3:=bd ┆ 0x081ff6…082c02 (2, 191) 00 00 02 00 08 08 00 00 0c 00 01 a4 20 32 30 30 21 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 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ 200! ┆ 0x082c02…08380e (2, 192) 00 00 02 00 08 08 00 00 0c 00 01 a8 65 20 31 33 37 21 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 77 35 20 20 20 20 20 20 20 20 2c 73 20 20 20 20 20 20 2c 63 6a 70 20 62 31 20 77 72 ┆ e 137! w5 ,s ,cjp b1 wr┆ 0x08380e…08441a (2, 193) 00 00 02 00 08 08 00 00 0c 00 01 ac 20 62 75 73 3a 3d 20 20 20 20 20 20 20 20 20 20 2d 2d 71 20 20 20 20 20 20 20 2c 73 20 20 20 20 20 20 2c 63 6a 70 20 74 6c 6f 63 6b 31 30 20 20 20 20 20 20 ┆ bus:= --q ,s ,cjp tlock10 ┆ 0x08441a…085026 (2, 194) 00 00 02 00 08 08 00 00 0c 00 01 b0 20 20 20 20 20 20 20 20 3b 0a 21 20 31 34 32 30 21 20 21 20 36 64 35 20 31 33 37 21 20 20 20 20 20 20 20 20 20 20 20 20 20 20 77 33 3a 3d 73 77 70 20 20 20 ┆ ; ! 1420! ! 6d5 137! w3:=swp ┆ 0x085026…085c32 (2, 195) 00 00 02 00 08 08 00 00 0c 00 01 b4 20 31 38 33 30 21 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3b 3b 20 20 77 31 3a 3d 77 33 2c 73 2c 63 6a 70 20 7a 72 6f 20 77 72 66 65 74 63 68 20 20 3b 66 ┆ 1830! ;; w1:=w3,s,cjp zro wrfetch ;f┆ 0x085c32…08683e (2, 196) 00 00 02 00 08 08 00 00 0c 00 01 b8 21 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 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ! ┆ 0x08683e…08744a (2, 197) 00 00 02 00 08 08 00 00 0c 00 01 bc 6c 75 20 61 6e 64 20 69 63 0a 21 20 32 36 38 30 21 20 21 20 37 30 63 20 30 30 30 21 20 20 20 72 64 3a 3d 20 20 20 20 20 20 20 20 20 20 20 73 69 63 20 20 20 ┆ lu and ic ! 2680! ! 70c 000! rd:= sic ┆ 0x08744a…088056 (2, 198) 00 00 02 00 08 08 00 00 0c 00 01 c0 61 63 6b 3a 3a 20 6f 70 31 2c 20 6f 70 32 3a 20 77 6f 72 64 20 2d 3e 20 71 75 6f 3a 20 77 6f 72 64 3b 0a 21 20 20 34 33 30 21 20 20 20 20 20 20 20 20 20 20 ┆ ack:: op1, op2: word -> quo: word; ! 430! ┆ 0x088056…088c62 (2, 199) 00 00 02 00 08 08 00 00 0c 00 01 c4 20 20 20 20 20 20 3b 77 33 3a 3d 74 68 65 20 74 68 69 72 64 20 77 6f 72 64 20 6f 66 20 74 68 65 20 64 20 6f 70 20 76 65 63 74 6f 72 0a 21 20 20 32 35 30 21 ┆ ;w3:=the third word of the d op vector ! 250!┆ 0x088c62…08986e (2, 200) 00 00 02 00 08 08 00 00 0c 00 01 c8 20 20 20 20 20 20 20 20 20 20 20 20 20 3b 0a 21 20 20 36 33 30 21 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 ┆ ; ! 630! ┆ […truncated at 200 lines…]