2020-07-03 02:57:52 +00:00
|
|
|
;
|
|
|
|
; explosions.s
|
|
|
|
; BuGS
|
|
|
|
;
|
|
|
|
; Created by Jeremy Rand on 2020-07-02.
|
|
|
|
;Copyright © 2020 Jeremy Rand. All rights reserved.
|
|
|
|
;
|
|
|
|
|
|
|
|
case on
|
|
|
|
mcopy explosions.macros
|
|
|
|
keep explosions
|
|
|
|
|
|
|
|
explosions start
|
2020-07-22 01:47:50 +00:00
|
|
|
using globalData
|
2020-07-03 02:57:52 +00:00
|
|
|
|
|
|
|
explosion1 entry
|
|
|
|
_spriteHeader
|
|
|
|
|
|
|
|
; $c - Green
|
|
|
|
; $4 - Red
|
|
|
|
; $8 - Off-white
|
|
|
|
;
|
|
|
|
; ..RR|.R..
|
|
|
|
; .OGR|G...
|
|
|
|
; .GGG|GGR.
|
|
|
|
; RGGG|GGO.
|
|
|
|
; RGG.|GGG.
|
|
|
|
; OGGG|GGOG
|
|
|
|
; .OGG|RGO.
|
|
|
|
; .ROR|.R.G
|
|
|
|
;
|
|
|
|
|
2020-07-10 02:55:08 +00:00
|
|
|
lda $0,s
|
2020-07-03 02:57:52 +00:00
|
|
|
and #$00ff
|
|
|
|
ora #$4400
|
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 #$fff0
|
|
|
|
ora #$0004
|
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 $a0,s
|
2020-07-03 02:57:52 +00:00
|
|
|
and #$00f0
|
|
|
|
ora #$c408
|
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 #$ff0f not necessary with pure green
|
|
|
|
ora #$00c0
|
2020-07-10 02:55:08 +00:00
|
|
|
sta $a2,s
|
2020-07-03 02:57:52 +00:00
|
|
|
|
|
|
|
tsc
|
|
|
|
adc #$140
|
|
|
|
tcs
|
|
|
|
|
2020-07-10 02:55:08 +00:00
|
|
|
lda $0,s
|
2020-07-03 02:57:52 +00:00
|
|
|
; and #$ff0f not necessary with pure green
|
|
|
|
ora #$cc0c
|
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 #$0f00
|
|
|
|
ora #$40cc
|
2020-07-10 02:55:08 +00:00
|
|
|
sta $2,s
|
2020-07-03 02:57:52 +00:00
|
|
|
|
|
|
|
|
|
|
|
lda #$cc4c
|
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 #$0f00
|
|
|
|
ora #$80cc
|
2020-07-10 02:55:08 +00:00
|
|
|
sta $a2,s
|
2020-07-03 02:57:52 +00:00
|
|
|
|
|
|
|
tsc
|
|
|
|
adc #$140
|
|
|
|
tcs
|
|
|
|
|
2020-07-10 02:55:08 +00:00
|
|
|
lda $0,s
|
2020-07-03 02:57:52 +00:00
|
|
|
and #$0f00
|
|
|
|
ora #$c04c
|
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 #$fff0 not necessary with pure green
|
|
|
|
ora #$c0cc
|
2020-07-10 02:55:08 +00:00
|
|
|
sta $2,s
|
2020-07-03 02:57:52 +00:00
|
|
|
|
|
|
|
lda #$cc8c
|
2020-07-10 02:55:08 +00:00
|
|
|
sta $a0,s
|
2020-07-03 02:57:52 +00:00
|
|
|
|
|
|
|
lda #$8ccc
|
2020-07-10 02:55:08 +00:00
|
|
|
sta $a0,s
|
2020-07-03 02:57:52 +00:00
|
|
|
|
|
|
|
tsc
|
|
|
|
adc #$140
|
|
|
|
tcs
|
|
|
|
|
2020-07-10 02:55:08 +00:00
|
|
|
lda $0,s
|
2020-07-03 02:57:52 +00:00
|
|
|
and #$00f0
|
|
|
|
ora #$cc08
|
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 #$0f00
|
|
|
|
ora #$804c
|
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 $a0,s
|
2020-07-03 02:57:52 +00:00
|
|
|
and #$00f0
|
|
|
|
ora #$8404
|
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 #$0c04
|
2020-07-10 02:55:08 +00:00
|
|
|
sta $a2,s
|
2020-07-03 02:57:52 +00:00
|
|
|
|
|
|
|
_spriteFooter
|
|
|
|
rtl
|
|
|
|
|
|
|
|
|
|
|
|
explosion2 entry
|
|
|
|
_spriteHeader
|
|
|
|
|
|
|
|
; $c - Green
|
|
|
|
; $4 - Red
|
|
|
|
; $8 - Off-white
|
|
|
|
;
|
|
|
|
; ..GR|G.R.
|
|
|
|
; .GGG|GGRG
|
|
|
|
; OGGG|GGGO
|
|
|
|
; OGGO|OGGG
|
|
|
|
; OGGO|OGGO
|
|
|
|
; OGGG|GGGG
|
|
|
|
; OGGR|GGGO
|
|
|
|
; .G.R|.G..
|
|
|
|
;
|
|
|
|
|
2020-07-10 02:55:08 +00:00
|
|
|
lda $0,s
|
2020-07-03 02:57:52 +00:00
|
|
|
and #$00ff
|
|
|
|
ora #$c400
|
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 #$0f0f
|
|
|
|
ora #$40c0
|
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 $a0,s
|
2020-07-03 02:57:52 +00:00
|
|
|
; and #$00f0 not necessary with pure green
|
|
|
|
ora #$cc0c
|
2020-07-10 02:55:08 +00:00
|
|
|
sta $a0,s
|
2020-07-03 02:57:52 +00:00
|
|
|
|
|
|
|
lda #$4ccc
|
2020-07-10 02:55:08 +00:00
|
|
|
sta $a2,s
|
2020-07-03 02:57:52 +00:00
|
|
|
|
|
|
|
tsc
|
2020-07-10 02:55:08 +00:00
|
|
|
adc #$143
|
2020-07-03 02:57:52 +00:00
|
|
|
tcs
|
|
|
|
|
|
|
|
pea $c8cc
|
|
|
|
pea $cc8c
|
|
|
|
|
|
|
|
adc #$a0
|
|
|
|
tcs
|
|
|
|
|
|
|
|
pea $cc8c
|
|
|
|
pea $c88c
|
|
|
|
|
|
|
|
adc #$a0
|
|
|
|
tcs
|
|
|
|
|
|
|
|
pea $c88c
|
|
|
|
pea $c88c
|
|
|
|
|
|
|
|
adc #$a0
|
|
|
|
tcs
|
|
|
|
|
|
|
|
pea $cccc
|
|
|
|
pea $cc8c
|
|
|
|
|
|
|
|
adc #$a0
|
|
|
|
tcs
|
|
|
|
|
|
|
|
pea $c8cc
|
|
|
|
pea $c48c
|
|
|
|
|
|
|
|
lda $a1,s
|
|
|
|
and #$f0f0
|
|
|
|
ora #$040c
|
|
|
|
sta $a1,s
|
|
|
|
|
|
|
|
lda $a3,s
|
|
|
|
; and #$f0f0 not necessary for pure green
|
|
|
|
ora #$000c
|
|
|
|
sta $a3,s
|
|
|
|
|
|
|
|
_spriteFooter
|
|
|
|
rtl
|
|
|
|
|
|
|
|
|
|
|
|
explosion3 entry
|
|
|
|
_spriteHeader
|
|
|
|
|
|
|
|
; $c - Green
|
|
|
|
; $4 - Red
|
|
|
|
; $8 - Off-white
|
|
|
|
;
|
|
|
|
; .GOG|RG..
|
|
|
|
; G.GG|GGGR
|
|
|
|
; GGGO|GOG.
|
|
|
|
; RGO.|.GGG
|
|
|
|
; GG..|.G..
|
|
|
|
; GRRG|RGGG
|
|
|
|
; RGGG|GGG.
|
|
|
|
; .OG.|.G.O
|
|
|
|
|
2020-07-10 02:55:08 +00:00
|
|
|
lda $0,s
|
2020-07-03 02:57:52 +00:00
|
|
|
and #$00f0
|
|
|
|
ora #$8c0c
|
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 #$ff00
|
|
|
|
ora #$004c
|
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 $a0,s
|
2020-07-03 02:57:52 +00:00
|
|
|
; and #$000f not necessary with pure green
|
|
|
|
ora #$ccc0
|
2020-07-10 02:55:08 +00:00
|
|
|
sta $a0,s
|
2020-07-03 02:57:52 +00:00
|
|
|
|
|
|
|
lda #$c4cc
|
2020-07-10 02:55:08 +00:00
|
|
|
sta $a2,s
|
2020-07-03 02:57:52 +00:00
|
|
|
|
|
|
|
tsc
|
|
|
|
adc #$140
|
|
|
|
tcs
|
|
|
|
|
|
|
|
lda #$c8cc
|
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 #$0f00
|
|
|
|
ora #$c0c8
|
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 $a0,s
|
2020-07-03 02:57:52 +00:00
|
|
|
and #$0f00
|
|
|
|
ora #$804c
|
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 #$00f0 not necessary with pure green
|
|
|
|
ora #$cc0c
|
2020-07-10 02:55:08 +00:00
|
|
|
sta $a2,s
|
2020-07-03 02:57:52 +00:00
|
|
|
|
|
|
|
tsc
|
|
|
|
adc #$140
|
|
|
|
tcs
|
|
|
|
|
2020-07-10 02:55:08 +00:00
|
|
|
lda $0,s
|
2020-07-03 02:57:52 +00:00
|
|
|
; and #$ff00 not necessary with pure green
|
|
|
|
ora #$00cc
|
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 #$fff0 not necessary with pure green
|
|
|
|
ora #$000c
|
2020-07-10 02:55:08 +00:00
|
|
|
sta $2,s
|
2020-07-03 02:57:52 +00:00
|
|
|
|
|
|
|
lda #$4cc4
|
2020-07-10 02:55:08 +00:00
|
|
|
sta $a0,s
|
2020-07-03 02:57:52 +00:00
|
|
|
|
|
|
|
lda #$cc4c
|
2020-07-10 02:55:08 +00:00
|
|
|
sta $a2,s
|
2020-07-03 02:57:52 +00:00
|
|
|
|
|
|
|
tsc
|
|
|
|
adc #$140
|
|
|
|
tcs
|
|
|
|
|
|
|
|
lda #$cc4c
|
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 #$0f00 not necessary with pure green
|
|
|
|
ora #$c0cc
|
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 $a0,s
|
2020-07-03 02:57:52 +00:00
|
|
|
and #$0ff0
|
|
|
|
ora #$c008
|
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 #$080c
|
2020-07-10 02:55:08 +00:00
|
|
|
sta $a2,s
|
2020-07-03 02:57:52 +00:00
|
|
|
|
|
|
|
_spriteFooter
|
|
|
|
rtl
|
|
|
|
|
|
|
|
|
|
|
|
explosion4 entry
|
|
|
|
_spriteHeader
|
|
|
|
|
|
|
|
; $c - Green
|
|
|
|
; $4 - Red
|
|
|
|
; $8 - Off-white
|
|
|
|
;
|
|
|
|
; G.GO|.R.G
|
|
|
|
; .O.G|G.G.
|
|
|
|
; RG.R|.O.R
|
|
|
|
; G.R.|..G.
|
|
|
|
; GG..|...O
|
|
|
|
; .R.R|.RGO
|
|
|
|
; O.R.|R.GR
|
|
|
|
; RG.G|GGO.
|
|
|
|
;
|
|
|
|
|
2020-07-10 02:55:08 +00:00
|
|
|
lda $0,s
|
2020-07-03 02:57:52 +00:00
|
|
|
and #$000f
|
|
|
|
ora #$c8c0
|
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 #$0c04
|
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 $a0,s
|
2020-07-03 02:57:52 +00:00
|
|
|
and #$f0f0
|
|
|
|
ora #$0c08
|
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 #$0f0f not necessary with pure green
|
|
|
|
ora #$c0c0
|
2020-07-10 02:55:08 +00:00
|
|
|
sta $a2,s
|
2020-07-03 02:57:52 +00:00
|
|
|
|
|
|
|
tsc
|
|
|
|
adc #$140
|
|
|
|
tcs
|
|
|
|
|
2020-07-10 02:55:08 +00:00
|
|
|
lda $0,s
|
2020-07-03 02:57:52 +00:00
|
|
|
and #$f000
|
|
|
|
ora #$044c
|
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 #$0408
|
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 $a0,s
|
2020-07-03 02:57:52 +00:00
|
|
|
and #$0f0f
|
|
|
|
ora #$40c0
|
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 #$0fff not necessary with pure green
|
|
|
|
ora #$c000
|
2020-07-10 02:55:08 +00:00
|
|
|
sta $a2,s
|
2020-07-03 02:57:52 +00:00
|
|
|
|
|
|
|
tsc
|
|
|
|
adc #$140
|
|
|
|
tcs
|
|
|
|
|
2020-07-10 02:55:08 +00:00
|
|
|
lda $0,s
|
2020-07-03 02:57:52 +00:00
|
|
|
; and #$ff00 not necessary with pure green
|
|
|
|
ora #$00cc
|
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 #$f0ff
|
|
|
|
ora #$0800
|
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 $a0,s
|
2020-07-03 02:57:52 +00:00
|
|
|
and #$f0f0
|
|
|
|
ora #$0404
|
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 #$00f0
|
|
|
|
ora #$c804
|
2020-07-10 02:55:08 +00:00
|
|
|
sta $a2,s
|
2020-07-03 02:57:52 +00:00
|
|
|
|
|
|
|
tsc
|
|
|
|
adc #$140
|
|
|
|
tcs
|
|
|
|
|
2020-07-10 02:55:08 +00:00
|
|
|
lda $0,s
|
2020-07-03 02:57:52 +00:00
|
|
|
and #$0f0f
|
|
|
|
ora #$4080
|
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 #$000f
|
|
|
|
ora #$c440
|
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 $a0,s
|
2020-07-03 02:57:52 +00:00
|
|
|
and #$f000
|
|
|
|
ora #$0c4c
|
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 #$0f00
|
|
|
|
ora #$80cc
|
2020-07-10 02:55:08 +00:00
|
|
|
sta $a2,s
|
2020-07-03 02:57:52 +00:00
|
|
|
|
|
|
|
_spriteFooter
|
|
|
|
rtl
|
|
|
|
|
|
|
|
|
|
|
|
explosion5 entry
|
|
|
|
_spriteHeader
|
|
|
|
|
|
|
|
; $c - Green
|
|
|
|
; $4 - Red
|
|
|
|
; $8 - Off-white
|
|
|
|
;
|
|
|
|
; .G..|G.G.
|
|
|
|
; .ROG|.RG.
|
|
|
|
; GO..|G..O
|
|
|
|
; .R..|..R.
|
|
|
|
; G.R.|.R.R
|
|
|
|
; .O.G|.GO.
|
|
|
|
; RGR.|..G.
|
|
|
|
; .G.G|OR..
|
|
|
|
;
|
|
|
|
|
2020-07-10 02:55:08 +00:00
|
|
|
lda $0,s
|
2020-07-03 02:57:52 +00:00
|
|
|
; and #$000f not necessary with pure green
|
|
|
|
ora #$000c
|
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 not necessary with pure green
|
|
|
|
ora #$c0c0
|
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 $a0,s
|
2020-07-03 02:57:52 +00:00
|
|
|
and #$00f0
|
|
|
|
ora #$8c04
|
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 #$0ff0
|
|
|
|
ora #$c004
|
2020-07-10 02:55:08 +00:00
|
|
|
sta $a2,s
|
2020-07-03 02:57:52 +00:00
|
|
|
|
|
|
|
tsc
|
|
|
|
adc #$140
|
|
|
|
tcs
|
|
|
|
|
2020-07-10 02:55:08 +00:00
|
|
|
lda $0,s
|
2020-07-03 02:57:52 +00:00
|
|
|
and #$ff00
|
|
|
|
ora #$00c8
|
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 #$f00f
|
|
|
|
ora #$08c0
|
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 $a0,s
|
2020-07-03 02:57:52 +00:00
|
|
|
and #$fff0
|
|
|
|
ora #$0004
|
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 #$0fff
|
|
|
|
ora #$4000
|
2020-07-10 02:55:08 +00:00
|
|
|
sta $a2,s
|
2020-07-03 02:57:52 +00:00
|
|
|
|
|
|
|
tsc
|
|
|
|
adc #$140
|
|
|
|
tcs
|
|
|
|
|
2020-07-10 02:55:08 +00:00
|
|
|
lda $0,s
|
2020-07-03 02:57:52 +00:00
|
|
|
and #$0f0f
|
|
|
|
ora #$40c0
|
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 #$0404
|
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 $a0,s
|
2020-07-03 02:57:52 +00:00
|
|
|
and #$f0f0
|
|
|
|
ora #$0c08
|
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 #$0ff0
|
|
|
|
ora #$800c
|
2020-07-10 02:55:08 +00:00
|
|
|
sta $a2,s
|
2020-07-03 02:57:52 +00:00
|
|
|
|
|
|
|
tsc
|
|
|
|
adc #$140
|
|
|
|
tcs
|
|
|
|
|
2020-07-10 02:55:08 +00:00
|
|
|
lda $0,s
|
2020-07-03 02:57:52 +00:00
|
|
|
and #$0f00
|
|
|
|
ora #$404c
|
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 #$0fff not necessary with pure green
|
|
|
|
ora #$c000
|
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 $a0,s
|
2020-07-03 02:57:52 +00:00
|
|
|
; and #$f0f0 not necessary with pure green
|
|
|
|
ora #$0c0c
|
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 #$ff00
|
|
|
|
ora #$0084
|
2020-07-10 02:55:08 +00:00
|
|
|
sta $a2,s
|
2020-07-03 02:57:52 +00:00
|
|
|
|
|
|
|
_spriteFooter
|
|
|
|
rtl
|
|
|
|
|
|
|
|
|
|
|
|
explosion6 entry
|
|
|
|
_spriteHeader
|
|
|
|
|
|
|
|
; $c - Green
|
|
|
|
; $4 - Red
|
|
|
|
; $8 - Off-white
|
|
|
|
;
|
|
|
|
; .O.G|..G.
|
|
|
|
; R.G.|OR.R
|
|
|
|
; ....|....
|
|
|
|
; G...|..G.
|
|
|
|
; .O..|...G
|
|
|
|
; .O..|..O.
|
|
|
|
; R.G.|...G
|
|
|
|
; .O.O|R.R.
|
|
|
|
;
|
|
|
|
|
2020-07-10 02:55:08 +00:00
|
|
|
lda $0,s
|
2020-07-03 02:57:52 +00:00
|
|
|
and #$f0f0
|
|
|
|
ora #$0c08
|
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 #$0fff not necessary with pure green
|
|
|
|
ora #$c000
|
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 $a0,s
|
2020-07-03 02:57:52 +00:00
|
|
|
and #$0f0f
|
|
|
|
ora #$c040
|
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 #$f000
|
|
|
|
ora #$0484
|
2020-07-10 02:55:08 +00:00
|
|
|
sta $a2,s
|
2020-07-03 02:57:52 +00:00
|
|
|
|
|
|
|
tsc
|
|
|
|
adc #$140
|
|
|
|
tcs
|
|
|
|
|
2020-07-10 02:55:08 +00:00
|
|
|
lda $a0,s
|
2020-07-03 02:57:52 +00:00
|
|
|
; and #$ff0f not necessary with pure green
|
|
|
|
ora #$00c0
|
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 #$0fff not necessary with pure green
|
|
|
|
ora #$c000
|
2020-07-10 02:55:08 +00:00
|
|
|
sta $a2,s
|
2020-07-03 02:57:52 +00:00
|
|
|
|
|
|
|
tsc
|
|
|
|
adc #$140
|
|
|
|
tcs
|
|
|
|
|
2020-07-10 02:55:08 +00:00
|
|
|
lda $0,s
|
2020-07-03 02:57:52 +00:00
|
|
|
and #$fff0
|
|
|
|
ora #$0008
|
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 #$f0ff not necessary with pure green
|
|
|
|
ora #$0c00
|
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 $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 #$0fff
|
|
|
|
ora #$8000
|
2020-07-10 02:55:08 +00:00
|
|
|
sta $a2,s
|
2020-07-03 02:57:52 +00:00
|
|
|
|
|
|
|
tsc
|
|
|
|
adc #$140
|
|
|
|
tcs
|
|
|
|
|
2020-07-10 02:55:08 +00:00
|
|
|
lda $0,s
|
2020-07-03 02:57:52 +00:00
|
|
|
and #$0f0f
|
|
|
|
ora #$c040
|
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 #$f0ff not necessary with pure green
|
|
|
|
ora #$0c00
|
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 $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 #$0f0f
|
|
|
|
ora #$4040
|
2020-07-10 02:55:08 +00:00
|
|
|
sta $a2,s
|
2020-07-03 02:57:52 +00:00
|
|
|
|
|
|
|
_spriteFooter
|
|
|
|
rtl
|
|
|
|
|
|
|
|
end
|