DISK INDELER

00000000: 01 08 31 08 0A 00 9C 3A  8D 36 30 3A 99 22 20 57  |..1....:.60:." W|
00000010: 49 4C 54 20 55 20 45 45  4E 20 12 4E 92 49 45 55  |ILT U EEN .N.IEU|
00000020: 57 45 20 49 4E 44 45 4C  45 4E 20 4D 41 4B 45 4E  |WE INDELEN MAKEN|
00000030: 22 00 5F 08 14 00 99 22  11 20 4F 46 20 45 45 4E  |"._....". OF EEN|
00000040: 20 12 4F 92 55 44 45 20  56 41 4D 20 44 49 53 4B  | .O.UDE VAM DISK|
00000050: 20 48 41 4C 45 4E 20 28  4E 2F 4F 29 20 3F 22 00  | HALEN (N/O) ?".|
00000060: 7B 08 1E 00 A1 41 24 3A  8B 41 24 B3 B1 22 4E 22  |{....A$:.A$.."N"|
00000070: AF 41 24 B3 B1 22 4F 22  A7 33 30 00 92 08 28 00  |.A$.."O".30...(.|
00000080: 8B 41 24 B2 22 4F 22 A7  42 24 B2 22 44 22 3A 38  |.A$."O".B$."D":8|
00000090: 32 30 00 9A 08 32 00 89  39 30 00 D1 08 3C 00 99  |20...2..90...<..|
000000A0: 22 93 11 2A 20 44 49 53  4B 45 54 54 45 20 49 4E  |"..* DISKETTE IN|
000000B0: 44 45 4C 45 52 20 28 43  29 20 44 41 54 41 2D 56  |DELER (C) DATA-V|
000000C0: 49 53 49 4F 4E 20 27 38  35 20 2A 22 3A 89 37 34  |ISION '85 *":.74|
000000D0: 30 00 0F 09 46 00 86 4E  24 28 41 29 2C 42 28 41  |0...F..N$(A),B(A|
000000E0: 29 2C 44 28 41 29 2C 44  24 28 41 29 3A 81 49 B2  |),D(A),D$(A):.I.|
000000F0: 30 A4 41 3A 4E 24 28 49  29 B2 22 22 3A 42 28 49  |0.A:N$(I)."":B(I|
00000100: 29 B2 30 3A 44 28 49 29  B2 30 3A 82 49 3A 8E 00  |).0:D(I).0:.I:..|
00000110: 2E 09 50 00 86 42 44 28  44 29 3A 81 58 B2 31 A4  |..P..BD(D):.X.1.|
00000120: 44 3A 42 44 28 58 29 B2  30 3A 82 58 3A 8E 00 5D  |D:BD(X).0:.X:..]|
00000130: 09 5A 00 8D 36 30 3A 85  22 20 48 4F 45 56 45 45  |.Z..60:." HOEVEE|
00000140: 4C 20 50 52 4F 47 52 41  4D 4D 41 27 53 20 49 4E  |L PROGRAMMA'S IN|
00000150: 44 45 4C 45 4E 20 22 3B  41 3A 8D 37 30 00 6C 09  |DELEN ";A:.70.l.|
00000160: 64 00 81 58 B2 31 A4 41  3A 8D 36 30 00 B1 09 6E  |d..X.1.A:.60...n|
00000170: 00 99 22 13 11 11 11 11  11 22 58 22 9D 45 20 50  |.."......"X".E P|
00000180: 52 4F 47 52 41 4D 4D 41  20 4E 41 41 4D 20 22 3B  |ROGRAMMA NAAM ";|
00000190: 3A 85 4E 24 28 58 29 3A  85 22 11 20 41 41 4E 54  |:.N$(X):.". AANT|
000001A0: 41 4C 20 42 4C 4F 4B 4B  45 4E 20 22 3B 42 28 58  |AL BLOKKEN ";B(X|
000001B0: 29 00 F5 09 78 00 85 22  11 20 56 41 4E 20 57 45  |)...x..". VAN WE|
000001C0: 4C 4B 45 20 44 49 53 4B  20 22 3B 44 24 28 58 29  |LKE DISK ";D$(X)|
000001D0: 3A 99 22 11 11 5A 49 4A  4E 20 41 4C 4C 45 20 47  |:."..ZIJN ALLE G|
000001E0: 45 47 45 56 45 4E 53 20  47 4F 45 44 20 28 4A 2F  |EGEVENS GOED (J/|
000001F0: 4E 29 20 3F 22 00 12 0A  82 00 A1 41 24 3A 8B 41  |N) ?"......A$:.A|
00000200: 24 B3 B1 22 4A 22 AF 41  24 B3 B1 22 4E 22 A7 31  |$.."J".A$.."N".1|
00000210: 33 30 00 22 0A 8C 00 8B  41 24 B2 22 4E 22 A7 31  |30."....A$."N".1|
00000220: 31 30 00 29 0A 96 00 82  58 00 62 0A A0 00 42 B2  |10.)....X.b...B.|
00000230: 30 3A 44 B2 30 3A 81 49  B2 31 A4 41 3A 42 B2 42  |0:D.0:.I.1.A:B.B|
00000240: AA 42 28 49 29 3A 82 49  3A 44 B2 42 AD 36 36 30  |.B(I):.I:D.B.660|
00000250: 3A 8B 44 B3 B1 B5 28 44  29 A7 44 B2 B5 28 44 29  |:.D...(D).D..(D)|
00000260: AA 31 00 A1 0A AA 00 8D  36 30 3A 99 22 20 55 20  |.1......60:." U |
00000270: 48 45 45 46 54 22 44 22  44 49 53 4B 45 54 54 45  |HEEFT"D"DISKETTE|
00000280: 53 20 4E 4F 44 49 47 2E  22 3A 99 22 11 20 45 56  |S NODIG.":.". EV|
00000290: 45 4E 20 47 45 44 55 4C  44 20 41 2E 55 2E 42 2E  |EN GEDULD A.U.B.|
000002A0: 22 00 D1 0A B4 00 8D 38  30 3A 99 22 11 20 43 4F  |"......80:.". CO|
000002B0: 4D 50 55 54 45 52 20 53  4F 52 54 45 45 52 44 20  |MPUTER SORTEERD |
000002C0: 4E 55 20 4F 50 20 47 52  4F 4F 54 54 45 2E 11 11  |NU OP GROOTTE...|
000002D0: 22 00 E0 0A BE 00 81 59  B2 31 A4 41 3A 58 B2 59  |"......Y.1.A:X.Y|
000002E0: 00 F4 0A C8 00 42 B2 42  28 58 29 3A 41 24 B2 4E  |.....B.B(X):A$.N|
000002F0: 24 28 58 29 00 07 0B D2  00 58 B2 58 AA 31 3A 8B  |$(X).....X.X.1:.|
00000300: 58 B1 41 A7 32 34 30 00  17 0B DC 00 8B 42 28 58  |X.A.240......B(X|
00000310: 29 B1 42 A7 32 30 30 00  24 0B E6 00 8B 58 B3 41  |).B.200.$....X.A|
00000320: A7 32 31 30 00 2C 0B F0  00 58 B2 31 00 45 0B FA  |.210.,...X.1.E..|
00000330: 00 8B 42 B2 42 28 58 29  AF 41 24 B2 4E 24 28 58  |..B.B(X).A$.N$(X|
00000340: 29 A7 32 37 30 00 58 0B  04 01 58 B2 58 AA 31 3A  |).270.X...X.X.1:|
00000350: 8B 58 B3 41 A7 32 35 30  00 97 0B 0E 01 41 24 B2  |.X.A.250.....A$.|
00000360: 4E 24 28 59 29 3A 43 B2  42 28 59 29 3A 44 24 B2  |N$(Y):C.B(Y):D$.|
00000370: 44 24 28 59 29 3A 4E 24  28 59 29 B2 4E 24 28 58  |D$(Y):N$(Y).N$(X|
00000380: 29 3A 42 28 59 29 B2 42  28 58 29 3A 44 24 28 59  |):B(Y).B(X):D$(Y|
00000390: 29 B2 44 24 28 58 29 00  BB 0B 18 01 4E 24 28 58  |).D$(X).....N$(X|
000003A0: 29 B2 41 24 3A 42 28 58  29 B2 43 3A 44 24 28 58  |).A$:B(X).C:D$(X|
000003B0: 29 B2 44 24 3A 82 59 3A  5A B2 30 00 F8 0B 22 01  |).D$:.Y:Z.0...".|
000003C0: 81 59 B2 31 A4 44 3A 8B  5A B2 30 A7 99 22 91 20  |.Y.1.D:.Z.0..". |
000003D0: 43 4F 4D 50 55 54 45 52  20 53 4F 52 54 45 45 52  |COMPUTER SORTEER|
000003E0: 44 20 4E 55 20 44 49 53  4B 20 20 20 20 9D 9D 9D  |D NU DISK    ...|
000003F0: 9D 22 59 3A 89 33 31 30  00 27 0C 2C 01 99 22 91  |."Y:.310.'.,..".|
00000400: 20 43 4F 4D 50 55 54 45  52 20 43 4F 4E 54 52 4F  | COMPUTER CONTRO|
00000410: 4C 45 45 52 44 20 4E 55  20 44 49 53 4B 20 20 20  |LEERD NU DISK   |
00000420: 20 9D 9D 9D 9D 22 59 00  47 0C 36 01 42 B2 42 44  | ...."Y.G.6.B.BD|
00000430: 28 59 29 3A 52 B2 30 3A  8D 35 39 30 3A 42 44 28  |(Y):R.0:.590:BD(|
00000440: 59 29 B2 42 3A 82 59 00  81 0C 40 01 5A B2 5A AA  |Y).B:.Y...@.Z.Z.|
00000450: 31 3A 8B 5A B2 31 30 A7  99 22 11 20 43 4F 4D 50  |1:.Z.10..". COMP|
00000460: 55 54 45 52 20 44 45 45  4C 54 20 4C 41 41 53 54  |UTER DEELT LAAST|
00000470: 45 20 50 52 4F 47 52 41  4D 4D 41 27 53 20 49 4E  |E PROGRAMMA'S IN|
00000480: 22 00 95 0C 4A 01 8B 5A  B2 31 30 A7 8D 36 39 30  |"...J..Z.10..690|
00000490: 3A 89 33 36 30 00 B1 0C  54 01 81 58 B2 31 A4 41  |:.360...T..X.1.A|
000004A0: 3A 8B 44 28 58 29 B2 30  A7 58 B2 41 3A 89 32 39  |:.D(X).0.X.A:.29|
000004B0: 30 00 B8 0C 5E 01 82 58  00 E4 0C 68 01 99 22 11  |0...^..X...h..".|
000004C0: 20 47 45 47 45 56 45 4E  53 20 55 49 54 50 52 49  | GEGEVENS UITPRI|
000004D0: 4E 54 45 4E 20 4F 50 20  12 53 92 43 48 45 52 4D  |NTEN OP .S.CHERM|
000004E0: 20 4F 46 22 00 16 0D 72  01 99 22 11 20 12 50 92  | OF"...r..". .P.|
000004F0: 52 49 4E 54 45 52 20 4F  46 20 4F 50 53 4C 41 41  |RINTER OF OPSLAA|
00000500: 4E 20 4F 50 20 12 44 92  49 53 4B 20 28 53 2F 50  |N OP .D.ISK (S/P|
00000510: 2F 44 29 20 3F 22 00 3B  0D 7C 01 A1 42 24 3A 8B  |/D) ?".;.|..B$:.|
00000520: 42 24 B3 B1 22 53 22 AF  42 24 B3 B1 22 50 22 AF  |B$.."S".B$.."P".|
00000530: 42 24 B3 B1 22 44 22 A7  33 38 30 00 54 0D 81 01  |B$.."D".380.T...|
00000540: 8B 42 24 B2 22 50 22 A7  8D 31 30 30 30 3A 8B 45  |.B$."P"..1000:.E|
00000550: A7 33 36 30 00 64 0D 86  01 8B 42 24 B2 22 53 22  |.360.d....B$."S"|
00000560: A7 34 33 30 00 7F 0D 90  01 8B 42 24 B2 22 50 22  |.430......B$."P"|
00000570: A7 9F 34 2C 34 2C 34 3A  9D 34 3A 89 34 33 30 00  |..4,4,4:.4:.430.|
00000580: 8C 0D 9A 01 8D 36 30 3A  89 37 36 30 00 A1 0D A4  |.....60:.760....|
00000590: 01 8F 20 50 52 49 4E 54  20 44 49 53 4B 20 55 49  |.. PRINT DISK UI|
000005A0: 54 00 B1 0D AE 01 59 B2  30 3A 58 B2 30 3A 49 B2  |T.....Y.0:X.0:I.|
000005B0: 30 00 C7 0D B8 01 59 B2  59 AA 31 3A 8B 42 24 B2  |0.....Y.Y.1:.B$.|
000005C0: 22 53 22 A7 8D 36 30 00  E0 0D C2 01 99 22 20 4F  |"S"..60......" O|
000005D0: 50 20 44 49 53 4B 22 59  22 4B 4F 4D 45 4E 3A 22  |P DISK"Y"KOMEN:"|
000005E0: 00 02 0E CC 01 99 3A 99  22 20 44 49 53 4B 22 2C  |......:." DISK",|
000005F0: 22 42 4C 4F 4B 22 2C 22  4E 41 41 4D 22 3A 8D 37  |"BLOK","NAAM":.7|
00000600: 34 30 00 2B 0E D6 01 81  58 B2 31 A4 41 3A 8B 44  |40.+....X.1.A:.D|
00000610: 28 58 29 B2 59 A7 99 22  20 22 3B 44 24 28 58 29  |(X).Y.." ";D$(X)|
00000620: 2C 42 28 58 29 2C 4E 24  28 58 29 00 6A 0E E0 01  |,B(X),N$(X).j...|
00000630: 82 58 3A 99 3A 99 22 20  4F 50 20 44 45 5A 45 20  |.X:.:." OP DEZE |
00000640: 44 49 53 4B 20 5A 49 4A  4E 20 4E 4F 47 22 36 36  |DISK ZIJN NOG"66|
00000650: 34 AB 42 44 28 59 29 22  42 4C 4F 4B 4B 45 4E 20  |4.BD(Y)"BLOKKEN |
00000660: 56 52 49 4A 22 3A 8D 37  34 30 00 7B 0E EA 01 8B  |VRIJ":.740.{....|
00000670: 42 24 B3 B1 22 53 22 A7  35 32 30 00 A2 0E F4 01  |B$.."S".520.....|
00000680: 99 22 20 44 52 55 4B 20  4F 50 20 45 45 4E 20 54  |." DRUK OP EEN T|
00000690: 4F 45 54 53 20 56 4F 4F  52 20 56 45 52 56 4F 4C  |OETS VOOR VERVOL|
000006A0: 47 22 00 B5 0E FE 01 A1  41 24 3A 8B 41 24 B2 22  |G"......A$:.A$."|
000006B0: 22 A7 35 31 30 00 C2 0E  08 02 8B 59 B3 44 A7 34  |".510......Y.D.4|
000006C0: 34 30 00 D4 0E 12 02 8B  42 24 B2 22 50 22 A7 98  |40......B$."P"..|
000006D0: 34 3A A0 34 00 03 0F 1C  02 99 22 11 20 57 49 4C  |4:.4......". WIL|
000006E0: 54 20 55 20 4D 45 45 52  20 50 52 4F 47 52 41 4D  |T U MEER PROGRAM|
000006F0: 4D 41 27 53 20 49 4E 44  45 4C 45 4E 20 28 4A 2F  |MA'S INDELEN (J/|
00000700: 4E 29 22 00 20 0F 26 02  A1 41 24 3A 8B 41 24 B3  |N)". .&..A$:.A$.|
00000710: B1 22 4A 22 AF 41 24 B3  B1 22 4E 22 A7 35 35 30  |."J".A$.."N".550|
00000720: 00 2F 0F 30 02 8B 41 24  B2 22 4A 22 A7 31 30 00  |./.0..A$."J".10.|
00000730: 3A 0F 3A 02 99 22 93 22  3A 80 00 50 0F 44 02 8F  |:.:..".":..P.D..|
00000740: 20 53 4F 52 54 45 45 52  20 4F 50 20 44 49 53 4B  | SORTEER OP DISK|
00000750: 00 6C 0F 4E 02 8B 42 44  28 59 29 B3 B2 36 36 30  |.l.N..BD(Y)..660|
00000760: AF 42 44 28 59 29 B1 36  35 34 A7 8E 00 9C 0F 58  |.BD(Y).654.....X|
00000770: 02 81 58 B2 31 A4 41 3A  8B 44 28 58 29 B2 30 A7  |..X.1.A:.D(X).0.|
00000780: 8B 42 AA 42 28 58 29 B3  B2 36 36 30 A7 42 B2 42  |.B.B(X)..660.B.B|
00000790: AA 42 28 58 29 3A 44 28  58 29 B2 59 00 A3 0F 62  |.B(X):D(X).Y...b|
000007A0: 02 82 58 00 CC 0F 6C 02  8B 42 B3 36 36 30 AF A8  |..X...l..B.660..|
000007B0: 28 42 B1 36 35 34 29 A7  8D 36 36 30 3A 52 B2 52  |(B.654)..660:R.R|
000007C0: AA 31 3A 8B 52 B3 31 30  A7 35 39 30 00 E6 0F 76  |.1:.R.10.590...v|
000007D0: 02 81 58 B2 31 A4 41 3A  8B 44 28 58 29 B3 30 A7  |..X.1.A:.D(X).0.|
000007E0: 44 28 58 29 B2 30 00 EF  0F 80 02 82 58 3A 8E 00  |D(X).0......X:..|
000007F0: 0F 10 8A 02 8F 20 48 41  41 4C 20 45 45 52 53 54  |..... HAAL EERST|
00000800: 45 20 50 52 4F 47 52 41  4D 4D 41 20 57 45 47 00  |E PROGRAMMA WEG.|
00000810: 37 10 94 02 81 58 B2 31  A4 41 3A 8B 44 28 58 29  |7....X.1.A:.D(X)|
00000820: B2 59 A7 44 28 58 29 B2  AB 59 3A 42 B2 42 AB 42  |.Y.D(X)..Y:B.B.B|
00000830: 28 58 29 3A 58 B2 41 00  40 10 9E 02 82 58 3A 8E  |(X):X.A.@....X:.|
00000840: 00 62 10 A8 02 8F 20 44  45 45 4C 20 4C 41 41 54  |.b.... DEEL LAAT|
00000850: 53 54 45 20 50 52 4F 47  52 41 4D 4D 41 27 53 20  |STE PROGRAMMA'S |
00000860: 49 4E 00 87 10 B2 02 81  59 B2 31 A4 44 3A 8B 42  |IN......Y.1.D:.B|
00000870: 44 28 59 29 B3 B2 36 36  30 AF 42 44 28 59 29 B1  |D(Y)..660.BD(Y).|
00000880: 36 35 34 A7 37 32 30 00  AE 10 BC 02 81 58 B2 31  |654.720......X.1|
00000890: A4 41 3A 8B 44 28 58 29  B2 30 AF 42 44 28 59 29  |.A:.D(X).0.BD(Y)|
000008A0: AA 42 28 58 29 B3 B2 36  36 30 A7 37 33 30 00 B5  |.B(X)..660.730..|
000008B0: 10 C6 02 82 58 00 BE 10  D0 02 82 59 3A 8E 00 DF  |....X......Y:...|
000008C0: 10 DA 02 42 44 28 59 29  B2 42 44 28 59 29 AA 42  |...BD(Y).BD(Y).B|
000008D0: 28 58 29 3A 44 28 58 29  B2 59 3A 89 37 31 30 00  |(X):D(X).Y:.710.|
000008E0: F7 10 E4 02 81 49 B2 30  A4 33 39 3A 99 22 2D 22  |.....I.0.39:."-"|
000008F0: 3B 3A 82 3A 99 3A 8E 00  14 11 EE 02 8F 20 46 49  |;:.:.:....... FI|
00000900: 4C 45 20 4E 41 41 52 20  44 49 53 4B 20 42 52 45  |LE NAAR DISK BRE|
00000910: 4E 47 45 4E 00 3E 11 F8  02 85 22 11 46 49 4C 45  |NGEN.>....".FILE|
00000920: 20 4E 41 41 4D 20 22 3B  46 24 3A 8B C3 28 46 24  | NAAM ";F$:..(F$|
00000930: 29 B2 31 AF 46 24 B2 22  2A 22 A7 33 36 30 00 6E  |).1.F$."*".360.n|
00000940: 11 02 03 9F 31 35 2C 38  2C 31 35 3A 9F 38 2C 38  |....15,8,15:.8,8|
00000950: 2C 38 2C C8 28 46 24 2C  31 36 29 AA 22 2C 53 2C  |,8,.(F$,16).",S,|
00000960: 57 22 3A 8D 38 39 30 3A  8B 45 A7 37 36 30 00 7C  |W":.890:.E.760.||
00000970: 11 0C 03 98 38 2C 41 3A  98 38 2C 44 00 AB 11 16  |....8,A:.8,D....|
00000980: 03 81 59 B2 31 A4 44 3A  98 38 2C 42 44 28 59 29  |..Y.1.D:.8,BD(Y)|
00000990: 3A 82 59 3A 81 58 B2 31  A4 41 3A 98 38 2C 44 28  |:.Y:.X.1.A:.8,D(|
000009A0: 58 29 3A 98 38 2C 44 24  28 58 29 00 D2 11 20 03  |X):.8,D$(X)... .|
000009B0: 98 38 2C 42 28 58 29 3A  98 38 2C 4E 24 28 58 29  |.8,B(X):.8,N$(X)|
000009C0: 3A 82 58 3A 98 38 3A A0  38 3A A0 31 35 3A 89 35  |:.X:.8:.8:.15:.5|
000009D0: 34 30 00 EC 11 2A 03 8F  20 46 49 4C 45 20 56 41  |40...*.. FILE VA|
000009E0: 4E 20 44 49 53 4B 20 48  41 4C 45 4E 00 16 12 34  |N DISK HALEN...4|
000009F0: 03 85 22 11 46 49 4C 45  20 4E 41 41 4D 20 22 3B  |..".FILE NAAM ";|
00000A00: 46 24 3A 8B C3 28 46 24  29 B2 31 AF 46 24 B2 22  |F$:..(F$).1.F$."|
00000A10: 2A 22 A7 33 36 30 00 46  12 3E 03 9F 31 35 2C 38  |*".360.F.>..15,8|
00000A20: 2C 31 35 3A 9F 38 2C 38  2C 38 2C C8 28 46 24 2C  |,15:.8,8,8,.(F$,|
00000A30: 31 36 29 AA 22 2C 53 2C  52 22 3A 8D 38 39 30 3A  |16).",S,R":.890:|
00000A40: 8B 45 A7 38 32 30 00 6C  12 48 03 84 38 2C 41 2C  |.E.820.l.H..8,A,|
00000A50: 44 3A 8D 37 30 3A 8D 38  30 3A 81 59 B2 31 A4 44  |D:.70:.80:.Y.1.D|
00000A60: 3A 84 38 2C 42 44 28 59  29 3A 82 59 00 9A 12 52  |:.8,BD(Y):.Y...R|
00000A70: 03 81 58 B2 31 A4 41 3A  84 38 2C 44 28 58 29 2C  |..X.1.A:.8,D(X),|
00000A80: 44 24 28 58 29 2C 42 28  58 29 2C 4E 24 28 58 29  |D$(X),B(X),N$(X)|
00000A90: 3A 82 58 3A A0 38 3A A0  31 35 00 C3 12 5C 03 99  |:.X:.8:.15...\..|
00000AA0: 22 11 20 47 45 47 45 56  45 4E 53 20 55 49 54 50  |". GEGEVENS UITP|
00000AB0: 52 49 4E 54 45 4E 20 4F  50 20 12 53 92 43 48 45  |RINTEN OP .S.CHE|
00000AC0: 52 4D 22 00 E6 12 66 03  99 22 11 20 4F 46 20 12  |RM"...f..". OF .|
00000AD0: 50 92 52 49 4E 54 45 52  20 28 53 2F 50 29 20 3F  |P.RINTER (S/P) ?|
00000AE0: 22 3A 89 33 38 30 00 FD  12 70 03 8F 20 47 45 54  |":.380...p.. GET|
00000AF0: 20 45 52 52 4F 52 20 43  41 4E 4E 45 4C 00 23 13  | ERROR CANNEL.#.|
00000B00: 7A 03 84 31 35 2C 41 24  2C 45 24 2C 45 24 2C 45  |z..15,A$,E$,E$,E|
00000B10: 24 3A 45 B2 C5 28 41 24  29 3A 8B 45 A7 A0 38 3A  |$:E..(A$):.E..8:|
00000B20: A0 31 35 00 47 13 84 03  8B 45 A7 99 22 11 20 45  |.15.G....E..". E|
00000B30: 52 20 49 53 20 49 45 54  53 20 46 4F 55 54 20 21  |R IS IETS FOUT !|
00000B40: 21 21 91 91 91 91 22 00  4D 13 8E 03 8E 00 80 13  |!!....".M.......|
00000B50: E8 03 44 49 B2 34 AB 28  42 24 B2 22 44 22 29 AC  |..DI.4.(B$."D").|
00000B60: 34 3A 9F 33 2C 44 49 2C  37 3A 97 37 36 38 2C 36  |4:.3,DI,7:.768,6|
00000B70: 31 3A 98 33 3A A0 33 3A  97 37 36 38 2C 31 33 39  |1:.3:.3:.768,139|
00000B80: 00 9D 13 F2 03 8B 53 54  B3 B1 AB 31 32 38 AF 53  |......ST...128.S|
00000B90: 54 B3 B1 AB 31 32 35 A7  45 B2 30 3A 8E 00 DB 13  |T...125.E.0:....|
00000BA0: FC 03 99 22 11 20 44 49  56 49 43 45 20 4E 49 45  |...". DIVICE NIE|
00000BB0: 54 20 41 41 4E 47 45 53  4C 4F 54 45 4E 20 21 21  |T AANGESLOTEN !!|
00000BC0: 21 91 91 91 91 91 91 22  3A 45 B2 31 3A 81 57 B2  |!......":E.1:.W.|
00000BD0: 31 A4 31 35 30 30 3A 82  57 3A 8E 00 00 00        |1.1500:.W:....  |

