|
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: 21504 (0x5400)
Types: Rc489kSubCat
Names: »bzmodel«
└─⟦621cfb9a2⟧ Bits:30002817 RC8000 Dump tape fra HCØ. Detaljer om "HC8000" projekt.
└─⟦0364f57e3⟧
└─⟦this⟧ »bzmodel«
└─⟦667bb35d6⟧ Bits:30007480 RC8000 Dump tape fra HCØ.
└─⟦4334b4c0b⟧
└─⟦this⟧ »bzmodel«
0x0000…0033 (0,) Rc489kSubCatEnt {f00=0x001dfb, f01=0x007530, f02=0x007539, filename=»cho «, entry_tail=0-4-0-1-1979-12-07T13:51-disc-0x0-0x0-0x0-0x0}
0x0033…0066 Rc489kSubCatEnt {f00=0x002a3b, f01=0x007530, f02=0x007539, filename=»cho2txt «, entry_tail=0-4-0-3-1979-11-26T14:48-disc-0x0-0x0-0x0-0x0}
0x0066…0099 Rc489kSubCatEnt {f00=0x00505b, f01=0x007530, f02=0x007539, filename=»cho3txt «, entry_tail=0-4-0-4-1979-12-07T11:00-disc-0x0-0x0-0x0-0x0}
0x0099…00cc Rc489kSubCatEnt {f00=0x009bd3, f01=0x007530, f02=0x007539, filename=»cho4 «, entry_tail=0-4-0-1-1980-01-16T14:10-disc-0x0-0x0-0x0-0x0}
0x00cc…00ff Rc489kSubCatEnt {f00=0x00a613, f01=0x007530, f02=0x007539, filename=»cho4txt «, entry_tail=0-4-0-5-1980-01-14T18:20-disc-0x0-0x0-0x0-0x0}
0x00ff…0132 Rc489kSubCatEnt {f00=0x00fbcb, f01=0x007530, f02=0x007539, filename=»cho5txt «, entry_tail=0-4-0-5-1980-01-16T13:49-disc-0x0-0x0-0x0-0x0}
0x0132…0165 Rc489kSubCatEnt {f00=0x0140a3, f01=0x007530, f02=0x007539, filename=»chotxt «, entry_tail=0-4-0-3-1979-11-26T10:28-disc-0x0-0x0-0x0-0x0}
0x0165…0198 Rc489kSubCatEnt {f00=0x017483, f01=0x007530, f02=0x007539, filename=»cho1txt «, entry_tail=0-4-0-2-1979-11-23T11:16-disc-0x0-0x0-0x0-0x0}
0x0198…01a0 dc 10 11 53 ce 8e 52 2f ┆ S R/┆
0x01a0…01c0 fc 34 30 34 53 ce 7e 51 2f d5 a9 00 00 34 30 e8 2d 0f da 37 ce 76 5e 10 00 50 8e a5 53 8e 6c dc ┆ 404S üQ/ 40 - 7 v^ P S l ┆
0x01c0…01e0 10 05 2c ce 72 53 8e 9b dc 10 09 d8 8e 95 dc 10 19 2c 10 19 2f 00 1a dc 10 0d 51 2f b3 5d 2f 59 ┆ , rS , / Q/ Å/Y┆
0x01e0…0200 50 2f a1 1c 00 02 51 ce 58 dc 10 1d 2f 10 21 2c 3f fc 53 8e 79 dc 10 11 d8 2f a5 23 2f 59 20 2f ┆P/ Q X / !,? S y / #/Y /┆
0x0200…0220 59 67 00 00 2f 30 03 93 0f fe 93 00 02 67 00 00 dc 10 21 d8 8e 61 dc 10 25 2c 10 25 2f 00 1a dc ┆Yg /0 g ! a %, %/ ┆
0x0220…0240 10 15 53 ce 2e 52 2f fc 34 30 30 2d 0f f6 37 ce 24 5e 10 00 50 8e 49 53 8e 1c dc 10 05 50 8e 41 ┆ S .R/ 400- 7 $^ P IS P A┆
0x0240…0260 2f 20 00 9b 00 04 2f 30 0a dc 10 09 53 ce 0e 34 30 4c 06 e8 00 00 88 02 00 02 40 0c 01 02 01 6b ┆/ /0 S 40L @ k┆
0x0260…0280 18 01 6b 1a 01 68 94 01 6b 00 01 6a 7a 01 62 f8 01 6b 1c 01 6b 3e 01 6b 50 01 6b 58 01 6b 44 01 ┆ k h k jz b k k> kP kX kD ┆
0x0280…02a0 5e 54 01 71 c6 01 70 2d 00 00 00 00 00 01 01 40 6a 61 6d 65 00 00 00 20 6b 69 74 20 6e 2a 2a 64 ┆^T q p- @jame kit n**d┆
0x02a0…02c0 69 73 63 00 40 13 00 30 00 01 81 d2 00 00 08 00 00 64 69 73 63 00 00 00 00 00 00 64 69 73 63 00 ┆isc @ 0 disc disc ┆
0x02c0…02e0 00 00 df ff 00 60 17 00 c0 e8 00 00 22 00 c0 be 01 c0 9c 53 cf c6 34 30 22 34 80 4a 2d 0f de 37 ┆ ` " S 40"4 J- 7┆
0x02e0…02fd cf ae 5e 10 00 50 8f f3 53 8f a4 dc 10 05 2c cf b6 53 8f e3 dc 10 09 51 2f e5 99 0f fd ┆ ^ P S , S Q/ ┆
0x02fd…0300 0x000008
0x0300…0600 Data for cho
0x0600…0f00 Data for cho2txt
0x0f00…1b00 Data for cho3txt
0x1b00…1e00 (3,) Data for cho4
0x1e00…2d00 Data for cho4txt
0x2d00…3c00 (5,) Data for cho5txt
0x3c00…4500 Data for chotxt
0x4500…4b00 Data for cho1txt
0x4b00…4b20 63 75 72 6f 20 6f 75 74 65 6e 64 63 75 72 2c 0a 69 6e 63 68 61 72 63 75 72 20 6f 75 74 63 68 61 ┆curo outendcur, incharcur outcha┆
0x4b20…4b40 72 63 75 72 20 63 6c 6f 73 65 6f 75 74 29 0a 28 75 6e 73 74 61 63 6b 63 75 72 69 3d 73 65 74 20 ┆rcur closeout) (unstackcuri=set ┆
0x4b40…4b60 31 0a 0a 28 75 6e 73 74 61 63 6b 63 75 72 69 3d 73 6c 61 6e 67 20 66 70 6e 61 6d 65 73 20 74 79 ┆1 (unstackcuri=slang fpnames ty┆
0x4b60…4b80 70 65 2e 79 65 73 20 69 6e 73 65 72 74 70 72 6f 63 20 65 6e 74 72 79 2e 6e 6f 0a 20 20 20 75 6e ┆pe.yes insertproc entry.no un┆
0x4b80…4ba0 73 74 61 63 6b 63 75 72 69 20 20 63 6f 6e 6e 65 63 74 63 75 72 69 20 75 6e 73 74 61 63 6b 63 75 ┆stackcuri connectcuri unstackcu┆
0x4ba0…4bc0 72 6f 2c 20 0a 20 63 6f 6e 6e 65 63 74 63 75 72 6f 20 6f 75 74 65 6e 64 63 75 72 20 69 6e 63 68 ┆ro, connectcuro outendcur inch┆
0x4bc0…4be0 61 72 63 75 72 20 6f 75 74 63 68 61 72 63 75 72 20 63 6c 6f 73 65 6f 75 74 29 0a 69 66 20 6f 6b ┆arcur outcharcur closeout) if ok┆
0x4be0…4c00 2e 6e 6f 0a 65 6e 64 0a 0a 73 63 6f 70 65 20 70 72 6f 6a 65 63 74 2e 64 72 75 6d 31 20 20 20 63 ┆.no end scope project.drum1 c┆
0x4c00…4c20 6f 6e 6e 65 63 74 63 75 72 69 2c 0a 20 20 20 20 20 20 20 20 20 20 20 75 6e 73 74 61 63 6b 63 75 ┆onnectcuri, unstackcu┆
0x4c20…4c40 72 6f 20 63 6f 6e 6e 65 63 74 63 75 72 6f 20 6f 75 74 65 6e 64 63 75 72 2c 0a 20 20 20 20 20 20 ┆ro connectcuro outendcur, ┆
0x4c40…4c60 20 20 20 20 69 6e 63 68 61 72 63 75 72 20 6f 75 74 63 68 61 72 63 75 72 20 63 6c 6f 73 65 6f 75 ┆ incharcur outcharcur closeou┆
0x4c60…4c80 74 0a 6d 65 73 73 61 67 65 20 70 65 72 6d 61 6e 65 6e 74 20 6f 6b 29 0a 0a 0a 3b 20 48 43 5c 20 ┆t message permanent ok) ; HCØ ┆
0x4c80…4ca0 20 31 32 20 30 32 20 31 39 37 33 2e 0a 3b 20 48 65 69 6e 72 69 63 68 20 42 6a 65 72 72 65 67 61 ┆ 12 02 1973. ; Heinrich Bjerrega┆
0x4ca0…4cc0 61 72 64 2e 0a 0a 3b 20 62 2e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3b 20 ┆ard. ; b. ; ┆
0x4cc0…4ce0 20 20 66 70 6e 61 6d 65 73 20 64 75 6d 6d 79 20 62 6c 6f 63 6b 0a 0a 62 2e 20 67 31 2c 65 32 30 ┆ fpnames dummy block b. g1,e20┆
0x4ce0…4d00 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3b 20 20 20 62 6c 6f 63 6b 20 77 69 74 68 20 6e 61 ┆ ; block with na┆
0x4d00…4d20 6d 65 73 20 66 6f 72 20 74 61 69 6c 73 0a 6b 3d 30 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆mes for tails k=0 ┆
0x4d20…4d40 20 20 20 20 20 20 3b 20 20 20 61 6e 64 20 69 6e 73 65 72 74 70 72 6f 63 2e 0a 0a 73 2e 20 67 36 ┆ ; and insertproc. s. g6┆
0x4d40…4d60 2c 6a 36 34 2c 62 31 38 2c 64 32 2c 66 31 32 2c 69 32 34 3b 20 20 20 73 74 61 72 74 20 6f 66 20 ┆,j64,b18,d2,f12,i24; start of ┆
0x4d60…4d80 73 6c 61 6e 67 20 73 65 67 6d 65 6e 74 20 66 6f 72 20 70 72 6f 63 2e 0a 68 2e 0a 67 30 3d 32 20 ┆slang segment for proc. h. g0=2 ┆
0x4d80…4da0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3b 20 20 20 67 30 3a 3d 6e 6f 20 6f 66 ┆ ; g0:=no of┆
0x4da0…4dc0 20 65 78 74 65 72 6e 61 6c 73 3b 0a 65 32 30 3a 0a 67 31 3a 20 20 20 67 32 20 20 20 2c 20 67 32 ┆ externals; e20: g1: g2 , g2┆
0x4dc0…4de0 20 20 20 20 20 20 20 20 20 3b 20 20 20 68 65 61 64 77 6f 72 64 3a 20 72 65 6c 20 6f 66 20 6c 61 ┆ ; headword: rel of la┆
0x4de0…4e00 73 74 20 70 6f 69 6e 74 2c 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆st point, ┆
0x4e00…4e20 20 20 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 72 65 6c 20 6f 66 20 6c 61 73 74 20 61 62 73 20 ┆ ; rel of last abs ┆
0x4e20…4e40 77 6f 72 64 0a 6a 34 3a 20 20 20 67 30 2b 20 34 2c 20 30 20 20 20 20 20 20 20 20 20 20 3b 20 20 ┆word j4: g0+ 4, 0 ; ┆
0x4e40…4e60 20 52 53 20 65 6e 74 72 79 20 20 34 2c 20 74 61 6b 65 20 65 78 70 72 65 73 73 69 6f 6e 0a 6a 36 ┆ RS entry 4, take expression j6┆
0x4e60…4e80 3a 20 20 20 67 30 2b 20 36 2c 20 30 20 20 20 20 20 20 20 20 20 20 3b 20 20 20 52 53 20 65 6e 74 ┆: g0+ 6, 0 ; RS ent┆
0x4e80…4ea0 72 79 20 20 36 2c 20 65 6e 64 20 20 72 65 67 69 73 74 65 72 20 65 78 70 72 0a 6a 38 3a 20 20 20 ┆ry 6, end register expr j8: ┆
0x4ea0…4ec0 67 30 2b 20 38 2c 20 30 20 20 20 20 20 20 20 20 20 20 3b 20 20 20 52 53 20 65 6e 74 72 79 20 20 ┆g0+ 8, 0 ; RS entry ┆
0x4ec0…4ee0 38 2c 20 65 6e 64 20 61 64 64 72 65 73 73 20 65 78 70 72 0a 6a 31 32 3a 20 20 67 30 2b 31 32 2c ┆8, end address expr j12: g0+12,┆
0x4ee0…4f00 20 30 20 20 20 20 20 20 20 20 20 20 3b 20 20 20 52 53 20 65 6e 74 72 79 20 31 32 2c 20 55 56 0a ┆ 0 ; RS entry 12, UV ┆
0x4f00…4f20 6a 31 33 3a 20 20 67 30 2b 31 33 2c 20 30 20 20 20 20 20 20 20 20 20 20 3b 20 20 20 52 53 20 65 ┆j13: g0+13, 0 ; RS e┆
0x4f20…4f40 6e 74 72 79 20 31 33 2c 20 6c 61 73 74 20 75 73 65 64 0a 6a 31 36 3a 20 20 67 30 2b 31 36 2c 20 ┆ntry 13, last used j16: g0+16, ┆
0x4f40…4f60 30 20 20 20 20 20 20 20 20 20 20 3b 20 20 20 52 53 20 65 6e 74 72 79 20 31 36 2c 20 73 65 67 6d ┆0 ; RS entry 16, segm┆
0x4f60…4f80 65 6e 74 20 74 61 62 6c 65 20 62 61 73 65 0a 6a 32 39 3a 20 20 67 30 2b 32 39 2c 20 30 20 20 20 ┆ent table base j29: g0+29, 0 ┆
0x4f80…4fa0 20 20 20 20 20 20 20 3b 20 20 20 52 53 20 65 6e 74 72 79 20 32 39 2c 20 70 61 72 61 6d 20 61 6c ┆ ; RS entry 29, param al┆
0x4fa0…4fc0 61 72 6d 0a 6a 33 30 3a 20 20 67 30 2b 33 30 2c 20 30 20 20 20 20 20 20 20 20 20 20 3b 20 20 20 ┆arm j30: g0+30, 0 ; ┆
0x4fc0…4fe0 52 53 20 65 6e 74 72 79 20 33 30 2c 20 73 61 76 65 64 20 73 74 61 63 6b 20 72 65 66 2c 20 73 61 ┆RS entry 30, saved stack ref, sa┆
0x4fe0…5000 76 65 64 20 77 33 0a 6a 34 32 3a 20 20 67 30 2b 34 32 2c 20 30 20 20 20 20 20 20 20 20 20 20 3b ┆ved w3 j42: g0+42, 0 ;┆
0x5000…5020 20 20 20 52 53 20 65 6e 74 72 79 20 34 32 2c 20 76 69 63 74 69 6d 0a 6a 34 38 3a 20 20 20 20 20 ┆ RS entry 42, victim j48: ┆
0x5020…5040 20 30 2c 20 31 20 20 20 20 20 20 20 20 20 20 3b 20 20 20 73 74 61 72 74 20 6f 66 20 73 74 61 63 ┆ 0, 1 ; start of stac┆
0x5040…5060 6b 20 63 68 61 69 6e 3a 20 38 20 62 79 74 65 73 20 69 6e 20 70 65 72 6d 20 63 6f 72 65 0a 6a 34 ┆k chain: 8 bytes in perm core j4┆
0x5060…5080 39 3a 20 20 20 20 20 20 31 2c 20 30 20 20 20 20 20 20 20 20 20 20 3b 20 20 20 69 6e 73 74 61 63 ┆9: 1, 0 ; instac┆
0x5080…50a0 6b 65 64 0a 6a 35 30 3a 20 20 20 20 20 20 32 2c 20 30 20 20 20 20 20 20 20 20 20 20 3b 20 20 20 ┆ked j50: 2, 0 ; ┆
0x50a0…50c0 6f 75 74 73 74 61 63 6b 65 64 0a 0a 67 32 3d 6b 2d 32 2d 67 31 20 20 20 20 20 20 20 20 20 20 20 ┆outstacked g2=k-2-g1 ┆
0x50c0…50e0 20 20 20 20 3b 20 20 20 65 6e 64 20 6f 66 20 61 62 73 20 77 6f 72 64 3a 3d 65 6e 64 20 6f 66 20 ┆ ; end of abs word:=end of ┆
0x50e0…5100 70 6f 69 6e 74 73 3b 0a 0a 77 2e 0a 65 30 3a 20 20 20 67 30 20 20 20 20 20 20 20 20 20 20 20 20 ┆points; w. e0: g0 ┆
0x5100…5120 (9,) 20 20 20 20 3b 20 20 20 73 74 61 72 74 20 6f 66 20 65 78 74 65 72 6e 61 6c 20 6c 69 73 74 3a 0a ┆ ; start of external list: ┆
0x5120…5140 20 20 20 20 20 20 20 30 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3b 20 20 20 6e 75 6d 62 ┆ 0 ; numb┆
0x5140…5160 65 72 20 6f 66 20 62 79 74 65 73 20 74 6f 20 69 6e 69 74 69 6c 69 73 65 0a 77 2e 20 20 20 20 3c ┆er of bytes to initilise w. <┆
0x5160…5180 3a 69 6e 73 74 61 63 6b 65 64 3a 3e 2c 30 20 20 20 3b 0a 20 20 20 20 20 20 39 3c 31 38 2c 30 20 ┆:instacked:>,0 ; 9<18,0 ┆
0x5180…51a0 20 20 20 20 20 20 20 20 20 20 20 3b 0a 20 20 20 20 20 20 3c 3a 6f 75 74 73 74 61 63 6b 65 64 3a ┆ ; <:outstacked:┆
0x51a0…51c0 3e 20 20 20 20 3b 0a 20 20 20 20 20 20 39 3c 31 38 2c 30 20 20 20 20 20 20 20 20 20 20 20 20 3b ┆> ; 9<18,0 ;┆
0x51c0…51e0 0a 0a 20 20 20 20 20 20 31 32 20 30 32 20 37 33 2c 20 31 35 20 30 30 20 30 30 3b 20 20 20 64 61 ┆ 12 02 73, 15 00 00; da┆
0x51e0…5200 74 65 20 61 6e 64 20 74 69 6d 65 20 6f 66 20 74 68 69 73 20 76 65 72 73 69 6f 6e 0a 0a 3b 20 43 ┆te and time of this version ; C┆
0x5200…5220 6f 6e 73 74 61 6e 74 73 3a 0a 0a 66 38 3a 20 20 20 38 2e 33 37 37 3c 31 36 0a 0a 0a 0a 0a 3b 20 ┆onstants: f8: 8.377<16 ; ┆
0x5220…5240 70 72 6f 63 65 64 75 72 65 20 73 74 61 63 6b 63 75 72 69 20 61 6e 64 20 63 6f 6e 6e 65 63 74 63 ┆procedure stackcuri and connectc┆
0x5240…5260 75 72 69 3b 0a 3b 20 4d 61 6b 65 73 20 61 20 20 46 50 2d 63 61 6c 6c 20 61 73 20 64 65 73 63 72 ┆uri; ; Makes a FP-call as descr┆
0x5260…5280 69 70 65 64 20 69 6e 20 74 68 65 20 66 70 2d 0a 3b 20 6d 61 6e 75 61 6c 2e 0a 0a 65 32 3a 20 20 ┆iped in the fp- ; manual. e2: ┆
0x5280…52a0 20 72 6c 2e 20 77 32 20 28 6a 31 33 2e 29 20 20 20 20 20 3b 20 20 20 77 32 3a 3d 6c 61 73 74 20 ┆ rl. w2 (j13.) ; w2:=last ┆
0x52a0…52c0 75 73 65 64 3b 0a 20 20 20 20 20 20 64 73 2e 20 77 33 20 28 6a 33 30 2e 29 20 20 20 20 20 3b 20 ┆used; ds. w3 (j30.) ; ┆
0x52c0…52e0 20 20 73 61 76 65 64 20 73 74 61 63 6b 20 72 65 66 2c 20 73 61 76 65 64 20 77 33 0a 20 20 20 20 ┆ saved stack ref, saved w3 ┆
0x52e0…5300 20 20 61 6d 2e 20 20 20 20 28 6a 34 32 2e 29 20 20 20 20 20 3b 0a 20 20 20 20 20 20 61 6d 20 20 ┆ am. (j42.) ; am ┆
0x5300…5320 20 20 20 28 33 32 29 20 20 20 20 20 20 20 3b 0a 20 20 20 20 20 20 6a 6c 20 20 77 33 20 20 68 32 ┆ (32) ; jl w3 h2┆
0x5320…5340 39 2d 34 20 20 20 20 20 3b 20 20 20 73 74 61 63 6b 20 63 75 72 72 65 6e 74 20 69 6e 70 75 74 0a ┆9-4 ; stack current input ┆
0x5340…5360 20 20 20 20 20 20 6a 6c 2e 20 20 20 20 20 65 34 2e 20 20 20 20 20 20 20 3b 20 20 20 65 6e 64 20 ┆ jl. e4. ; end ┆
0x5360…5380 61 64 64 72 65 73 73 73 20 65 78 70 72 0a 0a 3b 20 70 72 6f 63 65 64 75 72 65 20 75 6e 73 74 61 ┆addresss expr ; procedure unsta┆
0x5380…53a0 63 6b 63 75 72 69 3b 0a 3b 20 4d 61 6b 65 73 20 61 20 66 70 2d 63 61 6c 6c 20 61 73 20 64 65 73 ┆ckcuri; ; Makes a fp-call as des┆
0x53a0…53c0 63 72 69 70 65 64 20 69 6e 20 74 68 65 20 66 70 2d 0a 3b 20 6d 61 6e 75 61 6c 2e 0a 0a 65 33 3a ┆criped in the fp- ; manual. e3:┆
0x53c0…53e0 20 20 20 72 6c 2e 20 77 32 20 28 6a 31 33 2e 29 20 20 20 20 20 3b 20 20 20 77 32 3a 3d 6c 61 73 ┆ rl. w2 (j13.) ; w2:=las┆
0x53e0…5400 74 20 75 73 65 64 3b 0a 20 20 20 20 20 20 64 73 2e 20 77 33 20 28 6a 33 30 2e 29 20 20 20 20 20 ┆t used; ds. w3 (j30.) ┆
0x0000…0033 (0,) Rc489kSubCatEnt {f00=0x001dfb, f01=0x007530, f02=0x007539, filename=»cho «, entry_tail=0-4-0-1-1979-12-07T13:51-disc-0x0-0x0-0x0-0x0}
0x0033…0066 Rc489kSubCatEnt {f00=0x002a3b, f01=0x007530, f02=0x007539, filename=»cho2txt «, entry_tail=0-4-0-3-1979-11-26T14:48-disc-0x0-0x0-0x0-0x0}
0x0066…0099 Rc489kSubCatEnt {f00=0x00505b, f01=0x007530, f02=0x007539, filename=»cho3txt «, entry_tail=0-4-0-4-1979-12-07T11:00-disc-0x0-0x0-0x0-0x0}
0x0099…00cc Rc489kSubCatEnt {f00=0x009bd3, f01=0x007530, f02=0x007539, filename=»cho4 «, entry_tail=0-4-0-1-1980-01-16T14:10-disc-0x0-0x0-0x0-0x0}
0x00cc…00ff Rc489kSubCatEnt {f00=0x00a613, f01=0x007530, f02=0x007539, filename=»cho4txt «, entry_tail=0-4-0-5-1980-01-14T18:20-disc-0x0-0x0-0x0-0x0}
0x00ff…0132 Rc489kSubCatEnt {f00=0x00fbcb, f01=0x007530, f02=0x007539, filename=»cho5txt «, entry_tail=0-4-0-5-1980-01-16T13:49-disc-0x0-0x0-0x0-0x0}
0x0132…0165 Rc489kSubCatEnt {f00=0x0140a3, f01=0x007530, f02=0x007539, filename=»chotxt «, entry_tail=0-4-0-3-1979-11-26T10:28-disc-0x0-0x0-0x0-0x0}
0x0165…0198 Rc489kSubCatEnt {f00=0x017483, f01=0x007530, f02=0x007539, filename=»cho1txt «, entry_tail=0-4-0-2-1979-11-23T11:16-disc-0x0-0x0-0x0-0x0}
0x0198…01a0 dc 10 11 53 ce 8e 52 2f ┆ S R/┆
0x01a0…01c0 fc 34 30 34 53 ce 7e 51 2f d5 a9 00 00 34 30 e8 2d 0f da 37 ce 76 5e 10 00 50 8e a5 53 8e 6c dc ┆ 404S üQ/ 40 - 7 v^ P S l ┆
0x01c0…01e0 10 05 2c ce 72 53 8e 9b dc 10 09 d8 8e 95 dc 10 19 2c 10 19 2f 00 1a dc 10 0d 51 2f b3 5d 2f 59 ┆ , rS , / Q/ Å/Y┆
0x01e0…0200 50 2f a1 1c 00 02 51 ce 58 dc 10 1d 2f 10 21 2c 3f fc 53 8e 79 dc 10 11 d8 2f a5 23 2f 59 20 2f ┆P/ Q X / !,? S y / #/Y /┆
0x0200…0220 59 67 00 00 2f 30 03 93 0f fe 93 00 02 67 00 00 dc 10 21 d8 8e 61 dc 10 25 2c 10 25 2f 00 1a dc ┆Yg /0 g ! a %, %/ ┆
0x0220…0240 10 15 53 ce 2e 52 2f fc 34 30 30 2d 0f f6 37 ce 24 5e 10 00 50 8e 49 53 8e 1c dc 10 05 50 8e 41 ┆ S .R/ 400- 7 $^ P IS P A┆
0x0240…0260 2f 20 00 9b 00 04 2f 30 0a dc 10 09 53 ce 0e 34 30 4c 06 e8 00 00 88 02 00 02 40 0c 01 02 01 6b ┆/ /0 S 40L @ k┆
0x0260…0280 18 01 6b 1a 01 68 94 01 6b 00 01 6a 7a 01 62 f8 01 6b 1c 01 6b 3e 01 6b 50 01 6b 58 01 6b 44 01 ┆ k h k jz b k k> kP kX kD ┆
0x0280…02a0 5e 54 01 71 c6 01 70 2d 00 00 00 00 00 01 01 40 6a 61 6d 65 00 00 00 20 6b 69 74 20 6e 2a 2a 64 ┆^T q p- @jame kit n**d┆
0x02a0…02c0 69 73 63 00 40 13 00 30 00 01 81 d2 00 00 08 00 00 64 69 73 63 00 00 00 00 00 00 64 69 73 63 00 ┆isc @ 0 disc disc ┆
0x02c0…02e0 00 00 df ff 00 60 17 00 c0 e8 00 00 22 00 c0 be 01 c0 9c 53 cf c6 34 30 22 34 80 4a 2d 0f de 37 ┆ ` " S 40"4 J- 7┆
0x02e0…02fd cf ae 5e 10 00 50 8f f3 53 8f a4 dc 10 05 2c cf b6 53 8f e3 dc 10 09 51 2f e5 99 0f fd ┆ ^ P S , S Q/ ┆
0x02fd…0300 0x000008
0x0300…0600 Data for cho
0x0600…0f00 Data for cho2txt
0x0f00…1b00 Data for cho3txt
0x1b00…1e00 (3,) Data for cho4
0x1e00…2d00 Data for cho4txt
0x2d00…3c00 (5,) Data for cho5txt
0x3c00…4500 Data for chotxt
0x4500…4b00 Data for cho1txt
0x4b00…4b20 63 75 72 6f 20 6f 75 74 65 6e 64 63 75 72 2c 0a 69 6e 63 68 61 72 63 75 72 20 6f 75 74 63 68 61 ┆curo outendcur, incharcur outcha┆
0x4b20…4b40 72 63 75 72 20 63 6c 6f 73 65 6f 75 74 29 0a 28 75 6e 73 74 61 63 6b 63 75 72 69 3d 73 65 74 20 ┆rcur closeout) (unstackcuri=set ┆
0x4b40…4b60 31 0a 0a 28 75 6e 73 74 61 63 6b 63 75 72 69 3d 73 6c 61 6e 67 20 66 70 6e 61 6d 65 73 20 74 79 ┆1 (unstackcuri=slang fpnames ty┆
0x4b60…4b80 70 65 2e 79 65 73 20 69 6e 73 65 72 74 70 72 6f 63 20 65 6e 74 72 79 2e 6e 6f 0a 20 20 20 75 6e ┆pe.yes insertproc entry.no un┆
0x4b80…4ba0 73 74 61 63 6b 63 75 72 69 20 20 63 6f 6e 6e 65 63 74 63 75 72 69 20 75 6e 73 74 61 63 6b 63 75 ┆stackcuri connectcuri unstackcu┆
0x4ba0…4bc0 72 6f 2c 20 0a 20 63 6f 6e 6e 65 63 74 63 75 72 6f 20 6f 75 74 65 6e 64 63 75 72 20 69 6e 63 68 ┆ro, connectcuro outendcur inch┆
0x4bc0…4be0 61 72 63 75 72 20 6f 75 74 63 68 61 72 63 75 72 20 63 6c 6f 73 65 6f 75 74 29 0a 69 66 20 6f 6b ┆arcur outcharcur closeout) if ok┆
0x4be0…4c00 2e 6e 6f 0a 65 6e 64 0a 0a 73 63 6f 70 65 20 70 72 6f 6a 65 63 74 2e 64 72 75 6d 31 20 20 20 63 ┆.no end scope project.drum1 c┆
0x4c00…4c20 6f 6e 6e 65 63 74 63 75 72 69 2c 0a 20 20 20 20 20 20 20 20 20 20 20 75 6e 73 74 61 63 6b 63 75 ┆onnectcuri, unstackcu┆
0x4c20…4c40 72 6f 20 63 6f 6e 6e 65 63 74 63 75 72 6f 20 6f 75 74 65 6e 64 63 75 72 2c 0a 20 20 20 20 20 20 ┆ro connectcuro outendcur, ┆
0x4c40…4c60 20 20 20 20 69 6e 63 68 61 72 63 75 72 20 6f 75 74 63 68 61 72 63 75 72 20 63 6c 6f 73 65 6f 75 ┆ incharcur outcharcur closeou┆
0x4c60…4c80 74 0a 6d 65 73 73 61 67 65 20 70 65 72 6d 61 6e 65 6e 74 20 6f 6b 29 0a 0a 0a 3b 20 48 43 5c 20 ┆t message permanent ok) ; HCØ ┆
0x4c80…4ca0 20 31 32 20 30 32 20 31 39 37 33 2e 0a 3b 20 48 65 69 6e 72 69 63 68 20 42 6a 65 72 72 65 67 61 ┆ 12 02 1973. ; Heinrich Bjerrega┆
0x4ca0…4cc0 61 72 64 2e 0a 0a 3b 20 62 2e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3b 20 ┆ard. ; b. ; ┆
0x4cc0…4ce0 20 20 66 70 6e 61 6d 65 73 20 64 75 6d 6d 79 20 62 6c 6f 63 6b 0a 0a 62 2e 20 67 31 2c 65 32 30 ┆ fpnames dummy block b. g1,e20┆
0x4ce0…4d00 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3b 20 20 20 62 6c 6f 63 6b 20 77 69 74 68 20 6e 61 ┆ ; block with na┆
0x4d00…4d20 6d 65 73 20 66 6f 72 20 74 61 69 6c 73 0a 6b 3d 30 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆mes for tails k=0 ┆
0x4d20…4d40 20 20 20 20 20 20 3b 20 20 20 61 6e 64 20 69 6e 73 65 72 74 70 72 6f 63 2e 0a 0a 73 2e 20 67 36 ┆ ; and insertproc. s. g6┆
0x4d40…4d60 2c 6a 36 34 2c 62 31 38 2c 64 32 2c 66 31 32 2c 69 32 34 3b 20 20 20 73 74 61 72 74 20 6f 66 20 ┆,j64,b18,d2,f12,i24; start of ┆
0x4d60…4d80 73 6c 61 6e 67 20 73 65 67 6d 65 6e 74 20 66 6f 72 20 70 72 6f 63 2e 0a 68 2e 0a 67 30 3d 32 20 ┆slang segment for proc. h. g0=2 ┆
0x4d80…4da0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3b 20 20 20 67 30 3a 3d 6e 6f 20 6f 66 ┆ ; g0:=no of┆
0x4da0…4dc0 20 65 78 74 65 72 6e 61 6c 73 3b 0a 65 32 30 3a 0a 67 31 3a 20 20 20 67 32 20 20 20 2c 20 67 32 ┆ externals; e20: g1: g2 , g2┆
0x4dc0…4de0 20 20 20 20 20 20 20 20 20 3b 20 20 20 68 65 61 64 77 6f 72 64 3a 20 72 65 6c 20 6f 66 20 6c 61 ┆ ; headword: rel of la┆
0x4de0…4e00 73 74 20 70 6f 69 6e 74 2c 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆st point, ┆
0x4e00…4e20 20 20 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 72 65 6c 20 6f 66 20 6c 61 73 74 20 61 62 73 20 ┆ ; rel of last abs ┆
0x4e20…4e40 77 6f 72 64 0a 6a 34 3a 20 20 20 67 30 2b 20 34 2c 20 30 20 20 20 20 20 20 20 20 20 20 3b 20 20 ┆word j4: g0+ 4, 0 ; ┆
0x4e40…4e60 20 52 53 20 65 6e 74 72 79 20 20 34 2c 20 74 61 6b 65 20 65 78 70 72 65 73 73 69 6f 6e 0a 6a 36 ┆ RS entry 4, take expression j6┆
0x4e60…4e80 3a 20 20 20 67 30 2b 20 36 2c 20 30 20 20 20 20 20 20 20 20 20 20 3b 20 20 20 52 53 20 65 6e 74 ┆: g0+ 6, 0 ; RS ent┆
0x4e80…4ea0 72 79 20 20 36 2c 20 65 6e 64 20 20 72 65 67 69 73 74 65 72 20 65 78 70 72 0a 6a 38 3a 20 20 20 ┆ry 6, end register expr j8: ┆
0x4ea0…4ec0 67 30 2b 20 38 2c 20 30 20 20 20 20 20 20 20 20 20 20 3b 20 20 20 52 53 20 65 6e 74 72 79 20 20 ┆g0+ 8, 0 ; RS entry ┆
0x4ec0…4ee0 38 2c 20 65 6e 64 20 61 64 64 72 65 73 73 20 65 78 70 72 0a 6a 31 32 3a 20 20 67 30 2b 31 32 2c ┆8, end address expr j12: g0+12,┆
0x4ee0…4f00 20 30 20 20 20 20 20 20 20 20 20 20 3b 20 20 20 52 53 20 65 6e 74 72 79 20 31 32 2c 20 55 56 0a ┆ 0 ; RS entry 12, UV ┆
0x4f00…4f20 6a 31 33 3a 20 20 67 30 2b 31 33 2c 20 30 20 20 20 20 20 20 20 20 20 20 3b 20 20 20 52 53 20 65 ┆j13: g0+13, 0 ; RS e┆
0x4f20…4f40 6e 74 72 79 20 31 33 2c 20 6c 61 73 74 20 75 73 65 64 0a 6a 31 36 3a 20 20 67 30 2b 31 36 2c 20 ┆ntry 13, last used j16: g0+16, ┆
0x4f40…4f60 30 20 20 20 20 20 20 20 20 20 20 3b 20 20 20 52 53 20 65 6e 74 72 79 20 31 36 2c 20 73 65 67 6d ┆0 ; RS entry 16, segm┆
0x4f60…4f80 65 6e 74 20 74 61 62 6c 65 20 62 61 73 65 0a 6a 32 39 3a 20 20 67 30 2b 32 39 2c 20 30 20 20 20 ┆ent table base j29: g0+29, 0 ┆
0x4f80…4fa0 20 20 20 20 20 20 20 3b 20 20 20 52 53 20 65 6e 74 72 79 20 32 39 2c 20 70 61 72 61 6d 20 61 6c ┆ ; RS entry 29, param al┆
0x4fa0…4fc0 61 72 6d 0a 6a 33 30 3a 20 20 67 30 2b 33 30 2c 20 30 20 20 20 20 20 20 20 20 20 20 3b 20 20 20 ┆arm j30: g0+30, 0 ; ┆
0x4fc0…4fe0 52 53 20 65 6e 74 72 79 20 33 30 2c 20 73 61 76 65 64 20 73 74 61 63 6b 20 72 65 66 2c 20 73 61 ┆RS entry 30, saved stack ref, sa┆
0x4fe0…5000 76 65 64 20 77 33 0a 6a 34 32 3a 20 20 67 30 2b 34 32 2c 20 30 20 20 20 20 20 20 20 20 20 20 3b ┆ved w3 j42: g0+42, 0 ;┆
0x5000…5020 20 20 20 52 53 20 65 6e 74 72 79 20 34 32 2c 20 76 69 63 74 69 6d 0a 6a 34 38 3a 20 20 20 20 20 ┆ RS entry 42, victim j48: ┆
0x5020…5040 20 30 2c 20 31 20 20 20 20 20 20 20 20 20 20 3b 20 20 20 73 74 61 72 74 20 6f 66 20 73 74 61 63 ┆ 0, 1 ; start of stac┆
0x5040…5060 6b 20 63 68 61 69 6e 3a 20 38 20 62 79 74 65 73 20 69 6e 20 70 65 72 6d 20 63 6f 72 65 0a 6a 34 ┆k chain: 8 bytes in perm core j4┆
0x5060…5080 39 3a 20 20 20 20 20 20 31 2c 20 30 20 20 20 20 20 20 20 20 20 20 3b 20 20 20 69 6e 73 74 61 63 ┆9: 1, 0 ; instac┆
0x5080…50a0 6b 65 64 0a 6a 35 30 3a 20 20 20 20 20 20 32 2c 20 30 20 20 20 20 20 20 20 20 20 20 3b 20 20 20 ┆ked j50: 2, 0 ; ┆
0x50a0…50c0 6f 75 74 73 74 61 63 6b 65 64 0a 0a 67 32 3d 6b 2d 32 2d 67 31 20 20 20 20 20 20 20 20 20 20 20 ┆outstacked g2=k-2-g1 ┆
0x50c0…50e0 20 20 20 20 3b 20 20 20 65 6e 64 20 6f 66 20 61 62 73 20 77 6f 72 64 3a 3d 65 6e 64 20 6f 66 20 ┆ ; end of abs word:=end of ┆
0x50e0…5100 70 6f 69 6e 74 73 3b 0a 0a 77 2e 0a 65 30 3a 20 20 20 67 30 20 20 20 20 20 20 20 20 20 20 20 20 ┆points; w. e0: g0 ┆
0x5100…5120 (9,) 20 20 20 20 3b 20 20 20 73 74 61 72 74 20 6f 66 20 65 78 74 65 72 6e 61 6c 20 6c 69 73 74 3a 0a ┆ ; start of external list: ┆
0x5120…5140 20 20 20 20 20 20 20 30 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3b 20 20 20 6e 75 6d 62 ┆ 0 ; numb┆
0x5140…5160 65 72 20 6f 66 20 62 79 74 65 73 20 74 6f 20 69 6e 69 74 69 6c 69 73 65 0a 77 2e 20 20 20 20 3c ┆er of bytes to initilise w. <┆
0x5160…5180 3a 69 6e 73 74 61 63 6b 65 64 3a 3e 2c 30 20 20 20 3b 0a 20 20 20 20 20 20 39 3c 31 38 2c 30 20 ┆:instacked:>,0 ; 9<18,0 ┆
0x5180…51a0 20 20 20 20 20 20 20 20 20 20 20 3b 0a 20 20 20 20 20 20 3c 3a 6f 75 74 73 74 61 63 6b 65 64 3a ┆ ; <:outstacked:┆
0x51a0…51c0 3e 20 20 20 20 3b 0a 20 20 20 20 20 20 39 3c 31 38 2c 30 20 20 20 20 20 20 20 20 20 20 20 20 3b ┆> ; 9<18,0 ;┆
0x51c0…51e0 0a 0a 20 20 20 20 20 20 31 32 20 30 32 20 37 33 2c 20 31 35 20 30 30 20 30 30 3b 20 20 20 64 61 ┆ 12 02 73, 15 00 00; da┆
0x51e0…5200 74 65 20 61 6e 64 20 74 69 6d 65 20 6f 66 20 74 68 69 73 20 76 65 72 73 69 6f 6e 0a 0a 3b 20 43 ┆te and time of this version ; C┆
0x5200…5220 6f 6e 73 74 61 6e 74 73 3a 0a 0a 66 38 3a 20 20 20 38 2e 33 37 37 3c 31 36 0a 0a 0a 0a 0a 3b 20 ┆onstants: f8: 8.377<16 ; ┆
0x5220…5240 70 72 6f 63 65 64 75 72 65 20 73 74 61 63 6b 63 75 72 69 20 61 6e 64 20 63 6f 6e 6e 65 63 74 63 ┆procedure stackcuri and connectc┆
0x5240…5260 75 72 69 3b 0a 3b 20 4d 61 6b 65 73 20 61 20 20 46 50 2d 63 61 6c 6c 20 61 73 20 64 65 73 63 72 ┆uri; ; Makes a FP-call as descr┆
0x5260…5280 69 70 65 64 20 69 6e 20 74 68 65 20 66 70 2d 0a 3b 20 6d 61 6e 75 61 6c 2e 0a 0a 65 32 3a 20 20 ┆iped in the fp- ; manual. e2: ┆
0x5280…52a0 20 72 6c 2e 20 77 32 20 28 6a 31 33 2e 29 20 20 20 20 20 3b 20 20 20 77 32 3a 3d 6c 61 73 74 20 ┆ rl. w2 (j13.) ; w2:=last ┆
0x52a0…52c0 75 73 65 64 3b 0a 20 20 20 20 20 20 64 73 2e 20 77 33 20 28 6a 33 30 2e 29 20 20 20 20 20 3b 20 ┆used; ds. w3 (j30.) ; ┆
0x52c0…52e0 20 20 73 61 76 65 64 20 73 74 61 63 6b 20 72 65 66 2c 20 73 61 76 65 64 20 77 33 0a 20 20 20 20 ┆ saved stack ref, saved w3 ┆
0x52e0…5300 20 20 61 6d 2e 20 20 20 20 28 6a 34 32 2e 29 20 20 20 20 20 3b 0a 20 20 20 20 20 20 61 6d 20 20 ┆ am. (j42.) ; am ┆
0x5300…5320 20 20 20 28 33 32 29 20 20 20 20 20 20 20 3b 0a 20 20 20 20 20 20 6a 6c 20 20 77 33 20 20 68 32 ┆ (32) ; jl w3 h2┆
0x5320…5340 39 2d 34 20 20 20 20 20 3b 20 20 20 73 74 61 63 6b 20 63 75 72 72 65 6e 74 20 69 6e 70 75 74 0a ┆9-4 ; stack current input ┆
0x5340…5360 20 20 20 20 20 20 6a 6c 2e 20 20 20 20 20 65 34 2e 20 20 20 20 20 20 20 3b 20 20 20 65 6e 64 20 ┆ jl. e4. ; end ┆
0x5360…5380 61 64 64 72 65 73 73 73 20 65 78 70 72 0a 0a 3b 20 70 72 6f 63 65 64 75 72 65 20 75 6e 73 74 61 ┆addresss expr ; procedure unsta┆
0x5380…53a0 63 6b 63 75 72 69 3b 0a 3b 20 4d 61 6b 65 73 20 61 20 66 70 2d 63 61 6c 6c 20 61 73 20 64 65 73 ┆ckcuri; ; Makes a fp-call as des┆
0x53a0…53c0 63 72 69 70 65 64 20 69 6e 20 74 68 65 20 66 70 2d 0a 3b 20 6d 61 6e 75 61 6c 2e 0a 0a 65 33 3a ┆criped in the fp- ; manual. e3:┆
0x53c0…53e0 20 20 20 72 6c 2e 20 77 32 20 28 6a 31 33 2e 29 20 20 20 20 20 3b 20 20 20 77 32 3a 3d 6c 61 73 ┆ rl. w2 (j13.) ; w2:=las┆
0x53e0…5400 74 20 75 73 65 64 3b 0a 20 20 20 20 20 20 64 73 2e 20 77 33 20 28 6a 33 30 2e 29 20 20 20 20 20 ┆t used; ds. w3 (j30.) ┆