vectors

.PAG 'JUMP TABLE/VECTORS'
	* =$FF6C
	JMP TXJMP       ;TRANSFER-OF-EXECUTION JUMPER
	JMP VRESET      ;POWER-ON/OFF VECTOR RESET
IPCGOV	JMP IPCGO       ;LOOP FOR IPC SYSTEM
	JMP FUNKEY      ;FUNCTION KEY VECTOR
	JMP IPRQST      ;SEND IPC REQUEST
	JMP IOINIT      ;I/O INITIALIZATION
	JMP CINT        ;SCREEN INITIALIZATION
	JMP ALOCAT      ;ALLOCATION ROUTINE
	JMP VECTOR      ;READ/SET I/O VECTORS
	JMP RESTOR      ;RESTORE I/O VECTORS
	JMP LKUPSA      ;MATCH SA--RETURN SA,FA
	JMP LKUPLA      ;MATCH LA--RETURN SA,FA
	JMP SETMSG      ;CONTROL O.S. MESSAGES
SECND	JMP (ISECND)    ;SEND SA AFTER LISTEN
TKSA	JMP (ITKSA)     ;SEND SA AFTER TALK
	JMP MEMTOP      ;SET/READ TOP OF MEMORY
	JMP MEMBOT      ;SET/READ BOTTOM OF MEMORY
	JMP SCNKEY      ;SCAN KEYBOARD
	JMP SETTMO      ;SET TIMEOUT IN IEEE
ACPTR	JMP (IACPTR)    ;HANDSHAKE IEEE BYTE IN
CIOUT	JMP (ICIOUT)    ;HANDSHAKE IEEE BYTE OUT
UNTLK	JMP (IUNTLK)    ;SEND UNTALK OUT IEEE
UNLSN	JMP (IUNLSN)    ;SEND UNLISTEN OUT IEEE
LISTN	JMP (ILISTN)    ;SEND LISTEN OUT IEEE
TALK	JMP (ITALK)     ;SEND TALK OUT IEEE
	JMP READST      ;READ/WRITE I/O STATUS BYTE
	JMP SETLFS      ;SET LA, FA, SA
	JMP SETNAM      ;SET LENGTH AND FN ADR
OPEN	JMP (IOPEN)     ;OPEN LOGICAL FILE/TRANSMIT COMMAND
CLOSE	JMP (ICLOSE)    ;CLOSE LOGICAL FILE
CHKIN	JMP (ICHKIN)    ;OPEN CHANNEL IN
CKOUT	JMP (ICKOUT)    ;OPEN CHANNEL OUT
CLRCH	JMP (ICLRCH)    ;CLOSE I/O CHANNEL
BASIN	JMP (IBASIN)    ;INPUT FROM CHANNEL
BSOUT	JMP (IBSOUT)    ;OUTPUT TO CHANNEL
LOAD	JMP (ILOAD)     ;LOAD FROM FILE
SAVE	JMP (ISAVE)     ;SAVE TO FILE
	JMP SETTIM      ;SET INTERNAL CLOCK
	JMP RDTIM       ;READ INTERNAL CLOCK
STOP	JMP (ISTOP)     ;SCAN STOP KEY
GETIN	JMP (IGETIN)    ;GET CHAR FROM Q
CLALL	JMP (ICLALL)    ;CLOSE ALL FILES
	JMP UDTIM       ;INCREMENT CLOCK
	JMP SCRORG      ;SCREEN ORG
	JMP PLOT        ;READ/SET X,Y COORD
	JMP IOBASE      ;RETURN I/O BASE
.SKI 5
GBYE	STA E6509       ;GOODBYE...
	RTS
.PAG 'JUMP TABLE/VECTORS'
	*=$FFFA
	.WOR NMI        ;PROGRAM DEFINEABLE
	.WOR START      ;INITIALIZATION CODE
	.WOR NIRQ       ;INTERRUPT HANDLER
.END