mirror of
https://github.com/deater/dos33fsprogs.git
synced 2024-12-25 20:30:31 +00:00
vs: add some missing files
This commit is contained in:
parent
26dd455145
commit
be70971b04
@ -24,7 +24,7 @@ SCROLLER: scroller.o
|
|||||||
|
|
||||||
scroller.o: scroller.s gr_copy.s gr_unrle.s gr_unrle_large.s \
|
scroller.o: scroller.s gr_copy.s gr_unrle.s gr_unrle_large.s \
|
||||||
gr_copy_large.s \
|
gr_copy_large.s \
|
||||||
zp.inc hardware.inc desire.inc spaceman.inc
|
zp.inc hardware.inc desire.inc spaceman.inc spaceman2.inc
|
||||||
ca65 -o scroller.o scroller.s -l scroller.lst
|
ca65 -o scroller.o scroller.s -l scroller.lst
|
||||||
|
|
||||||
####
|
####
|
||||||
@ -36,6 +36,9 @@ desire.inc: desire.png desire2.png
|
|||||||
spaceman.inc: spaceman_big.png
|
spaceman.inc: spaceman_big.png
|
||||||
$(PNG2RLE) asm spaceman_big.png spaceman_rle > spaceman.inc
|
$(PNG2RLE) asm spaceman_big.png spaceman_rle > spaceman.inc
|
||||||
|
|
||||||
|
spaceman2.inc: spaceman_big2.png
|
||||||
|
$(PNG2RLE) asm spaceman_big2.png spaceman2_rle > spaceman2.inc
|
||||||
|
|
||||||
|
|
||||||
####
|
####
|
||||||
|
|
||||||
|
@ -6,6 +6,29 @@
|
|||||||
.include "zp.inc"
|
.include "zp.inc"
|
||||||
.include "hardware.inc"
|
.include "hardware.inc"
|
||||||
|
|
||||||
|
;PT3_USE_ZERO_PAGE=0
|
||||||
|
|
||||||
|
;===================
|
||||||
|
; PT3 Setup
|
||||||
|
|
||||||
|
lda #0
|
||||||
|
sta DONE_PLAYING
|
||||||
|
lda #1
|
||||||
|
sta LOOP
|
||||||
|
|
||||||
|
jsr mockingboard_detect
|
||||||
|
bcc mockingboard_not_found
|
||||||
|
setup_interrupt:
|
||||||
|
jsr mockingboard_init
|
||||||
|
jsr mockingboard_setup_interrupt
|
||||||
|
jsr reset_ay_both
|
||||||
|
jsr clear_ay_both
|
||||||
|
jsr pt3_init_song
|
||||||
|
|
||||||
|
start_interrupts:
|
||||||
|
cli
|
||||||
|
|
||||||
|
mockingboard_not_found:
|
||||||
|
|
||||||
;===================
|
;===================
|
||||||
; init screen
|
; init screen
|
||||||
@ -61,13 +84,22 @@
|
|||||||
jsr wait_until_keypress
|
jsr wait_until_keypress
|
||||||
|
|
||||||
;=============================
|
;=============================
|
||||||
; Load spaceman
|
; Load spaceman top
|
||||||
|
|
||||||
lda #<spaceman_rle
|
lda #<spaceman_rle
|
||||||
sta GBASL
|
sta GBASL
|
||||||
lda #>spaceman_rle
|
lda #>spaceman_rle
|
||||||
sta GBASH
|
sta GBASH
|
||||||
lda #$a0
|
lda #$90
|
||||||
|
jsr load_rle_large
|
||||||
|
|
||||||
|
; Load spaceman bottom
|
||||||
|
|
||||||
|
lda #<spaceman2_rle
|
||||||
|
sta GBASL
|
||||||
|
lda #>spaceman2_rle
|
||||||
|
sta GBASH
|
||||||
|
lda #$A0
|
||||||
jsr load_rle_large
|
jsr load_rle_large
|
||||||
|
|
||||||
|
|
||||||
@ -76,44 +108,65 @@ rescroll:
|
|||||||
lda #0
|
lda #0
|
||||||
sta SCROLL_COUNT
|
sta SCROLL_COUNT
|
||||||
|
|
||||||
|
lda #<$9000
|
||||||
|
sta TINL
|
||||||
|
lda #>$9000
|
||||||
|
sta TINH
|
||||||
|
|
||||||
lda #<$A000
|
lda #<$A000
|
||||||
sta OUTL
|
sta BINL
|
||||||
sta INL
|
|
||||||
lda #>$A000
|
lda #>$A000
|
||||||
sta OUTH
|
sta BINH
|
||||||
sta INH
|
|
||||||
|
|
||||||
; delay
|
; delay
|
||||||
lda #200
|
lda #200
|
||||||
jsr WAIT
|
jsr WAIT
|
||||||
|
|
||||||
scroll_loop:
|
scroll_loop:
|
||||||
|
lda TINL
|
||||||
|
sta OUTL
|
||||||
|
lda TINH
|
||||||
|
sta OUTH
|
||||||
|
|
||||||
jsr gr_copy_to_current_large ; copy to page1
|
jsr gr_copy_to_current_large ; copy to page1
|
||||||
jsr page_flip
|
jsr page_flip
|
||||||
|
|
||||||
|
lda #100
|
||||||
|
jsr WAIT
|
||||||
|
|
||||||
sl2:
|
lda BINL
|
||||||
lda INL ; inc to next line
|
|
||||||
clc
|
|
||||||
adc #$28
|
|
||||||
sta INL
|
|
||||||
sta OUTL
|
sta OUTL
|
||||||
lda INH
|
lda BINH
|
||||||
adc #$0
|
|
||||||
sta INH
|
|
||||||
sta OUTH
|
sta OUTH
|
||||||
|
|
||||||
|
jsr gr_copy_to_current_large ; copy to page1
|
||||||
|
jsr page_flip
|
||||||
|
|
||||||
lda #100
|
lda #100
|
||||||
jsr WAIT
|
jsr WAIT
|
||||||
|
|
||||||
|
lda TINL ; inc to next line
|
||||||
|
clc
|
||||||
|
adc #$28
|
||||||
|
sta TINL
|
||||||
|
lda TINH
|
||||||
|
adc #$0
|
||||||
|
sta TINH
|
||||||
|
|
||||||
|
lda BINL ; inc to next line
|
||||||
|
clc
|
||||||
|
adc #$28
|
||||||
|
sta BINL
|
||||||
|
lda BINH
|
||||||
|
adc #$0
|
||||||
|
sta BINH
|
||||||
|
|
||||||
inc SCROLL_COUNT
|
inc SCROLL_COUNT
|
||||||
lda SCROLL_COUNT
|
lda SCROLL_COUNT
|
||||||
|
|
||||||
cmp #72
|
cmp #73
|
||||||
bne scroll_loop
|
bne scroll_loop
|
||||||
|
|
||||||
|
|
||||||
jsr wait_until_keypress
|
jsr wait_until_keypress
|
||||||
|
|
||||||
jmp rescroll
|
jmp rescroll
|
||||||
@ -128,11 +181,6 @@ wait_until_keypress:
|
|||||||
bit KEYRESET
|
bit KEYRESET
|
||||||
rts
|
rts
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
.include "gr_unrle.s"
|
.include "gr_unrle.s"
|
||||||
.include "gr_unrle_large.s"
|
.include "gr_unrle_large.s"
|
||||||
.include "gr_offsets.s"
|
.include "gr_offsets.s"
|
||||||
@ -140,5 +188,20 @@ wait_until_keypress:
|
|||||||
.include "gr_copy_large.s"
|
.include "gr_copy_large.s"
|
||||||
.include "gr_pageflip.s"
|
.include "gr_pageflip.s"
|
||||||
|
|
||||||
|
.include "pt3_lib_core.s"
|
||||||
|
.include "pt3_lib_init.s"
|
||||||
|
.include "pt3_lib_mockingboard_setup.s"
|
||||||
|
.include "interrupt_handler.s"
|
||||||
|
; if you're self patching, detect has to be after interrupt_handler.s
|
||||||
|
.include "pt3_lib_mockingboard_detect.s"
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
.include "desire.inc"
|
.include "desire.inc"
|
||||||
.include "spaceman.inc"
|
.include "spaceman.inc"
|
||||||
|
.include "spaceman2.inc"
|
||||||
|
|
||||||
|
PT3_LOC = song
|
||||||
|
.align $100
|
||||||
|
song:
|
||||||
|
.incbin "../pt3_player/music/DF.PT3"
|
||||||
|
@ -67,9 +67,17 @@ DONE_SONG = $89
|
|||||||
PT3_TEMP = $8A
|
PT3_TEMP = $8A
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
DISP_PAGE = $ED ; ALL
|
DISP_PAGE = $ED ; ALL
|
||||||
DRAW_PAGE = $EE ; ALL
|
DRAW_PAGE = $EE ; ALL
|
||||||
|
|
||||||
|
|
||||||
|
TINL = $F0
|
||||||
|
TINH = $F1
|
||||||
|
BINL = $F2
|
||||||
|
BINH = $F3
|
||||||
|
|
||||||
|
|
||||||
SCROLL_COUNT = $F9
|
SCROLL_COUNT = $F9
|
||||||
TEMP = $FA
|
TEMP = $FA
|
||||||
TEMPY = $FB
|
TEMPY = $FB
|
||||||
|
Loading…
Reference in New Issue
Block a user