RosettaCodeData/Task/Repeat-a-string/68000-Assembly/repeat-a-string.68000
2023-07-01 13:44:08 -04:00

12 lines
277 B
Text

MOVE.W #5-1,D1
RepString:
LEA A3, MyString
MOVE.L A3,-(SP) ;PUSH A3
JSR PrintString ;unimplemented hardware-dependent printing routine, assumed to not clobber D1
MOVE.L (SP)+,A3 ;POP A3
DBRA D1,RepString
RTS ;return to basic or whatever
MyString:
DC.B "ha",0
even