1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
|
/* ScummVM - Graphic Adventure Engine
*
* 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.
*
* 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.
*
* $URL$
* $Id$
*
*/
#ifndef MADE_SCRIPT_H
#define MADE_SCRIPT_H
#include "common/util.h"
#include "common/file.h"
#include "common/stream.h"
namespace Made {
class MadeEngine;
class ScriptFunctions;
const int kScriptStackSize = 1000;
const int kScriptStackLimit = kScriptStackSize + 1;
class ScriptStack {
public:
ScriptStack();
~ScriptStack();
int16 top();
int16 pop();
void push(int16 value = 0);
void setTop(int16 value);
int16 peek(int16 index);
void poke(int16 index, int16 value);
void alloc(int16 count);
void free(int16 count);
int16 getStackPos() const { return _stackPos; }
void setStackPos(int16 stackPtr);
int16 *getStackPtr();
protected:
int16 _stack[kScriptStackSize];
int16 _stackPos;
};
class ScriptInterpreter {
public:
ScriptInterpreter(MadeEngine *vm);
~ScriptInterpreter();
void runScript(int16 scriptObjectIndex);
protected:
MadeEngine *_vm;
ScriptStack _stack;
int16 _localStackPos;
int16 _runningScriptObjectIndex;
byte *_codeBase, *_codeIp;
bool _terminated;
ScriptFunctions *_functions;
byte readByte();
int16 readInt16();
typedef void (ScriptInterpreter::*CommandProc)();
struct CommandEntry {
CommandProc proc;
const char *desc;
};
const CommandEntry *_commands;
int16 _commandsMax;
void cmd_branchTrue();
void cmd_branchFalse();
void cmd_branch();
void cmd_true();
void cmd_false();
void cmd_push();
void cmd_not();
void cmd_add();
void cmd_sub();
void cmd_mul();
void cmd_div();
void cmd_mod();
void cmd_band();
void cmd_bor();
void cmd_bnot();
void cmd_lt();
void cmd_eq();
void cmd_gt();
void cmd_loadConstant();
void cmd_loadVariable();
void cmd_getObjectProperty();
void cmd_setObjectProperty();
void cmd_set();
void cmd_print();
void cmd_terpri();
void cmd_printNumber();
void cmd_vref();
void cmd_vset();
void cmd_vsize();
void cmd_exit();
void cmd_return();
void cmd_call();
void cmd_svar();
void cmd_sset();
void cmd_split();
void cmd_snlit();
void cmd_yorn();
void cmd_save();
void cmd_restore();
void cmd_arg();
void cmd_aset();
void cmd_tmp();
void cmd_tset();
void cmd_tspace();
void cmd_class();
void cmd_objectp();
void cmd_vectorp();
void cmd_restart();
void cmd_rand();
void cmd_randomize();
void cmd_send();
void cmd_extend();
void cmd_catch();
void cmd_cdone();
void cmd_throw();
void cmd_functionp();
void cmd_le();
void cmd_ge();
void cmd_varx();
void cmd_setx();
};
} // End of namespace Made
#endif /* MADE_H */
|
