|
DataMuseum.dkPresents historical artifacts from the history of: RC4000/8000/9000 |
This is an automatic "excavation" of a thematic subset of
See our Wiki for more about RC4000/8000/9000 Excavated with: AutoArchaeologist - Free & Open Source Software. |
top - metrics
Length: 8102180 (0x7ba124)
Description: Bits:30008162 Bånd uden label med RC8000 monitor-relaterede kildetekster
Types: SimhTapContainer, ½" Magnetic Tape
Dumping the first 0x30 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 82 82 82 82 82 82 82 82 00 00 00 00 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 0a 0a 3b 20 74 68 69 73 20 74 65 78 74 66 69 6c ┆message monold version 82 01 27 ; this textfil┆
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 20 20 20 20 20 20 20 3a 20 20 74 65 78 74 73 20 ┆ersion as compressed ; : texts ┆
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 20 79 6f 75 20 77 61 6e 74 20 74 6f 20 64 65 63 ┆es, by: ; i monloadc ; if you want to dec┆
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 73 69 6f 6e 20 69 73 20 77 61 6e 74 65 64 20 74 ┆name> 0 1 ) ; if the current version is wanted t┆
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 20 66 69 6c 65 20 32 34 20 20 73 74 61 72 74 69 ┆ink8000 ; file 23 startarea ; file 24 starti┆
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 69 6c 65 20 66 0a 66 20 3d 20 63 6f 70 79 20 6d ┆ nextfile f f = copy mons1 nextfile f f = copy m┆
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 6e 74 72 61 6c 3d 6d 6f 76 65 20 6d 6f 6e 63 65 ┆ skip 36.1 c=copy mess.no 1 mcentral=move monce┆
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 2a 2a 2a 2a 0a 0a 0a 24 66 70 61 73 75 62 0a 3b ┆****** $host ;******************** $fpasub ;┆
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 74 66 69 6c 65 20 66 0a 66 20 3d 20 63 6f 70 79 ┆nextfile f f = copy tmuscopy nextfile f f = copy┆
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 20 20 20 20 20 20 20 20 20 6d 6f 6e 73 31 20 6d ┆init monprocfnc1 monprocfnc2, mons1 m┆
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 66 69 6c 65 20 66 0a 6d 6f 6e 68 6f 73 74 20 3d ┆ monnew monfpaline = move f nextfile f monhost =┆
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 79 20 3d 20 65 6e 74 72 79 20 6d 6f 6e 6e 65 77 ┆boot = move f nextfile f tmuscopy = entry monnew┆
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 6e 6e 65 77 0a 69 66 20 6f 6b 2e 6e 6f 0a 20 20 ┆ not a magtape end) lookup monnew if ok.no ┆
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 65 77 20 6d 6f 6e 6e 65 77 20 6d 6f 6e 6e 65 77 ┆f moncentral = entry monnew monnew monnew monnew┆
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 6f 6d 70 72 20 66 0a 6e 65 78 74 66 69 6c 65 20 ┆new monnew monnew mons1 = slangcompr f nextfile ┆
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 31 20 63 70 75 0a 0a 2f 20 3b 20 65 6e 64 20 6f ┆ monnew tstartdate=move f head 1 cpu / ; end o┆
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 6d 6f 6e 74 61 70 65 6e 65 77 63 0a 6c 6f 6f 6b ┆age.no 47.1 head 1 cpu message montapenewc look┆
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 6b 20 3d 20 73 6c 61 6e 67 63 6f 6d 70 72 20 6d ┆cfnc2 f = copy wrk nextfile f wrk = slangcompr m┆
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 20 20 20 77 33 20 3a 3d 20 6b 69 6e 64 20 28 69 ┆ yes; bz w3 x1+1 ; w3 := kind (i┆
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 20 20 20 20 20 20 20 3b 0a 20 20 20 20 20 64 73 ┆ w. k=h55 0 b2: 0 ; ds┆
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 20 20 20 20 20 73 65 20 20 77 30 20 20 30 0a 20 ┆ input jl. w3 h27.-2 ; se w0 0 ┆
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 20 20 20 28 66 32 2e 29 20 20 20 3b 20 20 20 69 ┆ ; char:= nl; se. w0 (f2.) ; i┆
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 20 20 78 31 20 20 20 20 20 20 20 20 20 3b 0a 20 ┆ tail(0):=segm.count rs w3 x1 ; ┆
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 66 30 2e 20 20 20 20 3b 20 20 20 63 6f 6d 6d 65 ┆n goto outnext; rs. w0 f0. ; comme┆
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 20 20 20 20 20 63 30 2e 20 20 20 20 3b 20 20 20 ┆ ; string:= true; jl. c0. ; ┆
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 63 74 20 65 72 72 6f 72 3c 31 30 3e 3c 30 3e 3a ┆><0>:> e2: <:***textcompr connect error<10><0>:┆
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 35 36 20 20 3b 20 62 75 66 66 65 72 20 66 6f 72 ┆2,c2,c2,c1;112-127 w. b1: 0, r.256 ; buffer for┆
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 70 72 6f 63 66 6e 63 31 20 3d 20 65 6e 74 72 79 ┆t = entry f f f f nextfile f monprocfnc1 = entry┆
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 65 0a 28 0a 6d 65 73 73 61 67 65 20 6d 6f 6e 63 ┆ ; generate empty monchange file ( message monc┆
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 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 0a 0a ┆*************** $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 6c 20 35 20 33 0a 63 3d 6d 65 73 73 61 67 65 20 ┆ c=message options rc8000 rel 5 3 c=message ┆
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 61 6c 33 3a 3e 29 3b 0a 74 77 28 78 2c 3c 3a 74 ┆(x,<:terminal2:>); tw(x,<:terminal3:>); tw(x,<:t┆
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 65 73 65 72 76 65 64 20 66 6f 72 20 73 75 62 70 ┆ ; number of mess buffers reserved for subp┆
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 65 76 69 63 65 20 33 0a 67 33 3a 20 20 38 35 2c ┆g2: 85,0,r.34 0,0,0 m. device 3 g3: 85,┆
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 6a 30 3d 6b 2c 20 30 2c 20 72 2e 35 31 32 2c 20 ┆ m. start of testbuffer j0=k, 0, r.512, ┆
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 0a 20 20 20 20 20 30 2c 20 72 2e 31 33 20 20 20 ┆2, 0 0, r.14, 100 000, 1000 0, r.13 ┆
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 32 2c 20 6b 2c 20 6b 2d 32 2c 20 30 0a 20 20 20 ┆ <:rec36002:> , 0, g18, 0, 1<22, k, k-2, 0 ┆
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 2c 20 6a 31 2c 20 6a 30 2c 20 6a 31 0a 20 20 20 ┆ g22, 0, 1<22, k, k-2, 0 j0, j1, j0, j1 ┆
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 33 36 30 30 33 3a 3e 2c 20 30 2c 20 67 32 32 2c ┆8-1 m. host36003 g25: 82, <:host36003:>, 0, g22,┆
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 20 2d 31 2c 30 2c 30 2c 2d 31 2c 30 2c 30 2c 2d ┆ ; statistics -1,0,0,-1,0,0,-┆
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 32 34 6d 62 0a 20 20 20 20 20 30 2c 20 72 2e 34 ┆1, 21, 0, r.5, 1<23, 0, r.32 ; 124mb 0, r.4┆
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 2c 20 30 2c 20 72 2e 33 32 20 20 3b 20 20 33 33 ┆ r.4, 21*5*411, 21, 0, r.5, 1<23, 0, r.32 ; 33┆
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 30 2c 20 72 2e 35 2c 20 31 3c 32 33 2c 20 30 2c ┆-g32 0, r.4, 21*5*147, 21, 0, r.5, 1<23, 0,┆
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 20 78 2c 20 78 0a 0a 20 20 20 20 20 30 2c 20 61 ┆ 0, 1<22, k, k-2, 0 0, r.3, x, x 0, a┆
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 20 20 30 2c 20 72 2e 33 2c 20 78 2c 20 78 0a 0a ┆ r.4, gx, 0, 1<22, k, k-2, 0 0, r.3, x, x ┆
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 20 64 65 76 69 63 65 20 34 31 0a 67 34 31 3a 20 ┆ g40: 85,0,r.34 0,0,0 m. device 41 g41: ┆
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 35 39 3a 20 20 38 35 2c 30 2c 72 2e 33 34 0a 0a ┆r.34 0,0,0 m. device 59 g59: 85,0,r.34 ┆
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 33 34 0a 0a 0a 20 20 20 20 20 30 2c 30 2c 30 0a ┆0,0,0 m. device 77 g77: 85,0,r.34 0,0,0 ┆
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 38 2c 31 31 0a 20 20 20 30 2c 67 33 30 2b 61 32 ┆6+a230,a198,10 0,g28+a230,a198,11 0,g30+a2┆
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 30 0a 0a 73 6b 69 70 20 33 36 2e 31 0a 63 3d 63 ┆( message changes from 8 1 to 9 0 skip 36.1 c=c┆
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 2f 38 33 20 30 31 20 30 35 2f 0a 0a 0a 6c 2e 2f ┆1/=0/, p -1 l./i0=/, r/82 11 01/83 01 05/ l./┆
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 20 20 20 20 20 20 20 3b 20 20 20 20 63 68 61 69 ┆-- : -"- : slices ; chai┆
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 20 3d 20 31 30 20 20 20 20 20 20 20 20 20 20 20 ┆50-j0 , a402 = a402 -j0 e. a50 = 10 ┆
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 3d 20 32 38 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ; <document name> a411 = 28 ┆
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 35 30 2f 2c 0a 0a 0a 6c 2e 2f 61 32 35 30 3d 61 ┆iption /, l./j0-a48/, r/a48/a250/, l./a250=a┆
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 63 65 6c 65 6e 67 68 74 3e 0a 0a 2f 2c 0a 0a 6c ┆ ; <parameter2> : <slicelenght> /, l┆
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 2b 61 31 34 20 20 20 20 20 20 20 20 3b 20 20 20 ┆125: rl w0 x1+a14 ; ┆
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 66 20 6b 69 6e 64 20 3d 20 61 72 65 61 20 70 72 ┆i/ sn w0 4 ; if kind = area pr┆
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 6e 20 72 65 73 75 6c 74 20 32 20 65 6c 73 65 0a ┆ g6 ; if not user then result 2 else ┆
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 20 20 20 20 72 65 73 75 6c 74 0a 0a 3b 20 74 68 ┆ unchanged ; w3 link result ; th┆
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 61 20 20 77 32 20 20 78 31 2b 61 31 34 20 20 20 ┆ set other-reserver bit; i3: ba w2 x1+a14 ┆
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 20 20 6a 30 2e 20 20 20 20 3b 0a 20 20 20 20 20 ┆0. ; goto f0; i2: rl. w2 j0. ; ┆
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 69 6f 6e 0a 3b 73 61 76 65 20 77 33 20 61 64 72 ┆ user reserver specification ;save w3 adr┆
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 0a 20 20 20 20 20 73 65 20 20 77 30 20 20 36 34 ┆a10 ; if kind = internal or se w0 64┆
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 2c 0a 0a 0a 0a 6c 2e 2f 69 33 33 3a 2f 2c 0a 6c ┆ ; start of 'std wait program' /, l./i33:/, l┆
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 73 63 2e 63 75 72 72 20 72 65 63 65 69 76 65 72 ┆2 : al w0 1 ; initdisc.curr receiver┆
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 73 63 72 69 70 74 69 6f 6e 20 61 64 64 72 65 73 ┆ ; driver process description addres┆
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 6f 72 6b 31 0a 2f 2c 0a 0a 6c 2e 2f 61 35 36 3a ┆ ; work0, work1 /, l./a56:┆
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 3b 20 3c 64 72 69 76 65 72 20 70 72 6f 63 65 73 ┆48:/, i/ ; a250: ; <driver proces┆
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 6e 20 6f 70 65 72 61 74 69 6f 6e 0a 0a 69 31 3a ┆t jl. j1. ; return operation i1:┆
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 70 72 6f 63 65 73 73 20 69 73 20 69 6e 73 65 72 ┆ a temporary link the calling ; process is inser┆
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 36 20 20 20 20 20 20 3b 20 69 6e 63 6c 75 64 65 ┆ jl w3 d126 ; include┆
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 20 20 6a 32 2e 20 20 20 20 20 20 20 3b 20 73 61 ┆ ; regret message rs. w1 j2. ; sa┆
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 72 2e 61 34 30 31 2c 30 2f 2c 0a 6c 2e 2f 68 32 ┆0,r.a401,0/, l./h22:/,l-1,r/0/0,r.a401,0/, l./h2┆
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 67 69 6e 0a 20 20 20 20 20 73 6e 20 20 77 30 20 ┆g17. ; g15: rl. w1 g11. ; begin sn w0 ┆
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 66 77 6f 72 64 3a 3d 6e 65 78 74 20 68 61 6c 66 ┆ ba. w0 1 ; else halfword:=next half┆
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 2c 0a 72 2f 38 32 20 30 34 20 32 33 2f 38 32 20 ┆*monprocfnc1************ l./i0=/, r/82 04 23/82 ┆
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 6c 34 2e 29 2f 20 2c 0a 0a 6c 2e 2f 77 61 20 77 ┆; /, l./e2:/, l./d4/, r/d4. /(l4.)/ , l./wa w┆
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 6e 74 20 6e 6f 2e 20 2b 20 6e 6f 2e 20 6f 66 20 ┆ry continues until segment=segment no. + no. of ┆
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 20 20 20 20 20 20 20 20 20 0a 6c 2e 2f 64 38 2e ┆ segment no.work /, l./g0:/, l./d8.┆
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 65 6e 74 2f 2c 0a 0a 6c 2e 2f 65 31 34 3a 2f 2c ┆/ /, l./w2 <key>/, r/key/segment/, l./e14:/,┆
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 73 74 20 65 6e 74 72 79 20 63 6f 75 6e 74 0a 20 ┆/ g25: ; adjust entry count ┆
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 20 20 20 20 73 65 20 20 77 31 20 28 78 32 2b 61 ┆ d14. ; w1:=proc addr; se w1 (x2+a┆
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 0a 20 20 20 20 20 6e 73 20 20 77 30 20 20 20 20 ┆ g3. ; goto next halfword ns w0 ┆
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 20 20 20 20 20 20 20 20 20 3b 0a 2f 2c 0a 0a 6c ┆ d12. ; jd x3+2 ; /, l┆
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 20 20 20 20 3b 20 65 6e 61 62 6c 65 20 72 65 74 ┆+0/, d, i/ je. (h2.) ; enable ret┆
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 72 20 3a 20 6e 65 78 74 20 69 6e 73 74 72 75 63 ┆4 je. n0. ;+2 user : next instruc┆
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 20 20 20 20 20 20 20 20 20 20 20 20 20 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 20 2b 20 70 65 72 6d 6b 65 79 20 20 20 20 6e 61 ┆= d1 + f3 ; chainkink*8 + permkey na┆
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 20 20 20 3b 20 6c 61 73 74 20 73 6c 69 63 65 20 ┆5 + 7 ; v26= d1 + f66 + f0 ; last slice ┆
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 6c 2e 2f 6d 32 34 3a 2f 2c 0a 6c 2e 2f 64 33 3a ┆-2 jl. j6. , j6= k-2 /, l./m24:/, l./d3:┆
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 69 6c 64 0a 2f 2c 6c 2e 2f 68 73 77 30 2f 2c 64 ┆ ; newclaim:= claim(key).child /,l./hsw0/,d┆
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 20 20 20 20 6a 35 2e 20 20 20 3b 20 20 20 20 67 ┆ of keys <= 0 then jl. j5. ; g┆
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 2a 34 20 3b 20 69 66 20 6b 65 79 20 3e 3d 6d 69 ┆ from slice sl w2 x1+a109*4 ; if key >=mi┆
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 34 2f 2c 0a 6c 20 31 2c 69 2f 0a 61 6d 20 20 65 ┆ing stones/,l1,d1, l./e20-/,r/6/4/, l 1,i/ am e┆
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 0a 6c 2e 2f 67 35 3a 2f 2c 6c 2e 2f 72 6c 2e 77 ┆x3+a57 ; work0:=work1:= 0 /, l./g5:/,l./rl.w┆
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 20 20 20 20 20 72 6c 20 20 77 33 20 20 62 36 20 ┆s w0 x2+a50 ; docadr := 0 rl w3 b6 ┆
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 20 63 61 6c 6c 20 3a 20 6d 35 31 0a 62 2e 20 20 ┆ms from process to sender area ; call : m51 b. ┆
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 20 20 20 20 20 66 36 34 20 20 20 20 3b 20 77 30 ┆ am. (d4.) ; wm w0 f64 ; 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 20 20 20 20 20 20 3b 20 20 77 32 3a 3d 6e 65 78 ┆2 h0. ; al w2 x2+2 ; w2:=nex┆
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 74 68 65 20 64 6f 63 2f 2c 20 64 2e 2f 6e 65 78 ┆2/, l1, r/w0/w1/, r/x1/x2/, l./;the doc/, d./nex┆
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 20 20 20 3b 20 2a 2a 2a 0a 2f 2c 0a 20 20 6c 2e ┆er than 9.0 ; *** /, l.┆
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 74 6f 6e 65 29 0a 20 20 20 20 20 73 7a 20 20 77 ┆ j2=k-2 ; (stepping stone) sz w┆
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 20 20 20 20 73 6f 20 20 77 33 20 20 66 32 32 20 ┆ ; test users and reserver so w3 f22 ┆
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 6c 2e 2f 67 36 3a 2f 2c 20 6c 2e 2f 78 33 2b 61 ┆, r/d15. /(l115.)/, r/w3/w2/, l./g6:/, l./x3+a┆
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 2e 2f 67 34 3a 2f 2c 20 67 20 31 2f 77 33 2f 77 ┆temporary link then release /, l./g4:/, g 1/w3/w┆
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 30 20 20 2f 2c 0a 0a 6c 2e 2f 70 31 3a 2f 2c 20 ┆, r/, /, m51 = m51-n50 /, l./p1:/, ┆
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 20 20 20 20 20 20 20 3b 20 20 20 20 73 65 74 20 ┆/p51:/, l./m47,2/, i/ m44 ; set ┆
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 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3b 20 ┆ ; 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 65 64 20 77 31 0a 2f 2c 0a 0a 6c 2e 2f 6a 35 3a ┆ i/ i3:0 ; saved w1 /, l./j5:┆
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 20 74 61 69 6c 2e 63 6f 6e 74 65 6e 74 2c 6b 65 ┆ x1+16 ; if result<>ok or tail.content,ke┆
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 74 61 6c 6f 67 20 62 61 73 65 29 3b 0a 20 20 20 ┆ ; set s-catalog base(cur catalog base); ┆
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 20 77 30 20 20 78 31 2b 63 37 33 20 20 20 20 3b ┆ckpointer := stackbase; al w0 x1+c73 ;┆
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 20 64 6c 2e 20 77 33 20 20 20 20 20 69 32 2e 20 ┆g base(name, lower, upper); dl. w3 i2. ┆
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 77 31 20 20 20 20 20 20 20 30 20 20 20 20 20 3b ┆ rl. w1 (u87.) ; se w1 0 ;┆
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 20 20 28 75 31 39 2e 29 20 2f 2c 0a 6c 2e 2f 72 ┆, l./ds. w3 e19./, r/ e19. / (u19.) /, l./r┆
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 6c 65 2e 0a 3b 0a 3b 20 20 20 20 20 20 20 20 63 ┆ access counter of a given console. ; ; c┆
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 20 69 30 2e 20 20 20 3b 0a 20 20 20 20 20 61 6c ┆ ; begin rs. w0 i0. ; al┆
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 0a 2f 2c 0a 0a 6c 2e 2f 62 2e 69 32 35 2c 2f 2c ┆ild. finally, the identification /, l./b.i25,/,┆
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 20 20 20 77 61 20 20 77 32 20 20 20 20 20 20 62 ┆e; ls w2 1 ; wa w2 b┆
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 0a 3b 20 70 72 6f 63 65 64 75 72 65 20 72 65 6c ┆procedure devno(name adr./, i/ ; procedure rel┆
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 6c 2e 20 77 33 20 20 20 20 20 20 20 20 69 30 2e ┆ ds. w1 i2. ; al. w3 i0.┆
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 20 77 33 3a 3d 61 64 64 72 28 27 73 27 29 3b 0a ┆: al. w3 i2. ; entry0: w3:=addr('s'); ┆
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 20 20 20 20 20 20 20 20 3b 20 20 74 65 78 74 20 ┆emove,1<21/continue/, l1, i/ ; text ┆
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 6f 77 6e 3c 30 3e 3a 3e 0a 67 31 30 3a 20 6a 6c ┆l. w1 g103. , <:process unknown<0>:> g10: jl┆
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 20 6a 6c 2e 20 77 31 20 20 20 20 20 67 31 30 33 ┆ <:max<0>:> g27: jl. w1 g103┆
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 20 20 20 20 20 20 20 3b 0a 69 35 3a 20 20 61 6c ┆ d22. ; ; i5: al┆
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 65 61 64 69 6e 67 20 66 72 6f 6d 20 61 72 65 61 ┆ ; link+4 : not reading from area┆
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 20 77 32 20 20 20 20 20 20 69 36 2e 20 20 20 20 ┆ dl. w1 i5. ; rl. w2 i6. ┆
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 0a 20 20 20 20 20 72 6c 20 20 77 33 20 20 78 33 ┆, i/ rl. w3 e25. ; rl w3 x3┆
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 20 20 20 20 20 20 20 20 20 20 20 20 20 3b 0a 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 65 20 6c 69 6e 6b 3a 0a 20 20 20 20 20 72 6c 2e ┆108: ; release link: rl.┆
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 20 20 20 2f 67 34 36 3a 20 2f 2c 0a 6c 2e 2f 67 ┆w2 /, l./jd 1<11+22/, l1, r/ /g46: /, l./g┆
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 64 65 72 2e 63 61 74 61 6c 6f 67 20 62 61 73 65 ┆ rl. w1 e29. ; save sender.catalog base┆
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 2c 20 6c 31 2c 20 64 2c 0a 72 2f 2b 32 30 34 38 ┆/+2048/ /, l./g58: ;unstack:/, l1, d, r/+2048┆
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 77 33 20 20 20 20 20 65 31 35 2e 20 20 20 20 20 ┆ <> core table head do sn. w3 e15. ┆
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 20 20 20 20 20 28 32 29 2c 20 64 34 36 2c 20 64 ┆ (2), d42, d42=k-4 jl. (2), d46, d┆
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 2f 2c 20 20 72 2f 61 6c 2e 2f 72 6c 2e 2f 2c 20 ┆/, r/e44./v44./, l./al. w1 e51./, r/al./rl./, ┆
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 73 65 20 61 63 63 65 73 73 20 69 6e 64 69 63 61 ┆ al w0 1 ; increase access indica┆
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 2e 2b 35 30 30 2f 20 20 20 20 28 76 33 37 2e 29 ┆ d, l./rl. w2 e37.+500/, r/ e37.+500/ (v37.)┆
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 2f 65 32 39 2e 2b 32 30 34 36 2f 20 28 76 32 39 ┆046/, d, l./rl. w1 e29.+2046/, r/e29.+2046/ (v29┆
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 20 20 2f 2c 0a 0a 6c 2e 2f 6a 34 3a 2f 2c 20 72 ┆/, r/al/rl/, r/e44.+2046/ v44. /, l./j4:/, r┆
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 20 69 2f 0a 3b 20 70 72 6f 63 65 64 75 72 65 20 ┆k) /, l./procedure read chain/, i/ ; procedure ┆
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 20 2c 20 66 35 20 3d 20 6b 2d 32 0a 0a 0a 0a 2f ┆2 jl. f3. , f3 = k-2 jl. f5. , f5 = k-2 /┆
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 0a 6c 2e 2f 66 32 33 3a 2f 2c 20 6c 2e 2f 72 6c ┆ - " - ) /, l./j12=k+2/,d, l./f23:/, l./rl┆
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 74 20 73 74 61 74 75 73 3b 0a 20 20 20 20 20 6a ┆ i21. ;+0: trouble: goto test status; j┆
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 6d 65 6e 74 0a 20 20 20 20 20 20 20 20 20 20 20 ┆ent; ;comment ┆
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 66 32 2e 20 20 20 20 3b 0a 0a 20 20 20 20 20 64 ┆try deleted:>); jl. w3 f2. ; d┆
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 6c 65 29 0a 20 20 20 20 20 6a 6c 2e 20 20 20 20 ┆ ; monitor chaintable) jl. ┆
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 6e 74 65 67 65 72 28 73 65 67 6d 65 6e 74 6b 65 ┆ zl w1 x2+d53 ; writeinteger(segmentke┆
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 20 20 20 3b 0a 20 20 20 20 20 6a 6c 20 20 20 20 ┆store regs. dl. w3 j20. ; jl ┆
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 2f 2c 20 69 2f 0a 0a 69 32 31 3a 20 20 20 20 20 ┆i21:/, d./wa.w0(j5.)/, d./jl.i8./, i/ i21: ┆
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 77 20 73 74 61 72 74 20 6f 66 20 72 65 61 64 69 ┆ ; prepare new start of readi┆
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 2e 20 66 31 37 2e 20 2c 20 66 31 37 20 3d 20 6b ┆ f3 = k-2 /, l./f15./, l1, i/ jl. f17. , f17 = k┆
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 73 69 62 6c 65 20 74 6f 20 6c 6f 61 64 20 61 20 ┆e following is done tomakeit possible to load a ┆
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 20 20 20 20 20 20 20 20 20 6f 72 3a 20 20 20 6d ┆ncat<maincatname>/, l1, i/ ; or: m┆
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 20 74 68 65 6e 0a 20 20 20 20 20 6a 6c 2e 20 20 ┆ 513 ; noofkeys > 512 then jl. ┆
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 2e 20 77 31 20 20 20 20 20 6a 32 2e 20 20 20 20 ┆oofpart := noofpart + 1; rs. w1 j2. ┆
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 72 69 74 65 69 6e 74 65 67 65 72 28 6e 6f 6f 66 ┆ ; rl. w1 j2. ; writeinteger(noof┆
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 20 20 20 20 3b 20 20 20 20 73 61 76 65 20 65 72 ┆umber error: rs. w0 j1. ; save er┆
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 20 20 6d 6f 6e 64 65 66 20 2d 20 6d 6f 6e 69 74 ┆b.a800,b200 w. m. mondef - monit┆
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 20 20 20 2c 20 69 32 30 3d 69 32 30 2d 69 32 31 ┆10=i10-i11*10 , i21=i20/10 , i20=i20-i21┆
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 6e 74 73 3b 0a 3b 20 20 20 20 20 62 20 6e 61 6d ┆ a names define system constants; ; b nam┆
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 73 20 63 6f 64 65 20 77 68 69 63 68 20 61 6c 6c ┆perating system s: ; contains code which all┆
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 65 73 0a 3b 20 61 31 31 33 20 3d 20 6e 6f 2e 20 ┆nterval ; a112 = no. of bs-devices ; a113 = no. ┆
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 20 20 3b 20 61 31 32 38 3d 30 20 3a 20 73 74 64 ┆; a116=0 ; a128=0 ; a128=0 : std┆
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 61 37 30 32 20 3d 20 20 32 20 20 20 20 20 20 20 ┆= 0 ; save ic (return) a702 = 2 ┆
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 72 61 74 69 6f 6e 0a 20 20 0a 3b 20 73 69 6d 70 ┆ion a656 = +6 ; prev operation ; simp┆
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 74 6f 72 20 70 6f 69 6e 74 65 72 28 63 75 72 29 ┆84 = 34 ; message decriptor pointer(cur)┆
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 30 20 30 30 30 31 2c 20 61 31 30 38 3d 38 2e 33 ┆ in bases a88=34, a107=8.4000 0001, a108=8.3┆
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 68 65 79 20 61 72 65 20 64 65 66 69 6e 65 64 20 ┆ing debugging of the system. ; they are defined ┆
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 20 20 20 20 20 20 20 20 3b 20 20 6b 69 6e 64 0a ┆pper limit(interval) ;a10= 0 ; kind ┆
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 20 20 20 2d 20 20 20 20 62 61 73 65 0a 61 31 37 ┆itial cpa a172= 42 ; - base a17┆
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 6a 30 2c 20 6a 30 20 3d 20 6a 30 2b 32 20 3b 20 ┆0, j0 = j0+2 ; - cause a177= j0, j0 = j0+2 ; ┆
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 20 20 20 20 3b 20 20 20 20 2d 2d 22 2d 2d 20 3a ┆ -"- : 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 20 66 69 72 73 74 20 65 76 65 6e 74 0a 0a 3b 20 ┆res a304 = 16 ; address of wait first event ; ┆
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 62 69 74 74 61 62 6c 65 0a 61 34 30 33 20 3d 20 ┆4 ; number of words in user bittable a403 = ┆
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 3c 6c 6f 77 65 72 20 6e 61 6d 65 20 62 61 73 65 ┆table> ;a48 = -4 ; <lower name base┆
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 20 3b 20 3c 20 70 72 6f 63 65 73 73 20 64 65 73 ┆ ; <name> ;a50 = 10 ; < process des┆
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 65 64 20 62 79 20 73 74 61 72 74 2d 69 6f 3a 0a ┆m area, in device descriptor, used by start-io: ┆
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 72 65 73 75 6c 74 20 66 72 6f 6d 20 73 74 61 72 ┆a244= j0, j0 = j0+2 ; timeout / result from star┆
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 0a 65 2e 0a 0a 0a 0a 3b 20 66 6f 72 6d 61 74 20 ┆j0, a246=a246-j0, a247=a247-j0, e. ; format ┆
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 20 33 3e 0a 61 37 34 20 3d 20 33 30 20 20 20 20 ┆a73 = 28 ; <parameter 3> a74 = 30 ┆
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 20 20 3b 20 65 76 65 6e 74 20 73 74 61 74 75 73 ┆urrent status a318= 6 ; event status┆
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 65 72 0a 61 31 34 36 3d 20 32 34 20 20 20 20 20 ┆45+6 ; first segment number a146= 24 ┆
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 79 20 73 65 6e 64 65 72 20 28 27 73 20 70 61 72 ┆essage received, but regretted by sender ('s par┆
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 6e 73 2e 0a 3b 20 20 72 65 63 65 69 76 65 72 20 ┆vers queue without further actions. ; receiver ┆
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 6e 20 74 68 65 20 70 6f 73 73 69 62 6c 65 0a 3b ┆ent monitor procedures react upon the possible ;┆
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 20 20 20 20 20 75 6e 63 68 2e 20 20 20 20 20 20 ┆ssage received - 5 unch. ┆
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 20 6d 6f 6e 69 74 6f 72 20 63 65 6e 74 72 61 6c ┆ m. moncentral - monitor central┆
0x02af6c…02af9c (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 38 3a 29 3c 38 2b 34 36 0a 20 20 20 20 20 28 3a ┆8+32 (:i25+48:)<16+(:i24+48:)<8+46 (:┆
0x02af9c…02afcc 69 32 33 2b 34 38 3a 29 3c 31 36 2b 28 3a 69 32 32 2b 34 38 3a 29 3c 38 2b 34 36 0a 20 20 20 20 20 28 3a 69 32 31 2b 34 38 3a 29 3c 31 36 2b 28 ┆i23+48:)<16+(:i22+48:)<8+46 (:i21+48:)<16+(┆
0x02afcc…02affc 3a 69 32 30 2b 34 38 3a 29 3c 38 2b 20 30 0a 0a 69 33 3a 20 20 61 6c 2e 20 77 30 20 20 69 32 2e 20 20 20 20 20 20 20 3b 20 77 72 69 74 65 20 64 ┆:i20+48:)<8+ 0 i3: al. w0 i2. ; write d┆
0x02affc…02b02c 61 74 65 3a 0a 20 20 20 20 20 72 73 20 20 77 30 20 20 78 32 2b 30 20 20 20 20 20 20 3b 20 20 20 66 69 72 73 74 20 66 72 65 65 3a 3d 73 74 61 72 ┆ate: rs w0 x2+0 ; first free:=star┆
0x02b02c…02b05c 74 28 74 65 78 74 29 3b 0a 20 20 20 20 20 61 6c 20 20 77 32 20 20 30 20 20 20 20 20 20 20 20 20 3b 0a 20 20 20 20 20 6a 6c 20 20 20 20 20 20 78 ┆t(text); al w2 0 ; jl x┆
0x02b05c…02b08c 33 20 20 20 20 20 20 20 20 3b 20 20 20 72 65 74 75 72 6e 20 74 6f 20 73 6c 61 6e 67 28 73 74 61 74 75 73 20 6f 6b 29 3b 0a 0a 20 20 20 20 20 6a ┆3 ; return to slang(status ok); j┆
0x02b08c…02b0bc 6c 2e 20 20 20 20 20 69 33 2e 20 20 20 20 20 20 20 3b 0a 65 2e 0a 6a 2e 0a 0c 0a 0a 0a 3b 20 73 65 67 6d 65 6e 74 20 31 20 3a 20 65 6e 74 65 72 ┆l. i3. ; e. j. ; segment 1 : enter┆
0x02b0bc…02b0ec 20 6d 6f 6e 69 74 6f 72 20 61 66 74 65 72 20 6c 6f 61 64 0a 3b 20 74 68 65 20 6d 6f 6e 69 74 6f 72 20 69 73 20 65 6e 74 65 72 65 64 20 69 6e 20 ┆ monitor after load ; the monitor is entered in ┆
0x02b0ec…02b11c 77 6f 72 64 20 38 2e 20 74 68 65 20 77 6f 72 64 73 20 2b 32 2c 2b 34 20 6d 75 73 74 20 61 74 20 65 6e 74 72 79 20 63 6f 6e 74 61 69 6e 20 2d 0a ┆word 8. the words +2,+4 must at entry contain - ┆
[…truncated at 200 lines…]