mirror of
https://github.com/deater/dos33fsprogs.git
synced 2024-09-28 02:55:03 +00:00
ds: fine tune some things
This commit is contained in:
parent
335f5c0bd2
commit
04c8163e56
@ -53,7 +53,7 @@ musictest.o: musictest.s \
|
||||
pt3_lib_init.s pt3_lib_core.s pt3_lib_mockingboard.s \
|
||||
pt3_lib_play_frame.s pt3_lib_write_frame.s \
|
||||
interrupt_handler.s \
|
||||
missing.s k_40_48d.inc missing_screen_update.s \
|
||||
missing.s k_40_48d.inc \
|
||||
create_update_type1.s \
|
||||
book.s \
|
||||
dya_space_demo2.pt3
|
||||
|
@ -49,9 +49,6 @@ end_book:
|
||||
bit SET_GR ; 4
|
||||
bit FULLGR ; 4
|
||||
|
||||
jsr wait_until_keypressed
|
||||
|
||||
|
||||
;=============================
|
||||
; Load graphic page1
|
||||
|
||||
@ -70,9 +67,6 @@ end_book:
|
||||
; GR part
|
||||
bit PAGE0
|
||||
|
||||
jsr wait_until_keypressed
|
||||
|
||||
|
||||
;==============================
|
||||
; setup graphics for vapor lock
|
||||
;==============================
|
||||
|
@ -144,13 +144,29 @@ missing_display_loop:
|
||||
; do_nothing should be
|
||||
; 4550
|
||||
; -12 jsr/ret to update_type1
|
||||
; -6 jsr do_nothing_missing
|
||||
; - 7 check keypress
|
||||
; - 3 jmp loop
|
||||
;=============
|
||||
; 4522
|
||||
; 4528
|
||||
|
||||
|
||||
; blah, current code the tight loops are right at a page boundary
|
||||
|
||||
do_nothing_missing:
|
||||
|
||||
; want 4528
|
||||
|
||||
; Try X=4 Y=174 cycles=4525 R3
|
||||
|
||||
lda TEMP ; nop 3
|
||||
|
||||
ldy #174 ; 2
|
||||
gloop1: ldx #4 ; 2
|
||||
gloop2: dex ; 2
|
||||
bne gloop2 ; 2nt/3
|
||||
dey ; 2
|
||||
bne gloop1 ; 2nt/3
|
||||
|
||||
jsr do_nothing_missing ; 6
|
||||
|
||||
lda KEYPRESS ; 4
|
||||
bpl missing_no_keypress ; 3
|
||||
@ -163,36 +179,7 @@ missing_no_keypress:
|
||||
|
||||
.align $100
|
||||
|
||||
;=================================
|
||||
; do nothing
|
||||
;=================================
|
||||
; and take 4522 cycles to do it
|
||||
|
||||
|
||||
; blah, current code the tight loops are right at a page boundary
|
||||
|
||||
do_nothing_missing:
|
||||
|
||||
; want 4522-6 (return)=4516
|
||||
|
||||
;Try X=99 Y=9 cycles=4510 R6
|
||||
|
||||
nop
|
||||
nop
|
||||
nop
|
||||
|
||||
ldy #9 ; 2
|
||||
gloop1: ldx #99 ; 2
|
||||
gloop2: dex ; 2
|
||||
bne gloop2 ; 2nt/3
|
||||
dey ; 2
|
||||
bne gloop1 ; 2nt/3
|
||||
|
||||
rts ; 6
|
||||
|
||||
|
||||
|
||||
.include "k_40_48d.inc"
|
||||
|
||||
krg:
|
||||
.byte $0
|
||||
|
||||
|
File diff suppressed because it is too large
Load Diff
File diff suppressed because it is too large
Load Diff
Loading…
Reference in New Issue
Block a user