Apple-2-SW/dos33fsprogs
1
0
Fork 0
mirror of https://github.com/deater/dos33fsprogs.git synced 2024-06-20 17:29:28 +00:00
Code Issues Projects Releases Wiki Activity

mist: loader: ask for proper disk# when loading

Browse Source
This commit is contained in:
Vince Weaver 2020-07-15 10:15:02 -04:00
parent 3fa5c406ba
commit d5be9aa3ba
2 changed files with 53 additions and 28 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

48
mist/common_routines.inc
View File

@ -2,54 +2,54 @@
; external routines ; external routines
; loader.s ; loader.s
opendir_filename =$1039 opendir_filename =$1042
; audio.c ; audio.c
play_audio =$134e play_audio =$1369
; decompress_fast_v2.s ; decompress_fast_v2.s
decompress_lzsa2_fast =$145f decompress_lzsa2_fast =$147a
getsrc_smc =$1555 getsrc_smc =$1570
; draw_pointer.s ; draw_pointer.s
draw_pointer =$1562 draw_pointer =$157d
; end_level.s ; end_level.s
end_level =$16ca end_level =$16e9
; gr_copy.s ; gr_copy.s
gr_copy_to_current =$16ec gr_copy_to_current =$170b
; gr_fast_clear.s ; gr_fast_clear.s
clear_bottom =$1812 clear_bottom =$1831
clear_all =$1850 clear_all =$186f
clear_all_color =$1875 clear_all_color =$1894
; gr_offsets.s ; gr_offsets.s
gr_offsets =$1893 gr_offsets =$18b2
; gr_page_flip.s ; gr_page_flip.s
page_flip =$18c3 page_flip =$18e2
; gr_putsprite_crop.s ; gr_putsprite_crop.s
put_sprite_crop =$18dd put_sprite_crop =$18fc
psc_smc1 =$1900 psc_smc1 =$191f
psc_smc2 =$1998 psc_smc2 =$19b7
; keyboard.s ; keyboard.s
handle_keypress =$1a19 handle_keypress =$1a38
change_location =$1afa change_location =$1b19
; text_print.s ; text_print.s
move_and_print =$1b92 move_and_print =$1bb1
ps_smc1 =$1bbf ps_smc1 =$1bde
; page_sprites.inc ; page_sprites.inc
blue_page_sprite =$1ca7 blue_page_sprite =$1cc6
red_page_sprite =$1cbd red_page_sprite =$1cdc
white_page_sprite =$1cd3 white_page_sprite =$1cf2
blue_page_small_sprite =$1ce9 blue_page_small_sprite =$1d08
red_page_small_sprite =$1cf1 red_page_small_sprite =$1d10
; audio files ; audio files
linking_noise = $9000 linking_noise = $9000

33
mist/loader.s
View File

@ -62,6 +62,13 @@ loader_start:
;=================================================== ;===================================================
which_load_loop: which_load_loop:
lda WHICH_LOAD
; update the which-file error message
tay
lda which_disk,Y
sta error_string+19
lda WHICH_LOAD lda WHICH_LOAD
asl asl
@ -147,6 +154,23 @@ filenames:
.word dentist_filename,arbor_filename,nibel_filename,ship_filename .word dentist_filename,arbor_filename,nibel_filename,ship_filename
.word generator_filename,dni_filename .word generator_filename,dni_filename
which_disk:
.byte '1' ; MIST_TITLE
.byte '1' ; MIST
.byte '3' ; MECHE
.byte '3' ; SELENA
.byte '1' ; OCTAGON
.byte '2' ; VIEWER
.byte '3' ; STONEY
.byte '2' ; CHANNEL
.byte '1' ; CABIN
.byte '1' ; DENTIST
.byte '2' ; ARBOR
.byte '2' ; NIBEL
.byte '3' ; SHIP
.byte '1' ; GENERATOR
.byte '1' ; D'NI
intro_filename: intro_filename:
.byte "MIST_TITLE",0 .byte "MIST_TITLE",0
mist_filename: mist_filename:
@ -272,9 +296,9 @@ mlsmc07:lda $c0e8 ; turn off drive motor?
ldy #0 ldy #0
lda #<disk_string lda #<error_string
sta OUTL sta OUTL
lda #>disk_string lda #>error_string
sta OUTH sta OUTH
quick_print: quick_print:
@ -296,8 +320,9 @@ fnf_keypress:
jmp which_load_loop jmp which_load_loop
disk_string: ; offset for disk number is 19
.byte "INSERT OTHER DISK, PRESS RETURN",0 error_string:
.byte "PLEASE INSERT DISK 1, PRESS RETURN",0