CATALOG
FILE INFORMATION
FILENAME(S): CATALOG
FILE TYPE(S): PRG
FILE SIZE: 7.4K
FIRST SEEN: 2025-12-02 00:01:54
APPEARS ON: 1 disk(s)
FILE HASH
081b5335aec1edb493c985b60816756be5a0e9d2ce517dd9c232172610ec7472
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| DE GROOT | CATALOG | PRG | earthshaker | 13 | 15 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 BB 08 00 00 97 35 33 32 38 30 2C 32 3A 97 |.......53280,2:.|
00000010: 35 33 32 38 31 2C 32 3A 97 35 35 33 33 32 2C 31 |53281,2:.55332,1|
00000020: 3A 97 35 35 33 33 33 2C 31 3A 54 54 B2 35 30 30 |:.55333,1:TT.500|
00000030: 3A 86 54 24 28 54 54 2C 33 29 3A 99 22 93 22 3A |:.T$(TT,3):.".":|
00000040: 53 50 24 B2 22 20 20 20 20 20 20 20 20 20 22 3A |SP$." ":|
00000050: 99 22 11 11 11 11 11 22 3A 99 22 1E 22 3B 53 50 |.".....":.".";SP|
00000060: 24 3B 22 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |$;"*************|
00000070: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 22 3A 99 53 50 24 |**********":.SP$|
00000080: 3B 22 2A 20 20 20 20 20 20 20 20 20 20 20 20 20 |;"* |
00000090: 20 20 20 20 20 20 20 20 2A 22 3A 99 53 50 24 3B | *":.SP$;|
000000A0: 22 2A 99 20 20 20 20 20 43 41 54 41 4C 4F 47 55 |"*. CATALOGU|
000000B0: 53 20 20 20 20 20 20 20 1E 2A 22 00 81 09 01 00 |S .*".....|
000000C0: 99 53 50 24 3B 22 2A 20 20 20 20 20 20 20 20 20 |.SP$;"* |
000000D0: 20 20 20 20 20 20 20 20 20 20 20 20 2A 22 3A 99 | *":.|
000000E0: 53 50 24 3B 22 2A 99 20 20 20 20 20 20 20 53 42 |SP$;"*. SB|
000000F0: 45 20 20 20 20 20 20 20 20 20 20 20 1E 2A 22 3A |E .*":|
00000100: 99 53 50 24 3B 22 2A 99 20 20 20 20 54 45 20 45 |.SP$;"*. TE E|
00000110: 4E 4B 48 55 49 5A 45 4E 20 20 20 20 20 1E 2A 22 |NKHUIZEN .*"|
00000120: 3A 99 53 50 24 3B 22 2A 99 20 20 20 20 4C 41 53 |:.SP$;"*. LAS|
00000130: 54 20 55 50 44 41 54 45 20 20 20 20 20 20 1E 2A |T UPDATE .*|
00000140: 22 3A 99 53 50 24 3B 22 2A 99 20 20 20 20 4A 41 |":.SP$;"*. JA|
00000150: 4E 55 41 52 49 20 31 39 38 34 20 20 20 20 20 1E |NUARI 1984 .|
00000160: 2A 22 3A 99 53 50 24 3B 22 2A 20 20 20 20 20 20 |*":.SP$;"* |
00000170: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2A | *|
00000180: 22 00 C3 09 02 00 99 53 50 24 22 2A 2A 2A 2A 2A |"......SP$"*****|
00000190: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
000001A0: 2A 2A 9A 22 3A 81 41 41 B2 31 A4 33 30 30 30 3A |**.":.AA.1.3000:|
000001B0: 82 3A 99 22 93 22 3A 97 38 30 38 2C 32 32 35 3A |.:.".":.808,225:|
000001C0: 89 31 30 00 31 0A 03 00 99 22 93 11 11 20 20 20 |.10.1...."... |
000001D0: 12 20 20 20 20 20 20 20 4E 49 45 55 57 45 20 43 |. NIEUWE C|
000001E0: 41 54 41 4C 4F 47 55 53 20 20 20 20 20 20 20 20 |ATALOGUS |
000001F0: 20 20 92 22 3A 99 22 11 11 20 20 20 12 20 57 49 | .":.".. . WI|
00000200: 4C 54 20 55 20 54 45 52 55 47 20 4E 41 41 52 20 |LT U TERUG NAAR |
00000210: 48 45 54 20 48 4F 4F 46 44 4D 45 4E 55 20 92 22 |HET HOOFDMENU ."|
00000220: 3A 85 4B 5A 24 3A 8B 4B 5A 24 B2 22 4A 22 A7 31 |:.KZ$:.KZ$."J".1|
00000230: 30 00 6E 0A 04 00 99 22 93 22 3B 22 12 20 48 45 |0.n....".";". HE|
00000240: 45 46 54 20 55 20 44 45 20 47 45 47 45 56 45 4E |EFT U DE GEGEVEN|
00000250: 53 20 42 45 57 41 41 52 44 20 22 3A 85 57 24 3A |S BEWAARD ":.W$:|
00000260: 8B C8 28 57 24 2C 31 29 B2 22 4A 22 89 36 00 A4 |..(W$,1)."J".6..|
00000270: 0A 05 00 99 22 11 11 4D 4F 45 54 20 44 49 54 20 |...."..MOET DIT |
00000280: 4E 4F 47 20 47 45 42 45 55 52 45 4E 20 22 3B 3A |NOG GEBEUREN ";:|
00000290: 85 56 24 3A 8B C8 28 56 24 2C 31 29 B2 22 4A 22 |.V$:..(V$,1)."J"|
000002A0: 89 31 31 33 00 0E 0B 06 00 81 49 B2 31 A4 4E 3A |.113......I.1.N:|
000002B0: 54 24 28 49 2C 31 29 B2 22 22 3A 54 24 28 49 2C |T$(I,1)."":T$(I,|
000002C0: 32 29 B2 22 22 3A 54 24 28 49 2C 33 29 B2 22 22 |2)."":T$(I,3).""|
000002D0: 3A 82 49 3A 8C 3A 99 22 93 22 3A 99 22 12 20 20 |:.I:.:.".":.". |
000002E0: 20 20 20 20 20 20 4E 49 45 55 57 45 20 20 20 43 | NIEUWE C|
000002F0: 41 54 41 4C 4F 47 55 53 12 20 20 20 20 20 20 20 |ATALOGUS. |
00000300: 20 20 20 20 20 20 20 92 22 3A 99 3A 89 38 00 4A | .":.:.8.J|
00000310: 0B 07 00 99 22 93 22 3A 99 3A 99 22 12 9E 20 20 |....".":.:.".. |
00000320: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 43 41 | CA|
00000330: 54 41 4C 4F 47 55 53 12 20 20 20 20 20 20 20 20 |TALOGUS. |
00000340: 20 20 20 20 20 20 20 22 3A 99 00 0A 0C 08 00 99 | ":.......|
00000350: 22 20 57 41 41 52 20 48 45 45 46 54 20 44 45 20 |" WAAR HEEFT DE |
00000360: 43 41 54 41 4C 4F 47 55 53 20 42 45 54 52 45 4B |CATALOGUS BETREK|
00000370: 4B 49 4E 47 20 4F 50 22 3B 3A 85 4B 24 28 31 29 |KING OP";:.K$(1)|
00000380: 3A 99 22 20 57 41 54 20 57 4F 52 44 54 20 44 45 |:." WAT WORDT DE|
00000390: 20 49 4E 48 4F 55 44 20 56 41 4E 20 4B 4F 4C 4F | INHOUD VAN KOLO|
000003A0: 4D 20 31 22 3B 3A 85 4B 24 28 32 29 3A 99 3A 99 |M 1";:.K$(2):.:.|
000003B0: 22 20 57 41 54 20 57 4F 52 44 54 20 44 45 20 49 |" WAT WORDT DE I|
000003C0: 4E 48 4F 55 44 20 56 41 4E 20 4B 4F 4C 4F 4D 20 |NHOUD VAN KOLOM |
000003D0: 32 22 3B 3A 85 4B 24 28 33 29 3A 99 3A 99 22 20 |2";:.K$(3):.:." |
000003E0: 57 41 54 20 57 4F 52 44 54 20 44 45 20 49 4E 48 |WAT WORDT DE INH|
000003F0: 4F 55 44 20 56 41 4E 20 4B 4F 4C 4F 4D 20 33 22 |OUD VAN KOLOM 3"|
00000400: 3B 3A 85 4B 24 28 34 29 3A 99 00 39 0C 09 00 99 |;:.K$(4):..9....|
00000410: 22 20 54 4F 54 20 57 45 4C 4B 45 20 44 41 54 55 |" TOT WELKE DATU|
00000420: 4D 20 42 49 4A 47 45 57 45 52 4B 54 22 3B 3A 85 |M BIJGEWERKT";:.|
00000430: 4B 24 28 35 29 3A 89 31 38 00 7C 0C 0A 00 99 22 |K$(5):.18.|...."|
00000440: 93 22 3A 99 3A 99 22 12 9E 20 20 20 20 20 20 20 |.":.:.".. |
00000450: 20 20 20 20 20 20 20 20 20 43 41 54 41 4C 4F 47 | CATALOG|
00000460: 55 53 12 20 20 20 20 20 20 20 20 20 20 20 20 20 |US. |
00000470: 20 20 22 3A 97 38 30 38 2C 32 32 35 00 3C 0D 0B | ":.808,225.<..|
00000480: 00 8D 31 32 36 3A 99 22 20 20 20 20 20 20 20 20 |..126:." |
00000490: 20 20 20 20 20 20 20 12 20 48 4F 4F 46 44 4D 45 | . HOOFDME|
000004A0: 4E 55 20 92 22 3A 99 22 11 11 11 22 3A 99 22 20 |NU .":."...":." |
000004B0: 20 20 20 20 49 4E 56 4F 45 52 45 4E 20 47 45 47 | INVOEREN GEG|
000004C0: 45 56 45 4E 53 20 20 20 20 20 20 20 28 31 29 22 |EVENS (1)"|
000004D0: 3A 99 22 20 20 20 20 20 50 52 49 4E 54 45 4E 20 |:." PRINTEN |
000004E0: 4F 50 20 53 43 48 45 52 4D 20 20 20 20 20 20 20 |OP SCHERM |
000004F0: 28 32 29 22 3A 99 22 20 20 20 20 20 5A 4F 45 4B |(2)":." ZOEK|
00000500: 45 4E 20 49 4E 20 42 45 53 54 41 4E 44 20 20 20 |EN IN BESTAND |
00000510: 20 20 20 20 28 33 29 22 3A 99 22 20 20 20 20 20 | (3)":." |
00000520: 56 45 52 57 49 4A 44 45 52 45 4E 20 55 49 54 20 |VERWIJDEREN UIT |
00000530: 42 45 53 54 41 4E 44 20 28 34 29 22 00 F4 0D 0C |BESTAND (4)"....|
00000540: 00 99 22 20 20 20 20 20 53 4F 52 54 45 52 45 4E |.." SORTEREN|
00000550: 20 28 50 45 52 20 4B 4F 4C 4F 4D 29 20 20 20 20 | (PER KOLOM) |
00000560: 28 35 29 22 3A 99 22 20 20 20 20 20 50 52 49 4E |(5)":." PRIN|
00000570: 54 45 4E 20 4F 50 20 50 41 50 49 45 52 20 20 20 |TEN OP PAPIER |
00000580: 20 20 20 20 28 36 29 22 3A 99 22 20 20 20 20 20 | (6)":." |
00000590: 42 45 57 41 52 45 4E 20 4F 50 20 54 41 50 45 2F |BEWAREN OP TAPE/|
000005A0: 46 4C 4F 50 50 59 20 20 28 37 29 22 3A 99 22 20 |FLOPPY (7)":." |
000005B0: 20 20 20 20 4E 49 45 55 57 45 20 43 41 54 41 4C | NIEUWE CATAL|
000005C0: 4F 47 55 53 20 20 20 20 20 20 20 20 28 38 29 22 |OGUS (8)"|
000005D0: 3A 99 22 20 20 20 20 20 45 49 4E 44 45 20 42 45 |:." EINDE BE|
000005E0: 57 45 52 4B 49 4E 47 45 4E 20 20 20 20 20 20 20 |WERKINGEN |
000005F0: 28 39 29 22 00 48 0E 0D 00 99 3A 99 22 20 20 20 |(9)".H....:." |
00000600: 20 20 54 59 50 45 20 48 45 54 20 4E 55 4D 4D 45 | TYPE HET NUMME|
00000610: 52 20 56 41 4E 20 55 57 20 4B 45 55 5A 45 20 49 |R VAN UW KEUZE I|
00000620: 4E 22 3B 3A 85 4B 5A 3A 91 4B 5A 89 31 35 2C 34 |N";:.KZ:.KZ.15,4|
00000630: 34 2C 35 33 2C 36 37 2C 37 36 2C 31 30 32 2C 31 |4,53,67,76,102,1|
00000640: 31 33 2C 33 2C 31 32 32 00 6E 0E 0E 00 99 22 20 |13,3,122.n...." |
00000650: 20 20 20 20 55 57 20 4B 45 55 5A 45 20 4B 41 4E | UW KEUZE KAN|
00000660: 20 4E 49 45 54 20 21 21 21 22 3A 89 31 33 00 1D | NIET !!!":.13..|
00000670: 0F 0F 00 99 22 93 22 3A 99 22 20 20 12 20 20 20 |....".":." . |
00000680: 20 48 55 4C 50 20 2D 20 4D 45 4E 55 20 49 4E 56 | HULP - MENU INV|
00000690: 4F 45 52 45 4E 20 20 20 20 92 22 3A 99 22 11 11 |OEREN .":."..|
000006A0: 11 22 3A 99 22 20 57 41 54 20 4D 4F 45 54 20 45 |.":." WAT MOET E|
000006B0: 52 20 57 4F 52 44 45 4E 20 47 45 44 41 41 4E 3A |R WORDEN GEDAAN:|
000006C0: 22 3A 99 3A 99 22 20 45 45 4E 20 4E 49 45 55 57 |":.:." EEN NIEUW|
000006D0: 20 42 45 53 54 41 4E 44 20 41 41 4E 4D 41 4B 45 | BESTAND AANMAKE|
000006E0: 4E 20 20 20 20 20 20 20 28 20 31 20 29 22 3A 99 |N ( 1 )":.|
000006F0: 3A 99 22 20 45 45 4E 20 42 45 53 54 41 41 4E 44 |:." EEN BESTAAND|
00000700: 20 42 45 53 54 41 4E 44 20 49 4E 4C 45 5A 45 4E | BESTAND INLEZEN|
00000710: 20 20 20 20 20 28 20 32 20 29 22 3A 99 00 8E 0F | ( 2 )":....|
00000720: 10 00 99 22 20 44 49 54 20 42 45 53 54 41 4E 44 |..." DIT BESTAND|
00000730: 20 55 49 54 42 52 45 49 44 45 4E 20 20 20 20 20 | UITBREIDEN |
00000740: 20 20 20 20 20 20 28 20 33 20 29 22 3A 99 3A 99 | ( 3 )":.:.|
00000750: 22 20 54 45 52 55 47 20 4E 41 41 52 20 48 45 54 |" TERUG NAAR HET|
00000760: 20 48 4F 4F 46 44 4D 45 4E 55 20 20 20 20 20 20 | HOOFDMENU |
00000770: 20 20 20 28 20 34 20 29 22 3A 99 3A 85 4B 5A 3A | ( 4 )":.:.KZ:|
00000780: 91 4B 5A 89 37 2C 32 38 2C 34 33 2C 31 30 00 96 |.KZ.7,28,43,10..|
00000790: 0F 11 00 89 31 35 00 9E 0F 12 00 4E B2 31 00 AA |....15.....N.1..|
000007A0: 0F 13 00 81 50 B2 4E A4 54 54 00 62 10 14 00 99 |....P.N.TT.b....|
000007B0: 22 93 22 3A 99 22 20 20 20 42 45 45 49 4E 44 49 |".":." BEEINDI|
000007C0: 47 20 44 45 20 49 4E 56 4F 45 52 20 4D 45 54 20 |G DE INVOER MET |
000007D0: 27 2A 2A 2A 2A 2A 27 22 3A 99 3A 99 22 28 22 3B |'*****'":.:."(";|
000007E0: 50 3B 22 29 22 3B A3 33 30 29 22 28 22 3B 28 54 |P;")";.30)"(";(T|
000007F0: 54 AB 50 29 3B 22 29 22 3A 99 22 3D 3D 3D 3D 3D |T.P);")":."=====|
00000800: 22 3A 99 22 20 20 20 12 20 20 4D 41 58 49 4D 41 |":." . MAXIMA|
00000810: 41 4C 20 32 30 20 54 45 4B 45 4E 53 20 50 45 52 |AL 20 TEKENS PER|
00000820: 20 4B 4F 4C 4F 4D 20 20 20 92 22 3A 99 3A 99 3A | KOLOM .":.:.:|
00000830: 99 4B 24 28 32 29 3B A3 31 35 29 22 3A 22 3A 99 |.K$(2);.15)":":.|
00000840: 3A 99 4B 24 28 33 29 3B A3 31 35 29 22 3A 22 3A |:.K$(3);.15)":":|
00000850: 99 3A 99 4B 24 28 34 29 3B A3 31 35 29 22 3A 22 |.:.K$(4);.15)":"|
00000860: 3A 99 00 99 10 15 00 99 22 13 22 3A 99 22 11 11 |:.......".":."..|
00000870: 11 11 11 11 22 3A 99 A3 31 37 29 3B 3A 85 54 24 |....":..17);:.T$|
00000880: 28 50 2C 31 29 3A 8B 54 24 28 50 2C 31 29 B2 22 |(P,1):.T$(P,1)."|
00000890: 2A 2A 2A 2A 2A 22 A7 32 37 00 C3 10 16 00 99 3A |*****".27......:|
000008A0: 99 A3 31 37 29 3B 3A 85 54 24 28 50 2C 32 29 3A |..17);:.T$(P,2):|
000008B0: 8B 54 24 28 50 2C 32 29 B2 22 2A 2A 2A 2A 2A 22 |.T$(P,2)."*****"|
000008C0: A7 32 37 00 ED 10 17 00 99 3A 99 A3 31 37 29 3B |.27......:..17);|
000008D0: 3A 85 54 24 28 50 2C 33 29 3A 8B 54 24 28 50 2C |:.T$(P,3):.T$(P,|
000008E0: 33 29 B2 22 2A 2A 2A 2A 2A 22 A7 32 37 00 1F 11 |3)."*****".27...|
000008F0: 18 00 8B C3 28 54 24 28 50 2C 31 29 29 B1 32 30 |....(T$(P,1)).20|
00000900: B0 C3 28 54 24 28 50 2C 32 29 29 B1 32 30 B0 C3 |..(T$(P,2)).20..|
00000910: 28 54 24 28 50 2C 33 29 29 B1 32 30 A7 32 36 00 |(T$(P,3)).20.26.|
00000920: 26 11 19 00 82 50 00 53 11 1A 00 99 22 20 53 4F |&....P.S...." SO|
00000930: 52 52 59 20 54 45 20 4C 41 4E 47 45 20 49 4E 56 |RRY TE LANGE INV|
00000940: 4F 45 52 22 3A 81 5A B2 31 A4 35 30 30 3A 82 3A |OER":.Z.1.500:.:|
00000950: 89 32 30 00 88 11 1B 00 4E B2 50 AB 31 3A 99 22 |.20.....N.P.1:."|
00000960: 93 22 3A 99 22 20 48 45 54 20 42 45 53 54 41 4E |.":." HET BESTAN|
00000970: 44 20 42 45 56 41 54 20 4E 55 20 22 3B 4E 3B 4B |D BEVAT NU ";N;K|
00000980: 24 28 31 29 3A 89 31 31 00 C9 11 1C 00 99 22 93 |$(1):.11......".|
00000990: 22 3A 99 22 57 45 4C 4B 45 20 43 41 54 41 4C 4F |":."WELKE CATALO|
000009A0: 47 55 53 20 57 49 4C 54 20 55 20 49 4E 4C 45 5A |GUS WILT U INLEZ|
000009B0: 45 4E 2E 22 3B 3A 85 4B 24 28 31 29 3A 8B 4B 24 |EN.";:.K$(1):.K$|
000009C0: 28 31 29 B2 22 22 A7 32 38 00 0B 12 1D 00 99 3A |(1)."".28......:|
000009D0: 99 22 53 54 41 41 54 20 44 49 54 20 4F 50 20 54 |."STAAT DIT OP T|
000009E0: 41 50 45 20 4F 46 20 46 4C 4F 50 50 59 20 28 20 |APE OF FLOPPY ( |
000009F0: 54 20 2F 20 46 20 29 22 3A 85 4B 5A 24 3A 99 3A |T / F )":.KZ$:.:|
00000A00: 8B 4B 5A 24 B2 22 54 22 A7 33 32 00 1B 12 1E 00 |.KZ$."T".32.....|
00000A10: 8B 4B 5A 24 B2 22 46 22 A7 33 36 00 28 12 1F 00 |.KZ$."F".36.(...|
00000A20: 99 22 93 22 3A 89 32 39 00 55 12 20 00 46 B2 31 |.".":.29.U. .F.1|
00000A30: 3A 9F 46 2C 31 2C 30 2C 4B 24 28 31 29 3A 84 46 |:.F,1,0,K$(1):.F|
00000A40: 2C 4E 3A 84 46 2C 47 24 3A 8B 47 24 B2 4B 24 28 |,N:.F,G$:.G$.K$(|
00000A50: 31 29 A7 33 34 00 60 12 21 00 A0 46 3A 89 33 32 |1).34.`.!..F:.32|
00000A60: 00 20 13 22 00 99 3A 99 22 20 42 45 53 54 41 4E |. ."..:." BESTAN|
00000A70: 44 20 28 22 3B 47 24 3B 22 29 22 3A 99 3A 81 43 |D (";G$;")":.:.C|
00000A80: B2 31 A4 35 3A 84 46 2C 44 24 3A 4B 24 28 43 29 |.1.5:.F,D$:K$(C)|
00000A90: B2 44 24 3A 82 43 3A 81 50 B2 31 A4 4E 3A 44 24 |.D$:.C:.P.1.N:D$|
00000AA0: B2 22 22 3A 84 46 2C 44 24 3A 54 24 28 50 2C 31 |."":.F,D$:T$(P,1|
00000AB0: 29 B2 44 24 3A 84 46 2C 44 24 3A 54 24 28 50 2C |).D$:.F,D$:T$(P,|
00000AC0: 32 29 B2 44 24 3A 84 46 2C 44 24 3A 54 24 28 50 |2).D$:.F,D$:T$(P|
00000AD0: 2C 33 29 B2 44 24 3A 99 22 91 22 3B A3 32 30 29 |,3).D$:.".";.20)|
00000AE0: 22 12 22 50 3A 82 50 3A A0 46 3A 99 22 93 22 3A |"."P:.P:.F:.".":|
00000AF0: 99 22 20 48 45 54 20 42 45 53 54 41 4E 44 20 22 |." HET BESTAND "|
00000B00: 3B 4B 24 28 31 29 3B 22 20 42 45 56 41 54 20 4E |;K$(1);" BEVAT N|
00000B10: 55 20 22 3B 4E 3B 22 20 49 54 45 4D 53 22 3A 99 |U ";N;" ITEMS":.|
00000B20: 00 28 13 23 00 89 33 38 00 E0 13 24 00 44 39 24 |.(.#..38...$.D9$|
00000B30: B2 22 22 3A 46 24 B2 4B 24 28 31 29 3A 44 39 24 |."":F$.K$(1):D9$|
00000B40: B2 46 24 3A 9F 33 2C 38 2C 35 2C 44 39 24 AA 22 |.F$:.3,8,5,D9$."|
00000B50: 2C 53 45 51 2C 52 45 41 44 22 3A 84 33 2C 4E 3A |,SEQ,READ":.3,N:|
00000B60: 84 33 2C 47 24 3A 81 43 B2 31 A4 35 3A 84 33 2C |.3,G$:.C.1.5:.3,|
00000B70: 44 24 3A 4B 24 28 43 29 B2 44 24 3A 82 43 3A 81 |D$:K$(C).D$:.C:.|
00000B80: 42 B2 31 A4 4E 3A 84 33 2C 44 24 3A 54 24 28 42 |B.1.N:.3,D$:T$(B|
00000B90: 2C 31 29 B2 44 24 3A 84 33 2C 44 24 3A 54 24 28 |,1).D$:.3,D$:T$(|
00000BA0: 42 2C 32 29 B2 44 24 3A 84 33 2C 44 24 3A 54 24 |B,2).D$:.3,D$:T$|
00000BB0: 28 42 2C 33 29 B2 44 24 3A 99 22 91 45 52 20 57 |(B,3).D$:.".ER W|
00000BC0: 4F 52 44 45 4E 20 4E 55 20 12 22 42 22 92 20 49 |ORDEN NU ."B". I|
00000BD0: 54 45 4D 53 20 49 4E 47 45 4C 45 5A 45 4E 2E 22 |TEMS INGELEZEN."|
00000BE0: 00 EA 13 25 00 82 42 3A A0 33 00 1B 14 26 00 99 |...%..B:.3...&..|
00000BF0: 22 11 4D 4F 45 54 20 44 49 54 20 42 45 53 54 41 |".MOET DIT BESTA|
00000C00: 4E 44 20 57 4F 52 44 45 4E 20 55 49 54 47 45 42 |ND WORDEN UITGEB|
00000C10: 52 45 49 44 28 4A 2F 4E 29 22 3B 00 2F 14 27 00 |REID(J/N)";./.'.|
00000C20: A1 4B 5A 24 3A 8B 4B 5A 24 B2 22 22 A7 33 39 00 |.KZ$:.KZ$."".39.|
00000C30: 3F 14 28 00 8B 4B 5A 24 B2 22 4E 22 A7 31 30 00 |?.(..KZ$."N".10.|
00000C40: 4F 14 29 00 8B 4B 5A 24 B2 22 4A 22 A7 34 33 00 |O.)..KZ$."J".43.|
00000C50: 57 14 2A 00 89 33 39 00 6A 14 2B 00 99 22 93 22 |W.*..39.j.+.."."|
00000C60: 3A 4E B2 4E AA 31 3A 89 31 39 00 0F 15 2C 00 99 |:N.N.1:.19...,..|
00000C70: 22 93 22 3A 54 31 B2 31 3A 54 32 B2 4E 3A 99 22 |".":T1.1:T2.N:."|
00000C80: 20 20 20 20 20 20 20 20 12 4C 49 53 54 45 4E 92 | .LISTEN.|
00000C90: 22 3A 81 57 B2 54 31 A4 54 32 3A 81 41 32 B2 57 |":.W.T1.T2:.A2.W|
00000CA0: A4 57 AA 33 3A 99 3A 99 22 28 22 3B 41 32 3B 22 |.W.3:.:."(";A2;"|
00000CB0: 29 22 3A 99 4B 24 28 32 29 3B 22 05 22 3B A3 32 |)":.K$(2);".";.2|
00000CC0: 30 29 54 24 28 41 32 2C 31 29 3B 22 9E 22 3A 99 |0)T$(A2,1);".":.|
00000CD0: 4B 24 28 33 29 3B 22 05 22 3B A3 32 30 29 54 24 |K$(3);".";.20)T$|
00000CE0: 28 41 32 2C 32 29 3B 22 9E 22 3A 99 4B 24 28 34 |(A2,2);".":.K$(4|
00000CF0: 29 3B 22 05 22 3B A3 32 30 29 54 24 28 41 32 2C |);".";.20)T$(A2,|
00000D00: 33 29 3B 22 9E 22 3A 8B 41 32 B2 4E A7 35 30 00 |3);".":.A2.N.50.|
00000D10: 1E 15 2D 00 8B 41 32 B2 57 AA 33 A7 34 37 00 26 |..-..A2.W.3.47.&|
00000D20: 15 2E 00 82 41 32 00 45 15 2F 00 57 B2 57 AA 33 |....A2.E./.W.W.3|
00000D30: 3A 99 3A 99 22 44 52 55 4B 20 45 45 4E 20 54 4F |:.:."DRUK EEN TO|
00000D40: 45 54 53 22 3B 00 59 15 30 00 A1 4B 5A 24 3A 8B |ETS";.Y.0..KZ$:.|
00000D50: 4B 5A 24 B2 22 22 A7 34 38 00 65 15 31 00 99 22 |KZ$."".48.e.1.."|
00000D60: 93 22 3A 82 57 00 92 15 32 00 99 3A 99 22 49 4E |.":.W...2..:."IN|
00000D70: 44 49 45 4E 20 47 45 4C 45 5A 45 4E 20 44 52 55 |DIEN GELEZEN DRU|
00000D80: 4B 20 44 41 4E 20 45 45 4E 20 54 4F 45 54 53 2E |K DAN EEN TOETS.|
00000D90: 22 3B 00 A6 15 33 00 A1 4B 5A 24 3A 8B 4B 5A 24 |";...3..KZ$:.KZ$|
00000DA0: B2 22 22 A7 35 31 00 AE 15 34 00 89 31 30 00 31 |."".51...4..10.1|
00000DB0: 16 35 00 99 22 93 22 3A 99 22 20 20 20 20 20 20 |.5..".":." |
00000DC0: 20 20 20 12 20 20 20 20 20 5A 4F 45 4B 45 4E 20 | . ZOEKEN |
00000DD0: 20 20 20 20 20 20 20 20 92 22 3A 99 22 11 12 5A | .":."..Z|
00000DE0: 4F 45 4B 57 4F 4F 52 44 20 48 45 4C 50 20 49 53 |OEKWOORD HELP IS|
00000DF0: 20 54 45 52 55 47 20 4E 41 41 52 20 4D 45 4E 55 | TERUG NAAR MENU|
00000E00: 20 20 20 92 22 3A 99 22 11 57 41 54 20 49 53 20 | .":.".WAT IS |
00000E10: 48 45 54 20 5A 4F 45 4B 57 4F 4F 52 44 22 3B 3A |HET ZOEKWOORD";:|
00000E20: 85 5A 24 3A 8B 5A 24 B2 22 48 45 4C 50 22 89 31 |.Z$:.Z$."HELP".1|
00000E30: 30 00 56 16 36 00 50 B2 4E 3A 81 4B B2 31 A4 50 |0.V.6.P.N:.K.1.P|
00000E40: 3A 81 4C B2 31 A4 33 3A 8B 54 24 28 4B 2C 4C 29 |:.L.1.3:.T$(K,L)|
00000E50: B2 5A 24 A7 36 30 00 6C 16 37 00 82 4C 3A 82 4B |.Z$.60.l.7..L:.K|
00000E60: 3A 8B 4B B2 50 AF 4C B2 33 A7 35 36 00 B1 16 38 |:.K.P.L.3.56...8|
00000E70: 00 99 3A 99 22 5A 4F 45 4B 57 4F 4F 52 44 20 4E |..:."ZOEKWOORD N|
00000E80: 49 45 54 A0 28 4D 45 45 52 29 20 41 41 4E 57 45 |IET.(MEER) AANWE|
00000E90: 5A 49 47 2E 22 3A 99 22 4E 49 45 55 57 20 5A 4F |ZIG.":."NIEUW ZO|
00000EA0: 45 4B 57 4F 4F 52 44 20 4E 4F 44 49 47 20 3F 22 |EKWOORD NODIG ?"|
00000EB0: 3B 00 C5 16 39 00 A1 4B 5A 24 3A 8B 4B 5A 24 B2 |;...9..KZ$:.KZ$.|
00000EC0: 22 22 A7 35 37 00 D5 16 3A 00 8B 4B 5A 24 B2 22 |"".57...:..KZ$."|
00000ED0: 4E 22 A7 31 30 00 DD 16 3B 00 89 35 33 00 33 17 |N".10...;..53.3.|
00000EE0: 3C 00 99 3A 99 22 28 22 3B 4B 3B 22 29 22 3A 99 |<..:."(";K;")":.|
00000EF0: 4B 24 28 32 29 3B A3 32 31 29 54 24 28 4B 2C 31 |K$(2);.21)T$(K,1|
00000F00: 29 3A 99 4B 24 28 33 29 3B A3 32 31 29 54 24 28 |):.K$(3);.21)T$(|
00000F10: 4B 2C 32 29 3A 99 4B 24 28 34 29 3B A3 32 31 29 |K,2):.K$(4);.21)|
00000F20: 54 24 28 4B 2C 33 29 3A 8B 4B B2 50 AF 4C B2 33 |T$(K,3):.K.P.L.3|
00000F30: A7 35 36 00 48 17 3D 00 5A 31 B2 5A 31 AA 31 3A |.56.H.=.Z1.Z1.1:|
00000F40: 8B 5A 31 B2 34 89 36 33 00 50 17 3E 00 89 35 35 |.Z1.4.63.P.>..55|
00000F50: 00 6A 17 3F 00 99 3A 99 22 20 52 41 41 4B 20 45 |.j.?..:." RAAK E|
00000F60: 45 4E 20 54 4F 45 54 53 22 3B 00 7E 17 40 00 A1 |EN TOETS";.~.@..|
00000F70: 4B 5A 24 3A 8B 4B 5A 24 B2 22 22 A7 36 34 00 8B |KZ$:.KZ$."".64..|
00000F80: 17 41 00 5A 31 B2 30 3A 89 35 35 00 96 17 42 00 |.A.Z1.0:.55...B.|
00000F90: 99 22 93 22 3A 99 00 2F 18 43 00 99 22 93 22 3A |.".":../.C..".":|
00000FA0: 99 22 20 20 20 20 20 20 20 20 20 20 12 20 20 20 |." . |
00000FB0: 20 56 45 52 57 49 4A 44 45 52 45 4E 20 20 20 20 | VERWIJDEREN |
00000FC0: 92 22 3A 99 22 11 11 11 22 3A 99 22 12 20 52 45 |.":."...":.". RE|
00000FD0: 43 4F 52 44 4E 52 2E 20 30 20 49 53 20 54 45 52 |CORDNR. 0 IS TER|
00000FE0: 55 47 20 4E 41 41 52 20 48 45 54 20 48 4F 4F 46 |UG NAAR HET HOOF|
00000FF0: 44 4D 45 4E 55 92 22 3A 99 3A 99 22 20 57 45 4C |DMENU.":.:." WEL|
00001000: 4B 20 52 45 43 4F 52 44 4E 52 2E 20 4D 4F 45 54 |K RECORDNR. MOET|
00001010: 20 56 45 52 57 49 4A 44 45 52 44 20 57 4F 52 44 | VERWIJDERD WORD|
00001020: 45 4E 22 3B 3A 85 50 3A 8B 50 B2 30 89 31 30 00 |EN";:.P:.P.0.10.|
00001030: 40 18 44 00 8B 50 B1 30 AF 50 B2 B3 4E A7 37 30 |@.D..P.0.P..N.70|
00001040: 00 67 18 45 00 99 22 20 52 45 43 4F 52 44 4E 55 |.g.E.." RECORDNU|
00001050: 4D 4D 45 52 20 4E 49 45 54 20 41 41 4E 57 45 5A |MMER NIET AANWEZ|
00001060: 49 47 22 3A 89 31 31 00 88 18 46 00 99 22 12 57 |IG":.11...F..".W|
00001070: 45 45 54 20 55 20 48 45 54 20 5A 45 4B 45 52 20 |EET U HET ZEKER |
00001080: 21 21 92 11 11 11 11 22 00 9C 18 47 00 A1 4B 5A |!!....."...G..KZ|
00001090: 24 3A 8B 4B 5A 24 B2 22 22 A7 37 31 00 AC 18 48 |$:.KZ$."".71...H|
000010A0: 00 8B 4B 5A 24 B2 22 4E 22 A7 31 31 00 B8 18 49 |..KZ$."N".11...I|
000010B0: 00 8B 50 B2 4E A7 37 35 00 03 19 4A 00 81 50 B2 |..P.N.75...J..P.|
000010C0: 50 A4 4E AB 31 3A 54 24 28 50 2C 31 29 B2 54 24 |P.N.1:T$(P,1).T$|
000010D0: 28 28 50 AA 31 29 2C 31 29 3A 54 24 28 50 2C 32 |((P.1),1):T$(P,2|
000010E0: 29 B2 54 24 28 28 50 AA 31 29 2C 32 29 3A 54 24 |).T$((P.1),2):T$|
000010F0: 28 50 2C 33 29 B2 54 24 28 28 50 AA 31 29 2C 33 |(P,3).T$((P.1),3|
00001100: 29 3A 82 00 11 19 4B 00 4E B2 4E AB 31 3A 89 31 |):....K.N.N.1:.1|
00001110: 31 00 CA 19 4C 00 99 22 93 22 3A 99 22 11 11 11 |1...L..".":."...|
00001120: 22 3A 99 22 20 57 41 41 52 4F 50 20 4D 4F 45 54 |":." WAAROP MOET|
00001130: 20 45 52 20 47 45 53 4F 52 54 45 45 52 44 20 57 | ER GESORTEERD W|
00001140: 4F 52 44 45 4E 22 3A 99 3A 99 4B 24 28 32 29 3B |ORDEN":.:.K$(2);|
00001150: A3 32 32 29 22 28 20 31 A0 29 22 3A 99 4B 24 28 |.22)"( 1.)":.K$(|
00001160: 33 29 3B A3 32 32 29 22 28 20 32 20 29 22 3A 99 |3);.22)"( 2 )":.|
00001170: 4B 24 28 34 29 3B A3 32 32 29 22 28 20 33 20 29 |K$(4);.22)"( 3 )|
00001180: 22 3A 99 22 12 54 45 52 55 47 20 4E 41 41 52 20 |":.".TERUG NAAR |
00001190: 48 4F 4F 46 44 4D 45 4E 55 92 22 3B A3 32 32 29 |HOOFDMENU.";.22)|
000011A0: 22 28 20 34 20 29 22 3A 99 3A 99 3A 99 22 20 55 |"( 4 )":.:.:." U|
000011B0: 57 20 4B 45 55 5A 45 22 3A 85 4B 3A 91 4B 89 37 |W KEUZE":.K:.K.7|
000011C0: 37 2C 38 35 2C 39 33 2C 31 30 00 1D 1A 4D 00 99 |7,85,93,10...M..|
000011D0: 22 93 22 3A 99 22 20 45 52 20 57 4F 52 44 54 20 |".":." ER WORDT |
000011E0: 4E 55 20 4F 50 20 22 3B 4B 24 28 32 29 3B 22 20 |NU OP ";K$(2);" |
000011F0: 47 45 53 4F 52 54 45 45 52 44 2E 22 3A 99 3A 99 |GESORTEERD.":.:.|
00001200: 3A 81 49 B2 31 A4 4E 3A 8B C5 28 54 24 28 49 2C |:.I.1.N:..(T$(I,|
00001210: 31 29 29 B2 30 A7 49 B2 30 3A 89 38 30 00 45 1A |1)).0.I.0:.80.E.|
00001220: 4E 00 8B C3 28 54 24 28 49 2C 31 29 29 B1 36 AF |N...(T$(I,1)).6.|
00001230: C5 28 54 24 28 49 2C 31 29 29 B3 B1 30 A7 49 B2 |.(T$(I,1))..0.I.|
00001240: 30 3A 89 38 30 00 50 1A 4F 00 82 49 3A 89 38 32 |0:.80.P.O..I:.82|
00001250: 00 8B 1A 50 00 81 49 B2 31 A4 4E 3A 99 22 91 22 |...P..I.1.N:."."|
00001260: 3B A3 32 30 29 22 12 22 3B 49 3B 22 92 22 3A 81 |;.20)".";I;".":.|
00001270: 4A B2 31 A4 4E 3A 8B 54 24 28 49 2C 31 29 B3 54 |J.1.N:.T$(I,1).T|
00001280: 24 28 4A 2C 31 29 A7 8D 31 30 31 00 99 1A 51 00 |$(J,1)..101...Q.|
00001290: 82 4A 3A 82 49 3A 89 38 34 00 DA 1A 52 00 81 49 |.J:.I:.84...R..I|
000012A0: B2 31 A4 4E 3A 99 22 91 22 3B A3 32 30 29 22 12 |.1.N:.".";.20)".|
000012B0: 22 3B 49 3B 22 92 22 3A 81 4A B2 31 A4 4E 3A 8B |";I;".":.J.1.N:.|
000012C0: C5 28 54 24 28 49 2C 31 29 29 B3 C5 28 54 24 28 |.(T$(I,1))..(T$(|
000012D0: 4A 2C 31 29 29 A7 8D 31 30 31 00 E4 1A 53 00 82 |J,1))..101...S..|
000012E0: 4A 3A 82 49 00 02 1B 54 00 99 22 20 53 4F 52 54 |J:.I...T.." SORT|
000012F0: 45 52 49 4E 47 20 47 45 52 45 45 44 2E 22 3A 89 |ERING GEREED.":.|
00001300: 31 31 00 55 1B 55 00 99 22 93 22 3A 99 22 20 45 |11.U.U..".":." E|
00001310: 52 20 57 4F 52 44 54 20 4E 55 20 4F 50 20 22 3B |R WORDT NU OP ";|
00001320: 4B 24 28 33 29 3B 22 20 47 45 53 4F 52 54 45 45 |K$(3);" GESORTEE|
00001330: 52 44 2E 22 3A 99 3A 99 3A 81 49 B2 31 A4 4E 3A |RD.":.:.:.I.1.N:|
00001340: 8B C5 28 54 24 28 49 2C 32 29 29 B2 30 A7 49 B2 |..(T$(I,2)).0.I.|
00001350: 30 3A 89 38 38 00 7D 1B 56 00 8B C3 28 54 24 28 |0:.88.}.V...(T$(|
00001360: 49 2C 32 29 29 B1 36 AF C5 28 54 24 28 49 2C 32 |I,2)).6..(T$(I,2|
00001370: 29 29 B3 B1 30 A7 49 B2 30 3A 89 38 38 00 88 1B |))..0.I.0:.88...|
00001380: 57 00 82 49 3A 89 39 30 00 C3 1B 58 00 81 49 B2 |W..I:.90...X..I.|
00001390: 31 A4 4E 3A 99 22 91 22 3B A3 32 30 29 22 12 22 |1.N:.".";.20)"."|
000013A0: 3B 49 3B 22 92 22 3A 81 4A B2 31 A4 4E 3A 8B 54 |;I;".":.J.1.N:.T|
000013B0: 24 28 49 2C 32 29 B3 54 24 28 4A 2C 32 29 A7 8D |$(I,2).T$(J,2)..|
000013C0: 31 30 31 00 D1 1B 59 00 82 4A 3A 82 49 3A 89 39 |101...Y..J:.I:.9|
000013D0: 32 00 12 1C 5A 00 81 49 B2 31 A4 4E 3A 99 22 91 |2...Z..I.1.N:.".|
000013E0: 22 3B A3 32 30 29 22 12 22 3B 49 3B 22 92 22 3A |";.20)".";I;".":|
000013F0: 81 4A B2 31 A4 4E 3A 8B C5 28 54 24 28 49 2C 32 |.J.1.N:..(T$(I,2|
00001400: 29 29 B3 C5 28 54 24 28 4A 2C 32 29 29 A7 8D 31 |))..(T$(J,2))..1|
00001410: 30 31 00 1C 1C 5B 00 82 4A 3A 82 49 00 3A 1C 5C |01...[..J:.I.:.\|
00001420: 00 99 22 20 53 4F 52 54 45 52 49 4E 47 20 47 45 |.." SORTERING GE|
00001430: 52 45 45 44 2E 22 3A 89 31 31 00 8D 1C 5D 00 99 |REED.":.11...]..|
00001440: 22 93 22 3A 99 22 20 45 52 20 57 4F 52 44 54 20 |".":." ER WORDT |
00001450: 4E 55 20 4F 50 20 22 3B 4B 24 28 34 29 3B 22 20 |NU OP ";K$(4);" |
00001460: 47 45 53 4F 52 54 45 45 52 44 2E 22 3A 99 3A 99 |GESORTEERD.":.:.|
00001470: 3A 81 49 B2 31 A4 4E 3A 8B C5 28 54 24 28 49 2C |:.I.1.N:..(T$(I,|
00001480: 33 29 29 B2 30 A7 49 B2 30 3A 89 39 36 00 B5 1C |3)).0.I.0:.96...|
00001490: 5E 00 8B C3 28 54 24 28 49 2C 33 29 29 B1 36 AF |^...(T$(I,3)).6.|
000014A0: C5 28 54 24 28 49 2C 33 29 29 B3 B1 30 A7 49 B2 |.(T$(I,3))..0.I.|
000014B0: 30 3A 89 39 36 00 C0 1C 5F 00 82 49 3A 89 39 38 |0:.96..._..I:.98|
000014C0: 00 FB 1C 60 00 81 49 B2 31 A4 4E 3A 99 22 91 22 |...`..I.1.N:."."|
000014D0: 3B A3 32 30 29 22 12 22 3B 49 3B 22 92 22 3A 81 |;.20)".";I;".":.|
000014E0: 4A B2 31 A4 4E 3A 8B 54 24 28 49 2C 33 29 B3 54 |J.1.N:.T$(I,3).T|
000014F0: 24 28 4A 2C 33 29 A7 8D 31 30 31 00 0A 1D 61 00 |$(J,3)..101...a.|
00001500: 82 4A 3A 82 49 3A 89 31 30 30 00 4B 1D 62 00 81 |.J:.I:.100.K.b..|
00001510: 49 B2 31 A4 4E 3A 99 22 91 22 3B A3 32 30 29 22 |I.1.N:.".";.20)"|
00001520: 12 22 3B 49 3B 22 92 22 3A 81 4A B2 31 A4 4E 3A |.";I;".":.J.1.N:|
00001530: 8B C5 28 54 24 28 49 2C 33 29 29 B3 C5 28 54 24 |..(T$(I,3))..(T$|
00001540: 28 4A 2C 33 29 29 A7 8D 31 30 31 00 55 1D 63 00 |(J,3))..101.U.c.|
00001550: 82 4A 3A 82 49 00 73 1D 64 00 99 22 20 53 4F 52 |.J:.I.s.d.." SOR|
00001560: 54 45 52 49 4E 47 20 47 45 52 45 45 44 2E 22 3A |TERING GEREED.":|
00001570: 89 31 31 00 09 1E 65 00 41 24 28 31 2C 31 29 B2 |.11...e.A$(1,1).|
00001580: 54 24 28 4A 2C 31 29 3A 41 24 28 31 2C 32 29 B2 |T$(J,1):A$(1,2).|
00001590: 54 24 28 4A 2C 32 29 3A 41 24 28 31 2C 33 29 B2 |T$(J,2):A$(1,3).|
000015A0: 54 24 28 4A 2C 33 29 3A 54 24 28 4A 2C 31 29 B2 |T$(J,3):T$(J,1).|
000015B0: 54 24 28 49 2C 31 29 3A 54 24 28 4A 2C 32 29 B2 |T$(I,1):T$(J,2).|
000015C0: 54 24 28 49 2C 32 29 3A 54 24 28 4A 2C 33 29 B2 |T$(I,2):T$(J,3).|
000015D0: 54 24 28 49 2C 33 29 3A 54 24 28 49 2C 31 29 B2 |T$(I,3):T$(I,1).|
000015E0: 41 24 28 31 2C 31 29 3A 54 24 28 49 2C 32 29 B2 |A$(1,1):T$(I,2).|
000015F0: 41 24 28 31 2C 32 29 3A 54 24 28 49 2C 33 29 B2 |A$(1,2):T$(I,3).|
00001600: 41 24 28 31 2C 33 29 3A 8E 00 B4 1E 66 00 41 35 |A$(1,3):....f.A5|
00001610: 24 B2 4B 24 28 35 29 3A 99 22 93 22 3A 99 3A 99 |$.K$(5):.".":.:.|
00001620: 22 20 57 49 4C 54 20 55 20 41 4C 4C 45 53 20 4F |" WILT U ALLES O|
00001630: 46 20 45 45 4E 20 47 45 44 45 45 4C 54 45 20 55 |F EEN GEDEELTE U|
00001640: 49 54 47 45 50 52 49 4E 54 22 3A 99 22 20 48 45 |ITGEPRINT":." HE|
00001650: 42 42 45 4E 22 3A 99 22 11 11 20 12 20 54 45 52 |BBEN":.".. . TER|
00001660: 55 47 20 4E 41 41 52 20 48 45 54 20 48 4F 4F 46 |UG NAAR HET HOOF|
00001670: 44 4D 45 4E 55 20 49 53 20 2A 20 92 22 3A 99 22 |DMENU IS * .":."|
00001680: 11 11 11 22 3A 99 22 20 47 45 45 46 20 4F 50 20 |...":." GEEF OP |
00001690: 27 41 27 20 4F 46 20 27 47 27 20 4F 46 20 27 2A |'A' OF 'G' OF '*|
000016A0: 27 20 22 3A 85 4B 5A 24 3A 8B 4B 5A 24 B2 22 2A |' ":.KZ$:.KZ$."*|
000016B0: 22 A7 31 30 00 D7 1E 67 00 8B 4B 5A 24 B2 22 41 |".10...g..KZ$."A|
000016C0: 22 A7 9F 31 2C 34 2C 30 3A 5A 5A B2 31 3A 47 47 |"..1,4,0:ZZ.1:GG|
000016D0: B2 4E 3A 89 31 30 36 00 07 1F 68 00 8B 4B 5A 24 |.N:.106...h..KZ$|
000016E0: B2 22 47 22 A7 99 22 20 56 41 4E 41 46 20 57 45 |."G".." VANAF WE|
000016F0: 4C 4B 20 52 45 43 4F 52 44 4E 55 4D 4D 45 52 22 |LK RECORDNUMMER"|
00001700: 3B 3A 85 5A 5A 3A 99 00 42 1F 69 00 99 22 20 54 |;:.ZZ:..B.i.." T|
00001710: 4F 54 20 45 4E 20 4D 45 54 20 57 45 4C 4B 20 52 |OT EN MET WELK R|
00001720: 45 43 4F 52 44 4E 55 4D 4D 45 52 22 3B 3A 85 47 |ECORDNUMMER";:.G|
00001730: 47 3A 9F 31 2C 34 2C 30 3A 41 35 24 B2 4B 24 28 |G:.1,4,0:A5$.K$(|
00001740: 35 29 00 0E 20 6A 00 99 22 20 45 4E 20 4E 55 20 |5).. j.." EN NU |
00001750: 47 41 20 49 4B 20 50 52 49 4E 54 45 4E A0 21 21 |GA IK PRINTEN.!!|
00001760: 22 3A 98 31 2C C7 28 31 34 29 22 43 41 54 41 4C |":.1,.(14)"CATAL|
00001770: 4F 47 55 53 20 49 4E 5A 41 4B 45 3A A0 22 4B 24 |OGUS INZAKE:."K$|
00001780: 28 31 29 3A 98 31 3A 98 31 2C C7 28 31 35 29 3A |(1):.1:.1,.(15):|
00001790: 98 31 2C 22 20 42 49 4A 47 45 57 45 52 4B 54 20 |.1," BIJGEWERKT |
000017A0: 54 2F 4D 3A A0 22 41 35 24 3A 98 31 3A 4D B2 C3 |T/M:."A5$:.1:M..|
000017B0: 28 4B 24 28 32 29 29 3A 4F B2 C3 28 4B 24 28 33 |(K$(2)):O..(K$(3|
000017C0: 29 29 3A 59 B2 C3 28 4B 24 28 34 29 29 3A 4C 24 |)):Y..(K$(4)):L$|
000017D0: B2 22 A0 22 3A 4D 24 B2 22 20 22 3A 4F 24 B2 22 |.".":M$." ":O$."|
000017E0: A0 22 3A 98 31 2C 4B 24 28 32 29 3B C7 28 31 36 |.":.1,K$(2);.(16|
000017F0: 29 22 33 30 20 22 3B 4B 24 28 33 29 3B C7 28 31 |)"30 ";K$(3);.(1|
00001800: 36 29 3B 22 35 35 20 22 3B 4B 24 28 34 29 00 CB |6);"55 ";K$(4)..|
00001810: 20 6B 00 4C 24 B2 22 B8 22 3A 81 51 B2 31 A4 4D | k.L$.".":.Q.1.M|
00001820: 3A 4C 31 24 B2 4C 31 24 AA 4C 24 3A 82 3A 4D 24 |:L1$.L1$.L$:.:M$|
00001830: B2 22 B8 22 3A 81 51 B2 31 A4 4F 3A 4D 31 24 B2 |.".":.Q.1.O:M1$.|
00001840: 4D 31 24 AA 4D 24 3A 82 3A 4F 24 B2 22 B8 22 3A |M1$.M$:.:O$.".":|
00001850: 81 51 B2 31 A4 59 3A 4F 31 24 B2 4F 31 24 AA 4F |.Q.1.Y:O1$.O1$.O|
00001860: 24 3A 82 3A 98 31 2C 4C 31 24 3B C7 28 31 36 29 |$:.:.1,L1$;.(16)|
00001870: 22 33 30 20 22 3B 4D 31 24 3B C7 28 31 36 29 22 |"30 ";M1$;.(16)"|
00001880: 35 35 20 22 3B 4F 31 24 3A 98 31 3A 98 31 3A 81 |55 ";O1$:.1:.1:.|
00001890: 5A B2 5A 5A A4 47 47 3A 98 31 2C 54 24 28 5A 2C |Z.ZZ.GG:.1,T$(Z,|
000018A0: 31 29 3B C7 28 31 36 29 22 33 30 20 22 3B 54 24 |1);.(16)"30 ";T$|
000018B0: 28 5A 2C 32 29 3B C7 28 31 36 29 22 35 35 20 22 |(Z,2);.(16)"55 "|
000018C0: 3B 54 24 28 5A 2C 33 29 3A 98 31 00 D9 20 6C 00 |;T$(Z,3):.1.. l.|
000018D0: 8B 5A B2 47 47 A7 31 31 32 00 16 21 6D 00 8B 5A |.Z.GG.112..!m..Z|
000018E0: B2 32 37 B0 5A B2 35 38 B0 5A B2 38 39 B0 5A B2 |.27.Z.58.Z.89.Z.|
000018F0: 31 32 30 B0 5A B2 31 35 31 B0 5A B2 31 38 32 B0 |120.Z.151.Z.182.|
00001900: 5A B2 32 31 33 B0 5A B2 32 34 34 B0 5A B2 32 37 |Z.213.Z.244.Z.27|
00001910: 35 A7 8D 31 32 37 00 4A 21 6E 00 8B 5A B2 33 30 |5..127.J!n..Z.30|
00001920: 36 B0 5A B2 33 33 37 B0 5A B2 33 36 38 B0 5A B2 |6.Z.337.Z.368.Z.|
00001930: 33 39 39 B0 5A B2 34 33 30 B0 5A B2 34 36 31 B0 |399.Z.430.Z.461.|
00001940: 5A B2 34 39 32 A7 8D 31 32 37 00 51 21 6F 00 82 |Z.492..127.Q!o..|
00001950: 5A 00 87 21 70 00 98 31 3A 98 31 3A 98 31 2C 22 |Z..!p..1:.1:.1,"|
00001960: 20 44 45 20 43 41 54 41 4C 4F 47 55 53 20 42 45 | DE CATALOGUS BE|
00001970: 56 41 54 20 4E 55 20 22 3B 4E 3B 4B 24 28 31 29 |VAT NU ";N;K$(1)|
00001980: 3A A0 31 3A 89 31 30 00 08 22 71 00 99 22 93 22 |:.1:.10.."q.."."|
00001990: 3A 99 22 11 12 20 20 20 20 20 20 20 42 45 57 41 |:.".. BEWA|
000019A0: 52 45 4E 20 4F 50 20 54 41 50 45 20 4F 46 20 46 |REN OP TAPE OF F|
000019B0: 4C 4F 50 50 59 20 20 20 20 20 20 20 20 92 22 3A |LOPPY .":|
000019C0: 99 22 11 11 12 20 20 20 20 57 49 4C 54 20 55 20 |."... WILT U |
000019D0: 54 45 52 55 47 20 4E 41 41 52 20 48 45 54 20 48 |TERUG NAAR HET H|
000019E0: 4F 4F 46 44 4D 45 4E 55 20 20 20 20 20 92 22 3A |OOFDMENU .":|
000019F0: 85 4B 5A 24 3A 8B 4B 5A 24 B2 22 4A 22 B0 4B 5A |.KZ$:.KZ$."J".KZ|
00001A00: 24 B2 22 CA 22 A7 31 30 00 22 22 72 00 8B 4B 5A |$.".".10.""r..KZ|
00001A10: 24 B2 22 4A 41 22 B0 4B 5A 24 B2 22 CA C1 22 A7 |$."JA".KZ$."..".|
00001A20: 31 30 00 72 22 73 00 99 22 11 11 20 57 45 52 4B |10.r"s..".. WERK|
00001A30: 54 20 55 20 4D 45 54 20 54 41 50 45 20 4F 46 20 |T U MET TAPE OF |
00001A40: 46 4C 4F 50 50 59 20 28 54 2F 46 29 22 3A 85 4B |FLOPPY (T/F)":.K|
00001A50: 5A 24 3A 99 22 11 11 11 11 11 22 3A 8B 4B 5A 24 |Z$:.".....":.KZ$|
00001A60: B3 B1 22 54 22 AF 4B 5A 24 B3 B1 22 46 22 A7 31 |.."T".KZ$.."F".1|
00001A70: 31 35 00 83 22 74 00 8B 4B 5A 24 B2 22 46 22 A7 |15.."t..KZ$."F".|
00001A80: 31 32 31 00 3F 23 75 00 99 22 93 22 3A 99 22 20 |121.?#u..".":." |
00001A90: 55 57 20 22 3B 4B 24 28 31 29 3B 22 20 43 41 54 |UW ";K$(1);" CAT|
00001AA0: 41 4C 4F 47 55 53 20 57 4F 52 44 20 4E 55 22 3A |ALOGUS WORD NU":|
00001AB0: 99 22 20 4F 50 47 45 42 4F 52 47 45 4E 2E 22 3A |." OPGEBORGEN.":|
00001AC0: 46 B2 31 3A 9F 46 2C 31 2C 31 2C 4B 24 28 31 29 |F.1:.F,1,1,K$(1)|
00001AD0: 3A 98 46 2C 4E 3A 98 46 2C 4B 24 28 31 29 3A 81 |:.F,N:.F,K$(1):.|
00001AE0: 43 B2 31 A4 35 3A 44 24 B2 4B 24 28 43 29 3A 98 |C.1.5:D$.K$(C):.|
00001AF0: 46 2C 44 24 3A 82 43 3A 81 42 B2 31 A4 4E 3A 99 |F,D$:.C:.B.1.N:.|
00001B00: 22 91 22 3B A3 32 30 29 22 12 22 42 3A 44 24 B2 |".";.20)"."B:D$.|
00001B10: 54 24 28 42 2C 31 29 3A 98 46 2C 44 24 3A 44 24 |T$(B,1):.F,D$:D$|
00001B20: B2 54 24 28 42 2C 32 29 3A 98 46 2C 44 24 3A 44 |.T$(B,2):.F,D$:D|
00001B30: 24 B2 54 24 28 42 2C 33 29 3A 98 46 2C 44 24 00 |$.T$(B,3):.F,D$.|
00001B40: 50 23 76 00 8B 42 B2 4E A7 A0 46 3A 89 31 32 30 |P#v..B.N..F:.120|
00001B50: 00 57 23 77 00 82 42 00 8A 23 78 00 99 22 93 22 |.W#w..B..#x.."."|
00001B60: 3A 99 22 11 11 22 3A 99 22 20 48 45 54 20 42 45 |:."..":." HET BE|
00001B70: 53 54 41 4E 44 20 49 53 20 4F 50 47 45 42 4F 52 |STAND IS OPGEBOR|
00001B80: 47 45 4E 22 3A 99 3A 89 31 31 00 45 24 79 00 44 |GEN":.:.11.E$y.D|
00001B90: 39 24 B2 22 40 30 3A 22 3A 46 24 B2 4B 24 28 31 |9$."@0:":F$.K$(1|
00001BA0: 29 3A 44 39 24 B2 44 39 24 AA 46 24 3A 9F 32 2C |):D9$.D9$.F$:.2,|
00001BB0: 38 2C 33 2C 44 39 24 AA 22 2C 53 45 51 2C 57 52 |8,3,D9$.",SEQ,WR|
00001BC0: 49 54 45 22 3A 98 32 2C 4E 3A 98 32 2C 46 24 3A |ITE":.2,N:.2,F$:|
00001BD0: 81 43 B2 31 A4 35 3A 98 32 2C 4B 24 28 43 29 3A |.C.1.5:.2,K$(C):|
00001BE0: 82 43 3A 81 42 B2 31 A4 4E 3A 99 22 91 22 3B A3 |.C:.B.1.N:.".";.|
00001BF0: 32 30 29 3B 22 12 22 42 3A 98 32 2C 54 24 28 42 |20);"."B:.2,T$(B|
00001C00: 2C 31 29 3A 98 32 2C 54 24 28 42 2C 32 29 3A 98 |,1):.2,T$(B,2):.|
00001C10: 32 2C 54 24 28 42 2C 33 29 3A 82 42 3A A0 32 3A |2,T$(B,3):.B:.2:|
00001C20: 99 22 1D 11 11 48 45 54 20 42 45 53 54 41 4E 44 |."...HET BESTAND|
00001C30: 20 49 53 20 4F 50 47 45 42 4F 52 47 45 4E 22 3A | IS OPGEBORGEN":|
00001C40: 99 3A 89 31 31 00 BE 24 7A 00 99 22 93 22 3A 99 |.:.11..$z..".":.|
00001C50: 22 20 57 45 45 54 20 55 20 48 45 54 20 5A 45 4B |" WEET U HET ZEK|
00001C60: 45 52 20 4F 46 20 4D 4F 45 54 45 4E 20 44 45 20 |ER OF MOETEN DE |
00001C70: 47 45 47 45 56 45 4E 53 22 3A 99 3A 99 3A 99 22 |GEGEVENS":.:.:."|
00001C80: 20 4E 4F 47 20 57 4F 52 44 45 4E 20 42 45 57 41 | NOG WORDEN BEWA|
00001C90: 41 52 44 20 3F 22 3A 99 3A 99 3A 99 22 20 12 55 |ARD ?":.:.:." .U|
00001CA0: 20 42 45 4E 54 20 5A 45 20 41 4E 44 45 52 53 20 | BENT ZE ANDERS |
00001CB0: 57 45 4C 20 4B 57 49 4A 54 20 21 21 21 22 00 F9 |WEL KWIJT !!!"..|
00001CC0: 24 7B 00 99 3A 99 3A 99 22 20 45 49 4E 44 45 20 |${..:.:." EINDE |
00001CD0: 42 45 57 45 52 4B 49 4E 47 20 28 20 4A 2F 4E A0 |BEWERKING ( J/N.|
00001CE0: 29 22 3B 3A 85 4B 5A 24 3A 8B 4B 5A 24 B2 22 22 |)";:.KZ$:.KZ$.""|
00001CF0: A7 99 22 93 22 89 31 32 33 00 0A 25 7C 00 8B 4B |..".".123..%|..K|
00001D00: 5A 24 B3 B1 22 4A 22 A7 31 30 00 15 25 7D 00 9E |Z$.."J".10..%}..|
00001D10: 36 34 37 33 38 00 4F 25 7E 00 97 31 30 36 31 2C |64738.O%~..1061,|
00001D20: 31 39 3A 97 31 30 36 32 2C 32 3A 97 31 30 36 33 |19:.1062,2:.1063|
00001D30: 2C 35 3A 97 35 35 33 33 33 2C 37 3A 97 35 35 33 |,5:.55333,7:.553|
00001D40: 33 34 2C 37 3A 97 35 35 33 33 35 2C 37 3A 8E 00 |34,7:.55335,7:..|
00001D50: 61 25 7F 00 81 41 B2 31 A4 35 3A 98 31 3A 82 3A |a%...A.1.5:.1:.:|
00001D60: 8E 00 00 00 48 12 FF |....H.. |
.......53280,2:.53281,2:.55332,1:.55333,
1:TT.500:.T$(TT,3):.".":SP$." ":
.".....":.".";SP$;"*********************
**":.SP$;"* *":.SP$;
"*. CATALOGUS .*"......SP$;"*
*":.SP$;"*. SB
E .*":.SP$;"*. TE ENKHUIZEN
.*":.SP$;"*. LAST UPDATE .*
":.SP$;"*. JANUARI 1984 .*":.SP$;
"* *".C....SP$"*****
******************.":.AA.1.3000:.:.".":.
808,225:.10.1...."... . NIEUWE C
ATALOGUS .":.".. . WILT U TER
UG NAAR HET HOOFDMENU .":.KZ$:.KZ$."J".1
0.N....".";". HEEFT U DE GEGEVENS BEWAAR
D ":.W$:.H(W$,1)."J".6......"..MOET DIT
NOG GEBEUREN ";:.V$:.H(V$,1)."J".113....
..I.1.N:T$(I,1)."":T$(I,2)."":T$(I,3).""
:.I:.:.".":.". NIEUWE CATALOGUS
. .":.:.8.J....".":.:."..
CATALOGUS. "
:......." WAAR HEEFT DE CATALOGUS BETREK
KING OP";:.K$(1):." WAT WORDT DE INHOUD
VAN KOLOM 1";:.K$(2):.:." WAT WORDT DE I
NHOUD VAN KOLOM 2";:.K$(3):.:." WAT WORD
T DE INHOUD VAN KOLOM 3";:.K$(4):..9....
" TOT WELKE DATUM BIJGEWERKT";:.K$(5):.1
8.|....".":.:.".. CATALOG
US. ":.808,225.<....126:."
. HOOFDMENU .":."...":."
INVOEREN GEGEVENS (1)":."
PRINTEN OP SCHERM (2)":." ZOEK
EN IN BESTAND (3)":." VERWIJDE
REN UIT BESTAND (4)"......" SORTEREN
(PER KOLOM) (5)":." PRINTEN OP P
APIER (6)":." BEWAREN OP TAPE/
FLOPPY (7)":." NIEUWE CATALOGUS
(8)":." EINDE BEWERKINGEN
(9)".H....:." TYPE HET NUMMER VAN UW
KEUZE IN";:.KZ:.KZ.15,44,53,67,76,102,1
13,3,122.N...." UW KEUZE KAN NIET !!
!":.13......".":." . HULP - MENU INV
OEREN .":."...":." WAT MOET ER WORDEN
GEDAAN:":.:." EEN NIEUW BESTAND AANMAKE
N ( 1 )":.:." EEN BESTAAND BESTAND
INLEZEN ( 2 )":......." DIT BESTAND
UITBREIDEN ( 3 )":.:." TERUG
NAAR HET HOOFDMENU ( 4 )":.:.KZ:
.KZ.7,28,43,10......15.....N.1......P.N.
TT.B....".":." BEEINDIG DE INVOER MET
'*****'":.:."(";P;")";.30)"(";(TT.P);")"
:."=====":." . MAXIMAAL 20 TEKENS PER
KOLOM .":.:.:.K$(2);.15)":":.:.K$(3);
.15)":":.:.K$(4);.15)":":.......".":."..
....":..17);:.T$(P,1):.T$(P,1)."*****".2
7.C....:..17);:.T$(P,2):.T$(P,2)."*****"
.27......:..17);:.T$(P,3):.T$(P,3)."****
*".27......C(T$(P,1)).20.C(T$(P,2)).20.C
(T$(P,3)).20.26.&....P.S...." SORRY TE L
ANGE INVOER":.Z.1.500:.:.20.....N.P.1:."
.":." HET BESTAND BEVAT NU ";N;K$(1):.11
.I....".":."WELKE CATALOGUS WILT U INLEZ
EN.";:.K$(1):.K$(1)."".28......:."STAAT
DIT OP TAPE OF FLOPPY ( T / F )":.KZ$:.:
.KZ$."T".32......KZ$."F".36.(....".":.29
.U. .F.1:.F,1,0,K$(1):.F,N:.F,G$:.G$.K$(
1).34.`.!. F:.32. ."..:." BESTAND (";G$;
")":.:.C.1.5:.F,D$:K$(C).D$:.C:.P.1.N:D$
."":.F,D$:T$(P,1).D$:.F,D$:T$(P,2).D$:.F
,D$:T$(P,3).D$:.".";.20)"."P:.P: F:.".":
." HET BESTAND ";K$(1);" BEVAT NU ";N;"
ITEMS":..(.#..38...$.D9$."":F$.K$(1):D9$
.F$:.3,8,5,D9$.",SEQ,READ":.3,N:.3,G$:.C
.1.5:.3,D$:K$(C).D$:.C:.B.1.N:.3,D$:T$(B
,1).D$:.3,D$:T$(B,2).D$:.3,D$:T$(B,3).D$
:.".ER WORDEN NU ."B". ITEMS INGELEZEN."
...%..B: 3...&..".MOET DIT BESTAND WORDE
N UITGEBREID(J/N)";./.'..KZ$:.KZ$."".39.
?.(..KZ$."N".10.O.)..KZ$."J".43.W.*..39.
J.+..".":N.N.1:.19...,..".":T1.1:T2.N:."
.LISTEN.":.W.T1.T2:.A2.W.W.3:.:.
"(";A2;")":.K$(2);".";.20)T$(A2,1);".":.
K$(3);".";.20)T$(A2,2);".":.K$(4);".";.2
0)T$(A2,3);".":.A2.N.50...-..A2.W.3.47.&
....A2.E./.W.W.3:.:."DRUK EEN TOETS";.Y.
0..KZ$:.KZ$."".48.E.1..".":.W...2..:."IN
DIEN GELEZEN DRUK DAN EEN TOETS.";...3..
KZ$:.KZ$."".51...4..10.1.5..".":."
. ZOEKEN .":."..ZOEKWOORD
HELP IS TERUG NAAR MENU .":.".WAT IS
HET ZOEKWOORD";:.Z$:.Z$."HELP".10.V.6.P.
N:.K.1.P:.L.1.3:.T$(K,L).Z$.60.L.7..L:.K
:.K.P.L.3.56...8..:."ZOEKWOORD NIET (MEE
R) AANWEZIG.":."NIEUW ZOEKWOORD NODIG ?"
;.E.9..KZ$:.KZ$."".57.U.:..KZ$."N".10...
;..53.3.<..:."(";K;")":.K$(2);.21)T$(K,1
):.K$(3);.21)T$(K,2):.K$(4);.21)T$(K,3):
.K.P.L.3.56.H.=.Z1.Z1.1:.Z1.4.63.P.>..55
.J.?..:." RAAK EEN TOETS";.~.@..KZ$:.KZ$
."".64...A.Z1.0:.55...B..".":../.C..".":
." . VERWIJDEREN .":."...
":.". RECORDNR. 0 IS TERUG NAAR HET HOOF
DMENU.":.:." WELK RECORDNR. MOET VERWIJD
ERD WORDEN";:.P:.P.0.10.@.D..P.0.P..N.70
.G.E.." RECORDNUMMER NIET AANWEZIG":.11.
..F..".WEET U HET ZEKER !!....."...G..KZ
$:.KZ$."".71...H..KZ$."N".11...I..P.N.75
...J..P.P.N.1:T$(P,1).T$((P.1),1):T$(P,2
).T$((P.1),2):T$(P,3).T$((P.1),3):....K.
N.N.1:.11.J.L..".":."...":." WAAROP MOET
ER GESORTEERD WORDEN":.:.K$(2);.22)"( 1
)":.K$(3);.22)"( 2 )":.K$(4);.22)"( 3 )
":.".TERUG NAAR HOOFDMENU.";.22)"( 4 )":
.:.:." UW KEUZE":.K:.K.77,85,93,10...M..
".":." ER WORDT NU OP ";K$(2);" GESORTEE
RD.":.:.:.I.1.N:.E(T$(I,1)).0.I.0:.80.E.
N..C(T$(I,1)).6.E(T$(I,1))..0.I.0:.80.P.
O..I:.82...P..I.1.N:.".";.20)".";I;".":.
J.1.N:.T$(I,1).T$(J,1)..101...Q..J:.I:.8
4.Z.R..I.1.N:.".";.20)".";I;".":.J.1.N:.
E(T$(I,1)).E(T$(J,1))..101...S..J:.I...T
.." SORTERING GEREED.":.11.U.U..".":." E
R WORDT NU OP ";K$(3);" GESORTEERD.":.:.
:.I.1.N:.E(T$(I,2)).0.I.0:.88.}.V..C(T$(
I,2)).6.E(T$(I,2))..0.I.0:.88...W..I:.90
.C.X..I.1.N:.".";.20)".";I;".":.J.1.N:.T
$(I,2).T$(J,2)..101.Q.Y..J:.I:.92...Z..I
.1.N:.".";.20)".";I;".":.J.1.N:.E(T$(I,2
)).E(T$(J,2))..101...[..J:.I.:.\.." SORT
ERING GEREED.":.11...]..".":." ER WORDT
NU OP ";K$(4);" GESORTEERD.":.:.:.I.1.N:
.E(T$(I,3)).0.I.0:.96...^..C(T$(I,3)).6.
E(T$(I,3))..0.I.0:.96..._..I:.98...`..I.
1.N:.".";.20)".";I;".":.J.1.N:.T$(I,3).T
$(J,3)..101...A..J:.I:.100.K.B..I.1.N:."
.";.20)".";I;".":.J.1.N:.E(T$(I,3)).E(T$
(J,3))..101.U.C..J:.I.S.D.." SORTERING G
EREED.":.11...E.A$(1,1).T$(J,1):A$(1,2).
T$(J,2):A$(1,3).T$(J,3):T$(J,1).T$(I,1):
T$(J,2).T$(I,2):T$(J,3).T$(I,3):T$(I,1).
A$(1,1):T$(I,2).A$(1,2):T$(I,3).A$(1,3):
....F.A5$.K$(5):.".":.:." WILT U ALLES O
F EEN GEDEELTE UITGEPRINT":." HEBBEN":."
.. . TERUG NAAR HET HOOFDMENU IS * .":."
...":." GEEF OP 'A' OF 'G' OF '*' ":.KZ$
:.KZ$."*".10.W.G..KZ$."A"..1,4,0:ZZ.1:GG
.N:.106...H..KZ$."G".." VANAF WELK RECOR
DNUMMER";:.ZZ:..B.I.." TOT EN MET WELK R
ECORDNUMMER";:.GG:.1,4,0:A5$.K$(5).. J..
" EN NU GA IK PRINTEN !!":.1,G(14)"CATAL
OGUS INZAKE: "K$(1):.1:.1,G(15):.1," BIJ
GEWERKT T/M: "A5$:.1:M.C(K$(2)):O.C(K$(3
)):Y.C(K$(4)):L$." ":M$." ":O$." ":.1,K$
(2);G(16)"30 ";K$(3);G(16);"55 ";K$(4).K
K.L$.".":.Q.1.M:L1$.L1$.L$:.:M$.".":.Q.
1.O:M1$.M1$.M$:.:O$.".":.Q.1.Y:O1$.O1$.O
$:.:.1,L1$;G(16)"30 ";M1$;G(16)"55 ";O1$
:.1:.1:.Z.ZZ.GG:.1,T$(Z,1);G(16)"30 ";T$
(Z,2);G(16)"55 ";T$(Z,3):.1.Y L..Z.GG.11
2..!M..Z.27.Z.58.Z.89.Z.120.Z.151.Z.182.
Z.213.Z.244.Z.275..127.J!N..Z.306.Z.337.
Z.368.Z.399.Z.430.Z.461.Z.492..127.Q!O..
Z..!P..1:.1:.1," DE CATALOGUS BEVAT NU "
;N;K$(1): 1:.10.."Q..".":.".. BEWA
REN OP TAPE OF FLOPPY .":."...
WILT U TERUG NAAR HET HOOFDMENU .":
.KZ$:.KZ$."J".KZ$."J".10.""R..KZ$."JA".K
Z$."JA".10.R"S..".. WERKT U MET TAPE OF
FLOPPY (T/F)":.KZ$:.".....":.KZ$.."T".KZ
$.."F".115.."T..KZ$."F".121.?#U..".":."
UW ";K$(1);" CATALOGUS WORD NU":." OPGEB
ORGEN.":F.1:.F,1,1,K$(1):.F,N:.F,K$(1):.
C.1.5:D$.K$(C):.F,D$:.C:.B.1.N:.".";.20)
"."B:D$.T$(B,1):.F,D$:D$.T$(B,2):.F,D$:D
$.T$(B,3):.F,D$.P#V..B.N. F:.120.W#W..B.
.#X..".":."..":." HET BESTAND IS OPGEBOR
GEN":.:.11.E$Y.D9$."@0:":F$.K$(1):D9$.D9
$.F$:.2,8,3,D9$.",SEQ,WRITE":.2,N:.2,F$:
.C.1.5:.2,K$(C):.C:.B.1.N:.".";.20);"."B
:.2,T$(B,1):.2,T$(B,2):.2,T$(B,3):.B: 2:
."...HET BESTAND IS OPGEBORGEN":.:.11..$
Z..".":." WEET U HET ZEKER OF MOETEN DE
GEGEVENS":.:.:." NOG WORDEN BEWAARD ?":.
:.:." .U BENT ZE ANDERS WEL KWIJT !!!"..
${..:.:." EINDE BEWERKING ( J/N )";:.KZ$
:.KZ$.""..".".123..%|..KZ$.."J".10..%}..
64738.O%~..1061,19:.1062,2:.1063,5:.5533
3,7:.55334,7:.55335,7:..A%..A.1.5:.1:.:
....H..
> CLICK IMAGE PREVIEW FOR FULL MODAL