/* 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. * */ #include "twine/text.h" #include "common/scummsys.h" #include "common/str.h" #include "common/system.h" #include "twine/hqrdepack.h" #include "twine/interface.h" #include "twine/keyboard.h" #include "twine/menu.h" #include "twine/renderer.h" #include "twine/resources.h" #include "twine/screens.h" #include "twine/sound.h" #include "twine/twine.h" namespace TwinE { /** FLA movie extension */ #define VOX_EXT ".vox" /** Common movie directory */ #define VOX_DIR "vox/" void Text::initVoxBank(int32 bankIdx) { static const char *LanguageSufixTypes[] = { "sys", "cre", "gam", "000", "001", "002", "003", "004", "005", "006", "007", "008", "009", "010", "011"}; if (bankIdx < 0 || bankIdx >= ARRAYSIZE(LanguageSufixTypes)) { error("bankIdx is out of bounds: %i", bankIdx); } // get the correct vox hqr file currentVoxBankFile = Common::String::format(VOX_DIR "%s%s" VOX_EXT, LanguageTypes[_engine->cfgfile.LanguageId].id, LanguageSufixTypes[bankIdx]); // TODO check the rest to reverse } int32 Text::initVoxToPlay(int32 index) { // setVoxFileAtDigit int32 i = 0; int32 currIdx = 0; int32 orderIdx = 0; int16 *localOrderBuf = (int16 *)dialOrderPtr; voxHiddenIndex = 0; hasHiddenVox = 0; // choose right text from order index for (i = 0; i < numDialTextEntries; i++) { orderIdx = *(localOrderBuf++); if (orderIdx == index) { currIdx = i; break; } } currDialTextEntry = currIdx; _engine->_sound->playVoxSample(currDialTextEntry); return 1; } int32 Text::playVox(int32 index) { if (_engine->cfgfile.LanguageCDId && index) { if (hasHiddenVox && !_engine->_sound->isSamplePlaying(index)) { _engine->_sound->playVoxSample(index); return 1; } } return 0; } int32 Text::playVoxSimple(int32 index) { if (_engine->cfgfile.LanguageCDId && index) { playVox(index); if (_engine->_sound->isSamplePlaying(index)) { return 1; } } return 0; } void Text::stopVox(int32 index) { hasHiddenVox = 0; _engine->_sound->stopSample(index); } void Text::initTextBank(int32 bankIdx) { // InitDial int32 langIdx; int32 hqrSize; // don't load if we already have the dialogue text bank loaded if (bankIdx == currentBankIdx) return; currentBankIdx = bankIdx; // RECHECK THIS LATER textVar2[0] = textVar3; // get index according with language langIdx = (_engine->cfgfile.LanguageId * 14) * 2 + bankIdx * 2; hqrSize = _engine->_hqrdepack->hqrGetallocEntry((uint8 **)&dialOrderPtr, Resources::HQR_TEXT_FILE, langIdx); numDialTextEntries = hqrSize / 2; hqrSize = _engine->_hqrdepack->hqrGetallocEntry((uint8 **)&dialTextPtr, Resources::HQR_TEXT_FILE, ++langIdx); if (_engine->cfgfile.LanguageCDId) { initVoxBank(bankIdx); } } void Text::drawCharacter(int32 x, int32 y, uint8 character) { // drawCharacter uint8 sizeX; uint8 sizeY; uint8 param1; uint8 param2; uint8 *data; uint8 *screen2; // int temp=0; int32 toNextLine; uint8 index; // char color; uint8 usedColor; uint8 number; uint8 jump; int32 i; int32 tempX; int32 tempY; data = fontPtr + *((int16 *)(fontPtr + character * 4)); dialTextSize = sizeX = *(data++); sizeY = *(data++); param1 = *(data++); param2 = *(data++); x += param1; y += param2; usedColor = dialTextColor; screen2 = (uint8*)_engine->frontVideoBuffer.getPixels() + _engine->screenLookupTable[y] + x; tempX = x; tempY = y; toNextLine = SCREEN_WIDTH - sizeX; do { index = *(data++); do { jump = *(data++); screen2 += jump; tempX += jump; if (--index == 0) { screen2 += toNextLine; tempY++; tempX = x; sizeY--; if (sizeY <= 0) { return; } break; } else { number = *(data++); for (i = 0; i < number; i++) { if (tempX >= SCREEN_TEXTLIMIT_LEFT && tempX < SCREEN_TEXTLIMIT_RIGHT && tempY >= SCREEN_TEXTLIMIT_TOP && tempY < SCREEN_TEXTLIMIT_BOTTOM) { *((uint8*)_engine->frontVideoBuffer.getBasePtr(tempX, tempY)) = usedColor; } screen2++; tempX++; } if (--index == 0) { screen2 += toNextLine; tempY++; tempX = x; sizeY--; if (sizeY <= 0) { return; } break; } } } while (1); } while (1); } void Text::drawCharacterShadow(int32 x, int32 y, uint8 character, int32 color) { // drawDoubleLetter int32 left, top, right, bottom; if (character != 0x20) { // shadow color setFontColor(0); drawCharacter(x + 2, y + 4, character); // text color setFontColor(color); drawCharacter(x, y, character); left = x; top = y; // FIXME: get right font size right = x + 32; bottom = y + 38; _engine->copyBlockPhys(left, top, right, bottom); } } void Text::drawText(int32 x, int32 y, const char *dialogue) { // Font uint8 currChar; if (fontPtr == 0) // if the font is not defined return; do { currChar = (uint8) * (dialogue++); // read the next char from the string if (currChar == 0) // if the char is 0x0, -> end of string break; if (currChar == 0x20) // if it's a space char x += dialCharSpace; else { dialTextSize = *(fontPtr + (*((int16 *)(fontPtr + currChar * 4)))); // get the length of the character drawCharacter(x, y, currChar); // draw the character on screen // add the length of the space between 2 characters x += dialSpaceBetween; // add the length of the current character x += dialTextSize; } } while (1); } int32 Text::getTextSize(const char *dialogue) { // SizeFont uint8 currChar; dialTextSize = 0; do { currChar = (uint8) * (dialogue++); if (currChar == 0) break; if (currChar == 0x20) { dialTextSize += dialCharSpace; } else { dialTextSize += dialSpaceBetween; dialTextSize += *(fontPtr + *((int16 *)(fontPtr + currChar * 4))); } } while (1); return (dialTextSize); } void Text::initDialogueBox() { // InitDialWindow _engine->_interface->blitBox(dialTextBoxLeft, dialTextBoxTop, dialTextBoxRight, dialTextBoxBottom, (const int8 *)_engine->workVideoBuffer.getPixels(), dialTextBoxLeft, dialTextBoxTop, (int8 *)_engine->frontVideoBuffer.getPixels()); if (newGameVar4 != 0) { _engine->_menu->drawBox(dialTextBoxLeft, dialTextBoxTop, dialTextBoxRight, dialTextBoxBottom); _engine->_interface->drawTransparentBox(dialTextBoxLeft + 1, dialTextBoxTop + 1, dialTextBoxRight - 1, dialTextBoxBottom - 1, 3); } _engine->copyBlockPhys(dialTextBoxLeft, dialTextBoxTop, dialTextBoxRight, dialTextBoxBottom); printText8Var3 = 0; _engine->_interface->blitBox(dialTextBoxLeft, dialTextBoxTop, dialTextBoxRight, dialTextBoxBottom, (const int8 *)_engine->frontVideoBuffer.getPixels(), dialTextBoxLeft, dialTextBoxTop, (int8 *)_engine->workVideoBuffer.getPixels()); } void Text::initInventoryDialogueBox() { // SecondInitDialWindow _engine->_interface->blitBox(dialTextBoxLeft, dialTextBoxTop, dialTextBoxRight, dialTextBoxBottom, (const int8 *)_engine->workVideoBuffer.getPixels(), dialTextBoxLeft, dialTextBoxTop, (int8 *)_engine->frontVideoBuffer.getPixels()); _engine->copyBlockPhys(dialTextBoxLeft, dialTextBoxTop, dialTextBoxRight, dialTextBoxBottom); printText8Var3 = 0; } // TODO: refactor this code void Text::initText(int32 index) { printTextVar13 = 0; if (!getText(index)) { return; } printText8Ptr1 = buf1; printText8Ptr2 = buf2; printTextVar13 = 1; printText8Var1 = 0; buf1[0] = 0; buf2[0] = 0; printText8Var2 = index; printText8Var3 = 0; TEXT_CurrentLetterX = dialTextBoxLeft + 8; printText8Var5 = 0; printText8Var6 = 0; TEXT_CurrentLetterY = dialTextBoxTop + 8; printText8Var8 = currDialTextPtr; // lba font is get while engine start setFontParameters(2, 7); } void Text::initProgressiveTextBuffer() { int32 i = 0; buf2[0] = '\0'; while (i < dialTextBufferSize) { strncat(buf2, " ", sizeof(buf2)); i++; }; printText8Ptr2 = buf2; addLineBreakX = 16; printText8Var1 = 0; } void Text::printText8Sub4(int16 a, int16 b, int16 c) { int32 counter2 = 0; if (printText8Var3 < 32) { const int32 temp = printText8Var3 * 3; pt8s4[temp] = c; pt8s4[temp + 1] = a; pt8s4[temp + 2] = b; printText8Var3++; } else { while (counter2 < 31) { const int32 var1 = (counter2 + 1) * 3; const int32 var2 = counter2 * 3; pt8s4[var2] = pt8s4[var1]; pt8s4[var2 + 1] = pt8s4[var1 + 1]; pt8s4[var2 + 2] = pt8s4[var1 + 2]; counter2++; } pt8s4[93] = c; pt8s4[94] = a; pt8s4[95] = b; } } Text::WordSize Text::getWordSize(const char *arg1, char *arg2) { int32 temp = 0; const char *arg2Save = arg2; while (*arg1 != '\0' && *arg1 != '\1' && *arg1 != ' ') { temp++; *arg2++ = *arg1++; } WordSize size; size.inChar = temp; *arg2 = '\0'; size.inPixel = getTextSize(arg2Save); return size; } void Text::processTextLine() { int16 var4; char *buffer; char *temp; buffer = printText8Var8; dialCharSpace = 7; var4 = 1; addLineBreakX = 0; printText8PrepareBufferVar2 = 0; buf2[0] = 0; for (;;) { if (*buffer == 0x20) { buffer++; continue; } if (*buffer != 0) { printText8Var8 = buffer; WordSize wordSize = getWordSize(buffer, buf1); if (addLineBreakX + dialCharSpace + wordSize.inPixel < dialTextBoxParam2) { temp = buffer + 1; if (*buffer == 1) { var4 = 0; buffer = temp; } else { if (*buf1 == '@') { var4 = 0; buffer = temp; if (addLineBreakX == 0) { addLineBreakX = 7; *((int16 *)buf2) = spaceChar; } if (buf1[1] == 'P') { printText8Var1 = dialTextBoxParam1; buffer++; } } else { buffer += wordSize.inChar; printText8Var8 = buffer; strncat(buf2, buf1, sizeof(buf2)); strncat(buf2, " ", sizeof(buf2)); // not 100% accurate printText8PrepareBufferVar2++; addLineBreakX += wordSize.inPixel + dialCharSpace; if (*printText8Var8 != 0) { printText8Var8++; continue; } } } } } break; } if (printText8PrepareBufferVar2 != 0) printText8PrepareBufferVar2--; if (*printText8Var8 != 0 && var4 == 1) { dialCharSpace += (dialTextBoxParam2 - addLineBreakX) / printText8PrepareBufferVar2; printText10Var1 = dialTextBoxParam2 - addLineBreakX - dialTextBoxParam2 - addLineBreakX; // stupid... recheck } printText8Var8 = buffer; printText8Ptr2 = buf2; } void Text::printText10Sub() { _engine->_renderer->vertexCoordinates[0] = dialTextStopColor; _engine->_renderer->vertexCoordinates[1] = dialTextBoxRight - 3; _engine->_renderer->vertexCoordinates[2] = dialTextBoxBottom - 24; _engine->_renderer->vertexCoordinates[3] = dialTextStopColor; _engine->_renderer->vertexCoordinates[4] = dialTextBoxRight - 24; _engine->_renderer->vertexCoordinates[5] = dialTextBoxBottom - 3; _engine->_renderer->vertexCoordinates[6] = dialTextStartColor; _engine->_renderer->vertexCoordinates[7] = _engine->_renderer->vertexCoordinates[1]; _engine->_renderer->vertexCoordinates[8] = _engine->_renderer->vertexCoordinates[5]; _engine->_renderer->polyRenderType = 0; // POLYGONTYPE_FLAT _engine->_renderer->numOfVertex = 3; if (_engine->_renderer->computePolygons()) { _engine->_renderer->renderPolygons(_engine->_renderer->polyRenderType, dialTextStopColor); } _engine->copyBlockPhys(dialTextBoxRight - 24, dialTextBoxBottom - 24, dialTextBoxRight - 3, dialTextBoxBottom - 3); } void Text::printText10Sub2() { int32 currentLetter; int32 currentIndex; int32 counter; int32 counter2; int16 *ptr; currentLetter = printText8Var3; currentLetter--; currentIndex = currentLetter * 3; ptr = pt8s4 + currentIndex; _engine->_system->delayMillis(15); counter = printText8Var3; counter2 = dialTextStartColor; while (--counter >= 0) { setFontColor(counter2); drawCharacterShadow(*(ptr + 1), *(ptr + 2), (uint8)*ptr, counter2); counter2 -= dialTextStepSize; if (counter2 > dialTextStopColor) counter2 = dialTextStopColor; ptr -= 3; }; } void Text::TEXT_GetLetterSize(uint8 character, int32 *pLetterWidth, int32 *pLetterHeight, uint8 *pFont) { // TEXT_GetLetterSize uint8 *temp; temp = (uint8 *)(pFont + *((int16 *)(pFont + character * 4))); *pLetterWidth = *(temp); *pLetterHeight = *(temp + 1); } // TODO: refactor this code int Text::printText10() { int32 charWidth, charHeight; // a, b if (printTextVar13 == 0) { return 0; } if (*(printText8Ptr2) == 0) { if (printText8Var5 != 0) { if (newGameVar5 != 0) { printText10Sub(); } printTextVar13 = 0; return 0; } if (printText8Var6 != 0) { _engine->_interface->blitBox(dialTextBoxLeft, dialTextBoxTop, dialTextBoxRight, dialTextBoxBottom, (const int8 *)_engine->workVideoBuffer.getPixels(), dialTextBoxLeft, dialTextBoxTop, (int8 *)_engine->frontVideoBuffer.getPixels()); _engine->copyBlockPhys(dialTextBoxLeft, dialTextBoxTop, dialTextBoxRight, dialTextBoxBottom); printText8Var3 = 0; printText8Var6 = 0; TEXT_CurrentLetterX = dialTextBoxLeft + 8; TEXT_CurrentLetterY = dialTextBoxTop + 8; } if (*(printText8Var8) == 0) { initProgressiveTextBuffer(); printText8Var5 = 1; return 1; } processTextLine(); } // RECHECK this later if (*(printText8Ptr2) == 0) { return 1; } printText8Sub4(TEXT_CurrentLetterX, TEXT_CurrentLetterY, *printText8Ptr2); printText10Sub2(); TEXT_GetLetterSize(*printText8Ptr2, &charWidth, &charHeight, (uint8 *)fontPtr); if (*(printText8Ptr2) != 0x20) { TEXT_CurrentLetterX += charWidth + 2; } else { if (printText10Var1 != 0) { TEXT_CurrentLetterX++; printText10Var1--; } TEXT_CurrentLetterX += dialCharSpace; } // next character printText8Ptr2++; if (*(printText8Ptr2) != 0) return 1; TEXT_CurrentLetterY += 38; TEXT_CurrentLetterX = dialTextBoxLeft + 8; if (printText8Var6 == 1 && printText8Var5 == 0) { printText10Sub(); return 2; } printText8Var1++; if (printText8Var1 < dialTextBoxParam1) { return 1; } initProgressiveTextBuffer(); printText8Var6 = 1; if (*(printText8Var8) == 0) { printText8Var5 = 1; } return 1; } // TODO: refactor this code void Text::drawTextFullscreen(int32 index) { // printTextFullScreen int32 printedText; int32 skipText = 0; _engine->_interface->saveClip(); _engine->_interface->resetClip(); _engine->_screens->copyScreen(_engine->frontVideoBuffer, _engine->workVideoBuffer); // get right VOX entry index if (_engine->cfgfile.LanguageCDId) { initVoxToPlay(index); } // if we don't display text, than still plays vox file if (_engine->cfgfile.FlagDisplayText) { initText(index); initDialogueBox(); do { _engine->readKeys(); printedText = printText10(); playVox(currDialTextEntry); if (printedText == 2) { do { _engine->readKeys(); if (_engine->shouldQuit()) { break; } if (_engine->_keyboard.skipIntro == 0 && _engine->_keyboard.skippedKey == 0 && _engine->_keyboard.pressedKey == 0) { break; } playVox(currDialTextEntry); _engine->_system->delayMillis(1); } while (1); do { _engine->readKeys(); if (_engine->shouldQuit()) { break; } if (_engine->_keyboard.skipIntro != 0 || _engine->_keyboard.skippedKey != 0 || _engine->_keyboard.pressedKey != 0) { break; } playVox(currDialTextEntry); _engine->_system->delayMillis(1); } while (1); } if (_engine->_keyboard.skipIntro == 1) { skipText = 1; } if (!printedText && !_engine->_sound->isSamplePlaying(currDialTextEntry)) { break; } if (_engine->shouldQuit()) { skipText = 1; } _engine->_system->delayMillis(1); } while (!skipText); hasHiddenVox = 0; if (_engine->cfgfile.LanguageCDId && _engine->_sound->isSamplePlaying(currDialTextEntry)) { stopVox(currDialTextEntry); } printTextVar13 = 0; if (printedText != 0) { _engine->_interface->loadClip(); return; } if (skipText != 0) { _engine->_interface->loadClip(); return; } // RECHECK this later // wait displaying text do { _engine->readKeys(); if (_engine->shouldQuit()) { break; } _engine->_system->delayMillis(1); } while (_engine->_keyboard.skipIntro || _engine->_keyboard.skippedKey || _engine->_keyboard.pressedKey); // RECHECK this later // wait key to display next text do { _engine->readKeys(); if (_engine->_keyboard.skipIntro != 0) { _engine->_interface->loadClip(); return; } if (_engine->_keyboard.skippedKey != 0) { _engine->_interface->loadClip(); return; } if (_engine->shouldQuit()) { break; } _engine->_system->delayMillis(1); } while (!_engine->_keyboard.pressedKey); } else { // RECHECK THIS while (playVox(currDialTextEntry) && _engine->_keyboard.skipIntro != 1) { if (_engine->shouldQuit()) { break; } } hasHiddenVox = 0; voxHiddenIndex = 0; } if (_engine->cfgfile.LanguageCDId && _engine->_sound->isSamplePlaying(currDialTextEntry)) { stopVox(currDialTextEntry); } _engine->_interface->loadClip(); } void Text::setFont(uint8 *font, int32 spaceBetween, int32 charSpace) { fontPtr = font; dialCharSpace = charSpace; dialSpaceBetween = spaceBetween; } void Text::setFontParameters(int32 spaceBetween, int32 charSpace) { dialSpaceBetween = spaceBetween; dialCharSpace = charSpace; } void Text::setFontCrossColor(int32 color) { // TestCoulDial dialTextStepSize = -1; dialTextBufferSize = 14; dialTextStartColor = color << 4; dialTextStopColor = (color << 4) + 12; } void Text::setFontColor(int32 color) { dialTextColor = color; } void Text::setTextCrossColor(int32 stopColor, int32 startColor, int32 stepSize) { dialTextStartColor = startColor; dialTextStopColor = stopColor; dialTextStepSize = stepSize; dialTextBufferSize = ((startColor - stopColor) + 1) / stepSize; } bool Text::getText(int32 index) { // findString int32 currIdx = 0; int32 orderIdx = 0; int16 *localTextBuf = (int16 *)dialTextPtr; int16 *localOrderBuf = (int16 *)dialOrderPtr; int32 numEntries = numDialTextEntries; // choose right text from order index do { orderIdx = *(localOrderBuf++); if (orderIdx == index) break; currIdx++; } while (currIdx < numDialTextEntries); if (currIdx >= numEntries) { return false; } int32 ptrCurrentEntry = localTextBuf[currIdx]; int32 ptrNextEntry = localTextBuf[currIdx + 1]; currDialTextPtr = (dialTextPtr + ptrCurrentEntry); currDialTextSize = ptrNextEntry - ptrCurrentEntry; numDialTextEntries = numEntries; // RECHECK: this was added for vox playback currDialTextEntry = currIdx; return true; } void Text::copyText(const char *src, char *dst, int32 size) { // copyStringToString int32 i; for (i = 0; i < size; i++) *(dst++) = *(src++); } void Text::getMenuText(int32 index, char *text, uint32 textSize) { // GetMultiText if (index == _engine->_menu->currMenuTextIndex) { if (_engine->_menu->currMenuTextBank == currentTextBank) { Common::strlcpy(text, _engine->_menu->currMenuTextBuffer, textSize); return; } } if (!getText(index)) { // if doesn't have text text[0] = '\0'; return; } if ((currDialTextSize - 1) > 0xFF) { currDialTextSize = 0xFF; } copyText(currDialTextPtr, text, currDialTextSize); currDialTextSize++; copyText(text, _engine->_menu->currMenuTextBuffer, currDialTextSize); _engine->_menu->currMenuTextIndex = index; _engine->_menu->currMenuTextBank = currentTextBank; } void Text::textClipFull() { // newGame2 dialTextBoxLeft = 8; dialTextBoxTop = 8; dialTextBoxRight = 631; dialTextBoxBottom = 471; dialTextBoxParam1 = 11; dialTextBoxParam2 = 607; } void Text::textClipSmall() { // newGame4 dialTextBoxLeft = 16; dialTextBoxTop = 334; dialTextBoxRight = 623; dialTextBoxBottom = 463; dialTextBoxParam1 = 3; dialTextBoxParam2 = 591; } void Text::drawAskQuestion(int32 index) { // MyDial int32 textStatus = 1; // get right VOX entry index if (_engine->cfgfile.LanguageCDId) { initVoxToPlay(index); } initText(index); initDialogueBox(); do { _engine->readKeys(); textStatus = printText10(); if (textStatus == 2) { do { _engine->readKeys(); if (_engine->shouldQuit()) { break; } playVox(currDialTextEntry); _engine->_system->delayMillis(1); } while (_engine->_keyboard.skipIntro || _engine->_keyboard.skippedKey || _engine->_keyboard.pressedKey); do { _engine->readKeys(); if (_engine->shouldQuit()) { break; } playVox(currDialTextEntry); _engine->_system->delayMillis(1); } while (!_engine->_keyboard.skipIntro && !_engine->_keyboard.skippedKey && !_engine->_keyboard.pressedKey); } _engine->_system->delayMillis(1); } while (textStatus); if (_engine->cfgfile.LanguageCDId) { while (playVoxSimple(currDialTextEntry)) { if (_engine->shouldQuit()) { break; } } hasHiddenVox = 0; voxHiddenIndex = 0; if (_engine->_sound->isSamplePlaying(currDialTextEntry)) { stopVox(currDialTextEntry); } } printTextVar13 = 0; } } // namespace TwinE