home *** CD-ROM | disk | FTP | other *** search
/ Amiga Elysian Archive / AmigaElysianArchive.iso / prog / source / dcassem.lha / No.13 < prev    next >
Text File  |  1988-05-14  |  457b  |  25 lines
  1.         CODE
  2.  
  3.         INCLUDE    "exec/types.i"
  4.         INCLUDE    "printf.mac"
  5.  
  6.         DEBUGENABLE
  7.  
  8. ; a simple little program to test if the printf macro works OK
  9. Start        printf <'Starting: d0=%ld a0=$%lx\n'>,d0,a0
  10.         cmpi.w    #1,d0
  11.         bne.s    PrintArgs
  12.         printf <'No arguments given\n'>
  13.         bra.s    AllDone
  14.  
  15. PrintArgs    printf <'Arg string = '>
  16.         subq.w    #1,d0
  17. ArgLoop        move.b    (a0)+,d1        get next character
  18.         printf <'%c'>,d1        print it out
  19.         dbra    d0,ArgLoop        and loop for next
  20.  
  21. AllDone        rts
  22.  
  23.         END
  24.  
  25.