DATABASE-ORIG

00000000: 01 08 1C 08 01 00 8F 20  4E 41 41 52 20 48 4F 4F  |....... NAAR HOO|
00000010: 46 44 50 52 4F 47 52 41  4D 4D 41 2E 00 48 08 02  |FDPROGRAMMA..H..|
00000020: 00 97 35 33 32 38 30 2C  30 3A 97 35 33 32 38 31  |..53280,0:.53281|
00000030: 2C 30 3A 99 C7 28 33 30  29 3A 99 C7 28 31 34 29  |,0:..(30):..(14)|
00000040: C7 28 38 29 3A 89 32 36  00 5B 08 03 00 8F 20 53  |.(8):.26.[.... S|
00000050: 55 42 52 4F 55 54 49 4E  45 53 2E 00 6E 08 04 00  |UBROUTINES..n...|
00000060: 8F 20 47 45 54 20 52 4F  55 54 49 4E 45 2E 00 82  |. GET ROUTINE...|
00000070: 08 05 00 41 24 B2 22 22  3A 49 B2 30 3A 99 22 A6  |...A$."":I.0:.".|
00000080: 22 3B 00 93 08 06 00 A1  47 24 3A 8B 47 24 B2 22  |";......G$:.G$."|
00000090: 22 A7 36 00 CA 08 07 00  8B 47 24 B2 C7 28 31 34  |".6......G$..(14|
000000A0: 38 29 B0 47 24 B2 C7 28  31 37 29 B0 47 24 B2 C7  |8).G$..(17).G$..|
000000B0: 28 32 39 29 B0 47 24 B2  C7 28 31 35 37 29 B0 47  |(29).G$..(157).G|
000000C0: 24 B2 C7 28 31 34 35 29  A7 36 00 E0 08 08 00 8B  |$..(145).6......|
000000D0: 47 24 B2 C7 28 32 30 29  AF 41 24 B2 22 22 A7 36  |G$..(20).A$."".6|
000000E0: 00 11 09 09 00 8B 47 24  B2 C7 28 32 30 29 A7 99  |......G$..(20)..|
000000F0: C7 28 32 30 29 C7 28 32  30 29 22 22 3B 3A 49 B2  |.(20).(20)"";:I.|
00000100: 49 AB 31 3A 41 24 B2 C8  28 41 24 2C 49 29 3A 89  |I.1:A$..(A$,I):.|
00000110: 36 00 3C 09 0A 00 8B 47  24 B3 B1 C7 28 31 33 29  |6.<....G$...(13)|
00000120: A7 41 24 B2 41 24 AA 47  24 3A 49 B2 49 AA 31 3A  |.A$.A$.G$:I.I.1:|
00000130: 99 22 9D 22 47 24 22 22  3B 3A 89 36 00 52 09 0B  |."."G$"";:.6.R..|
00000140: 00 8B 47 24 B2 C7 28 31  33 29 A7 41 24 B2 22 22  |..G$..(13).A$.""|
00000150: 3A 8E 00 5E 09 0C 00 99  22 9D 20 22 3A 8E 00 74  |:..^....". ":..t|
00000160: 09 0D 00 8F 20 46 55 4E  43 54 49 45 20 4B 49 45  |.... FUNCTIE KIE|
00000170: 5A 45 4E 2E 00 89 09 0E  00 99 22 12 11 22 51 24  |ZEN.......".."Q$|
00000180: 22 9D 91 91 22 3A 8D 31  38 00 B7 09 0F 00 41 B2  |"...":.18.....A.|
00000190: 30 3A 81 49 B2 31 A4 31  35 3A 8B CA 28 4B 24 2C  |0:.I.1.15:..(K$,|
000001A0: 49 AC 32 AB 31 2C 31 29  B2 41 24 A7 20 41 B2 49  |I.2.1,1).A$. A.I|
000001B0: 3A 49 B2 31 37 3A 8E 00  C0 09 10 00 82 49 3A 8E  |:I.17:.......I:.|
000001C0: 00 D3 09 11 00 8F 20 57  45 4C 4B 45 20 54 4F 45  |...... WELKE TOE|
000001D0: 54 53 2E 00 E5 09 12 00  A1 41 24 3A 8B 41 24 B2  |TS.......A$:.A$.|
000001E0: 22 22 A7 31 38 00 EB 09  13 00 8E 00 0C 0A 14 00  |"".18...........|
000001F0: A4 91 20 45 4E 54 52 59  4E 55 4D 4D 45 52 20 49  |.. ENTRYNUMMER I|
00000200: 4E 20 42 45 57 45 52 4B  49 4E 47 2E 00 1D 0A 15  |N BEWERKING.....|
00000210: 00 99 22 13 22 A3 33 35  29 3B 49 3A 8E 00 2B 0A  |..".".35);I:..+.|
00000220: 16 00 8F 20 46 49 4C 54  45 52 2E 00 4A 0A 17 00  |... FILTER..J...|
00000230: 99 22 12 41 52 45 20 59  4F 55 20 53 55 52 45 3F  |.".ARE YOU SURE?|
00000240: 59 2F 4E 22 3A 8D 31 38  3A 8E 00 60 0A 18 00 8F  |Y/N":.18:..`....|
00000250: 20 48 4F 4F 46 44 50 52  4F 47 52 41 4D 4D 41 2E  | HOOFDPROGRAMMA.|
00000260: 00 75 0A 19 00 8F 20 49  4E 49 54 49 41 4C 49 53  |.u.... INITIALIS|
00000270: 45 52 45 4E 2E 00 B6 0A  1A 00 99 22 93 22 A6 31  |EREN.......".".1|
00000280: 31 29 C7 28 31 34 32 29  22 12 20 44 20 41 20 54  |1).(142)". D A T|
00000290: 20 41 20 42 20 41 20 53  20 45 20 22 3A 99 A6 31  | A B A S E ":..1|
000002A0: 31 29 22 11 20 2A 4A 55  53 54 20 41 20 4D 4F 4D  |1)". *JUST A MOM|
000002B0: 45 4E 54 2E 2A 22 00 E4  0A 1B 00 48 24 B2 22 43  |ENT.*".....H$."C|
000002C0: 2E 42 2E 4D 2E 22 3A 51  24 B2 22 12 59 4F 55 52  |.B.M.":Q$.".YOUR|
000002D0: 20 43 48 4F 49 43 45 20  20 20 3F 20 3D 20 48 45  | CHOICE   ? = HE|
000002E0: 4C 50 20 22 00 1F 0B 1C  00 4E B2 B5 28 28 B8 28  |LP ".....N..((.(|
000002F0: 30 29 AB 28 B8 28 30 29  B3 30 29 AC 36 35 35 33  |0).(.(0).0).6553|
00000300: 36 29 AD 34 30 29 3A 50  B2 31 3A 58 B2 28 4E AA  |6).40):P.1:X.(N.|
00000310: 31 29 AD 31 30 3A 4E B2  31 30 AC B5 28 58 29 00  |1).10:N.10..(X).|
00000320: 37 0B 1D 00 86 53 24 28  4E AA 31 29 3A 4C 24 B2  |7....S$(N.1):L$.|
00000330: 22 20 4C 49 4E 45 22 00  4E 0B 1E 00 81 4A B2 30  |" LINE".N....J.0|
00000340: A4 4E 3A 53 24 28 4A 29  B2 22 2D 22 3A 82 00 6F  |.N:S$(J)."-":..o|
00000350: 0B 1F 00 99 22 11 20 22  B5 28 58 29 22 50 41 47  |....". ".(X)"PAG|
00000360: 45 53 22 3A 99 4E 22 45  4E 54 52 49 45 53 22 00  |ES":.N"ENTRIES".|
00000370: 9A 0B 20 00 4B 24 B2 22  43 2C 50 2C 45 2C 49 2C  |.. .K$."C,P,E,I,|
00000380: 4E 2C 53 2C 4C 2C 48 2C  4B 2C 41 2C 3F 2C 52 2C  |N,S,L,H,K,A,?,R,|
00000390: 46 2C 44 2C 47 22 3A 89  33 38 00 AF 0B 21 00 A4  |F,D,G":.38...!..|
000003A0: 91 20 48 4F 4F 46 44 47  52 4F 45 50 45 4E 2E 00  |. HOOFDGROEPEN..|
000003B0: B7 0B 22 00 4B B2 30 00  E7 0B 23 00 51 B2 30 3A  |..".K.0...#.Q.0:|
000003C0: 99 22 93 12 43 48 41 50  54 45 52 20 43 4F 4E 54  |."..CHAPTER CONT|
000003D0: 45 4E 54 53 20 46 49 4C  45 3A 20 22 3B 48 24 3A  |ENTS FILE: ";H$:|
000003E0: 99 22 50 41 47 45 22 00  22 0C 24 00 81 4A B2 4B  |."PAGE".".$..J.K|
000003F0: A4 4E 3A 8B C6 28 53 24  28 4A 29 29 B2 31 38 A7  |.N:..(S$(J)).18.|
00000400: 99 22 9D 22 B5 28 4A AD  31 30 AA 31 29 3B 53 24  |.".".(J.10.1);S$|
00000410: 28 4A 29 3A 51 B2 51 AA  31 3A 8B 51 B1 31 39 A7  |(J):Q.Q.1:.Q.19.|
00000420: 33 38 00 28 0C 25 00 82  00 38 0C 26 00 8D 31 34  |38.(.%...8.&..14|
00000430: 3A 8B 41 B2 30 A7 33 38  00 75 0C 27 00 91 20 41  |:.A.0.38.u.'.. A|
00000440: 20 89 20 33 34 2C 34 33  2C 31 35 35 2C 35 34 2C  | . 34,43,155,54,|
00000450: 36 39 2C 38 37 2C 39 33  2C 31 33 33 2C 31 32 37  |69,87,93,133,127|
00000460: 2C 31 37 32 2C 37 33 2C  31 34 37 2C 35 31 2C 37  |,172,73,147,51,7|
00000470: 33 2C 31 36 34 00 88 0C  28 00 8B 4A B3 4E AA 31  |3,164...(..J.N.1|
00000480: A7 4B B2 4A 3A 89 33 35  00 90 0C 29 00 89 33 34  |.K.J:.35...)..34|
00000490: 00 A1 0C 2A 00 8F 20 42  4C 41 44 5A 49 4A 44 45  |...*.. BLADZIJDE|
000004A0: 2E 00 CE 0C 2B 00 41 24  B2 22 2D 22 3A 99 22 11  |....+.A$."-":.".|
000004B0: 11 50 41 47 45 22 3A 8D  35 3A 50 B2 C5 28 41 24  |.PAGE":.5:P..(A$|
000004C0: 29 3A 8D 31 35 3A 8B 41  B3 B1 30 A7 33 39 00 EB  |):.15:.A..0.39..|
000004D0: 0C 2C 00 8B 50 B3 31 B0  50 B1 B5 28 58 29 A7 99  |.,..P.1.P..(X)..|
000004E0: 22 91 91 91 91 91 22 3A  89 34 33 00 1F 0D 2D 00  |".....":.43...-.|
000004F0: 99 22 93 12 50 41 47 45  22 50 3B 48 24 3A 81 49  |."..PAGE"P;H$:.I|
00000500: B2 30 A4 39 3A 4C B2 28  50 AB 31 29 AC 31 30 AA  |.0.9:L.(P.1).10.|
00000510: 49 3A 99 22 9D 22 4C 3B  53 24 28 4C 29 3A 82 00  |I:."."L;S$(L):..|
00000520: 2F 0D 2E 00 8D 31 34 3A  8B 41 B2 30 A7 34 36 00  |/....14:.A.0.46.|
00000530: 3D 0D 2F 00 8B 41 B3 B1  31 36 A7 33 39 00 50 0D  |=./..A..16.39.P.|
00000540: 30 00 50 B2 50 AA 31 3A  8B 50 B1 58 A7 50 B2 31  |0.P.P.1:.P.X.P.1|
00000550: 00 58 0D 31 00 89 34 35  00 6C 0D 32 00 8F 20 42  |.X.1..45.l.2.. B|
00000560: 45 53 54 41 4E 44 53 4E  41 41 4D 2E 00 86 0D 33  |ESTANDSNAAM....3|
00000570: 00 99 22 93 46 49 4C 45  4E 41 4D 45 22 3A 8D 35  |..".FILENAME":.5|
00000580: 3A 48 24 B2 41 24 00 8E  0D 34 00 89 34 35 00 9E  |:H$.A$...4..45..|
00000590: 0D 35 00 8F 20 49 4E 56  4F 45 47 45 4E 2E 00 D0  |.5.. INVOEGEN...|
000005A0: 0D 36 00 41 24 B2 22 2D  31 22 3A 99 22 11 11 49  |.6.A$."-1":."..I|
000005B0: 4E 53 45 52 54 22 4C 24  3A 8D 35 3A 4A B2 C5 28  |NSERT"L$:.5:J..(|
000005C0: 41 24 29 3A 8D 31 35 3A  8B 41 B3 B1 30 A7 34 35  |A$):.15:.A..0.45|
000005D0: 00 F2 0D 37 00 8B 4A B3  30 B0 4A B1 B5 28 58 29  |...7..J.0.J..(X)|
000005E0: AC 31 30 AA 31 A7 99 22  91 91 91 91 91 22 3A 89  |.10.1..".....":.|
000005F0: 35 34 00 15 0E 38 00 41  24 B2 22 22 3A 99 22 45  |54...8.A$."":."E|
00000600: 4E 54 52 59 22 3A 8D 35  3A 8D 31 35 3A 8B 41 B3  |NTRY":.5:.15:.A.|
00000610: B1 30 A7 34 35 00 2E 0E  39 00 99 22 49 4E 53 45  |.0.45...9.."INSE|
00000620: 52 54 49 4E 47 22 3A 8B  52 B2 4E A7 34 35 00 51  |RTING":.R.N.45.Q|
00000630: 0E 3A 00 81 49 B2 4A A4  4E 3A 8B 53 24 28 49 29  |.:..I.J.N:.S$(I)|
00000640: B2 22 2D 22 A7 4B 4B B2  49 3A 49 B2 4E 3A 89 36  |."-".KK.I:I.N:.6|
00000650: 30 00 5A 0E 3B 00 4B 4B  B2 49 00 62 0E 3C 00 82  |0.Z.;.KK.I.b.<..|
00000660: 20 49 00 90 0E 3D 00 81  49 B2 4B 4B A4 4A AA 31  | I...=..I.KK.J.1|
00000670: A9 AB 31 3A 53 24 28 49  29 B2 53 24 28 49 AB 31  |..1:S$(I).S$(I.1|
00000680: 29 3A 8D 32 31 3A 82 3A  53 24 28 4A 29 B2 41 24  |):.21:.:S$(J).A$|
00000690: 00 C2 0E 3E 00 8B C8 28  53 24 28 4A 29 2C 31 29  |...>...(S$(J),1)|
000006A0: B2 22 2A 22 A7 53 24 28  4A 29 B2 22 12 22 AA C9  |."*".S$(J)."."..|
000006B0: 28 53 24 28 4A 29 2C C3  28 53 24 28 4A 29 29 AB  |(S$(J),.(S$(J)).|
000006C0: 31 29 00 D2 0E 3F 00 50  B2 B5 28 4A AD 31 30 29  |1)...?.P..(J.10)|
000006D0: AA 31 00 08 0F 40 00 99  22 93 12 50 41 47 45 22  |.1...@.."..PAGE"|
000006E0: 50 3B 48 24 3A 81 49 B2  30 20 A4 20 39 3A 4C B2  |P;H$:.I.0 . 9:L.|
000006F0: 28 50 AB 31 29 AC 31 30  AA 49 3A 99 22 9D 22 4C  |(P.1).10.I:."."L|
00000700: 3B 53 24 28 4C 29 3A 82  00 25 0F 41 00 4A B2 4A  |;S$(L):..%.A.J.J|
00000710: AA 31 3A 8B 4A B1 B5 28  58 29 AC 31 30 AB 31 20  |.1:.J..(X).10.1 |
00000720: A7 20 4A B2 30 00 44 0F  42 00 99 22 11 11 49 4E  |. J.0.D.B.."..IN|
00000730: 53 45 52 54 22 3B 4C 24  3B 4A 3A 41 24 B2 22 22  |SERT";L$;J:A$.""|
00000740: 3A 89 35 36 00 4C 0F 43  00 89 34 35 00 61 0F 44  |:.56.L.C..45.a.D|
00000750: 00 8F 20 4E 49 45 55 57  20 42 45 53 54 41 4E 44  |.. NIEUW BESTAND|
00000760: 2E 00 7B 0F 45 00 99 22  11 11 22 3A 8D 32 33 3A  |..{.E.."..":.23:|
00000770: 8B 41 24 B3 B1 22 59 22  A7 34 35 00 9A 0F 46 00  |.A$.."Y".45...F.|
00000780: 99 22 11 4E 45 57 20 46  49 4C 45 20 4E 41 4D 45  |.".NEW FILE NAME|
00000790: 22 3A 8D 35 3A 48 24 B2  41 24 00 B5 0F 47 00 81  |":.5:H$.A$...G..|
000007A0: 4A B2 30 A4 4E 3A 53 24  28 4A 29 B2 22 2D 22 3A  |J.0.N:S$(J)."-":|
000007B0: 82 3A 89 34 35 00 C1 0F  48 00 8F 20 4D 45 4E 55  |.:.45...H.. MENU|
000007C0: 2E 00 D8 0F 49 00 99 22  93 12 22 A6 31 35 29 22  |....I.."..".15)"|
000007D0: 4D 20 45 20 4E 20 55 22  00 F6 0F 4A 00 99 22 12  |M E N U"...J..".|
000007E0: 50 92 41 47 45 22 A3 32  33 29 22 12 4E 92 45 57  |P.AGE".23)".N.EW|
000007F0: 20 46 49 4C 45 22 00 2F  10 4B 00 99 3A 99 22 12  | FILE"./.K..:.".|
00000800: 43 92 48 41 50 54 45 52  22 A3 32 33 29 3B 3A 99  |C.HAPTER".23);:.|
00000810: 22 12 46 92 49 4C 45 20  4E 41 4D 45 22 3A 99 3A  |".F.ILE NAME":.:|
00000820: 99 22 12 47 92 45 54 20  45 4E 54 52 59 22 3B 00  |.".G.ET ENTRY";.|
00000830: 45 10 4C 00 99 A3 32 33  29 3A 99 22 12 4B 92 49  |E.L...23):.".K.I|
00000840: 4C 4C 22 4C 24 00 5D 10  4D 00 99 3A 99 22 12 45  |LL"L$.].M..:.".E|
00000850: 12 4E 54 45 52 22 4C 24  3B A3 32 33 29 00 88 10  |.NTER"L$;.23)...|
00000860: 4E 00 99 22 12 48 92 41  52 44 20 43 4F 50 59 22  |N..".H.ARD COPY"|
00000870: 3A 99 3A 99 22 12 41 92  4C 50 48 41 42 45 54 49  |:.:.".A.LPHABETI|
00000880: 5A 45 22 A3 32 33 29 3B  00 B0 10 4F 00 99 22 12  |ZE".23);...O..".|
00000890: 49 92 4E 53 45 52 54 22  4C 24 3A 99 3A 99 22 12  |I.NSERT"L$:.:.".|
000008A0: 52 92 45 43 54 49 46 59  22 4C 24 A3 32 33 29 3B  |R.ECTIFY"L$.23);|
000008B0: 00 E1 10 50 00 99 22 12  44 92 45 46 49 4E 49 54  |...P..".D.EFINIT|
000008C0: 49 4F 4E 53 22 3A 99 3A  99 22 12 53 92 41 56 45  |IONS":.:.".S.AVE|
000008D0: 20 54 4F 20 54 41 50 45  20 4F 52 20 44 49 53 4B  | TO TAPE OR DISK|
000008E0: 22 00 03 11 51 00 99 3A  99 22 12 4C 92 4F 41 44  |"...Q..:.".L.OAD|
000008F0: 20 46 52 4F 4D 20 54 41  50 45 20 4F 52 20 44 49  | FROM TAPE OR DI|
00000900: 53 4B 22 00 0D 11 52 00  99 3A 99 51 24 00 1E 11  |SK"...R..:.Q$...|
00000910: 53 00 8D 31 38 3A 99 22  93 22 3A 8D 31 35 00 2C  |S..18:.".":.15.,|
00000920: 11 54 00 8B 20 41 B2 30  A7 20 37 33 00 34 11 55  |.T.. A.0. 73.4.U|
00000930: 00 89 33 39 00 45 11 56  00 8F 20 53 41 56 45 2D  |..39.E.V.. SAVE-|
00000940: 49 4E 46 4F 2E 00 64 11  57 00 99 22 93 12 53 41  |INFO..d.W.."..SA|
00000950: 56 45 11 22 3A 8D 32 33  3A 8B 20 41 B3 B1 22 59  |VE.":.23:. A.."Y|
00000960: 22 A7 34 35 00 8F 11 58  00 99 22 11 12 44 49 53  |".45...X.."..DIS|
00000970: 43 20 4F 52 20 54 41 50  45 3F 20 44 2F 54 22 3A  |C OR TAPE? D/T":|
00000980: 8D 31 38 3A 8B 20 41 24  B2 22 54 22 A7 39 31 00  |.18:. A$."T".91.|
00000990: 9F 11 59 00 8B 41 24 B3  B1 22 44 22 A7 34 35 00  |..Y..A$.."D".45.|
000009A0: D5 11 5A 00 9F 31 35 2C  38 2C 31 35 2C 22 49 22  |..Z..15,8,15,"I"|
000009B0: 3A A0 31 35 3A 9F 32 2C  38 2C 32 2C 22 40 30 3A  |:.15:.2,8,2,"@0:|
000009C0: 22 AA 48 24 AA 22 20 2C  53 2C 57 22 3A 4A B2 32  |".H$." ,S,W":J.2|
000009D0: 3A 89 31 30 30 00 EF 11  5B 00 99 3A 9F 20 31 2C  |:.100...[..:. 1,|
000009E0: 31 2C 31 2C 48 24 3A 4A  B2 31 3A 89 31 30 30 00  |1,1,H$:J.1:.100.|
000009F0: 00 12 5C 00 8F 20 4C 4F  41 44 20 49 4E 46 4F 2E  |..\.. LOAD INFO.|
00000A00: 00 20 12 5D 00 99 22 93  12 4C 4F 41 44 92 11 22  |. .].."..LOAD.."|
00000A10: 3A 8D 32 33 3A 8B 41 24  B3 B1 22 59 22 A7 34 35  |:.23:.A$.."Y".45|
00000A20: 00 4B 12 5E 00 99 22 11  12 44 49 53 43 20 4F 52  |.K.^.."..DISC OR|
00000A30: 20 54 41 50 45 3F 20 44  2F 54 22 3A 8D 31 38 3A  | TAPE? D/T":.18:|
00000A40: 8B 20 41 24 B2 22 54 22  A7 39 38 00 5B 12 5F 00  |. A$."T".98.[._.|
00000A50: 8B 41 24 B3 B1 22 44 22  A7 34 35 00 88 12 60 00  |.A$.."D".45...`.|
00000A60: 8D 31 30 38 3A 99 22 11  46 49 4C 45 20 4E 41 4D  |.108:.".FILE NAM|
00000A70: 45 3F 21 22 3A 8D 35 3A  4E 24 B2 41 24 3A 8B 20  |E?!":.5:N$.A$:. |
00000A80: 4E 24 B2 22 22 A7 34 35  00 BD 12 61 00 9F 31 35  |N$."".45...a..15|
00000A90: 2C 38 2C 31 35 2C 22 49  22 3A A0 31 35 3A 9F 32  |,8,15,"I":.15:.2|
00000AA0: 2C 38 2C 32 2C 22 30 3A  22 AA 4E 24 AA 22 20 2C  |,8,2,"0:".N$." ,|
00000AB0: 53 2C 52 22 3A 4A B2 32  3A 89 31 30 34 00 D5 12  |S,R":J.2:.104...|
00000AC0: 62 00 9F 20 31 2C 31 2C  30 2C 48 24 3A 4A B2 31  |b.. 1,1,0,H$:J.1|
00000AD0: 3A 89 31 30 34 00 EE 12  63 00 8F 20 53 41 56 45  |:.104...c.. SAVE|
00000AE0: 2F 4C 4F 41 44 20 56 45  52 56 4F 4C 47 2E 00 0D  |/LOAD VERVOLG...|
00000AF0: 13 64 00 81 49 B2 4E A4  30 A9 AB 31 3A 4B B2 49  |.d..I.N.0..1:K.I|
00000B00: 3A 8B 53 24 B3 B1 22 2D  22 A7 49 B2 30 00 19 13  |:.S$.."-".I.0...|
00000B10: 65 00 82 3A 4B B2 4B AA  31 00 37 13 66 00 98 4A  |e..:K.K.1.7.f..J|
00000B20: 2C 48 24 AA 22 20 BF 22  3A 98 4A 2C 4B 3A 81 20  |,H$." .":.J,K:. |
00000B30: 49 B2 30 20 A4 20 4B 00  52 13 67 00 98 4A 2C 53  |I.0 . K.R.g..J,S|
00000B40: 24 28 49 29 3A 8D 32 31  3A 82 3A A0 20 4A 3A 89  |$(I):.21:.:. J:.|
00000B50: 34 35 00 70 13 68 00 84  4A 2C 4E 24 3A 8B 20 C9  |45.p.h..J,N$:. .|
00000B60: 28 4E 24 2C 32 29 B3 B1  22 20 BF 22 A7 32 32 31  |(N$,2).." .".221|
00000B70: 00 9E 13 69 00 48 24 B2  4E 24 3A 48 24 B2 C8 28  |...i.H$.N$:H$..(|
00000B80: 48 24 2C C3 28 48 24 29  AB 32 29 3A 99 22 11 12  |H$,.(H$).2):."..|
00000B90: 46 4F 55 4E 44 20 22 48  24 3A 84 4A 2C 4B 00 C2  |FOUND "H$:.J,K..|
00000BA0: 13 6A 00 81 49 B2 30 20  A4 20 4B 3A 84 4A 2C 53  |.j..I.0 . K:.J,S|
00000BB0: 24 28 49 29 3A 8D 32 31  3A 82 3A A0 20 4A 3A 89  |$(I):.21:.:. J:.|
00000BC0: 34 35 00 DE 13 6B 00 8F  20 4F 56 45 52 5A 49 43  |45...k.. OVERZIC|
00000BD0: 48 54 20 44 49 53 4B 2D  46 49 4C 45 53 2E 00 0F  |HT DISK-FILES...|
00000BE0: 14 6C 00 99 22 13 12 44  49 53 43 20 46 49 4C 45  |.l.."..DISC FILE|
00000BF0: 20 4C 49 53 54 49 4E 47  3F 20 59 2F 4E 22 3A 8D  | LISTING? Y/N":.|
00000C00: 31 38 3A 8B 41 24 B3 B1  22 59 22 20 A7 20 8E 00  |18:.A$.."Y" . ..|
00000C10: 27 14 6D 00 99 22 12 13  53 43 41 4E 4E 49 4E 47  |'.m.."..SCANNING|
00000C20: 20 44 49 53 43 11 22 00  37 14 6E 00 9F 31 2C 38  | DISC.".7.n..1,8|
00000C30: 2C 30 2C 22 24 30 22 00  45 14 6F 00 A1 23 31 2C  |,0,"$0".E.o..#1,|
00000C40: 41 24 2C 42 24 00 53 14  70 00 A1 23 31 2C 41 24  |A$,B$.S.p..#1,A$|
00000C50: 2C 42 24 00 61 14 71 00  A1 23 31 2C 41 24 2C 42  |,B$.a.q..#1,A$,B|
00000C60: 24 00 69 14 72 00 43 B2  30 00 7D 14 73 00 8B 41  |$.i.r.C.0.}.s..A|
00000C70: 24 B3 B1 22 22 A7 43 B2  C6 28 41 24 29 00 97 14  |$.."".C..(A$)...|
00000C80: 74 00 8B 42 24 B3 B1 22  22 A7 43 B2 43 AA C6 28  |t..B$.."".C.C..(|
00000C90: 42 24 29 AC 32 35 36 00  B3 14 75 00 44 24 B2 44  |B$).256...u.D$.D|
00000CA0: 24 AA 22 12 22 AA CA 28  C4 28 43 29 2C 32 29 AA  |$."."..(.(C),2).|
00000CB0: 22 92 22 00 D0 14 76 00  A1 23 31 2C 42 24 3A 8B  |"."...v..#1,B$:.|
00000CC0: 20 53 54 B3 B1 30 20 A7  20 A0 20 31 3A 99 3A 8E  | ST..0 . . 1:.:.|
00000CD0: 00 E3 14 77 00 8B 42 24  B3 B1 C7 28 33 34 29 A7  |...w..B$...(34).|
00000CE0: 31 31 38 00 07 15 78 00  A1 23 31 2C 42 24 3A 8B  |118...x..#1,B$:.|
00000CF0: 42 24 B3 B1 C7 28 33 34  29 A7 44 24 B2 44 24 AA  |B$...(34).D$.D$.|
00000D00: 42 24 3A 89 31 32 30 00  20 15 79 00 A1 23 31 2C  |B$:.120. .y..#1,|
00000D10: 42 24 3A 8B 42 24 B2 C7  28 33 32 29 A7 31 32 31  |B$:.B$..(32).121|
00000D20: 00 2A 15 7A 00 43 24 B2  22 22 00 4D 15 7B 00 43  |.*.z.C$."".M.{.C|
00000D30: 24 B2 43 24 AA 42 24 3A  A1 23 31 2C 42 24 3A 8B  |$.C$.B$:.#1,B$:.|
00000D40: 20 42 24 B3 B1 22 22 20  A7 20 31 32 33 00 61 15  | B$.."" . 123.a.|
00000D50: 7C 00 8B C9 28 44 24 2C  31 29 B2 22 22 A7 99 44  ||...(D$,1).""..D|
00000D60: 24 00 70 15 7D 00 44 24  B2 22 22 3A 89 31 31 32  |$.p.}.D$."":.112|
00000D70: 00 8A 15 7E 00 8F 20 56  45 52 57 49 4A 44 45 52  |...~.. VERWIJDER|
00000D80: 20 47 45 47 45 56 45 4E  53 2E 00 BB 15 7F 00 41  | GEGEVENS......A|
00000D90: 24 B2 22 2D 31 22 3A 99  22 11 11 4B 49 4C 4C 22  |$."-1":."..KILL"|
00000DA0: 4C 24 3A 8D 35 3A 4A B2  C5 28 41 24 29 3A 8D 31  |L$:.5:J..(A$):.1|
00000DB0: 35 3A 8B 20 41 B3 B1 30  A7 34 35 00 DF 15 80 00  |5:. A..0.45.....|
00000DC0: 8B 4A B3 30 B0 4A B1 B5  28 58 29 AC 31 30 AA 31  |.J.0.J..(X).10.1|
00000DD0: A7 20 99 22 91 91 91 91  91 22 3A 89 31 32 37 00  |. .".....":.127.|
00000DE0: 02 16 81 00 81 49 B2 4A  A4 4E AB 31 3A 8B 53 24  |.....I.J.N.1:.S$|
00000DF0: 28 49 29 B2 22 2D 22 A7  49 B2 4E AB 31 3A 89 31  |(I)."-".I.N.1:.1|
00000E00: 33 31 00 18 16 82 00 53  24 28 49 29 B2 53 24 28  |31.....S$(I).S$(|
00000E10: 49 AA 31 29 3A 8D 32 31  00 2C 16 83 00 82 3A 53  |I.1):.21.,....:S|
00000E20: 24 28 4E 29 B2 22 2D 22  3A 89 34 35 00 3D 16 84  |$(N)."-":.45.=..|
00000E30: 00 8F 20 41 46 44 52 55  4B 4B 45 4E 2E 00 66 16  |.. AFDRUKKEN..f.|
00000E40: 85 00 99 22 93 48 41 52  44 20 43 4F 50 59 3F 20  |...".HARD COPY? |
00000E50: 59 2F 4E 11 22 3A 8D 31  38 3A 8B 20 41 24 B3 B1  |Y/N.":.18:. A$..|
00000E60: 22 59 22 A7 34 35 00 9B  16 86 00 99 22 11 12 45  |"Y".45......"..E|
00000E70: 4E 54 49 52 45 20 46 49  4C 45 3F 20 59 2F 4E 11  |NTIRE FILE? Y/N.|
00000E80: 22 3A 8D 31 38 3A 8B 20  41 24 B2 22 59 22 A7 46  |":.18:. A$."Y".F|
00000E90: B2 30 3A 4D B2 4E 3A 89  31 33 38 00 B0 16 87 00  |.0:M.N:.138.....|
00000EA0: 99 22 53 54 41 52 54 49  4E 47 22 4C 24 3A 8D 35  |."STARTING"L$:.5|
00000EB0: 00 CE 16 88 00 46 B2 C5  28 41 24 29 3A 8B 20 46  |.....F..(A$):. F|
00000EC0: B3 30 20 B0 20 46 B1 4E  20 A7 20 31 33 33 00 FA  |.0 . F.N . 133..|
00000ED0: 16 89 00 99 22 45 4E 44  49 4E 47 22 4C 24 3A 8D  |...."ENDING"L$:.|
00000EE0: 35 3A 4D B2 C5 28 41 24  29 3A 8B 4D B3 30 B0 4D  |5:M..(A$):.M.0.M|
00000EF0: B1 4E B0 4D B3 46 A7 31  33 33 00 03 17 8A 00 9F  |.N.M.F.133......|
00000F00: 34 2C 34 00 1C 17 8B 00  98 34 2C 22 20 20 20 20  |4,4......4,"    |
00000F10: 46 49 4C 45 3A 20 22 48  24 3A 98 34 00 40 17 8C  |FILE: "H$:.4.@..|
00000F20: 00 4C 4C B2 34 3A 81 49  B2 46 A4 4D 3A 8B C8 28  |.LL.4:.I.F.M:..(|
00000F30: 53 24 28 49 29 2C 31 29  B2 22 12 22 A7 31 34 33  |S$(I),1).".".143|
00000F40: 00 68 17 8D 00 8B 53 24  28 49 29 B3 B1 22 2D 22  |.h....S$(I).."-"|
00000F50: A7 20 98 34 2C 22 20 20  20 20 22 53 24 28 49 29  |. .4,"    "S$(I)|
00000F60: 3A 4C 4C B2 4C 4C AA 32  00 71 17 8E 00 89 31 34  |:LL.LL.2.q....14|
00000F70: 35 00 85 17 8F 00 98 34  2C 22 20 20 20 20 2A 22  |5......4,"    *"|
00000F80: 53 24 28 49 29 00 91 17  90 00 4C 4C B2 4C 4C AA  |S$(I).....LL.LL.|
00000F90: 34 00 9F 17 91 00 82 3A  A0 20 34 3A 89 34 35 00  |4......:. 4:.45.|
00000FA0: B8 17 92 00 8F 20 43 4F  52 52 45 43 54 49 45 20  |..... CORRECTIE |
00000FB0: 47 45 47 45 56 45 4E 2E  00 C8 17 93 00 8B 41 24  |GEGEVEN.......A$|
00000FC0: B2 22 41 22 A7 31 35 35  00 FD 17 94 00 41 24 B2  |."A".155.....A$.|
00000FD0: 22 2D 31 22 3A 99 22 11  11 52 45 43 54 49 46 59  |"-1":."..RECTIFY|
00000FE0: 22 4C 24 3A 8D 35 3A 4A  B2 C5 28 41 24 29 3A 8D  |"L$:.5:J..(A$):.|
00000FF0: 31 35 3A 8B 20 41 B3 B1  30 20 A7 34 35 00 24 18  |15:. A..0 .45.$.|
00001000: 95 00 8B 4A B3 30 20 B0  20 4A B1 B5 28 58 29 AC  |...J.0 . J..(X).|
00001010: 31 30 AA 31 20 A7 20 99  22 91 91 91 91 91 22 3A  |10.1 . .".....":|
00001020: 89 31 34 38 00 41 18 96  00 99 53 24 28 4A 29 3A  |.148.A....S$(J):|
00001030: 85 20 41 24 3A 8D 31 35  3A 8B 41 B3 B1 30 A7 34  |. A$:.15:.A..0.4|
00001040: 35 00 4E 18 97 00 53 24  28 4A 29 B2 41 24 00 80  |5.N...S$(J).A$..|
00001050: 18 98 00 8B C8 28 53 24  28 4A 29 2C 31 29 B2 22  |.....(S$(J),1)."|
00001060: 2A 22 A7 53 24 28 4A 29  B2 22 12 22 AA C9 28 53  |*".S$(J)."."..(S|
00001070: 24 28 4A 29 2C C3 28 53  24 28 4A 29 29 AB 31 29  |$(J),.(S$(J)).1)|
00001080: 00 89 18 99 00 89 20 34  35 00 9B 18 9A 00 8F 20  |...... 45...... |
00001090: 41 55 54 4F 20 45 4E 54  45 52 2E 00 CD 18 9B 00  |AUTO ENTER......|
000010A0: 41 24 B2 22 2D 31 22 3A  99 22 11 11 45 4E 54 45  |A$."-1":."..ENTE|
000010B0: 52 22 3B 4C 24 3A 8D 35  3A 4A B2 C5 28 41 24 29  |R";L$:.5:J..(A$)|
000010C0: 3A 8D 31 35 3A 8B 41 B3  B1 30 A7 34 35 00 F0 18  |:.15:.A..0.45...|
000010D0: 9C 00 8B 4A B3 30 B0 4A  B1 B5 28 58 29 AC 31 30  |...J.0.J..(X).10|
000010E0: AA 31 A7 99 22 91 91 91  91 91 22 3A 89 31 35 35  |.1..".....":.155|
000010F0: 00 13 19 9D 00 41 24 B2  22 22 3A 99 22 45 4E 54  |.....A$."":."ENT|
00001100: 52 59 22 3A 8D 35 3A 8D  31 35 3A 8B 41 B3 B1 30  |RY":.5:.15:.A..0|
00001110: A7 34 35 00 4E 19 9E 00  53 24 28 4A 29 B2 41 24  |.45.N...S$(J).A$|
00001120: 3A 8B C8 28 53 24 28 4A  29 2C 31 29 B2 22 2A 22  |:..(S$(J),1)."*"|
00001130: A7 53 24 28 4A 29 B2 22  12 22 AA C9 28 53 24 28  |.S$(J)."."..(S$(|
00001140: 4A 29 2C C3 28 53 24 28  4A 29 29 AB 31 29 00 5E  |J),.(S$(J)).1).^|
00001150: 19 9F 00 50 B2 B5 28 4A  AD 31 30 29 AA 31 00 92  |...P..(J.10).1..|
00001160: 19 A0 00 99 22 93 12 50  41 47 45 22 50 3B 48 24  |...."..PAGE"P;H$|
00001170: 3A 81 49 B2 30 A4 30 3A  4C B2 28 50 AB 31 29 AC  |:.I.0.0:L.(P.1).|
00001180: 31 30 AA 49 3A 99 22 9D  22 4C 3B 53 24 28 4C 29  |10.I:."."L;S$(L)|
00001190: 3A 82 00 AD 19 A1 00 4A  B2 4A AA 31 3A 8B 4A B1  |:......J.J.1:.J.|
000011A0: B5 28 58 29 AC 31 30 AB  31 A7 4A B2 30 00 CB 19  |.(X).10.1.J.0...|
000011B0: A2 00 99 22 11 11 45 4E  54 45 52 22 4C 24 3B 4A  |..."..ENTER"L$;J|
000011C0: 3A 41 24 B2 22 22 3A 89  31 35 37 00 E0 19 A3 00  |:A$."":.157.....|
000011D0: 8F 20 5A 4F 45 4B 20 47  45 47 45 56 45 4E 53 2E  |. ZOEK GEGEVENS.|
000011E0: 00 04 1A A4 00 99 22 11  11 47 45 54 20 45 4E 54  |......"..GET ENT|
000011F0: 52 59 22 3A 8D 35 3A 8D  20 31 35 3A 8B 41 B3 B1  |RY":.5:. 15:.A..|
00001200: 30 A7 34 35 00 2A 1A A5  00 8B C8 28 41 24 2C 31  |0.45.*.....(A$,1|
00001210: 29 B2 22 2A 22 A7 41 24  B2 22 12 22 AA C9 28 41  |)."*".A$."."..(A|
00001220: 24 2C C3 28 41 24 29 AB  31 29 00 4D 1A A6 00 54  |$,.(A$).1).M...T|
00001230: B2 AB 31 3A 81 49 B2 30  A4 4E 3A 8B 53 24 28 49  |..1:.I.0.N:.S$(I|
00001240: 29 B2 41 24 A7 20 54 B2  49 3A 49 B2 4E 00 53 1A  |).A$. T.I:I.N.S.|
00001250: A7 00 82 00 74 1A A8 00  8B 54 B2 AB 31 A7 99 22  |....t....T..1.."|
00001260: 11 12 4E 4F 54 20 46 4F  55 4E 44 22 3A 8D 31 38  |..NOT FOUND":.18|
00001270: 3A 89 34 35 00 88 1A A9  00 50 B2 B5 28 54 AD 31  |:.45.....P..(T.1|
00001280: 30 29 AA 31 3A 89 34 35  00 9C 1A AA 00 8F 20 41  |0).1:.45...... A|
00001290: 4C 46 41 42 45 54 49 53  45 45 52 2E 00 A9 1A AB  |LFABETISEER.....|
000012A0: 00 8F 20 4B 45 55 5A 45  2E 00 E6 1A AC 00 99 22  |.. KEUZE......."|
000012B0: 93 12 41 4C 50 48 41 42  45 54 49 5A 45 20 43 48  |..ALPHABETIZE CH|
000012C0: 41 50 54 45 52 20 45 4E  54 52 49 45 53 20 59 2F  |APTER ENTRIES Y/|
000012D0: 4E 3F 11 22 3A 8D 20 31  38 3A 8B 20 41 24 B2 22  |N?.":. 18:. A$."|
000012E0: 59 22 A7 31 39 31 00 F5  1A AD 00 8B 41 24 B2 22  |Y".191......A$."|
000012F0: 4E 22 A7 34 35 00 06 1B  AE 00 8F 20 50 45 52 20  |N".45...... PER |
00001300: 47 52 4F 45 50 2E 00 3C  1B AF 00 99 22 41 4C 50  |GROEP..<...."ALP|
00001310: 48 41 42 45 54 49 5A 45  20 53 54 41 52 54 49 4E  |HABETIZE STARTIN|
00001320: 47 22 4C 24 3A 8D 35 3A  55 B2 C5 28 41 24 29 3A  |G"L$:.5:U..(A$):|
00001330: 8D 31 35 3A 8B 41 B3 B1  30 A7 34 35 00 4C 1B B0  |.15:.A..0.45.L..|
00001340: 00 8B 55 B3 30 B0 55 B1  4E A7 33 38 00 68 1B B1  |..U.0.U.N.38.h..|
00001350: 00 8B CA 28 53 24 28 55  29 2C 31 2C 31 29 B2 22  |...(S$(U),1,1)."|
00001360: 12 22 A7 55 B2 55 AA 31  00 97 1B B2 00 81 20 49  |.".U.U.1...... I|
00001370: B2 4E 20 A4 20 30 20 A9  20 AB 31 3A 8B 20 53 24  |.N . 0 . .1:. S$|
00001380: 28 49 29 B3 B1 22 2D 22  A7 20 4B 4B B2 49 3A 49  |(I).."-". KK.I:I|
00001390: B2 30 3A 89 31 38 30 00  A0 1B B3 00 4B 4B B2 31  |.0:.180.....KK.1|
000013A0: 00 A6 1B B4 00 82 00 D8  1B B5 00 4B B2 30 3A 81  |...........K.0:.|
000013B0: 49 B2 55 A4 4B 4B 3A 8B  20 C8 28 53 24 28 49 29  |I.U.KK:. .(S$(I)|
000013C0: 29 2C 31 29 B2 22 12 22  A7 4B B2 31 3A 4E 4E B2  |),1).".".K.1:NN.|
000013D0: 49 AB 31 3A 49 B2 4B 4B  00 E7 1B B6 00 82 3A 8B  |I.1:I.KK......:.|
000013E0: 4B B2 31 A7 31 38 34 00  F1 1B B7 00 4E 4E B2 4B  |K.1.184.....NN.K|
000013F0: 4B 00 F9 1B B8 00 49 B2  30 00 0F 1C B9 00 4A B2  |K.....I.0.....J.|
00001400: 55 3A 8B 20 49 B2 4E 4E  AB 55 20 A7 20 34 35 00  |U:. I.NN.U . 45.|
00001410: 22 1C BA 00 8B 20 4A B2  4E 4E AB 49 20 A7 20 31  |".... J.NN.I . 1|
00001420: 38 39 00 5A 1C BB 00 8B  53 24 28 4A 29 B1 53 24  |89.Z....S$(J).S$|
00001430: 28 4A AA 31 29 A7 20 54  50 24 B2 53 24 28 4A 29  |(J.1). TP$.S$(J)|
00001440: 3A 53 24 28 4A 29 B2 53  24 28 4A AA 31 29 3A 53  |:S$(J).S$(J.1):S|
00001450: 24 28 4A AA 31 29 B2 54  50 24 00 69 1C BC 00 4A  |$(J.1).TP$.i...J|
00001460: B2 4A AA 31 3A 89 31 38  36 00 78 1C BD 00 49 B2  |.J.1:.186.x...I.|
00001470: 49 AA 31 3A 89 31 38 35  00 94 1C BE 00 8F 20 53  |I.1:.185...... S|
00001480: 4F 52 54 45 45 52 20 48  4F 4F 46 44 47 52 4F 45  |ORTEER HOOFDGROE|
00001490: 50 45 4E 2E 00 B4 1C BF  00 99 22 93 11 22 A6 39  |PEN......."..".9|
000014A0: 29 22 12 20 20 20 20 20  2A 20 57 41 52 4E 49 4E  |)".     * WARNIN|
000014B0: 47 20 2A 22 00 D3 1C C0  00 99 A6 39 29 22 12 20  |G *".......9)". |
000014C0: 20 20 54 48 49 53 20 43  41 4E 20 54 41 4B 45 20  |  THIS CAN TAKE |
000014D0: 41 92 22 00 F2 1C C1 00  99 A6 39 29 22 12 20 20  |A.".......9)".  |
000014E0: 20 56 45 52 59 20 4C 4F  4E 47 20 54 49 4D 45 21  | VERY LONG TIME!|
000014F0: 92 22 00 FC 1C C2 00 99  3A 49 B2 4E 00 17 1D C3  |."......:I.N....|
00001500: 00 8B 53 24 28 49 29 B2  22 2D 22 A7 20 49 B2 49  |..S$(I)."-". I.I|
00001510: AB 31 3A 89 31 39 35 00  37 1D C4 00 45 46 B2 49  |.1:.195.7...EF.I|
00001520: AA 31 3A 53 24 28 45 46  29 B2 22 12 5A 5A 5A 5A  |.1:S$(EF).".ZZZZ|
00001530: 5A 5A 5A 5A 5A 5A 22 00  54 1D C5 00 49 B2 30 3A  |ZZZZZZ".T...I.0:|
00001540: 4A B2 30 3A 57 24 B2 22  12 5A 5A 5A 5A 5A 5A 5A  |J.0:W$.".ZZZZZZZ|
00001550: 5A 5A 5A 22 00 85 1D C6  00 8F 20 5A 4F 45 4B 20  |ZZZ"...... ZOEK |
00001560: 4B 4C 45 49 4E 53 54 45  20 4E 49 45 54 20 47 45  |KLEINSTE NIET GE|
00001570: 53 4F 52 54 45 45 52 44  45 20 48 4F 4F 46 44 47  |SORTEERDE HOOFDG|
00001580: 52 4F 45 50 2E 00 A5 1D  C7 00 8B 20 C6 28 53 24  |ROEP....... .(S$|
00001590: 28 49 29 29 B3 B1 31 38  20 A7 20 49 B2 49 AA 31  |(I))..18 . I.I.1|
000015A0: 3A 89 31 39 39 00 B6 1D  C8 00 8B 20 49 B2 45 46  |:.199...... I.EF|
000015B0: 20 A7 20 32 32 30 00 CD  1D C9 00 57 24 B2 53 24  | . 220.....W$.S$|
000015C0: 28 49 29 3A 54 B2 49 3A  49 B2 49 AA 31 00 ED 1D  |(I):T.I:I.I.1...|
000015D0: CA 00 8B 20 C6 28 53 24  28 49 29 29 B3 B1 31 38  |... .(S$(I))..18|
000015E0: 20 A7 20 49 B2 49 AA 31  3A 89 32 30 32 00 0B 1E  | . I.I.1:.202...|
000015F0: CB 00 8B 20 53 24 28 49  29 B3 57 24 20 A7 20 57  |... S$(I).W$ . W|
00001600: 24 B2 53 24 28 49 29 3A  54 B2 49 00 23 1E CC 00  |$.S$(I):T.I.#...|
00001610: 8B 20 49 B2 45 46 20 A7  20 99 20 57 24 3A 89 20  |. I.EF . . W$:. |
00001620: 32 30 36 00 32 1E CD 00  49 B2 49 AA 31 3A 89 32  |206.2...I.I.1:.2|
00001630: 30 32 00 46 1E CE 00 8B  20 57 24 B3 B1 53 24 28  |02.F.... W$..S$(|
00001640: 4A 29 A7 32 31 30 00 63  1E CF 00 4A B2 4A AA 31  |J).210.c...J.J.1|
00001650: 3A 8B 20 C6 28 53 24 28  4A 29 29 B3 B1 31 38 A7  |:. .(S$(J))..18.|
00001660: 32 30 37 00 70 1E D0 00  49 B2 4A 3A 89 32 30 30  |207.p...I.J:.200|
00001670: 00 8F 1E D1 00 8F 20 4B  49 4C 4C 20 48 4F 4F 46  |...... KILL HOOF|
00001680: 44 47 52 4F 45 50 20 52  45 47 45 4C 20 54 2E 00  |DGROEP REGEL T..|
00001690: B0 1E D2 00 81 20 44 B2  54 20 A4 20 45 46 AB 31  |..... D.T . EF.1|
000016A0: 3A 53 24 28 44 29 B2 53  24 28 44 AA 31 29 3A 82  |:S$(D).S$(D.1):.|
000016B0: 00 D4 1E D3 00 8F 20 49  4E 53 45 52 54 20 48 4F  |...... INSERT HO|
000016C0: 4F 46 44 47 52 4F 45 50  20 4F 50 20 52 45 47 45  |OFDGROEP OP REGE|
000016D0: 4C 20 4A 2E 00 03 1F D4  00 81 20 44 B2 45 46 20  |L J....... D.EF |
000016E0: A4 20 4A AA 31 20 A9 20  AB 31 3A 53 24 28 44 29  |. J.1 . .1:S$(D)|
000016F0: B2 53 24 28 44 AB 31 29  3A 82 3A 53 24 28 4A 29  |.S$(D.1):.:S$(J)|
00001700: B2 57 24 00 24 1F D5 00  57 24 B2 22 12 5A 5A 5A  |.W$.$...W$.".ZZZ|
00001710: 5A 5A 5A 5A 5A 5A 5A 22  3A 49 B2 54 AA 31 3A 4A  |ZZZZZZZ":I.T.1:J|
00001720: B2 4A AA 31 00 4F 1F D6  00 8F 20 4F 56 45 52 42  |.J.1.O.... OVERB|
00001730: 52 45 4E 47 45 4E 20 4F  4E 44 45 52 44 45 4C 45  |RENGEN ONDERDELE|
00001740: 4E 20 48 4F 4F 46 44 47  52 4F 45 50 45 4E 2E 00  |N HOOFDGROEPEN..|
00001750: 6C 1F D7 00 8B 20 C6 28  53 24 28 49 29 29 B2 31  |l.... .(S$(I)).1|
00001760: 38 20 A7 20 49 B2 4A 3A  89 32 30 30 00 7A 1F D8  |8 . I.J:.200.z..|
00001770: 00 54 50 24 B2 53 24 28  49 29 00 9B 1F D9 00 81  |.TP$.S$(I)......|
00001780: 20 44 B2 49 20 A4 20 45  46 AB 31 3A 53 24 28 44  | D.I . EF.1:S$(D|
00001790: 29 B2 53 24 28 44 AA 31  29 3A 82 00 CB 1F DA 00  |).S$(D.1):......|
000017A0: 81 20 44 B2 45 46 20 A4  20 4A AA 31 20 A9 20 AB  |. D.EF . J.1 . .|
000017B0: 31 3A 53 24 28 44 29 B2  53 24 28 44 AB 31 29 3A  |1:S$(D).S$(D.1):|
000017C0: 82 3A 53 24 28 4A 29 B2  54 50 24 00 E1 1F DB 00  |.:S$(J).TP$.....|
000017D0: 49 B2 49 AA 31 3A 4A B2  4A AA 31 3A 89 20 32 31  |I.I.1:J.J.1:. 21|
000017E0: 35 00 F4 1F DC 00 53 24  28 45 46 29 B2 22 2D 22  |5.....S$(EF)."-"|
000017F0: 3A 89 34 35 00 0F 20 DD  00 99 22 12 22 4E 24 22  |:.45.. ..."."N$"|
00001800: 20 4E 4F 54 20 46 4F 55  4E 44 22 3A 8D 31 38 00  | NOT FOUND":.18.|
00001810: 1C 20 DE 00 A0 20 4A 3A  89 20 34 35 00 00 00     |. ... J:. 45... |

....... NAAR HOOFDPROGRAMMA..H....53280,
0:.53281,0:.G(30):.G(14)G(8):.26.[.... S
UBROUTINES..N.... GET ROUTINE......A$.""
:I.0:.".";......G$:.G$."".6.J....G$.G(14
8).G$.G(17).G$.G(29).G$.G(157).G$.G(145)
.6......G$.G(20).A$."".6......G$.G(20)..
G(20)G(20)"";:I.I.1:A$.H(A$,I):.6.<....G
$..G(13).A$.A$.G$:I.I.1:."."G$"";:.6.R..
..G$.G(13).A$."":..^....". ":..T.... FUN
CTIE KIEZEN.......".."Q$"...":.18.....A.
0:.I.1.15:.J(K$,I.2.1,1).A$. A.I:I.17:..
.....I:..S.... WELKE TOETS.......A$:.A$.
"".18............. ENTRYNUMMER IN BEWERK
ING.......".".35);I:..+.... FILTER..J...
.".ARE YOU SURE?Y/N":.18:..`.... HOOFDPR
OGRAMMA..U.... INITIALISEREN.......".".1
1)G(142)". D A T A B A S E ":..11)". *JU
ST A MOMENT.*".....H$."C.B.M.":Q$.".YOUR
 CHOICE   ? = HELP ".....N..((.(0).(.(0)
