AS64 8
FILE INFORMATION
FILENAME(S): AS64 8
FILE TYPE(S): PRG
FILE SIZE: 2.3K
FIRST SEEN: 2025-12-01 02:21:54
APPEARS ON: 1 disk(s)
FILE HASH
d826caedc6a2ffa9b8394b8abddc2d5a67ec69d1d28ad0ec2b84e401384cd4cf
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| WORKDISK | AS64 8 | PRG | hedning, scooby | 14 | 1 | 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 53 0C 02 08 99 20 28 54 AA 31 | . 14.S.... (T.1| 00000440: 29 3B 3A 99 20 A3 35 29 22 3E 22 3B 41 24 28 52 |);:. .5)">";A$(R| 00000450: AA 54 29 00 5B 0C 0C 08 82 20 54 00 8D 0C 16 08 |.T).[.... T.....| 00000460: 99 20 22 11 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 C0 C0 22 00 BA 0C |............"...| 00000490: 17 08 99 22 13 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 20 20 22 00 E6 0C 18 08 99 | "......| 000004C0: 20 22 13 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 20 20 | "............ | 000004D0: 20 58 3D 22 3B 58 3B 22 20 52 3D 22 3B 52 3B 22 | X=";X;" R=";R;"| 000004E0: 20 59 3D 22 3B 59 00 01 0D 19 08 8B 20 41 24 28 | Y=";Y...... A$(| 000004F0: 52 29 B2 22 22 20 A7 20 41 24 28 52 29 B2 22 20 |R)."" . A$(R)." | 00000500: 22 00 11 0D 1A 08 5A B2 20 C3 28 41 24 28 52 29 |".....Z. .(A$(R)| 00000510: 29 00 3B 0D 1B 08 8B 20 58 B1 5A 20 A7 20 81 20 |).;.... X.Z . . | 00000520: 54 B2 31 A4 58 AB 5A 3A 41 24 28 52 29 B2 41 24 |T.1.X.Z:A$(R).A$| 00000530: 28 52 29 AA 22 20 22 3A 82 20 54 00 59 0D 1F 08 |(R)." ":. T.Y...| 00000540: 8F 20 2A 20 46 4C 59 54 54 41 20 4D 41 52 4B 4F |. * FLYTTA MARKO| 00000550: 52 45 4E 20 4E 45 52 20 2A 00 69 0D 20 08 81 20 |REN NER *.i. .. | 00000560: 49 B2 31 20 A4 20 31 AA 59 00 74 0D 2A 08 99 20 |I.1 . 1.Y.t.*.. | 00000570: 22 11 22 3B 00 7C 0D 34 08 82 20 49 00 8C 0D 3E |".";.|.4.. I...>| 00000580: 08 81 20 49 B2 31 20 A4 20 35 AA 58 00 97 0D 48 |.. I.1 . 5.X...H| 00000590: 08 99 20 22 1D 22 3B 00 9F 0D 52 08 82 20 49 00 |.. ".";...R.. I.| 000005A0: C2 0D 5C 08 8B 20 CA 28 41 24 28 52 29 2C 58 2C |..\.. .(A$(R),X,| 000005B0: 31 29 B3 B1 C7 28 33 32 29 20 A7 20 89 20 32 32 |1)...(32) . . 22| 000005C0: 38 30 00 D7 0D 66 08 99 20 22 12 05 20 92 22 3A |80...f.. ".. .":| 000005D0: 20 89 20 32 35 30 30 00 F2 0D E8 08 99 20 22 12 | . 2500...... ".| 000005E0: 22 3B CA 28 41 24 28 52 29 2C 58 2C 31 29 3B 22 |";.(A$(R),X,1);"| 000005F0: 92 22 00 09 0E C4 09 A1 20 41 24 3A 8F 20 2A 20 |."...... A$:. * | 00000600: 56 49 4C 4C 4B 4F 52 20 2A 00 32 0E C5 09 8B 20 |VILLKOR *.2.... | 00000610: 41 24 B2 22 91 22 20 A7 20 8D 20 32 36 30 30 3A |A$."." . . 2600:| 00000620: 52 B2 52 AB 31 3A 59 B2 59 AB 31 3A 89 20 32 30 |R.R.1:Y.Y.1:. 20| 00000630: 37 31 00 5C 0E CE 09 8B 20 41 24 B2 22 11 22 20 |71.\.... A$."." | 00000640: A7 20 8D 20 32 36 30 30 3A 20 52 B2 52 AA 31 3A |. . 2600: R.R.1:| 00000650: 59 B2 59 AA 31 3A 89 20 32 30 37 31 00 7F 0E CF |Y.Y.1:. 2071....| 00000660: 09 8B 20 41 24 B2 22 1D 22 20 A7 20 8D 20 32 36 |.. A$."." . . 26| 00000670: 30 30 3A 58 B2 58 AA 31 3A 89 20 32 30 37 31 00 |00:X.X.1:. 2071.| 00000680: A2 0E D0 09 8B 20 41 24 B2 22 9D 22 20 A7 20 8D |..... A$."." . .| 00000690: 20 32 36 30 30 3A 58 B2 58 AB 31 3A 89 20 32 30 | 2600:X.X.1:. 20| 000006A0: 37 31 00 D1 0E D3 09 8B 20 41 24 B2 C7 28 31 33 |71...... A$..(13| 000006B0: 29 20 A7 20 8D 20 32 36 32 30 3A 58 B2 31 3A 52 |) . . 2620:X.1:R| 000006C0: B2 52 AA 31 3A 59 B2 59 AA 31 3A 89 20 32 30 37 |.R.1:Y.Y.1:. 207| 000006D0: 31 00 FA 0E D8 09 8B 20 41 24 B2 22 13 22 20 A7 |1...... A$."." .| 000006E0: 20 8D 20 32 36 30 30 3A 52 B2 31 3A 59 B2 31 3A | . 2600:R.1:Y.1:| 000006F0: 58 B2 31 3A 89 20 32 30 37 31 00 12 0F DD 09 8B |X.1:. 2071......| 00000700: 20 41 24 B2 C7 28 32 30 29 20 A7 20 89 20 34 30 | A$..(20) . . 40| 00000710: 30 30 00 29 0F E2 09 8B 20 41 24 B3 B1 22 22 20 |00.).... A$.."" | 00000720: A7 20 89 20 20 33 30 30 30 00 34 0F 1E 0A 89 20 |. . 3000.4.... | 00000730: 32 35 30 30 00 52 0F 28 0A 99 22 91 22 3B 3A 8F |2500.R.(..".";:.| 00000740: 20 2A 20 52 45 4E 53 41 20 52 45 56 45 52 53 45 | * RENSA REVERSE| 00000750: 20 2A 00 6C 0F 29 0A 81 20 54 B2 31 20 A4 20 35 | *.l.).. T.1 . 5| 00000760: AA 58 3A 99 22 1D 22 3B 3A 82 20 54 00 7F 0F 2D |.X:.".";:. T...-| 00000770: 0A 99 20 CA 28 41 24 28 52 29 2C 58 2C 31 29 00 |.. .(A$(R),X,1).| 00000780: 85 0F 32 0A 8E 00 90 0F 3C 0A 99 20 22 91 22 3B |..2.....<.. ".";| 00000790: 00 AA 0F 3D 0A 81 20 54 B2 31 20 A4 20 35 AA 58 |...=.. T.1 . 5.X| 000007A0: 3A 99 22 1D 22 3B 3A 82 20 54 00 BD 0F 41 0A 99 |:.".";:. T...A..| 000007B0: 20 CA 28 41 24 28 52 29 2C 58 2C 31 29 00 C3 0F | .(A$(R),X,1)...| 000007C0: 46 0A 8E 00 DB 0F B8 0B 41 31 24 B2 C8 28 41 24 |F.......A1$..(A$| 000007D0: 28 52 29 2C 58 AB 31 29 AA 41 24 00 F9 0F C2 0B |(R),X.1).A$.....| 000007E0: 41 32 24 B2 C9 28 41 24 28 52 29 2C C3 28 41 24 |A2$..(A$(R),.(A$| 000007F0: 28 52 29 29 AB 58 AA 31 29 00 0B 10 CC 0B 41 24 |(R)).X.1).....A$| 00000800: 28 52 29 B2 41 31 24 AA 41 32 24 00 20 10 D6 0B |(R).A1$.A2$. ...| 00000810: 8F 20 2A 20 48 4F 50 50 41 20 52 41 54 54 20 2A |. * HOPPA RATT *| 00000820: 00 2A 10 DB 0B 99 20 22 13 22 00 3A 10 E0 0B 81 |.*.... ".".:....| 00000830: 20 49 B2 31 20 A4 20 31 AA 59 00 45 10 EA 0B 99 | I.1 . 1.Y.E....| 00000840: 20 22 11 22 3B 00 4D 10 F4 0B 82 20 49 00 5B 10 | ".";.M.... I.[.| 00000850: FE 0B 81 20 49 B2 31 20 A4 20 36 00 66 10 08 0C |... I.1 . 6.f...| 00000860: 99 20 22 1D 22 3B 00 6E 10 12 0C 82 20 49 00 7A |. ".";.n.... I.z| 00000870: 10 1C 0C 99 20 41 24 28 52 29 00 84 10 1D 0C 58 |.... A$(R).....X| 00000880: B2 58 AA 31 00 8F 10 26 0C 89 20 32 30 37 31 00 |.X.1...&.. 2071.| 00000890: 9D 10 A0 0F 8F 20 2A 20 44 45 4C 20 2A 00 A7 10 |..... * DEL *...| 000008A0: AA 0F 58 B2 58 AB 31 00 BC 10 B4 0F 41 33 24 B2 |..X.X.1.....A3$.| 000008B0: C8 28 41 24 28 52 29 2C 58 AB 31 29 00 D8 10 BE |.(A$(R),X.1)....| 000008C0: 0F 41 34 24 B2 C9 28 41 24 28 52 29 2C C3 28 41 |.A4$..(A$(R),.(A| 000008D0: 24 28 52 29 29 AB 58 29 00 EA 10 C8 0F 41 24 28 |$(R)).X).....A$(| 000008E0: 52 29 B2 41 33 24 AA 41 34 24 00 F4 10 D2 0F 99 |R).A3$.A4$......| 000008F0: 20 22 13 22 00 04 11 DC 0F 81 20 49 B2 31 20 A4 | "."...... I.1 .| 00000900: 20 31 AA 59 00 0F 11 E6 0F 99 20 22 11 22 3B 00 | 1.Y...... ".";.| 00000910: 17 11 F0 0F 82 20 49 00 25 11 FA 0F 81 20 49 B2 |..... I.%.... I.| 00000920: 31 20 A4 20 36 00 30 11 04 10 99 20 22 1D 22 3B |1 . 6.0.... ".";| 00000930: 00 38 11 0E 10 82 20 49 00 48 11 18 10 99 20 41 |.8.... I.H.... A| 00000940: 24 28 52 29 AA 22 20 22 00 53 11 22 10 89 20 32 |$(R)." ".S.".. 2| 00000950: 30 37 31 00 00 00 |071... |
....... 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.S.
... (T.1);:. .5)">";A$(R.T).[.... T.....
. ".....................................
...."......".
"...... "............ X=";X;"
R=";R;" Y=";Y...... A$(R)."" . A$(R)."
".....Z. C(A$(R)).;.... X.Z . . T.1.X.Z:
A$(R).A$(R)." ":. T.Y.... * FLYTTA MARKO
REN NER *.I. .. I.1 . 1.Y.T.*.. ".";.|.4
.. I...>.. I.1 . 5.X...H.. ".";...R.. I.
B.\.. J(A$(R),X,1)..G(32) . . 2280.W.F..
".. .": . 2500...... ".";J(A$(R),X,1);"
."...D.. A$:. * VILLKOR *.2.E.. A$."." .
. 2600:R.R.1:Y.Y.1:. 2071.\.N.. A$."."
. . 2600: R.R.1:Y.Y.1:. 2071..O.. A$.".
" . . 2600:X.X.1:. 2071...P.. A$."." . .
2600:X.X.1:. 2071.Q.S.. A$.G(13) . . 26
20: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.4....
2500.R.(..".";:. * RENSA REVERSE *.L.)..
T.1 . 5.X:.".";:. T..-.. J(A$(R),X,1).
..2.....<.. ".";...=.. T.1 . 5.X:.".";:.
T...A.. J(A$(R),X,1).C.F.......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 *
.*.... ".".:.... I.1 . 1.Y.E.... ".";.M.
... I.[.... I.1 . 6.F.... ".";.N.... I.Z
.... A$(R).....X.X.1...&.. 2071... .. *
DEL *.....X.X.1.....A3$.H(A$(R),X.1).X..
.A4$.I(A$(R),C(A$(R)).X)...H.A$(R).A3$.A
4$...R.. "."...... I.1 . 1.Y...... ".";.
..... I.%.... I.1 . 6.0.... ".";.8.... I
.H.... A$(R)." ".S.".. 2071...
> CLICK IMAGE PREVIEW FOR FULL MODAL