sttl Macro Definitions
 pag

*
* This file contains all macro definitions
* used in the system.
*

*
* Set interrupt flags (I and F)
*

seti macro
 orcc #F|I
 endm


*
* Clear interrupt flags (I and F)
*

clri macro
 andcc #!(F|I)
 endm


*
* Shift d left n times
*

sld macro n where n is shift count
 if &1
 lslb
 rola
 sld &1-1
 endif
 endm

 pag

*
* lsr a 4 times and increment it
*

lsr4p macro no args
 lsra
 lsra
 lsra
 lsra
 inca
 endm


*
* debug macro
*

dbugm macro output_character
 lda #'&1
 lbsr syspch
 endm