KermMartian: Created page with "=== Sprite Routines === The routine below is a routine that takes your 8 wide * X high sprite and then puts it in the screen buffer. It is commonly known as Ion PutSprite, by..."

2016-02-03T21:30:00Z

Created page with "=== Sprite Routines === The routine below is a routine that takes your 8 wide * X high sprite and then puts it in the screen buffer. It is commonly known as Ion PutSprite, by..."

New page

=== Sprite Routines ===

The routine below is a routine that takes your 8 wide * X high sprite and then puts it in the screen buffer. It is commonly known as Ion PutSprite, by Joe Wingbermuehle. More routines can be found on [*http://ticalc.org TiCalc] (see links to your left), [http://www.unitedti.org/index.php?showtopic=1279 United Ti] and [http://www.cemetech.net/forum/viewtopic.php?t=1449 Cemetech].

putSprite:
ld e,l
ld h,$00
ld d,h
add hl,de
add hl,de
add hl,hl
add hl,hl ;Find the Y displacement offset
ld e,a
and $07 ;Find the bit number
ld c,a
srl e
srl e
srl e
add hl,de ;Find the X displacement offset
ld de,gbuf
add hl,de
putSpriteLoop1:
sl1: ld d,(ix) ;loads image byte into D
ld e,$00
ld a,c
or a
jr z,putSpriteSkip1
putSpriteLoop2:
srl d ;rotate to give out smooth moving
rr e
dec a
jr nz,putSpriteLoop2
putSpriteSkip1:
ld a,(hl)
xor d
ld (hl),a
inc hl
ld a,(hl)
xor e
ld (hl),a ;copy to buffer using XOR logic
ld de,$0B
add hl,de
inc ix ;Set for next byte of image
djnz putSpriteLoop1
ret

As is probably apparent, this routine can be modified to not only XOR sprites, but also AND and OR. All you have to do is change the two XOR's to the appropriate function.

=== Animating Sprites ===

The routine below will animate two sprites by simply displaying the first sprite, erasing it, then displaying the second sprite, erasing it and finally repeat the loop. Remember that this code is for only 2 sprites. More can be added though. Note that this routine uses ion calls and will not function unless you are using the ion header. See [[Z80:Shells|Shells]] for more information.

loop:
ld ix,Sprite_address
ld a,X_coordinate
ld l,Y_coordinate
ld b,Sprite_height
call iputsprite8 ;Assuming your sprite is 8x8
call ifastcopy

ld ix,Sprite_address
ld a,X_coordinate
ld l,Y_coordinate
ld b,Sprite_height
call iputsprite8 ;erase

ld ix,Sprite_address
ld a,X_coordinate+1
ld l,Y_coordinate
ld b,Sprite_height
call iputsprite8 ;draw and display your second sprite
call ifastcopy

ld ix,Sprite_address
ld a,X_coordinate+1
ld l,Y_coordinate
ld b,Sprite_height
call iputsprite8 ;erase
jp loop

'''Thank you Fallen Ghost for your help with this code!'''

==== Another look at Animated Sprites ====

If you want to cut down on size or increase speed, there is another way to create animated sprites. Instead of having to erase each time, what you could do is add an extra sprite that's an XOR of two sprites: the layer previously displayed, and the next layer. Note that the first and last layers must be intact (what they would look like without XOR-ing to another layer).

Example:

loop:
ld ix,Layer1 ;draw first layer as is everytime
ld a,0
ld l,0
ld b,8
call ionputsprite
call ionfastcopy

ld ix,XORLayer ;move onto next layer. Since it has the XORed part, no need to erase ("already done")
ld a,0
ld l,0
ld b,8
call ionputsprite
call ionfastcopy

;... any other layers would look similar to the few lines of code above

ld ix,Layer2 ;Just need to erase last layer
ld a,0
ld l,0
ld b,8
call ionputsprite

jr loop

Layer1:
.db $00,$7E,$B9,$CF,$CF,$B9,$7E,$00

Layer2:
.db $FC,$72,$9E,$9E,$72,$FC,$00,$00

XORLayer: ;XOR of Layer1 and Layer2
.db $FC,$0C,$27,$51,$BD,$45,$7E,$00

;... extra XORed layers, if necessary

Calculating from above, having to erase each time took 13 bytes/extra layer, and some time (usually insignificant, but sometimes crucial). By having the XOR layer, it only adds 8 more bytes (assuming you have 8*8 sprites), and takes less time (if time is crucial). That's a saving of 5 bytes/extra layer!

------

{{lowercase}}
[[Category:Z80 Assembly]]
[[Category:Z80 Heaven]]

Z80:Sprite Routines - Revision history

KermMartian: Created page with "=== Sprite Routines === The routine below is a routine that takes your 8 wide * X high sprite and then puts it in the screen buffer. It is commonly known as Ion PutSprite, by..."