SCREENS.SRC
FILE INFORMATION
FILENAME(S): SCREENS.SRC
FILE TYPE(S): PRG
FILE SIZE: 1.6K
FIRST SEEN: 2025-11-30 01:13:10
APPEARS ON: 2 disk(s)
FILE HASH
293f1a5b662e72024e916cb531937f74088bd02174d9abafb71e850573ebe950
FOUND ON DISKS (2 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| 10907 SEITE A | SCREENS.SRC | PRG | C64er, DuncanTwain | 28 | 8 | DOWNLOAD FILE |
| 10907 SEITE A | SCREENS.SRC | PRG | earthshaker | 28 | 8 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 1E 08 0A 00 9F 31 2C 38 2C 32 2C 22 53 43 |.......1,8,2,"SC| 00000010: 52 45 45 4E 53 2E 50 41 43 2C 50 2C 57 22 00 3A |REENS.PAC,P,W".:| 00000020: 08 14 00 9E 39 AC 34 30 39 36 3A 2E 4F 50 54 20 |....9.4096:.OPT | 00000030: 4F 31 3A AC B2 24 38 30 30 30 00 72 08 1E 00 2E |O1:..$8000.r....| 00000040: C6 20 22 50 52 4F C3 20 4D 4F 44 45 2C 50 52 4F |. "PRO. MODE,PRO| 00000050: C3 20 43 4C 45 41 52 2C 50 52 4F C3 20 50 45 4E |. CLEAR,PRO. PEN| 00000060: 2C 50 52 4F C3 20 4C 4F 52 45 53 3A 50 52 4F C7 |,PRO. LORES:PRO.| 00000070: 3A 22 00 B4 08 28 00 43 4F 4C 30 20 B2 20 35 33 |:"...(.COL0 . 53| 00000080: 32 38 31 3A 43 4F 4C 31 20 B2 20 35 33 32 38 32 |281:COL1 . 53282| 00000090: 3A 43 4F 4C 32 20 B2 20 35 33 32 38 33 3A 43 4F |:COL2 . 53283:CO| 000000A0: 4C 33 20 B2 20 35 33 32 38 34 3A 5A 50 31 20 B2 |L3 . 53284:ZP1 .| 000000B0: 20 32 35 34 00 D5 08 32 00 4A 4D 50 20 4D 4F 44 | 254...2.JMP MOD| 000000C0: 3A 4A 4D 50 20 9C 3A 4A 4D 50 20 50 4E 3A 4A 4D |:JMP .:JMP PN:JM| 000000D0: 50 20 4C 52 53 00 F0 08 64 00 3B 20 AC AC AC AC |P LRS...d.; ....| 000000E0: AC AC AC AC AC AC AC AC AC AC AC AC AC AC AC AC |................| 000000F0: 00 09 09 65 00 3B 20 AC AC AC 20 4D 4F 44 45 20 |...e.; ... MODE | 00000100: 43 4F 4D 4D AF 20 AC AC AC 00 4D 09 69 00 4D 4F |COMM. ....M.i.MO| 00000110: 44 20 4A 53 52 20 24 42 37 39 45 3A 43 50 58 20 |D JSR $B79E:CPX | 00000120: 23 32 3A 42 43 53 20 45 52 52 B0 3A 54 58 41 3A |#2:BCS ERR.:TXA:| 00000130: 50 48 41 3A 4A 53 52 20 24 45 32 30 30 3A 43 50 |PHA:JSR $E200:CP| 00000140: 58 20 23 32 3A 42 43 53 20 45 52 52 B0 00 7A 09 |X #2:BCS ERR..z.| 00000150: 6E 00 50 4C 41 3A 53 54 41 20 35 36 35 37 36 3A |n.PLA:STA 56576:| 00000160: 54 58 41 3A 45 B0 20 23 31 3A B0 41 20 23 34 30 |TXA:E. #1:.A #40| 00000170: 3A 53 54 41 20 35 33 32 37 32 00 C0 09 73 00 54 |:STA 53272...s.T| 00000180: 58 41 3A 41 53 4C 20 41 3A 41 53 4C 20 41 3A 41 |XA:ASL A:ASL A:A| 00000190: 53 4C 20 41 3A 41 53 4C 20 41 3A B0 41 20 23 38 |SL A:ASL A:.A #8| 000001A0: 3A 53 54 41 20 35 33 32 37 30 3A 4C 44 41 20 23 |:STA 53270:LDA #| 000001B0: 35 39 3A 53 54 41 20 35 33 32 36 35 3A 52 54 53 |59:STA 53265:RTS| 000001C0: 00 DA 09 82 00 3B 20 AC AC AC AC AC AC AC AC AC |.....; .........| 000001D0: AC AC AC AC AC AC AC AC AC AC 00 F0 09 83 00 3B |...............;| 000001E0: 20 AC AC AC 20 D3 20 43 4F 4D 4D AF 20 AC AC AC | ... . COMM. ...| 000001F0: 00 3F 0A 87 00 50 4E 20 4A 53 52 20 24 42 37 39 |.?...PN JSR $B79| 00000200: 45 3A 43 50 58 20 23 34 3A 42 43 53 20 45 52 52 |E:CPX #4:BCS ERR| 00000210: B0 3A 54 58 41 3A 50 48 41 3A 4A 53 52 20 24 45 |.:TXA:PHA:JSR $E| 00000220: 32 30 30 3A 50 4C 41 3A 54 41 59 3A 54 58 41 3A |200:PLA:TAY:TXA:| 00000230: 53 54 41 20 35 33 32 38 31 2C 59 3A 52 54 53 00 |STA 53281,Y:RTS.| 00000240: 5E 0A 8C 00 3B 20 AC AC AC 20 49 4C 4C 45 47 41 |^...; ... ILLEGA| 00000250: 4C 20 51 55 41 4E 54 49 54 59 20 AC AC AC 00 79 |L QUANTITY ....y| 00000260: 0A 91 00 45 52 52 B0 20 4C 44 58 20 23 31 34 3A |...ERR. LDX #14:| 00000270: 4A 4D 50 20 24 41 34 33 41 00 95 0A 96 00 3B 20 |JMP $A43A.....; | 00000280: AC AC AC AC AC AC AC AC AC AC AC AC AC AC AC AC |................| 00000290: AC AC AC AC AC 00 AF 0A 97 00 3B 20 AC AC AC 20 |..........; ... | 000002A0: 43 4C 45 41 52 20 43 4F 4D 4D AF 20 AC AC AC 00 |CLEAR COMM. ....| 000002B0: D4 0A A0 00 9C 20 4C 44 41 20 35 36 35 37 36 3A |..... LDA 56576:| 000002C0: AF 20 23 33 3A 43 4D 50 20 23 32 3A 42 43 53 20 |. #3:CMP #2:BCS | 000002D0: 45 52 52 B0 00 F9 0A A1 00 4C 44 41 20 35 33 32 |ERR......LDA 532| 000002E0: 37 30 3A AF 20 23 31 36 3A 42 45 51 20 4C 31 36 |70:. #16:BEQ L16| 000002F0: 32 3A 4A 53 52 20 4D 43 9C 00 0B 0B A2 00 4C 31 |2:JSR MC......L1| 00000300: 36 32 20 4A 53 52 20 43 4F 4C 9C 00 26 0B C8 00 |62 JSR COL..&...| 00000310: 3B 20 AC AC AC 20 42 49 54 4D 41 50 20 43 4C 45 |; ... BITMAP CLE| 00000320: 41 52 20 AC AC AC 00 41 0B CD 00 3B 20 AC AC AC |AR ....A...; ...| 00000330: AC AC AC AC AC AC AC AC AC AC AC AC AC AC AC AC |................| 00000340: AC 00 81 0B D2 00 4C 44 41 20 35 36 35 37 36 3A |......LDA 56576:| 00000350: 45 B0 20 23 33 3A AF 20 23 33 3A 53 45 43 3A 52 |E. #3:. #3:SEC:R| 00000360: B0 3A 52 B0 3A 52 B0 3A 53 54 41 20 4C 32 34 30 |.:R.:R.:STA L240| 00000370: AA 32 3A 4C 44 41 20 23 30 3A 4C 44 58 20 23 33 |.2:LDA #0:LDX #3| 00000380: 32 00 9A 0B DC 00 3B 20 AC AC 20 58 20 50 41 47 |2.....; .. X PAG| 00000390: 45 53 20 AB B1 20 41 20 AC AC 00 AA 0B E6 00 46 |ES .. A .......F| 000003A0: 49 4C 4C 20 4C 44 59 20 23 30 00 E8 0B F0 00 4C |ILL LDY #0.....L| 000003B0: 32 34 30 20 53 54 41 20 24 30 30 30 30 2C 59 3A |240 STA $0000,Y:| 000003C0: 49 4E 59 3A 42 4E 45 20 4C 32 34 30 3A 49 4E 43 |INY:BNE L240:INC| 000003D0: 20 4C 32 34 30 AA 32 3A 44 45 58 3A 42 4E 45 20 | L240.2:DEX:BNE | 000003E0: 4C 32 34 30 3A 52 54 53 00 04 0C 2C 01 3B 20 AC |L240:RTS...,.; .| 000003F0: AC AC 20 46 41 52 42 52 41 4D 20 43 4C 45 41 52 |.. FARBRAM CLEAR| 00000400: 20 AC AC AC 00 20 0C 36 01 3B 20 AC AC AC AC AC | .... .6.; .....| 00000410: AC AC AC AC AC AC AC AC AC AC AC AC AC AC AC AC |................| 00000420: 00 4B 0C 4A 01 43 4F 4C 9C 20 4C 44 41 20 35 36 |.K.J.COL. LDA 56| 00000430: 35 37 36 3A AF 20 23 33 3A 45 B0 20 23 33 3A 43 |576:. #3:E. #3:C| 00000440: 4C 43 3A 52 B0 3A 52 B0 3A 52 B0 00 80 0C 54 01 |LC:R.:R.:R....T.| 00000450: B0 41 20 23 38 3A 53 54 41 20 4C 32 34 30 AA 32 |.A #8:STA L240.2| 00000460: 3A 4C 44 58 20 23 34 3A 4C 44 41 20 35 33 32 37 |:LDX #4:LDA 5327| 00000470: 30 3A AF 20 23 31 36 3A 42 4E 45 20 4C 33 34 34 |0:. #16:BNE L344| 00000480: 00 96 0C 56 01 4C 44 41 20 43 4F 4C 30 3A 4A 4D |...V.LDA COL0:JM| 00000490: 50 20 4C 33 34 38 00 AE 0C 58 01 4C 33 34 34 20 |P L348...X.L344 | 000004A0: 4C 44 41 20 43 4F 4C 32 3A AF 20 23 31 35 00 F6 |LDA COL2:. #15..| 000004B0: 0C 5C 01 4C 33 34 38 20 AF 20 23 31 35 3A 53 54 |.\.L348 . #15:ST| 000004C0: 41 20 56 41 52 3A 4C 44 41 20 43 4F 4C 31 3A 41 |A VAR:LDA COL1:A| 000004D0: 53 4C 20 41 3A 41 53 4C 20 41 3A 41 53 4C 20 41 |SL A:ASL A:ASL A| 000004E0: 3A 41 53 4C 20 41 3A B0 41 20 56 41 52 3A 4A 4D |:ASL A:.A VAR:JM| 000004F0: 50 20 46 49 4C 4C 00 16 0D 63 01 3B 20 AC AC AC |P FILL...c.; ...| 00000500: 20 46 41 52 42 52 41 4D 20 43 4C 45 41 52 20 24 | FARBRAM CLEAR $| 00000510: 44 38 20 AC AC AC 00 36 0D 64 01 3B 20 AC AC AC |D8 ....6.d.; ...| 00000520: AC AC AC AC AC AC AC AC AC AC AC AC AC AC AC AC |................| 00000530: AC AC AC AC AC AC 00 7E 0D 66 01 4D 43 9C 20 4C |.......~.f.MC. L| 00000540: 44 41 20 43 4F 4C 30 3A 53 54 41 20 35 33 32 38 |DA COL0:STA 5328| 00000550: 31 3A 4C 44 41 20 23 24 44 38 3A 53 54 41 20 4C |1:LDA #$D8:STA L| 00000560: 32 34 30 AA 32 3A 4C 44 41 20 43 4F 4C 33 3A 4C |240.2:LDA COL3:L| 00000570: 44 58 20 23 34 3A 42 4E 45 20 46 49 4C 4C 00 9A |DX #4:BNE FILL..| 00000580: 0D 16 03 3B 20 AC AC AC AC AC AC AC AC AC AC AC |...; ...........| 00000590: AC AC AC AC AC AC AC AC AC AC 00 B3 0D 17 03 3B |...............;| 000005A0: 20 AC AC AC 20 4C B0 45 53 20 43 4F 4D 4D AF 20 | ... L.ES COMM. | 000005B0: AC AC AC 00 CE 0D 34 03 4C 52 53 20 4C 44 41 20 |......4.LRS LDA | 000005C0: 23 24 46 46 3A 53 54 41 20 35 36 35 37 36 00 F3 |#$FF:STA 56576..| 000005D0: 0D 3E 03 4C 44 41 20 23 34 3A 53 54 41 20 36 34 |.>.LDA #4:STA 64| 000005E0: 38 3A 4C 44 41 20 23 32 31 3A 53 54 41 20 35 33 |8:LDA #21:STA 53| 000005F0: 32 37 32 00 16 0E 48 03 4C 44 41 20 35 33 32 36 |272...H.LDA 5326| 00000600: 35 3A AF 20 23 32 32 33 3A 53 54 41 20 35 33 32 |5:. #223:STA 532| 00000610: 36 35 3A 52 54 53 00 26 0E E8 03 56 41 52 20 2E |65:RTS.&...VAR .| 00000620: 42 59 54 45 20 30 00 30 0E FC 03 2E 80 3A A0 31 |BYTE 0.0.....:.1| 00000630: 00 00 00 00 00 |..... |
.......1,8,2,"SCREENS.PAC,P,W".:....9.40 96:.OPT O1:..$8000.R....F "PROC MODE,PRO C CLEAR,PROC PEN,PROC LORES:PROG:"...(.C OL0 . 53281:COL1 . 53282:COL2 . 53283:CO L3 . 53284:ZP1 . 254.U.2.JMP MOD:JMP .:J MP PN:JMP LRS...D.; .................... ...E.; ... MODE COMM. ....M.I.MOD JSR $B 79E:CPX #2:BCS ERR.:TXA:PHA:JSR $E200:CP X #2:BCS ERR..Z.N.PLA:STA 56576:TXA:E. # 1:.A #40:STA 53272...S.TXA:ASL A:ASL A:A SL A:ASL A:.A #8:STA 53270:LDA #59:STA 5 3265:RTS.Z...; ........................; ... S COMM. ....?...PN JSR $B79E:CPX #4 :BCS ERR.:TXA:PHA:JSR $E200:PLA:TAY:TXA: STA 53281,Y:RTS.^...; ... ILLEGAL QUANTI TY ....Y...ERR. LDX #14:JMP $A43A.....; ..........................; ... CLEAR CO MM. ....T. .. LDA 56576:. #3:CMP #2:BCS ERR......LDA 53270:. #16:BEQ L162:JSR MC ......L162 JSR COL..&.H.; ... BITMAP CLE AR ....A.M.; .......................R.LD A 56576:E. #3:. #3:SEC:R.:R.:R.:STA L240 .2:LDA #0:LDX #32.....; .. X PAGES .. A .......FILL LDY #0.....L240 STA $0000,Y: INY:BNE L240:INC L240.2:DEX:BNE L240:RTS ...,.; ... FARBRAM CLEAR .... .6.; ..... .................K.J.COL. LDA 56576:. #3 :E. #3:CLC:R.:R.:R....T..A #8:STA L240.2 :LDX #4:LDA 53270:. #16:BNE L344...V.LDA COL0:JMP L348...X.L344 LDA COL2:. #15.. .\.L348 . #15:STA VAR:LDA COL1:ASL A:ASL A:ASL A:ASL A:.A VAR:JMP FILL...C.; ... FARBRAM CLEAR $D8 ....6.D.; ........... ...............~.F.MC. LDA COL0:STA 5328 1:LDA #$D8:STA L240.2:LDA COL3:LDX #4:BN E FILL.....; ..........................; ... L.ES COMM. ....N.4.LRS LDA #$FF:STA 56576...>.LDA #4:STA 648:LDA #21:STA 53 272...H.LDA 53265:. #223:STA 53265:RTS.& ...VAR .BYTE 0.0.....: 1.....
> CLICK IMAGE PREVIEW FOR FULL MODAL