DataMuseum.dk

Presents historical artifacts from the history of:

RC3500

This is an automatic "excavation" of a thematic subset of
artifacts from Datamuseum.dk's BitArchive.

See our Wiki for more about RC3500

Excavated with: AutoArchaeologist - Free & Open Source Software.


top - download

⟦093e2ad1c⟧ Rc489k_TapeFile

    Length: 2313846 (0x234e76)
    Types: Rc489k_TapeFile

Derivation

└─⟦2c55ea56f⟧ Bits:30001844 SW-save af projekt 1000, Alarm-system
    └─⟦this⟧ 

Hex Dump

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…]