
56 Assembly Language Programming for the 68000 Family
17.
NEXT:
CLR.L
MOVE.L
MOVE.W
ADD.L
ADD.L
DBRA
JSR
JSR
DO
#1,D1
#99,D2
D1 / DO
#1 ,D1
D2,NEXT
OUTDEC
NEWLINE
TOTAL
NUMBER TO ADD
LOOP COUNT
ADD TO TOTAL
GET NEXT NUMBER TO ADD
LOOP TILL DONE
OUTPUT RESULT
18.
MOVE.B
JSR
MOVE.B
JSR
MOVE.B
JSR
JSR
#'T*,D0
PUTC
#'0',DO
PUTC
#'M',D0
PUTC
NEWLINE
19. SUB.L D1,D0
ADD.L D2,D0
ADD.L #100,DO
JSR OUTDEC
JSR NEWLINE
20.
NEXT:
MOVE.W
MOVE.B
MOVE.W
JSR
DBRA
JSR
#9,D1 OUTER LOOP COUNT
#'A',D0 GET ASCII "A*
#9,D2
PUTC
D2,NEXT
NEWLINE
DBRA D 1,NEXT
INNER LOOP COUNT
OUTPUT CHARACTER
INNER LOOP
GO TO NEW LINE
OUTER LOOP
Kommentare zu diesen Handbüchern