home *** CD-ROM | disk | FTP | other *** search
/ ftp.barnyard.co.uk / 2015.02.ftp.barnyard.co.uk.tar / ftp.barnyard.co.uk / cpm / walnut-creek-CDROM / BEEHIVE / ZCAT / STR.LBR / STRCHR.AS < prev    next >
Text File  |  2000-06-30  |  256b  |  16 lines
  1.     psect    text
  2.     global    rcsv, cret, _index, _strchr
  3.  
  4. _strchr:
  5. _index:    call    rcsv
  6.  
  7.     jr    3f
  8. 1:    inc    hl
  9. 3:    ld    a,(hl)
  10.     cp    e
  11. 4:    jp    z,cret
  12.     or    a
  13.     jr    nz,1b
  14.     ld    hl,0
  15.     jr    4b
  16.