mirror of https://github.com/gungwald/copy.git
22 lines
309 B
ArmAsm
22 lines
309 B
ArmAsm
|
.export _online
|
||
|
.export _olerr
|
||
|
|
||
|
.include "mli.inc"
|
||
|
|
||
|
.bss
|
||
|
|
||
|
_olerr: .byte $00
|
||
|
|
||
|
.code
|
||
|
|
||
|
_open:
|
||
|
lda #ON_LINE_CALL
|
||
|
ldx #ON_LINE_COUNT
|
||
|
jsr callmli
|
||
|
bcc done
|
||
|
|
||
|
sta _olerr
|
||
|
|
||
|
done:
|
||
|
rts
|