mirror of
https://github.com/deater/dos33fsprogs.git
synced 2024-06-09 07:29:32 +00:00
second: start making it autoplay
This commit is contained in:
parent
48ec58298e
commit
bedaba77c1
|
@ -17,12 +17,12 @@ plot:
|
||||||
|
|
||||||
bcc plot_even ; 2nt/3
|
bcc plot_even ; 2nt/3
|
||||||
plot_odd:
|
plot_odd:
|
||||||
ldx #$f0 ; 2
|
ldy #$f0 ; 2
|
||||||
bcs plot_c_done ; 2nt/3
|
bcs plot_c_done ; 2nt/3
|
||||||
plot_even:
|
plot_even:
|
||||||
ldx #$0f ; 2
|
ldy #$0f ; 2
|
||||||
plot_c_done:
|
plot_c_done:
|
||||||
stx MASK ; 3
|
sty MASK ; 3
|
||||||
|
|
||||||
asl ; shift back (now even) ; 2
|
asl ; shift back (now even) ; 2
|
||||||
tay ; 2
|
tay ; 2
|
||||||
|
|
25
demos/second/irq_wait.s
Normal file
25
demos/second/irq_wait.s
Normal file
|
@ -0,0 +1,25 @@
|
||||||
|
; wait A * 1 50Hz tick
|
||||||
|
wait_ticks:
|
||||||
|
sta IRQ_COUNTDOWN
|
||||||
|
wait_tick_loop:
|
||||||
|
lda IRQ_COUNTDOWN
|
||||||
|
bne wait_tick_loop
|
||||||
|
wait_tick_done:
|
||||||
|
rts
|
||||||
|
|
||||||
|
|
||||||
|
wait_seconds:
|
||||||
|
tax
|
||||||
|
|
||||||
|
wait_seconds_loop:
|
||||||
|
lda #50 ; wait 1s
|
||||||
|
jsr wait_ticks
|
||||||
|
|
||||||
|
lda KEYPRESS
|
||||||
|
bmi wait_seconds_done
|
||||||
|
|
||||||
|
dex
|
||||||
|
bpl wait_seconds_loop
|
||||||
|
wait_seconds_done:
|
||||||
|
bit KEYRESET
|
||||||
|
rts
|
|
@ -5,7 +5,8 @@ PNG_TO_HGR = ../../../../utils/hgr-utils/png2hgr
|
||||||
PNG2GR = ../../../../utils/gr-utils/png2gr
|
PNG2GR = ../../../../utils/gr-utils/png2gr
|
||||||
|
|
||||||
all: igl.hgr.zx02 igr.hgr.zx02 fc_sr_logo.hgr.zx02 \
|
all: igl.hgr.zx02 igr.hgr.zx02 fc_sr_logo.hgr.zx02 \
|
||||||
demosplash.hgr.zx02 mockingboard.hgr.zx02
|
demosplash.hgr.zx02 mockingboard.hgr.zx02 \
|
||||||
|
vmw.hgr.zx02
|
||||||
|
|
||||||
####
|
####
|
||||||
|
|
||||||
|
@ -51,9 +52,18 @@ igr.hgr: igr.png
|
||||||
|
|
||||||
####
|
####
|
||||||
|
|
||||||
|
vmw.hgr.zx02: vmw.hgr
|
||||||
|
$(ZX02) vmw.hgr vmw.hgr.zx02
|
||||||
|
|
||||||
|
vmw.hgr: vmw.png
|
||||||
|
$(PNG_TO_HGR) vmw.png > vmw.hgr
|
||||||
|
|
||||||
|
|
||||||
|
####
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
####
|
####
|
||||||
|
|
||||||
clean:
|
clean:
|
||||||
rm -f *~
|
rm -f *~ *.zx02
|
||||||
|
|
BIN
demos/second/part01_intropan/graphics/vmw.png
Normal file
BIN
demos/second/part01_intropan/graphics/vmw.png
Normal file
Binary file not shown.
After Width: | Height: | Size: 817 B |
|
@ -29,36 +29,77 @@ intro_start:
|
||||||
lda #0
|
lda #0
|
||||||
jsr hgr_page1_clearscreen
|
jsr hgr_page1_clearscreen
|
||||||
|
|
||||||
|
;=========================
|
||||||
|
; wait 15s doing nothing
|
||||||
|
;=========================
|
||||||
|
|
||||||
; demosplash
|
lda #15
|
||||||
|
jsr wait_seconds
|
||||||
|
|
||||||
|
; pre-load vmw message
|
||||||
|
|
||||||
|
lda #<vmw_data
|
||||||
|
sta zx_src_l+1
|
||||||
|
lda #>vmw_data
|
||||||
|
sta zx_src_h+1
|
||||||
|
lda #$40
|
||||||
|
jsr zx02_full_decomp
|
||||||
|
|
||||||
|
;========================
|
||||||
|
; vmw message for 5s
|
||||||
|
;========================
|
||||||
|
|
||||||
|
bit PAGE2
|
||||||
|
lda #5
|
||||||
|
jsr wait_seconds
|
||||||
|
|
||||||
|
; switch back, wait 2 seconds
|
||||||
|
|
||||||
|
bit PAGE1
|
||||||
|
lda #2
|
||||||
|
jsr wait_seconds
|
||||||
|
|
||||||
|
; preload demosplash message
|
||||||
|
|
||||||
lda #<demosplash_data
|
lda #<demosplash_data
|
||||||
sta zx_src_l+1
|
sta zx_src_l+1
|
||||||
|
|
||||||
lda #>demosplash_data
|
lda #>demosplash_data
|
||||||
sta zx_src_h+1
|
sta zx_src_h+1
|
||||||
|
lda #$40
|
||||||
lda #$20
|
|
||||||
|
|
||||||
jsr zx02_full_decomp
|
jsr zx02_full_decomp
|
||||||
|
|
||||||
jsr wait_until_keypress
|
;===================
|
||||||
|
; demosplash for 5s
|
||||||
|
;===================
|
||||||
|
|
||||||
|
bit PAGE2
|
||||||
|
lda #5
|
||||||
|
jsr wait_seconds
|
||||||
|
|
||||||
; mockingboard
|
; switch back, wait 2 seconds
|
||||||
|
|
||||||
|
bit PAGE1
|
||||||
|
lda #2
|
||||||
|
jsr wait_seconds
|
||||||
|
|
||||||
|
; pre-load mockingboard
|
||||||
|
|
||||||
lda #<mockingboard_data
|
lda #<mockingboard_data
|
||||||
sta zx_src_l+1
|
sta zx_src_l+1
|
||||||
|
|
||||||
lda #>mockingboard_data
|
lda #>mockingboard_data
|
||||||
sta zx_src_h+1
|
sta zx_src_h+1
|
||||||
|
lda #$40
|
||||||
lda #$20
|
|
||||||
|
|
||||||
jsr zx02_full_decomp
|
jsr zx02_full_decomp
|
||||||
|
|
||||||
jsr wait_until_keypress
|
;=======================
|
||||||
|
; mockingboard for 5s
|
||||||
|
;=======================
|
||||||
|
|
||||||
|
bit PAGE2
|
||||||
|
lda #5
|
||||||
|
jsr wait_seconds
|
||||||
|
|
||||||
|
bit PAGE1
|
||||||
|
|
||||||
;======================================
|
;======================================
|
||||||
;======================================
|
;======================================
|
||||||
|
@ -139,13 +180,15 @@ intro_start:
|
||||||
done_intro:
|
done_intro:
|
||||||
rts
|
rts
|
||||||
|
|
||||||
.align $100
|
;.align $100
|
||||||
.include "../wait_keypress.s"
|
.include "../wait_keypress.s"
|
||||||
.include "../zx02_optim.s"
|
.include "../zx02_optim.s"
|
||||||
.include "../hgr_table.s"
|
.include "../hgr_table.s"
|
||||||
.include "../hgr_clear_screen.s"
|
.include "../hgr_clear_screen.s"
|
||||||
.include "horiz_scroll.s"
|
.include "horiz_scroll.s"
|
||||||
|
|
||||||
|
.include "../irq_wait.s"
|
||||||
|
|
||||||
demosplash_data:
|
demosplash_data:
|
||||||
.incbin "graphics/demosplash.hgr.zx02"
|
.incbin "graphics/demosplash.hgr.zx02"
|
||||||
mockingboard_data:
|
mockingboard_data:
|
||||||
|
@ -157,4 +200,5 @@ intro_right_data:
|
||||||
.incbin "graphics/igr.hgr.zx02"
|
.incbin "graphics/igr.hgr.zx02"
|
||||||
fc_sr_logo_data:
|
fc_sr_logo_data:
|
||||||
.incbin "graphics/fc_sr_logo.hgr.zx02"
|
.incbin "graphics/fc_sr_logo.hgr.zx02"
|
||||||
|
vmw_data:
|
||||||
|
.incbin "graphics/vmw.hgr.zx02"
|
||||||
|
|
|
@ -13,6 +13,7 @@ zooming_circles:
|
||||||
|
|
||||||
;===================
|
;===================
|
||||||
; init screen
|
; init screen
|
||||||
|
|
||||||
bit LORES
|
bit LORES
|
||||||
bit FULLGR
|
bit FULLGR
|
||||||
bit PAGE1
|
bit PAGE1
|
||||||
|
@ -61,15 +62,18 @@ xloop:
|
||||||
|
|
||||||
ldy X2 ; Y==X2 ; 2
|
ldy X2 ; Y==X2 ; 2
|
||||||
txa ; A==Y1 ; 1
|
txa ; A==Y1 ; 1
|
||||||
jsr plot_compat ; (X2,Y1) ; 3
|
jsr plot_compat ; (X2,Y1) ; 3
|
||||||
|
ldy X2
|
||||||
lda Y2 ; A==Y2 ; 2
|
lda Y2 ; A==Y2 ; 2
|
||||||
jsr plot_compat ; (X2,Y2) ; 3
|
jsr plot_compat ; (X2,Y2) ; 3
|
||||||
|
|
||||||
ldy TEMPY ; Y==X1 ; 2
|
ldy TEMPY ; Y==X1 ; 2
|
||||||
txa ; A==Y1 ; 1
|
txa ; A==Y1 ; 1
|
||||||
jsr plot_compat ; (X1,Y1) ; 3
|
jsr plot_compat ; (X1,Y1) ; 3
|
||||||
|
ldy TEMPY
|
||||||
lda Y2 ; A==Y2 ; 2
|
lda Y2 ; A==Y2 ; 2
|
||||||
jsr plot_compat ; (X1,Y2) ; 3
|
jsr plot_compat ; (X1,Y2) ; 3
|
||||||
|
ldy TEMPY
|
||||||
|
|
||||||
inc X2 ; 2
|
inc X2 ; 2
|
||||||
|
|
||||||
|
|
|
@ -298,6 +298,7 @@ load_program_loop:
|
||||||
|
|
||||||
sei
|
sei
|
||||||
|
|
||||||
|
jsr clear_ay_both ; stop from making noise
|
||||||
|
|
||||||
;=============================
|
;=============================
|
||||||
; want to load 10..12
|
; want to load 10..12
|
||||||
|
@ -341,6 +342,10 @@ load_program_loop2:
|
||||||
;==========================
|
;==========================
|
||||||
;==========================
|
;==========================
|
||||||
|
|
||||||
|
; restart music
|
||||||
|
|
||||||
|
cli
|
||||||
|
|
||||||
;=======================
|
;=======================
|
||||||
; run SPHERES
|
; run SPHERES
|
||||||
;============================================
|
;============================================
|
||||||
|
|
Loading…
Reference in New Issue
Block a user