home *** CD-ROM | disk | FTP | other *** search
/ CP/M / CPM_CDROM.iso / simtel / cpmug / cpmug035.ark / FCBMOV.ASM < prev    next >
Encoding:
Assembly Source File  |  1984-04-29  |  290 b   |  13 lines
  1.     ORG    5520H
  2. * THIS ROUTINE COPIES THE FCB POINTED TO BY HL TO THE ONE POINTED TO
  3. * BY DE
  4. FCBMOV:    PUSH    B ! PUSH D ! PUSH H
  5.     MVI    B,33    ;33 BYTES/FCB
  6. FMLOOP:    MOV    A,M    ;GET BYTE
  7.     STAX    D    ;COPY IT
  8.     INX    H ! INX D
  9.     DCR    B
  10.     JNZ    FMLOOP    ;JUMP IF MORE BYTES TO COPY
  11.     POP    H ! POP D ! POP B
  12.     RET
  13.