AppleIIAsm-Collection/source/diskX_minidisk_A/T.MIN.SUB.DISKOP

13 lines
214 B
Plaintext
Raw Normal View History

DISKOP
:CLEAR
LDA #00
STA IOB_EVOL
LDA #>IOB
LDY #<IOB
JSR RWTS
BCC :EXIT
:ERR LDA IOB_ERR
LDX #00
STX $48
:EXIT RTS