2007-05-30 21:56:52 +00:00
|
|
|
/* ScummVM - Graphic Adventure Engine
|
2006-05-23 23:43:52 +00:00
|
|
|
*
|
2007-05-30 21:56:52 +00:00
|
|
|
* ScummVM is the legal property of its developers, whose names
|
|
|
|
* are too numerous to list here. Please refer to the COPYRIGHT
|
|
|
|
* file distributed with this source distribution.
|
2006-05-23 23:43:52 +00:00
|
|
|
*
|
|
|
|
* 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 the Free Software Foundation; either version 2
|
|
|
|
* of the License, or (at your option) any later version.
|
|
|
|
|
|
|
|
* This program is distributed in the hope that it will be useful,
|
|
|
|
* but WITHOUT ANY WARRANTY; without even the implied warranty of
|
|
|
|
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
|
|
|
|
* GNU General Public License for more details.
|
|
|
|
|
|
|
|
* You should have received a copy of the GNU General Public License
|
|
|
|
* along with this program; if not, write to the Free Software
|
|
|
|
* Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301, USA.
|
|
|
|
*
|
|
|
|
*/
|
|
|
|
|
|
|
|
#include "agi/agi.h"
|
|
|
|
#include "agi/opcodes.h"
|
|
|
|
|
|
|
|
namespace Agi {
|
|
|
|
|
2009-10-19 22:51:37 +00:00
|
|
|
#define ip (_game.logics[lognum].cIP)
|
|
|
|
#define code (_game.logics[lognum].data)
|
2006-05-23 23:43:52 +00:00
|
|
|
|
2011-06-13 19:15:13 +00:00
|
|
|
AgiInstruction logicNamesIf[] = {
|
|
|
|
{ "OR", "", NULL },
|
|
|
|
{ "NOT", "", NULL },
|
|
|
|
{ "ELSE", "", NULL },
|
|
|
|
{ "IF", "", NULL }
|
2006-05-23 23:43:52 +00:00
|
|
|
};
|
|
|
|
|
2007-01-16 12:40:51 +00:00
|
|
|
void AgiEngine::debugConsole(int lognum, int mode, const char *str) {
|
2011-06-13 19:15:13 +00:00
|
|
|
AgiInstruction *x;
|
|
|
|
uint8 a, z;
|
|
|
|
const char *c;
|
2006-05-23 23:43:52 +00:00
|
|
|
|
|
|
|
if (str) {
|
2010-10-26 22:33:49 +00:00
|
|
|
debug(0, " %s", str);
|
2006-05-23 23:43:52 +00:00
|
|
|
return;
|
|
|
|
}
|
|
|
|
|
2010-10-26 22:33:49 +00:00
|
|
|
debugN(0, "%03d:%04x ", lognum, ip);
|
2006-05-23 23:43:52 +00:00
|
|
|
|
|
|
|
switch (*(code + ip)) {
|
|
|
|
case 0xFC:
|
|
|
|
case 0xFD:
|
|
|
|
case 0xFE:
|
|
|
|
case 0xFF:
|
2007-01-16 12:40:51 +00:00
|
|
|
x = logicNamesIf;
|
2006-05-23 23:43:52 +00:00
|
|
|
|
2007-01-16 12:40:51 +00:00
|
|
|
if (_debug.opcodes) {
|
2010-10-26 22:33:49 +00:00
|
|
|
debugN(0, "%02X %02X %02X %02X %02X %02X %02X %02X %02X\n"
|
2006-05-23 23:43:52 +00:00
|
|
|
" ",
|
2009-06-06 17:39:13 +00:00
|
|
|
(uint8)*(code + (0 + ip)) & 0xFF,
|
|
|
|
(uint8)*(code + (1 + ip)) & 0xFF,
|
|
|
|
(uint8)*(code + (2 + ip)) & 0xFF,
|
|
|
|
(uint8)*(code + (3 + ip)) & 0xFF,
|
|
|
|
(uint8)*(code + (4 + ip)) & 0xFF,
|
|
|
|
(uint8)*(code + (5 + ip)) & 0xFF,
|
|
|
|
(uint8)*(code + (6 + ip)) & 0xFF,
|
|
|
|
(uint8)*(code + (7 + ip)) & 0xFF,
|
|
|
|
(uint8)*(code + (8 + ip)) & 0xFF);
|
2006-05-23 23:43:52 +00:00
|
|
|
}
|
2010-10-26 22:33:49 +00:00
|
|
|
debugN(0, "%s ", (x + *(code + ip) - 0xFC)->name);
|
2006-05-23 23:43:52 +00:00
|
|
|
break;
|
|
|
|
default:
|
2007-01-16 12:40:51 +00:00
|
|
|
x = mode == lCOMMAND_MODE ? logicNamesCmd : logicNamesTest;
|
2011-06-13 19:15:13 +00:00
|
|
|
a = x[*(code + ip)].argumentsLength();
|
|
|
|
c = x[*(code + ip)].args;
|
2006-05-23 23:43:52 +00:00
|
|
|
|
2007-01-16 12:40:51 +00:00
|
|
|
if (_debug.opcodes) {
|
2010-10-26 22:33:49 +00:00
|
|
|
debugN(0, "%02X %02X %02X %02X %02X %02X %02X %02X %02X\n"
|
2006-05-23 23:43:52 +00:00
|
|
|
" ",
|
2007-01-16 12:40:51 +00:00
|
|
|
(uint8)*(code + (0 + ip)) & 0xFF,
|
|
|
|
(uint8)*(code + (1 + ip)) & 0xFF,
|
|
|
|
(uint8)*(code + (2 + ip)) & 0xFF,
|
|
|
|
(uint8)*(code + (3 + ip)) & 0xFF,
|
|
|
|
(uint8)*(code + (4 + ip)) & 0xFF,
|
|
|
|
(uint8)*(code + (5 + ip)) & 0xFF,
|
|
|
|
(uint8)*(code + (6 + ip)) & 0xFF,
|
|
|
|
(uint8)*(code + (7 + ip)) & 0xFF,
|
|
|
|
(uint8)*(code + (8 + ip)) & 0xFF);
|
2006-05-23 23:43:52 +00:00
|
|
|
}
|
2010-10-26 22:33:49 +00:00
|
|
|
debugN(0, "%s ", (x + *(code + ip))->name);
|
2006-05-23 23:43:52 +00:00
|
|
|
|
|
|
|
for (z = 1; a > 0;) {
|
2011-06-13 19:15:13 +00:00
|
|
|
if (*c == 'n') {
|
2010-10-26 22:33:49 +00:00
|
|
|
debugN(0, "%d", *(code + (ip + z)));
|
2006-05-23 23:43:52 +00:00
|
|
|
} else {
|
2010-10-26 22:33:49 +00:00
|
|
|
debugN(0, "v%d[%d]", *(code + (ip + z)), getvar(*(code + (ip + z))));
|
2006-05-23 23:43:52 +00:00
|
|
|
}
|
2011-06-13 19:15:13 +00:00
|
|
|
c++;
|
2006-05-23 23:43:52 +00:00
|
|
|
z++;
|
|
|
|
if (--a > 0)
|
2010-10-26 22:33:49 +00:00
|
|
|
debugN(0, ",");
|
2006-05-23 23:43:52 +00:00
|
|
|
}
|
|
|
|
break;
|
|
|
|
}
|
|
|
|
|
2010-10-26 22:33:49 +00:00
|
|
|
debugN(0, "\n");
|
2006-05-23 23:43:52 +00:00
|
|
|
}
|
|
|
|
|
2007-01-16 12:40:51 +00:00
|
|
|
} // End of namespace Agi
|