home *** CD-ROM | disk | FTP | other *** search
/ Simtel MSDOS - Coast to Coast / simteldosarchivecoasttocoast2.iso / asmutil / stdlib.zip / PRINT.ASM < prev    next >
Assembly Source File  |  1990-04-29  |  416b  |  28 lines
  1. stdlib        segment    para public 'slcode'
  2.         assume    cs:stdlib
  3.         extrn    sl_putc:far
  4. ;
  5. ;
  6.         public    sl_print
  7. sl_print    proc    far
  8.         push    bp
  9.         mov    bp, sp        
  10.         push    ax es bx
  11. ;
  12.         les    bx, 2[bp]    ;Get return address
  13.         jmp    short TestZero
  14. ;
  15. PrintLoop:    call    sl_Putc
  16.         inc    bx
  17. TestZero:    mov    al, es:[bx]
  18.         cmp    al, 0
  19.         jnz    PrintLoop
  20. ;
  21.         inc    bx
  22.         mov    2[bp], bx
  23.         pop    bx es ax bp
  24.         ret
  25. sl_print    endp
  26. stdlib        ends
  27.         end
  28.