Apple-2-SW/dos33fsprogs
1
0
Fork 0
mirror of https://github.com/deater/dos33fsprogs.git synced 2024-12-27 02:31:00 +00:00
Code Issues Projects Releases Wiki Activity
9278367090
dos33fsprogs/mist/qload.s

247 lines
4.7 KiB
ArmAsm
Raw Normal View History

mist: move to fast qboot disk loader by qkumba much faster! have to fix lots of things that broke
2020-09-01 20:27:34 +00:00
; Loader for MIST
.include "zp.inc"
.include "hardware.inc"
.include "common_defines.inc"
mist: add save game support had to shar a lot of code with load support so would fit not much room left
2020-09-05 04:34:14 +00:00
.include "qboot.inc"
mist: move to fast qboot disk loader by qkumba much faster! have to fix lots of things that broke
2020-09-01 20:27:34 +00:00
qload_start:
mist: add save game support had to shar a lot of code with load support so would fit not much room left
2020-09-05 04:34:14 +00:00
; init the write code
mist: fix bugs with save games on real hardware didn't trigger on cffa3k or emulator first was I was accidentally forcing slot 6 the other was the timing-sensitive write routine was straddling a page boundary, leading to the cycle-counted write code taking the wrong number of cycles
2020-09-06 21:17:12 +00:00
lda WHICH_SLOT
mist: add save game support had to shar a lot of code with load support so would fit not much room left
2020-09-05 04:34:14 +00:00
jsr popwr_init
mist: move to fast qboot disk loader by qkumba much faster! have to fix lots of things that broke
2020-09-01 20:27:34 +00:00
; first time entry
mist: add back text title screen goes by too quickly now
2020-09-02 04:49:51 +00:00
; start by loading text title
mist: move to fast qboot disk loader by qkumba much faster! have to fix lots of things that broke
2020-09-01 20:27:34 +00:00
mist: add back text title screen goes by too quickly now
2020-09-02 04:49:51 +00:00
lda #LOAD_TEXT_TITLE ; load title
mist: move to fast qboot disk loader by qkumba much faster! have to fix lots of things that broke
2020-09-01 20:27:34 +00:00
sta WHICH_LOAD
mist: you are prompted to switch disks again need to add code to validate you're on the right one
2020-09-02 00:01:05 +00:00
lda #1
sta CURRENT_DISK ; current disk number
mist: add back text title screen goes by too quickly now
2020-09-02 04:49:51 +00:00
jsr load_file
jsr $800
lda #LOAD_TITLE ; load title
sta WHICH_LOAD
mist: move to fast qboot disk loader by qkumba much faster! have to fix lots of things that broke
2020-09-01 20:27:34 +00:00
main_game_loop:
jsr load_file
mist: load games work again
2020-09-02 01:31:15 +00:00
lda WHICH_LOAD
bne not_title
mist: move to fast qboot disk loader by qkumba much faster! have to fix lots of things that broke
2020-09-01 20:27:34 +00:00
mist: load games work again
2020-09-02 01:31:15 +00:00
start_title:
jsr $4000
jmp main_game_loop
not_title:
jsr $2000
jmp main_game_loop
mist: you are prompted to switch disks again need to add code to validate you're on the right one
2020-09-02 00:01:05 +00:00
;====================================
; loads file specified by WHICH_LOAD
;====================================
load_file:
ldx WHICH_LOAD
lda which_disk_array,X
cmp CURRENT_DISK
bne change_disk
mist: verify disk was switched before loading files from it not a very robust check, mostly just a sanity check
2020-09-03 18:27:03 +00:00
load_file_no_diskcheck:
mist: you are prompted to switch disks again need to add code to validate you're on the right one
2020-09-02 00:01:05 +00:00
lda load_address_array,X
sta load_address
lda track_array,X
sta load_track
lda sector_array,X
sta load_sector
lda length_array,X
sta load_length
mist: load games work again
2020-09-02 01:31:15 +00:00
jsr load_new
mist: you are prompted to switch disks again need to add code to validate you're on the right one
2020-09-02 00:01:05 +00:00
mist: load games work again
2020-09-02 01:31:15 +00:00
rts
mist: you are prompted to switch disks again need to add code to validate you're on the right one
2020-09-02 00:01:05 +00:00
mist: move to fast qboot disk loader by qkumba much faster! have to fix lots of things that broke
2020-09-01 20:27:34 +00:00
;===================================================
;===================================================
mist: you are prompted to switch disks again need to add code to validate you're on the right one
2020-09-02 00:01:05 +00:00
; change disk
mist: move to fast qboot disk loader by qkumba much faster! have to fix lots of things that broke
2020-09-01 20:27:34 +00:00
;===================================================
;===================================================
mist: you are prompted to switch disks again need to add code to validate you're on the right one
2020-09-02 00:01:05 +00:00
change_disk:
mist: move to fast qboot disk loader by qkumba much faster! have to fix lots of things that broke
2020-09-01 20:27:34 +00:00
mist: you are prompted to switch disks again need to add code to validate you're on the right one
2020-09-02 00:01:05 +00:00
; turn off disk drive light
jsr driveoff
mist: move to fast qboot disk loader by qkumba much faster! have to fix lots of things that broke
2020-09-01 20:27:34 +00:00
jsr TEXT
jsr HOME
lda #<error_string
sta OUTL
lda #>error_string
sta OUTH
mist: update save files
2020-09-02 00:47:16 +00:00
ldx WHICH_LOAD
lda which_disk_array,X
mist: loading from all 5 save games works
2020-09-02 02:06:12 +00:00
clc
adc #48
mist: update save files
2020-09-02 00:47:16 +00:00
ldy #19
sta (OUTL),Y
ldy #0
mist: move to fast qboot disk loader by qkumba much faster! have to fix lots of things that broke
2020-09-01 20:27:34 +00:00
quick_print:
lda (OUTL),Y
beq quick_print_done
jsr COUT1
iny
jmp quick_print
quick_print_done:
fnf_keypress:
lda KEYPRESS
bpl fnf_keypress
bit KEYRESET
mist: verify disk was switched before loading files from it not a very robust check, mostly just a sanity check
2020-09-03 18:27:03 +00:00
;==============================================
; actually verify proper disk is there
; read T0:S0 and verify proper disk
lda WHICH_LOAD
pha
ldx #LOAD_FIRST_SECTOR ; load track 0 sector 0
stx WHICH_LOAD
jsr load_file_no_diskcheck
pla
sta WHICH_LOAD
tax
; first sector now in $c00
; offset 59
mist: fix bugs with save games on real hardware didn't trigger on cffa3k or emulator first was I was accidentally forcing slot 6 the other was the timing-sensitive write routine was straddling a page boundary, leading to the cycle-counted write code taking the wrong number of cycles
2020-09-06 21:17:12 +00:00
; disk1 = $0a
mist: verify disk was switched before loading files from it not a very robust check, mostly just a sanity check
2020-09-03 18:27:03 +00:00
; disk2 = $32 ('2')
; disk3 = $33 ('3')
lda $c59
mist: fix bugs with save games on real hardware didn't trigger on cffa3k or emulator first was I was accidentally forcing slot 6 the other was the timing-sensitive write routine was straddling a page boundary, leading to the cycle-counted write code taking the wrong number of cycles
2020-09-06 21:17:12 +00:00
cmp #$0a
mist: verify disk was switched before loading files from it not a very robust check, mostly just a sanity check
2020-09-03 18:27:03 +00:00
beq is_disk1
cmp #$32
beq is_disk2
cmp #$33
beq is_disk3
bne change_disk ; unknown disk
is_disk1:
lda #1
bne disk_compare
is_disk2:
lda #2
bne disk_compare
is_disk3:
lda #3
disk_compare:
cmp which_disk_array,X
bne change_disk ; disk mismatch
;==============================================
; all good, retry original load
jsr HOME
mist: move to fast qboot disk loader by qkumba much faster! have to fix lots of things that broke
2020-09-01 20:27:34 +00:00
ldx WHICH_LOAD
mist: you are prompted to switch disks again need to add code to validate you're on the right one
2020-09-02 00:01:05 +00:00
lda which_disk_array,X
sta CURRENT_DISK
mist: move to fast qboot disk loader by qkumba much faster! have to fix lots of things that broke
2020-09-01 20:27:34 +00:00
mist: you are prompted to switch disks again need to add code to validate you're on the right one
2020-09-02 00:01:05 +00:00
jmp load_file
mist: move to fast qboot disk loader by qkumba much faster! have to fix lots of things that broke
2020-09-01 20:27:34 +00:00
mist: you are prompted to switch disks again need to add code to validate you're on the right one
2020-09-02 00:01:05 +00:00
; offset for disk number is 19
error_string:
.byte "PLEASE INSERT DISK 1, PRESS RETURN",0
mist: move to fast qboot disk loader by qkumba much faster! have to fix lots of things that broke
2020-09-01 20:27:34 +00:00
which_disk_array:
.byte 1,1,3,3 ; MIST_TITLE,MIST,MECHE,SELENA
.byte 1,1,3,2 ; OCTAGON,VIEWER,STONEY,CHANNEL
.byte 2,1,2,2 ; CABIN,DENTIST,ARBOR,NIBEL
.byte 1,1,1,3 ; SHIP,GENERATOR,D'NI,SUB
mist: update save files
2020-09-02 00:47:16 +00:00
.byte 1 ; TEXT_TITLE
.byte 1,1,1,1,1 ; SAVE1,SAVE2,SAVE3,SAVE4,SAVE5
mist: verify disk was switched before loading files from it not a very robust check, mostly just a sanity check
2020-09-03 18:27:03 +00:00
.byte $f ; FIRST_SECTOR
mist: move to fast qboot disk loader by qkumba much faster! have to fix lots of things that broke
2020-09-01 20:27:34 +00:00
load_address_array:
.byte $40,$20,$20,$20 ; MIST_TITLE,MIST,MECHE,SELENA
.byte $20,$20,$20,$20 ; OCTAGON,VIEWER,STONEY,CHANNEL
.byte $20,$20,$20,$20 ; CABIN,DENTIST,ARBOR,NIBEL
.byte $20,$20,$20,$20 ; SHIP,GENERATOR,D'NI,SUB
mist: update save files
2020-09-02 00:47:16 +00:00
.byte $08 ; TEXT_TITLE
.byte $0E,$0E,$0E,$0E
.byte $0E ; SAVE1,SAVE2,SAVE3,SAVE4,SAVE5
mist: verify disk was switched before loading files from it not a very robust check, mostly just a sanity check
2020-09-03 18:27:03 +00:00
.byte $0C ; FIRST_SECTOR
mist: move to fast qboot disk loader by qkumba much faster! have to fix lots of things that broke
2020-09-01 20:27:34 +00:00
track_array:
mist: sub: re-arrange disk3 so it fits
2020-09-06 16:45:41 +00:00
.byte 2, 8, 1,21 ; MIST_TITLE,MIST,MECHE,SELENA
.byte 18,31,11, 1 ; OCTAGON,VIEWER,STONEY,CHANNEL
mist: move to fast qboot disk loader by qkumba much faster! have to fix lots of things that broke
2020-09-01 20:27:34 +00:00
.byte 27,26,10,20 ; CABIN,DENTIST,ARBOR,NIBEL
mist: sub: re-arrange disk3 so it fits
2020-09-06 16:45:41 +00:00
.byte 30,32,28,30 ; SHIP,GENERATOR,D'NI,SUB
mist: update save files
2020-09-02 00:47:16 +00:00
.byte 0 ; TEXT_TITLE
.byte 0, 0, 0, 0, 0 ; SAVE1,SAVE2,SAVE3,SAVE4,SAVE5
mist: verify disk was switched before loading files from it not a very robust check, mostly just a sanity check
2020-09-03 18:27:03 +00:00
.byte 0 ; FIRST_SECTOR
mist: move to fast qboot disk loader by qkumba much faster! have to fix lots of things that broke
2020-09-01 20:27:34 +00:00
sector_array:
.byte 0, 0, 0, 0 ; MIST_TITLE,MIST,MECHE,SELENA
.byte 0, 8, 0, 0 ; OCTAGON,VIEWER,STONEY,CHANNEL
.byte 0, 0, 0, 0 ; CABIN,DENTIST,ARBOR,NIBEL
mist: make atrus viewer message closer to actual game less sarcastic, but maybe less of a spoiler now someone on twitter suggested this
2020-09-13 16:42:07 +00:00
.byte 0,13, 0, 1 ; SHIP,GENERATOR,D'NI,SUB
mist: add back text title screen goes by too quickly now
2020-09-02 04:49:51 +00:00
.byte 6 ; TEXT_TITLE
mist: load games work again
2020-09-02 01:31:15 +00:00
.byte 11,12,13,14,15 ; SAVE1,SAVE2,SAVE3,SAVE4,SAVE5
mist: verify disk was switched before loading files from it not a very robust check, mostly just a sanity check
2020-09-03 18:27:03 +00:00
.byte 0 ; FIRST_SECTOR
mist: move to fast qboot disk loader by qkumba much faster! have to fix lots of things that broke
2020-09-01 20:27:34 +00:00
length_array:
.byte 83,159,157,145 ; MIST_TITLE,MIST,MECHE,SELENA
mist: make atrus viewer message closer to actual game less sarcastic, but maybe less of a spoiler now someone on twitter suggested this
2020-09-13 16:42:07 +00:00
.byte 128, 20,158,135 ; OCTAGON,VIEWER,STONEY,CHANNEL
mist: move to fast qboot disk loader by qkumba much faster! have to fix lots of things that broke
2020-09-01 20:27:34 +00:00
.byte 61, 31,159,109 ; CABIN,DENTIST,ARBOR,NIBEL
mist: sub: re-arrange disk3 so it fits
2020-09-06 16:45:41 +00:00
.byte 20, 33, 27, 78 ; SHIP,GENERATOR,D'NI,SUB
mist: add back text title screen goes by too quickly now
2020-09-02 04:49:51 +00:00
.byte 3 ; TEXT_TITLE
mist: update save files
2020-09-02 00:47:16 +00:00
.byte 1,1,1,1,1 ; SAVE1,SAVE2,SAVE3,SAVE4,SAVE5
mist: verify disk was switched before loading files from it not a very robust check, mostly just a sanity check
2020-09-03 18:27:03 +00:00
.byte 1 ; FIRST_SECTOR
mist: move to fast qboot disk loader by qkumba much faster! have to fix lots of things that broke
2020-09-01 20:27:34 +00:00
.include "audio.s"
.include "linking_noise.s"
.include "decompress_fast_v2.s"
.include "draw_pointer.s"
.include "end_level.s"
.include "gr_copy.s"
.include "gr_fast_clear.s"
.include "gr_offsets.s"
.include "gr_pageflip.s"
.include "gr_putsprite_crop.s"
.include "keyboard.s"
.include "text_print.s"
.include "loadstore.s"
mist: add joystick support made room by removing flipped-sprite support which we weren't using
2020-09-06 04:28:26 +00:00
.include "joystick.s"
mist: move to fast qboot disk loader by qkumba much faster! have to fix lots of things that broke
2020-09-01 20:27:34 +00:00
.include "page_sprites.inc"
.include "common_sprites.inc"
mist: fix bugs with save games on real hardware didn't trigger on cffa3k or emulator first was I was accidentally forcing slot 6 the other was the timing-sensitive write routine was straddling a page boundary, leading to the cycle-counted write code taking the wrong number of cycles
2020-09-06 21:17:12 +00:00
.include "qkumba_popwr.s"
mist: move to fast qboot disk loader by qkumba much faster! have to fix lots of things that broke
2020-09-01 20:27:34 +00:00
qload_end:
mist: update save files
2020-09-02 00:47:16 +00:00
.assert (>qload_end - >qload_start) < $e , error, "loader too big"
Reference in New Issue Copy Permalink