STAT	EQU	2		;PORT 2 HAS SYMBOLIC NAME STAT
FALSE	EQU	0
TRUE	EQU	NOT FALSE

MAC1	MACRO			;MACRO TESTING
	DB	"THIS IS A MACRO WITH NO ARGS"	;AND A COMMENT
	ENDM

MAC2	MACRO	A,B
	CALL	B		;A COMMENT
	DB	"2 ARGS"	;;AND A SUPPRESSED COMMENT
	ENDM

MAC3	MACRO	INSTR,TEXT	;...
	INSTR			;DO INSTR
	DB	TEXT
	ENDM

COUNT	MACRO	ZZ
IF ZZ=0
	EXITM		;IF DONE, EXIT MACRO
ENDIF
ZZ	EQU	ZZ-1	;ELSE COUNT DOWN
	COUNT	ZZ	;AND DOIT AGAIN
	ENDM