;*********************************************************************
																				list		;
;        FILE: type.inc																;
																				nolist	;
;      AUTHOR: kdk																	;
; DESCRIPTION: Type Include File													;
;         LOG: 07/04/96	Initial Version										;
;              07/09/98 Added MACRO_DEFINITION ifdef						;
;																							;
;*********************************************************************
	constant FALSE=H'00'																;
	constant TRUE=H'01'																;
	constant BYTE=H'01'																;
	constant WORD=H'02'																;
	variable RAM_MAX=H'20'															;
;*********************************************************************
	ifdef MACRO_DEFINITION															;
;---------------------------------------------------------------------
mTypeDeclare macro Name,Size,Count
	if ((RAM_MAX == H'80') || ((RAM_MAX < H'80') && ((RAM_MAX + (Size * Count)) > H'80')))
RAM_MAX set H'A0'																		;
	endif																					;
	constant Name=RAM_MAX															;
RAM_MAX set	RAM_MAX + (Size * Count)											;
	endm																					;
;---------------------------------------------------------------------
mTypeArrayGetF macro aRegister,fIndex,fDestination
	add_fff fIndex,aRegister,FSR													;
	movfw   INDF																		;
	mov_wf  fDestination																;
	endm																					;
;---------------------------------------------------------------------
mTypeArrayGetL macro aLiteral,fIndex,fDestination
	add_flf fIndex,aLiteral,FSR													;
	movfw   INDF																		;
	mov_wf  fDestination																;
	endm																					;
;---------------------------------------------------------------------
mTypeArrayPutF macro aRegister,fIndex,fSource
	add_fff fIndex,aRegister,FSR													;
	mov_fw  fSource																	;
	movwf   INDF																		;
	endm																					;
;---------------------------------------------------------------------
mTypeArrayPutL macro aLiteral,fIndex,fSource
	add_flf fIndex,aLiteral,FSR													;
	mov_fw  fSource																	;
	movwf   INDF																		;
	endm																					;
;---------------------------------------------------------------------
mTypeSetup macro
	endm																					;
;---------------------------------------------------------------------
	endif																					; MACRO_DEFINITION
;*********************************************************************