home *** CD-ROM | disk | FTP | other *** search
/ CD Actual 15 / CDACTUAL15.iso / cdactual / program / asm / PJ96.ZIP / ALIB.ZIP / STRLEN.ASM < prev    next >
Encoding:
Assembly Source File  |  1991-06-25  |  264 b   |  25 lines
  1.     include    asm.inc
  2.  
  3.     public    strlen
  4.  
  5.     .code
  6.  
  7. ;;    strlen
  8. ;
  9. ;    entry    DS:SI    string
  10. ;    exit    CX    byte count excluding NULL
  11. ;    uses    AX
  12. ;
  13. strlen    proc
  14.     mov    cx,si
  15. sln1:    lodsb
  16.     cmp    al,NULL_CHAR
  17.     jne    sln1
  18.     xchg    cx,si
  19.     sub    cx,si
  20.     dec    cx
  21.     ret
  22. strlen    endp
  23.  
  24.     end
  25.