simplify and fix iec_turnaround_to_listen based on 1541-III documentation

This commit is contained in:
Paul Gardner-Stephen committed 2019-05-04 22:13:59 +09:30
1 parent 37277ba5a3
commit acbac9e5f8
1 file changed
+18 -14
+18 -14
View File
@@ -16,21 +16,25 @@ iec_turnaround_to_listen:
and #$40
bne -
ldx #$ff
* lda $dd00
and #$40
bne +
dex
bne -
jsr printf
.byte "TURNAROUND FAILED - FILE NOT FOUND?",$0d,$00
;; http://www.zimmers.net/anonftp/pub/cbm/programming/serial-bus.pdf
;; page 8 tells us we should not do anything here after waiting for
;; the clock line to assert.
;; Timeout = file not found error
;; (https://www.pagetable.com/?p=1023)
lda #4
sec
rts
;; ldx #$ff
;; * lda $dd00
;; and #$40
;; bne +
;; dex
;; bne -
;; jsr printf
;; .byte "TURNAROUND FAILED - FILE NOT FOUND?",$0d,$00
;; ;; Timeout = file not found error
;; ;; (https://www.pagetable.com/?p=1023)
;; lda #4
;; sec
;; rts
*
jsr printf
.byte "TURNAROUND SUCEEDED",$0d,$00