CHAR. SCROLL
FILE INFORMATION
FILENAME(S): CHAR. SCROLL
FILE TYPE(S): PRG
FILE SIZE: 1.4K
FIRST SEEN: 2025-12-01 01:09:41
APPEARS ON: 1 disk(s)
FILE HASH
f76c0424e2a539810922c78d4824dd6f607fd255be170beb7eb5a6d2f2a11c35
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| SCARABEE | CHAR. SCROLL | PRG | hedning, Martin L0fgren | 19 | 0 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 0E 08 0A 00 9E 20 39 AC 34 30 39 36 00 2F |....... 9.4096./| 00000010: 08 14 00 AC B2 24 43 30 30 30 20 20 20 3B 20 48 |.....$C000 ; H| 00000020: 45 52 20 4C 41 45 47 47 45 53 20 50 52 47 2E 00 |ER LAEGGES PRG..| 00000030: 3D 08 1E 00 2E 4F 50 54 20 4E 2C 4F 4F 00 5A 08 |=....OPT N,OO.Z.| 00000040: 1F 00 4C 44 58 20 23 24 30 30 20 20 3B 20 56 41 |..LDX #$00 ; VA| 00000050: 52 49 41 42 45 4C 20 53 45 54 00 68 08 20 00 53 |RIABEL SET.h. .S| 00000060: 54 58 20 24 38 30 30 30 00 75 08 21 00 4C 44 41 |TX $8000.u.!.LDA| 00000070: 20 23 24 43 37 00 83 08 22 00 53 54 41 20 24 38 | #$C7...".STA $8| 00000080: 30 30 31 00 8B 08 28 00 53 45 49 00 98 08 32 00 |001...(.SEI...2.| 00000090: 4C 44 41 20 23 24 37 46 00 A6 08 3C 00 53 54 41 |LDA #$7F...<.STA| 000000A0: 20 24 44 43 30 44 00 B3 08 46 00 4C 44 41 20 23 | $DC0D...F.LDA #| 000000B0: 24 30 31 00 C1 08 50 00 53 54 41 20 24 44 30 31 |$01...P.STA $D01| 000000C0: 41 00 D1 08 6E 00 4C 44 58 20 23 B3 53 54 41 52 |A...n.LDX #.STAR| 000000D0: 54 00 E1 08 78 00 4C 44 59 20 23 B1 53 54 41 52 |T...x.LDY #.STAR| 000000E0: 54 00 EF 08 82 00 53 54 58 20 24 30 33 31 34 00 |T.....STX $0314.| 000000F0: FD 08 8C 00 53 54 59 20 24 30 33 31 35 00 0A 09 |....STY $0315...| 00000100: 96 00 4C 44 41 20 23 24 33 30 00 2D 09 A0 00 53 |..LDA #$30.-...S| 00000110: 54 41 20 24 44 30 31 32 20 20 20 20 20 3B 20 52 |TA $D012 ; R| 00000120: 41 53 54 45 52 20 4C 49 4E 45 20 55 50 00 3B 09 |ASTER LINE UP.;.| 00000130: AA 00 4C 44 41 20 24 44 30 31 31 00 46 09 B4 00 |..LDA $D011.F...| 00000140: AF 20 23 24 37 46 00 54 09 BE 00 53 54 41 20 24 |. #$7F.T...STA $| 00000150: 44 30 31 31 00 61 09 C8 00 4C 44 41 20 23 24 30 |D011.a...LDA #$0| 00000160: 31 00 6F 09 D2 00 53 54 41 20 24 44 30 31 39 00 |1.o...STA $D019.| 00000170: 77 09 FA 00 43 4C 49 00 7F 09 04 01 52 54 53 00 |w...CLI.....RTS.| 00000180: 93 09 2C 01 53 54 41 52 54 20 4C 44 41 20 24 44 |..,.START LDA $D| 00000190: 30 31 39 00 A1 09 36 01 53 54 41 20 24 44 30 31 |019...6.STA $D01| 000001A0: 39 00 AE 09 40 01 4C 44 41 20 23 24 30 37 00 B6 |9...@.LDA #$07..| 000001B0: 09 41 01 4E 4F 50 00 BE 09 42 01 4E 4F 50 00 C6 |.A.NOP...B.NOP..| 000001C0: 09 43 01 4E 4F 50 00 CE 09 44 01 4E 4F 50 00 D6 |.C.NOP...D.NOP..| 000001D0: 09 45 01 4E 4F 50 00 E4 09 4A 01 53 54 41 20 24 |.E.NOP...J.STA $| 000001E0: 44 30 32 30 00 F2 09 54 01 53 54 41 20 24 44 30 |D020...T.STA $D0| 000001F0: 32 31 00 14 0A 5E 01 4C 44 41 20 24 38 30 30 31 |21...^.LDA $8001| 00000200: 20 20 20 20 20 3B 20 56 41 52 49 41 42 45 4C 20 | ; VARIABEL | 00000210: 38 30 30 31 00 22 0A 68 01 53 54 41 20 24 44 30 |8001.".h.STA $D0| 00000220: 31 36 00 2A 0A 6D 01 53 45 49 00 4A 0A 72 01 4C |16.*.m.SEI.J.r.L| 00000230: 44 41 20 23 24 33 41 20 20 20 20 20 3B 20 4C 4F |DA #$3A ; LO| 00000240: 57 45 52 20 52 41 53 54 45 52 00 58 0A 58 01 53 |WER RASTER.X.X.S| 00000250: 54 41 20 24 44 30 31 32 00 68 0A 86 01 4C 44 58 |TA $D012.h...LDX| 00000260: 20 23 B3 53 4C 55 54 54 00 78 0A 90 01 4C 44 59 | #.SLUTT.x...LDY| 00000270: 20 23 B1 53 4C 55 54 54 00 86 0A 9A 01 53 54 58 | #.SLUTT.....STX| 00000280: 20 24 30 33 31 34 00 94 0A A4 01 53 54 59 20 24 | $0314.....STY $| 00000290: 30 33 31 35 00 9C 0A AE 01 43 4C 49 00 AA 0A B8 |0315.....CLI....| 000002A0: 01 4A 4D 50 20 24 45 41 33 31 00 BE 0A F4 01 53 |.JMP $EA31.....S| 000002B0: 4C 55 54 54 20 4C 44 41 20 24 44 30 31 39 00 CC |LUTT LDA $D019..| 000002C0: 0A FE 01 53 54 41 20 24 44 30 31 39 00 EF 0A 08 |...STA $D019....| 000002D0: 02 4C 44 41 20 23 24 30 30 20 20 20 20 20 20 3B |.LDA #$00 ;| 000002E0: 20 42 41 43 4B 47 52 4F 55 4E 44 20 43 4F 4C 00 | BACKGROUND COL.| 000002F0: F7 0A 09 02 4E 4F 50 00 FF 0A 0A 02 4E 4F 50 00 |....NOP.....NOP.| 00000300: 07 0B 0B 02 4E 4F 50 00 0F 0B 0C 02 4E 4F 50 00 |....NOP.....NOP.| 00000310: 1D 0B 12 02 53 54 41 20 24 44 30 32 30 00 2B 0B |....STA $D020.+.| 00000320: 1C 02 53 54 41 20 24 44 30 32 31 00 38 0B 26 02 |..STA $D021.8.&.| 00000330: 4C 44 41 20 23 24 43 38 00 46 0B 30 02 53 54 41 |LDA #$C8.F.0.STA| 00000340: 20 24 44 30 31 36 00 64 0B 3A 02 53 45 49 20 20 | $D016.d.:.SEI | 00000350: 20 20 20 20 20 20 20 20 3B 20 52 41 53 54 45 52 | ; RASTER| 00000360: 20 53 45 54 00 71 0B 44 02 4C 44 41 20 23 24 33 | SET.q.D.LDA #$3| 00000370: 30 00 7F 0B 4E 02 53 54 41 20 24 44 30 31 32 00 |0...N.STA $D012.| 00000380: 8F 0B 58 02 4C 44 58 20 23 B3 53 54 41 52 54 00 |..X.LDX #.START.| 00000390: 9F 0B 62 02 4C 44 59 20 23 B1 53 54 41 52 54 00 |..b.LDY #.START.| 000003A0: AD 0B 6C 02 53 54 58 20 24 30 33 31 34 00 BB 0B |..l.STX $0314...| 000003B0: 76 02 53 54 59 20 24 30 33 31 35 00 C3 0B 80 02 |v.STY $0315.....| 000003C0: 43 4C 49 00 D1 0B 8A 02 4C 44 41 20 24 38 30 30 |CLI.....LDA $800| 000003D0: 31 00 DE 0B 94 02 43 4D 50 20 23 24 43 30 00 05 |1.....CMP #$C0..| 000003E0: 0C 9E 02 42 45 51 20 4D 4F 56 45 20 20 20 20 20 |...BEQ MOVE | 000003F0: 3B 20 4A 4D 50 20 4D 4F 56 45 20 43 48 41 52 45 |; JMP MOVE CHARE| 00000400: 53 54 45 52 53 00 13 0C A8 02 44 45 43 20 24 38 |STERS.....DEC $8| 00000410: 30 30 31 00 21 0C B2 02 4A 4D 50 20 24 45 41 33 |001.!...JMP $EA3| 00000420: 31 00 33 0C E8 03 4D 4F 56 45 20 4C 44 41 20 23 |1.3...MOVE LDA #| 00000430: 24 43 37 00 41 0C F2 03 53 54 41 20 24 38 30 30 |$C7.A...STA $800| 00000440: 31 00 4E 0C 1A 04 4C 44 59 20 23 24 32 37 00 5B |1.N...LDY #$27.[| 00000450: 0C 24 04 4C 44 58 20 23 24 30 31 00 6D 0C 2E 04 |.$.LDX #$01.m...| 00000460: 41 20 4C 44 41 20 24 30 34 30 30 2C 58 00 75 0C |A LDA $0400,X.u.| 00000470: 38 04 44 45 58 00 85 0C 42 04 53 54 41 20 24 30 |8.DEX...B.STA $0| 00000480: 34 30 30 2C 58 00 8D 0C 4C 04 49 4E 58 00 95 0C |400,X...L.INX...| 00000490: 56 04 49 4E 58 00 9D 0C 60 04 44 45 59 00 A7 0C |V.INX...`.DEY...| 000004A0: 6A 04 42 4E 45 20 41 00 B5 0C 74 04 4C 44 58 20 |j.BNE A...t.LDX | 000004B0: 24 38 30 30 30 00 C6 0C 7E 04 43 49 20 4C 44 41 |$8000...~.CI LDA| 000004C0: 20 43 4F 4C 2C 58 00 CE 0C 88 04 54 41 59 00 DB | COL,X.....TAY..| 000004D0: 0C 92 04 43 4D 50 20 23 24 46 46 00 E9 0C 9C 04 |...CMP #$FF.....| 000004E0: 42 45 51 20 52 45 53 45 54 00 F1 0C A6 04 54 59 |BEQ RESET.....TY| 000004F0: 41 00 FF 0C B0 04 53 54 41 20 24 30 34 32 37 00 |A.....STA $0427.| 00000500: 07 0D BA 04 49 4E 58 00 15 0D C4 04 53 54 58 20 |....INX.....STX | 00000510: 24 38 30 30 30 00 23 0D CE 04 4A 4D 50 20 24 45 |$8000.#...JMP $E| 00000520: 41 33 31 00 36 0D D8 04 52 45 53 45 54 20 4C 44 |A31.6...RESET LD| 00000530: 58 20 23 24 30 30 00 41 0D E2 04 4A 4D 50 20 43 |X #$00.A...JMP C| 00000540: 49 00 64 0D EC 04 43 4F 4C 20 2E C6 20 22 54 48 |I.d...COL .. "TH| 00000550: 45 20 4A 4F 4B 45 52 20 4F 46 20 54 48 45 20 44 |E JOKER OF THE D| 00000560: 4F 43 20 22 00 72 0D F6 04 2E 42 59 54 45 20 32 |OC ".r....BYTE 2| 00000570: 35 35 00 00 00 |55... |
....... 9.4096./.....$C000 ; HER LAEGG
ES PRG..=....OPT N,OO.Z...LDX #$00 ; VA
RIABEL SET.H. .STX $8000.U.!.LDA #$C7...
".STA $8001...(.SEI...2.LDA #$7F...<.STA
$DC0D...F.LDA #$01.A.P.STA $D01A.Q.N.LD
X #.START...X.LDY #.START.....STX $0314.
....STY $0315.....LDA #$30.-. .STA $D012
; RASTER LINE UP.;...LDA $D011.F...
. #$7F.T...STA $D011.A.H.LDA #$01.O.R.ST
A $D019.W...CLI....RTS...,.START LDA $D
019...6.STA $D019...@.LDA #$07...A.NOP..
.B.NOP.F.C.NOP.N.D.NOP.V.E.NOP...J.STA $
D020...T.STA $D021...^.LDA $8001 ; V
ARIABEL 8001.".H.STA $D016.*.M.SEI.J.R.L
DA #$3A ; LOWER RASTER.X.X.STA $D012
.H...LDX #.SLUTT.X...LDY #.SLUTT.....STX
$0314.....STY $0315.....CLI.....JMP $EA
31.....SLUTT LDA $D019.L...STA $D019....
.LDA #$00 ; BACKGROUND COL.....NOP.
....NOP.....NOP.....NOP.....STA $D020.+.
..STA $D021.8.&.LDA #$C8.F.0.STA $D016.D
.:.SEI ; RASTER SET.Q.D.LDA #$3
0..N.STA $D012...X.LDX #.START...B.LDY
#.START...L.STX $0314...V.STY $0315.C...
CLI.Q...LDA $8001.....CMP #$C0.....BEQ M
OVE ; JMP MOVE CHARESTERS.....DEC $8
001.!...JMP $EA31.3...MOVE LDA #$C7.A...
STA $8001.N...LDY #$27.[.$.LDX #$01.M...
A LDA $0400,X.U.8.DEX...B.STA $0400,X...
L.INX...V.INX...`.DEY...J.BNE A...T.LDX
$8000.F.~.CI LDA COL,X.N...TAY.....CMP #
$FF.....BEQ RESET.....TYA.....STA $0427.
....INX...D.STX $8000.#.N.JMP $EA31.6.X.
RESET LDX #$00.A...JMP CI.D...COL .F "TH
E JOKER OF THE DOC ".R....BYTE 255...
> CLICK IMAGE PREVIEW FOR FULL MODAL