> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 0D 08 0A 00 99 C7 28 31 34 20 29 00 26 08 |........(14 ).&.|
00000010: 0F 00 85 22 93 57 45 4C 4B 45 20 44 41 54 55 4D |...".WELKE DATUM|
00000020: 20 22 3B 5A 58 24 00 4B 08 14 00 99 22 93 48 4F | ";ZX$.K....".HO|
00000030: 45 20 4C 41 41 54 20 49 53 20 48 45 54 20 4E 55 |E LAAT IS HET NU|
00000040: 20 22 3A 85 22 11 22 3B 54 49 24 00 60 08 1E 00 | ":.".";TI$.`...|
00000050: 4D B2 53 B2 4E B2 30 3A 86 41 24 28 31 30 30 29 |M.S.N.0:.A$(100)|
00000060: 00 73 08 28 00 97 33 36 38 37 39 2C 20 38 3A 99 |.s.(..36879, 8:.|
00000070: 22 40 22 00 7C 08 32 00 99 22 13 22 00 B4 08 3C |"@".|.2.."."...<|
00000080: 00 99 22 93 12 20 20 20 20 2A 2A 2A 20 20 20 20 |..".. *** |
00000090: 20 20 20 20 20 20 CC CF C7 C2 CF C5 CB 2E 20 20 | ........ |
000000A0: 20 20 20 20 20 20 20 2A 2A 2A 20 20 20 20 20 20 | *** |
000000B0: 20 12 22 3B 00 E4 08 41 00 99 22 12 20 20 20 20 | .";...A..". |
000000C0: 20 20 20 20 20 20 20 20 20 20 20 56 41 4E 20 20 | VAN |
000000D0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
000000E0: 20 20 22 3B 00 16 09 46 00 99 22 12 20 20 2A 2A | ";...F..". **|
000000F0: 2A 20 20 CA 41 4E 20 56 41 4E 20 44 45 52 20 CC |* .AN VAN DER .|
00000100: 4F 4F 2E 20 D0 C1 33 C5 C2 DA 20 20 2A 2A 2A 20 |OO. ..3... *** |
00000110: 20 20 11 11 11 22 00 3E 09 4B 00 99 22 20 20 20 | ...".>.K.." |
00000120: 20 20 20 20 20 11 C4 41 54 41 20 C9 4E 56 4F 45 | ..ATA .NVOE|
00000130: 52 45 4E 20 20 20 20 20 28 31 29 20 20 22 00 65 |REN (1) ".e|
00000140: 09 50 00 99 22 20 20 20 20 20 20 20 20 C4 41 54 |.P.." .AT|
00000150: 41 20 DA 4F 45 4B 45 4E 20 20 20 20 20 20 20 28 |A .OEKEN (|
00000160: 32 29 20 20 22 00 90 09 5A 00 99 22 20 20 20 20 |2) "...Z.." |
00000170: 20 20 20 20 C4 41 54 41 20 D3 41 56 45 4E 20 20 | .ATA .AVEN |
00000180: 20 20 20 20 20 20 28 33 29 20 20 20 20 20 20 22 | (3) "|
00000190: 00 BA 09 64 00 99 22 20 20 20 20 20 20 20 20 C4 |...d.." .|
000001A0: 41 54 41 20 CC 41 44 45 4E 20 20 20 20 20 20 20 |ATA .ADEN |
000001B0: 20 28 34 29 20 20 20 20 20 22 00 E1 09 78 00 99 | (4) "...x..|
000001C0: 22 20 20 20 20 20 20 20 20 C4 41 54 41 20 D7 49 |" .ATA .I|
000001D0: 53 53 45 4E 20 20 20 20 20 20 20 28 35 29 20 20 |SSEN (5) |
000001E0: 22 00 08 0A 82 00 99 22 20 20 20 20 20 20 20 20 |"......" |
000001F0: C4 41 54 41 20 D6 45 52 41 4E 44 45 52 45 4E 20 |.ATA .ERANDEREN |
00000200: 20 20 28 36 29 20 20 22 00 2F 0A 8C 00 99 22 20 | (6) "./...." |
00000210: 20 20 20 20 20 20 20 D0 52 49 4E 54 20 C2 45 53 | .RINT .ES|
00000220: 54 41 4E 44 20 20 20 20 20 28 37 29 20 20 22 00 |TAND (7) ".|
00000230: 51 0A 96 00 99 22 11 20 20 20 20 20 20 20 20 20 |Q....". |
00000240: 20 CD C1 C1 CB A0 D5 D7 A0 CB C5 D5 DA C5 A0 21 | ..............!|
00000250: 22 00 59 0A A0 00 A1 41 24 00 93 0A AA 00 99 22 |".Y....A$......"|
00000260: 13 11 11 11 11 11 1D 1D 1D 1D 1D 1D 12 22 3B C8 |.............";.|
00000270: 28 54 49 24 2C 32 29 3B 22 3A 22 3B CA 28 54 49 |(TI$,2);":";.(TI|
00000280: 24 2C 33 2C 32 29 3B 22 3A 22 3B C9 28 54 49 24 |$,3,2);":";.(TI$|
00000290: 2C 32 29 00 BF 0A AF 00 99 22 13 11 11 11 11 11 |,2)......"......|
000002A0: 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D |................|
000002B0: 1D 1D 1D 1D 1D 1D 1D 1D 1D 12 22 3B 5A 58 24 00 |..........";ZX$.|
000002C0: CF 0A B4 00 8B 41 24 B2 22 31 22 A7 32 37 30 00 |.....A$."1".270.|
000002D0: DF 0A BE 00 8B 41 24 B2 22 32 22 A7 33 32 30 00 |.....A$."2".320.|
000002E0: EF 0A C8 00 8B 41 24 B2 22 33 22 A7 34 31 30 00 |.....A$."3".410.|
000002F0: FF 0A D2 00 8B 41 24 B2 22 35 22 A7 35 32 30 00 |.....A$."5".520.|
00000300: 0F 0B DC 00 8B 41 24 B2 22 35 22 A7 36 30 30 00 |.....A$."5".600.|
00000310: 1F 0B E6 00 8B 41 24 B2 22 36 22 A7 36 38 30 00 |.....A$."6".680.|
00000320: 2F 0B F0 00 8B 41 24 B2 22 37 22 A7 37 38 30 00 |/....A$."7".780.|
00000330: 3F 0B FA 00 8B 41 24 B2 22 20 22 A7 37 38 30 00 |?....A$." ".780.|
00000340: 49 0B 04 01 89 20 31 36 30 00 7D 0B 0E 01 99 22 |I.... 160.}...."|
00000350: 93 56 4F 45 52 20 44 45 20 47 45 47 45 56 45 4E |.VOER DE GEGEVEN|
00000360: 53 20 49 4E 21 20 22 3B 20 22 4E 4F 47 20 22 3B |S IN! "; "NOG ";|
00000370: B8 28 58 29 3B 22 20 42 59 54 53 11 22 00 88 0B |.(X);" BYTS."...|
00000380: 18 01 85 41 24 28 4E 29 00 99 0B 22 01 8B 41 24 |...A$(N)..."..A$|
00000390: 28 4E 29 B2 22 22 A7 34 30 00 D1 0B 2C 01 41 24 |(N)."".40...,.A$|
000003A0: 28 4E 29 B2 41 24 28 4E 29 AA 22 20 2F 20 22 AA |(N).A$(N)." / ".|
000003B0: 5A 58 24 AA 22 20 2F 20 22 AA C8 28 54 49 24 2C |ZX$." / "..(TI$,|
000003C0: 32 29 AA 22 2E 22 AA CA 28 54 49 24 2C 33 2C 32 |2)."."..(TI$,3,2|
000003D0: 29 00 E9 0B 36 01 4E B2 4E AA 31 3A 41 24 28 4E |)...6.N.N.1:A$(N|
000003E0: 29 B2 22 22 3A 89 32 38 30 00 0A 0C 40 01 99 22 |)."":.280...@.."|
000003F0: 93 11 11 20 56 4F 45 52 20 44 45 20 52 4F 45 50 |... VOER DE ROEP|
00000400: 4E 41 41 4D 20 49 4E 20 3A 22 00 12 0C 4A 01 85 |NAAM IN :"...J..|
00000410: 42 24 00 20 0C 54 01 8B 42 24 B2 22 22 A7 34 30 |B$. .T..B$."".40|
00000420: 00 2B 0C 5E 01 81 4B B2 30 A4 4E 00 43 0C 68 01 |.+.^..K.0.N.C.h.|
00000430: 8B C3 28 42 24 29 B1 34 A7 42 24 B2 C8 28 42 24 |..(B$).4.B$..(B$|
00000440: 2C 36 29 00 70 0C 72 01 8B 42 24 B2 C8 28 41 24 |,6).p.r..B$..(A$|
00000450: 28 4B 29 2C 36 29 A7 99 22 11 1D 22 3B 41 24 28 |(K),6).."..";A$(|
00000460: 4B 29 2C 22 11 41 4C 20 47 45 57 45 52 4B 54 22 |K),".AL GEWERKT"|
00000470: 00 77 0C 7C 01 82 4B 00 8B 0C 86 01 99 22 11 45 |.w.|..K......".E|
00000480: 49 4E 44 45 20 44 41 54 41 21 22 00 9A 0C 90 01 |INDE DATA!".....|
00000490: 42 24 B2 22 22 3A 89 33 33 30 00 C2 0C 9A 01 99 |B$."":.330......|
000004A0: 22 93 53 41 56 45 4E 20 56 41 4E 20 44 45 20 44 |".SAVEN VAN DE D|
000004B0: 41 54 41 20 4F 50 20 43 41 53 53 45 54 45 20 21 |ATA OP CASSETE !|
000004C0: 11 22 00 D1 0C A4 01 9F 31 2C 31 2C 31 2C 22 58 |."......1,1,1,"X|
000004D0: 22 00 E8 0C AE 01 99 22 11 46 49 4C 45 20 49 53 |"......".FILE IS|
000004E0: 20 4F 50 45 4E 20 21 22 00 F3 0C B8 01 81 46 B2 | OPEN !"......F.|
000004F0: 30 A4 4E 00 00 0D C2 01 98 31 2C 41 24 28 46 29 |0.N......1,A$(F)|
00000500: 00 0D 0D CC 01 8B 46 B1 4E A7 34 39 30 00 14 0D |......F.N.490...|
00000510: D6 01 82 46 00 27 0D E0 01 41 24 28 46 29 B2 22 |...F.'...A$(F)."|
00000520: 2A 22 3A 89 34 35 30 00 34 0D EA 01 A0 31 3A 4E |*":.450.4....1:N|
00000530: B2 4E AB 31 00 46 0D F4 01 A1 57 24 3A 8B 57 24 |.N.1.F....W$:.W$|
00000540: B2 22 22 A7 34 30 00 4F 0D FE 01 89 35 30 30 00 |."".40.O....500.|
00000550: 6E 0D 08 02 99 22 93 48 45 54 20 4C 41 44 45 4E |n....".HET LADEN|
00000560: 20 56 41 4E 20 44 45 20 44 41 54 41 21 22 00 85 | VAN DE DATA!"..|
00000570: 0D 12 02 9C 3A 4E B2 30 3A 86 41 24 28 31 30 30 |....:N.0:.A$(100|
00000580: 29 3A 53 B2 30 00 94 0D 1C 02 9F 31 2C 31 2C 30 |):S.0......1,1,0|
00000590: 2C 22 58 22 00 AC 0D 26 02 99 22 11 11 1D 46 49 |,"X"...&.."...FI|
000005A0: 4C 45 20 49 53 20 4F 50 45 4E 21 22 00 B9 0D 30 |LE IS OPEN!"...0|
000005B0: 02 84 31 2C 41 24 28 53 29 00 D9 0D 3A 02 8B 41 |..1,A$(S)...:..A|
000005C0: 24 28 53 29 B2 22 2A 22 A7 A0 31 3A 4E B2 4E AB |$(S)."*"..1:N.N.|
000005D0: 31 3A 4E B2 53 3A 89 34 30 00 EF 0D 44 02 8B 53 |1:N.S:.40...D..S|
000005E0: B2 31 30 30 A7 A0 31 3A 4E B2 53 3A 89 34 30 00 |.100..1:N.S:.40.|
000005F0: FE 0D 4E 02 53 B2 53 AA 31 3A 89 35 36 30 00 2E |..N.S.S.1:.560..|
00000600: 0E 58 02 99 22 93 57 49 53 53 45 4E 20 56 41 4E |.X..".WISSEN VAN|
00000610: 20 44 45 20 44 41 54 41 21 20 20 20 56 4F 45 52 | DE DATA! VOER|
00000620: 20 44 45 20 43 41 4C 4C 20 49 4E 3A 11 22 00 36 | DE CALL IN:.".6|
00000630: 0E 62 02 85 44 24 00 46 0E 6C 02 8B 44 24 B2 22 |.b..D$.F.l..D$."|
00000640: 22 A7 3A 89 34 30 00 51 0E 76 02 81 4D B2 30 A4 |".:.40.Q.v..M.0.|
00000650: 4E 00 69 0E 80 02 8B C3 28 44 24 29 B1 36 A7 44 |N.i.....(D$).6.D|
00000660: 24 B2 C8 28 44 24 2C 36 29 00 9B 0E 8A 02 8B 44 |$..(D$,6)......D|
00000670: 24 B2 C8 28 41 24 28 4D 29 2C 36 29 A7 41 24 28 |$..(A$(M),6).A$(|
00000680: 4D 29 B2 41 24 28 4E AB 31 29 3A 44 24 B2 22 22 |M).A$(N.1):D$.""|
00000690: 3A 4E B2 4E AB 31 3A 89 36 31 30 00 A2 0E 94 02 |:N.N.1:.610.....|
000006A0: 82 4D 00 D6 0E 9E 02 99 22 11 53 54 41 41 54 20 |.M......".STAAT |
000006B0: 4E 49 45 54 20 49 4E 20 48 45 54 20 11 1D 1D 1D |NIET IN HET ....|
000006C0: 1D 47 45 48 45 55 47 45 4E 21 22 3A 44 24 B2 22 |.GEHEUGEN!":D$."|
000006D0: 22 3A 89 36 31 30 00 00 0F A8 02 99 22 93 57 45 |":.610......".WE|
000006E0: 4C 4B 45 20 43 41 4C 4C 20 4D 4F 45 54 20 47 45 |LKE CALL MOET GE|
000006F0: 57 49 4A 5A 49 47 44 20 57 4F 52 44 45 4E 11 22 |WIJZIGD WORDEN."|
00000700: 00 08 0F B2 02 85 48 24 00 20 0F BC 02 8B C3 28 |......H$. .....(|
00000710: 48 24 29 B1 36 A7 48 24 B2 C8 28 48 24 2C 36 29 |H$).6.H$..(H$,6)|
00000720: 00 2F 0F C6 02 8B 48 24 B2 22 22 A7 37 38 30 00 |./....H$."".780.|
00000730: 3A 0F D0 02 81 47 B2 30 A4 4E 00 5B 0F DA 02 8B |:....G.0.N.[....|
00000740: 48 24 B2 C8 28 41 24 28 47 29 2C 36 29 A7 99 41 |H$..(A$(G),6)..A|
00000750: 24 28 47 29 3A 89 20 20 37 36 30 00 62 0F E4 02 |$(G):. 760.b...|
00000760: 82 47 00 91 0F EE 02 99 22 11 53 54 41 41 54 20 |.G......".STAAT |
00000770: 4E 49 45 54 20 49 4E 20 48 45 54 20 47 45 48 45 |NIET IN HET GEHE|
00000780: 55 47 45 4E 21 22 3A 48 24 B2 22 22 3A 89 36 39 |UGEN!":H$."":.69|
00000790: 30 00 AD 0F F8 02 99 22 56 55 4C 20 4E 49 45 55 |0......"VUL NIEU|
000007A0: 57 45 20 44 41 54 41 20 49 4E 3A 11 22 00 C3 0F |WE DATA IN:."...|
000007B0: 02 03 85 41 24 28 47 29 3A 48 24 B2 22 22 3A 89 |...A$(G):H$."":.|
000007C0: 36 39 30 00 E6 0F 0C 03 99 22 93 1D 20 48 45 54 |690......".. HET|
000007D0: 20 47 45 48 45 4C 45 20 42 45 53 54 41 4E 44 3A | GEHELE BESTAND:|
000007E0: 11 22 3A 4D B2 30 00 F1 0F 16 03 99 41 24 28 4D |.":M.0......A$(M|
000007F0: 29 00 07 10 20 03 4D B2 4D AA 31 3A 8B 4D B2 31 |)... .M.M.1:.M.1|
00000800: 30 30 A7 89 38 34 30 00 21 10 2A 03 8B 41 24 28 |00..840.!.*..A$(|
00000810: 4D 29 B2 22 2A 22 A7 4E B2 4E AB 31 3A 89 38 34 |M)."*".N.N.1:.84|
00000820: 30 00 2E 10 34 03 8B 4D B2 4E A7 38 34 30 00 37 |0...4..M.N.840.7|
00000830: 10 3E 03 89 37 39 30 00 4B 10 48 03 A1 44 24 3A |.>..790.K.H..D$:|
00000840: 8B 44 24 B2 22 22 A7 89 38 34 30 00 53 10 52 03 |.D$.""..840.S.R.|
00000850: 89 34 30 00 00 00 |.40... |
.......G(14 ).&....".WELKE DATUM ";ZX$.K
....".HOE LAAT IS HET NU ":.".";TI$.`...
M.S.N.0:.A$(100).S.(..36879, 8:."@".|.2.
."."...<..".. *** LOGBOEK.
*** .";...A..".
VAN ";...F..". **
* JAN VAN DER LOO. PA3EBZ *** ...".>
.K.." .DATA INVOEREN (1) ".E
.P.." DATA ZOEKEN (2) "...
Z.." DATA SAVEN (3) "
...D.." DATA LADEN (4)
"...X.." DATA WISSEN (5)
"......" DATA VERANDEREN (6) "
./...." PRINT BESTAND (7) ".
Q....". MAAK UW KEUZE !".Y. ..A
$......".............";H(TI$,2);":";J(TI
$,3,2);":";I(TI$,2)......"..............
..................";ZX$.O....A$."1".270.
.....A$."2".320...H..A$."3".410...R..A$.
"5".520......A$."5".600......A$."6".680.
/....A$."7".780.?....A$." ".780.I.... 16
0.}....".VOER DE GEGEVENS IN! "; "NOG ";
.(X);" BYTS."......A$(N)..."..A$(N)."".4
0.Q.,.A$(N).A$(N)." / ".ZX$." / ".H(TI$,
2).".".J(TI$,3,2)...6.N.N.1:A$(N)."":.28
0...@.."... VOER DE ROEPNAAM IN :"...J..
B$. .T..B$."".40.+.^..K.0.N.C.H..C(B$).4
.B$.H(B$,6).P.R..B$.H(A$(K),6).."..";A$(
K),".AL GEWERKT".W.|..K......".EINDE DAT
A!".....B$."":.330.B....".SAVEN VAN DE D
ATA OP CASSETE !.".Q....1,1,1,"X"......"
.FILE IS OPEN !"......F.0.N...B..1,A$(F)
...L..F.N.490...V..F.'...A$(F)."*":.450.
4... 1:N.N.1.F....W$:.W$."".40.O....500.
N....".HET LADEN VAN DE DATA!"......:N.0
:.A$(100):S.0......1,1,0,"X"...&.."...FI
LE IS OPEN!"...0..1,A$(S).Y.:..A$(S)."*"
. 1:N.N.1:N.S:.40...D..S.100. 1:N.S:.40.
..N.S.S.1:.560...X..".WISSEN VAN DE DATA
! VOER DE CALL IN:.".6.B..D$.F.L..D$."
".:.40.Q.V..M.0.N.I....C(D$).6.D$.H(D$,6
)......D$.H(A$(M),6).A$(M).A$(N.1):D$.""
:N.N.1:.610......M.V....".STAAT NIET IN
HET .....GEHEUGEN!":D$."":.610......".WE
LKE CALL MOET GEWIJZIGD WORDEN."......H$
. ....C(H$).6.H$.H(H$,6)./.F..H$."".780.
:.P..G.0.N.[.Z..H$.H(A$(G),6)..A$(G):.
760.B....G......".STAAT NIET IN HET GEHE
UGEN!":H$."":.690......"VUL NIEUWE DATA
IN:.".C....A$(G):H$."":.690......".. HET
GEHELE BESTAND:.":M.0......A$(M)... .M.
M.1:.M.100..840.!.*..A$(M)."*".N.N.1:.84
0...4..M.N.840.7.>..790.K.H..D$:.D$.""..
840.S.R..40...
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL