aboutsummaryrefslogtreecommitdiff
path: root/gob/parse.cpp
diff options
context:
space:
mode:
Diffstat (limited to 'gob/parse.cpp')
-rw-r--r--gob/parse.cpp849
1 files changed, 0 insertions, 849 deletions
diff --git a/gob/parse.cpp b/gob/parse.cpp
index 23c68bc144..c122bd8ea0 100644
--- a/gob/parse.cpp
+++ b/gob/parse.cpp
@@ -70,576 +70,6 @@ char *Parse::decodePtr(int32 n) {
return ptr + (n & 0x0FFFFFFF);
}
-int16 Parse::parseExpr(char stopToken, byte *arg_2) {
- int32 values[20];
- byte operStack[20];
- int32 prevPrevVal;
- int32 prevVal;
- int32 curVal;
- int32 *valPtr;
- char *operPtr;
- byte *arrDescPtr;
- char var_C;
- byte operation;
- int16 dimCount;
- int16 temp;
- int16 temp2;
- uint16 offset;
- int16 dim;
- char var_1A;
- int16 stkPos;
- int16 brackStart;
-
- stkPos = -1;
- operPtr = (char *)(operStack - 1);
- valPtr = values - 1;
-
- while (1) {
- stkPos++;
- operPtr++;
- valPtr++;
- operation = *_vm->_global->_inter_execPtr++;
- if (operation >= 19 && operation <= 29) {
- switch (operation) {
- case 19:
- *operPtr = 20;
- *valPtr = READ_LE_UINT32(_vm->_global->_inter_execPtr);
- _vm->_global->_inter_execPtr += 4;
- break;
-
- case 20:
- *operPtr = 20;
- *valPtr = _vm->_inter->load16();
- break;
-
- case 22:
- *operPtr = 22;
- *valPtr = encodePtr(_vm->_global->_inter_execPtr, kExecPtr);
- _vm->_global->_inter_execPtr += strlen(_vm->_global->_inter_execPtr) + 1;
- break;
-
- case 23:
- *operPtr = 20;
- *valPtr = VAR(_vm->_inter->load16());
- break;
-
- case 25:
- *operPtr = 22;
- temp = _vm->_inter->load16() * 4;
- *valPtr = encodePtr(_vm->_global->_inter_variables + temp, kInterVar);
- if (*_vm->_global->_inter_execPtr == 13) {
- _vm->_global->_inter_execPtr++;
- temp += parseValExpr(12);
- *operPtr = 20;
- *valPtr = (uint8)*(_vm->_global->_inter_variables + temp);
- }
- break;
-
- case 26:
- case 28:
- *operPtr = operation - 6;
- temp = _vm->_inter->load16();
- dimCount = *_vm->_global->_inter_execPtr++;
- arrDescPtr = (byte *)_vm->_global->_inter_execPtr;
- _vm->_global->_inter_execPtr += dimCount;
- offset = 0;
- dim = 0;
- for (dim = 0; dim < dimCount; dim++) {
- temp2 = parseValExpr(12);
- offset = offset * arrDescPtr[dim] + temp2;
- }
-
- if (operation == 26) {
- *valPtr = VAR(temp + offset);
- break;
- }
- *valPtr = encodePtr(_vm->_global->_inter_variables + temp * 4 + offset * _vm->_global->_inter_animDataSize * 4, kInterVar);
- if (*_vm->_global->_inter_execPtr == 13) {
- _vm->_global->_inter_execPtr++;
- temp2 = parseValExpr(12);
- *operPtr = 20;
- *valPtr = (uint8)*(_vm->_global->_inter_variables + temp * 4 + offset * 4 * _vm->_global->_inter_animDataSize + temp2);
- }
- break;
-
- case 29:
- operation = *_vm->_global->_inter_execPtr++;
- parseExpr(10, 0);
-
- switch (operation) {
- case 5:
- _vm->_global->_inter_resVal = _vm->_global->_inter_resVal * _vm->_global->_inter_resVal;
- break;
-
- case 0:
- case 1:
- case 6:
- curVal = 1;
- prevVal = 1;
-
- do {
- prevPrevVal = prevVal;
- prevVal = curVal;
- curVal = (curVal + _vm->_global->_inter_resVal / curVal) / 2;
- } while (curVal != prevVal && curVal != prevPrevVal);
- _vm->_global->_inter_resVal = curVal;
- break;
-
- case 10:
- _vm->_global->_inter_resVal = _vm->_util->getRandom(_vm->_global->_inter_resVal);
- break;
-
- case 7:
- if (_vm->_global->_inter_resVal < 0)
- _vm->_global->_inter_resVal = -_vm->_global->_inter_resVal;
- break;
- }
- *operPtr = 20;
- *valPtr = _vm->_global->_inter_resVal;
- }
-
- if (stkPos > 0 && (operPtr[-1] == 1 || operPtr[-1] == 11)) {
- stkPos--;
- operPtr--;
- valPtr--;
-
- if (*operPtr == 1) {
- *operPtr = 20;
- valPtr[0] = -valPtr[1];
- } else if (*operPtr == 11) {
- if (operPtr[1] == 23)
- *operPtr = 24;
- else
- *operPtr = 23;
- }
- }
-
- if (stkPos <= 0)
- continue;
-
- switch (operPtr[-1]) {
- case 2:
- if (operPtr[-2] == 22) {
- if (decodePtr(valPtr[-2]) != _vm->_global->_inter_resStr) {
- strcpy(_vm->_global->_inter_resStr, decodePtr(valPtr[-2]));
- valPtr[-2] = encodePtr(_vm->_global->_inter_resStr, kResStr);
- }
- strcat(_vm->_global->_inter_resStr, decodePtr(valPtr[0]));
- stkPos -= 2;
- operPtr -= 2;
- valPtr -= 2;
- }
- break;
-
- case 5:
- valPtr[-2] *= valPtr[0];
- stkPos -= 2;
- operPtr -= 2;
- valPtr -= 2;
- break;
-
- case 6:
- valPtr[-2] /= valPtr[0];
- stkPos -= 2;
- operPtr -= 2;
- valPtr -= 2;
- break;
-
- case 7:
- valPtr[-2] %= valPtr[0];
- stkPos -= 2;
- operPtr -= 2;
- valPtr -= 2;
- break;
-
- case 8:
- valPtr[-2] &= valPtr[0];
- stkPos -= 2;
- operPtr -= 2;
- valPtr -= 2;
- break;
- }
- continue;
- } // op>= 19 && op <= 29
-
- if (operation == stopToken || operation == 30 || operation == 31 || operation == 10) {
- while (stkPos >= 2) {
- var_1A = 0;
- if (operPtr[-2] == 9 && (operation == 10 || operation == stopToken)) {
- operPtr[-2] = operPtr[-1];
- if (operPtr[-2] == 20 || operPtr[-2] == 22)
- valPtr[-2] = valPtr[-1];
-
- stkPos--;
- operPtr--;
- valPtr--;
-
- if (stkPos > 1) {
- if (operPtr[-2] == 1) {
- operPtr[-2] = 20;
- valPtr[-2] = -valPtr[-1];
- stkPos--;
- operPtr--;
- valPtr--;
- } else if (operPtr[-2] == 11) {
- if (operPtr[-1] == 23)
- operPtr[-2] = 24;
- else
- operPtr[-2] = 23;
-
- stkPos--;
- operPtr--;
- valPtr--;
- }
- } // stkPos > 1
-
- if (stkPos > 2) {
- switch (operPtr[-2]) {
- case 5:
- valPtr[-3] *= valPtr[-1];
- stkPos -= 2;
- operPtr -= 2;
- valPtr -= 2;
- break;
- case 6:
- valPtr[-3] /= valPtr[-1];
- stkPos -= 2;
- operPtr -= 2;
- valPtr -= 2;
- break;
-
- case 7:
- valPtr[-3] %= valPtr[-1];
- stkPos -= 2;
- operPtr -= 2;
- valPtr -= 2;
- break;
-
- case 8:
- valPtr[-3] &= valPtr[-1];
- stkPos -= 2;
- operPtr -= 2;
- valPtr -= 2;
- break;
- } // switch
- } // stkPos > 2
-
- if (operation != stopToken)
- break;
- } // if (operPtr[-2] == 9 && ...)
-
- for (brackStart = stkPos - 2; brackStart > 0 &&
- operStack[brackStart] < 30 &&
- operStack[brackStart] != 9; brackStart--);
-
- if (operStack[brackStart] >= 30 || operStack[brackStart] == 9)
- brackStart++;
-
- switch (operPtr[-2]) {
- case 2:
- if (operStack[brackStart] == 20) {
- values[brackStart] += valPtr[-1];
- } else if (operStack[brackStart] == 22) {
- if (decodePtr(values[brackStart]) != _vm->_global->_inter_resStr) {
- strcpy(_vm->_global->_inter_resStr, decodePtr(values[brackStart]));
- values[brackStart] = encodePtr(_vm->_global->_inter_resStr, kResStr);
- }
- strcat(_vm->_global->_inter_resStr, decodePtr(valPtr[-1]));
- }
- stkPos -= 2;
- operPtr -= 2;
- valPtr -= 2;
- continue;
-
- case 3:
- values[brackStart] -= valPtr[-1];
- stkPos -= 2;
- operPtr -= 2;
- valPtr -= 2;
- continue;
-
- case 4:
- values[brackStart] |= valPtr[-1];
- stkPos -= 2;
- operPtr -= 2;
- valPtr -= 2;
- continue;
-
- case 5:
- valPtr[-3] *= valPtr[-1];
- stkPos -= 2;
- operPtr -= 2;
- valPtr -= 2;
- break;
-
- case 6:
- valPtr[-3] /= valPtr[-1];
- stkPos -= 2;
- operPtr -= 2;
- valPtr -= 2;
- break;
-
- case 7:
- valPtr[-3] %= valPtr[-1];
- stkPos -= 2;
- operPtr -= 2;
- valPtr -= 2;
- break;
-
- case 8:
- valPtr[-3] &= valPtr[-1];
- stkPos -= 2;
- operPtr -= 2;
- valPtr -= 2;
- break;
-
- case 30:
- if (operPtr[-3] == 23)
- operPtr[-3] = operPtr[-1];
- stkPos -= 2;
- operPtr -= 2;
- valPtr -= 2;
- break;
-
- case 31:
- if (operPtr[-3] == 24)
- operPtr[-3] = operPtr[-1];
- stkPos -= 2;
- operPtr -= 2;
- valPtr -= 2;
- break;
-
- case 32:
- var_C = operPtr[-3];
- operPtr[-3] = 23;
- if (var_C == 20) {
- if (valPtr[-3] < valPtr[-1])
- operPtr[-3] = 24;
- } else if (var_C == 22) {
- if (decodePtr(valPtr[-3]) != _vm->_global->_inter_resStr) {
- strcpy(_vm->_global->_inter_resStr, decodePtr(valPtr[-3]));
- valPtr[-3] = encodePtr(_vm->_global->_inter_resStr, kResStr);
- }
- if (strcmp(_vm->_global->_inter_resStr, decodePtr(valPtr[-1])) < 0)
- operPtr[-3] = 24;
- }
- stkPos -= 2;
- operPtr -= 2;
- valPtr -= 2;
- break;
-
- case 33:
- var_C = operPtr[-3];
- operPtr[-3] = 23;
- if (var_C == 20) {
- if (valPtr[-3] <= valPtr[-1])
- operPtr[-3] = 24;
- } else if (var_C == 22) {
- if (decodePtr(valPtr[-3]) != _vm->_global->_inter_resStr) {
- strcpy(_vm->_global->_inter_resStr, decodePtr(valPtr[-3]));
- valPtr[-3] = encodePtr(_vm->_global->_inter_resStr, kResStr);
- }
- if (strcmp(_vm->_global->_inter_resStr, decodePtr(valPtr[-1])) <= 0)
- operPtr[-3] = 24;
- }
- stkPos -= 2;
- operPtr -= 2;
- valPtr -= 2;
- break;
-
- case 34:
- var_C = operPtr[-3];
- operPtr[-3] = 23;
- if (var_C == 20) {
- if (valPtr[-3] > valPtr[-1])
- operPtr[-3] = 24;
- } else if (var_C == 22) {
- if (decodePtr(valPtr[-3]) != _vm->_global->_inter_resStr) {
- strcpy(_vm->_global->_inter_resStr, decodePtr(valPtr[-3]));
- valPtr[-3] = encodePtr(_vm->_global->_inter_resStr, kResStr);
- }
- if (strcmp(_vm->_global->_inter_resStr, decodePtr(valPtr[-1])) > 0)
- operPtr[-3] = 24;
- }
- stkPos -= 2;
- operPtr -= 2;
- valPtr -= 2;
- break;
-
- case 35:
- var_C = operPtr[-3];
- operPtr[-3] = 23;
- if (var_C == 20) {
- if (valPtr[-3] >= valPtr[-1])
- operPtr[-3] = 24;
- } else if (var_C == 22) {
- if (decodePtr(valPtr[-3]) != _vm->_global->_inter_resStr) {
- strcpy(_vm->_global->_inter_resStr, decodePtr(valPtr[-3]));
- valPtr[-3] = encodePtr(_vm->_global->_inter_resStr, kResStr);
- }
- if (strcmp(_vm->_global->_inter_resStr, decodePtr(valPtr[-1])) >= 0)
- operPtr[-3] = 24;
- }
- stkPos -= 2;
- operPtr -= 2;
- valPtr -= 2;
- break;
-
- case 36:
- var_C = operPtr[-3];
- operPtr[-3] = 23;
- if (var_C == 20) {
- if (valPtr[-3] == valPtr[-1])
- operPtr[-3] = 24;
- } else if (var_C == 22) {
- if (decodePtr(valPtr[-3]) != _vm->_global->_inter_resStr) {
- strcpy(_vm->_global->_inter_resStr, decodePtr(valPtr[-3]));
- valPtr[-3] = encodePtr(_vm->_global->_inter_resStr, kResStr);
- }
- if (strcmp(_vm->_global->_inter_resStr, decodePtr(valPtr[-1])) == 0)
- operPtr[-3] = 24;
- }
- stkPos -= 2;
- operPtr -= 2;
- valPtr -= 2;
- break;
-
- case 37:
- var_C = operPtr[-3];
- operPtr[-3] = 23;
- if (var_C == 20) {
- if (valPtr[-3] != valPtr[-1])
- operPtr[-3] = 24;
- } else if (var_C == 22) {
- if (decodePtr(valPtr[-3]) != _vm->_global->_inter_resStr) {
- strcpy(_vm->_global->_inter_resStr, decodePtr(valPtr[-3]));
- valPtr[-3] = encodePtr(_vm->_global->_inter_resStr, kResStr);
- }
- if (strcmp(_vm->_global->_inter_resStr, decodePtr(valPtr[-1])) != 0)
- operPtr[-3] = 24;
- }
- stkPos -= 2;
- operPtr -= 2;
- valPtr -= 2;
- break;
-
- default:
- var_1A = 1;
- break;
- } // switch
-
- if (var_1A != 0)
- break;
- } // while (stkPos >= 2)
-
- if (operation == 30 || operation == 31) {
- if (operPtr[-1] == 20) {
- if (valPtr[-1] != 0)
- operPtr[-1] = 24;
- else
- operPtr[-1] = 23;
- }
-
- if ((operation == 30 && operPtr[-1] == 24) ||
- (operation == 31 && operPtr[-1] == 23)) {
- if (stkPos > 1 && operPtr[-2] == 9) {
- skipExpr(10);
- operPtr[-2] = operPtr[-1];
- stkPos -= 2;
- operPtr -= 2;
- valPtr -= 2;
- } else {
- skipExpr(stopToken);
- }
- operation = _vm->_global->_inter_execPtr[-1];
- if (stkPos > 0 && operPtr[-1] == 11) {
- if (operPtr[0] == 23)
- operPtr[-1] = 24;
- else
- operPtr[-1] = 23;
-
- stkPos--;
- operPtr--;
- valPtr--;
- }
- } else
- operPtr[0] = operation;
- } else {
- stkPos--;
- operPtr--;
- valPtr--;
- }
-
- if (operation != stopToken)
- continue;
-
- if (arg_2 != 0)
- *arg_2 = operStack[0];
-
- switch (operStack[0]) {
- case 20:
- _vm->_global->_inter_resVal = values[0];
- break;
-
- case 22:
- if (decodePtr(values[0]) != _vm->_global->_inter_resStr)
- strcpy(_vm->_global->_inter_resStr, decodePtr(values[0]));
- break;
-
- case 11:
- if (arg_2 != 0)
- *arg_2 ^= 1;
- break;
-
- case 23:
- case 24:
- break;
-
- default:
- _vm->_global->_inter_resVal = 0;
- if (arg_2 != 0)
- *arg_2 = 20;
- break;
- }
- return 0;
- } // operation == stopToken || operation == 30 || operation == 31 || operation == 10
-
- if (operation < 1 || operation > 11) {
- if (operation < 32 || operation > 37)
- continue;
-
- if (stkPos > 2) {
- if (operPtr[-2] == 2) {
- if (operPtr[-3] == 20) {
- valPtr[-3] += valPtr[-1];
- } else if (operPtr[-3] == 22) {
- if (decodePtr(valPtr[-3]) != _vm->_global->_inter_resStr) {
- strcpy(_vm->_global->_inter_resStr, decodePtr(valPtr[-3]));
- valPtr[-3] = encodePtr(_vm->_global->_inter_resStr, kResStr);
- }
- strcat(_vm->_global->_inter_resStr, decodePtr(valPtr[-1]));
- }
- stkPos -= 2;
- operPtr -= 2;
- valPtr -= 2;
-
- } else if (operPtr[-2] == 3) {
- valPtr[-3] -= valPtr[-1];
- stkPos -= 2;
- operPtr -= 2;
- valPtr -= 2;
- } else if (operPtr[-2] == 4) {
- valPtr[-3] |= valPtr[-1];
- stkPos -= 2;
- operPtr -= 2;
- valPtr -= 2;
- }
- }
- }
- *operPtr = operation;
- }
-}
-
void Parse::skipExpr(char stopToken) {
int16 dimCount;
char operation;
@@ -715,285 +145,6 @@ void Parse::skipExpr(char stopToken) {
}
}
-int16 Parse::parseValExpr(unsigned stopToken) {
- int16 values[20];
- byte operStack[20];
- int16 *valPtr;
- byte *operPtr;
- byte *arrDesc;
- unsigned operation;
- int16 temp2;
- int16 dim;
- int16 dimCount;
- int16 temp;
- int16 offset;
- int16 stkPos;
- int16 brackPos;
- static int16 flag = 0;
- int16 oldflag;
-
- oldflag = flag;
- if (flag == 0) {
- flag = 1;
- printExpr(stopToken);
- }
-
- stkPos = -1;
- operPtr = operStack - 1;
- valPtr = values - 1;
-
- while (1) {
- stkPos++;
- operPtr++;
- valPtr++;
-
- operation = *_vm->_global->_inter_execPtr++;
- if (operation >= 19 && operation <= 29) {
- *operPtr = 20;
- switch (operation) {
- case 19:
- *valPtr = READ_LE_UINT32(_vm->_global->_inter_execPtr);
- _vm->_global->_inter_execPtr += 4;
- break;
-
- case 20:
- *valPtr = _vm->_inter->load16();
- break;
-
- case 23:
- *valPtr = (uint16)VAR(_vm->_inter->load16());
- break;
-
- case 25:
- temp = _vm->_inter->load16() * 4;
- _vm->_global->_inter_execPtr++;
- temp += parseValExpr(12);
- *valPtr = (uint8)*(_vm->_global->_inter_variables + temp);
- break;
-
- case 26:
- case 28:
- temp = _vm->_inter->load16();
- dimCount = *_vm->_global->_inter_execPtr++;
- arrDesc = (byte*)_vm->_global->_inter_execPtr;
- _vm->_global->_inter_execPtr += dimCount;
- offset = 0;
- for (dim = 0; dim < dimCount; dim++) {
- temp2 = parseValExpr(12);
- offset = arrDesc[dim] * offset + temp2;
- }
- if (operation == 26) {
- *valPtr = (uint16)VAR(temp + offset);
- } else {
- _vm->_global->_inter_execPtr++;
- temp2 = parseValExpr(12);
- *valPtr = (uint8)*(_vm->_global->_inter_variables + temp * 4 + offset * 4 * _vm->_global->_inter_animDataSize + temp2);
- }
- break;
-
- case 29:
- operation = *_vm->_global->_inter_execPtr++;
- parseExpr(10, 0);
-
- if (operation == 5) {
- _vm->_global->_inter_resVal = _vm->_global->_inter_resVal * _vm->_global->_inter_resVal;
- } else if (operation == 7) {
- if (_vm->_global->_inter_resVal < 0)
- _vm->_global->_inter_resVal = -_vm->_global->_inter_resVal;
- } else if (operation == 10) {
- _vm->_global->_inter_resVal = _vm->_util->getRandom(_vm->_global->_inter_resVal);
- }
- *valPtr = _vm->_global->_inter_resVal;
- break;
-
- } // switch
- if (stkPos > 0 && operPtr[-1] == 1) {
- stkPos--;
- operPtr--;
- valPtr--;
- operPtr[0] = 20;
- valPtr[0] = -valPtr[1];
- }
-
- if (stkPos > 0 && operPtr[-1] > 4 && operPtr[-1] < 9) {
- stkPos -= 2;
- operPtr -= 2;
- valPtr -= 2;
-
- switch (operPtr[1]) {
- case 5:
- valPtr[0] *= valPtr[2];
- break;
-
- case 6:
- valPtr[0] /= valPtr[2];
- break;
-
- case 7:
- valPtr[0] %= valPtr[2];
- break;
-
- case 8:
- valPtr[0] &= valPtr[2];
- break;
- }
- } // if (stkPos > 0 && cmdPtr[-1] > 4 && cmdPtr[-1] < 9)
- continue;
- }
-
- if (operation >= 1 && operation <= 9) {
- *operPtr = operation;
- continue;
- }
-
- while (stkPos >= 2) {
- if (operPtr[-2] == 9) {
- stkPos--;
- operPtr--;
- valPtr--;
-
- operPtr[-1] = operPtr[0];
- valPtr[-1] = valPtr[0];
- if (stkPos > 1 && operPtr[-2] == 1) {
- valPtr[-2] = 20;
- valPtr[-2] = -valPtr[-1];
-
- stkPos--;
- operPtr--;
- valPtr--;
- }
-
- if (stkPos > 2 && operPtr[-2] > 4
- && operPtr[-2] < 9) {
- stkPos -= 2;
- operPtr -= 2;
- valPtr -= 2;
- switch (operPtr[0]) {
- case 5:
- operPtr[-1] *= operPtr[1];
- break;
-
- case 6:
- operPtr[-1] /= operPtr[1];
- break;
-
- case 7:
- operPtr[-1] %= operPtr[1];
- break;
-
- case 8:
- operPtr[-1] &= operPtr[1];
- break;
- }
- }
- if (operation == 10)
- break;
- } // operPtr[-2] == 9
-
- for (brackPos = stkPos - 2; brackPos > 0 &&
- operStack[brackPos] < 30
- && operStack[brackPos] != 9; brackPos--);
-
- if (operStack[brackPos] >= 30
- || operStack[brackPos] == 9)
- brackPos++;
-
- if (operPtr[-2] < 2 || operPtr[-2] > 8)
- break;
-
- stkPos -= 2;
- operPtr -= 2;
- valPtr -= 2;
- switch (operPtr[0]) {
- case 2:
- values[brackPos] += valPtr[1];
- continue;
- case 3:
- values[brackPos] -= valPtr[1];
- continue;
- case 4:
- values[brackPos] |= valPtr[1];
- continue;
- case 5:
- valPtr[-1] *= valPtr[1];
- continue;
- case 6:
- valPtr[-1] /= valPtr[1];
- continue;
- case 7:
- valPtr[-1] %= valPtr[1];
- continue;
- case 8:
- valPtr[-1] &= valPtr[1];
- continue;
- }
- }
-
- if (operation != 10) {
- if (operation != stopToken) {
- debug(5, "stoptoken error: %d != %d", operation, stopToken);
- }
- flag = oldflag;
- return values[0];
- }
-
- stkPos--;
- operPtr--;
- valPtr--;
- }
-}
-
-int16 Parse::parseVarIndex() {
- int16 temp2;
- char *arrDesc;
- int16 dim;
- int16 dimCount;
- int16 operation;
- int16 temp;
- int16 offset;
- int16 val;
-
- operation = *_vm->_global->_inter_execPtr++;
- debug(5, "var parse = %d", operation);
- switch (operation) {
- case 23:
- case 25:
- temp = _vm->_inter->load16() * 4;
- debug(5, "oper = %d", (int16)*_vm->_global->_inter_execPtr);
- if (operation == 25 && *_vm->_global->_inter_execPtr == 13) {
- _vm->_global->_inter_execPtr++;
- val = parseValExpr(12);
- temp += val;
- debug(5, "parse subscript = %d", val);
- }
- return temp;
-
- case 26:
- case 28:
- temp = _vm->_inter->load16() * 4;
- dimCount = *_vm->_global->_inter_execPtr++;
- arrDesc = _vm->_global->_inter_execPtr;
- _vm->_global->_inter_execPtr += dimCount;
- offset = 0;
- for (dim = 0; dim < dimCount; dim++) {
- temp2 = parseValExpr(12);
- offset = arrDesc[dim] * offset + temp2;
- }
- offset *= 4;
- if (operation != 28)
- return temp + offset;
-
- if (*_vm->_global->_inter_execPtr == 13) {
- _vm->_global->_inter_execPtr++;
- temp += parseValExpr(12);
- }
- return offset * _vm->_global->_inter_animDataSize + temp;
-
- default:
- return 0;
- }
-}
-
void Parse::printExpr(char stopToken) {
int16 dimCount;
char operation;
generated by cgit v1.2.3 (git 2.25.1) at 2024-07-16 11:44:43 +0000