BAR2
FILE INFORMATION
FILENAME(S): BAR2
FILE TYPE(S): PRG
FILE SIZE: 833b
FIRST SEEN: 2025-12-01 01:09:41
APPEARS ON: 1 disk(s)
FILE HASH
590743c96028197f775da2e5b535b84439d0b9c2694943f60e488eeb3b12d9dd
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| SCARABEE | BAR2 | PRG | hedning, Martin L0fgren | 17 | 7 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 0E 08 5A 00 9E 20 34 30 39 36 AC 39 00 2F |....Z.. 4096.9./| 00000010: 08 64 00 AC B2 24 43 30 30 30 20 20 20 3B 20 48 |.d...$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 96 00 2E 4F 50 54 20 4E 2C 4F 4F 00 62 08 |=....OPT N,OO.b.| 00000040: C8 00 53 45 49 20 20 20 20 20 20 20 3B 20 53 45 |..SEI ; SE| 00000050: 54 20 B5 45 52 55 50 2E 20 53 50 41 45 52 52 49 |T .ERUP. SPAERRI| 00000060: 4E 47 00 6F 08 FA 00 4C 44 41 20 23 24 37 46 00 |NG.o...LDA #$7F.| 00000070: 7D 08 2C 01 53 54 41 20 24 44 43 30 44 00 8A 08 |}.,.STA $DC0D...| 00000080: 5E 01 4C 44 41 20 23 24 30 31 00 AD 08 90 01 53 |^.LDA #$01.....S| 00000090: 54 41 20 24 44 30 31 41 20 20 20 20 20 20 20 3B |TA $D01A ;| 000000A0: 20 54 55 52 4E 20 91 20 52 41 BF 54 2E 00 CE 08 | TURN . RA.T....| 000000B0: C2 01 4C 44 58 20 23 B3 53 54 41 52 54 20 20 20 |..LDX #.START | 000000C0: 20 20 3B 20 53 45 54 20 50 4F B5 45 52 53 00 DE | ; SET PO.ERS..| 000000D0: 08 F4 01 4C 44 59 20 23 B1 53 54 41 52 54 00 EC |...LDY #.START..| 000000E0: 08 26 02 53 54 58 20 24 30 33 31 34 00 FA 08 58 |.&.STX $0314...X| 000000F0: 02 53 54 59 20 24 30 33 31 35 00 1F 09 8A 02 4C |.STY $0315.....L| 00000100: 44 41 20 23 24 31 42 20 20 20 20 3B 20 52 41 53 |DA #$1B ; RAS| 00000110: 54 45 52 20 4C 49 4E 49 45 20 53 54 41 52 54 00 |TER LINIE START.| 00000120: 2D 09 BC 02 53 54 41 20 24 44 30 31 32 00 3B 09 |-...STA $D012.;.| 00000130: EE 02 4C 44 41 20 24 44 30 31 31 00 5F 09 20 03 |..LDA $D011._. .| 00000140: AF 20 23 24 37 46 20 20 20 20 3B 20 30 56 45 52 |. #$7F ; 0VER| 00000150: 53 54 20 48 41 4C 56 44 2E AB B0 41 20 37 46 00 |ST HALVD...A 7F.| 00000160: 6D 09 52 03 53 54 41 20 24 44 30 31 31 00 7A 09 |m.R.STA $D011.z.| 00000170: 84 03 4C 44 41 20 23 24 30 31 00 88 09 B6 03 53 |..LDA #$01.....S| 00000180: 54 41 20 24 44 30 31 39 00 A6 09 E8 03 43 4C 49 |TA $D019.....CLI| 00000190: 20 20 20 20 20 20 20 20 20 3B 20 9C 20 53 50 41 | ; . SPA| 000001A0: 45 52 52 49 4E 47 00 AE 09 1A 04 52 54 53 00 D4 |ERRING.....RTS..| 000001B0: 09 4C 04 53 54 41 52 54 20 4C 44 41 20 24 44 30 |.L.START LDA $D0| 000001C0: 31 39 3B 20 44 45 54 54 45 20 53 4B 41 4C 20 47 |19; DETTE SKAL G| 000001D0: 30 52 45 53 00 E2 09 56 04 53 54 41 20 24 44 30 |0RES...V.STA $D0| 000001E0: 31 39 00 EF 09 60 04 4C 44 41 20 23 24 30 36 00 |19...`.LDA #$06.| 000001F0: FC 09 61 04 4C 44 59 20 23 24 30 32 00 06 0A 62 |..a.LDY #$02...b| 00000200: 04 51 20 44 45 59 00 10 0A 63 04 42 4E 45 20 51 |.Q DEY...c.BNE Q| 00000210: 00 18 0A 64 04 4E 4F 50 00 20 0A 65 04 4E 4F 50 |...d.NOP. .e.NOP| 00000220: 00 2E 0A 74 04 53 54 41 20 24 44 30 32 30 00 3C |...t.STA $D020.<| 00000230: 0A 7E 04 53 54 41 20 24 44 30 32 31 00 49 0A 87 |.~.STA $D021.I..| 00000240: 04 4C 44 58 20 23 24 31 32 00 5F 0A 88 04 41 47 |.LDX #$12._...AG| 00000250: 41 49 4E 20 4C 44 41 20 46 41 52 56 45 2C 58 00 |AIN LDA FARVE,X.| 00000260: 6C 0A 89 04 4C 44 59 20 23 24 30 37 00 76 0A 8A |l...LDY #$07.v..| 00000270: 04 50 20 44 45 59 00 80 0A 8B 04 42 4E 45 20 50 |.P DEY.....BNE P| 00000280: 00 88 0A 8D 04 4E 4F 50 00 90 0A 8E 04 4E 4F 50 |.....NOP.....NOP| 00000290: 00 98 0A 8F 04 4E 4F 50 00 A0 0A 90 04 4E 4F 50 |.....NOP.....NOP| 000002A0: 00 AE 0A 9C 04 53 54 41 20 24 44 30 32 30 00 BC |.....STA $D020..| 000002B0: 0A A6 04 53 54 41 20 24 44 30 32 31 00 C4 0A B0 |...STA $D021....| 000002C0: 04 44 45 58 00 D2 0A C4 04 42 45 51 20 52 45 53 |.DEX.....BEQ RES| 000002D0: 45 54 00 E0 0A CE 04 4A 4D 50 20 41 47 41 49 4E |ET.....JMP AGAIN| 000002E0: 00 F4 0A D8 04 52 45 53 45 54 20 4A 4D 50 20 24 |.....RESET JMP $| 000002F0: 45 41 33 31 00 2A 0B 14 05 46 41 52 56 45 20 2E |EA31.*...FARVE .| 00000300: 42 59 54 45 20 30 2C 30 2C 36 2C 36 2C 31 34 2C |BYTE 0,0,6,6,14,| 00000310: 36 2C 31 34 2C 31 34 2C 31 2C 31 34 2C 31 2C 31 |6,14,14,1,14,1,1| 00000320: 2C 31 2C 31 34 2C 31 2C 31 34 00 3E 0B 1E 05 2E |,1,14,1,14.>....| 00000330: 42 59 54 45 20 31 34 2C 36 2C 31 34 2C 36 00 00 |BYTE 14,6,14,6..| 00000340: 00 |. |
....Z.. 4096.9./.D...$C000 ; HER LAEGG
ES PRG..=....OPT N,OO.B.H.SEI ; SE
T .ERUP. SPAERRING.O...LDA #$7F.}.,.STA
$DC0D...^.LDA #$01.....STA $D01A ;
TURN . RA.T..N.B.LDX #.START ; SET
PO.ERS.....LDY #.START...&.STX $0314...X
.STY $0315.....LDA #$1B ; RASTER LINI
E START.-...STA $D012.;...LDA $D011._. .
. #$7F ; 0VERST HALVD...A 7F.M.R.STA
$D011.Z...LDA #$01.....STA $D019.....CLI
; . SPAERRING.....RTS.T.L.START
LDA $D019; DETTE SKAL G0RES...V.STA $D0
19...`.LDA #$06...A.LDY #$02...B.Q DEY..
.C.BNE Q...D.NOP. .E.NOP...T.STA $D020.<
.~.STA $D021.I...LDX #$12._...AGAIN LDA
FARVE,X.L...LDY #$07.V...P DEY.....BNE P
.....NOP.....NOP.....NOP. ...NOP.....STA
$D020.....STA $D021.D...DEX.R.D.BEQ RES
ET...N.JMP AGAIN...X.RESET JMP $EA31.*..
.FARVE .BYTE 0,0,6,6,14,6,14,14,1,14,1,1
,1,14,1,14.>....BYTE 14,6,14,6...
> CLICK IMAGE PREVIEW FOR FULL MODAL