more work on reading second copy from tape, some cleanup
This commit is contained in:
1 parent
28a96a7ffc
commit
92c8a9d03d
11 files changed
+84
-36
No files matched your search
@@ -9,13 +9,20 @@
|
||||
|
||||
#if CONFIG_TAPE_NORMAL
|
||||
|
||||
tape_normal_get_data_2:
|
||||
|
||||
lda RIPRTY
|
||||
cmp #$01
|
||||
rts
|
||||
|
||||
#elif DISABLED_DISABLED
|
||||
|
||||
tape_normal_get_data_2:
|
||||
|
||||
// First check if there is a need to read anything
|
||||
|
||||
lda PTR1
|
||||
beq tape_normal_get_data_2_checksum
|
||||
// XXX lda PTR1
|
||||
// XXX beq tape_normal_get_data_2_checksum
|
||||
|
||||
// Read sync of the block
|
||||
|
||||
@@ -28,7 +35,32 @@ tape_normal_get_data_2:
|
||||
|
||||
tape_normal_get_data_2_loop:
|
||||
|
||||
// XXX read missing bytes
|
||||
// Read missing bytes
|
||||
|
||||
jsr tape_normal_get_byte
|
||||
bcc tape_normal_get_data_2_loop_byte_OK
|
||||
|
||||
// Problem reading byte
|
||||
|
||||
jsr load_cmp_log_MEMUSS
|
||||
bne tape_normal_get_data_2_loop_advance
|
||||
|
||||
sec
|
||||
rts
|
||||
|
||||
tape_normal_get_data_2_loop_byte_OK:
|
||||
|
||||
jsr load_cmp_log_MEMUSS
|
||||
bne tape_normal_get_data_2_loop_advance
|
||||
|
||||
// This is a byte from the log
|
||||
|
||||
// XXX store correct byte
|
||||
|
||||
|
||||
tape_normal_get_data_2_loop_advance:
|
||||
|
||||
// XXX finish the implementation
|
||||
|
||||
sec
|
||||
rts
|
||||
@@ -48,4 +80,13 @@ tape_normal_get_data_2_done:
|
||||
rts
|
||||
|
||||
|
||||
|
||||
load_cmp_log_MEMUSS:
|
||||
|
||||
// XXX
|
||||
|
||||
!:
|
||||
rts
|
||||
|
||||
|
||||
#endif
|
||||
Reference in new issue
Block a user