--- BasiliskII/src/emul_op.cpp	2000/07/22 16:07:16	1.17
+++ BasiliskII/src/emul_op.cpp	2001/02/02 20:52:57	1.23
@@ -1,7 +1,7 @@
 /*
  *  emul_op.cpp - 68k opcodes for ROM patches
  *
- *  Basilisk II (C) 1997-2000 Christian Bauer
+ *  Basilisk II (C) 1997-2001 Christian Bauer
  *
  *  This program is free software; you can redistribute it and/or modify
  *  it under the terms of the GNU General Public License as published by
@@ -60,17 +60,17 @@ void EmulOp(uint16 opcode, M68kRegisters
 	switch (opcode) {
 		case M68K_EMUL_BREAK: {				// Breakpoint
 			printf("*** Breakpoint\n");
-			printf("d0 %08x d1 %08x d2 %08x d3 %08x\n"
-				   "d4 %08x d5 %08x d6 %08x d7 %08x\n"
-				   "a0 %08x a1 %08x a2 %08x a3 %08x\n"
-				   "a4 %08x a5 %08x a6 %08x a7 %08x\n"
+			printf("d0 %08lx d1 %08lx d2 %08lx d3 %08lx\n"
+				   "d4 %08lx d5 %08lx d6 %08lx d7 %08lx\n"
+				   "a0 %08lx a1 %08lx a2 %08lx a3 %08lx\n"
+				   "a4 %08lx a5 %08lx a6 %08lx a7 %08lx\n"
 				   "sr %04x\n",
 				   r->d[0], r->d[1], r->d[2], r->d[3], r->d[4], r->d[5], r->d[6], r->d[7],
 				   r->a[0], r->a[1], r->a[2], r->a[3], r->a[4], r->a[5], r->a[6], r->a[7],
 				   r->sr);
 #ifdef ENABLE_MON
-			char *arg[2] = {"rmon", NULL};
-			mon(1, arg);
+			char *arg[4] = {"mon", "-m", "-r", NULL};
+			mon(3, arg);
 #endif
 			QuitEmulator();
 			break;
@@ -248,6 +248,22 @@ void EmulOp(uint16 opcode, M68kRegisters
 				WriteMacInt8(asc_regs + 0x800, 0x0f);	// Set ASC version number
 				WriteMacInt32(0xcc0, asc_regs);			// Set ASCBase
 			}
+			
+#if (REAL_ADDRESSING || DIRECT_ADDRESSING) && defined(USE_SCRATCHMEM_SUBTERFUGE)
+			extern uint8 *ScratchMem;
+			
+			// Set VIA base address to scratch memory area
+			D(bug("Patch VIA base address [0x%x] to ScratchMem\n", ReadMacInt32(0x1d4)));
+			WriteMacInt32(0x1d4, Host2MacAddr(ScratchMem));
+			
+			// Set SCCRd base address to scratch memory area
+			D(bug("Patch SCCRd base address [0x%x] to ScratchMem\n", ReadMacInt32(0x1d8)));
+			WriteMacInt32(0x1d8, Host2MacAddr(ScratchMem));
+			
+			// Set SCCWr base address to scratch memory area
+			D(bug("Patch SCCWr base address [0x%x] to ScratchMem\n", ReadMacInt32(0x1dc)));
+			WriteMacInt32(0x1dc, Host2MacAddr(ScratchMem));
+#endif
 			break;
 		}
 
@@ -348,6 +364,26 @@ void EmulOp(uint16 opcode, M68kRegisters
 			EtherReadPacket((uint8 **)&r->a[0], r->a[3], r->d[3], r->d[1]);
 			break;
 
+		case M68K_EMUL_OP_SOUNDIN_OPEN:		// Sound input driver functions
+			r->d[0] = SoundInOpen(r->a[0], r->a[1]);
+			break;
+
+		case M68K_EMUL_OP_SOUNDIN_PRIME:
+			r->d[0] = SoundInPrime(r->a[0], r->a[1]);
+			break;
+
+		case M68K_EMUL_OP_SOUNDIN_CONTROL:
+			r->d[0] = SoundInControl(r->a[0], r->a[1]);
+			break;
+
+		case M68K_EMUL_OP_SOUNDIN_STATUS:
+			r->d[0] = SoundInStatus(r->a[0], r->a[1]);
+			break;
+
+		case M68K_EMUL_OP_SOUNDIN_CLOSE:
+			r->d[0] = SoundInClose(r->a[0], r->a[1]);
+			break;
+
 		case M68K_EMUL_OP_SCSI_DISPATCH: {	// SCSIDispatch() replacement
 			uint32 ret = ReadMacInt32(r->a[7]);		// Get return address
 			uint16 sel = ReadMacInt16(r->a[7] + 4);	// Get selector
@@ -458,6 +494,13 @@ void EmulOp(uint16 opcode, M68kRegisters
 				ClearInterruptFlag(INTFLAG_AUDIO);
 				AudioInterrupt();
 			}
+
+			if (InterruptFlags & INTFLAG_NMI) {
+				ClearInterruptFlag(INTFLAG_NMI);
+				if (HasMacStarted()) {
+					TriggerNMI();
+				}
+			}
 			break;
 
 		case M68K_EMUL_OP_PUT_SCRAP: {		// PutScrap() patch
@@ -496,23 +539,28 @@ void EmulOp(uint16 opcode, M68kRegisters
 			break;
 #endif
 
-		case M68K_EMUL_OP_BLOCK_MOVE:		// BlockMove() replacement
-			memmove(Mac2HostAddr(r->a[1]), Mac2HostAddr(r->a[0]), r->d[0]);
+		case M68K_EMUL_OP_BLOCK_MOVE:		// BlockMove() cache flushing
+			FlushCodeCache(Mac2HostAddr(r->a[0]), r->a[1]);
+			break;
+
+		case M68K_EMUL_OP_DEBUGUTIL:
+		//	printf("DebugUtil d0=%08lx  a5=%08lx\n", r->d[0], r->a[5]);
+			r->d[0] = DebugUtil(r->d[0]);
 			break;
 
 		default:
-			printf("FATAL: EMUL_OP called with bogus opcode %04x\n", opcode);
-			printf("d0 %08x d1 %08x d2 %08x d3 %08x\n"
-				   "d4 %08x d5 %08x d6 %08x d7 %08x\n"
-				   "a0 %08x a1 %08x a2 %08x a3 %08x\n"
-				   "a4 %08x a5 %08x a6 %08x a7 %08x\n"
+			printf("FATAL: EMUL_OP called with bogus opcode %08x\n", opcode);
+			printf("d0 %08lx d1 %08lx d2 %08lx d3 %08lx\n"
+				   "d4 %08lx d5 %08lx d6 %08lx d7 %08lx\n"
+				   "a0 %08lx a1 %08lx a2 %08lx a3 %08lx\n"
+				   "a4 %08lx a5 %08lx a6 %08lx a7 %08lx\n"
 				   "sr %04x\n",
 				   r->d[0], r->d[1], r->d[2], r->d[3], r->d[4], r->d[5], r->d[6], r->d[7],
 				   r->a[0], r->a[1], r->a[2], r->a[3], r->a[4], r->a[5], r->a[6], r->a[7],
 				   r->sr);
 #ifdef ENABLE_MON
-			char *arg[2] = {"rmon", NULL};
-			mon(1, arg);
+			char *arg[4] = {"mon", "-m", "-r", NULL};
+			mon(3, arg);
 #endif
 			QuitEmulator();
 			break;