Apple-2-SW/dos33fsprogs
1
0
Fork 0
mirror of https://github.com/deater/dos33fsprogs.git synced 2025-08-17 20:27:42 +00:00
Code Issues Projects Releases Wiki Activity

optimize putsprite code

Browse Source
This commit is contained in:
Peter Ferrie
2019-06-01 00:00:40 -04:00
committed by Vince Weaver
parent efbb34fce7
commit c863fd9462
1 changed files with 10 additions and 12 deletions
Download Patch File Download Diff File Expand all files Collapse all files

22
pt3_player/gr_putsprite.s
View File

@@ -21,27 +21,24 @@ put_sprite:
sta CV ; ysize is in CV ; 3 sta CV ; ysize is in CV ; 3
iny ; 2 iny ; 2
lda YPOS ; make a copy of ypos ; 3 ldx YPOS ; make a copy of ypos ; 3
sta TEMPY ; as we modify it ; 3
;=========== ;===========
; 28 ; 25
put_sprite_loop: put_sprite_loop:
sty TEMP ; save sprite pointer ; 3 stx TEMPY ; as we modify it ; 3
ldy TEMPY ; 3 lda gr_offsets,X ; lookup low-res memory address ; 4
lda gr_offsets,Y ; lookup low-res memory address ; 4
clc ; 2 clc ; 2
adc XPOS ; add in xpos ; 3 adc XPOS ; add in xpos ; 3
sta OUTL ; store out low byte of addy ; 3 sta OUTL ; store out low byte of addy ; 3
lda gr_offsets+1,Y ; look up high byte ; 4 lda gr_offsets+1,X ; look up high byte ; 4
adc DRAW_PAGE ; ; 3 adc DRAW_PAGE ; ; 3
sta OUTH ; and store it out ; 3 sta OUTH ; and store it out ; 3
ldy TEMP ; restore sprite pointer ; 3
; OUTH:OUTL now points at right place ; OUTH:OUTL now points at right place
ldx CH ; load xsize into x ; 3 ldx CH ; load xsize into x ; 3
;=========== ;===========
; 34 ; 28
put_sprite_pixel: put_sprite_pixel:
lda (INL),Y ; get sprite colors ; 5 lda (INL),Y ; get sprite colors ; 5
iny ; increment sprite pointer ; 2 iny ; increment sprite pointer ; 2
@@ -88,12 +85,13 @@ put_sprite_done_draw:
;============== ;==============
; 12/13 ; 12/13
inc TEMPY ; each line has two y vars ; 5 ldx TEMPY ; 3
inc TEMPY ; 5 inx ; each line has two y vars ; 2
inx ; 2
dec CV ; decemenet total y count ; 5 dec CV ; decemenet total y count ; 5
bne put_sprite_loop ; loop if not done ; 2nt/3 bne put_sprite_loop ; loop if not done ; 2nt/3
;============== ;==============
; 17/18 ; 14/15
rts ; return ; 6 rts ; return ; 6