Apple-2-SW/dos33fsprogs
1
0
Fork 0
mirror of https://github.com/deater/dos33fsprogs.git synced 2024-12-27 17:29:49 +00:00
Code Issues Projects Releases Wiki Activity

fireworks: remove the old multi-image code

Browse Source
This commit is contained in:
Vince Weaver 2018-09-05 22:07:45 -04:00
parent 6f78ca810b
commit a792eda7e8
1 changed files with 9 additions and 31 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

40
fireworks/fireworks.s
View File

@ -46,27 +46,14 @@ TEXT = $FB36 ;; Set text mode
HOME = $FC58 ;; Clear the text screen HOME = $FC58 ;; Clear the text screen
WAIT = $FCA8 ;; delay 1/2(26+27A+5A^2) us WAIT = $FCA8 ;; delay 1/2(26+27A+5A^2) us
MAX = 3
jsr draw_fireworks jsr draw_fireworks
;================================== ;==================================
;================================== ;==================================
lda #$ff
sta WHICH
start_over: setup_background:
inc WHICH
lda WHICH
cmp #MAX
bne in_range
lda #0
sta WHICH
in_range:
;=================== ;===================
; init screen ; init screen
@ -88,14 +75,9 @@ in_range:
lda #$00 lda #$00
sta BASL ; load image to $c00 sta BASL ; load image to $c00
lda WHICH lda #<bg_final_low
asl
asl ; which*4
tay
lda pictures,Y
sta GBASL sta GBASL
lda pictures+1,Y lda #>bg_final_low
sta GBASH sta GBASH
jsr load_rle_gr jsr load_rle_gr
@ -121,14 +103,9 @@ in_range:
lda #$00 lda #$00
sta BASL ; load image to $c00 sta BASL ; load image to $c00
lda WHICH lda #<bg_final_high
asl
asl ; which*4
tay
lda pictures+2,Y
sta GBASL sta GBASL
lda pictures+3,Y lda #>bg_final_high
sta GBASH sta GBASH
jsr load_rle_gr jsr load_rle_gr
@ -342,11 +319,13 @@ bpage1_loop: ; delay 115+(7 loop)+4 (bit)+4(extra)
lda KEYPRESS ; 4 lda KEYPRESS ; 4
bpl no_keypress ; 3 bpl no_keypress ; 3
jmp start_over jmp loop_forever
no_keypress: no_keypress:
jmp display_loop ; 3 jmp display_loop ; 3
loop_forever:
jmp loop_forever
;================================= ;=================================
@ -421,8 +400,7 @@ gr_offsets:
.include "random16.s" .include "random16.s"
.include "fw.s" .include "fw.s"
pictures: background:
.word bg_final_low,bg_final_high
.include "background_final.inc" .include "background_final.inc"