; ; fleas.s ; BuGS ; ; Created by Jeremy Rand on 2020-07-02. ;Copyright © 2020 Jeremy Rand. All rights reserved. ; case on mcopy fleas.macros keep fleas fleas start spriteSeg using globalData flea1 entry _spriteHeader ; 30 ; $c - Green ; $4 - Red ; $8 - Off-white ; ; ....|..OO|O... ; ....|.ROO|OO.. ; ....|RROO|OOO. ; ...O|OOOO|OOOO ; ...O|OOG.|GOOO ; ....|..G.|G.OO ; ....|..G.|G.G. ; ....|.G.G|...G ; lda $0,s ; 5 and #$00ff ; 3 ora #$8800 ; 3 sta $0,s ; 5 ; 46 lda $2,s ; 5 and #$ff0f ; 3 ora #$0080 ; 3 sta $2,s ; 5 ; 62 lda $a0,s and #$00f0 ora #$8804 sta $a0,s ; 78 lda $a2,s and #$ff00 ora #$0088 sta $a2,s ; 94 tsc ; 2 adc #$0141 ; 3 tcs ; 2 ; 101 pea $8844 ; 5 lda $3,s and #$0f00 ora #$8088 sta $3,s ; 122 lda $9f,s and #$f0ff ora #$0800 sta $9f,s ; 138 tsc adc #$00a4 tcs pea $8888 pea $8888 ; 155 lda $9f,s and #$f0ff ora #$0800 sta $9f,s ; 171 lda $a1,s and #$0f00 ora #$c088 sta $a1,s ; 187 tsc adc #$00a4 tcs pea $88c8 ; 199 lda $9f,s ora #$c000 sta $9f,s ; 212 lda $a1,s and #$000f ora #$88c0 sta $a1,s ; 228 tsc adc #$013e tcs ; 235 lda $1,s ora #$c000 sta $1,s ; 248 lda $3,s ora #$c0c0 sta $3,s ; 261 lda $a1,s ora #$0c0c sta $a1,s ; 274 lda $a3,s ora #$0c00 sta $a3,s ; 287 _spriteFooter ; 311 cycles rtl flea2 entry _spriteHeader ; $c - Green ; $4 - Red ; $8 - Off-white ; ; ....|..OO|O... ; ....|.ROO|OO.. ; ....|RROO|OOO. ; ...O|OOOO|OOOO ; ...O|OO.G|.OOO ; ....|..G.|.GOO ; ....|.G..|G..G ; ....|.G.G|..G. ; lda $0,s and #$00ff ora #$8800 sta $0,s lda $2,s and #$ff0f ora #$0080 sta $2,s lda $a0,s and #$00f0 ora #$8804 sta $a0,s lda $a2,s and #$ff00 ora #$0088 sta $a2,s tsc adc #$0141 tcs pea $8844 lda $3,s and #$0f00 ora #$8088 sta $3,s lda $9f,s and #$f0ff ora #$0800 sta $9f,s tsc adc #$00a4 tcs pea $8888 pea $8888 lda $9f,s and #$f0ff ora #$0800 sta $9f,s lda $a1,s and #$f000 ora #$0c88 sta $a1,s lda $a3,s and #$00f0 ora #$8808 sta $a3,s tsc adc #$0140 tcs lda $1,s ora #$c000 sta $1,s lda $3,s and #$00f0 ora #$880c sta $3,s tsc adc #$00a0 tcs lda $1,s ora #$000c sta $1,s lda $3,s ora #$0cc0 sta $3,s lda $a1,s ora #$0c0c sta $a1,s lda $a3,s ora #$c000 sta $a3,s _spriteFooter rtl flea3 entry _spriteHeader ; $c - Green ; $4 - Red ; $8 - Off-white ; ; ....|..OO|O... ; ....|.ROO|OO.. ; ....|RROO|OOO. ; ...O|OOOO|OOOO ; ...O|OO.G|.OOO ; ....|..G.|G.OO ; ....|..G.|.G.G ; ....|...G|..G. ; lda $0,s and #$00ff ora #$8800 sta $0,s lda $2,s and #$ff0f ora #$0080 sta $2,s lda $a0,s and #$00f0 ora #$8804 sta $a0,s lda $a2,s and #$ff00 ora #$0088 sta $a2,s tsc adc #$0141 tcs pea $8844 lda $3,s and #$0f00 ora #$8088 sta $3,s lda $9f,s and #$f0ff ora #$0800 sta $9f,s tsc adc #$00a4 tcs pea $8888 pea $8888 lda $9f,s and #$f0ff ora #$0800 sta $9f,s lda $a1,s and #$f000 ora #$0c88 sta $a1,s lda $a3,s and #$00f0 ora #$8808 sta $a3,s tsc adc #$0140 tcs lda $1,s ora #$c000 sta $1,s lda $3,s and #$000f ora #$88c0 sta $3,s tsc adc #$00a0 tcs lda $1,s ora #$c000 sta $1,s lda $3,s ora #$0c0c sta $3,s lda $a1,s ora #$0c00 sta $a1,s lda $a3,s ora #$c000 sta $a3,s _spriteFooter rtl flea4 entry _spriteHeader ; $c - Green ; $4 - Red ; $8 - Off-white ; ; ....|..OO|O... ; ....|.ROO|OO.. ; ....|RROO|OOO. ; ...O|OOOO|OOOO ; ...O|OOG.|GOOO ; ....|..G.|G.OO ; ....|..G.|.G.G ; ....|...G|.G.G ; lda $0,s and #$00ff ora #$8800 sta $0,s lda $2,s and #$ff0f ora #$0080 sta $2,s lda $a0,s and #$00f0 ora #$8804 sta $a0,s lda $a2,s and #$ff00 ora #$0088 sta $a2,s tsc adc #$0141 tcs pea $8844 lda $3,s and #$0f00 ora #$8088 sta $3,s lda $9f,s and #$f0ff ora #$0800 sta $9f,s tsc adc #$00a4 tcs pea $8888 pea $8888 lda $9f,s and #$f0ff ora #$0800 sta $9f,s lda $a1,s and #$0f00 ora #$c088 sta $a1,s tsc adc #$00a4 tcs pea $88c8 lda $9f,s ora #$c000 sta $9f,s lda $a1,s and #$000f ora #$88c0 sta $a1,s tsc adc #$013e tcs lda $1,s ora #$c000 sta $1,s lda $3,s ora #$0c0c sta $3,s lda $a1,s ora #$0c00 sta $a1,s lda $a3,s ora #$0c0c sta $a3,s _spriteFooter rtl end