;		*********************************************************
;		*							*
;		*		RAMS10.MAC -- STORAGE DECLARATIONS	*
;		*							*
;		*********************************************************

;	RAMS10.MAC
;	Used to assemble ROM resident and CBIOS

		SUBTTL	'COMMON RAM STORAGE DECLARATIONS'

;	Disk operation temps and control

DMABANK		EQU	MRAM		;Bank for read/write disk
DMADR		EQU	DMABANK+1	;Address for read/write disk

;	Note order of xxxSEC,xxxTRK,xxxDSK must be maintained
;	along with length (1,2,1).

SAVSEC		EQU	DMADR+2		;last sector requested
SAVTRK  	EQU	SAVSEC+1	;last track requested
SDISK		EQU	SAVTRK+2	;selected disk drive (0,1)
SAVTYP		EQU	SDISK+1		;SELECTED TYPE (sector size)

	
IE_ADR		EQU	SAVTYP+1

CURPOS		EQU	IE_ADR+1	;Current cursor position

;	VARIABLES FOR HIGH RAM ROUTINES

TEMSAV		EQU	CURPOS+2	;Used by jump bank routine

SRCBANK		EQU	TEMSAV+1	;Source bank for block move
DESTBANK	EQU	SRCBANK+1	;Destination bank for block move

					;JMPSPOT and JMPADDR must stay next to each other
JMPSPOT		EQU	DESTBANK+1	;To be filled in with a JMP instruction by the ROM
JMPADDR		EQU	JMPSPOT+1	;Address to jump to for BANKJMP and BANKCALL
JMPBANK		EQU	JMPADDR+2	;Bank to jump to for BANKJMP and BANKCALL

EMRAM		EQU	JMPBANK+1

;	INTERRUPT VARIABLES

USR_BNK		EQU	JMPBANK+1	;User's bank on interrupt bank switch

I_POL_BANK	EQU	USR_BNK+3

I_POL_ADR	EQU	I_POL_BANK+1

USR_STK		EQU	I_POL_ADR+2	;save current stk ptr

;	Interrupt stack

ISTK		EQU	USR_STK+30*2+2

;	ROM and BIOS stack

ROMSTK		EQU	ISTK+30*2
BIOSTK		EQU	ROMSTK

HIBUFF		EQU	ROMSTK