TRUE	equ	1
FALSE	equ	0
NULL	equ	0

AMIGA   EQU     1
A1200   EQU     2
A4000   EQU     4

MC000   EQU     $010
MC010   EQU     $020
MC020   EQU     $040
MC030   EQU     $080
MC040   EQU     $100
MC060   EQU     $200

MC000p	EQU	MC000!MC010!MC020!MC030!MC040!MC060
MC010p	EQU	MC010!MC020!MC030!MC040!MC060
MC020p	EQU	MC020!MC030!MC040!MC060
MC030p	EQU	MC030!MC040!MC060
MC040p	EQU	MC040!MC060
MC060p	EQU	MC060

call	MACRO
	jsr	_LVO\1(a6)
	ENDM


skipw	MACRO
	IFNE	NARG
	FAIL	!!! NO ARGUMENTS ALLOWED !!!
	ENDC

	dc.w	$0c40					;CMPI.W #????,d0
	ENDM

skipl	MACRO
	IFNE	NARG
	FAIL	!!! NO ARGUMENTS ALLOWED !!!
	ENDC

	dc.w	$0c80					;CMPI.L #????????,d0
	ENDM

base	MACRO
	IFC	'\1','exec'
		move.l	4.w,a6
	ELSE
		move.l	\1base(pc),a6
	ENDC
	ENDM

push	MACRO
	move.l	\1,-(sp)
	ENDM

pop	MACRO
	move.l	(sp)+,\1
	ENDM

pushm	MACRO
	movem.l	\1,-(sp)
	ENDM

popm	MACRO
	movem.l	(sp)+,\1
	ENDM