Upload

Digital Research

CONTRIBUTIONS/z80em86/bios/move.mac

@@ -0,0 +1,57 @@
+;**************************************************************************
+;*               CP/M 3 BIOS for Z80em86 Z80 CPU emulator                 *
+;*                                                                        *
+;*                          Bank & Move module                            *
+;*                                                                        *
+;*                  Copyright (C) 1992-2009 Stewart Kay                   *
+;**************************************************************************
+;
+; ChangeLog (most recent entries are at top)
+; ------------------------------------------
+; v1.0.0 - 16 February 2009, S.J.Kay
+; - Prepare for public release.
+;
+; v1.00 - 17 April 1995, S.J.Kay
+; - Undocumented changes.
+;
+; v0.00 - 1992, S.J.Kay
+; - Initial creation date.
+
+; ?move  : move block of memory
+; ?bank  : select bank for code execution
+; ?xmove : setup for interbank move
+
+	.z80
+;
+	maclib	TPORTS.LIB
+	maclib	ASMTYPE.LIB
+;
+	public	?move, ?xmove, ?bank
+;
+	cseg			;common memory
+;
+if banked
+?move:	out	(bnkmve),a
+	add	hl,bc
+	ex	de,hl
+	add	hl,bc
+	ex	de,hl
+	ld	bc,0
+	ret
+;
+?bank:	push	af
+	out	(bnksel),a
+	pop	af
+	ret
+
+?xmove:	out	(bnkdta),a
+	ret
+else
+?move:	ex	de,hl
+	ldir
+	ex	de,hl
+?bank:
+?xmove:	ret
+endif
+;
+	end