00000000: 01 08 28 08 01 00 8F 20 2A 2A 2A 2A 2A 2A 2A 2A |..(.... ********|
00000010: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00000020: 2A 2A 2A 2A 2A 2A 2A 2A 00 4F 08 02 00 8F 20 2A |********.O.... *|
00000030: 20 4D 41 58 49 4D 41 41 4C 20 41 41 4E 54 41 4C | MAXIMAAL AANTAL|
00000040: 20 52 45 43 4F 52 44 53 20 42 49 4A 20 20 2A 00 | RECORDS BIJ *.|
00000050: 76 08 04 00 8F 20 2A 20 52 32 3D 38 20 49 53 20 |v.... * R2=8 IS |
00000060: 32 33 30 33 20 28 28 38 2B 31 29 2A 32 35 36 29 |2303 ((8+1)*256)|
00000070: 20 2D 20 31 20 2A 00 9D 08 06 00 8F 20 2A 2A 2A | - 1 *...... ***|
00000080: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00000090: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 A6 08 |*************...|
000000A0: 0A 00 99 22 93 22 00 D1 08 0C 00 99 22 20 44 49 |..."."......" DI|
000000B0: 54 20 50 52 4F 47 52 41 4D 4D 41 20 4D 41 41 4B |T PROGRAMMA MAAK|
000000C0: 54 20 45 45 4E 20 52 45 4C 41 54 49 45 46 22 3A |T EEN RELATIEF":|
000000D0: 99 00 FD 08 0D 00 99 22 20 42 45 53 54 41 4E 44 |......." BESTAND|
000000E0: 20 41 41 4E 20 45 4E 20 48 45 45 46 54 20 44 41 | AAN EN HEEFT DA|
000000F0: 41 52 56 4F 4F 52 20 45 45 4E 22 3A 99 00 21 09 |ARVOOR EEN":..!.|
00000100: 0E 00 99 22 20 47 45 48 45 4C 45 20 4C 45 47 45 |..." GEHELE LEGE|
00000110: 20 53 43 48 49 4A 46 20 4E 4F 44 49 47 2E 22 3A | SCHIJF NODIG.":|
00000120: 99 00 53 09 0F 00 99 3A 99 3A 99 22 20 44 55 53 |..S....:.:." DUS|
00000130: 20 50 41 53 20 4F 50 20 44 41 54 20 4E 49 45 54 | PAS OP DAT NIET|
00000140: 20 50 45 52 20 4F 4E 47 45 4C 55 4B 20 45 45 4E | PER ONGELUK EEN|
00000150: 22 3A 99 00 84 09 10 00 99 22 20 4E 49 45 54 20 |":......." NIET |
00000160: 4C 45 47 45 20 53 43 48 49 4A 46 20 49 4E 20 44 |LEGE SCHIJF IN D|
00000170: 45 20 44 49 53 4B 2D 44 52 49 56 45 20 5A 49 54 |E DISK-DRIVE ZIT|
00000180: 2E 22 3A 99 00 B4 09 11 00 99 22 20 48 45 54 20 |.":......." HET |
00000190: 50 52 4F 47 52 41 4D 4D 41 20 4D 41 41 4B 54 20 |PROGRAMMA MAAKT |
000001A0: 45 45 4E 20 42 45 53 54 41 4E 44 20 41 41 4E 22 |EEN BESTAND AAN"|
000001B0: 3A 99 3A 99 00 DE 09 12 00 99 22 20 20 20 2D 20 |:.:......." - |
000001C0: 56 4F 4F 52 20 32 33 30 33 20 52 45 43 4F 52 44 |VOOR 2303 RECORD|
000001D0: 53 20 4D 45 54 20 49 45 44 45 52 22 3A 99 00 12 |S MET IEDER":...|
000001E0: 0A 13 00 99 22 20 20 20 2D 20 45 45 4E 20 52 45 |...." - EEN RE|
000001F0: 43 4F 52 44 4C 45 4E 47 54 45 20 56 41 4E 20 37 |CORDLENGTE VAN 7|
00000200: 31 20 4B 41 52 41 4B 54 45 52 53 22 3A 99 3A 99 |1 KARAKTERS":.:.|
00000210: 3A 99 00 3A 0A 14 00 85 20 22 20 20 20 20 20 42 |:..:.... " B|
00000220: 45 53 54 41 4E 44 20 41 41 4E 4D 41 4B 45 4E 20 |ESTAND AANMAKEN |
00000230: 28 4A 2F 4E 29 20 22 3B 41 24 00 5B 0A 1E 00 8B |(J/N) ";A$.[....|
00000240: 20 A8 20 28 41 24 B2 22 4A 22 20 B0 20 41 24 B2 | . (A$."J" . A$.|
00000250: 22 4E 22 29 20 A7 20 89 20 31 30 00 70 0A 23 00 |"N") . . 10.p.#.|
00000260: 8B 20 41 24 B2 22 4E 22 20 A7 20 89 20 31 35 30 |. A$."N" . . 150|
00000270: 00 85 0A 28 00 99 22 93 22 3A 99 3A 99 3A 99 3A |...(..".":.:.:.:|
00000280: 99 3A 99 3A 99 00 AE 0A 3C 00 99 22 20 20 20 20 |.:.:....<.." |
00000290: 20 42 45 53 54 41 4E 44 20 57 4F 52 44 54 20 41 | BESTAND WORDT A|
000002A0: 41 4E 47 45 4D 41 41 4B 54 20 2E 2E 2E 22 00 D7 |ANGEMAAKT ..."..|
000002B0: 0A 46 00 9F 20 31 2C 38 2C 31 35 20 3A 20 9F 20 |.F.. 1,8,15 : . |
000002C0: 32 2C 38 2C 32 2C 22 4F 3A 42 45 53 54 2C 4C 2C |2,8,2,"O:BEST,L,|
000002D0: 22 AA C7 28 37 31 29 00 F5 0A 5A 00 98 31 2C 22 |"..(71)...Z..1,"|
000002E0: 50 22 C7 28 32 AA 39 36 29 C7 28 31 29 C7 28 30 |P".(2.96).(1).(0|
000002F0: 29 C7 28 31 29 00 09 0B 5F 00 8D 20 35 30 30 3A |).(1)..._.. 500:|
00000300: 98 32 2C 22 45 49 4E 44 22 00 29 0B 64 00 98 31 |.2,"EIND".).d..1|
00000310: 2C 22 50 22 C7 28 32 AA 39 36 29 C7 28 32 35 35 |,"P".(2.96).(255|
00000320: 29 C7 28 38 29 C7 28 31 29 00 40 0B 69 00 8D 20 |).(8).(1).@.i.. |
00000330: 35 30 30 3A 98 32 2C 22 4C 41 41 54 53 54 45 22 |500:.2,"LAATSTE"|
00000340: 00 4C 0B 8C 00 A0 32 20 3A 20 A0 31 00 52 0B 96 |.L....2 : .1.R..|
00000350: 00 80 00 62 0B F4 01 84 31 2C 45 2C 42 24 2C 43 |...b....1,E,B$,C|
00000360: 2C 44 00 7A 0B 08 02 8B 20 28 45 B3 32 30 20 B0 |,D.z.... (E.20 .|
00000370: 20 45 B2 35 30 29 20 A7 20 8E 00 9A 0B 12 02 99 | E.50) . .......|
00000380: 20 45 3B 42 24 3B 43 3B 44 3A 20 A0 20 32 20 3A | E;B$;C;D: . 2 :|
00000390: 20 A0 20 31 20 3A 20 90 3A 8E 00 00 00 | . 1 : .:.... |
..(.... ********************************
.O.... * MAXIMAAL AANTAL RECORDS BIJ *.
V.... * R2=8 IS 2303 ((8+1)*256) - 1 *..
.... ********************************...
...".".Q...." DIT PROGRAMMA MAAKT EEN RE
LATIEF":......." BESTAND AAN EN HEEFT DA
ARVOOR EEN":..!...." GEHELE LEGE SCHIJF
NODIG.":..S....:.:." DUS PAS OP DAT NIET
PER ONGELUK EEN":......." NIET LEGE SCH
IJF IN DE DISK-DRIVE ZIT.":......." HET
PROGRAMMA MAAKT EEN BESTAND AAN":.:.....
.." - VOOR 2303 RECORDS MET IEDER":...
...." - EEN RECORDLENGTE VAN 71 KARAKT
ERS":.:.:..:.... " BESTAND AANMAKEN
(J/N) ";A$.[.... . (A$."J" . A$."N") . .
10.P.#.. A$."N" . . 150...(..".":.:.:.:
.:.:....<.." BESTAND WORDT AANGEMAAK
T ...".W.F.. 1,8,15 : . 2,8,2,"O:BEST,L,
".G(71)...Z..1,"P"G(2.96)G(1)G(0)G(1)...
_.. 500:.2,"EIND".).D..1,"P"G(2.96)G(255
)G(8)G(1).@.I.. 500:.2,"LAATSTE".L... 2
: 1.R.....B....1,E,B$,C,D.Z.... (E.20 .
E.50) . ....... E;B$;C;D: 2 : 1 : .
:....
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL