DataMuseum.dk

Presents historical artifacts from the history of:

RC4000/8000/9000

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

See our Wiki for more about RC4000/8000/9000

Excavated with: AutoArchaeologist - Free & Open Source Software.


top - metrics

⟦ef84a0bd3⟧ Bits:30008162 Bånd uden label med RC8000 monitor-relaterede kildetekster, SimhTapContainer, ½" Magnetic Tape

    Length: 8102180 (0x7ba124)
    Description: Bits:30008162 Bånd uden label med RC8000 monitor-relaterede kildetekster
    Types: SimhTapContainer, ½" Magnetic Tape

Hex Dump

Dumping the first 0x20 bytes of each record
0x000000…000bbe (0, 0)     ff ff ff ff ff ff ff ff 7d 7d 7d 7d 7d 7d 7d 7d ff ff ff ff ff ff ff ff 7d 7d 7d 7d 00 00 00 00   ┆        åååååååå        åååå    ┆
          […0x9…]
0x00756c…00786c (1, 0)     6d 65 73 73 61 67 65 20 6d 6f 6e 6f 6c 64 20 76 65 72 73 69 6f 6e 20 38 32 20 30 31 20 32 37 0a   ┆message monold version 82 01 27 ┆
0x00786c…007b6c (1, 1)     65 72 73 69 6f 6e 20 61 73 20 63 6f 6d 70 72 65 73 73 65 64 0a 3b 20 20 20 20 20 20 20 20 20 20   ┆ersion as compressed ;          ┆
0x007b6c…007e6c (1, 2)     65 73 2c 20 62 79 3a 0a 3b 20 20 20 20 20 20 20 20 69 20 6d 6f 6e 6c 6f 61 64 63 0a 3b 20 69 66   ┆es, by: ;        i monloadc ; if┆
0x007e6c…00816c (1, 3)     6e 61 6d 65 3e 20 30 20 31 20 29 0a 3b 20 69 66 20 74 68 65 20 63 75 72 72 65 6e 74 20 76 65 72   ┆name> 0 1 ) ; if the current ver┆
0x00816c…00846c (1, 4)     69 6e 6b 38 30 30 30 0a 3b 20 20 66 69 6c 65 20 32 33 20 20 73 74 61 72 74 61 72 65 61 0a 3b 20   ┆ink8000 ;  file 23  startarea ; ┆
0x00846c…00876c (1, 5)     0a 6e 65 78 74 66 69 6c 65 20 66 0a 66 20 3d 20 63 6f 70 79 20 6d 6f 6e 73 31 0a 6e 65 78 74 66   ┆ nextfile f f = copy mons1 nextf┆
0x00876c…008a6c (1, 6)     0a 0a 73 6b 69 70 20 33 36 2e 31 0a 63 3d 63 6f 70 79 20 6d 65 73 73 2e 6e 6f 20 31 0a 6d 63 65   ┆  skip 36.1 c=copy mess.no 1 mce┆
0x008a6c…008d6c (1, 7)     2a 2a 2a 2a 2a 2a 0a 0a 0a 24 68 6f 73 74 0a 3b 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a   ┆******   $host ;****************┆
0x008d6c…00906c (1, 8)     6e 65 78 74 66 69 6c 65 20 66 0a 66 20 3d 20 63 6f 70 79 20 74 6d 75 73 63 6f 70 79 0a 6e 65 78   ┆nextfile f f = copy tmuscopy nex┆
0x00906c…00936c (1, 9)     69 6e 69 74 20 6d 6f 6e 70 72 6f 63 66 6e 63 31 20 6d 6f 6e 70 72 6f 63 66 6e 63 32 2c 0a 20 20   ┆init monprocfnc1 monprocfnc2,   ┆
0x00936c…00966c (1, 10)    20 6d 6f 6e 6e 65 77 0a 6d 6f 6e 66 70 61 6c 69 6e 65 20 3d 20 6d 6f 76 65 20 66 0a 6e 65 78 74   ┆ monnew monfpaline = move f next┆
0x00966c…00996c (1, 11)    62 6f 6f 74 20 3d 20 6d 6f 76 65 20 66 0a 6e 65 78 74 66 69 6c 65 20 66 0a 74 6d 75 73 63 6f 70   ┆boot = move f nextfile f tmuscop┆
0x00996c…009c6c (1, 12)    20 6e 6f 74 20 61 20 6d 61 67 74 61 70 65 0a 20 20 65 6e 64 29 0a 0a 6c 6f 6f 6b 75 70 20 6d 6f   ┆ not a magtape   end)  lookup mo┆
0x009c6c…009f6c (1, 13)    66 0a 6d 6f 6e 63 65 6e 74 72 61 6c 20 3d 20 65 6e 74 72 79 20 6d 6f 6e 6e 65 77 20 6d 6f 6e 6e   ┆f moncentral = entry monnew monn┆
0x009f6c…00a26c (1, 14)    6e 65 77 20 6d 6f 6e 6e 65 77 20 6d 6f 6e 6e 65 77 0a 6d 6f 6e 73 31 20 3d 20 73 6c 61 6e 67 63   ┆new monnew monnew mons1 = slangc┆
0x00a26c…00a56c (1, 15)    20 6d 6f 6e 6e 65 77 0a 74 73 74 61 72 74 64 61 74 65 3d 6d 6f 76 65 20 66 0a 0a 68 65 61 64 20   ┆ monnew tstartdate=move f  head ┆
0x00a56c…00a86c (1, 16)    61 67 65 2e 6e 6f 20 34 37 2e 31 0a 0a 68 65 61 64 20 31 20 63 70 75 0a 6d 65 73 73 61 67 65 20   ┆age.no 47.1  head 1 cpu message ┆
0x00a86c…00ab6c (1, 17)    63 66 6e 63 32 0a 66 20 3d 20 63 6f 70 79 20 77 72 6b 0a 6e 65 78 74 66 69 6c 65 20 66 0a 77 72   ┆cfnc2 f = copy wrk nextfile f wr┆
0x00ab6c…00ae6c (1, 18)    20 79 65 73 3b 0a 0a 20 20 20 20 20 62 7a 20 20 77 33 20 20 78 31 2b 31 20 20 20 20 20 20 3b 20   ┆ yes;       bz  w3  x1+1      ; ┆
0x00ae6c…00b16c (1, 19)    0a 77 2e 0a 6b 3d 68 35 35 0a 20 20 20 20 30 0a 62 32 3a 20 20 30 20 20 20 20 20 20 20 20 20 20   ┆ w. k=h55     0 b2:  0          ┆
0x00b16c…00b46c (1, 20)    20 69 6e 70 75 74 0a 20 20 20 20 20 6a 6c 2e 20 77 33 20 20 68 32 37 2e 2d 32 20 20 20 20 3b 0a   ┆ input      jl. w3  h27.-2    ; ┆
0x00b46c…00b76c (1, 21)    20 20 20 20 20 3b 20 20 20 63 68 61 72 3a 3d 20 6e 6c 3b 0a 20 20 20 20 20 73 65 2e 20 77 30 20   ┆     ;   char:= nl;      se. w0 ┆
0x00b76c…00ba6c (1, 22)    20 74 61 69 6c 28 30 29 3a 3d 73 65 67 6d 2e 63 6f 75 6e 74 0a 20 20 20 20 20 72 73 20 20 77 33   ┆ tail(0):=segm.count      rs  w3┆
0x00ba6c…00bd6c (1, 23)    6e 20 67 6f 74 6f 20 6f 75 74 6e 65 78 74 3b 0a 20 20 20 20 20 72 73 2e 20 77 30 20 20 20 20 20   ┆n goto outnext;      rs. w0     ┆
0x00bd6c…00c06c (1, 24)    20 20 3b 20 20 20 73 74 72 69 6e 67 3a 3d 20 74 72 75 65 3b 0a 20 20 20 20 20 6a 6c 2e 20 20 20   ┆  ;   string:= true;      jl.   ┆
0x00c06c…00c36c (1, 25)    3e 3c 30 3e 3a 3e 0a 65 32 3a 20 20 3c 3a 2a 2a 2a 74 65 78 74 63 6f 6d 70 72 20 63 6f 6e 6e 65   ┆><0>:> e2:  <:***textcompr conne┆
0x00c36c…00c66c (1, 26)    32 2c 63 32 2c 63 32 2c 63 31 3b 31 31 32 2d 31 32 37 0a 77 2e 0a 62 31 3a 20 30 2c 20 72 2e 32   ┆2,c2,c2,c1;112-127 w. b1: 0, r.2┆
0x00c66c…00c96c (1, 27)    74 20 3d 20 65 6e 74 72 79 20 66 20 66 20 66 20 66 0a 6e 65 78 74 66 69 6c 65 20 66 0a 6d 6f 6e   ┆t = entry f f f f nextfile f mon┆
0x00c96c…00cc6c (2, 0)     0a 0a 3b 20 67 65 6e 65 72 61 74 65 20 65 6d 70 74 79 20 6d 6f 6e 63 68 61 6e 67 65 20 66 69 6c   ┆  ; generate empty monchange fil┆
0x00cc6c…00cf6c (2, 1)     2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 0a 0a 0a 24 70 72 6f 63 73 0a 3b 2a 2a 2a 2a 2a 2a   ┆***************   $procs ;******┆
0x00cf6c…00d26c (3, 0)     0a 0a 0a 63 3d 6d 65 73 73 61 67 65 20 6f 70 74 69 6f 6e 73 20 72 63 38 30 30 30 20 20 20 72 65   ┆   c=message options rc8000   re┆
0x00d26c…00d56c (3, 1)     28 78 2c 3c 3a 74 65 72 6d 69 6e 61 6c 32 3a 3e 29 3b 0a 74 77 28 78 2c 3c 3a 74 65 72 6d 69 6e   ┆(x,<:terminal2:>); tw(x,<:termin┆
0x00d56c…00d86c (3, 2)     20 20 20 20 20 20 3b 20 6e 75 6d 62 65 72 20 6f 66 20 6d 65 73 73 20 62 75 66 66 65 72 73 20 72   ┆      ; number of mess buffers r┆
0x00d86c…00db6c (3, 3)     67 32 3a 20 20 38 35 2c 30 2c 72 2e 33 34 0a 0a 0a 20 20 20 20 20 30 2c 30 2c 30 0a 6d 2e 20 64   ┆g2:  85,0,r.34        0,0,0 m. d┆
0x00db6c…00de6c (3, 4)     20 20 20 20 6d 2e 20 73 74 61 72 74 20 6f 66 20 74 65 73 74 62 75 66 66 65 72 0a 20 20 20 20 20   ┆    m. start of testbuffer      ┆
0x00de6c…00e16c (3, 5)     32 2c 20 30 0a 20 20 20 20 20 30 2c 20 72 2e 31 34 2c 20 31 30 30 20 30 30 30 2c 20 31 30 30 30   ┆2, 0      0, r.14, 100 000, 1000┆
0x00e16c…00e46c (3, 6)     20 3c 3a 72 65 63 33 36 30 30 32 3a 3e 20 20 2c 20 20 30 2c 20 67 31 38 2c 20 30 2c 20 31 3c 32   ┆ <:rec36002:>  ,  0, g18, 0, 1<2┆
0x00e46c…00e76c (3, 7)     20 67 32 32 2c 20 30 2c 20 31 3c 32 32 2c 20 6b 2c 20 6b 2d 32 2c 20 30 0a 20 20 20 20 20 6a 30   ┆ g22, 0, 1<22, k, k-2, 0      j0┆
0x00e76c…00ea6c (3, 8)     38 2d 31 0a 6d 2e 20 68 6f 73 74 33 36 30 30 33 0a 67 32 35 3a 20 38 32 2c 20 3c 3a 68 6f 73 74   ┆8-1 m. host36003 g25: 82, <:host┆
0x00ea6c…00ed6c (3, 9)     20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3b 20 73 74 61 74 69 73 74 69 63 73 0a 20 20 20 20   ┆               ; statistics     ┆
0x00ed6c…00f06c (3, 10)    31 2c 20 32 31 2c 20 30 2c 20 72 2e 35 2c 20 31 3c 32 33 2c 20 30 2c 20 72 2e 33 32 20 3b 20 31   ┆1, 21, 0, r.5, 1<23, 0, r.32 ; 1┆
0x00f06c…00f36c (3, 11)    20 72 2e 34 2c 20 32 31 2a 35 2a 34 31 31 2c 20 32 31 2c 20 30 2c 20 72 2e 35 2c 20 31 3c 32 33   ┆ r.4, 21*5*411, 21, 0, r.5, 1<23┆
0x00f36c…00f66c (3, 12)    2d 67 33 32 0a 20 20 20 20 20 30 2c 20 72 2e 34 2c 20 32 31 2a 35 2a 31 34 37 2c 20 32 31 2c 20   ┆-g32      0, r.4, 21*5*147, 21, ┆
0x00f66c…00f96c (3, 13)    20 30 2c 20 31 3c 32 32 2c 20 6b 2c 20 6b 2d 32 2c 20 30 0a 20 20 20 20 20 30 2c 20 72 2e 33 2c   ┆ 0, 1<22, k, k-2, 0      0, r.3,┆
0x00f96c…00fc6c (3, 14)    20 72 2e 34 2c 20 67 78 2c 20 30 2c 20 31 3c 32 32 2c 20 6b 2c 20 6b 2d 32 2c 20 30 0a 20 20 20   ┆ r.4, gx, 0, 1<22, k, k-2, 0    ┆
0x00fc6c…00ff6c (3, 15)    0a 67 34 30 3a 20 20 38 35 2c 30 2c 72 2e 33 34 0a 0a 0a 20 20 20 20 20 30 2c 30 2c 30 0a 6d 2e   ┆ g40:  85,0,r.34        0,0,0 m.┆
0x00ff6c…01026c (3, 16)    72 2e 33 34 0a 0a 0a 20 20 20 20 20 30 2c 30 2c 30 0a 6d 2e 20 64 65 76 69 63 65 20 35 39 0a 67   ┆r.34        0,0,0 m. device 59 g┆
0x01026c…01056c (3, 17)    30 2c 30 2c 30 0a 6d 2e 20 64 65 76 69 63 65 20 37 37 0a 67 37 37 3a 20 20 38 35 2c 30 2c 72 2e   ┆0,0,0 m. device 77 g77:  85,0,r.┆
0x01056c…01086c (3, 18)    36 2b 61 32 33 30 2c 61 31 39 38 2c 31 30 0a 20 20 20 30 2c 67 32 38 2b 61 32 33 30 2c 61 31 39   ┆6+a230,a198,10    0,g28+a230,a19┆
0x01086c…010b6c (4, 0)     28 0a 6d 65 73 73 61 67 65 20 63 68 61 6e 67 65 73 20 66 72 6f 6d 20 38 20 31 20 74 6f 20 39 20   ┆( message changes from 8 1 to 9 ┆
0x010b6c…010e6c (4, 1)     31 2f 3d 30 2f 2c 0a 70 20 2d 31 0a 0a 6c 2e 2f 69 30 3d 2f 2c 0a 72 2f 38 32 20 31 31 20 30 31   ┆1/=0/, p -1  l./i0=/, r/82 11 01┆
0x010e6c…01116c (4, 2)     2d 2d 20 3a 20 20 20 2d 22 2d 20 3a 20 73 6c 69 63 65 73 0a 20 20 20 20 20 20 20 20 20 20 20 20   ┆-- :   -"- : slices             ┆
0x01116c…01146c (4, 3)     35 30 2d 6a 30 20 2c 20 61 34 30 32 20 3d 20 61 34 30 32 20 2d 6a 30 20 0a 0a 65 2e 0a 61 35 30   ┆50-j0 , a402 = a402 -j0   e. a50┆
0x01146c…01176c (4, 4)     20 20 20 20 20 20 20 20 20 3b 20 3c 64 6f 63 75 6d 65 6e 74 20 6e 61 6d 65 3e 0a 61 34 31 31 20   ┆         ; <document name> a411 ┆
0x01176c…011a6c (4, 5)     69 70 74 69 6f 6e 0a 0a 2f 2c 0a 0a 6c 2e 2f 6a 30 2d 61 34 38 2f 2c 20 72 2f 61 34 38 2f 61 32   ┆iption  /,  l./j0-a48/, r/a48/a2┆
0x011a6c…011d6c (4, 6)     20 20 20 20 20 20 20 20 20 20 20 3b 20 3c 70 61 72 61 6d 65 74 65 72 32 3e 20 3a 20 3c 73 6c 69   ┆           ; <parameter2> : <sli┆
0x011d6c…01206c (4, 7)     31 32 35 3a 20 20 20 20 20 20 20 20 20 20 20 20 0a 20 20 20 20 20 72 6c 20 20 77 30 20 20 78 31   ┆125:                  rl  w0  x1┆
0x01206c…01236c (4, 8)     69 2f 0a 20 20 20 20 20 73 6e 20 20 77 30 20 20 20 20 20 34 20 20 20 20 20 20 3b 20 20 20 20 69   ┆i/      sn  w0     4      ;    i┆
0x01236c…01266c (4, 9)     20 20 20 20 20 20 20 20 67 36 20 20 20 20 3b 20 20 69 66 20 6e 6f 74 20 75 73 65 72 20 74 68 65   ┆        g6    ;  if not user the┆
0x01266c…01296c (4, 10)    20 20 20 20 20 75 6e 63 68 61 6e 67 65 64 0a 3b 20 77 33 20 20 20 20 20 6c 69 6e 6b 20 20 20 20   ┆     unchanged ; w3     link    ┆
0x01296c…012c6c (4, 11)    20 20 73 65 74 20 6f 74 68 65 72 2d 72 65 73 65 72 76 65 72 20 62 69 74 3b 0a 69 33 3a 20 20 62   ┆  set other-reserver bit; i3:  b┆
0x012c6c…012f6c (4, 12)    30 2e 20 20 20 20 3b 20 20 67 6f 74 6f 20 66 30 3b 0a 69 32 3a 20 20 72 6c 2e 20 77 32 20 20 20   ┆0.    ;  goto f0; i2:  rl. w2   ┆
0x012f6c…01326c (4, 13)    20 20 20 20 20 20 20 20 75 73 65 72 20 72 65 73 65 72 76 65 72 20 73 70 65 63 69 66 69 63 61 74   ┆        user reserver specificat┆
0x01326c…01356c (4, 14)    61 31 30 20 20 20 20 20 20 3b 20 69 66 20 6b 69 6e 64 20 3d 20 69 6e 74 65 72 6e 61 6c 20 6f 72   ┆a10      ; if kind = internal or┆
0x01356c…01386c (4, 15)    0a 3b 20 73 74 61 72 74 20 6f 66 20 27 73 74 64 20 77 61 69 74 20 70 72 6f 67 72 61 6d 27 0a 2f   ┆ ; start of 'std wait program' /┆
0x01386c…013b6c (4, 16)    32 20 20 3a 20 61 6c 20 20 77 30 20 20 20 20 20 31 20 20 20 20 20 3b 20 20 20 69 6e 69 74 64 69   ┆2  : al  w0     1     ;   initdi┆
0x013b6c…013e6c (4, 17)    20 20 20 20 20 20 20 20 20 20 20 20 20 3b 20 64 72 69 76 65 72 20 70 72 6f 63 65 73 73 20 64 65   ┆             ; driver process de┆
0x013e6c…01416c (4, 18)    20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3b 20 77 6f 72 6b 30 2c 20 77   ┆                      ; work0, w┆
0x01416c…01446c (4, 19)    34 38 3a 2f 2c 20 69 2f 0a 3b 20 61 32 35 30 3a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20   ┆48:/, i/ ; a250:                ┆
0x01446c…01476c (4, 20)    74 0a 20 20 20 20 20 6a 6c 2e 20 20 20 20 20 6a 31 2e 20 20 20 20 20 20 20 3b 20 72 65 74 75 72   ┆t      jl.     j1.       ; retur┆
0x01476c…014a6c (4, 21)    20 61 20 74 65 6d 70 6f 72 61 72 79 20 6c 69 6e 6b 20 74 68 65 20 63 61 6c 6c 69 6e 67 0a 3b 20   ┆ a temporary link the calling ; ┆
0x014a6c…014d6c (4, 22)    20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 0a 20 20 20 20 20 6a 6c 20 20 77 33 20 20 64 31 32   ┆                     jl  w3  d12┆
0x014d6c…01506c (4, 23)    20 20 20 20 3b 20 72 65 67 72 65 74 20 6d 65 73 73 61 67 65 0a 20 20 20 20 20 72 73 2e 20 77 31   ┆    ; regret message      rs. w1┆
0x01506c…01536c (4, 24)    30 2c 72 2e 61 34 30 31 2c 30 2f 2c 0a 6c 2e 2f 68 32 32 3a 2f 2c 6c 2d 31 2c 72 2f 30 2f 30 2c   ┆0,r.a401,0/, l./h22:/,l-1,r/0/0,┆
0x01536c…01566c (4, 25)    67 31 37 2e 20 3b 0a 67 31 35 3a 20 72 6c 2e 20 77 31 20 20 20 20 20 67 31 31 2e 20 3b 20 62 65   ┆g17. ; g15: rl. w1     g11. ; be┆
0x01566c…01596c (4, 26)    20 62 61 2e 20 77 30 20 20 31 20 20 20 20 20 20 20 20 20 3b 20 20 20 20 65 6c 73 65 20 68 61 6c   ┆ ba. w0  1         ;    else hal┆
0x01596c…015c6c (4, 27)    2a 6d 6f 6e 70 72 6f 63 66 6e 63 31 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 0a 6c 2e 2f 69 30 3d 2f   ┆*monprocfnc1************ l./i0=/┆
0x015c6c…015f6c (4, 28)    3b 0a 2f 2c 0a 0a 6c 2e 2f 65 32 3a 2f 2c 0a 6c 2e 2f 64 34 2f 2c 20 72 2f 64 34 2e 20 20 2f 28   ┆; /,  l./e2:/, l./d4/, r/d4.  /(┆
0x015f6c…01626c (4, 29)    72 79 20 63 6f 6e 74 69 6e 75 65 73 20 75 6e 74 69 6c 20 73 65 67 6d 65 6e 74 3d 73 65 67 6d 65   ┆ry continues until segment=segme┆
0x01626c…01656c (4, 30)    20 73 65 67 6d 65 6e 74 20 6e 6f 2e 77 6f 72 6b 0a 2f 2c 0a 6c 2e 2f 67 30 3a 2f 2c 20 20 20 20   ┆ segment no.work /, l./g0:/,    ┆
0x01656c…01686c (4, 31)    2f 20 20 20 20 2f 2c 0a 6c 2e 2f 77 32 20 3c 6b 65 79 3e 2f 2c 20 72 2f 6b 65 79 2f 73 65 67 6d   ┆/    /, l./w2 <key>/, r/key/segm┆
0x01686c…016b6c (4, 32)    2f 0a 0a 67 32 35 3a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3b 20 61 64 6a 75   ┆/  g25:                   ; adju┆
0x016b6c…016e6c (4, 33)    20 20 20 64 31 34 2e 20 20 20 20 20 20 20 3b 20 77 31 3a 3d 70 72 6f 63 20 61 64 64 72 3b 0a 20   ┆   d14.       ; w1:=proc addr;  ┆
0x016e6c…01716c (4, 34)    20 20 67 33 2e 20 20 20 20 20 20 20 3b 20 67 6f 74 6f 20 6e 65 78 74 20 68 61 6c 66 77 6f 72 64   ┆  g3.       ; goto next halfword┆
0x01716c…01746c (4, 35)    20 20 64 31 32 2e 20 20 20 20 20 20 20 3b 0a 20 20 20 20 20 6a 64 20 20 20 20 20 20 78 33 2b 32   ┆  d12.       ;      jd      x3+2┆
0x01746c…01776c (4, 36)    2b 30 2f 2c 20 64 2c 20 69 2f 0a 20 20 20 20 20 6a 65 2e 20 20 20 20 20 28 68 32 2e 29 20 20 20   ┆+0/, d, i/      je.     (h2.)   ┆
0x01776c…017a6c (4, 37)    34 0a 20 20 20 20 20 6a 65 2e 20 20 20 20 20 20 20 20 20 6e 30 2e 20 20 20 3b 2b 32 20 75 73 65   ┆4      je.         n0.   ;+2 use┆
0x017a6c…017d6c (4, 38)    6e 67 65 20 61 72 72 61 79 20 20 28 73 65 74 20 62 73 20 63 6c 61 69 6d 73 29 0a 7a 2e 20 20 20   ┆nge array  (set bs claims) z.   ┆
0x017d6c…01806c (4, 39)    3d 20 64 31 20 2b 20 66 33 20 20 20 20 20 20 20 20 20 20 3b 20 63 68 61 69 6e 6b 69 6e 6b 2a 38   ┆= d1 + f3          ; chainkink*8┆
0x01806c…01836c (4, 40)    35 20 2b 20 37 20 20 20 20 20 20 3b 0a 76 32 36 3d 20 64 31 20 2b 20 66 36 36 20 2b 20 20 66 30   ┆5 + 7      ; v26= d1 + f66 +  f0┆
0x01836c…01866c (4, 41)    2d 32 0a 20 20 20 20 20 6a 6c 2e 20 6a 36 2e 20 2c 20 6a 36 3d 20 6b 2d 32 0a 0a 0a 2f 2c 0a 0a   ┆-2      jl. j6. , j6= k-2   /,  ┆
0x01866c…01896c (4, 42)    20 20 20 20 20 20 3b 20 6e 65 77 63 6c 61 69 6d 3a 3d 20 63 6c 61 69 6d 28 6b 65 79 29 2e 63 68   ┆      ; newclaim:= claim(key).ch┆
0x01896c…018c6c (4, 43)    20 6f 66 20 6b 65 79 73 20 3c 3d 20 30 20 74 68 65 6e 0a 20 20 20 20 20 6a 6c 2e 20 20 20 20 20   ┆ of keys <= 0 then      jl.     ┆
0x018c6c…018f6c (4, 44)    20 66 72 6f 6d 20 73 6c 69 63 65 0a 20 20 20 20 20 73 6c 20 20 77 32 20 20 78 31 2b 61 31 30 39   ┆ from slice      sl  w2  x1+a109┆
0x018f6c…01926c (4, 45)    69 6e 67 20 73 74 6f 6e 65 73 2f 2c 6c 31 2c 64 31 2c 0a 6c 2e 2f 65 32 30 2d 2f 2c 72 2f 36 2f   ┆ing stones/,l1,d1, l./e20-/,r/6/┆
0x01926c…01956c (4, 46)    78 33 2b 61 35 37 20 20 20 20 3b 20 77 6f 72 6b 30 3a 3d 77 6f 72 6b 31 3a 3d 20 30 0a 2f 2c 0a   ┆x3+a57    ; work0:=work1:= 0 /, ┆
0x01956c…01986c (4, 47)    73 20 20 77 30 20 20 78 32 2b 61 35 30 20 20 20 20 20 3b 20 64 6f 63 61 64 72 20 3a 3d 20 30 0a   ┆s  w0  x2+a50     ; docadr := 0 ┆
0x01986c…019b6c (4, 48)    6d 73 20 66 72 6f 6d 20 70 72 6f 63 65 73 73 20 74 6f 20 73 65 6e 64 65 72 20 61 72 65 61 0a 3b   ┆ms from process to sender area ;┆
0x019b6c…019e6c (4, 49)    20 61 6d 2e 20 20 20 20 20 20 20 20 28 64 34 2e 29 20 20 3b 0a 20 20 20 20 20 77 6d 20 20 77 30   ┆ am.        (d4.)  ;      wm  w0┆
0x019e6c…01a16c (4, 50)    32 20 20 20 20 20 68 30 2e 20 20 20 20 3b 0a 20 20 20 20 20 61 6c 20 20 77 32 20 20 78 32 2b 32   ┆2     h0.    ;      al  w2  x2+2┆
0x01a16c…01a46c (4, 51)    32 2f 2c 0a 6c 31 2c 20 72 2f 77 30 2f 77 31 2f 2c 20 72 2f 78 31 2f 78 32 2f 2c 0a 6c 2e 2f 3b   ┆2/, l1, r/w0/w1/, r/x1/x2/, l./;┆
0x01a46c…01a76c (4, 52)    65 72 20 74 68 61 6e 20 39 2e 30 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20   ┆er than 9.0                     ┆
0x01a76c…01aa6c (4, 53)    20 6a 32 3d 6b 2d 32 20 20 20 20 20 20 20 20 20 20 20 20 3b 20 28 73 74 65 70 70 69 6e 67 20 73   ┆ j2=k-2            ; (stepping s┆
0x01aa6c…01ad6c (4, 54)    20 20 20 20 20 3b 20 74 65 73 74 20 75 73 65 72 73 20 61 6e 64 20 72 65 73 65 72 76 65 72 0a 20   ┆     ; test users and reserver  ┆
0x01ad6c…01b06c (4, 55)    2c 20 72 2f 64 31 35 2e 20 20 20 2f 28 6c 31 31 35 2e 29 2f 2c 0a 72 2f 77 33 2f 77 32 2f 2c 0a   ┆, r/d15.   /(l115.)/, r/w3/w2/, ┆
0x01b06c…01b36c (4, 56)    74 65 6d 70 6f 72 61 72 79 20 6c 69 6e 6b 20 74 68 65 6e 20 72 65 6c 65 61 73 65 0a 2f 2c 0a 6c   ┆temporary link then release /, l┆
0x01b36c…01b66c (4, 57)    2c 0a 72 2f 2c 20 20 20 20 20 20 20 20 20 20 20 20 2f 2c 20 6d 35 31 20 3d 20 6d 35 31 2d 6e 35   ┆, r/,            /, m51 = m51-n5┆
0x01b66c…01b96c (4, 58)    2f 70 35 31 3a 2f 2c 20 6c 2e 2f 6d 34 37 2c 32 2f 2c 0a 69 2f 0a 20 20 20 20 20 6d 34 34 20 20   ┆/p51:/, l./m47,2/, i/      m44  ┆
0x01b96c…01bc6c (4, 59)    20 20 20 20 3b 20 6c 6f 6f 6b 75 70 20 62 73 20 63 6c 61 69 6d 73 0a 20 20 20 20 20 6d 31 30 34   ┆    ; lookup bs claims      m104┆
0x01bc6c…01bf6c (4, 60)    20 69 2f 0a 69 33 3a 30 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3b 20 73 61 76   ┆ i/ i3:0                   ; sav┆
0x01bf6c…01c26c (4, 61)    20 20 78 31 2b 31 36 20 20 20 20 20 3b 20 20 20 69 66 20 72 65 73 75 6c 74 3c 3e 6f 6b 20 6f 72   ┆  x1+16     ;   if result<>ok or┆
0x01c26c…01c56c (4, 62)    20 20 20 3b 20 20 20 73 65 74 20 73 2d 63 61 74 61 6c 6f 67 20 62 61 73 65 28 63 75 72 20 63 61   ┆   ;   set s-catalog base(cur ca┆
0x01c56c…01c86c (4, 63)    63 6b 70 6f 69 6e 74 65 72 20 3a 3d 20 73 74 61 63 6b 62 61 73 65 3b 0a 20 20 20 20 20 61 6c 20   ┆ckpointer := stackbase;      al ┆
0x01c86c…01cb6c (4, 64)    67 20 62 61 73 65 28 6e 61 6d 65 2c 20 6c 6f 77 65 72 2c 20 75 70 70 65 72 29 3b 0a 20 20 20 20   ┆g base(name, lower, upper);     ┆
0x01cb6c…01ce6c (4, 65)    20 20 72 6c 2e 20 77 31 20 20 20 20 28 75 38 37 2e 29 20 20 20 3b 0a 20 20 20 20 20 73 65 20 20   ┆  rl. w1    (u87.)   ;      se  ┆
0x01ce6c…01d16c (4, 66)    2c 0a 6c 2e 2f 64 73 2e 20 77 33 20 65 31 39 2e 2f 2c 20 20 72 2f 20 65 31 39 2e 20 20 2f 20 20   ┆, l./ds. w3 e19./,  r/ e19.  /  ┆
0x01d16c…01d46c (4, 67)    20 61 63 63 65 73 73 20 63 6f 75 6e 74 65 72 20 6f 66 20 61 20 67 69 76 65 6e 20 63 6f 6e 73 6f   ┆ access counter of a given conso┆
0x01d46c…01d76c (4, 68)    20 20 20 20 20 20 3b 20 62 65 67 69 6e 0a 20 20 20 20 20 72 73 2e 20 77 30 20 20 20 20 20 20 20   ┆      ; begin      rs. w0       ┆
0x01d76c…01da6c (4, 69)    69 6c 64 2e 20 66 69 6e 61 6c 6c 79 2c 20 74 68 65 20 69 64 65 6e 74 69 66 69 63 61 74 69 6f 6e   ┆ild. finally, the identification┆
0x01da6c…01dd6c (4, 70)    65 3b 0a 20 20 20 20 20 6c 73 20 20 77 32 20 20 20 20 20 20 20 31 20 20 20 20 20 20 3b 0a 20 20   ┆e;      ls  w2       1      ;   ┆
0x01dd6c…01e06c (4, 71)    70 72 6f 63 65 64 75 72 65 20 64 65 76 6e 6f 28 6e 61 6d 65 20 61 64 72 2e 2f 2c 20 69 2f 0a 0a   ┆procedure devno(name adr./, i/  ┆
0x01e06c…01e36c (4, 72)    20 20 64 73 2e 20 77 31 20 20 20 20 20 20 20 20 69 32 2e 20 20 20 20 20 3b 0a 20 20 20 20 20 61   ┆  ds. w1        i2.     ;      a┆
0x01e36c…01e66c (4, 73)    3a 20 61 6c 2e 20 77 33 20 20 20 20 20 69 32 2e 20 20 20 20 20 20 20 3b 20 65 6e 74 72 79 30 3a   ┆: al. w3     i2.       ; entry0:┆
0x01e66c…01e96c (4, 74)    65 6d 6f 76 65 2c 31 3c 32 31 2f 63 6f 6e 74 69 6e 75 65 2f 2c 20 6c 31 2c 20 69 2f 0a 20 20 20   ┆emove,1<21/continue/, l1, i/    ┆
0x01e96c…01ec6c (4, 75)    6c 2e 20 77 31 20 20 20 20 20 67 31 30 33 2e 20 2c 20 3c 3a 70 72 6f 63 65 73 73 20 75 6e 6b 6e   ┆l. w1     g103. , <:process unkn┆
0x01ec6c…01ef6c (4, 76)    20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3c 3a 6d 61 78 3c 30 3e 3a 3e 0a 67 32 37 3a   ┆                 <:max<0>:> g27:┆
0x01ef6c…01f26c (4, 77)    20 20 20 64 32 32 2e 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   ┆   d22.     ;                   ┆
0x01f26c…01f56c (4, 78)    20 20 20 20 20 20 20 20 20 3b 20 20 20 20 20 20 20 20 6c 69 6e 6b 2b 34 20 3a 20 6e 6f 74 20 72   ┆         ;        link+4 : not r┆
0x01f56c…01f86c (4, 79)    20 20 64 6c 2e 20 77 31 20 20 20 20 20 20 69 35 2e 20 20 20 20 20 3b 0a 20 20 20 20 20 72 6c 2e   ┆  dl. w1      i5.     ;      rl.┆
0x01f86c…01fb6c (4, 80)    2c 20 69 2f 0a 0a 20 20 20 20 20 72 6c 2e 20 77 33 20 20 20 20 20 65 32 35 2e 20 20 20 20 20 3b   ┆, i/       rl. w3     e25.     ;┆
0x01fb6c…01fe6c (4, 81)    20 20 20 67 6f 74 6f 20 73 65 6e 64 20 69 6e 70 75 74 3b 0a 20 20 20 20 20 20 20 20 20 20 20 20   ┆   goto send input;             ┆
0x01fe6c…02016c (4, 82)    31 30 38 3a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3b 20 72 65 6c 65 61 73   ┆108:                    ; releas┆
0x02016c…02046c (4, 83)    77 32 0a 0a 2f 2c 0a 0a 6c 2e 2f 6a 64 20 31 3c 31 31 2b 32 32 2f 2c 20 6c 31 2c 0a 72 2f 20 20   ┆w2  /,  l./jd 1<11+22/, l1, r/  ┆
0x02046c…02076c (4, 84)    20 20 72 6c 2e 20 77 31 20 20 20 20 20 65 32 39 2e 20 20 20 20 20 3b 20 73 61 76 65 20 73 65 6e   ┆  rl. w1     e29.     ; save sen┆
0x02076c…020a6c (4, 85)    2f 2b 32 30 34 38 2f 20 20 20 2f 2c 0a 0a 6c 2e 2f 67 35 38 3a 20 3b 75 6e 73 74 61 63 6b 3a 2f   ┆/+2048/   /,  l./g58: ;unstack:/┆
0x020a6c…020d6c (4, 86)    20 3c 3e 20 63 6f 72 65 20 74 61 62 6c 65 20 68 65 61 64 20 64 6f 0a 20 20 20 20 20 73 6e 2e 20   ┆ <> core table head do      sn. ┆
0x020d6c…02106c (4, 87)    20 20 20 20 20 20 20 20 28 32 29 2c 20 64 34 32 2c 20 64 34 32 3d 6b 2d 34 0a 6a 6c 2e 20 20 20   ┆        (2), d42, d42=k-4 jl.   ┆
0x02106c…02136c (4, 88)    2f 2c 20 20 72 2f 65 34 34 2e 2f 76 34 34 2e 2f 2c 0a 6c 2e 2f 61 6c 2e 20 77 31 20 65 35 31 2e   ┆/,  r/e44./v44./, l./al. w1 e51.┆
0x02136c…02166c (4, 89)    20 20 20 20 20 61 6c 20 20 77 30 20 20 20 20 20 20 20 20 31 20 20 20 20 3b 20 69 6e 63 72 65 61   ┆     al  w0        1    ; increa┆
0x02166c…02196c (4, 90)    20 64 2c 0a 6c 2e 2f 72 6c 2e 20 77 32 20 65 33 37 2e 2b 35 30 30 2f 2c 20 20 72 2f 20 65 33 37   ┆ d, l./rl. w2 e37.+500/,  r/ e37┆
0x02196c…021c6c (4, 91)    30 34 36 2f 2c 20 64 2c 0a 6c 2e 2f 72 6c 2e 20 77 31 20 65 32 39 2e 2b 32 30 34 36 2f 2c 0a 72   ┆046/, d, l./rl. w1 e29.+2046/, r┆
0x021c6c…021f6c (4, 92)    2f 2c 0a 72 2f 61 6c 2f 72 6c 2f 2c 20 72 2f 65 34 34 2e 2b 32 30 34 36 2f 20 20 20 76 34 34 2e   ┆/, r/al/rl/, r/e44.+2046/   v44.┆
0x021f6c…02226c (4, 93)    6b 29 0a 2f 2c 0a 0a 6c 2e 2f 70 72 6f 63 65 64 75 72 65 20 72 65 61 64 20 63 68 61 69 6e 2f 2c   ┆k) /,  l./procedure read chain/,┆
0x02226c…02256c (4, 94)    32 0a 6a 6c 2e 20 20 66 33 2e 20 20 2c 20 66 33 20 3d 20 6b 2d 32 0a 6a 6c 2e 20 20 66 35 2e 20   ┆2 jl.  f3.  , f3 = k-2 jl.  f5. ┆
0x02256c…02286c (4, 95)    20 20 20 20 2d 20 22 20 2d 20 20 20 29 0a 0a 2f 2c 0a 6c 2e 2f 6a 31 32 3d 6b 2b 32 2f 2c 64 2c   ┆    - " -   )  /, l./j12=k+2/,d,┆
0x02286c…022b6c (4, 96)    20 69 32 31 2e 20 20 20 3b 2b 30 3a 20 20 20 74 72 6f 75 62 6c 65 3a 20 67 6f 74 6f 20 74 65 73   ┆ i21.   ;+0:   trouble: goto tes┆
0x022b6c…022e6c (4, 97)    65 6e 74 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 3b 63 6f 6d   ┆ent;                        ;com┆
0x022e6c…02316c (4, 98)    74 72 79 20 64 65 6c 65 74 65 64 3a 3e 29 3b 0a 20 20 20 20 20 6a 6c 2e 20 77 33 20 20 20 20 20   ┆try deleted:>);      jl. w3     ┆
0x02316c…02346c (4, 99)    20 20 20 20 20 20 20 20 3b 20 20 20 20 20 20 20 6d 6f 6e 69 74 6f 72 20 63 68 61 69 6e 74 61 62   ┆        ;       monitor chaintab┆
0x02346c…02376c (4, 100)   20 20 20 7a 6c 20 20 77 31 20 20 78 32 2b 64 35 33 20 20 20 20 3b 20 20 20 20 77 72 69 74 65 69   ┆   zl  w1  x2+d53    ;    writei┆
0x02376c…023a6c (4, 101)   73 74 6f 72 65 20 72 65 67 73 2e 0a 20 20 20 20 20 64 6c 2e 20 77 33 20 20 20 20 20 6a 32 30 2e   ┆store regs.      dl. w3     j20.┆
0x023a6c…023d6c (4, 102)   69 32 31 3a 2f 2c 20 64 2e 2f 77 61 2e 77 30 28 6a 35 2e 29 2f 2c 0a 64 2e 2f 6a 6c 2e 69 38 2e   ┆i21:/, d./wa.w0(j5.)/, d./jl.i8.┆
0x023d6c…02406c (4, 103)   20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3b 20 20 20 20 70 72 65 70 61 72 65 20 6e 65   ┆                 ;    prepare ne┆
0x02406c…02436c (4, 104)   20 66 33 20 3d 20 6b 2d 32 0a 2f 2c 0a 6c 2e 2f 66 31 35 2e 2f 2c 20 6c 31 2c 20 69 2f 0a 6a 6c   ┆ f3 = k-2 /, l./f15./, l1, i/ jl┆
0x02436c…02466c (4, 105)   65 20 66 6f 6c 6c 6f 77 69 6e 67 20 69 73 20 64 6f 6e 65 20 74 6f 6d 61 6b 65 69 74 20 70 6f 73   ┆e following is done tomakeit pos┆
0x02466c…02496c (4, 106)   6e 63 61 74 3c 6d 61 69 6e 63 61 74 6e 61 6d 65 3e 2f 2c 20 6c 31 2c 20 69 2f 0a 3b 20 20 20 20   ┆ncat<maincatname>/, l1, i/ ;    ┆
0x02496c…024c6c (4, 107)   20 35 31 33 20 20 20 20 3b 20 20 20 20 20 20 20 20 20 6e 6f 6f 66 6b 65 79 73 20 3e 20 35 31 32   ┆ 513    ;         noofkeys > 512┆
0x024c6c…024f6c (4, 108)   6f 6f 66 70 61 72 74 20 3a 3d 20 6e 6f 6f 66 70 61 72 74 20 2b 20 31 3b 0a 20 20 20 20 20 72 73   ┆oofpart := noofpart + 1;      rs┆
0x024f6c…02526c (4, 109)   20 3b 0a 20 20 20 20 20 72 6c 2e 20 77 31 20 20 20 20 20 6a 32 2e 20 20 20 20 3b 20 20 20 20 77   ┆ ;      rl. w1     j2.    ;    w┆
0x02526c…02556c (4, 110)   75 6d 62 65 72 20 65 72 72 6f 72 3a 0a 20 20 20 20 20 72 73 2e 20 77 30 20 20 20 20 20 6a 31 2e   ┆umber error:      rs. w0     j1.┆
0x02556c…02586c (5, 0)     62 2e 61 38 30 30 2c 62 32 30 30 20 77 2e 0a 0a 6d 2e 20 20 20 20 20 20 20 20 20 20 20 20 20 20   ┆b.a800,b200 w.  m.              ┆
0x02586c…025b6c (5, 1)     31 30 3d 69 31 30 2d 69 31 31 2a 31 30 20 20 20 20 20 2c 20 69 32 31 3d 69 32 30 2f 31 30 20 20   ┆10=i10-i11*10     , i21=i20/10  ┆
0x025b6c…025e6c (5, 2)     20 20 20 20 61 20 6e 61 6d 65 73 20 64 65 66 69 6e 65 20 73 79 73 74 65 6d 20 63 6f 6e 73 74 61   ┆    a names define system consta┆
0x025e6c…02616c (5, 3)     70 65 72 61 74 69 6e 67 20 73 79 73 74 65 6d 20 73 3a 0a 3b 20 20 20 20 20 63 6f 6e 74 61 69 6e   ┆perating system s: ;     contain┆
0x02616c…02646c (5, 4)     6e 74 65 72 76 61 6c 0a 3b 20 61 31 31 32 20 3d 20 6e 6f 2e 20 6f 66 20 62 73 2d 64 65 76 69 63   ┆nterval ; a112 = no. of bs-devic┆
0x02646c…02676c (5, 5)     3b 0a 61 31 31 36 3d 30 20 20 20 20 20 20 20 20 20 3b 0a 61 31 32 38 3d 30 20 20 20 20 20 20 20   ┆; a116=0         ; a128=0       ┆
0x02676c…026a6c (5, 6)     3d 20 20 30 20 20 20 20 20 20 20 20 20 3b 20 73 61 76 65 20 69 63 20 28 72 65 74 75 72 6e 29 0a   ┆=  0         ; save ic (return) ┆
0x026a6c…026d6c (5, 7)     69 6f 6e 0a 61 36 35 36 20 3d 20 2b 36 20 20 20 20 20 20 20 20 20 3b 20 70 72 65 76 20 6f 70 65   ┆ion a656 = +6         ; prev ope┆
0x026d6c…02706c (5, 8)     38 34 20 3d 20 20 33 34 20 20 20 20 20 20 20 20 3b 20 6d 65 73 73 61 67 65 20 64 65 63 72 69 70   ┆84 =  34        ; message decrip┆
0x02706c…02736c (5, 9)     20 69 6e 20 62 61 73 65 73 0a 0a 20 20 20 61 38 38 3d 33 34 2c 20 61 31 30 37 3d 38 2e 34 30 30   ┆ in bases     a88=34, a107=8.400┆
0x02736c…02766c (5, 10)    69 6e 67 20 64 65 62 75 67 67 69 6e 67 20 6f 66 20 74 68 65 20 73 79 73 74 65 6d 2e 0a 3b 20 74   ┆ing debugging of the system. ; t┆
0x02766c…02796c (5, 11)    70 70 65 72 20 6c 69 6d 69 74 28 69 6e 74 65 72 76 61 6c 29 0a 3b 61 31 30 3d 20 20 30 20 20 20   ┆pper limit(interval) ;a10=  0   ┆
0x02796c…027c6c (5, 12)    69 74 69 61 6c 20 63 70 61 0a 61 31 37 32 3d 20 34 32 20 20 20 20 20 20 20 20 20 20 20 3b 20 20   ┆itial cpa a172= 42           ;  ┆
0x027c6c…027f6c (5, 13)    30 2c 20 6a 30 20 3d 20 6a 30 2b 32 20 3b 20 20 2d 20 20 20 63 61 75 73 65 0a 61 31 37 37 3d 20   ┆0, j0 = j0+2 ;  -   cause a177= ┆
0x027f6c…02826c (5, 14)    20 20 20 20 2d 22 2d 20 3a 20 73 6c 69 63 65 73 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20   ┆    -"- : slices                ┆
0x02826c…02856c (5, 15)    72 65 73 0a 61 33 30 34 20 3d 20 31 36 20 20 3b 20 61 64 64 72 65 73 73 20 6f 66 20 77 61 69 74   ┆res a304 = 16  ; address of wait┆
0x02856c…02886c (5, 16)    34 20 20 20 20 20 3b 20 6e 75 6d 62 65 72 20 6f 66 20 77 6f 72 64 73 20 69 6e 20 75 73 65 72 20   ┆4     ; number of words in user ┆
0x02886c…028b6c (5, 17)    74 61 62 6c 65 3e 0a 3b 61 34 38 20 3d 20 2d 34 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3b 20   ┆table> ;a48 = -4              ; ┆
0x028b6c…028e6c (5, 18)    20 3b 20 3c 6e 61 6d 65 3e 0a 3b 61 35 30 20 3d 20 31 30 20 20 20 20 20 20 20 20 20 20 20 20 20   ┆ ; <name> ;a50 = 10             ┆
0x028e6c…02916c (5, 19)    6d 20 61 72 65 61 2c 20 69 6e 20 64 65 76 69 63 65 20 64 65 73 63 72 69 70 74 6f 72 2c 20 75 73   ┆m area, in device descriptor, us┆
0x02916c…02946c (5, 20)    61 32 34 34 3d 20 6a 30 2c 20 6a 30 20 3d 20 6a 30 2b 32 20 3b 20 74 69 6d 65 6f 75 74 20 2f 20   ┆a244= j0, j0 = j0+2 ; timeout / ┆
0x02946c…02976c (5, 21)    6a 30 2c 20 61 32 34 36 3d 61 32 34 36 2d 6a 30 2c 20 61 32 34 37 3d 61 32 34 37 2d 6a 30 2c 0a   ┆j0, a246=a246-j0, a247=a247-j0, ┆
0x02976c…029a6c (5, 22)    61 37 33 20 3d 20 32 38 20 20 20 20 20 20 20 20 20 20 20 20 3b 20 3c 70 61 72 61 6d 65 74 65 72   ┆a73 = 28            ; <parameter┆
0x029a6c…029d6c (5, 23)    75 72 72 65 6e 74 20 73 74 61 74 75 73 0a 61 33 31 38 3d 20 36 20 20 20 20 20 20 20 20 20 20 20   ┆urrent status a318= 6           ┆
0x029d6c…02a06c (5, 24)    34 35 2b 36 20 20 20 20 20 20 20 20 3b 20 66 69 72 73 74 20 73 65 67 6d 65 6e 74 20 6e 75 6d 62   ┆45+6        ; first segment numb┆
0x02a06c…02a36c (5, 25)    65 73 73 61 67 65 20 72 65 63 65 69 76 65 64 2c 20 62 75 74 20 72 65 67 72 65 74 74 65 64 20 62   ┆essage received, but regretted b┆
0x02a36c…02a66c (5, 26)    76 65 72 73 20 71 75 65 75 65 20 77 69 74 68 6f 75 74 20 66 75 72 74 68 65 72 20 61 63 74 69 6f   ┆vers queue without further actio┆
0x02a66c…02a96c (5, 27)    65 6e 74 20 6d 6f 6e 69 74 6f 72 20 70 72 6f 63 65 64 75 72 65 73 20 72 65 61 63 74 20 75 70 6f   ┆ent monitor procedures react upo┆
0x02a96c…02ac6c (5, 28)    73 73 61 67 65 20 72 65 63 65 69 76 65 64 20 20 20 20 20 20 2d 20 20 20 20 20 20 20 20 35 20 20   ┆ssage received      -        5  ┆
0x02ac6c…02af6c (6, 0)     0c 0a 6d 2e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 6d 6f 6e 63 65 6e 74 72 61 6c 20 2d   ┆  m.                moncentral -┆
0x02af6c…02b26c (6, 1)     38 2b 33 32 0a 0a 20 20 20 20 20 28 3a 69 32 35 2b 34 38 3a 29 3c 31 36 2b 28 3a 69 32 34 2b 34   ┆8+32       (:i25+48:)<16+(:i24+4┆
0x02b26c…02b56c (6, 2)     20 69 30 2e 20 20 20 20 20 3b 20 20 20 63 61 6c 63 75 6c 61 74 65 20 74 6f 70 20 61 64 64 72 65   ┆ i0.     ;   calculate top addre┆
0x02b56c…02b86c (6, 3)     64 75 72 65 73 20 20 20 20 20 28 65 20 6e 61 6d 65 73 29 0a 3b 20 20 20 20 20 6e 61 6d 65 20 74   ┆dures     (e names) ;     name t┆
0x02b86c…02bb6c (6, 4)     20 20 20 20 20 20 20 20 20 20 3b 20 20 20 20 20 74 69 6d 65 20 77 68 65 6e 20 6c 61 73 74 20 69   ┆          ;     time when last i┆
0x02bb6c…02be6c (6, 5)     20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3b 20 20 20 20 20 73 74 61 72 74 20 6f 66 20   ┆                 ;     start of ┆
0x02be6c…02c16c (6, 6)     20 20 20 20 20 20 20 20 20 20 20 20 20 20 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20   ┆              ;                 ┆
0x02c16c…02c46c (6, 7)     20 73 65 63 6f 6e 64 73 29 0a 62 31 34 3a 20 30 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20   ┆ seconds) b14: 0                ┆
0x02c46c…02c76c (6, 8)     20 20 20 20 20 69 6e 73 70 65 63 74 0a 20 20 20 20 20 63 31 30 34 20 20 20 20 20 20 20 20 20 20   ┆     inspect      c104          ┆
0x02c76c…02ca6c (6, 9)     20 20 20 20 20 20 20 20 20 3b 31 36 30 3a 20 20 20 20 20 20 20 20 2d 20 27 27 20 2d 20 20 20 20   ┆         ;160:        - '' -    ┆
[…truncated at 200 lines…]