.0).65536).40):P.1:X.(N.1).10:N.10..(X).
7....S$(N.1):L$." LINE".N....J.0.N:S$(J)
."-":..O....". ".(X)"PAGES":.N"ENTRIES".
.. .K$."C,P,E,I,N,S,L,H,K,A,?,R,F,D,G":.
38...!... HOOFDGROEPEN....".K.0...#.Q.0:
."..CHAPTER CONTENTS FILE: ";H$:."PAGE".
".$..J.K.N:.F(S$(J)).18..".".(J.10.1);S$
(J):Q.Q.1:.Q.19.38.(.%...8.&..14:.A.0.38
.U.'.. A . 34,43,155,54,69,87,93,133,127
,172,73,147,51,73,164...(..J.N.1.K.J:.35
...)..34...*.. BLADZIJDE..N.+.A$."-":.".
.PAGE":.5:P.E(A$):.15:.A..0.39...,..P.1.
P..(X)..".....":.43...-.."..PAGE"P;H$:.I
.0.9:L.(P.1).10.I:."."L;S$(L):../....14:
.A.0.46.=./..A..16.39.P.0.P.P.1:.P.X.P.1
.X.1..45.L.2.. BESTANDSNAAM....3..".FILE
NAME":.5:H$.A$...4..45...5.. INVOEGEN..P
.6.A$."-1":."..INSERT"L$:.5:J.E(A$):.15:
.A..0.45...7..J.0.J..(X).10.1..".....":.
54...8.A$."":."ENTRY":.5:.15:.A..0.45...
9.."INSERTING":.R.N.45.Q.:..I.J.N:.S$(I)
."-".KK.I:I.N:.60.Z.;.KK.I.B.<.. I...=..
I.KK.J.1..1:S$(I).S$(I.1):.21:.:S$(J).A$
.B.>..H(S$(J),1)."*".S$(J).".".I(S$(J),C
(S$(J)).1).R.?.P..(J.10).1...@.."..PAGE"
P;H$:.I.0 . 9:L.(P.1).10.I:."."L;S$(L):.
.%.A.J.J.1:.J..(X).10.1 . J.0.D.B.."..IN
SERT";L$;J:A$."":.56.L.C..45.A.D.. NIEUW
 BESTAND..{.E.."..":.23:.A$.."Y".45...F.
.".NEW FILE NAME":.5:H$.A$...G..J.0.N:S$
(J)."-":.:.45.A.H.. MENU..X.I.."..".15)"
M E N U"...J..".P.AGE".23)".N.EW FILE"./
.K..:.".C.HAPTER".23);:.".F.ILE NAME":.:
.".G.ET ENTRY";.E.L...23):.".K.ILL"L$.].
M..:.".E.NTER"L$;.23)...N..".H.ARD COPY"
:.:.".A.LPHABETIZE".23);...O..".I.NSERT"
L$:.:.".R.ECTIFY"L$.23);...P..".D.EFINIT
IONS":.:.".S.AVE TO TAPE OR DISK"...Q..:
.".L.OAD FROM TAPE OR DISK"...R..:.Q$...
S..18:.".":.15.,.T.. A.0. 73.4.U..39.E.V
.. SAVE-INFO..D.W.."..SAVE.":.23:. A.."Y
".45...X.."..DISC OR TAPE? D/T":.18:. A$
."T".91...Y..A$.."D".45.U.Z..15,8,15,"I"
: 15:.2,8,2,"@0:".H$." ,S,W":J.2:.100...
[..:. 1,1,1,H$:J.1:.100...\.. LOAD INFO.
. .].."..LOAD..":.23:.A$.."Y".45.K.^..".
.DISC OR TAPE? D/T":.18:. A$."T".98.[._.
.A$.."D".45...`..108:.".FILE NAME?!":.5:
N$.A$:. N$."".45...A..15,8,15,"I": 15:.2
,8,2,"0:".N$." ,S,R":J.2:.104.U.B.. 1,1,
0,H$:J.1:.104...C.. SAVE/LOAD VERVOLG...
.D..I.N.0..1:K.I:.S$.."-".I.0...E..:K.K.
1.7.F..J,H$." .":.J,K:. I.0 . K.R.G..J,S
$(I):.21:.:  J:.45.P.H..J,N$:. I(N$,2)..
" .".221...I.H$.N$:H$.H(H$,C(H$).2):."..
FOUND "H$:.J,K.B.J..I.0 . K:.J,S$(I):.21
:.:  J:.45...K.. OVERZICHT DISK-FILES...
.L.."..DISC FILE LISTING? Y/N":.18:.A$..
"Y" . ..'.M.."..SCANNING DISC.".7.N..1,8
,0,"$0".E.O..#1,A$,B$.S.P..#1,A$,B$.A.Q.
.#1,A$,B$.I.R.C.0.}.S..A$.."".C.F(A$)...
T..B$.."".C.C.F(B$).256...U.D$.D$.".".J(
D(C),2).".".P.V..#1,B$:. ST..0 .   1:.:.
...W..B$..G(34).118...X..#1,B$:.B$..G(34
).D$.D$.B$:.120. .Y..#1,B$:.B$.G(32).121
.*.Z.C$."".M.{.C$.C$.B$:.#1,B$:. B$.."" 
. 123.A.|..I(D$,1).""..D$.P.}.D$."":.112
...~.. VERWIJDER GEGEVENS.....A$."-1":.
"..KILL"L$:.5:J.E(A$):.15:. A..0.45.....
.J.0.J..(X).10.1. .".....":.127......I.J
.N.1:.S$(I)."-".I.N.1:.131.....S$(I).S$(
I.1):.21.,....:S$(N)."-":.45.=.... AFDRU
KKEN..F....".HARD COPY? Y/N.":.18:. A$..
"Y".45......"..ENTIRE FILE? Y/N.":.18:. 
A$."Y".F.0:M.N:.138......"STARTING"L$:.5
.N...F.E(A$):. F.0 . F.N . 133......"END
ING"L$:.5:M.E(A$):.M.0.M.N.M.F.133......
4,4......4,"    FILE: "H$:.4.@...LL.4:.I
.F.M:.H(S$(I),1).".".143.H....S$(I).."-"
. .4,"    "S$(I):LL.LL.2.Q....145......4
,"    *"S$(I).....LL.LL.4......:  4:.45.
..... CORRECTIE GEGEVEN..H....A$."A".155
.....A$."-1":."..RECTIFY"L$:.5:J.E(A$):.
15:. A..0 .45.$....J.0 . J..(X).10.1 . .
".....":.148.A....S$(J):. A$:.15:.A..0.4
5.N...S$(J).A$......H(S$(J),1)."*".S$(J)
.".".I(S$(J),C(S$(J)).1)...... 45...... 
AUTO ENTER..M...A$."-1":."..ENTER";L$:.5
:J.E(A$):.15:.A..0.45......J.0.J..(X).10
.1..".....":.155.....A$."":."ENTRY":.5:.
15:.A..0.45.N...S$(J).A$:.H(S$(J),1)."*"
.S$(J).".".I(S$(J),C(S$(J)).1).^...P..(J
.10).1... .."..PAGE"P;H$:.I.0.0:L.(P.1).
10.I:."."L;S$(L):......J.J.1:.J..(X).10.
1.J.0.K...."..ENTER"L$;J:A$."":.157.....
. ZOEK GEGEVENS......."..GET ENTRY":.5:.
 15:.A..0.45.*....H(A$,1)."*".A$.".".I(A
$,C(A$).1).M...T..1:.I.0.N:.S$(I).A$. T.
I:I.N.S.....T....T..1.."..NOT FOUND":.18
:.45.....P..(T.10).1:.45...... ALFABETIS
EER....... KEUZE......."..ALPHABETIZE CH
APTER ENTRIES Y/N?.":. 18:. A$."Y".191..
....A$."N".45...... PER GROEP..<...."ALP
HABETIZE STARTING"L$:.5:U.E(A$):.15:.A..
0.45.L....U.0.U.N.38.H....J(S$(U),1,1)."
.".U.U.1...... I.N . 0 . .1:. S$(I).."-"
. KK.I:I.0:.180. ...KK.1.......X...K.0:.
I.U.KK:. H(S$(I)),1).".".K.1:NN.I.1:I.KK
......:.K.1.184.....NN.KK.....I.0.....J.
U:. I.NN.U . 45.".... J.NN.I . 189.Z....
S$(J).S$(J.1). TP$.S$(J):S$(J).S$(J.1):S
$(J.1).TP$.I...J.J.1:.186.X...I.I.1:.185
...... SORTEER HOOFDGROEPEN......."..".9
)".     * WARNING *".S.....9)".   THIS C
AN TAKE A."...A...9)".   VERY LONG TIME!
."...B..:I.N...C..S$(I)."-". I.I.1:.195.
7.D.EF.I.1:S$(EF).".ZZZZZZZZZZ".T.E.I.0:
J.0:W$.".ZZZZZZZZZZ"...F.. ZOEK KLEINSTE
 NIET GESORTEERDE HOOFDGROEP....G.. F(S$
(I))..18 . I.I.1:.199...H.. I.EF . 220.M
.I.W$.S$(I):T.I:I.I.1...J.. F(S$(I))..18
 . I.I.1:.202...K.. S$(I).W$ . W$.S$(I):
T.I.#.L.. I.EF . . W$:. 206.2.M.I.I.1:.2
02.F.N.. W$..S$(J).210.C.O.J.J.1:. F(S$(
J))..18.207.P.P.I.J:.200...Q.. KILL HOOF
DGROEP REGEL T....R.. D.T . EF.1:S$(D).S
$(D.1):..T.S.. INSERT HOOFDGROEP OP REGE
L J....T.. D.EF . J.1 . .1:S$(D).S$(D.1)
:.:S$(J).W$.$.U.W$.".ZZZZZZZZZZ":I.T.1:J
.J.1.O.V.. OVERBRENGEN ONDERDELEN HOOFDG
ROEPEN..L.W.. F(S$(I)).18 . I.J:.200.Z.X
.TP$.S$(I)...Y.. D.I . EF.1:S$(D).S$(D.1
):..K.Z.. D.EF . J.1 . .1:S$(D).S$(D.1):
.:S$(J).TP$.....I.I.1:J.J.1:. 215.....S$
(EF)."-":.45.. ..."."N$" NOT FOUND":.18.
. ..  J:. 45...

×

C64 Image

> CLICK IMAGE PREVIEW FOR FULL MODAL