Added wrappers for the kernal functions
git-svn-id: svn://svn.cc65.org/cc65/trunk@1587 b7a2c559-68d2-44c3-8de9-860c34a00d81
This commit is contained in:
20
libsrc/plus4/ksetlfs.s
Normal file
20
libsrc/plus4/ksetlfs.s
Normal file
@@ -0,0 +1,20 @@
|
||||
;
|
||||
; Ullrich von Bassewitz, 22.11.2002
|
||||
;
|
||||
; SETLFS replacement function
|
||||
;
|
||||
|
||||
.export SETLFS
|
||||
|
||||
.include "plus4.inc"
|
||||
|
||||
; Write directly to the zero page to avoid banking in the ROM
|
||||
|
||||
.proc SETLFS
|
||||
sta LFN
|
||||
stx DEVNUM
|
||||
sty SECADR
|
||||
rts ; Return to caller
|
||||
.endproc
|
||||
|
||||
|
||||
Reference in New Issue
Block a user