newkernal

SYSTEM	= 0             ;CBM SYSTEM =0  PET SYSTEM =1
SYSAGE	= 1             ;NONSPLIT = 0   SPLIT-BUS = 1
SYSSIZ	= 0             ;NO PACKING = 0  PACKING = 1
.LIB DISCLAIMER
.LIB DECLARE
.LIB EQUATE
	* = KERNAL
	JMP XXXZZZ      ;COLD START VECTOR
	NOP
;.LIB TOI1
;.LIB TOI2
;.LIB TOI3
;.LIB TOI4
;.LIB TOI5
;.LIB TOI6
;.LIB TOI7
; .LIB MUSIC
; .LIB MUSIC.2
	* = KERNAL+$0E00 ;3.50K CODE SPACE (SCREEN EDITOR)
S0
TIMB
XXXZZZ	CLD
	JSR CLRCH
XXXZZ1	JSR BASIN
	JMP XXXZZ1
;.LIB MONITOR
.LIB MESSAGES
.LIB IEEE
.LIB RS232
.LIB CHANNELIO
.LIB OPENCHANNEL
.LIB CLOSE
.LIB CLALL
.LIB OPEN
.LIB LOAD
.LIB SAVE
.LIB TIME
.LIB ERRORHANDLER
.LIB NEWTAPEFILE
CHOP	= *
	* = $BC00       ;MOVE 1K OF CASS TO BASIC ROMS
.LIB NEWTAPECONTROL
.LIB NEWREAD
	* = CHOP
.LIB NEWWRITE
.LIB INIT
.LIB IRQ
.LIB IPCOM
.LIB TRANSX
.LIB VECTORS
.END