DOWNLOAD MAIN
; Macro/Shorthand replacements for MPASM commands
; by Randy Gamage
#DEFINE skipz skpz;Skip if zero
#DEFINE skipnz skpnz;Skip if not zero
#DEFINE skipc skpc ;Skip if clear
#DEFINE skipnc skpnc;Skip if not clear
#DEFINE skipb btfsc STATUS,C;Skip if borrow
#DEFINE skipnb btfss STATUS,C;Skip if no borrow
#DEFINE ifclr btfss;Do next instruction if bit is clr
#DEFINE ifset btfsc;Do next instruction if bit is set
; ***************************************
; MACRO DEFINITIONS
;
ifpos macro arg1
btfss arg1,7
endm
ifneg macro arg1
btfsc arg1,7
endm
bank0 macro
bcf STATUS,RP1
bcf STATUS,RP0
endm
bank1 macro
bcf STATUS,RP1
bsf STATUS,RP0
endm
bank2 macro
bsf STATUS,RP1
bcf STATUS,RP0
endm
bank3 macro
bsf STATUS,RP1
bsf STATUS,RP0
endm
|