_  __   _  _         _ _     _      _           _           
  __| |/ /_ | || |     __| (_)___| | __ (_)_ __   __| | _____  __
 / _` | '_ \| || |_   / _` | / __| |/ / | | '_ \ / _` |/ _ \ \/ /
| (_| | (_) |__   _| | (_| | \__ \   <  | | | | | (_| |  __/>  < 
 \__,_|\___/   |_|    \__,_|_|___/_|\_\ |_|_| |_|\__,_|\___/_/\_\
                                                                 
            

Multiple names: POJT/DIAGNOSE, POJT/DIAGNOS.MES

FILE INFORMATION

FILENAME(S):
• POJT/DIAGNOSE<br>• POJT/DIAGNOS.MES

FILE TYPE(S): PRG

FILE SIZE: 1K

FIRST SEEN: 2025-11-30 21:24:42

APPEARS ON: 2 disk(s)

FILE HASH

4ef04c7a7d9973eccb509ee8b4bb9e2f61cd014d00d1ddc7f84958889d9f7646

FOUND ON DISKS (2 DISKS)

DISK TITLE FILENAME FILE TYPE COLLECTION TRACK SECTOR ACTIONS
EDUCATIEF POJT/DIAGNOSE PRG DuncanTwain 29 6 DOWNLOAD FILE
EDUCATIEF POJT/DIAGNOS.MES PRG DuncanTwain 21 0 DOWNLOAD FILE

FILE CONTENT & ANALYSIS

> 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 Preview

> CLICK IMAGE PREVIEW FOR FULL MODAL