> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 41 08 0A 00 86 20 47 42 28 31 30 30 29 2C |..A.... GB(100),|
00000010: 4F 24 28 38 30 30 29 2C 44 41 28 38 30 30 29 2C |O$(800),DA(800),|
00000020: 53 54 24 28 38 30 30 29 2C 44 43 24 28 38 30 30 |ST$(800),DC$(800|
00000030: 29 2C 42 45 28 38 30 30 29 2C 4A 47 28 38 30 30 |),BE(800),JG(800|
00000040: 29 00 79 08 14 00 86 20 42 44 28 31 30 30 29 2C |).y.... BD(100),|
00000050: 42 43 28 31 30 30 29 2C 45 44 28 31 30 30 29 2C |BC(100),ED(100),|
00000060: 4F 4D 24 28 31 30 30 29 2C 45 43 28 31 30 30 29 |OM$(100),EC(100)|
00000070: 2C 53 4F 24 28 31 30 30 29 00 99 08 1E 00 8D 34 |,SO$(100)......4|
00000080: 35 30 3A 8F 20 49 4E 4C 45 5A 45 4E 20 47 52 4F |50:. INLEZEN GRO|
00000090: 4F 54 42 4F 45 4B 4E 52 53 00 BC 08 28 00 8D 37 |OTBOEKNRS...(..7|
000000A0: 39 30 3A 20 8F 20 49 4E 4C 45 5A 45 4E 20 4A 4F |90: . INLEZEN JO|
000000B0: 55 52 4E 41 41 4C 50 4F 53 54 45 4E 00 F3 08 32 |URNAALPOSTEN...2|
000000C0: 00 99 22 53 54 45 4C 20 50 41 50 49 45 52 20 4A |.."STEL PAPIER J|
000000D0: 55 49 53 54 20 49 4E 20 45 4E 20 44 52 55 4B 20 |UIST IN EN DRUK |
000000E0: 4F 50 20 27 52 45 54 55 52 4E 27 22 3A 20 85 20 |OP 'RETURN'": . |
000000F0: 41 43 24 00 FD 08 3C 00 9F 20 33 2C 34 00 0B 09 |AC$...<.. 3,4...|
00000100: 46 00 98 33 2C C7 28 31 30 29 3B 00 1D 09 50 00 |F..3,.(10);...P.|
00000110: 81 20 49 20 B2 20 31 20 A4 20 31 30 30 00 26 09 |. I . 1 . 100.&.|
00000120: 52 00 8D 20 39 30 00 3A 09 54 00 54 44 B2 30 3A |R.. 90.:.T.TD.0:|
00000130: 54 43 B2 30 3A 89 20 32 30 30 00 57 09 5A 00 81 |TC.0:. 200.W.Z..|
00000140: 20 4C 54 20 B2 20 4C 54 20 A4 20 37 30 3A 20 98 | LT . LT . 70: .|
00000150: 33 3A 20 82 20 4C 54 00 60 09 64 00 4C 54 B2 30 |3: . LT.`.d.LT.0|
00000160: 00 73 09 6E 00 8B 20 47 42 28 49 29 B2 30 20 A7 |.s.n.. GB(I).0 .|
00000170: 34 32 30 00 95 09 78 00 98 33 2C C7 28 31 34 29 |420...x..3,.(14)|
00000180: 20 47 42 28 49 29 22 20 20 22 4F 4D 24 28 49 29 | GB(I)" "OM$(I)|
00000190: C7 28 31 35 29 00 AD 09 82 00 98 33 2C 22 42 45 |.(15)......3,"BE|
000001A0: 47 49 4E 53 54 41 4E 44 45 4E 20 22 3B 00 C4 09 |GINSTANDEN ";...|
000001B0: 8C 00 98 33 2C C7 28 31 36 29 22 35 32 22 42 44 |...3,.(16)"52"BD|
000001C0: 28 49 29 3B 00 DA 09 96 00 98 33 2C C7 28 31 36 |(I);......3,.(16|
000001D0: 29 22 36 32 22 42 43 28 49 29 00 E1 09 A0 00 98 |)"62"BC(I)......|
000001E0: 33 00 2D 0A AA 00 98 33 2C 22 56 4F 4C 47 4E 52 |3.-....3,"VOLGNR|
000001F0: 20 44 41 54 55 4D 20 20 53 54 55 4B 4E 52 20 4F | DATUM STUKNR O|
00000200: 4D 53 43 48 20 20 20 20 20 20 20 20 20 20 20 20 |MSCH |
00000210: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 42 | B|
00000220: 45 44 52 41 47 2D 44 20 20 42 45 22 3B 00 3D 0A |EDRAG-D BE";.=.|
00000230: AF 00 98 33 2C 22 44 52 41 47 2D 43 22 00 44 0A |...3,"DRAG-C".D.|
00000240: B4 00 98 33 00 4D 0A BE 00 4C 54 B2 35 00 53 0A |...3.M...LT.5.S.|
00000250: C3 00 8E 00 63 0A C8 00 81 20 4A B2 31 20 A4 20 |....c.... J.1 . |
00000260: 38 30 30 00 76 0A D2 00 8B 20 4A 47 28 4A 29 B2 |800.v.... JG(J).|
00000270: 30 20 A7 33 34 30 00 8D 0A DC 00 8B 20 47 42 28 |0 .340...... GB(|
00000280: 49 29 B2 4A 47 28 4A 29 20 A7 32 34 30 00 96 0A |I).JG(J) .240...|
00000290: E6 00 89 33 33 30 00 A0 0A F0 00 98 33 2C 4A 3B |...330......3,J;|
000002A0: 00 BA 0A FA 00 98 33 2C C7 28 31 36 29 22 30 36 |......3,.(16)"06|
000002B0: 22 20 20 20 44 41 28 4A 29 3B 00 D5 0A 04 01 98 |" DA(J);......|
000002C0: 33 2C C7 28 31 36 29 22 31 33 22 20 20 20 53 54 |3,.(16)"13" ST|
000002D0: 24 28 4A 29 3B 00 EF 0A 0E 01 98 33 2C C7 28 31 |$(J);......3,.(1|
000002E0: 36 29 22 32 30 22 20 20 20 4F 24 28 4A 29 3B 00 |6)"20" O$(J);.|
000002F0: 17 0B 18 01 8B 20 44 43 24 28 4A 29 B2 22 44 22 |..... DC$(J)."D"|
00000300: 20 A7 20 98 33 2C C7 28 31 36 29 22 35 32 22 20 | . .3,.(16)"52" |
00000310: 20 20 42 45 28 4A 29 00 3F 0B 22 01 8B 20 44 43 | BE(J).?.".. DC|
00000320: 24 28 4A 29 B2 22 43 22 20 A7 20 98 33 2C C7 28 |$(J)."C" . .3,.(|
00000330: 31 36 29 22 36 32 22 20 20 20 42 45 28 4A 29 00 |16)"62" BE(J).|
00000340: 4B 0B 2C 01 4C 54 B2 4C 54 AA 31 00 6C 0B 36 01 |K.,.LT.LT.1.l.6.|
00000350: 8B 20 44 43 24 28 4A 29 20 B2 20 22 44 22 20 A7 |. DC$(J) . "D" .|
00000360: 20 54 44 B2 54 44 AA 42 45 28 4A 29 00 8D 0B 40 | TD.TD.BE(J)...@|
00000370: 01 8B 20 44 43 24 28 4A 29 20 B2 20 22 43 22 20 |.. DC$(J) . "C" |
00000380: A7 20 54 43 B2 54 43 AA 42 45 28 4A 29 00 A2 0B |. TC.TC.BE(J)...|
00000390: 45 01 8B 20 4C 54 20 B2 20 36 36 20 A7 20 8D 20 |E.. LT . 66 . . |
000003A0: 39 30 00 AA 0B 4A 01 82 20 4A 00 BD 0B 54 01 45 |90...J.. J...T.E|
000003B0: 44 28 49 29 B2 42 44 28 49 29 AA 54 44 00 D0 0B |D(I).BD(I).TD...|
000003C0: 5E 01 45 43 28 49 29 B2 42 43 28 49 29 AA 54 43 |^.EC(I).BC(I).TC|
000003D0: 00 DA 0B 68 01 98 33 3A 98 33 00 F0 0B 72 01 98 |...h..3:.3...r..|
000003E0: 33 2C 22 45 49 4E 44 53 54 41 4E 44 45 4E 22 3B |3,"EINDSTANDEN";|
000003F0: 00 07 0C 7C 01 98 33 2C C7 28 31 36 29 22 35 32 |...|..3,.(16)"52|
00000400: 22 45 44 28 49 29 3B 00 1D 0C 86 01 98 33 2C C7 |"ED(I);......3,.|
00000410: 28 31 36 29 22 36 32 22 45 43 28 49 29 00 29 0C |(16)"62"EC(I).).|
00000420: 90 01 4C 54 B2 4C 54 AA 33 00 31 0C 9A 01 82 20 |..LT.LT.3.1.... |
00000430: 49 00 3A 0C A4 01 99 22 93 22 00 40 0C B8 01 80 |I.:....".".@....|
00000440: 00 65 0C C2 01 99 22 93 22 3A 99 3A 99 3A 99 3A |.e....".":.:.:.:|
00000450: 99 22 49 4E 4C 45 5A 45 4E 20 47 52 4F 4F 54 42 |."INLEZEN GROOTB|
00000460: 4F 45 4B 20 22 00 85 0C CC 01 99 3A 9F 20 31 2C |OEK "......:. 1,|
00000470: 38 2C 32 2C 22 30 3A 47 52 4F 4F 54 42 4F 45 4B |8,2,"0:GROOTBOEK|
00000480: 2C 53 2C 52 22 00 93 0C D6 01 81 20 49 B2 31 A4 |,S,R"...... I.1.|
00000490: 31 30 30 00 A1 0C E0 01 84 31 2C 20 47 42 28 49 |100......1, GB(I|
000004A0: 29 00 B4 0C EA 01 8B 20 47 42 28 49 29 B2 30 20 |)...... GB(I).0 |
000004B0: A7 35 37 30 00 C3 0C F4 01 84 31 2C 20 4F 4D 24 |.570......1, OM$|
000004C0: 28 49 29 00 D1 0C FE 01 84 31 2C 20 42 44 28 49 |(I)......1, BD(I|
000004D0: 29 00 DF 0C 08 02 84 31 2C 20 42 43 28 49 29 00 |)......1, BC(I).|
000004E0: ED 0C 12 02 84 31 2C 20 45 44 28 49 29 00 FB 0C |.....1, ED(I)...|
000004F0: 1C 02 84 31 2C 20 45 43 28 49 29 00 0A 0D 26 02 |...1, EC(I)...&.|
00000500: 84 31 2C 20 53 4F 24 28 49 29 00 12 0D 30 02 82 |.1, SO$(I)...0..|
00000510: 20 49 00 1A 0D 3A 02 A0 20 31 00 40 0D 44 02 99 | I...:.. 1.@.D..|
00000520: 20 22 54 4F 54 41 41 4C 20 49 4E 47 45 4C 45 5A | "TOTAAL INGELEZ|
00000530: 45 4E 20 47 42 20 4E 52 53 20 3D 22 3B 49 AB 31 |EN GB NRS =";I.1|
00000540: 00 4F 0D 4E 02 85 22 4F 4B 45 22 3B 41 43 24 00 |.O.N.."OKE";AC$.|
00000550: 55 0D 58 02 8E 00 61 0D 62 02 54 32 B2 54 32 AA |U.X...a.b.T2.T2.|
00000560: 31 00 6A 0D 6C 02 99 20 54 32 00 78 0D 76 02 4A |1.j.l.. T2.x.v.J|
00000570: 47 28 54 32 29 B2 4E 52 00 83 0D 80 02 98 33 2C |G(T2).NR......3,|
00000580: 4E 52 3B 00 91 0D 8A 02 44 41 28 54 32 29 B2 44 |NR;.....DA(T2).D|
00000590: 54 00 A5 0D 94 02 98 33 2C C7 28 31 36 29 22 30 |T......3,.(16)"0|
000005A0: 37 22 44 54 3B 00 B4 0D 9E 02 53 54 24 28 54 32 |7"DT;.....ST$(T2|
000005B0: 29 B2 53 24 00 C8 0D A8 02 98 33 2C C7 28 31 36 |).S$......3,.(16|
000005C0: 29 22 31 34 22 53 24 3B 00 D7 0D B2 02 4F 24 28 |)"14"S$;.....O$(|
000005D0: 54 32 29 B2 4F 4D 24 00 EC 0D BC 02 98 33 2C C7 |T2).OM$......3,.|
000005E0: 28 31 36 29 22 32 31 22 4F 4D 24 3B 00 FD 0D C6 |(16)"21"OM$;....|
000005F0: 02 44 43 24 28 54 32 29 B2 20 44 42 24 00 12 0E |.DC$(T2). DB$...|
00000600: D0 02 98 33 2C C7 28 31 36 29 22 33 37 22 44 42 |...3,.(16)"37"DB|
00000610: 24 3B 00 23 0E DA 02 42 44 28 54 32 29 B2 C5 28 |$;.#...BD(T2)..(|
00000620: 42 24 29 00 37 0E E4 02 98 33 2C C7 28 31 36 29 |B$).7....3,.(16)|
00000630: 22 34 32 22 42 24 3B 00 59 0E EE 02 8B 20 C8 28 |"42"B$;.Y.... .(|
00000640: 44 42 24 2C 31 29 B2 22 44 22 20 A7 20 54 44 B2 |DB$,1)."D" . TD.|
00000650: 54 44 AA 42 44 28 54 32 29 00 7B 0E F8 02 8B 20 |TD.BD(T2).{.... |
00000660: C8 28 44 42 24 2C 31 29 B2 22 43 22 20 A7 20 54 |.(DB$,1)."C" . T|
00000670: 43 B2 54 43 AA 42 44 28 54 32 29 00 81 0E 02 03 |C.TC.BD(T2).....|
00000680: 8E 00 87 0E 0C 03 8E 00 BF 0E 16 03 99 22 93 22 |............."."|
00000690: 3A 99 3A 99 3A 99 3A 99 22 4C 45 5A 45 4E 20 4A |:.:.:.:."LEZEN J|
000006A0: 4F 55 52 4E 41 41 4C 50 4F 53 54 45 4E 20 56 41 |OURNAALPOSTEN VA|
000006B0: 4E 20 44 49 53 4B 20 20 20 20 20 20 20 20 22 00 |N DISK ".|
000006C0: DE 0E 20 03 99 3A 9F 20 31 2C 38 2C 32 2C 22 30 |.. ..:. 1,8,2,"0|
000006D0: 3A 4A 4F 55 52 4E 41 41 4C 2C 53 2C 52 22 00 07 |:JOURNAAL,S,R"..|
000006E0: 0F 2A 03 8F 20 49 4E 4C 45 5A 45 4E 20 56 41 4E |.*.. INLEZEN VAN|
000006F0: 20 42 45 53 54 41 4E 44 20 4A 4F 55 52 4E 41 41 | BESTAND JOURNAA|
00000700: 4C 50 4F 53 54 45 4E 00 15 0F 34 03 81 20 49 B2 |LPOSTEN...4.. I.|
00000710: 31 A4 38 30 30 00 1E 0F 3E 03 99 20 49 3B 00 29 |1.800...>.. I;.)|
00000720: 0F 48 03 84 31 2C 20 54 32 00 37 0F 52 03 84 31 |.H..1, T2.7.R..1|
00000730: 2C 20 4A 47 28 49 29 00 47 0F 5C 03 99 20 22 20 |, JG(I).G.\.. " |
00000740: 22 3B 4A 47 28 49 29 00 5A 0F 66 03 8B 20 4A 47 |";JG(I).Z.f.. JG|
00000750: 28 49 29 B2 30 20 A7 39 35 30 00 68 0F 70 03 84 |(I).0 .950.h.p..|
00000760: 31 2C 20 44 41 28 49 29 00 77 0F 7A 03 84 31 2C |1, DA(I).w.z..1,|
00000770: 20 53 54 24 28 49 29 00 85 0F 84 03 84 31 2C 20 | ST$(I)......1, |
00000780: 4F 24 28 49 29 00 94 0F 8E 03 84 31 2C 20 44 43 |O$(I)......1, DC|
00000790: 24 28 49 29 00 A2 0F 98 03 84 31 2C 20 42 45 28 |$(I)......1, BE(|
000007A0: 49 29 00 AA 0F A2 03 82 20 49 00 C0 0F AC 03 99 |I)...... I......|
000007B0: 20 22 42 45 53 54 41 4E 44 20 3D 20 56 4F 4C 22 | "BESTAND = VOL"|
000007C0: 00 CB 0F B6 03 54 32 B2 49 AB 31 00 FA 0F C0 03 |.....T2.I.1.....|
000007D0: 99 20 22 54 4F 54 41 41 4C 20 49 4E 47 45 4C 45 |. "TOTAAL INGELE|
000007E0: 5A 45 4E 20 4A 4F 55 52 4E 41 41 4C 50 4F 53 54 |ZEN JOURNAALPOST|
000007F0: 45 4E 20 3D 20 22 3B 3B 54 32 00 0A 10 CA 03 85 |EN = ";;T2......|
00000800: 20 22 4F 4B 45 22 3B 41 43 24 00 18 10 D4 03 A0 | "OKE";AC$......|
00000810: 20 31 3A 99 20 22 93 22 00 1E 10 DE 03 8E 00 00 | 1:. "."........|
00000820: 00 00 |.. |
..A.... GB(100),O$(800),DA(800),ST$(800)
,DC$(800),BE(800),JG(800).Y.... BD(100),
BC(100),ED(100),OM$(100),EC(100),SO$(100
)......450:. INLEZEN GROOTBOEKNRS...(..7
90: . INLEZEN JOURNAALPOSTEN...2.."STEL
PAPIER JUIST IN EN DRUK OP 'RETURN'": .
AC$...<.. 3,4...F..3,G(10);...P.. I . 1
. 100.&.R.. 90.:.T.TD.0:TC.0:. 200.W.Z..
LT . LT . 70: .3: . LT.`.D.LT.0.S.N.. G
B(I).0 .420...X..3,G(14) GB(I)" "OM$(I)
G(15)......3,"BEGINSTANDEN ";.D....3,G(1
6)"52"BD(I);.Z....3,G(16)"62"BC(I)... ..
3.-....3,"VOLGNR DATUM STUKNR OMSCH
BEDRAG-D BE";.=.
...3,"DRAG-C".D....3.M...LT.5.S.C...C.H.
. J.1 . 800.V.R.. JG(J).0 .340...... GB(
I).JG(J) .240......330. ....3,J;......3,
G(16)"06" DA(J);.U....3,G(16)"13" ST
$(J);......3,G(16)"20" O$(J);...... DC
$(J)."D" . .3,G(16)"52" BE(J).?.".. DC
$(J)."C" . .3,G(16)"62" BE(J).K.,.LT.L
T.1.L.6.. DC$(J) . "D" . TD.TD.BE(J)...@
.. DC$(J) . "C" . TC.TC.BE(J)...E.. LT .
66 . . 90...J.. J...T.ED(I).BD(I).TD.P.
^.EC(I).BC(I).TC.Z.H..3:.3...R..3,"EINDS
TANDEN";...|..3,G(16)"52"ED(I);......3,G
(16)"62"EC(I).)...LT.LT.3.1.... I.:...."
.".@.....E.B..".":.:.:.:."INLEZEN GROOTB
OEK "...L..:. 1,8,2,"0:GROOTBOEK,S,R"...
V.. I.1.100......1, GB(I)...... GB(I).0
.570.C....1, OM$(I).Q....1, BD(I)......1
, BC(I)......1, ED(I)......1, EC(I)...&.
.1, SO$(I)...0.. I...:. 1.@.D.. "TOTAAL
INGELEZEN GB NRS =";I.1.O.N.."OKE";AC$.
U.X...A.B.T2.T2.1.J.L.. T2.X.V.JG(T2).NR
......3,NR;.....DA(T2).DT......3,G(16)"0
7"DT;.....ST$(T2).S$.H....3,G(16)"14"S$;
.W...O$(T2).OM$......3,G(16)"21"OM$;...F
.DC$(T2). DB$...P..3,G(16)"37"DB$;.#.Z.B
D(T2).E(B$).7....3,G(16)"42"B$;.Y.... H(
DB$,1)."D" . TD.TD.BD(T2).{.... H(DB$,1)
."C" . TC.TC.BD(T2).................."."
:.:.:.:."LEZEN JOURNAALPOSTEN VAN DISK
"... ..:. 1,8,2,"0:JOURNAAL,S,R"..
.*.. INLEZEN VAN BESTAND JOURNAALPOSTEN.
..4.. I.1.800...>.. I;.).H..1, T2.7.R..1
, JG(I).G.\.. " ";JG(I).Z.F.. JG(I).0 .9
50.H.P..1, DA(I).W.Z..1, ST$(I)......1,
O$(I)......1, DC$(I)......1, BE(I)......
I...... "BESTAND = VOL".K...T2.I.1.....
. "TOTAAL INGELEZEN JOURNAALPOSTEN = ";;
T2...J.. "OKE";AC$...T. 1:. "."........
..
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL