AS64 7
FILE INFORMATION
FILENAME(S): AS64 7
FILE TYPE(S): PRG
FILE SIZE: 2.3K
FIRST SEEN: 2025-12-01 02:21:54
APPEARS ON: 1 disk(s)
FILE HASH
53caff56a7d5bd8e04bb51bee002c89feda2948ed8c2006a7f65ef9c29fa540c
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| WORKDISK | AS64 7 | PRG | hedning, scooby | 14 | 0 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 0E 08 00 00 86 20 41 24 28 33 30 29 00 32 |....... A$(30).2| 00000010: 08 0A 00 99 22 93 05 20 20 20 20 20 20 20 20 20 |....".. | 00000020: 20 20 B0 C3 C3 AE B0 C3 C3 AE B0 C3 C3 AE B0 AE | ..............| 00000030: B0 AE 00 56 08 14 00 99 20 20 22 20 20 20 20 20 |...V.... " | 00000040: 20 20 20 20 20 20 C7 B0 AE C8 C7 B0 C3 BD C7 B0 | ..........| 00000050: C3 BD C7 C8 C7 C8 00 7A 08 1E 00 99 20 20 22 20 |.......z.... " | 00000060: 20 20 20 20 20 20 20 20 20 20 C7 AD BD C8 C7 AD | ......| 00000070: C3 AE C7 AD C3 AE C7 AD BD C8 00 9E 08 28 00 99 |.............(..| 00000080: 20 20 22 20 20 20 20 20 20 20 20 20 20 20 C7 B0 | " ..| 00000090: AE C8 AD C3 AE C8 C7 B0 AE C8 AD C3 AE C8 00 C2 |................| 000000A0: 08 32 00 99 20 20 22 20 20 20 20 20 20 20 20 20 |.2.. " | 000000B0: 20 20 C7 DD DD C8 B0 C3 BD C8 C7 AD BD C8 20 20 | ............ | 000000C0: C7 C8 00 E6 08 3C 00 99 20 20 22 20 20 20 20 20 |.....<.. " | 000000D0: 20 20 20 20 20 20 AD BD AD BD AD C3 C3 BD AD C3 | ..........| 000000E0: C3 BD 20 20 AD BD 00 13 09 41 00 99 20 20 22 20 |.. .....A.. " | 000000F0: 20 20 20 D5 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 | .............| 00000100: C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 |................| 00000110: C0 C9 22 00 3F 09 46 00 99 20 20 22 20 20 20 20 |..".?.F.. " | 00000120: C2 41 20 50 52 4F 47 52 41 4D 20 42 59 20 54 48 |.A PROGRAM BY TH| 00000130: 45 20 42 45 41 55 54 59 20 44 49 4E 4F 53 C2 00 |E BEAUTY DINOS..| 00000140: 6C 09 50 00 99 20 20 22 20 20 20 20 AB C0 C0 C0 |l.P.. " ....| 00000150: C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 |................| 00000160: C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 B3 22 00 99 09 55 |..........."...U| 00000170: 00 99 20 20 22 20 20 20 20 DD 20 20 20 20 20 20 |.. " . | 00000180: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 00000190: 20 20 20 20 20 20 20 DD 22 00 C8 09 5A 00 99 20 | ."...Z.. | 000001A0: 20 22 20 20 20 20 DD 20 20 20 20 20 12 46 31 92 | " . .F1.| 000001B0: 20 41 53 53 45 4D 42 4C 45 20 50 52 4F 47 52 41 | ASSEMBLE PROGRA| 000001C0: 4D 20 20 20 20 20 DD 22 00 F6 09 64 00 99 20 22 |M ."...d.. "| 000001D0: 20 20 20 20 DD 20 20 20 20 20 12 46 32 92 20 45 | . .F2. E| 000001E0: 44 49 54 20 50 52 4F 47 52 41 4D 20 20 20 20 20 |DIT PROGRAM | 000001F0: 20 20 20 20 DD 22 00 24 0A 6E 00 99 20 22 20 20 | .".$.n.. " | 00000200: 20 20 DD 20 20 20 20 20 12 46 33 92 20 53 41 56 | . .F3. SAV| 00000210: 45 20 53 4F 55 52 43 45 20 20 20 20 20 20 20 20 |E SOURCE | 00000220: 20 20 DD 22 00 52 0A 78 00 99 20 22 20 20 20 20 | .".R.x.. " | 00000230: DD 20 20 20 20 20 12 46 34 92 20 4C 4F 41 44 20 |. .F4. LOAD | 00000240: 53 4F 55 52 43 45 20 20 20 20 20 20 20 20 20 20 |SOURCE | 00000250: DD 22 00 80 0A 82 00 99 20 22 20 20 20 20 DD 20 |."...... " . | 00000260: 20 20 20 20 12 46 35 92 20 53 41 56 45 20 43 4F | .F5. SAVE CO| 00000270: 44 45 20 20 20 20 20 20 20 20 20 20 20 20 DD 22 |DE ."| 00000280: 00 AE 0A 8C 00 99 20 22 20 20 20 20 DD 20 20 20 |...... " . | 00000290: 20 20 12 46 36 92 20 51 55 49 54 20 20 20 20 20 | .F6. QUIT | 000002A0: 20 20 20 20 20 20 20 20 20 20 20 20 DD 22 00 DA | ."..| 000002B0: 0A 96 00 99 20 22 20 20 20 20 DD 20 20 20 20 20 |.... " . | 000002C0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 000002D0: 20 20 20 20 20 20 20 20 DD 22 00 06 0B A0 00 99 | ."......| 000002E0: 20 22 20 20 20 20 CA C3 C3 C3 C3 C3 C3 C3 C3 C3 | " ..........| 000002F0: C3 C3 C3 C3 C3 C3 C3 C3 C3 C3 C3 C3 C3 C3 C3 C3 |................| 00000300: C3 C3 C3 C3 CB 22 00 0F 0B C8 00 A1 20 41 24 00 |....."...... A$.| 00000310: 26 0B D2 00 8B 20 41 24 B2 22 85 22 20 A7 20 99 |&.... A$."." . .| 00000320: 20 22 46 31 91 22 00 44 0B DC 00 8B 20 41 24 B2 | "F1.".D.... A$.| 00000330: 22 89 22 20 A7 20 99 20 22 46 32 91 22 3A 89 20 |"." . . "F2.":. | 00000340: 32 30 30 30 00 5B 0B E6 00 8B 20 41 24 B2 22 86 |2000.[.... A$.".| 00000350: 22 20 A7 20 99 20 22 46 33 91 22 00 72 0B F0 00 |" . . "F3.".r...| 00000360: 8B 20 41 24 B2 22 8A 22 20 A7 20 99 20 22 46 34 |. A$."." . . "F4| 00000370: 91 22 00 89 0B FA 00 8B 20 41 24 B2 22 87 22 20 |."...... A$."." | 00000380: A7 20 99 20 22 46 35 91 22 00 A0 0B 04 01 8B 20 |. . "F5."...... | 00000390: 41 24 B2 22 8B 22 20 A7 20 99 20 22 46 36 91 22 |A$."." . . "F6."| 000003A0: 00 AA 0B 22 01 89 20 32 30 30 00 BB 0B D0 07 8F |...".. 200......| 000003B0: 20 2A 20 45 44 49 54 4F 52 20 2A 00 C5 0B DA 07 | * EDITOR *.....| 000003C0: 99 20 22 93 22 00 DB 0B E4 07 99 20 22 13 05 41 |. "."...... "..A| 000003D0: 53 36 34 20 45 44 49 54 4F 52 22 00 0C 0C E9 07 |S64 EDITOR".....| 000003E0: 99 20 22 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 |. ".............| 000003F0: C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 |................| 00000400: C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 22 00 26 0C EE |...........".&..| 00000410: 07 58 B2 31 3A 59 B2 31 3A 52 B2 31 3A 41 24 28 |.X.1:Y.1:R.1:A$(| 00000420: 31 29 B2 22 A0 22 00 35 0C F8 07 81 20 54 B2 30 |1).".".5.... T.0| 00000430: 20 A4 20 31 34 00 51 0C 02 08 99 20 54 AA 31 3B | . 14.Q.... T.1;| 00000440: 3A 99 20 A3 35 29 22 3E 22 3B 41 24 28 52 AA 54 |:. .5)">";A$(R.T| 00000450: 29 00 59 0C 0C 08 82 20 54 00 8B 0C 16 08 99 20 |).Y.... T...... | 00000460: 22 11 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 |"...............| 00000470: C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 |................| 00000480: C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 22 00 B8 0C 17 08 |..........".....| 00000490: 99 22 13 20 20 20 20 20 20 20 20 20 20 20 20 20 |.". | 000004A0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 000004B0: 20 20 20 20 20 20 20 22 00 E4 0C 18 08 99 20 22 | "...... "| 000004C0: 13 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 20 20 20 58 |............ X| 000004D0: 3D 22 3B 58 3B 22 20 52 3D 22 3B 52 3B 22 20 59 |=";X;" R=";R;" Y| 000004E0: 3D 22 3B 59 00 FF 0C 19 08 8B 20 41 24 28 52 29 |=";Y...... A$(R)| 000004F0: B2 22 22 20 A7 20 41 24 28 52 29 B2 22 20 22 00 |."" . A$(R)." ".| 00000500: 0F 0D 1A 08 5A B2 20 C3 28 41 24 28 52 29 29 00 |....Z. .(A$(R)).| 00000510: 39 0D 1B 08 8B 20 58 B1 5A 20 A7 20 81 20 54 B2 |9.... X.Z . . T.| 00000520: 31 A4 58 AB 5A 3A 41 24 28 52 29 B2 41 24 28 52 |1.X.Z:A$(R).A$(R| 00000530: 29 AA 22 20 22 3A 82 20 54 00 57 0D 1F 08 8F 20 |)." ":. T.W.... | 00000540: 2A 20 46 4C 59 54 54 41 20 4D 41 52 4B 4F 52 45 |* FLYTTA MARKORE| 00000550: 4E 20 4E 45 52 20 2A 00 67 0D 20 08 81 20 49 B2 |N NER *.g. .. I.| 00000560: 31 20 A4 20 31 AA 59 00 72 0D 2A 08 99 20 22 11 |1 . 1.Y.r.*.. ".| 00000570: 22 3B 00 7A 0D 34 08 82 20 49 00 8A 0D 3E 08 81 |";.z.4.. I...>..| 00000580: 20 49 B2 31 20 A4 20 35 AA 58 00 95 0D 48 08 99 | I.1 . 5.X...H..| 00000590: 20 22 1D 22 3B 00 9D 0D 52 08 82 20 49 00 C0 0D | ".";...R.. I...| 000005A0: 5C 08 8B 20 CA 28 41 24 28 52 29 2C 58 2C 31 29 |\.. .(A$(R),X,1)| 000005B0: B3 B1 C7 28 33 32 29 20 A7 20 89 20 32 32 38 30 |...(32) . . 2280| 000005C0: 00 D5 0D 66 08 99 20 22 12 05 20 92 22 3A 20 89 |...f.. ".. .": .| 000005D0: 20 32 35 30 30 00 F0 0D E8 08 99 20 22 12 22 3B | 2500...... ".";| 000005E0: CA 28 41 24 28 52 29 2C 58 2C 31 29 3B 22 92 22 |.(A$(R),X,1);"."| 000005F0: 00 07 0E C4 09 A1 20 41 24 3A 8F 20 2A 20 56 49 |...... A$:. * VI| 00000600: 4C 4C 4B 4F 52 20 2A 00 30 0E C5 09 8B 20 41 24 |LLKOR *.0.... A$| 00000610: B2 22 91 22 20 A7 20 8D 20 32 36 30 30 3A 52 B2 |."." . . 2600:R.| 00000620: 52 AB 31 3A 59 B2 59 AB 31 3A 89 20 32 30 37 31 |R.1:Y.Y.1:. 2071| 00000630: 00 5A 0E CE 09 8B 20 41 24 B2 22 11 22 20 A7 20 |.Z.... A$."." . | 00000640: 8D 20 32 36 30 30 3A 20 52 B2 52 AA 31 3A 59 B2 |. 2600: R.R.1:Y.| 00000650: 59 AA 31 3A 89 20 32 30 37 31 00 7D 0E CF 09 8B |Y.1:. 2071.}....| 00000660: 20 41 24 B2 22 1D 22 20 A7 20 8D 20 32 36 30 30 | A$."." . . 2600| 00000670: 3A 58 B2 58 AA 31 3A 89 20 32 30 37 31 00 A0 0E |:X.X.1:. 2071...| 00000680: D0 09 8B 20 41 24 B2 22 9D 22 20 A7 20 8D 20 32 |... A$."." . . 2| 00000690: 36 30 30 3A 58 B2 58 AB 31 3A 89 20 32 30 37 31 |600:X.X.1:. 2071| 000006A0: 00 CF 0E D3 09 8B 20 41 24 B2 C7 28 31 33 29 20 |...... A$..(13) | 000006B0: A7 20 8D 20 32 36 32 30 3A 58 B2 31 3A 52 B2 52 |. . 2620:X.1:R.R| 000006C0: AA 31 3A 59 B2 59 AA 31 3A 89 20 32 30 37 31 00 |.1:Y.Y.1:. 2071.| 000006D0: F8 0E D8 09 8B 20 41 24 B2 22 13 22 20 A7 20 8D |..... A$."." . .| 000006E0: 20 32 36 30 30 3A 52 B2 31 3A 59 B2 31 3A 58 B2 | 2600:R.1:Y.1:X.| 000006F0: 31 3A 89 20 32 30 37 31 00 10 0F DD 09 8B 20 41 |1:. 2071...... A| 00000700: 24 B2 C7 28 32 30 29 20 A7 20 89 20 34 30 30 30 |$..(20) . . 4000| 00000710: 00 27 0F E2 09 8B 20 41 24 B3 B1 22 22 20 A7 20 |.'.... A$.."" . | 00000720: 89 20 20 33 30 30 30 00 32 0F 1E 0A 89 20 32 35 |. 3000.2.... 25| 00000730: 30 30 00 50 0F 28 0A 99 22 91 22 3B 3A 8F 20 2A |00.P.(..".";:. *| 00000740: 20 52 45 4E 53 41 20 52 45 56 45 52 53 45 20 2A | RENSA REVERSE *| 00000750: 00 6A 0F 29 0A 81 20 54 B2 31 20 A4 20 35 AA 58 |.j.).. T.1 . 5.X| 00000760: 3A 99 22 1D 22 3B 3A 82 20 54 00 7D 0F 2D 0A 99 |:.".";:. T.}.-..| 00000770: 20 CA 28 41 24 28 52 29 2C 58 2C 31 29 00 83 0F | .(A$(R),X,1)...| 00000780: 32 0A 8E 00 8E 0F 3C 0A 99 20 22 91 22 3B 00 A8 |2.....<.. ".";..| 00000790: 0F 3D 0A 81 20 54 B2 31 20 A4 20 35 AA 58 3A 99 |.=.. T.1 . 5.X:.| 000007A0: 22 1D 22 3B 3A 82 20 54 00 BB 0F 41 0A 99 20 CA |".";:. T...A.. .| 000007B0: 28 41 24 28 52 29 2C 58 2C 31 29 00 C1 0F 46 0A |(A$(R),X,1)...F.| 000007C0: 8E 00 D9 0F B8 0B 41 31 24 B2 C8 28 41 24 28 52 |......A1$..(A$(R| 000007D0: 29 2C 58 AB 31 29 AA 41 24 00 F7 0F C2 0B 41 32 |),X.1).A$.....A2| 000007E0: 24 B2 C9 28 41 24 28 52 29 2C C3 28 41 24 28 52 |$..(A$(R),.(A$(R| 000007F0: 29 29 AB 58 AA 31 29 00 09 10 CC 0B 41 24 28 52 |)).X.1).....A$(R| 00000800: 29 B2 41 31 24 AA 41 32 24 00 1E 10 D6 0B 8F 20 |).A1$.A2$...... | 00000810: 2A 20 48 4F 50 50 41 20 52 41 54 54 20 2A 00 28 |* HOPPA RATT *.(| 00000820: 10 DB 0B 99 20 22 13 22 00 38 10 E0 0B 81 20 49 |.... ".".8.... I| 00000830: B2 31 20 A4 20 31 AA 59 00 43 10 EA 0B 99 20 22 |.1 . 1.Y.C.... "| 00000840: 11 22 3B 00 4B 10 F4 0B 82 20 49 00 59 10 FE 0B |.";.K.... I.Y...| 00000850: 81 20 49 B2 31 20 A4 20 36 00 64 10 08 0C 99 20 |. I.1 . 6.d.... | 00000860: 22 1D 22 3B 00 6C 10 12 0C 82 20 49 00 78 10 1C |".";.l.... I.x..| 00000870: 0C 99 20 41 24 28 52 29 00 82 10 1D 0C 58 B2 58 |.. A$(R).....X.X| 00000880: AA 31 00 8D 10 26 0C 89 20 32 30 37 31 00 9B 10 |.1...&.. 2071...| 00000890: A0 0F 8F 20 2A 20 44 45 4C 20 2A 00 A5 10 AA 0F |... * DEL *.....| 000008A0: 58 B2 58 AB 31 00 BA 10 B4 0F 41 33 24 B2 C8 28 |X.X.1.....A3$..(| 000008B0: 41 24 28 52 29 2C 58 AB 31 29 00 D6 10 BE 0F 41 |A$(R),X.1).....A| 000008C0: 34 24 B2 C9 28 41 24 28 52 29 2C C3 28 41 24 28 |4$..(A$(R),.(A$(| 000008D0: 52 29 29 AB 58 29 00 E8 10 C8 0F 41 24 28 52 29 |R)).X).....A$(R)| 000008E0: B2 41 33 24 AA 41 34 24 00 F2 10 D2 0F 99 20 22 |.A3$.A4$...... "| 000008F0: 13 22 00 02 11 DC 0F 81 20 49 B2 31 20 A4 20 31 |."...... I.1 . 1| 00000900: AA 59 00 0D 11 E6 0F 99 20 22 11 22 3B 00 15 11 |.Y...... ".";...| 00000910: F0 0F 82 20 49 00 23 11 FA 0F 81 20 49 B2 31 20 |... I.#.... I.1 | 00000920: A4 20 36 00 2E 11 04 10 99 20 22 1D 22 3B 00 36 |. 6...... ".";.6| 00000930: 11 0E 10 82 20 49 00 46 11 18 10 99 20 41 24 28 |.... I.F.... A$(| 00000940: 52 29 AA 22 20 22 00 51 11 22 10 89 20 32 30 37 |R)." ".Q.".. 207| 00000950: 31 00 00 00 |1... |
....... A$(30).2....".. .CC..C
C..CC......V.... " G..HG.C.G.
C.GHGH.Z.... " G..HG.C.G.C.G.
.H...(.. " G..H.C.HG..H.C.H.B
.2.. " G..H.C.HG..H GH...<..
" .....CC..CC. .....A.. "
U.............................I".?.F.
. " BA PROGRAM BY THE BEAUTY DINOSB.
L.P.. " ............................
..."...U.. " .
.".H.Z.. " . .F1. ASSEMBL
E PROGRAM ."...D.. " . .F2. E
DIT PROGRAM .".$.N.. " .
.F3. SAVE SOURCE .".R.X.. "
. .F4. LOAD SOURCE ."......
" . .F5. SAVE CODE ."
...... " . .F6. QUIT
.".Z.... " .
."... .. " JCCCCCCCCCCCCCCCCC
CCCCCCCCCCCCK"...H.. A$.&.R.. A$."." . .
"F1.".D.... A$."." . . "F2.":. 2000.[..
.. A$."." . . "F3.".R.... A$."." . . "F4
."...... A$."." . . "F5.". .... A$."." .
. "F6."...".. 200...P.. * EDITOR *.E.Z.
. "."...... "..AS64 EDITOR"...... ".....
...................................".&..
.X.1:Y.1:R.1:A$(1)." ".5.... T.0 . 14.Q.
... T.1;:. .5)">";A$(R.T).Y.... T......
".......................................
.."......".
"...... "............ X=";X;" R
=";R;" Y=";Y...... A$(R)."" . A$(R)." ".
....Z. C(A$(R)).9.... X.Z . . T.1.X.Z:A$
(R).A$(R)." ":. T.W.... * FLYTTA MARKORE
N NER *.G. .. I.1 . 1.Y.R.*.. ".";.Z.4..
I...>.. I.1 . 5.X...H.. ".";...R.. I...
\.. J(A$(R),X,1)..G(32) . . 2280.U.F.. "
.. .": . 2500...... ".";J(A$(R),X,1);"."
...D.. A$:. * VILLKOR *.0.E.. A$."." . .
2600:R.R.1:Y.Y.1:. 2071.Z.N.. A$."." .
. 2600: R.R.1:Y.Y.1:. 2071.}.O.. A$."."
. . 2600:X.X.1:. 2071. .P.. A$."." . . 2
600:X.X.1:. 2071.O.S.. A$.G(13) . . 2620
:X.1:R.R.1:Y.Y.1:. 2071...X.. A$."." . .
2600:R.1:Y.1:X.1:. 2071...... A$.G(20)
. . 4000.'.... A$.."" . . 3000.2.... 25
00.P.(..".";:. * RENSA REVERSE *.J.).. T
.1 . 5.X:.".";:. T.}.-.. J(A$(R),X,1)...
2.....<.. ".";...=.. T.1 . 5.X:.".";:. T
...A.. J(A$(R),X,1).A.F...Y...A1$.H(A$(R
),X.1).A$...B.A2$.I(A$(R),C(A$(R)).X.1).
..L.A$(R).A1$.A2$...V.. * HOPPA RATT *.(
.... ".".8.... I.1 . 1.Y.C.... ".";.K...
. I.Y.... I.1 . 6.D.... ".";.L.... I.X..
.. A$(R).....X.X.1...&.. 2071... .. * DE
L *.....X.X.1.....A3$.H(A$(R),X.1).V...A
4$.I(A$(R),C(A$(R)).X)...H.A$(R).A3$.A4$
...R.. "."...... I.1 . 1.Y...... ".";...
... I.#.... I.1 . 6...... ".";.6.... I.F
.... A$(R)." ".Q.".. 2071...
> CLICK IMAGE PREVIEW FOR FULL MODAL