DATA MAKER
FILE INFORMATION
FILENAME(S): DATA MAKER
FILE TYPE(S): PRG
FILE SIZE: 1.4K
FIRST SEEN: 2025-11-02 17:01:49
APPEARS ON: 1 disk(s)
FILE HASH
9b113b440d2c091efa946508abde0f0289e2b0150a8465c4f88924e285111d6d
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| ASSEMBL1 | DATA MAKER | PRG | Treasure Chest - Spook | 6 | 1 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 3C 08 00 00 97 35 35 2C 30 30 3A 97 35 36 |..<....55,00:.56| 00000010: 2C 39 36 3A 9C 3A 58 B2 B8 28 30 29 3A 99 22 93 |,96:.:X..(0):.".| 00000020: 11 11 11 11 49 4E 50 55 54 20 4E 41 4D 45 20 4F |....INPUT NAME O| 00000030: 46 20 46 49 4C 45 22 3B 3A 85 4E 24 00 7E 08 0A |F FILE";:.N$.~..| 00000040: 00 8D 31 30 30 30 3A 53 B2 32 30 34 30 3A 49 43 |..1000:S.2040:IC| 00000050: B2 31 30 3A 99 22 93 11 11 11 46 49 4C 45 3A 20 |.10:."....FILE: | 00000060: 22 3B 4E 24 3A 99 22 4C 45 4E 47 54 48 3A 22 4C |";N$:."LENGTH:"L| 00000070: 46 3A 99 22 53 54 41 52 54 3A 20 22 53 50 00 B5 |F:."START: "SP..| 00000080: 08 14 00 99 22 45 4E 44 3A 20 20 20 22 53 50 AA |...."END: "SP.| 00000090: 4C 46 3A 99 22 11 11 20 20 20 20 20 20 20 20 20 |LF:.".. | 000000A0: 20 41 4E 59 20 4B 45 59 20 54 4F 20 43 4F 4E 54 | ANY KEY TO CONT| 000000B0: 49 4E 55 45 22 00 C7 08 1E 00 A1 41 24 3A 8B 41 |INUE"......A$:.A| 000000C0: 24 B2 22 22 A7 33 30 00 E7 08 28 00 4C 24 B2 C4 |$."".30...(.L$..| 000000D0: 28 53 29 AA 22 44 41 54 41 22 3A 43 58 B2 30 3A |(S)."DATA":CX.0:| 000000E0: 81 44 B2 30 A4 31 35 00 0F 09 32 00 8D 31 32 30 |.D.0.15...2..120| 000000F0: 30 3A 43 58 B2 43 58 AA 41 3A 4C 24 B2 4C 24 AA |0:CX.CX.A:L$.L$.| 00000100: CA 28 C4 28 41 29 2C 32 29 AA 22 2C 22 3A 82 00 |.(.(A),2).",":..| 00000110: 27 09 3C 00 99 22 1F 93 22 AA 4C 24 3B CA 28 C4 |'.<.."..".L$;.(.| 00000120: 28 43 58 29 2C 32 29 00 65 09 41 00 99 22 4D 3D |(CX),2).e.A.."M=| 00000130: 22 4D 22 3A 49 3D 22 49 22 3A 53 3D 22 53 22 3A |"M":I="I":S="S":| 00000140: 49 43 3D 22 49 43 22 3A 58 3D 22 58 22 3A 53 50 |IC="IC":X="X":SP| 00000150: 3D 22 53 50 22 3A 4C 46 3D 22 4C 46 22 3A 47 4F |="SP":LF="LF":GO| 00000160: 54 4F 39 30 22 00 8A 09 46 00 97 31 39 38 2C 33 |TO90"...F..198,3| 00000170: 3A 97 36 33 31 2C 31 39 3A 97 36 33 32 2C 31 33 |:.631,19:.632,13| 00000180: 3A 97 36 33 33 2C 31 33 3A 80 00 A5 09 5A 00 97 |:.633,13:....Z..| 00000190: 35 33 32 38 30 2C 28 C2 28 35 33 32 38 30 29 AF |53280,(.(53280).| 000001A0: 31 35 29 AA 31 00 C7 09 64 00 8B 28 53 AB 32 30 |15).1...d..(S.20| 000001B0: 33 30 29 AD 31 30 AC 31 36 B3 4C 46 A7 53 B2 53 |30).10.16.LF.S.S| 000001C0: AA 49 43 3A 89 34 30 00 D9 09 6E 00 43 B2 28 53 |.IC:.40...n.C.(S| 000001D0: AB 32 30 33 30 29 AD 31 30 00 1C 0A 78 00 4C 24 |.2030).10...x.L$| 000001E0: B2 22 32 30 30 30 46 4F 52 4C 3D 30 54 4F 22 AA |."2000FORL=0TO".| 000001F0: CA 28 C4 28 43 AB 31 29 2C 32 29 AA 22 3A 43 58 |.(.(C.1),2).":CX| 00000200: 3D 30 3A 46 4F 52 44 3D 30 54 4F 31 35 3A 52 45 |=0:FORD=0TO15:RE| 00000210: 41 44 41 3A 43 58 3D 43 58 2B 41 22 00 4B 0A 82 |ADA:CX=CX+A".K..| 00000220: 00 4C 24 B2 4C 24 AA 22 3A 50 4F 4B 45 22 AA CA |.L$.L$.":POKE"..| 00000230: 28 C4 28 53 50 29 2C 32 29 AA 22 2B 4C 2A 31 36 |(.(SP),2)."+L*16| 00000240: 2B 44 2C 41 3A 4E 45 58 54 44 22 00 82 0A 8C 00 |+D,A:NEXTD".....| 00000250: 99 22 93 22 4C 24 3A 99 22 47 4F 54 4F 31 35 30 |."."L$:."GOTO150| 00000260: 22 3A 97 31 39 38 2C 33 3A 97 36 33 31 2C 31 39 |":.198,3:.631,19| 00000270: 3A 97 36 33 32 2C 31 33 3A 97 36 33 33 2C 31 33 |:.632,13:.633,13| 00000280: 3A 80 00 CD 0A 96 00 4C 24 B2 22 32 30 31 30 52 |:......L$."2010R| 00000290: C5 41 3A 49 46 41 3C 3E 43 58 54 C8 3F 22 AA C7 |.A:IFA<>CXT.?"..| 000002A0: 28 33 34 29 AA 22 45 52 52 4F 52 20 49 4E 20 4C |(34)."ERROR IN L| 000002B0: 49 4E 45 22 AA C7 28 33 34 29 AA 22 3B 32 30 34 |INE"..(34).";204| 000002C0: 30 2B 28 4C 2A 31 30 29 3A 53 54 CF 22 00 04 0B |0+(L*10):ST."...| 000002D0: A0 00 99 22 93 22 4C 24 3A 99 22 47 4F 54 4F 31 |..."."L$:."GOTO1| 000002E0: 37 30 22 3A 97 31 39 38 2C 33 3A 97 36 33 31 2C |70":.198,3:.631,| 000002F0: 31 39 3A 97 36 33 32 2C 31 33 3A 97 36 33 33 2C |19:.632,13:.633,| 00000300: 31 33 3A 80 00 1B 0B AA 00 4C 24 B2 22 32 30 32 |13:......L$."202| 00000310: 30 4E 45 58 54 4C 3A 45 4E 44 22 00 52 0B B4 00 |0NEXTL:END".R...| 00000320: 99 22 93 22 4C 24 3A 99 22 47 4F 54 4F 31 39 30 |."."L$:."GOTO190| 00000330: 22 3A 97 31 39 38 2C 33 3A 97 36 33 31 2C 31 39 |":.198,3:.631,19| 00000340: 3A 97 36 33 32 2C 31 33 3A 97 36 33 33 2C 31 33 |:.632,13:.633,13| 00000350: 3A 80 00 5D 0B BE 00 49 B2 31 30 30 30 00 78 0B |:..]...I.1000.x.| 00000360: C8 00 99 22 93 22 49 3A 99 22 49 3D 22 49 22 3A |..."."I:."I="I":| 00000370: 47 4F 54 4F 32 32 30 22 00 9D 0B D2 00 97 31 39 |GOTO220"......19| 00000380: 38 2C 33 3A 97 36 33 31 2C 31 39 3A 97 36 33 32 |8,3:.631,19:.632| 00000390: 2C 31 33 3A 97 36 33 33 2C 31 33 3A 80 00 B4 0B |,13:.633,13:....| 000003A0: DC 00 49 B2 49 AA 31 30 3A 8B 49 B3 31 30 34 30 |..I.I.10:.I.1040| 000003B0: A7 32 30 30 00 BC 0B E6 00 49 B2 30 00 DD 0B F0 |.200.....I.0....| 000003C0: 00 99 22 93 22 49 3A 99 49 AA 31 30 3A 99 22 49 |.."."I:.I.10:."I| 000003D0: 3D 22 49 22 3A 47 4F 54 4F 32 36 30 22 00 0A 0C |="I":GOTO260"...| 000003E0: FA 00 97 31 39 38 2C 34 3A 97 36 33 31 2C 31 39 |...198,4:.631,19| 000003F0: 3A 97 36 33 32 2C 31 33 3A 97 36 33 33 2C 31 33 |:.632,13:.633,13| 00000400: 3A 97 36 33 34 2C 31 33 3A 80 00 20 0C 04 01 49 |:.634,13:.. ...I| 00000410: B2 49 AA 32 30 3A 8B 49 B3 32 36 30 A7 32 34 30 |.I.20:.I.260.240| 00000420: 00 50 0C 0E 01 99 22 93 22 3B 3A 83 32 36 30 2C |.P....".";:.260,| 00000430: 32 37 30 2C 32 38 30 2C 32 39 30 2C 33 30 30 2C |270,280,290,300,| 00000440: 31 32 30 30 2C 31 35 30 30 2C 36 35 2C 39 39 39 |1200,1500,65,999| 00000450: 00 8C 0C 18 01 87 41 3A 8B 41 B2 39 39 39 A7 99 |......A:.A.999..| 00000460: 22 3F 22 AA C7 28 33 34 29 AA 22 9A 93 22 AA C7 |"?"..(34).".."..| 00000470: 28 33 34 29 AA 22 3A 4C 49 53 54 22 3A 97 35 33 |(34).":LIST":.53| 00000480: 32 38 30 2C 32 35 34 3A 89 33 30 30 00 98 0C 22 |280,254:.300..."| 00000490: 01 99 41 3A 89 32 38 30 00 C1 0C 2C 01 97 31 39 |..A:.280...,..19| 000004A0: 38 2C 31 30 3A 97 36 33 31 2C 31 39 3A 81 49 B2 |8,10:.631,19:.I.| 000004B0: 30 A4 38 3A 97 36 33 32 AA 49 2C 31 33 3A 82 3A |0.8:.632.I,13:.:| 000004C0: 80 00 E2 0C E8 03 9F 31 2C 38 2C 33 2C 4E 24 AA |.......1,8,3,N$.| 000004D0: 22 2C 50 2C 52 22 3A 49 B2 30 3A 4D B2 32 34 35 |",P,R":I.0:M.245| 000004E0: 37 36 00 FC 0C F2 03 A1 23 31 2C 41 24 3A 8B 41 |76......#1,A$:.A| 000004F0: 24 B2 22 22 A7 41 24 B2 C7 28 30 29 00 1E 0D FC |$."".A$..(0)....| 00000500: 03 97 4D AA 49 2C C6 28 41 24 29 3A 49 B2 49 AA |..M.I,.(A$):I.I.| 00000510: 31 3A 8B 53 54 B3 B1 36 34 A7 31 30 31 30 00 49 |1:.ST..64.1010.I| 00000520: 0D 06 04 A0 31 3A 4C 46 B2 49 3A 53 50 B2 C2 28 |....1:LF.I:SP..(| 00000530: 4D 29 AA C2 28 4D AA 31 29 AC 32 35 36 3A 4D B2 |M)..(M.1).256:M.| 00000540: 4D AA 32 3A 49 B2 30 3A 8E 00 5E 0D B0 04 41 B2 |M.2:I.0:..^...A.| 00000550: C2 28 4D AA 49 29 3A 49 B2 49 AA 31 3A 8E 00 94 |.(M.I):I.I.1:...| 00000560: 0D DC 05 41 24 B2 22 44 41 54 41 20 4D 41 4B 45 |...A$."DATA MAKE| 00000570: 52 22 3A 9F 31 2C 38 2C 31 35 2C 22 53 30 3A 22 |R":.1,8,15,"S0:"| 00000580: AA 41 24 3A A0 31 3A 94 41 24 2C 38 3A 95 41 24 |.A$:.1:.A$,8:.A$| 00000590: 2C 38 3A 80 00 00 00 |,8:.... |
..<....55,00:.56,96:.:X..(0):.".....INPU T NAME OF FILE";:.N$.~....1000:S.2040:IC .10:."....FILE: ";N$:."LENGTH:"LF:."STAR T: "SP......"END: "SP.LF:.".. ANY KEY TO CONTINUE".G....A$:.A$."".30. ..(.L$.D(S)."DATA":CX.0:.D.0.15...2..120 0:CX.CX.A:L$.L$.J(D(A),2).",":..'.<..".. ".L$;J(D(CX),2).E.A.."M="M":I="I":S="S": IC="IC":X="X":SP="SP":LF="LF":GOTO90"... F..198,3:.631,19:.632,13:.633,13:....Z.. 53280,(B(53280).15).1.G.D..(S.2030).10.1 6.LF.S.S.IC:.40.Y.N.C.(S.2030).10...X.L$ ."2000FORL=0TO".J(D(C.1),2).":CX=0:FORD= 0TO15:READA:CX=CX+A".K...L$.L$.":POKE".J (D(SP),2)."+L*16+D,A:NEXTD"......"."L$:. "GOTO150":.198,3:.631,19:.632,13:.633,13 :..M...L$."2010REA:IFA<>CXTH?".G(34)."ER ROR IN LINE".G(34).";2040+(L*10):STO"... .."."L$:."GOTO170":.198,3:.631,19:.632, 13:.633,13:......L$."2020NEXTL:END".R... ."."L$:."GOTO190":.198,3:.631,19:.632,13 :.633,13:..]...I.1000.X.H.."."I:."I="I": GOTO220"...R..198,3:.631,19:.632,13:.633 ,13:......I.I.10:.I.1040.200.....I.0.... .."."I:.I.10:."I="I":GOTO260"......198,4 :.631,19:.632,13:.633,13:.634,13:.. ...I .I.20:.I.260.240.P....".";:.260,270,280, 290,300,1200,1500,65,999......A:.A.999.. "?".G(34)."..".G(34).":LIST":.53280,254: .300..."..A:.280.A.,..198,10:.631,19:.I. 0.8:.632.I,13:.:.......1,8,3,N$.",P,R":I .0:M.24576......#1,A$:.A$."".A$.G(0).... ..M.I,F(A$):I.I.1:.ST..64.1010.I... 1:LF .I:SP.B(M).B(M.1).256:M.M.2:I.0:..^...A. B(M.I):I.I.1:......A$."DATA MAKER":.1,8, 15,"S0:".A$: 1:.A$,8:.A$,8:....
> CLICK IMAGE PREVIEW FOR FULL MODAL