> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 0C 08 01 00 99 C7 28 31 34 29 00 2C 08 02 |........(14).,..|
00000010: 00 97 20 35 33 32 38 30 2C 32 3A 97 35 33 32 38 |.. 53280,2:.5328|
00000020: 31 2C 32 3A 97 20 36 34 36 2C 31 35 00 52 08 05 |1,2:. 646,15.R..|
00000030: 00 86 20 4C 24 28 31 35 30 29 2C 4E 24 28 31 35 |.. L$(150),N$(15|
00000040: 30 29 2C 4B 24 28 31 35 30 29 2C 43 24 28 31 35 |0),K$(150),C$(15|
00000050: 30 29 00 5D 08 0A 00 99 22 93 11 11 22 00 8D 08 |0).]...."..."...|
00000060: 0C 00 99 20 22 12 D4 CF C5 D4 D3 A0 C4 C9 C1 C7 |... "...........|
00000070: CE CF D3 C5 A0 D4 2E C2 2E D6 20 D0 C1 D3 A0 CF |.......... .....|
00000080: D0 A0 CA C5 A0 D4 C5 CC CC C5 CE 92 22 00 95 08 |............"...|
00000090: 0E 00 99 3A 99 00 BB 08 14 00 99 20 A3 31 30 29 |...:....... .10)|
000000A0: 3B 22 D7 49 4C 54 20 55 20 42 45 53 54 41 4E 44 |;".ILT U BESTAND|
000000B0: 20 4C 45 5A 45 4E 20 56 41 4E 3A 00 C3 08 1E 00 | LEZEN VAN:.....|
000000C0: 99 3A 99 00 DB 08 28 00 99 20 A3 31 35 29 3B 22 |.:....(.. .15);"|
000000D0: 12 31 92 3A 54 41 50 45 22 3A 99 00 F1 08 32 00 |.1.:TAPE":....2.|
000000E0: 99 20 A3 31 35 29 3B 22 12 32 92 3A 44 49 53 4B |. .15);".2.:DISK|
000000F0: 22 00 15 09 37 00 99 3A 99 3A 99 20 A3 31 30 29 |"...7..:.:. .10)|
00000100: 3B 22 D7 41 54 20 49 53 20 55 57 20 4B 45 55 5A |;".AT IS UW KEUZ|
00000110: 45 3F 20 22 3B 00 2D 09 3C 00 97 20 31 39 38 2C |E? ";.-.<.. 198,|
00000120: 30 3A 92 31 39 38 2C 31 3A A1 20 41 24 00 39 09 |0:.198,1:. A$.9.|
00000130: 41 00 99 3A 99 3A 99 3A 99 00 57 09 46 00 41 B2 |A..:.:.:..W.F.A.|
00000140: C5 28 41 24 29 3A 8B 28 41 B3 31 20 B0 20 41 B1 |.(A$):.(A.1 . A.|
00000150: 32 29 20 89 20 36 30 00 69 09 50 00 91 20 41 20 |2) . 60.i.P.. A |
00000160: 89 20 31 30 30 2C 32 30 30 00 91 09 64 00 99 3A |. 100,200...d..:|
00000170: 99 22 12 4C 45 5A 45 4E 20 56 41 4E 20 45 45 4E |.".LEZEN VAN EEN|
00000180: 20 54 41 50 45 20 42 45 53 54 41 4E 44 92 22 3A | TAPE BESTAND.":|
00000190: 99 00 B9 09 6E 00 99 22 47 45 45 46 20 4E 41 41 |....n.."GEEF NAA|
000001A0: 4D 20 42 45 53 54 41 4E 44 2E 20 20 58 9D 9D 20 |M BESTAND. X.. |
000001B0: 22 3B 3A 8D 20 31 30 30 30 00 CE 09 78 00 8B 20 |";:. 1000...x.. |
000001C0: 53 24 B2 22 58 22 20 A7 20 89 20 31 35 30 00 E7 |S$."X" . . 150..|
000001D0: 09 82 00 46 24 B2 22 58 22 AA 53 24 3A 9F 20 31 |...F$."X".S$:. 1|
000001E0: 2C 31 2C 30 2C 46 24 00 F1 09 8C 00 89 20 31 36 |,1,0,F$...... 16|
000001F0: 30 00 00 0A 96 00 9F 20 31 2C 31 2C 30 2C 46 24 |0...... 1,1,0,F$|
00000200: 00 0A 0A A0 00 89 20 33 30 30 00 3E 0A C8 00 8B |...... 300.>....|
00000210: 20 53 24 B2 22 58 22 20 A7 20 99 22 42 45 53 54 | S$."X" . ."BEST|
00000220: 41 4E 44 20 42 45 53 54 41 41 54 20 4E 49 45 54 |AND BESTAAT NIET|
00000230: 22 3A 92 20 31 39 38 2C 31 3A 89 20 31 30 00 64 |":. 198,1:. 10.d|
00000240: 0A D2 00 46 24 B2 22 50 22 AA 53 24 3A 9F 20 31 |...F$."P".S$:. 1|
00000250: 2C 38 2C 31 34 2C 46 24 AA 22 2C 53 45 51 2C 52 |,8,14,F$.",SEQ,R|
00000260: 45 41 44 22 00 72 0A 2C 01 8F 20 49 4E 4C 45 5A |EAD".r.,.. INLEZ|
00000270: 45 4E 00 7A 0A 36 01 49 B2 31 00 A5 0A 40 01 84 |EN.z.6.I.1...@..|
00000280: 31 2C 4C 24 28 49 29 3A 8B 20 4C 24 28 49 29 B2 |1,L$(I):. L$(I).|
00000290: 22 45 49 4E 44 45 20 42 45 53 54 41 4E 44 22 20 |"EINDE BESTAND" |
000002A0: 89 20 34 30 30 00 C4 0A 4A 01 84 31 2C 4E 24 28 |. 400...J..1,N$(|
000002B0: 49 29 3A 84 31 2C 4B 24 28 49 29 3A 84 31 2C 43 |I):.1,K$(I):.1,C|
000002C0: 24 28 49 29 00 D4 0A 54 01 49 B2 49 AA 31 3A 89 |$(I)...T.I.I.1:.|
000002D0: 20 33 32 30 00 DF 0A 90 01 41 54 B2 49 AB 31 00 | 320.....AT.I.1.|
000002E0: E7 0A 9A 01 49 B2 31 00 F1 0A A4 01 8D 20 35 30 |....I.1...... 50|
000002F0: 30 00 FE 0A AE 01 99 20 4C 24 28 49 29 3B 00 0F |0...... L$(I);..|
00000300: 0B B8 01 99 20 A3 36 29 3B 4E 24 28 49 29 3B 00 |.... .6);N$(I);.|
00000310: 21 0B C2 01 99 20 A3 32 30 29 3B 4B 24 28 49 29 |!.... .20);K$(I)|
00000320: 3B 00 32 0B CC 01 99 20 A3 32 39 29 3B 43 24 28 |;.2.... .29);C$(|
00000330: 49 29 00 57 0B D6 01 49 B2 49 AA 31 3A 8B 20 49 |I).W...I.I.1:. I|
00000340: B1 20 32 30 20 A7 20 92 31 39 38 2C 31 3A 49 B2 |. 20 . .198,1:I.|
00000350: 30 3A 89 20 34 32 30 00 69 0B E0 01 8B 20 49 B2 |0:. 420.i.... I.|
00000360: B3 41 54 20 89 20 34 33 30 00 79 0B EA 01 92 31 |.AT . 430.y....1|
00000370: 39 38 2C 31 3A 89 20 31 30 00 87 0B F4 01 8F 20 |98,1:. 10...... |
00000380: 53 55 42 20 4B 4F 50 00 91 0B F9 01 99 22 93 22 |SUB KOP......"."|
00000390: 3B 00 B9 0B FE 01 99 22 12 52 45 53 55 4C 54 41 |;......".RESULTA|
000003A0: 54 45 4E 20 56 41 4E 20 50 41 53 20 4F 50 20 4A |TEN VAN PAS OP J|
000003B0: 45 20 54 45 4C 4C 45 4E 22 00 C5 0B 08 02 99 22 |E TELLEN"......"|
000003C0: 4E 55 4D 22 3B 00 D8 0B 12 02 99 20 A3 20 36 29 |NUM";...... . 6)|
000003D0: 3B 22 4E 41 41 4D 22 3B 00 EB 0B 1C 02 99 20 A3 |;"NAAM";...... .|
000003E0: 32 30 29 3B 22 4B 4C 41 53 22 3B 00 00 0C 26 02 |20);"KLAS";...&.|
000003F0: 99 20 A3 32 39 29 3B 22 4B 41 41 52 54 45 4E 22 |. .29);"KAARTEN"|
00000400: 00 06 0C 30 02 8E 00 1A 0C E8 03 9F 33 2C 30 3A |...0........3,0:|
00000410: 84 33 2C 53 24 3A A0 33 3A 8E 00 00 00 A2 A7 |.3,S$:.3:...... |
.......G(14).,.... 53280,2:.53281,2:. 64
6,15.R.... L$(150),N$(150),K$(150),C$(15
0).]...."..."...... ".TOETS DIAGNOSE T.B
.V PAS OP JE TELLEN."......:....... .10)
;"WILT U BESTAND LEZEN VAN:.C....:....(.
. .15);".1.:TAPE":....2.. .15);".2.:DISK
"...7..:.:. .10);"WAT IS UW KEUZE? ";.-.
<.. 198,0:.198,1:. A$.9.A..:.:.:..W.F.A.
E(A$):.(A.1 . A.2) . 60.I.P.. A . 100,20
0...D..:.".LEZEN VAN EEN TAPE BESTAND.":
....N.."GEEF NAAM BESTAND. X.. ";:. 100
0.N.X.. S$."X" . . 150.....F$."X".S$:. 1
,1,0,F$...... 160...... 1,1,0,F$... .. 3
00.>.H.. S$."X" . ."BESTAND BESTAAT NIET
":. 198,1:. 10.D.R.F$."P".S$:. 1,8,14,F$
.",SEQ,READ".R.,.. INLEZEN.Z.6.I.1...@..
1,L$(I):. L$(I)."EINDE BESTAND" . 400.D.
J..1,N$(I):.1,K$(I):.1,C$(I).T.T.I.I.1:.
320.....AT.I.1.....I.1...... 500......
L$(I);...... .6);N$(I);.!.B.. .20);K$(I)
;.2.L.. .29);C$(I).W.V.I.I.1:. I. 20 . .
198,1:I.0:. 420.I.... I..AT . 430.Y....1
98,1:. 10...... SUB KOP......".";......"
.RESULTATEN VAN PAS OP JE TELLEN".E...."
NUM";.X.... . 6);"NAAM";...... .20);"KLA
S";...&.. .29);"KAARTEN"...0........3,0:
.3,S$: 3:......
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL