Nested function: Difference between revisions
no edit summary
Puppydrum64 (talk | contribs) No edit summary |
|||
Line 73:
2. Second
3. Third
</pre>
=={{header|68000 Assembly}}==
<lang 68000devpac>MakeList:
MOVE.W #1,D0
loop_MakeList:
MOVE.W D0,-(SP)
JSR PrintHex
MOVE.B #'.',D0
JSR PrintChar
MOVE.B #' ',D0
JSR PrintChar
MOVE.W (SP)+,D0
JSR MakeItem
CMP.W D0,D1
BCC loop_MakeList ;back to start
RTS
MakeItem:
MOVE.W D0,D2
SUBQ.W #1,D2
LSL.W #2,D2
LEA PointerToText,A0
MOVE.L (A0,D2),A3
JSR PrintString
JSR NewLine
ADDQ.W #1,D0
RTS
PointerToText:
DC.L FIRST,SECOND,THIRD
FIRST:
DC.B "FIRST",0
EVEN
SECOND:
DC.B "SECOND",0
EVEN
THIRD:
DC.B "THIRD",0
EVEN</lang>
{{out}}
[https://ibb.co/mqCKVGy Output running on MAME]
Also displayed here:
<pre>
01. FIRST
02. SECOND
03. THIRD
</pre>
| |||