> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 26 08 64 00 8F 20 2D 2D 2D 2D 2D 2D 2D 2D |..&.d.. --------|
00000010: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
00000020: 2D 2D 2D 2D 2D 2D 00 4B 08 6E 00 8F 20 4C 41 41 |------.K.n.. LAA|
00000030: 54 20 55 20 48 45 54 20 4F 52 49 47 49 4E 45 4C |T U HET ORIGINEL|
00000040: 45 20 56 4F 4F 52 42 45 45 4C 44 00 67 08 78 00 |E VOORBEELD.g.x.|
00000050: 8F 20 4F 50 20 44 45 20 44 49 53 4B 45 54 54 45 |. OP DE DISKETTE|
00000060: 20 53 54 41 41 4E 3F 00 8C 08 82 00 8F 20 2D 2D | STAAN?...... --|
00000070: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
00000080: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 00 92 08 8C |------------....|
00000090: 00 3A 00 98 08 96 00 3A 00 BD 08 A0 00 8F 20 43 |.:.....:...... C|
000000A0: 4F 4D 4D 41 4E 44 4F 4B 41 4E 41 41 4C 20 44 52 |OMMANDOKANAAL DR|
000000B0: 49 56 45 20 4F 50 45 4E 45 4E 20 45 4E 00 D2 08 |IVE OPENEN EN...|
000000C0: AA 00 8F 20 49 4E 54 49 54 49 41 4C 49 53 45 52 |... INTITIALISER|
000000D0: 45 4E 00 D8 08 B4 00 3A 00 EA 08 BE 00 9F 31 35 |EN.....:......15|
000000E0: 2C 38 2C 31 35 2C 22 49 30 22 00 F0 08 C8 00 3A |,8,15,"I0".....:|
000000F0: 00 03 09 D2 00 99 22 93 9E 22 C7 28 31 34 29 C7 |......"..".(14).|
00000100: 28 38 29 00 19 09 D3 00 97 35 33 32 38 30 2C 30 |(8)......53280,0|
00000110: 3A 97 35 33 32 38 31 2C 30 00 1F 09 DC 00 3A 00 |:.53281,0.....:.|
00000120: 3E 09 E6 00 8F 20 4C 45 45 52 4C 49 4E 47 47 45 |>.... LEERLINGGE|
00000130: 47 45 56 45 4E 53 20 4F 50 48 41 4C 45 4E 00 44 |GEVENS OPHALEN.D|
00000140: 09 F0 00 3A 00 50 09 FA 00 86 41 24 28 31 38 29 |...:.P....A$(18)|
00000150: 00 62 09 04 01 8D 39 38 30 3A 4E 24 B2 41 24 28 |.b....980:N$.A$(|
00000160: 31 29 00 8E 09 0E 01 99 22 11 1D C4 41 47 20 22 |1)......"...AG "|
00000170: 4E 24 22 2C 20 57 45 20 47 41 41 4E 20 31 30 20 |N$", WE GAAN 10 |
00000180: 53 4F 4D 4D 45 4E 20 4D 41 4B 45 4E 2E 22 00 A4 |SOMMEN MAKEN."..|
00000190: 09 18 01 99 22 11 1D C4 4F 45 20 4A 45 20 42 45 |...."...OE JE BE|
000001A0: 53 54 2E 22 00 BD 09 22 01 99 22 11 1D C4 52 55 |ST."...".."...RU|
000001B0: 4B 20 4F 50 20 52 45 54 55 52 4E 2E 22 00 CF 09 |K OP RETURN."...|
000001C0: 2C 01 97 31 39 38 2C 30 3A 92 31 39 37 2C 31 00 |,..198,0:.197,1.|
000001D0: D5 09 36 01 3A 00 EC 09 40 01 8F 20 53 4F 4D 4D |..6.:...@.. SOMM|
000001E0: 45 4E 20 47 45 4E 45 52 45 52 45 4E 00 F2 09 4A |EN GENEREREN...J|
000001F0: 01 3A 00 FE 09 54 01 81 4B B2 31 A4 31 30 00 14 |.:...T..K.1.10..|
00000200: 0A 5E 01 41 28 4B 29 B2 B5 28 BB 28 31 29 AC 31 |.^.A(K)..(.(1).1|
00000210: 30 29 AA 31 00 2A 0A 68 01 42 28 4B 29 B2 B5 28 |0).1.*.h.B(K)..(|
00000220: BB 28 31 29 AC 31 30 29 AA 31 00 36 0A 69 01 55 |.(1).10).1.6.i.U|
00000230: 28 4B 29 B2 AB 31 00 3C 0A 72 01 82 00 42 0A 7C |(K)..1.<.r...B.||
00000240: 01 3A 00 59 0A 86 01 8F 20 53 4F 4D 4D 45 4E 20 |.:.Y.... SOMMEN |
00000250: 41 41 4E 42 49 45 44 45 4E 00 5F 0A 90 01 3A 00 |AANBIEDEN._...:.|
00000260: 89 0A 9A 01 99 22 93 11 1D D6 55 4C 20 44 45 20 |....."....UL DE |
00000270: 47 4F 45 44 45 20 55 49 54 4B 4F 4D 53 54 20 49 |GOEDE UITKOMST I|
00000280: 4E 2C 20 22 4E 24 22 2E 22 00 95 0A A4 01 81 4B |N, "N$"."......K|
00000290: B2 31 A4 31 30 00 A8 0A AE 01 99 22 93 11 11 11 |.1.10......"....|
000002A0: 11 11 11 11 11 11 11 22 00 B3 0A B8 01 97 31 39 |......."......19|
000002B0: 38 2C 30 00 CC 0A C2 01 99 A3 35 29 3B 41 28 4B |8,0.......5);A(K|
000002C0: 29 22 D8 22 42 28 4B 29 22 3D 22 3B 00 D6 0A CC |)"."B(K)"=";....|
000002D0: 01 85 55 28 4B 29 00 E7 0A CD 01 8B 55 28 4B 29 |..U(K)......U(K)|
000002E0: B2 AB 31 A7 34 33 30 00 06 0B D6 01 8B 55 28 4B |..1.430......U(K|
000002F0: 29 B3 B1 41 28 4B 29 AC 42 28 4B 29 A7 8D 38 31 |)..A(K).B(K)..81|
00000300: 30 3A 8D 38 37 30 00 0C 0B E0 01 82 00 12 0B EA |0:.870..........|
00000310: 01 3A 00 2F 0B F4 01 8F 20 42 45 55 52 54 45 4E |.:./.... BEURTEN|
00000320: 56 45 52 53 4C 41 47 20 42 45 57 41 52 45 4E 00 |VERSLAG BEWAREN.|
00000330: 35 0B FE 01 3A 00 42 0B 08 02 98 31 35 2C 22 49 |5...:.B....15,"I|
00000340: 30 22 00 5F 0B 12 02 9F 32 2C 38 2C 32 2C 22 30 |0"._....2,8,2,"0|
00000350: 3A 22 AA 4E 24 AA 22 2F D6 D4 2C 53 2C 41 22 00 |:".N$."/..,S,A".|
00000360: 6E 0B 1C 02 84 31 35 2C 46 44 2C 46 44 24 00 9A |n....15,FD,FD$..|
00000370: 0B 26 02 8B 46 44 B2 36 32 A7 A0 32 3A 9F 32 2C |.&..FD.62..2:.2,|
00000380: 38 2C 32 2C 22 30 3A 22 AA 4E 24 AA 22 2F D6 D4 |8,2,"0:".N$."/..|
00000390: 2C 53 2C 57 22 3A 89 35 38 30 00 B2 0B 30 02 8B |,S,W":.580...0..|
000003A0: 46 44 A7 A0 32 3A 8E 3A 8F 20 44 49 53 4B 46 4F |FD..2:.:. DISKFO|
000003B0: 55 54 00 B8 0B 3A 02 3A 00 D1 0B 44 02 98 32 2C |UT...:.:...D..2,|
000003C0: AB 31 3A 8F 20 27 56 4C 41 47 27 20 42 45 47 49 |.1:. 'VLAG' BEGI|
000003D0: 4E 00 D7 0B 4E 02 3A 00 E2 0B 58 02 81 4B B2 31 |N...N.:...X..K.1|
000003E0: A4 46 00 EF 0B 62 02 98 32 2C 46 24 28 4B 29 00 |.F...b..2,F$(K).|
000003F0: F5 0B 6C 02 82 00 FB 0B 76 02 3A 00 14 0C 80 02 |..l.....v.:.....|
00000400: 98 32 2C AB 39 39 3A 8F 20 27 56 4C 41 47 27 20 |.2,.99:. 'VLAG' |
00000410: 45 49 4E 44 00 1A 0C 8A 02 3A 00 23 0C 94 02 8D |EIND.....:.#....|
00000420: 37 32 30 00 2A 0C 9E 02 A0 32 00 34 0C A8 02 89 |720.*....2.4....|
00000430: 31 30 37 30 00 3A 0C B2 02 3A 00 4E 0C BC 02 8F |1070.:...:.N....|
00000440: 20 43 4F 4E 54 52 4F 4C 45 20 44 49 53 4B 00 54 | CONTROLE DISK.T|
00000450: 0C C6 02 3A 00 63 0C D0 02 84 31 35 2C 46 44 2C |...:.c....15,FD,|
00000460: 46 44 24 00 6F 0C DA 02 8B 46 44 B2 30 A7 8E 00 |FD$.o....FD.0...|
00000470: 7D 0C E4 02 99 3A 99 46 44 3B 46 44 24 00 96 0C |}....:.FD;FD$...|
00000480: EE 02 99 22 11 1D C4 52 55 4B 20 4F 50 20 52 45 |..."...RUK OP RE|
00000490: 54 55 52 4E 2E 22 00 A8 0C F8 02 97 31 39 38 2C |TURN."......198,|
000004A0: 30 3A 92 31 39 37 2C 31 00 B4 0C 02 03 A0 32 3A |0:.197,1......2:|
000004B0: A0 33 3A 8E 00 BA 0C 0C 03 3A 00 D8 0C 16 03 8F |.3:......:......|
000004C0: 20 46 4F 55 54 20 49 4E 20 53 54 52 49 4E 47 20 | FOUT IN STRING |
000004D0: 4F 50 42 45 52 47 45 4E 00 DE 0C 20 03 3A 00 E8 |OPBERGEN... .:..|
000004E0: 0C 2A 03 46 B2 46 AA 31 00 18 0D 34 03 46 24 28 |.*.F.F.1...4.F$(|
000004F0: 4B 29 B2 46 24 28 4B 29 AA C4 28 41 28 4B 29 29 |K).F$(K)..(A(K))|
00000500: AA 22 D8 22 AA C4 28 42 28 4B 29 29 AA 22 3D 22 |."."..(B(K))."="|
00000510: AA C4 28 55 28 4B 29 29 00 1E 0D 3E 03 8E 00 24 |..(U(K))...>...$|
00000520: 0D 48 03 3A 00 41 0D 52 03 8F 20 41 41 4E 47 45 |.H.:.A.R.. AANGE|
00000530: 56 45 4E 20 46 4F 55 54 20 41 4E 54 57 4F 4F 52 |VEN FOUT ANTWOOR|
00000540: 44 00 47 0D 5C 03 3A 00 7B 0D 66 03 99 3A 99 3A |D.G.\.:.{.f..:.:|
00000550: 99 3A 99 22 1D C4 41 54 20 49 53 20 46 4F 55 54 |.:."..AT IS FOUT|
00000560: 2C 20 48 45 54 20 4D 4F 45 53 54 20 5A 49 4A 4E |, HET MOEST ZIJN|
00000570: 22 3B 41 28 4B 29 AC 42 28 4B 29 00 9A 0D 70 03 |";A(K).B(K)...p.|
00000580: 99 22 11 1D C4 52 55 4B 20 4F 50 20 52 45 54 55 |."...RUK OP RETU|
00000590: 52 4E 2C 20 22 4E 24 22 2E 22 00 AE 0D 7A 03 97 |RN, "N$"."...z..|
000005A0: 31 39 38 2C 30 3A 92 31 39 38 2C 31 3A 8E 00 B4 |198,0:.198,1:...|
000005B0: 0D 84 03 3A 00 C7 0D 8E 03 8F 20 4B 4F 50 20 50 |...:...... KOP P|
000005C0: 4C 41 41 54 53 45 4E 00 CD 0D 98 03 3A 00 ED 0D |LAATSEN.....:...|
000005D0: A2 03 98 31 35 2C 22 50 22 AA C7 28 33 29 AA C7 |...15,"P"..(3)..|
000005E0: 28 41 29 AA C7 28 30 29 AA C7 28 31 29 00 F3 0D |(A)..(0)..(1)...|
000005F0: AC 03 8E 00 F9 0D B6 03 3A 00 0E 0E C0 03 8F 20 |........:...... |
00000600: 49 4E 4C 45 5A 45 4E 20 52 45 43 4F 52 44 00 14 |INLEZEN RECORD..|
00000610: 0E CA 03 3A 00 3F 0E D4 03 41 B2 C2 28 37 32 30 |...:.?...A..(720|
00000620: 29 3A 98 31 35 2C 22 49 30 22 3A 9F 33 2C 38 2C |):.15,"I0":.3,8,|
00000630: 33 2C 22 30 3A 54 41 46 45 4C 53 2F 42 53 22 00 |3,"0:TAFELS/BS".|
00000640: 50 0E DE 03 8D 37 32 30 3A 8B 46 44 A7 39 38 30 |P....720:.FD.980|
00000650: 00 59 0E E8 03 8D 39 33 30 00 70 0E F2 03 81 4B |.Y....930.p....K|
00000660: B2 31 A4 31 38 3A 84 33 2C 41 24 28 4B 29 3A 82 |.1.18:.3,A$(K):.|
00000670: 00 81 0E FC 03 8D 37 32 30 3A 8B 46 44 A7 39 38 |......720:.FD.98|
00000680: 30 00 8F 0E 06 04 8D 39 33 30 3A A0 33 3A 8E 00 |0......930:.3:..|
00000690: 95 0E 10 04 3A 00 B0 0E 1A 04 8F 20 48 4F 4F 46 |....:...... HOOF|
000006A0: 44 50 52 4F 47 52 41 4D 4D 41 20 4C 41 44 45 4E |DPROGRAMMA LADEN|
000006B0: 00 B6 0E 24 04 3A 00 DA 0E 2E 04 9E 33 37 31 32 |...$.:......3712|
000006C0: 33 3A 8F 20 53 43 48 41 4B 45 4C 20 54 55 52 42 |3:. SCHAKEL TURB|
000006D0: 4F 4C 41 44 45 52 20 55 49 54 00 0B 0F 38 04 99 |OLADER UIT...8..|
000006E0: 22 93 22 3A 97 36 33 31 2C 31 33 3A 97 36 33 32 |".":.631,13:.632|
000006F0: 2C 31 33 3A 97 36 33 33 2C 31 33 3A 97 36 33 34 |,13:.633,13:.634|
00000700: 2C 31 33 3A 97 36 33 35 2C 31 33 00 48 0F 42 04 |,13:.635,13.H.B.|
00000710: 99 22 90 11 11 11 11 11 50 CF 34 34 2C 38 3A 50 |."......P.44,8:P|
00000720: CF 38 2A 32 35 36 2C 30 3A 43 4C 52 3A 4C 4F 41 |.8*256,0:CLR:LOA|
00000730: 44 22 C7 28 33 34 29 22 54 41 46 45 4C 53 22 C7 |D".(34)"TAFELS".|
00000740: 28 33 34 29 22 2C 38 22 00 57 0F 4C 04 99 22 11 |(34)",8".W.L..".|
00000750: 11 11 11 52 55 4E 22 00 72 0F 56 04 99 22 91 91 |...RUN".r.V.."..|
00000760: 91 91 91 91 91 91 91 91 22 3A 97 31 39 38 2C 35 |........":.198,5|
00000770: 3A A2 00 00 00 |:.... |
..&.D.. ------------------------------.K
.N.. LAAT U HET ORIGINELE VOORBEELD.G.X.
. OP DE DISKETTE STAAN?...... ----------
--------------------.....:.....:... .. C
OMMANDOKANAAL DRIVE OPENEN EN.R.... INTI
TIALISEREN.X...:......15,8,15,"I0"...H.:
...R..".."G(14)G(8)...S..53280,0:.53281,
0.....:.>.... LEERLINGGEGEVENS OPHALEN.D
...:.P....A$(18).B....980:N$.A$(1)......
"..DAG "N$", WE GAAN 10 SOMMEN MAKEN."..
...."..DOE JE BEST."...".."..DRUK OP RET
URN.".O.,..198,0:.197,1.U.6.:...@.. SOMM
EN GENEREREN...J.:...T..K.1.10...^.A(K).
.(.(1).10).1.*.H.B(K)..(.(1).10).1.6.I.U
(K)..1.<.R...B.|.:.Y.... SOMMEN AANBIEDE
N._...:......"...VUL DE GOEDE UITKOMST I
N, "N$"."......K.1.10......"..........."
......198,0.L.B...5);A(K)"X"B(K)"=";.V.L
..U(K)...M..U(K)..1.430...V..U(K)..A(K).
B(K)..810:.870...........:./.... BEURTEN
VERSLAG BEWAREN.5...:.B....15,"I0"._....
2,8,2,"0:".N$."/VT,S,A".N....15,FD,FD$..
.&..FD.62. 2:.2,8,2,"0:".N$."/VT,S,W":.5
80...0..FD. 2:.:. DISKFOUT...:.:.Q.D..2,
.1:. 'VLAG' BEGIN.W.N.:...X..K.1.F...B..
2,F$(K)...L.....V.:......2,.99:. 'VLAG'
EIND.....:.#....720.*... 2.4....1070.:..
.:.N.... CONTROLE DISK.T.F.:.C.P..15,FD,
FD$.O.Z..FD.0...}....:.FD;FD$......"..DR
UK OP RETURN."......198,0:.197,1..... 2:
3:......:.X.... FOUT IN STRING OPBERGEN
... .:...*.F.F.1...4.F$(K).F$(K).D(A(K))
."X".D(B(K))."=".D(U(K))...>...$.H.:.A.R
.. AANGEVEN FOUT ANTWOORD.G.\.:.{.F..:.:
.:.".DAT IS FOUT, HET MOEST ZIJN";A(K).B
(K)...P.."..DRUK OP RETURN, "N$"."...Z..
198,0:.198,1:......:.G.... KOP PLAATSEN.
M...:......15,"P".G(3).G(A).G(0).G(1)...
........:...... INLEZEN RECORD...J.:.?.T
.A.B(720):.15,"I0":.3,8,3,"0:TAFELS/BS".
P....720:.FD.980.Y....930.P....K.1.18:.3
,A$(K):.......720:.FD.980......930: 3:..
....:...... HOOFDPROGRAMMA LADEN...$.:.Z
....37123:. SCHAKEL TURBOLADER UIT...8..
".":.631,13:.632,13:.633,13:.634,13:.635
,13.H.B.."......PO44,8:PO8*256,0:CLR:LOA
D"G(34)"TAFELS"G(34)",8".W.L.."....RUN".
R.V.."..........":.198,5:....
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL