Added debugger command to set screen palette.

svn-id: r31265

1 files changed, 38 insertions, 0 deletions

diff --git a/engines/kyra/debugger.cpp b/engines/kyra/debugger.cpp
index 462e15bb75..994c3de425 100644
--- a/engines/kyra/debugger.cpp
+++ b/engines/kyra/debugger.cpp
@@ -31,6 +31,7 @@
 #include "kyra/kyra_v2.h"
 #include "kyra/screen.h"
 #include "kyra/timer.h"
+#include "kyra/resource.h"
 
 namespace Kyra {
 
@@ -39,6 +40,7 @@ Debugger::Debugger(KyraEngine *vm)
 	_vm = vm;
 
 	DCmd_Register("screen_debug_mode",	WRAP_METHOD(Debugger, cmd_setScreenDebug));
+	DCmd_Register("load_palette",		WRAP_METHOD(Debugger, cmd_loadPalette));
 	DCmd_Register("facings",			WRAP_METHOD(Debugger, cmd_showFacings));
 }
 
@@ -57,6 +59,42 @@ bool Debugger::cmd_setScreenDebug(int argc, const char **argv) {
 	return true;
 }
 
+bool Debugger::cmd_loadPalette(int argc, const char **argv) {
+	uint8 palette[768];
+
+	if (argc <= 1) {
+		DebugPrintf("Use load_palette <file> [start_col] [end_col]");
+		return true;
+	}
+
+	if (_vm->gameFlags().gameID != GI_KYRA1 && _vm->resource()->getFileSize(argv[1]) != 768) {
+		_vm->screen()->savePageToDisk("TEMP", 5);
+		_vm->screen()->loadBitmap(argv[1], 5, 5, 0);
+		memcpy(palette, _vm->screen()->getCPagePtr(5), 768);
+		_vm->screen()->loadPageFromDisk("TEMP", 5);
+	} else if (!_vm->resource()->loadFileToBuf(argv[1], palette, 768)) {
+		DebugPrintf("Palette '%s' not found!", argv[1]);
+		return true;
+	}
+
+	int startCol = 0;
+	int endCol = 255;
+	if (argc > 2)
+		startCol = MIN(255, MAX(0, atoi(argv[2])));
+	if (argc > 3)
+		endCol = MIN(255, MAX(0, atoi(argv[3])));
+
+	if (startCol > 0)
+		memcpy(palette, _vm->screen()->getScreenPalette(), startCol*3);
+	if (endCol < 255)
+		memcpy(palette + endCol * 3, _vm->screen()->getScreenPalette() + endCol * 3, (255-endCol)*3);
+
+	_vm->screen()->setScreenPalette(palette);
+	_vm->screen()->updateScreen();
+
+	return true;
+}
+
 bool Debugger::cmd_showFacings(int argc, const char **argv) {
 	DebugPrintf("Facing directions:\n");
 	DebugPrintf("7  0  1\n");