KORR

FILE INFORMATION

FILENAME(S): KORR

FILE TYPE(S): PRG

FILE SIZE: 1K

FIRST SEEN: 2025-11-30 21:27:02

APPEARS ON: 1 disk(s)

FILE HASH

57d2539c2c958dbf4a8052f9cc2d57a047894d44084abd810171895175f360e1

FOUND ON DISKS (1 DISKS)

DISK TITLE	FILENAME	FILE TYPE	COLLECTION	TRACK	SECTOR	ACTIONS
KASBOEK APO	KORR	PRG	DuncanTwain	20	2	DOWNLOAD FILE

FILE CONTENT & ANALYSIS

> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)

00000000: 01 08 20 08 64 00 8F 2A  2A 2A 20 4B 4F 52 52 45  |.. .d..*** KORRE|
00000010: 4B 54 49 45 20 4B 41 53  42 4F 45 4B 20 2A 2A 2A  |KTIE KASBOEK ***|
00000020: 00 43 08 6E 00 99 22 93  05 22 3A 97 35 33 32 38  |.C.n.."..":.5328|
00000030: 30 2C 30 3A 97 35 33 32  38 31 2C 36 3A 99 C7 28  |0,0:.53281,6:..(|
00000040: 31 34 29 00 56 08 78 00  85 22 46 49 4C 45 4E 41  |14).V.x.."FILENA|
00000050: 4D 45 22 3B 44 24 00 6B  08 82 00 45 24 B2 22 23  |ME";D$.k...E$."#|
00000060: 22 3A 44 44 24 B2 44 24  AA 45 24 00 9F 08 8C 00  |":DD$.D$.E$.....|
00000070: 3A 3A 8F 20 4F 50 52 4F  45 50 45 4E 20 44 44 2D  |::. OPROEPEN DD-|
00000080: 46 49 4C 45 20 28 49 4E  46 4F 52 4D 41 54 49 45  |FILE (INFORMATIE|
00000090: 20 41 41 4E 54 41 4C 20  52 45 47 45 4C 53 29 00  | AANTAL REGELS).|
000000A0: B6 08 96 00 9F 20 31 2C  38 2C 32 2C 44 44 24 AA  |..... 1,8,2,DD$.|
000000B0: 22 2C 53 2C 52 22 00 C0  08 A0 00 84 31 2C 4E 31  |",S,R"......1,N1|
000000C0: 00 C7 08 AA 00 A0 31 00  CD 08 B4 00 3A 00 D3 08  |......1.....:...|
000000D0: BE 00 3A 00 EC 08 C8 00  3A 3A 8F 20 49 4E 4C 45  |..:.....::. INLE|
000000E0: 5A 45 4E 20 50 24 2D 41  52 52 41 59 00 02 09 D2  |ZEN P$-ARRAY....|
000000F0: 00 9F 20 31 2C 38 2C 32  2C 44 24 AA 22 2C 53 2C  |.. 1,8,2,D$.",S,|
00000100: 52 22 00 0E 09 DC 00 4E  58 B2 4E 31 AB 31 00 1E  |R".....NX.N1.1..|
00000110: 09 E6 00 86 20 50 24 28  33 35 2C 31 31 29 00 2E  |.... P$(35,11)..|
00000120: 09 F0 00 81 20 20 58 B2  30 20 A4 20 4E 58 00 3D  |....  X.0 . NX.=|
00000130: 09 FA 00 81 20 59 B2 30  20 A4 20 31 31 00 4C 09  |.... Y.0 . 11.L.|
00000140: 04 01 84 31 2C 50 24 28  58 2C 59 29 00 54 09 0E  |...1,P$(X,Y).T..|
00000150: 01 82 20 59 00 66 09 18  01 82 20 58 20 3A A0 31  |.. Y.f.... X :.1|
00000160: 20 3A 89 33 38 30 00 7F  09 22 01 3A 3A 8F 20 55  | :.380...".::. U|
00000170: 49 54 50 52 49 4E 54 45  4E 20 41 52 52 41 59 00  |ITPRINTEN ARRAY.|
00000180: 8B 09 2C 01 9F 20 31 2C  34 2C 37 00 A2 09 36 01  |..,.. 1,4,7...6.|
00000190: 81 20 58 B2 30 20 A4 20  4E 58 20 3A 4B 24 B2 22  |. X.0 . NX :K$."|
000001A0: A1 22 00 E6 09 40 01 98  31 2C 58 3B 4B 24 3B 50  |."...@..1,X;K$;P|
000001B0: 24 28 58 2C 30 29 3B 4B  24 3B 50 24 28 58 2C 31  |$(X,0);K$;P$(X,1|
000001C0: 29 3B 4B 24 3B 50 24 28  58 2C 32 29 3B 4B 24 3B  |);K$;P$(X,2);K$;|
000001D0: 50 24 28 58 2C 33 29 3B  4B 24 3B 50 24 28 58 2C  |P$(X,3);K$;P$(X,|
000001E0: 34 29 3B 4B 24 3B 00 2E  0A 4A 01 98 31 2C 50 24  |4);K$;...J..1,P$|
000001F0: 28 58 2C 35 29 3B 4B 24  3B 50 24 28 58 2C 36 29  |(X,5);K$;P$(X,6)|
00000200: 3B 4B 24 3B 50 24 28 58  2C 37 29 3B 4B 24 3B 50  |;K$;P$(X,7);K$;P|
00000210: 24 28 58 2C 38 29 3B 4B  24 3B 50 24 28 58 2C 39  |$(X,8);K$;P$(X,9|
00000220: 29 3B 4B 24 3B 50 24 28  58 2C 31 30 29 3B 00 41  |);K$;P$(X,10);.A|
00000230: 0A 54 01 98 31 2C 4B 24  3B 50 24 28 58 2C 31 31  |.T..1,K$;P$(X,11|
00000240: 29 00 48 0A 5E 01 98 31  00 50 0A 68 01 82 20 58  |).H.^..1.P.h.. X|
00000250: 00 57 0A 72 01 A0 31 00  60 0A 7C 01 99 22 93 22  |.W.r..1.`.|.."."|
00000260: 00 88 0A 86 01 85 22 57  41 54 20 49 53 20 44 45  |......"WAT IS DE|
00000270: 20 58 20 57 41 41 52 44  45 20 56 41 4E 20 50 24  | X WAARDE VAN P$|
00000280: 28 58 2C 59 29 22 3B 58  00 B0 0A 90 01 85 22 57  |(X,Y)";X......"W|
00000290: 41 54 20 49 53 20 44 45  20 59 20 57 41 41 52 44  |AT IS DE Y WAARD|
000002A0: 45 20 56 41 4E 20 50 24  28 58 2C 59 29 22 3B 59  |E VAN P$(X,Y)";Y|
000002B0: 00 D1 0A 9A 01 99 22 93  12 4F 55 44 45 20 57 41  |......"..OUDE WA|
000002C0: 41 52 44 45 20 92 22 3B  50 24 28 58 2C 59 29 3A  |ARDE .";P$(X,Y):|
000002D0: 99 00 08 0B A4 01 85 22  57 41 54 20 49 53 20 44  |......."WAT IS D|
000002E0: 45 20 49 4E 48 4F 55 44  20 20 56 41 4E 20 20 44  |E INHOUD  VAN  D|
000002F0: 45 20 4E 49 45 55 57 45  20 53 54 52 49 4E 47 22  |E NIEUWE STRING"|
00000300: 3B 50 24 28 58 2C 59 29  00 2B 0B AE 01 99 22 11  |;P$(X,Y).+....".|
00000310: 11 1D 93 12 31 3D D6 4F  4C 47 45 4E 44 45 20 4B  |....1=.OLGENDE K|
00000320: 4F 52 52 45 4B 54 49 45  22 3A 99 00 46 0B B8 01  |ORREKTIE":..F...|
00000330: 99 22 1D 12 33 3D C5 49  4E 44 45 20 4B 4F 52 52  |."..3=.INDE KORR|
00000340: 45 4B 54 49 45 22 00 52  0B C2 01 41 B2 C5 28 41  |EKTIE".R...A..(A|
00000350: 24 29 00 6C 0B CC 01 A1  20 41 24 3A 8B 20 41 24  |$).l.... A$:. A$|
00000360: B2 22 22 20 20 20 20 A7  20 34 36 30 00 7F 0B D6  |.""    . 460....|
00000370: 01 8B 20 41 24 B2 22 33  22 20 89 20 34 39 30 00  |.. A$."3" . 490.|
00000380: 92 0B E0 01 8B 20 41 24  B2 22 31 22 20 89 20 33  |..... A$."1" . 3|
00000390: 38 30 00 C0 0B EA 01 3A  3A 8F 20 57 45 47 53 43  |80.....::. WEGSC|
000003A0: 48 52 49 4A 56 45 4E 20  56 41 4E 20 48 45 54 20  |HRIJVEN VAN HET |
000003B0: 56 45 52 42 45 54 45 52  44 45 20 41 52 52 41 59  |VERBETERDE ARRAY|
000003C0: 00 DB 0B F4 01 9F 20 31  2C 38 2C 32 2C 22 40 3A  |...... 1,8,2,"@:|
000003D0: 22 AA 44 24 AA 22 2C 53  2C 57 22 00 EA 0B FE 01  |".D$.",S,W".....|
000003E0: 81 20 58 B2 30 20 A4 20  4E 58 00 F9 0B 08 02 81  |. X.0 . NX......|
000003F0: 20 59 B2 30 20 A4 20 31  31 00 09 0C 12 02 98 31  | Y.0 . 11......1|
00000400: 2C 20 50 24 28 58 2C 59  29 00 11 0C 1C 02 82 20  |, P$(X,Y)...... |
00000410: 59 00 19 0C 26 02 82 20  58 00 21 0C 30 02 A0 20  |Y...&.. X.!.0.. |
00000420: 31 00 27 0C 3A 02 80 00  00 00                    |1.'.:.....      |

.. .D..*** KORREKTIE KASBOEK ***.C.N..".
.":.53280,0:.53281,6:.G(14).V.X.."FILENA
ME";D$.K...E$."#":DD$.D$.E$.....::. OPRO
EPEN DD-FILE (INFORMATIE AANTAL REGELS).
..... 1,8,2,DD$.",S,R"... ..1,N1.G... 1.
M...:.S...:...H.::. INLEZEN P$-ARRAY...R
.. 1,8,2,D$.",S,R".....NX.N1.1...... P$(
35,11)......  X.0 . NX.=.... Y.0 . 11.L.
...1,P$(X,Y).T.... Y.F.... X : 1 :.380.
.".::. UITPRINTEN ARRAY...,.. 1,4,7...6.
. X.0 . NX :K$."."...@..1,X;K$;P$(X,0);K
$;P$(X,1);K$;P$(X,2);K$;P$(X,3);K$;P$(X,
4);K$;...J..1,P$(X,5);K$;P$(X,6);K$;P$(X
,7);K$;P$(X,8);K$;P$(X,9);K$;P$(X,10);.A
.T..1,K$;P$(X,11).H.^..1.P.H.. X.W.R. 1.
`.|.."."......"WAT IS DE X WAARDE VAN P$
(X,Y)";X......"WAT IS DE Y WAARDE VAN P$
(X,Y)";Y.Q...."..OUDE WAARDE .";P$(X,Y):
......."WAT IS DE INHOUD  VAN  DE NIEUWE
 STRING";P$(X,Y).+....".....1=VOLGENDE K
ORREKTIE":..F...."..3=EINDE KORREKTIE".R
.B.A.E(A$).L.L.. A$:. A$.""    . 460..V
.. A$."3" . 490...... A$."1" . 380.....:
:. WEGSCHRIJVEN VAN HET VERBETERDE ARRAY
...... 1,8,2,"@:".D$.",S,W"...... X.0 . 
NX...... Y.0 . 11......1, P$(X,Y)...... 
Y...&.. X.!.0.  1.'.:.....

Visualization:

Width: Skip load address (+2) Invert

> CLICK IMAGE PREVIEW FOR FULL MODAL