home *** CD-ROM | disk | FTP | other *** search
/ CP/M / CPM_CDROM.iso / lambda / soundpot / p / sclib2.lbr / DOLDDR.MZC / DOLDDR.MAC
Encoding:
Text File  |  1993-10-25  |  384 b   |  20 lines
  1.  
  2. ; lddr(source, dest, n)
  3.  
  4. DOLDDR::
  5.     INX    SP    ; Skip over return address
  6.     INX    SP
  7.     POP    B    ; Load n
  8.     POP    D    ; Load destination
  9.     POP    H    ; Load source
  10.     DB    0EDH, 0B8H ; Do    LDDR instruction
  11.     PUSH    H    ; Restore stack
  12.     PUSH    D
  13.     PUSH    B
  14.     DCX    SP
  15.     DCX    SP
  16.     RET
  17.  
  18.     END
  19.  
  20.