Section 3: Assembler
277
TI
-
89 / TI
-
92 Plus Sierra C Assembler Reference Manual
Not for Distribution
Beta Version February 2, 2001
LEA \2,A\6
L\@
MOVE.\0 (A\6)+,(A\5)+ ; \3
ELSEC
LEA \1,A0
LEA \2,A1
L\@
MOVE.\0 (A1)+,(A0)+ ; \3
ENDC
IFC '\3','STRING COPY'
BNE L\@
ELSEC
DBF D0,L\@
ENDC
ENDM
COUNT MACRO
IFC '\2','B'
\3 #(\1-1),\4
ELSEC
IFC '\2','L'
\3 #((\1>>2)-1),\4
ELSEC
\3 #((\1>>1)-1),\4
ENDC
ENDC
ENDM
OPT MEX
COPY.B MESG1,MESG2,<STRING COPY>,,3,4
LEA MESG1,A3
LEA MESG2,A4
L.0000
MOVE.B (A4)+,(A3)+ ; STRING COPY
BNE L.0000
COPY.L NODE1,NODE2,<STRUCTURE COPY>,64
MOVEQ #((64>>2)-1),D0
LEA NODE1,A0
LEA NODE2,A1
L.0001
MOVE.L (A1)+,(A0)+ ; STRUCTURE COPY
DBF D0,L.0001