	.TITLE DEFINI
;
;
	.IDENT	/X04.02/
;
;
;
	.ENABL LC
;
;
;	Copyright (C) Shell Research Ltd. 1979
;
;
; The copyright in this computer program and associated  user
; instructions contained in this document is the property of 
; Shell Research Ltd.. No guarantee is given or may be implied
; as to the adequacy of the program or its suitability for any
; particular purpose and no liability is accepted for any loss
; or damage arising out of its use.
;
;
;
;	 Version:	X04.01
;
;
;	 Original author:R J Carpenter	7-Nov-79
;
;
;	 This version:	 J C Spinelli  11-Jan-83
;
;+++
;	 Definitions des macros utilisees dans le logiciel
;
;
	.PAGE
	.SBTTL MACROS AND DEFINITIONS
;
;
	.MCALL	.PRINT,.TTYIN,.TTYOUT
;
;
	.GLOBL	ASKERM
;
;
	.PAGE
	.SBTTL	$SET,$CLR,$TST,$BRT,$BRF
	.NLIST
;
;
;+
;	These macros may be used for  single word or byte flags.
; The assumption made is that testing is restricted to zero or non zero.
; $BRT = branch if .TRUE. , and $BRF = branch if .FALSE.
; There no errors returned.
;-
;
;
	.MACRO	$SET	ARG
;
;
	MOVB	#1,ARG		;SET IT NON-ZERO
;
	.ENDM
;
;
	.MACRO	$CLR	ARG
;
;
	CLRB	ARG		;SET IT TO ZERO
;
	.ENDM
;
;
	.MACRO	$TST	ARG
;
;
	TSTB	ARG		;SET THE CONDITION CODES
;
	.ENDM
;
;
; These 2 macros allow logical test and branch for byte flags
;
	.MACRO	$BRT	ARG1	ARG2
;
;
	$TST	ARG1
;
	BNE	ARG2
;
	.ENDM
;
;
	.MACRO $BRF	ARG1	ARG2
;
;
	$TST	ARG1
;
	BEQ	ARG2
;
	.ENDM
;
;
	.END
                                  