diff --git a/BuGS/game.s b/BuGS/game.s
index 9d7ff9d..c31ce83 100644
--- a/BuGS/game.s
+++ b/BuGS/game.s
@@ -247,10 +247,10 @@ game    start
         jsl right_scorpion3s
         
         ldx #$486b
-        jsl left_scorpion4
+        jsl right_scorpion4
         
         ldx #$487b
-        jsl left_scorpion4s
+        jsl right_scorpion4s
         
         jsl waitForKey
         rtl
diff --git a/BuGS/sprites.s b/BuGS/sprites.s
index 09c6c50..3531010 100644
--- a/BuGS/sprites.s
+++ b/BuGS/sprites.s
@@ -6337,6 +6337,322 @@ right_scorpion3s entry
         rtl
 
 
+right_scorpion4 entry
+        dex
+        dex
+        dex
+        dex
+        dex
+        dex
+        dex
+        dex
+        _spriteHeader
+ 
+; $c - Green
+; $4 - Red
+; $8 - Off-white
+;
+; ....|.O.O|.ROR|.O.O
+; ...O|..O.|RROR|R.O.
+; .OO.|O.OO|.OOO|.OO.
+; OO..|O..O|OOOO|OO..
+; O..O|....|.OOO|....
+; O...|....|.OOO|....
+; OOOO|OOOO|OOOO|....
+; .OOO|OOOO|OOO.|....
+;
+        
+        ldy #$8888          ; Off-white, Off-white, Off-white, Off-white
+        
+        lda $3,s
+        and #$f0f0
+        ora #$0808
+        sta $3,s
+        
+        lda $5,s
+        and #$00f0
+        ora #$8404
+        sta $5,s
+        
+        lda $7,s
+        and #$f0f0
+        ora #$0808
+        sta $7,s
+        
+        lda $a1,s
+        and #$f0ff
+        ora #$0800
+        sta $a1,s
+        
+        lda $a3,s
+        and #$0fff
+        ora #$8000
+        sta $a3,s
+        
+        lda #$8444
+        sta $a5,s
+        
+        lda $a7,s
+        and #$0f0f
+        ora #$8040
+        sta $a7,s
+        
+        tsc
+        adc #$140
+        tcs
+        
+        lda $1,s
+        and #$0ff0
+        ora #$8008
+        sta $1,s
+        
+        lda $3,s
+        and #$000f
+        ora #$8880
+        sta $3,s
+        
+        lda $5,s
+        and #$00f0
+        ora #$8808
+        sta $5,s
+        
+        lda $7,s
+        and #$0ff0
+        ora #$8008
+        sta $7,s
+        
+        lda $a1,s
+        and #$ff00
+        ora #$0088
+        sta $a1,s
+        
+        lda $a3,s
+        and #$f00f
+        ora #$0880
+        sta $a3,s
+        
+        tya
+        sta $a5,s
+        
+        lda $a7,s
+        and #$ff00
+        ora #$0088
+        sta $a7,s
+        
+        tsc
+        adc #$140
+        tcs
+        
+        lda $1,s
+        and #$f00f
+        ora #$0880
+        sta $1,s
+        
+        lda $5,s
+        and #$00f0
+        ora #$8808
+        sta $5,s
+        
+        lda $a1,s
+        and #$ff0f
+        ora #$0080
+        sta $a1,s
+        
+        lda $a5,s
+        and #$00f0
+        ora #$8808
+        sta $a5,s
+        
+        tsc
+        adc #$146
+        tcs
+        
+        phy
+        phy
+        phy
+        
+        lda $a1,s
+        and #$00f0
+        ora #$8808
+        sta $a1,s
+        
+        lda $a5,s
+        and #$0f00
+        ora #$8088
+        sta $a5,s
+        
+        tya
+        sta $a3,s
+        
+        _spriteFooter
+        rtl
+        
+
+right_scorpion4s entry
+        dex
+        dex
+        dex
+        dex
+        dex
+        dex
+        dex
+        dex
+        _spriteHeader
+ 
+; $c - Green
+; $4 - Red
+; $8 - Off-white
+;
+; ....|....|O.O.|ROR.|O.O.
+; ....|..O.|.O.R|RORR|.O..
+; ....|OO.O|.OO.|OOO.|OO..
+; ...O|O..O|..OO|OOOO|O...
+; ...O|..O.|....|OOO.|....
+; ...O|....|....|OOO.|....
+; ...O|OOOO|OOOO|OOO.|....
+; ....|OOOO|OOOO|OO..|....
+;
+        
+        ldy #$8888          ; Off-white, Off-white, Off-white, Off-white
+        
+        lda $3,s
+        and #$0f0f
+        ora #$8080
+        sta $3,s
+        
+        lda $5,s
+        and #$0f00
+        ora #$4048
+        sta $5,s
+        
+        lda $7,s
+        and #$0f0f
+        ora #$8080
+        sta $7,s
+        
+        lda $a1,s
+        and #$0fff
+        ora #$8000
+        sta $a1,s
+        
+        lda $a3,s
+        and #$f0f0
+        ora #$0408
+        sta $a3,s
+        
+        lda #$4448
+        sta $a5,s
+        
+        lda $a7,s
+        and #$fff0
+        ora #$0008
+        sta $a7,s
+        
+        tsc
+        adc #$13e
+        tcs
+        
+        lda $3,s
+        and #$f000
+        ora #$0888
+        sta $3,s
+        
+        lda $5,s
+        and #$0ff0
+        ora #$8008
+        sta $5,s
+        
+        lda $7,s
+        and #$0f00
+        ora #$8088
+        sta $7,s
+        
+        lda $9,s
+        and #$ff00
+        ora #$0088
+        sta $9,s
+        
+        lda $a1,s
+        and #$f0ff
+        ora #$0800
+        sta $a1,s
+        
+        lda $a3,s
+        and #$f00f
+        ora #$0880
+        sta $a3,s
+        
+        lda $a5,s
+        and #$00ff
+        ora #$8800
+        sta $a5,s
+        
+        tya
+        sta $a7,s
+        
+        lda $a9,s
+        and #$ff0f
+        ora #$0080
+        sta $a9,s
+        
+        tsc
+        adc #$140
+        tcs
+        
+        lda $1,s
+        and #$f0ff
+        ora #$0800
+        sta $1,s
+        
+        lda $3,s
+        and #$0fff
+        ora #$8000
+        sta $3,s
+        
+        lda $7,s
+        and #$0f00
+        ora #$8088
+        sta $7,s
+        
+        lda $a1,s
+        and #$f0ff
+        ora #$0800
+        sta $a1,s
+        
+        lda $a7,s
+        and #$0f00
+        ora #$8088
+        sta $a7,s
+        
+        tsc
+        adc #$140
+        tcs
+        
+        lda $1,s
+        and #$f0ff
+        ora #$0800
+        sta $1,s
+        
+        lda $7,s
+        and #$0f00
+        ora #$8088
+        sta $7,s
+        
+        lda $a7,s
+        and #$ff00
+        ora #$0088
+        sta $a7,s
+        
+        tya
+        sta $3,s
+        sta $a3,s
+        sta $5,s
+        sta $a5,s
+        
+        _spriteFooter
+        rtl
+
+
 backupStack dc i2'0'
 
         end