..1....:.60:." WILT U EEN .N.IEUWE INDEL
EN MAKEN"._....". OF EEN .O.UDE VAM DISK
 HALEN (N/O) ?".{....A$:.A$.."N".A$.."O"
.30...(..A$."O".B$."D":820...2..90.Q.<..
"..* DISKETTE INDELER (C) DATA-VISION '8
5 *":.740...F..N$(A),B(A),D(A),D$(A):.I.
0.A:N$(I)."":B(I).0:D(I).0:.I:....P..BD(
D):.X.1.D:BD(X).0:.X:..].Z..60:." HOEVEE
L PROGRAMMA'S INDELEN ";A:.70.L.D..X.1.A
:.60...N.."......"X".E PROGRAMMA NAAM ";
:.N$(X):.". AANTAL BLOKKEN ";B(X)...X.."
. VAN WELKE DISK ";D$(X):."..ZIJN ALLE G
EGEVENS GOED (J/N) ?"......A$:.A$.."J".A
$.."N".130."....A$."N".110.)....X.B. .B.
0:D.0:.I.1.A:B.B.B(I):.I:D.B.660:.D...(D
).D..(D).1......60:." U HEEFT"D"DISKETTE
S NODIG.":.". EVEN GEDULD A.U.B.".Q....8
0:.". COMPUTER SORTEERD NU OP GROOTTE...
"......Y.1.A:X.Y...H.B.B(X):A$.N$(X)...R
.X.X.1:.X.A.240......B(X).B.200.$....X.A
.210.,...X.1.E....B.B(X).A$.N$(X).270.X.
..X.X.1:.X.A.250.....A$.N$(Y):C.B(Y):D$.
D$(Y):N$(Y).N$(X):B(Y).B(X):D$(Y).D$(X).
....N$(X).A$:B(X).C:D$(X).D$:.Y:Z.0...".
.Y.1.D:.Z.0..". COMPUTER SORTEERD NU DIS
K    ...."Y:.310.'.,..". COMPUTER CONTRO
LEERD NU DISK    ...."Y.G.6.B.BD(Y):R.0:
.590:BD(Y).B:.Y...@.Z.Z.1:.Z.10..". COMP
UTER DEELT LAASTE PROGRAMMA'S IN"...J..Z
.10..690:.360...T..X.1.A:.D(X).0.X.A:.29
0...^..X...H..". GEGEVENS UITPRINTEN OP 
.S.CHERM OF"...R..". .P.RINTER OF OPSLAA
N OP .D.ISK (S/P/D) ?".;.|..B$:.B$.."S".
B$.."P".B$.."D".380.T....B$."P"..1000:.E
.360.D....B$."S".430.....B$."P"..4,4,4:
.4:.430......60:.760...... PRINT DISK UI
T.....Y.0:X.0:I.0.G...Y.Y.1:.B$."S"..60.
..B.." OP DISK"Y"KOMEN:"...L..:." DISK",
"BLOK","NAAM":.740.+.V..X.1.A:.D(X).Y.."
 ";D$(X),B(X),N$(X).J....X:.:." OP DEZE 
