source: buchla-68k/alcyon/vwputm.s

Last change on this file was 7bf3856, checked in by Thomas Lopatic <thomas@…>, 7 years ago

Added Alcyon C reference output.
  • Property mode set to 100644
File size: 471 bytes
Line 
1.globl _vwputm
2.text
3_vwputm:
4~~vwputm:
5~ml=-4
6~obase=8
7~nw=12
8~fg=14
9~bg=16
10~row=18
11~col=20
12~ml=22
13link R14,#-4
14*line 33
15bra L4
16L3:
17*line 34
18*line 35
19move.l 22(R14),R8
20move.l (R8),(sp)
21move 20(R14),-(sp)
22move 18(R14),-(sp)
23move 16(R14),-(sp)
24move 14(R14),-(sp)
25move 12(R14),-(sp)
26move.l 8(R14),-(sp)
27jsr _vwputs
28adda.l #14,sp
29add.l #4,22(R14)
30add #1,18(R14)
31L4:
32*line 36
33move.l 22(R14),R8
34tst.l (R8)
35bne L3
36L2:L1:unlk R14
37rts
38.data
Note: See TracBrowser for help on using the repository browser.