DISKAT
FILE INFORMATION
FILENAME(S): DISKAT
FILE TYPE(S): PRG
FILE SIZE: 13.2K
FIRST SEEN: 2025-11-30 21:05:18
APPEARS ON: 2 disk(s)
FILE HASH
f8e7a4f42579c45bb7cf71ab420c38e685351b23b3ba9064d43a3eb6c47dd998
FOUND ON DISKS (2 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| BURGERS | DISKAT | PRG | DuncanTwain | 2 | 3 | DOWNLOAD FILE |
| C64 SPEL 74 1 | DISKAT | PRG | DuncanTwain | 17 | 0 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 26 08 0A 00 97 35 33 32 38 30 2C 37 3A 97 |..&....53280,7:.|
00000010: 35 33 32 38 31 2C 37 3A 97 35 33 32 37 32 2C 32 |53281,7:.53272,2|
00000020: 31 3A 89 37 39 30 00 36 08 14 00 8F 20 20 53 55 |1:.790.6.... SU|
00000030: 42 52 64 7F 49 4E 00 61 08 1E 00 86 44 4C 28 31 |BRd.IN.a....DL(1|
00000040: 34 35 29 3A 86 44 4E 24 28 31 34 35 29 3A 86 44 |45):.DN$(145):.D|
00000050: 53 24 28 31 34 35 29 3A 86 51 32 24 28 31 34 35 |S$(145):.Q2$(145|
00000060: 29 00 75 08 28 00 49 B2 31 3A 9F 31 2C 38 2C 30 |).u.(.I.1:.1,8,0|
00000070: 2C 22 24 30 22 00 83 08 32 00 A1 23 31 2C 41 24 |,"$0"...2..#1,A$|
00000080: 2C 41 24 00 93 08 3C 00 8F 20 20 53 55 42 52 64 |,A$...<.. SUBRd|
00000090: 7F 49 4E 00 A1 08 46 00 A1 23 31 2C 41 24 2C 41 |.IN...F..#1,A$,A|
000000A0: 24 00 D1 08 50 00 8B 41 24 B2 22 22 A7 A0 31 3A |$...P..A$.""..1:|
000000B0: 49 B2 49 AB 31 3A 8B 50 52 B3 B1 31 A7 5D 99 A3 |I.I.1:.PR..1.]..|
000000C0: 31 31 29 22 91 42 4C 4F 43 4B 53 20 46 52 45 45 |11)".BLOCKS FREE|
000000D0: 22 00 DE 08 5A 00 8B 41 24 B2 22 22 A7 8E 00 EC |"...Z..A$.""....|
000000E0: 08 64 00 A1 23 31 2C 41 24 2C 42 24 00 10 09 6E |.d..#1,A$,B$...n|
000000F0: 00 44 4C 28 49 29 B2 C6 28 41 24 AA C7 28 30 29 |.DL(I)..(A$..(0)|
00000100: 29 AA C6 28 42 24 AA C7 28 30 29 29 AC 32 35 36 |)..(B$..(0)).256|
00000110: 00 1D 09 82 00 81 5A B2 31 A4 31 30 30 00 28 09 |......Z.1.100.(.|
00000120: 8C 00 A1 23 31 2C 41 24 00 41 09 96 00 8B 41 24 |...#1,A$.A....A$|
00000130: B2 22 22 A7 5A B2 31 30 30 3A 82 5A 3A 89 32 32 |."".Z.100:.Z:.22|
00000140: 30 00 5A 09 A0 00 8B C6 28 41 24 29 B2 33 34 AF |0.Z.....(A$).34.|
00000150: 42 B2 30 A7 42 B2 31 3A 82 5A 00 74 09 AA 00 8B |B.0.B.1:.Z.t....|
00000160: C6 28 41 24 29 B2 33 34 AF 42 B2 31 A7 42 B2 30 |.(A$).34.B.1.B.0|
00000170: 3A 43 B2 31 00 88 09 B4 00 8B 42 B2 31 A7 44 4E |:C.1......B.1.DN|
00000180: 24 B2 44 4E 24 AA 41 24 00 B6 09 BE 00 8B C6 28 |$.DN$.A$.......(|
00000190: 41 24 29 B3 B1 33 32 AF C6 28 41 24 29 B3 B1 33 |A$)..32..(A$)..3|
000001A0: 34 AF 43 B2 31 A7 44 53 24 28 49 29 B2 41 24 3A |4.C.1.DS$(I).A$:|
000001B0: 43 B2 32 3A 82 5A 00 EC 09 C8 00 8B C6 28 41 24 |C.2:.Z.......(A$|
000001C0: 29 B3 B1 33 32 AF C6 28 41 24 29 B3 B1 33 34 AF |)..32..(A$)..34.|
000001D0: 43 B2 32 AF 49 B2 31 A7 44 53 24 28 49 29 B2 44 |C.2.I.1.DS$(I).D|
000001E0: 53 24 28 49 29 AA 41 24 3A 43 B2 30 00 F3 09 D2 |S$(I).A$:C.0....|
000001F0: 00 82 5A 00 03 0A DC 00 8F 20 20 53 55 42 52 64 |..Z...... SUBRd|
00000200: 7F 49 4E 00 24 0A E6 00 44 4E 24 28 49 29 B2 44 |.IN.$...DN$(I).D|
00000210: 4E 24 3A 44 4E 24 B2 22 22 3A 58 B2 28 49 AB 31 |N$:DN$."":X.(I.1|
00000220: 29 AD 31 32 00 33 0A F0 00 8B 50 52 B2 31 A7 89 |).12.3....PR.1..|
00000230: 33 31 30 00 4D 0A FA 00 8B 28 58 AB B5 28 58 29 |310.M....(X..(X)|
00000240: 29 B2 30 A7 99 22 93 22 3A 8D 33 38 30 00 62 0A |).0..".":.380.b.|
00000250: 04 01 8B 28 58 AB B5 28 58 29 29 B2 30 A7 8D 34 |...(X..(X)).0..4|
00000260: 31 30 00 93 0A 0E 01 8B 28 58 AB B5 28 58 29 29 |10......(X..(X))|
00000270: B2 30 A7 99 22 13 11 11 11 11 11 11 11 11 11 12 |.0.."...........|
00000280: 22 3B A3 31 31 29 3B 44 4E 24 28 31 29 3B A3 32 |";.11);DN$(1);.2|
00000290: 38 29 3B 00 C0 0A 18 01 8B 28 58 AB B5 28 58 29 |8);......(X..(X)|
000002A0: 29 B2 30 A7 99 22 12 22 3B 44 53 24 28 31 29 3A |).0..".";DS$(1):|
000002B0: 99 3A 8B 49 B2 31 A7 49 B2 49 AA 31 3A 89 36 30 |.:.I.1.I.I.1:.60|
000002C0: 00 F4 0A 22 01 99 22 12 20 20 20 20 9D 9D 9D 9D |..."..". ....|
000002D0: 22 3B 49 AB 31 3B 22 92 22 3B A3 34 29 3B 44 4C |";I.1;".";.4);DL|
000002E0: 28 49 29 3B A3 39 29 3B 22 DD 20 22 3B 44 4E 24 |(I);.9);". ";DN$|
000002F0: 28 49 29 3B 00 09 0B 2C 01 99 A3 32 38 29 3B 22 |(I);...,...28);"|
00000300: 12 22 3B 44 53 24 28 49 29 00 19 0B 36 01 8F 20 |.";DS$(I)...6.. |
00000310: 20 53 55 42 52 64 7F 49 4E 00 27 0B 40 01 49 B2 | SUBRd.IN.'.@.I.|
00000320: 49 AA 31 3A 89 36 30 00 37 0B 4A 01 8F 20 20 53 |I.1:.60.7.J.. S|
00000330: 55 42 52 64 7F 49 4E 00 6A 0B 54 01 99 22 93 12 |UBRd.IN.j.T.."..|
00000340: 1C 20 20 20 20 20 20 20 20 20 44 49 53 4B 45 54 |. DISKET|
00000350: 54 45 20 20 20 20 4B 41 54 41 4C 4F 47 55 53 20 |TE KATALOGUS |
00000360: 20 20 20 20 20 20 20 20 92 22 00 79 0B 5E 01 59 | .".y.^.Y|
00000370: B2 32 33 3A 8D 31 34 35 30 00 94 0B 68 01 99 A3 |.23:.1450...h...|
00000380: 32 34 29 22 3C 43 3E 20 47 2E 56 41 4E 20 47 49 |24)"<C> G.VAN GI|
00000390: 4C 53 13 22 00 9A 0B 72 01 8E 00 AA 0B 7C 01 8F |LS."...r.....|..|
000003A0: 20 20 53 55 42 52 64 7F 49 4E 00 DD 0B 86 01 99 | SUBRd.IN......|
000003B0: 22 93 12 1C 20 20 20 20 20 20 20 20 20 44 49 53 |"... DIS|
000003C0: 4B 45 54 54 45 20 20 20 20 4B 41 54 41 4C 4F 47 |KETTE KATALOG|
000003D0: 55 53 20 20 20 20 20 20 20 20 20 92 22 00 E3 0B |US ."...|
000003E0: 90 01 8E 00 F3 0B 9A 01 8F 20 20 53 55 42 52 64 |......... SUBRd|
000003F0: 7F 49 4E 00 27 0C A4 01 99 22 13 11 98 12 20 20 |.IN.'....".... |
00000400: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000410: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000420: 20 20 20 20 20 92 22 00 61 0C AE 01 81 58 B2 31 | .".a....X.1|
00000430: A4 36 3A 99 22 12 20 20 20 20 20 20 20 20 20 20 |.6:.". |
00000440: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000450: 20 20 20 20 20 20 20 20 20 20 20 20 20 92 22 3A | .":|
00000460: 82 00 6C 0C B8 01 99 22 13 11 1C 22 00 8F 0C C2 |..l...."..."....|
00000470: 01 99 A3 38 29 22 12 B0 C0 C0 C9 20 D1 20 D5 C0 |...8)"..... . ..|
00000480: 20 20 B2 20 C0 20 D5 C0 C9 B0 C0 B2 C0 AE 22 00 | . . ........".|
00000490: B2 0C CC 01 99 A3 38 29 22 12 C2 20 20 C2 20 C2 |......8)".. . .|
000004A0: 20 C2 20 20 20 C2 CE 20 20 C2 20 C2 20 20 C2 20 | . .. . . . |
000004B0: 20 22 00 D5 0C D6 01 99 A3 38 29 22 12 C2 20 20 | ".......8)".. |
000004C0: C2 20 C2 20 CA C0 C9 20 AB 20 20 20 C2 C0 C2 20 |. . ... . ... |
000004D0: 20 C2 20 20 22 00 F8 0C E0 01 99 A3 38 29 22 12 | . ".......8)".|
000004E0: C2 20 20 C2 20 C2 20 20 20 C2 20 C2 CD 20 20 C2 |. . . . .. .|
000004F0: 20 C2 20 20 C2 20 20 22 00 1B 0D EA 01 99 A3 38 | . . ".......8|
00000500: 29 22 12 AD C0 C0 CB 20 B1 20 C0 C0 CB 20 B1 20 |)"..... . ... . |
00000510: C0 20 B1 20 B1 20 20 B1 20 20 22 00 21 0D F4 01 |. . . . ".!...|
00000520: 8E 00 31 0D FE 01 8F 20 20 53 55 42 52 64 7F 49 |..1.... SUBRd.I|
00000530: 4E 00 3A 0D 08 02 8D 33 33 30 00 43 0D 12 02 8D |N.:....330.C....|
00000540: 34 31 30 00 53 0D 1C 02 99 22 13 11 11 11 11 11 |410.S...."......|
00000550: 11 11 22 00 66 0D 26 02 99 22 05 12 20 20 20 20 |..".f.&..".. |
00000560: 20 20 20 20 92 22 00 79 0D 30 02 99 20 22 12 20 | .".y.0.. ". |
00000570: 4D 45 4E 55 20 30 20 92 22 00 8C 0D 3A 02 99 20 |MENU 0 ."...:.. |
00000580: 22 12 20 20 20 20 20 20 20 20 92 22 00 BC 0D 44 |". ."...D|
00000590: 02 99 22 1E B0 C0 C0 C0 B2 C0 C0 C0 C0 C0 C0 C0 |..".............|
000005A0: C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 |................|
000005B0: C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 AE 22 00 ED 0D 4E |..........."...N|
000005C0: 02 99 22 C2 12 20 31 20 92 C2 20 49 4E 56 4F 45 |..".. 1 .. INVOE|
000005D0: 52 45 4E 20 47 45 47 45 56 45 4E 53 20 20 20 20 |REN GEGEVENS |
000005E0: 20 20 20 20 20 20 20 20 20 20 20 C2 22 00 1E 0E | ."...|
000005F0: 58 02 99 22 C2 12 20 32 20 92 C2 20 4F 50 56 52 |X..".. 2 .. OPVR|
00000600: 41 47 45 4E 20 47 45 47 45 56 45 4E 53 20 20 20 |AGEN GEGEVENS |
00000610: 20 20 20 20 20 20 20 20 20 20 20 20 C2 22 00 4F | .".O|
00000620: 0E 62 02 99 22 C2 12 20 33 20 92 C2 20 49 4E 56 |.b..".. 3 .. INV|
00000630: 4F 45 52 20 4E 41 41 4D 2F 41 44 52 45 53 2B 49 |OER NAAM/ADRES+I|
00000640: 4E 49 54 49 41 4C 49 53 41 54 49 45 20 C2 22 00 |NITIALISATIE .".|
00000650: 7E 0E 6C 02 99 22 AB C0 C0 C0 DB C0 C0 C0 C0 C0 |~.l.."..........|
00000660: C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 |................|
00000670: C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 B3 22 00 AF |............."..|
00000680: 0E 76 02 99 22 C2 12 20 45 20 92 C2 20 45 49 4E |.v..".. E .. EIN|
00000690: 44 45 20 20 20 20 20 20 20 20 20 20 20 20 20 20 |DE |
000006A0: 20 20 20 20 20 20 20 20 20 20 20 20 20 C2 22 00 | .".|
000006B0: E0 0E 80 02 99 22 C2 12 20 48 20 92 C2 20 48 45 |.....".. H .. HE|
000006C0: 4C 50 20 20 20 20 20 20 20 20 20 20 20 20 20 20 |LP |
000006D0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 C2 22 | ."|
000006E0: 00 0F 0F 8A 02 99 22 AD C0 C0 C0 B1 C0 C0 C0 C0 |......".........|
000006F0: C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 |................|
00000700: C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 BD 22 00 |..............".|
00000710: 2E 0F 94 02 85 22 11 11 12 55 57 20 4B 45 55 5A |....."...UW KEUZ|
00000720: 45 20 53 2E 56 2E 50 2E 92 22 3B 51 31 24 00 51 |E S.V.P..";Q1$.Q|
00000730: 0F 9E 02 8B 51 31 24 B2 22 31 22 A7 51 24 B2 22 |....Q1$."1".Q$."|
00000740: 4D 45 4E 55 20 49 4E 56 4F 45 52 22 3A 89 37 33 |MENU INVOER":.73|
00000750: 30 00 65 0F A8 02 8B 51 31 24 B2 22 32 22 A7 9C |0.e....Q1$."2"..|
00000760: 3A 89 37 39 30 00 88 0F B2 02 8B 51 31 24 B2 22 |:.790......Q1$."|
00000770: 33 22 A7 51 24 B2 22 44 49 53 4B 41 54 20 42 4F |3".Q$."DISKAT BO|
00000780: 4F 54 22 3A 89 37 33 30 00 9E 0F BC 02 8B 51 31 |OT":.730......Q1|
00000790: 24 B2 22 45 22 A7 9C 3A 99 22 93 22 3A 80 00 C1 |$."E"..:.".":...|
000007A0: 0F C6 02 8B 51 31 24 B2 22 48 22 A7 51 24 B2 22 |....Q1$."H".Q$."|
000007B0: 44 49 53 4B 41 54 20 42 4F 4F 54 22 3A 89 37 33 |DISKAT BOOT":.73|
000007C0: 30 00 CC 0F D0 02 9C 3A 89 35 31 30 00 DC 0F DA |0......:.510....|
000007D0: 02 8F 20 20 53 55 42 52 64 7F 49 4E 00 0F 10 E4 |.. SUBRd.IN....|
000007E0: 02 85 22 93 12 49 53 20 50 52 4F 47 52 41 4D 4D |.."..IS PROGRAMM|
000007F0: 41 2D 53 43 48 49 4A 46 20 49 4E 20 44 52 49 56 |A-SCHIJF IN DRIV|
00000800: 45 92 28 52 45 54 55 52 4E 29 22 3B 51 31 24 00 |E.(RETURN)";Q1$.|
00000810: 1C 10 EE 02 99 22 93 11 11 11 11 22 00 37 10 F8 |.....".....".7..|
00000820: 02 99 22 4C 4F 41 44 22 C7 28 33 34 29 51 24 22 |.."LOAD".(34)Q$"|
00000830: 2C 38 11 11 11 11 22 00 4F 10 02 03 99 22 52 55 |,8....".O...."RU|
00000840: 4E 22 3A 99 22 91 91 91 91 91 91 91 91 91 22 00 |N":.".........".|
00000850: 74 10 0C 03 97 36 33 31 2C 31 33 3A 97 36 33 32 |t....631,13:.632|
00000860: 2C 31 33 3A 97 36 33 33 2C 31 33 3A 97 31 39 38 |,13:.633,13:.198|
00000870: 2C 33 3A 80 00 84 10 16 03 8F 20 20 53 55 42 52 |,3:....... SUBR|
00000880: 64 7F 49 4E 00 8D 10 20 03 8D 33 33 30 00 96 10 |d.IN... ..330...|
00000890: 2A 03 8D 34 31 30 00 A6 10 34 03 99 22 13 11 11 |*..410...4.."...|
000008A0: 11 11 11 11 11 22 00 B9 10 3E 03 99 22 05 12 20 |....."...>..".. |
000008B0: 20 20 20 20 20 20 20 92 22 00 EB 10 48 03 99 20 | ."...H.. |
000008C0: 22 12 20 4D 45 4E 55 20 32 20 20 20 20 20 20 20 |". MENU 2 |
000008D0: 20 20 4F 50 56 52 41 47 45 4E 20 47 45 47 45 56 | OPVRAGEN GEGEV|
000008E0: 45 4E 53 20 20 20 20 20 20 92 22 00 FE 10 52 03 |ENS ."...R.|
000008F0: 99 20 22 12 20 20 20 20 20 20 20 20 92 22 00 2E |. ". ."..|
00000900: 11 5C 03 99 22 1E B0 C0 C0 C0 B2 C0 C0 C0 C0 C0 |.\.."...........|
00000910: C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 |................|
00000920: C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 AE 22 00 5F |............."._|
00000930: 11 66 03 99 22 C2 12 20 31 20 92 C2 20 50 52 49 |.f..".. 1 .. PRI|
00000940: 4E 54 45 4E 20 44 49 52 45 43 54 4F 52 49 45 53 |NTEN DIRECTORIES|
00000950: 20 50 45 52 20 44 49 53 4B 20 20 20 20 C2 22 00 | PER DISK .".|
00000960: 90 11 70 03 99 22 C2 12 20 32 20 92 C2 20 50 52 |..p..".. 2 .. PR|
00000970: 49 4E 54 45 4E 20 54 49 54 45 4C 53 20 50 45 52 |INTEN TITELS PER|
00000980: 20 52 55 42 52 49 45 4B 20 20 20 20 20 20 C2 22 | RUBRIEK ."|
00000990: 00 C1 11 7A 03 99 22 C2 12 20 33 20 92 C2 20 50 |...z..".. 3 .. P|
000009A0: 52 49 4E 54 45 4E 20 54 49 54 45 4C 53 20 41 4C |RINTEN TITELS AL|
000009B0: 46 41 42 45 54 49 53 43 48 20 20 20 20 20 20 C2 |FABETISCH .|
000009C0: 22 00 F2 11 84 03 99 22 C2 12 20 34 20 92 C2 20 |"......".. 4 .. |
000009D0: 4F 50 5A 4F 45 4B 45 4E 20 54 49 54 45 4C 20 56 |OPZOEKEN TITEL V|
000009E0: 49 41 20 54 52 45 46 57 4F 4F 52 44 20 20 20 20 |IA TREFWOORD |
000009F0: C2 22 00 23 12 8E 03 99 22 C2 12 20 35 20 92 C2 |.".#....".. 5 ..|
00000A00: 20 50 52 49 4E 54 45 4E 20 54 49 54 45 4C 53 20 | PRINTEN TITELS |
00000A10: 56 41 4E 20 45 4C 4B 45 20 44 49 53 4B 20 20 20 |VAN ELKE DISK |
00000A20: 20 C2 22 00 52 12 98 03 99 22 AB C0 C0 C0 DB C0 | .".R...."......|
00000A30: C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 |................|
00000A40: C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 |................|
00000A50: B3 22 00 83 12 A2 03 99 22 C2 12 20 45 20 92 C2 |."......".. E ..|
00000A60: 20 45 49 4E 44 45 28 56 49 41 20 4D 45 4E 55 20 | EINDE(VIA MENU |
00000A70: 30 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 |0) |
00000A80: 20 C2 22 00 B4 12 AC 03 99 22 C2 12 20 48 20 92 | ."......".. H .|
00000A90: C2 20 48 45 4C 50 20 20 20 20 20 20 20 20 20 20 |. HELP |
00000AA0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000AB0: 20 20 C2 22 00 E3 12 B6 03 99 22 AD C0 C0 C0 B1 | ."......".....|
00000AC0: C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 |................|
00000AD0: C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 |................|
00000AE0: C0 BD 22 00 01 13 C0 03 85 22 11 12 55 57 20 4B |.."......"..UW K|
00000AF0: 45 55 5A 45 20 53 2E 56 2E 50 2E 92 22 3B 51 31 |EUZE S.V.P..";Q1|
00000B00: 24 00 16 13 CA 03 8B 51 31 24 B2 22 31 22 A7 9C |$......Q1$."1"..|
00000B10: 3A 89 32 31 32 30 00 2B 13 D4 03 8B 51 31 24 B2 |:.2120.+....Q1$.|
00000B20: 22 32 22 A7 9C 3A 89 32 33 31 30 00 40 13 DE 03 |"2"..:.2310.@...|
00000B30: 8B 51 31 24 B2 22 33 22 A7 9C 3A 89 32 35 32 30 |.Q1$."3"..:.2520|
00000B40: 00 55 13 E8 03 8B 51 31 24 B2 22 34 22 A7 9C 3A |.U....Q1$."4"..:|
00000B50: 89 33 30 39 30 00 6A 13 F2 03 8B 51 31 24 B2 22 |.3090.j....Q1$."|
00000B60: 35 22 A7 9C 3A 89 33 37 39 30 00 7E 13 FC 03 8B |5"..:.3790.~....|
00000B70: 51 31 24 B2 22 45 22 A7 9C 3A 89 35 31 30 00 93 |Q1$."E"..:.510..|
00000B80: 13 06 04 8B 51 31 24 B2 22 48 22 A7 9C 3A 89 31 |....Q1$."H"..:.1|
00000B90: 30 35 30 00 9C 13 10 04 89 37 39 30 00 AC 13 1A |050......790....|
00000BA0: 04 8F 20 20 53 55 42 52 64 7F 49 4E 00 B5 13 24 |.. SUBRd.IN...$|
00000BB0: 04 8D 33 38 30 00 BE 13 2E 04 8D 34 31 30 00 CF |..380......410..|
00000BC0: 13 38 04 99 22 13 11 11 11 11 11 11 11 11 22 00 |.8..".........".|
00000BD0: FB 13 42 04 99 22 12 20 31 20 92 20 5A 4F 4E 44 |..B..". 1 . ZOND|
00000BE0: 45 52 20 52 41 41 44 50 4C 45 47 45 4E 20 56 41 |ER RAADPLEGEN VA|
00000BF0: 4E 20 44 45 20 52 45 45 44 53 22 00 2A 14 4C 04 |N DE REEDS".*.L.|
00000C00: 99 22 20 20 20 20 42 45 4B 45 4E 44 45 20 4B 41 |." BEKENDE KA|
00000C10: 54 41 4C 4F 47 55 53 2C 20 57 4F 52 44 54 20 44 |TALOGUS, WORDT D|
00000C20: 45 20 44 49 52 20 56 41 4E 22 00 56 14 56 04 99 |E DIR VAN".V.V..|
00000C30: 22 20 20 20 20 45 45 4E 20 44 49 53 4B 20 57 45 |" EEN DISK WE|
00000C40: 45 52 47 45 47 45 56 45 4E 20 56 49 41 20 50 52 |ERGEGEVEN VIA PR|
00000C50: 49 4E 54 45 52 22 00 85 14 60 04 99 22 12 20 32 |INTER"...`..". 2|
00000C60: 20 92 20 4E 41 20 4F 50 47 41 56 45 20 56 41 4E | . NA OPGAVE VAN|
00000C70: 20 44 45 20 47 45 57 45 4E 53 54 45 20 52 55 42 | DE GEWENSTE RUB|
00000C80: 52 49 45 4B 22 00 B4 14 6A 04 99 22 20 20 20 20 |RIEK"...j.." |
00000C90: 57 4F 52 44 45 4E 20 44 45 20 44 41 41 52 49 4E |WORDEN DE DAARIN|
00000CA0: 20 56 4F 4F 52 4B 4F 4D 45 4E 44 45 20 54 49 54 | VOORKOMENDE TIT|
00000CB0: 45 4C 53 22 00 E0 14 74 04 99 22 20 20 20 20 55 |ELS"...t.." U|
00000CC0: 49 54 47 45 50 52 49 4E 54 2C 20 4D 45 54 20 4E |ITGEPRINT, MET N|
00000CD0: 41 41 4D 20 56 41 4E 20 44 45 20 44 49 53 4B 22 |AAM VAN DE DISK"|
00000CE0: 00 10 15 7E 04 99 22 12 20 33 20 92 20 49 44 45 |...~..". 3 . IDE|
00000CF0: 4D 2C 20 4D 41 41 52 20 4E 41 20 4F 50 47 41 56 |M, MAAR NA OPGAV|
00000D00: 45 20 56 41 4E 20 44 45 20 45 45 52 53 54 45 22 |E VAN DE EERSTE"|
00000D10: 00 22 15 88 04 99 22 20 20 20 20 4C 45 54 54 45 |."...." LETTE|
00000D20: 52 2E 00 4C 15 92 04 99 22 12 20 34 20 92 20 49 |R..L....". 4 . I|
00000D30: 44 45 4D 2C 20 4D 41 41 52 20 4E 41 20 4F 50 47 |DEM, MAAR NA OPG|
00000D40: 41 56 45 20 56 41 4E 20 45 45 4E 22 00 76 15 9C |AVE VAN EEN".v..|
00000D50: 04 99 22 20 20 20 20 54 52 45 46 57 4F 4F 52 44 |.." TREFWOORD|
00000D60: 2C 20 57 45 4C 4B 45 20 45 45 4E 20 4F 4E 44 45 |, WELKE EEN ONDE|
00000D70: 52 44 45 45 4C 22 00 98 15 A6 04 99 22 20 20 20 |RDEEL"......" |
00000D80: 20 4D 4F 45 54 20 5A 49 4A 4E 20 56 41 4E 20 44 | MOET ZIJN VAN D|
00000D90: 45 20 54 49 54 45 4C 2E 00 C3 15 B0 04 99 22 12 |E TITEL.......".|
00000DA0: 20 35 20 92 20 56 41 4E 20 45 4C 4B 45 20 44 49 | 5 . VAN ELKE DI|
00000DB0: 53 4B 20 57 4F 52 44 54 20 56 41 4E 55 49 54 20 |SK WORDT VANUIT |
00000DC0: 44 45 22 00 EC 15 BA 04 99 22 20 20 20 20 4B 41 |DE"......" KA|
00000DD0: 54 41 4C 4F 47 55 53 20 44 45 20 50 52 4F 47 52 |TALOGUS DE PROGR|
00000DE0: 41 4D 4D 41 2D 54 49 54 45 4C 53 22 00 FF 15 C4 |AMMA-TITELS"....|
00000DF0: 04 99 22 20 20 20 20 47 45 50 52 49 4E 54 2E 00 |.." GEPRINT..|
00000E00: 27 16 CE 04 85 22 44 52 55 4B 20 52 45 54 55 52 |'...."DRUK RETUR|
00000E10: 4E 20 4F 4D 20 54 45 52 55 47 20 54 45 20 47 41 |N OM TERUG TE GA|
00000E20: 41 4E 22 3B 51 31 24 00 30 16 D8 04 89 37 39 30 |AN";Q1$.0....790|
00000E30: 00 40 16 E2 04 8F 20 20 53 55 42 52 64 7F 49 4E |.@.... SUBRd.IN|
00000E40: 00 4D 16 EC 04 84 31 35 2C 41 2C 41 24 00 7E 16 |.M....15,A,A$.~.|
00000E50: F6 04 8B 20 41 B1 32 30 A7 99 22 46 4F 55 54 20 |... A.20.."FOUT |
00000E60: 49 4E 20 52 45 47 45 4C 3A 20 22 3B 46 31 3B 41 |IN REGEL: ";F1;A|
00000E70: 3B 41 24 3A A0 38 3A A0 31 35 3A 9C 3A 80 00 84 |;A$:.8:.15:.:...|
00000E80: 16 00 05 8E 00 94 16 0A 05 8F 20 20 53 55 42 52 |.......... SUBR|
00000E90: 64 7F 49 4E 00 C4 16 14 05 54 B2 C6 28 CA 28 50 |d.IN.....T..(.(P|
00000EA0: 4C 24 28 58 29 2C 31 2C 31 29 29 AB 36 34 3A 53 |L$(X),1,1)).64:S|
00000EB0: B2 C6 28 CA 28 50 4C 24 28 58 29 2C 32 2C 31 29 |..(.(PL$(X),2,1)|
00000EC0: 29 AB 36 34 00 DE 16 1E 05 42 B2 C6 28 CA 28 50 |).64.....B..(.(P|
00000ED0: 4C 24 28 58 29 2C 33 2C 31 29 29 AB 36 34 00 0F |L$(X),3,1)).64..|
00000EE0: 17 28 05 9F 31 35 2C 38 2C 31 35 3A 9F 38 2C 38 |.(..15,8,15:.8,8|
00000EF0: 2C 38 2C 22 23 22 3A 81 4B B2 30 A4 35 3A 98 31 |,8,"#":.K.0.5:.1|
00000F00: 35 2C 22 42 2D 52 3A 22 38 3B 30 3B 54 3B 53 00 |5,"B-R:"8;0;T;S.|
00000F10: 44 17 32 05 98 31 35 2C 22 42 2D 50 3A 22 38 3B |D.2..15,"B-P:"8;|
00000F20: 4B AC 34 30 AA 31 3A 84 38 2C 5A 24 2C 44 4C 28 |K.40.1:.8,Z$,DL(|
00000F30: 4B 29 2C 44 4E 24 28 4B 29 2C 44 53 24 28 4B 29 |K),DN$(K),DS$(K)|
00000F40: 2C 44 53 24 00 53 17 3C 05 82 3A A0 38 3A A0 31 |,DS$.S.<..:.8:.1|
00000F50: 35 3A 8E 00 63 17 46 05 8F 20 20 53 55 42 52 64 |5:..c.F.. SUBRd|
00000F60: 7F 49 4E 00 98 17 50 05 9F 31 35 2C 38 2C 31 35 |.IN...P..15,8,15|
00000F70: 3A 9F 38 2C 38 2C 38 2C 22 52 55 42 52 49 45 4B |:.8,8,8,"RUBRIEK|
00000F80: 22 AA C9 28 C4 28 58 29 2C 32 29 AA 22 44 49 53 |"..(.(X),2)."DIS|
00000F90: 4B 41 54 2C 53 2C 52 22 00 A2 17 5A 05 84 38 2C |KAT,S,R"...Z..8,|
00000FA0: 49 25 00 C1 17 64 05 8B 49 25 B3 B1 30 A7 81 4A |I%...d..I%..0..J|
00000FB0: B2 31 A4 49 25 3A 84 38 2C 50 4C 24 28 4A 29 3A |.1.I%:.8,PL$(J):|
00000FC0: 82 00 CE 17 6E 05 A0 38 3A A0 31 35 3A 8E 00 DE |....n..8:.15:...|
00000FD0: 17 78 05 8F 20 20 53 55 42 52 64 7F 49 4E 00 0B |.x.. SUBRd.IN..|
00000FE0: 18 82 05 9F 31 35 2C 38 2C 31 35 3A 9F 38 2C 38 |....15,8,15:.8,8|
00000FF0: 2C 38 2C 22 41 4C 46 2E 20 22 AA 43 24 AA 22 20 |,8,"ALF. ".C$." |
00001000: 44 49 53 4B 41 54 2C 53 2C 52 22 00 30 18 8C 05 |DISKAT,S,R".0...|
00001010: 84 38 2C 58 25 3A 8B 58 25 B3 B1 30 A7 81 58 B2 |.8,X%:.X%..0..X.|
00001020: 31 A4 58 25 3A 84 38 2C 50 4C 24 28 58 29 3A 82 |1.X%:.8,PL$(X):.|
00001030: 00 3D 18 96 05 A0 38 3A A0 31 35 3A 8E 00 4D 18 |.=....8:.15:..M.|
00001040: A0 05 8F 20 20 53 55 42 52 64 7F 49 4E 00 5D 18 |... SUBRd.IN.].|
00001050: AA 05 8F 20 20 53 55 42 52 64 7F 49 4E 00 80 18 |... SUBRd.IN...|
00001060: B4 05 51 39 24 B2 22 13 11 11 11 11 11 11 11 11 |..Q9$.".........|
00001070: 11 11 11 11 11 11 11 11 11 11 11 11 11 11 11 22 |..............."|
00001080: 00 91 18 BE 05 99 C8 28 51 39 24 2C 59 AA 31 29 |.......(Q9$,Y.1)|
00001090: 3B 00 97 18 C8 05 8E 00 A7 18 D2 05 8F 20 20 53 |;............ S|
000010A0: 55 42 52 64 7F 49 4E 00 BB 18 DC 05 59 31 B2 59 |UBRd.IN.....Y1.Y|
000010B0: 3A 59 B2 32 32 3A 8D 31 34 35 30 00 EA 18 E6 05 |:Y.22:.1450.....|
000010C0: 99 22 55 57 20 4B 45 55 5A 45 3A 20 12 56 92 3D |."UW KEUZE: .V.=|
000010D0: 56 4F 4C 47 45 4E 44 45 20 52 55 42 52 2E 20 20 |VOLGENDE RUBR. |
000010E0: 12 45 92 3D 45 49 4E 44 45 22 00 1D 19 F0 05 99 |.E.=EINDE"......|
000010F0: 22 20 20 20 20 20 20 20 20 20 20 12 41 92 3D 56 |" .A.=V|
00001100: 4F 4F 52 47 41 41 4E 44 45 20 52 55 42 2E 20 12 |OORGAANDE RUB. .|
00001110: 4A 92 3D 55 57 20 4B 45 55 5A 45 22 3B 00 27 19 |J.=UW KEUZE";.'.|
00001120: FA 05 8D 31 36 34 30 00 37 19 04 06 8F 20 20 53 |...1640.7.... S|
00001130: 55 42 52 64 7F 49 4E 00 4E 19 0E 06 A1 51 31 24 |UBRd.IN.N....Q1$|
00001140: 3A 8B 51 31 24 B2 22 22 A7 89 31 35 35 30 00 54 |:.Q1$.""..1550.T|
00001150: 19 18 06 8F 00 7A 19 22 06 8B 51 31 24 B2 22 45 |.....z."..Q1$."E|
00001160: 22 A7 44 53 24 28 49 29 B2 44 53 24 28 49 29 AA |".DS$(I).DS$(I).|
00001170: 22 20 20 20 20 20 20 22 3A 8E 00 97 19 2C 06 8B |" ":....,..|
00001180: 51 31 24 B2 22 56 22 A7 58 B2 58 AA 31 3A 8B 58 |Q1$."V".X.X.1:.X|
00001190: B1 58 25 A7 58 B2 31 00 AA 19 36 06 8B 51 31 24 |.X%.X.1...6..Q1$|
000011A0: B2 22 56 22 A7 89 31 36 34 30 00 C7 19 40 06 8B |."V"..1640...@..|
000011B0: 51 31 24 B2 22 41 22 A7 58 B2 58 AB 31 3A 8B 58 |Q1$."A".X.X.1:.X|
000011C0: B3 31 A7 58 B2 58 25 00 DA 19 4A 06 8B 51 31 24 |.1.X.X%...J..Q1$|
000011D0: B2 22 41 22 A7 89 31 36 34 30 00 FF 19 54 06 8B |."A"..1640...T..|
000011E0: 51 31 24 B2 22 4A 22 A7 44 53 24 28 49 29 B2 44 |Q1$."J".DS$(I).D|
000011F0: 53 24 28 49 29 AA C7 28 58 AA 36 34 29 3A 8E 00 |S$(I)..(X.64):..|
00001200: 09 1A 5E 06 89 31 35 35 30 00 19 1A 68 06 8F 20 |..^..1550...h.. |
00001210: 20 53 55 42 52 64 7F 49 4E 00 28 1A 72 06 59 B2 | SUBRd.IN.(.r.Y.|
00001220: 59 31 3A 8D 31 34 35 30 00 50 1A 7C 06 99 A3 31 |Y1:.1450.P.|...1|
00001230: 30 29 22 20 20 20 20 20 20 20 20 20 20 20 20 20 |0)" |
00001240: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 22 | "|
00001250: 00 5A 1A 86 06 8D 31 34 35 30 00 7F 1A 90 06 99 |.Z....1450......|
00001260: A3 31 30 29 C4 28 52 58 25 28 58 29 29 3B 22 20 |.10).(RX%(X));" |
00001270: 20 22 3B C8 28 52 4E 24 28 58 29 2C 32 33 29 00 | ";.(RN$(X),23).|
00001280: 85 1A 9A 06 8E 00 95 1A A4 06 8F 20 20 53 55 42 |........... SUB|
00001290: 52 64 7F 49 4E 00 C6 1A AE 06 9F 31 35 2C 38 2C |Rd.IN......15,8,|
000012A0: 31 35 3A 9F 38 2C 38 2C 38 2C 22 4E 41 41 4D 2F |15:.8,8,8,"NAAM/|
000012B0: 52 55 42 52 2E 44 49 53 4B 41 54 2C 53 2C 52 22 |RUBR.DISKAT,S,R"|
000012C0: 3A 8D 31 32 35 30 00 F2 1A B8 06 84 38 2C 58 25 |:.1250......8,X%|
000012D0: 2C 4E 31 24 2C 4E 32 24 2C 4E 33 24 2C 4E 34 24 |,N1$,N2$,N3$,N4$|
000012E0: 3A 86 52 58 25 28 58 25 29 3A 86 52 4E 24 28 58 |:.RX%(X%):.RN$(X|
000012F0: 25 29 00 18 1B C2 06 8B 58 25 B3 B1 30 A7 81 49 |%)......X%..0..I|
00001300: B2 31 A4 58 25 3A 84 38 2C 52 58 25 28 49 29 2C |.1.X%:.8,RX%(I),|
00001310: 52 4E 24 28 49 29 3A 82 00 23 1B CC 06 A0 38 3A |RN$(I):..#....8:|
00001320: A0 31 35 00 29 1B D6 06 8E 00 39 1B E0 06 8F 20 |.15.).....9.... |
00001330: 20 53 55 42 52 64 7F 49 4E 00 78 1B EA 06 85 22 | SUBRd.IN.x...."|
00001340: 57 49 4C 54 20 55 20 47 45 4B 4F 4D 50 52 49 4D |WILT U GEKOMPRIM|
00001350: 45 45 52 44 45 20 50 52 49 4E 54 28 4A 2F 4E 29 |EERDE PRINT(J/N)|
00001360: 22 3B 53 50 24 3A 53 50 B2 31 3A 8B 53 50 24 B2 |";SP$:SP.1:.SP$.|
00001370: 22 4A 22 A7 53 50 B2 30 00 9B 1B F4 06 9F 31 2C |"J".SP.0......1,|
00001380: 34 3A 41 24 B2 C7 28 31 35 29 3A 42 24 B2 C7 28 |4:A$..(15):B$..(|
00001390: 38 29 3A 43 24 B2 C7 28 31 36 29 00 AB 1B FE 06 |8):C$..(16).....|
000013A0: 98 31 2C 41 24 3A 98 31 3A 98 31 00 E1 1B 08 07 |.1,A$:.1:.1.....|
000013B0: 81 58 B2 30 A4 34 34 3A 98 31 2C 22 A6 22 3B 3A |.X.0.44:.1,".";:|
000013C0: 82 3A 98 31 2C 22 20 B0 C0 C0 C9 20 D1 20 D5 C0 |.:.1," .... . ..|
000013D0: 20 20 B2 20 C0 20 D5 C0 C9 B0 C0 B2 C0 AE 22 42 | . . ........"B|
000013E0: 24 00 21 1C 12 07 98 31 2C 41 24 22 A6 22 C8 28 |$.!....1,A$".".(|
000013F0: 51 33 24 AA 41 32 24 2C 31 38 29 43 24 22 32 32 |Q3$.A2$,18)C$"22|
00001400: A6 22 43 24 22 34 34 A6 20 DD 20 20 DD 20 DD 20 |."C$"44. . . . |
00001410: DD 20 20 20 DD CE 20 20 DD 20 DD 20 20 DD 22 42 |. .. . . ."B|
00001420: 24 00 40 1C 1C 07 41 32 24 B2 22 20 20 20 20 20 |$.@...A2$." |
00001430: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 22 | "|
00001440: 00 77 1C 26 07 98 31 2C 41 24 22 A6 20 22 C8 28 |.w.&..1,A$". ".(|
00001450: 51 34 24 AA 41 32 24 2C 31 38 29 43 24 22 32 32 |Q4$.A2$,18)C$"22|
00001460: A6 22 C8 28 4E 31 24 AA 41 32 24 2C 32 30 29 43 |.".(N1$.A2$,20)C|
00001470: 24 22 34 34 A6 22 3B 00 99 1C 30 07 98 31 2C 22 |$"44.";...0..1,"|
00001480: 20 DD 20 20 DD 20 DD 20 CA C0 C9 20 AB 20 20 20 | . . . ... . |
00001490: DD C0 DD 20 20 DD 22 42 24 00 D1 1C 3A 07 98 31 |... ."B$...:..1|
000014A0: 2C 41 24 22 A6 22 C8 28 51 35 24 AA 41 32 24 2C |,A$".".(Q5$.A2$,|
000014B0: 31 38 29 43 24 22 32 32 A6 C0 C0 C0 C0 C0 C0 C0 |18)C$"22........|
000014C0: C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 A6 22 |..............."|
000014D0: 3B 00 F3 1C 44 07 98 31 2C 22 20 DD 20 20 DD 20 |;...D..1," . . |
000014E0: DD 20 20 20 DD 20 DD CD 20 20 DD 20 DD 20 20 DD |. . .. . . .|
000014F0: 22 42 24 00 31 1D 4E 07 98 31 2C 41 24 22 A6 A6 |"B$.1.N..1,A$"..|
00001500: A6 A6 A6 A6 A6 A6 A6 A6 A6 A6 A6 A6 A6 A6 A6 A6 |................|
00001510: A6 A6 A6 A6 22 43 24 22 32 32 A6 22 C8 28 4E 32 |...."C$"22.".(N2|
00001520: 24 AA 41 32 24 2C 32 30 29 43 24 22 34 34 A6 22 |$.A2$,20)C$"44."|
00001530: 3B 00 53 1D 58 07 98 31 2C 22 20 AD C0 C0 CB 20 |;.S.X..1," .... |
00001540: B1 20 C0 C0 CB 20 B1 20 C3 20 B1 20 B1 20 20 B1 |. ... . . . . .|
00001550: 22 42 24 00 7C 1D 62 07 98 31 2C 41 24 43 24 22 |"B$.|.b..1,A$C$"|
00001560: 32 32 A6 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 |22..............|
00001570: C0 C0 C0 C0 C0 C0 C0 C0 A6 22 42 24 00 BD 1D 6C |........."B$...l|
00001580: 07 98 31 2C 41 24 43 24 22 32 32 A6 22 C8 28 4E |..1,A$C$"22.".(N|
00001590: 33 24 AA 22 20 20 22 AA 4E 34 24 AA 41 32 24 2C |3$." ".N4$.A2$,|
000015A0: 32 30 29 43 24 22 34 34 A6 20 3C 43 4F 3E 20 47 |20)C$"44. <CO> G|
000015B0: 2E 56 41 4E 20 47 49 4C 53 20 22 42 24 00 F0 1D |.VAN GILS "B$...|
000015C0: 76 07 81 58 B2 31 A4 32 32 3A 98 31 2C 41 24 22 |v..X.1.22:.1,A$"|
000015D0: A8 22 3B 3A 82 3A 98 31 2C 22 A6 22 3B 3A 81 58 |.";:.:.1,".";:.X|
000015E0: B2 32 34 A4 34 34 3A 98 31 2C 22 A8 22 3B 3A 82 |.24.44:.1,".";:.|
000015F0: 00 15 1E 80 07 98 31 2C 22 A6 22 3B 3A 81 58 B2 |......1,".";:.X.|
00001600: 34 36 A4 36 37 3A 98 31 2C 22 A8 22 3B 3A 82 3A |46.67:.1,".";:.:|
00001610: 98 31 2C 42 24 00 30 1E 8A 07 8B 20 51 36 24 B2 |.1,B$.0.... Q6$.|
00001620: 22 22 A7 51 36 24 B2 22 52 55 42 52 2E 20 20 22 |"".Q6$."RUBR. "|
00001630: 00 68 1E 94 07 81 58 B2 30 A4 31 3A 98 31 2C 41 |.h....X.0.1:.1,A|
00001640: 24 22 A6 20 42 4C 4F 4B DD 20 54 49 54 45 4C 20 |$". BLOK. TITEL |
00001650: 20 20 20 20 20 20 20 20 20 20 20 C2 22 C8 28 51 | .".(Q|
00001660: 36 24 2C 37 29 3B 3A 82 00 9A 1E 9E 07 98 31 2C |6$,7);:.......1,|
00001670: 22 A6 22 42 24 3A 98 31 2C 41 24 22 A6 22 3B 3A |"."B$:.1,A$".";:|
00001680: 81 58 B2 32 A4 33 33 3A 98 31 2C 22 A8 22 3B 3A |.X.2.33:.1,".";:|
00001690: 82 3A 98 31 2C 22 A6 22 3B 3A 00 B9 1E A8 07 81 |.:.1,".";:......|
000016A0: 58 B2 33 35 A4 36 36 3A 98 31 2C 22 A8 22 3B 3A |X.35.66:.1,".";:|
000016B0: 82 3A 98 31 2C 22 A6 22 3B 00 D3 1E B2 07 8B 53 |.:.1,".";......S|
000016C0: 50 B2 30 A7 A0 31 3A 9F 31 2C 34 2C 37 3A 98 31 |P.0..1:.1,4,7:.1|
000016D0: 2C 42 24 00 E3 1E BC 07 8B 53 50 B2 31 A7 98 31 |,B$......SP.1..1|
000016E0: 2C 42 24 00 F8 1E C6 07 81 49 B2 31 A4 44 58 25 |,B$......I.1.DX%|
000016F0: A9 32 3A 8D 32 30 35 30 00 FE 1E D0 07 82 00 37 |.2:.2050.......7|
00001700: 1F DA 07 98 31 2C 41 24 22 A6 22 43 24 22 30 36 |....1,A$"."C$"06|
00001710: A1 22 43 24 22 32 35 A1 22 43 24 22 33 33 A6 22 |."C$"25."C$"33."|
00001720: 43 24 22 33 39 A1 22 43 24 22 35 38 A1 22 43 24 |C$"39."C$"58."C$|
00001730: 22 36 36 A6 22 42 24 00 60 1F E4 07 98 31 2C 41 |"66."B$.`....1,A|
00001740: 24 3B 3A 81 58 B2 31 A4 36 37 3A 98 31 2C 22 A6 |$;:.X.1.67:.1,".|
00001750: 22 3B 3A 82 3A 98 31 2C 41 24 3A 98 31 3A 98 31 |";:.:.1,A$:.1:.1|
00001760: 00 67 1F EE 07 A0 31 00 6D 1F F8 07 8E 00 7D 1F |.g....1.m.....}.|
00001770: 02 08 8F 20 20 53 55 42 52 64 7F 49 4E 00 BC 1F |... SUBRd.IN...|
00001780: 0C 08 8B 53 50 B2 31 A7 98 31 2C 41 24 22 A6 22 |...SP.1..1,A$"."|
00001790: 43 24 22 30 36 A1 22 43 24 22 32 35 A1 22 43 24 |C$"06."C$"25."C$|
000017A0: 22 33 33 A6 22 43 24 22 33 39 A1 22 43 24 22 35 |"33."C$"39."C$"5|
000017B0: 38 A1 22 43 24 22 36 36 A6 22 42 24 00 F2 1F 16 |8."C$"66."B$....|
000017C0: 08 98 31 2C 41 24 22 A6 22 C9 28 41 32 24 AA C4 |..1,A$".".(A2$..|
000017D0: 28 44 4C 28 49 29 29 2C 33 29 43 24 22 30 36 A1 |(DL(I)),3)C$"06.|
000017E0: 22 C8 28 44 4E 24 28 49 29 AA 41 32 24 2C 31 36 |".(DN$(I).A2$,16|
000017F0: 29 3B 00 14 20 20 08 98 31 2C 43 24 22 32 35 A1 |);.. ..1,C$"25.|
00001800: 22 C8 28 44 53 24 28 49 29 2C 36 29 43 24 22 33 |".(DS$(I),6)C$"3|
00001810: 33 A6 22 3B 00 4D 20 2A 08 98 31 2C 22 20 22 C9 |3.";.M *..1," ".|
00001820: 28 41 32 24 AA C4 28 44 4C 28 49 AA 31 29 29 2C |(A2$..(DL(I.1)),|
00001830: 33 29 3B 43 24 22 33 39 A1 22 C8 28 44 4E 24 28 |3);C$"39.".(DN$(|
00001840: 49 AA 31 29 AA 41 32 24 2C 31 36 29 3B 00 72 20 |I.1).A2$,16);.r |
00001850: 34 08 98 31 2C 43 24 22 35 38 A1 22 C8 28 44 53 |4..1,C$"58.".(DS|
00001860: 24 28 49 AA 31 29 2C 36 29 43 24 22 36 36 A6 22 |$(I.1),6)C$"66."|
00001870: 42 24 00 78 20 3E 08 8E 00 88 20 48 08 8F 20 20 |B$.x >.... H.. |
00001880: 53 55 42 52 64 7F 49 4E 00 91 20 52 08 8D 33 38 |SUBRd.IN.. R..38|
00001890: 30 00 9A 20 5C 08 8D 34 31 30 00 A9 20 66 08 59 |0.. \..410.. f.Y|
000018A0: B2 31 31 3A 8D 31 34 35 30 00 DC 20 70 08 85 22 |.11:.1450.. p.."|
000018B0: 12 50 4C 41 41 54 53 20 47 45 57 45 4E 53 54 45 |.PLAATS GEWENSTE|
000018C0: 20 44 49 53 4B 20 49 4E 20 44 52 49 56 45 92 28 | DISK IN DRIVE.(|
000018D0: 52 45 54 55 52 4E 29 22 3B 51 31 24 00 1A 21 7A |RETURN)";Q1$..!z|
000018E0: 08 85 22 11 12 49 53 20 45 52 20 45 45 4E 20 50 |.."..IS ER EEN P|
000018F0: 52 49 4E 54 45 52 20 41 41 4E 47 45 53 4C 4F 54 |RINTER AANGESLOT|
00001900: 45 4E 22 3B 51 31 24 3A 50 52 B2 30 3A 8B 51 31 |EN";Q1$:PR.0:.Q1|
00001910: 24 B2 22 4A 22 A7 50 52 B2 31 00 22 21 84 08 8D |$."J".PR.1."!...|
00001920: 32 30 00 49 21 8E 08 8B 50 52 B2 30 A7 85 22 4E |20.I!...PR.0.."N|
00001930: 4F 47 4D 41 41 4C 53 22 3B 51 31 24 3A 8B 51 31 |OGMAALS";Q1$:.Q1|
00001940: 24 B2 22 4A 22 A7 8D 32 30 00 5A 21 98 08 8B 50 |$."J"..20.Z!...P|
00001950: 52 B2 30 A7 9C 3A 89 37 39 30 00 72 21 A2 08 85 |R.0..:.790.r!...|
00001960: 22 93 12 20 4E 41 41 4D 20 20 20 20 92 22 3B 4E |".. NAAM .";N|
00001970: 31 24 00 89 21 AC 08 85 22 12 20 41 44 52 45 53 |1$..!...". ADRES|
00001980: 20 20 20 92 22 3B 4E 32 24 00 A0 21 B6 08 85 22 | .";N2$..!..."|
00001990: 12 20 50 4F 53 54 4B 4F 44 45 92 22 3B 4E 33 24 |. POSTKODE.";N3$|
000019A0: 00 B7 21 C0 08 85 22 12 20 50 4C 41 41 54 53 20 |..!...". PLAATS |
000019B0: 20 92 22 3B 4E 34 24 00 E2 21 CA 08 51 34 24 B2 | .";N4$..!..Q4$.|
000019C0: 22 44 49 53 4B 3A 22 AA 44 4E 24 28 31 29 3A 51 |"DISK:".DN$(1):Q|
000019D0: 35 24 B2 22 20 20 4E 52 2E 3A 22 AA 44 53 24 28 |5$." NR.:".DS$(|
000019E0: 31 29 00 25 22 DE 08 44 58 25 B2 49 3A 81 49 B2 |1).%"..DX%.I:.I.|
000019F0: 32 A4 44 58 25 3A 44 4C 28 49 AB 31 29 B2 44 4C |2.DX%:DL(I.1).DL|
00001A00: 28 49 29 3A 44 4E 24 28 49 AB 31 29 B2 44 4E 24 |(I):DN$(I.1).DN$|
00001A10: 28 49 29 3A 44 53 24 28 49 AB 31 29 B2 44 53 24 |(I):DS$(I.1).DS$|
00001A20: 28 49 29 3A 82 00 4A 22 E8 08 44 58 25 B2 44 58 |(I):..J"..DX%.DX|
00001A30: 25 AB 31 3A 44 4E 24 28 44 58 25 29 B2 22 42 4C |%.1:DN$(DX%)."BL|
00001A40: 4F 43 4B 53 20 46 52 45 45 22 00 54 22 F2 08 8D |OCKS FREE".T"...|
00001A50: 31 37 36 30 00 5F 22 FC 08 9C 3A 89 37 39 30 00 |1760._"...:.790.|
00001A60: 6F 22 06 09 8F 20 20 53 55 42 52 64 7F 49 4E 00 |o"... SUBRd.IN.|
00001A70: 78 22 10 09 8D 33 38 30 00 81 22 1A 09 8D 34 31 |x"...380.."...41|
00001A80: 30 00 90 22 24 09 59 B2 31 31 3A 8D 31 34 35 30 |0.."$.Y.11:.1450|
00001A90: 00 C0 22 2E 09 85 22 12 44 4F 45 20 4B 41 54 41 |.."...".DOE KATA|
00001AA0: 4C 4F 47 55 53 44 49 53 4B 20 49 4E 20 44 52 49 |LOGUSDISK IN DRI|
00001AB0: 56 45 92 28 52 45 54 55 52 4E 29 22 3B 51 31 24 |VE.(RETURN)";Q1$|
00001AC0: 00 CA 22 38 09 8D 31 37 30 30 00 DD 22 42 09 58 |.."8..1700.."B.X|
00001AD0: B2 31 3A 59 B2 31 33 3A 8D 31 34 35 30 00 F4 22 |.1:Y.13:.1450.."|
00001AE0: 4C 09 49 B2 31 3A 42 24 B2 C7 28 31 33 29 3A 8D |L.I.1:B$..(13):.|
00001AF0: 31 34 39 30 00 13 23 56 09 52 4E 24 B2 52 4E 24 |1490..#V.RN$.RN$|
00001B00: 28 58 29 3A 8B 51 31 24 B2 22 45 22 A7 9C 3A 89 |(X):.Q1$."E"..:.|
00001B10: 37 39 30 00 32 23 60 09 8F 20 58 3D 52 55 42 52 |790.2#`.. X=RUBR|
00001B20: 2E 4E 52 2E 20 52 4E 24 3D 52 55 42 52 2E 4E 41 |.NR. RN$=RUBR.NA|
00001B30: 41 4D 00 6B 23 6A 09 9F 31 35 2C 38 2C 31 35 3A |AM.k#j..15,8,15:|
00001B40: 9F 38 2C 38 2C 38 2C 22 40 30 3A 52 4F 54 5A 4F |.8,8,8,"@0:ROTZO|
00001B50: 4F 49 2C 53 2C 57 22 3A 98 38 2C 58 42 24 22 2C |OI,S,W":.8,XB$",|
00001B60: 22 52 4E 24 3A A0 38 3A A0 31 35 00 9F 23 74 09 |"RN$:.8:.15..#t.|
00001B70: 9C 3A 9F 31 35 2C 38 2C 31 35 3A 9F 38 2C 38 2C |.:.15,8,15:.8,8,|
00001B80: 38 2C 22 52 4F 54 5A 4F 4F 49 2C 53 2C 52 22 3A |8,"ROTZOOI,S,R":|
00001B90: 84 38 2C 58 2C 52 4E 24 3A A0 38 3A A0 31 35 00 |.8,X,RN$:.8:.15.|
00001BA0: B4 23 7E 09 86 50 4C 24 28 31 35 30 30 29 3A 8D |.#~..PL$(1500):.|
00001BB0: 31 33 35 30 00 EB 23 88 09 86 44 4C 28 49 25 AA |1350..#...DL(I%.|
00001BC0: 31 30 29 3A 86 44 4E 24 28 49 25 AA 31 30 29 3A |10):.DN$(I%.10):|
00001BD0: 86 44 53 24 28 49 25 AA 31 30 29 3A 81 58 B2 31 |.DS$(I%.10):.X.1|
00001BE0: A4 49 25 A9 36 3A 8D 31 32 39 30 00 29 24 92 09 |.I%.6:.1290.)$..|
00001BF0: 81 4C B2 30 A4 35 3A 44 4C 28 4C AA 58 AA 36 29 |.L.0.5:DL(L.X.6)|
00001C00: B2 44 4C 28 4C 29 3A 44 4E 24 28 4C AA 58 AA 36 |.DL(L):DN$(L.X.6|
00001C10: 29 B2 44 4E 24 28 4C 29 3A 44 53 24 28 4C AA 58 |).DN$(L):DS$(L.X|
00001C20: AA 36 29 B2 44 53 24 3A 82 00 67 24 9C 09 82 3A |.6).DS$:..g$...:|
00001C30: 81 58 B2 31 A4 49 25 3A 44 4C 28 58 29 B2 44 4C |.X.1.I%:DL(X).DL|
00001C40: 28 58 AA 36 29 3A 44 4E 24 28 58 29 B2 44 4E 24 |(X.6):DN$(X).DN$|
00001C50: 28 58 AA 36 29 3A 44 53 24 28 58 AA 36 29 B2 44 |(X.6):DS$(X.6).D|
00001C60: 53 24 28 58 29 3A 82 00 96 24 A6 09 81 58 B2 49 |S$(X):...$...X.I|
00001C70: 25 AA 31 A4 49 25 AA 36 3A 44 4C 28 58 29 B2 30 |%.1.I%.6:DL(X).0|
00001C80: 3A 44 4E 24 28 58 29 B2 22 22 3A 44 53 24 28 58 |:DN$(X)."":DS$(X|
00001C90: 29 B2 22 22 3A 82 00 B3 24 B0 09 52 4E 24 B2 52 |)."":...$..RN$.R|
00001CA0: 4E 24 28 58 29 3A 51 36 24 B2 22 44 49 53 4B 2B |N$(X):Q6$."DISK+|
00001CB0: 49 44 22 00 FC 24 BA 09 44 58 25 B2 49 25 3A 51 |ID"..$..DX%.I%:Q|
00001CC0: 34 24 B2 22 4F 4E 44 45 52 20 52 55 42 52 2E 53 |4$."ONDER RUBR.S|
00001CD0: 54 41 41 54 22 3A 51 35 24 B2 22 47 45 44 2E 44 |TAAT":Q5$."GED.D|
00001CE0: 49 53 4B 2D 4E 41 41 4D 20 2B 20 4E 52 22 3A 51 |ISK-NAAM + NR":Q|
00001CF0: 33 24 B2 22 12 22 52 4E 24 22 92 22 00 06 25 C4 |3$."."RN$"."..%.|
00001D00: 09 8D 31 37 36 30 00 11 25 CE 09 9C 3A 89 37 39 |..1760..%...:.79|
00001D10: 30 00 21 25 D8 09 8F 20 20 53 55 42 52 64 7F 49 |0.!%... SUBRd.I|
00001D20: 4E 00 2A 25 E2 09 8D 33 38 30 00 33 25 EC 09 8D |N.*%...380.3%...|
00001D30: 34 31 30 00 41 25 F6 09 59 B2 37 3A 8D 31 34 35 |410.A%..Y.7:.145|
00001D40: 30 00 71 25 00 0A 99 22 12 50 52 49 4E 54 45 4E |0.q%...".PRINTEN|
00001D50: 20 4B 41 54 41 4C 4F 47 55 53 20 4F 50 20 41 4C | KATALOGUS OP AL|
00001D60: 46 41 42 45 54 20 20 20 20 20 20 20 20 20 20 92 |FABET .|
00001D70: 22 00 A5 25 0A 0A 85 22 11 50 4C 41 41 54 53 20 |"..%...".PLAATS |
00001D80: 4B 41 54 41 4C 4F 47 55 53 53 43 48 49 4A 46 20 |KATALOGUSSCHIJF |
00001D90: 49 4E 20 44 52 49 56 45 20 28 52 45 54 55 52 4E |IN DRIVE (RETURN|
00001DA0: 29 22 3B 51 24 00 DD 25 14 0A 85 22 91 57 49 4C |)";Q$..%...".WIL|
00001DB0: 54 20 55 20 12 41 92 4C 4C 45 53 20 4F 46 20 50 |T U .A.LLES OF P|
00001DC0: 45 52 20 12 42 92 4C 4F 4B 20 20 20 20 20 20 20 |ER .B.LOK |
00001DD0: 20 20 20 20 20 20 20 20 20 22 3B 51 24 00 EF 25 | ";Q$..%|
00001DE0: 1E 0A 8B 51 24 B2 22 41 22 A7 89 32 36 32 30 00 |...Q$."A"..2620.|
00001DF0: 1C 26 28 0A 8B 51 24 B2 22 42 22 A7 85 22 11 12 |.&(..Q$."B".."..|
00001E00: 56 41 4E 92 22 3B 51 37 24 3A 85 22 12 54 4F 54 |VAN.";Q7$:.".TOT|
00001E10: 92 22 3B 51 38 24 3A 89 32 39 36 30 00 25 26 32 |.";Q8$:.2960.%&2|
00001E20: 0A 89 37 39 30 00 35 26 3C 0A 8F 20 20 53 55 42 |..790.5&<.. SUB|
00001E30: 52 64 7F 49 4E 00 3F 26 46 0A 8D 31 37 30 30 00 |Rd.IN.?&F..1700.|
00001E40: 80 26 50 0A 4C B2 35 30 30 3A 86 50 4C 24 28 33 |.&P.L.500:.PL$(3|
00001E50: AC 4C 29 3A 86 41 24 28 4C 29 3A 86 44 4C 28 4C |.L):.A$(L):.DL(L|
00001E60: 29 3A 86 44 4E 24 28 4C 29 3A 86 44 53 24 28 4C |):.DN$(L):.DS$(L|
00001E70: 29 3A 43 24 B2 22 41 2D 48 22 3A 8D 31 34 30 30 |):C$."A-H":.1400|
00001E80: 00 A6 26 5A 0A 8B 58 25 B3 B1 30 A7 59 B2 31 3A |..&Z..X%..0.Y.1:|
00001E90: 81 58 B2 36 35 A4 37 32 3A 51 24 B2 C7 28 58 29 |.X.65.72:Q$..(X)|
00001EA0: 3A 8D 32 38 32 30 00 B9 26 64 0A 8B 58 25 B3 B1 |:.2820..&d..X%..|
00001EB0: 30 A7 82 3A 8D 32 38 36 30 00 C5 26 6E 0A 9C 3A |0..:.2860..&n..:|
00001EC0: 8D 31 37 30 30 00 06 27 78 0A 4C B2 35 30 30 3A |.1700..'x.L.500:|
00001ED0: 86 50 4C 24 28 33 AC 4C 29 3A 86 41 24 28 4C 29 |.PL$(3.L):.A$(L)|
00001EE0: 3A 86 44 4C 28 4C 29 3A 86 44 4E 24 28 4C 29 3A |:.DL(L):.DN$(L):|
00001EF0: 86 44 53 24 28 4C 29 3A 43 24 B2 22 49 2D 50 22 |.DS$(L):C$."I-P"|
00001F00: 3A 8D 31 34 30 30 00 2C 27 82 0A 8B 58 25 B3 B1 |:.1400.,'...X%..|
00001F10: 30 A7 59 B2 31 3A 81 58 B2 37 33 A4 38 30 3A 51 |0.Y.1:.X.73.80:Q|
00001F20: 24 B2 C7 28 58 29 3A 8D 32 38 32 30 00 3F 27 8C |$..(X):.2820.?'.|
00001F30: 0A 8B 58 25 B3 B1 30 A7 82 3A 8D 32 38 36 30 00 |..X%..0..:.2860.|
00001F40: 4B 27 96 0A 9C 3A 8D 31 37 30 30 00 8C 27 A0 0A |K'...:.1700..'..|
00001F50: 4C B2 35 30 30 3A 86 50 4C 24 28 33 AC 4C 29 3A |L.500:.PL$(3.L):|
00001F60: 86 41 24 28 4C 29 3A 86 44 4C 28 4C 29 3A 86 44 |.A$(L):.DL(L):.D|
00001F70: 4E 24 28 4C 29 3A 86 44 53 24 28 4C 29 3A 43 24 |N$(L):.DS$(L):C$|
00001F80: B2 22 51 2D 5A 22 3A 8D 31 34 30 30 00 B2 27 AA |."Q-Z":.1400..'.|
00001F90: 0A 8B 58 25 B3 B1 30 A7 59 B2 31 3A 81 58 B2 38 |..X%..0.Y.1:.X.8|
00001FA0: 31 A4 39 30 3A 51 24 B2 C7 28 58 29 3A 8D 32 38 |1.90:Q$..(X):.28|
00001FB0: 32 30 00 C5 27 B4 0A 8B 58 25 B3 B1 30 A7 82 3A |20..'...X%..0..:|
00001FC0: 8D 32 38 36 30 00 D1 27 BE 0A 9C 3A 8D 31 37 30 |.2860..'...:.170|
00001FD0: 30 00 12 28 C8 0A 4C B2 35 30 30 3A 86 50 4C 24 |0..(..L.500:.PL$|
00001FE0: 28 33 AC 4C 29 3A 86 41 24 28 4C 29 3A 86 44 4C |(3.L):.A$(L):.DL|
00001FF0: 28 4C 29 3A 86 44 4E 24 28 4C 29 3A 86 44 53 24 |(L):.DN$(L):.DS$|
00002000: 28 4C 29 3A 43 24 B2 22 44 49 56 22 3A 8D 31 34 |(L):C$."DIV":.14|
00002010: 30 30 00 37 28 D2 0A 8B 58 25 B3 B1 30 A7 59 B2 |00.7(...X%..0.Y.|
00002020: 31 3A 81 58 B2 31 A4 36 34 3A 51 24 B2 C7 28 58 |1:.X.1.64:Q$..(X|
00002030: 29 3A 8D 32 38 32 30 00 5C 28 DC 0A 8B 58 25 B3 |):.2820.\(...X%.|
00002040: B1 30 A7 82 3A 81 58 B2 39 31 A4 32 35 35 3A 51 |.0..:.X.91.255:Q|
00002050: 24 B2 C7 28 58 29 3A 8D 32 38 32 30 00 6F 28 E6 |$..(X):.2820.o(.|
00002060: 0A 8B 58 25 B3 B1 30 A7 82 3A 8D 32 38 36 30 00 |..X%..0..:.2860.|
00002070: 75 28 F0 0A 9C 00 7E 28 FA 0A 89 37 39 30 00 8E |u(....~(...790..|
00002080: 28 04 0B 8F 20 20 53 55 42 52 64 7F 49 4E 00 D2 |(... SUBRd.IN..|
00002090: 28 0E 0B 81 49 B2 31 A4 58 25 3A 8B CA 28 50 4C |(...I.1.X%:..(PL|
000020A0: 24 28 49 29 2C 34 2C 31 29 B2 51 24 A7 41 24 28 |$(I),4,1).Q$.A$(|
000020B0: 59 29 B2 50 4C 24 28 49 29 3A 59 B2 59 AA 31 3A |Y).PL$(I):Y.Y.1:|
000020C0: 50 4C 24 28 49 29 B2 22 22 3A 99 59 2C 41 24 28 |PL$(I)."":.Y,A$(|
000020D0: 59 29 00 D8 28 18 0B 82 00 DE 28 22 0B 8E 00 EE |Y)..(.....("....|
000020E0: 28 2C 0B 8F 20 20 53 55 42 52 64 7F 49 4E 00 0E |(,.. SUBRd.IN..|
000020F0: 29 36 0B 99 22 93 53 4F 52 54 45 52 45 4E 20 4F |)6..".SORTEREN O|
00002100: 50 20 41 4C 46 41 42 45 54 20 22 3B 43 24 00 36 |P ALFABET ";C$.6|
00002110: 29 40 0B 59 B2 59 AB 31 3A 81 49 B2 31 A4 59 3A |)@.Y.Y.1:.I.1.Y:|
00002120: 58 B2 30 3A 50 4C 24 28 30 29 B2 41 24 28 49 29 |X.0:PL$(0).A$(I)|
00002130: 3A 8D 31 32 39 30 00 7E 29 4A 0B 44 4C 28 49 AA |:.1290.~)J.DL(I.|
00002140: 36 29 B2 44 4C 28 42 29 3A 44 4E 24 28 49 AA 36 |6).DL(B):DN$(I.6|
00002150: 29 B2 44 4E 24 28 42 29 3A 44 53 24 28 49 AA 36 |).DN$(B):DS$(I.6|
00002160: 29 B2 44 53 24 3A 81 4B B2 30 A4 35 3A 44 4E 24 |).DS$:.K.0.5:DN$|
00002170: 28 4B 29 B2 22 22 3A 44 4C 28 4B 29 B2 30 00 8F |(K)."":DL(K).0..|
00002180: 29 54 0B 44 53 24 B2 22 22 3A 82 4B 3A 82 49 00 |)T.DS$."":.K:.I.|
00002190: B8 29 5E 0B 81 49 B2 31 A4 59 3A 44 4C 28 49 29 |.)^..I.1.Y:DL(I)|
000021A0: B2 44 4C 28 49 AA 36 29 3A 44 4E 24 28 49 29 B2 |.DL(I.6):DN$(I).|
000021B0: 44 4E 24 28 49 AA 36 29 00 E8 29 63 0B 44 53 24 |DN$(I.6)..)c.DS$|
000021C0: 28 49 29 B2 C8 28 44 53 24 28 49 AA 36 29 2C 31 |(I)..(DS$(I.6),1|
000021D0: 29 AA 22 20 20 22 AA CA 28 44 53 24 28 49 AA 36 |)." "..(DS$(I.6|
000021E0: 29 2C 32 2C 32 29 3A 82 00 15 2A 68 0B 81 49 B2 |),2,2):...*h..I.|
000021F0: 59 AA 31 A4 59 AA 36 3A 44 4C 28 49 29 B2 30 3A |Y.1.Y.6:DL(I).0:|
00002200: 44 4E 24 28 49 29 B2 22 22 3A 44 53 24 28 49 29 |DN$(I)."":DS$(I)|
00002210: B2 22 22 3A 82 00 5C 2A 72 0B 44 58 25 B2 59 3A |."":..\*r.DX%.Y:|
00002220: 51 33 24 B2 22 50 52 4F 47 52 41 4D 4D 41 2D 54 |Q3$."PROGRAMMA-T|
00002230: 49 54 45 4C 53 22 3A 51 34 24 B2 22 4F 50 20 41 |ITELS":Q4$."OP A|
00002240: 4C 46 41 42 45 54 22 3A 51 35 24 B2 22 22 3A 51 |LFABET":Q5$."":Q|
00002250: 36 24 B2 22 44 49 53 4B 2B 49 44 22 00 66 2A 7C |6$."DISK+ID".f*||
00002260: 0B 8D 31 37 36 30 00 6C 2A 86 0B 8E 00 7C 2A 90 |..1760.l*....|*.|
00002270: 0B 8F 20 20 53 55 42 52 64 7F 49 4E 00 B1 2A 9A |.. SUBRd.IN..*.|
00002280: 0B 86 50 4C 24 28 31 35 30 30 29 3A 86 41 24 28 |..PL$(1500):.A$(|
00002290: 35 30 30 29 3A 86 44 4C 28 35 30 30 29 3A 86 44 |500):.DL(500):.D|
000022A0: 4E 24 28 35 30 30 29 3A 86 44 53 24 28 35 30 30 |N$(500):.DS$(500|
000022B0: 29 00 D4 2A A4 0B 8B 51 37 24 B1 51 38 24 A7 58 |)..*...Q7$.Q8$.X|
000022C0: 24 B2 51 38 24 3A 51 38 24 B2 51 37 24 3A 51 37 |$.Q8$:Q8$.Q7$:Q7|
000022D0: 24 B2 58 24 00 F3 2A AE 0B 81 54 B2 C6 28 C8 28 |$.X$..*...T..(.(|
000022E0: 51 37 24 2C 31 29 29 A4 C6 28 C8 28 51 38 24 2C |Q7$,1))..(.(Q8$,|
000022F0: 31 29 29 00 16 2B B8 0B 8B 54 B3 36 35 A7 54 B2 |1))..+...T.65.T.|
00002300: 36 34 3A 54 31 B2 31 3A 43 24 B2 22 44 49 56 22 |64:T1.1:C$."DIV"|
00002310: 3A 8D 31 34 30 30 00 3F 2B C2 0B 8B 54 B1 36 34 |:.1400.?+...T.64|
00002320: AF 54 B3 37 33 A7 54 B2 37 32 3A 54 31 B2 36 35 |.T.73.T.72:T1.65|
00002330: 3A 43 24 B2 22 41 2D 48 22 3A 8D 31 34 30 30 00 |:C$."A-H":.1400.|
00002340: 68 2B CC 0B 8B 54 B1 37 32 AF 54 B3 38 31 A7 54 |h+...T.72.T.81.T|
00002350: B2 38 30 3A 54 31 B2 37 33 3A 43 24 B2 22 49 2D |.80:T1.73:C$."I-|
00002360: 50 22 3A 8D 31 34 30 30 00 91 2B D6 0B 8B 54 B1 |P":.1400..+...T.|
00002370: 38 30 AF 54 B3 39 31 A7 54 B2 39 30 3A 54 31 B2 |80.T.91.T.90:T1.|
00002380: 38 31 3A 43 24 B2 22 51 2D 5A 22 3A 8D 31 34 30 |81:C$."Q-Z":.140|
00002390: 30 00 B6 2B E0 0B 8B 54 B1 39 30 A7 54 B2 32 35 |0..+...T.90.T.25|
000023A0: 35 3A 54 31 B2 39 31 3A 43 24 B2 22 44 49 56 22 |5:T1.91:C$."DIV"|
000023B0: 3A 8D 31 34 30 30 00 D0 2B EA 0B 81 58 B2 54 31 |:.1400..+...X.T1|
000023C0: A4 54 3A 51 24 B2 C7 28 58 29 3A 8D 32 38 32 30 |.T:Q$..(X):.2820|
000023D0: 00 DC 2B F4 0B 82 3A 8D 32 38 36 30 00 E3 2B FE |..+...:.2860..+.|
000023E0: 0B 82 54 00 EE 2B 08 0C 9C 3A 89 37 39 30 00 FE |..T..+...:.790..|
000023F0: 2B 12 0C 8F 20 20 53 55 42 52 64 7F 49 4E 00 07 |+... SUBRd.IN..|
00002400: 2C 1C 0C 8D 33 38 30 00 10 2C 26 0C 8D 34 31 30 |,...380..,&..410|
00002410: 00 1E 2C 30 0C 59 B2 38 3A 8D 31 34 35 30 00 44 |..,0.Y.8:.1450.D|
00002420: 2C 3A 0C 99 22 12 5A 4F 45 4B 52 4F 55 54 49 4E |,:..".ZOEKROUTIN|
00002430: 45 20 4F 50 20 45 45 4E 20 54 52 45 46 57 4F 4F |E OP EEN TREFWOO|
00002440: 52 44 92 22 00 76 2C 44 0C 85 22 11 12 42 45 47 |RD.".v,D.."..BEG|
00002450: 49 4E 54 92 20 44 45 20 4E 41 41 4D 20 4D 45 54 |INT. DE NAAM MET|
00002460: 20 48 45 54 20 54 52 45 46 57 4F 4F 52 44 20 4A | HET TREFWOORD J|
00002470: 2F 4E 22 3B 51 24 00 92 2C 4E 0C 8B 51 24 B3 B1 |/N";Q$..,N..Q$..|
00002480: 22 4A 22 AF 51 24 B3 B1 22 4E 22 A7 9C 3A 89 37 |"J".Q$.."N"..:.7|
00002490: 39 30 00 AE 2C 58 0C 85 22 11 12 47 45 45 46 20 |90..,X.."..GEEF |
000024A0: 54 52 45 46 57 4F 4F 52 44 22 3B 51 31 24 00 C0 |TREFWOORD";Q1$..|
000024B0: 2C 62 0C 8B 51 24 B2 22 4A 22 A7 89 33 31 39 30 |,b..Q$."J"..3190|
000024C0: 00 CA 2C 6C 0C 89 33 33 37 30 00 DA 2C 76 0C 8F |..,l..3370..,v..|
000024D0: 20 20 53 55 42 52 64 7F 49 4E 00 06 2D 80 0C 85 | SUBRd.IN..-...|
000024E0: 22 56 49 41 20 50 52 49 4E 54 45 52 20 4A 2F 4E |"VIA PRINTER J/N|
000024F0: 22 3B 54 24 3A 51 31 B2 33 3A 8B 54 24 B2 22 4A |";T$:Q1.3:.T$."J|
00002500: 22 A7 51 31 B2 34 00 2B 2D 8A 0C 9F 34 2C 51 31 |".Q1.4.+-...4,Q1|
00002510: 3A 98 34 3A 98 34 3A 98 34 2C 22 11 54 52 45 46 |:.4:.4:.4,".TREF|
00002520: 57 4F 4F 52 44 3A 22 3B 51 31 24 00 53 2D 94 0C |WOORD:";Q1$.S-..|
00002530: 51 24 B2 C8 28 51 31 24 2C 31 29 3A 51 32 24 B2 |Q$..(Q1$,1):Q2$.|
00002540: C8 28 51 31 24 2C 32 29 3A 86 50 4C 24 28 31 35 |.(Q1$,2):.PL$(15|
00002550: 30 30 29 00 75 2D 9E 0C 8B 51 24 B3 22 41 22 B0 |00).u-...Q$."A".|
00002560: 51 24 B1 22 5A 22 A7 43 24 B2 22 44 49 56 22 3A |Q$."Z".C$."DIV":|
00002570: 8D 31 34 30 30 00 98 2D A8 0C 8B 51 24 B1 B2 22 |.1400..-...Q$.."|
00002580: 41 22 AF 51 24 B3 22 49 22 A7 43 24 B2 22 41 2D |A".Q$."I".C$."A-|
00002590: 48 22 3A 8D 31 34 30 30 00 BA 2D B2 0C 8B 51 24 |H":.1400..-...Q$|
000025A0: B1 22 48 22 AF 51 24 B3 22 51 22 A7 43 24 B2 22 |."H".Q$."Q".C$."|
000025B0: 49 2D 50 22 3A 8D 31 34 30 30 00 DD 2D BC 0C 8B |I-P":.1400..-...|
000025C0: 51 24 B1 22 50 22 AF 51 24 B3 B2 22 5A 22 A7 43 |Q$."P".Q$.."Z".C|
000025D0: 24 B2 22 51 2D 5A 22 3A 8D 31 34 30 30 00 11 2E |$."Q-Z":.1400...|
000025E0: C6 0C 98 34 2C 22 93 12 4C 45 4E 47 54 45 20 20 |...4,"..LENGTE |
000025F0: 20 20 50 52 4F 47 52 2E 4E 41 41 4D 20 20 20 20 | PROGR.NAAM |
00002600: 20 20 44 49 53 4B 4E 41 41 4D 2B 49 44 20 20 92 | DISKNAAM+ID .|
00002610: 22 00 36 2E D0 0C 81 49 B2 31 A4 58 25 3A 8B 51 |".6....I.1.X%:.Q|
00002620: 32 24 B2 CA 28 50 4C 24 28 49 29 2C 34 2C 32 29 |2$..(PL$(I),4,2)|
00002630: A7 8D 33 33 31 30 00 5A 2E DA 0C 82 3A 85 22 57 |..3310.Z....:."W|
00002640: 49 4C 54 20 55 20 44 4F 4F 52 47 41 41 4E 28 52 |ILT U DOORGAAN(R|
00002650: 45 54 55 52 4E 29 22 3B 51 24 00 65 2E E4 0C 9C |ETURN)";Q$.e....|
00002660: 3A 89 37 39 30 00 75 2E EE 0C 8F 20 20 53 55 42 |:.790.u.... SUB|
00002670: 52 64 7F 49 4E 00 83 2E F8 0C 58 B2 49 3A 8D 31 |Rd.IN.....X.I:.1|
00002680: 32 39 30 00 BB 2E 02 0D 8B 51 31 24 B2 C8 28 44 |290......Q1$..(D|
00002690: 4E 24 28 42 29 2C C3 28 51 31 24 29 29 A7 98 34 |N$(B),.(Q1$))..4|
000026A0: 2C 44 4C 28 42 29 3B A6 35 AB C3 28 C4 28 44 4C |,DL(B);.5..(.(DL|
000026B0: 28 42 29 29 29 29 3B 3A 54 B2 31 00 EC 2E 0C 0D |(B))));:T.1.....|
000026C0: 8B 54 B2 31 A7 98 34 2C 44 4E 24 28 42 29 3B A6 |.T.1..4,DN$(B);.|
000026D0: 32 32 AB C3 28 44 4E 24 28 42 29 29 29 3B C8 28 |22..(DN$(B)));.(|
000026E0: 44 53 24 2C 31 29 3B 22 20 20 22 3B 00 05 2F 16 |DS$,1);" ";../.|
000026F0: 0D 8B 54 B2 31 A7 54 B2 30 3A 98 34 2C C9 28 44 |..T.1.T.0:.4,.(D|
00002700: 53 24 2C 32 29 00 0B 2F 20 0D 8E 00 1B 2F 2A 0D |S$,2)../ ..../*.|
00002710: 8F 20 20 53 55 42 52 64 7F 49 4E 00 51 2F 34 0D |. SUBRd.IN.Q/4.|
00002720: 85 22 12 50 52 49 4E 54 45 4E 20 56 49 41 20 50 |.".PRINTEN VIA P|
00002730: 52 49 4E 54 45 52 20 4A 2F 4E 92 22 3B 54 24 3A |RINTER J/N.";T$:|
00002740: 51 31 B2 33 3A 8B 54 24 B2 22 4A 22 A7 51 31 B2 |Q1.3:.T$."J".Q1.|
00002750: 34 00 86 2F 39 0D 86 44 4C 28 31 34 35 29 3A 86 |4../9..DL(145):.|
00002760: 44 4E 24 28 31 34 35 29 3A 86 44 53 24 28 31 34 |DN$(145):.DS$(14|
00002770: 35 29 3A 86 50 4C 24 28 31 35 30 30 29 3A 86 41 |5):.PL$(1500):.A|
00002780: 24 28 31 34 35 29 00 C0 2F 3E 0D 9F 34 2C 51 31 |$(145)../>..4,Q1|
00002790: 3A 98 34 3A 98 34 2C 22 12 50 52 4F 47 52 41 4D |:.4:.4,".PROGRAM|
000027A0: 4D 41 27 53 20 42 45 47 49 4E 4E 45 4E 44 20 4D |MA'S BEGINNEND M|
000027B0: 45 54 20 4C 45 54 54 45 52 53 20 41 2D 48 92 22 |ET LETTERS A-H."|
000027C0: 00 D3 2F 48 0D 43 24 B2 22 41 2D 48 22 3A 8D 31 |../H.C$."A-H":.1|
000027D0: 34 30 30 00 E4 2F 52 0D 8B 58 25 B3 B1 30 A7 8D |400../R..X%..0..|
000027E0: 33 37 31 30 00 EE 2F 5C 0D 98 34 3A A0 34 00 27 |3710../\..4:.4.'|
000027F0: 30 66 0D 42 24 B2 C7 28 31 33 29 3A 9F 31 35 2C |0f.B$..(13):.15,|
00002800: 38 2C 31 35 3A 9F 38 2C 38 2C 38 2C 22 40 30 3A |8,15:.8,8,8,"@0:|
00002810: 52 4F 54 5A 4F 4F 49 2C 53 2C 57 22 3A 98 38 2C |ROTZOOI,S,W":.8,|
00002820: 51 31 24 42 24 51 31 00 60 30 70 0D A0 38 3A A0 |Q1$B$Q1.`0p..8:.|
00002830: 31 35 3A 9C 3A 9F 31 35 2C 38 2C 31 35 3A 9F 38 |15:.:.15,8,15:.8|
00002840: 2C 38 2C 38 2C 22 52 4F 54 5A 4F 4F 49 2C 53 2C |,8,8,"ROTZOOI,S,|
00002850: 52 22 3A 46 31 B2 38 31 32 34 3A 8D 31 32 35 30 |R":F1.8124:.1250|
00002860: 00 6E 30 7A 0D 84 38 2C 51 31 24 2C 51 31 00 79 |.n0z..8,Q1$,Q1.y|
00002870: 30 84 0D A0 38 3A A0 31 35 00 A0 30 8E 0D 85 22 |0...8:.15..0..."|
00002880: 12 44 4F 4F 52 47 41 41 4E 20 4A 2F 4E 92 22 3B |.DOORGAAN J/N.";|
00002890: 54 24 3A 8B 54 24 B3 B1 22 4A 22 A7 89 37 39 30 |T$:.T$.."J"..790|
000028A0: 00 D5 30 93 0D 86 44 4C 28 31 34 35 29 3A 86 44 |..0...DL(145):.D|
000028B0: 4E 24 28 31 34 35 29 3A 86 44 53 24 28 31 34 35 |N$(145):.DS$(145|
000028C0: 29 3A 86 50 4C 24 28 31 35 30 30 29 3A 86 41 24 |):.PL$(1500):.A$|
000028D0: 28 31 34 35 29 00 0F 31 98 0D 9F 34 2C 51 31 3A |(145)..1...4,Q1:|
000028E0: 98 34 3A 98 34 2C 22 12 50 52 4F 47 52 41 4D 4D |.4:.4,".PROGRAMM|
000028F0: 41 27 53 20 42 45 47 49 4E 4E 45 4E 44 20 4D 45 |A'S BEGINNEND ME|
00002900: 54 20 4C 45 54 54 45 52 53 20 49 2D 50 92 22 00 |T LETTERS I-P.".|
00002910: 22 31 A2 0D 43 24 B2 22 49 2D 50 22 3A 8D 31 34 |"1..C$."I-P":.14|
00002920: 30 30 00 33 31 AC 0D 8B 58 25 B3 B1 30 A7 8D 33 |00.31...X%..0..3|
00002930: 37 31 30 00 3D 31 B6 0D 98 34 3A A0 34 00 76 31 |710.=1...4:.4.v1|
00002940: C0 0D 42 24 B2 C7 28 31 33 29 3A 9F 31 35 2C 38 |..B$..(13):.15,8|
00002950: 2C 31 35 3A 9F 38 2C 38 2C 38 2C 22 40 30 3A 52 |,15:.8,8,8,"@0:R|
00002960: 4F 54 5A 4F 4F 49 2C 53 2C 57 22 3A 98 38 2C 51 |OTZOOI,S,W":.8,Q|
00002970: 31 24 42 24 51 31 00 AF 31 CA 0D A0 38 3A A0 31 |1$B$Q1..1...8:.1|
00002980: 35 3A 9C 3A 9F 31 35 2C 38 2C 31 35 3A 9F 38 2C |5:.:.15,8,15:.8,|
00002990: 38 2C 38 2C 22 52 4F 54 5A 4F 4F 49 2C 53 2C 52 |8,8,"ROTZOOI,S,R|
000029A0: 22 3A 46 31 B2 38 31 37 34 3A 8D 31 32 35 30 00 |":F1.8174:.1250.|
000029B0: BD 31 D4 0D 84 38 2C 51 31 24 2C 51 31 00 C8 31 |.1...8,Q1$,Q1..1|
000029C0: DE 0D A0 38 3A A0 31 35 00 EF 31 E8 0D 85 22 12 |...8:.15..1...".|
000029D0: 44 4F 4F 52 47 41 41 4E 20 4A 2F 4E 92 22 3B 54 |DOORGAAN J/N.";T|
000029E0: 24 3A 8B 54 24 B3 B1 22 4A 22 A7 89 37 39 30 00 |$:.T$.."J"..790.|
000029F0: 24 32 ED 0D 86 44 4C 28 31 34 35 29 3A 86 44 4E |$2...DL(145):.DN|
00002A00: 24 28 31 34 35 29 3A 86 44 53 24 28 31 34 35 29 |$(145):.DS$(145)|
00002A10: 3A 86 50 4C 24 28 31 35 30 30 29 3A 86 41 24 28 |:.PL$(1500):.A$(|
00002A20: 31 34 35 29 00 5E 32 F2 0D 9F 34 2C 51 31 3A 98 |145).^2...4,Q1:.|
00002A30: 34 3A 98 34 2C 22 12 50 52 4F 47 52 41 4D 4D 41 |4:.4,".PROGRAMMA|
00002A40: 27 53 20 42 45 47 49 4E 4E 45 4E 44 20 4D 45 54 |'S BEGINNEND MET|
00002A50: 20 4C 45 54 54 45 52 53 20 51 2D 5A 92 22 00 71 | LETTERS Q-Z.".q|
00002A60: 32 FC 0D 43 24 B2 22 51 2D 5A 22 3A 8D 31 34 30 |2..C$."Q-Z":.140|
00002A70: 30 00 82 32 06 0E 8B 58 25 B3 B1 30 A7 8D 33 37 |0..2...X%..0..37|
00002A80: 31 30 00 8C 32 10 0E 98 34 3A A0 34 00 C5 32 1A |10..2...4:.4..2.|
00002A90: 0E 42 24 B2 C7 28 31 33 29 3A 9F 31 35 2C 38 2C |.B$..(13):.15,8,|
00002AA0: 31 35 3A 9F 38 2C 38 2C 38 2C 22 40 30 3A 52 4F |15:.8,8,8,"@0:RO|
00002AB0: 54 5A 4F 4F 49 2C 53 2C 57 22 3A 98 38 2C 51 31 |TZOOI,S,W":.8,Q1|
00002AC0: 24 42 24 51 31 00 FE 32 24 0E A0 38 3A A0 31 35 |$B$Q1..2$..8:.15|
00002AD0: 3A 9C 3A 9F 31 35 2C 38 2C 31 35 3A 9F 38 2C 38 |:.:.15,8,15:.8,8|
00002AE0: 2C 38 2C 22 52 4F 54 5A 4F 4F 49 2C 53 2C 52 22 |,8,"ROTZOOI,S,R"|
00002AF0: 3A 46 31 B2 38 32 32 34 3A 8D 31 32 35 30 00 0C |:F1.8224:.1250..|
00002B00: 33 2E 0E 84 38 2C 51 31 24 2C 51 31 00 17 33 38 |3...8,Q1$,Q1..38|
00002B10: 0E A0 38 3A A0 31 35 00 3E 33 42 0E 85 22 12 44 |..8:.15.>3B..".D|
00002B20: 4F 4F 52 47 41 41 4E 20 4A 2F 4E 92 22 3B 54 24 |OORGAAN J/N.";T$|
00002B30: 3A 8B 54 24 B3 B1 22 4A 22 A7 89 37 39 30 00 73 |:.T$.."J"..790.s|
00002B40: 33 47 0E 86 44 4C 28 31 34 35 29 3A 86 44 4E 24 |3G..DL(145):.DN$|
00002B50: 28 31 34 35 29 3A 86 44 53 24 28 31 34 35 29 3A |(145):.DS$(145):|
00002B60: 86 50 4C 24 28 31 35 30 30 29 3A 86 41 24 28 31 |.PL$(1500):.A$(1|
00002B70: 34 35 29 00 AD 33 4C 0E 9F 34 2C 51 31 3A 98 34 |45)..3L..4,Q1:.4|
00002B80: 3A 98 34 2C 22 12 50 52 4F 47 52 41 4D 4D 41 27 |:.4,".PROGRAMMA'|
00002B90: 53 20 42 45 47 49 4E 4E 45 4E 44 20 44 49 56 45 |S BEGINNEND DIVE|
00002BA0: 52 53 45 20 4C 45 54 54 45 52 53 92 22 00 C0 33 |RSE LETTERS."..3|
00002BB0: 56 0E 43 24 B2 22 44 49 56 22 3A 8D 31 34 30 30 |V.C$."DIV":.1400|
00002BC0: 00 D1 33 60 0E 8B 58 25 B3 B1 30 A7 8D 33 37 31 |..3`..X%..0..371|
00002BD0: 30 00 DB 33 6A 0E 98 34 3A A0 34 00 17 34 74 0E |0..3j..4:.4..4t.|
00002BE0: 99 22 44 41 54 20 57 41 53 20 48 45 54 20 44 41 |."DAT WAS HET DA|
00002BF0: 4E 22 3A 85 22 57 49 4C 54 20 55 20 44 4F 4F 52 |N":."WILT U DOOR|
00002C00: 47 41 41 4E 28 52 45 54 55 52 4E 29 22 3B 51 24 |GAAN(RETURN)";Q$|
00002C10: 3A 9C 3A 89 37 39 30 00 27 34 7E 0E 8F 20 20 53 |:.:.790.'4~.. S|
00002C20: 55 42 52 64 7F 49 4E 00 3D 34 88 0E 81 49 B2 31 |UBRd.IN.=4...I.1|
00002C30: A4 58 25 3A 58 B2 49 3A 8D 31 32 39 30 00 54 34 |.X%:X.I:.1290.T4|
00002C40: 92 0E 81 4C B2 31 A4 31 36 AB C3 28 51 31 24 29 |...L.1.16..(Q1$)|
00002C50: 3A 54 B2 30 00 8E 34 9C 0E 8B CA 28 44 4E 24 28 |:T.0..4....(DN$(|
00002C60: 42 29 2C 4C 2C C3 28 51 31 24 29 29 B2 51 31 24 |B),L,.(Q1$)).Q1$|
00002C70: A7 98 34 2C 44 4C 28 42 29 3B A6 35 AB C3 28 C4 |..4,DL(B);.5..(.|
00002C80: 28 44 4C 28 42 29 29 29 29 3B 3A 54 B2 31 00 BF |(DL(B))));:T.1..|
00002C90: 34 A6 0E 8B 54 B2 31 A7 98 34 2C 44 4E 24 28 42 |4...T.1..4,DN$(B|
00002CA0: 29 3B A6 32 32 AB C3 28 44 4E 24 28 42 29 29 29 |);.22..(DN$(B)))|
00002CB0: 3B C8 28 44 53 24 2C 31 29 3B 22 20 20 22 3B 00 |;.(DS$,1);" ";.|
00002CC0: D8 34 B0 0E 8B 54 B2 31 A7 54 B2 30 3A 98 34 2C |.4...T.1.T.0:.4,|
00002CD0: C9 28 44 53 24 2C 32 29 00 E0 34 BA 0E 82 3A 82 |.(DS$,2)..4...:.|
00002CE0: 00 E6 34 C4 0E 8E 00 F6 34 CE 0E 8F 20 20 53 55 |..4.....4... SU|
00002CF0: 42 52 64 7F 49 4E 00 FF 34 D8 0E 8D 33 38 30 00 |BRd.IN..4...380.|
00002D00: 08 35 E2 0E 8D 34 31 30 00 16 35 EC 0E 59 B2 38 |.5...410..5..Y.8|
00002D10: 3A 8D 31 34 35 30 00 46 35 F6 0E 99 22 12 50 52 |:.1450.F5...".PR|
00002D20: 49 4E 54 45 4E 20 44 49 53 4B 2D 44 49 52 45 4B |INTEN DISK-DIREK|
00002D30: 54 4F 52 49 45 53 20 45 56 54 2E 20 4D 45 54 20 |TORIES EVT. MET |
00002D40: 4F 50 4D 2E 92 22 00 70 35 00 0F 85 22 11 49 53 |OPM..".p5...".IS|
00002D50: 20 45 52 20 45 45 4E 20 50 52 49 4E 54 45 52 20 | ER EEN PRINTER |
00002D60: 41 41 4E 47 45 53 4C 4F 54 45 4E 22 3B 51 31 24 |AANGESLOTEN";Q1$|
00002D70: 00 9C 35 0A 0F 8B 51 31 24 B2 22 4A 22 A7 85 22 |..5...Q1$."J".."|
00002D80: 11 57 49 4C 54 20 55 20 4D 45 54 20 4F 50 4D 45 |.WILT U MET OPME|
00002D90: 52 4B 49 4E 47 45 4E 22 3B 51 32 24 00 DF 35 14 |RKINGEN";Q2$..5.|
00002DA0: 0F 85 22 11 12 56 41 4E 20 57 45 4C 4B 45 20 53 |.."..VAN WELKE S|
00002DB0: 43 48 49 4A 46 28 49 4E 44 49 45 4E 20 4F 4E 42 |CHIJF(INDIEN ONB|
00002DC0: 45 4B 45 4E 44 20 44 41 4E 20 52 45 54 55 52 4E |EKEND DAN RETURN|
00002DD0: 22 3B 51 33 24 3A 86 58 41 24 28 31 30 30 29 00 |";Q3$:.XA$(100).|
00002DE0: EE 35 1E 0F 86 58 42 24 28 31 35 30 30 29 00 00 |.5...XB$(1500)..|
00002DF0: 36 28 0F 8B 51 33 24 B2 22 22 A7 8D 33 39 33 30 |6(..Q3$.""..3930|
00002E00: 00 2E 36 32 0F 51 24 B2 C8 28 51 33 24 2C 31 29 |..62.Q$..(Q3$,1)|
00002E10: 3A 8B 51 24 B3 22 41 22 B0 51 24 B1 22 5A 22 A7 |:.Q$."A".Q$."Z".|
00002E20: 43 24 B2 22 44 49 56 22 3A 89 34 30 31 30 00 51 |C$."DIV":.4010.Q|
00002E30: 36 3C 0F 8B 51 24 B1 B2 22 41 22 AF 51 24 B3 22 |6<..Q$.."A".Q$."|
00002E40: 49 22 A7 43 24 B2 22 41 2D 48 22 3A 89 34 30 31 |I".C$."A-H":.401|
00002E50: 30 00 73 36 46 0F 8B 51 24 B1 22 48 22 AF 51 24 |0.s6F..Q$."H".Q$|
00002E60: B3 22 51 22 A7 43 24 B2 22 49 2D 50 22 3A 89 34 |."Q".C$."I-P":.4|
00002E70: 30 31 30 00 96 36 50 0F 8B 51 24 B1 22 50 22 AF |010..6P..Q$."P".|
00002E80: 51 24 B3 B2 22 5A 22 A7 43 24 B2 22 51 2D 5A 22 |Q$.."Z".C$."Q-Z"|
00002E90: 3A 89 34 30 31 30 00 A6 36 5A 0F 8F 20 20 53 55 |:.4010..6Z.. SU|
00002EA0: 42 52 64 7F 49 4E 00 D8 36 64 0F 9F 31 35 2C 38 |BRd.IN..6d..15,8|
00002EB0: 2C 31 35 3A 9F 38 2C 38 2C 38 2C 22 41 4C 46 2E |,15:.8,8,8,"ALF.|
00002EC0: 44 49 53 4B 45 54 20 22 AA 43 24 AA 22 2C 53 2C |DISKET ".C$.",S,|
00002ED0: 52 22 3A 8D 31 32 35 30 00 0C 37 6E 0F 84 38 2C |R":.1250..7n..8,|
00002EE0: 58 25 3A 81 49 B2 31 A4 58 25 3A 84 38 2C 59 25 |X%:.I.1.X%:.8,Y%|
00002EF0: 2C 58 41 24 28 49 29 3A 81 4A B2 31 A4 59 25 3A |,XA$(I):.J.1.Y%:|
00002F00: 84 38 2C 58 42 24 3A 82 4A 3A 82 49 00 17 37 78 |.8,XB$:.J:.I..7x|
00002F10: 0F A0 38 3A A0 31 35 00 5B 37 82 0F 99 22 93 12 |..8:.15.[7..."..|
00002F20: 42 45 50 41 41 4C 20 55 57 20 4B 45 55 5A 45 20 |BEPAAL UW KEUZE |
00002F30: 4D 45 54 20 45 45 4E 20 4E 55 4D 4D 45 52 92 22 |MET EEN NUMMER."|
00002F40: 3A 99 22 53 54 4F 50 20 4C 49 53 54 49 4E 47 20 |:."STOP LISTING |
00002F50: 4D 45 54 20 52 45 54 55 52 4E 22 00 82 37 8C 0F |MET RETURN"..7..|
00002F60: 81 49 B2 31 A4 58 25 3A 99 58 41 24 28 49 29 3A |.I.1.X%:.XA$(I):|
00002F70: A1 54 24 3A 8B 54 24 B2 C7 28 31 33 29 A7 49 B2 |.T$:.T$..(13).I.|
00002F80: 58 25 00 92 37 96 0F 81 58 B2 31 A4 31 30 3A 82 |X%..7...X.1.10:.|
00002F90: 3A 82 00 B1 37 A0 0F 85 22 55 57 20 4B 45 55 5A |:...7..."UW KEUZ|
00002FA0: 45 22 3B 54 3A 51 33 24 B2 58 41 24 28 54 29 3A |E";T:Q3$.XA$(T):|
00002FB0: 8E 00 C1 37 AA 0F 8F 20 20 53 55 42 52 64 7F 49 |...7... SUBRd.I|
00002FC0: 4E 00 F3 37 B4 0F 9F 31 35 2C 38 2C 31 35 3A 9F |N..7...15,8,15:.|
00002FD0: 38 2C 38 2C 38 2C 22 41 4C 46 2E 44 49 53 4B 45 |8,8,8,"ALF.DISKE|
00002FE0: 54 20 22 AA 43 24 AA 22 2C 53 2C 52 22 3A 8D 31 |T ".C$.",S,R":.1|
00002FF0: 32 35 30 00 2C 38 BE 0F 84 38 2C 58 25 3A 81 49 |250.,8...8,X%:.I|
00003000: B2 31 A4 58 25 3A 84 38 2C 59 32 25 2C 58 41 24 |.1.X%:.8,Y2%,XA$|
00003010: 3A 8B C8 28 58 41 24 2C C3 28 51 33 24 29 29 B2 |:..(XA$,.(Q3$)).|
00003020: 51 33 24 A7 54 B2 49 3A 49 B2 58 25 00 54 38 C8 |Q3$.T.I:I.X%.T8.|
00003030: 0F 8B 54 B2 30 A7 81 4A B2 59 31 25 A4 59 32 25 |..T.0..J.Y1%.Y2%|
00003040: 3A 84 38 2C 58 42 24 3A 82 4A 3A 59 31 25 B2 59 |:.8,XB$:.J:Y1%.Y|
00003050: 32 25 3A 82 00 7A 38 D2 0F 8B 54 B2 30 A7 A0 38 |2%:..z8...T.0..8|
00003060: 3A A0 31 35 3A 99 22 44 49 53 4B 20 4E 49 45 54 |:.15:."DISK NIET|
00003070: 20 47 45 56 4F 4E 44 45 4E 22 00 8A 38 DC 0F 8B | GEVONDEN"..8...|
00003080: 54 B2 30 A7 9C 3A 89 37 39 30 00 AF 38 E6 0F 49 |T.0..:.790..8..I|
00003090: B2 31 3A 81 4A B2 59 31 25 A4 59 32 25 3A 84 38 |.1:.J.Y1%.Y2%:.8|
000030A0: 2C 58 42 24 28 49 29 3A 49 B2 49 AA 31 3A 82 00 |,XB$(I):I.I.1:..|
000030B0: DA 38 F0 0F 44 58 25 B2 49 3A 81 49 B2 31 A4 44 |.8..DX%.I:.I.1.D|
000030C0: 58 25 3A 58 B2 30 3A 50 4C 24 28 58 29 B2 58 42 |X%:X.0:PL$(X).XB|
000030D0: 24 28 49 29 3A 8D 31 32 39 30 00 0C 39 FA 0F 81 |$(I):.1290..9...|
000030E0: 4B B2 30 A4 35 3A 8B C8 28 58 42 24 28 49 29 2C |K.0.5:..(XB$(I),|
000030F0: 32 29 B2 C8 28 58 42 24 28 49 AA 31 29 2C 32 29 |2)..(XB$(I.1),2)|
00003100: A7 49 B2 49 AA 31 3A 8D 34 31 32 30 00 16 39 04 |.I.I.1:.4120..9.|
00003110: 10 82 4B 3A 82 49 00 21 39 0E 10 9C 3A 89 37 39 |..K:.I.!9...:.79|
00003120: 30 00 31 39 18 10 8F 20 20 53 55 42 52 64 7F 49 |0.19... SUBRd.I|
00003130: 4E 00 46 39 22 10 8B 51 32 24 B2 22 4A 22 A7 9F |N.F9"..Q2$."J"..|
00003140: 34 2C 34 3A 9D 34 00 7A 39 2C 10 99 22 42 4C 4F |4,4:.4.z9,.."BLO|
00003150: 4B 53 3A 22 3B 44 4C 28 49 29 3B A3 31 32 29 3B |KS:";DL(I);.12);|
00003160: 44 4E 24 28 49 29 3B A3 33 30 29 3B CA 28 44 53 |DN$(I);.30);.(DS|
00003170: 24 28 49 29 2C 32 2C 35 29 3B 00 8A 39 36 10 8B |$(I),2,5);..96..|
00003180: 51 33 24 B3 B1 22 4A 22 A7 99 00 AF 39 40 10 8B |Q3$.."J"....9@..|
00003190: 51 33 24 B2 22 4A 22 AF CA 28 44 53 24 28 49 29 |Q3$."J"..(DS$(I)|
000031A0: 2C 36 2C 31 29 B2 22 4A 22 A7 8D 34 31 38 30 00 |,6,1)."J"..4180.|
000031B0: B5 39 4A 10 8E 00 C5 39 54 10 8F 20 20 53 55 42 |.9J....9T.. SUB|
000031C0: 52 64 7F 49 4E 00 D8 39 5E 10 5A 24 B2 C8 28 44 |Rd.IN..9^.Z$..(D|
000031D0: 4E 24 28 49 29 2C 31 29 00 FA 39 68 10 8B 5A 24 |N$(I),1)..9h..Z$|
000031E0: B3 22 41 22 B0 5A 24 B1 22 5A 22 A7 43 24 B2 22 |."A".Z$."Z".C$."|
000031F0: 44 49 56 22 3A 8D 34 32 37 30 00 1D 3A 72 10 8B |DIV":.4270..:r..|
00003200: 5A 24 B1 B2 22 41 22 AF 5A 24 B3 22 49 22 A7 43 |Z$.."A".Z$."I".C|
00003210: 24 B2 22 41 2D 48 22 3A 8D 34 32 37 30 00 3F 3A |$."A-H":.4270.?:|
00003220: 7C 10 8B 5A 24 B1 22 48 22 AF 5A 24 B3 22 51 22 ||..Z$."H".Z$."Q"|
00003230: A7 43 24 B2 22 49 2D 50 22 3A 8D 34 32 37 30 00 |.C$."I-P":.4270.|
00003240: 62 3A 86 10 8B 5A 24 B1 22 50 22 AF 5A 24 B3 B2 |b:...Z$."P".Z$..|
00003250: 22 5A 22 A7 43 24 B2 22 51 2D 5A 22 3A 8D 34 32 |"Z".C$."Q-Z":.42|
00003260: 37 30 00 8F 3A 90 10 81 4B B2 31 A4 54 25 3A 8B |70..:...K.1.T%:.|
00003270: 58 42 25 28 49 29 B2 C8 28 50 31 24 28 4B 29 2C |XB%(I)..(P1$(K),|
00003280: 33 29 A7 99 4F 50 24 28 4B 29 3A 4B B2 54 25 00 |3)..OP$(K):K.T%.|
00003290: 95 3A 9A 10 82 00 9B 3A A4 10 8E 00 AB 3A AE 10 |.:.....:.....:..|
000032A0: 8F 20 20 53 55 42 52 64 7F 49 4E 00 DB 3A B8 10 |. SUBRd.IN..:..|
000032B0: 9F 31 35 2C 38 2C 31 35 3A 9F 38 2C 38 2C 38 2C |.15,8,15:.8,8,8,|
000032C0: 22 4F 50 4D 45 52 4B 49 4E 47 20 22 AA 43 24 AA |"OPMERKING ".C$.|
000032D0: 22 53 2C 52 22 3A 8D 31 32 35 30 00 07 3B C2 10 |"S,R":.1250..;..|
000032E0: 84 38 2C 54 25 3A 8B 54 25 B3 B1 30 A7 81 4B B2 |.8,T%:.T%..0..K.|
000032F0: 31 A4 54 25 3A 84 38 2C 50 31 24 28 4B 29 2C 4F |1.T%:.8,P1$(K),O|
00003300: 50 24 28 4B 29 3A 82 00 12 3B CC 10 A0 38 3A A0 |P$(K):...;...8:.|
00003310: 31 35 00 18 3B D6 10 8E 00 1E 3B E0 10 8F 00 24 |15..;.....;....$|
00003320: 3B EA 10 8F 00 2A 3B F4 10 8F 00 30 3B FE 10 8F |;....*;....0;...|
00003330: 00 39 3B 08 11 64 31 46 31 00 4C 3B 12 11 85 22 |.9;..d1F1.L;..."|
00003340: 46 49 4C 45 4E 41 41 4D 22 3B 46 24 00 5C 3B 1C |FILENAAM";F$.\;.|
00003350: 11 8F 20 20 53 55 42 52 64 7F 49 4E 00 70 3B 26 |.. SUBRd.IN.p;&|
00003360: 11 85 22 46 49 4C 45 20 54 59 50 45 22 3B 54 24 |.."FILE TYPE";T$|
00003370: 00 81 3B 30 11 54 24 20 B2 20 C8 28 54 24 2C 31 |..;0.T$ . .(T$,1|
00003380: 29 00 AF 3B 3A 11 8B 20 54 24 B3 B1 22 53 22 20 |)..;:.. T$.."S" |
00003390: A7 20 8B 20 54 24 B3 B1 22 50 22 20 A7 20 8B 20 |. . T$.."P" . . |
000033A0: 54 24 B3 B1 22 55 22 20 A7 20 89 34 33 38 30 00 |T$.."U" . .4380.|
000033B0: BC 3B 44 11 9F 31 35 2C 38 2C 31 35 00 DC 3B 4E |.;D..15,8,15..;N|
000033C0: 11 9F 20 38 2C 38 2C 35 2C 22 30 3A 22 AA 46 24 |.. 8,8,5,"0:".F$|
000033D0: AA 22 2C 22 AA 54 24 AA 22 2C 52 22 00 E6 3B 58 |.",".T$.",R"..;X|
000033E0: 11 8D 34 35 30 30 00 F6 3B 62 11 81 58 B2 31 A4 |..4500..;b..X.1.|
000033F0: 31 30 30 30 30 30 00 01 3C 6C 11 A1 23 38 2C 41 |100000..<l..#8,A|
00003400: 24 00 36 3C 76 11 8B 20 53 54 B3 B1 30 20 A7 99 |$.6<v.. ST..0 ..|
00003410: 3A 99 22 45 49 4E 44 28 53 54 41 54 55 53 3D 29 |:."EIND(STATUS=)|
00003420: 22 3B 53 54 3A 58 B2 31 30 30 30 30 30 3A A0 38 |";ST:X.100000:.8|
00003430: 3A A0 31 35 3A 80 00 40 3C 80 11 99 20 41 24 3B |:.15:..@<... A$;|
00003440: 00 46 3C 8A 11 82 00 56 3C 94 11 8F 20 20 53 55 |.F<....V<... SU|
00003450: 42 52 64 7F 49 4E 00 6A 3C 9E 11 84 31 35 2C 41 |BRd.IN.j<...15,A|
00003460: 24 2C 42 24 2C 43 24 2C 44 24 00 91 3C A8 11 8B |$,B$,C$,D$..<...|
00003470: 20 C5 28 41 24 29 B1 30 20 A7 20 99 20 41 24 2C | .(A$).0 . . A$,|
00003480: 42 24 2C 43 24 2C 44 24 3A A0 38 3A A0 31 35 3A |B$,C$,D$:.8:.15:|
00003490: 90 00 97 3C B2 11 8E 00 B7 3C BC 11 9F 31 35 2C |...<.....<...15,|
000034A0: 38 2C 31 35 3A 9F 38 2C 38 2C 38 2C 22 4E 41 41 |8,15:.8,8,8,"NAA|
000034B0: 4D 2A 2C 53 2C 52 22 00 D0 3C C6 11 84 38 2C 49 |M*,S,R"..<...8,I|
000034C0: 25 3A 84 38 2C 41 24 2C 41 24 2C 41 24 2C 41 24 |%:.8,A$,A$,A$,A$|
000034D0: 00 F5 3C D0 11 81 49 B2 31 A4 49 25 3A 84 38 2C |..<...I.1.I%:.8,|
000034E0: 58 25 2C 41 24 3A 99 58 25 2C 41 24 3A 82 3A A0 |X%,A$:.X%,A$:.:.|
000034F0: 38 3A A0 31 35 00 00 00 |8:.15... |
..&....53280,7:.53281,7:.53272,21:.790.6
.... SUBRDIN.A....DL(145):.DN$(145):.D
S$(145):.Q2$(145).U.(.I.1:.1,8,0,"$0"...
2..#1,A$,A$...<.. SUBRDIN...F..#1,A$,A
$.Q.P..A$."". 1:I.I.1:.PR..1.]..11)".BLO
CKS FREE"...Z..A$."".....D..#1,A$,B$...N
.DL(I).F(A$.G(0)).F(B$.G(0)).256......Z.
1.100.(....#1,A$.A....A$."".Z.100:.Z:.22
0.Z. ..F(A$).34.B.0.B.1:.Z.T....F(A$).34
.B.1.B.0:C.1......B.1.DN$.DN$.A$......F(
A$)..32.F(A$)..34.C.1.DS$(I).A$:C.2:.Z..
.H..F(A$)..32.F(A$)..34.C.2.I.1.DS$(I).D
S$(I).A$:C.0...R..Z...... SUBRDIN.$...
DN$(I).DN$:DN$."":X.(I.1).12.3....PR.1..
310.M....(X..(X)).0..".":.380.B....(X..(
X)).0..410......(X..(X)).0.."...........
";.11);DN$(1);.28);......(X..(X)).0.."."
;DS$(1):.:.I.1.I.I.1:.60..."..". ....
";I.1;".";.4);DL(I);.9);". ";DN$(I);...,
...28);".";DS$(I)...6.. SUBRDIN.'.@.I.
I.1:.60.7.J.. SUBRDIN.J.T.."...
DISKETTE KATALOGUS .".Y.^.Y
.23:.1450...H...24)"<C> G.VAN GILS."...R
.....|.. SUBRDIN......"... DIS
KETTE KATALOGUS ."...........
. SUBRDIN.'...."....
.".A....X.1.6:.".
.":
..L...."..."...B...8)"....I Q U. . . U.
I....."...L...8)".B B B B BN B B B
".U.V...8)".B B B J.I . B.B B "...
....8)".B B B B BM B B B ".......8
)"....K . ..K . . . . . ".!.....1....
SUBRDIN.:....330.C....410.S...."......
..".F.&..".. .".Y.0.. ". MENU 0 .
"...:.. ". ."...D..".............
..........................."...N.."B. 1
.B INVOEREN GEGEVENS B"...
X.."B. 2 .B OPVRAGEN GEGEVENS
B".O.B.."B. 3 .B INVOER NAAM/ADRES+I
NITIALISATIE B".~.L.."..................
....................."...V.."B. E .B EIN
DE B"......"B.
H .B HELP B"
......".................................
......"......"...UW KEUZE S.V.P..";Q1$.Q
....Q1$."1".Q$."MENU INVOER":.730.E....Q
1$."2"..:.790......Q1$."3".Q$."DISKAT BO
OT":.730......Q1$."E"..:.".":..A.F..Q1$.
"H".Q$."DISKAT BOOT":.730.L.P..:.510...Z
.. SUBRDIN......"..IS PROGRAMMA-SCHIJF
IN DRIVE.(RETURN)";Q1$......".....".7..
.."LOAD"G(34)Q$",8....".O...."RUN":."...
......".T....631,13:.632,13:.633,13:.198
,3:....... SUBRDIN... ..330...*..410..
.4.."........"...>..".. ."...H..
". MENU 2 OPVRAGEN GEGEVENS
."...R.. ". ."...\.."...........
............................."._.F.."B.
1 .B PRINTEN DIRECTORIES PER DISK B".
..P.."B. 2 .B PRINTEN TITELS PER RUBRIEK
B".A.Z.."B. 3 .B PRINTEN TITELS AL
FABETISCH B"......"B. 4 .B OPZOEKEN
TITEL VIA TREFWOORD B".#...."B. 5 .B
PRINTEN TITELS VAN ELKE DISK B".R...
."......................................
."......"B. E .B EINDE(VIA MENU 0)
B"......"B. H .B HELP
B"......".............
.........................."......"..UW K
EUZE S.V.P..";Q1$...J..Q1$."1"..:.2120.+
.T..Q1$."2"..:.2310.@....Q1$."3"..:.2520
.U....Q1$."4"..:.3090.J....Q1$."5"..:.37
90.~....Q1$."E"..:.510......Q1$."H"..:.1
050......790...... SUBRDIN...$..380...
...410.O.8.."........."...B..". 1 . ZOND
ER RAADPLEGEN VAN DE REEDS".*.L.." BE
KENDE KATALOGUS, WORDT DE DIR VAN".V.V..
" EEN DISK WEERGEGEVEN VIA PRINTER"..
.`..". 2 . NA OPGAVE VAN DE GEWENSTE RUB
RIEK"...J.." WORDEN DE DAARIN VOORKOM
ENDE TITELS"...T.." UITGEPRINT, MET N
AAM VAN DE DISK"...~..". 3 . IDEM, MAAR
NA OPGAVE VAN DE EERSTE"."...." LETTE
R..L....". 4 . IDEM, MAAR NA OPGAVE VAN
EEN".V...." TREFWOORD, WELKE EEN ONDE
RDEEL"......" MOET ZIJN VAN DE TITEL.
.C....". 5 . VAN ELKE DISK WORDT VANUIT
DE"......" KATALOGUS DE PROGRAMMA-TIT
ELS"...D.." GEPRINT..'.N.."DRUK RETUR
N OM TERUG TE GAAN";Q1$.0.X..790.@....
SUBRDIN.M....15,A,A$.~.... A.20.."FOUT
IN REGEL: ";F1;A;A$: 8: 15:.:...........
.. SUBRDIN.D...T.F(J(PL$(X),1,1)).64:S
.F(J(PL$(X),2,1)).64.....B.F(J(PL$(X),3,
1)).64...(..15,8,15:.8,8,8,"#":.K.0.5:.1
5,"B-R:"8;0;T;S.D.2..15,"B-P:"8;K.40.1:.
8,Z$,DL(K),DN$(K),DS$(K),DS$.S.<..: 8: 1
5:..C.F.. SUBRDIN...P..15,8,15:.8,8,8,
"RUBRIEK".I(D(X),2)."DISKAT,S,R"...Z..8,
I%.A.D..I%..0..J.1.I%:.8,PL$(J):..N.N. 8
: 15:....X.. SUBRDIN......15,8,15:.8,8
,8,"ALF. ".C$." DISKAT,S,R".0....8,X%:.X
%..0..X.1.X%:.8,PL$(X):..=... 8: 15:..M.
.. SUBRDIN.].... SUBRDIN.....Q9$.".
......................."......H(Q9$,Y.1)
;...H.....R.. SUBRDIN.....Y1.Y:Y.22:.1
450......"UW KEUZE: .V.=VOLGENDE RUBR.
.E.=EINDE"......" .A.=VOORGAAND
E RUB. .J.=UW KEUZE";.'....1640.7.... S
UBRDIN.N....Q1$:.Q1$.""..1550.T.....Z."
..Q1$."E".DS$(I).DS$(I)." ":....,..
Q1$."V".X.X.1:.X.X%.X.1...6..Q1$."V"..16
40.G.@..Q1$."A".X.X.1:.X.1.X.X%.Z.J..Q1$
."A"..1640...T..Q1$."J".DS$(I).DS$(I).G(
X.64):....^..1550...H.. SUBRDIN.(.R.Y.
Y1:.1450.P.|...10)"
".Z....1450......10)D(RX%(X));"
";H(RN$(X),23)............ SUBRDIN.F.
...15,8,15:.8,8,8,"NAAM/RUBR.DISKAT,S,R"
:.1250......8,X%,N1$,N2$,N3$,N4$:.RX%(X%
):.RN$(X%)...B..X%..0..I.1.X%:.8,RX%(I),
RN$(I):..#.L. 8: 15.).V...9.... SUBRDI
N.X...."WILT U GEKOMPRIMEERDE PRINT(J/N)
";SP$:SP.1:.SP$."J".SP.0......1,4:A$.G(1
5):B$.G(8):C$.G(16)......1,A$:.1:.1.....
.X.0.44:.1,".";:.:.1," ...I Q U. . . U.
I....."B$.!....1,A$"."H(Q3$.A2$,18)C$"22
."C$"44. . . . . .N . . ."B$.@...A2
$." ".W.&..1,A$". "H(
Q4$.A2$,18)C$"22."H(N1$.A2$,20)C$"44.";.
..0..1," . . . J.I . ... ."B$.Q.:..1
,A$"."H(Q5$.A2$,18)C$"22................
.......";...D..1," . . . . .M . . .
"B$.1.N..1,A$"......................"C$"
22."H(N2$.A2$,20)C$"44.";.S.X..1," ...K
. ..K . C . . ."B$.|.B..1,A$C$"22......
................."B$...L..1,A$C$"22."H(N
3$." ".N4$.A2$,20)C$"44. <CO> G.VAN GIL
S "B$...V..X.1.22:.1,A$".";:.:.1,".";:.X
.24.44:.1,".";:.......1,".";:.X.46.67:.1
,".";:.:.1,B$.0.... Q6$."".Q6$."RUBR. "
.H....X.0.1:.1,A$". BLOK. TITEL
B"H(Q6$,7);:.......1,"."B$:.1,A$".";:
.X.2.33:.1,".";:.:.1,".";:......X.35.66:
.1,".";:.:.1,".";.S....SP.0. 1:.1,4,7:.1
,B$......SP.1..1,B$...F..I.1.DX%.2:.2050
...P...7.Z..1,A$"."C$"06."C$"25."C$"33."
C$"39."C$"58."C$"66."B$.`....1,A$;:.X.1.
67:.1,".";:.:.1,A$:.1:.1.G... 1.M.....}.
... SUBRDIN......SP.1..1,A$"."C$"06."C
$"25."C$"33."C$"39."C$"58."C$"66."B$....
..1,A$"."I(A2$.D(DL(I)),3)C$"06."H(DN$(I
).A2$,16);.. ..1,C$"25."H(DS$(I),6)C$"3
3.";.M *..1," "I(A2$.D(DL(I.1)),3);C$"39
."H(DN$(I.1).A2$,16);.R 4..1,C$"58."H(DS
$(I.1),6)C$"66."B$.X >.... H.. SUBRDIN
.. R..380.. \..410.. F.Y.11:.1450.. P.."
.PLAATS GEWENSTE DISK IN DRIVE.(RETURN)"
;Q1$..!Z.."..IS ER EEN PRINTER AANGESLOT
EN";Q1$:PR.0:.Q1$."J".PR.1."!...20.I!...
PR.0.."NOGMAALS";Q1$:.Q1$."J"..20.Z!...P
R.0..:.790.R!...".. NAAM .";N1$..!...
". ADRES .";N2$. !...". POSTKODE.";N3$
..!...". PLAATS .";N4$..!J.Q4$."DISK:".
DN$(1):Q5$." NR.:".DS$(1).%"..DX%.I:.I.
2.DX%:DL(I.1).DL(I):DN$(I.1).DN$(I):DS$(
I.1).DS$(I):..J"..DX%.DX%.1:DN$(DX%)."BL
OCKS FREE".T"...1760._"...:.790.O"... S
UBRDIN.X"...380.."...410.."$.Y.11:.1450
.."...".DOE KATALOGUSDISK IN DRIVE.(RETU
RN)";Q1$.J"8..1700.."B.X.1:Y.13:.1450.."
L.I.1:B$.G(13):.1490..#V.RN$.RN$(X):.Q1$
."E"..:.790.2#`.. X=RUBR.NR. RN$=RUBR.NA
AM.K#J..15,8,15:.8,8,8,"@0:ROTZOOI,S,W":
.8,XB$","RN$: 8: 15..#T..:.15,8,15:.8,8,
8,"ROTZOOI,S,R":.8,X,RN$: 8: 15..#~..PL$
(1500):.1350..#...DL(I%.10):.DN$(I%.10):
.DS$(I%.10):.X.1.I%.6:.1290.)$...L.0.5:D
L(L.X.6).DL(L):DN$(L.X.6).DN$(L):DS$(L.X
.6).DS$:..G$...:.X.1.I%:DL(X).DL(X.6):DN
$(X).DN$(X.6):DS$(X.6).DS$(X):...$...X.I
%.1.I%.6:DL(X).0:DN$(X)."":DS$(X)."":...
$..RN$.RN$(X):Q6$."DISK+ID"..$..DX%.I%:Q
4$."ONDER RUBR.STAAT":Q5$."GED.DISK-NAAM
+ NR":Q3$."."RN$"."..%D..1760..%N..:.79
0.!%X.. SUBRDIN.*%...380.3%...410.A%..
Y.7:.1450.Q%...".PRINTEN KATALOGUS OP AL
FABET ."..%...".PLAATS KATALOGU
SSCHIJF IN DRIVE (RETURN)";Q$..%...".WIL
T U .A.LLES OF PER .B.LOK
";Q$..%...Q$."A"..2620..&(..Q$."B".."..
VAN.";Q7$:.".TOT.";Q8$:.2960.%&2..790.5&
<.. SUBRDIN.?&F..1700..&P.L.500:.PL$(3
.L):.A$(L):.DL(L):.DN$(L):.DS$(L):C$."A-
H":.1400..&Z..X%..0.Y.1:.X.65.72:Q$.G(X)
:.2820..&D..X%..0..:.2860.E&N..:.1700..'
X.L.500:.PL$(3.L):.A$(L):.DL(L):.DN$(L):
.DS$(L):C$."I-P":.1400.,'...X%..0.Y.1:.X
.73.80:Q$.G(X):.2820.?'...X%..0..:.2860.
K'...:.1700..' .L.500:.PL$(3.L):.A$(L):.
DL(L):.DN$(L):.DS$(L):C$."Q-Z":.1400..'.
..X%..0.Y.1:.X.81.90:Q$.G(X):.2820.E'...
X%..0..:.2860.Q'...:.1700..(H.L.500:.PL$
(3.L):.A$(L):.DL(L):.DN$(L):.DS$(L):C$."
DIV":.1400.7(R..X%..0.Y.1:.X.1.64:Q$.G(X
):.2820.\(...X%..0..:.X.91.255:Q$.G(X):.
2820.O(...X%..0..:.2860.U(....~(...790..
(... SUBRDIN.R(...I.1.X%:.J(PL$(I),4,1
).Q$.A$(Y).PL$(I):Y.Y.1:PL$(I)."":.Y,A$(
Y).X(.....("....(,.. SUBRDIN..)6..".SO
RTEREN OP ALFABET ";C$.6)@.Y.Y.1:.I.1.Y:
X.0:PL$(0).A$(I):.1290.~)J.DL(I.6).DL(B)
:DN$(I.6).DN$(B):DS$(I.6).DS$:.K.0.5:DN$
(K)."":DL(K).0..)T.DS$."":.K:.I..)^..I.1
.Y:DL(I).DL(I.6):DN$(I).DN$(I.6)..)C.DS$
(I).H(DS$(I.6),1)." ".J(DS$(I.6),2,2):.
..*H..I.Y.1.Y.6:DL(I).0:DN$(I)."":DS$(I)
."":..\*R.DX%.Y:Q3$."PROGRAMMA-TITELS":Q
4$."OP ALFABET":Q5$."":Q6$."DISK+ID".F*|
..1760.L*....|*... SUBRDIN..*...PL$(15
00):.A$(500):.DL(500):.DN$(500):.DS$(500
).T*...Q7$.Q8$.X$.Q8$:Q8$.Q7$:Q7$.X$..*.
..T.F(H(Q7$,1)).F(H(Q8$,1))..+...T.65.T.
64:T1.1:C$."DIV":.1400.?+B..T.64.T.73.T.
72:T1.65:C$."A-H":.1400.H+L..T.72.T.81.T
.80:T1.73:C$."I-P":.1400..+V..T.80.T.91.
T.90:T1.81:C$."Q-Z":.1400..+...T.90.T.25
5:T1.91:C$."DIV":.1400.P+...X.T1.T:Q$.G(
X):.2820..+...:.2860..+...T..+...:.790..
+... SUBRDIN..,...380..,&..410..,0.Y.8
:.1450.D,:..".ZOEKROUTINE OP EEN TREFWOO
RD.".V,D.."..BEGINT. DE NAAM MET HET TRE
FWOORD J/N";Q$..,N..Q$.."J".Q$.."N"..:.7
90..,X.."..GEEF TREFWOORD";Q1$..,B..Q$."
J"..3190.J,L..3370.Z,V.. SUBRDIN..-...
"VIA PRINTER J/N";T$:Q1.3:.T$."J".Q1.4.+
-...4,Q1:.4:.4:.4,".TREFWOORD:";Q1$.S-..
Q$.H(Q1$,1):Q2$.H(Q1$,2):.PL$(1500).U-..
.Q$."A".Q$."Z".C$."DIV":.1400..-...Q$.."
A".Q$."I".C$."A-H":.1400..-...Q$."H".Q$.
"Q".C$."I-P":.1400..-...Q$."P".Q$.."Z".C
$."Q-Z":.1400...F..4,"..LENGTE PROGR.
NAAM DISKNAAM+ID .".6.P..I.1.X%:.Q
2$.J(PL$(I),4,2)..3310.Z.Z..:."WILT U DO
ORGAAN(RETURN)";Q$.E....:.790.U.... SUB
RDIN.....X.I:.1290......Q1$.H(DN$(B),C(
Q1$))..4,DL(B);.5.C(D(DL(B))));:T.1.....
.T.1..4,DN$(B);.22.C(DN$(B)));H(DS$,1);"
";../...T.1.T.0:.4,I(DS$,2)../ ..../*.
. SUBRDIN.Q/4..".PRINTEN VIA PRINTER J
/N.";T$:Q1.3:.T$."J".Q1.4../9..DL(145):.
DN$(145):.DS$(145):.PL$(1500):.A$(145)..
/>..4,Q1:.4:.4,".PROGRAMMA'S BEGINNEND M
ET LETTERS A-H.".S/H.C$."A-H":.1400../R.
.X%..0..3710../\..4: 4.'0F.B$.G(13):.15,
8,15:.8,8,8,"@0:ROTZOOI,S,W":.8,Q1$B$Q1.
`0P. 8: 15:.:.15,8,15:.8,8,8,"ROTZOOI,S,
R":F1.8124:.1250.N0Z..8,Q1$,Q1.Y0.. 8: 1
5. 0...".DOORGAAN J/N.";T$:.T$.."J"..790
.U0...DL(145):.DN$(145):.DS$(145):.PL$(1
500):.A$(145)..1...4,Q1:.4:.4,".PROGRAMM
A'S BEGINNEND MET LETTERS I-P."."1..C$."
I-P":.1400.31...X%..0..3710.=1...4: 4.V1
..B$.G(13):.15,8,15:.8,8,8,"@0:ROTZOOI,S
,W":.8,Q1$B$Q1..1J. 8: 15:.:.15,8,15:.8,
8,8,"ROTZOOI,S,R":F1.8174:.1250..1T..8,Q
1$,Q1.H1.. 8: 15..1...".DOORGAAN J/N.";T
$:.T$.."J"..790.$2...DL(145):.DN$(145):.
DS$(145):.PL$(1500):.A$(145).^2...4,Q1:.
4:.4,".PROGRAMMA'S BEGINNEND MET LETTERS
Q-Z.".Q2..C$."Q-Z":.1400..2...X%..0..37
10..2...4: 4.E2..B$.G(13):.15,8,15:.8,8,
8,"@0:ROTZOOI,S,W":.8,Q1$B$Q1..2$. 8: 15
:.:.15,8,15:.8,8,8,"ROTZOOI,S,R":F1.8224
:.1250..3...8,Q1$,Q1..38. 8: 15.>3B..".D
OORGAAN J/N.";T$:.T$.."J"..790.S3G..DL(1
45):.DN$(145):.DS$(145):.PL$(1500):.A$(1
45)..3L..4,Q1:.4:.4,".PROGRAMMA'S BEGINN
END DIVERSE LETTERS."..3V.C$."DIV":.1400
.Q3`..X%..0..3710..3J..4: 4..4T.."DAT WA
S HET DAN":."WILT U DOORGAAN(RETURN)";Q$
:.:.790.'4~.. SUBRDIN.=4...I.1.X%:X.I:
.1290.T4...L.1.16.C(Q1$):T.0..4...J(DN$(
B),L,C(Q1$)).Q1$..4,DL(B);.5.C(D(DL(B)))
);:T.1..4...T.1..4,DN$(B);.22.C(DN$(B)))
;H(DS$,1);" ";.X4...T.1.T.0:.4,I(DS$,2)
..4...:...4D....4N.. SUBRDIN..4X..380.
.5...410..5..Y.8:.1450.F5...".PRINTEN DI
SK-DIREKTORIES EVT. MET OPM..".P5...".IS
ER EEN PRINTER AANGESLOTEN";Q1$..5...Q1
$."J"..".WILT U MET OPMERKINGEN";Q2$..5.
.."..VAN WELKE SCHIJF(INDIEN ONBEKEND DA
N RETURN";Q3$:.XA$(100)..5...XB$(1500)..
6(..Q3$.""..3930..62.Q$.H(Q3$,1):.Q$."A"
.Q$."Z".C$."DIV":.4010.Q6<..Q$.."A".Q$."
I".C$."A-H":.4010.S6F..Q$."H".Q$."Q".C$.
"I-P":.4010..6P..Q$."P".Q$.."Z".C$."Q-Z"
:.4010..6Z.. SUBRDIN.X6D..15,8,15:.8,8
,8,"ALF.DISKET ".C$.",S,R":.1250..7N..8,
X%:.I.1.X%:.8,Y%,XA$(I):.J.1.Y%:.8,XB$:.
J:.I..7X. 8: 15.[7..."..BEPAAL UW KEUZE
MET EEN NUMMER.":."STOP LISTING MET RETU
RN"..7...I.1.X%:.XA$(I):.T$:.T$.G(13).I.
X%..7...X.1.10:.:...7 .."UW KEUZE";T:Q3$
.XA$(T):..A7... SUBRDIN..7...15,8,15:.
8,8,8,"ALF.DISKET ".C$.",S,R":.1250.,8..
.8,X%:.I.1.X%:.8,Y2%,XA$:.H(XA$,C(Q3$)).
Q3$.T.I:I.X%.T8H..T.0..J.Y1%.Y2%:.8,XB$:
.J:Y1%.Y2%:..Z8R..T.0. 8: 15:."DISK NIET
GEVONDEN"..8...T.0..:.790..8..I.1:.J.Y1
%.Y2%:.8,XB$(I):I.I.1:..Z8..DX%.I:.I.1.D
X%:X.0:PL$(X).XB$(I):.1290..9...K.0.5:.H
(XB$(I),2).H(XB$(I.1),2).I.I.1:.4120..9.
..K:.I.!9...:.790.19... SUBRDIN.F9"..Q
2$."J"..4,4:.4.Z9,.."BLOKS:";DL(I);.12);
DN$(I);.30);J(DS$(I),2,5);..96..Q3$.."J"
....9@..Q3$."J".J(DS$(I),6,1)."J"..4180.
.9J...E9T.. SUBRDIN.X9^.Z$.H(DN$(I),1)
..9H..Z$."A".Z$."Z".C$."DIV":.4270..:R..
Z$.."A".Z$."I".C$."A-H":.4270.?:|..Z$."H
".Z$."Q".C$."I-P":.4270.B:...Z$."P".Z$..
"Z".C$."Q-Z":.4270..:...K.1.T%:.XB%(I).H
(P1$(K),3)..OP$(K):K.T%..:.....:.....:..
. SUBRDIN..:...15,8,15:.8,8,8,"OPMERKI
NG ".C$."S,R":.1250..;B..8,T%:.T%..0..K.
1.T%:.8,P1$(K),OP$(K):...;L. 8: 15..;V..
..;....$;....*;....0;....9;..D1F1.L;..."
FILENAAM";F$.\;... SUBRDIN.P;&.."FILE
TYPE";T$..;0.T$ . H(T$,1)..;:.. T$.."S"
. . T$.."P" . . T$.."U" . .4380..;D..15,
8,15..;N.. 8,8,5,"0:".F$.",".T$.",R"..;X
..4500..;B..X.1.100000..<L..#8,A$.6<V..
ST..0 ..:."EIND(STATUS=)";ST:X.100000: 8
: 15:..@<... A$;.F<....V<... SUBRDIN.J
<...15,A$,B$,C$,D$..<... E(A$).0 . . A$,
B$,C$,D$: 8: 15:...<.....<...15,8,15:.8,
8,8,"NAAM*,S,R".P<F..8,I%:.8,A$,A$,A$,A$
..<P..I.1.I%:.8,X%,A$:.X%,A$:.: 8: 15...
> CLICK IMAGE PREVIEW FOR FULL MODAL