; WHERE NECESSARY-USE R7 AS SCRATCH/WORKING REGESTER .MACRO ADC OP1 ADWC #0,OP1 .ENDM .MACRO ADCB OP1,?A BCC A INCB OP1 A: .ENDM .MACRO ADD OP1,OP2 ADDW2 OP1,OP2 .ENDM .MACRO ASH OP1,OP2 .ERROR ;NOT IMPLIMNETED .ENDM .MACRO ASHC OP1,OP2 ASHL OP1,OP2 .ENDM .MACRO ASL OP .ERROR ;NOT IMPLIMENTED .ENDM .MACRO ASR OP .ERROR ;NOT IMPLIMENTED .ENDM ; BCC ; BCS .MACRO BEQ LOC BEQL LOC .ENDM .MACRO BGE LOC BGEQ LOC .ENDM .MACRO BGT LOC BGTR LOC .ENDM .MACRO BHI LOC BGTRU LOC .ENDM .MACRO BHIS LOC BGEQU LOC .ENDM .MACRO BIC OP1,OP2 BICW2 OP1,OP2 .ENDM .MACRO BICB OP1,OP2 BICB2 OP1,OP2 .ENDM .MACRO BIS OP1,OP2 BISW2 OP1,OP2 .ENDM .MACRO BISB OP1,OP2 BISB2 OP1,OP2 .ENDM .MACRO BIT OP1,OP2 BITW OP1,OP2 .ENDM ; BITB .MACRO BLE LOC BLEQ LOC .ENDM .MACRO BLO LOC BLSSU LOC .ENDM .MACRO BLOS LOC BLEQU LOC .ENDM .MACRO BLT LOC,?A,?B BVS A BLSS LOC BRB B A: BGEQ LOC B: .ENDM .MACRO BMI LOC BLSS LOC .ENDM .MACRO BNE LOC BNEQ LOC .ENDM .MACRO BPL LOC BGEQ LOC .ENDM ; BPT .MACRO BR LOC BRW LOC .ENDM ; BVC ; BVS .MACRO CC OP BICPSW #OP .ENDM .MACRO CCC BICPSW #17 .ENDM .MACRO CLN BICPSW #10 .ENDM .MACRO CLZ BICPSW #4 .ENDM .MACRO CLV BICPSW #2 .ENDM .MACRO CLC BICPSW #1 .ENDM .MACRO CLR LOC CLRW LOC .ENDM ; CLRB .MACRO CMP OP1,OP2 CMPW OP1,OP2 .ENDM ; CMPB .MACRO COM OP MCOMW OP,OP .ENDM .MACRO COMB MCOMB OP,OP .ENDM .MACRO CSM OP .ERROR ;NOT IMPLIMENTED YET .ENDM .MACRO DEC LOC DECW LOC .ENDM ; DECB .MACRO DIV OP1,OP2 DIVW2 OP1,OP2 .ENDM .MACRO EMT OP .ERROR ;NOT IMPLIMENTED .ENDM .MACRO HALT .ERROR ;NOT IMPLIMENTED .ENDM .MACRO INC LOC INCW LOC .ENDM ; INCB .MACRO IOT .ERROR ;NOT IMPLIMENTED .ENDM ; JMP .MACRO CALL LOC JSB LOC .ENDM .MACRO CALLR LOC JMP LOC .ENDM .MACRO JSR REG,LOC JSB LOC .ENDM .MACRO LDUB .ERROR ;NOT IMPLIMENTED .ENDM .MACRO MARK OP .ERROR ;NOT IMPLIMENTED .ENDM .MACRO MED .ERROR ;NOT IMPLIMENTED .ENDM .MACRO MFPI OP .ERROR ;NOT IMPLIMENTED .ENDM .MACRO MTPI OP .ERROR ;NOT IMPLIMENTED .ENDM .MACRO MFPD OP .ERROR ;NOT IMPLIMENTED .ENDM .MACRO MTPD OP .ERROR ;NOT IMPLIMENTED .ENDM .MACRO MFPT .ERROR ;NOT IMPLIMENTED .ENDM .MACRO MFPS OP MOVPSL R7 MOVB R7,OP .ENDM .MACRO MOV OP1,OP2 MOVW OP1,OP2 .ENDM ; MOVB .MACRO MPP .ERROR ;NOT IMPLIMENTED .ENDM .MACRO MTPS OP BICPSW #377 BISPSW OP .ENDM .MACRO MUL OP1,OP2 MULW2 OP1,OP2 .ENDM .MACRO NEG DST MNEGW DT,DST .ENDM .MACRO RESET .ERROR ;NOT IMPLIMENTED .END ;**** .MACRO RETURN RSB .ENDM .MACRO RTS REG RSB .ENDM .MACRO SUB OP1,OP2 SUBW2 OP1,OP2 .ENDM .MACRO TST OP TSTW OP .ENDM ; TSTB