|
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 - download
Length: 82944 (0x14400)
Names: »rclogarea«
└─⟦667bb35d6⟧ Bits:30007480 RC8000 Dump tape fra HCØ.
└─⟦4334b4c0b⟧
└─⟦this⟧ »rclogarea«
0x00000…00020 (0,) 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 ┆ ┆ 0x00020…00040 00 00 00 00 00 00 00 00 00 00 00 00 00 04 1c ad c1 82 5d 00 00 00 00 00 00 00 00 00 00 00 00 00 ┆ Å ┆ 0x00040…00060 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 ┆ ┆ 0x00060…00080 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 6c 64 69 73 63 33 ┆ ldisc3┆ 0x00080…000a0 00 00 00 00 00 00 00 83 7f 97 00 00 00 00 00 00 00 00 00 00 00 00 2d 00 80 99 0f fb 1d 00 4a 51 ┆ - JQ┆ 0x000a0…000c0 10 00 5d 8d c2 db 10 04 df 8d b0 db 10 08 df 8d b0 2f 8d 70 38 08 04 ac 00 00 34 80 58 2f 8d 7a ┆ Å / p8 4 X/ z┆ 0x000c0…000e0 2d 8f d0 38 08 2a 51 10 00 2d 1f ff 5d 8d 82 38 08 34 38 08 08 a8 00 00 34 80 46 24 40 42 51 00 ┆- 8 *Q - Å 8 48 4 F$@BQ ┆ 0x000e0…00100 18 2e 8f 6a 2f 21 fe a7 10 00 34 80 3c df 8d 56 df 8d 66 d9 00 6e dd 20 20 37 8d b8 34 8e 9e 6e ┆ . j/! 4 < V f n 7 4 n┆ 0x00100…00120 6f 20 65 72 72 6f 72 6c 6f 67 20 20 20 20 20 20 20 20 0a 00 6e 6f 20 72 63 6c 6f 67 61 72 65 61 ┆o errorlog no rclogarea┆ 0x00120…00140 20 20 20 20 20 20 20 0a 00 70 72 6f 63 20 73 69 7a 65 20 74 6f 6f 20 73 6d 61 6c 6c 0a 00 24 0f ┆ proc size too small $ ┆ 0x00140…00160 f2 24 0f f2 2d 8f ee 2e 10 0c 37 8e 22 34 0f ff 00 07 ff 00 00 01 00 08 71 69 60 00 00 80 00 00 ┆ $ - . 7 "4 qi` ┆ 0x00160…00180 f2 4a 00 a8 6c 00 ac 44 00 00 00 00 00 00 00 80 00 00 12 08 00 1b 0c 00 00 01 00 08 82 63 00 00 ┆ J l D c ┆ 0x00180…001a0 00 80 00 00 00 00 00 ab 3c 00 a1 34 00 00 00 00 00 00 00 80 00 00 12 08 00 1b 0c 00 00 01 00 08 ┆ < 4 ┆ 0x001a0…001c0 48 63 00 00 00 80 00 00 00 00 00 9e 34 00 a8 84 00 00 00 00 00 00 80 00 00 00 01 ff 00 90 36 00 ┆Hc 4 6 ┆ 0x001c0…001e0 30 00 01 8e a4 01 90 a2 00 00 39 00 00 00 00 a4 4c 00 a3 2c 00 00 00 00 00 00 00 30 00 00 00 00 ┆0 9 L , 0 ┆ 0x001e0…00200 00 00 00 00 4e 94 68 6f 73 74 00 00 00 00 00 00 00 00 00 9e f4 00 9d 14 00 00 00 00 00 00 00 30 ┆ N host 0┆ 0x00200…00220 00 00 00 00 00 00 00 00 4b 66 68 6f 73 74 00 00 00 00 00 00 00 00 00 ab b4 00 9d d4 00 00 00 00 ┆ Kfhost ┆ 0x00220…00240 00 00 00 80 00 00 12 08 00 1b 0c 00 00 01 00 06 f2 63 00 00 00 80 00 00 00 00 00 a1 1c 00 a7 ac ┆ c ┆ 0x00240…00260 00 00 00 00 00 00 00 80 00 00 12 08 00 1b 0c 00 00 01 00 07 cf 69 60 00 00 80 00 00 f2 4a 00 a7 ┆ i` J ┆ 0x00260…00280 f4 00 ac 8c 2c 00 04 5c 1f fe 50 1f dc 5c 10 00 53 1f de 5f 10 02 23 00 00 5f 10 04 48 80 01 53 ┆ , Ø P Ø S _ # _ H S┆ 0x00280…002a0 1f e4 5f 20 06 53 1f de 2f 3f ff 51 1f e0 5c 10 02 5f 10 04 5c 10 16 a5 60 06 34 80 0e 2d 10 18 ┆ _ S /? Q Ø _ Ø ` 4 - ┆ 0x002a0…002c0 67 20 08 5d 3f e0 2d 30 00 67 20 08 34 8f ea 51 20 08 50 1f e2 5c 1f e0 34 ce 54 01 40 00 73 75 ┆g Å? -0 g 4 Q P Ø 4 T @ su┆ 0x002c0…002e0 73 70 65 6e 64 20 00 01 60 00 72 65 6c 65 61 73 65 20 00 5f 80 12 2d 8e 52 df cf e6 51 20 08 2c ┆spend ` release _ - R Q ,┆ 0x002e0…00300 00 00 5c 10 04 51 1f fe ad 00 06 34 80 0c ad 00 07 34 80 0a a9 00 05 37 81 8e 24 0f fd 24 0f fd ┆ Ø Q 4 4 7 $ $ ┆ 0x00300…00320 00 00 00 6a 62 6e 30 00 00 00 00 00 00 00 00 70 a3 d7 0a 4f fd 04 2b f0 02 10 3e 04 00 02 02 10 ┆ jbn0 p O + > ┆ 0x00320…00340 d0 00 00 08 04 2b 15 d1 2f 75 dd 2f 27 04 1c 71 ef 12 b3 00 00 00 6a 62 6e 30 00 00 00 00 00 00 ┆ + /u /' q jbn0 ┆ 0x00340…00360 00 00 a8 f8 6f 31 50 02 04 2b f0 02 10 3e 04 00 02 02 10 e4 00 00 08 04 2b 67 c1 2f 79 dd 2f 79 ┆ o1P + > +g /y /y┆ 0x00360…00380 04 1c 71 f7 d2 b3 00 00 00 6a 62 6e 30 00 00 00 00 00 00 00 00 9c 26 77 86 50 02 04 2b f0 02 10 ┆ q jbn0 &w P + ┆ 0x00380…003a0 3e 04 00 02 02 10 e4 00 00 08 04 2b 67 c1 2f 79 dd 2f 79 04 1c 71 fc 95 e5 00 00 00 6a 62 6e 30 ┆> +g /y /y q jbn0┆ 0x003a0…003c0 00 00 00 00 00 00 00 00 70 a3 d7 0a 4f fd 04 2b f0 02 10 3e 04 00 02 02 10 d0 00 00 08 04 2b 15 ┆ p O + > + ┆ 0x003c0…003e0 d1 2f 75 dd 2f 27 04 1c 72 0a 28 b3 00 00 00 6a 62 6e 30 00 00 00 00 00 00 00 00 b7 28 6b ad 90 ┆ /u /' r ( jbn0 (k ┆ 0x003e0…00400 02 04 2b f0 02 10 3e 04 00 02 02 10 e4 00 00 08 04 2b 67 c1 2f 79 dd 2f 79 04 1c 72 0a 5f b3 00 ┆ + > +g /y /y r _ ┆ 0x00400…00420 00 00 6a 62 6e 30 00 00 00 00 00 00 00 00 8a 3e 71 7e 0f fd 04 2b f0 02 10 3e 04 00 02 02 11 f4 ┆ jbn0 >qü + > ┆ 0x00420…00440 00 00 08 04 2b 15 c1 2f 27 dd 2f 27 04 1c 72 14 0b b4 00 00 00 6a 62 6e 30 00 00 00 00 00 00 00 ┆ + /' /' r jbn0 ┆ 0x00440…00460 00 70 a3 d7 0a 4f fd 04 2b f0 02 10 3e 04 00 02 02 10 d0 00 00 08 04 2b 15 d1 2f 75 dd 2f 27 04 ┆ p O + > + /u /' ┆ 0x00460…00480 1c 72 1f 63 b3 00 00 00 6a 62 6e 30 00 00 00 00 00 00 00 00 70 a3 d7 0a 4f fd 04 2b f0 02 10 3e ┆ r c jbn0 p O + >┆ 0x00480…004a0 04 00 02 02 10 d0 00 00 08 04 2b 15 d1 2f 75 dd 2f 27 04 1c 72 28 ec ff 00 00 19 00 00 00 00 00 ┆ + /u /' r( ┆ 0x004a0…004c0 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 ┆ ┆ 0x004c0…004e0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 a4 4c 00 a3 2c 00 00 00 00 00 00 00 30 00 00 00 00 ┆ L , 0 ┆ 0x004e0…00500 00 00 00 00 4e 94 68 6f 73 74 00 00 00 00 00 00 00 00 00 9e f4 00 9d 14 00 00 00 00 00 00 00 30 ┆ N host 0┆ 0x00500…00520 00 00 00 00 00 00 00 00 4b 66 68 6f 73 74 00 00 00 00 00 00 00 00 00 ab b4 00 9d d4 00 00 00 00 ┆ Kfhost ┆ 0x00520…00540 00 00 00 80 00 00 12 08 00 1b 0c 00 00 01 00 06 f2 63 00 00 00 80 00 00 00 00 00 a1 1c 00 a7 ac ┆ c ┆ 0x00540…00560 00 00 00 00 00 00 00 80 00 00 12 08 00 1b 0c 00 00 01 00 07 cf 69 60 00 00 80 00 00 f2 4a 00 a7 ┆ i` J ┆ 0x00560…00580 f4 00 ac 8c 2c 00 04 5c 1f fe 50 1f dc 5c 10 00 53 1f de 5f 10 02 23 00 00 5f 10 04 48 80 01 53 ┆ , Ø P Ø S _ # _ H S┆ 0x00580…005a0 1f e4 5f 20 06 53 1f de 2f 3f ff 51 1f e0 5c 10 02 5f 10 04 5c 10 16 a5 60 06 34 80 0e 2d 10 18 ┆ _ S /? Q Ø _ Ø ` 4 - ┆ 0x005a0…005c0 67 20 08 5d 3f e0 2d 30 00 67 20 08 34 8f ea 51 20 08 50 1f e2 5c 1f e0 34 ce 54 01 40 00 73 75 ┆g Å? -0 g 4 Q P Ø 4 T @ su┆ 0x005c0…005e0 73 70 65 6e 64 20 00 01 60 00 72 65 6c 65 61 73 65 20 00 5f 80 12 2d 8e 52 df cf e6 51 20 08 2c ┆spend ` release _ - R Q ,┆ 0x005e0…00600 00 00 5c 10 04 51 1f fe ad 00 06 34 80 0c ad 00 07 34 80 0a a9 00 05 37 81 8e 24 0f fd 24 0f fd ┆ Ø Q 4 4 7 $ $ ┆ 0x00600…00620 05 60 00 72 65 63 33 36 30 30 31 00 00 00 00 00 52 a0 00 00 01 00 00 01 80 00 00 00 52 9a 00 00 ┆ ` rec36001 R R ┆ 0x00620…00640 00 00 00 01 00 00 00 ff ff ff 00 52 4e 04 1c 6b 03 c4 31 00 00 00 00 00 00 00 00 01 00 00 00 00 ┆ RN k 1 ┆ 0x00640…00660 43 00 00 52 7a 00 00 01 00 40 00 00 52 68 00 00 0c 00 41 80 00 52 78 00 00 01 00 41 00 00 52 14 ┆C Rz @ Rh A Rx A R ┆ 0x00660…00680 00 00 18 00 05 00 02 4b fe 00 00 02 00 40 00 05 60 00 72 65 63 33 36 30 30 31 00 00 00 00 00 52 ┆ K @ ` rec36001 R┆ 0x00680…006a0 a0 00 00 01 00 00 01 80 00 00 00 52 9a 00 00 00 00 00 01 00 00 00 00 07 ff 00 52 4e 04 1c 6b 03 ┆ R RN k ┆ 0x006a0…006c0 c7 72 00 00 00 00 00 00 00 00 01 00 00 00 00 43 00 00 52 7a 00 00 01 00 40 00 00 52 68 00 00 0c ┆ r C Rz @ Rh ┆ 0x006c0…006e0 00 41 80 00 52 78 00 00 01 00 41 00 00 52 14 00 00 18 00 05 00 02 4b fe 00 00 02 00 40 00 05 60 ┆ A Rx A R K @ `┆ 0x006e0…00700 00 72 65 63 33 36 30 30 31 00 00 00 00 00 52 a0 00 00 01 00 00 01 80 00 00 00 52 9a 00 00 00 00 ┆ rec36001 R R ┆ 0x00700…00720 00 01 00 00 00 ff ff ff 00 52 4e 04 1c 6b 07 ce c8 00 00 00 00 00 00 00 00 01 00 00 00 00 43 00 ┆ RN k C ┆ 0x00720…00740 00 52 7a 00 00 01 00 40 00 00 52 68 00 00 0c 00 41 80 00 52 78 00 00 01 00 41 00 00 52 14 00 00 ┆ Rz @ Rh A Rx A R ┆ 0x00740…00760 18 00 05 00 02 e5 bc 00 18 0c 00 40 00 05 60 00 72 65 63 33 36 30 30 31 00 00 00 00 00 52 a0 00 ┆ @ ` rec36001 R ┆ 0x00760…00780 00 01 00 00 01 80 00 00 00 52 9a 00 00 00 00 00 01 00 00 00 00 07 ff 00 52 4e 04 1c 6b 0a 86 21 ┆ R RN k !┆ 0x00780…007a0 00 00 00 00 00 00 00 00 01 00 00 00 00 43 00 00 52 7a 00 00 01 00 40 00 00 52 68 00 00 0c 00 41 ┆ C Rz @ Rh A┆ 0x007a0…007c0 80 00 52 78 00 00 01 00 41 00 00 52 14 00 00 18 00 05 00 02 4b fe 00 00 0f 00 40 00 05 60 00 72 ┆ Rx A R K @ ` r┆ 0x007c0…007e0 65 63 33 36 30 30 31 00 00 00 00 00 52 a0 00 00 01 00 00 01 80 00 00 00 52 9a 00 00 00 00 00 01 ┆ec36001 R R ┆ 0x007e0…00800 00 00 00 00 07 ff 00 52 4e 04 1c 6b 0b 77 7b 00 00 00 00 00 00 00 00 01 00 00 00 00 43 00 00 52 ┆ RN k wæ C R┆ 0x00800…00820 7a 00 00 01 00 40 00 00 52 68 00 00 0c 00 41 80 00 52 78 00 00 01 00 41 00 00 52 14 00 00 18 00 ┆z @ Rh A Rx A R ┆ 0x00820…00840 05 00 02 4b fe 00 00 03 00 40 00 05 60 00 72 65 63 33 36 30 30 31 00 00 00 00 00 52 a0 00 00 01 ┆ K @ ` rec36001 R ┆ 0x00840…00860 00 00 01 80 00 00 00 52 9a 00 00 00 00 00 01 00 00 00 ff ff ff 00 52 4e 04 1c 6b 0b 94 c5 00 00 ┆ R RN k ┆ 0x00860…00880 00 00 00 00 00 00 01 00 00 00 00 43 00 00 52 7a 00 00 01 00 40 00 00 52 68 00 00 0c 00 41 80 00 ┆ C Rz @ Rh A ┆ 0x00880…008a0 52 78 00 00 01 00 41 00 00 52 14 00 00 18 00 05 00 02 4b fe 00 00 03 00 40 00 00 52 70 2d 10 18 ┆Rx A R K @ Rp- ┆ 0x008a0…008c0 67 20 08 5d 3f e0 2d 30 00 67 20 08 34 8f ea 51 20 08 50 1f e2 5c 1f e0 34 ce 54 01 40 00 73 75 ┆g Å? -0 g 4 Q P Ø 4 T @ su┆ 0x008c0…008e0 73 70 65 6e 64 20 00 01 60 00 72 65 6c 65 61 73 65 20 00 5f 80 12 2d 8e 52 df cf e6 51 20 08 2c ┆spend ` release _ - R Q ,┆ 0x008e0…00900 00 00 5c 10 04 51 1f fe ad 00 06 34 80 0c ad 00 07 34 80 0a a9 00 05 37 81 8e 24 0f fd 24 0f fd ┆ Ø Q 4 4 7 $ $ ┆ 0x00900…00920 (1,) 63 6b 20 77 69 74 68 69 6e 28 61 64 64 72 65 73 73 2c 20 74 6f 70 20 72 65 67 64 75 6d 70 29 3b ┆ck within(address, top regdump);┆ 0x00920…00940 0a 0a 20 20 20 20 20 72 6c 20 20 77 33 20 20 78 31 2b 61 32 37 20 20 20 20 3b 0a 20 20 20 20 20 ┆ rl w3 x1+a27 ; ┆ 0x00940…00960 73 6e 20 20 77 33 20 28 78 31 2b 61 31 37 30 29 20 20 3b 20 20 20 20 69 66 20 6f 6c 64 20 69 6e ┆sn w3 (x1+a170) ; if old in┆ 0x00960…00980 74 61 64 64 72 20 3d 20 6f 6c 64 20 65 73 63 61 70 65 20 61 64 64 72 65 73 73 20 74 68 65 6e 0a ┆taddr = old escape address then ┆ 0x00980…009a0 20 20 20 20 20 72 73 20 20 77 32 20 20 78 31 2b 61 31 37 30 20 20 20 3b 20 20 20 20 20 20 65 73 ┆ rs w2 x1+a170 ; es┆ 0x009a0…009c0 63 61 70 65 20 61 64 64 72 65 73 73 20 3a 3d 20 61 64 64 72 65 73 73 3b 0a 0a 20 20 20 20 20 72 ┆cape address := address; r┆ 0x009c0…009e0 6c 20 20 77 30 20 20 78 31 2b 61 31 37 36 20 20 20 3b 0a 20 20 20 20 20 73 65 20 20 77 30 20 20 ┆l w0 x1+a176 ; se w0 ┆ 0x009e0…00a00 20 20 20 30 20 20 20 20 20 20 3b 20 20 20 20 69 66 20 6d 6f 6e 69 74 6f 72 20 66 75 6e 63 74 69 ┆ 0 ; if monitor functi┆ 0x00a00…00a20 6f 6e 20 3c 3e 20 73 65 74 20 69 6e 74 65 72 72 75 70 74 20 61 64 64 72 65 73 73 20 74 68 65 6e ┆on <> set interrupt address then┆ 0x00a20…00a40 0a 20 20 20 20 20 61 6d 20 20 20 20 20 20 20 20 20 61 31 37 30 2d 61 32 37 3b 20 20 20 20 20 20 ┆ am a170-a27; ┆ 0x00a40…00a60 65 73 63 61 70 65 20 61 64 64 72 65 73 73 20 3a 3d 20 61 64 64 72 65 73 73 0a 20 20 20 20 20 72 ┆escape address := address r┆ 0x00a60…00a80 73 20 20 77 32 20 20 78 31 2b 61 32 37 20 20 20 20 3b 20 20 20 20 65 6c 73 65 20 69 6e 74 61 64 ┆s w2 x1+a27 ; else intad┆ 0x00a80…00aa0 64 72 20 3a 3d 20 61 64 64 72 65 73 73 3b 0a 0a 20 20 20 20 20 73 65 20 20 77 30 20 20 20 20 20 ┆dr := address; se w0 ┆ 0x00aa0…00ac0 30 20 20 20 20 20 20 3b 0a 20 20 20 20 20 61 6d 20 20 20 20 20 20 20 20 20 34 20 20 20 20 20 20 ┆0 ; am 4 ┆ 0x00ac0…00ae0 3b 20 20 0a 20 20 20 20 20 64 6c 2e 20 77 33 20 20 20 20 20 69 31 2e 20 20 20 20 3b 0a 20 20 20 ┆; dl. w3 i1. ; ┆ 0x00ae0…00b00 20 20 6c 61 20 20 77 32 20 20 78 31 2b 61 32 38 20 20 20 20 3b 20 20 20 20 6d 61 73 6b 20 3a 3d ┆ la w2 x1+a28 ; mask :=┆ 0x00b00…00b20 20 73 61 76 65 20 77 30 28 63 75 72 29 20 65 78 74 72 61 63 74 20 72 65 6c 65 76 61 6e 74 20 62 ┆ save w0(cur) extract relevant b┆ 0x00b20…00b40 69 74 73 3b 0a 20 20 20 20 20 6c 61 20 20 77 33 20 20 78 31 2b 61 33 32 20 20 20 20 3b 20 20 20 ┆its; la w3 x1+a32 ; ┆ 0x00b40…00b60 20 73 74 61 74 75 73 20 3a 3d 20 73 74 61 74 75 73 28 63 75 72 29 20 72 65 6d 6f 76 65 20 74 68 ┆ status := status(cur) remove th┆ 0x00b60…00b80 65 20 63 6f 72 72 65 73 70 6f 6e 64 69 6e 67 20 62 69 74 73 3b 0a 20 20 20 20 20 73 6e 20 20 77 ┆e corresponding bits; sn w┆ 0x00b80…00ba0 30 20 20 20 20 20 30 20 20 20 20 20 20 3b 0a 20 20 20 20 20 6c 73 20 20 77 32 20 20 20 20 2d 33 ┆0 0 ; ls w2 -3┆ 0x00ba0…00bc0 20 20 20 20 20 20 3b 20 20 20 20 28 69 66 20 73 65 74 20 69 6e 74 61 64 64 72 20 74 68 65 6e 20 ┆ ; (if set intaddr then ┆ 0x00bc0…00be0 6f 6c 64 66 61 73 68 69 6f 6e 65 64 20 72 63 34 30 30 30 20 73 74 79 6c 65 29 0a 20 20 20 20 20 ┆oldfashioned rc4000 style) ┆ 0x00be0…00c00 6c 6f 20 20 77 32 20 20 20 20 20 36 20 20 20 20 20 20 3b 20 20 20 20 73 74 61 74 75 73 28 63 75 ┆lo w2 6 ; status(cu┆ 0x00c00…00c20 72 29 20 3a 3d 20 73 74 61 74 75 73 20 27 6f 72 27 20 6d 61 73 6b 3b 0a 20 20 20 20 20 72 73 20 ┆r) := status 'or' mask; rs ┆ 0x00c20…00c40 20 77 32 20 20 78 31 2b 61 33 32 20 20 20 20 3b 0a 20 20 20 20 20 67 67 20 20 77 33 20 20 20 20 ┆ w2 x1+a32 ; gg w3 ┆ 0x00c40…00c60 20 62 39 31 20 20 20 20 3b 20 20 20 20 6d 6f 76 65 3a 20 75 73 65 72 20 65 78 63 65 70 74 69 6f ┆ b91 ; move: user exceptio┆ 0x00c60…00c80 6e 20 61 64 64 72 65 73 73 28 63 75 72 29 0a 20 20 20 20 20 64 6c 20 20 77 31 20 20 78 31 2b 61 ┆n address(cur) dl w1 x1+a┆ 0x00c80…00ca0 31 37 30 20 20 20 3b 20 20 20 20 20 20 20 20 20 20 75 73 65 72 20 65 73 63 61 70 65 20 20 20 20 ┆170 ; user escape ┆ 0x00ca0…00cc0 61 64 64 72 65 73 73 28 63 75 72 29 0a 20 20 20 20 20 64 73 20 20 77 31 20 20 78 33 2b 61 33 32 ┆address(cur) ds w1 x3+a32┆ 0x00cc0…00ce0 35 2b 61 33 32 38 3b 20 20 20 20 74 6f 3a 20 70 72 65 76 69 6f 75 73 20 69 6e 74 65 72 72 75 70 ┆5+a328; to: previous interrup┆ 0x00ce0…00d00 74 20 73 74 61 63 6b 20 65 6c 65 6d 65 6e 74 3b 0a 20 20 20 20 20 6a 6c 20 20 20 20 20 20 20 20 ┆t stack element; jl ┆ 0x00d00…00d20 20 63 39 39 20 20 20 20 3b 20 20 20 20 67 6f 74 6f 20 69 6e 74 65 72 72 75 70 74 20 72 65 74 75 ┆ c99 ; goto interrupt retu┆ 0x00d20…00d40 72 6e 3b 0a 0a 20 20 20 20 20 38 2e 33 30 30 30 20 30 30 30 30 20 20 20 20 20 20 20 3b 20 69 31 ┆rn; 8.3000 0000 ; i1┆ 0x00d40…00d60 2d 32 3a 20 65 78 74 72 61 63 74 20 61 72 69 74 6d 65 74 69 63 20 62 69 74 73 20 28 6e 62 3a 20 ┆-2: extract aritmetic bits (nb: ┆ 0x00d60…00d80 6f 6c 64 66 61 73 68 69 6f 6e 65 64 20 72 63 34 30 30 30 2d 77 61 79 29 0a 69 31 3a 20 20 38 2e ┆oldfashioned rc4000-way) i1: 8.┆ 0x00d80…00da0 37 34 37 37 20 37 37 37 37 20 20 20 20 20 20 20 3b 20 20 20 20 20 3a 20 72 65 6d 6f 76 65 20 20 ┆7477 7777 ; : remove ┆ 0x00da0…00dc0 20 20 20 20 2d 20 20 20 20 20 20 2d 0a 20 20 20 20 20 38 2e 32 34 37 37 20 30 30 30 30 20 20 20 ┆ - - 8.2477 0000 ┆ 0x00dc0…00de0 20 20 20 20 3b 20 69 31 2b 32 3a 20 65 78 74 72 61 63 74 20 65 73 63 61 70 65 20 62 69 74 73 0a ┆ ; i1+2: extract escape bits ┆ 0x00de0…00e00 20 20 20 20 20 38 2e 35 33 30 30 20 37 37 37 37 20 20 20 20 20 20 20 3b 20 69 31 2b 34 3a 20 72 ┆ 8.5300 7777 ; i1+4: r┆ 0x00e00…00e20 65 6d 6f 76 65 20 20 20 20 2d 20 20 20 20 20 2d 0a 0a 65 2e 0a 0a 3b 20 70 72 6f 63 65 64 75 72 ┆emove - - e. ; procedur┆ 0x00e20…00e40 65 20 70 72 6f 63 65 73 73 20 64 65 73 63 72 69 70 74 69 6f 6e 28 6e 61 6d 65 2c 20 72 65 73 75 ┆e process description(name, resu┆ 0x00e40…00e60 6c 74 29 3b 0a 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 63 61 6c 6c 3a 20 20 72 65 74 75 72 6e ┆lt); ; call: return┆ 0x00e60…00e80 3a 0a 3b 20 73 61 76 65 20 77 30 20 20 20 20 20 20 20 20 20 20 20 20 72 65 73 75 6c 74 20 28 3d ┆: ; save w0 result (=┆ 0x00e80…00ea0 30 2c 20 70 72 6f 63 20 64 65 73 63 72 20 61 64 64 72 29 0a 3b 20 73 61 76 65 20 77 31 0a 3b 20 ┆0, proc descr addr) ; save w1 ; ┆ 0x00ea0…00ec0 73 61 76 65 20 77 32 0a 3b 20 73 61 76 65 20 77 33 20 20 20 20 20 6e 61 6d 65 0a 0a 62 2e 20 69 ┆save w2 ; save w3 name b. i┆ 0x00ec0…00ee0 30 20 77 2e 0a 65 32 3a 20 20 6a 6c 20 20 77 33 20 20 20 20 20 64 31 30 31 20 20 20 3b 20 20 20 ┆0 w. e2: jl w3 d101 ; ┆ 0x00ee0…00f00 20 63 68 65 63 6b 20 61 6e 64 20 73 65 61 72 63 68 20 6e 61 6d 65 0a 20 20 20 20 20 61 6c 2e 20 ┆ check and search name al. ┆ 0x00f00…00f20 77 33 20 20 20 20 20 69 30 2e 20 20 20 20 3b 2b 32 20 20 6e 6f 74 20 66 6f 75 6e 64 3a 20 77 33 ┆w3 i0. ;+2 not found: w3┆ 0x00f20…00f40 3a 3d 7a 65 72 6f 20 61 64 64 72 65 73 73 0a 20 20 20 20 20 72 6c 20 20 77 30 20 20 78 33 20 20 ┆:=zero address rl w0 x3 ┆ 0x00f40…00f60 20 20 20 20 20 20 3b 20 20 20 20 72 65 73 75 6c 74 20 3a 3d 20 70 72 6f 63 20 64 65 73 63 72 3b ┆ ; result := proc descr;┆ 0x00f60…00f80 20 20 0a 20 20 20 20 20 6a 6c 20 20 20 20 20 20 20 20 20 72 32 38 20 20 20 20 3b 20 20 20 20 67 ┆ jl r28 ; g┆ 0x00f80…00fa0 6f 74 6f 20 72 65 74 75 72 6e 20 70 72 65 70 61 72 65 64 20 72 65 73 75 6c 74 3b 0a 69 30 3a 20 ┆oto return prepared result; i0: ┆ 0x00fa0…00fc0 30 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3b 0a 65 2e 0a 0a 3b 20 70 72 6f 63 65 ┆0 ; e. ; proce┆ 0x00fc0…00fe0 64 75 72 65 20 69 6e 69 74 69 61 6c 69 7a 65 20 70 72 6f 63 65 73 73 28 6e 61 6d 65 2c 20 72 65 ┆dure initialize process(name, re┆ 0x00fe0…01000 73 75 6c 74 29 3b 0a 3b 20 20 20 20 2d 20 20 20 20 20 20 72 65 73 65 72 76 65 20 20 20 20 20 20 ┆sult); ; - reserve ┆ 0x01000…01020 20 2d 20 20 20 28 20 2d 20 20 2c 20 20 20 2d 20 20 20 29 3b 0a 3b 20 20 20 20 20 20 20 20 20 20 ┆ - ( - , - ); ; ┆ 0x01020…01040 20 20 20 20 63 61 6c 6c 3a 20 20 20 72 65 74 75 72 6e 3a 0a 3b 20 73 61 76 65 20 77 30 20 20 20 ┆ call: return: ; save w0 ┆ 0x01040…01060 20 20 20 20 20 20 20 20 20 20 20 72 65 73 75 6c 74 20 28 3d 30 2c 20 31 2c 20 32 2c 20 33 29 0a ┆ result (=0, 1, 2, 3) ┆ 0x01060…01080 3b 20 73 61 76 65 20 77 31 20 20 20 20 20 20 20 20 20 20 20 20 20 20 75 6e 63 68 61 6e 67 65 64 ┆; save w1 unchanged┆ 0x01080…010a0 0a 3b 20 73 61 76 65 20 77 32 20 20 20 20 20 20 20 20 20 20 20 20 20 20 75 6e 63 68 61 6e 67 65 ┆ ; save w2 unchange┆ 0x010a0…010c0 64 0a 3b 20 73 61 76 65 20 77 33 20 20 20 20 20 20 6e 61 6d 65 20 20 20 20 75 6e 63 68 61 6e 67 ┆d ; save w3 name unchang┆ 0x010c0…010e0 65 64 0a 0a 65 33 3a 20 20 61 6d 20 20 20 20 20 20 20 20 20 30 2d 32 20 20 20 20 3b 20 69 6e 69 ┆ed e3: am 0-2 ; ini┆ 0x010e0…01100 74 69 61 6c 69 7a 65 3a 0a 65 34 3a 20 20 61 6c 20 20 77 30 20 20 20 20 20 32 20 20 20 20 20 20 ┆tialize: e4: al w0 2 ┆ 0x01100…01120 3b 20 72 65 73 65 72 76 65 3a 20 70 72 65 70 61 72 65 20 72 65 73 75 6c 74 2c 20 69 6e 20 63 61 ┆; reserve: prepare result, in ca┆ 0x01120…01140 73 65 20 6f 66 20 69 6e 74 65 72 6e 61 6c 20 70 72 6f 63 3b 0a 20 20 20 20 20 6a 6c 20 20 77 33 ┆se of internal proc; jl w3┆ 0x01140…01160 20 20 20 20 20 64 31 30 31 20 20 20 3b 20 20 20 20 63 68 65 63 6b 20 61 6e 64 20 73 65 61 72 63 ┆ d101 ; check and searc┆ 0x01160…01180 68 20 6e 61 6d 65 3b 0a 20 20 20 20 20 6a 6c 20 20 20 20 20 20 20 20 20 72 33 20 20 20 20 20 3b ┆h name; jl r3 ;┆ 0x01180…011a0 2b 32 20 20 6e 6f 74 20 66 6f 75 6e 64 3a 20 67 6f 74 6f 20 72 65 73 75 6c 74 20 33 3b 0a 20 20 ┆+2 not found: goto result 3; ┆ 0x011a0…011c0 20 20 20 72 6c 20 20 77 32 20 20 78 33 20 20 20 20 20 20 20 20 3b 2b 34 20 20 70 72 6f 63 3a 3d ┆ rl w2 x3 ;+4 proc:=┆ 0x011c0…011e0 6e 61 6d 65 20 74 61 62 6c 65 28 65 6e 74 72 79 29 0a 20 20 20 20 20 72 6c 20 20 77 33 20 20 78 ┆name table(entry) rl w3 x┆ 0x011e0…01200 32 2b 61 31 30 20 20 20 20 3b 20 20 20 20 69 66 20 6b 69 6e 64 28 70 72 6f 63 29 20 6e 65 69 74 ┆2+a10 ; if kind(proc) neit┆ 0x01200…01220 (2,) 68 65 72 20 69 6e 74 65 72 6e 61 6c 20 70 72 6f 63 65 73 73 0a 20 20 20 20 20 73 7a 20 20 77 33 ┆her internal process sz w3┆ 0x01220…01240 20 20 2d 31 2d 36 34 20 20 20 20 20 3b 20 20 20 20 20 20 6e 6f 72 20 70 73 65 75 64 6f 20 70 72 ┆ -1-64 ; nor pseudo pr┆ 0x01240…01260 6f 63 65 73 73 20 74 68 65 6e 0a 20 20 20 20 20 6a 6c 2e 20 20 20 20 20 20 20 20 64 31 30 30 2e ┆ocess then jl. d100.┆ 0x01260…01280 20 20 3b 20 20 20 20 20 20 64 65 6c 69 76 65 72 20 67 65 6e 65 72 61 6c 20 65 76 65 6e 74 20 28 ┆ ; deliver general event (┆ 0x01280…012a0 77 30 3d 73 77 69 74 63 68 2c 20 77 31 3d 63 75 72 2c 20 77 32 3d 70 72 6f 63 29 0a 20 20 20 20 ┆w0=switch, w1=cur, w2=proc) ┆ 0x012a0…012c0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3b 20 20 20 20 20 20 61 6e 64 20 67 6f ┆ ; and go┆ 0x012c0…012e0 74 6f 20 69 6e 74 65 72 72 75 70 74 20 72 65 74 75 72 6e 3b 0a 20 20 20 20 20 6a 6c 20 20 20 20 ┆to interrupt return; jl ┆ 0x012e0…01300 20 20 20 20 20 72 32 38 20 20 20 20 3b 20 20 20 20 67 6f 74 6f 20 72 65 74 75 72 6e 20 70 72 65 ┆ r28 ; goto return pre┆ 0x01300…01320 70 61 72 65 64 20 72 65 73 75 6c 74 3b 0a 0a 3b 20 70 72 6f 63 65 64 75 72 65 20 72 65 6c 65 61 ┆pared result; ; procedure relea┆ 0x01320…01340 73 65 20 70 72 6f 63 65 73 73 20 28 6e 61 6d 65 29 3b 0a 3b 20 20 20 20 20 20 20 20 20 20 20 20 ┆se process (name); ; ┆ 0x01340…01360 63 61 6c 6c 3a 20 20 72 65 74 75 72 6e 3a 0a 3b 20 73 61 76 65 20 77 30 20 20 20 20 20 20 20 20 ┆call: return: ; save w0 ┆ 0x01360…01380 20 20 20 75 6e 63 68 61 6e 67 65 64 0a 3b 20 73 61 76 65 20 77 31 20 20 20 20 20 20 20 20 20 20 ┆ unchanged ; save w1 ┆ 0x01380…013a0 20 75 6e 63 68 61 6e 67 65 64 0a 3b 20 73 61 76 65 20 77 32 20 20 20 20 20 20 20 20 20 20 20 75 ┆ unchanged ; save w2 u┆ 0x013a0…013c0 6e 63 68 61 6e 67 65 64 0a 3b 20 73 61 76 65 20 77 33 20 20 20 20 6e 61 6d 65 20 20 20 75 6e 63 ┆nchanged ; save w3 name unc┆ 0x013c0…013e0 68 61 6e 67 65 64 0a 0a 65 35 3a 20 20 6a 6c 20 20 77 33 20 20 20 20 20 64 31 30 31 20 20 20 3b ┆hanged e5: jl w3 d101 ;┆ 0x013e0…01400 20 20 20 20 63 68 65 63 6b 20 61 6e 64 20 73 65 61 72 63 68 20 6e 61 6d 65 3b 0a 20 20 20 20 20 ┆ check and search name; ┆ 0x01400…01420 6a 6c 20 20 20 20 20 20 20 20 20 63 39 39 20 20 20 20 3b 2b 32 20 20 6e 6f 74 20 66 6f 75 6e 64 ┆jl c99 ;+2 not found┆ 0x01420…01440 3a 20 67 6f 74 6f 20 69 6e 74 65 72 72 75 70 74 20 72 65 74 75 72 6e 3b 0a 20 20 20 20 20 72 6c ┆: goto interrupt return; rl┆ 0x01440…01460 20 20 77 32 20 20 78 33 20 20 20 20 20 20 20 20 3b 2b 34 20 20 70 72 6f 63 3a 3d 6e 61 6d 65 20 ┆ w2 x3 ;+4 proc:=name ┆ 0x01460…01480 74 61 62 6c 65 28 65 6e 74 72 79 29 3b 0a 20 20 20 20 20 61 6c 20 20 77 30 20 20 20 20 20 34 20 ┆table(entry); al w0 4 ┆ 0x01480…014a0 20 20 20 20 20 3b 20 20 20 20 73 77 69 74 63 68 3a 3d 34 3b 0a 20 20 20 20 20 72 6c 20 20 77 33 ┆ ; switch:=4; rl w3┆ 0x014a0…014c0 20 20 78 32 2b 61 31 30 20 20 20 20 3b 20 20 20 20 69 66 20 6b 69 6e 64 28 70 72 6f 63 29 20 6e ┆ x2+a10 ; if kind(proc) n┆ 0x014c0…014e0 65 69 74 68 65 72 20 69 6e 74 65 72 6e 61 6c 20 70 72 6f 63 65 73 73 0a 20 20 20 20 20 73 7a 20 ┆either internal process sz ┆ 0x014e0…01500 20 77 33 20 20 2d 31 2d 36 34 20 20 20 20 20 3b 20 20 20 20 20 20 6e 6f 72 20 70 73 65 75 64 6f ┆ w3 -1-64 ; nor pseudo┆ 0x01500…01520 20 70 72 6f 63 65 73 73 20 74 68 65 6e 0a 20 20 20 20 20 6a 6c 2e 20 20 20 20 20 20 20 20 64 31 ┆ process then jl. d1┆ 0x01520…01540 30 30 2e 20 20 3b 20 20 20 20 20 20 64 65 6c 69 76 65 72 20 67 65 6e 65 72 65 6c 20 65 76 65 6e ┆00. ; deliver generel even┆ 0x01540…01560 74 20 28 77 30 3d 73 77 69 74 63 68 2c 20 77 31 3d 63 75 72 2c 20 77 32 3d 70 72 6f 63 29 0a 20 ┆t (w0=switch, w1=cur, w2=proc) ┆ 0x01560…01580 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3b 20 20 20 20 20 20 61 6e 64 ┆ ; and┆ 0x01580…015a0 20 67 6f 74 6f 20 69 6e 74 65 72 72 75 70 74 20 72 65 74 75 72 6e 3b 0a 20 20 20 20 20 6a 6c 20 ┆ goto interrupt return; jl ┆ 0x015a0…015c0 20 20 20 20 20 20 20 20 63 39 39 20 20 20 20 3b 20 20 20 20 67 6f 74 6f 20 69 6e 74 65 72 72 75 ┆ c99 ; goto interru┆ 0x015c0…015e0 70 74 20 72 65 74 75 72 6e 3b 0a 0a 3b 20 70 72 6f 63 65 64 75 72 65 20 69 6e 63 6c 75 64 65 20 ┆pt return; ; procedure include ┆ 0x015e0…01600 75 73 65 72 28 6e 61 6d 65 2c 20 64 65 76 69 63 65 2c 20 72 65 73 75 6c 74 29 3b 0a 3b 20 20 20 ┆user(name, device, result); ; ┆ 0x01600…01620 20 20 2d 20 20 20 20 20 65 78 63 6c 75 64 65 20 20 2d 20 20 28 20 2d 20 20 2c 20 20 20 2d 20 20 ┆ - exclude - ( - , - ┆ 0x01620…01640 20 2c 20 20 20 2d 20 20 20 29 3b 0a 3b 20 20 20 20 20 20 20 20 20 20 20 20 63 61 6c 6c 3a 20 20 ┆ , - ); ; call: ┆ 0x01640…01660 20 72 65 74 75 72 6e 3a 0a 3b 20 73 61 76 65 20 77 30 20 20 20 20 20 20 20 20 20 20 20 20 72 65 ┆ return: ; save w0 re┆ 0x01660…01680 73 75 6c 74 20 28 3d 30 2c 20 32 2c 20 33 2c 20 34 29 0a 3b 20 73 61 76 65 20 77 31 20 20 20 20 ┆sult (=0, 2, 3, 4) ; save w1 ┆ 0x01680…016a0 64 65 76 69 63 65 20 20 75 6e 63 68 61 6e 67 65 64 0a 3b 20 73 61 76 65 20 77 32 20 20 20 20 20 ┆device unchanged ; save w2 ┆ 0x016a0…016c0 20 20 20 20 20 20 20 75 6e 63 68 61 6e 67 65 64 0a 3b 20 73 61 76 65 20 77 33 20 20 20 20 6e 61 ┆ unchanged ; save w3 na┆ 0x016c0…016e0 6d 65 20 20 20 20 75 6e 63 68 61 6e 67 65 64 0a 0a 62 2e 20 69 30 20 77 2e 0a 65 36 3a 20 20 61 ┆me unchanged b. i0 w. e6: a┆ 0x016e0…01700 6d 20 20 20 20 20 20 20 20 20 64 31 32 36 2d 64 31 32 33 3b 20 69 6e 63 6c 75 64 65 3a 20 73 77 ┆m d126-d123; include: sw┆ 0x01700…01720 69 74 63 68 20 3a 3d 20 69 6e 73 65 72 74 20 75 73 65 72 3b 0a 65 37 3a 20 20 61 6c 20 20 77 30 ┆itch := insert user; e7: al w0┆ 0x01720…01740 20 20 20 20 20 64 31 32 33 20 20 20 20 20 3b 20 65 78 63 6c 75 64 65 3a 20 73 77 69 74 63 68 20 ┆ d123 ; exclude: switch ┆ 0x01740…01760 3a 3d 20 72 65 6d 6f 76 65 20 75 73 65 72 3b 0a 20 20 20 20 20 72 73 2e 20 77 30 20 20 20 20 20 ┆:= remove user; rs. w0 ┆ 0x01760…01780 69 30 2e 20 20 20 20 3b 20 20 20 20 73 61 76 65 28 73 77 69 74 63 68 29 3b 0a 20 20 20 20 20 6a ┆i0. ; save(switch); j┆ 0x01780…017a0 6c 20 20 77 33 20 20 20 20 20 64 31 30 31 20 20 20 3b 20 20 20 20 63 68 65 63 6b 20 61 6e 64 20 ┆l w3 d101 ; check and ┆ 0x017a0…017c0 73 65 61 72 63 68 20 6e 61 6d 65 3b 0a 20 20 20 20 20 6a 6c 20 20 20 20 20 20 20 20 20 72 33 20 ┆search name; jl r3 ┆ 0x017c0…017e0 20 20 20 20 3b 2b 32 20 20 6e 6f 74 20 66 6f 75 6e 64 3a 20 67 6f 74 6f 20 72 65 73 75 6c 74 33 ┆ ;+2 not found: goto result3┆ 0x017e0…01800 3b 0a 20 20 20 20 20 72 6c 20 20 77 32 20 20 78 33 20 20 20 20 20 20 20 20 3b 2b 34 20 20 63 68 ┆; rl w2 x3 ;+4 ch┆ 0x01800…01820 69 6c 64 3a 3d 6e 61 6d 65 20 74 61 62 6c 65 28 65 6e 74 72 79 29 3b 0a 20 20 20 20 20 72 73 20 ┆ild:=name table(entry); rs ┆ 0x01820…01840 20 77 32 20 20 78 31 2b 61 32 38 20 20 20 20 3b 20 20 20 20 73 61 76 65 20 77 30 28 63 75 72 29 ┆ w2 x1+a28 ; save w0(cur)┆ 0x01840…01860 20 3a 3d 20 63 68 69 6c 64 3b 0a 20 20 20 20 20 72 6c 20 20 77 33 20 20 78 32 2b 61 31 30 20 20 ┆ := child; rl w3 x2+a10 ┆ 0x01860…01880 20 20 3b 20 20 20 20 77 33 3a 3d 6b 69 6e 64 28 63 68 69 6c 64 29 3b 0a 20 20 20 20 20 73 6e 20 ┆ ; w3:=kind(child); sn ┆ 0x01880…018a0 20 77 33 20 20 20 20 20 30 20 20 20 20 20 20 3b 20 20 20 20 69 66 20 6b 69 6e 64 3c 3e 30 20 6f ┆ w3 0 ; if kind<>0 o┆ 0x018a0…018c0 72 0a 20 20 20 20 20 73 65 20 20 77 31 20 28 78 32 2b 61 33 34 29 20 20 20 3b 20 20 20 20 20 20 ┆r se w1 (x2+a34) ; ┆ 0x018c0…018e0 20 63 75 72 3c 3e 70 61 72 65 6e 74 28 63 68 69 6c 64 29 20 74 68 65 6e 0a 20 20 20 20 20 6a 6c ┆ cur<>parent(child) then jl┆ 0x018e0…01900 20 20 20 20 20 20 20 20 20 72 33 20 20 20 20 20 3b 20 20 20 20 67 6f 74 6f 20 72 65 73 75 6c 74 ┆ r3 ; goto result┆ 0x01900…01920 20 33 3b 0a 20 20 20 20 20 72 6c 20 20 77 33 20 20 78 31 2b 61 32 39 20 20 20 20 3b 20 20 20 20 ┆ 3; rl w3 x1+a29 ; ┆ […truncated at 200 lines…]