klisten.o \
kload.o \
kopen.o \
+ kplot.o \
krdtim.o \
kreadst.o \
ksave.o \
ksetlfs.o \
ksetnam.o \
- ksettim.s \
+ ksettim.o \
ktalk.o \
kunlsn.o \
kuntlk.o \
;
.export xsize, ysize
- .import SCREEN
- .constructor initscrsize
+.data
-.code
-
-initscrsize:
- jsr SCREEN
- stx xsize
- sty ysize
- rts
-
-.bss
-
-xsize: .res 1
-ysize: .res 1
+xsize: .byte 40
+ysize: .byte 25
; --------------------------------------------------------------------------
-.segment "LOWMEM" ; Accesses the ROM - must go into low mem
+.segment "LOWCODE" ; Accesses the ROM - must go into low mem
_cgetc: lda KEY_COUNT ; Get number of characters
ora FKEY_COUNT ; Or with number of function key chars
.endproc
-.segment "LOWMEM" ; Accesses the ROM - must go into low mem
+.segment "LOWCODE" ; Accesses the ROM - must go into low mem
.proc donekbd
--- /dev/null
+;
+; Ullrich von Bassewitz, 22.11.2002
+;
+; PLOT replacement function
+;
+
+ .export PLOT
+
+ .include "plus4.inc"
+
+.segment "LOWCODE" ; Must go into low memory
+
+.proc PLOT
+ sta ENABLE_ROM ; Enable the ROM
+ jsr $FFF0 ; Call the ROM routine
+ sta ENABLE_RAM ; Switch back to RAM
+ rts ; Return to caller
+.endproc
+
+
+