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 / ENTERPRS / CPM / UTILS / S / ZCNFG21.LZH / CFGLIB.LZH / FILL.Z80 < prev    next >
Text File  |  1992-11-03  |  256b  |  13 lines
  1.     public    fill
  2. ; Fill memory pointed to by DE with character in A for B bytes
  3.  
  4. fill:    inc    b
  5.     dec    b
  6.     ret    z        ;don't do 0 bytes. Overflow!
  7. fillup:    ld    (de),a        ; Fill with byte in A
  8.     inc    de        ; Point to next
  9.     djnz    fillup
  10.     ret
  11.  
  12.     end
  13.