21 lines
508 B
ArmAsm
21 lines
508 B
ArmAsm
|
|
// Routine to finalize some IEC commands - which do not end in turnaround and are not followed by others
|
|
// Implemented based on https://www.pagetable.com/?p=1135, https://github.com/mist64/cbmbus_doc
|
|
|
|
|
|
iec_tx_command_finalize:
|
|
|
|
// Store .X and .Y on the stack - preserve them
|
|
txa
|
|
pha
|
|
tya
|
|
pha
|
|
|
|
// Give device some time to complete command reception, release ATN,
|
|
// give it some time again before (possible) next command
|
|
jsr iec_wait20us
|
|
jsr iec_set_idle
|
|
jsr iec_wait20us
|
|
|
|
jmp iec_return_success
|