diff options
| -rw-r--r-- | MyExec.i | 41 |
1 files changed, 35 insertions, 6 deletions
@@ -122,21 +122,50 @@ MSG MACRO ENDM ************************************************************************** -* SMSG "Text" gibt "Text" auf serial port aus +* SMSG <"Hello, %s!",a0> gibt Text mit printf-Argumenten auf serial port aus SMSG MACRO + IFND DEBUG + MEXIT + ENDC XREF _MyExecBase - bra.s .smsg1\@ -.smsg2\@: dc.b \1,0 + movem.l d0/d1/a0/a1/a6,-(SP) + bra.b .smsg1\@ +.smsg2\@: dc.b \1,13,10,0 EVEN -.smsg1\@: move.l a6,-(SP) +.smsg1\@: + IFGE NARG-9 + move.l \9,-(SP) + ENDC + IFGE NARG-8 + move.l \8,-(SP) + ENDC + IFGE NARG-7 + move.l \7,-(SP) + ENDC + IFGE NARG-6 + move.l \6,-(SP) + ENDC + IFGE NARG-5 + move.l \5,-(SP) + ENDC + IFGE NARG-4 + move.l \4,-(SP) + ENDC + IFGE NARG-3 + move.l \3,-(SP) + ENDC + IFGE NARG-2 + move.l \2,-(SP) + ENDC movea.l _MyExecBase,a6 pea .smsg2\@(PC) jsr meb_RawPrintf(a6) - addq.w #4,SP - move.l (SP)+,a6 + add.w #(NARG<<2),SP + movem.l (SP)+,d0/d1/a0/a1/a6 ENDM + ************************************************************************** * BTSTW: Testet ein Bit in einem WORD |