mist: loading from all 5 save games works

This commit is contained in:
Vince Weaver 2020-09-01 22:06:12 -04:00
parent bd3c98f3f1
commit 8bd16e72c6
3 changed files with 61 additions and 26 deletions

View File

@ -2,50 +2,50 @@
; external routines
; linking_noise.s
play_link_noise =$141b
play_link_noise =$141e
; decompress_fast_v2.s
decompress_lzsa2_fast =$1437
getsrc_smc =$152d
decompress_lzsa2_fast =$143a
getsrc_smc =$1530
; draw_pointer.s
draw_pointer =$153a
draw_pointer =$153d
; end_level.s
end_level =$16a8
end_level =$16ab
; gr_copy.s
gr_copy_to_current =$16ca
gr_copy_to_current =$16cd
; gr_fast_clear.s
clear_bottom =$17f0
clear_all =$182e
clear_all_color =$1853
clear_bottom =$17f3
clear_all =$1831
clear_all_color =$1856
; gr_offsets.s
gr_offsets =$1871
gr_offsets =$1874
; gr_page_flip.s
page_flip =$18a1
page_flip =$18a4
; gr_putsprite_crop.s
put_sprite_crop =$18bb
psc_smc1 =$18de
psc_smc2 =$1976
put_sprite_crop =$18be
psc_smc1 =$18e1
psc_smc2 =$1979
; keyboard.s
handle_keypress =$19f7
change_direction =$1abb
change_location =$1af4
handle_keypress =$19fa
change_direction =$1abe
change_location =$1af7
; text_print.s
move_and_print =$1b8c
ps_smc1 =$1bb9
move_and_print =$1b8f
ps_smc1 =$1bbc
; page_sprites.inc
blue_page_sprite =$1c97
red_page_sprite =$1cad
white_page_sprite =$1cc3
blue_page_small_sprite =$1cd9
red_page_small_sprite =$1ce1
blue_page_sprite =$1cd8
red_page_sprite =$1cee
white_page_sprite =$1d04
blue_page_small_sprite =$1d1a
red_page_small_sprite =$1d22

View File

@ -8,6 +8,9 @@
load_game:
bit KEYRESET ; clear keyboard buffer
;===============================
; print "are you sure" message
bit SET_TEXT ; set text mode
lda #' '|$80
@ -38,9 +41,36 @@ wait_load_confirmation:
cmp #'Y'
bne done_load
; actually load it
;===============================
; print "Which one?"
lda #LOAD_SAVE5
jsr clear_all ; clear screen
lda #<which_message
sta OUTL
lda #>which_message
sta OUTH
jsr move_and_print
jsr page_flip
which_load_confirmation:
lda KEYPRESS
bpl which_load_confirmation
bit KEYRESET ; clear keypress
and #$7f
sec
sbc #'1'
bmi done_load
cmp #5
bcs done_load
; actually load it
clc
adc #LOAD_SAVE1
sta WHICH_LOAD
jsr load_file
@ -118,6 +148,8 @@ done_store:
which_message:
.byte 9,5,"LOAD WHICH GAME (1-5)?",0
load_message:
.byte 10,5,"LOAD GAME FROM DISK",0

View File

@ -90,6 +90,9 @@ change_disk:
ldx WHICH_LOAD
lda which_disk_array,X
clc
adc #48
ldy #19
sta (OUTL),Y