|
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: 86016 (0x15000)
Types: Rc489kSubCat
Names: »cdes«
└─⟦621cfb9a2⟧ Bits:30002817 RC8000 Dump tape fra HCØ. Detaljer om "HC8000" projekt.
└─⟦0364f57e3⟧
└─⟦this⟧ »cdes«
└─⟦667bb35d6⟧ Bits:30007480 RC8000 Dump tape fra HCØ.
└─⟦4334b4c0b⟧
└─⟦this⟧ »cdes«
0x00000…00033 (0,) Rc489kSubCatEnt {f00=0x0031d8, f01=0x0007e4, f02=0x0007e4, filename=»complinp «, entry_tail=0-4-0-2-1981-01-10T14:59-disc1-0x0-0x0-0x0-0x0}
0x00033…00066 Rc489kSubCatEnt {f00=0x005efa, f01=0x0007e4, f02=0x0007ed, filename=»multicopinp «, entry_tail=0-4-0-4-1981-02-04T11:08-disc1-0x0-0x0-0x0-0x0}
0x00066…00099 Rc489kSubCatEnt {f00=0x009d8a, f01=0x0007e4, f02=0x0007ed, filename=»compfphead «, entry_tail=0-4-0-2-1981-01-21T16:44-disc1-0x0-0x0-0x0-0x0}
0x00099…000cc Rc489kSubCatEnt {f00=0x00b5ba, f01=0x0007e4, f02=0x0007e4, filename=»compdes «, entry_tail=0-4-0-3-1981-01-21T16:32-disc1-0x0-0x0-0x0-0x0}
0x000cc…000ff Rc489kSubCatEnt {f00=0x00e33a, f01=0x0007e4, f02=0x0007ed, filename=»listerrinp «, entry_tail=0-4-0-2-1980-12-09T11:47-disc1-0x0-0x0-0x0-0x0}
0x000ff…00132 Rc489kSubCatEnt {f00=0x0106fa, f01=0x0007e4, f02=0x0007ed, filename=»describeinp «, entry_tail=0-4-0-6-1980-11-12T12:08-disc1-0x0-0x0-0x0-0x0}
0x00132…00165 Rc489kSubCatEnt {f00=0x016b82, f01=0x0007e4, f02=0x0007ed, filename=»writestdinp «, entry_tail=0-4-0-4-1980-11-11T15:19-disc1-0x0-0x0-0x0-0x0}
0x00165…00198 Rc489kSubCatEnt {f00=0x01a26a, f01=0x0007e4, f02=0x0007ed, filename=»testbufinp «, entry_tail=0-4-0-2-1980-11-11T15:13-disc1-0x0-0x0-0x0-0x0}
0x00198…001cb Rc489kSubCatEnt {f00=0x01c762, f01=0x0007e4, f02=0x0007ed, filename=»stdvarinp «, entry_tail=0-4-0-6-1980-11-11T15:11-disc1-0x0-0x0-0x0-0x0}
0x001cb…001fe Rc489kSubCatEnt {f00=0x022652, f01=0x0007e4, f02=0x0007ed, filename=»searchcinp «, entry_tail=0-4-0-2-1980-11-11T15:06-disc1-0x0-0x0-0x0-0x0}
0x001fe…00231 Rc489kSubCatEnt {f00=0x024a02, f01=0x0007e4, f02=0x0007ed, filename=»remspinp «, entry_tail=0-4-0-2-1980-11-11T15:07-disc1-0x0-0x0-0x0-0x0}
0x00231…00264 Rc489kSubCatEnt {f00=0x02609a, f01=0x0007e4, f02=0x0007ed, filename=»mtreadinp «, entry_tail=0-4-0-4-1980-11-11T15:02-disc1-0x0-0x0-0x0-0x0}
0x00264…00297 Rc489kSubCatEnt {f00=0x02ad5a, f01=0x0007e4, f02=0x0007ed, filename=»macroinp «, entry_tail=0-4-0-2-1980-11-11T14:58-disc1-0x0-0x0-0x0-0x0}
0x00297…002ca Rc489kSubCatEnt {f00=0x02cf5a, f01=0x0007e4, f02=0x0007ed, filename=»listintinp «, entry_tail=0-4-0-2-1980-11-11T14:56-disc1-0x0-0x0-0x0-0x0}
0x002ca…002fd Rc489kSubCatEnt {f00=0x02e402, f01=0x0007e4, f02=0x0007ed, filename=»extractinp «, entry_tail=0-4-0-5-1980-11-11T14:53-disc1-0x0-0x0-0x0-0x0}
0x002fd…00300 0x00001c
0x00300…00333 Rc489kSubCatEnt {f00=0x0331f2, f01=0x0007e4, f02=0x0007ed, filename=»docmoveinp «, entry_tail=0-4-0-2-1980-11-11T14:47-disc1-0x0-0x0-0x0-0x0}
0x00333…00366 Rc489kSubCatEnt {f00=0x0356e2, f01=0x0007e4, f02=0x0007ed, filename=»convertinp «, entry_tail=0-4-0-2-1980-11-11T14:28-disc1-0x0-0x0-0x0-0x0}
0x00366…00399 Rc489kSubCatEnt {f00=0x03787a, f01=0x0007e4, f02=0x0007ed, filename=»deviceinp «, entry_tail=0-4-0-2-1980-11-11T14:30-disc1-0x0-0x0-0x0-0x0}
0x00399…003cc Rc489kSubCatEnt {f00=0x039352, f01=0x0007e4, f02=0x0007ed, filename=»disccopyinp «, entry_tail=0-4-0-2-1980-11-11T14:15-disc3-0x0-0x0-0x0-0x0}
0x003cc…003ff Rc489kSubCatEnt {f00=0x03b0f2, f01=0x0007e4, f02=0x0007ed, filename=»readparinp «, entry_tail=0-4-0-2-1980-11-11T14:08-disc1-0x0-0x0-0x0-0x0}
0x003ff…00432 Rc489kSubCatEnt {f00=0x03db4a, f01=0x0007e4, f02=0x0007ed, filename=»wrstdeinp «, entry_tail=0-4-0-3-1980-11-11T14:11-disc3-0x0-0x0-0x0-0x0}
0x00432…00465 Rc489kSubCatEnt {f00=0x04042a, f01=0x0007e4, f02=0x0007ed, filename=»careainp «, entry_tail=0-4-0-2-1980-11-11T13:56-disc3-0x0-0x0-0x0-0x0}
0x00465…00498 Rc489kSubCatEnt {f00=0x042662, f01=0x0007e4, f02=0x0007ed, filename=»outshclinp «, entry_tail=0-4-0-1-1980-11-11T13:58-disc1-0x0-0x0-0x0-0x0}
0x00498…004cb Rc489kSubCatEnt {f00=0x043252, f01=0x0007e4, f02=0x0007ed, filename=»printfinp «, entry_tail=0-4-0-2-1980-11-11T14:01-disc1-0x0-0x0-0x0-0x0}
0x004cb…004fe Rc489kSubCatEnt {f00=0x04591a, f01=0x0007e4, f02=0x0007ed, filename=»procfinp «, entry_tail=0-4-0-2-1980-10-21T16:10-disc1-0x0-0x0-0x0-0x0}
0x004fe…00531 Rc489kSubCatEnt {f00=0x0470c8, f01=0x0007e4, f02=0x0007e4, filename=»progfinp «, entry_tail=0-4-0-2-1980-10-21T14:31-disc1-0x0-0x0-0x0-0x0}
0x00531…00564 Rc489kSubCatEnt {f00=0x049802, f01=0x0007e4, f02=0x0007ed, filename=»guidec «, entry_tail=0-4-0-3-1980-10-21T14:28-disc1-0x0-0x0-0x0-0x0}
0x00564…00597 Rc489kSubCatEnt {f00=0x04ca5a, f01=0x0007e4, f02=0x0007ed, filename=»guideinp «, entry_tail=0-4-0-10-1980-10-21T14:28-disc1-0x0-0x0-0x0-0x0}
0x00597…005a0 02 cf 5a 00 07 e4 00 07 ed ┆ Z ┆
0x005a0…005c0 6c 69 73 74 69 6e 74 69 6e 70 00 00 00 00 02 64 69 73 63 31 00 00 00 00 00 00 00 76 26 73 00 00 ┆listintinp disc1 v&s ┆
0x005c0…005e0 00 00 00 00 00 00 00 00 00 00 02 e4 02 00 07 e4 00 07 ed 65 78 74 72 61 63 74 69 6e 70 00 00 00 ┆ extractinp ┆
0x005e0…00600 00 05 64 69 73 63 31 00 00 00 00 00 00 00 76 26 70 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ┆ disc1 v&p ┆
0x00600…00620 65 72 6d 61 6e 65 6e 74 65 20 70 6c 61 64 65 6c 61 67 65 72 20 72 65 73 6f 75 72 63 65 72 2e 0a ┆ermanente pladelager resourcer. ┆
0x00620…00640 44 65 73 75 64 65 6e 20 67 7b 6c 64 65 72 20 61 74 20 73 74 61 6e 64 61 72 64 20 74 69 64 20 65 ┆Desuden gælder at standard tid e┆
0x00640…00660 72 20 35 20 6d 69 6e 20 6f 67 0a 61 74 20 6d 61 78 69 6d 61 6c 74 69 64 20 69 20 64 61 67 74 69 ┆r 5 min og at maximaltid i dagti┆
0x00660…00680 64 20 65 72 20 32 30 20 6d 69 6e 20 6f 67 20 6f 6d 20 6e 61 74 74 65 6e 0a 38 20 74 69 6d 65 72 ┆d er 20 min og om natten 8 timer┆
0x00680…006a0 2e 0a 44 65 72 20 6b 61 6e 20 6b 7c 72 65 20 6f 70 20 74 69 6c 20 38 20 6a 6f 62 73 20 73 61 6d ┆. Der kan køre op til 8 jobs sam┆
0x006a0…006c0 74 69 64 69 67 20 75 6e 64 65 72 20 64 65 6e 20 73 61 74 73 76 69 73 65 0a 61 66 76 69 6b 6c 69 ┆tidig under den satsvise afvikli┆
0x006c0…006e0 6e 67 20 76 65 64 20 62 65 6e 79 74 74 65 6c 73 65 20 61 66 20 6c 61 67 65 72 76 65 6b 73 6c 69 ┆ng ved benyttelse af lagerveksli┆
0x006e0…00700 6e 67 2e 20 4a 6f 62 62 65 6e 65 0a 62 6c 69 76 65 72 20 70 72 69 6f 72 69 74 65 72 65 74 20 65 ┆ng. Jobbene bliver prioriteret e┆
0x00700…00720 66 74 65 72 20 66 6f 72 76 65 6e 74 65 74 20 6b 7c 72 65 74 69 64 2c 20 66 6f 72 62 72 75 67 74 ┆fter forventet køretid, forbrugt┆
0x00720…00740 0a 74 69 64 20 6f 67 20 65 66 74 65 72 20 68 76 6f 72 20 6d 61 6e 67 65 20 6a 6f 62 73 20 65 6e ┆ tid og efter hvor mange jobs en┆
0x00740…00760 20 62 72 75 67 65 72 67 72 75 70 70 65 20 61 6c 6c 65 72 65 64 65 0a 65 72 20 76 65 64 20 61 74 ┆ brugergruppe allerede er ved at┆
0x00760…00780 20 66 7d 20 61 66 76 69 6b 6c 65 74 2e 0a 0a 42 61 67 67 72 75 6e 64 73 6c 61 67 65 72 2e 0a 52 ┆ få afviklet. Baggrundslager. R┆
0x00780…007a0 43 38 30 30 30 27 73 20 6d 7d 64 65 20 61 74 20 62 65 68 61 6e 64 6c 65 20 62 61 67 67 72 75 6e ┆C8000's måde at behandle baggrun┆
0x007a0…007c0 64 73 6c 61 67 65 72 20 70 7d 20 75 64 76 69 73 65 72 0a 65 6e 20 72 7b 6b 6b 65 20 61 66 76 69 ┆dslager på udviser en række afvi┆
0x007c0…007e0 67 65 6c 73 65 72 20 66 72 61 20 52 43 34 30 30 30 27 73 2e 20 48 65 72 20 73 6b 61 6c 20 6b 75 ┆gelser fra RC4000's. Her skal ku┆
0x007e0…00800 6e 20 6e 7b 76 6e 65 73 20 74 72 65 2c 0a 73 6f 6d 20 69 6d 69 64 6c 65 72 74 69 64 20 62 7c 72 ┆n nævnes tre, som imidlertid bør┆
0x00800…00820 20 68 75 73 6b 65 73 2e 20 31 29 20 49 20 52 43 34 30 30 30 20 6b 61 6e 20 6d 61 6e 20 6c 7b 73 ┆ huskes. 1) I RC4000 kan man læs┆
0x00820…00840 65 20 69 20 61 6c 6c 65 0a 6f 6d 72 7d 64 65 72 2e 20 44 65 74 74 65 20 65 72 20 69 6b 6b 65 20 ┆e i alle områder. Dette er ikke ┆
0x00840…00860 74 69 6c 66 7b 6c 64 65 74 20 69 20 52 43 38 30 30 30 2e 20 32 29 20 52 43 38 30 30 30 20 6f 70 ┆tilfældet i RC8000. 2) RC8000 op┆
0x00860…00880 72 65 74 74 65 72 0a 73 65 6c 76 20 6f 6d 72 7d 64 65 72 2e 20 48 76 69 73 20 6d 61 6e 20 66 2e ┆retter selv områder. Hvis man f.┆
0x00880…008a0 65 6b 73 2e 20 7c 6e 73 6b 65 72 20 61 74 20 65 64 69 74 65 72 65 72 20 6f 76 65 72 20 69 20 65 ┆eks. ønsker at editerer over i e┆
0x008a0…008c0 74 20 6f 6d 72 7d 64 65 2c 20 0a 6e 61 76 6e 31 2c 28 6e 61 76 6e 31 20 3d 20 65 64 69 74 20 6e ┆t område, navn1,(navn1 = edit n┆
0x008c0…008e0 61 76 6e 32 20 66 2e 65 6b 73 2e 29 20 6f 67 20 6e 61 76 6e 31 20 69 6b 6b 65 20 66 69 6e 64 65 ┆avn2 f.eks.) og navn1 ikke finde┆
0x008e0…00900 73 20 65 6c 6c 65 72 0a 6d 61 6e 20 69 6b 6b 65 20 6d 7d 20 73 6b 72 69 76 65 20 69 20 64 65 74 ┆s eller man ikke må skrive i det┆
0x00900…00f00 (1,) Data for complinp
0x00f00…01b00 Data for multicopinp
0x01b00…02100 (3,) Data for compfphead
0x02100…02a00 Data for compdes
0x02a00…03000 Data for listerrinp
0x03000…04200 Data for describeinp
0x04200…04e00 Data for writestdinp
0x04e00…05400 Data for testbufinp
0x05400…06600 Data for stdvarinp
0x06600…06c00 Data for searchcinp
0x06c00…07200 (12,) Data for remspinp
0x07200…07e00 Data for mtreadinp
0x07e00…08400 (14,) Data for macroinp
0x08400…08a00 Data for listintinp
0x08a00…09900 Data for extractinp
0x09900…09f00 (17,) Data for docmoveinp
0x09f00…0a500 Data for convertinp
0x0a500…0ab00 Data for deviceinp
0x0ab00…0b100 (19,) Data for disccopyinp
0x0b100…0b700 Data for readparinp
0x0b700…0c000 Data for wrstdeinp
0x0c000…0c600 Data for careainp
0x0c600…0c900 (22,) Data for outshclinp
0x0c900…0cf00 Data for printfinp
0x0cf00…0d500 (23,) Data for procfinp
0x0d500…0db00 Data for progfinp
0x0db00…0e400 Data for guidec
0x0e400…10200 Data for guideinp
0x10200…10220 80 0b 73 80 00 01 7f ff fd 64 65 6c 65 74 65 72 65 63 69 00 00 80 00 04 64 72 75 6d 00 00 00 00 ┆ s deletereci drum ┆
0x10220…10240 00 00 00 00 80 11 54 04 80 00 00 00 00 00 40 00 00 70 02 80 04 c3 00 00 78 00 00 81 64 69 61 67 ┆ T @ p x diag┆
0x10240…10260 72 61 6d 00 00 00 00 00 80 00 00 64 72 75 6d 00 00 00 00 00 00 00 00 7c f9 c9 00 07 df 00 00 00 ┆ram drum ø ┆
0x10260…10280 00 00 00 00 00 0b 02 2f 7b 00 00 50 00 00 59 64 69 66 62 6f 67 32 00 00 00 00 00 00 00 0c 64 69 ┆ /æ P Ydifbog2 di┆
0x10280…102a0 73 63 32 00 00 00 00 00 00 00 80 ae aa 00 00 00 00 00 00 00 00 00 00 00 00 53 5c 6b 00 07 f8 00 ┆sc2 SØk ┆
0x102a0…102c0 08 01 64 6c 69 73 74 00 00 00 00 00 00 00 00 00 0e 64 69 73 63 31 00 00 00 00 00 00 00 80 bc f4 ┆ dlist disc1 ┆
0x102c0…102e0 00 00 00 00 00 00 00 00 00 00 00 00 64 78 c3 80 00 01 7f ff fd 64 75 6d 70 31 63 61 74 00 00 00 ┆ dx dump1cat ┆
0x102e0…10300 00 00 01 75 64 69 73 63 33 00 00 00 00 00 00 00 80 ae 56 00 00 00 00 00 00 00 b0 00 00 00 14 05 ┆ udisc3 V ┆
0x10300…10320 c4 93 01 11 7a 01 11 83 65 6c 69 73 32 00 00 00 00 00 00 00 00 00 09 64 69 73 63 34 00 00 00 00 ┆ z elis2 disc4 ┆
0x10320…10340 00 00 00 80 bc 62 00 00 00 00 00 00 00 00 00 00 00 00 07 35 03 01 11 7a 01 11 83 65 6c 69 73 34 ┆ b 5 z elis4┆
0x10340…10360 00 00 00 00 00 00 00 00 00 0a 64 69 73 63 34 00 00 00 00 00 00 00 80 be 43 00 00 00 00 00 00 00 ┆ disc4 C ┆
0x10360…10380 00 00 00 00 00 01 3c 4b 01 11 7a 01 11 83 65 6c 69 73 64 61 74 61 00 00 00 00 00 00 01 64 69 73 ┆ <K z elisdata dis┆
0x10380…103a0 63 34 00 00 00 00 00 00 00 80 bc 73 00 00 00 00 00 00 00 00 00 00 00 00 01 4a db 01 11 7a 01 11 ┆c4 s J z ┆
0x103a0…103c0 83 65 6c 69 73 6f 75 74 00 00 00 00 00 00 00 01 64 69 73 63 34 00 00 00 00 00 00 00 80 c2 bc 00 ┆ elisout disc4 ┆
0x103c0…103e0 00 00 00 00 00 00 00 00 00 00 00 53 1f 5b 00 00 00 7f ff fc 66 72 65 61 64 62 00 00 00 00 00 00 ┆ S Æ freadb ┆
0x103e0…10400 00 00 01 64 69 73 63 31 00 00 00 00 00 00 00 80 01 a0 08 80 00 00 00 00 00 41 7e 00 10 00 53 30 ┆ disc1 Aü S0┆
0x10400…10420 43 00 00 00 7f ff fc 66 72 65 61 64 72 00 00 00 00 00 00 00 00 01 64 69 73 63 31 00 00 00 00 00 ┆C freadr disc1 ┆
0x10420…10440 00 00 80 01 b2 10 80 00 00 00 00 00 41 90 00 10 00 53 4e 43 00 00 00 7f ff fc 66 72 65 61 64 72 ┆ A SNC freadr┆
0x10440…10460 61 00 00 00 00 00 00 00 01 64 69 73 63 31 00 00 00 00 00 00 00 80 01 76 04 d6 88 00 00 00 00 41 ┆a disc1 v A┆
0x10460…10480 54 00 10 00 11 17 03 80 00 01 7f ff fd 67 65 6e 73 63 61 6e 00 00 00 00 00 00 00 27 64 69 73 63 ┆T genscan 'disc┆
0x10480…104a0 35 00 00 00 00 00 00 00 80 bd b5 80 b1 30 00 00 00 00 2a 60 00 0b ee 11 bf 53 80 00 01 7f ff fd ┆5 0 *` S ┆
0x104a0…104c0 67 65 6e 73 79 6e 74 61 78 00 00 00 00 00 30 64 69 73 63 35 00 00 00 00 00 00 00 80 bd b6 80 b1 ┆gensyntax 0disc5 ┆
0x104c0…104e0 8a 00 00 00 00 2a 60 00 0b ee 80 00 83 80 00 01 7f ff fd 67 65 74 6e 65 77 00 00 00 00 00 00 80 ┆ *` getnew ┆
0x104e0…10500 00 04 64 72 75 6d 00 00 00 00 00 00 00 00 81 10 54 08 30 c0 00 00 00 00 41 a8 01 20 3a 00 00 00 ┆ drum T 0 A : ┆
0x10500…10520 (29,) 80 01 03 80 00 01 7f ff fd 67 65 74 70 61 72 61 6d 73 69 00 00 80 00 04 64 72 75 6d 00 00 00 00 ┆ getparamsi drum ┆
0x10520…10540 00 00 00 00 80 60 18 0e 72 00 00 00 00 00 40 00 00 70 02 14 be d3 00 07 e4 00 07 ed 68 63 72 68 ┆ ` r @ p hcrh┆
0x10540…10560 63 6f 6d 74 00 00 00 00 00 00 14 64 69 73 63 31 00 00 00 00 00 00 00 80 61 07 00 00 00 00 00 00 ┆comt disc1 a ┆
0x10560…10580 00 00 00 00 00 00 14 fa 63 00 00 00 7f ff fc 68 63 7c 6c 69 62 00 00 00 00 00 00 00 01 3a 64 69 ┆ c hcølib :di┆
0x10580…105a0 73 63 31 00 00 00 00 00 00 00 80 01 c0 0c 00 00 00 00 00 00 41 92 00 20 00 10 0d 03 01 11 7a 01 ┆sc1 A z ┆
0x105a0…105c0 11 83 68 65 61 74 63 76 73 63 00 00 00 00 00 00 08 64 69 73 63 35 00 00 00 00 00 00 00 80 56 85 ┆ heatcvsc disc5 V ┆
0x105c0…105e0 00 00 00 00 00 00 00 00 00 00 00 00 01 22 33 01 11 7a 01 11 83 68 65 61 74 72 65 6c 73 00 00 00 ┆ "3 z heatrels ┆
0x105e0…10600 00 00 00 06 64 69 73 63 34 00 00 00 00 00 00 00 80 b6 3b 00 00 00 00 00 00 00 00 00 00 00 00 80 ┆ disc4 ; ┆
0x10600…10620 07 a3 00 00 00 7f ff fc 68 6f 75 73 74 6f 6e 61 00 00 00 00 80 00 14 64 72 75 6d 00 00 00 00 00 ┆ houstona drum ┆
0x10620…10640 00 00 00 77 ba d5 00 00 00 00 00 00 00 00 00 00 00 00 53 2b 2b 00 00 00 7f ff fc 69 66 72 65 61 ┆ w S++ ifrea┆
0x10640…10660 64 69 00 00 00 00 00 00 00 01 64 69 73 63 31 00 00 00 00 00 00 00 80 01 b2 0c 80 00 00 00 00 00 ┆di disc1 ┆
0x10660…10680 41 90 00 10 00 80 0c cb 80 00 01 7f ff fd 69 6e 69 74 63 6f 6d 00 00 00 00 00 80 00 04 64 72 75 ┆A initcom dru┆
0x10680…106a0 6d 00 00 00 00 00 00 00 00 81 10 94 05 90 c3 0d e0 00 00 41 a8 01 20 3a 80 00 4b 80 00 01 7f ff ┆m A : K ┆
0x106a0…106c0 fd 69 6e 69 74 66 69 6c 65 69 00 00 00 80 00 04 64 72 75 6d 00 00 00 00 00 00 00 00 80 20 12 04 ┆ initfilei drum ┆
0x106c0…106e0 e3 88 00 00 00 00 40 00 00 70 02 80 0b 13 80 00 01 7f ff fd 69 6e 69 74 72 65 63 69 00 00 00 00 ┆ @ p initreci ┆
0x106e0…10700 80 00 04 64 72 75 6d 00 00 00 00 00 00 00 00 80 10 88 05 a2 00 00 00 00 00 40 00 00 70 02 80 03 ┆ drum @ p ┆
0x10700…10720 33 80 00 01 7f ff fd 69 6e 73 65 72 74 72 65 63 69 00 00 80 00 04 64 72 75 6d 00 00 00 00 00 00 ┆3 insertreci drum ┆
0x10720…10740 00 00 80 30 22 05 a2 00 00 00 00 00 40 00 00 70 02 11 6c 93 80 00 01 7f ff fd 69 73 6f 74 61 62 ┆ 0" @ p l isotab┆
0x10740…10760 6c 65 00 00 00 00 00 00 1c 64 69 73 63 35 00 00 00 00 00 00 00 80 00 12 05 90 00 00 00 00 00 40 ┆le disc5 @┆
0x10760…10780 0a 00 10 00 03 83 8b 01 11 7a 01 11 83 6a 6f 62 66 00 00 00 00 00 00 00 00 00 00 01 64 69 73 63 ┆ z jobf disc┆
0x10780…107a0 34 00 00 00 00 00 00 00 80 b6 0b 00 00 00 00 00 00 00 00 00 00 00 00 06 5e 3b 01 11 7a 01 11 83 ┆4 ^; z ┆
0x107a0…107c0 6a 6f 62 66 34 00 00 00 00 00 00 00 00 00 01 64 69 73 63 34 00 00 00 00 00 00 00 80 c2 bb 00 00 ┆jobf4 disc4 ┆
0x107c0…107e0 00 00 00 00 00 00 00 00 00 00 10 ed e3 00 00 50 00 00 59 6a 6f 64 75 6d 70 00 00 00 00 00 00 00 ┆ P Yjodump ┆
0x107e0…10800 00 05 64 69 73 63 33 00 00 00 00 00 00 00 80 c2 ec 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ┆ disc3 ┆
0x10800…10820 11 95 6b 00 00 50 00 00 59 6a 7c 72 67 65 6e 00 00 00 00 00 00 00 00 06 64 69 73 63 32 00 00 00 ┆ k P Yjørgen disc2 ┆
0x10820…10840 00 00 00 00 80 56 62 00 00 00 00 00 00 00 00 00 00 00 00 52 55 93 00 07 e4 00 07 ed 6b 6b 62 75 ┆ Vb RU kkbu┆
0x10840…10860 64 00 00 00 00 00 00 00 00 00 04 64 69 73 63 31 00 00 00 00 00 00 00 80 62 15 00 00 00 00 00 00 ┆d disc1 b ┆
0x10860…10880 00 00 00 00 00 00 52 04 d3 00 07 e4 00 07 ed 6b 6b 68 63 6c 6f 61 64 00 00 00 00 00 00 04 64 69 ┆ R kkhcload di┆
0x10880…108a0 73 63 31 00 00 00 00 00 00 00 80 54 ec 00 00 00 00 00 00 00 00 00 00 00 00 1e b3 93 00 07 e4 00 ┆sc1 T ┆
0x108a0…108c0 07 ed 6b 6b 6c 70 00 00 00 00 00 00 00 00 00 00 0a 64 69 73 63 31 00 00 00 00 00 00 00 80 5b f1 ┆ kklp disc1 Æ ┆
0x108c0…108e0 00 00 01 00 00 00 00 00 00 00 00 00 18 8d d3 00 07 e4 00 07 ed 6b 6b 6c 70 32 00 00 00 00 00 00 ┆ kklp2 ┆
0x108e0…10900 00 00 00 07 64 69 73 63 33 00 00 00 00 00 00 00 80 bb 98 00 00 00 00 00 00 00 00 00 00 00 00 1f ┆ disc3 ┆
0x10900…10920 b1 53 00 07 e4 00 07 ed 6b 6b 6d 6f 6e 38 30 30 33 00 00 00 00 00 65 64 69 73 63 31 00 00 00 00 ┆ S kkmon8003 edisc1 ┆
0x10920…10940 00 00 00 80 5b f6 00 00 00 00 00 00 00 20 06 00 c8 4a 66 88 4b 00 07 e4 00 07 ed 6b 6b 6d 6f 6e ┆ Æ Jf K kkmon┆
0x10940…10960 72 65 74 33 00 00 00 00 00 26 64 69 73 63 33 00 00 00 00 00 00 00 80 5b de 00 00 00 00 00 00 00 ┆ret3 &disc3 Æ ┆
0x10960…10980 00 00 00 00 00 2c 8d 73 00 07 e4 00 07 ed 6b 6b 6f 70 74 33 00 00 00 00 00 00 00 00 17 64 69 73 ┆ , s kkopt3 dis┆
0x10980…109a0 63 31 00 00 00 00 00 00 00 80 55 34 00 00 00 00 00 00 00 00 00 00 00 00 2c e4 cb 00 07 e4 00 07 ┆c1 U4 , ┆
0x109a0…109c0 ed 6b 6b 72 68 00 00 00 00 00 00 00 00 00 00 11 64 69 73 63 31 00 00 00 00 00 00 00 80 61 f0 00 ┆ kkrh disc1 a ┆
0x109c0…109e0 00 00 00 00 00 00 20 04 00 20 e2 06 1c fb 00 07 e4 00 07 ed 6b 6b 72 68 74 00 00 00 00 00 00 00 ┆ kkrht ┆
0x109e0…10a00 00 00 09 64 69 73 63 00 00 00 00 00 00 00 00 80 61 ef 00 00 00 00 00 00 00 00 00 00 00 00 08 50 ┆ disc a P┆
0x10a00…10a20 db 00 07 e4 00 07 ed 6b 6b 74 69 31 74 00 00 00 00 00 00 00 00 06 64 69 73 63 31 00 00 00 00 00 ┆ kkti1t disc1 ┆
0x10a20…10a40 00 00 80 bb 97 00 00 00 00 00 00 00 00 00 00 00 00 80 08 9b 80 00 01 7f ff fd 6c 61 73 74 74 6f ┆ lastto┆
0x10a40…10a60 74 61 6c 00 00 00 80 00 04 64 72 75 6d 00 00 00 00 00 00 00 00 73 3a 3e 00 00 00 00 00 00 00 00 ┆tal drum s:> ┆
0x10a60…10a80 00 00 00 00 80 01 43 80 00 01 7f ff fd 6c 70 00 00 00 00 00 00 00 00 00 00 80 00 0e 64 72 75 6d ┆ C lp drum┆
0x10a80…10aa0 00 00 00 00 00 00 00 00 7f 74 1c 00 00 00 00 00 00 00 00 00 00 00 00 80 04 d3 00 75 30 00 9c 3f ┆ t u0 ?┆
0x10aa0…10ac0 6c 70 72 00 00 00 00 00 00 00 00 00 80 20 08 64 72 75 6d 00 00 00 00 00 00 00 00 7d 3e 66 00 00 ┆lpr drum å>f ┆
0x10ac0…10ae0 00 00 00 00 00 00 00 00 00 00 52 49 33 00 00 00 7f ff fc 6d 61 74 72 69 78 6d 75 6c 74 00 00 00 ┆ RI3 matrixmult ┆
0x10ae0…10b00 00 01 64 69 73 63 31 00 00 00 00 00 00 00 80 01 0a 05 a6 9a 34 d3 40 00 40 12 00 10 00 00 00 00 ┆ disc1 4 @ @ ┆
0x10b00…10b20 2c f9 03 80 00 01 7f ff fd 6d 74 31 70 6f 6f 6c 00 00 00 00 00 00 00 1c 64 69 73 63 33 00 00 00 ┆, mt1pool disc3 ┆
0x10b20…10b40 00 00 00 00 80 ae 56 00 00 00 00 00 00 00 b0 00 00 00 00 80 0b 8b 00 07 e4 00 07 ed 6d 74 78 00 ┆ V mtx ┆
0x10b40…10b60 00 00 00 00 00 00 00 00 80 00 12 64 72 75 6d 00 00 00 00 00 00 00 00 7c 29 50 00 00 00 00 00 00 ┆ drum ø)P ┆
0x10b60…10b80 00 00 00 00 00 00 80 0e eb 80 00 01 7f ff fd 6e 65 78 74 72 65 63 69 00 00 00 00 80 00 04 64 72 ┆ nextreci dr┆
0x10b80…10ba0 75 6d 00 00 00 00 00 00 00 00 80 01 58 04 80 00 00 00 00 00 40 00 00 70 02 32 81 cb 80 00 01 7f ┆um X @ p 2 ┆
0x10ba0…10bc0 ff fd 6e 74 72 61 6d 6f 73 00 00 00 00 00 00 01 4c 64 69 73 63 33 00 00 00 00 00 00 00 80 bc 50 ┆ ntramos Ldisc3 P┆
0x10bc0…10be0 80 b0 86 00 00 00 00 2a 60 00 0b ee 51 4b 3b 00 07 f8 00 08 01 6e 74 72 61 6d 74 72 61 6e 73 00 ┆ *` QK; ntramtrans ┆
0x10be0…10c00 00 00 00 01 64 69 73 63 31 00 00 00 00 00 00 00 80 bc 54 00 00 00 00 00 00 00 00 00 00 00 00 80 ┆ disc1 T ┆
0x10c00…10c20 0d e3 80 00 01 7f ff fd 6f 70 65 6e 61 64 70 00 00 00 00 00 80 00 04 64 72 75 6d 00 00 00 00 00 ┆ openadp drum ┆
0x10c20…10c40 00 00 00 80 10 14 04 26 88 00 00 00 00 40 00 00 20 02 80 02 ab 80 00 01 7f ff fd 6f 70 65 6e 61 ┆ & @ opena┆
0x10c40…10c60 6e 64 70 6f 73 00 00 80 00 04 64 72 75 6d 00 00 00 00 00 00 00 00 80 10 0e 04 30 c2 68 80 00 00 ┆ndpos drum 0 h ┆
0x10c60…10c80 40 00 00 20 02 80 06 e3 00 07 f8 00 08 01 6f 73 63 68 65 63 6b 00 00 00 00 00 80 00 00 64 72 75 ┆@ oscheck dru┆
0x10c80…10ca0 6d 00 00 00 00 00 00 00 00 80 00 ef 00 00 00 00 00 00 00 00 00 00 00 00 80 07 23 80 00 01 7f ff ┆m # ┆
0x10ca0…10cc0 fd 6f 75 74 65 6e 64 00 00 00 00 00 00 80 00 04 64 72 75 6d 00 00 00 00 00 00 00 00 81 10 88 04 ┆ outend drum ┆
0x10cc0…10ce0 80 00 00 00 00 00 41 a8 01 20 3a 80 0a 03 00 c3 50 00 ea 5f 70 63 6f 6e 76 65 72 74 00 00 00 00 ┆ A : P _pconvert ┆
0x10ce0…10d00 80 00 04 64 72 75 6d 00 00 00 00 00 00 00 00 80 00 7a 0d b0 00 00 00 00 02 20 3e 00 20 00 80 07 ┆ drum z > ┆
0x10d00…10d20 b3 80 00 01 7f ff fd 70 6c 00 00 00 00 00 00 00 00 00 00 80 00 14 64 72 75 6d 00 00 00 00 00 00 ┆ pl drum ┆
0x10d20…10d40 00 00 63 99 3e 00 00 00 00 00 00 00 00 00 00 00 00 80 0e 33 80 00 01 7f ff fd 70 6f 73 69 74 69 ┆ c > 3 positi┆
0x10d40…10d60 6f 6e 61 64 70 00 80 00 04 64 72 75 6d 00 00 00 00 00 00 00 00 80 10 10 04 30 c8 00 00 00 00 40 ┆onadp drum 0 @┆
0x10d60…10d80 00 00 20 02 07 f9 7b 00 00 14 00 00 1d 70 72 69 6d 65 73 00 00 00 00 00 00 00 00 01 64 69 73 63 ┆ æ primes disc┆
0x10d80…10da0 35 00 00 00 00 00 00 00 7e 25 fb 00 00 01 00 00 00 00 00 04 00 01 b6 ff ff ff ff ff ff ff ff ff ┆5 ü% ┆
0x10da0…10dc0 70 72 69 6d 6f 73 70 6f 6f 6c 00 00 00 00 64 64 72 75 6d 00 00 00 00 00 00 00 00 80 c2 a8 00 00 ┆primospool ddrum ┆
0x10dc0…10de0 00 00 00 00 00 00 00 00 00 00 ff ff ff ff ff ff ff ff ff 70 72 69 6d 6f 74 65 73 74 00 00 00 00 ┆ primotest ┆
0x10de0…10e00 00 2a 64 69 73 63 31 00 00 00 00 00 00 00 80 c2 a8 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ┆ *disc1 ┆
0x10e00…10e20 (30,) 80 0a 4b 80 00 01 7f ff fd 70 74 72 65 00 00 00 00 00 00 00 00 80 20 0a 64 72 75 6d 00 00 00 00 ┆ K ptre drum ┆
0x10e20…10e40 00 00 00 00 63 99 3e 00 00 00 00 00 00 00 00 00 00 00 00 80 00 6b 80 00 01 7f ff fd 70 74 72 66 ┆ c > k ptrf┆
0x10e40…10e60 00 00 00 00 00 00 00 00 80 60 0a 64 72 75 6d 00 00 00 00 00 00 00 00 63 99 3e 00 00 00 00 00 00 ┆ ` drum c > ┆
0x10e60…10e80 00 00 00 00 00 00 80 0e fb 80 00 01 7f ff fd 70 74 72 6e 00 00 00 00 00 00 00 00 80 40 0a 64 72 ┆ ptrn @ dr┆
0x10e80…10ea0 75 6d 00 00 00 00 00 00 00 00 63 99 3e 00 00 00 00 00 00 00 00 00 00 00 00 80 05 1b 80 00 01 7f ┆um c > ┆
0x10ea0…10ec0 ff fd 70 74 72 6f 00 00 00 00 00 00 00 00 80 00 0a 64 72 75 6d 00 00 00 00 00 00 00 00 63 99 3e ┆ ptro drum c >┆
0x10ec0…10ee0 00 00 00 00 00 00 00 00 00 00 00 00 80 0c 83 80 00 01 7f ff fd 70 75 74 72 65 63 69 00 00 00 00 ┆ putreci ┆
0x10ee0…10f00 00 80 00 04 64 72 75 6d 00 00 00 00 00 00 00 00 80 10 7a 04 80 00 00 00 00 00 40 00 00 70 02 80 ┆ drum z @ p ┆
0x10f00…10f20 0c 9b 00 00 3c 00 00 45 72 00 00 00 00 00 00 00 00 00 00 00 80 40 12 64 72 75 6d 00 00 00 00 00 ┆ < Er @ drum ┆
0x10f20…10f40 00 00 00 7e 98 11 00 00 00 00 00 00 00 00 00 00 00 00 80 0c 9b 00 02 76 00 02 7f 72 00 00 00 00 ┆ ü v r ┆
0x10f40…10f60 00 00 00 00 00 00 00 80 40 12 64 72 75 6d 00 00 00 00 00 00 00 00 75 2b 56 00 00 04 00 00 00 00 ┆ @ drum u+V ┆
0x10f60…10f80 00 00 00 00 00 80 0c fb 00 02 62 00 02 6b 72 64 63 6f 73 00 00 00 00 00 00 00 80 00 04 64 72 75 ┆ b krdcos dru┆
0x10f80…10fa0 6d 00 00 00 00 00 00 00 00 80 01 20 91 60 00 00 00 00 00 40 00 ff ff e4 80 02 bb 00 02 62 00 02 ┆m ` @ b ┆
0x10fa0…10fc0 6b 72 64 72 65 61 6c 00 00 00 00 00 00 80 00 04 64 72 75 6d 00 00 00 00 00 00 00 00 80 01 1c 91 ┆krdreal drum ┆
0x10fc0…10fe0 60 00 00 00 00 00 40 00 ff ff ac 80 04 f3 00 02 62 00 02 6b 72 64 73 71 72 74 00 00 00 00 00 00 ┆` @ b krdsqrt ┆
0x10fe0…11000 80 00 04 64 72 75 6d 00 00 00 00 00 00 00 00 80 01 1e 91 60 00 00 00 00 00 40 00 ff ff c8 80 6a ┆ drum ` @ j┆
0x11000…11020 fb 00 00 00 7f ff fc 72 65 61 64 72 61 31 6c 00 00 00 00 80 00 04 64 69 73 63 31 00 00 00 00 00 ┆ readra1l disc1 ┆
0x11020…11040 00 00 80 00 b8 04 e3 8d 35 a2 40 0b 61 d2 00 30 00 80 07 fb 80 00 01 7f ff fd 72 65 6c 66 6f 72 ┆ 5 @ a 0 relfor┆
0x11040…11060 6d 61 74 73 00 00 80 00 04 64 72 75 6d 00 00 00 00 00 00 00 00 81 10 1c 04 00 00 00 00 00 00 41 ┆mats drum A┆
0x11060…11080 a8 01 20 3a 80 06 1b 80 00 01 7f ff fd 72 65 73 65 74 61 6c 69 61 73 00 00 80 00 04 64 72 75 6d ┆ : resetalias drum┆
0x11080…110a0 00 00 00 00 00 00 00 00 81 10 6c 04 00 00 00 00 00 00 41 a8 01 20 3a 80 00 cb 80 00 01 7f ff fd ┆ l A : ┆
0x110a0…110c0 72 65 73 75 6c 74 69 00 00 00 00 00 80 00 04 64 72 75 6d 00 00 00 00 00 00 00 00 00 00 01 24 00 ┆resulti drum $ ┆
0x110c0…110e0 00 00 00 00 00 40 00 00 70 02 80 0d 8b 00 00 00 00 07 cf 72 65 74 00 00 00 00 00 00 00 00 00 80 ┆ @ p ret ┆
0x110e0…11100 00 04 64 72 75 6d 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 0c 00 20 04 00 11 30 00 00 00 ┆ drum 0 ┆
0x11100…11120 07 b7 3b 80 00 01 7f ff fd 72 65 74 63 6f 6d 61 6c 00 00 00 00 00 00 01 64 69 73 63 35 00 00 00 ┆ ; retcomal disc5 ┆
0x11120…11140 00 00 00 00 80 bd ab 00 00 00 00 00 00 00 00 00 00 00 00 0b 6e 33 80 00 01 7f ff fd 73 63 61 6e ┆ n3 scan┆
0x11140…11160 74 61 62 6c 65 00 00 00 00 00 04 64 69 73 63 35 00 00 00 00 00 00 00 80 bd b6 00 00 00 00 00 00 ┆table disc5 ┆
0x11160…11180 00 00 00 00 00 00 80 02 33 80 00 01 7f ff fd 73 65 74 61 6c 69 61 73 00 00 00 00 80 00 04 64 72 ┆ 3 setalias dr┆
0x11180…111a0 75 6d 00 00 00 00 00 00 00 00 81 10 60 04 80 00 00 00 00 00 41 a8 01 20 3a 80 06 13 80 00 01 7f ┆um ` A : ┆
0x111a0…111c0 ff fd 73 65 74 64 65 73 63 00 00 00 00 00 80 00 04 64 72 75 6d 00 00 00 00 00 00 00 00 81 10 7a ┆ setdesc drum z┆
0x111c0…111e0 04 80 00 00 00 00 00 41 a8 01 20 3a 80 07 43 80 00 01 7f ff fd 73 65 74 70 61 72 61 6d 73 69 00 ┆ A : C setparamsi ┆
0x111e0…11200 00 80 00 04 64 72 75 6d 00 00 00 00 00 00 00 00 80 60 1a 0e 72 00 00 00 00 00 40 00 00 70 02 80 ┆ drum ` r @ p ┆
0x11200…11220 03 2b 80 00 01 7f ff fd 73 65 74 70 75 74 69 00 00 00 00 00 80 00 04 64 72 75 6d 00 00 00 00 00 ┆ + setputi drum ┆
0x11220…11240 00 00 00 80 10 14 04 80 00 00 00 00 00 40 00 00 70 02 80 0b 7b 80 00 01 7f ff fd 73 65 74 72 65 ┆ @ p æ setre┆
0x11240…11260 61 64 69 00 00 00 00 80 00 04 64 72 75 6d 00 00 00 00 00 00 00 00 80 10 12 04 80 00 00 00 00 00 ┆adi drum ┆
0x11260…11280 40 00 00 70 02 80 05 d3 80 00 01 7f ff fd 73 65 74 74 65 73 74 69 00 00 00 00 80 00 04 64 72 75 ┆@ p settesti dru┆
0x11280…112a0 6d 00 00 00 00 00 00 00 00 80 60 1c 0e 72 00 00 00 00 00 40 00 00 70 02 80 08 4b 80 00 01 7f ff ┆m ` r @ p K ┆
0x112a0…112c0 fd 73 65 74 75 70 64 61 74 65 69 00 00 80 00 04 64 72 75 6d 00 00 00 00 00 00 00 00 80 10 16 04 ┆ setupdatei drum ┆
0x112c0…112e0 80 00 00 00 00 00 40 00 00 70 02 61 92 9b 00 00 00 7f ff fc 73 70 6c 6e 33 00 00 00 00 00 00 00 ┆ @ p a spln3 ┆
0x112e0…11300 00 00 04 64 69 73 63 33 00 00 00 00 00 00 00 80 01 62 04 d6 9a 69 a0 00 00 41 28 00 40 00 63 38 ┆ disc3 b i A( @ c8┆
0x11300…11320 db 00 00 00 7f ff fc 73 70 6c 6e 33 69 6e 74 00 00 00 00 00 00 03 64 69 73 63 33 00 00 00 00 00 ┆ spln3int disc3 ┆
0x11320…11340 00 00 80 01 e6 10 d6 9a 68 e0 00 00 41 b8 00 30 06 63 19 43 00 00 00 7f ff fc 73 70 6c 6e 33 69 ┆ h A 0 c C spln3i┆
0x11340…11360 6e 76 00 00 00 00 00 00 04 64 69 73 63 33 00 00 00 00 00 00 00 80 01 b0 08 d6 9a 68 e1 00 00 41 ┆nv disc3 h A┆
0x11360…11380 76 00 40 12 63 0b 3b 00 00 00 7f ff fc 73 70 6c 6e 33 76 61 6c 00 00 00 00 00 00 02 64 69 73 63 ┆v @ c ; spln3val disc┆
0x11380…113a0 33 00 00 00 00 00 00 00 80 01 72 10 d6 9a 68 e0 00 00 41 44 00 20 02 0b 4d 73 80 00 01 7f ff fd ┆3 r h AD Ms ┆
0x113a0…113c0 73 70 6f 6f 6c 66 75 6c 6c 00 00 00 00 00 01 64 69 73 63 35 00 00 00 00 00 00 00 80 00 14 08 d0 ┆spoolfull disc5 ┆
0x113c0…113e0 00 00 00 00 00 40 0c 00 10 00 80 02 db 80 00 01 7f ff fd 73 74 61 72 74 63 6f 6d 00 00 00 00 80 ┆ @ startcom ┆
0x113e0…11400 00 04 64 72 75 6d 00 00 00 00 00 00 00 00 81 10 46 04 d3 40 00 00 00 00 41 a8 01 20 3a 00 00 00 ┆ drum F @ A : ┆
0x11400…11420 80 0f 3b 80 00 01 7f ff fd 73 74 61 72 74 66 69 6c 65 69 00 00 80 00 04 64 72 75 6d 00 00 00 00 ┆ ; startfilei drum ┆
0x11420…11440 00 00 00 00 80 20 36 04 80 00 00 00 00 00 40 00 00 70 02 3d 36 2b 80 00 01 7f ff fd 73 75 73 65 ┆ 6 @ p =6+ suse┆
0x11440…11460 72 63 61 74 00 00 00 00 00 00 0a 64 69 73 63 31 00 00 00 00 00 00 00 67 29 1b 00 00 00 00 00 00 ┆rcat disc1 g) ┆
0x11460…11480 00 00 00 00 00 00 3d 4a 53 80 00 01 7f ff fd 73 76 61 6e 65 73 61 6e 67 00 00 00 00 00 01 64 69 ┆ =JS svanesang di┆
0x11480…114a0 73 63 31 00 00 00 00 00 00 00 80 af e5 00 00 00 00 00 00 00 00 00 00 00 00 0c be 0b 80 00 01 7f ┆sc1 ┆
0x114a0…114c0 ff fd 73 79 6e 74 61 78 74 61 62 6c 65 00 00 00 06 64 69 73 63 35 00 00 00 00 00 00 00 80 bd b6 ┆ syntaxtable disc5 ┆
0x114c0…114e0 00 00 00 00 00 00 00 00 00 00 00 00 08 64 db 00 00 50 00 00 59 73 7c 72 65 6e 00 00 00 00 00 00 ┆ d P Ysøren ┆
0x114e0…11500 00 00 00 03 64 69 73 63 32 00 00 00 00 00 00 00 80 5b 44 00 00 00 00 00 00 00 00 00 00 00 00 34 ┆ disc2 ÆD 4┆
0x11500…11520 c4 8b 00 00 50 00 00 59 73 7c 72 65 6e 6f 75 74 00 00 00 00 00 00 04 64 69 73 63 32 00 00 00 00 ┆ P Ysørenout disc2 ┆
0x11520…11540 00 00 00 80 5b 45 00 00 00 00 00 00 00 00 00 00 00 00 66 b0 c3 00 00 50 00 00 59 73 7c 72 65 6e ┆ ÆE f P Ysøren┆
0x11540…11560 70 72 6f 6f 66 00 00 00 00 04 64 69 73 63 33 00 00 00 00 00 00 00 80 5b 45 00 00 00 00 00 00 00 ┆proof disc3 ÆE ┆
0x11560…11580 00 00 00 00 00 80 03 1b 00 07 f8 00 08 01 74 32 00 00 00 00 00 00 00 00 00 00 80 00 08 64 72 75 ┆ t2 dru┆
0x11580…115a0 6d 00 00 00 00 00 00 00 00 7d 6f be 00 00 00 00 00 00 00 00 00 00 00 00 80 0b ab 80 00 01 7f ff ┆m åo ┆
0x115a0…115c0 fd 74 61 70 65 61 64 70 00 00 00 00 00 80 00 04 64 72 75 6d 00 00 00 00 00 00 00 00 80 10 fe 04 ┆ tapeadp drum ┆
0x115c0…115e0 42 00 00 00 00 00 40 00 00 20 02 3d 65 bb 00 07 f8 00 08 01 74 62 61 74 63 68 00 00 00 00 00 00 ┆B @ =e tbatch ┆
0x115e0…11600 00 00 15 64 69 73 63 31 00 00 00 00 00 00 00 80 bb 56 00 00 00 00 00 00 00 00 00 00 00 00 08 65 ┆ disc1 V e┆
0x11600…11620 bb 00 07 f8 00 08 01 74 62 72 75 67 65 72 76 65 6a 00 00 00 00 0d 64 69 73 63 31 00 00 00 00 00 ┆ tbrugervej disc1 ┆
0x11620…11640 00 00 80 c2 c8 00 00 00 00 00 00 00 00 00 00 00 00 3e 15 c3 00 07 f8 00 08 01 74 63 68 69 6c 64 ┆ > tchild┆
0x11640…11660 70 72 00 00 00 00 00 00 21 64 69 73 63 31 00 00 00 00 00 00 00 80 bc 13 00 00 00 00 00 00 00 00 ┆pr !disc1 ┆
0x11660…11680 00 00 00 00 80 0b bb 00 00 00 7f ff fc 74 65 6b 34 30 30 36 61 00 00 00 00 80 00 14 64 72 75 6d ┆ tek4006a drum┆
0x11680…116a0 00 00 00 00 00 00 00 00 7f 2d 11 00 00 00 00 00 00 00 00 00 00 00 00 80 0b bb 00 c3 64 00 c3 6d ┆ - d m┆
0x116a0…116c0 74 65 6b 34 30 30 36 61 00 00 00 00 80 00 14 64 72 75 6d 00 00 00 00 00 00 00 00 7d b7 16 00 00 ┆tek4006a drum å ┆
0x116c0…116e0 00 00 00 00 00 00 00 00 00 00 80 04 23 00 75 30 00 9c 3f 74 65 6b 34 30 30 36 62 00 00 00 00 80 ┆ # u0 ?tek4006b ┆
0x116e0…11700 00 14 64 72 75 6d 00 00 00 00 00 00 00 00 7b 9a 70 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ┆ drum æ p ┆
0x11700…11720 (31,) 80 0c 23 00 75 30 00 75 39 74 65 6b 34 30 30 36 63 00 00 00 00 80 00 14 64 72 75 6d 00 00 00 00 ┆ # u0 u9tek4006c drum ┆
0x11720…11740 00 00 00 00 7f bb 79 00 00 00 00 00 00 00 00 00 00 00 00 61 03 4b 80 00 01 7f ff fd 74 65 6d 31 ┆ y a K tem1┆
0x11740…11760 63 61 74 00 00 00 00 00 00 00 0b 64 69 73 63 33 00 00 00 00 00 00 00 00 00 98 00 00 00 00 00 00 ┆cat disc3 ┆
0x11760…11780 00 00 00 00 00 00 33 49 03 80 00 01 7f ff fd 74 65 6d 32 63 61 74 00 00 00 00 00 00 00 0c 64 69 ┆ 3I tem2cat di┆
0x11780…117a0 73 63 33 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 80 05 ab 80 00 01 7f ┆sc3 ┆
0x117a0…117c0 ff fd 74 65 72 6d 00 00 00 00 00 00 00 00 80 00 08 64 72 75 6d 00 00 00 00 00 00 00 00 63 99 3e ┆ term drum c >┆
0x117c0…117e0 00 00 00 00 00 00 00 00 00 00 00 00 0b 54 a3 80 00 01 7f ff fd 74 65 73 74 62 69 74 00 00 00 00 ┆ T testbit ┆
0x117e0…11800 00 00 00 03 64 69 73 63 35 00 00 00 00 00 00 00 80 00 b2 08 30 00 00 00 00 00 40 6a 00 30 06 61 ┆ disc5 0 @j 0 a┆
0x11800…11820 85 bb 00 07 e4 00 07 ed 74 68 63 7c 6d 61 74 00 00 00 00 00 00 00 fc 64 69 73 63 33 00 00 00 00 ┆ thcømat disc3 ┆
0x11820…11840 00 00 00 80 56 08 00 00 00 00 00 00 00 a0 00 01 f8 00 0c f6 bb 00 00 14 00 00 1d 74 6f 6f 62 61 ┆ V tooba┆
0x11840…11860 64 00 00 00 00 00 00 00 00 0d 64 69 73 63 35 00 00 00 00 00 00 00 7d b3 46 00 00 0d 00 00 00 00 ┆d disc5 å F ┆
0x11860…11880 00 04 00 01 04 80 04 db 00 07 f8 00 08 01 74 6f 73 73 73 79 73 64 65 66 31 00 80 00 00 64 72 75 ┆ tosssysdef1 dru┆
0x11880…118a0 6d 00 00 00 00 00 00 00 00 00 00 28 02 80 00 00 00 00 00 00 00 00 00 00 80 0c db 00 07 f8 00 08 ┆m ( ┆
0x118a0…118c0 01 74 6f 73 73 73 79 73 64 65 66 32 00 80 00 00 64 72 75 6d 00 00 00 00 00 00 00 00 02 00 00 02 ┆ tosssysdef2 drum ┆
0x118c0…118e0 00 00 00 00 00 00 00 00 00 00 00 41 fd 0b 00 07 f8 00 08 01 74 70 61 72 65 6e 74 6d 65 73 73 00 ┆ A tparentmess ┆
0x118e0…11900 00 00 09 64 69 73 63 31 00 00 00 00 00 00 00 80 bc 07 00 00 00 00 00 00 00 00 00 00 00 00 80 03 ┆ disc1 ┆
0x11900…11920 63 80 00 01 7f ff fd 74 70 65 00 00 00 00 00 00 00 00 00 80 20 0c 64 72 75 6d 00 00 00 00 00 00 ┆c tpe drum ┆
0x11920…11940 00 00 79 37 03 00 00 00 00 00 00 00 00 00 00 00 00 80 03 6b 80 00 01 7f ff fd 74 70 66 00 00 00 ┆ y7 k tpf ┆
0x11940…11960 00 00 00 00 00 00 80 60 0c 64 72 75 6d 00 00 00 00 00 00 00 00 63 99 3e 00 00 00 00 00 00 00 00 ┆ ` drum c > ┆
0x11960…11980 00 00 00 00 2d 49 b3 00 00 78 00 00 81 74 70 6c 6f 74 64 65 63 00 00 00 00 00 00 08 64 69 73 63 ┆ -I x tplotdec disc┆
0x11980…119a0 32 00 00 00 00 00 00 00 80 bc 66 00 00 00 00 00 00 00 00 00 00 00 00 80 03 ab 80 00 01 7f ff fd ┆2 f ┆
0x119a0…119c0 74 70 6e 00 00 00 00 00 00 00 00 00 80 40 0c 64 72 75 6d 00 00 00 00 00 00 00 00 63 99 3e 00 00 ┆tpn @ drum c > ┆
0x119c0…119e0 00 00 00 00 00 00 00 00 00 00 80 03 b3 80 00 01 7f ff fd 74 70 6f 00 00 00 00 00 00 00 00 00 80 ┆ tpo ┆
0x119e0…11a00 00 0c 64 72 75 6d 00 00 00 00 00 00 00 00 63 99 3e 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ┆ drum c > ┆
0x11a00…11a20 42 15 73 00 07 f8 00 08 01 74 70 72 69 6d 69 6e 00 00 00 00 00 00 00 08 64 69 73 63 31 00 00 00 ┆B s tprimin disc1 ┆
0x11a20…11a40 00 00 00 00 80 bc 09 00 00 00 00 00 00 00 00 00 00 00 00 80 03 db 80 00 01 7f ff fd 74 70 74 00 ┆ tpt ┆
0x11a40…11a60 00 00 00 00 00 00 00 00 80 80 0c 64 72 75 6d 00 00 00 00 00 00 00 00 63 99 3e 00 00 00 00 00 00 ┆ drum c > ┆
0x11a60…11a80 00 00 00 00 00 00 43 24 73 00 07 f8 00 08 01 74 72 61 6d 6f 70 74 69 6f 6e 00 00 00 00 02 64 69 ┆ C$s tramoption di┆
0x11a80…11aa0 73 63 31 00 00 00 00 00 00 00 80 bc 04 00 00 00 00 00 00 00 00 00 00 00 00 43 32 fb 80 00 01 7f ┆sc1 C2 ┆
0x11aa0…11ac0 ff fd 74 72 61 6d 6f 73 00 00 00 00 00 00 00 01 86 64 69 73 63 31 00 00 00 00 00 00 00 80 b0 27 ┆ tramos disc1 '┆
0x11ac0…11ae0 80 b1 00 00 00 00 00 2a 60 00 0b ee 45 55 23 00 07 f8 00 08 01 74 72 61 6d 74 72 61 6e 73 00 00 ┆ *` EU# tramtrans ┆
0x11ae0…11b00 00 00 00 01 64 69 73 63 31 00 00 00 00 00 00 00 80 bc 54 00 00 00 00 00 00 00 00 00 00 00 00 45 ┆ disc1 T E┆
0x11b00…11b20 78 1b 00 07 f8 00 08 01 74 72 61 6d 74 72 69 6d 00 00 00 00 00 00 14 64 69 73 63 31 00 00 00 00 ┆x tramtrim disc1 ┆
0x11b20…11b40 00 00 00 80 bc 2e 00 00 00 00 00 00 00 00 00 00 00 00 80 03 cb 80 00 01 7f ff fd 74 72 65 00 00 ┆ . tre ┆
0x11b40…11b60 00 00 00 00 00 00 00 80 20 0a 64 72 75 6d 00 00 00 00 00 00 00 00 63 99 3e 00 00 00 00 00 00 00 ┆ drum c > ┆
0x11b60…11b80 00 00 00 00 00 46 77 c3 00 07 f8 00 08 01 74 72 65 61 64 63 6c 69 73 74 00 00 00 00 20 64 69 73 ┆ Fw treadclist dis┆
0x11b80…11ba0 63 31 00 00 00 00 00 00 00 80 bc 20 00 00 00 00 00 00 00 00 00 00 00 00 46 a1 5b 00 07 f8 00 08 ┆c1 F Æ ┆
0x11ba0…11bc0 01 74 72 65 61 64 63 6f 6d 00 00 00 00 00 00 05 64 69 73 63 31 00 00 00 00 00 00 00 80 bc 27 00 ┆ treadcom disc1 ' ┆
0x11bc0…11be0 00 00 00 00 00 00 00 00 00 00 00 46 b7 1b 00 07 f8 00 08 01 74 72 65 61 64 6a 6f 62 00 00 00 00 ┆ F treadjob ┆
0x11be0…11c00 00 00 05 64 69 73 63 31 00 00 00 00 00 00 00 80 bc 1c 00 00 00 00 00 00 00 00 00 00 00 00 46 da ┆ disc1 F ┆
0x11c00…11c20 83 00 07 f8 00 08 01 74 72 65 61 64 73 75 62 00 00 00 00 00 00 14 64 69 73 63 31 00 00 00 00 00 ┆ treadsub disc1 ┆
0x11c20…11c40 00 00 80 bb 6c 00 00 00 00 00 00 00 00 00 00 00 00 80 03 d3 80 00 01 7f ff fd 74 72 66 00 00 00 ┆ l trf ┆
0x11c40…11c60 00 00 00 00 00 00 80 60 0a 64 72 75 6d 00 00 00 00 00 00 00 00 63 99 3e 00 00 00 00 00 00 00 00 ┆ ` drum c > ┆
0x11c60…11c80 00 00 00 00 80 04 13 80 00 01 7f ff fd 74 72 6e 00 00 00 00 00 00 00 00 00 80 40 0a 64 72 75 6d ┆ trn @ drum┆
0x11c80…11ca0 00 00 00 00 00 00 00 00 63 99 3e 00 00 00 00 00 00 00 00 00 00 00 00 80 04 1b 80 00 01 7f ff fd ┆ c > ┆
0x11ca0…11cc0 74 72 6f 00 00 00 00 00 00 00 00 00 80 00 0a 64 72 75 6d 00 00 00 00 00 00 00 00 63 99 3e 00 00 ┆tro drum c > ┆
0x11cc0…11ce0 00 00 00 00 00 00 00 00 00 00 08 7b f3 00 07 f8 00 08 01 74 72 75 6e 62 61 74 63 68 00 00 00 00 ┆ æ trunbatch ┆
0x11ce0…11d00 00 17 64 69 73 63 31 00 00 00 00 00 00 00 80 bb 83 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ┆ disc1 ┆
0x11d00…11d20 48 b9 2b 00 07 f8 00 08 01 74 73 74 61 72 74 75 70 00 00 00 00 00 00 01 64 69 73 63 31 00 00 00 ┆H + tstartup disc1 ┆
0x11d20…11d40 00 00 00 00 80 bb 4d 00 00 00 00 00 00 00 00 00 00 00 00 49 d4 eb 00 07 f8 00 08 01 74 74 72 61 ┆ M I ttra┆
0x11d40…11d60 6d 6f 73 00 00 00 00 00 00 00 8c 64 69 73 63 31 00 00 00 00 00 00 00 7f a8 07 00 00 00 00 00 00 ┆mos disc1 ┆
0x11d60…11d80 00 00 00 00 00 00 4b 34 cb 00 07 f8 00 08 01 74 77 61 74 63 68 64 6f 67 00 00 00 00 00 04 64 69 ┆ K4 twatchdog di┆
0x11d80…11da0 73 63 31 00 00 00 00 00 00 00 80 bc 22 00 00 00 00 00 00 00 00 00 00 00 00 4b 4e db 00 07 f8 00 ┆sc1 " KN ┆
0x11da0…11dc0 08 01 74 77 72 69 74 65 65 72 72 6f 72 00 00 00 08 64 69 73 63 31 00 00 00 00 00 00 00 80 bc 28 ┆ twriteerror disc1 (┆
0x11dc0…11de0 00 00 00 00 00 00 00 00 00 00 00 00 80 0b 8b 80 00 01 7f ff fd 75 38 30 00 00 00 00 00 00 00 00 ┆ u80 ┆
0x11de0…11e00 00 80 00 0e 64 72 75 6d 00 00 00 00 00 00 00 00 7f 1f 9e 00 00 00 00 00 00 00 00 00 00 00 00 0d ┆ drum ┆
0x11e00…11e20 39 1b 80 00 01 7f ff fd 75 73 65 72 63 61 74 00 00 00 00 00 00 00 64 64 69 73 63 35 00 00 00 00 ┆9 usercat ddisc5 ┆
0x11e20…11e40 00 00 00 76 2b d5 00 00 00 00 00 00 00 00 00 00 00 00 00 ed 53 80 00 01 7f ff fd 75 74 69 6c 69 ┆ v+ S utili┆
0x11e40…11e60 74 79 00 00 00 00 00 00 00 72 64 69 73 63 31 00 00 00 00 00 00 00 7c 89 a6 00 00 00 00 00 00 00 ┆ty rdisc1 ø ┆
0x11e60…11e80 00 00 00 e4 00 80 07 4b 80 00 01 7f ff fd 77 61 69 74 6e 65 78 74 00 00 00 00 80 00 04 64 72 75 ┆ K waitnext dru┆
0x11e80…11ea0 6d 00 00 00 00 00 00 00 00 81 10 38 0c 00 00 00 00 00 00 41 a8 01 20 3a 02 b5 43 80 00 01 7f ff ┆m 8 A : C ┆
0x11ea0…11ec0 fd 77 72 69 74 65 64 61 74 65 00 00 00 00 00 01 64 69 73 63 35 00 00 00 00 00 00 00 80 00 32 0c ┆ writedate disc5 2 ┆
0x11ec0…11ee0 d3 4d 20 00 00 00 40 10 00 10 00 0d fc 53 80 00 01 7f ff fd 78 63 6f 6d 61 6c 00 00 00 00 00 00 ┆ M @ S xcomal ┆
0x11ee0…11f00 00 01 e3 64 69 73 63 35 00 00 00 00 00 00 00 80 bd ba 80 b1 d6 00 00 00 00 2a 60 00 0b ee 02 69 ┆ disc5 *` i┆
0x11f00…11f20 63 00 00 78 00 00 81 78 6d 61 73 69 6e 70 00 00 00 00 00 00 00 05 64 69 73 63 32 00 00 00 00 00 ┆c x xmasinp disc2 ┆
0x11f20…11f40 00 00 80 5a a8 00 00 00 00 00 00 00 00 00 00 00 00 59 d5 a3 00 00 00 00 07 cf 7c 6c 72 65 67 6e ┆ Z Y ølregn┆
0x11f40…11f60 73 6b 61 62 00 00 00 00 05 64 69 73 63 33 00 00 00 00 00 00 00 80 a2 c2 00 00 00 00 00 00 00 00 ┆skab disc3 ┆
0x11f60…11f80 00 00 00 00 ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ┆ ┆
0x11f80…11fa0 ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ┆ ┆
[…0x2…]
0x11fe0…12000 ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff 00 00 00 ┆ ┆
0x12000…12020 (32,) ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ┆ ┆
[…0x16…]
0x122e0…12300 ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff 00 00 00 ┆ ┆
0x12300…12320 80 03 0b 00 00 00 7f ff fc 63 68 61 72 6f 66 66 00 00 00 00 00 80 00 04 64 72 75 6d 00 00 00 00 ┆ charoff drum ┆
0x12320…12340 00 00 00 00 00 00 c7 20 00 00 00 00 00 00 40 00 00 10 dc 09 b0 b3 00 00 00 7f ff fc 63 68 61 72 ┆ @ char┆
0x12340…12360 70 61 63 6b 00 00 00 00 00 00 2f 64 72 75 6d 31 00 00 00 00 00 00 00 73 e1 ac 80 b1 52 00 00 00 ┆pack /drum1 s R ┆
0x12360…12380 00 2a 60 00 0b ee 1a 31 bb 00 00 00 7f ff fc 63 68 61 72 72 6f 6d 61 6e 00 00 00 00 00 04 64 69 ┆ *` 1 charroman di┆
0x12380…123a0 73 63 31 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 80 00 cb 80 00 01 7f ┆sc1 ┆
0x123a0…123c0 ff fd 63 68 65 63 6b 00 00 00 00 00 00 00 80 00 04 64 72 75 6d 00 00 00 00 00 00 00 00 80 01 d8 ┆ check drum ┆
0x123c0…123e0 04 80 00 00 00 00 00 40 28 00 20 00 80 00 c3 80 00 01 7f ff fd 63 68 65 63 6b 61 64 70 00 00 00 ┆ @( checkadp ┆
0x123e0…12400 00 80 00 04 64 72 75 6d 00 00 00 00 00 00 00 00 80 10 8a 04 30 c8 00 00 00 00 40 00 00 20 02 80 ┆ drum 0 @ ┆
0x12400…12420 00 b3 80 00 01 7f ff fd 63 68 65 63 6b 69 6f 00 00 00 00 00 80 00 04 64 72 75 6d 00 00 00 00 00 ┆ checkio drum ┆
0x12420…12440 00 00 00 63 99 44 00 00 00 00 00 3a 00 20 04 00 01 90 80 02 43 00 00 00 7f ff fc 63 68 65 63 6b ┆ c D : C check┆
0x12440…12460 70 64 61 00 00 00 00 80 00 04 64 72 75 6d 00 00 00 00 00 00 00 00 80 00 1e 09 30 00 00 00 00 02 ┆pda drum 0 ┆
0x12460…12480 30 16 00 10 00 80 04 33 80 00 01 7f ff fd 63 68 65 63 6b 76 61 72 00 00 00 00 80 00 04 64 72 75 ┆0 3 checkvar dru┆
0x12480…124a0 6d 00 00 00 00 00 00 00 00 80 01 9e 0c 80 00 00 00 00 00 40 16 00 20 00 47 20 db 00 75 30 00 75 ┆m @ G u0 u┆
0x124a0…124c0 39 63 68 6f 00 00 00 00 00 00 00 00 00 00 00 01 64 69 73 63 00 00 00 00 00 00 00 00 6d 99 7a 00 ┆9cho disc m z ┆
0x124c0…124e0 00 00 00 00 00 00 00 00 00 00 00 3a a3 8b 00 75 30 00 75 39 63 68 6f 36 31 74 78 74 00 00 00 00 ┆ : u0 u9cho61txt ┆
0x124e0…12500 00 00 04 64 69 73 63 00 00 00 00 00 00 00 00 6f 30 23 00 00 00 00 00 00 00 00 00 00 00 00 0d c3 ┆ disc o0# ┆
0x12500…12520 c3 00 75 30 00 75 39 63 68 6f 36 74 78 74 00 00 00 00 00 00 00 05 64 69 73 63 00 00 00 00 00 00 ┆ u0 u9cho6txt disc ┆
0x12520…12540 00 00 6e ee bd 00 00 00 00 00 00 00 00 00 00 00 00 2d 24 b3 00 75 30 00 75 39 63 68 6f 37 74 78 ┆ n -$ u0 u9cho7tx┆
0x12540…12560 74 00 00 00 00 00 00 00 05 64 69 73 63 00 00 00 00 00 00 00 00 70 b1 66 00 00 00 00 00 00 00 00 ┆t disc p f ┆
0x12560…12580 00 00 00 00 04 55 93 00 75 30 00 75 39 63 68 73 74 69 66 66 00 00 00 00 00 00 00 04 64 69 73 63 ┆ U u0 u9chstiff disc┆
0x12580…125a0 00 00 00 00 00 00 00 00 80 00 a2 0c e1 1f 38 46 8d 00 40 62 00 40 00 3e 21 c3 00 75 30 00 75 39 ┆ 8F @b @ >! u0 u9┆
0x125a0…125c0 63 68 73 74 69 66 66 31 74 78 74 00 00 00 03 64 69 73 63 00 00 00 00 00 00 00 00 6d 51 bd 00 00 ┆chstiff1txt disc mQ ┆
0x125c0…125e0 00 00 00 00 00 00 00 00 00 00 2e 32 73 00 75 30 00 75 39 63 68 73 74 69 66 66 70 00 00 00 00 00 ┆ .2s u0 u9chstiffp ┆
0x125e0…12600 00 05 64 69 73 63 00 00 00 00 00 00 00 00 80 01 bc 0d f7 df 34 00 00 00 41 64 00 50 00 00 00 00 ┆ disc 4 Ad P ┆
0x12600…12620 16 20 72 00 07 f8 00 08 01 74 74 72 61 6d 6f 73 00 00 00 00 00 00 00 54 64 69 73 63 31 00 00 00 ┆ r ttramos Tdisc1 ┆
0x12620…12640 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 02 61 53 00 07 f8 00 08 01 74 75 73 65 ┆ aS tuse┆
0x12640…12660 72 63 61 74 75 70 00 00 00 00 27 64 69 73 63 31 00 00 00 00 00 00 00 7d 31 20 00 00 00 00 00 00 ┆rcatup 'disc1 å1 ┆
0x12660…12680 00 00 00 00 00 00 80 01 4b 80 00 01 7f ff fd 75 38 30 00 00 00 00 00 00 00 00 00 80 00 0e 64 72 ┆ K u80 dr┆
0x12680…126a0 75 6d 00 00 00 00 00 00 00 00 7d 09 a9 00 00 00 00 00 00 00 00 00 00 00 00 15 20 9b 00 00 b4 00 ┆um å ┆
0x126a0…126c0 00 bd 75 64 00 00 00 00 00 00 00 00 00 00 00 00 0e 64 69 73 63 32 00 00 00 00 00 00 00 7d 30 bf ┆ ud disc2 å0 ┆
0x126c0…126e0 00 00 00 00 00 00 00 00 00 00 00 00 80 00 2b 80 00 01 7f ff fd 75 70 64 61 74 65 61 6c 6c 63 66 ┆ + updateallcf┆
0x126e0…12700 00 80 00 04 64 72 75 6d 00 00 00 00 00 00 00 00 80 d0 c2 04 80 00 00 00 00 00 40 0c 01 00 24 01 ┆ drum @ $ ┆
0x12700…12720 34 9b 00 07 f8 00 08 01 75 73 65 72 63 61 74 75 70 00 00 00 00 00 4c 64 69 73 63 31 00 00 00 00 ┆4 usercatup Ldisc1 ┆
0x12720…12740 00 00 00 7d 31 26 80 b1 10 00 00 00 00 2a 60 00 0b ee 26 44 c2 00 07 f8 00 08 01 75 73 65 72 6c ┆ å1& *` &D userl┆
0x12740…12760 69 73 74 00 00 00 00 00 00 38 64 69 73 63 31 00 00 00 00 00 00 00 7d 31 25 00 00 00 00 00 00 00 ┆ist 8disc1 å1% ┆
0x12760…12780 00 00 00 00 00 80 00 bb 80 00 01 7f ff fd 77 61 69 74 6e 65 78 74 00 00 00 00 80 00 04 64 72 75 ┆ waitnext dru┆
0x12780…127a0 6d 00 00 00 00 00 00 00 00 81 10 38 0c 00 00 00 00 00 00 41 a8 01 20 3a 80 00 e3 00 c3 50 00 ea ┆m 8 A : P ┆
0x127a0…127c0 5f 77 72 69 74 65 6d 61 74 00 00 00 00 80 00 04 64 72 75 6d 00 00 00 00 00 00 00 00 80 00 9c 04 ┆_writemat drum ┆
0x127c0…127e0 d3 5a 24 80 00 04 e0 78 00 10 00 80 03 e3 ff ff f6 ff ff f6 77 72 6b 30 30 30 32 31 30 00 00 00 ┆ Z$ x wrk000210 ┆
0x127e0…12800 80 00 04 64 72 75 6d 00 00 00 00 00 00 00 00 80 00 b8 08 30 c3 6c 33 40 02 60 64 00 40 0a 80 20 ┆ drum 0 l3@ `d @ ┆
0x12800…12820 0b ff ff f6 ff ff f6 77 72 6b 30 30 30 37 31 37 00 00 00 80 00 04 64 72 75 6d 31 00 00 00 00 00 ┆ wrk000717 drum1 ┆
0x12820…12840 00 00 00 00 41 28 00 00 00 00 00 00 40 00 00 10 7e 80 02 8b 80 00 01 7f ff fd 7a 65 72 6f 31 00 ┆ A( @ ü zero1 ┆
0x12840…12860 00 00 00 00 00 00 80 00 04 64 72 75 6d 00 00 00 00 00 00 00 00 80 00 36 08 43 8e 10 40 00 20 91 ┆ drum 6 C @ ┆
0x12860…12880 e8 00 10 00 80 01 fb 80 00 01 7f ff fd 74 72 6e 00 00 00 00 00 00 00 00 00 80 40 0a 64 72 75 6d ┆ trn @ drum┆
0x12880…128a0 00 00 00 00 00 00 00 00 63 99 3e 00 00 00 00 00 00 00 00 00 00 00 00 80 02 03 80 00 01 7f ff fd ┆ c > ┆
0x128a0…128c0 74 72 6f 00 00 00 00 00 00 00 00 00 80 00 0a 64 72 75 6d 00 00 00 00 00 00 00 00 63 99 3e 00 00 ┆tro drum c > ┆
0x128c0…128e0 00 00 00 00 00 00 00 00 00 00 03 a0 22 00 07 f8 00 08 01 74 73 65 61 72 63 68 63 6f 6e 00 00 00 ┆ " tsearchcon ┆
0x128e0…12900 00 03 64 69 73 63 31 00 00 00 00 00 00 00 75 c5 ca 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ┆ disc1 u ┆
0x12900…12920 (33,) 69 66 74 20 28 2d 32 34 29 20 65 78 74 72 61 63 74 20 32 34 3b 0a 20 20 20 20 20 20 6d 28 38 29 ┆ift (-24) extract 24; m(8)┆
0x12920…12940 3a 3d 74 61 70 65 6e 61 6d 65 28 32 29 20 65 78 74 72 61 63 74 20 32 34 3b 0a 20 20 20 20 20 20 ┆:=tapename(2) extract 24; ┆
0x12940…12960 6f 70 65 6e 28 7a 2c 30 2c 20 74 61 70 65 6e 61 6d 65 2c 30 29 3b 0a 20 20 20 20 20 20 69 66 20 ┆open(z,0, tapename,0); if ┆
0x12960…12980 6d 6f 6e 69 74 6f 72 28 34 29 70 72 6f 63 65 73 73 20 64 65 73 63 3a 28 20 7a 2c 30 2c 69 61 29 ┆monitor(4)process desc:( z,0,ia)┆
0x12980…129a0 20 3d 20 30 20 74 68 65 6e 0a 20 20 20 20 20 20 62 65 67 69 6e 0a 20 20 20 20 20 20 20 20 6d 28 ┆ = 0 then begin m(┆
0x129a0…129c0 31 29 3a 3d 31 36 20 3c 2a 6f 70 6d 65 73 73 2a 3e 20 73 68 69 66 74 20 31 32 3b 0a 20 20 20 20 ┆1):=16 <*opmess*> shift 12; ┆
0x129c0…129e0 20 20 20 20 6d 28 32 29 3a 3d 20 6c 6f 6e 67 20 3c 3a 72 69 6e 3a 3e 20 73 68 69 66 74 20 28 2d ┆ m(2):= long <:rin:> shift (-┆
0x129e0…12a00 32 34 29 20 65 78 74 72 61 63 74 20 32 34 3b 0a 20 20 20 20 20 20 20 20 6d 28 33 29 3a 3d 20 6c ┆24) extract 24; m(3):= l┆
0x12a00…12a20 6f 6e 67 20 3c 3a 67 3a 3e 20 73 68 69 66 74 20 28 2d 32 34 29 20 65 78 74 72 61 63 74 20 32 34 ┆ong <:g:> shift (-24) extract 24┆
0x12a20…12a40 3b 0a 20 20 20 20 20 20 20 20 6d 28 34 29 3a 3d 20 33 32 20 73 68 69 66 74 20 31 36 3b 0a 20 20 ┆; m(4):= 32 shift 16; ┆
0x12a40…12a60 20 20 20 20 20 20 73 79 73 74 65 6d 28 31 30 29 70 61 72 72 61 6e 74 20 6d 65 73 73 61 67 65 3a ┆ system(10)parrant message:┆
0x12a60…12a80 28 30 2c 6d 29 3b 0a 20 20 20 20 20 20 65 6e 64 3b 0a 73 65 6e 73 65 3a 0a 20 20 20 20 20 20 6d ┆(0,m); end; sense: m┆
0x12a80…12aa0 6f 6e 69 74 6f 72 20 28 36 29 69 6e 69 74 69 61 6c 69 7a 65 20 70 72 6f 63 65 73 73 3a 28 20 7a ┆onitor (6)initialize process:( z┆
0x12aa0…12ac0 2c 30 2c 69 61 29 3b 0a 20 20 20 20 20 20 67 65 74 73 68 61 72 65 36 28 7a 2c 69 61 2c 31 29 3b ┆,0,ia); getshare6(z,ia,1);┆
0x12ac0…12ae0 0a 20 20 20 20 20 20 69 61 28 34 29 3a 3d 30 3b 20 0a 20 20 20 20 20 20 73 65 74 73 68 61 72 65 ┆ ia(4):=0; setshare┆
0x12ae0…12b00 36 28 7a 2c 69 61 2c 31 29 3b 0a 20 20 20 20 20 20 6d 6f 6e 69 74 6f 72 20 28 31 36 29 73 65 6e ┆6(z,ia,1); monitor (16)sen┆
0x12b00…12b20 64 20 6d 65 73 73 61 67 65 3a 28 20 7a 2c 31 2c 69 61 29 3b 0a 20 20 20 20 20 20 69 66 20 6d 6f ┆d message:( z,1,ia); if mo┆
0x12b20…12b40 6e 69 74 6f 72 28 31 38 29 77 61 69 74 20 61 6e 73 77 65 72 3a 28 7a 2c 31 2c 69 61 29 20 3c 3e ┆nitor(18)wait answer:(z,1,ia) <>┆
0x12b40…12b60 20 31 20 3c 2a 6e 6f 74 20 6e 6f 72 6d 61 6c 2a 3e 20 74 68 65 6e 0a 20 20 20 20 20 20 62 65 67 ┆ 1 <*not normal*> then beg┆
0x12b60…12b80 69 6e 0a 20 20 20 20 20 20 20 20 63 6f 6d 6d 65 6e 74 20 6e 6f 74 20 6d 6f 75 6e 74 65 64 3b 0a ┆in comment not mounted; ┆
0x12b80…12ba0 20 20 20 20 20 20 20 20 69 61 28 31 29 3a 3d 20 28 69 66 20 64 65 76 69 63 65 20 3d 20 30 20 74 ┆ ia(1):= (if device = 0 t┆
0x12ba0…12bc0 68 65 6e 20 31 34 20 73 68 69 66 74 20 31 32 20 65 6c 73 65 20 0a 20 20 20 20 20 20 20 20 33 32 ┆hen 14 shift 12 else 32┆
0x12bc0…12be0 20 73 68 69 66 74 20 31 32 20 2b 31 20 73 68 69 66 74 20 39 29 20 2b 20 31 20 73 68 69 66 74 20 ┆ shift 12 +1 shift 9) + 1 shift ┆
0x12be0…12c00 30 3b 0a 20 20 20 20 20 20 20 20 69 61 28 32 29 3a 3d 20 6c 6f 6e 67 20 3c 3a 6d 6f 75 3a 3e 20 ┆0; ia(2):= long <:mou:> ┆
0x12c00…12c20 73 68 69 66 74 20 28 2d 32 34 29 20 65 78 74 72 61 63 74 20 32 34 3b 0a 20 20 20 20 20 20 20 20 ┆shift (-24) extract 24; ┆
0x12c20…12c40 69 61 28 33 29 3a 3d 20 6c 6f 6e 67 20 3c 3a 6e 74 3a 3e 20 73 68 69 66 74 28 2d 32 34 29 20 65 ┆ia(3):= long <:nt:> shift(-24) e┆
0x12c40…12c60 78 74 72 61 63 74 20 32 34 3b 0a 20 20 20 20 20 20 20 20 69 61 28 34 29 3a 3d 20 64 65 76 69 63 ┆xtract 24; ia(4):= devic┆
0x12c60…12c80 65 3b 0a 20 20 20 20 20 20 20 20 66 6f 72 20 69 3a 3d 20 35 20 73 74 65 70 20 31 20 75 6e 74 69 ┆e; for i:= 5 step 1 unti┆
0x12c80…12ca0 6c 20 38 20 64 6f 20 69 61 28 69 29 3a 3d 6d 28 69 29 3b 0a 20 20 20 20 20 20 20 20 73 79 73 74 ┆l 8 do ia(i):=m(i); syst┆
0x12ca0…12cc0 65 6d 28 31 30 2c 30 2c 69 61 29 3b 0a 20 20 20 20 20 20 20 20 67 6f 74 6f 20 73 65 6e 73 65 3b ┆em(10,0,ia); goto sense;┆
0x12cc0…12ce0 0a 20 20 20 20 20 20 65 6e 64 0a 20 20 20 20 20 20 65 6c 73 65 0a 20 20 20 20 20 20 69 66 20 72 ┆ end else if r┆
0x12ce0…12d00 69 6e 67 20 74 68 65 6e 0a 20 20 20 20 20 20 62 65 67 69 6e 0a 20 20 20 20 20 20 20 20 69 66 20 ┆ing then begin if ┆
0x12d00…12d20 69 61 28 31 29 20 73 68 69 66 74 20 28 2d 31 35 29 20 65 78 74 72 61 63 74 20 31 20 3d 20 30 20 ┆ia(1) shift (-15) extract 1 = 0 ┆
0x12d20…12d40 74 68 65 6e 0a 20 20 20 20 20 20 20 20 62 65 67 69 6e 0a 20 20 20 20 20 20 20 20 20 20 63 6c 6f ┆then begin clo┆
0x12d40…12d60 73 65 28 7a 2c 66 61 6c 73 65 29 3b 0a 20 20 20 20 20 20 20 20 20 20 6f 70 65 6e 28 7a 2c 34 20 ┆se(z,false); open(z,4 ┆
0x12d60…12d80 73 68 69 66 74 20 31 32 20 2b 20 31 38 2c 20 20 74 61 70 65 6e 61 6d 65 2c 30 29 3b 0a 20 20 20 ┆shift 12 + 18, tapename,0); ┆
0x12d80…12da0 20 20 20 20 20 20 20 69 61 28 31 29 3a 3d 20 31 38 3c 2a 72 69 6e 67 2a 3e 20 73 68 69 66 74 20 ┆ ia(1):= 18<*ring*> shift ┆
0x12da0…12dc0 31 32 20 2b 20 31 20 73 68 69 66 74 20 30 3b 0a 20 20 20 20 20 20 20 20 20 20 69 61 28 32 29 3a ┆12 + 1 shift 0; ia(2):┆
0x12dc0…12de0 3d 20 6c 6f 6e 67 20 3c 3a 72 69 6e 3a 3e 20 73 68 69 66 74 20 28 2d 32 34 29 20 65 78 74 72 61 ┆= long <:rin:> shift (-24) extra┆
0x12de0…12e00 63 74 20 32 34 3b 0a 20 20 20 20 20 20 20 20 20 20 69 61 28 33 29 3a 3d 20 6c 6f 6e 67 20 3c 3a ┆ct 24; ia(3):= long <:┆
0x12e00…12e20 67 3a 3e 20 73 68 69 66 74 20 28 2d 32 34 29 20 65 78 74 72 61 63 74 20 32 34 3b 0a 20 20 20 20 ┆g:> shift (-24) extract 24; ┆
0x12e20…12e40 20 20 20 20 20 20 69 61 28 34 29 3a 3d 30 3b 0a 20 20 20 20 20 20 20 20 20 20 66 6f 72 20 69 3a ┆ ia(4):=0; for i:┆
0x12e40…12e60 3d 35 20 73 74 65 70 20 31 20 75 6e 74 69 6c 20 38 20 64 6f 20 69 61 28 69 29 3a 3d 6d 28 69 29 ┆=5 step 1 until 8 do ia(i):=m(i)┆
0x12e60…12e80 3b 0a 20 20 20 20 20 20 20 20 20 20 73 79 73 74 65 6d 28 31 30 2c 30 2c 69 61 29 3b 0a 20 20 20 ┆; system(10,0,ia); ┆
0x12e80…12ea0 20 20 20 20 20 20 20 67 6f 74 6f 20 73 65 6e 73 65 3b 0a 20 20 20 20 20 20 20 20 65 6e 64 3b 0a ┆ goto sense; end; ┆
0x12ea0…12ec0 20 20 20 20 20 20 65 6e 64 3b 0a 20 20 20 20 20 20 63 6c 6f 73 65 28 7a 2c 66 61 6c 73 65 29 3b ┆ end; close(z,false);┆
0x12ec0…12ee0 0a 20 20 20 20 65 6e 64 20 6d 6f 75 6e 74 20 6d 65 64 20 72 69 6e 67 3b 0a 0c 0a 20 20 20 20 70 ┆ end mount med ring; p┆
0x12ee0…12f00 72 6f 63 65 64 75 72 65 20 69 6e 69 74 74 65 6d 70 63 61 74 28 72 6e 61 6d 65 29 3b 0a 20 20 20 ┆rocedure inittempcat(rname); ┆
0x12f00…12f20 20 6c 6f 6e 67 20 61 72 72 61 79 20 72 6e 61 6d 65 3b 0a 20 20 20 20 62 65 67 69 6e 0a 20 20 20 ┆ long array rname; begin ┆
0x12f20…12f40 20 20 20 63 6f 6d 6d 65 6e 74 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2a 2a 2a 2a 2a 2a 2a ┆ comment *******┆
0x12f40…12f60 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a ┆********************************┆
0x12f60…12f80 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 0a 20 20 20 20 20 20 20 20 20 20 20 20 ┆******************* ┆
0x12f80…12fa0 20 20 2a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ * ┆
0x12fa0…12fc0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2a 0a 20 20 20 ┆ * ┆
0x12fc0…12fe0 20 20 20 20 20 20 20 20 20 20 20 2a 20 54 68 69 73 20 70 72 6f 63 65 64 75 72 65 20 69 73 20 75 ┆ * This procedure is u┆
0x12fe0…13000 73 65 64 20 74 6f 20 69 6e 69 74 69 61 6c 69 73 65 20 74 65 6d 70 63 61 74 20 61 6e 64 20 74 65 ┆sed to initialise tempcat and te┆
0x13000…13020 6d 31 2d 20 2a 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2a 20 63 61 74 2e 20 20 20 20 20 20 ┆m1- * * cat. ┆
0x13020…13040 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x13040…13060 20 20 20 20 20 20 20 20 20 20 20 20 20 2a 20 20 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2a ┆ * *┆
0x13060…13080 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x13080…130a0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2a 0a 20 20 20 20 20 20 ┆ * ┆
0x130a0…130c0 20 20 20 20 20 20 20 20 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a ┆ ************************┆
0x130c0…130e0 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a ┆********************************┆
0x130e0…13100 2a 2a 3b 0a 20 20 20 20 20 20 69 6e 74 65 67 65 72 20 66 69 65 6c 64 20 61 3b 0a 20 20 20 20 20 ┆**; integer field a; ┆
0x13100…13120 20 20 20 20 20 20 6f 70 65 6e 28 63 61 74 2c 34 2c 20 72 6e 61 6d 65 2c 30 29 3b 0a 20 20 20 20 ┆ open(cat,4, rname,0); ┆
0x13120…13140 20 20 69 3a 3d 6d 6f 6e 69 74 6f 72 28 34 32 29 6c 6f 6f 6b 20 75 70 20 65 6e 74 72 79 3a 28 63 ┆ i:=monitor(42)look up entry:(c┆
0x13140…13160 61 74 2c 30 2c 69 61 72 72 29 3b 0a 20 20 20 20 20 20 69 66 20 69 20 3c 3e 20 30 20 74 68 65 6e ┆at,0,iarr); if i <> 0 then┆
0x13160…13180 20 0a 20 20 20 20 20 20 62 65 67 69 6e 0a 20 20 20 20 20 20 20 20 69 61 72 72 28 31 29 3a 3d 31 ┆ begin iarr(1):=1┆
0x13180…131a0 30 3b 0a 20 20 20 20 20 20 20 20 20 69 61 72 72 28 32 29 3a 3d 31 3b 69 61 72 72 28 33 29 3a 3d ┆0; iarr(2):=1;iarr(3):=┆
0x131a0…131c0 30 3b 69 61 72 72 28 34 29 3a 3d 30 3b 69 61 72 72 28 35 29 3a 3d 30 3b 0a 20 20 20 20 20 20 20 ┆0;iarr(4):=0;iarr(5):=0; ┆
0x131c0…131e0 20 6d 6f 6e 69 74 6f 72 28 34 30 29 63 72 65 61 74 65 20 65 6e 74 72 79 3a 28 63 61 74 2c 30 2c ┆ monitor(40)create entry:(cat,0,┆
0x131e0…13200 69 61 72 72 29 3b 0a 20 20 20 20 20 20 65 6e 64 3b 0a 20 20 20 20 20 20 66 6f 72 20 69 3a 3d 20 ┆iarr); end; for i:= ┆
0x13200…13220 (34,) 31 20 73 74 65 70 20 31 20 75 6e 74 69 6c 20 69 61 72 72 28 31 29 20 64 6f 0a 20 20 20 20 20 20 ┆1 step 1 until iarr(1) do ┆
0x13220…13240 62 65 67 69 6e 0a 20 20 20 20 20 20 20 20 73 65 74 70 6f 73 69 74 69 6f 6e 28 63 61 74 2c 30 2c ┆begin setposition(cat,0,┆
0x13240…13260 69 29 3b 0a 20 20 20 20 20 20 20 20 6f 75 74 72 65 63 36 28 63 61 74 2c 35 31 32 29 3b 0a 20 20 ┆i); outrec6(cat,512); ┆
0x13260…13280 20 20 20 20 20 20 66 6f 72 20 69 6b 20 3a 3d 20 31 20 73 74 65 70 20 31 20 75 6e 74 69 6c 20 32 ┆ for ik := 1 step 1 until 2┆
0x13280…132a0 35 36 20 64 6f 0a 20 20 20 20 20 20 20 20 62 65 67 69 6e 0a 20 20 20 20 20 20 20 20 20 20 61 3a ┆56 do begin a:┆
0x132a0…132c0 3d 69 6b 2a 32 3b 0a 20 20 20 20 20 20 20 20 20 20 63 61 74 2e 61 3a 3d 2d 31 3b 0a 20 20 20 20 ┆=ik*2; cat.a:=-1; ┆
0x132c0…132e0 20 20 20 20 65 6e 64 3b 0a 20 20 20 20 20 20 65 6e 64 3b 0a 20 20 20 20 20 20 63 6c 6f 73 65 28 ┆ end; end; close(┆
0x132e0…13300 63 61 74 2c 74 72 75 65 29 3b 0a 20 20 20 20 65 6e 64 3b 0a 0c 0a 20 20 20 20 70 72 6f 63 65 64 ┆cat,true); end; proced┆
0x13300…13320 75 72 65 20 69 6e 69 74 6e 65 77 63 61 74 3b 0a 20 20 20 20 62 65 67 69 6e 0a 20 20 20 20 20 20 ┆ure initnewcat; begin ┆
0x13320…13340 63 6f 6d 6d 65 6e 74 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a ┆comment **********┆
0x13340…13360 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a ┆********************************┆
0x13360…13380 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 0a 20 20 20 20 20 20 20 20 20 20 20 20 ┆******************* ┆
0x13380…133a0 20 20 2a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ * ┆
0x133a0…133c0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2a 0a ┆ * ┆
0x133c0…133e0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2a 20 54 68 69 73 20 70 72 6f 63 65 64 75 72 65 20 69 ┆ * This procedure i┆
0x133e0…13400 6e 69 74 69 61 6c 69 73 65 20 74 68 65 20 6e 65 77 20 64 75 6d 70 63 61 74 20 20 73 6f 20 74 68 ┆nitialise the new dumpcat so th┆
0x13400…13420 61 74 20 65 76 65 72 79 20 20 2a 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2a 20 77 6f 72 64 ┆at every * * word┆
0x13420…13440 20 6f 66 20 69 74 20 63 6f 6e 74 61 69 6e 73 20 2d 31 2e 20 54 68 69 73 20 69 73 20 6f 6e 6c 79 ┆ of it contains -1. This is only┆
0x13440…13460 20 64 6f 6e 65 20 69 66 20 61 6e 20 72 65 6f 72 67 61 6e 69 2d 20 2a 0a 20 20 20 20 20 20 20 20 ┆ done if an reorgani- * ┆
0x13460…13480 20 20 20 20 20 20 2a 20 73 61 74 69 6f 6e 20 6f 66 20 64 75 6d 70 63 61 74 20 69 73 20 6e 65 73 ┆ * sation of dumpcat is nes┆
0x13480…134a0 73 61 63 61 72 79 2e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆sacary. ┆
0x134a0…134c0 20 20 2a 20 20 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2a 20 20 20 20 20 20 20 20 20 20 20 ┆ * * ┆
0x134c0…134e0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x134e0…13500 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2a 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ * ┆
0x13500…13520 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a ┆********************************┆
0x13520…13540 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 3b 0a 20 ┆*****************************; ┆
0x13540…13560 20 20 20 20 20 69 6e 74 65 67 65 72 20 66 69 65 6c 64 20 61 3b 0a 20 20 20 20 20 20 66 6f 72 20 ┆ integer field a; for ┆
0x13560…13580 69 3a 3d 20 30 20 73 74 65 70 20 31 20 75 6e 74 69 6c 20 68 61 73 68 65 6e 74 72 69 65 73 2d 31 ┆i:= 0 step 1 until hashentries-1┆
0x13580…135a0 20 64 6f 0a 20 20 20 20 20 20 62 65 67 69 6e 0a 20 20 20 20 20 20 20 20 73 65 74 70 6f 73 69 74 ┆ do begin setposit┆
0x135a0…135c0 69 6f 6e 28 6e 65 77 63 61 74 2c 30 2c 69 29 3b 0a 20 20 20 20 20 20 20 20 6f 75 74 72 65 63 36 ┆ion(newcat,0,i); outrec6┆
0x135c0…135e0 28 6e 65 77 63 61 74 2c 35 31 32 29 3b 0a 20 20 20 20 20 20 20 20 66 6f 72 20 69 6b 3a 3d 31 20 ┆(newcat,512); for ik:=1 ┆
0x135e0…13600 73 74 65 70 20 31 20 75 6e 74 69 6c 20 32 35 36 20 64 6f 0a 20 20 20 20 20 20 20 20 62 65 67 69 ┆step 1 until 256 do begi┆
0x13600…13620 6e 0a 20 20 20 20 20 20 20 20 20 20 61 3a 3d 69 6b 2a 32 3b 0a 20 20 20 20 20 20 20 20 20 20 6e ┆n a:=ik*2; n┆
0x13620…13640 65 77 63 61 74 2e 61 3a 3d 2d 31 3b 0a 20 20 20 20 20 20 20 20 65 6e 64 3b 0a 20 20 20 20 20 20 ┆ewcat.a:=-1; end; ┆
0x13640…13660 20 20 61 3a 3d 32 3b 6e 65 77 63 61 74 2e 61 3a 3d 30 3b 0a 20 20 20 20 20 20 65 6e 64 3b 0a 20 ┆ a:=2;newcat.a:=0; end; ┆
0x13660…13680 20 20 20 65 6e 64 3b 0a 0c 0a 20 20 20 20 70 72 6f 63 65 64 75 72 65 20 72 65 6f 72 67 3b 0a 20 ┆ end; procedure reorg; ┆
0x13680…136a0 20 20 20 62 65 67 69 6e 0a 0c 0a 20 20 20 20 20 20 70 72 6f 63 65 64 75 72 65 20 63 6f 6d 70 75 ┆ begin procedure compu┆
0x136a0…136c0 74 65 6e 65 77 68 61 73 68 3b 0a 20 20 20 20 20 20 62 65 67 69 6e 0a 20 20 20 20 20 20 20 20 69 ┆tenewhash; begin i┆
0x136c0…136e0 6e 74 65 67 65 72 20 61 72 72 61 79 20 70 72 69 6d 74 61 6c 28 31 3a 31 39 29 3b 0a 20 20 20 20 ┆nteger array primtal(1:19); ┆
0x136e0…13700 20 20 20 20 69 6e 74 65 67 65 72 20 70 72 69 6d 69 3b 0a 20 20 20 20 20 20 20 20 70 72 69 6d 74 ┆ integer primi; primt┆
0x13700…13720 61 6c 28 31 29 3a 3d 31 30 31 3b 0a 20 20 20 20 20 20 20 20 70 72 69 6d 74 61 6c 28 32 29 3a 3d ┆al(1):=101; primtal(2):=┆
0x13720…13740 31 36 37 3b 0a 20 20 20 20 20 20 20 20 70 72 69 6d 74 61 6c 28 33 29 3a 3d 32 31 37 3b 0a 20 20 ┆167; primtal(3):=217; ┆
0x13740…13760 20 20 20 20 20 20 70 72 69 6d 74 61 6c 28 34 29 3a 3d 33 37 33 3b 0a 20 20 20 20 20 20 20 20 70 ┆ primtal(4):=373; p┆
0x13760…13780 72 69 6d 74 61 6c 28 35 29 3a 3d 35 35 37 3b 0a 20 20 20 20 20 20 20 20 70 72 69 6d 74 61 6c 28 ┆rimtal(5):=557; primtal(┆
0x13780…137a0 36 29 3a 3d 37 38 37 3b 0a 20 20 20 20 20 20 20 20 70 72 69 6d 74 61 6c 28 37 29 3a 3d 31 31 30 ┆6):=787; primtal(7):=110┆
0x137a0…137c0 33 3b 0a 20 20 20 20 20 20 20 20 70 72 69 6d 74 61 6c 28 38 29 3a 3d 31 36 35 37 3b 0a 20 20 20 ┆3; primtal(8):=1657; ┆
0x137c0…137e0 20 20 20 20 20 70 72 69 6d 74 61 6c 28 39 29 3a 3d 32 34 35 39 3b 0a 20 20 20 20 20 20 20 20 70 ┆ primtal(9):=2459; p┆
0x137e0…13800 72 69 6d 74 61 6c 28 31 30 29 3a 3d 33 36 37 31 3b 0a 20 20 20 20 20 20 20 20 70 72 69 6d 74 61 ┆rimtal(10):=3671; primta┆
0x13800…13820 6c 28 31 31 29 3a 3d 35 34 34 39 3b 0a 20 20 20 20 20 20 20 20 70 72 69 6d 74 61 6c 28 31 32 29 ┆l(11):=5449; primtal(12)┆
0x13820…13840 3a 3d 38 30 33 39 3b 0a 20 20 20 20 20 20 20 20 70 72 69 6d 74 61 6c 28 31 33 29 3a 3d 31 32 30 ┆:=8039; primtal(13):=120┆
0x13840…13860 37 33 3b 0a 20 20 20 20 20 20 20 20 70 72 69 6d 74 61 6c 28 31 34 29 3a 3d 31 38 30 31 33 3b 0a ┆73; primtal(14):=18013; ┆
0x13860…13880 20 20 20 20 20 20 20 20 70 72 69 6d 74 61 6c 28 31 35 29 3a 3d 32 37 30 39 31 3b 0a 20 20 20 20 ┆ primtal(15):=27091; ┆
0x13880…138a0 20 20 20 20 70 72 69 6d 74 61 6c 28 31 36 29 3a 3d 34 30 31 31 31 3b 0a 20 20 20 20 20 20 20 20 ┆ primtal(16):=40111; ┆
0x138a0…138c0 70 72 69 6d 74 61 6c 28 31 37 29 3a 3d 36 30 38 31 31 3b 0a 20 20 20 20 20 20 20 20 70 72 69 6d ┆primtal(17):=60811; prim┆
0x138c0…138e0 74 61 6c 28 31 38 29 3a 3d 39 30 32 30 33 3b 0a 20 20 20 20 20 20 20 20 70 72 69 6d 69 3a 3d 31 ┆tal(18):=90203; primi:=1┆
0x138e0…13900 3b 0a 20 20 20 20 20 20 20 20 77 68 69 6c 65 20 68 61 73 68 65 6e 74 72 69 65 73 20 3e 20 70 72 ┆; while hashentries > pr┆
0x13900…13920 69 6d 74 61 6c 28 70 72 69 6d 69 29 20 64 6f 20 70 72 69 6d 69 3a 3d 70 72 69 6d 69 2b 31 3b 0a ┆imtal(primi) do primi:=primi+1; ┆
0x13920…13940 20 20 20 20 20 20 20 20 68 61 73 68 65 6e 74 72 69 65 73 3a 3d 70 72 69 6d 74 61 6c 28 70 72 69 ┆ hashentries:=primtal(pri┆
0x13940…13960 6d 69 2b 31 29 3b 0a 20 20 20 20 20 65 6e 64 3b 0a 20 20 20 20 20 20 69 6e 74 65 67 65 72 20 61 ┆mi+1); end; integer a┆
0x13960…13980 72 72 61 79 20 64 75 6e 61 6d 65 28 31 3a 31 30 29 3b 0a 20 20 20 20 20 20 69 6e 74 65 67 65 72 ┆rray duname(1:10); integer┆
0x13980…139a0 20 66 69 65 6c 64 20 61 3b 0a 20 20 20 20 20 20 69 6e 74 65 67 65 72 20 61 72 72 61 79 20 66 69 ┆ field a; integer array fi┆
0x139a0…139c0 65 6c 64 20 70 6f 69 6e 74 3b 0a 20 20 20 20 20 20 6c 6f 6e 67 20 61 72 72 61 79 20 63 6e 61 6d ┆eld point; long array cnam┆
0x139c0…139e0 65 28 31 3a 32 29 3b 0a 20 20 20 20 20 20 69 6e 74 65 67 65 72 20 6f 6c 64 68 61 73 68 65 6e 74 ┆e(1:2); integer oldhashent┆
0x139e0…13a00 72 69 65 73 3b 0a 20 20 20 20 20 20 6d 6f 6e 69 74 6f 72 28 37 32 29 73 65 74 20 63 61 74 61 6c ┆ries; monitor(72)set catal┆
0x13a00…13a20 6f 67 62 61 73 65 3a 28 7a 68 65 6c 70 2c 30 2c 69 6e 74 65 72 76 61 6c 29 3b 0a 20 20 20 20 20 ┆ogbase:(zhelp,0,interval); ┆
0x13a20…13a40 20 70 6f 69 6e 74 3a 3d 30 3b 0a 20 20 20 20 20 20 77 72 69 74 65 28 6f 75 74 2c 3c 3a 3c 31 30 ┆ point:=0; write(out,<:<10┆
0x13a40…13a60 3e 20 2d 2d 2d 20 74 68 65 20 64 75 6d 70 63 61 74 20 69 73 20 72 65 6f 72 67 61 6e 69 73 65 64 ┆> --- the dumpcat is reorganised┆
0x13a60…13a80 3a 3e 29 3b 0a 20 20 20 20 20 20 6f 6c 64 68 61 73 68 65 6e 74 72 69 65 73 3a 3d 68 61 73 68 65 ┆:>); oldhashentries:=hashe┆
0x13a80…13aa0 6e 74 72 69 65 73 3b 0a 20 20 20 20 20 20 63 6f 6d 70 75 74 65 6e 65 77 68 61 73 68 3b 0a 20 20 ┆ntries; computenewhash; ┆
0x13aa0…13ac0 20 20 20 20 66 6f 72 20 69 3a 3d 31 20 73 74 65 70 20 31 20 75 6e 74 69 6c 20 31 30 20 64 6f 20 ┆ for i:=1 step 1 until 10 do ┆
0x13ac0…13ae0 74 61 69 6c 28 69 29 3a 3d 30 3b 0a 20 20 20 20 20 20 74 61 69 6c 28 31 29 3a 3d 68 61 73 68 65 ┆tail(i):=0; tail(1):=hashe┆
0x13ae0…13b00 6e 74 72 69 65 73 3b 0a 20 20 20 20 20 20 74 61 69 6c 28 32 29 3a 3d 31 3b 0a 20 20 20 20 20 20 ┆ntries; tail(2):=1; ┆
0x13b00…13b20 (35,) 74 61 69 6c 28 37 29 3a 3d 64 75 6d 70 65 6e 73 69 7a 65 3b 74 61 69 6c 28 39 29 3a 3d 31 31 20 ┆tail(7):=dumpensize;tail(9):=11 ┆
0x13b20…13b40 73 68 69 66 74 20 31 32 3b 0a 20 20 20 20 20 20 63 6e 61 6d 65 28 31 29 3a 3d 6c 6f 6e 67 20 3c ┆shift 12; cname(1):=long <┆
0x13b40…13b60 3a 3a 3e 3b 63 6e 61 6d 65 28 32 29 3a 3d 6c 6f 6e 67 20 3c 3a 3a 3e 3b 0a 20 20 20 20 20 20 20 ┆::>;cname(2):=long <::>; ┆
0x13b60…13b80 20 20 20 20 6f 70 65 6e 28 6e 65 77 63 61 74 2c 34 2c 20 63 6e 61 6d 65 2c 30 29 3b 0a 20 20 20 ┆ open(newcat,4, cname,0); ┆
0x13b80…13ba0 20 20 20 69 66 20 6d 6f 6e 69 74 6f 72 28 34 30 29 63 72 65 61 74 65 20 65 6e 74 72 79 3a 28 6e ┆ if monitor(40)create entry:(n┆
0x13ba0…13bc0 65 77 63 61 74 2c 30 2c 74 61 69 6c 29 20 3c 3e 20 30 20 74 68 65 6e 20 65 72 72 6f 72 28 38 29 ┆ewcat,0,tail) <> 0 then error(8)┆
0x13bc0…13be0 3b 0a 20 20 20 20 20 20 6d 6f 6e 69 74 6f 72 28 37 34 29 73 65 74 65 6e 74 72 79 20 62 61 73 65 ┆; monitor(74)setentry base┆
0x13be0…13c00 3a 28 6e 65 77 63 61 74 2c 30 2c 69 6e 74 65 72 76 61 6c 29 3b 0a 20 20 20 20 20 20 20 20 20 20 ┆:(newcat,0,interval); ┆
0x13c00…13c20 20 6f 70 65 6e 28 63 61 74 2c 34 2c 20 64 75 6d 70 31 6e 61 6d 65 2c 30 29 3b 0a 20 20 20 20 20 ┆ open(cat,4, dump1name,0); ┆
0x13c20…13c40 20 69 6e 69 74 6e 65 77 63 61 74 3b 0a 20 20 20 20 20 20 66 6f 72 20 69 3a 3d 30 20 73 74 65 70 ┆ initnewcat; for i:=0 step┆
0x13c40…13c60 20 31 20 75 6e 74 69 6c 20 6f 6c 64 68 61 73 68 65 6e 74 72 69 65 73 2d 31 20 64 6f 0a 20 20 20 ┆ 1 until oldhashentries-1 do ┆
0x13c60…13c80 20 20 20 62 65 67 69 6e 0a 20 20 20 20 20 20 20 20 73 65 74 70 6f 73 69 74 69 6f 6e 28 63 61 74 ┆ begin setposition(cat┆
0x13c80…13ca0 2c 30 2c 69 29 3b 0a 20 20 20 20 20 20 20 20 73 77 6f 70 72 65 63 36 28 63 61 74 2c 32 29 3b 0a ┆,0,i); swoprec6(cat,2); ┆
0x13ca0…13cc0 20 20 20 20 20 20 20 20 72 68 61 73 68 65 6e 74 72 79 3b 0a 20 20 20 20 20 20 20 20 77 68 69 6c ┆ rhashentry; whil┆
0x13cc0…13ce0 65 20 63 61 74 2e 63 61 74 6e 72 3d 2d 31 20 64 6f 20 72 68 61 73 68 65 6e 74 72 79 3b 0a 20 20 ┆e cat.catnr=-1 do rhashentry; ┆
0x13ce0…13d00 20 20 20 20 20 20 64 6b 65 79 3a 3d 68 61 73 68 6b 65 79 28 63 61 74 2e 64 6e 61 6d 65 29 3b 0a ┆ dkey:=hashkey(cat.dname); ┆
0x13d00…13d20 20 20 20 20 20 20 20 20 73 65 74 70 6f 73 69 74 69 6f 6e 28 6e 65 77 63 61 74 2c 30 2c 64 6b 65 ┆ setposition(newcat,0,dke┆
0x13d20…13d40 79 29 3b 0a 20 20 20 20 20 20 20 20 73 77 6f 70 72 65 63 36 28 6e 65 77 63 61 74 2c 32 29 3b 0a ┆y); swoprec6(newcat,2); ┆
0x13d40…13d60 20 20 20 20 20 20 20 20 69 66 20 6e 65 77 63 61 74 2e 63 61 74 6e 72 20 3d 20 2d 31 20 74 68 65 ┆ if newcat.catnr = -1 the┆
0x13d60…13d80 6e 20 6e 65 77 63 61 74 2e 63 61 74 6e 72 3a 3d 30 3b 0a 20 20 20 20 20 20 20 20 6e 65 77 63 61 ┆n newcat.catnr:=0; newca┆
0x13d80…13da0 74 2e 63 61 74 6e 72 3a 3d 6e 65 77 63 61 74 2e 63 61 74 6e 72 2b 31 3b 0a 20 20 20 20 20 20 20 ┆t.catnr:=newcat.catnr+1; ┆
0x13da0…13dc0 20 73 77 6f 70 72 65 63 36 28 6e 65 77 63 61 74 2c 64 75 6d 70 65 6e 73 69 7a 65 29 3b 0a 20 20 ┆ swoprec6(newcat,dumpensize); ┆
0x13dc0…13de0 20 20 20 20 20 20 6b 3a 3d 31 3b 0a 20 20 20 20 20 20 20 20 77 68 69 6c 65 20 6e 65 77 63 61 74 ┆ k:=1; while newcat┆
0x13de0…13e00 2e 63 61 74 6e 72 20 3c 3e 20 2d 31 20 64 6f 20 73 77 6f 70 72 65 63 36 28 6e 65 77 63 61 74 2c ┆.catnr <> -1 do swoprec6(newcat,┆
0x13e00…13e20 64 75 6d 70 65 6e 73 69 7a 65 29 3b 0a 20 20 20 20 20 20 20 74 6f 66 72 6f 6d 28 6e 65 77 63 61 ┆dumpensize); tofrom(newca┆
0x13e20…13e40 74 2c 63 61 74 2c 64 75 6d 70 65 6e 73 69 7a 65 29 3b 0a 20 20 20 20 20 20 20 20 6e 65 77 63 61 ┆t,cat,dumpensize); newca┆
0x13e40…13e60 74 2e 63 61 74 6e 72 3a 3d 64 6b 65 79 3b 0a 20 20 20 20 20 20 65 6e 64 3b 0a 20 20 20 20 20 20 ┆t.catnr:=dkey; end; ┆
0x13e60…13e80 66 6f 72 20 69 3a 3d 31 20 73 74 65 70 20 31 20 75 6e 74 69 6c 20 31 30 20 64 6f 20 64 75 6e 61 ┆for i:=1 step 1 until 10 do duna┆
0x13e80…13ea0 6d 65 28 69 29 3a 3d 30 3b 0a 20 20 20 20 20 20 66 6f 72 20 69 3a 3d 31 20 73 74 65 70 20 31 20 ┆me(i):=0; for i:=1 step 1 ┆
0x13ea0…13ec0 75 6e 74 69 6c 20 34 20 64 6f 20 64 75 6e 61 6d 65 28 69 29 3a 3d 64 75 6d 70 31 6e 61 6d 65 2e ┆until 4 do duname(i):=dump1name.┆
0x13ec0…13ee0 70 6f 69 6e 74 28 69 29 3b 0a 20 20 20 20 20 20 63 6c 6f 73 65 28 63 61 74 2c 74 72 75 65 29 3b ┆point(i); close(cat,true);┆
0x13ee0…13f00 0a 20 20 20 20 20 20 6d 6f 6e 69 74 6f 72 28 34 38 29 72 65 6d 6f 76 65 20 65 6e 74 72 79 3a 28 ┆ monitor(48)remove entry:(┆
0x13f00…13f20 63 61 74 2c 30 2c 74 61 69 6c 29 3b 0a 20 20 20 20 20 20 63 6c 6f 73 65 28 6e 65 77 63 61 74 2c ┆cat,0,tail); close(newcat,┆
0x13f20…13f40 74 72 75 65 29 3b 0a 20 20 20 20 20 20 69 66 20 6d 6f 6e 69 74 6f 72 28 34 36 29 72 65 6e 61 6d ┆true); if monitor(46)renam┆
0x13f40…13f60 65 5f 65 6e 74 72 79 3a 28 20 6e 65 77 63 61 74 2c 30 2c 64 75 6e 61 6d 65 29 20 3c 3e 20 30 20 ┆e_entry:( newcat,0,duname) <> 0 ┆
0x13f60…13f80 74 68 65 6e 20 65 72 72 6f 72 28 39 29 3b 0a 20 20 20 20 65 6e 64 3b 0a 0a 0c 0a 20 20 20 20 70 ┆then error(9); end; p┆
0x13f80…13fa0 72 6f 63 65 64 75 72 65 20 68 61 73 68 74 73 69 7a 65 3b 0a 20 20 20 20 62 65 67 69 6e 0a 20 20 ┆rocedure hashtsize; begin ┆
0x13fa0…13fc0 20 20 20 20 63 6f 6d 6d 65 6e 74 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2a 2a 2a 2a 2a ┆ comment *****┆
0x13fc0…13fe0 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a ┆********************************┆
0x13fe0…14000 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 0a 20 20 20 20 20 20 20 20 20 20 20 20 ┆******************* ┆
0x14000…14020 20 20 2a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ * ┆
0x14020…14040 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2a 0a 20 20 20 20 20 ┆ * ┆
0x14040…14060 20 20 20 20 20 20 20 20 20 2a 20 54 68 69 73 20 70 72 6f 63 65 64 75 72 65 20 66 69 6e 64 73 20 ┆ * This procedure finds ┆
0x14060…14080 6f 75 74 20 68 6f 77 20 6d 61 6e 79 20 65 6e 74 72 69 65 73 20 74 68 65 72 65 20 61 72 65 20 20 ┆out how many entries there are ┆
0x14080…140a0 2a 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2a 20 69 6e 20 74 68 65 20 68 61 73 68 20 74 61 ┆* * in the hash ta┆
0x140a0…140c0 62 6c 65 20 61 6e 64 20 69 66 20 74 68 65 72 65 20 69 73 20 6d 6f 72 65 20 74 68 61 6e 20 6d 61 ┆ble and if there is more than ma┆
0x140c0…140e0 78 68 61 73 68 2d 20 2a 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2a 20 73 69 7a 65 20 69 74 ┆xhash- * * size it┆
0x140e0…14100 20 69 73 20 72 65 6f 72 67 61 6e 69 73 65 64 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ is reorganised ┆
0x14100…14120 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2a 20 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2a ┆ * *┆
0x14120…14140 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x14140…14160 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2a 20 20 20 0a 20 20 20 20 20 ┆ * ┆
0x14160…14180 20 20 20 20 20 20 20 20 20 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a ┆ ***********************┆
0x14180…141a0 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a ┆********************************┆
0x141a0…141c0 2a 3b 0a 0a 20 20 20 20 20 20 69 6e 74 65 67 65 72 20 66 69 65 6c 64 20 63 3b 0a 20 20 20 20 20 ┆*; integer field c; ┆
0x141c0…141e0 20 69 6e 74 65 67 65 72 20 6e 72 5f 6f 66 5f 65 6e 3b 0a 20 20 20 20 20 20 63 3a 3d 32 3b 0a 20 ┆ integer nr_of_en; c:=2; ┆
0x141e0…14200 20 20 20 20 20 6e 72 5f 6f 66 5f 65 6e 3a 3d 30 3b 0a 20 20 20 20 20 20 20 20 20 20 20 6f 70 65 ┆ nr_of_en:=0; ope┆
0x14200…14220 6e 28 63 61 74 2c 34 2c 20 64 75 6d 70 31 6e 61 6d 65 2c 30 29 3b 0a 20 20 20 20 20 20 66 6f 72 ┆n(cat,4, dump1name,0); for┆
0x14220…14240 20 69 3a 3d 30 20 73 74 65 70 20 31 20 75 6e 74 69 6c 20 68 61 73 68 65 6e 74 72 69 65 73 2d 31 ┆ i:=0 step 1 until hashentries-1┆
0x14240…14260 20 64 6f 0a 20 20 20 20 20 20 62 65 67 69 6e 0a 20 20 20 20 20 20 20 20 73 65 74 70 6f 73 69 74 ┆ do begin setposit┆
0x14260…14280 69 6f 6e 28 63 61 74 2c 30 2c 69 29 3b 0a 20 20 20 20 20 20 20 20 69 6e 72 65 63 36 28 63 61 74 ┆ion(cat,0,i); inrec6(cat┆
0x14280…142a0 2c 31 29 3b 0a 20 20 20 20 20 20 20 20 6e 72 5f 6f 66 5f 65 6e 3a 3d 6e 72 5f 6f 66 5f 65 6e 2b ┆,1); nr_of_en:=nr_of_en+┆
0x142a0…142c0 63 61 74 2e 63 3b 0a 20 20 20 20 20 20 65 6e 64 3b 0a 20 20 20 20 20 20 63 6c 6f 73 65 28 63 61 ┆cat.c; end; close(ca┆
0x142c0…142e0 74 2c 74 72 75 65 29 3b 0a 20 20 20 20 20 20 69 66 20 74 74 65 73 74 20 74 68 65 6e 20 77 72 69 ┆t,true); if ttest then wri┆
0x142e0…14300 74 65 28 6f 75 74 2c 3c 3a 3c 31 30 3e 2a 2a 2a 20 73 69 7a 65 20 6f 66 20 68 61 73 68 74 61 62 ┆te(out,<:<10>*** size of hashtab┆
0x14300…14320 6c 65 3d 20 3a 3e 2c 6e 72 5f 6f 66 5f 65 6e 29 3b 0a 20 20 20 20 20 20 69 66 20 6e 72 5f 6f 66 ┆le= :>,nr_of_en); if nr_of┆
0x14320…14340 5f 65 6e 20 2f 20 28 68 61 73 68 65 6e 74 72 69 65 73 20 2a 20 32 38 29 20 3e 20 6d 61 78 68 61 ┆_en / (hashentries * 28) > maxha┆
0x14340…14360 73 68 73 69 7a 65 20 74 68 65 6e 20 72 65 6f 72 67 3b 0a 20 20 20 20 65 6e 64 3b 0a 0c 0a 20 20 ┆shsize then reorg; end; ┆
0x14360…14380 20 20 70 72 6f 63 65 64 75 72 65 20 72 68 61 73 68 65 6e 74 72 79 3b 0a 20 20 20 20 62 65 67 69 ┆ procedure rhashentry; begi┆
0x14380…143a0 6e 0a 20 20 20 20 20 20 6b 3a 3d 73 77 6f 70 72 65 63 36 28 63 61 74 2c 30 29 3b 0a 20 20 20 20 ┆n k:=swoprec6(cat,0); ┆
0x143a0…143c0 20 20 69 66 20 6b 20 3d 20 30 20 74 68 65 6e 0a 20 20 20 20 20 20 62 65 67 69 6e 0a 20 20 20 20 ┆ if k = 0 then begin ┆
0x143c0…143e0 20 20 20 20 20 73 65 74 70 6f 73 69 74 69 6f 6e 28 63 61 74 2c 30 2c 30 29 3b 0a 20 20 20 20 20 ┆ setposition(cat,0,0); ┆
0x143e0…14400 20 20 20 20 73 77 6f 70 72 65 63 36 28 63 61 74 2c 32 29 3b 0a 20 20 20 20 20 20 65 6e 64 3b 0a ┆ swoprec6(cat,2); end; ┆
0x14400…14420 (36,) 20 20 20 20 20 20 69 66 20 6b 20 3d 20 35 31 32 20 74 68 65 6e 20 73 77 6f 70 72 65 63 36 28 63 ┆ if k = 512 then swoprec6(c┆
0x14420…14440 61 74 2c 32 29 3b 0a 20 20 20 20 20 20 69 66 20 6b 20 3d 20 72 65 73 74 6f 6e 64 75 6d 70 73 20 ┆at,2); if k = restondumps ┆
0x14440…14460 74 68 65 6e 0a 20 20 20 20 20 20 62 65 67 69 6e 0a 20 20 20 20 20 20 20 20 73 77 6f 70 72 65 63 ┆then begin swoprec┆
0x14460…14480 36 28 63 61 74 2c 6b 29 3b 0a 20 20 20 20 20 20 20 20 6b 3a 3d 73 77 6f 70 72 65 63 36 28 63 61 ┆6(cat,k); k:=swoprec6(ca┆
0x14480…144a0 74 2c 30 29 3b 0a 20 20 20 20 20 20 20 20 69 66 20 6b 20 3d 20 30 20 74 68 65 6e 0a 20 20 20 20 ┆t,0); if k = 0 then ┆
0x144a0…144c0 20 20 20 20 20 73 65 74 70 6f 73 69 74 69 6f 6e 28 63 61 74 2c 30 2c 30 29 3b 0a 20 20 20 20 20 ┆ setposition(cat,0,0); ┆
0x144c0…144e0 20 20 20 73 77 6f 70 72 65 63 36 28 63 61 74 2c 32 29 3b 0a 20 20 20 20 20 20 20 20 73 77 6f 70 ┆ swoprec6(cat,2); swop┆
0x144e0…14500 72 65 63 36 28 63 61 74 2c 64 75 6d 70 65 6e 73 69 7a 65 29 3b 0a 20 20 20 20 20 20 65 6e 64 0a ┆rec6(cat,dumpensize); end ┆
0x14500…14520 20 20 20 20 20 20 65 6c 73 65 0a 20 20 20 20 20 20 73 77 6f 70 72 65 63 36 28 63 61 74 2c 64 75 ┆ else swoprec6(cat,du┆
0x14520…14540 6d 70 65 6e 73 69 7a 65 29 3b 0a 20 20 20 20 65 6e 64 3b 0a 0c 0a 20 20 20 20 70 72 6f 63 65 64 ┆mpensize); end; proced┆
0x14540…14560 75 72 65 20 64 75 6d 70 63 61 74 75 70 64 61 74 65 28 6e 72 66 69 6c 65 73 2c 6e 72 2c 73 74 65 ┆ure dumpcatupdate(nrfiles,nr,ste┆
0x14560…14580 6e 74 72 79 29 3b 0a 20 20 20 20 69 6e 74 65 67 65 72 20 6e 72 66 69 6c 65 73 2c 6e 72 2c 73 74 ┆ntry); integer nrfiles,nr,st┆
0x14580…145a0 65 6e 74 72 79 3b 0a 20 20 20 20 62 65 67 69 6e 0a 20 20 20 20 20 20 69 6e 74 65 67 65 72 20 62 ┆entry; begin integer b┆
0x145a0…145c0 69 74 6e 6f 3b 0a 20 20 20 20 20 20 63 6f 6d 6d 65 6e 74 0a 20 20 20 20 20 20 20 20 20 20 20 20 ┆itno; comment ┆
0x145c0…145e0 20 20 20 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a ┆ *****************************┆
0x145e0…14600 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 0a 20 20 20 20 20 ┆************************** ┆
0x14600…14620 20 20 20 20 20 20 20 20 20 2a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ * ┆
0x14620…14640 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2a ┆ *┆
0x14640…14660 20 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2a 20 54 68 69 73 20 70 72 6f 63 65 64 75 72 65 ┆ * This procedure┆
0x14660…14680 20 77 69 6c 6c 20 66 6f 72 20 74 68 65 20 65 6e 74 72 69 65 73 20 69 6e 20 74 68 65 20 63 61 74 ┆ will for the entries in the cat┆
0x14680…146a0 61 6c 6f 67 20 20 2a 20 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2a 20 74 6f 20 74 68 65 20 ┆alog * * to the ┆
0x146a0…146c0 74 61 70 65 20 63 6f 70 69 65 64 20 74 68 61 74 20 64 61 79 20 75 70 64 61 74 65 20 69 6e 20 64 ┆tape copied that day update in d┆
0x146c0…146e0 75 6d 70 63 61 74 2e 20 20 20 20 20 20 2a 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2a 20 6e ┆umpcat. * * n┆
0x146e0…14700 72 66 69 6c 65 73 3a 20 73 70 65 63 69 66 69 65 73 20 68 6f 77 20 6d 61 6e 79 20 65 6e 74 72 69 ┆rfiles: specifies how many entri┆
0x14700…14720 65 73 20 74 68 61 74 20 69 73 20 74 6f 20 62 65 20 20 20 2a 0a 20 20 20 20 20 20 20 20 20 20 20 ┆es that is to be * ┆
0x14720…14740 20 20 20 2a 20 75 70 64 61 74 65 64 2e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ * updated. ┆
0x14740…14760 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2a 0a 20 20 20 20 20 ┆ * ┆
0x14760…14780 20 20 20 20 20 20 20 20 20 2a 20 6e 72 20 20 20 20 20 3a 20 73 70 65 63 69 66 69 65 73 20 74 68 ┆ * nr : specifies th┆
0x14780…147a0 65 20 74 61 70 65 6e 72 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2a ┆e tapenr *┆
0x147a0…147c0 20 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2a 20 73 74 73 74 65 6e 74 72 79 3a 20 73 70 65 ┆ * ststentry: spe┆
0x147c0…147e0 63 69 66 69 65 73 20 77 68 65 72 65 20 74 68 65 20 65 6e 74 72 69 65 73 20 73 74 61 72 74 20 69 ┆cifies where the entries start i┆
0x147e0…14800 6e 20 74 68 65 20 2a 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2a 20 63 61 74 61 6c 6f 67 2e ┆n the * * catalog.┆
0x14800…14820 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x14820…14840 20 20 20 20 20 20 20 20 20 20 20 20 2a 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2a 20 20 20 ┆ * * ┆
0x14840…14860 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x14860…14880 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2a 0a 20 20 20 20 20 20 20 20 20 20 20 20 ┆ * ┆
0x14880…148a0 20 20 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a ┆ ******************************┆
0x148a0…148c0 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 3b 0a 0c 0a 20 20 20 ┆*************************; ┆
0x148c0…148e0 20 20 20 70 72 6f 63 65 64 75 72 65 20 72 65 6d 6f 76 65 64 75 6d 70 62 69 74 3b 0a 20 20 20 20 ┆ procedure removedumpbit; ┆
0x148e0…14900 20 20 62 65 67 69 6e 0a 20 20 20 20 20 20 20 20 63 6f 6d 6d 65 6e 74 0a 20 20 20 20 20 20 20 20 ┆ begin comment ┆
0x14900…14920 20 20 20 20 20 20 20 20 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a ┆ ************************┆
0x14920…14940 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 0a 20 ┆****************************** ┆
0x14940…14960 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ * ┆
0x14960…14980 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x14980…149a0 20 20 20 20 2a 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2a 20 54 68 69 73 20 70 72 6f ┆ * * This pro┆
0x149a0…149c0 63 65 64 75 72 65 20 72 65 6d 6f 76 65 73 20 74 68 65 20 62 69 74 20 62 65 6c 6f 6e 69 6e 67 20 ┆cedure removes the bit beloning ┆
0x149c0…149e0 74 6f 20 6e 72 20 69 6e 20 20 20 2a 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2a 20 74 ┆to nr in * * t┆
0x149e0…14a00 68 65 20 77 68 6f 6c 65 20 64 75 6d 70 63 61 74 2e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆he whole dumpcat. ┆
0x14a00…14a20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2a 0a 20 20 20 20 20 20 20 20 20 20 20 20 ┆ * ┆
0x14a20…14a40 20 20 20 20 2a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ * ┆
0x14a40…14a60 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2a 0a 20 20 20 20 20 ┆ * ┆
0x14a60…14a80 20 20 20 20 20 20 20 20 20 20 20 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a ┆ *********************┆
0x14a80…14aa0 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a ┆********************************┆
0x14aa0…14ac0 2a 3b 0a 20 20 20 20 20 20 20 20 62 6f 6f 6c 65 61 6e 20 70 72 6f 63 65 64 75 72 65 20 62 69 74 ┆*; boolean procedure bit┆
0x14ac0…14ae0 73 61 74 28 62 69 74 6e 75 6d 6d 65 72 29 3b 69 6e 74 65 67 65 72 20 62 69 74 6e 75 6d 6d 65 72 ┆sat(bitnummer);integer bitnummer┆
0x14ae0…14b00 3b 0a 20 20 20 20 20 20 20 20 62 65 67 69 6e 0a 20 20 20 20 20 20 20 20 20 20 62 69 74 73 61 74 ┆; begin bitsat┆
0x14b00…14b20 3a 3d 20 69 66 20 63 61 74 2e 77 6f 72 64 6e 6f 20 73 68 69 66 74 28 2d 62 69 74 6e 75 6d 6d 65 ┆:= if cat.wordno shift(-bitnumme┆
0x14b20…14b40 72 29 20 65 78 74 72 61 63 74 20 31 20 3d 20 31 20 74 68 65 6e 0a 20 20 20 20 20 20 20 20 20 20 ┆r) extract 1 = 1 then ┆
0x14b40…14b60 20 20 20 74 72 75 65 20 65 6c 73 65 20 66 61 6c 73 65 3b 0a 20 20 20 20 20 20 20 20 65 6e 64 3b ┆ true else false; end;┆
0x14b60…14b80 0a 20 20 20 20 20 20 20 20 69 6e 74 65 67 65 72 20 6e 6f 6f 6e 73 65 67 6d 2c 6e 72 65 6d 6f 76 ┆ integer noonsegm,nremov┆
0x14b80…14ba0 65 64 2c 77 6f 72 64 31 3b 0a 20 20 20 20 20 20 20 20 69 6e 74 65 67 65 72 20 66 69 65 6c 64 20 ┆ed,word1; integer field ┆
0x14ba0…14bc0 70 6c 61 63 65 3b 0a 20 20 20 20 20 20 20 20 62 6f 6f 6c 65 61 6e 20 65 6d 70 74 79 3b 0a 20 20 ┆place; boolean empty; ┆
0x14bc0…14be0 20 20 20 20 20 20 20 69 66 20 74 74 65 73 74 20 74 68 65 6e 20 77 72 69 74 65 28 6f 75 74 2c 3c ┆ if ttest then write(out,<┆
0x14be0…14c00 3a 3c 31 30 3e 62 69 74 3d 3a 3e 2c 62 69 74 6e 6f 2c 0a 20 20 20 20 20 20 20 20 20 20 20 20 3c ┆:<10>bit=:>,bitno, <┆
0x14c00…14c20 3a 3c 31 30 3e 62 69 74 6d 6f 65 6e 73 74 65 72 20 3d 3a 3e 2c 62 69 74 70 61 74 74 65 72 6e 29 ┆:<10>bitmoenster =:>,bitpattern)┆
0x14c20…14c40 3b 0a 20 20 20 20 20 20 20 20 65 6d 70 74 79 3a 3d 74 72 75 65 3b 0a 20 20 20 20 20 20 20 20 6e ┆; empty:=true; n┆
0x14c40…14c60 72 65 6d 6f 76 65 64 3a 3d 30 3b 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 6f 70 65 6e 28 63 61 ┆removed:=0; open(ca┆
0x14c60…14c80 74 2c 34 2c 20 64 75 6d 70 31 6e 61 6d 65 2c 30 29 3b 0a 20 20 20 20 20 20 20 20 66 6f 72 20 69 ┆t,4, dump1name,0); for i┆
0x14c80…14ca0 3a 3d 20 30 20 73 74 65 70 20 31 20 75 6e 74 69 6c 20 68 61 73 68 65 6e 74 72 69 65 73 2d 31 20 ┆:= 0 step 1 until hashentries-1 ┆
0x14ca0…14cc0 64 6f 0a 20 20 20 20 20 20 20 20 62 65 67 69 6e 0a 20 20 20 20 20 20 20 20 20 20 73 65 74 70 6f ┆do begin setpo┆
0x14cc0…14ce0 73 69 74 69 6f 6e 28 63 61 74 2c 30 2c 69 29 3b 0a 20 20 20 20 20 20 20 20 20 20 73 77 6f 70 72 ┆sition(cat,0,i); swopr┆
0x14ce0…14d00 65 63 36 28 63 61 74 2c 32 29 3b 0a 20 20 20 20 20 20 20 20 20 20 6e 6f 6f 6e 73 65 67 6d 3a 3d ┆ec6(cat,2); noonsegm:=┆
0x14d00…14d20 (37,) 63 61 74 2e 63 61 74 6e 72 3b 0a 20 20 20 20 20 20 20 20 20 20 20 20 69 66 20 74 74 65 73 74 20 ┆cat.catnr; if ttest ┆
0x14d20…14d40 74 68 65 6e 20 77 72 69 74 65 28 6f 75 74 2c 3c 3a 3c 31 30 3e 61 6e 74 61 6c 3d 3a 3e 2c 6e 6f ┆then write(out,<:<10>antal=:>,no┆
0x14d40…14d60 6f 6e 73 65 67 6d 29 3b 0a 20 20 20 20 20 20 20 20 20 20 20 20 77 68 69 6c 65 20 6e 6f 6f 6e 73 ┆onsegm); while noons┆
0x14d60…14d80 65 67 6d 20 3e 20 30 20 64 6f 0a 20 20 20 20 20 20 20 20 20 20 20 20 62 65 67 69 6e 0a 20 20 20 ┆egm > 0 do begin ┆
0x14d80…14da0 20 20 20 20 20 20 20 20 20 20 20 69 66 20 74 74 65 73 74 20 74 68 65 6e 20 77 72 69 74 65 28 6f ┆ if ttest then write(o┆
0x14da0…14dc0 75 74 2c 3c 3a 3c 31 30 3e 20 61 6e 74 61 6c 31 20 3d 20 3a 3e 2c 6e 6f 6f 6e 73 65 67 6d 29 3b ┆ut,<:<10> antal1 = :>,noonsegm);┆
0x14dc0…14de0 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 72 68 61 73 68 65 6e 74 72 79 3b 0a 20 20 20 20 20 ┆ rhashentry; ┆
0x14de0…14e00 20 20 20 20 20 20 20 20 20 77 68 69 6c 65 20 63 61 74 2e 63 61 74 6e 72 20 3d 20 2d 31 20 20 64 ┆ while cat.catnr = -1 d┆
0x14e00…14e20 6f 20 72 68 61 73 68 65 6e 74 72 79 3b 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 77 6f 72 64 ┆o rhashentry; word┆
0x14e20…14e40 31 3a 3d 63 61 74 2e 77 6f 72 64 6e 6f 3b 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 69 66 20 ┆1:=cat.wordno; if ┆
0x14e40…14e60 62 69 74 73 61 74 28 62 69 74 6e 6f 29 20 74 68 65 6e 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆bitsat(bitno) then ┆
0x14e60…14e80 20 63 61 74 2e 77 6f 72 64 6e 6f 3a 3d 65 78 6f 72 28 63 61 74 2e 77 6f 72 64 6e 6f 2c 62 69 74 ┆ cat.wordno:=exor(cat.wordno,bit┆
0x14e80…14ea0 70 61 74 74 65 72 6e 29 3b 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 69 66 20 74 74 65 73 74 ┆pattern); if ttest┆
0x14ea0…14ec0 20 61 6e 64 20 77 6f 72 64 31 20 3c 3e 20 63 61 74 2e 77 6f 72 64 6e 6f 20 0a 20 20 20 20 20 20 ┆ and word1 <> cat.wordno ┆
0x14ec0…14ee0 20 20 20 20 20 20 20 20 74 68 65 6e 20 77 72 69 74 65 28 6f 75 74 2c 3c 3a 77 6f 72 64 32 20 3d ┆ then write(out,<:word2 =┆
0x14ee0…14f00 20 3a 3e 2c 63 61 74 2e 77 6f 72 64 6e 6f 29 3b 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 66 ┆ :>,cat.wordno); f┆
0x14f00…14f20 6f 72 20 6a 3a 3d 31 20 73 74 65 70 20 31 20 75 6e 74 69 6c 20 62 69 74 74 73 69 7a 65 20 64 6f ┆or j:=1 step 1 until bittsize do┆
0x14f20…14f40 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 65 6d 70 74 79 3a 3d 20 65 6d 70 74 79 20 61 6e 64 ┆ empty:= empty and┆
0x14f40…14f60 20 28 63 61 74 2e 73 74 61 72 74 6f 66 62 69 74 74 28 6a 29 20 3d 20 30 29 3b 0a 20 20 20 20 20 ┆ (cat.startofbitt(j) = 0); ┆
0x14f60…14f80 20 20 20 20 20 20 20 20 20 69 66 20 65 6d 70 74 79 20 74 68 65 6e 0a 20 20 20 20 20 20 20 20 20 ┆ if empty then ┆
0x14f80…14fa0 20 20 20 20 20 62 65 67 69 6e 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 66 6f 72 20 69 ┆ begin for i┆
0x14fa0…14fc0 6b 3a 3d 20 31 20 73 74 65 70 20 31 20 75 6e 74 69 6c 20 64 75 6d 70 73 69 7a 65 20 64 6f 0a 20 ┆k:= 1 step 1 until dumpsize do ┆
0x14fc0…14fe0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 62 65 67 69 6e 0a 20 20 20 20 20 20 20 20 20 20 20 ┆ begin ┆
0x14fe0…15000 20 20 20 20 20 20 20 70 6c 61 63 65 3a 3d 69 6b 2a 32 3b 0a 20 20 20 20 20 20 20 20 20 20 20 20 ┆ place:=ik*2; ┆
0x00000…00033 (0,) Rc489kSubCatEnt {f00=0x0031d8, f01=0x0007e4, f02=0x0007e4, filename=»complinp «, entry_tail=0-4-0-2-1981-01-10T14:59-disc1-0x0-0x0-0x0-0x0}
0x00033…00066 Rc489kSubCatEnt {f00=0x005efa, f01=0x0007e4, f02=0x0007ed, filename=»multicopinp «, entry_tail=0-4-0-4-1981-02-04T11:08-disc1-0x0-0x0-0x0-0x0}
0x00066…00099 Rc489kSubCatEnt {f00=0x009d8a, f01=0x0007e4, f02=0x0007ed, filename=»compfphead «, entry_tail=0-4-0-2-1981-01-21T16:44-disc1-0x0-0x0-0x0-0x0}
0x00099…000cc Rc489kSubCatEnt {f00=0x00b5ba, f01=0x0007e4, f02=0x0007e4, filename=»compdes «, entry_tail=0-4-0-3-1981-01-21T16:32-disc1-0x0-0x0-0x0-0x0}
0x000cc…000ff Rc489kSubCatEnt {f00=0x00e33a, f01=0x0007e4, f02=0x0007ed, filename=»listerrinp «, entry_tail=0-4-0-2-1980-12-09T11:47-disc1-0x0-0x0-0x0-0x0}
0x000ff…00132 Rc489kSubCatEnt {f00=0x0106fa, f01=0x0007e4, f02=0x0007ed, filename=»describeinp «, entry_tail=0-4-0-6-1980-11-12T12:08-disc1-0x0-0x0-0x0-0x0}
0x00132…00165 Rc489kSubCatEnt {f00=0x016b82, f01=0x0007e4, f02=0x0007ed, filename=»writestdinp «, entry_tail=0-4-0-4-1980-11-11T15:19-disc1-0x0-0x0-0x0-0x0}
0x00165…00198 Rc489kSubCatEnt {f00=0x01a26a, f01=0x0007e4, f02=0x0007ed, filename=»testbufinp «, entry_tail=0-4-0-2-1980-11-11T15:13-disc1-0x0-0x0-0x0-0x0}
0x00198…001cb Rc489kSubCatEnt {f00=0x01c762, f01=0x0007e4, f02=0x0007ed, filename=»stdvarinp «, entry_tail=0-4-0-6-1980-11-11T15:11-disc1-0x0-0x0-0x0-0x0}
0x001cb…001fe Rc489kSubCatEnt {f00=0x022652, f01=0x0007e4, f02=0x0007ed, filename=»searchcinp «, entry_tail=0-4-0-2-1980-11-11T15:06-disc1-0x0-0x0-0x0-0x0}
0x001fe…00231 Rc489kSubCatEnt {f00=0x024a02, f01=0x0007e4, f02=0x0007ed, filename=»remspinp «, entry_tail=0-4-0-2-1980-11-11T15:07-disc1-0x0-0x0-0x0-0x0}
0x00231…00264 Rc489kSubCatEnt {f00=0x02609a, f01=0x0007e4, f02=0x0007ed, filename=»mtreadinp «, entry_tail=0-4-0-4-1980-11-11T15:02-disc1-0x0-0x0-0x0-0x0}
0x00264…00297 Rc489kSubCatEnt {f00=0x02ad5a, f01=0x0007e4, f02=0x0007ed, filename=»macroinp «, entry_tail=0-4-0-2-1980-11-11T14:58-disc1-0x0-0x0-0x0-0x0}
0x00297…002ca Rc489kSubCatEnt {f00=0x02cf5a, f01=0x0007e4, f02=0x0007ed, filename=»listintinp «, entry_tail=0-4-0-2-1980-11-11T14:56-disc1-0x0-0x0-0x0-0x0}
0x002ca…002fd Rc489kSubCatEnt {f00=0x02e402, f01=0x0007e4, f02=0x0007ed, filename=»extractinp «, entry_tail=0-4-0-5-1980-11-11T14:53-disc1-0x0-0x0-0x0-0x0}
0x002fd…00300 0x00001c
0x00300…00333 Rc489kSubCatEnt {f00=0x0331f2, f01=0x0007e4, f02=0x0007ed, filename=»docmoveinp «, entry_tail=0-4-0-2-1980-11-11T14:47-disc1-0x0-0x0-0x0-0x0}
0x00333…00366 Rc489kSubCatEnt {f00=0x0356e2, f01=0x0007e4, f02=0x0007ed, filename=»convertinp «, entry_tail=0-4-0-2-1980-11-11T14:28-disc1-0x0-0x0-0x0-0x0}
0x00366…00399 Rc489kSubCatEnt {f00=0x03787a, f01=0x0007e4, f02=0x0007ed, filename=»deviceinp «, entry_tail=0-4-0-2-1980-11-11T14:30-disc1-0x0-0x0-0x0-0x0}
0x00399…003cc Rc489kSubCatEnt {f00=0x039352, f01=0x0007e4, f02=0x0007ed, filename=»disccopyinp «, entry_tail=0-4-0-2-1980-11-11T14:15-disc3-0x0-0x0-0x0-0x0}
0x003cc…003ff Rc489kSubCatEnt {f00=0x03b0f2, f01=0x0007e4, f02=0x0007ed, filename=»readparinp «, entry_tail=0-4-0-2-1980-11-11T14:08-disc1-0x0-0x0-0x0-0x0}
0x003ff…00432 Rc489kSubCatEnt {f00=0x03db4a, f01=0x0007e4, f02=0x0007ed, filename=»wrstdeinp «, entry_tail=0-4-0-3-1980-11-11T14:11-disc3-0x0-0x0-0x0-0x0}
0x00432…00465 Rc489kSubCatEnt {f00=0x04042a, f01=0x0007e4, f02=0x0007ed, filename=»careainp «, entry_tail=0-4-0-2-1980-11-11T13:56-disc3-0x0-0x0-0x0-0x0}
0x00465…00498 Rc489kSubCatEnt {f00=0x042662, f01=0x0007e4, f02=0x0007ed, filename=»outshclinp «, entry_tail=0-4-0-1-1980-11-11T13:58-disc1-0x0-0x0-0x0-0x0}
0x00498…004cb Rc489kSubCatEnt {f00=0x043252, f01=0x0007e4, f02=0x0007ed, filename=»printfinp «, entry_tail=0-4-0-2-1980-11-11T14:01-disc1-0x0-0x0-0x0-0x0}
0x004cb…004fe Rc489kSubCatEnt {f00=0x04591a, f01=0x0007e4, f02=0x0007ed, filename=»procfinp «, entry_tail=0-4-0-2-1980-10-21T16:10-disc1-0x0-0x0-0x0-0x0}
0x004fe…00531 Rc489kSubCatEnt {f00=0x0470c8, f01=0x0007e4, f02=0x0007e4, filename=»progfinp «, entry_tail=0-4-0-2-1980-10-21T14:31-disc1-0x0-0x0-0x0-0x0}
0x00531…00564 Rc489kSubCatEnt {f00=0x049802, f01=0x0007e4, f02=0x0007ed, filename=»guidec «, entry_tail=0-4-0-3-1980-10-21T14:28-disc1-0x0-0x0-0x0-0x0}
0x00564…00597 Rc489kSubCatEnt {f00=0x04ca5a, f01=0x0007e4, f02=0x0007ed, filename=»guideinp «, entry_tail=0-4-0-10-1980-10-21T14:28-disc1-0x0-0x0-0x0-0x0}
0x00597…005a0 02 cf 5a 00 07 e4 00 07 ed ┆ Z ┆
0x005a0…005c0 6c 69 73 74 69 6e 74 69 6e 70 00 00 00 00 02 64 69 73 63 31 00 00 00 00 00 00 00 76 26 73 00 00 ┆listintinp disc1 v&s ┆
0x005c0…005e0 00 00 00 00 00 00 00 00 00 00 02 e4 02 00 07 e4 00 07 ed 65 78 74 72 61 63 74 69 6e 70 00 00 00 ┆ extractinp ┆
0x005e0…00600 00 05 64 69 73 63 31 00 00 00 00 00 00 00 76 26 70 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ┆ disc1 v&p ┆
0x00600…00620 65 72 6d 61 6e 65 6e 74 65 20 70 6c 61 64 65 6c 61 67 65 72 20 72 65 73 6f 75 72 63 65 72 2e 0a ┆ermanente pladelager resourcer. ┆
0x00620…00640 44 65 73 75 64 65 6e 20 67 7b 6c 64 65 72 20 61 74 20 73 74 61 6e 64 61 72 64 20 74 69 64 20 65 ┆Desuden gælder at standard tid e┆
0x00640…00660 72 20 35 20 6d 69 6e 20 6f 67 0a 61 74 20 6d 61 78 69 6d 61 6c 74 69 64 20 69 20 64 61 67 74 69 ┆r 5 min og at maximaltid i dagti┆
0x00660…00680 64 20 65 72 20 32 30 20 6d 69 6e 20 6f 67 20 6f 6d 20 6e 61 74 74 65 6e 0a 38 20 74 69 6d 65 72 ┆d er 20 min og om natten 8 timer┆
0x00680…006a0 2e 0a 44 65 72 20 6b 61 6e 20 6b 7c 72 65 20 6f 70 20 74 69 6c 20 38 20 6a 6f 62 73 20 73 61 6d ┆. Der kan køre op til 8 jobs sam┆
0x006a0…006c0 74 69 64 69 67 20 75 6e 64 65 72 20 64 65 6e 20 73 61 74 73 76 69 73 65 0a 61 66 76 69 6b 6c 69 ┆tidig under den satsvise afvikli┆
0x006c0…006e0 6e 67 20 76 65 64 20 62 65 6e 79 74 74 65 6c 73 65 20 61 66 20 6c 61 67 65 72 76 65 6b 73 6c 69 ┆ng ved benyttelse af lagerveksli┆
0x006e0…00700 6e 67 2e 20 4a 6f 62 62 65 6e 65 0a 62 6c 69 76 65 72 20 70 72 69 6f 72 69 74 65 72 65 74 20 65 ┆ng. Jobbene bliver prioriteret e┆
0x00700…00720 66 74 65 72 20 66 6f 72 76 65 6e 74 65 74 20 6b 7c 72 65 74 69 64 2c 20 66 6f 72 62 72 75 67 74 ┆fter forventet køretid, forbrugt┆
0x00720…00740 0a 74 69 64 20 6f 67 20 65 66 74 65 72 20 68 76 6f 72 20 6d 61 6e 67 65 20 6a 6f 62 73 20 65 6e ┆ tid og efter hvor mange jobs en┆
0x00740…00760 20 62 72 75 67 65 72 67 72 75 70 70 65 20 61 6c 6c 65 72 65 64 65 0a 65 72 20 76 65 64 20 61 74 ┆ brugergruppe allerede er ved at┆
0x00760…00780 20 66 7d 20 61 66 76 69 6b 6c 65 74 2e 0a 0a 42 61 67 67 72 75 6e 64 73 6c 61 67 65 72 2e 0a 52 ┆ få afviklet. Baggrundslager. R┆
0x00780…007a0 43 38 30 30 30 27 73 20 6d 7d 64 65 20 61 74 20 62 65 68 61 6e 64 6c 65 20 62 61 67 67 72 75 6e ┆C8000's måde at behandle baggrun┆
0x007a0…007c0 64 73 6c 61 67 65 72 20 70 7d 20 75 64 76 69 73 65 72 0a 65 6e 20 72 7b 6b 6b 65 20 61 66 76 69 ┆dslager på udviser en række afvi┆
0x007c0…007e0 67 65 6c 73 65 72 20 66 72 61 20 52 43 34 30 30 30 27 73 2e 20 48 65 72 20 73 6b 61 6c 20 6b 75 ┆gelser fra RC4000's. Her skal ku┆
0x007e0…00800 6e 20 6e 7b 76 6e 65 73 20 74 72 65 2c 0a 73 6f 6d 20 69 6d 69 64 6c 65 72 74 69 64 20 62 7c 72 ┆n nævnes tre, som imidlertid bør┆
0x00800…00820 20 68 75 73 6b 65 73 2e 20 31 29 20 49 20 52 43 34 30 30 30 20 6b 61 6e 20 6d 61 6e 20 6c 7b 73 ┆ huskes. 1) I RC4000 kan man læs┆
0x00820…00840 65 20 69 20 61 6c 6c 65 0a 6f 6d 72 7d 64 65 72 2e 20 44 65 74 74 65 20 65 72 20 69 6b 6b 65 20 ┆e i alle områder. Dette er ikke ┆
0x00840…00860 74 69 6c 66 7b 6c 64 65 74 20 69 20 52 43 38 30 30 30 2e 20 32 29 20 52 43 38 30 30 30 20 6f 70 ┆tilfældet i RC8000. 2) RC8000 op┆
0x00860…00880 72 65 74 74 65 72 0a 73 65 6c 76 20 6f 6d 72 7d 64 65 72 2e 20 48 76 69 73 20 6d 61 6e 20 66 2e ┆retter selv områder. Hvis man f.┆
0x00880…008a0 65 6b 73 2e 20 7c 6e 73 6b 65 72 20 61 74 20 65 64 69 74 65 72 65 72 20 6f 76 65 72 20 69 20 65 ┆eks. ønsker at editerer over i e┆
0x008a0…008c0 74 20 6f 6d 72 7d 64 65 2c 20 0a 6e 61 76 6e 31 2c 28 6e 61 76 6e 31 20 3d 20 65 64 69 74 20 6e ┆t område, navn1,(navn1 = edit n┆
0x008c0…008e0 61 76 6e 32 20 66 2e 65 6b 73 2e 29 20 6f 67 20 6e 61 76 6e 31 20 69 6b 6b 65 20 66 69 6e 64 65 ┆avn2 f.eks.) og navn1 ikke finde┆
0x008e0…00900 73 20 65 6c 6c 65 72 0a 6d 61 6e 20 69 6b 6b 65 20 6d 7d 20 73 6b 72 69 76 65 20 69 20 64 65 74 ┆s eller man ikke må skrive i det┆
0x00900…00f00 (1,) Data for complinp
0x00f00…01b00 Data for multicopinp
0x01b00…02100 (3,) Data for compfphead
0x02100…02a00 Data for compdes
0x02a00…03000 Data for listerrinp
0x03000…04200 Data for describeinp
0x04200…04e00 Data for writestdinp
0x04e00…05400 Data for testbufinp
0x05400…06600 Data for stdvarinp
0x06600…06c00 Data for searchcinp
0x06c00…07200 (12,) Data for remspinp
0x07200…07e00 Data for mtreadinp
0x07e00…08400 (14,) Data for macroinp
0x08400…08a00 Data for listintinp
0x08a00…09900 Data for extractinp
0x09900…09f00 (17,) Data for docmoveinp
0x09f00…0a500 Data for convertinp
0x0a500…0ab00 Data for deviceinp
0x0ab00…0b100 (19,) Data for disccopyinp
0x0b100…0b700 Data for readparinp
0x0b700…0c000 Data for wrstdeinp
0x0c000…0c600 Data for careainp
0x0c600…0c900 (22,) Data for outshclinp
0x0c900…0cf00 Data for printfinp
0x0cf00…0d500 (23,) Data for procfinp
0x0d500…0db00 Data for progfinp
0x0db00…0e400 Data for guidec
0x0e400…10200 Data for guideinp
0x10200…10220 80 0b 73 80 00 01 7f ff fd 64 65 6c 65 74 65 72 65 63 69 00 00 80 00 04 64 72 75 6d 00 00 00 00 ┆ s deletereci drum ┆
0x10220…10240 00 00 00 00 80 11 54 04 80 00 00 00 00 00 40 00 00 70 02 80 04 c3 00 00 78 00 00 81 64 69 61 67 ┆ T @ p x diag┆
0x10240…10260 72 61 6d 00 00 00 00 00 80 00 00 64 72 75 6d 00 00 00 00 00 00 00 00 7c f9 c9 00 07 df 00 00 00 ┆ram drum ø ┆
0x10260…10280 00 00 00 00 00 0b 02 2f 7b 00 00 50 00 00 59 64 69 66 62 6f 67 32 00 00 00 00 00 00 00 0c 64 69 ┆ /æ P Ydifbog2 di┆
0x10280…102a0 73 63 32 00 00 00 00 00 00 00 80 ae aa 00 00 00 00 00 00 00 00 00 00 00 00 53 5c 6b 00 07 f8 00 ┆sc2 SØk ┆
0x102a0…102c0 08 01 64 6c 69 73 74 00 00 00 00 00 00 00 00 00 0e 64 69 73 63 31 00 00 00 00 00 00 00 80 bc f4 ┆ dlist disc1 ┆
0x102c0…102e0 00 00 00 00 00 00 00 00 00 00 00 00 64 78 c3 80 00 01 7f ff fd 64 75 6d 70 31 63 61 74 00 00 00 ┆ dx dump1cat ┆
0x102e0…10300 00 00 01 75 64 69 73 63 33 00 00 00 00 00 00 00 80 ae 56 00 00 00 00 00 00 00 b0 00 00 00 14 05 ┆ udisc3 V ┆
0x10300…10320 c4 93 01 11 7a 01 11 83 65 6c 69 73 32 00 00 00 00 00 00 00 00 00 09 64 69 73 63 34 00 00 00 00 ┆ z elis2 disc4 ┆
0x10320…10340 00 00 00 80 bc 62 00 00 00 00 00 00 00 00 00 00 00 00 07 35 03 01 11 7a 01 11 83 65 6c 69 73 34 ┆ b 5 z elis4┆
0x10340…10360 00 00 00 00 00 00 00 00 00 0a 64 69 73 63 34 00 00 00 00 00 00 00 80 be 43 00 00 00 00 00 00 00 ┆ disc4 C ┆
0x10360…10380 00 00 00 00 00 01 3c 4b 01 11 7a 01 11 83 65 6c 69 73 64 61 74 61 00 00 00 00 00 00 01 64 69 73 ┆ <K z elisdata dis┆
0x10380…103a0 63 34 00 00 00 00 00 00 00 80 bc 73 00 00 00 00 00 00 00 00 00 00 00 00 01 4a db 01 11 7a 01 11 ┆c4 s J z ┆
0x103a0…103c0 83 65 6c 69 73 6f 75 74 00 00 00 00 00 00 00 01 64 69 73 63 34 00 00 00 00 00 00 00 80 c2 bc 00 ┆ elisout disc4 ┆
0x103c0…103e0 00 00 00 00 00 00 00 00 00 00 00 53 1f 5b 00 00 00 7f ff fc 66 72 65 61 64 62 00 00 00 00 00 00 ┆ S Æ freadb ┆
0x103e0…10400 00 00 01 64 69 73 63 31 00 00 00 00 00 00 00 80 01 a0 08 80 00 00 00 00 00 41 7e 00 10 00 53 30 ┆ disc1 Aü S0┆
0x10400…10420 43 00 00 00 7f ff fc 66 72 65 61 64 72 00 00 00 00 00 00 00 00 01 64 69 73 63 31 00 00 00 00 00 ┆C freadr disc1 ┆
0x10420…10440 00 00 80 01 b2 10 80 00 00 00 00 00 41 90 00 10 00 53 4e 43 00 00 00 7f ff fc 66 72 65 61 64 72 ┆ A SNC freadr┆
0x10440…10460 61 00 00 00 00 00 00 00 01 64 69 73 63 31 00 00 00 00 00 00 00 80 01 76 04 d6 88 00 00 00 00 41 ┆a disc1 v A┆
0x10460…10480 54 00 10 00 11 17 03 80 00 01 7f ff fd 67 65 6e 73 63 61 6e 00 00 00 00 00 00 00 27 64 69 73 63 ┆T genscan 'disc┆
0x10480…104a0 35 00 00 00 00 00 00 00 80 bd b5 80 b1 30 00 00 00 00 2a 60 00 0b ee 11 bf 53 80 00 01 7f ff fd ┆5 0 *` S ┆
0x104a0…104c0 67 65 6e 73 79 6e 74 61 78 00 00 00 00 00 30 64 69 73 63 35 00 00 00 00 00 00 00 80 bd b6 80 b1 ┆gensyntax 0disc5 ┆
0x104c0…104e0 8a 00 00 00 00 2a 60 00 0b ee 80 00 83 80 00 01 7f ff fd 67 65 74 6e 65 77 00 00 00 00 00 00 80 ┆ *` getnew ┆
0x104e0…10500 00 04 64 72 75 6d 00 00 00 00 00 00 00 00 81 10 54 08 30 c0 00 00 00 00 41 a8 01 20 3a 00 00 00 ┆ drum T 0 A : ┆
0x10500…10520 (29,) 80 01 03 80 00 01 7f ff fd 67 65 74 70 61 72 61 6d 73 69 00 00 80 00 04 64 72 75 6d 00 00 00 00 ┆ getparamsi drum ┆
0x10520…10540 00 00 00 00 80 60 18 0e 72 00 00 00 00 00 40 00 00 70 02 14 be d3 00 07 e4 00 07 ed 68 63 72 68 ┆ ` r @ p hcrh┆
0x10540…10560 63 6f 6d 74 00 00 00 00 00 00 14 64 69 73 63 31 00 00 00 00 00 00 00 80 61 07 00 00 00 00 00 00 ┆comt disc1 a ┆
0x10560…10580 00 00 00 00 00 00 14 fa 63 00 00 00 7f ff fc 68 63 7c 6c 69 62 00 00 00 00 00 00 00 01 3a 64 69 ┆ c hcølib :di┆
0x10580…105a0 73 63 31 00 00 00 00 00 00 00 80 01 c0 0c 00 00 00 00 00 00 41 92 00 20 00 10 0d 03 01 11 7a 01 ┆sc1 A z ┆
0x105a0…105c0 11 83 68 65 61 74 63 76 73 63 00 00 00 00 00 00 08 64 69 73 63 35 00 00 00 00 00 00 00 80 56 85 ┆ heatcvsc disc5 V ┆
0x105c0…105e0 00 00 00 00 00 00 00 00 00 00 00 00 01 22 33 01 11 7a 01 11 83 68 65 61 74 72 65 6c 73 00 00 00 ┆ "3 z heatrels ┆
0x105e0…10600 00 00 00 06 64 69 73 63 34 00 00 00 00 00 00 00 80 b6 3b 00 00 00 00 00 00 00 00 00 00 00 00 80 ┆ disc4 ; ┆
0x10600…10620 07 a3 00 00 00 7f ff fc 68 6f 75 73 74 6f 6e 61 00 00 00 00 80 00 14 64 72 75 6d 00 00 00 00 00 ┆ houstona drum ┆
0x10620…10640 00 00 00 77 ba d5 00 00 00 00 00 00 00 00 00 00 00 00 53 2b 2b 00 00 00 7f ff fc 69 66 72 65 61 ┆ w S++ ifrea┆
0x10640…10660 64 69 00 00 00 00 00 00 00 01 64 69 73 63 31 00 00 00 00 00 00 00 80 01 b2 0c 80 00 00 00 00 00 ┆di disc1 ┆
0x10660…10680 41 90 00 10 00 80 0c cb 80 00 01 7f ff fd 69 6e 69 74 63 6f 6d 00 00 00 00 00 80 00 04 64 72 75 ┆A initcom dru┆
0x10680…106a0 6d 00 00 00 00 00 00 00 00 81 10 94 05 90 c3 0d e0 00 00 41 a8 01 20 3a 80 00 4b 80 00 01 7f ff ┆m A : K ┆
0x106a0…106c0 fd 69 6e 69 74 66 69 6c 65 69 00 00 00 80 00 04 64 72 75 6d 00 00 00 00 00 00 00 00 80 20 12 04 ┆ initfilei drum ┆
0x106c0…106e0 e3 88 00 00 00 00 40 00 00 70 02 80 0b 13 80 00 01 7f ff fd 69 6e 69 74 72 65 63 69 00 00 00 00 ┆ @ p initreci ┆
0x106e0…10700 80 00 04 64 72 75 6d 00 00 00 00 00 00 00 00 80 10 88 05 a2 00 00 00 00 00 40 00 00 70 02 80 03 ┆ drum @ p ┆
0x10700…10720 33 80 00 01 7f ff fd 69 6e 73 65 72 74 72 65 63 69 00 00 80 00 04 64 72 75 6d 00 00 00 00 00 00 ┆3 insertreci drum ┆
0x10720…10740 00 00 80 30 22 05 a2 00 00 00 00 00 40 00 00 70 02 11 6c 93 80 00 01 7f ff fd 69 73 6f 74 61 62 ┆ 0" @ p l isotab┆
0x10740…10760 6c 65 00 00 00 00 00 00 1c 64 69 73 63 35 00 00 00 00 00 00 00 80 00 12 05 90 00 00 00 00 00 40 ┆le disc5 @┆
0x10760…10780 0a 00 10 00 03 83 8b 01 11 7a 01 11 83 6a 6f 62 66 00 00 00 00 00 00 00 00 00 00 01 64 69 73 63 ┆ z jobf disc┆
0x10780…107a0 34 00 00 00 00 00 00 00 80 b6 0b 00 00 00 00 00 00 00 00 00 00 00 00 06 5e 3b 01 11 7a 01 11 83 ┆4 ^; z ┆
0x107a0…107c0 6a 6f 62 66 34 00 00 00 00 00 00 00 00 00 01 64 69 73 63 34 00 00 00 00 00 00 00 80 c2 bb 00 00 ┆jobf4 disc4 ┆
0x107c0…107e0 00 00 00 00 00 00 00 00 00 00 10 ed e3 00 00 50 00 00 59 6a 6f 64 75 6d 70 00 00 00 00 00 00 00 ┆ P Yjodump ┆
0x107e0…10800 00 05 64 69 73 63 33 00 00 00 00 00 00 00 80 c2 ec 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ┆ disc3 ┆
0x10800…10820 11 95 6b 00 00 50 00 00 59 6a 7c 72 67 65 6e 00 00 00 00 00 00 00 00 06 64 69 73 63 32 00 00 00 ┆ k P Yjørgen disc2 ┆
0x10820…10840 00 00 00 00 80 56 62 00 00 00 00 00 00 00 00 00 00 00 00 52 55 93 00 07 e4 00 07 ed 6b 6b 62 75 ┆ Vb RU kkbu┆
0x10840…10860 64 00 00 00 00 00 00 00 00 00 04 64 69 73 63 31 00 00 00 00 00 00 00 80 62 15 00 00 00 00 00 00 ┆d disc1 b ┆
0x10860…10880 00 00 00 00 00 00 52 04 d3 00 07 e4 00 07 ed 6b 6b 68 63 6c 6f 61 64 00 00 00 00 00 00 04 64 69 ┆ R kkhcload di┆
0x10880…108a0 73 63 31 00 00 00 00 00 00 00 80 54 ec 00 00 00 00 00 00 00 00 00 00 00 00 1e b3 93 00 07 e4 00 ┆sc1 T ┆
0x108a0…108c0 07 ed 6b 6b 6c 70 00 00 00 00 00 00 00 00 00 00 0a 64 69 73 63 31 00 00 00 00 00 00 00 80 5b f1 ┆ kklp disc1 Æ ┆
0x108c0…108e0 00 00 01 00 00 00 00 00 00 00 00 00 18 8d d3 00 07 e4 00 07 ed 6b 6b 6c 70 32 00 00 00 00 00 00 ┆ kklp2 ┆
0x108e0…10900 00 00 00 07 64 69 73 63 33 00 00 00 00 00 00 00 80 bb 98 00 00 00 00 00 00 00 00 00 00 00 00 1f ┆ disc3 ┆
0x10900…10920 b1 53 00 07 e4 00 07 ed 6b 6b 6d 6f 6e 38 30 30 33 00 00 00 00 00 65 64 69 73 63 31 00 00 00 00 ┆ S kkmon8003 edisc1 ┆
0x10920…10940 00 00 00 80 5b f6 00 00 00 00 00 00 00 20 06 00 c8 4a 66 88 4b 00 07 e4 00 07 ed 6b 6b 6d 6f 6e ┆ Æ Jf K kkmon┆
0x10940…10960 72 65 74 33 00 00 00 00 00 26 64 69 73 63 33 00 00 00 00 00 00 00 80 5b de 00 00 00 00 00 00 00 ┆ret3 &disc3 Æ ┆
0x10960…10980 00 00 00 00 00 2c 8d 73 00 07 e4 00 07 ed 6b 6b 6f 70 74 33 00 00 00 00 00 00 00 00 17 64 69 73 ┆ , s kkopt3 dis┆
0x10980…109a0 63 31 00 00 00 00 00 00 00 80 55 34 00 00 00 00 00 00 00 00 00 00 00 00 2c e4 cb 00 07 e4 00 07 ┆c1 U4 , ┆
0x109a0…109c0 ed 6b 6b 72 68 00 00 00 00 00 00 00 00 00 00 11 64 69 73 63 31 00 00 00 00 00 00 00 80 61 f0 00 ┆ kkrh disc1 a ┆
0x109c0…109e0 00 00 00 00 00 00 20 04 00 20 e2 06 1c fb 00 07 e4 00 07 ed 6b 6b 72 68 74 00 00 00 00 00 00 00 ┆ kkrht ┆
0x109e0…10a00 00 00 09 64 69 73 63 00 00 00 00 00 00 00 00 80 61 ef 00 00 00 00 00 00 00 00 00 00 00 00 08 50 ┆ disc a P┆
0x10a00…10a20 db 00 07 e4 00 07 ed 6b 6b 74 69 31 74 00 00 00 00 00 00 00 00 06 64 69 73 63 31 00 00 00 00 00 ┆ kkti1t disc1 ┆
0x10a20…10a40 00 00 80 bb 97 00 00 00 00 00 00 00 00 00 00 00 00 80 08 9b 80 00 01 7f ff fd 6c 61 73 74 74 6f ┆ lastto┆
0x10a40…10a60 74 61 6c 00 00 00 80 00 04 64 72 75 6d 00 00 00 00 00 00 00 00 73 3a 3e 00 00 00 00 00 00 00 00 ┆tal drum s:> ┆
0x10a60…10a80 00 00 00 00 80 01 43 80 00 01 7f ff fd 6c 70 00 00 00 00 00 00 00 00 00 00 80 00 0e 64 72 75 6d ┆ C lp drum┆
0x10a80…10aa0 00 00 00 00 00 00 00 00 7f 74 1c 00 00 00 00 00 00 00 00 00 00 00 00 80 04 d3 00 75 30 00 9c 3f ┆ t u0 ?┆
0x10aa0…10ac0 6c 70 72 00 00 00 00 00 00 00 00 00 80 20 08 64 72 75 6d 00 00 00 00 00 00 00 00 7d 3e 66 00 00 ┆lpr drum å>f ┆
0x10ac0…10ae0 00 00 00 00 00 00 00 00 00 00 52 49 33 00 00 00 7f ff fc 6d 61 74 72 69 78 6d 75 6c 74 00 00 00 ┆ RI3 matrixmult ┆
0x10ae0…10b00 00 01 64 69 73 63 31 00 00 00 00 00 00 00 80 01 0a 05 a6 9a 34 d3 40 00 40 12 00 10 00 00 00 00 ┆ disc1 4 @ @ ┆
0x10b00…10b20 2c f9 03 80 00 01 7f ff fd 6d 74 31 70 6f 6f 6c 00 00 00 00 00 00 00 1c 64 69 73 63 33 00 00 00 ┆, mt1pool disc3 ┆
0x10b20…10b40 00 00 00 00 80 ae 56 00 00 00 00 00 00 00 b0 00 00 00 00 80 0b 8b 00 07 e4 00 07 ed 6d 74 78 00 ┆ V mtx ┆
0x10b40…10b60 00 00 00 00 00 00 00 00 80 00 12 64 72 75 6d 00 00 00 00 00 00 00 00 7c 29 50 00 00 00 00 00 00 ┆ drum ø)P ┆
0x10b60…10b80 00 00 00 00 00 00 80 0e eb 80 00 01 7f ff fd 6e 65 78 74 72 65 63 69 00 00 00 00 80 00 04 64 72 ┆ nextreci dr┆
0x10b80…10ba0 75 6d 00 00 00 00 00 00 00 00 80 01 58 04 80 00 00 00 00 00 40 00 00 70 02 32 81 cb 80 00 01 7f ┆um X @ p 2 ┆
0x10ba0…10bc0 ff fd 6e 74 72 61 6d 6f 73 00 00 00 00 00 00 01 4c 64 69 73 63 33 00 00 00 00 00 00 00 80 bc 50 ┆ ntramos Ldisc3 P┆
0x10bc0…10be0 80 b0 86 00 00 00 00 2a 60 00 0b ee 51 4b 3b 00 07 f8 00 08 01 6e 74 72 61 6d 74 72 61 6e 73 00 ┆ *` QK; ntramtrans ┆
0x10be0…10c00 00 00 00 01 64 69 73 63 31 00 00 00 00 00 00 00 80 bc 54 00 00 00 00 00 00 00 00 00 00 00 00 80 ┆ disc1 T ┆
0x10c00…10c20 0d e3 80 00 01 7f ff fd 6f 70 65 6e 61 64 70 00 00 00 00 00 80 00 04 64 72 75 6d 00 00 00 00 00 ┆ openadp drum ┆
0x10c20…10c40 00 00 00 80 10 14 04 26 88 00 00 00 00 40 00 00 20 02 80 02 ab 80 00 01 7f ff fd 6f 70 65 6e 61 ┆ & @ opena┆
0x10c40…10c60 6e 64 70 6f 73 00 00 80 00 04 64 72 75 6d 00 00 00 00 00 00 00 00 80 10 0e 04 30 c2 68 80 00 00 ┆ndpos drum 0 h ┆
0x10c60…10c80 40 00 00 20 02 80 06 e3 00 07 f8 00 08 01 6f 73 63 68 65 63 6b 00 00 00 00 00 80 00 00 64 72 75 ┆@ oscheck dru┆
0x10c80…10ca0 6d 00 00 00 00 00 00 00 00 80 00 ef 00 00 00 00 00 00 00 00 00 00 00 00 80 07 23 80 00 01 7f ff ┆m # ┆
0x10ca0…10cc0 fd 6f 75 74 65 6e 64 00 00 00 00 00 00 80 00 04 64 72 75 6d 00 00 00 00 00 00 00 00 81 10 88 04 ┆ outend drum ┆
0x10cc0…10ce0 80 00 00 00 00 00 41 a8 01 20 3a 80 0a 03 00 c3 50 00 ea 5f 70 63 6f 6e 76 65 72 74 00 00 00 00 ┆ A : P _pconvert ┆
0x10ce0…10d00 80 00 04 64 72 75 6d 00 00 00 00 00 00 00 00 80 00 7a 0d b0 00 00 00 00 02 20 3e 00 20 00 80 07 ┆ drum z > ┆
0x10d00…10d20 b3 80 00 01 7f ff fd 70 6c 00 00 00 00 00 00 00 00 00 00 80 00 14 64 72 75 6d 00 00 00 00 00 00 ┆ pl drum ┆
0x10d20…10d40 00 00 63 99 3e 00 00 00 00 00 00 00 00 00 00 00 00 80 0e 33 80 00 01 7f ff fd 70 6f 73 69 74 69 ┆ c > 3 positi┆
0x10d40…10d60 6f 6e 61 64 70 00 80 00 04 64 72 75 6d 00 00 00 00 00 00 00 00 80 10 10 04 30 c8 00 00 00 00 40 ┆onadp drum 0 @┆
0x10d60…10d80 00 00 20 02 07 f9 7b 00 00 14 00 00 1d 70 72 69 6d 65 73 00 00 00 00 00 00 00 00 01 64 69 73 63 ┆ æ primes disc┆
0x10d80…10da0 35 00 00 00 00 00 00 00 7e 25 fb 00 00 01 00 00 00 00 00 04 00 01 b6 ff ff ff ff ff ff ff ff ff ┆5 ü% ┆
0x10da0…10dc0 70 72 69 6d 6f 73 70 6f 6f 6c 00 00 00 00 64 64 72 75 6d 00 00 00 00 00 00 00 00 80 c2 a8 00 00 ┆primospool ddrum ┆
0x10dc0…10de0 00 00 00 00 00 00 00 00 00 00 ff ff ff ff ff ff ff ff ff 70 72 69 6d 6f 74 65 73 74 00 00 00 00 ┆ primotest ┆
0x10de0…10e00 00 2a 64 69 73 63 31 00 00 00 00 00 00 00 80 c2 a8 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ┆ *disc1 ┆
0x10e00…10e20 (30,) 80 0a 4b 80 00 01 7f ff fd 70 74 72 65 00 00 00 00 00 00 00 00 80 20 0a 64 72 75 6d 00 00 00 00 ┆ K ptre drum ┆
0x10e20…10e40 00 00 00 00 63 99 3e 00 00 00 00 00 00 00 00 00 00 00 00 80 00 6b 80 00 01 7f ff fd 70 74 72 66 ┆ c > k ptrf┆
0x10e40…10e60 00 00 00 00 00 00 00 00 80 60 0a 64 72 75 6d 00 00 00 00 00 00 00 00 63 99 3e 00 00 00 00 00 00 ┆ ` drum c > ┆
0x10e60…10e80 00 00 00 00 00 00 80 0e fb 80 00 01 7f ff fd 70 74 72 6e 00 00 00 00 00 00 00 00 80 40 0a 64 72 ┆ ptrn @ dr┆
0x10e80…10ea0 75 6d 00 00 00 00 00 00 00 00 63 99 3e 00 00 00 00 00 00 00 00 00 00 00 00 80 05 1b 80 00 01 7f ┆um c > ┆
0x10ea0…10ec0 ff fd 70 74 72 6f 00 00 00 00 00 00 00 00 80 00 0a 64 72 75 6d 00 00 00 00 00 00 00 00 63 99 3e ┆ ptro drum c >┆
0x10ec0…10ee0 00 00 00 00 00 00 00 00 00 00 00 00 80 0c 83 80 00 01 7f ff fd 70 75 74 72 65 63 69 00 00 00 00 ┆ putreci ┆
0x10ee0…10f00 00 80 00 04 64 72 75 6d 00 00 00 00 00 00 00 00 80 10 7a 04 80 00 00 00 00 00 40 00 00 70 02 80 ┆ drum z @ p ┆
0x10f00…10f20 0c 9b 00 00 3c 00 00 45 72 00 00 00 00 00 00 00 00 00 00 00 80 40 12 64 72 75 6d 00 00 00 00 00 ┆ < Er @ drum ┆
0x10f20…10f40 00 00 00 7e 98 11 00 00 00 00 00 00 00 00 00 00 00 00 80 0c 9b 00 02 76 00 02 7f 72 00 00 00 00 ┆ ü v r ┆
0x10f40…10f60 00 00 00 00 00 00 00 80 40 12 64 72 75 6d 00 00 00 00 00 00 00 00 75 2b 56 00 00 04 00 00 00 00 ┆ @ drum u+V ┆
0x10f60…10f80 00 00 00 00 00 80 0c fb 00 02 62 00 02 6b 72 64 63 6f 73 00 00 00 00 00 00 00 80 00 04 64 72 75 ┆ b krdcos dru┆
0x10f80…10fa0 6d 00 00 00 00 00 00 00 00 80 01 20 91 60 00 00 00 00 00 40 00 ff ff e4 80 02 bb 00 02 62 00 02 ┆m ` @ b ┆
0x10fa0…10fc0 6b 72 64 72 65 61 6c 00 00 00 00 00 00 80 00 04 64 72 75 6d 00 00 00 00 00 00 00 00 80 01 1c 91 ┆krdreal drum ┆
0x10fc0…10fe0 60 00 00 00 00 00 40 00 ff ff ac 80 04 f3 00 02 62 00 02 6b 72 64 73 71 72 74 00 00 00 00 00 00 ┆` @ b krdsqrt ┆
0x10fe0…11000 80 00 04 64 72 75 6d 00 00 00 00 00 00 00 00 80 01 1e 91 60 00 00 00 00 00 40 00 ff ff c8 80 6a ┆ drum ` @ j┆
0x11000…11020 fb 00 00 00 7f ff fc 72 65 61 64 72 61 31 6c 00 00 00 00 80 00 04 64 69 73 63 31 00 00 00 00 00 ┆ readra1l disc1 ┆
0x11020…11040 00 00 80 00 b8 04 e3 8d 35 a2 40 0b 61 d2 00 30 00 80 07 fb 80 00 01 7f ff fd 72 65 6c 66 6f 72 ┆ 5 @ a 0 relfor┆
0x11040…11060 6d 61 74 73 00 00 80 00 04 64 72 75 6d 00 00 00 00 00 00 00 00 81 10 1c 04 00 00 00 00 00 00 41 ┆mats drum A┆
0x11060…11080 a8 01 20 3a 80 06 1b 80 00 01 7f ff fd 72 65 73 65 74 61 6c 69 61 73 00 00 80 00 04 64 72 75 6d ┆ : resetalias drum┆
0x11080…110a0 00 00 00 00 00 00 00 00 81 10 6c 04 00 00 00 00 00 00 41 a8 01 20 3a 80 00 cb 80 00 01 7f ff fd ┆ l A : ┆
0x110a0…110c0 72 65 73 75 6c 74 69 00 00 00 00 00 80 00 04 64 72 75 6d 00 00 00 00 00 00 00 00 00 00 01 24 00 ┆resulti drum $ ┆
0x110c0…110e0 00 00 00 00 00 40 00 00 70 02 80 0d 8b 00 00 00 00 07 cf 72 65 74 00 00 00 00 00 00 00 00 00 80 ┆ @ p ret ┆
0x110e0…11100 00 04 64 72 75 6d 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 0c 00 20 04 00 11 30 00 00 00 ┆ drum 0 ┆
0x11100…11120 07 b7 3b 80 00 01 7f ff fd 72 65 74 63 6f 6d 61 6c 00 00 00 00 00 00 01 64 69 73 63 35 00 00 00 ┆ ; retcomal disc5 ┆
0x11120…11140 00 00 00 00 80 bd ab 00 00 00 00 00 00 00 00 00 00 00 00 0b 6e 33 80 00 01 7f ff fd 73 63 61 6e ┆ n3 scan┆
0x11140…11160 74 61 62 6c 65 00 00 00 00 00 04 64 69 73 63 35 00 00 00 00 00 00 00 80 bd b6 00 00 00 00 00 00 ┆table disc5 ┆
0x11160…11180 00 00 00 00 00 00 80 02 33 80 00 01 7f ff fd 73 65 74 61 6c 69 61 73 00 00 00 00 80 00 04 64 72 ┆ 3 setalias dr┆
0x11180…111a0 75 6d 00 00 00 00 00 00 00 00 81 10 60 04 80 00 00 00 00 00 41 a8 01 20 3a 80 06 13 80 00 01 7f ┆um ` A : ┆
0x111a0…111c0 ff fd 73 65 74 64 65 73 63 00 00 00 00 00 80 00 04 64 72 75 6d 00 00 00 00 00 00 00 00 81 10 7a ┆ setdesc drum z┆
0x111c0…111e0 04 80 00 00 00 00 00 41 a8 01 20 3a 80 07 43 80 00 01 7f ff fd 73 65 74 70 61 72 61 6d 73 69 00 ┆ A : C setparamsi ┆
0x111e0…11200 00 80 00 04 64 72 75 6d 00 00 00 00 00 00 00 00 80 60 1a 0e 72 00 00 00 00 00 40 00 00 70 02 80 ┆ drum ` r @ p ┆
0x11200…11220 03 2b 80 00 01 7f ff fd 73 65 74 70 75 74 69 00 00 00 00 00 80 00 04 64 72 75 6d 00 00 00 00 00 ┆ + setputi drum ┆
0x11220…11240 00 00 00 80 10 14 04 80 00 00 00 00 00 40 00 00 70 02 80 0b 7b 80 00 01 7f ff fd 73 65 74 72 65 ┆ @ p æ setre┆
0x11240…11260 61 64 69 00 00 00 00 80 00 04 64 72 75 6d 00 00 00 00 00 00 00 00 80 10 12 04 80 00 00 00 00 00 ┆adi drum ┆
0x11260…11280 40 00 00 70 02 80 05 d3 80 00 01 7f ff fd 73 65 74 74 65 73 74 69 00 00 00 00 80 00 04 64 72 75 ┆@ p settesti dru┆
0x11280…112a0 6d 00 00 00 00 00 00 00 00 80 60 1c 0e 72 00 00 00 00 00 40 00 00 70 02 80 08 4b 80 00 01 7f ff ┆m ` r @ p K ┆
0x112a0…112c0 fd 73 65 74 75 70 64 61 74 65 69 00 00 80 00 04 64 72 75 6d 00 00 00 00 00 00 00 00 80 10 16 04 ┆ setupdatei drum ┆
0x112c0…112e0 80 00 00 00 00 00 40 00 00 70 02 61 92 9b 00 00 00 7f ff fc 73 70 6c 6e 33 00 00 00 00 00 00 00 ┆ @ p a spln3 ┆
0x112e0…11300 00 00 04 64 69 73 63 33 00 00 00 00 00 00 00 80 01 62 04 d6 9a 69 a0 00 00 41 28 00 40 00 63 38 ┆ disc3 b i A( @ c8┆
0x11300…11320 db 00 00 00 7f ff fc 73 70 6c 6e 33 69 6e 74 00 00 00 00 00 00 03 64 69 73 63 33 00 00 00 00 00 ┆ spln3int disc3 ┆
0x11320…11340 00 00 80 01 e6 10 d6 9a 68 e0 00 00 41 b8 00 30 06 63 19 43 00 00 00 7f ff fc 73 70 6c 6e 33 69 ┆ h A 0 c C spln3i┆
0x11340…11360 6e 76 00 00 00 00 00 00 04 64 69 73 63 33 00 00 00 00 00 00 00 80 01 b0 08 d6 9a 68 e1 00 00 41 ┆nv disc3 h A┆
0x11360…11380 76 00 40 12 63 0b 3b 00 00 00 7f ff fc 73 70 6c 6e 33 76 61 6c 00 00 00 00 00 00 02 64 69 73 63 ┆v @ c ; spln3val disc┆
0x11380…113a0 33 00 00 00 00 00 00 00 80 01 72 10 d6 9a 68 e0 00 00 41 44 00 20 02 0b 4d 73 80 00 01 7f ff fd ┆3 r h AD Ms ┆
0x113a0…113c0 73 70 6f 6f 6c 66 75 6c 6c 00 00 00 00 00 01 64 69 73 63 35 00 00 00 00 00 00 00 80 00 14 08 d0 ┆spoolfull disc5 ┆
0x113c0…113e0 00 00 00 00 00 40 0c 00 10 00 80 02 db 80 00 01 7f ff fd 73 74 61 72 74 63 6f 6d 00 00 00 00 80 ┆ @ startcom ┆
0x113e0…11400 00 04 64 72 75 6d 00 00 00 00 00 00 00 00 81 10 46 04 d3 40 00 00 00 00 41 a8 01 20 3a 00 00 00 ┆ drum F @ A : ┆
0x11400…11420 80 0f 3b 80 00 01 7f ff fd 73 74 61 72 74 66 69 6c 65 69 00 00 80 00 04 64 72 75 6d 00 00 00 00 ┆ ; startfilei drum ┆
0x11420…11440 00 00 00 00 80 20 36 04 80 00 00 00 00 00 40 00 00 70 02 3d 36 2b 80 00 01 7f ff fd 73 75 73 65 ┆ 6 @ p =6+ suse┆
0x11440…11460 72 63 61 74 00 00 00 00 00 00 0a 64 69 73 63 31 00 00 00 00 00 00 00 67 29 1b 00 00 00 00 00 00 ┆rcat disc1 g) ┆
0x11460…11480 00 00 00 00 00 00 3d 4a 53 80 00 01 7f ff fd 73 76 61 6e 65 73 61 6e 67 00 00 00 00 00 01 64 69 ┆ =JS svanesang di┆
0x11480…114a0 73 63 31 00 00 00 00 00 00 00 80 af e5 00 00 00 00 00 00 00 00 00 00 00 00 0c be 0b 80 00 01 7f ┆sc1 ┆
0x114a0…114c0 ff fd 73 79 6e 74 61 78 74 61 62 6c 65 00 00 00 06 64 69 73 63 35 00 00 00 00 00 00 00 80 bd b6 ┆ syntaxtable disc5 ┆
0x114c0…114e0 00 00 00 00 00 00 00 00 00 00 00 00 08 64 db 00 00 50 00 00 59 73 7c 72 65 6e 00 00 00 00 00 00 ┆ d P Ysøren ┆
0x114e0…11500 00 00 00 03 64 69 73 63 32 00 00 00 00 00 00 00 80 5b 44 00 00 00 00 00 00 00 00 00 00 00 00 34 ┆ disc2 ÆD 4┆
0x11500…11520 c4 8b 00 00 50 00 00 59 73 7c 72 65 6e 6f 75 74 00 00 00 00 00 00 04 64 69 73 63 32 00 00 00 00 ┆ P Ysørenout disc2 ┆
0x11520…11540 00 00 00 80 5b 45 00 00 00 00 00 00 00 00 00 00 00 00 66 b0 c3 00 00 50 00 00 59 73 7c 72 65 6e ┆ ÆE f P Ysøren┆
0x11540…11560 70 72 6f 6f 66 00 00 00 00 04 64 69 73 63 33 00 00 00 00 00 00 00 80 5b 45 00 00 00 00 00 00 00 ┆proof disc3 ÆE ┆
0x11560…11580 00 00 00 00 00 80 03 1b 00 07 f8 00 08 01 74 32 00 00 00 00 00 00 00 00 00 00 80 00 08 64 72 75 ┆ t2 dru┆
0x11580…115a0 6d 00 00 00 00 00 00 00 00 7d 6f be 00 00 00 00 00 00 00 00 00 00 00 00 80 0b ab 80 00 01 7f ff ┆m åo ┆
0x115a0…115c0 fd 74 61 70 65 61 64 70 00 00 00 00 00 80 00 04 64 72 75 6d 00 00 00 00 00 00 00 00 80 10 fe 04 ┆ tapeadp drum ┆
0x115c0…115e0 42 00 00 00 00 00 40 00 00 20 02 3d 65 bb 00 07 f8 00 08 01 74 62 61 74 63 68 00 00 00 00 00 00 ┆B @ =e tbatch ┆
0x115e0…11600 00 00 15 64 69 73 63 31 00 00 00 00 00 00 00 80 bb 56 00 00 00 00 00 00 00 00 00 00 00 00 08 65 ┆ disc1 V e┆
0x11600…11620 bb 00 07 f8 00 08 01 74 62 72 75 67 65 72 76 65 6a 00 00 00 00 0d 64 69 73 63 31 00 00 00 00 00 ┆ tbrugervej disc1 ┆
0x11620…11640 00 00 80 c2 c8 00 00 00 00 00 00 00 00 00 00 00 00 3e 15 c3 00 07 f8 00 08 01 74 63 68 69 6c 64 ┆ > tchild┆
0x11640…11660 70 72 00 00 00 00 00 00 21 64 69 73 63 31 00 00 00 00 00 00 00 80 bc 13 00 00 00 00 00 00 00 00 ┆pr !disc1 ┆
0x11660…11680 00 00 00 00 80 0b bb 00 00 00 7f ff fc 74 65 6b 34 30 30 36 61 00 00 00 00 80 00 14 64 72 75 6d ┆ tek4006a drum┆
0x11680…116a0 00 00 00 00 00 00 00 00 7f 2d 11 00 00 00 00 00 00 00 00 00 00 00 00 80 0b bb 00 c3 64 00 c3 6d ┆ - d m┆
0x116a0…116c0 74 65 6b 34 30 30 36 61 00 00 00 00 80 00 14 64 72 75 6d 00 00 00 00 00 00 00 00 7d b7 16 00 00 ┆tek4006a drum å ┆
0x116c0…116e0 00 00 00 00 00 00 00 00 00 00 80 04 23 00 75 30 00 9c 3f 74 65 6b 34 30 30 36 62 00 00 00 00 80 ┆ # u0 ?tek4006b ┆
0x116e0…11700 00 14 64 72 75 6d 00 00 00 00 00 00 00 00 7b 9a 70 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ┆ drum æ p ┆
0x11700…11720 (31,) 80 0c 23 00 75 30 00 75 39 74 65 6b 34 30 30 36 63 00 00 00 00 80 00 14 64 72 75 6d 00 00 00 00 ┆ # u0 u9tek4006c drum ┆
0x11720…11740 00 00 00 00 7f bb 79 00 00 00 00 00 00 00 00 00 00 00 00 61 03 4b 80 00 01 7f ff fd 74 65 6d 31 ┆ y a K tem1┆
0x11740…11760 63 61 74 00 00 00 00 00 00 00 0b 64 69 73 63 33 00 00 00 00 00 00 00 00 00 98 00 00 00 00 00 00 ┆cat disc3 ┆
0x11760…11780 00 00 00 00 00 00 33 49 03 80 00 01 7f ff fd 74 65 6d 32 63 61 74 00 00 00 00 00 00 00 0c 64 69 ┆ 3I tem2cat di┆
0x11780…117a0 73 63 33 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 80 05 ab 80 00 01 7f ┆sc3 ┆
0x117a0…117c0 ff fd 74 65 72 6d 00 00 00 00 00 00 00 00 80 00 08 64 72 75 6d 00 00 00 00 00 00 00 00 63 99 3e ┆ term drum c >┆
0x117c0…117e0 00 00 00 00 00 00 00 00 00 00 00 00 0b 54 a3 80 00 01 7f ff fd 74 65 73 74 62 69 74 00 00 00 00 ┆ T testbit ┆
0x117e0…11800 00 00 00 03 64 69 73 63 35 00 00 00 00 00 00 00 80 00 b2 08 30 00 00 00 00 00 40 6a 00 30 06 61 ┆ disc5 0 @j 0 a┆
0x11800…11820 85 bb 00 07 e4 00 07 ed 74 68 63 7c 6d 61 74 00 00 00 00 00 00 00 fc 64 69 73 63 33 00 00 00 00 ┆ thcømat disc3 ┆
0x11820…11840 00 00 00 80 56 08 00 00 00 00 00 00 00 a0 00 01 f8 00 0c f6 bb 00 00 14 00 00 1d 74 6f 6f 62 61 ┆ V tooba┆
0x11840…11860 64 00 00 00 00 00 00 00 00 0d 64 69 73 63 35 00 00 00 00 00 00 00 7d b3 46 00 00 0d 00 00 00 00 ┆d disc5 å F ┆
0x11860…11880 00 04 00 01 04 80 04 db 00 07 f8 00 08 01 74 6f 73 73 73 79 73 64 65 66 31 00 80 00 00 64 72 75 ┆ tosssysdef1 dru┆
0x11880…118a0 6d 00 00 00 00 00 00 00 00 00 00 28 02 80 00 00 00 00 00 00 00 00 00 00 80 0c db 00 07 f8 00 08 ┆m ( ┆
0x118a0…118c0 01 74 6f 73 73 73 79 73 64 65 66 32 00 80 00 00 64 72 75 6d 00 00 00 00 00 00 00 00 02 00 00 02 ┆ tosssysdef2 drum ┆
0x118c0…118e0 00 00 00 00 00 00 00 00 00 00 00 41 fd 0b 00 07 f8 00 08 01 74 70 61 72 65 6e 74 6d 65 73 73 00 ┆ A tparentmess ┆
0x118e0…11900 00 00 09 64 69 73 63 31 00 00 00 00 00 00 00 80 bc 07 00 00 00 00 00 00 00 00 00 00 00 00 80 03 ┆ disc1 ┆
0x11900…11920 63 80 00 01 7f ff fd 74 70 65 00 00 00 00 00 00 00 00 00 80 20 0c 64 72 75 6d 00 00 00 00 00 00 ┆c tpe drum ┆
0x11920…11940 00 00 79 37 03 00 00 00 00 00 00 00 00 00 00 00 00 80 03 6b 80 00 01 7f ff fd 74 70 66 00 00 00 ┆ y7 k tpf ┆
0x11940…11960 00 00 00 00 00 00 80 60 0c 64 72 75 6d 00 00 00 00 00 00 00 00 63 99 3e 00 00 00 00 00 00 00 00 ┆ ` drum c > ┆
0x11960…11980 00 00 00 00 2d 49 b3 00 00 78 00 00 81 74 70 6c 6f 74 64 65 63 00 00 00 00 00 00 08 64 69 73 63 ┆ -I x tplotdec disc┆
0x11980…119a0 32 00 00 00 00 00 00 00 80 bc 66 00 00 00 00 00 00 00 00 00 00 00 00 80 03 ab 80 00 01 7f ff fd ┆2 f ┆
0x119a0…119c0 74 70 6e 00 00 00 00 00 00 00 00 00 80 40 0c 64 72 75 6d 00 00 00 00 00 00 00 00 63 99 3e 00 00 ┆tpn @ drum c > ┆
0x119c0…119e0 00 00 00 00 00 00 00 00 00 00 80 03 b3 80 00 01 7f ff fd 74 70 6f 00 00 00 00 00 00 00 00 00 80 ┆ tpo ┆
0x119e0…11a00 00 0c 64 72 75 6d 00 00 00 00 00 00 00 00 63 99 3e 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ┆ drum c > ┆
0x11a00…11a20 42 15 73 00 07 f8 00 08 01 74 70 72 69 6d 69 6e 00 00 00 00 00 00 00 08 64 69 73 63 31 00 00 00 ┆B s tprimin disc1 ┆
0x11a20…11a40 00 00 00 00 80 bc 09 00 00 00 00 00 00 00 00 00 00 00 00 80 03 db 80 00 01 7f ff fd 74 70 74 00 ┆ tpt ┆
0x11a40…11a60 00 00 00 00 00 00 00 00 80 80 0c 64 72 75 6d 00 00 00 00 00 00 00 00 63 99 3e 00 00 00 00 00 00 ┆ drum c > ┆
0x11a60…11a80 00 00 00 00 00 00 43 24 73 00 07 f8 00 08 01 74 72 61 6d 6f 70 74 69 6f 6e 00 00 00 00 02 64 69 ┆ C$s tramoption di┆
0x11a80…11aa0 73 63 31 00 00 00 00 00 00 00 80 bc 04 00 00 00 00 00 00 00 00 00 00 00 00 43 32 fb 80 00 01 7f ┆sc1 C2 ┆
0x11aa0…11ac0 ff fd 74 72 61 6d 6f 73 00 00 00 00 00 00 00 01 86 64 69 73 63 31 00 00 00 00 00 00 00 80 b0 27 ┆ tramos disc1 '┆
0x11ac0…11ae0 80 b1 00 00 00 00 00 2a 60 00 0b ee 45 55 23 00 07 f8 00 08 01 74 72 61 6d 74 72 61 6e 73 00 00 ┆ *` EU# tramtrans ┆
0x11ae0…11b00 00 00 00 01 64 69 73 63 31 00 00 00 00 00 00 00 80 bc 54 00 00 00 00 00 00 00 00 00 00 00 00 45 ┆ disc1 T E┆
0x11b00…11b20 78 1b 00 07 f8 00 08 01 74 72 61 6d 74 72 69 6d 00 00 00 00 00 00 14 64 69 73 63 31 00 00 00 00 ┆x tramtrim disc1 ┆
0x11b20…11b40 00 00 00 80 bc 2e 00 00 00 00 00 00 00 00 00 00 00 00 80 03 cb 80 00 01 7f ff fd 74 72 65 00 00 ┆ . tre ┆
0x11b40…11b60 00 00 00 00 00 00 00 80 20 0a 64 72 75 6d 00 00 00 00 00 00 00 00 63 99 3e 00 00 00 00 00 00 00 ┆ drum c > ┆
0x11b60…11b80 00 00 00 00 00 46 77 c3 00 07 f8 00 08 01 74 72 65 61 64 63 6c 69 73 74 00 00 00 00 20 64 69 73 ┆ Fw treadclist dis┆
0x11b80…11ba0 63 31 00 00 00 00 00 00 00 80 bc 20 00 00 00 00 00 00 00 00 00 00 00 00 46 a1 5b 00 07 f8 00 08 ┆c1 F Æ ┆
0x11ba0…11bc0 01 74 72 65 61 64 63 6f 6d 00 00 00 00 00 00 05 64 69 73 63 31 00 00 00 00 00 00 00 80 bc 27 00 ┆ treadcom disc1 ' ┆
0x11bc0…11be0 00 00 00 00 00 00 00 00 00 00 00 46 b7 1b 00 07 f8 00 08 01 74 72 65 61 64 6a 6f 62 00 00 00 00 ┆ F treadjob ┆
0x11be0…11c00 00 00 05 64 69 73 63 31 00 00 00 00 00 00 00 80 bc 1c 00 00 00 00 00 00 00 00 00 00 00 00 46 da ┆ disc1 F ┆
0x11c00…11c20 83 00 07 f8 00 08 01 74 72 65 61 64 73 75 62 00 00 00 00 00 00 14 64 69 73 63 31 00 00 00 00 00 ┆ treadsub disc1 ┆
0x11c20…11c40 00 00 80 bb 6c 00 00 00 00 00 00 00 00 00 00 00 00 80 03 d3 80 00 01 7f ff fd 74 72 66 00 00 00 ┆ l trf ┆
0x11c40…11c60 00 00 00 00 00 00 80 60 0a 64 72 75 6d 00 00 00 00 00 00 00 00 63 99 3e 00 00 00 00 00 00 00 00 ┆ ` drum c > ┆
0x11c60…11c80 00 00 00 00 80 04 13 80 00 01 7f ff fd 74 72 6e 00 00 00 00 00 00 00 00 00 80 40 0a 64 72 75 6d ┆ trn @ drum┆
0x11c80…11ca0 00 00 00 00 00 00 00 00 63 99 3e 00 00 00 00 00 00 00 00 00 00 00 00 80 04 1b 80 00 01 7f ff fd ┆ c > ┆
0x11ca0…11cc0 74 72 6f 00 00 00 00 00 00 00 00 00 80 00 0a 64 72 75 6d 00 00 00 00 00 00 00 00 63 99 3e 00 00 ┆tro drum c > ┆
0x11cc0…11ce0 00 00 00 00 00 00 00 00 00 00 08 7b f3 00 07 f8 00 08 01 74 72 75 6e 62 61 74 63 68 00 00 00 00 ┆ æ trunbatch ┆
0x11ce0…11d00 00 17 64 69 73 63 31 00 00 00 00 00 00 00 80 bb 83 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ┆ disc1 ┆
0x11d00…11d20 48 b9 2b 00 07 f8 00 08 01 74 73 74 61 72 74 75 70 00 00 00 00 00 00 01 64 69 73 63 31 00 00 00 ┆H + tstartup disc1 ┆
0x11d20…11d40 00 00 00 00 80 bb 4d 00 00 00 00 00 00 00 00 00 00 00 00 49 d4 eb 00 07 f8 00 08 01 74 74 72 61 ┆ M I ttra┆
0x11d40…11d60 6d 6f 73 00 00 00 00 00 00 00 8c 64 69 73 63 31 00 00 00 00 00 00 00 7f a8 07 00 00 00 00 00 00 ┆mos disc1 ┆
0x11d60…11d80 00 00 00 00 00 00 4b 34 cb 00 07 f8 00 08 01 74 77 61 74 63 68 64 6f 67 00 00 00 00 00 04 64 69 ┆ K4 twatchdog di┆
0x11d80…11da0 73 63 31 00 00 00 00 00 00 00 80 bc 22 00 00 00 00 00 00 00 00 00 00 00 00 4b 4e db 00 07 f8 00 ┆sc1 " KN ┆
0x11da0…11dc0 08 01 74 77 72 69 74 65 65 72 72 6f 72 00 00 00 08 64 69 73 63 31 00 00 00 00 00 00 00 80 bc 28 ┆ twriteerror disc1 (┆
0x11dc0…11de0 00 00 00 00 00 00 00 00 00 00 00 00 80 0b 8b 80 00 01 7f ff fd 75 38 30 00 00 00 00 00 00 00 00 ┆ u80 ┆
0x11de0…11e00 00 80 00 0e 64 72 75 6d 00 00 00 00 00 00 00 00 7f 1f 9e 00 00 00 00 00 00 00 00 00 00 00 00 0d ┆ drum ┆
0x11e00…11e20 39 1b 80 00 01 7f ff fd 75 73 65 72 63 61 74 00 00 00 00 00 00 00 64 64 69 73 63 35 00 00 00 00 ┆9 usercat ddisc5 ┆
0x11e20…11e40 00 00 00 76 2b d5 00 00 00 00 00 00 00 00 00 00 00 00 00 ed 53 80 00 01 7f ff fd 75 74 69 6c 69 ┆ v+ S utili┆
0x11e40…11e60 74 79 00 00 00 00 00 00 00 72 64 69 73 63 31 00 00 00 00 00 00 00 7c 89 a6 00 00 00 00 00 00 00 ┆ty rdisc1 ø ┆
0x11e60…11e80 00 00 00 e4 00 80 07 4b 80 00 01 7f ff fd 77 61 69 74 6e 65 78 74 00 00 00 00 80 00 04 64 72 75 ┆ K waitnext dru┆
0x11e80…11ea0 6d 00 00 00 00 00 00 00 00 81 10 38 0c 00 00 00 00 00 00 41 a8 01 20 3a 02 b5 43 80 00 01 7f ff ┆m 8 A : C ┆
0x11ea0…11ec0 fd 77 72 69 74 65 64 61 74 65 00 00 00 00 00 01 64 69 73 63 35 00 00 00 00 00 00 00 80 00 32 0c ┆ writedate disc5 2 ┆
0x11ec0…11ee0 d3 4d 20 00 00 00 40 10 00 10 00 0d fc 53 80 00 01 7f ff fd 78 63 6f 6d 61 6c 00 00 00 00 00 00 ┆ M @ S xcomal ┆
0x11ee0…11f00 00 01 e3 64 69 73 63 35 00 00 00 00 00 00 00 80 bd ba 80 b1 d6 00 00 00 00 2a 60 00 0b ee 02 69 ┆ disc5 *` i┆
0x11f00…11f20 63 00 00 78 00 00 81 78 6d 61 73 69 6e 70 00 00 00 00 00 00 00 05 64 69 73 63 32 00 00 00 00 00 ┆c x xmasinp disc2 ┆
0x11f20…11f40 00 00 80 5a a8 00 00 00 00 00 00 00 00 00 00 00 00 59 d5 a3 00 00 00 00 07 cf 7c 6c 72 65 67 6e ┆ Z Y ølregn┆
0x11f40…11f60 73 6b 61 62 00 00 00 00 05 64 69 73 63 33 00 00 00 00 00 00 00 80 a2 c2 00 00 00 00 00 00 00 00 ┆skab disc3 ┆
0x11f60…11f80 00 00 00 00 ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ┆ ┆
0x11f80…11fa0 ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ┆ ┆
[…0x2…]
0x11fe0…12000 ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff 00 00 00 ┆ ┆
0x12000…12020 (32,) ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ┆ ┆
[…0x16…]
0x122e0…12300 ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff 00 00 00 ┆ ┆
0x12300…12320 80 03 0b 00 00 00 7f ff fc 63 68 61 72 6f 66 66 00 00 00 00 00 80 00 04 64 72 75 6d 00 00 00 00 ┆ charoff drum ┆
0x12320…12340 00 00 00 00 00 00 c7 20 00 00 00 00 00 00 40 00 00 10 dc 09 b0 b3 00 00 00 7f ff fc 63 68 61 72 ┆ @ char┆
0x12340…12360 70 61 63 6b 00 00 00 00 00 00 2f 64 72 75 6d 31 00 00 00 00 00 00 00 73 e1 ac 80 b1 52 00 00 00 ┆pack /drum1 s R ┆
0x12360…12380 00 2a 60 00 0b ee 1a 31 bb 00 00 00 7f ff fc 63 68 61 72 72 6f 6d 61 6e 00 00 00 00 00 04 64 69 ┆ *` 1 charroman di┆
0x12380…123a0 73 63 31 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 80 00 cb 80 00 01 7f ┆sc1 ┆
0x123a0…123c0 ff fd 63 68 65 63 6b 00 00 00 00 00 00 00 80 00 04 64 72 75 6d 00 00 00 00 00 00 00 00 80 01 d8 ┆ check drum ┆
0x123c0…123e0 04 80 00 00 00 00 00 40 28 00 20 00 80 00 c3 80 00 01 7f ff fd 63 68 65 63 6b 61 64 70 00 00 00 ┆ @( checkadp ┆
0x123e0…12400 00 80 00 04 64 72 75 6d 00 00 00 00 00 00 00 00 80 10 8a 04 30 c8 00 00 00 00 40 00 00 20 02 80 ┆ drum 0 @ ┆
0x12400…12420 00 b3 80 00 01 7f ff fd 63 68 65 63 6b 69 6f 00 00 00 00 00 80 00 04 64 72 75 6d 00 00 00 00 00 ┆ checkio drum ┆
0x12420…12440 00 00 00 63 99 44 00 00 00 00 00 3a 00 20 04 00 01 90 80 02 43 00 00 00 7f ff fc 63 68 65 63 6b ┆ c D : C check┆
0x12440…12460 70 64 61 00 00 00 00 80 00 04 64 72 75 6d 00 00 00 00 00 00 00 00 80 00 1e 09 30 00 00 00 00 02 ┆pda drum 0 ┆
0x12460…12480 30 16 00 10 00 80 04 33 80 00 01 7f ff fd 63 68 65 63 6b 76 61 72 00 00 00 00 80 00 04 64 72 75 ┆0 3 checkvar dru┆
0x12480…124a0 6d 00 00 00 00 00 00 00 00 80 01 9e 0c 80 00 00 00 00 00 40 16 00 20 00 47 20 db 00 75 30 00 75 ┆m @ G u0 u┆
0x124a0…124c0 39 63 68 6f 00 00 00 00 00 00 00 00 00 00 00 01 64 69 73 63 00 00 00 00 00 00 00 00 6d 99 7a 00 ┆9cho disc m z ┆
0x124c0…124e0 00 00 00 00 00 00 00 00 00 00 00 3a a3 8b 00 75 30 00 75 39 63 68 6f 36 31 74 78 74 00 00 00 00 ┆ : u0 u9cho61txt ┆
0x124e0…12500 00 00 04 64 69 73 63 00 00 00 00 00 00 00 00 6f 30 23 00 00 00 00 00 00 00 00 00 00 00 00 0d c3 ┆ disc o0# ┆
0x12500…12520 c3 00 75 30 00 75 39 63 68 6f 36 74 78 74 00 00 00 00 00 00 00 05 64 69 73 63 00 00 00 00 00 00 ┆ u0 u9cho6txt disc ┆
0x12520…12540 00 00 6e ee bd 00 00 00 00 00 00 00 00 00 00 00 00 2d 24 b3 00 75 30 00 75 39 63 68 6f 37 74 78 ┆ n -$ u0 u9cho7tx┆
0x12540…12560 74 00 00 00 00 00 00 00 05 64 69 73 63 00 00 00 00 00 00 00 00 70 b1 66 00 00 00 00 00 00 00 00 ┆t disc p f ┆
0x12560…12580 00 00 00 00 04 55 93 00 75 30 00 75 39 63 68 73 74 69 66 66 00 00 00 00 00 00 00 04 64 69 73 63 ┆ U u0 u9chstiff disc┆
0x12580…125a0 00 00 00 00 00 00 00 00 80 00 a2 0c e1 1f 38 46 8d 00 40 62 00 40 00 3e 21 c3 00 75 30 00 75 39 ┆ 8F @b @ >! u0 u9┆
0x125a0…125c0 63 68 73 74 69 66 66 31 74 78 74 00 00 00 03 64 69 73 63 00 00 00 00 00 00 00 00 6d 51 bd 00 00 ┆chstiff1txt disc mQ ┆
0x125c0…125e0 00 00 00 00 00 00 00 00 00 00 2e 32 73 00 75 30 00 75 39 63 68 73 74 69 66 66 70 00 00 00 00 00 ┆ .2s u0 u9chstiffp ┆
0x125e0…12600 00 05 64 69 73 63 00 00 00 00 00 00 00 00 80 01 bc 0d f7 df 34 00 00 00 41 64 00 50 00 00 00 00 ┆ disc 4 Ad P ┆
0x12600…12620 16 20 72 00 07 f8 00 08 01 74 74 72 61 6d 6f 73 00 00 00 00 00 00 00 54 64 69 73 63 31 00 00 00 ┆ r ttramos Tdisc1 ┆
0x12620…12640 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 02 61 53 00 07 f8 00 08 01 74 75 73 65 ┆ aS tuse┆
0x12640…12660 72 63 61 74 75 70 00 00 00 00 27 64 69 73 63 31 00 00 00 00 00 00 00 7d 31 20 00 00 00 00 00 00 ┆rcatup 'disc1 å1 ┆
0x12660…12680 00 00 00 00 00 00 80 01 4b 80 00 01 7f ff fd 75 38 30 00 00 00 00 00 00 00 00 00 80 00 0e 64 72 ┆ K u80 dr┆
0x12680…126a0 75 6d 00 00 00 00 00 00 00 00 7d 09 a9 00 00 00 00 00 00 00 00 00 00 00 00 15 20 9b 00 00 b4 00 ┆um å ┆
0x126a0…126c0 00 bd 75 64 00 00 00 00 00 00 00 00 00 00 00 00 0e 64 69 73 63 32 00 00 00 00 00 00 00 7d 30 bf ┆ ud disc2 å0 ┆
0x126c0…126e0 00 00 00 00 00 00 00 00 00 00 00 00 80 00 2b 80 00 01 7f ff fd 75 70 64 61 74 65 61 6c 6c 63 66 ┆ + updateallcf┆
0x126e0…12700 00 80 00 04 64 72 75 6d 00 00 00 00 00 00 00 00 80 d0 c2 04 80 00 00 00 00 00 40 0c 01 00 24 01 ┆ drum @ $ ┆
0x12700…12720 34 9b 00 07 f8 00 08 01 75 73 65 72 63 61 74 75 70 00 00 00 00 00 4c 64 69 73 63 31 00 00 00 00 ┆4 usercatup Ldisc1 ┆
0x12720…12740 00 00 00 7d 31 26 80 b1 10 00 00 00 00 2a 60 00 0b ee 26 44 c2 00 07 f8 00 08 01 75 73 65 72 6c ┆ å1& *` &D userl┆
0x12740…12760 69 73 74 00 00 00 00 00 00 38 64 69 73 63 31 00 00 00 00 00 00 00 7d 31 25 00 00 00 00 00 00 00 ┆ist 8disc1 å1% ┆
0x12760…12780 00 00 00 00 00 80 00 bb 80 00 01 7f ff fd 77 61 69 74 6e 65 78 74 00 00 00 00 80 00 04 64 72 75 ┆ waitnext dru┆
0x12780…127a0 6d 00 00 00 00 00 00 00 00 81 10 38 0c 00 00 00 00 00 00 41 a8 01 20 3a 80 00 e3 00 c3 50 00 ea ┆m 8 A : P ┆
0x127a0…127c0 5f 77 72 69 74 65 6d 61 74 00 00 00 00 80 00 04 64 72 75 6d 00 00 00 00 00 00 00 00 80 00 9c 04 ┆_writemat drum ┆
0x127c0…127e0 d3 5a 24 80 00 04 e0 78 00 10 00 80 03 e3 ff ff f6 ff ff f6 77 72 6b 30 30 30 32 31 30 00 00 00 ┆ Z$ x wrk000210 ┆
0x127e0…12800 80 00 04 64 72 75 6d 00 00 00 00 00 00 00 00 80 00 b8 08 30 c3 6c 33 40 02 60 64 00 40 0a 80 20 ┆ drum 0 l3@ `d @ ┆
0x12800…12820 0b ff ff f6 ff ff f6 77 72 6b 30 30 30 37 31 37 00 00 00 80 00 04 64 72 75 6d 31 00 00 00 00 00 ┆ wrk000717 drum1 ┆
0x12820…12840 00 00 00 00 41 28 00 00 00 00 00 00 40 00 00 10 7e 80 02 8b 80 00 01 7f ff fd 7a 65 72 6f 31 00 ┆ A( @ ü zero1 ┆
0x12840…12860 00 00 00 00 00 00 80 00 04 64 72 75 6d 00 00 00 00 00 00 00 00 80 00 36 08 43 8e 10 40 00 20 91 ┆ drum 6 C @ ┆
0x12860…12880 e8 00 10 00 80 01 fb 80 00 01 7f ff fd 74 72 6e 00 00 00 00 00 00 00 00 00 80 40 0a 64 72 75 6d ┆ trn @ drum┆
0x12880…128a0 00 00 00 00 00 00 00 00 63 99 3e 00 00 00 00 00 00 00 00 00 00 00 00 80 02 03 80 00 01 7f ff fd ┆ c > ┆
0x128a0…128c0 74 72 6f 00 00 00 00 00 00 00 00 00 80 00 0a 64 72 75 6d 00 00 00 00 00 00 00 00 63 99 3e 00 00 ┆tro drum c > ┆
0x128c0…128e0 00 00 00 00 00 00 00 00 00 00 03 a0 22 00 07 f8 00 08 01 74 73 65 61 72 63 68 63 6f 6e 00 00 00 ┆ " tsearchcon ┆
0x128e0…12900 00 03 64 69 73 63 31 00 00 00 00 00 00 00 75 c5 ca 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ┆ disc1 u ┆
0x12900…12920 (33,) 69 66 74 20 28 2d 32 34 29 20 65 78 74 72 61 63 74 20 32 34 3b 0a 20 20 20 20 20 20 6d 28 38 29 ┆ift (-24) extract 24; m(8)┆
0x12920…12940 3a 3d 74 61 70 65 6e 61 6d 65 28 32 29 20 65 78 74 72 61 63 74 20 32 34 3b 0a 20 20 20 20 20 20 ┆:=tapename(2) extract 24; ┆
0x12940…12960 6f 70 65 6e 28 7a 2c 30 2c 20 74 61 70 65 6e 61 6d 65 2c 30 29 3b 0a 20 20 20 20 20 20 69 66 20 ┆open(z,0, tapename,0); if ┆
0x12960…12980 6d 6f 6e 69 74 6f 72 28 34 29 70 72 6f 63 65 73 73 20 64 65 73 63 3a 28 20 7a 2c 30 2c 69 61 29 ┆monitor(4)process desc:( z,0,ia)┆
0x12980…129a0 20 3d 20 30 20 74 68 65 6e 0a 20 20 20 20 20 20 62 65 67 69 6e 0a 20 20 20 20 20 20 20 20 6d 28 ┆ = 0 then begin m(┆
0x129a0…129c0 31 29 3a 3d 31 36 20 3c 2a 6f 70 6d 65 73 73 2a 3e 20 73 68 69 66 74 20 31 32 3b 0a 20 20 20 20 ┆1):=16 <*opmess*> shift 12; ┆
0x129c0…129e0 20 20 20 20 6d 28 32 29 3a 3d 20 6c 6f 6e 67 20 3c 3a 72 69 6e 3a 3e 20 73 68 69 66 74 20 28 2d ┆ m(2):= long <:rin:> shift (-┆
0x129e0…12a00 32 34 29 20 65 78 74 72 61 63 74 20 32 34 3b 0a 20 20 20 20 20 20 20 20 6d 28 33 29 3a 3d 20 6c ┆24) extract 24; m(3):= l┆
0x12a00…12a20 6f 6e 67 20 3c 3a 67 3a 3e 20 73 68 69 66 74 20 28 2d 32 34 29 20 65 78 74 72 61 63 74 20 32 34 ┆ong <:g:> shift (-24) extract 24┆
0x12a20…12a40 3b 0a 20 20 20 20 20 20 20 20 6d 28 34 29 3a 3d 20 33 32 20 73 68 69 66 74 20 31 36 3b 0a 20 20 ┆; m(4):= 32 shift 16; ┆
0x12a40…12a60 20 20 20 20 20 20 73 79 73 74 65 6d 28 31 30 29 70 61 72 72 61 6e 74 20 6d 65 73 73 61 67 65 3a ┆ system(10)parrant message:┆
0x12a60…12a80 28 30 2c 6d 29 3b 0a 20 20 20 20 20 20 65 6e 64 3b 0a 73 65 6e 73 65 3a 0a 20 20 20 20 20 20 6d ┆(0,m); end; sense: m┆
0x12a80…12aa0 6f 6e 69 74 6f 72 20 28 36 29 69 6e 69 74 69 61 6c 69 7a 65 20 70 72 6f 63 65 73 73 3a 28 20 7a ┆onitor (6)initialize process:( z┆
0x12aa0…12ac0 2c 30 2c 69 61 29 3b 0a 20 20 20 20 20 20 67 65 74 73 68 61 72 65 36 28 7a 2c 69 61 2c 31 29 3b ┆,0,ia); getshare6(z,ia,1);┆
0x12ac0…12ae0 0a 20 20 20 20 20 20 69 61 28 34 29 3a 3d 30 3b 20 0a 20 20 20 20 20 20 73 65 74 73 68 61 72 65 ┆ ia(4):=0; setshare┆
0x12ae0…12b00 36 28 7a 2c 69 61 2c 31 29 3b 0a 20 20 20 20 20 20 6d 6f 6e 69 74 6f 72 20 28 31 36 29 73 65 6e ┆6(z,ia,1); monitor (16)sen┆
0x12b00…12b20 64 20 6d 65 73 73 61 67 65 3a 28 20 7a 2c 31 2c 69 61 29 3b 0a 20 20 20 20 20 20 69 66 20 6d 6f ┆d message:( z,1,ia); if mo┆
0x12b20…12b40 6e 69 74 6f 72 28 31 38 29 77 61 69 74 20 61 6e 73 77 65 72 3a 28 7a 2c 31 2c 69 61 29 20 3c 3e ┆nitor(18)wait answer:(z,1,ia) <>┆
0x12b40…12b60 20 31 20 3c 2a 6e 6f 74 20 6e 6f 72 6d 61 6c 2a 3e 20 74 68 65 6e 0a 20 20 20 20 20 20 62 65 67 ┆ 1 <*not normal*> then beg┆
0x12b60…12b80 69 6e 0a 20 20 20 20 20 20 20 20 63 6f 6d 6d 65 6e 74 20 6e 6f 74 20 6d 6f 75 6e 74 65 64 3b 0a ┆in comment not mounted; ┆
0x12b80…12ba0 20 20 20 20 20 20 20 20 69 61 28 31 29 3a 3d 20 28 69 66 20 64 65 76 69 63 65 20 3d 20 30 20 74 ┆ ia(1):= (if device = 0 t┆
0x12ba0…12bc0 68 65 6e 20 31 34 20 73 68 69 66 74 20 31 32 20 65 6c 73 65 20 0a 20 20 20 20 20 20 20 20 33 32 ┆hen 14 shift 12 else 32┆
0x12bc0…12be0 20 73 68 69 66 74 20 31 32 20 2b 31 20 73 68 69 66 74 20 39 29 20 2b 20 31 20 73 68 69 66 74 20 ┆ shift 12 +1 shift 9) + 1 shift ┆
0x12be0…12c00 30 3b 0a 20 20 20 20 20 20 20 20 69 61 28 32 29 3a 3d 20 6c 6f 6e 67 20 3c 3a 6d 6f 75 3a 3e 20 ┆0; ia(2):= long <:mou:> ┆
0x12c00…12c20 73 68 69 66 74 20 28 2d 32 34 29 20 65 78 74 72 61 63 74 20 32 34 3b 0a 20 20 20 20 20 20 20 20 ┆shift (-24) extract 24; ┆
0x12c20…12c40 69 61 28 33 29 3a 3d 20 6c 6f 6e 67 20 3c 3a 6e 74 3a 3e 20 73 68 69 66 74 28 2d 32 34 29 20 65 ┆ia(3):= long <:nt:> shift(-24) e┆
0x12c40…12c60 78 74 72 61 63 74 20 32 34 3b 0a 20 20 20 20 20 20 20 20 69 61 28 34 29 3a 3d 20 64 65 76 69 63 ┆xtract 24; ia(4):= devic┆
0x12c60…12c80 65 3b 0a 20 20 20 20 20 20 20 20 66 6f 72 20 69 3a 3d 20 35 20 73 74 65 70 20 31 20 75 6e 74 69 ┆e; for i:= 5 step 1 unti┆
0x12c80…12ca0 6c 20 38 20 64 6f 20 69 61 28 69 29 3a 3d 6d 28 69 29 3b 0a 20 20 20 20 20 20 20 20 73 79 73 74 ┆l 8 do ia(i):=m(i); syst┆
0x12ca0…12cc0 65 6d 28 31 30 2c 30 2c 69 61 29 3b 0a 20 20 20 20 20 20 20 20 67 6f 74 6f 20 73 65 6e 73 65 3b ┆em(10,0,ia); goto sense;┆
0x12cc0…12ce0 0a 20 20 20 20 20 20 65 6e 64 0a 20 20 20 20 20 20 65 6c 73 65 0a 20 20 20 20 20 20 69 66 20 72 ┆ end else if r┆
0x12ce0…12d00 69 6e 67 20 74 68 65 6e 0a 20 20 20 20 20 20 62 65 67 69 6e 0a 20 20 20 20 20 20 20 20 69 66 20 ┆ing then begin if ┆
0x12d00…12d20 69 61 28 31 29 20 73 68 69 66 74 20 28 2d 31 35 29 20 65 78 74 72 61 63 74 20 31 20 3d 20 30 20 ┆ia(1) shift (-15) extract 1 = 0 ┆
0x12d20…12d40 74 68 65 6e 0a 20 20 20 20 20 20 20 20 62 65 67 69 6e 0a 20 20 20 20 20 20 20 20 20 20 63 6c 6f ┆then begin clo┆
0x12d40…12d60 73 65 28 7a 2c 66 61 6c 73 65 29 3b 0a 20 20 20 20 20 20 20 20 20 20 6f 70 65 6e 28 7a 2c 34 20 ┆se(z,false); open(z,4 ┆
0x12d60…12d80 73 68 69 66 74 20 31 32 20 2b 20 31 38 2c 20 20 74 61 70 65 6e 61 6d 65 2c 30 29 3b 0a 20 20 20 ┆shift 12 + 18, tapename,0); ┆
0x12d80…12da0 20 20 20 20 20 20 20 69 61 28 31 29 3a 3d 20 31 38 3c 2a 72 69 6e 67 2a 3e 20 73 68 69 66 74 20 ┆ ia(1):= 18<*ring*> shift ┆
0x12da0…12dc0 31 32 20 2b 20 31 20 73 68 69 66 74 20 30 3b 0a 20 20 20 20 20 20 20 20 20 20 69 61 28 32 29 3a ┆12 + 1 shift 0; ia(2):┆
0x12dc0…12de0 3d 20 6c 6f 6e 67 20 3c 3a 72 69 6e 3a 3e 20 73 68 69 66 74 20 28 2d 32 34 29 20 65 78 74 72 61 ┆= long <:rin:> shift (-24) extra┆
0x12de0…12e00 63 74 20 32 34 3b 0a 20 20 20 20 20 20 20 20 20 20 69 61 28 33 29 3a 3d 20 6c 6f 6e 67 20 3c 3a ┆ct 24; ia(3):= long <:┆
0x12e00…12e20 67 3a 3e 20 73 68 69 66 74 20 28 2d 32 34 29 20 65 78 74 72 61 63 74 20 32 34 3b 0a 20 20 20 20 ┆g:> shift (-24) extract 24; ┆
0x12e20…12e40 20 20 20 20 20 20 69 61 28 34 29 3a 3d 30 3b 0a 20 20 20 20 20 20 20 20 20 20 66 6f 72 20 69 3a ┆ ia(4):=0; for i:┆
0x12e40…12e60 3d 35 20 73 74 65 70 20 31 20 75 6e 74 69 6c 20 38 20 64 6f 20 69 61 28 69 29 3a 3d 6d 28 69 29 ┆=5 step 1 until 8 do ia(i):=m(i)┆
0x12e60…12e80 3b 0a 20 20 20 20 20 20 20 20 20 20 73 79 73 74 65 6d 28 31 30 2c 30 2c 69 61 29 3b 0a 20 20 20 ┆; system(10,0,ia); ┆
0x12e80…12ea0 20 20 20 20 20 20 20 67 6f 74 6f 20 73 65 6e 73 65 3b 0a 20 20 20 20 20 20 20 20 65 6e 64 3b 0a ┆ goto sense; end; ┆
0x12ea0…12ec0 20 20 20 20 20 20 65 6e 64 3b 0a 20 20 20 20 20 20 63 6c 6f 73 65 28 7a 2c 66 61 6c 73 65 29 3b ┆ end; close(z,false);┆
0x12ec0…12ee0 0a 20 20 20 20 65 6e 64 20 6d 6f 75 6e 74 20 6d 65 64 20 72 69 6e 67 3b 0a 0c 0a 20 20 20 20 70 ┆ end mount med ring; p┆
0x12ee0…12f00 72 6f 63 65 64 75 72 65 20 69 6e 69 74 74 65 6d 70 63 61 74 28 72 6e 61 6d 65 29 3b 0a 20 20 20 ┆rocedure inittempcat(rname); ┆
0x12f00…12f20 20 6c 6f 6e 67 20 61 72 72 61 79 20 72 6e 61 6d 65 3b 0a 20 20 20 20 62 65 67 69 6e 0a 20 20 20 ┆ long array rname; begin ┆
0x12f20…12f40 20 20 20 63 6f 6d 6d 65 6e 74 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2a 2a 2a 2a 2a 2a 2a ┆ comment *******┆
0x12f40…12f60 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a ┆********************************┆
0x12f60…12f80 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 0a 20 20 20 20 20 20 20 20 20 20 20 20 ┆******************* ┆
0x12f80…12fa0 20 20 2a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ * ┆
0x12fa0…12fc0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2a 0a 20 20 20 ┆ * ┆
0x12fc0…12fe0 20 20 20 20 20 20 20 20 20 20 20 2a 20 54 68 69 73 20 70 72 6f 63 65 64 75 72 65 20 69 73 20 75 ┆ * This procedure is u┆
0x12fe0…13000 73 65 64 20 74 6f 20 69 6e 69 74 69 61 6c 69 73 65 20 74 65 6d 70 63 61 74 20 61 6e 64 20 74 65 ┆sed to initialise tempcat and te┆
0x13000…13020 6d 31 2d 20 2a 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2a 20 63 61 74 2e 20 20 20 20 20 20 ┆m1- * * cat. ┆
0x13020…13040 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x13040…13060 20 20 20 20 20 20 20 20 20 20 20 20 20 2a 20 20 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2a ┆ * *┆
0x13060…13080 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x13080…130a0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2a 0a 20 20 20 20 20 20 ┆ * ┆
0x130a0…130c0 20 20 20 20 20 20 20 20 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a ┆ ************************┆
0x130c0…130e0 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a ┆********************************┆
0x130e0…13100 2a 2a 3b 0a 20 20 20 20 20 20 69 6e 74 65 67 65 72 20 66 69 65 6c 64 20 61 3b 0a 20 20 20 20 20 ┆**; integer field a; ┆
0x13100…13120 20 20 20 20 20 20 6f 70 65 6e 28 63 61 74 2c 34 2c 20 72 6e 61 6d 65 2c 30 29 3b 0a 20 20 20 20 ┆ open(cat,4, rname,0); ┆
0x13120…13140 20 20 69 3a 3d 6d 6f 6e 69 74 6f 72 28 34 32 29 6c 6f 6f 6b 20 75 70 20 65 6e 74 72 79 3a 28 63 ┆ i:=monitor(42)look up entry:(c┆
0x13140…13160 61 74 2c 30 2c 69 61 72 72 29 3b 0a 20 20 20 20 20 20 69 66 20 69 20 3c 3e 20 30 20 74 68 65 6e ┆at,0,iarr); if i <> 0 then┆
0x13160…13180 20 0a 20 20 20 20 20 20 62 65 67 69 6e 0a 20 20 20 20 20 20 20 20 69 61 72 72 28 31 29 3a 3d 31 ┆ begin iarr(1):=1┆
0x13180…131a0 30 3b 0a 20 20 20 20 20 20 20 20 20 69 61 72 72 28 32 29 3a 3d 31 3b 69 61 72 72 28 33 29 3a 3d ┆0; iarr(2):=1;iarr(3):=┆
0x131a0…131c0 30 3b 69 61 72 72 28 34 29 3a 3d 30 3b 69 61 72 72 28 35 29 3a 3d 30 3b 0a 20 20 20 20 20 20 20 ┆0;iarr(4):=0;iarr(5):=0; ┆
0x131c0…131e0 20 6d 6f 6e 69 74 6f 72 28 34 30 29 63 72 65 61 74 65 20 65 6e 74 72 79 3a 28 63 61 74 2c 30 2c ┆ monitor(40)create entry:(cat,0,┆
0x131e0…13200 69 61 72 72 29 3b 0a 20 20 20 20 20 20 65 6e 64 3b 0a 20 20 20 20 20 20 66 6f 72 20 69 3a 3d 20 ┆iarr); end; for i:= ┆
0x13200…13220 (34,) 31 20 73 74 65 70 20 31 20 75 6e 74 69 6c 20 69 61 72 72 28 31 29 20 64 6f 0a 20 20 20 20 20 20 ┆1 step 1 until iarr(1) do ┆
0x13220…13240 62 65 67 69 6e 0a 20 20 20 20 20 20 20 20 73 65 74 70 6f 73 69 74 69 6f 6e 28 63 61 74 2c 30 2c ┆begin setposition(cat,0,┆
0x13240…13260 69 29 3b 0a 20 20 20 20 20 20 20 20 6f 75 74 72 65 63 36 28 63 61 74 2c 35 31 32 29 3b 0a 20 20 ┆i); outrec6(cat,512); ┆
0x13260…13280 20 20 20 20 20 20 66 6f 72 20 69 6b 20 3a 3d 20 31 20 73 74 65 70 20 31 20 75 6e 74 69 6c 20 32 ┆ for ik := 1 step 1 until 2┆
0x13280…132a0 35 36 20 64 6f 0a 20 20 20 20 20 20 20 20 62 65 67 69 6e 0a 20 20 20 20 20 20 20 20 20 20 61 3a ┆56 do begin a:┆
0x132a0…132c0 3d 69 6b 2a 32 3b 0a 20 20 20 20 20 20 20 20 20 20 63 61 74 2e 61 3a 3d 2d 31 3b 0a 20 20 20 20 ┆=ik*2; cat.a:=-1; ┆
0x132c0…132e0 20 20 20 20 65 6e 64 3b 0a 20 20 20 20 20 20 65 6e 64 3b 0a 20 20 20 20 20 20 63 6c 6f 73 65 28 ┆ end; end; close(┆
0x132e0…13300 63 61 74 2c 74 72 75 65 29 3b 0a 20 20 20 20 65 6e 64 3b 0a 0c 0a 20 20 20 20 70 72 6f 63 65 64 ┆cat,true); end; proced┆
0x13300…13320 75 72 65 20 69 6e 69 74 6e 65 77 63 61 74 3b 0a 20 20 20 20 62 65 67 69 6e 0a 20 20 20 20 20 20 ┆ure initnewcat; begin ┆
0x13320…13340 63 6f 6d 6d 65 6e 74 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a ┆comment **********┆
0x13340…13360 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a ┆********************************┆
0x13360…13380 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 0a 20 20 20 20 20 20 20 20 20 20 20 20 ┆******************* ┆
0x13380…133a0 20 20 2a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ * ┆
0x133a0…133c0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2a 0a ┆ * ┆
0x133c0…133e0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2a 20 54 68 69 73 20 70 72 6f 63 65 64 75 72 65 20 69 ┆ * This procedure i┆
0x133e0…13400 6e 69 74 69 61 6c 69 73 65 20 74 68 65 20 6e 65 77 20 64 75 6d 70 63 61 74 20 20 73 6f 20 74 68 ┆nitialise the new dumpcat so th┆
0x13400…13420 61 74 20 65 76 65 72 79 20 20 2a 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2a 20 77 6f 72 64 ┆at every * * word┆
0x13420…13440 20 6f 66 20 69 74 20 63 6f 6e 74 61 69 6e 73 20 2d 31 2e 20 54 68 69 73 20 69 73 20 6f 6e 6c 79 ┆ of it contains -1. This is only┆
0x13440…13460 20 64 6f 6e 65 20 69 66 20 61 6e 20 72 65 6f 72 67 61 6e 69 2d 20 2a 0a 20 20 20 20 20 20 20 20 ┆ done if an reorgani- * ┆
0x13460…13480 20 20 20 20 20 20 2a 20 73 61 74 69 6f 6e 20 6f 66 20 64 75 6d 70 63 61 74 20 69 73 20 6e 65 73 ┆ * sation of dumpcat is nes┆
0x13480…134a0 73 61 63 61 72 79 2e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆sacary. ┆
0x134a0…134c0 20 20 2a 20 20 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2a 20 20 20 20 20 20 20 20 20 20 20 ┆ * * ┆
0x134c0…134e0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x134e0…13500 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2a 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ * ┆
0x13500…13520 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a ┆********************************┆
0x13520…13540 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 3b 0a 20 ┆*****************************; ┆
0x13540…13560 20 20 20 20 20 69 6e 74 65 67 65 72 20 66 69 65 6c 64 20 61 3b 0a 20 20 20 20 20 20 66 6f 72 20 ┆ integer field a; for ┆
0x13560…13580 69 3a 3d 20 30 20 73 74 65 70 20 31 20 75 6e 74 69 6c 20 68 61 73 68 65 6e 74 72 69 65 73 2d 31 ┆i:= 0 step 1 until hashentries-1┆
0x13580…135a0 20 64 6f 0a 20 20 20 20 20 20 62 65 67 69 6e 0a 20 20 20 20 20 20 20 20 73 65 74 70 6f 73 69 74 ┆ do begin setposit┆
0x135a0…135c0 69 6f 6e 28 6e 65 77 63 61 74 2c 30 2c 69 29 3b 0a 20 20 20 20 20 20 20 20 6f 75 74 72 65 63 36 ┆ion(newcat,0,i); outrec6┆
0x135c0…135e0 28 6e 65 77 63 61 74 2c 35 31 32 29 3b 0a 20 20 20 20 20 20 20 20 66 6f 72 20 69 6b 3a 3d 31 20 ┆(newcat,512); for ik:=1 ┆
0x135e0…13600 73 74 65 70 20 31 20 75 6e 74 69 6c 20 32 35 36 20 64 6f 0a 20 20 20 20 20 20 20 20 62 65 67 69 ┆step 1 until 256 do begi┆
0x13600…13620 6e 0a 20 20 20 20 20 20 20 20 20 20 61 3a 3d 69 6b 2a 32 3b 0a 20 20 20 20 20 20 20 20 20 20 6e ┆n a:=ik*2; n┆
0x13620…13640 65 77 63 61 74 2e 61 3a 3d 2d 31 3b 0a 20 20 20 20 20 20 20 20 65 6e 64 3b 0a 20 20 20 20 20 20 ┆ewcat.a:=-1; end; ┆
0x13640…13660 20 20 61 3a 3d 32 3b 6e 65 77 63 61 74 2e 61 3a 3d 30 3b 0a 20 20 20 20 20 20 65 6e 64 3b 0a 20 ┆ a:=2;newcat.a:=0; end; ┆
0x13660…13680 20 20 20 65 6e 64 3b 0a 0c 0a 20 20 20 20 70 72 6f 63 65 64 75 72 65 20 72 65 6f 72 67 3b 0a 20 ┆ end; procedure reorg; ┆
0x13680…136a0 20 20 20 62 65 67 69 6e 0a 0c 0a 20 20 20 20 20 20 70 72 6f 63 65 64 75 72 65 20 63 6f 6d 70 75 ┆ begin procedure compu┆
0x136a0…136c0 74 65 6e 65 77 68 61 73 68 3b 0a 20 20 20 20 20 20 62 65 67 69 6e 0a 20 20 20 20 20 20 20 20 69 ┆tenewhash; begin i┆
0x136c0…136e0 6e 74 65 67 65 72 20 61 72 72 61 79 20 70 72 69 6d 74 61 6c 28 31 3a 31 39 29 3b 0a 20 20 20 20 ┆nteger array primtal(1:19); ┆
0x136e0…13700 20 20 20 20 69 6e 74 65 67 65 72 20 70 72 69 6d 69 3b 0a 20 20 20 20 20 20 20 20 70 72 69 6d 74 ┆ integer primi; primt┆
0x13700…13720 61 6c 28 31 29 3a 3d 31 30 31 3b 0a 20 20 20 20 20 20 20 20 70 72 69 6d 74 61 6c 28 32 29 3a 3d ┆al(1):=101; primtal(2):=┆
0x13720…13740 31 36 37 3b 0a 20 20 20 20 20 20 20 20 70 72 69 6d 74 61 6c 28 33 29 3a 3d 32 31 37 3b 0a 20 20 ┆167; primtal(3):=217; ┆
0x13740…13760 20 20 20 20 20 20 70 72 69 6d 74 61 6c 28 34 29 3a 3d 33 37 33 3b 0a 20 20 20 20 20 20 20 20 70 ┆ primtal(4):=373; p┆
0x13760…13780 72 69 6d 74 61 6c 28 35 29 3a 3d 35 35 37 3b 0a 20 20 20 20 20 20 20 20 70 72 69 6d 74 61 6c 28 ┆rimtal(5):=557; primtal(┆
0x13780…137a0 36 29 3a 3d 37 38 37 3b 0a 20 20 20 20 20 20 20 20 70 72 69 6d 74 61 6c 28 37 29 3a 3d 31 31 30 ┆6):=787; primtal(7):=110┆
0x137a0…137c0 33 3b 0a 20 20 20 20 20 20 20 20 70 72 69 6d 74 61 6c 28 38 29 3a 3d 31 36 35 37 3b 0a 20 20 20 ┆3; primtal(8):=1657; ┆
0x137c0…137e0 20 20 20 20 20 70 72 69 6d 74 61 6c 28 39 29 3a 3d 32 34 35 39 3b 0a 20 20 20 20 20 20 20 20 70 ┆ primtal(9):=2459; p┆
0x137e0…13800 72 69 6d 74 61 6c 28 31 30 29 3a 3d 33 36 37 31 3b 0a 20 20 20 20 20 20 20 20 70 72 69 6d 74 61 ┆rimtal(10):=3671; primta┆
0x13800…13820 6c 28 31 31 29 3a 3d 35 34 34 39 3b 0a 20 20 20 20 20 20 20 20 70 72 69 6d 74 61 6c 28 31 32 29 ┆l(11):=5449; primtal(12)┆
0x13820…13840 3a 3d 38 30 33 39 3b 0a 20 20 20 20 20 20 20 20 70 72 69 6d 74 61 6c 28 31 33 29 3a 3d 31 32 30 ┆:=8039; primtal(13):=120┆
0x13840…13860 37 33 3b 0a 20 20 20 20 20 20 20 20 70 72 69 6d 74 61 6c 28 31 34 29 3a 3d 31 38 30 31 33 3b 0a ┆73; primtal(14):=18013; ┆
0x13860…13880 20 20 20 20 20 20 20 20 70 72 69 6d 74 61 6c 28 31 35 29 3a 3d 32 37 30 39 31 3b 0a 20 20 20 20 ┆ primtal(15):=27091; ┆
0x13880…138a0 20 20 20 20 70 72 69 6d 74 61 6c 28 31 36 29 3a 3d 34 30 31 31 31 3b 0a 20 20 20 20 20 20 20 20 ┆ primtal(16):=40111; ┆
0x138a0…138c0 70 72 69 6d 74 61 6c 28 31 37 29 3a 3d 36 30 38 31 31 3b 0a 20 20 20 20 20 20 20 20 70 72 69 6d ┆primtal(17):=60811; prim┆
0x138c0…138e0 74 61 6c 28 31 38 29 3a 3d 39 30 32 30 33 3b 0a 20 20 20 20 20 20 20 20 70 72 69 6d 69 3a 3d 31 ┆tal(18):=90203; primi:=1┆
0x138e0…13900 3b 0a 20 20 20 20 20 20 20 20 77 68 69 6c 65 20 68 61 73 68 65 6e 74 72 69 65 73 20 3e 20 70 72 ┆; while hashentries > pr┆
0x13900…13920 69 6d 74 61 6c 28 70 72 69 6d 69 29 20 64 6f 20 70 72 69 6d 69 3a 3d 70 72 69 6d 69 2b 31 3b 0a ┆imtal(primi) do primi:=primi+1; ┆
0x13920…13940 20 20 20 20 20 20 20 20 68 61 73 68 65 6e 74 72 69 65 73 3a 3d 70 72 69 6d 74 61 6c 28 70 72 69 ┆ hashentries:=primtal(pri┆
0x13940…13960 6d 69 2b 31 29 3b 0a 20 20 20 20 20 65 6e 64 3b 0a 20 20 20 20 20 20 69 6e 74 65 67 65 72 20 61 ┆mi+1); end; integer a┆
0x13960…13980 72 72 61 79 20 64 75 6e 61 6d 65 28 31 3a 31 30 29 3b 0a 20 20 20 20 20 20 69 6e 74 65 67 65 72 ┆rray duname(1:10); integer┆
0x13980…139a0 20 66 69 65 6c 64 20 61 3b 0a 20 20 20 20 20 20 69 6e 74 65 67 65 72 20 61 72 72 61 79 20 66 69 ┆ field a; integer array fi┆
0x139a0…139c0 65 6c 64 20 70 6f 69 6e 74 3b 0a 20 20 20 20 20 20 6c 6f 6e 67 20 61 72 72 61 79 20 63 6e 61 6d ┆eld point; long array cnam┆
0x139c0…139e0 65 28 31 3a 32 29 3b 0a 20 20 20 20 20 20 69 6e 74 65 67 65 72 20 6f 6c 64 68 61 73 68 65 6e 74 ┆e(1:2); integer oldhashent┆
0x139e0…13a00 72 69 65 73 3b 0a 20 20 20 20 20 20 6d 6f 6e 69 74 6f 72 28 37 32 29 73 65 74 20 63 61 74 61 6c ┆ries; monitor(72)set catal┆
0x13a00…13a20 6f 67 62 61 73 65 3a 28 7a 68 65 6c 70 2c 30 2c 69 6e 74 65 72 76 61 6c 29 3b 0a 20 20 20 20 20 ┆ogbase:(zhelp,0,interval); ┆
0x13a20…13a40 20 70 6f 69 6e 74 3a 3d 30 3b 0a 20 20 20 20 20 20 77 72 69 74 65 28 6f 75 74 2c 3c 3a 3c 31 30 ┆ point:=0; write(out,<:<10┆
0x13a40…13a60 3e 20 2d 2d 2d 20 74 68 65 20 64 75 6d 70 63 61 74 20 69 73 20 72 65 6f 72 67 61 6e 69 73 65 64 ┆> --- the dumpcat is reorganised┆
0x13a60…13a80 3a 3e 29 3b 0a 20 20 20 20 20 20 6f 6c 64 68 61 73 68 65 6e 74 72 69 65 73 3a 3d 68 61 73 68 65 ┆:>); oldhashentries:=hashe┆
0x13a80…13aa0 6e 74 72 69 65 73 3b 0a 20 20 20 20 20 20 63 6f 6d 70 75 74 65 6e 65 77 68 61 73 68 3b 0a 20 20 ┆ntries; computenewhash; ┆
0x13aa0…13ac0 20 20 20 20 66 6f 72 20 69 3a 3d 31 20 73 74 65 70 20 31 20 75 6e 74 69 6c 20 31 30 20 64 6f 20 ┆ for i:=1 step 1 until 10 do ┆
0x13ac0…13ae0 74 61 69 6c 28 69 29 3a 3d 30 3b 0a 20 20 20 20 20 20 74 61 69 6c 28 31 29 3a 3d 68 61 73 68 65 ┆tail(i):=0; tail(1):=hashe┆
0x13ae0…13b00 6e 74 72 69 65 73 3b 0a 20 20 20 20 20 20 74 61 69 6c 28 32 29 3a 3d 31 3b 0a 20 20 20 20 20 20 ┆ntries; tail(2):=1; ┆
0x13b00…13b20 (35,) 74 61 69 6c 28 37 29 3a 3d 64 75 6d 70 65 6e 73 69 7a 65 3b 74 61 69 6c 28 39 29 3a 3d 31 31 20 ┆tail(7):=dumpensize;tail(9):=11 ┆
0x13b20…13b40 73 68 69 66 74 20 31 32 3b 0a 20 20 20 20 20 20 63 6e 61 6d 65 28 31 29 3a 3d 6c 6f 6e 67 20 3c ┆shift 12; cname(1):=long <┆
0x13b40…13b60 3a 3a 3e 3b 63 6e 61 6d 65 28 32 29 3a 3d 6c 6f 6e 67 20 3c 3a 3a 3e 3b 0a 20 20 20 20 20 20 20 ┆::>;cname(2):=long <::>; ┆
0x13b60…13b80 20 20 20 20 6f 70 65 6e 28 6e 65 77 63 61 74 2c 34 2c 20 63 6e 61 6d 65 2c 30 29 3b 0a 20 20 20 ┆ open(newcat,4, cname,0); ┆
0x13b80…13ba0 20 20 20 69 66 20 6d 6f 6e 69 74 6f 72 28 34 30 29 63 72 65 61 74 65 20 65 6e 74 72 79 3a 28 6e ┆ if monitor(40)create entry:(n┆
0x13ba0…13bc0 65 77 63 61 74 2c 30 2c 74 61 69 6c 29 20 3c 3e 20 30 20 74 68 65 6e 20 65 72 72 6f 72 28 38 29 ┆ewcat,0,tail) <> 0 then error(8)┆
0x13bc0…13be0 3b 0a 20 20 20 20 20 20 6d 6f 6e 69 74 6f 72 28 37 34 29 73 65 74 65 6e 74 72 79 20 62 61 73 65 ┆; monitor(74)setentry base┆
0x13be0…13c00 3a 28 6e 65 77 63 61 74 2c 30 2c 69 6e 74 65 72 76 61 6c 29 3b 0a 20 20 20 20 20 20 20 20 20 20 ┆:(newcat,0,interval); ┆
0x13c00…13c20 20 6f 70 65 6e 28 63 61 74 2c 34 2c 20 64 75 6d 70 31 6e 61 6d 65 2c 30 29 3b 0a 20 20 20 20 20 ┆ open(cat,4, dump1name,0); ┆
0x13c20…13c40 20 69 6e 69 74 6e 65 77 63 61 74 3b 0a 20 20 20 20 20 20 66 6f 72 20 69 3a 3d 30 20 73 74 65 70 ┆ initnewcat; for i:=0 step┆
0x13c40…13c60 20 31 20 75 6e 74 69 6c 20 6f 6c 64 68 61 73 68 65 6e 74 72 69 65 73 2d 31 20 64 6f 0a 20 20 20 ┆ 1 until oldhashentries-1 do ┆
0x13c60…13c80 20 20 20 62 65 67 69 6e 0a 20 20 20 20 20 20 20 20 73 65 74 70 6f 73 69 74 69 6f 6e 28 63 61 74 ┆ begin setposition(cat┆
0x13c80…13ca0 2c 30 2c 69 29 3b 0a 20 20 20 20 20 20 20 20 73 77 6f 70 72 65 63 36 28 63 61 74 2c 32 29 3b 0a ┆,0,i); swoprec6(cat,2); ┆
0x13ca0…13cc0 20 20 20 20 20 20 20 20 72 68 61 73 68 65 6e 74 72 79 3b 0a 20 20 20 20 20 20 20 20 77 68 69 6c ┆ rhashentry; whil┆
0x13cc0…13ce0 65 20 63 61 74 2e 63 61 74 6e 72 3d 2d 31 20 64 6f 20 72 68 61 73 68 65 6e 74 72 79 3b 0a 20 20 ┆e cat.catnr=-1 do rhashentry; ┆
0x13ce0…13d00 20 20 20 20 20 20 64 6b 65 79 3a 3d 68 61 73 68 6b 65 79 28 63 61 74 2e 64 6e 61 6d 65 29 3b 0a ┆ dkey:=hashkey(cat.dname); ┆
0x13d00…13d20 20 20 20 20 20 20 20 20 73 65 74 70 6f 73 69 74 69 6f 6e 28 6e 65 77 63 61 74 2c 30 2c 64 6b 65 ┆ setposition(newcat,0,dke┆
0x13d20…13d40 79 29 3b 0a 20 20 20 20 20 20 20 20 73 77 6f 70 72 65 63 36 28 6e 65 77 63 61 74 2c 32 29 3b 0a ┆y); swoprec6(newcat,2); ┆
0x13d40…13d60 20 20 20 20 20 20 20 20 69 66 20 6e 65 77 63 61 74 2e 63 61 74 6e 72 20 3d 20 2d 31 20 74 68 65 ┆ if newcat.catnr = -1 the┆
0x13d60…13d80 6e 20 6e 65 77 63 61 74 2e 63 61 74 6e 72 3a 3d 30 3b 0a 20 20 20 20 20 20 20 20 6e 65 77 63 61 ┆n newcat.catnr:=0; newca┆
0x13d80…13da0 74 2e 63 61 74 6e 72 3a 3d 6e 65 77 63 61 74 2e 63 61 74 6e 72 2b 31 3b 0a 20 20 20 20 20 20 20 ┆t.catnr:=newcat.catnr+1; ┆
0x13da0…13dc0 20 73 77 6f 70 72 65 63 36 28 6e 65 77 63 61 74 2c 64 75 6d 70 65 6e 73 69 7a 65 29 3b 0a 20 20 ┆ swoprec6(newcat,dumpensize); ┆
0x13dc0…13de0 20 20 20 20 20 20 6b 3a 3d 31 3b 0a 20 20 20 20 20 20 20 20 77 68 69 6c 65 20 6e 65 77 63 61 74 ┆ k:=1; while newcat┆
0x13de0…13e00 2e 63 61 74 6e 72 20 3c 3e 20 2d 31 20 64 6f 20 73 77 6f 70 72 65 63 36 28 6e 65 77 63 61 74 2c ┆.catnr <> -1 do swoprec6(newcat,┆
0x13e00…13e20 64 75 6d 70 65 6e 73 69 7a 65 29 3b 0a 20 20 20 20 20 20 20 74 6f 66 72 6f 6d 28 6e 65 77 63 61 ┆dumpensize); tofrom(newca┆
0x13e20…13e40 74 2c 63 61 74 2c 64 75 6d 70 65 6e 73 69 7a 65 29 3b 0a 20 20 20 20 20 20 20 20 6e 65 77 63 61 ┆t,cat,dumpensize); newca┆
0x13e40…13e60 74 2e 63 61 74 6e 72 3a 3d 64 6b 65 79 3b 0a 20 20 20 20 20 20 65 6e 64 3b 0a 20 20 20 20 20 20 ┆t.catnr:=dkey; end; ┆
0x13e60…13e80 66 6f 72 20 69 3a 3d 31 20 73 74 65 70 20 31 20 75 6e 74 69 6c 20 31 30 20 64 6f 20 64 75 6e 61 ┆for i:=1 step 1 until 10 do duna┆
0x13e80…13ea0 6d 65 28 69 29 3a 3d 30 3b 0a 20 20 20 20 20 20 66 6f 72 20 69 3a 3d 31 20 73 74 65 70 20 31 20 ┆me(i):=0; for i:=1 step 1 ┆
0x13ea0…13ec0 75 6e 74 69 6c 20 34 20 64 6f 20 64 75 6e 61 6d 65 28 69 29 3a 3d 64 75 6d 70 31 6e 61 6d 65 2e ┆until 4 do duname(i):=dump1name.┆
0x13ec0…13ee0 70 6f 69 6e 74 28 69 29 3b 0a 20 20 20 20 20 20 63 6c 6f 73 65 28 63 61 74 2c 74 72 75 65 29 3b ┆point(i); close(cat,true);┆
0x13ee0…13f00 0a 20 20 20 20 20 20 6d 6f 6e 69 74 6f 72 28 34 38 29 72 65 6d 6f 76 65 20 65 6e 74 72 79 3a 28 ┆ monitor(48)remove entry:(┆
0x13f00…13f20 63 61 74 2c 30 2c 74 61 69 6c 29 3b 0a 20 20 20 20 20 20 63 6c 6f 73 65 28 6e 65 77 63 61 74 2c ┆cat,0,tail); close(newcat,┆
0x13f20…13f40 74 72 75 65 29 3b 0a 20 20 20 20 20 20 69 66 20 6d 6f 6e 69 74 6f 72 28 34 36 29 72 65 6e 61 6d ┆true); if monitor(46)renam┆
0x13f40…13f60 65 5f 65 6e 74 72 79 3a 28 20 6e 65 77 63 61 74 2c 30 2c 64 75 6e 61 6d 65 29 20 3c 3e 20 30 20 ┆e_entry:( newcat,0,duname) <> 0 ┆
0x13f60…13f80 74 68 65 6e 20 65 72 72 6f 72 28 39 29 3b 0a 20 20 20 20 65 6e 64 3b 0a 0a 0c 0a 20 20 20 20 70 ┆then error(9); end; p┆
0x13f80…13fa0 72 6f 63 65 64 75 72 65 20 68 61 73 68 74 73 69 7a 65 3b 0a 20 20 20 20 62 65 67 69 6e 0a 20 20 ┆rocedure hashtsize; begin ┆
0x13fa0…13fc0 20 20 20 20 63 6f 6d 6d 65 6e 74 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2a 2a 2a 2a 2a ┆ comment *****┆
0x13fc0…13fe0 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a ┆********************************┆
0x13fe0…14000 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 0a 20 20 20 20 20 20 20 20 20 20 20 20 ┆******************* ┆
0x14000…14020 20 20 2a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ * ┆
0x14020…14040 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2a 0a 20 20 20 20 20 ┆ * ┆
0x14040…14060 20 20 20 20 20 20 20 20 20 2a 20 54 68 69 73 20 70 72 6f 63 65 64 75 72 65 20 66 69 6e 64 73 20 ┆ * This procedure finds ┆
0x14060…14080 6f 75 74 20 68 6f 77 20 6d 61 6e 79 20 65 6e 74 72 69 65 73 20 74 68 65 72 65 20 61 72 65 20 20 ┆out how many entries there are ┆
0x14080…140a0 2a 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2a 20 69 6e 20 74 68 65 20 68 61 73 68 20 74 61 ┆* * in the hash ta┆
0x140a0…140c0 62 6c 65 20 61 6e 64 20 69 66 20 74 68 65 72 65 20 69 73 20 6d 6f 72 65 20 74 68 61 6e 20 6d 61 ┆ble and if there is more than ma┆
0x140c0…140e0 78 68 61 73 68 2d 20 2a 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2a 20 73 69 7a 65 20 69 74 ┆xhash- * * size it┆
0x140e0…14100 20 69 73 20 72 65 6f 72 67 61 6e 69 73 65 64 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ is reorganised ┆
0x14100…14120 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2a 20 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2a ┆ * *┆
0x14120…14140 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x14140…14160 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2a 20 20 20 0a 20 20 20 20 20 ┆ * ┆
0x14160…14180 20 20 20 20 20 20 20 20 20 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a ┆ ***********************┆
0x14180…141a0 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a ┆********************************┆
0x141a0…141c0 2a 3b 0a 0a 20 20 20 20 20 20 69 6e 74 65 67 65 72 20 66 69 65 6c 64 20 63 3b 0a 20 20 20 20 20 ┆*; integer field c; ┆
0x141c0…141e0 20 69 6e 74 65 67 65 72 20 6e 72 5f 6f 66 5f 65 6e 3b 0a 20 20 20 20 20 20 63 3a 3d 32 3b 0a 20 ┆ integer nr_of_en; c:=2; ┆
0x141e0…14200 20 20 20 20 20 6e 72 5f 6f 66 5f 65 6e 3a 3d 30 3b 0a 20 20 20 20 20 20 20 20 20 20 20 6f 70 65 ┆ nr_of_en:=0; ope┆
0x14200…14220 6e 28 63 61 74 2c 34 2c 20 64 75 6d 70 31 6e 61 6d 65 2c 30 29 3b 0a 20 20 20 20 20 20 66 6f 72 ┆n(cat,4, dump1name,0); for┆
0x14220…14240 20 69 3a 3d 30 20 73 74 65 70 20 31 20 75 6e 74 69 6c 20 68 61 73 68 65 6e 74 72 69 65 73 2d 31 ┆ i:=0 step 1 until hashentries-1┆
0x14240…14260 20 64 6f 0a 20 20 20 20 20 20 62 65 67 69 6e 0a 20 20 20 20 20 20 20 20 73 65 74 70 6f 73 69 74 ┆ do begin setposit┆
0x14260…14280 69 6f 6e 28 63 61 74 2c 30 2c 69 29 3b 0a 20 20 20 20 20 20 20 20 69 6e 72 65 63 36 28 63 61 74 ┆ion(cat,0,i); inrec6(cat┆
0x14280…142a0 2c 31 29 3b 0a 20 20 20 20 20 20 20 20 6e 72 5f 6f 66 5f 65 6e 3a 3d 6e 72 5f 6f 66 5f 65 6e 2b ┆,1); nr_of_en:=nr_of_en+┆
0x142a0…142c0 63 61 74 2e 63 3b 0a 20 20 20 20 20 20 65 6e 64 3b 0a 20 20 20 20 20 20 63 6c 6f 73 65 28 63 61 ┆cat.c; end; close(ca┆
0x142c0…142e0 74 2c 74 72 75 65 29 3b 0a 20 20 20 20 20 20 69 66 20 74 74 65 73 74 20 74 68 65 6e 20 77 72 69 ┆t,true); if ttest then wri┆
0x142e0…14300 74 65 28 6f 75 74 2c 3c 3a 3c 31 30 3e 2a 2a 2a 20 73 69 7a 65 20 6f 66 20 68 61 73 68 74 61 62 ┆te(out,<:<10>*** size of hashtab┆
0x14300…14320 6c 65 3d 20 3a 3e 2c 6e 72 5f 6f 66 5f 65 6e 29 3b 0a 20 20 20 20 20 20 69 66 20 6e 72 5f 6f 66 ┆le= :>,nr_of_en); if nr_of┆
0x14320…14340 5f 65 6e 20 2f 20 28 68 61 73 68 65 6e 74 72 69 65 73 20 2a 20 32 38 29 20 3e 20 6d 61 78 68 61 ┆_en / (hashentries * 28) > maxha┆
0x14340…14360 73 68 73 69 7a 65 20 74 68 65 6e 20 72 65 6f 72 67 3b 0a 20 20 20 20 65 6e 64 3b 0a 0c 0a 20 20 ┆shsize then reorg; end; ┆
0x14360…14380 20 20 70 72 6f 63 65 64 75 72 65 20 72 68 61 73 68 65 6e 74 72 79 3b 0a 20 20 20 20 62 65 67 69 ┆ procedure rhashentry; begi┆
0x14380…143a0 6e 0a 20 20 20 20 20 20 6b 3a 3d 73 77 6f 70 72 65 63 36 28 63 61 74 2c 30 29 3b 0a 20 20 20 20 ┆n k:=swoprec6(cat,0); ┆
0x143a0…143c0 20 20 69 66 20 6b 20 3d 20 30 20 74 68 65 6e 0a 20 20 20 20 20 20 62 65 67 69 6e 0a 20 20 20 20 ┆ if k = 0 then begin ┆
0x143c0…143e0 20 20 20 20 20 73 65 74 70 6f 73 69 74 69 6f 6e 28 63 61 74 2c 30 2c 30 29 3b 0a 20 20 20 20 20 ┆ setposition(cat,0,0); ┆
0x143e0…14400 20 20 20 20 73 77 6f 70 72 65 63 36 28 63 61 74 2c 32 29 3b 0a 20 20 20 20 20 20 65 6e 64 3b 0a ┆ swoprec6(cat,2); end; ┆
0x14400…14420 (36,) 20 20 20 20 20 20 69 66 20 6b 20 3d 20 35 31 32 20 74 68 65 6e 20 73 77 6f 70 72 65 63 36 28 63 ┆ if k = 512 then swoprec6(c┆
0x14420…14440 61 74 2c 32 29 3b 0a 20 20 20 20 20 20 69 66 20 6b 20 3d 20 72 65 73 74 6f 6e 64 75 6d 70 73 20 ┆at,2); if k = restondumps ┆
0x14440…14460 74 68 65 6e 0a 20 20 20 20 20 20 62 65 67 69 6e 0a 20 20 20 20 20 20 20 20 73 77 6f 70 72 65 63 ┆then begin swoprec┆
0x14460…14480 36 28 63 61 74 2c 6b 29 3b 0a 20 20 20 20 20 20 20 20 6b 3a 3d 73 77 6f 70 72 65 63 36 28 63 61 ┆6(cat,k); k:=swoprec6(ca┆
0x14480…144a0 74 2c 30 29 3b 0a 20 20 20 20 20 20 20 20 69 66 20 6b 20 3d 20 30 20 74 68 65 6e 0a 20 20 20 20 ┆t,0); if k = 0 then ┆
0x144a0…144c0 20 20 20 20 20 73 65 74 70 6f 73 69 74 69 6f 6e 28 63 61 74 2c 30 2c 30 29 3b 0a 20 20 20 20 20 ┆ setposition(cat,0,0); ┆
0x144c0…144e0 20 20 20 73 77 6f 70 72 65 63 36 28 63 61 74 2c 32 29 3b 0a 20 20 20 20 20 20 20 20 73 77 6f 70 ┆ swoprec6(cat,2); swop┆
0x144e0…14500 72 65 63 36 28 63 61 74 2c 64 75 6d 70 65 6e 73 69 7a 65 29 3b 0a 20 20 20 20 20 20 65 6e 64 0a ┆rec6(cat,dumpensize); end ┆
0x14500…14520 20 20 20 20 20 20 65 6c 73 65 0a 20 20 20 20 20 20 73 77 6f 70 72 65 63 36 28 63 61 74 2c 64 75 ┆ else swoprec6(cat,du┆
0x14520…14540 6d 70 65 6e 73 69 7a 65 29 3b 0a 20 20 20 20 65 6e 64 3b 0a 0c 0a 20 20 20 20 70 72 6f 63 65 64 ┆mpensize); end; proced┆
0x14540…14560 75 72 65 20 64 75 6d 70 63 61 74 75 70 64 61 74 65 28 6e 72 66 69 6c 65 73 2c 6e 72 2c 73 74 65 ┆ure dumpcatupdate(nrfiles,nr,ste┆
0x14560…14580 6e 74 72 79 29 3b 0a 20 20 20 20 69 6e 74 65 67 65 72 20 6e 72 66 69 6c 65 73 2c 6e 72 2c 73 74 ┆ntry); integer nrfiles,nr,st┆
0x14580…145a0 65 6e 74 72 79 3b 0a 20 20 20 20 62 65 67 69 6e 0a 20 20 20 20 20 20 69 6e 74 65 67 65 72 20 62 ┆entry; begin integer b┆
0x145a0…145c0 69 74 6e 6f 3b 0a 20 20 20 20 20 20 63 6f 6d 6d 65 6e 74 0a 20 20 20 20 20 20 20 20 20 20 20 20 ┆itno; comment ┆
0x145c0…145e0 20 20 20 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a ┆ *****************************┆
0x145e0…14600 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 0a 20 20 20 20 20 ┆************************** ┆
0x14600…14620 20 20 20 20 20 20 20 20 20 2a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ * ┆
0x14620…14640 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2a ┆ *┆
0x14640…14660 20 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2a 20 54 68 69 73 20 70 72 6f 63 65 64 75 72 65 ┆ * This procedure┆
0x14660…14680 20 77 69 6c 6c 20 66 6f 72 20 74 68 65 20 65 6e 74 72 69 65 73 20 69 6e 20 74 68 65 20 63 61 74 ┆ will for the entries in the cat┆
0x14680…146a0 61 6c 6f 67 20 20 2a 20 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2a 20 74 6f 20 74 68 65 20 ┆alog * * to the ┆
0x146a0…146c0 74 61 70 65 20 63 6f 70 69 65 64 20 74 68 61 74 20 64 61 79 20 75 70 64 61 74 65 20 69 6e 20 64 ┆tape copied that day update in d┆
0x146c0…146e0 75 6d 70 63 61 74 2e 20 20 20 20 20 20 2a 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2a 20 6e ┆umpcat. * * n┆
0x146e0…14700 72 66 69 6c 65 73 3a 20 73 70 65 63 69 66 69 65 73 20 68 6f 77 20 6d 61 6e 79 20 65 6e 74 72 69 ┆rfiles: specifies how many entri┆
0x14700…14720 65 73 20 74 68 61 74 20 69 73 20 74 6f 20 62 65 20 20 20 2a 0a 20 20 20 20 20 20 20 20 20 20 20 ┆es that is to be * ┆
0x14720…14740 20 20 20 2a 20 75 70 64 61 74 65 64 2e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ * updated. ┆
0x14740…14760 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2a 0a 20 20 20 20 20 ┆ * ┆
0x14760…14780 20 20 20 20 20 20 20 20 20 2a 20 6e 72 20 20 20 20 20 3a 20 73 70 65 63 69 66 69 65 73 20 74 68 ┆ * nr : specifies th┆
0x14780…147a0 65 20 74 61 70 65 6e 72 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2a ┆e tapenr *┆
0x147a0…147c0 20 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2a 20 73 74 73 74 65 6e 74 72 79 3a 20 73 70 65 ┆ * ststentry: spe┆
0x147c0…147e0 63 69 66 69 65 73 20 77 68 65 72 65 20 74 68 65 20 65 6e 74 72 69 65 73 20 73 74 61 72 74 20 69 ┆cifies where the entries start i┆
0x147e0…14800 6e 20 74 68 65 20 2a 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2a 20 63 61 74 61 6c 6f 67 2e ┆n the * * catalog.┆
0x14800…14820 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x14820…14840 20 20 20 20 20 20 20 20 20 20 20 20 2a 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2a 20 20 20 ┆ * * ┆
0x14840…14860 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x14860…14880 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2a 0a 20 20 20 20 20 20 20 20 20 20 20 20 ┆ * ┆
0x14880…148a0 20 20 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a ┆ ******************************┆
0x148a0…148c0 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 3b 0a 0c 0a 20 20 20 ┆*************************; ┆
0x148c0…148e0 20 20 20 70 72 6f 63 65 64 75 72 65 20 72 65 6d 6f 76 65 64 75 6d 70 62 69 74 3b 0a 20 20 20 20 ┆ procedure removedumpbit; ┆
0x148e0…14900 20 20 62 65 67 69 6e 0a 20 20 20 20 20 20 20 20 63 6f 6d 6d 65 6e 74 0a 20 20 20 20 20 20 20 20 ┆ begin comment ┆
0x14900…14920 20 20 20 20 20 20 20 20 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a ┆ ************************┆
0x14920…14940 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 0a 20 ┆****************************** ┆
0x14940…14960 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ * ┆
0x14960…14980 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x14980…149a0 20 20 20 20 2a 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2a 20 54 68 69 73 20 70 72 6f ┆ * * This pro┆
0x149a0…149c0 63 65 64 75 72 65 20 72 65 6d 6f 76 65 73 20 74 68 65 20 62 69 74 20 62 65 6c 6f 6e 69 6e 67 20 ┆cedure removes the bit beloning ┆
0x149c0…149e0 74 6f 20 6e 72 20 69 6e 20 20 20 2a 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2a 20 74 ┆to nr in * * t┆
0x149e0…14a00 68 65 20 77 68 6f 6c 65 20 64 75 6d 70 63 61 74 2e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆he whole dumpcat. ┆
0x14a00…14a20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2a 0a 20 20 20 20 20 20 20 20 20 20 20 20 ┆ * ┆
0x14a20…14a40 20 20 20 20 2a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ * ┆
0x14a40…14a60 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2a 0a 20 20 20 20 20 ┆ * ┆
0x14a60…14a80 20 20 20 20 20 20 20 20 20 20 20 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a ┆ *********************┆
0x14a80…14aa0 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a ┆********************************┆
0x14aa0…14ac0 2a 3b 0a 20 20 20 20 20 20 20 20 62 6f 6f 6c 65 61 6e 20 70 72 6f 63 65 64 75 72 65 20 62 69 74 ┆*; boolean procedure bit┆
0x14ac0…14ae0 73 61 74 28 62 69 74 6e 75 6d 6d 65 72 29 3b 69 6e 74 65 67 65 72 20 62 69 74 6e 75 6d 6d 65 72 ┆sat(bitnummer);integer bitnummer┆
0x14ae0…14b00 3b 0a 20 20 20 20 20 20 20 20 62 65 67 69 6e 0a 20 20 20 20 20 20 20 20 20 20 62 69 74 73 61 74 ┆; begin bitsat┆
0x14b00…14b20 3a 3d 20 69 66 20 63 61 74 2e 77 6f 72 64 6e 6f 20 73 68 69 66 74 28 2d 62 69 74 6e 75 6d 6d 65 ┆:= if cat.wordno shift(-bitnumme┆
0x14b20…14b40 72 29 20 65 78 74 72 61 63 74 20 31 20 3d 20 31 20 74 68 65 6e 0a 20 20 20 20 20 20 20 20 20 20 ┆r) extract 1 = 1 then ┆
0x14b40…14b60 20 20 20 74 72 75 65 20 65 6c 73 65 20 66 61 6c 73 65 3b 0a 20 20 20 20 20 20 20 20 65 6e 64 3b ┆ true else false; end;┆
0x14b60…14b80 0a 20 20 20 20 20 20 20 20 69 6e 74 65 67 65 72 20 6e 6f 6f 6e 73 65 67 6d 2c 6e 72 65 6d 6f 76 ┆ integer noonsegm,nremov┆
0x14b80…14ba0 65 64 2c 77 6f 72 64 31 3b 0a 20 20 20 20 20 20 20 20 69 6e 74 65 67 65 72 20 66 69 65 6c 64 20 ┆ed,word1; integer field ┆
0x14ba0…14bc0 70 6c 61 63 65 3b 0a 20 20 20 20 20 20 20 20 62 6f 6f 6c 65 61 6e 20 65 6d 70 74 79 3b 0a 20 20 ┆place; boolean empty; ┆
0x14bc0…14be0 20 20 20 20 20 20 20 69 66 20 74 74 65 73 74 20 74 68 65 6e 20 77 72 69 74 65 28 6f 75 74 2c 3c ┆ if ttest then write(out,<┆
0x14be0…14c00 3a 3c 31 30 3e 62 69 74 3d 3a 3e 2c 62 69 74 6e 6f 2c 0a 20 20 20 20 20 20 20 20 20 20 20 20 3c ┆:<10>bit=:>,bitno, <┆
0x14c00…14c20 3a 3c 31 30 3e 62 69 74 6d 6f 65 6e 73 74 65 72 20 3d 3a 3e 2c 62 69 74 70 61 74 74 65 72 6e 29 ┆:<10>bitmoenster =:>,bitpattern)┆
0x14c20…14c40 3b 0a 20 20 20 20 20 20 20 20 65 6d 70 74 79 3a 3d 74 72 75 65 3b 0a 20 20 20 20 20 20 20 20 6e ┆; empty:=true; n┆
0x14c40…14c60 72 65 6d 6f 76 65 64 3a 3d 30 3b 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 6f 70 65 6e 28 63 61 ┆removed:=0; open(ca┆
0x14c60…14c80 74 2c 34 2c 20 64 75 6d 70 31 6e 61 6d 65 2c 30 29 3b 0a 20 20 20 20 20 20 20 20 66 6f 72 20 69 ┆t,4, dump1name,0); for i┆
0x14c80…14ca0 3a 3d 20 30 20 73 74 65 70 20 31 20 75 6e 74 69 6c 20 68 61 73 68 65 6e 74 72 69 65 73 2d 31 20 ┆:= 0 step 1 until hashentries-1 ┆
0x14ca0…14cc0 64 6f 0a 20 20 20 20 20 20 20 20 62 65 67 69 6e 0a 20 20 20 20 20 20 20 20 20 20 73 65 74 70 6f ┆do begin setpo┆
0x14cc0…14ce0 73 69 74 69 6f 6e 28 63 61 74 2c 30 2c 69 29 3b 0a 20 20 20 20 20 20 20 20 20 20 73 77 6f 70 72 ┆sition(cat,0,i); swopr┆
0x14ce0…14d00 65 63 36 28 63 61 74 2c 32 29 3b 0a 20 20 20 20 20 20 20 20 20 20 6e 6f 6f 6e 73 65 67 6d 3a 3d ┆ec6(cat,2); noonsegm:=┆
0x14d00…14d20 (37,) 63 61 74 2e 63 61 74 6e 72 3b 0a 20 20 20 20 20 20 20 20 20 20 20 20 69 66 20 74 74 65 73 74 20 ┆cat.catnr; if ttest ┆
0x14d20…14d40 74 68 65 6e 20 77 72 69 74 65 28 6f 75 74 2c 3c 3a 3c 31 30 3e 61 6e 74 61 6c 3d 3a 3e 2c 6e 6f ┆then write(out,<:<10>antal=:>,no┆
0x14d40…14d60 6f 6e 73 65 67 6d 29 3b 0a 20 20 20 20 20 20 20 20 20 20 20 20 77 68 69 6c 65 20 6e 6f 6f 6e 73 ┆onsegm); while noons┆
0x14d60…14d80 65 67 6d 20 3e 20 30 20 64 6f 0a 20 20 20 20 20 20 20 20 20 20 20 20 62 65 67 69 6e 0a 20 20 20 ┆egm > 0 do begin ┆
0x14d80…14da0 20 20 20 20 20 20 20 20 20 20 20 69 66 20 74 74 65 73 74 20 74 68 65 6e 20 77 72 69 74 65 28 6f ┆ if ttest then write(o┆
0x14da0…14dc0 75 74 2c 3c 3a 3c 31 30 3e 20 61 6e 74 61 6c 31 20 3d 20 3a 3e 2c 6e 6f 6f 6e 73 65 67 6d 29 3b ┆ut,<:<10> antal1 = :>,noonsegm);┆
0x14dc0…14de0 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 72 68 61 73 68 65 6e 74 72 79 3b 0a 20 20 20 20 20 ┆ rhashentry; ┆
0x14de0…14e00 20 20 20 20 20 20 20 20 20 77 68 69 6c 65 20 63 61 74 2e 63 61 74 6e 72 20 3d 20 2d 31 20 20 64 ┆ while cat.catnr = -1 d┆
0x14e00…14e20 6f 20 72 68 61 73 68 65 6e 74 72 79 3b 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 77 6f 72 64 ┆o rhashentry; word┆
0x14e20…14e40 31 3a 3d 63 61 74 2e 77 6f 72 64 6e 6f 3b 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 69 66 20 ┆1:=cat.wordno; if ┆
0x14e40…14e60 62 69 74 73 61 74 28 62 69 74 6e 6f 29 20 74 68 65 6e 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆bitsat(bitno) then ┆
0x14e60…14e80 20 63 61 74 2e 77 6f 72 64 6e 6f 3a 3d 65 78 6f 72 28 63 61 74 2e 77 6f 72 64 6e 6f 2c 62 69 74 ┆ cat.wordno:=exor(cat.wordno,bit┆
0x14e80…14ea0 70 61 74 74 65 72 6e 29 3b 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 69 66 20 74 74 65 73 74 ┆pattern); if ttest┆
0x14ea0…14ec0 20 61 6e 64 20 77 6f 72 64 31 20 3c 3e 20 63 61 74 2e 77 6f 72 64 6e 6f 20 0a 20 20 20 20 20 20 ┆ and word1 <> cat.wordno ┆
0x14ec0…14ee0 20 20 20 20 20 20 20 20 74 68 65 6e 20 77 72 69 74 65 28 6f 75 74 2c 3c 3a 77 6f 72 64 32 20 3d ┆ then write(out,<:word2 =┆
0x14ee0…14f00 20 3a 3e 2c 63 61 74 2e 77 6f 72 64 6e 6f 29 3b 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 66 ┆ :>,cat.wordno); f┆
0x14f00…14f20 6f 72 20 6a 3a 3d 31 20 73 74 65 70 20 31 20 75 6e 74 69 6c 20 62 69 74 74 73 69 7a 65 20 64 6f ┆or j:=1 step 1 until bittsize do┆
0x14f20…14f40 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 65 6d 70 74 79 3a 3d 20 65 6d 70 74 79 20 61 6e 64 ┆ empty:= empty and┆
0x14f40…14f60 20 28 63 61 74 2e 73 74 61 72 74 6f 66 62 69 74 74 28 6a 29 20 3d 20 30 29 3b 0a 20 20 20 20 20 ┆ (cat.startofbitt(j) = 0); ┆
0x14f60…14f80 20 20 20 20 20 20 20 20 20 69 66 20 65 6d 70 74 79 20 74 68 65 6e 0a 20 20 20 20 20 20 20 20 20 ┆ if empty then ┆
0x14f80…14fa0 20 20 20 20 20 62 65 67 69 6e 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 66 6f 72 20 69 ┆ begin for i┆
0x14fa0…14fc0 6b 3a 3d 20 31 20 73 74 65 70 20 31 20 75 6e 74 69 6c 20 64 75 6d 70 73 69 7a 65 20 64 6f 0a 20 ┆k:= 1 step 1 until dumpsize do ┆
0x14fc0…14fe0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 62 65 67 69 6e 0a 20 20 20 20 20 20 20 20 20 20 20 ┆ begin ┆
0x14fe0…15000 20 20 20 20 20 20 20 70 6c 61 63 65 3a 3d 69 6b 2a 32 3b 0a 20 20 20 20 20 20 20 20 20 20 20 20 ┆ place:=ik*2; ┆