; Macro/Shorthand replacements for MPASM commands ; Copywrite (c) 2004 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 ;Test if argument is positive (high bit clear) endm ifneg macro arg1 btfsc arg1,7 ;Test if argument is negative (high bit set) 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