From bc91429e3a90e5f16af79e9d1fc770fabb6e1873 Mon Sep 17 00:00:00 2001 From: Jeremy Rand Date: Thu, 9 Jul 2020 00:27:32 -0400 Subject: [PATCH] Finish the centipede segment sprites. --- BuGS/game.s | 54 ++ BuGS/sprites/segments.s | 1849 ++++++++++++++++++++++++++++++++++++++- 2 files changed, 1902 insertions(+), 1 deletion(-) diff --git a/BuGS/game.s b/BuGS/game.s index c25b440..75be80e 100644 --- a/BuGS/game.s +++ b/BuGS/game.s @@ -444,6 +444,60 @@ game start ldx #$708b jsl leftDownHead2s + ldx #$7093 + jsl leftDownBody1 + + ldx #$709b + jsl leftDownBody1s + + ldx #$7a03 + jsl leftDownBody2 + + ldx #$7a0b + jsl leftDownBody2s + + ldx #$7a13 + jsl rightDownHead1 + + ldx #$7a1b + jsl rightDownHead1s + + ldx #$7a23 + jsl rightDownHead2 + + ldx #$7a2b + jsl rightDownHead2s + + ldx #$7a33 + jsl rightDownBody1 + + ldx #$7a3b + jsl rightDownBody1s + + ldx #$7a43 + jsl rightDownBody2 + + ldx #$7a4b + jsl rightDownBody2s + + ldx #$7a53 + jsl downHead1 + + ldx #$7a5b + jsl downHead2 + + ldx #$7a63 + jsl downHead3 + + ldx #$7a6b + jsl downBody1 + + ldx #$7a73 + jsl downBody2 + + ldx #$7a7b + jsl downBody3 + jsl waitForKey rtl diff --git a/BuGS/sprites/segments.s b/BuGS/sprites/segments.s index 8866655..f975275 100644 --- a/BuGS/sprites/segments.s +++ b/BuGS/sprites/segments.s @@ -1864,7 +1864,1854 @@ leftDownHead2s entry _spriteFooter rtl - + +leftDownBody1 entry + dex + dex + dex + dex + _spriteHeader + +; $c - Green +; $4 - Red +; $8 - Off-white +; +; ....|.... +; O.GG|G... +; .GGG|GG.. +; GGGG|GGG. +; GGGG|GGG. +; GGGG|GGG. +; .GGG|GG.. +; ..GG|G.O. + + lda $a1,s + and #$000f + ora #$cc80 + sta $a1,s + + lda $a3,s +; and #$ff0f not necessary with pure green + ora #$00c0 + sta $a3,s + + tsc + adc #$140 + tcs + + lda $1,s +; and #$00f0 not necessary with pure green + ora #$cc0c + sta $1,s + + lda $3,s +; and #$ff00 not necessary with pure green + ora #$00cc + sta $3,s + + lda #$cccc + sta $a1,s + + lda $a3,s +; and #$0f00 not necessary with pure green + ora #$c0cc + sta $a3,s + + tsc + adc #$142 + tcs + + pea $cccc + + lda $3,s +; and #$0f00 not necessary with pure green + ora #$c0cc + sta $3,s + + lda #$cccc + sta $a1,s + + lda $a3,s +; and #$0f00 not necessary with pure green + ora #$c0cc + sta $a3,s + + tsc + adc #$140 + tcs + + lda $1,s +; and #$00f0 not necessary with pure green + ora #$cc0c + sta $1,s + + lda $3,s +; and #$ff00 not necessary with pure green + ora #$00cc + sta $3,s + + lda $a1,s +; and #$00ff not necessary with pure green + ora #$cc00 + sta $a1,s + + lda $a3,s + and #$0f0f + ora #$80c0 + sta $a3,s + + _spriteFooter + rtl + + +leftDownBody1s entry + dex + dex + dex + dex + _spriteHeader + +; $c - Green +; $4 - Red +; $8 - Off-white +; +; ....|.... +; .O.G|GG.. +; ..GG|GGG. +; .GGG|GGGG +; .GGG|GGGG +; .GGG|GGGG +; ..GG|GGG. +; ...G|GG.O + + lda $a1,s + and #$f0f0 + ora #$0c08 + sta $a1,s + + lda $a3,s +; and #$ff00 not necessary with pure green + ora #$00cc + sta $a3,s + + tsc + adc #$140 + tcs + + lda $1,s +; and #$00ff not necessary with pure green + ora #$cc00 + sta $1,s + + lda $3,s +; and #$0f00 not necessary with pure green + ora #$c0cc + sta $3,s + + lda $a1,s +; and #$00f0 not necessary with pure green + ora #$cc0c + sta $a1,s + + lda #$cccc + sta $a3,s + + tsc + adc #$140 + tcs + + lda $1,s +; and #$00f0 not necessary with pure green + ora #$cc0c + sta $1,s + + lda #$cccc + sta $3,s + + lda $a1,s +; and #$00f0 not necessary with pure green + ora #$cc0c + sta $a1,s + + lda #$cccc + sta $a3,s + + tsc + adc #$140 + tcs + + lda $1,s +; and #$00ff not necessary with pure green + ora #$cc00 + sta $1,s + + lda $3,s +; and #$0f00 not necessary with pure green + ora #$c0cc + sta $3,s + + lda $a1,s +; and #$f0ff not necessary with pure green + ora #$0c00 + sta $a1,s + + lda $a3,s + and #$f000 + ora #$08cc + sta $a3,s + + _spriteFooter + rtl + + +leftDownBody2 entry + dex + dex + dex + dex + _spriteHeader + +; $c - Green +; $4 - Red +; $8 - Off-white +; +; .O..|.... +; ..GG|G... +; .GGG|GG.. +; GGGG|GGG. +; GGGG|GGG. +; GGGG|GGG. +; .GGG|GG.O +; ..GG|G... + + lda $1,s + and #$fff0 + ora #$0008 + sta $1,s + + lda $a1,s +; and #$00ff not necessary with pure green + ora #$cc00 + sta $a1,s + + lda $a3,s +; and #$ff0f not necessary with pure green + ora #$00c0 + sta $a3,s + + tsc + adc #$140 + tcs + + lda $1,s +; and #$00f0 not necessary with pure green + ora #$cc0c + sta $1,s + + lda $3,s +; and #$ff00 not necessary with pure green + ora #$00cc + sta $3,s + + lda #$cccc + sta $a1,s + + lda $a3,s +; and #$0f00 not necessary with pure green + ora #$c0cc + sta $a3,s + + tsc + adc #$142 + tcs + + pea $cccc + + lda $3,s +; and #$0f00 not necessary with pure green + ora #$c0cc + sta $3,s + + lda #$cccc + sta $a1,s + + lda $a3,s +; and #$0f00 not necessary with pure green + ora #$c0cc + sta $a3,s + + tsc + adc #$140 + tcs + + lda $1,s +; and #$00f0 not necessary with pure green + ora #$cc0c + sta $1,s + + lda $3,s + and #$f000 + ora #$08cc + sta $3,s + + lda $a1,s +; and #$00ff not necessary with pure green + ora #$cc00 + sta $a1,s + + lda $a3,s +; and #$ff0f not necessary with pure green + ora #$00c0 + sta $a3,s + + _spriteFooter + rtl + + +leftDownBody2s entry + dex + dex + dex + dex + _spriteHeader + +; $c - Green +; $4 - Red +; $8 - Off-white +; +; ..O.|.... +; ...G|GG.. +; ..GG|GGG. +; .GGG|GGGG +; .GGG|GGGG +; .GGG|GGGG +; ..GG|GGG.|O... +; ...G|GG.. + + lda $1,s + and #$0fff + ora #$8000 + sta $1,s + + lda $a1,s + and #$f0ff + ora #$0c00 + sta $a1,s + + lda $a3,s +; and #$ff00 not necessary with pure green + ora #$00cc + sta $a3,s + + tsc + adc #$140 + tcs + + lda $1,s +; and #$00ff not necessary with pure green + ora #$cc00 + sta $1,s + + lda $3,s +; and #$0f00 not necessary with pure green + ora #$c0cc + sta $3,s + + lda $a1,s +; and #$00f0 not necessary with pure green + ora #$cc0c + sta $a1,s + + lda #$cccc + sta $a3,s + + tsc + adc #$140 + tcs + + lda $1,s +; and #$00f0 not necessary with pure green + ora #$cc0c + sta $1,s + + lda #$cccc + sta $3,s + + lda $a1,s +; and #$00f0 not necessary with pure green + ora #$cc0c + sta $a1,s + + lda #$cccc + sta $a3,s + + tsc + adc #$140 + tcs + + lda $1,s +; and #$00ff not necessary with pure green + ora #$cc00 + sta $1,s + + lda $3,s +; and #$0f00 not necessary with pure green + ora #$c0cc + sta $3,s + + lda $5,s + and #$ff0f + ora #$0080 + sta $5,s + + lda $a1,s +; and #$f0ff not necessary with pure green + ora #$0c00 + sta $a1,s + + lda $a3,s +; and #$ff00 not necessary with pure green + ora #$00cc + sta $a3,s + + _spriteFooter + rtl + + +rightDownHead1 entry + dex + dex + dex + dex + _spriteHeader + +; $c - Green +; $4 - Red +; $8 - Off-white +; +; ....|.... +; ..GG|G.O. +; .GGG|GG.. +; GGGG|GGG. +; GGGG|GRR. +; GGGG|GRR. +; .GGR|RG.. +; O.GR|R... + + lda $a1,s +; and #$00ff not necessary with pure green + ora #$cc00 + sta $a1,s + + lda $a3,s + and #$0f0f + ora #$80c0 + sta $a3,s + + tsc + adc #$140 + tcs + + lda $1,s +; and #$00f0 not necessary with pure green + ora #$cc0c + sta $1,s + + lda $3,s +; and #$ff00 not necessary with pure green + ora #$00cc + sta $3,s + + lda #$cccc + sta $a1,s + + lda $a3,s +; and #$0f00 not necessary with pure green + ora #$c0cc + sta $a3,s + + tsc + adc #$142 + tcs + + pea $cccc + + lda $3,s + and #$0f00 + ora #$40c4 + sta $3,s + + lda #$cccc + sta $a1,s + + lda $a3,s + and #$0f00 + ora #$40c4 + sta $a3,s + + tsc + adc #$140 + tcs + + lda $1,s + and #$00f0 + ora #$c40c + sta $1,s + + lda $3,s + and #$ff00 + ora #$004c + sta $3,s + + lda $a1,s + and #$000f + ora #$c480 + sta $a1,s + + lda $a3,s + and #$ff0f + ora #$0040 + sta $a3,s + + _spriteFooter + rtl + + +rightDownHead1s entry + dex + dex + dex + dex + _spriteHeader + +; $c - Green +; $4 - Red +; $8 - Off-white +; +; ....|.... +; ...G|GG.O +; ..GG|GGG. +; .GGG|GGGG +; .GGG|GGRR +; .GGG|GGRR +; ..GG|RRG. +; .O.G|RR.. + + lda $a1,s +; and #$f0ff not necessary with pure green + ora #$0c00 + sta $a1,s + + lda $a3,s + and #$f000 + ora #$08cc + sta $a3,s + + tsc + adc #$140 + tcs + + lda $1,s +; and #$00ff not necessary with pure green + ora #$cc00 + sta $1,s + + lda $3,s +; and #$0f00 not necessary with pure green + ora #$c0cc + sta $3,s + + lda $a1,s +; and #$00f0 not necessary with pure green + ora #$cc0c + sta $a1,s + + lda #$cccc + sta $a3,s + + tsc + adc #$140 + tcs + + lda $1,s +; and #$00f0 not necessary with pure green + ora #$cc0c + sta $1,s + + lda #$44cc + sta $3,s + + lda $a1,s +; and #$00f0 not necessary with pure green + ora #$cc0c + sta $a1,s + + lda #$44cc + sta $a3,s + + tsc + adc #$140 + tcs + + lda $1,s +; and #$00ff not necessary with pure green + ora #$cc00 + sta $1,s + + lda $3,s + and #$0f00 + ora #$c044 + sta $3,s + + lda $a1,s + and #$f0f0 + ora #$0c08 + sta $a1,s + + lda $a3,s + and #$ff00 + ora #$0044 + sta $a3,s + + _spriteFooter + rtl + + +rightDownHead2 entry + dex + dex + dex + dex + _spriteHeader + +; $c - Green +; $4 - Red +; $8 - Off-white +; +; ....|....|.O.. +; ....|..GG|G... +; ....|.GGG|GG.. +; ....|GGGG|GGG. +; ....|GGGG|GRR. +; ....|GGGG|GRR. +; ...O|.GGR|RG.. +; ....|..GR|R... + + lda $3,s + and #$fff0 + ora #$0008 + sta $3,s + + lda $a1,s +; and #$00ff not necessary with pure green + ora #$cc00 + sta $a1,s + + lda $a3,s +; and #$ff0f not necessary with pure green + ora #$00c0 + sta $a3,s + + tsc + adc #$140 + tcs + + lda $1,s +; and #$00f0 not necessary with pure green + ora #$cc0c + sta $1,s + + lda $3,s +; and #$ff00 not necessary with pure green + ora #$00cc + sta $3,s + + lda #$cccc + sta $a1,s + + lda $a3,s +; and #$0f00 not necessary with pure green + ora #$c0cc + sta $a3,s + + tsc + adc #$142 + tcs + + pea $cccc + + lda $3,s + and #$0f00 + ora #$40c4 + sta $3,s + + lda #$cccc + sta $a1,s + + lda $a3,s + and #$0f00 + ora #$40c4 + sta $a3,s + + tsc + adc #$13e + tcs + + lda $1,s + and #$f0ff + ora #$0800 + sta $1,s + + lda $3,s + and #$00f0 + ora #$c40c + sta $3,s + + lda $5,s + and #$ff00 + ora #$004c + sta $5,s + + lda $a3,s + and #$00ff + ora #$c400 + sta $a3,s + + lda $a5,s + and #$ff0f + ora #$0040 + sta $a5,s + + _spriteFooter + rtl + + +rightDownHead2s entry + dex + dex + dex + dex + _spriteHeader + +; $c - Green +; $4 - Red +; $8 - Off-white +; +; ....|..O. +; ...G|GG.. +; ..GG|GGG. +; .GGG|GGGG +; .GGG|GGRR +; .GGG|GGRR +; O.GG|RRG. +; ...G|RR.. + + lda $3,s + and #$0fff + ora #$8000 + sta $3,s + + lda $a1,s +; and #$f0ff not necessary with pure green + ora #$0c00 + sta $a1,s + + lda $a3,s +; and #$ff00 not necessary with pure green + ora #$00cc + sta $a3,s + + tsc + adc #$140 + tcs + + lda $1,s +; and #$00ff not necessary with pure green + ora #$cc00 + sta $1,s + + lda $3,s +; and #$0f00 not necessary with pure green + ora #$c0cc + sta $3,s + + lda $a1,s +; and #$00f0 not necessary with pure green + ora #$cc0c + sta $a1,s + + lda #$cccc + sta $a3,s + + tsc + adc #$140 + tcs + + lda $1,s +; and #$00f0 not necessary with pure green + ora #$cc0c + sta $1,s + + lda #$44cc + sta $3,s + + lda $a1,s +; and #$00f0 not necessary with pure green + ora #$cc0c + sta $a1,s + + lda #$44cc + sta $a3,s + + tsc + adc #$140 + tcs + + lda $1,s + and #$000f + ora #$cc80 + sta $1,s + + lda $3,s + and #$0f00 + ora #$c044 + sta $3,s + + lda $a1,s +; and #$f0ff not necessary with pure green + ora #$0c00 + sta $a1,s + + lda $a3,s + and #$ff00 + ora #$0044 + sta $a3,s + + _spriteFooter + rtl + + +rightDownBody1 entry + dex + dex + dex + dex + _spriteHeader + +; $c - Green +; $4 - Red +; $8 - Off-white +; +; ....|.... +; ..GG|G.O. +; .GGG|GG.. +; GGGG|GGG. +; GGGG|GGG. +; GGGG|GGG. +; .GGG|GG.. +; O.GG|G... + + lda $a1,s +; and #$00ff not necessary with pure green + ora #$cc00 + sta $a1,s + + lda $a3,s + and #$0f0f + ora #$80c0 + sta $a3,s + + tsc + adc #$140 + tcs + + lda $1,s +; and #$00f0 not necessary with pure green + ora #$cc0c + sta $1,s + + lda $3,s +; and #$ff00 not necessary with pure green + ora #$00cc + sta $3,s + + lda #$cccc + sta $a1,s + + lda $a3,s +; and #$0f00 not necessary with pure green + ora #$c0cc + sta $a3,s + + tsc + adc #$142 + tcs + + pea $cccc + + lda $3,s +; and #$0f00 not necessary with pure green + ora #$c0cc + sta $3,s + + lda #$cccc + sta $a1,s + + lda $a3,s +; and #$0f00 not necessary with pure green + ora #$c0cc + sta $a3,s + + tsc + adc #$140 + tcs + + lda $1,s +; and #$00f0 not necessary with pure green + ora #$cc0c + sta $1,s + + lda $3,s +; and #$ff00 not necessary with pure green + ora #$00cc + sta $3,s + + lda $a1,s + and #$000f + ora #$cc80 + sta $a1,s + + lda $a3,s +; and #$ff0f not necessary with pure green + ora #$00c0 + sta $a3,s + + _spriteFooter + rtl + + +rightDownBody1s entry + dex + dex + dex + dex + _spriteHeader + +; $c - Green +; $4 - Red +; $8 - Off-white +; +; ....|.... +; ...G|GG.O +; ..GG|GGG. +; .GGG|GGGG +; .GGG|GGGG +; .GGG|GGGG +; ..GG|GGG. +; .O.G|GG.. + + lda $a1,s +; and #$f0ff not necessary with pure green + ora #$0c00 + sta $a1,s + + lda $a3,s + and #$f000 + ora #$08cc + sta $a3,s + + tsc + adc #$140 + tcs + + lda $1,s +; and #$00ff not necessary with pure green + ora #$cc00 + sta $1,s + + lda $3,s +; and #$0f00 not necessary with pure green + ora #$c0cc + sta $3,s + + lda $a1,s +; and #$00f0 not necessary with pure green + ora #$cc0c + sta $a1,s + + lda #$cccc + sta $a3,s + + tsc + adc #$140 + tcs + + lda $1,s +; and #$00f0 not necessary with pure green + ora #$cc0c + sta $1,s + + lda #$cccc + sta $3,s + + lda $a1,s +; and #$00f0 not necessary with pure green + ora #$cc0c + sta $a1,s + + lda #$cccc + sta $a3,s + + tsc + adc #$140 + tcs + + lda $1,s +; and #$00ff not necessary with pure green + ora #$cc00 + sta $1,s + + lda $3,s +; and #$0f00 not necessary with pure green + ora #$c0cc + sta $3,s + + lda $a1,s + and #$f0f0 + ora #$0c08 + sta $a1,s + + lda $a3,s +; and #$ff00 not necessary with pure green + ora #$00cc + sta $a3,s + + _spriteFooter + rtl + + +rightDownBody2 entry + dex + dex + dex + dex + _spriteHeader + +; $c - Green +; $4 - Red +; $8 - Off-white +; +; ....|....|.O.. +; ....|..GG|G... +; ....|.GGG|GG.. +; ....|GGGG|GGG. +; ....|GGGG|GGG. +; ....|GGGG|GGG. +; ...O|.GGG|GG.. +; ....|..GG|G... + + lda $3,s + and #$fff0 + ora #$0008 + sta $3,s + + lda $a1,s +; and #$00ff not necessary with pure green + ora #$cc00 + sta $a1,s + + lda $a3,s +; and #$ff0f not necessary with pure green + ora #$00c0 + sta $a3,s + + tsc + adc #$140 + tcs + + lda $1,s +; and #$00f0 not necessary with pure green + ora #$cc0c + sta $1,s + + lda $3,s +; and #$ff00 not necessary with pure green + ora #$00cc + sta $3,s + + lda #$cccc + sta $a1,s + + lda $a3,s +; and #$0f00 not necessary with pure green + ora #$c0cc + sta $a3,s + + tsc + adc #$142 + tcs + + pea $cccc + + lda $3,s +; and #$0f00 not necessary with pure green + ora #$c0cc + sta $3,s + + lda #$cccc + sta $a1,s + + lda $a3,s +; and #$0f00 not necessary with pure green + ora #$c0cc + sta $a3,s + + tsc + adc #$13e + tcs + + lda $1,s + and #$f0ff + ora #$0800 + sta $1,s + + lda $3,s +; and #$00f0 not necessary with pure green + ora #$cc0c + sta $3,s + + lda $5,s +; and #$ff00 not necessary with pure green + ora #$00cc + sta $5,s + + lda $a3,s +; and #$00ff not necessary with pure green + ora #$cc00 + sta $a3,s + + lda $a5,s +; and #$ff0f not necessary with pure green + ora #$00c0 + sta $a5,s + + _spriteFooter + rtl + + +rightDownBody2s entry + dex + dex + dex + dex + _spriteHeader + +; $c - Green +; $4 - Red +; $8 - Off-white +; +; ....|..O. +; ...G|GG.. +; ..GG|GGG. +; .GGG|GGGG +; .GGG|GGGG +; .GGG|GGGG +; O.GG|GGG. +; ...G|GG.. + + lda $3,s + and #$0fff + ora #$8000 + sta $3,s + + lda $a1,s +; and #$f0ff not necessary with pure green + ora #$0c00 + sta $a1,s + + lda $a3,s +; and #$ff00 not necessary with pure green + ora #$00cc + sta $a3,s + + tsc + adc #$140 + tcs + + lda $1,s +; and #$00ff not necessary with pure green + ora #$cc00 + sta $1,s + + lda $3,s +; and #$0f00 not necessary with pure green + ora #$c0cc + sta $3,s + + lda $a1,s +; and #$00f0 not necessary with pure green + ora #$cc0c + sta $a1,s + + lda #$cccc + sta $a3,s + + tsc + adc #$140 + tcs + + lda $1,s +; and #$00f0 not necessary with pure green + ora #$cc0c + sta $1,s + + lda #$cccc + sta $3,s + + lda $a1,s +; and #$00f0 not necessary with pure green + ora #$cc0c + sta $a1,s + + lda #$cccc + sta $a3,s + + tsc + adc #$140 + tcs + + lda $1,s + and #$000f + ora #$cc80 + sta $1,s + + lda $3,s +; and #$0f00 not necessary with pure green + ora #$c0cc + sta $3,s + + lda $a1,s +; and #$f0ff not necessary with pure green + ora #$0c00 + sta $a1,s + + lda $a3,s +; and #$ff00 not necessary with pure green + ora #$00cc + sta $a3,s + + _spriteFooter + rtl + + +downHead1 entry + dex + dex + dex + dex + _spriteHeader + +; $c - Green +; $4 - Red +; $8 - Off-white +; +; ....|.... +; ...G|G... +; ..GG|GG.. +; .GGG|GGG. +; OGGG|GGGO +; .RRG|GRR. +; .RRG|GRR. +; ..GG|GG.. + + lda $a1,s +; and #$f0ff not necessary with pure green + ora #$0c00 + sta $a1,s + + lda $a3,s +; and #$ff0f not necessary with pure green + ora #$00c0 + sta $a3,s + + tsc + adc #$140 + tcs + + lda $1,s +; and #$00ff not necessary with pure green + ora #$cc00 + sta $1,s + + lda $3,s +; and #$ff00 not necessary with pure green + ora #$00cc + sta $3,s + + lda $a1,s +; and #$00f0 not necessary with pure green + ora #$cc0c + sta $a1,s + + lda $a3,s +; and #$0f00 not necessary with pure green + ora #$c0cc + sta $a3,s + + tsc + adc #$144 + tcs + + pea $c8cc + pea $cc8c + + lda $a1,s + and #$00f0 + ora #$4c04 + sta $a1,s + + lda $a3,s + and #$0f00 + ora #$40c4 + sta $a3,s + + tsc + adc #$140 + tcs + + lda $1,s + and #$00f0 + ora #$4c04 + sta $1,s + + lda $3,s + and #$0f00 + ora #$40c4 + sta $3,s + + lda $a1,s +; and #$00ff not necessary with pure green + ora #$cc00 + sta $a1,s + + lda $a3,s +; and #$ff00 not necessary with pure green + ora #$00cc + sta $a3,s + + _spriteFooter + rtl + + +downHead2 entry + dex + dex + dex + dex + _spriteHeader + +; $c - Green +; $4 - Red +; $8 - Off-white +; +; ....|.... +; ...G|G... +; O.GG|GG.O +; .GGG|GGG. +; .GGG|GGG. +; .RRG|GRR. +; .RRG|GRR. +; ..GG|GG.. + + lda $a1,s +; and #$f0ff not necessary with pure green + ora #$0c00 + sta $a1,s + + lda $a3,s +; and #$ff0f not necessary with pure green + ora #$00c0 + sta $a3,s + + tsc + adc #$140 + tcs + + lda $1,s + and #$000f + ora #$cc80 + sta $1,s + + lda $3,s + and #$f000 + ora #$08cc + sta $3,s + + lda $a1,s +; and #$00f0 not necessary with pure green + ora #$cc0c + sta $a1,s + + lda $a3,s +; and #$0f00 not necessary with pure green + ora #$c0cc + sta $a3,s + + tsc + adc #$140 + tcs + + lda $1,s +; and #$00f0 not necessary with pure green + ora #$cc0c + sta $1,s + + lda $3,s +; and #$0f00 not necessary with pure green + ora #$c0cc + sta $3,s + + lda $a1,s + and #$00f0 + ora #$4c04 + sta $a1,s + + lda $a3,s + and #$0f00 + ora #$40c4 + sta $a3,s + + tsc + adc #$140 + tcs + + lda $1,s + and #$00f0 + ora #$4c04 + sta $1,s + + lda $3,s + and #$0f00 + ora #$40c4 + sta $3,s + + lda $a1,s +; and #$00ff not necessary with pure green + ora #$cc00 + sta $a1,s + + lda $a3,s +; and #$ff00 not necessary with pure green + ora #$00cc + sta $a3,s + + _spriteFooter + rtl + + +downHead3 entry + dex + dex + dex + dex + _spriteHeader + +; $c - Green +; $4 - Red +; $8 - Off-white +; +; ....|.... +; ...G|G... +; ..GG|GG.. +; .GGG|GGG. +; .GGG|GGG. +; .RRG|GRR. +; ORRG|GRRO +; ..GG|GG.. + + lda $a1,s +; and #$f0ff not necessary with pure green + ora #$0c00 + sta $a1,s + + lda $a3,s +; and #$ff0f not necessary with pure green + ora #$00c0 + sta $a3,s + + tsc + adc #$140 + tcs + + lda $1,s +; and #$00ff not necessary with pure green + ora #$cc00 + sta $1,s + + lda $3,s +; and #$ff00 not necessary with pure green + ora #$00cc + sta $3,s + + lda $a1,s +; and #$00f0 not necessary with pure green + ora #$cc0c + sta $a1,s + + lda $a3,s +; and #$0f00 not necessary with pure green + ora #$c0cc + sta $a3,s + + tsc + adc #$140 + tcs + + lda $1,s +; and #$00f0 not necessary with pure green + ora #$cc0c + sta $1,s + + lda $3,s +; and #$0f00 not necessary with pure green + ora #$c0cc + sta $3,s + + lda $a1,s + and #$00f0 + ora #$4c04 + sta $a1,s + + lda $a3,s + and #$0f00 + ora #$40c4 + sta $a3,s + + tsc + adc #$144 + tcs + + pea $48c4 + pea $4c84 + + lda $a1,s +; and #$00ff not necessary with pure green + ora #$cc00 + sta $a1,s + + lda $a3,s +; and #$ff00 not necessary with pure green + ora #$00cc + sta $a3,s + + _spriteFooter + rtl + + +downBody1 entry + dex + dex + dex + dex + _spriteHeader + +; $c - Green +; $4 - Red +; $8 - Off-white +; +; ....|.... +; ...G|G... +; ..GG|GG.. +; .GGG|GGG. +; OGGG|GGGO +; .GGG|GGG. +; .GGG|GGG. +; ..GG|GG.. + + lda $a1,s +; and #$f0ff not necessary with pure green + ora #$0c00 + sta $a1,s + + lda $a3,s +; and #$ff0f not necessary with pure green + ora #$00c0 + sta $a3,s + + tsc + adc #$140 + tcs + + lda $1,s +; and #$00ff not necessary with pure green + ora #$cc00 + sta $1,s + + lda $3,s +; and #$ff00 not necessary with pure green + ora #$00cc + sta $3,s + + lda $a1,s +; and #$00f0 not necessary with pure green + ora #$cc0c + sta $a1,s + + lda $a3,s +; and #$0f00 not necessary with pure green + ora #$c0cc + sta $a3,s + + tsc + adc #$144 + tcs + + pea $c8cc + pea $cc8c + + lda $a1,s +; and #$00f0 not necessary with pure green + ora #$cc0c + sta $a1,s + + lda $a3,s +; and #$0f00 not necessary with pure green + ora #$c0cc + sta $a3,s + + tsc + adc #$140 + tcs + + lda $1,s +; and #$00f0 not necessary with pure green + ora #$cc0c + sta $1,s + + lda $3,s +; and #$0f00 not necessary with pure green + ora #$c0cc + sta $3,s + + lda $a1,s +; and #$00ff not necessary with pure green + ora #$cc00 + sta $a1,s + + lda $a3,s +; and #$ff00 not necessary with pure green + ora #$00cc + sta $a3,s + + _spriteFooter + rtl + + +downBody2 entry + dex + dex + dex + dex + _spriteHeader + +; $c - Green +; $4 - Red +; $8 - Off-white +; +; ....|.... +; ...G|G... +; O.GG|GG.O +; .GGG|GGG. +; .GGG|GGG. +; .GGG|GGG. +; .GGG|GGG. +; ..GG|GG.. + + lda $a1,s +; and #$f0ff not necessary with pure green + ora #$0c00 + sta $a1,s + + lda $a3,s +; and #$ff0f not necessary with pure green + ora #$00c0 + sta $a3,s + + tsc + adc #$140 + tcs + + lda $1,s + and #$000f + ora #$cc80 + sta $1,s + + lda $3,s + and #$f000 + ora #$08cc + sta $3,s + + lda $a1,s +; and #$00f0 not necessary with pure green + ora #$cc0c + sta $a1,s + + lda $a3,s +; and #$0f00 not necessary with pure green + ora #$c0cc + sta $a3,s + + tsc + adc #$140 + tcs + + lda $1,s +; and #$00f0 not necessary with pure green + ora #$cc0c + sta $1,s + + lda $3,s +; and #$0f00 not necessary with pure green + ora #$c0cc + sta $3,s + + lda $a1,s +; and #$00f0 not necessary with pure green + ora #$cc0c + sta $a1,s + + lda $a3,s +; and #$0f00 not necessary with pure green + ora #$c0cc + sta $a3,s + + tsc + adc #$140 + tcs + + lda $1,s +; and #$00f0 not necessary with pure green + ora #$cc0c + sta $1,s + + lda $3,s +; and #$0f00 not necessary with pure green + ora #$c0cc + sta $3,s + + lda $a1,s +; and #$00ff not necessary with pure green + ora #$cc00 + sta $a1,s + + lda $a3,s +; and #$ff00 not necessary with pure green + ora #$00cc + sta $a3,s + + _spriteFooter + rtl + + +downBody3 entry + dex + dex + dex + dex + _spriteHeader + +; $c - Green +; $4 - Red +; $8 - Off-white +; +; ....|.... +; ...G|G... +; ..GG|GG.. +; .GGG|GGG. +; .GGG|GGG. +; .GGG|GGG. +; OGGG|GGGO +; ..GG|GG.. + + lda $a1,s +; and #$f0ff not necessary with pure green + ora #$0c00 + sta $a1,s + + lda $a3,s +; and #$ff0f not necessary with pure green + ora #$00c0 + sta $a3,s + + tsc + adc #$140 + tcs + + lda $1,s +; and #$00ff not necessary with pure green + ora #$cc00 + sta $1,s + + lda $3,s +; and #$ff00 not necessary with pure green + ora #$00cc + sta $3,s + + lda $a1,s +; and #$00f0 not necessary with pure green + ora #$cc0c + sta $a1,s + + lda $a3,s +; and #$0f00 not necessary with pure green + ora #$c0cc + sta $a3,s + + tsc + adc #$140 + tcs + + lda $1,s +; and #$00f0 not necessary with pure green + ora #$cc0c + sta $1,s + + lda $3,s +; and #$0f00 not necessary with pure green + ora #$c0cc + sta $3,s + + lda $a1,s +; and #$00f0 not necessary with pure green + ora #$cc0c + sta $a1,s + + lda $a3,s +; and #$0f00 not necessary with pure green + ora #$c0cc + sta $a3,s + + tsc + adc #$144 + tcs + + pea $c8cc + pea $cc8c + + lda $a1,s +; and #$00ff not necessary with pure green + ora #$cc00 + sta $a1,s + + lda $a3,s +; and #$ff00 not necessary with pure green + ora #$00cc + sta $a3,s + + _spriteFooter + rtl + + backupStack dc i2'0' end