43 lines
790 B
Plaintext
43 lines
790 B
Plaintext
|
|
|||
|
|
*------- Macros for TMS34010 assembly language programs ----------------
|
|||
|
|
|
|||
|
|
* Swap contents of two registers that reside in same file
|
|||
|
|
|
|||
|
|
SWAP $MACRO R1,R2
|
|||
|
|
XOR :R1.S:,:R2.S:
|
|||
|
|
XOR :R2.S:,:R1.S:
|
|||
|
|
XOR :R1.S:,:R2.S:
|
|||
|
|
$END
|
|||
|
|
|
|||
|
|
* Test a register for zero
|
|||
|
|
TEST $MACRO R1
|
|||
|
|
MOVE :R1.S:,:R1.S:
|
|||
|
|
$END
|
|||
|
|
|
|||
|
|
*EQUATES FOR XY COMPARES(MOTOLORA STYLE)
|
|||
|
|
JRXEQ $MACRO P1
|
|||
|
|
JRXZ P1.S
|
|||
|
|
$END
|
|||
|
|
JRXNE $MACRO P1
|
|||
|
|
JRXNZ P1.S
|
|||
|
|
$END
|
|||
|
|
JRXGE $MACRO P1
|
|||
|
|
JRXNN P1.S
|
|||
|
|
$END
|
|||
|
|
JRXLT $MACRO P1
|
|||
|
|
JRXN P1.S
|
|||
|
|
$END
|
|||
|
|
JRYEQ $MACRO P1
|
|||
|
|
JRYZ P1.S
|
|||
|
|
$END
|
|||
|
|
JRYNE $MACRO P1
|
|||
|
|
JRYNZ P1.S
|
|||
|
|
$END
|
|||
|
|
JRYGE $MACRO P1
|
|||
|
|
JRYNN P1.S
|
|||
|
|
$END
|
|||
|
|
JRYLT $MACRO P1
|
|||
|
|
JRYN P1.S
|
|||
|
|
$END
|
|||
|
|
|
|||
|
|
|