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

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