> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 2A 08 0A 00 8F 41 52 4B 3A 20 45 45 4E 20 |..*....ARK: EEN |
00000010: 50 52 47 20 56 41 4E 20 41 43 56 20 28 32 32 2D |PRG VAN ACV (22-|
00000020: 32 2D 38 35 29 20 20 20 20 CC 00 39 08 0C 00 86 |2-85) ..9....|
00000030: 46 24 28 31 35 30 2C 33 29 00 60 08 0E 00 97 35 |F$(150,3).`....5|
00000040: 33 32 38 30 2C 36 3A 97 35 33 32 38 31 2C 36 3A |3280,6:.53281,6:|
00000050: 99 22 05 22 3B C7 28 31 34 29 3B C7 28 39 29 3B |.".";.(14);.(9);|
00000060: 00 8F 08 10 00 99 22 93 11 C4 C9 D2 C5 C3 D4 CF |......".........|
00000070: D2 D9 A0 C1 C1 CE D0 C1 D3 D3 C5 CE 3A 20 20 20 |............: |
00000080: 20 20 20 20 20 20 20 28 56 45 42 52 4F 29 22 00 | (VEBRO)".|
00000090: BE 08 12 00 99 22 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |....."----------|
000000A0: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
000000B0: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 22 00 EB |-------------"..|
000000C0: 08 14 00 99 22 11 11 11 CC 45 47 20 44 49 53 4B |...."....EG DISK|
000000D0: 45 54 54 45 20 49 4E 20 45 4E 20 44 52 55 4B 20 |ETTE IN EN DRUK |
000000E0: 12 20 52 45 54 55 52 4E 20 92 22 00 01 09 16 00 |. RETURN .".....|
000000F0: A1 54 24 3A 8B 54 24 B3 B1 C7 28 31 33 29 A7 32 |.T$:.T$...(13).2|
00000100: 32 00 11 09 18 00 9F 31 2C 38 2C 30 2C 22 24 30 |2......1,8,0,"$0|
00000110: 22 00 40 09 1A 00 99 22 11 C9 4E 4C 45 5A 45 4E |".@...."..NLEZEN|
00000120: 2C 20 45 56 45 4E 20 47 45 44 55 4C 44 20 41 2E |, EVEN GEDULD A.|
00000130: 55 2E 42 2E 20 2E 2E 2E 2E 20 20 20 20 20 20 22 |U.B. .... "|
00000140: 00 57 09 1C 00 A1 23 31 2C 41 24 2C 42 24 3A 81 |.W....#1,A$,B$:.|
00000150: 51 B2 31 A4 31 35 30 00 76 09 1E 00 A1 23 31 2C |Q.1.150.v....#1,|
00000160: 41 24 2C 42 24 3A A1 23 31 2C 4C 42 24 2C 48 42 |A$,B$:.#1,LB$,HB|
00000170: 24 3A 42 4C B2 30 00 99 09 20 00 42 4C B2 C6 28 |$:BL.0... .BL..(|
00000180: 4C 42 24 AA C7 28 30 29 29 AA 32 35 36 AC C6 28 |LB$..(0)).256..(|
00000190: 48 42 24 AA C7 28 30 29 29 00 CF 09 22 00 46 24 |HB$..(0))...".F$|
000001A0: 28 51 2C 32 29 B2 C9 28 C8 28 C4 28 42 4C 29 AA |(Q,2)..(.(.(BL).|
000001B0: 22 20 20 22 2C 33 29 AA 22 20 20 42 4C 4F 4B 4B |" ",3)." BLOKK|
000001C0: 45 4E 2F 22 2C 31 32 29 3A 46 46 24 B2 22 22 00 |EN/",12):FF$."".|
000001D0: E4 09 24 00 A1 23 31 2C 42 24 3A 8B 53 54 B3 B1 |..$..#1,B$:.ST..|
000001E0: 30 A7 36 32 00 F6 09 26 00 8B 42 24 B3 B1 C7 28 |0.62...&..B$...(|
000001F0: 33 34 29 A7 33 36 00 1B 0A 28 00 A1 23 31 2C 42 |34).36...(..#1,B|
00000200: 24 3A 8B 42 24 B3 B1 C7 28 33 34 29 A7 46 46 24 |$:.B$...(34).FF$|
00000210: B2 46 46 24 AA 42 24 3A 89 34 30 00 32 0A 2A 00 |.FF$.B$:.40.2.*.|
00000220: 46 24 28 51 2C 31 29 B2 46 46 24 3A 46 46 24 B2 |F$(Q,1).FF$:FF$.|
00000230: 22 22 00 4A 0A 2C 00 A1 23 31 2C 42 24 3A 8B 42 |"".J.,..#1,B$:.B|
00000240: 24 B2 C7 28 33 32 29 A7 34 34 00 54 0A 2E 00 43 |$..(32).44.T...C|
00000250: 24 B2 22 22 00 73 0A 30 00 43 24 B2 43 24 AA 42 |$."".s.0.C$.C$.B|
00000260: 24 3A A1 23 31 2C 42 24 3A 8B 42 24 B3 B1 22 22 |$:.#1,B$:.B$..""|
00000270: A7 34 38 00 91 0A 32 00 8B C9 28 43 24 2C 32 29 |.48...2...(C$,2)|
00000280: B2 22 32 41 22 A7 49 44 24 B2 C8 28 43 24 2C 32 |."2A".ID$..(C$,2|
00000290: 29 00 B1 0A 34 00 8B C8 28 43 24 2C 31 29 B2 22 |)...4...(C$,1)."|
000002A0: 3A 22 A7 43 24 B2 22 50 52 47 2F 44 4C 4F 41 44 |:".C$."PRG/DLOAD|
000002B0: 22 00 D2 0A 36 00 8B C8 28 43 24 2C 33 29 B2 22 |"...6...(C$,3)."|
000002C0: 2C 38 3A 22 A7 43 24 B2 22 50 52 47 2F 4C 4F 41 |,8:".C$."PRG/LOA|
000002D0: 44 22 00 F4 0A 38 00 8B C8 28 43 24 2C 34 29 B2 |D"...8...(C$,4).|
000002E0: 22 2C 38 2C 31 22 A7 43 24 B2 22 50 52 47 2F 4C |",8,1".C$."PRG/L|
000002F0: 4F 41 44 22 00 19 0B 3A 00 8B C8 28 46 24 28 51 |OAD"...:...(F$(Q|
00000300: 2C 32 29 2C 31 29 B2 22 30 22 A7 43 24 B2 22 4F |,2),1)."0".C$."O|
00000310: 50 4D 45 52 4B 49 4E 47 22 00 39 0B 3C 00 46 24 |PMERKING".9.<.F$|
00000320: 28 51 2C 32 29 B2 46 24 28 51 2C 32 29 AA 22 20 |(Q,2).F$(Q,2)." |
00000330: 28 22 AA 43 24 AA 22 29 22 00 4F 0B 3E 00 8B 53 |(".C$.")".O.>..S|
00000340: 54 B3 B1 30 A7 51 51 B2 51 3A 51 B2 31 35 30 00 |T..0.QQ.Q:Q.150.|
00000350: 56 0B 40 00 82 51 00 5D 0B 42 00 A0 31 00 8A 0B |V.@..Q.].B..1...|
00000360: 44 00 81 51 B2 32 A4 51 51 3A 46 24 28 51 2C 33 |D..Q.2.QQ:F$(Q,3|
00000370: 29 B2 49 44 24 AA 22 20 20 22 AA 46 24 28 31 2C |).ID$." ".F$(1,|
00000380: 31 29 3A 82 51 3A 89 31 30 34 00 B9 0B 46 00 99 |1):.Q:.104...F..|
00000390: 22 93 11 CE C9 C5 D5 D7 C5 A0 C4 C9 D2 C5 C3 D4 |"...............|
000003A0: CF D2 D9 A0 CC C5 DA C5 CE 3A 20 20 20 20 20 20 |.........: |
000003B0: 20 28 56 45 42 52 4F 29 22 00 E9 0B 48 00 99 22 | (VEBRO)"...H.."|
000003C0: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
000003D0: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
000003E0: 2D 2D 2D 2D 2D 2D 2D 2D 22 00 FE 0B 4A 00 9F 31 |--------"...J..1|
000003F0: 35 2C 38 2C 31 35 2C 22 49 22 3A A0 31 35 00 1A |5,8,15,"I":.15..|
00000400: 0C 4C 00 46 24 B2 C7 28 30 29 3A 9F 33 2C 38 2C |.L.F$..(0):.3,8,|
00000410: 39 36 2C 22 24 22 3A 59 B2 30 00 3C 0C 4E 00 A1 |96,"$":Y.0.<.N..|
00000420: 23 33 2C 44 24 3A 8B 53 54 A7 99 22 11 C4 49 53 |#3,D$:.ST.."..IS|
00000430: 4B 20 45 52 52 4F 52 22 3A 89 39 34 00 47 0C 50 |K ERROR":.94.G.P|
00000440: 00 A1 23 33 2C 44 24 00 64 0C 52 00 A1 23 33 2C |..#3,D$.d.R..#3,|
00000450: 44 24 2C 44 24 3A 8B C6 28 44 24 AA 46 24 29 B2 |D$,D$:..(D$.F$).|
00000460: 2E A7 39 34 00 8B 0C 54 00 A1 23 33 2C 44 24 2C |..94...T..#3,D$,|
00000470: 45 24 3A 41 44 B2 C6 28 44 24 AA 46 24 29 AA 32 |E$:AD..(D$.F$).2|
00000480: 35 36 AC C6 28 45 24 AA 46 24 29 00 94 0C 56 00 |56..(E$.F$)...V.|
00000490: 99 41 44 3B 00 B2 0C 58 00 A1 23 33 2C 44 24 3A |.AD;...X..#3,D$:|
000004A0: 8B C6 28 44 24 AA 46 24 29 A7 99 44 24 3B 3A 89 |..(D$.F$)..D$;:.|
000004B0: 38 38 00 C3 0C 5A 00 99 3A 8B 59 B2 30 A7 59 B2 |88...Z..:.Y.0.Y.|
000004C0: 31 3A 99 00 CB 0C 5C 00 89 38 32 00 E5 0C 5E 00 |1:....\..82...^.|
000004D0: 99 3A A0 33 3A 9F 31 35 2C 38 2C 31 35 2C 22 49 |.:.3:.15,8,15,"I|
000004E0: 22 3A A0 31 35 00 0A 0D 60 00 99 22 11 CE 4F 47 |":.15...`.."..OG|
000004F0: 20 45 45 4E 20 44 49 53 4B 45 54 54 45 20 41 41 | EEN DISKETTE AA|
00000500: 4E 50 41 53 53 45 4E 20 3F 22 00 1C 0D 62 00 A1 |NPASSEN ?"...b..|
00000510: 54 24 3A 8B 54 24 B2 22 22 A7 39 38 00 2A 0D 64 |T$:.T$."".98.*.d|
00000520: 00 8B 54 24 B2 22 4A 22 A7 8A 00 30 0D 66 00 80 |..T$."J"...0.f..|
00000530: 00 3E 0D 68 00 81 51 B2 32 A4 51 51 AB 31 00 5D |.>.h..Q.2.QQ.1.]|
00000540: 0D 6A 00 8B CA 28 46 24 28 51 2C 31 29 2C 31 33 |.j...(F$(Q,1),13|
00000550: 2C 32 29 B2 22 2D 5B 22 20 A7 31 36 32 00 7B 0D |,2)."-[" .162.{.|
00000560: 6C 00 8B 20 C8 28 46 24 28 51 2C 32 29 2C 31 29 |l.. .(F$(Q,2),1)|
00000570: B2 22 30 22 20 20 20 A7 31 36 32 00 98 0D 6E 00 |."0" .162...n.|
00000580: 8B C9 28 46 24 28 51 2C 32 29 2C 34 29 B2 22 53 |..(F$(Q,2),4)."S|
00000590: 45 51 29 22 A7 31 36 32 00 B5 0D 70 00 8B C9 28 |EQ)".162...p...(|
000005A0: 46 24 28 51 2C 32 29 2C 34 29 B2 22 52 45 4C 29 |F$(Q,2),4)."REL)|
000005B0: 22 A7 31 36 32 00 D2 0D 72 00 8B C9 28 46 24 28 |".162...r...(F$(|
000005C0: 51 2C 32 29 2C 34 29 B2 22 55 53 52 29 22 A7 31 |Q,2),4)."USR)".1|
000005D0: 36 32 00 EF 0D 74 00 8B C9 28 46 24 28 51 2C 32 |62...t...(F$(Q,2|
000005E0: 29 2C 34 29 B2 22 4F 41 44 29 22 A7 31 36 32 00 |),4)."OAD)".162.|
000005F0: 1F 0E 76 00 99 22 93 11 20 C4 C9 D2 C5 C3 D4 CF |..v..".. .......|
00000600: D2 D9 A0 C1 C1 CE D0 C1 D3 D3 C5 CE 3A 20 20 20 |............: |
00000610: 20 20 20 20 20 20 20 28 56 45 42 52 4F 29 22 00 | (VEBRO)".|
00000620: 4E 0E 78 00 99 22 20 2D 2D 2D 2D 2D 2D 2D 2D 2D |N.x.." ---------|
00000630: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
00000640: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 11 22 00 7A |------------.".z|
00000650: 0E 7A 00 99 22 20 C8 55 49 44 49 47 45 20 4E 41 |.z.." .UIDIGE NA|
00000660: 41 4D 20 20 3A 20 22 C7 28 33 34 29 3B 46 24 28 |AM : ".(34);F$(|
00000670: 51 2C 31 29 3B C7 28 33 34 29 00 A1 0E 7C 00 46 |Q,1);.(34)...|.F|
00000680: 31 24 B2 C8 28 46 24 28 51 2C 31 29 AA 22 20 2D |1$..(F$(Q,1)." -|
00000690: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 22 2C 31 34 |------------",14|
000006A0: 29 00 BD 0E 7E 00 47 31 24 B2 C7 28 33 34 29 AA |)...~.G1$..(34).|
000006B0: 46 31 24 AA C7 28 33 34 29 AA 22 3A 22 00 E4 0E |F1$..(34).":"...|
000006C0: 80 00 46 33 24 B2 C8 28 46 24 28 51 2C 31 29 AA |..F3$..(F$(Q,1).|
000006D0: 22 20 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 22 |" -------------"|
000006E0: 2C 31 32 29 00 02 0F 82 00 47 33 24 B2 C7 28 33 |,12).....G3$..(3|
000006F0: 34 29 AA 46 33 24 AA C7 28 33 34 29 AA 22 2C 38 |4).F3$..(34).",8|
00000700: 3A 22 00 29 0F 84 00 46 35 24 B2 C8 28 46 24 28 |:".)...F5$..(F$(|
00000710: 51 2C 31 29 AA 22 20 2D 2D 2D 2D 2D 2D 2D 2D 2D |Q,1)." ---------|
00000720: 2D 2D 2D 2D 22 2C 31 31 29 00 48 0F 86 00 47 35 |----",11).H...G5|
00000730: 24 B2 C7 28 33 34 29 AA 46 35 24 AA C7 28 33 34 |$..(34).F5$..(34|
00000740: 29 AA 22 2C 38 2C 31 22 00 68 0F 88 00 99 22 11 |).",8,1".h....".|
00000750: 11 20 C4 52 55 4B 20 12 20 C6 31 20 92 20 56 4F |. .RUK . .1 . VO|
00000760: 4F 52 3A 20 22 47 31 24 00 88 0F 8A 00 99 22 11 |OR: "G1$......".|
00000770: 11 20 C4 52 55 4B 20 12 20 C6 33 20 92 20 56 4F |. .RUK . .3 . VO|
00000780: 4F 52 3A 20 22 47 33 24 00 A8 0F 8C 00 99 22 11 |OR: "G3$......".|
00000790: 11 20 C4 52 55 4B 20 12 20 C6 35 20 92 20 56 4F |. .RUK . .5 . VO|
000007A0: 4F 52 3A 20 22 47 35 24 00 D8 0F 8E 00 99 22 11 |OR: "G5$......".|
000007B0: 11 20 C4 52 55 4B 20 12 20 C6 37 20 92 20 56 4F |. .RUK . .7 . VO|
000007C0: 4F 52 3A 20 22 C7 28 33 34 29 3B 46 24 28 51 2C |OR: ".(34);F$(Q,|
000007D0: 31 29 3B C7 28 33 34 29 00 ED 0F 90 00 A1 46 55 |1);.(34)......FU|
000007E0: 24 3A 8B 46 55 24 B2 22 22 A7 31 34 34 00 18 10 |$:.FU$."".144...|
000007F0: 92 00 8B 46 55 24 B2 22 85 22 A7 44 49 24 B2 22 |...FU$.".".DI$."|
00000800: 52 3A 22 AA 46 31 24 AA 22 A0 BA 22 AA 22 3D 22 |R:".F1$.".."."="|
00000810: AA 46 24 28 51 2C 31 29 00 45 10 94 00 8B 46 55 |.F$(Q,1).E....FU|
00000820: 24 B2 22 86 22 A7 44 49 24 B2 22 52 3A 22 AA 46 |$.".".DI$."R:".F|
00000830: 33 24 AA 22 A0 AC B8 BA 22 AA 22 3D 22 AA 46 24 |3$."...."."=".F$|
00000840: 28 51 2C 31 29 00 73 10 96 00 8B 46 55 24 B2 22 |(Q,1).s....FU$."|
00000850: 87 22 A7 44 49 24 B2 22 52 3A 22 AA 46 35 24 AA |.".DI$."R:".F5$.|
00000860: 22 A0 AC B8 AC B1 22 AA 22 3D 22 AA 46 24 28 51 |"....."."=".F$(Q|
00000870: 2C 31 29 00 84 10 98 00 8B 46 55 24 B2 22 88 22 |,1)......FU$."."|
00000880: A7 31 36 32 00 A6 10 9A 00 9F 31 35 2C 38 2C 31 |.162......15,8,1|
00000890: 35 2C 44 49 24 3A 84 31 35 2C 41 2C 42 24 2C 43 |5,DI$:.15,A,B$,C|
000008A0: 2C 44 3A A0 31 35 00 CF 10 9C 00 99 22 11 11 20 |,D:.15......".. |
000008B0: 44 49 53 4B 46 4F 55 54 3A 22 41 3B 3A 8B 42 24 |DISKFOUT:"A;:.B$|
000008C0: B3 B1 22 22 A7 99 22 28 22 42 24 22 29 2E 22 00 |.."".."("B$").".|
000008D0: EB 10 9E 00 99 3A 44 49 24 B2 22 22 3A 81 57 4C |.....:DI$."":.WL|
000008E0: B2 31 A4 31 30 30 30 3A 82 57 4C 00 FF 10 A0 00 |.1.1000:.WL.....|
000008F0: 99 3A 44 49 24 B2 22 22 3A 4E 46 24 B2 22 22 00 |.:DI$."":NF$."".|
00000900: 0A 11 A2 00 82 51 3A 89 37 30 00 00 00 |.....Q:.70... |
..*....ARK: EEN PRG VAN ACV (22-2-85)
L.9....F$(150,3).`....53280,6:.53281,6:
.".";G(14);G(9);......"..DIRECTORY AANPA
SSEN: (VEBRO)"......"----------
-----------------------------"......"...
LEG DISKETTE IN EN DRUK . RETURN .".....
.T$:.T$..G(13).22......1,8,0,"$0".@...."
.INLEZEN, EVEN GEDULD A.U.B. .... "
.W....#1,A$,B$:.Q.1.150.V....#1,A$,B$:.#
1,LB$,HB$:BL.0... .BL.F(LB$.G(0)).256.F(
HB$.G(0)).O.".F$(Q,2).I(H(D(BL)." ",3).
" BLOKKEN/",12):FF$.""...$..#1,B$:.ST..
0.62...&..B$..G(34).36...(..#1,B$:.B$..G
(34).FF$.FF$.B$:.40.2.*.F$(Q,1).FF$:FF$.
"".J.,..#1,B$:.B$.G(32).44.T...C$."".S.0
.C$.C$.B$:.#1,B$:.B$.."".48...2..I(C$,2)
."2A".ID$.H(C$,2)...4..H(C$,1).":".C$."P
RG/DLOAD".R.6..H(C$,3).",8:".C$."PRG/LOA
D"...8..H(C$,4).",8,1".C$."PRG/LOAD"...:
..H(F$(Q,2),1)."0".C$."OPMERKING".9.<.F$
(Q,2).F$(Q,2)." (".C$.")".O.>..ST..0.QQ.
Q:Q.150.V.@..Q.].B. 1...D..Q.2.QQ:F$(Q,3
).ID$." ".F$(1,1):.Q:.104...F.."..NIEUW
E DIRECTORY LEZEN: (VEBRO)"...H.."
----------------------------------------
"...J..15,8,15,"I": 15...L.F$.G(0):.3,8,
96,"$":Y.0.<.N..#3,D$:.ST..".DISK ERROR"
:.94.G.P..#3,D$.D.R..#3,D$,D$:.F(D$.F$).
..94...T..#3,D$,E$:AD.F(D$.F$).256.F(E$.
F$)...V..AD;...X..#3,D$:.F(D$.F$)..D$;:.
88.C.Z..:.Y.0.Y.1:..K.\..82...^..: 3:.15
,8,15,"I": 15...`..".NOG EEN DISKETTE AA
NPASSEN ?"...B..T$:.T$."".98.*.D..T$."J"
...0.F...>.H..Q.2.QQ.1.].J..J(F$(Q,1),13
,2)."-[" .162.{.L.. H(F$(Q,2),1)."0" .
162...N..I(F$(Q,2),4)."SEQ)".162...P..I(
F$(Q,2),4)."REL)".162.R.R..I(F$(Q,2),4).
"USR)".162...T..I(F$(Q,2),4)."OAD)".162.
..V..".. DIRECTORY AANPASSEN: (
VEBRO)".N.X.." -------------------------
------------.".Z.Z.." HUIDIGE NAAM : "G
(34);F$(Q,1);G(34)...|.F1$.H(F$(Q,1)." -
------------",14)...~.G1$.G(34).F1$.G(34
).":".....F3$.H(F$(Q,1)." -------------"
,12).....G3$.G(34).F3$.G(34).",8:".)...F
5$.H(F$(Q,1)." -------------",11).H...G5
$.G(34).F5$.G(34).",8,1".H....".. DRUK .
F1 . VOOR: "G1$......".. DRUK . F3 . VO
OR: "G3$......".. DRUK . F5 . VOOR: "G5$
.X....".. DRUK . F7 . VOOR: "G(34);F$(Q,
1);G(34)......FU$:.FU$."".144......FU$."
.".DI$."R:".F1$." ."."=".F$(Q,1).E....FU
$.".".DI$."R:".F3$." ..."."=".F$(Q,1).S.
...FU$.".".DI$."R:".F5$." ...."."=".F$(Q
,1)......FU$.".".162......15,8,15,DI$:.1
5,A,B$,C,D: 15.O....".. DISKFOUT:"A;:.B$
.."".."("B$")."......:DI$."":.WL.1.1000:
.WL... ..:DI$."":NF$.""......Q:.70...
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL