diff options
author | Filippos Karapetis | 2018-12-27 14:48:11 +0200 |
---|---|---|
committer | Filippos Karapetis | 2018-12-28 13:41:39 +0200 |
commit | 91490c27adfde5f41b21bb2f3a6f648aab4270d0 (patch) | |
tree | 9af66c83e768a1219c7164fcbf70e3e66a35be8f /engines/glk/alan2/util.h | |
parent | bba8eadfaef76365429249368ca8e6d1385dc3e8 (diff) | |
download | scummvm-rg350-91490c27adfde5f41b21bb2f3a6f648aab4270d0.tar.gz scummvm-rg350-91490c27adfde5f41b21bb2f3a6f648aab4270d0.tar.bz2 scummvm-rg350-91490c27adfde5f41b21bb2f3a6f648aab4270d0.zip |
GLK: ALAN2: Initial work on the Alan2 subengine
Diffstat (limited to 'engines/glk/alan2/util.h')
-rw-r--r-- | engines/glk/alan2/util.h | 88 |
1 files changed, 88 insertions, 0 deletions
diff --git a/engines/glk/alan2/util.h b/engines/glk/alan2/util.h new file mode 100644 index 0000000000..3f5a482cd7 --- /dev/null +++ b/engines/glk/alan2/util.h @@ -0,0 +1,88 @@ +/* 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. + * + */ + +#ifndef GLK_ALAN2_UTIL +#define GLK_ALAN2_UTIL + +#include "glk/alan2/acode.h" +#include "glk/alan2/alan2.h" +#include "glk/alan2/types.h" + +namespace Glk { +namespace Alan2 { + +// TODO: Move these +LitElem litValues[]; +uint32 litCount = 0; // for LITMAX +extern ActElem *acts; // Actor table pointer +extern ObjElem *objs; // Object table pointer + +// Type checks +bool isObj(Aword x) { + return x >= OBJMIN && x <= OBJMAX; +} + +bool isAct(Aword x) { + return x >= ACTMIN && x <= ACTMAX; +} + +bool isCnt(Aword x) { + return (x >= CNTMIN && x <= CNTMAX) || + (isObj(x) && objs[x - OBJMIN].cont != 0) || + (isAct(x) && acts[x - ACTMIN].cont != 0); +} + +bool isLoc(Aword x) { + return x >= LOCMIN && x <= LOCMAX; +} + +bool isNum(Aword x) { + return x >= LITMIN && x <= LITMAX && litValues[x - LITMIN].type == TYPNUM; +} + +bool isStr(Aword x) { + return x >= LITMIN && x <= LITMAX && litValues[x - LITMIN].type == TYPSTR; +} + +bool isLit(Aword x) { + return x >= LITMIN && x <= LITMAX; +} + +bool endOfTable(LimElem *addr) { + Aword *x = (Aword *)addr; + return *x == EOF; +} + +bool endOfTable(ScrElem *addr) { + Aword *x = (Aword *)addr; + return *x == EOF; +} + +bool endOfTable(ExtElem *addr) { + Aword *x = (Aword *)addr; + return *x == EOF; +} + +} // End of namespace Alan2 +} // Engine of namespace GLK + +#endif |