LibCall		macro
		xref	_LVO\1
		jsr	_LVO\1(a6)
		endm

ExCall		macro
		xref	_SysBase
		ifd	Relative
		move.l	_SysBase(a4),a6
		endc
		ifnd	Relative
		move.l	_SysBase,a6
		endc
		xref	_LVO\1
		jsr	_LVO\1(a6)
		endm

DosCall		macro
		xref	_DOSBase
		ifd	Relative
		move.l	_DOSBase(a4),a6
		endc
		ifnd	Relative
		move.l	_DOSBase,a6
		endc
		xref	_LVO\1
		jsr	_LVO\1(a6)
		endm

IntCall		macro
		xref	_IntuitionBase
		ifd	Relative
		move.l	_IntuitionBase(a4),a6
		endc
		ifnd	Relative
		move.l	_IntuitionBase,a6
		endc
		xref	_LVO\1
		jsr	_LVO\1(a6)
		endm

Call		macro
		ifnd	\1
		xref	\1
		endc
		ifd	LatticeAsm
		jsr	\1(pc)
		endc
		ifnd	LatticeAsm
		bsr	\1
		endc
		endm

Jump		macro
		xref	\1
		ifd	LatticeAsm
		jmp	\1(pc)
		endc
		ifnd	LatticeAsm
		bra	\1
		endc
		endm



Func		macro
		ifnc	'\1',''
		xdef	\1
\1
		endc
		ifnc	'\2',''
		xdef	\2
\2
		endc
		ifnc	'\3',''
		xdef	\3
\3
		endc
		endm