2020-07-03 02:57:52 +00:00
|
|
|
;
|
|
|
|
; scores.s
|
|
|
|
; BuGS
|
|
|
|
;
|
|
|
|
; Created by Jeremy Rand on 2020-07-02.
|
|
|
|
;Copyright © 2020 Jeremy Rand. All rights reserved.
|
|
|
|
;
|
|
|
|
|
|
|
|
case on
|
|
|
|
mcopy scores.macros
|
|
|
|
keep scores
|
|
|
|
|
|
|
|
scores start
|
2020-07-22 01:47:50 +00:00
|
|
|
using globalData
|
2020-07-03 02:57:52 +00:00
|
|
|
|
|
|
|
score300 entry
|
|
|
|
_spriteHeader
|
|
|
|
|
|
|
|
; $c - Green
|
|
|
|
; $4 - Red
|
|
|
|
; $8 - Off-white
|
|
|
|
;
|
|
|
|
; ....|....|....
|
|
|
|
; ....|....|....
|
|
|
|
; .OOO|.OOO|.OOO
|
|
|
|
; ...O|.O.O|.O.O
|
|
|
|
; .OOO|.O.O|.O.O
|
|
|
|
; ...O|.O.O|.O.O
|
|
|
|
; .OOO|.OOO|.OOO
|
|
|
|
; ....|....|....
|
|
|
|
;
|
|
|
|
tsc
|
2020-07-10 02:55:08 +00:00
|
|
|
adc #$0140
|
2020-07-03 02:57:52 +00:00
|
|
|
tcs
|
|
|
|
|
2020-07-10 02:55:08 +00:00
|
|
|
lda $0,s
|
2020-07-03 02:57:52 +00:00
|
|
|
; and #$00f0
|
|
|
|
ora #$8808
|
2020-07-10 02:55:08 +00:00
|
|
|
sta $0,s
|
2020-07-03 02:57:52 +00:00
|
|
|
|
2020-07-10 02:55:08 +00:00
|
|
|
lda $2,s
|
2020-07-03 02:57:52 +00:00
|
|
|
; and #$00f0
|
|
|
|
ora #$8808
|
2020-07-10 02:55:08 +00:00
|
|
|
sta $2,s
|
2020-07-03 02:57:52 +00:00
|
|
|
|
2020-07-10 02:55:08 +00:00
|
|
|
lda $4,s
|
2020-07-03 02:57:52 +00:00
|
|
|
; and #$00f0
|
|
|
|
ora #$8808
|
2020-07-10 02:55:08 +00:00
|
|
|
sta $4,s
|
2020-07-03 02:57:52 +00:00
|
|
|
|
2020-07-10 02:55:08 +00:00
|
|
|
lda $a0,s
|
2020-07-03 02:57:52 +00:00
|
|
|
; and #$f0ff
|
|
|
|
ora #$0800
|
2020-07-10 02:55:08 +00:00
|
|
|
sta $a0,s
|
2020-07-03 02:57:52 +00:00
|
|
|
|
2020-07-10 02:55:08 +00:00
|
|
|
lda $a2,s
|
2020-07-03 02:57:52 +00:00
|
|
|
; and #$f0f0
|
|
|
|
ora #$0808
|
2020-07-10 02:55:08 +00:00
|
|
|
sta $a2,s
|
2020-07-03 02:57:52 +00:00
|
|
|
|
2020-07-10 02:55:08 +00:00
|
|
|
lda $a4,s
|
2020-07-03 02:57:52 +00:00
|
|
|
; and #$f0f0
|
|
|
|
ora #$0808
|
2020-07-10 02:55:08 +00:00
|
|
|
sta $a4,s
|
2020-07-03 02:57:52 +00:00
|
|
|
|
|
|
|
tsc
|
|
|
|
adc #$0140
|
|
|
|
tcs
|
|
|
|
|
2020-07-10 02:55:08 +00:00
|
|
|
lda $0,s
|
2020-07-03 02:57:52 +00:00
|
|
|
; and #$00f0
|
|
|
|
ora #$8808
|
2020-07-10 02:55:08 +00:00
|
|
|
sta $0,s
|
2020-07-03 02:57:52 +00:00
|
|
|
|
2020-07-10 02:55:08 +00:00
|
|
|
lda $2,s
|
2020-07-03 02:57:52 +00:00
|
|
|
; and #$f0f0
|
|
|
|
ora #$0808
|
2020-07-10 02:55:08 +00:00
|
|
|
sta $2,s
|
2020-07-03 02:57:52 +00:00
|
|
|
|
2020-07-10 02:55:08 +00:00
|
|
|
lda $4,s
|
2020-07-03 02:57:52 +00:00
|
|
|
; and #$f0f0
|
|
|
|
ora #$0808
|
2020-07-10 02:55:08 +00:00
|
|
|
sta $4,s
|
2020-07-03 02:57:52 +00:00
|
|
|
|
2020-07-10 02:55:08 +00:00
|
|
|
lda $a0,s
|
2020-07-03 02:57:52 +00:00
|
|
|
; and #$f0ff
|
|
|
|
ora #$0800
|
2020-07-10 02:55:08 +00:00
|
|
|
sta $a0,s
|
2020-07-03 02:57:52 +00:00
|
|
|
|
2020-07-10 02:55:08 +00:00
|
|
|
lda $a2,s
|
2020-07-03 02:57:52 +00:00
|
|
|
; and #$f0f0
|
|
|
|
ora #$0808
|
2020-07-10 02:55:08 +00:00
|
|
|
sta $a2,s
|
2020-07-03 02:57:52 +00:00
|
|
|
|
2020-07-10 02:55:08 +00:00
|
|
|
lda $a4,s
|
2020-07-03 02:57:52 +00:00
|
|
|
; and #$f0f0
|
|
|
|
ora #$0808
|
2020-07-10 02:55:08 +00:00
|
|
|
sta $a4,s
|
2020-07-03 02:57:52 +00:00
|
|
|
|
|
|
|
tsc
|
|
|
|
adc #$0140
|
|
|
|
tcs
|
|
|
|
|
2020-07-10 02:55:08 +00:00
|
|
|
lda $0,s
|
2020-07-03 02:57:52 +00:00
|
|
|
; and #$00f0
|
|
|
|
ora #$8808
|
2020-07-10 02:55:08 +00:00
|
|
|
sta $0,s
|
2020-07-03 02:57:52 +00:00
|
|
|
|
2020-07-10 02:55:08 +00:00
|
|
|
lda $2,s
|
2020-07-03 02:57:52 +00:00
|
|
|
; and #$00f0
|
|
|
|
ora #$8808
|
2020-07-10 02:55:08 +00:00
|
|
|
sta $2,s
|
2020-07-03 02:57:52 +00:00
|
|
|
|
2020-07-10 02:55:08 +00:00
|
|
|
lda $4,s
|
2020-07-03 02:57:52 +00:00
|
|
|
; and #$00f0
|
|
|
|
ora #$8808
|
2020-07-10 02:55:08 +00:00
|
|
|
sta $4,s
|
2020-07-03 02:57:52 +00:00
|
|
|
|
|
|
|
_spriteFooter
|
|
|
|
rtl
|
|
|
|
|
|
|
|
|
|
|
|
score600 entry
|
|
|
|
_spriteHeader
|
|
|
|
|
|
|
|
; $c - Green
|
|
|
|
; $4 - Red
|
|
|
|
; $8 - Off-white
|
|
|
|
;
|
|
|
|
; ....|....|....
|
|
|
|
; ....|....|....
|
|
|
|
; .OOO|.OOO|.OOO
|
|
|
|
; .O..|.O.O|.O.O
|
|
|
|
; .OOO|.O.O|.O.O
|
|
|
|
; .O.O|.O.O|.O.O
|
|
|
|
; .OOO|.OOO|.OOO
|
|
|
|
; ....|....|....
|
|
|
|
;
|
|
|
|
|
|
|
|
tsc
|
2020-07-10 02:55:08 +00:00
|
|
|
adc #$0140
|
2020-07-03 02:57:52 +00:00
|
|
|
tcs
|
|
|
|
|
2020-07-10 02:55:08 +00:00
|
|
|
lda $0,s
|
2020-07-03 02:57:52 +00:00
|
|
|
; and #$00f0
|
|
|
|
ora #$8808
|
2020-07-10 02:55:08 +00:00
|
|
|
sta $0,s
|
2020-07-03 02:57:52 +00:00
|
|
|
|
2020-07-10 02:55:08 +00:00
|
|
|
lda $2,s
|
2020-07-03 02:57:52 +00:00
|
|
|
; and #$00f0
|
|
|
|
ora #$8808
|
2020-07-10 02:55:08 +00:00
|
|
|
sta $2,s
|
2020-07-03 02:57:52 +00:00
|
|
|
|
2020-07-10 02:55:08 +00:00
|
|
|
lda $4,s
|
2020-07-03 02:57:52 +00:00
|
|
|
; and #$00f0
|
|
|
|
ora #$8808
|
2020-07-10 02:55:08 +00:00
|
|
|
sta $4,s
|
2020-07-03 02:57:52 +00:00
|
|
|
|
2020-07-10 02:55:08 +00:00
|
|
|
lda $a0,s
|
2020-07-03 02:57:52 +00:00
|
|
|
; and #$fff0
|
|
|
|
ora #$0008
|
2020-07-10 02:55:08 +00:00
|
|
|
sta $a0,s
|
2020-07-03 02:57:52 +00:00
|
|
|
|
2020-07-10 02:55:08 +00:00
|
|
|
lda $a2,s
|
2020-07-03 02:57:52 +00:00
|
|
|
; and #$f0f0
|
|
|
|
ora #$0808
|
2020-07-10 02:55:08 +00:00
|
|
|
sta $a2,s
|
2020-07-03 02:57:52 +00:00
|
|
|
|
2020-07-10 02:55:08 +00:00
|
|
|
lda $a4,s
|
2020-07-03 02:57:52 +00:00
|
|
|
; and #$f0f0
|
|
|
|
ora #$0808
|
2020-07-10 02:55:08 +00:00
|
|
|
sta $a4,s
|
2020-07-03 02:57:52 +00:00
|
|
|
|
|
|
|
tsc
|
|
|
|
adc #$0140
|
|
|
|
tcs
|
|
|
|
|
2020-07-10 02:55:08 +00:00
|
|
|
lda $0,s
|
2020-07-03 02:57:52 +00:00
|
|
|
; and #$00f0
|
|
|
|
ora #$8808
|
2020-07-10 02:55:08 +00:00
|
|
|
sta $0,s
|
2020-07-03 02:57:52 +00:00
|
|
|
|
2020-07-10 02:55:08 +00:00
|
|
|
lda $2,s
|
2020-07-03 02:57:52 +00:00
|
|
|
; and #$f0f0
|
|
|
|
ora #$0808
|
2020-07-10 02:55:08 +00:00
|
|
|
sta $2,s
|
2020-07-03 02:57:52 +00:00
|
|
|
|
2020-07-10 02:55:08 +00:00
|
|
|
lda $4,s
|
2020-07-03 02:57:52 +00:00
|
|
|
; and #$f0f0
|
|
|
|
ora #$0808
|
2020-07-10 02:55:08 +00:00
|
|
|
sta $4,s
|
2020-07-03 02:57:52 +00:00
|
|
|
|
2020-07-10 02:55:08 +00:00
|
|
|
lda $a0,s
|
2020-07-03 02:57:52 +00:00
|
|
|
; and #$f0f0
|
|
|
|
ora #$0808
|
2020-07-10 02:55:08 +00:00
|
|
|
sta $a0,s
|
2020-07-03 02:57:52 +00:00
|
|
|
|
2020-07-10 02:55:08 +00:00
|
|
|
lda $a2,s
|
2020-07-03 02:57:52 +00:00
|
|
|
; and #$f0f0
|
|
|
|
ora #$0808
|
2020-07-10 02:55:08 +00:00
|
|
|
sta $a2,s
|
2020-07-03 02:57:52 +00:00
|
|
|
|
2020-07-10 02:55:08 +00:00
|
|
|
lda $a4,s
|
2020-07-03 02:57:52 +00:00
|
|
|
; and #$f0f0
|
|
|
|
ora #$0808
|
2020-07-10 02:55:08 +00:00
|
|
|
sta $a4,s
|
2020-07-03 02:57:52 +00:00
|
|
|
|
|
|
|
tsc
|
|
|
|
adc #$0140
|
|
|
|
tcs
|
|
|
|
|
2020-07-10 02:55:08 +00:00
|
|
|
lda $0,s
|
2020-07-03 02:57:52 +00:00
|
|
|
; and #$00f0
|
|
|
|
ora #$8808
|
2020-07-10 02:55:08 +00:00
|
|
|
sta $0,s
|
2020-07-03 02:57:52 +00:00
|
|
|
|
2020-07-10 02:55:08 +00:00
|
|
|
lda $2,s
|
2020-07-03 02:57:52 +00:00
|
|
|
; and #$00f0
|
|
|
|
ora #$8808
|
2020-07-10 02:55:08 +00:00
|
|
|
sta $2,s
|
2020-07-03 02:57:52 +00:00
|
|
|
|
2020-07-10 02:55:08 +00:00
|
|
|
lda $4,s
|
2020-07-03 02:57:52 +00:00
|
|
|
; and #$00f0
|
|
|
|
ora #$8808
|
2020-07-10 02:55:08 +00:00
|
|
|
sta $4,s
|
2020-07-03 02:57:52 +00:00
|
|
|
|
|
|
|
_spriteFooter
|
|
|
|
rtl
|
|
|
|
|
|
|
|
|
|
|
|
score900 entry
|
|
|
|
_spriteHeader
|
|
|
|
|
|
|
|
; $c - Green
|
|
|
|
; $4 - Red
|
|
|
|
; $8 - Off-white
|
|
|
|
;
|
|
|
|
; ....|....|....
|
|
|
|
; ....|....|....
|
|
|
|
; .OOO|.OOO|.OOO
|
|
|
|
; .O.O|.O.O|.O.O
|
|
|
|
; .OOO|.O.O|.O.O
|
|
|
|
; ...O|.O.O|.O.O
|
|
|
|
; .OOO|.OOO|.OOO
|
|
|
|
; ....|....|....
|
|
|
|
;
|
|
|
|
|
|
|
|
tsc
|
2020-07-10 02:55:08 +00:00
|
|
|
adc #$0140
|
2020-07-03 02:57:52 +00:00
|
|
|
tcs
|
|
|
|
|
2020-07-10 02:55:08 +00:00
|
|
|
lda $0,s
|
2020-07-03 02:57:52 +00:00
|
|
|
; and #$00f0
|
|
|
|
ora #$8808
|
2020-07-10 02:55:08 +00:00
|
|
|
sta $0,s
|
2020-07-03 02:57:52 +00:00
|
|
|
|
2020-07-10 02:55:08 +00:00
|
|
|
lda $2,s
|
2020-07-03 02:57:52 +00:00
|
|
|
; and #$00f0
|
|
|
|
ora #$8808
|
2020-07-10 02:55:08 +00:00
|
|
|
sta $2,s
|
2020-07-03 02:57:52 +00:00
|
|
|
|
2020-07-10 02:55:08 +00:00
|
|
|
lda $4,s
|
2020-07-03 02:57:52 +00:00
|
|
|
; and #$00f0
|
|
|
|
ora #$8808
|
2020-07-10 02:55:08 +00:00
|
|
|
sta $4,s
|
2020-07-03 02:57:52 +00:00
|
|
|
|
2020-07-10 02:55:08 +00:00
|
|
|
lda $a0,s
|
2020-07-03 02:57:52 +00:00
|
|
|
; and #$f0f0
|
|
|
|
ora #$0808
|
2020-07-10 02:55:08 +00:00
|
|
|
sta $a0,s
|
2020-07-03 02:57:52 +00:00
|
|
|
|
2020-07-10 02:55:08 +00:00
|
|
|
lda $a2,s
|
2020-07-03 02:57:52 +00:00
|
|
|
; and #$f0f0
|
|
|
|
ora #$0808
|
2020-07-10 02:55:08 +00:00
|
|
|
sta $a2,s
|
2020-07-03 02:57:52 +00:00
|
|
|
|
2020-07-10 02:55:08 +00:00
|
|
|
lda $a4,s
|
2020-07-03 02:57:52 +00:00
|
|
|
; and #$f0f0
|
|
|
|
ora #$0808
|
2020-07-10 02:55:08 +00:00
|
|
|
sta $a4,s
|
2020-07-03 02:57:52 +00:00
|
|
|
|
|
|
|
tsc
|
|
|
|
adc #$0140
|
|
|
|
tcs
|
|
|
|
|
2020-07-10 02:55:08 +00:00
|
|
|
lda $0,s
|
2020-07-03 02:57:52 +00:00
|
|
|
; and #$00f0
|
|
|
|
ora #$8808
|
2020-07-10 02:55:08 +00:00
|
|
|
sta $0,s
|
2020-07-03 02:57:52 +00:00
|
|
|
|
2020-07-10 02:55:08 +00:00
|
|
|
lda $2,s
|
2020-07-03 02:57:52 +00:00
|
|
|
; and #$f0f0
|
|
|
|
ora #$0808
|
2020-07-10 02:55:08 +00:00
|
|
|
sta $2,s
|
2020-07-03 02:57:52 +00:00
|
|
|
|
2020-07-10 02:55:08 +00:00
|
|
|
lda $4,s
|
2020-07-03 02:57:52 +00:00
|
|
|
; and #$f0f0
|
|
|
|
ora #$0808
|
2020-07-10 02:55:08 +00:00
|
|
|
sta $4,s
|
2020-07-03 02:57:52 +00:00
|
|
|
|
2020-07-10 02:55:08 +00:00
|
|
|
lda $a0,s
|
2020-07-03 02:57:52 +00:00
|
|
|
; and #$f0ff
|
|
|
|
ora #$0800
|
2020-07-10 02:55:08 +00:00
|
|
|
sta $a0,s
|
2020-07-03 02:57:52 +00:00
|
|
|
|
2020-07-10 02:55:08 +00:00
|
|
|
lda $a2,s
|
2020-07-03 02:57:52 +00:00
|
|
|
; and #$f0f0
|
|
|
|
ora #$0808
|
2020-07-10 02:55:08 +00:00
|
|
|
sta $a2,s
|
2020-07-03 02:57:52 +00:00
|
|
|
|
2020-07-10 02:55:08 +00:00
|
|
|
lda $a4,s
|
2020-07-03 02:57:52 +00:00
|
|
|
; and #$f0f0
|
|
|
|
ora #$0808
|
2020-07-10 02:55:08 +00:00
|
|
|
sta $a4,s
|
2020-07-03 02:57:52 +00:00
|
|
|
|
|
|
|
tsc
|
|
|
|
adc #$0140
|
|
|
|
tcs
|
|
|
|
|
2020-07-10 02:55:08 +00:00
|
|
|
lda $0,s
|
2020-07-03 02:57:52 +00:00
|
|
|
; and #$00f0
|
|
|
|
ora #$8808
|
2020-07-10 02:55:08 +00:00
|
|
|
sta $0,s
|
2020-07-03 02:57:52 +00:00
|
|
|
|
2020-07-10 02:55:08 +00:00
|
|
|
lda $2,s
|
2020-07-03 02:57:52 +00:00
|
|
|
; and #$00f0
|
|
|
|
ora #$8808
|
2020-07-10 02:55:08 +00:00
|
|
|
sta $2,s
|
2020-07-03 02:57:52 +00:00
|
|
|
|
2020-07-10 02:55:08 +00:00
|
|
|
lda $4,s
|
2020-07-03 02:57:52 +00:00
|
|
|
; and #$00f0
|
|
|
|
ora #$8808
|
2020-07-10 02:55:08 +00:00
|
|
|
sta $4,s
|
2020-07-03 02:57:52 +00:00
|
|
|
|
|
|
|
_spriteFooter
|
|
|
|
rtl
|
|
|
|
|
|
|
|
end
|