> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 1B 08 64 00 97 35 33 32 38 30 2C 32 34 36 |....d..53280,246|
00000010: 3A 97 35 33 32 38 31 2C 32 34 36 00 3D 08 69 00 |:.53281,246.=.i.|
00000020: 46 52 B2 31 3A 49 24 B2 22 2D 46 49 4C 45 22 3A |FR.1:I$."-FILE":|
00000030: 54 41 50 45 B2 31 3A 99 C7 28 31 34 29 00 46 08 |TAPE.1:..(14).F.|
00000040: 6E 00 89 31 32 35 00 5B 08 73 00 A1 48 31 24 3A |n..125.[.s..H1$:|
00000050: 8B 48 31 24 B2 22 22 A7 31 31 35 00 6B 08 78 00 |.H1$."".115.k.x.|
00000060: 48 31 B2 C5 28 48 31 24 29 3A 8E 00 88 08 7D 00 |H1..(H1$):....}.|
00000070: 41 31 B2 31 30 30 3A 8F 20 41 41 4E 54 41 4C 20 |A1.100:. AANTAL |
00000080: 41 44 52 45 53 53 45 4E 00 D0 08 82 00 86 4E 24 |ADRESSEN......N$|
00000090: 28 41 31 29 2C 41 24 28 41 31 29 2C 50 24 28 41 |(A1),A$(A1),P$(A|
000000A0: 31 29 2C 57 24 28 41 31 29 2C 54 24 28 41 31 29 |1),W$(A1),T$(A1)|
000000B0: 2C 4B 31 24 28 41 31 29 2C 4B 32 24 28 41 31 29 |,K1$(A1),K2$(A1)|
000000C0: 2C 48 25 28 41 31 29 2C 49 25 28 32 AC 41 31 29 |,H%(A1),I%(2.A1)|
000000D0: 00 18 09 87 00 8F 20 49 4E 20 48 25 2D 54 41 42 |...... IN H%-TAB|
000000E0: 45 4C 20 53 54 41 41 54 20 44 45 20 56 4F 4C 47 |EL STAAT DE VOLG|
000000F0: 4F 52 44 45 2D 2A 44 45 20 49 4E 44 45 58 2A 2D |ORDE-*DE INDEX*-|
00000100: 20 56 41 4E 20 44 45 20 44 49 56 45 52 53 45 20 | VAN DE DIVERSE |
00000110: 54 41 42 45 4C 4C 45 4E 00 2F 09 8C 00 81 4A B2 |TABELLEN./....J.|
00000120: 30 A4 41 31 3A 48 25 28 4A 29 B2 4A 3A 82 4A 00 |0.A1:H%(J).J:.J.|
00000130: 62 09 91 00 99 22 93 05 C3 C2 CD 2D 36 34 20 C3 |b....".....-64 .|
00000140: CC C1 C9 D2 C5 20 20 20 20 20 20 20 20 20 20 20 |..... |
00000150: 20 20 20 20 20 20 28 C3 29 20 D4 C5 CC C5 C1 C3 | (.) ......|
00000160: 22 3B 00 92 09 96 00 99 22 A8 A8 A8 A8 A8 A8 A8 |";......".......|
00000170: A8 A8 A8 A8 A8 A8 A8 A8 A8 A8 A8 A8 A8 A8 A8 A8 |................|
00000180: A8 A8 A8 A8 A8 A8 A8 A8 A8 A8 A8 A8 A8 A8 A8 A8 |................|
00000190: A8 22 00 C1 09 9B 00 99 22 9A 11 12 31 92 2E 20 |."......"...1.. |
000001A0: C9 4E 56 4F 45 52 42 45 53 54 41 4E 44 20 4D 41 |.NVOERBESTAND MA|
000001B0: 4B 45 4E 20 4F 46 20 55 49 54 42 52 45 49 44 45 |KEN OF UITBREIDE|
000001C0: 4E 00 EA 09 A0 00 99 22 11 12 32 92 2E 20 C9 4E |N......"..2.. .N|
000001D0: 48 4F 55 44 20 54 4F 4E 45 4E 20 56 41 4E 20 48 |HOUD TONEN VAN H|
000001E0: 45 54 20 42 45 53 54 41 4E 44 00 27 0A A5 00 99 |ET BESTAND.'....|
000001F0: 22 11 12 33 92 2E 20 DA 4F 45 4B 20 49 4E 20 48 |"..3.. .OEK IN H|
00000200: 45 54 20 42 45 53 54 41 4E 44 22 3A 99 22 11 12 |ET BESTAND":."..|
00000210: 34 92 2E 20 D3 4F 52 54 45 45 52 20 50 45 52 20 |4.. .ORTEER PER |
00000220: 45 4C 45 4D 45 4E 54 00 47 0A AA 00 99 22 11 12 |ELEMENT.G...."..|
00000230: 35 92 2E 20 D6 45 52 41 4E 44 45 52 20 49 4E 20 |5.. .ERANDER IN |
00000240: 42 45 53 54 41 4E 44 00 65 0A AF 00 99 22 11 12 |BESTAND.e...."..|
00000250: 36 92 2E 20 D3 41 56 45 4E 20 56 41 4E 20 42 45 |6.. .AVEN VAN BE|
00000260: 53 54 41 4E 44 00 88 0A B4 00 99 22 11 12 37 92 |STAND......"..7.|
00000270: 2E 20 D3 54 4F 50 20 4D 45 54 20 48 45 54 20 50 |. .TOP MET HET P|
00000280: 52 4F 47 52 41 4D 4D 41 00 91 0A B9 00 8D 31 31 |ROGRAMMA......11|
00000290: 35 00 B0 0A BE 00 8B 28 C6 28 48 31 24 29 B3 34 |5......(.(H1$).4|
000002A0: 39 B0 C6 28 48 31 24 29 B1 35 35 29 A7 31 E0 35 |9..(H1$).55).1.5|
000002B0: 00 D9 0A C3 00 91 48 31 8D 32 30 35 2C 36 30 30 |......H1.205,600|
000002C0: 2C 38 35 35 2C 31 30 35 30 2C 31 32 35 35 2C 20 |,855,1050,1255, |
000002D0: 31 34 37 35 2C 31 35 38 30 00 E2 0A C8 00 89 31 |1475,1580......1|
000002E0: 34 35 00 FE 0A CD 00 99 22 93 11 11 2A 2A 2A 2A |45......"...****|
000002F0: 2A 20 C9 CE D6 CF C5 D2 20 2A 2A 2A 2A 2A 00 17 |* ...... *****..|
00000300: 0B D2 00 99 22 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D |...."===========|
00000310: 3D 3D 3D 3D 3D 3D 3D 00 24 0B D7 00 8B 4E B1 30 |=======.$....N.0|
00000320: 89 34 33 30 00 48 0B DC 00 99 22 11 11 12 31 92 |.430.H...."...1.|
00000330: 2E 20 CE 49 45 55 57 20 42 45 53 54 41 4E 44 20 |. .IEUW BESTAND |
00000340: 4F 50 42 4F 55 57 45 4E 00 69 0B E1 00 99 22 11 |OPBOUWEN.i....".|
00000350: 11 12 32 92 2E 20 CF 55 44 20 42 45 53 54 41 4E |..2.. .UD BESTAN|
00000360: 44 20 4F 50 48 41 4C 45 4E 00 72 0B E6 00 8D 31 |D OPHALEN.r....1|
00000370: 31 35 00 8B 0B EB 00 8B 48 31 24 B2 22 31 22 B0 |15......H1$."1".|
00000380: 48 31 24 B2 22 32 22 A7 32 34 35 00 94 0B F0 00 |H1$."2".245.....|
00000390: 89 32 33 30 00 A5 0B F5 00 8B 48 31 24 B2 22 32 |.230......H1$."2|
000003A0: 22 89 34 39 35 00 AD 0B FA 00 4E B2 31 00 B7 0B |".495.....N.1...|
000003B0: FF 00 99 22 93 11 22 00 DA 0B 04 01 99 22 D5 20 |...".."......". |
000003C0: 4B 55 4E 54 20 4E 55 20 41 44 52 45 53 53 45 4E |KUNT NU ADRESSEN|
000003D0: 20 49 4E 56 4F 45 52 45 4E 2E 00 0A 0C 09 01 99 | INVOEREN.......|
000003E0: 22 11 CF 4D 20 4D 45 54 20 49 4E 56 4F 45 52 20 |"..M MET INVOER |
000003F0: 54 45 20 45 49 4E 44 49 47 45 4E 3A 20 54 49 4B |TE EINDIGEN: TIK|
00000400: 20 2D 53 54 4F 50 2D 20 49 4E 00 31 0C 0E 01 99 | -STOP- IN.1....|
00000410: 22 C7 45 42 52 55 49 4B 20 12 C1 CC CC C5 C5 CE |".EBRUIK .......|
00000420: 92 20 4B 4C 45 49 4E 45 20 4C 45 54 54 45 52 53 |. KLEINE LETTERS|
00000430: 11 00 3D 0C 13 01 81 50 B2 4E A4 41 31 00 4F 0C |..=....P.N.A1.O.|
00000440: 18 01 99 22 11 12 3C 22 3B 50 3B 22 9D 20 3E 00 |..."..<";P;". >.|
00000450: 55 0C 1D 01 99 00 74 0C 22 01 85 22 CE 41 41 4D |U.....t."..".AAM|
00000460: 20 20 20 20 20 20 20 3A 20 BF 9D 9D 9D 22 3B 4E | : ....";N|
00000470: 24 28 50 29 00 8E 0C 27 01 8B 4E 24 28 50 29 B2 |$(P)...'..N$(P).|
00000480: 22 BF 22 A7 99 22 91 91 22 3A 89 32 39 30 00 A4 |".".."..":.290..|
00000490: 0C 2C 01 8B 4E 24 28 50 29 B2 22 53 54 4F 50 22 |.,..N$(P)."STOP"|
000004A0: 89 34 30 30 00 C3 0C 31 01 85 22 C1 44 52 45 53 |.400...1..".DRES|
000004B0: 20 20 20 20 20 20 3A 20 BF 9D 9D 9D 22 3B 41 24 | : ....";A$|
000004C0: 28 50 29 00 DD 0C 36 01 8B 41 24 28 50 29 B2 22 |(P)...6..A$(P)."|
000004D0: BF 22 A7 99 22 91 91 22 3A 89 33 30 35 00 F3 0C |.".."..":.305...|
000004E0: 3B 01 8B 41 24 28 50 29 B2 22 53 54 4F 50 22 89 |;..A$(P)."STOP".|
000004F0: 34 30 30 00 12 0D 01 01 01 01 01 01 01 01 01 01 |400.............|
00000500: 01 01 01 01 01 01 01 01 01 01 01 01 01 01 01 01 |................|
00000510: 01 01 01 01 01 01 01 01 01 01 01 01 01 01 01 01 |................|
00000520: 01 01 01 01 01 01 01 01 01 01 01 01 01 01 01 01 |................|
00000530: 01 01 01 01 01 01 01 01 01 01 01 01 01 01 01 01 |................|
00000540: 01 01 01 01 01 01 01 01 01 01 01 01 01 01 01 01 |................|
00000550: 01 01 01 01 01 01 01 01 01 01 01 01 01 01 01 01 |................|
00000560: 01 01 01 01 01 01 01 01 01 01 01 01 01 01 01 01 |................|
00000570: 01 01 01 01 01 01 01 01 01 01 01 01 01 01 01 01 |................|
00000580: 01 01 01 01 01 01 01 01 01 01 01 01 01 01 01 01 |................|
00000590: 01 01 01 01 01 01 01 01 01 01 01 01 01 01 01 01 |................|
000005A0: 01 01 01 01 01 01 01 01 01 01 01 01 01 01 01 01 |................|
000005B0: 01 01 01 01 01 01 01 01 01 01 01 01 01 01 01 01 |................|
000005C0: 01 01 01 01 01 01 01 01 01 01 01 01 01 01 01 01 |................|
000005D0: 01 01 01 01 01 01 01 01 01 01 01 01 01 01 01 01 |................|
000005E0: 01 01 01 01 01 01 01 01 01 01 01 01 01 01 01 01 |................|
000005F0: 01 01 01 01 |.... |
....D..53280,246:.53281,246.=.I.FR.1:I$.
"-FILE":TAPE.1:.G(14).F.N..125.[.S..H1$:
.H1$."".115.K.X.H1.E(H1$):....}.A1.100:.
AANTAL ADRESSEN.P....N$(A1),A$(A1),P$(A
1),W$(A1),T$(A1),K1$(A1),K2$(A1),H%(A1),
I%(2.A1)...... IN H%-TABEL STAAT DE VOLG
ORDE-*DE INDEX*- VAN DE DIVERSE TABELLEN
./....J.0.A1:H%(J).J:.J.B...."..CBM-64 C
LAIRE (C) TELEAC";......
".......................................
.".A...."...1.. INVOERBESTAND MAKEN OF U
ITBREIDEN... .."..2.. INHOUD TONEN VAN H
ET BESTAND.'...."..3.. ZOEK IN HET BESTA
ND":."..4.. SORTEER PER ELEMENT.G...."..
5.. VERANDER IN BESTAND.E...."..6.. SAVE
N VAN BESTAND......"..7.. STOP MET HET P
ROGRAMMA......115......(F(H1$).49.F(H1$)
.55).1.5.Y.C..H1.205,600,855,1050,1255,
1475,1580...H..145...M.."...***** INVOER
*****...R.."==================.$.W..N.0
.430.H...."...1.. NIEUW BESTAND OPBOUWEN
.I...."...2.. OUD BESTAND OPHALEN.R....1
15......H1$."1".H1$."2".245......230....
..H1$."2".495.....N.1......"..".Z...."U
KUNT NU ADRESSEN INVOEREN.......".OM MET
INVOER TE EINDIGEN: TIK -STOP- IN.1....
"GEBRUIK .ALLEEN. KLEINE LETTERS..=....P
.N.A1.O...."..<";P;". >.U.....T.".."NAAM
: ....";N$(P)...'..N$(P).".".."..
":.290...,..N$(P)."STOP".400.C.1.."ADRES
: ....";A$(P)...6..A$(P)."."..".."
:.305...;..A$(P)."STOP".400.............
........................................
........................................
........................................
........................................
........................................
........................................
....
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL