2005-01-17 10:57:15 +00:00
|
|
|
/* Copyright (C) 1994-1998 Revolution Software Ltd.
|
2006-01-18 17:39:49 +00:00
|
|
|
* Copyright (C) 2003-2006 The ScummVM project
|
2003-07-28 01:44:38 +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
|
2005-10-18 01:30:26 +00:00
|
|
|
* Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301, USA.
|
2003-07-28 01:44:38 +00:00
|
|
|
*
|
2006-02-09 15:12:44 +00:00
|
|
|
* $URL$
|
|
|
|
* $Id$
|
2003-07-28 01:44:38 +00:00
|
|
|
*/
|
|
|
|
|
2006-02-12 19:57:23 +00:00
|
|
|
#ifndef SWORD2_INTERPRETER_H
|
|
|
|
#define SWORD2_INTERPRETER_H
|
2003-07-28 01:44:38 +00:00
|
|
|
|
2003-10-04 00:52:27 +00:00
|
|
|
namespace Sword2 {
|
|
|
|
|
2003-09-20 12:43:52 +00:00
|
|
|
// Interpreter return codes
|
2003-07-28 01:44:38 +00:00
|
|
|
|
2003-10-21 08:54:50 +00:00
|
|
|
enum {
|
2004-01-09 14:52:39 +00:00
|
|
|
IR_STOP = 0, // Quit for a cycle
|
|
|
|
IR_CONT = 1, // Continue as normal
|
|
|
|
IR_TERMINATE = 2, // Return without updating the offset
|
|
|
|
IR_REPEAT = 3, // Return; offset at start of function call
|
|
|
|
IR_GOSUB = 4 // Return with updated offset
|
2003-10-21 08:54:50 +00:00
|
|
|
};
|
2003-07-28 01:44:38 +00:00
|
|
|
|
2003-09-20 12:43:52 +00:00
|
|
|
// Get parameter fix so that the playstation version can handle words not on
|
|
|
|
// word boundaries
|
2003-07-28 01:44:38 +00:00
|
|
|
|
Applied my own patch #1341495, in an attempt to fix alignment issues
reported by Crilith.
To elaborate a bit, the engine no longer accesses resource data through
packed structs. Instead it uses memory streams and the READ/WRITE
functions.
If data is mainly read, not written, I have replaced the old struct with a
new one with a read() function to read the whole thing from memory into the
struct's variables, and a write() function to dump the struct's variables
to memory. In fact, most of these write() functions remain unused.
If data is both read and written, I have replaced the struct with a class
with individual get/set functions to replace the old variables. This
manipulates memory directly.
Since I'm fairly sure that these structs are frequently stored as local
variables for a script, all script variables (both local and global) are
stored as little-endian and accessed through the READ/WRITE functions,
rather than being treated as arrays of 32-bit integers.
On a positive note, the functions for doing endian conversion of resources
and save games have been removed, and some general cleanups have been made
to assist in the rewrite.
Initial reports indicate that this patch indeed fixes alignment issues, and
that I have not - surprisingly - broken the game on big-endian platforms.
At least not in any immediately obvious way. And there's still plenty of
time to fix regressions before 0.9.0, too.
svn-id: r19366
2005-10-29 21:24:54 +00:00
|
|
|
#define Read8ip(var) { var = code[ip]; ip++; }
|
|
|
|
#define Read16ip(var) { var = (int16)READ_LE_UINT16(code + ip); ip += 2; }
|
|
|
|
#define Read32ip(var) { var = (int32)READ_LE_UINT32(code + ip); ip += 4; }
|
|
|
|
#define Read32ipLeaveip(var) { var = (int32)READ_LE_UINT32(code + ip); }
|
2003-10-21 08:54:50 +00:00
|
|
|
|
|
|
|
enum {
|
|
|
|
// Compiled tokens
|
|
|
|
|
|
|
|
CP_END_SCRIPT = 0,
|
|
|
|
CP_PUSH_LOCAL_VAR32 = 1, // Push a local variable on to the stack
|
|
|
|
CP_PUSH_GLOBAL_VAR32 = 2, // Push a global variable
|
|
|
|
CP_POP_LOCAL_VAR32 = 3, // Pop a local variable from the stack
|
|
|
|
CP_CALL_MCODE = 4, // Call a machine code function
|
|
|
|
CP_PUSH_LOCAL_ADDR = 5, // Push the address of a local variable
|
|
|
|
CP_PUSH_INT32 = 6, // Adjust the stack after calling an fn function
|
|
|
|
CP_SKIPONFALSE = 7, // Skip if the bottom value on the stack is false
|
|
|
|
CP_SKIPALWAYS = 8, // Skip a block of code
|
|
|
|
CP_SWITCH = 9, // Switch on last stack value
|
|
|
|
CP_ADDNPOP_LOCAL_VAR32 = 10, // Add to a local varible
|
2003-12-14 16:33:27 +00:00
|
|
|
CP_SUBNPOP_LOCAL_VAR32 = 11, // Subtract from a local variable
|
2003-10-21 08:54:50 +00:00
|
|
|
CP_SKIPONTRUE = 12, // Skip if the bottom value on the stack is true
|
|
|
|
CP_POP_GLOBAL_VAR32 = 13, // Pop a global variable
|
2003-12-14 16:33:27 +00:00
|
|
|
CP_ADDNPOP_GLOBAL_VAR32 = 14, // Add to a global variable
|
|
|
|
CP_SUBNPOP_GLOBAL_VAR32 = 15, // Subtract from a global variable
|
2003-10-21 08:54:50 +00:00
|
|
|
CP_DEBUGON = 16, // Turn debugging on
|
|
|
|
CP_DEBUGOFF = 17, // Turn debugging off
|
|
|
|
CP_QUIT = 18, // Quit for a cycle
|
|
|
|
CP_TERMINATE = 19, // Quit script completely
|
|
|
|
|
|
|
|
// Operators
|
|
|
|
|
|
|
|
OP_ISEQUAL = 20, // '=='
|
|
|
|
OP_PLUS = 21, // '+'
|
|
|
|
OP_MINUS = 22, // '-'
|
|
|
|
OP_TIMES = 23, // '*'
|
|
|
|
OP_DIVIDE = 24, // '/'
|
|
|
|
OP_NOTEQUAL = 25, // '=='
|
|
|
|
OP_ANDAND = 26, // '&&'
|
|
|
|
OP_GTTHAN = 27, // '>'
|
|
|
|
OP_LSTHAN = 28, // '<'
|
|
|
|
|
|
|
|
// More tokens, mixed types
|
|
|
|
|
|
|
|
CP_JUMP_ON_RETURNED = 29, // Use table of jumps with value returned from fn_mcode
|
|
|
|
CP_TEMP_TEXT_PROCESS = 30, // A dummy text process command for me
|
|
|
|
CP_SAVE_MCODE_START = 31, // Save the mcode code start for restarting when necessary
|
|
|
|
CP_RESTART_SCRIPT = 32, // Start the script from the beginning
|
|
|
|
CP_PUSH_STRING = 33, // Push a pointer to a string on the stack
|
|
|
|
CP_PUSH_DEREFERENCED_STRUCTURE = 34, // Push the address of a structure thing
|
|
|
|
OP_GTTHANE = 35, // >=
|
|
|
|
OP_LSTHANE = 36, // <=
|
|
|
|
OP_OROR = 37 // || or OR
|
|
|
|
};
|
2003-07-28 01:44:38 +00:00
|
|
|
|
2003-10-04 00:52:27 +00:00
|
|
|
} // End of namespace Sword2
|
|
|
|
|
2003-07-28 01:44:38 +00:00
|
|
|
#endif
|