DISK 190
FILE INFORMATION
FILENAME(S): DISK 190
FILE TYPE(S): PRG
FILE SIZE: 2.2K
FIRST SEEN: 2025-12-01 00:59:39
APPEARS ON: 1 disk(s)
FILE HASH
b5d4ee8a140a1910d71c461d404d7f93a91f8f338ae3950cd10e9138be5559fb
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| J J DISK 4 | DISK 190 | PRG | hedning, Dean | 3 | 1 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 19 08 64 00 97 20 35 33 32 38 30 2C 30 3A |....d.. 53280,0:| 00000010: 97 20 35 33 32 38 31 2C 30 00 23 08 6E 00 99 22 |. 53281,0.#.n.."| 00000020: 93 9E 22 00 31 08 78 00 97 20 32 31 34 2C 32 3A |..".1.x.. 214,2:| 00000030: 99 00 5B 08 82 00 99 22 20 20 20 20 2A 2A 20 20 |..[...." ** | 00000040: 2A 20 20 20 2A 2A 20 20 2A 20 20 2A 20 20 20 20 |* ** * * | 00000050: 20 2A 20 20 2A 2A 20 20 2A 2A 22 00 86 08 8C 00 | * ** **".....| 00000060: 99 22 20 20 20 20 2A 20 2A 20 2A 20 20 2A 20 20 |." * * * * | 00000070: 2A 20 2A 20 2A 20 20 20 20 20 2A 2A 20 2A 20 2A |* * * ** * *| 00000080: 20 2A 20 20 2A 22 00 B1 08 96 00 99 22 20 20 20 | * *"......" | 00000090: 20 2A 20 2A 20 2A 20 20 20 2A 20 20 20 2A 2A 2A | * * * * ***| 000000A0: 20 20 20 20 20 20 2A 20 20 2A 2A 20 2A 20 20 2A | * ** * *| 000000B0: 22 00 DC 08 A0 00 99 22 20 20 20 20 2A 20 2A 20 |"......" * * | 000000C0: 2A 20 2A 20 20 2A 20 20 2A 20 2A 20 20 20 20 20 |* * * * * | 000000D0: 20 2A 20 20 20 2A 20 2A 20 20 2A 22 00 06 09 AA | * * * *"....| 000000E0: 00 99 22 20 20 20 20 2A 2A 20 20 2A 20 20 2A 2A |.." ** * **| 000000F0: 20 20 20 2A 20 20 2A 20 20 20 20 20 2A 20 20 20 | * * * | 00000100: 2A 20 20 2A 2A 22 00 14 09 B4 00 97 20 32 31 34 |* **"...... 214| 00000110: 2C 39 3A 99 00 1D 09 BE 00 99 22 9F 22 00 3D 09 |,9:.......".".=.| 00000120: C8 00 99 20 A3 31 30 29 22 53 43 52 41 54 43 48 |... .10)"SCRATCH| 00000130: 20 46 49 4C 45 2E 2E 2E 2E 2E 3D 31 22 00 43 09 | FILE.....=1".C.| 00000140: D2 00 99 00 63 09 DC 00 99 20 A3 31 30 29 22 43 |....c.... .10)"C| 00000150: 4C 45 41 4E 20 44 49 53 4B 2E 2E 2E 2E 2E 2E 2E |LEAN DISK.......| 00000160: 3D 32 22 00 69 09 E6 00 99 00 89 09 F0 00 99 20 |=2".i.......... | 00000170: A3 31 30 29 22 43 48 41 4E 47 45 20 46 49 4C 45 |.10)"CHANGE FILE| 00000180: 20 4E 41 4D 45 2E 3D 33 22 00 8F 09 FA 00 99 00 | NAME.=3".......| 00000190: AF 09 04 01 99 20 A3 31 30 29 22 46 4F 52 4D 41 |..... .10)"FORMA| 000001A0: 54 20 44 49 53 4B 2E 2E 2E 2E 2E 2E 3D 34 22 00 |T DISK......=4".| 000001B0: B5 09 0E 01 99 00 D4 09 18 01 99 20 A3 31 30 29 |........... .10)| 000001C0: 22 43 4F 50 59 20 44 49 53 4B 20 31 39 30 2E 2E |"COPY DISK 190..| 000001D0: 2E 2E 3D 35 00 DA 09 22 01 99 00 FA 09 2C 01 99 |..=5...".....,..| 000001E0: 20 A3 31 30 29 22 54 48 45 20 45 4E 44 2E 2E 2E | .10)"THE END...| 000001F0: 2E 2E 2E 2E 2E 2E 2E 3D 36 22 00 10 0A 36 01 A1 |.......=6"...6..| 00000200: 20 41 24 3A 8B 20 41 24 B2 22 22 A7 20 33 31 30 | A$:. A$."". 310| 00000210: 00 22 0A 40 01 8B 20 41 24 B2 22 31 22 A7 20 33 |.".@.. A$."1". 3| 00000220: 39 30 00 34 0A 4A 01 8B 20 41 24 B2 22 32 22 A7 |90.4.J.. A$."2".| 00000230: 20 38 30 30 00 46 0A 54 01 8B 20 41 24 B2 22 33 | 800.F.T.. A$."3| 00000240: 22 A7 20 35 32 30 00 58 0A 5E 01 8B 20 41 24 B2 |". 520.X.^.. A$.| 00000250: 22 34 22 A7 20 36 37 30 00 6A 0A 68 01 8B 20 41 |"4". 670.j.h.. A| 00000260: 24 B2 22 35 22 A7 20 39 34 30 00 7C 0A 72 01 8B |$."5". 940.|.r..| 00000270: 20 41 24 B2 22 36 22 A7 20 39 30 30 00 8F 0A 7C | A$."6". 900...|| 00000280: 01 8B 20 41 24 B3 B1 22 36 22 A7 20 33 31 30 00 |.. A$.."6". 310.| 00000290: 99 0A 86 01 8D 20 38 38 30 00 A3 0A 90 01 99 22 |..... 880......"| 000002A0: 9F 93 22 00 D2 0A 9A 01 99 22 20 2A 2A 2A 2A 2A |.."......" *****| 000002B0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************| 000002C0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************| 000002D0: 2A 22 00 01 0B A4 01 99 22 20 2A 2A 2A 2A 2A 2A |*"......" ******| 000002E0: 2A 2A 2A 2A 2A 2A 20 53 43 52 41 54 43 48 20 4D |****** SCRATCH M| 000002F0: 4F 44 45 20 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |ODE ************| 00000300: 22 00 30 0B AE 01 99 22 20 2A 2A 2A 2A 2A 2A 2A |".0...." *******| 00000310: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************| 00000320: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 22 |***************"| 00000330: 00 3F 0B B8 01 97 20 32 31 34 2C 31 30 3A 99 00 |.?.... 214,10:..| 00000340: 5F 0B C2 01 85 22 20 20 20 20 20 20 20 20 50 52 |_...." PR| 00000350: 4F 47 52 41 4D 45 20 4E 41 4D 45 22 3B 41 24 00 |OGRAME NAME";A$.| 00000360: 68 0B CC 01 99 22 93 22 00 77 0B D6 01 97 20 32 |h....".".w.... 2| 00000370: 31 34 2C 31 30 3A 99 00 9C 0B E0 01 99 22 20 20 |14,10:......." | 00000380: 20 20 20 20 20 20 20 20 20 49 4E 53 45 52 54 20 | INSERT | 00000390: 53 4F 55 52 43 45 20 44 49 53 4B 22 00 B4 0B EA |SOURCE DISK"....| 000003A0: 01 A1 20 41 4E 24 3A 8B 20 41 4E 24 B2 22 22 A7 |.. AN$:. AN$."".| 000003B0: 20 34 39 30 00 CC 0B F4 01 98 31 35 2C 22 53 43 | 490......15,"SC| 000003C0: 52 41 54 43 48 30 3A 22 41 24 22 22 00 D2 0B FE |RATCH0:"A$""....| 000003D0: 01 8A 00 DC 0B 08 02 8D 20 38 38 30 00 E6 0B 12 |........ 880....| 000003E0: 02 99 22 9F 93 22 00 15 0C 1C 02 99 22 20 2A 2A |..".."......" **| 000003F0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************| 00000400: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************| 00000410: 2A 2A 2A 2A 22 00 44 0C 26 02 99 22 20 2A 2A 2A |****".D.&.." ***| 00000420: 2A 2A 2A 2A 2A 2A 2A 2A 2A 20 52 45 4E 41 4D 45 |********* RENAME| 00000430: 20 4D 4F 44 45 20 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A | MODE **********| 00000440: 2A 2A 2A 22 00 73 0C 30 02 99 22 20 2A 2A 2A 2A |***".s.0.." ****| 00000450: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************| 00000460: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************| 00000470: 2A 2A 22 00 82 0C 3A 02 97 20 32 31 34 2C 31 30 |**"...:.. 214,10| 00000480: 3A 99 00 A4 0C 44 02 85 22 20 20 20 20 20 20 50 |:....D.." P| 00000490: 52 4F 47 52 41 4D 45 20 4F 4C 44 20 4E 41 4D 45 |ROGRAME OLD NAME| 000004A0: 22 3B 41 24 00 AA 0C 4E 02 99 00 CC 0C 58 02 85 |";A$...N.....X..| 000004B0: 22 20 20 20 20 20 20 50 52 4F 47 52 41 4D 45 20 |" PROGRAME | 000004C0: 4E 45 57 20 4E 41 4D 45 22 3B 42 24 00 D5 0C 62 |NEW NAME";B$...b| 000004D0: 02 99 22 93 22 00 E4 0C 6C 02 97 20 32 31 34 2C |.."."...l.. 214,| 000004E0: 31 30 3A 99 00 09 0D 76 02 99 22 20 20 20 20 20 |10:....v.." | 000004F0: 20 20 20 20 20 20 49 4E 53 45 52 54 20 53 4F 55 | INSERT SOU| 00000500: 52 43 45 20 44 49 53 4B 22 00 21 0D 80 02 A1 20 |RCE DISK".!.... | 00000510: 41 4E 24 3A 8B 20 41 4E 24 B2 22 22 A7 20 36 34 |AN$:. AN$."". 64| 00000520: 30 00 3C 0D 8A 02 98 31 35 2C 22 52 45 4E 41 4D |0.<....15,"RENAM| 00000530: 45 30 3A 22 42 24 22 3D 22 41 24 22 00 42 0D 94 |E0:"B$"="A$".B..| 00000540: 02 8A 00 4C 0D 9E 02 8D 20 38 38 30 00 56 0D A8 |...L.... 880.V..| 00000550: 02 99 22 9F 93 22 00 85 0D B2 02 99 22 20 2A 2A |..".."......" **| 00000560: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************| 00000570: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************| 00000580: 2A 2A 2A 2A 22 00 B4 0D BC 02 99 22 20 2A 2A 2A |****"......" ***| 00000590: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 20 46 4F 52 4D 41 |********** FORMA| 000005A0: 54 20 4D 4F 44 45 20 2A 2A 2A 2A 2A 2A 2A 2A 2A |T MODE *********| 000005B0: 2A 2A 2A 22 00 E3 0D C6 02 99 22 20 2A 2A 2A 2A |***"......" ****| 000005C0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************| 000005D0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************| 000005E0: 2A 2A 22 00 F2 0D D0 02 97 20 32 31 34 2C 31 30 |**"...... 214,10| 000005F0: 3A 99 00 0C 0E DA 02 85 22 20 20 20 20 20 20 44 |:......." D| 00000600: 49 53 4B 20 4E 41 4D 45 22 3B 41 24 00 15 0E E4 |ISK NAME";A$....| 00000610: 02 99 22 93 22 00 24 0E EE 02 97 20 32 31 34 2C |..".".$.... 214,| 00000620: 31 30 3A 99 00 49 0E F8 02 99 22 20 20 20 20 20 |10:..I...." | 00000630: 20 20 20 20 20 20 49 4E 53 45 52 54 20 53 4F 55 | INSERT SOU| 00000640: 52 43 45 20 44 49 53 4B 22 00 61 0E 02 03 A1 20 |RCE DISK".a.... | 00000650: 41 4E 24 3A 8B 20 41 4E 24 B2 22 22 A7 20 37 37 |AN$:. AN$."". 77| 00000660: 30 00 79 0E 0C 03 98 31 35 2C 22 4E 45 57 3A 22 |0.y....15,"NEW:"| 00000670: 41 24 22 2C 44 49 53 4B 22 00 7F 0E 16 03 8A 00 |A$",DISK".......| 00000680: 89 0E 20 03 8D 20 38 38 30 00 93 0E 2A 03 99 22 |.. .. 880...*.."| 00000690: 9F 93 22 00 C2 0E 34 03 99 22 20 2A 2A 2A 2A 2A |.."...4.." *****| 000006A0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************| 000006B0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************| 000006C0: 2A 22 00 F1 0E 3E 03 99 22 20 2A 2A 2A 2A 2A 2A |*"...>.." ******| 000006D0: 2A 2A 2A 2A 2A 20 56 41 4C 49 44 41 54 45 20 4D |***** VALIDATE M| 000006E0: 4F 44 45 20 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |ODE ************| 000006F0: 22 00 20 0F 48 03 99 22 20 2A 2A 2A 2A 2A 2A 2A |". .H.." *******| 00000700: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************| 00000710: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 22 |***************"| 00000720: 00 33 0F 52 03 98 31 35 2C 22 56 41 4C 49 44 41 |.3.R..15,"VALIDA| 00000730: 54 45 22 00 47 0F 5C 03 81 20 43 54 B2 31 20 A4 |TE".G.\.. CT.1 .| 00000740: 20 38 30 30 30 3A 82 00 4D 0F 66 03 8A 00 5B 0F | 8000:..M.f...[.| 00000750: 70 03 9F 20 31 35 2C 38 2C 31 35 00 61 0F 7A 03 |p.. 15,8,15.a.z.| 00000760: 8E 00 6F 0F 84 03 A0 20 31 35 2C 38 2C 31 35 00 |..o.... 15,8,15.| 00000770: 8D 0F 8E 03 99 22 93 22 3A 97 20 35 33 32 38 30 |.....".":. 53280| 00000780: 2C 31 34 3A 97 20 35 33 32 38 31 2C 36 00 96 0F |,14:. 53281,6...| 00000790: 98 03 99 22 9A 22 00 9C 0F A2 03 A2 00 A6 0F AC |..."."..........| 000007A0: 03 99 22 9F 93 22 00 D4 0F B6 03 99 22 20 2A 2A |..".."......" **| 000007B0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************| 000007C0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************| 000007D0: 2A 2A 2A 22 00 02 10 C0 03 99 22 20 2A 2A 2A 2A |***"......" ****| 000007E0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 20 43 4F 50 59 20 4D |********* COPY M| 000007F0: 4F 44 45 20 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |ODE ************| 00000800: 2A 22 00 30 10 CA 03 99 22 20 2A 2A 2A 2A 2A 2A |*".0...." ******| 00000810: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************| 00000820: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 22 |***************"| 00000830: 00 3F 10 D4 03 97 20 32 31 34 2C 31 30 3A 99 00 |.?.... 214,10:..| 00000840: 5D 10 DE 03 85 22 20 20 20 20 20 20 50 52 4F 47 |]...." PROG| 00000850: 52 41 4D 45 20 4E 41 4D 45 22 3B 41 24 00 66 10 |RAME NAME";A$.f.| 00000860: E8 03 99 22 93 22 00 75 10 F2 03 97 20 32 31 34 |...".".u.... 214| 00000870: 2C 31 30 3A 99 00 99 10 FC 03 99 22 20 20 20 20 |,10:......." | 00000880: 20 20 20 20 20 20 49 4E 53 45 52 54 20 53 4F 55 | INSERT SOU| 00000890: 52 43 45 20 44 49 53 4B 22 00 B2 10 06 04 A1 20 |RCE DISK"...... | 000008A0: 41 4E 24 3A 8B 20 41 4E 24 B2 22 22 A7 20 31 30 |AN$:. AN$."". 10| 000008B0: 33 30 00 BD 10 10 04 94 20 41 24 2C 38 00 C3 10 |30...... A$,8...| 000008C0: 1A 04 8A 00 00 00 |...... |
....D.. 53280,0:. 53281,0.#.N.."..".1.X.
. 214,2:..[...." ** * ** * *
* ** **"......" * * * * * * *
** * * * *"......" * * * * ***
* ** * *"... .." * * * * *
* * * * * *"......" ** * **
* * * * **"...... 214,9:.....
..".".=.H.. .10)"SCRATCH FILE.....=1".C.
R...C.... .10)"CLEAN DISK.......=2".I...
....... .10)"CHANGE FILE NAME.=3".......
..... .10)"FORMAT DISK......=4".......T.
... .10)"COPY DISK 190....=5.Z.".....,..
.10)"THE END..........=6"...6.. A$:. A$
."". 310.".@.. A$."1". 390.4.J.. A$."2".
800.F.T.. A$."3". 520.X.^.. A$."4". 670
.J.H.. A$."5". 940.|.R.. A$."6". 900...|
.. A$.."6". 310...... 880......"..".R...
." *************************************
*"......" ************ SCRATCH MODE ****
********".0...." ***********************
***************".?.... 214,10:.._.B.."
PROGRAME NAME";A$.H.L..".".W.V.. 2
14,10:......." INSERT SOURCE D
ISK"...... AN$:. AN$."". 490.L....15,"SC
RATCH0:"A$"".R.......... 880......".."..
...." **********************************
****".D.&.." ************ RENAME MODE **
***********".S.0.." ********************
******************"...:.. 214,10:....D..
" PROGRAME OLD NAME";A$...N...L.X..
" PROGRAME NEW NAME";B$.U.B.."."...
L.. 214,10:....V.." INSERT SOU
RCE DISK".!.... AN$:. AN$."". 640.<....1
5,"RENAME0:"B$"="A$".B.....L.... 880.V..
..".."......" **************************
************"......" ************* FORMA
T MODE ************"...F.." ************
**************************"...P.. 214,10
:....Z.." DISK NAME";A$......".".$.
... 214,10:..I...." INSERT SOU
RCE DISK".A.... AN$:. AN$."". 770.Y....1
5,"NEW:"A$",DISK"........ .. 880...*.."
..".B.4.." *****************************
*********"...>.." *********** VALIDATE M
ODE ************". .H.." ***************
***********************".3.R..15,"VALIDA
TE".G.\.. CT.1 . 8000:..M.F...[.P.. 15,8
,15.A.Z...O... 15,8,15......".":. 53280
,14:. 53281,6......"."............"..".T
...." **********************************
***"......" ************* COPY MODE ****
*********".0.J.." **********************
***************".?.T.. 214,10:..]...."
PROGRAME NAME";A$.F....".".U.... 214
,10:......." INSERT SOURCE DISK
"...... AN$:. AN$."". 1030...... A$,8.C.
......
> CLICK IMAGE PREVIEW FOR FULL MODAL