Added asminc/cbmkernal.inc

2018-06-21 18:32:38 +03:00 · 2018-06-21 18:32:38 +03:00 · a22e19a902
commit a22e19a902
parent 4980fade74
1 changed files with 74 additions and 0 deletions
--- a/asminc/cbmkernal.inc
+++ b/asminc/cbmkernal.inc
@ -0,0 +1,74 @@
+;
+; Olli Savia <ops@iki.fi>
+;
+; Commodore kernal functions
+;
+
+.if .def(__C64__) || .def(__C128__) || .def(__C16__)
+  CINT         := $FF81
+  IOINIT       := $FF84
+  RAMTAS       := $FF87
+.elseif .def(__VIC20__)
+  CINT         := $E518         ; No entries are in the kernal jump table of the Vic20 for these three (3) functions.
+  IOINIT       := $FDF9         ; The entries for these functions have been set to point directly to the functions
+  RAMTAS       := $FD8D         ; in the kernal to maintain compatibility with the other Commodore platforms.
+.elseif .def(__CBM510__) || .def(__CBM610__)
+  IOINIT       := $FF7B
+  CINT         := $FF7E
+  VECTOR       := $FF84
+  RESTOR       := $FF87
+.endif
+
+.if .def(__VIC20__) || .def(__C64__) || .def(__C128__) || .def(__C16__)
+ RESTOR        := $FF8A
+ VECTOR        := $FF8D
+.endif
+
+.if .def(__CBM510__) || .def(__CBM610__) || .def(__VIC20__) || .def(__C64__) || .def(__C128__) || .def(__C16__)
+  SETMSG       := $FF90
+  SECOND       := $FF93
+  TKSA         := $FF96
+  MEMTOP       := $FF99
+  MEMBOT       := $FF9C
+  SCNKEY       := $FF9F
+  SETTMO       := $FFA2
+  ACPTR        := $FFA5
+  CIOUT        := $FFA8
+  UNTLK        := $FFAB
+  UNLSN        := $FFAE
+  LISTEN       := $FFB1
+  TALK         := $FFB4
+  READST       := $FFB7
+  SETLFS       := $FFBA
+  SETNAM       := $FFBD
+  OPEN         := $FFC0
+  CLOSE        := $FFC3
+.endif
+
+; Available on all platforms including PET
+CHKIN          := $FFC6
+CKOUT          := $FFC9
+CLRCH          := $FFCC
+BASIN          := $FFCF
+CHRIN          := $FFCF
+BSOUT          := $FFD2
+CHROUT         := $FFD2
+
+.if .def(__CBM510__) || .def(__CBM610__) || .def(__VIC20__) || .def(__C64__) || .def(__C128__) || .def(__C16__)
+  LOAD         := $FFD5
+  SAVE         := $FFD8
+  SETTIM       := $FFDB
+  RDTIM        := $FFDE
+.endif
+
+; Available on all platforms including PET
+STOP           := $FFE1
+GETIN          := $FFE4
+CLALL          := $FFE7
+UDTIM          := $FFEA
+
+.if .def(__CBM510__) || .def(__CBM610__) || .def(__VIC20__) || .def(__C64__) || .def(__C128__) || .def(__C16__)
+  SCREEN       := $FFED
+  PLOT	       := $FFF0
+  IOBASE       := $FFF3
+.endif