> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 1A 08 64 00 44 45 B2 38 3A 8F 20 44 45 56 |....d.DE.8:. DEV|
00000010: 49 43 45 20 4E 55 4D 4D 45 52 00 31 08 6E 00 3A |ICE NUMMER.1.n.:|
00000020: 20 20 20 3A 8F 20 31 3D 20 56 41 4E 20 54 41 50 | :. 1= VAN TAP|
00000030: 45 00 48 08 78 00 3A 20 20 20 3A 8F 20 38 3D 20 |E.H.x.: :. 8= |
00000040: 56 41 4E 20 44 49 53 4B 00 64 08 82 00 97 35 33 |VAN DISK.d....53|
00000050: 32 38 30 2C 30 3A 97 35 33 32 38 31 2C 30 3A 99 |280,0:.53281,0:.|
00000060: 22 05 22 3B 00 6F 08 8C 00 99 22 93 11 42 2A 00 |".";.o...."..B*.|
00000070: 97 08 96 00 99 22 20 20 20 20 20 50 43 20 20 49 |....." PC I|
00000080: 52 51 20 20 53 52 20 20 41 43 20 20 58 52 20 20 |RQ SR AC XR |
00000090: 59 52 20 20 53 50 22 00 BF 08 A0 00 99 22 20 20 |YR SP"......" |
000000A0: 20 20 30 30 30 35 20 45 36 32 45 20 33 30 20 20 | 0005 E62E 30 |
000000B0: 30 30 20 20 35 45 20 20 30 34 20 20 46 38 22 00 |00 5E 04 F8".|
000000C0: C7 08 AA 00 99 22 2E 00 E3 08 B4 00 9F 31 2C 30 |.....".......1,0|
000000D0: 3A 99 22 2E 3A 20 22 3B 3A 84 31 2C 41 24 3A A0 |:.".: ";:.1,A$:.|
000000E0: 31 3A 99 00 F2 08 BE 00 8B 41 24 B2 22 58 22 A7 |1:.......A$."X".|
000000F0: 20 80 00 03 09 C8 00 8B 41 24 B2 22 53 22 A7 20 | .......A$."S". |
00000100: 32 36 30 00 14 09 D2 00 8B 41 24 B2 22 4C 22 A7 |260......A$."L".|
00000110: 20 34 31 30 00 23 09 DC 00 8D 20 34 36 30 3A 89 | 410.#.... 460:.|
00000120: 31 38 30 00 29 09 E6 00 3A 00 41 09 F0 00 3A 20 |180.)...:.A...: |
00000130: 94 4E 20 4E 41 41 52 20 54 41 50 45 AD 44 49 53 |.N NAAR TAPE.DIS|
00000140: 4B 00 47 09 FA 00 3A 00 65 09 04 01 85 22 93 11 |K.G...:.e...."..|
00000150: 53 41 56 45 20 46 49 4C 45 4E 41 41 4D 20 20 20 |SAVE FILENAAM |
00000160: 22 3B 46 49 24 00 83 09 0E 01 85 22 11 53 54 41 |";FI$......".STA|
00000170: 52 54 20 41 44 52 45 53 20 20 20 20 20 20 22 3B |RT ADRES ";|
00000180: 53 54 24 00 A1 09 18 01 85 22 11 45 49 4E 44 20 |ST$......".EIND |
00000190: 41 44 52 45 53 20 20 20 20 20 20 20 22 3B 45 49 |ADRES ";EI|
000001A0: 24 00 BC 09 22 01 51 24 B2 C8 28 53 54 24 2C 32 |$...".Q$..(ST$,2|
000001B0: 29 20 3A 8D 35 36 30 3A 53 31 B2 51 00 D7 09 2C |) :.560:S1.Q...,|
000001C0: 01 51 24 B2 C9 28 53 54 24 2C 32 29 20 3A 8D 35 |.Q$..(ST$,2) :.5|
000001D0: 36 30 3A 53 32 B2 51 00 F2 09 36 01 51 24 B2 C8 |60:S2.Q...6.Q$..|
000001E0: 28 45 49 24 2C 32 29 20 3A 8D 35 36 30 3A 45 31 |(EI$,2) :.560:E1|
000001F0: B2 51 00 0D 0A 40 01 51 24 B2 C9 28 45 49 24 2C |.Q...@.Q$..(EI$,|
00000200: 32 29 20 3A 8D 35 36 30 3A 53 32 B2 51 00 53 0A |2) :.560:S2.Q.S.|
00000210: 4A 01 99 22 93 50 4F 4B 45 34 33 2C 22 53 31 22 |J..".POKE43,"S1"|
00000220: 3A 50 4F 4B 45 34 34 2C 22 53 32 22 3A 50 4F 4B |:POKE44,"S2":POK|
00000230: 45 34 35 2C 22 45 31 22 3A 50 4F 4B 45 34 36 2C |E45,"E1":POKE46,|
00000240: 22 45 32 22 3A 53 41 56 45 22 C7 28 33 34 29 46 |"E2":SAVE".(34)F|
00000250: 49 24 3B 00 63 0A 54 01 99 C7 28 33 34 29 22 2C |I$;.c.T...(34)",|
00000260: 22 44 45 00 8B 0A 5E 01 53 31 B2 C2 28 34 33 29 |"DE...^.S1..(43)|
00000270: 3A 53 32 B2 C2 28 34 34 29 3A 45 31 B2 C2 28 34 |:S2..(44):E1..(4|
00000280: 35 29 3A 45 32 B2 C2 28 34 36 29 00 CF 0A 68 01 |5):E2..(46)...h.|
00000290: 99 22 11 11 11 11 11 11 11 11 11 11 50 4F 4B 45 |."..........POKE|
000002A0: 34 33 2C 22 53 31 22 3A 50 4F 4B 45 34 34 2C 22 |43,"S1":POKE44,"|
000002B0: 53 32 22 3A 50 4F 4B 45 34 35 2C 22 45 31 22 3A |S2":POKE45,"E1":|
000002C0: 50 4F 4B 45 34 36 2C 22 45 32 22 3A 52 55 4E 00 |POKE46,"E2":RUN.|
000002D0: F7 0A 72 01 97 31 39 38 2C 39 3A 97 36 33 31 2C |..r..198,9:.631,|
000002E0: 31 39 3A 81 49 B2 30 A4 37 3A 97 36 33 32 AA 49 |19:.I.0.7:.632.I|
000002F0: 2C 31 33 3A 82 3A 80 00 FD 0A 7C 01 3A 00 17 0B |,13:.:....|.:...|
00000300: 86 01 3A 20 4C 41 44 45 4E 20 56 41 4E 20 54 41 |..: LADEN VAN TA|
00000310: 50 45 AD 44 49 53 4B 00 1D 0B 90 01 3A 00 39 0B |PE.DISK.....:.9.|
00000320: 9A 01 85 22 93 11 4C 41 41 44 20 46 49 4C 45 4E |..."..LAAD FILEN|
00000330: 41 41 4D 20 22 3B 46 49 24 00 49 0B A4 01 93 46 |AAM ";FI$.I....F|
00000340: 49 24 2C 44 45 2C 31 3A 8A 00 4F 0B AE 01 3A 00 |I$,DE,1:..O...:.|
00000350: 6A 0B B8 01 3A 20 56 45 52 54 41 41 4C 20 49 4E |j...: VERTAAL IN|
00000360: 56 4F 45 52 20 52 45 47 45 4C 00 70 0B C2 01 3A |VOER REGEL.p...:|
00000370: 00 8B 0B CC 01 43 24 B2 C8 28 41 24 2C 34 29 3A |.....C$..(A$,4):|
00000380: 56 24 B2 C9 28 41 24 2C 32 33 29 00 A4 0B D6 01 |V$..(A$,23).....|
00000390: 51 24 B2 C8 28 43 24 2C 32 29 3A 8D 35 36 30 3A |Q$..(C$,2):.560:|
000003A0: 5A 31 B2 51 00 BD 0B E0 01 51 24 B2 C9 28 43 24 |Z1.Q.....Q$..(C$|
000003B0: 2C 32 29 3A 8D 35 36 30 3A 5A 32 B2 51 00 D7 0B |,2):.560:Z2.Q...|
000003C0: EA 01 5A B2 5A 31 AC 32 35 36 AA 5A 32 3A 56 24 |..Z.Z1.256.Z2:V$|
000003D0: B2 22 20 22 AA 56 24 00 E2 0B F4 01 81 4C B2 31 |." ".V$......L.1|
000003E0: A4 38 00 FC 0B FE 01 51 24 B2 CA 28 56 24 2C 4C |.8.....Q$..(V$,L|
000003F0: AC 33 AB 31 2C 32 29 3A 8D 35 36 30 00 0D 0C 08 |.3.1,2):.560....|
00000400: 02 97 5A AA 4C AB 31 2C 51 3A 82 3A 8E 00 13 0C |..Z.L.1,Q:.:....|
00000410: 12 02 3A 00 39 0C 1C 02 3A 20 4F 4D 52 45 4B 45 |..:.9...: OMREKE|
00000420: 4E 45 4E 20 56 41 4E 20 48 45 58 20 4E 41 41 52 |NEN VAN HEX NAAR|
00000430: 20 44 45 43 49 4D 41 41 4C 00 3F 0C 26 02 3A 00 | DECIMAAL.?.&.:.|
00000440: 59 0C 30 02 50 24 B2 22 30 31 32 33 34 35 36 37 |Y.0.P$."01234567|
00000450: 38 39 41 42 43 44 45 46 22 00 75 0C 3A 02 51 31 |89ABCDEF".u.:.Q1|
00000460: 24 B2 C8 28 51 24 2C 31 29 3A 51 32 24 B2 C9 28 |$..(Q$,1):Q2$..(|
00000470: 51 24 2C 31 29 00 84 0C 44 02 81 49 B2 31 A4 C3 |Q$,1)...D..I.1..|
00000480: 28 50 24 29 00 A3 0C 4E 02 8B CA 28 50 24 2C 49 |(P$)...N...(P$,I|
00000490: 2C 31 29 B2 51 31 24 A7 49 31 B2 49 AB 31 3A 49 |,1).Q1$.I1.I.1:I|
000004A0: B2 39 39 00 A9 0C 58 02 82 00 B8 0C 62 02 81 49 |.99...X.....b..I|
000004B0: B2 31 A4 C3 28 50 24 29 00 D7 0C 6C 02 8B CA 28 |.1..(P$)...l...(|
000004C0: 50 24 2C 49 2C 31 29 B2 51 32 24 A7 49 32 B2 49 |P$,I,1).Q2$.I2.I|
000004D0: AB 31 3A 49 B2 39 39 00 EA 0C 76 02 82 3A 51 B2 |.1:I.99...v..:Q.|
000004E0: 49 31 AC 31 36 AA 49 32 3A 8E 00 00 00 45 |I1.16.I2:....E |
....D.DE.8:. DEVICE NUMMER.1.N.: :. 1=
VAN TAPE.H.X.: :. 8= VAN DISK.D....53
280,0:.53281,0:.".";.O...."..B*......"
PC IRQ SR AC XR YR SP"... .."
0005 E62E 30 00 5E 04 F8".G...."..
.....1,0:.".: ";:.1,A$: 1:.......A$."X".
....H..A$."S". 260...R..A$."L". 410.#..
.. 460:.180.)...:.A...: .N NAAR TAPE.DIS
K.G...:.E...."..SAVE FILENAAM ";FI$...
...".START ADRES ";ST$......".EIND
ADRES ";EI$...".Q$.H(ST$,2) :.560:
S1.Q.W.,.Q$.I(ST$,2) :.560:S2.Q...6.Q$.H
(EI$,2) :.560:E1.Q...@.Q$.I(EI$,2) :.560
:S2.Q.S.J..".POKE43,"S1":POKE44,"S2":POK
E45,"E1":POKE46,"E2":SAVE"G(34)FI$;.C.T.
.G(34)","DE...^.S1.B(43):S2.B(44):E1.B(4
5):E2.B(46).O.H.."..........POKE43,"S1":
POKE44,"S2":POKE45,"E1":POKE46,"E2":RUN.
..R..198,9:.631,19:.I.0.7:.632.I,13:.:..
..|.:.....: LADEN VAN TAPE.DISK.....:.9.
..."..LAAD FILENAAM ";FI$.I....FI$,DE,1:
..O...:.J...: VERTAAL INVOER REGEL.P.B.:
...L.C$.H(A$,4):V$.I(A$,23)...V.Q$.H(C$,
2):.560:Z1.Q.....Q$.I(C$,2):.560:Z2.Q.W.
..Z.Z1.256.Z2:V$." ".V$......L.1.8.....Q
$.J(V$,L.3.1,2):.560......Z.L.1,Q:.:....
..:.9...: OMREKENEN VAN HEX NAAR DECIMAA
L.?.&.:.Y.0.P$."0123456789ABCDEF".U.:.Q1
$.H(Q$,1):Q2$.I(Q$,1)...D..I.1.C(P$)...N
..J(P$,I,1).Q1$.I1.I.1:I.99...X.....B..I
.1.C(P$).W.L..J(P$,I,1).Q2$.I2.I.1:I.99.
..V..:Q.I1.16.I2:....E
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL