From 5371b4e19e1b49d1f164921028df1195bcbb901b Mon Sep 17 00:00:00 2001
From: Jeremy Rand <jeremy@rand-family.com>
Date: Tue, 30 Jun 2020 23:38:27 -0400
Subject: [PATCH] Add the first spider sprite.

---
 BuGS/game.s    |   3 +
 BuGS/sprites.s | 163 +++++++++++++++++++++++++++++++++++++++++++++++++
 2 files changed, 166 insertions(+)

diff --git a/BuGS/game.s b/BuGS/game.s
index c31ce83..95542c5 100644
--- a/BuGS/game.s
+++ b/BuGS/game.s
@@ -252,6 +252,9 @@ game    start
         ldx #$487b
         jsl right_scorpion4s
         
+        ldx #$520b
+        jsl spider1
+        
         jsl waitForKey
         rtl
         
diff --git a/BuGS/sprites.s b/BuGS/sprites.s
index 3531010..dfb78d9 100644
--- a/BuGS/sprites.s
+++ b/BuGS/sprites.s
@@ -6653,6 +6653,169 @@ right_scorpion4s entry
         rtl
 
 
+spider1 entry
+        dex
+        dex
+        dex
+        dex
+        dex
+        dex
+        dex
+        dex
+        _spriteHeader
+ 
+; $c - Green
+; $4 - Red
+; $8 - Off-white
+;
+; ..O.|....|....|O...
+; .O.O|....|...O|.O.
+; O...|O..G|..O.|..O.
+; ....|.ORG|RO..|....
+; ..O.|.RRG|RR..|O...
+; .O.O|.GGG|GG.O|.O..
+; O...|OGRR|RGO.|..O.
+; ....|..GR|G...|....
+        
+        lda $1,s
+        and #$0fff
+        ora #$8000
+        sta $1,s
+        
+        lda $7,s
+        and #$ff0f
+        ora #$0080
+        sta $7,s
+        
+        lda $a1,s
+        and #$f0f0
+        ora #$0808
+        sta $a1,s
+        
+        lda $a5,s
+        and #$f0ff
+        ora #$0800
+        sta $a5,s
+        
+        lda $a7,s
+        and #$fff0
+        ora #$0008
+        sta $a7,s
+        
+        tsc
+        adc #$140
+        tcs
+        
+        lda $1,s
+        and #$ff0f
+        ora #$0080
+        sta $1,s
+        
+        lda $3,s
+        and #$f00f
+        ora #$0c80
+        sta $3,s
+        
+        lda $5,s
+        and #$0fff
+        ora #$8000
+        sta $5,s
+        
+        lda $7,s
+        and #$0fff
+        ora #$8000
+        sta $7,s
+        
+        lda $a3,s
+        and #$00f0
+        ora #$4c08
+        sta $a3,s
+        
+        lda $a5,s
+        and #$ff00
+        ora #$0048
+        sta $a5,s
+        
+        tsc
+        adc #$140
+        tcs
+        
+        lda $1,s
+        and #$0fff
+        ora #$8000
+        sta $1,s
+        
+        lda $3,s
+        and #$ff0f
+        ora #$4c04
+        sta $3,s
+        
+        lda $5,s
+        and #$ff00
+        ora #$0044
+        sta $5,s
+        
+        lda $7,s
+        and #$ff0f
+        ora #$0080
+        sta $7,s
+        
+        lda $a1,s
+        and #$f0f0
+        ora #$0808
+        sta $a1,s
+        
+        lda $a3,s
+        and #$00f0
+        ora #$cc0c
+        sta $a3,s
+        
+        lda $a5,s
+        and #$f000
+        ora #$08cc
+        sta $a5,s
+        
+        lda $a7,s
+        and #$fff0
+        ora #$0008
+        sta $a7,s
+        
+        tsc
+        adc #$140
+        tcs
+        
+        lda $1,s
+        and #$ff0f
+        ora #$0080
+        sta $1,s
+        
+        lda #$448c
+        sta $3,s
+        
+        lda $5,s
+        and #$0f00
+        ora #$804c
+        sta $5,s
+        
+        lda $7,s
+        and #$0fff
+        ora #$8000
+        sta $7,s
+        
+        lda $a3,s
+        and #$00ff
+        ora #$c400
+        sta $a3,s
+        
+        lda $a5,s
+        and #$ff0f
+        ora #$00c0
+        sta $a5,s
+        
+        _spriteFooter
+        rtl
+
+
 backupStack dc i2'0'
 
         end