Compare commits
2
Commits
7ee9d164e2
...
0ec343a727
| Author | SHA1 | Date | |
|---|---|---|---|
|
|
0ec343a727 | ||
|
|
729a410079 |
No files matched your search
@@ -23,6 +23,11 @@ Changes:
|
||||
sets ST to $80 (device not present) and returns, instead of waiting forever.
|
||||
- src/kernal/iec/close_iec.s (2026-10-15): a CLOSE that finds no device sets ST to $80
|
||||
(device not present), and still frees the file number.
|
||||
- src/kernal/iec/unlsn.s, untlk.s (2026-10-15): UNLSN and UNTLK end with CLK, DATA, and ATN
|
||||
released; UNLSN left CLK pulled, and UNTLK waited for a talker to pull CLK, which after
|
||||
UNTALK none does, and then left CLK pulled.
|
||||
- src/kernal/iec/iec_return.s (2026-10-15): a serial routine that finds no device releases
|
||||
CLK, DATA, and ATN; it left CLK pulled.
|
||||
- NOTICE: this file.
|
||||
|
||||
The licence terms are unchanged; see LICENSE, COPYING, and COPYING.LESSER.
|
||||
@@ -36,8 +36,8 @@ iec_return_success:
|
||||
|
||||
iec_return_DEVICE_NOT_FOUND:
|
||||
|
||||
; Set IEC line to normal idle state
|
||||
jsr iec_set_idle
|
||||
; Nobody answers: release all lines, so the bus is idle - see https://www.pagetable.com/?p=1135
|
||||
jsr iec_release_atn_clk_data
|
||||
|
||||
; BSOUR is certainly not valid anymore
|
||||
lda #$00
|
||||
|
||||
@@ -42,7 +42,15 @@ UNLSN:
|
||||
; Buffer empty, send the command
|
||||
lda #$3F
|
||||
|
||||
jmp common_open_close_unlsn_second
|
||||
common_unlsn_untlk: ; common part of UNLSN and UNTLK
|
||||
|
||||
jsr common_open_close_unlsn_second
|
||||
bcs @1
|
||||
|
||||
; The transmission is over: release CLK and DATA too, so the bus is idle - see https://www.pagetable.com/?p=1135
|
||||
jmp iec_release_clk_data
|
||||
@1:
|
||||
rts
|
||||
|
||||
} else {
|
||||
|
||||
|
||||
@@ -39,10 +39,11 @@ UNTLK:
|
||||
sta IECPROTO
|
||||
}
|
||||
|
||||
; Buffer empty, send the command
|
||||
; Buffer empty, send the command; the talker releases the bus - see https://www.pagetable.com/?p=1031
|
||||
lda #$5F
|
||||
jmp common_unlsn_untlk
|
||||
|
||||
common_untlk_tksa: ; common part of UNTLK and TKSA
|
||||
common_untlk_tksa: ; the rest of TKSA
|
||||
|
||||
; XXX - for TKSA, is it really the right place to do a turnaround? I have some doubts
|
||||
; (it forces us to send the TKSA command 'manually' sometimes), but
|
||||
|
||||
Reference in new issue
Block a user