20 lines
276 B
ArmAsm
20 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
|
||
|
|
|
||
|
|
|