home *** CD-ROM | disk | FTP | other *** search
/ C!T ROM 5 / ctrom5b.zip / ctrom5b / PROGRAM / ASM / ALIB30B / SCAN08.ASM < prev    next >
Assembly Source File  |  1994-10-31  |  1KB  |  38 lines
  1.     page    66,132
  2. ;******************************* SCAN08.ASM *********************************
  3.  
  4. LIBSEG           segment byte public "LIB"
  5.         assume cs:LIBSEG , ds:nothing
  6.  
  7. ;----------------------------------------------------------------------------
  8. .xlist
  9.     include  mac.inc
  10.     include  common.inc
  11.     extrn    strlen2:far
  12. .list
  13. comment 
  14. ;- - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -( SEARCH  )
  15. ;SCAN_CHAR3 - scan  buffer for character, case match
  16. ;  inputs:    al = character
  17. ;          es:di = string buffer, terminated with zero char.
  18. ;             cx = buffer length
  19. ;           
  20. ;  output: if flag set to "je" then match found
  21. ;                  es:di = pointer one char past match point
  22. ;                     cx = amount of data remaining to be searched
  23. ;          if flag set to "jne" then no match found
  24. ;                  es:di = pointer past end of buffer
  25. ;                     cx = zero
  26. ;* * * * * * * * * * * * * *
  27. 
  28.  
  29.     PUBLIC    SCAN_CHAR3
  30. SCAN_CHAR3    PROC    FAR
  31.     repne    scasb
  32.     retf    
  33. SCAN_CHAR3    ENDP
  34. ;------------------------------------------------------------------------
  35.  
  36. LIBSEG    ENDS
  37. ;;    end
  38.