DISK ZIJN NOG"664.BD(Y)"BLOKKEN VRIJ":.7
40.{....B$.."S".520......" DRUK OP EEN T
OETS VOOR VERVOLG"......A$:.A$."".510.B.
...Y.D.440.T....B$."P"..4: 4......". WIL
T U MEER PROGRAMMA'S INDELEN (J/N)". .&.
.A$:.A$.."J".A$.."N".550./.0..A$."J".10.
:.:..".":..P.D.. SORTEER OP DISK.L.N..BD
(Y)..660.BD(Y).654.....X..X.1.A:.D(X).0.
.B.B(X)..660.B.B.B(X):D(X).Y...B..X.L.L.
.B.660..(B.654)..660:R.R.1:.R.10.590...V
..X.1.A:.D(X).0.D(X).0......X:....... HA
AL EERSTE PROGRAMMA WEG.7....X.1.A:.D(X)
.Y.D(X)..Y:B.B.B(X):X.A.@....X:..B.... D
EEL LAATSTE PROGRAMMA'S IN......Y.1.D:.B
D(Y)..660.BD(Y).654.720......X.1.A:.D(X)
.0.BD(Y).B(X)..660.730...F..X...P..Y:...
.Z.BD(Y).BD(Y).B(X):D(X).Y:.710......I.0
.39:."-";:.:.:....... FILE NAAR DISK BRE
NGEN.>....".FILE NAAM ";F$:.C(F$).1.F$."
*".360.N....15,8,15:.8,8,8,H(F$,16).",S,
W":.890:.E.760.|....8,A:.8,D......Y.1.D:
.8,BD(Y):.Y:.X.1.A:.8,D(X):.8,D$(X).R. .
.8,B(X):.8,N$(X):.X:.8: 8: 15:.540...*..
 FILE VAN DISK HALEN...4..".FILE NAAM ";
F$:.C(F$).1.F$."*".360.F.>..15,8,15:.8,8
,8,H(F$,16).",S,R":.890:.E.820.L.H..8,A,
D:.70:.80:.Y.1.D:.8,BD(Y):.Y...R..X.1.A:
.8,D(X),D$(X),B(X),N$(X):.X: 8: 15.C.\..
". GEGEVENS UITPRINTEN OP .S.CHERM"...F.
.". OF .P.RINTER (S/P) ?":.380...P.. GET
 ERROR CANNEL.#.Z..15,A$,E$,E$,E$:E.E(A$
):.E. 8: 15.G....E..". ER IS IETS FOUT !
!!....".M.........DI.4.(B$."D").4:.3,DI,
7:.768,61:.3: 3:.768,139......ST...128.S
T...125.E.0:.......". DIVICE NIET AANGES
LOTEN !!!......":E.1:.W.1.1500:.W:....

×

C64 Image

> CLICK IMAGE PREVIEW FOR FULL MODAL