diff --git a/BuGS/game.s b/BuGS/game.s index 16be18f..b2181cc 100644 --- a/BuGS/game.s +++ b/BuGS/game.s @@ -210,6 +210,12 @@ game start ldx #$3e1b jsl scorpion1s + ldx #$3e2b + jsl scorpion2 + + ldx #$3e3b + jsl scorpion2s + jsl waitForKey rtl diff --git a/BuGS/sprites.s b/BuGS/sprites.s index 2b6ee4d..0b3c042 100644 --- a/BuGS/sprites.s +++ b/BuGS/sprites.s @@ -4581,6 +4581,363 @@ scorpion1s entry _spriteFooter +scorpion2 entry + _spriteHeader + +; $d - Green +; $e - Red +; $f - Off-white +; +; O.O.|.ROR|..O.|O... +; .O..|RROR|R..O|.... +; .OO.|.OOO|..OO|.OOO +; ..OO|.OOO|.OO.|.O.O +; ...O|OOOO|OO..|.O.. +; ....|.OOO|....|OO.. +; ....|.OOO|OOOO|OO.. +; ....|..OO|OOOO|O... +; + + dex + dex + dex + dex + dex + dex + dex + dex + txa + tcs + ldy #$ffff ; Off-white, Off-white, Off-white, Off-white + ldx #$feee ; Red, Red, Off-white, Red + clc + + lda $1,s + and #$0f0f + ora #$f0f0 + sta $1,s + + lda $3,s + and #$00f0 + ora #$fe0e + sta $3,s + + lda $5,s + and #$0fff + ora #$f000 + sta $5,s + + lda $7,s + and #$ff0f + ora #$00f0 + sta $7,s + + lda $a1,s + and #$fff0 + ora #$000f + sta $a1,s + + tsc + adc #$a4 + tcs + + phx + + lda $3,s + and #$f00f + ora #$0fe0 + sta $3,s + + lda $9f,s + and #$0ff0 + ora #$f00f + sta $9f,s + + lda $a1,s + and #$00f0 + ora #$ff0f + sta $a1,s + + lda $a3,s + and #$00ff + ora #$ff00 + sta $a3,s + + lda $a5,s + and #$00f0 + ora #$ff0f + sta $a5,s + + tsc + adc #$13e + tcs + + lda $1,s + and #$00ff + ora #$ff00 + sta $1,s + + lda $3,s + and #$00f0 + ora #$ff0f + sta $3,s + + lda $5,s + and #$0ff0 + ora #$f00f + sta $5,s + + lda $7,s + and #$f0f0 + ora #$0f0f + sta $7,s + + lda $a1,s + and #$f0ff + ora #$0f00 + sta $a1,s + + lda $a5,s + and #$ff00 + ora #$00ff + sta $a5,s + + lda $a7,s + and #$fff0 + ora #$000f + sta $a7,s + + tsc + adc #$a4 + tcs + + phy + + lda $a1,s + and #$00f0 + ora #$ff0f + sta $a1,s + + lda $a5,s + and #$ff00 + ora #$00ff + sta $a5,s + + tsc + adc #$144 + tcs + + phy + + tsc + dec a + dec a + tcs + + lda $1,s + and #$00f0 + ora #$ff0f + sta $1,s + + lda $5,s + and #$ff00 + ora #$00ff + sta $5,s + + lda $a1,s + and #$00ff + ora #$ff00 + sta $a1,s + + lda $a5,s + and #$ff0f + ora #$00f0 + sta $a5,s + + tsc + adc #$a4 + tcs + + phy + + _spriteFooter + + +scorpion2s entry + _spriteHeader + +; $d - Green +; $e - Red +; $f - Off-white +; +; ...O|.O..|ROR.|.O.O|.... +; ....|O..R|RORR|..O.|.... +; ....|OO..|OOO.|.OO.|OOO. +; ....|.OO.|OOO.|OO..|O.O. +; ....|..OO|OOOO|O...|O... +; ....|....|OOO.|...O|O... +; ....|....|OOOO|OOOO|O... +; ....|....|.OOO|OOOO|.... +; + + dex + dex + dex + dex + dex + dex + dex + dex + dex + dex + txa + tcs + ldy #$ffff ; Off-white, Off-white, Off-white, Off-white + ldx #$eeef ; Red, Off-white, Red, Red + clc + + lda $1,s + and #$f0ff + ora #$0f00 + sta $1,s + + lda $3,s + and #$fff0 + ora #$000f + sta $3,s + + lda $5,s + and #$0f00 + ora #$e0ef + sta $5,s + + lda $7,s + and #$f0f0 + ora #$0f0f + sta $7,s + + lda $a3,s + and #$f00f + ora #$0ef0 + sta $a3,s + + lda $a7,s + and #$0fff + ora #$f000 + sta $a7,s + + tsc + adc #$a6 + tcs + + phx + + lda $9f,s + and #$ff00 + ora #$00ff + sta $9f,s + + lda $a1,s + and #$0f00 + ora #$f0ff + sta $a1,s + + lda $a3,s + and #$0ff0 + ora #$f00f + sta $a3,s + + lda $a5,s + and #$0f00 + ora #$f0ff + sta $a5,s + + tsc + adc #$13e + tcs + + lda $1,s + and #$0ff0 + ora #$f00f + sta $1,s + + lda $3,s + and #$0f00 + ora #$f0ff + sta $3,s + + lda $5,s + and #$ff00 + ora #$00ff + sta $5,s + + lda $7,s + and #$0f0f + ora #$f0f0 + sta $7,s + + lda $a1,s + and #$00ff + ora #$ff00 + sta $a1,s + + lda $a5,s + and #$ff0f + ora #$00f0 + sta $a5,s + + lda $a7,s + and #$ff0f + ora #$00f0 + sta $a7,s + + tsc + adc #$a4 + tcs + + phy + + lda $a1,s + and #$0f00 + ora #$f0ff + sta $a1,s + + lda $a3,s + and #$f0ff + ora #$0f00 + sta $a3,s + + lda $a5,s + and #$ff0f + ora #$00f0 + sta $a5,s + + tsc + adc #$144 + tcs + + phy + phy + + lda $5,s + and #$ff0f + ora #$00f0 + sta $5,s + + lda $a1,s + and #$00f0 + ora #$ff0f + sta $a1,s + + tsc + adc #$a4 + tcs + + phy + + _spriteFooter + + backupStack dc i2'0' end