19 lines
276 B
ArmAsm
19 lines
276 B
ArmAsm
;
|
|
; Ullrich von Bassewitz, 2003-12-19
|
|
;
|
|
; READST kernal call
|
|
;
|
|
|
|
.export READST
|
|
|
|
.include "cbm610.inc"
|
|
|
|
|
|
.proc READST
|
|
|
|
lda ST ; Load status
|
|
rts ; Return to caller
|
|
|
|
.endproc
|
|
|
|
|