set kernel DPC+
goto __Bank_2 bank2
asm
minikernel
stx COLUBK ; x is always 0 at this point
rts
end
bank 2
temp1=temp1
__Bank_2
playfield:
XXXXXXXX................XXXXXXXX
XXXXXXXX................XXXXXXXX
XXXXXXXX................XXXXXXXX
XXXXXXXX................XXXXXXXX
XXXXXXXX................XXXXXXXX
XXXXXXXX................XXXXXXXX
XXXXXXXX................XXXXXXXX
XXXXXXXX................XXXXXXXX
XXXXXXXX................XXXXXXXX
XXXXXXXX................XXXXXXXX
XXXXXXXX................XXXXXXXX
XXXXXXXX................XXXXXXXX
XXXXXXXX................XXXXXXXX
XXXXXXXX................XXXXXXXX
XXXXXXXX................XXXXXXXX
XXXXXXXX................XXXXXXXX
XXXXXXXX................XXXXXXXX
XXXXXXXX................XXXXXXXX
XXXXXXXX................XXXXXXXX
XXXXXXXX................XXXXXXXX
XXXXXXXX................XXXXXXXX
XXXXXXXX................XXXXXXXX
XXXXXXXX................XXXXXXXX
XXXXXXXX................XXXXXXXX
XXXXXXXX................XXXXXXXX
XXXXXXXX................XXXXXXXX
XXXXXXXX................XXXXXXXX
XXXXXXXX................XXXXXXXX
XXXXXXXX................XXXXXXXX
XXXXXXXX................XXXXXXXX
XXXXXXXX................XXXXXXXX
XXXXXXXX................XXXXXXXX
XXXXXXXX................XXXXXXXX
XXXXXXXX................XXXXXXXX
XXXXXXXX................XXXXXXXX
XXXXXXXX................XXXXXXXX
XXXXXXXX................XXXXXXXX
XXXXXXXX................XXXXXXXX
XXXXXXXX................XXXXXXXX
XXXXXXXX................XXXXXXXX
XXXXXXXX................XXXXXXXX
XXXXXXXX................XXXXXXXX
XXXXXXXX................XXXXXXXX
XXXXXXXX................XXXXXXXX
XXXXXXXX................XXXXXXXX
XXXXXXXX................XXXXXXXX
XXXXXXXX................XXXXXXXX
XXXXXXXX................XXXXXXXX
XXXXXXXX................XXXXXXXX
XXXXXXXX................XXXXXXXX
XXXXXXXX................XXXXXXXX
XXXXXXXX................XXXXXXXX
XXXXXXXX................XXXXXXXX
XXXXXXXX................XXXXXXXX
XXXXXXXX................XXXXXXXX
XXXXXXXX................XXXXXXXX
XXXXXXXX................XXXXXXXX
XXXXXXXX................XXXXXXXX
XXXXXXXX................XXXXXXXX
XXXXXXXX................XXXXXXXX
XXXXXXXX................XXXXXXXX
XXXXXXXX................XXXXXXXX
XXXXXXXX................XXXXXXXX
XXXXXXXX................XXXXXXXX
XXXXXXXX................XXXXXXXX
XXXXXXXX................XXXXXXXX
XXXXXXXX................XXXXXXXX
XXXXXXXX................XXXXXXXX
XXXXXXXX................XXXXXXXX
XXXXXXXX................XXXXXXXX
XXXXXXXX................XXXXXXXX
XXXXXXXX................XXXXXXXX
XXXXXXXX................XXXXXXXX
XXXXXXXX................XXXXXXXX
XXXXXXXX................XXXXXXXX
XXXXXXXX................XXXXXXXX
XXXXXXXX................XXXXXXXX
XXXXXXXX................XXXXXXXX
XXXXXXXX................XXXXXXXX
XXXXXXXX................XXXXXXXX
XXXXXXXX................XXXXXXXX
XXXXXXXX................XXXXXXXX
XXXXXXXX................XXXXXXXX
XXXXXXXX................XXXXXXXX
XXXXXXXX................XXXXXXXX
XXXXXXXX................XXXXXXXX
XXXXXXXX................XXXXXXXX
XXXXXXXX................XXXXXXXX
end
pfcolors:
$0E
$0C
$0A
$08
$06
$1E
$1C
$1A
$18
$16
$2E
$2C
$2A
$28
$26
$3E
$3C
$3A
$38
$36
$4E
$4C
$4A
$48
$46
$5E
$5C
$5A
$58
$56
$6E
$6C
$6A
$68
$66
$7E
$7C
$7A
$78
$76
$9E
$9C
$9A
$98
$96
$AE
$AC
$AA
$A8
$A6
$BE
$BC
$BA
$B8
$B6
$CE
$CC
$CA
$C8
$C6
$DE
$DC
$DA
$D8
$D6
$EE
$EC
$EA
$E8
$E6
$3E
$3C
$3A
$38
$36
$4E
$4C
$4A
$48
$46
$5E
$5C
$5A
$58
$56
$6E
$6C
$6A
$68
$66
$0E
$0C
$0A
$08
$06
$1E
$1C
$1A
$18
$16
$2E
$2C
$2A
$28
$26
$3E
$3C
$3A
$38
$36
$4E
$4C
$4A
$48
$46
$5E
$5C
$5A
$58
$56
$6E
$6C
$6A
$68
$66
$7E
$7C
$7A
$78
$76
$9E
$9C
$9A
$98
$96
$AE
$AC
$AA
$A8
$A6
$BE
$BC
$BA
$B8
$B6
$CE
$CC
$CA
$C8
$C6
$DE
$DC
$DA
$D8
$D6
$EE
$EC
$EA
$E8
$E6
$3E
$3C
$3A
$38
$36
$4E
$4C
$4A
$48
$46
$5E
$5C
$5A
$58
$56
$6E
$6C
$6A
$68
$66
$0E
$0C
$0A
$08
$06
$1E
$1C
$1A
$18
$16
$2E
$2C
$2A
$28
$26
$3E
$3C
$3A
$38
$36
$4E
$4C
$4A
$48
$46
$5E
$5C
$5A
$58
$56
$6E
$6C
$6A
$68
$66
$7E
$7C
$7A
$78
$76
$9E
$9C
$9A
$98
$96
$0E
$0C
$0A
$08
$06
$1E
$1C
$1A
$18
$16
$2E
$2C
$2A
$28
$26
$3E
$3C
$3A
$38
$36
$4E
$4C
$4A
$48
$46
$5E
$5C
$5A
$58
$56
end
pfscroll 255 4 4
pfcolors:
$54
end
bkcolors:
$02
$02
$02
$02
$02
$04
$04
$04
$02
$02
$02
$02
$02
$04
$04
$04
$02
$02
$02
$02
$02
$04
$04
$04
$02
$02
$02
$02
$02
$04
$04
$04
$02
$02
$02
$02
$02
$04
$04
$04
$02
$02
$02
$02
$02
$04
$04
$04
$02
$02
$02
$02
$02
$04
$04
$04
$02
$02
$02
$02
$02
$04
$04
$04
$02
$02
$02
$02
$02
$04
$04
$04
$02
$02
$02
$02
$02
$04
$04
$04
$02
$02
$02
$02
$02
$04
$04
$04
$02
$02
$02
$02
$02
$04
$04
$04
$02
$02
$02
$02
$02
$04
$04
$04
$02
$02
$02
$02
$02
$04
$04
$04
$02
$02
$02
$02
$02
$04
$04
$04
$02
$02
$02
$02
$02
$04
$04
$04
$02
$02
$02
$02
$02
$04
$04
$04
$02
$02
$02
$02
$02
$04
$04
$04
$02
$02
$02
$02
$02
$04
$04
$04
$02
$02
$02
$02
$02
$04
$04
$04
$02
$02
$02
$02
$02
$04
$04
$04
$02
$02
$02
$02
$02
$04
$04
$04
$02
$02
$02
$02
$02
$04
$04
$04
$02
$02
$02
$02
$02
$04
$04
$04
$02
$02
$02
$02
$02
$04
$04
$04
$02
$02
$02
$02
$02
$04
$04
$04
$02
$02
$02
$02
$02
$04
$04
$04
$02
$02
$02
$02
$02
$04
$04
$04
$02
$02
$02
$02
$02
$04
$04
$04
$02
$02
$02
$02
$02
$04
$04
$04
$02
$02
$02
$02
$02
$04
$04
$04
$02
$02
$02
$02
$02
$04
$04
end
pfscroll 255 6 6
bkcolors:
$04
end
scorecolors:
$3E
$3C
$3A
$38
$36
$36
$34
$32
end
;***************************************************************
;***************************************************************
;
; Main Loop
;
__Main_Loop
DF6FRACINC = 255
DF4FRACINC = 255
DF0FRACINC = 128
DF1FRACINC = 128
DF2FRACINC = 128
DF3FRACINC = 128
pfscroll 255 4 4
b = b + 1
if b = 2 then b = 0 : pfscroll 255 6 6
drawscreen
goto __Main_Loop