NA
FILE INFORMATION
FILENAME(S): NA
FILE TYPE(S): PRG
FILE SIZE: 2.2K
FIRST SEEN: 2025-11-30 21:27:10
APPEARS ON: 1 disk(s)
FILE HASH
4a902ba40d4dda5014c46ed3a9bcb2837a2288f67fa2cdb82138cb931180641d
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| MARCO | NA | PRG | DuncanTwain | 31 | 5 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 39 08 05 00 86 20 52 24 28 32 30 30 31 29 |..9.... R$(2001)| 00000010: 3A 86 42 24 28 32 30 30 31 29 3A 41 24 B2 22 20 |:.B$(2001):A$." | 00000020: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 22 | "| 00000030: 3A 97 35 33 32 36 35 2C 31 00 66 08 06 00 81 41 |:.53265,1.f....A| 00000040: B2 2E A4 32 30 30 30 3A 52 24 28 41 29 B2 41 24 |...2000:R$(A).A$| 00000050: 3A 42 24 28 41 29 B2 41 24 3A 82 41 3A 97 35 33 |:B$(A).A$:.A:.53| 00000060: 32 36 35 2C 32 37 00 8C 08 0A 00 97 20 35 33 32 |265,27...... 532| 00000070: 38 30 2C 30 3A 97 20 35 33 32 38 31 2C 30 3A 97 |80,0:. 53281,0:.| 00000080: 36 34 36 2C 38 3A 89 33 30 30 30 30 00 B0 08 19 |646,8:.30000....| 00000090: 00 85 22 93 57 41 41 52 20 57 49 4C 20 4A 45 20 |..".WAAR WIL JE | 000000A0: 42 45 47 49 4E 4E 45 4E 22 3B 41 3A 99 22 93 22 |BEGINNEN";A:."."| 000000B0: 00 DE 08 1E 00 85 22 50 4C 41 41 54 53 4E 41 41 |......"PLAATSNAA| 000000C0: 4D 22 3B 52 24 28 41 29 3A 85 22 4E 55 4D 4D 45 |M";R$(A):."NUMME| 000000D0: 52 22 3B 42 24 28 41 29 3A 41 B2 41 AA 31 00 0A |R";B$(A):A.A.1..| 000000E0: 09 20 00 44 B2 31 36 AB C3 28 52 24 28 41 29 29 |. .D.16..(R$(A))| 000000F0: 3A 81 42 B2 2E A4 44 3A 52 24 28 41 29 B2 52 24 |:.B...D:R$(A).R$| 00000100: 28 41 29 AA 22 20 22 3A 82 42 00 36 09 21 00 44 |(A)." ":.B.6.!.D| 00000110: B2 31 36 AB C3 28 42 24 28 41 29 29 3A 81 42 B2 |.16..(B$(A)):.B.| 00000120: 2E A4 44 3A 42 24 28 41 29 B2 42 24 28 41 29 AA |..D:B$(A).B$(A).| 00000130: 22 20 22 3A 82 42 00 4E 09 28 00 8B 52 24 28 41 |" ":.B.N.(..R$(A| 00000140: AB 31 29 B2 22 2A 22 A7 89 32 39 39 30 30 00 5D |.1)."*"..29900.]| 00000150: 09 32 00 99 22 93 4E 52 22 3B 41 AA 31 00 66 09 |.2..".NR";A.1.f.| 00000160: 3C 00 89 20 33 30 00 85 09 56 27 99 22 93 4F 50 |<.. 30...V'.".OP| 00000170: 4E 41 41 4D 28 41 29 20 4F 46 20 4E 55 4D 4D 45 |NAAM(A) OF NUMME| 00000180: 52 28 42 29 22 00 A6 09 5B 27 A1 41 24 3A 8B 20 |R(B)"...['.A$:. | 00000190: 41 24 B3 B1 22 41 22 AF 20 41 24 B3 B1 22 42 22 |A$.."A". A$.."B"| 000001A0: A7 31 30 30 37 35 00 C1 09 5C 27 99 22 45 45 4E |.10075...\'."EEN| 000001B0: 20 4F 47 45 4E 42 4C 49 4B 20 41 2E 55 2E 42 2E | OGENBLIK A.U.B.| 000001C0: 22 00 D7 09 60 27 8B 20 41 24 B2 22 41 22 A7 20 |"...`'. A$."A". | 000001D0: 89 20 31 30 33 30 30 00 EB 09 74 27 41 B2 32 30 |. 10300...t'A.20| 000001E0: 30 30 3A 81 49 B2 30 A4 41 AB 31 00 F3 09 7E 27 |00:.I.0.A.1...~'| 000001F0: 4B B2 49 00 09 0A 88 27 58 24 B2 52 24 28 49 29 |K.I....'X$.R$(I)| 00000200: 3A 41 24 B2 42 24 28 49 29 00 16 0A 92 27 81 4A |:A$.B$(I)....'.J| 00000210: B2 49 AA 31 A4 41 00 3A 0A 9C 27 8B 52 24 28 4A |.I.1.A.:..'.R$(J| 00000220: 29 B3 58 24 A7 4B B2 4A 3A 58 24 B2 52 24 28 4A |).X$.K.J:X$.R$(J| 00000230: 29 3A 41 24 B2 42 24 28 4A 29 00 41 0A A6 27 82 |):A$.B$(J).A..'.| 00000240: 4A 00 5D 0A B0 27 52 24 28 4B 29 B2 52 24 28 49 |J.]..'R$(K).R$(I| 00000250: 29 3A 42 24 28 4B 29 B2 42 24 28 49 29 00 73 0A |):B$(K).B$(I).s.| 00000260: BA 27 52 24 28 49 29 B2 58 24 3A 42 24 28 49 29 |.'R$(I).X$:B$(I)| 00000270: B2 41 24 00 81 0A C4 27 99 22 13 22 3B 49 3A 82 |.A$....'.".";I:.| 00000280: 49 00 87 0A CE 27 8E 00 AB 0A D8 27 8F 2A 2A 2A |I....'.....'.***| 00000290: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************| 000002A0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 BF 0A 3C 28 |***********...<(| 000002B0: 41 B2 32 30 30 30 3A 81 49 B2 30 A4 41 AB 31 00 |A.2000:.I.0.A.1.| 000002C0: C7 0A 46 28 4B B2 49 00 DD 0A 50 28 58 24 B2 42 |..F(K.I...P(X$.B| 000002D0: 24 28 49 29 3A 41 24 B2 52 24 28 49 29 00 EA 0A |$(I):A$.R$(I)...| 000002E0: 5A 28 81 4A B2 49 AA 31 A4 41 00 0E 0B 64 28 8B |Z(.J.I.1.A...d(.| 000002F0: 42 24 28 4A 29 B3 58 24 A7 4B B2 4A 3A 58 24 B2 |B$(J).X$.K.J:X$.| 00000300: 42 24 28 4A 29 3A 52 24 B2 42 24 28 4A 29 00 15 |B$(J):R$.B$(J)..| 00000310: 0B 6E 28 82 4A 00 31 0B 78 28 52 24 28 4B 29 B2 |.n(.J.1.x(R$(K).| 00000320: 52 24 28 49 29 3A 42 24 28 4B 29 B2 42 24 28 49 |R$(I):B$(K).B$(I| 00000330: 29 00 47 0B 82 28 42 24 28 49 29 B2 58 24 3A 52 |).G..(B$(I).X$:R| 00000340: 24 28 49 29 B2 41 24 00 55 0B 8C 28 99 22 13 22 |$(I).A$.U..(."."| 00000350: 3B 49 3A 82 49 00 5B 0B 96 28 8E 00 7F 0B 20 4E |;I:.I.[..(.... N| 00000360: 99 22 93 49 4E 53 45 52 54 20 44 49 53 4B 20 41 |.".INSERT DISK A| 00000370: 4E 44 20 50 52 45 53 53 20 41 20 4B 45 59 22 00 |ND PRESS A KEY".| 00000380: 96 0B 2A 4E A1 20 41 24 3A 8B 20 41 24 B2 22 22 |..*N. A$:. A$.""| 00000390: A7 32 30 30 31 30 00 AA 0B 34 4E 85 22 46 49 4C |.20010...4N."FIL| 000003A0: 45 20 4E 41 4D 45 22 3B 41 24 00 B8 0B 3E 4E 9F |E NAME";A$...>N.| 000003B0: 31 2C 38 2C 31 2C 41 24 00 C7 0B 48 4E 81 20 41 |1,8,1,A$...HN. A| 000003C0: B2 30 A4 32 30 30 30 00 D4 0B 52 4E 98 31 2C 52 |.0.2000...RN.1,R| 000003D0: 24 28 41 29 00 E1 0B 5C 4E 98 31 2C 42 24 28 41 |$(A)...\N.1,B$(A| 000003E0: 29 00 E7 0B 66 4E 82 00 EE 0B 70 4E A0 31 00 F4 |)...fN....pN.1..| 000003F0: 0B 7A 4E 8E 00 30 0C CC 74 99 22 56 4F 4C 47 45 |.zN..0..t."VOLGE| 00000400: 4E 44 45 20 4B 45 45 52 20 4D 4F 45 54 20 4A 45 |NDE KEER MOET JE| 00000410: 20 42 45 47 49 4E 4E 45 4E 20 42 49 4A 22 3B 41 | BEGINNEN BIJ";A| 00000420: 3A 81 20 41 B2 30 A4 31 30 30 30 3A 82 41 3A 8E |:. A.0.1000:.A:.| 00000430: 00 4A 0C 30 75 99 22 93 20 20 20 20 20 20 20 20 |.J.0u.". | 00000440: 20 20 20 12 4D 45 4E 55 92 22 00 59 0C 3A 75 99 | .MENU.".Y.:u.| 00000450: 22 31 3D 4C 41 44 45 4E 22 00 68 0C 44 75 99 22 |"1=LADEN".h.Du."| 00000460: 32 3D 53 41 56 45 4E 22 00 7A 0C 4E 75 99 22 33 |2=SAVEN".z.Nu."3| 00000470: 3D 49 4E 56 4F 45 52 45 4E 22 00 8A 0C 58 75 99 |=INVOEREN"...Xu.| 00000480: 22 34 3D 5A 4F 45 4B 45 4E 22 00 9C 0C 62 75 99 |"4=ZOEKEN"...bu.| 00000490: 22 35 3D 53 4F 52 54 45 52 45 4E 22 00 AD 0C 63 |"5=SORTEREN"...c| 000004A0: 75 99 22 36 3D 50 52 49 4E 54 45 4E 22 00 BF 0C |u."6=PRINTEN"...| 000004B0: 64 75 99 22 37 3D 42 45 4B 49 4A 4B 45 4E 22 00 |du."7=BEKIJKEN".| 000004C0: D2 0C 65 75 99 22 38 3D 45 49 4E 44 45 20 50 52 |..eu."8=EINDE PR| 000004D0: 47 22 00 F1 0C 6C 75 A1 20 41 24 3A 8B 20 41 24 |G"...lu. A$:. A$| 000004E0: B3 22 31 22 B0 41 24 B1 22 38 22 A7 33 30 30 36 |."1".A$."8".3006| 000004F0: 30 00 04 0D 76 75 8B 41 24 B2 22 31 22 A7 8D 34 |0...vu.A$."1"..4| 00000500: 30 30 35 30 00 17 0D 80 75 8B 41 24 B2 22 32 22 |0050....u.A$."2"| 00000510: A7 8D 32 30 30 30 30 00 27 0D 8A 75 8B 41 24 B2 |..20000.'..u.A$.| 00000520: 22 33 22 A7 8D 32 35 00 3A 0D 94 75 8B 41 24 B2 |"3"..25.:..u.A$.| 00000530: 22 34 22 A7 8D 34 35 30 30 30 00 4D 0D 9E 75 8B |"4"..45000.M..u.| 00000540: 41 24 B2 22 35 22 A7 8D 31 30 30 37 30 00 60 0D |A$."5"..10070.`.| 00000550: A8 75 8B 41 24 B2 22 36 22 A7 8D 35 30 30 35 30 |.u.A$."6"..50050| 00000560: 00 73 0D B2 75 8B 41 24 B2 22 37 22 A7 8D 35 35 |.s..u.A$."7"..55| 00000570: 30 35 30 00 81 0D BC 75 8B 41 24 B2 22 38 22 A7 |050....u.A$."8".| 00000580: 80 00 8D 0D C6 75 89 20 33 30 30 30 30 00 A2 0D |.....u. 30000...| 00000590: 40 9C 85 22 57 45 4C 4B 45 20 4E 41 41 4D 22 3B |@.."WELKE NAAM";| 000005A0: 41 24 00 B1 0D 4A 9C 9F 20 31 2C 38 2C 30 2C 41 |A$...J.. 1,8,0,A| 000005B0: 24 00 C0 0D 54 9C 81 20 41 B2 30 A4 32 30 30 30 |$...T.. A.0.2000| 000005C0: 00 EC 0D 5E 9C 81 42 B2 31 A4 31 36 3A A1 23 31 |...^..B.1.16:.#1| 000005D0: 2C 52 24 28 41 29 3A 82 42 3A 81 42 B2 30 A4 31 |,R$(A):.B:.B.0.1| 000005E0: 36 3A A1 23 42 24 28 41 29 3A 82 42 00 F3 0D 68 |6:.#B$(A):.B...h| 000005F0: 9C 82 41 00 FA 0D 72 9C A0 31 00 00 0E 7C 9C 8E |..A...r..1...|..| 00000600: 00 16 0E FA AF 85 22 57 41 54 20 5A 4F 45 4B 20 |......"WAT ZOEK | 00000610: 4A 45 22 3B 41 24 00 4A 0E 04 B0 81 42 B2 30 A4 |JE";A$.J....B.0.| 00000620: 32 30 30 30 3A 8B 41 24 B2 52 24 28 42 29 A7 99 |2000:.A$.R$(B)..| 00000630: 42 3B 22 20 22 3B 52 24 28 42 29 3B 22 20 2D 20 |B;" ";R$(B);" - | 00000640: 22 3B 42 24 28 42 29 3A 82 42 00 59 0E 09 B0 8B |";B$(B):.B.Y....| 00000650: 42 B3 32 30 30 30 A7 20 82 00 8D 0E 0E B0 81 42 |B.2000. .......B| 00000660: B2 30 A4 20 32 30 30 30 3A 8B 41 24 B2 42 24 28 |.0. 2000:.A$.B$(| 00000670: 42 29 A7 99 42 3B 22 20 22 3B 42 24 28 42 29 3B |B)..B;" ";B$(B);| 00000680: 22 20 2D 20 22 52 24 28 42 29 3A 82 42 00 9C 0E |" - "R$(B):.B...| 00000690: 13 B0 8B 42 B3 32 30 30 30 A7 20 82 00 C6 0E 18 |...B.2000. .....| 000006A0: B0 99 22 11 11 11 11 11 20 20 20 20 20 20 20 20 |.."..... | 000006B0: 20 20 20 20 44 52 55 4B 20 4F 50 20 45 45 4E 20 | DRUK OP EEN | 000006C0: 54 4F 45 54 53 22 00 DD 0E 22 B0 A1 20 41 24 3A |TOETS"...".. A$:| 000006D0: 8B 20 41 24 B2 22 22 A7 34 35 30 39 30 00 E3 0E |. A$."".45090...| 000006E0: 2C B0 8E 00 06 0F 82 C3 85 22 56 41 4E 20 48 4F |,........"VAN HO| 000006F0: 45 56 45 52 20 57 49 4C 20 4A 45 20 50 52 49 4E |EVER WIL JE PRIN| 00000700: 54 45 4E 22 3B 42 00 29 0F 8C C3 85 22 54 4F 54 |TEN";B.)...."TOT| 00000710: 20 48 4F 45 56 45 52 20 57 49 4C 20 4A 45 20 50 | HOEVER WIL JE P| 00000720: 52 49 4E 54 45 4E 22 3B 43 00 35 0F 96 C3 9F 20 |RINTEN";C.5.... | 00000730: 31 2C 34 2C 37 00 41 0F A0 C3 81 20 41 B2 42 A4 |1,4,7.A.... A.B.| 00000740: 43 00 5C 0F AA C3 98 31 2C 41 2C 22 B4 20 20 22 |C.\....1,A,". "| 00000750: 3B 52 24 28 41 29 2C 42 24 28 41 29 00 63 0F B4 |;R$(A),B$(A).c..| 00000760: C3 82 41 00 6A 0F BE C3 A0 31 00 70 0F C8 C3 8E |..A.j....1.p....| 00000770: 00 94 0F 0A D7 85 22 56 41 4E 20 48 4F 45 56 45 |......"VAN HOEVE| 00000780: 52 20 57 49 4C 20 4A 45 20 42 45 4B 49 4A 4B 45 |R WIL JE BEKIJKE| 00000790: 4E 22 3B 42 00 BA 0F 0F D7 8B 42 B3 30 20 A7 20 |N";B......B.0 . | 000007A0: 99 22 4B 41 4E 20 4E 49 45 54 20 4C 41 47 45 52 |."KAN NIET LAGER| 000007B0: 20 30 22 3A 89 35 35 30 35 30 00 DE 0F 14 D7 85 | 0":.55050......| 000007C0: 22 54 4F 54 20 48 4F 45 56 45 52 20 57 49 4C 20 |"TOT HOEVER WIL | 000007D0: 4A 45 20 42 45 4B 49 4A 4B 45 4E 22 3B 43 00 09 |JE BEKIJKEN";C..| 000007E0: 10 19 D7 8B 43 B1 32 30 30 30 A7 20 99 22 4B 41 |....C.2000. ."KA| 000007F0: 4E 20 4E 49 45 54 20 48 4F 47 45 52 20 32 30 30 |N NIET HOGER 200| 00000800: 30 22 3A 89 35 35 30 36 30 00 44 10 1E D7 99 22 |0":.55060.D...."| 00000810: 93 4D 45 54 20 2A 20 53 54 4F 50 20 4A 45 20 45 |.MET * STOP JE E| 00000820: 4E 20 4D 45 54 20 5E 20 4B 4F 4D 20 4A 45 20 49 |N MET ^ KOM JE I| 00000830: 4E 20 48 45 54 3A 20 20 20 48 4F 4F 46 44 20 4D |N HET: HOOFD M| 00000840: 45 4E 55 22 00 56 10 28 D7 81 20 41 B2 30 A4 20 |ENU".V.(.. A.0. | 00000850: 39 39 39 3A 82 41 00 64 10 32 D7 81 20 41 B2 42 |999:.A.d.2.. A.B| 00000860: 20 A4 20 43 00 76 10 3C D7 99 52 24 28 41 29 3A | . C.v.<..R$(A):| 00000870: 99 42 24 28 41 29 00 96 10 46 D7 A1 20 41 24 3A |.B$(A)...F.. A$:| 00000880: 8B 20 41 24 B3 B1 22 2A 22 B0 20 41 24 B3 B1 22 |. A$.."*". A$.."| 00000890: 5E 22 A7 20 82 41 00 A6 10 50 D7 8B 20 41 24 B2 |^". .A...P.. A$.| 000008A0: 22 5E 22 A7 20 8E 00 BD 10 5A D7 A1 20 41 24 3A |"^". ....Z.. A$:| 000008B0: 8B 20 41 24 B2 22 22 A7 35 35 31 33 30 00 C8 10 |. A$."".55130...| 000008C0: 64 D7 89 35 35 31 30 30 00 00 00 |d..55100... |
..9.... R$(2001):.B$(2001):A$."
":.53265,1.F....A...2000:R$(A).A$
:B$(A).A$:.A:.53265,27...... 53280,0:. 5
3281,0:.646,8:.30000......".WAAR WIL JE
BEGINNEN";A:."."......"PLAATSNAAM";R$(A)
:."NUMMER";B$(A):A.A.1... .D.16.C(R$(A))
:.B...D:R$(A).R$(A)." ":.B.6.!.D.16.C(B$
(A)):.B...D:B$(A).B$(A)." ":.B.N.(..R$(A
.1)."*"..29900.].2..".NR";A.1.F.<.. 30..
.V'.".OPNAAM(A) OF NUMMER(B)"...['.A$:.
A$.."A". A$.."B".10075.A.\'."EEN OGENBLI
K A.U.B.".W.`'. A$."A". . 10300...T'A.20
00:.I.0.A.1...~'K.I....'X$.R$(I):A$.B$(I
)....'.J.I.1.A.:..'.R$(J).X$.K.J:X$.R$(J
):A$.B$(J).A..'.J.]..'R$(K).R$(I):B$(K).
B$(I).S..'R$(I).X$:B$(I).A$...D'.".";I:.
I...N'....X'.***************************
***...<(A.2000:.I.0.A.1.G.F(K.I...P(X$.B
$(I):A$.R$(I)...Z(.J.I.1.A...D(.B$(J).X$
.K.J:X$.B$(J):R$.B$(J)...N(.J.1.X(R$(K).
R$(I):B$(K).B$(I).G..(B$(I).X$:R$(I).A$.
U..(.".";I:.I.[..(... N.".INSERT DISK A
ND PRESS A KEY"...*N. A$:. A$."".20010..
.4N."FILE NAME";A$...>N.1,8,1,A$.G.HN. A
.0.2000.T.RN.1,R$(A)...\N.1,B$(A)...FN..
..PN 1...ZN..0.LT."VOLGENDE KEER MOET JE
BEGINNEN BIJ";A:. A.0.1000:.A:..J.0U.".
.MENU.".Y.:U."1=LADEN".H.DU."
2=SAVEN".Z.NU."3=INVOEREN"...XU."4=ZOEKE
N"...BU."5=SORTEREN"...CU."6=PRINTEN"...
DU."7=BEKIJKEN".R.EU."8=EINDE PRG"...LU.
A$:. A$."1".A$."8".30060...VU.A$."1"..4
0050....U.A$."2"..20000.'..U.A$."3"..25.
:..U.A$."4"..45000.M..U.A$."5"..10070.`.
.U.A$."6"..50050.S..U.A$."7"..55050....U
.A$."8".....FU. 30000...@.."WELKE NAAM";
A$...J.. 1,8,0,A$...T.. A.0.2000...^..B.
1.16:.#1,R$(A):.B:.B.0.16:.#B$(A):.B...H
..A...R. 1...|........"WAT ZOEK JE";A$.J
....B.0.2000:.A$.R$(B)..B;" ";R$(B);" -
";B$(B):.B.Y....B.2000. .......B.0. 2000
:.A$.B$(B)..B;" ";B$(B);" - "R$(B):.B...
...B.2000. ..F...."..... DRUK
OP EEN TOETS"...".. A$:. A$."".45090...
,......C."VAN HOEVER WIL JE PRINTEN";B.)
..C."TOT HOEVER WIL JE PRINTEN";C.5..C.
1,4,7.A. C. A.B.C.\..C.1,A,". ";R$(A),B
$(A).C..C.A.J..C 1.P.HC.....W."VAN HOEVE
R WIL JE BEKIJKEN";B....W.B.0 . ."KAN NI
ET LAGER 0":.55050....W."TOT HOEVER WIL
JE BEKIJKEN";C....W.C.2000. ."KAN NIET H
OGER 2000":.55060.D..W.".MET * STOP JE E
N MET ^ KOM JE IN HET: HOOFD MENU".V.(
W. A.0. 999:.A.D.2W. A.B . C.V.<W.R$(A):
.B$(A)...FW. A$:. A$.."*". A$.."^". .A..
.PW. A$."^". ....ZW. A$:. A$."".55130.H.
DW.55100...
> CLICK IMAGE PREVIEW FOR FULL MODAL