mirror of
https://github.com/deater/dos33fsprogs.git
synced 2024-06-24 12:29:29 +00:00
xmas2023: more tree work
This commit is contained in:
parent
b1b565a9bb
commit
72c36ea61b
|
@ -126,6 +126,7 @@ XMAS: xmas.o
|
||||||
xmas.o: xmas.s plasma_tree.s fireplace.s \
|
xmas.o: xmas.s plasma_tree.s fireplace.s \
|
||||||
zp.inc hardware.inc qload.inc \
|
zp.inc hardware.inc qload.inc \
|
||||||
vapor_lock.s gr_scroll.s draw_blocks.s \
|
vapor_lock.s gr_scroll.s draw_blocks.s \
|
||||||
|
regular_tree.s \
|
||||||
graphics/merry.hgr.zx02 \
|
graphics/merry.hgr.zx02 \
|
||||||
graphics/tree01.gr.zx02 \
|
graphics/tree01.gr.zx02 \
|
||||||
graphics/greets.raw.zx02
|
graphics/greets.raw.zx02
|
||||||
|
|
235
demos/xmas_2023/regular_tree.s
Normal file
235
demos/xmas_2023/regular_tree.s
Normal file
|
@ -0,0 +1,235 @@
|
||||||
|
; Regular Tree
|
||||||
|
|
||||||
|
; =============================================================================
|
||||||
|
; ROUTINE MAIN
|
||||||
|
; =============================================================================
|
||||||
|
|
||||||
|
regular_tree:
|
||||||
|
|
||||||
|
lda #$00
|
||||||
|
sta DRAW_PAGE
|
||||||
|
sta clear_all_color+1
|
||||||
|
|
||||||
|
lda #$04
|
||||||
|
sta DRAW_PAGE
|
||||||
|
jsr clear_all
|
||||||
|
|
||||||
|
|
||||||
|
bit PAGE2 ; set page 2
|
||||||
|
; bit SET_TEXT ; set text
|
||||||
|
bit LORES ; set lo-res
|
||||||
|
|
||||||
|
lda #0
|
||||||
|
sta FRAME
|
||||||
|
|
||||||
|
; load image offscreen $6000
|
||||||
|
|
||||||
|
lda #<mask1_data
|
||||||
|
sta zx_src_l+1
|
||||||
|
lda #>mask1_data
|
||||||
|
sta zx_src_h+1
|
||||||
|
lda #$60
|
||||||
|
jsr zx02_full_decomp
|
||||||
|
|
||||||
|
; load image offscreen $6400
|
||||||
|
|
||||||
|
lda #<mask2_data
|
||||||
|
sta zx_src_l+1
|
||||||
|
lda #>mask2_data
|
||||||
|
sta zx_src_h+1
|
||||||
|
lda #$64
|
||||||
|
jsr zx02_full_decomp
|
||||||
|
|
||||||
|
; load image offscreen $6800
|
||||||
|
|
||||||
|
lda #<mask3_data
|
||||||
|
sta zx_src_l+1
|
||||||
|
lda #>mask3_data
|
||||||
|
sta zx_src_h+1
|
||||||
|
lda #$68
|
||||||
|
jsr zx02_full_decomp
|
||||||
|
|
||||||
|
; load image offscreen $6C00
|
||||||
|
|
||||||
|
lda #<mask4_data
|
||||||
|
sta zx_src_l+1
|
||||||
|
lda #>mask4_data
|
||||||
|
sta zx_src_h+1
|
||||||
|
lda #$6C
|
||||||
|
jsr zx02_full_decomp
|
||||||
|
|
||||||
|
; load image offscreen $7000
|
||||||
|
|
||||||
|
lda #<mask5_data
|
||||||
|
sta zx_src_l+1
|
||||||
|
lda #>mask5_data
|
||||||
|
sta zx_src_h+1
|
||||||
|
lda #$70
|
||||||
|
jsr zx02_full_decomp
|
||||||
|
|
||||||
|
; load image offscreen $7400
|
||||||
|
|
||||||
|
lda #<mask6_data
|
||||||
|
sta zx_src_l+1
|
||||||
|
lda #>mask6_data
|
||||||
|
sta zx_src_h+1
|
||||||
|
lda #$74
|
||||||
|
jsr zx02_full_decomp
|
||||||
|
|
||||||
|
; load image offscreen $7800
|
||||||
|
|
||||||
|
lda #<mask7_data
|
||||||
|
sta zx_src_l+1
|
||||||
|
lda #>mask7_data
|
||||||
|
sta zx_src_h+1
|
||||||
|
lda #$78
|
||||||
|
jsr zx02_full_decomp
|
||||||
|
|
||||||
|
; load image offscreen $7C00
|
||||||
|
|
||||||
|
lda #<mask8_data
|
||||||
|
sta zx_src_l+1
|
||||||
|
lda #>mask8_data
|
||||||
|
sta zx_src_h+1
|
||||||
|
lda #$7C
|
||||||
|
jsr zx02_full_decomp
|
||||||
|
|
||||||
|
|
||||||
|
lda #0
|
||||||
|
sta OFFSET
|
||||||
|
|
||||||
|
|
||||||
|
reset_tree_loop:
|
||||||
|
lda #$60
|
||||||
|
sta TREE_COUNT
|
||||||
|
|
||||||
|
regular_tree_loop:
|
||||||
|
ldx TREE_COUNT
|
||||||
|
jsr gr_fast_copy
|
||||||
|
|
||||||
|
; jsr wait_until_keypress
|
||||||
|
|
||||||
|
jsr scroll_loop
|
||||||
|
|
||||||
|
jsr page_flip
|
||||||
|
|
||||||
|
lda #128
|
||||||
|
jsr wait
|
||||||
|
|
||||||
|
inc TREE_COUNT
|
||||||
|
inc TREE_COUNT
|
||||||
|
inc TREE_COUNT
|
||||||
|
inc TREE_COUNT
|
||||||
|
|
||||||
|
lda TREE_COUNT
|
||||||
|
cmp #$80
|
||||||
|
bne done_regular_tree
|
||||||
|
jmp reset_tree_loop
|
||||||
|
|
||||||
|
done_regular_tree:
|
||||||
|
jmp regular_tree_loop
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
;==========================
|
||||||
|
; gr_fast_copy
|
||||||
|
;==========================
|
||||||
|
; page to start at in X
|
||||||
|
|
||||||
|
gr_fast_copy:
|
||||||
|
|
||||||
|
stx fcl_smc1+2
|
||||||
|
stx fcl_smc2+2
|
||||||
|
inx
|
||||||
|
stx fcl_smc3+2
|
||||||
|
stx fcl_smc4+2
|
||||||
|
inx
|
||||||
|
stx fcl_smc5+2
|
||||||
|
stx fcl_smc6+2
|
||||||
|
inx
|
||||||
|
stx fcl_smc7+2
|
||||||
|
stx fcl_smc8+2
|
||||||
|
|
||||||
|
lda DRAW_PAGE
|
||||||
|
clc
|
||||||
|
adc #4
|
||||||
|
tax
|
||||||
|
|
||||||
|
stx fcl_smc11+2
|
||||||
|
stx fcl_smc12+2
|
||||||
|
inx
|
||||||
|
stx fcl_smc13+2
|
||||||
|
stx fcl_smc14+2
|
||||||
|
inx
|
||||||
|
stx fcl_smc15+2
|
||||||
|
stx fcl_smc16+2
|
||||||
|
inx
|
||||||
|
stx fcl_smc17+2
|
||||||
|
stx fcl_smc18+2
|
||||||
|
|
||||||
|
ldy #120
|
||||||
|
gr_fast_copy_loop:
|
||||||
|
|
||||||
|
fcl_smc1:
|
||||||
|
lda $7000,Y
|
||||||
|
fcl_smc11:
|
||||||
|
sta $400,Y
|
||||||
|
|
||||||
|
fcl_smc2:
|
||||||
|
lda $7080,Y
|
||||||
|
fcl_smc12:
|
||||||
|
sta $480,Y
|
||||||
|
|
||||||
|
fcl_smc3:
|
||||||
|
lda $7100,Y
|
||||||
|
fcl_smc13:
|
||||||
|
sta $500,Y
|
||||||
|
|
||||||
|
fcl_smc4:
|
||||||
|
lda $7180,Y
|
||||||
|
fcl_smc14:
|
||||||
|
sta $580,Y
|
||||||
|
|
||||||
|
fcl_smc5:
|
||||||
|
lda $7200,Y
|
||||||
|
fcl_smc15:
|
||||||
|
sta $600,Y
|
||||||
|
|
||||||
|
fcl_smc6:
|
||||||
|
lda $7280,Y
|
||||||
|
fcl_smc16:
|
||||||
|
sta $680,Y
|
||||||
|
|
||||||
|
fcl_smc7:
|
||||||
|
lda $7300,Y
|
||||||
|
fcl_smc17:
|
||||||
|
sta $700,Y
|
||||||
|
|
||||||
|
fcl_smc8:
|
||||||
|
lda $7380,Y
|
||||||
|
fcl_smc18:
|
||||||
|
sta $780,Y
|
||||||
|
|
||||||
|
dey
|
||||||
|
bpl gr_fast_copy_loop
|
||||||
|
|
||||||
|
rts
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
page_flip:
|
||||||
|
lda DRAW_PAGE
|
||||||
|
beq flip_draw_page2
|
||||||
|
|
||||||
|
flip_draw_page_1:
|
||||||
|
bit PAGE2
|
||||||
|
lda #0
|
||||||
|
beq done_page_flip ; bra
|
||||||
|
|
||||||
|
flip_draw_page2:
|
||||||
|
bit PAGE1
|
||||||
|
lda #4
|
||||||
|
done_page_flip:
|
||||||
|
sta DRAW_PAGE
|
||||||
|
rts
|
||||||
|
|
|
@ -26,6 +26,12 @@ xmas_main:
|
||||||
|
|
||||||
jsr fireplace
|
jsr fireplace
|
||||||
|
|
||||||
|
;======================================
|
||||||
|
; 3D tree
|
||||||
|
;======================================
|
||||||
|
|
||||||
|
jsr regular_tree
|
||||||
|
|
||||||
;======================================
|
;======================================
|
||||||
; plasma tree
|
; plasma tree
|
||||||
;======================================
|
;======================================
|
||||||
|
@ -42,3 +48,5 @@ finished:
|
||||||
|
|
||||||
.include "plasma_tree.s"
|
.include "plasma_tree.s"
|
||||||
.include "fireplace.s"
|
.include "fireplace.s"
|
||||||
|
.include "regular_tree.s"
|
||||||
|
|
||||||
|
|
|
@ -205,43 +205,6 @@ SCROLL_X = $F0
|
||||||
SCROLL_START = $F0
|
SCROLL_START = $F0
|
||||||
YDEST = $F1
|
YDEST = $F1
|
||||||
|
|
||||||
; sierzoom
|
|
||||||
;XX = $F0
|
|
||||||
XX_TH = $F1
|
|
||||||
XX_TL = $F2
|
|
||||||
;YY = $F3
|
|
||||||
YY_TH = $F4
|
|
||||||
YY_TL = $F5
|
|
||||||
T_L = $F6
|
|
||||||
T_H = $F7
|
|
||||||
SAVED = $F8
|
|
||||||
|
|
||||||
BAR_X1 = $F0
|
|
||||||
BAR_X2 = $F1
|
|
||||||
|
|
||||||
; spheres
|
|
||||||
BASE_SPRITEL = $F0
|
|
||||||
BASE_SPRITEH = $F1
|
|
||||||
CURRENT_SPRITEL = $F2
|
|
||||||
CURRENT_SPRITEH = $F3
|
|
||||||
XMISSION_COUNT = $F4
|
|
||||||
REF1L = $F5
|
|
||||||
REF1H = $F6
|
|
||||||
REF2L = $F7
|
|
||||||
REF2H = $F8
|
|
||||||
REFCOUNT = $F9
|
|
||||||
|
|
||||||
; BIOS
|
|
||||||
STRING_COUNT = $F0
|
|
||||||
LEAD0 = $F1
|
|
||||||
SCROLL_OUT = $F2
|
|
||||||
SCROLL_IN = $F3
|
|
||||||
MEMCOUNT = $F4
|
|
||||||
FAKE_KEY_COUNT = $F5
|
|
||||||
|
|
||||||
; OPENER
|
|
||||||
TICKER = $F1
|
|
||||||
P2_OFFSET = $F2
|
|
||||||
|
|
||||||
; hgr_copy
|
; hgr_copy
|
||||||
HGR_COPY_Y1 = $F1
|
HGR_COPY_Y1 = $F1
|
||||||
|
@ -250,7 +213,7 @@ FIRE_COLOR = $F3
|
||||||
|
|
||||||
SCROLL_LENGTH = $F4
|
SCROLL_LENGTH = $F4
|
||||||
OFFSET = $F5
|
OFFSET = $F5
|
||||||
|
TREE_COUNT = $F6
|
||||||
|
|
||||||
|
|
||||||
;==============================================
|
;==============================================
|
||||||
|
|
Loading…
Reference in New Issue
Block a user