/* 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$ * */ #include "common/timer.h" #include "common/util.h" #include "common/system.h" #include "graphics/surface.h" #include "engines/util.h" #include "sci/sci.h" #include "sci/engine/state.h" #include "sci/graphics/screen.h" namespace Sci { GfxScreen::GfxScreen(ResourceManager *resMan) : _resMan(resMan) { // Scale the screen, if needed _upscaledHires = GFX_SCREEN_UPSCALED_DISABLED; // King's Quest 6 and Gabriel Knight 1 have hires content, gk1/cd was able // to provide that under DOS as well, but as gk1/floppy does support // upscaled hires scriptswise, but doesn't actually have the hires content // we need to limit it to platform windows. if (g_sci->getPlatform() == Common::kPlatformWindows) { if (g_sci->getGameId() == GID_KQ6) _upscaledHires = GFX_SCREEN_UPSCALED_640x440; #ifdef ENABLE_SCI32 if (g_sci->getGameId() == GID_GK1) _upscaledHires = GFX_SCREEN_UPSCALED_640x480; #endif } if (_resMan->detectHires()) { _width = 640; _height = 480; } else { _width = 320; _height = 200; } // Japanese versions of games use hi-res font on upscaled version of the game. if ((g_sci->getLanguage() == Common::JA_JPN) && (getSciVersion() <= SCI_VERSION_1_1)) _upscaledHires = GFX_SCREEN_UPSCALED_640x400; _pixels = _width * _height; switch (_upscaledHires) { case GFX_SCREEN_UPSCALED_640x400: _displayWidth = 640; _displayHeight = 400; for (int i = 0; i <= _height; i++) _upscaledMapping[i] = i * 2; break; case GFX_SCREEN_UPSCALED_640x440: _displayWidth = 640; _displayHeight = 440; for (int i = 0; i <= _height; i++) _upscaledMapping[i] = (i * 11) / 5; break; case GFX_SCREEN_UPSCALED_640x480: _displayWidth = 640; _displayHeight = 480; for (int i = 0; i <= _height; i++) _upscaledMapping[i] = (i * 12) / 5; break; default: _displayWidth = _width; _displayHeight = _height; memset(&_upscaledMapping, 0, sizeof(_upscaledMapping) ); break; } _displayPixels = _displayWidth * _displayHeight; _visualScreen = (byte *)calloc(_pixels, 1); _priorityScreen = (byte *)calloc(_pixels, 1); _controlScreen = (byte *)calloc(_pixels, 1); _displayScreen = (byte *)calloc(_displayPixels, 1); // Sets display screen to be actually displayed _activeScreen = _displayScreen; _picNotValid = 0; _picNotValidSci11 = 0; _unditherState = true; if (_resMan->isVGA() || (_resMan->isAmiga32color())) { // It is not 100% accurate to set white to be 255 for Amiga 32-color // games. But 255 is defined as white in our SCI at all times, so it // doesn't matter. _colorWhite = 255; if (getSciVersion() >= SCI_VERSION_1_1) _colorDefaultVectorData = 255; else _colorDefaultVectorData = 0; } else { _colorWhite = 15; _colorDefaultVectorData = 0; } // Initialize the actual screen if (_resMan->isSci11Mac() && getSciVersion() == SCI_VERSION_1_1) { // For SCI1.1 Mac, we need to expand the screen to accommodate for // the icon bar. Of course, both KQ6 and QFG1 VGA differ in size. if (g_sci->getGameId() == GID_KQ6) initGraphics(_displayWidth, _displayHeight + 26, _displayWidth > 320); else if (g_sci->getGameId() == GID_QFG1) initGraphics(_displayWidth, _displayHeight + 20, _displayWidth > 320); else error("Unknown SCI1.1 Mac game"); } else initGraphics(_displayWidth, _displayHeight, _displayWidth > 320); } GfxScreen::~GfxScreen() { free(_visualScreen); free(_priorityScreen); free(_controlScreen); free(_displayScreen); } void GfxScreen::copyToScreen() { g_system->copyRectToScreen(_activeScreen, _displayWidth, 0, 0, _displayWidth, _displayHeight); } void GfxScreen::copyFromScreen(byte *buffer) { Graphics::Surface *screen; screen = g_system->lockScreen(); memcpy(buffer, screen->pixels, _displayPixels); g_system->unlockScreen(); } void GfxScreen::kernelSyncWithFramebuffer() { Graphics::Surface *screen = g_system->lockScreen(); memcpy(_displayScreen, screen->pixels, _displayPixels); g_system->unlockScreen(); } void GfxScreen::copyRectToScreen(const Common::Rect &rect) { if (!_upscaledHires) { g_system->copyRectToScreen(_activeScreen + rect.top * _displayWidth + rect.left, _displayWidth, rect.left, rect.top, rect.width(), rect.height()); } else { int rectHeight = _upscaledMapping[rect.bottom] - _upscaledMapping[rect.top]; g_system->copyRectToScreen(_activeScreen + _upscaledMapping[rect.top] * _displayWidth + rect.left * 2, _displayWidth, rect.left * 2, _upscaledMapping[rect.top], rect.width() * 2, rectHeight); } } /** * This copies a rect to screen w/o scaling adjustment and is only meant to be * used on hires graphics used in upscaled hires mode. */ void GfxScreen::copyDisplayRectToScreen(const Common::Rect &rect) { if (!_upscaledHires) error("copyDisplayRectToScreen: not in upscaled hires mode"); g_system->copyRectToScreen(_activeScreen + rect.top * _displayWidth + rect.left, _displayWidth, rect.left, rect.top, rect.width(), rect.height()); } void GfxScreen::copyRectToScreen(const Common::Rect &rect, int16 x, int16 y) { if (!_upscaledHires) { g_system->copyRectToScreen(_activeScreen + rect.top * _displayWidth + rect.left, _displayWidth, x, y, rect.width(), rect.height()); } else { int rectHeight = _upscaledMapping[rect.bottom] - _upscaledMapping[rect.top]; g_system->copyRectToScreen(_activeScreen + _upscaledMapping[rect.top] * _displayWidth + rect.left * 2, _displayWidth, x * 2, _upscaledMapping[y], rect.width() * 2, rectHeight); } } byte GfxScreen::getDrawingMask(byte color, byte prio, byte control) { byte flag = 0; if (color != 255) flag |= GFX_SCREEN_MASK_VISUAL; if (prio != 255) flag |= GFX_SCREEN_MASK_PRIORITY; if (control != 255) flag |= GFX_SCREEN_MASK_CONTROL; return flag; } void GfxScreen::putPixel(int x, int y, byte drawMask, byte color, byte priority, byte control) { int offset = y * _width + x; if (drawMask & GFX_SCREEN_MASK_VISUAL) { _visualScreen[offset] = color; if (!_upscaledHires) { _displayScreen[offset] = color; } else { int displayOffset = _upscaledMapping[y] * _displayWidth + x * 2; int heightOffsetBreak = (_upscaledMapping[y + 1] - _upscaledMapping[y]) * _displayWidth; int heightOffset = 0; do { _displayScreen[displayOffset + heightOffset] = color; _displayScreen[displayOffset + heightOffset + 1] = color; heightOffset += _displayWidth; } while (heightOffset != heightOffsetBreak); } } if (drawMask & GFX_SCREEN_MASK_PRIORITY) _priorityScreen[offset] = priority; if (drawMask & GFX_SCREEN_MASK_CONTROL) _controlScreen[offset] = control; } /** * This is used to put font pixels onto the screen - we adjust differently, so that we won't * do triple pixel lines in any case on upscaled hires. That way the font will not get distorted * Sierra SCI didn't do this */ void GfxScreen::putFontPixel(int startingY, int x, int y, byte color) { int offset = (startingY + y) * _width + x; _visualScreen[offset] = color; if (!_upscaledHires) { _displayScreen[offset] = color; } else { int displayOffset = (_upscaledMapping[startingY] + y * 2) * _displayWidth + x * 2; _displayScreen[displayOffset] = color; _displayScreen[displayOffset + 1] = color; displayOffset += _displayWidth; _displayScreen[displayOffset] = color; _displayScreen[displayOffset + 1] = color; } } /** * This will just change a pixel directly on displayscreen. It is supposed to be * only used on upscaled-Hires games where hires content needs to get drawn ONTO * the upscaled display screen (like japanese fonts, hires portraits, etc.). */ void GfxScreen::putPixelOnDisplay(int x, int y, byte color) { int offset = y * _displayWidth + x; _displayScreen[offset] = color; } /** * Sierra's Bresenham line drawing. * WARNING: Do not replace this with Graphics::drawLine(), as this causes issues * with flood fill, due to small difference in the Bresenham logic. */ void GfxScreen::drawLine(Common::Point startPoint, Common::Point endPoint, byte color, byte priority, byte control) { int16 left = startPoint.x; int16 top = startPoint.y; int16 right = endPoint.x; int16 bottom = endPoint.y; //set_drawing_flag byte drawMask = getDrawingMask(color, priority, control); // horizontal line if (top == bottom) { if (right < left) SWAP(right, left); for (int i = left; i <= right; i++) putPixel(i, top, drawMask, color, priority, control); return; } // vertical line if (left == right) { if (top > bottom) SWAP(top, bottom); for (int i = top; i <= bottom; i++) putPixel(left, i, drawMask, color, priority, control); return; } // sloped line - draw with Bresenham algorithm int dy = bottom - top; int dx = right - left; int stepy = dy < 0 ? -1 : 1; int stepx = dx < 0 ? -1 : 1; dy = ABS(dy) << 1; dx = ABS(dx) << 1; // setting the 1st and last pixel putPixel(left, top, drawMask, color, priority, control); putPixel(right, bottom, drawMask, color, priority, control); // drawing the line if (dx > dy) { // going horizontal int fraction = dy - (dx >> 1); while (left != right) { if (fraction >= 0) { top += stepy; fraction -= dx; } left += stepx; fraction += dy; putPixel(left, top, drawMask, color, priority, control); } } else { // going vertical int fraction = dx - (dy >> 1); while (top != bottom) { if (fraction >= 0) { left += stepx; fraction -= dy; } top += stepy; fraction += dx; putPixel(left, top, drawMask, color, priority, control); } } } // We put hires kanji chars onto upscaled background, so we need to adjust // coordinates. Caller gives use low-res ones. void GfxScreen::putKanjiChar(Graphics::FontSJIS *commonFont, int16 x, int16 y, uint16 chr, byte color) { byte *displayPtr = _displayScreen + y * _displayWidth * 2 + x * 2; // we don't use outline, so color 0 is actually not used commonFont->drawChar(displayPtr, chr, _displayWidth, 1, color, 0); } byte GfxScreen::getVisual(int x, int y) { return _visualScreen[y * _width + x]; } byte GfxScreen::getPriority(int x, int y) { return _priorityScreen[y * _width + x]; } byte GfxScreen::getControl(int x, int y) { return _controlScreen[y * _width + x]; } byte GfxScreen::isFillMatch(int16 x, int16 y, byte screenMask, byte t_color, byte t_pri, byte t_con) { int offset = y * _width + x; byte match = 0; if (screenMask & GFX_SCREEN_MASK_VISUAL && *(_visualScreen + offset) == t_color) match |= GFX_SCREEN_MASK_VISUAL; if (screenMask & GFX_SCREEN_MASK_PRIORITY && *(_priorityScreen + offset) == t_pri) match |= GFX_SCREEN_MASK_PRIORITY; if (screenMask & GFX_SCREEN_MASK_CONTROL && *(_controlScreen + offset) == t_con) match |= GFX_SCREEN_MASK_CONTROL; return match; } int GfxScreen::bitsGetDataSize(Common::Rect rect, byte mask) { int byteCount = sizeof(rect) + sizeof(mask); int pixels = rect.width() * rect.height(); if (mask & GFX_SCREEN_MASK_VISUAL) { byteCount += pixels; // _visualScreen if (!_upscaledHires) { byteCount += pixels; // _displayScreen } else { int rectHeight = _upscaledMapping[rect.bottom] - _upscaledMapping[rect.top]; byteCount += rectHeight * rect.width() * 2; // _displayScreen (upscaled hires) } } if (mask & GFX_SCREEN_MASK_PRIORITY) { byteCount += pixels; // _priorityScreen } if (mask & GFX_SCREEN_MASK_CONTROL) { byteCount += pixels; // _controlScreen } if (mask & GFX_SCREEN_MASK_DISPLAY) { if (!_upscaledHires) error("bitsGetDataSize() called w/o being in upscaled hires mode"); byteCount += pixels; // _displayScreen (coordinates actually are given to us for hires displayScreen) } return byteCount; } void GfxScreen::bitsSave(Common::Rect rect, byte mask, byte *memoryPtr) { memcpy(memoryPtr, (void *)&rect, sizeof(rect)); memoryPtr += sizeof(rect); memcpy(memoryPtr, (void *)&mask, sizeof(mask)); memoryPtr += sizeof(mask); if (mask & GFX_SCREEN_MASK_VISUAL) { bitsSaveScreen(rect, _visualScreen, _width, memoryPtr); bitsSaveDisplayScreen(rect, memoryPtr); } if (mask & GFX_SCREEN_MASK_PRIORITY) { bitsSaveScreen(rect, _priorityScreen, _width, memoryPtr); } if (mask & GFX_SCREEN_MASK_CONTROL) { bitsSaveScreen(rect, _controlScreen, _width, memoryPtr); } if (mask & GFX_SCREEN_MASK_DISPLAY) { if (!_upscaledHires) error("bitsSave() called w/o being in upscaled hires mode"); bitsSaveScreen(rect, _displayScreen, _displayWidth, memoryPtr); } } void GfxScreen::bitsSaveScreen(Common::Rect rect, byte *screen, uint16 screenWidth, byte *&memoryPtr) { int width = rect.width(); int y; screen += (rect.top * screenWidth) + rect.left; for (y = rect.top; y < rect.bottom; y++) { memcpy(memoryPtr, (void*)screen, width); memoryPtr += width; screen += screenWidth; } } void GfxScreen::bitsSaveDisplayScreen(Common::Rect rect, byte *&memoryPtr) { byte *screen = _displayScreen; int width = rect.width(); int y; if (!_upscaledHires) { screen += (rect.top * _displayWidth) + rect.left; } else { screen += (_upscaledMapping[rect.top] * _displayWidth) + rect.left * 2; width *= 2; rect.top = _upscaledMapping[rect.top]; rect.bottom = _upscaledMapping[rect.bottom]; } for (y = rect.top; y < rect.bottom; y++) { memcpy(memoryPtr, (void*)screen, width); memoryPtr += width; screen += _displayWidth; } } void GfxScreen::bitsGetRect(byte *memoryPtr, Common::Rect *destRect) { memcpy((void *)destRect, memoryPtr, sizeof(Common::Rect)); } void GfxScreen::bitsRestore(byte *memoryPtr) { Common::Rect rect; byte mask; memcpy((void *)&rect, memoryPtr, sizeof(rect)); memoryPtr += sizeof(rect); memcpy((void *)&mask, memoryPtr, sizeof(mask)); memoryPtr += sizeof(mask); if (mask & GFX_SCREEN_MASK_VISUAL) { bitsRestoreScreen(rect, memoryPtr, _visualScreen, _width); bitsRestoreDisplayScreen(rect, memoryPtr); } if (mask & GFX_SCREEN_MASK_PRIORITY) { bitsRestoreScreen(rect, memoryPtr, _priorityScreen, _width); } if (mask & GFX_SCREEN_MASK_CONTROL) { bitsRestoreScreen(rect, memoryPtr, _controlScreen, _width); } if (mask & GFX_SCREEN_MASK_DISPLAY) { if (!_upscaledHires) error("bitsRestore() called w/o being in upscaled hires mode"); bitsRestoreScreen(rect, memoryPtr, _displayScreen, _displayWidth); // WORKAROUND - we are not sure what sierra is doing. If we don't do this here, portraits won't get fully removed // from screen. Some lowres showBits() call is used for that and it's not covering the whole area // We would need to find out inside the kq6 windows interpreter, but this here works already and seems not to have // any side-effects. The whole hires is hacked into the interpreter, so maybe this is even right. copyDisplayRectToScreen(rect); } } void GfxScreen::bitsRestoreScreen(Common::Rect rect, byte *&memoryPtr, byte *screen, uint16 screenWidth) { int width = rect.width(); int y; screen += (rect.top * screenWidth) + rect.left; for (y = rect.top; y < rect.bottom; y++) { memcpy((void*) screen, memoryPtr, width); memoryPtr += width; screen += screenWidth; } } void GfxScreen::bitsRestoreDisplayScreen(Common::Rect rect, byte *&memoryPtr) { byte *screen = _displayScreen; int width = rect.width(); int y; if (!_upscaledHires) { screen += (rect.top * _displayWidth) + rect.left; } else { screen += (_upscaledMapping[rect.top] * _displayWidth) + rect.left * 2; width *= 2; rect.top = _upscaledMapping[rect.top]; rect.bottom = _upscaledMapping[rect.bottom]; } for (y = rect.top; y < rect.bottom; y++) { memcpy((void*) screen, memoryPtr, width); memoryPtr += width; screen += _displayWidth; } } void GfxScreen::getPalette(Palette *pal) { // just copy palette to system byte bpal[4 * 256]; // Get current palette, update it and put back g_system->grabPalette(bpal, 0, 256); for (int16 i = 1; i < 255; i++) { pal->colors[i].r = bpal[i * 4]; pal->colors[i].g = bpal[i * 4 + 1]; pal->colors[i].b = bpal[i * 4 + 2]; } } void GfxScreen::setPalette(Palette *pal) { // just copy palette to system byte bpal[4 * 256]; // Get current palette, update it and put back g_system->grabPalette(bpal, 0, 256); for (int16 i = 0; i < 256; i++) { if (!pal->colors[i].used) continue; bpal[i * 4] = CLIP(pal->colors[i].r * pal->intensity[i] / 100, 0, 255); bpal[i * 4 + 1] = CLIP(pal->colors[i].g * pal->intensity[i] / 100, 0, 255); bpal[i * 4 + 2] = CLIP(pal->colors[i].b * pal->intensity[i] / 100, 0, 255); bpal[i * 4 + 3] = 100; } g_system->setPalette(bpal, 0, 256); } void GfxScreen::setVerticalShakePos(uint16 shakePos) { if (!_upscaledHires) g_system->setShakePos(shakePos); else g_system->setShakePos(shakePos * 2); } void GfxScreen::dither(bool addToFlag) { int y, x; byte color, ditheredColor; byte *visualPtr = _visualScreen; byte *displayPtr = _displayScreen; if (!_unditherState) { // Do dithering on visual and display-screen for (y = 0; y < _height; y++) { for (x = 0; x < _width; x++) { color = *visualPtr; if (color & 0xF0) { color ^= color << 4; color = ((x^y) & 1) ? color >> 4 : color & 0x0F; *displayPtr = color; if (_upscaledHires) { *(displayPtr + 1) = color; *(displayPtr + _displayWidth) = color; *(displayPtr + _displayWidth + 1) = color; } *visualPtr = color; } visualPtr++; displayPtr++; if (_upscaledHires) displayPtr++; } if (_upscaledHires) displayPtr += _displayWidth; } } else { if (!addToFlag) memset(&_unditherMemorial, 0, sizeof(_unditherMemorial)); // Do dithering on visual screen and put decoded but undithered byte onto display-screen for (y = 0; y < _height; y++) { for (x = 0; x < _width; x++) { color = *visualPtr; if (color & 0xF0) { color ^= color << 4; // remember dither combination for cel-undithering _unditherMemorial[color]++; // if decoded color wants do dither with black on left side, we turn it around // otherwise the normal ega color would get used for display if (color & 0xF0) { ditheredColor = color; } else { ditheredColor = color << 4; } *displayPtr = ditheredColor; if (_upscaledHires) { *(displayPtr + 1) = ditheredColor; *(displayPtr + _displayWidth) = ditheredColor; *(displayPtr + _displayWidth + 1) = ditheredColor; } color = ((x^y) & 1) ? color >> 4 : color & 0x0F; *visualPtr = color; } visualPtr++; displayPtr++; if (_upscaledHires) displayPtr++; } if (_upscaledHires) displayPtr += _displayWidth; } } } void GfxScreen::debugUnditherSetState(bool flag) { _unditherState = flag; } int16 *GfxScreen::unditherGetMemorial() { if (_unditherState) return (int16 *)&_unditherMemorial; else return NULL; } void GfxScreen::debugShowMap(int mapNo) { // We cannot really support changing maps when in upscaledHires mode if (_upscaledHires) return; switch (mapNo) { case 0: _activeScreen = _visualScreen; break; case 1: _activeScreen = _priorityScreen; break; case 2: _activeScreen = _controlScreen; break; case 3: _activeScreen = _displayScreen; break; } copyToScreen(); } void GfxScreen::scale2x(const byte *src, byte *dst, int16 srcWidth, int16 srcHeight) { const int newWidth = srcWidth * 2; const byte *srcPtr = src; for (int y = 0; y < srcHeight; y++) { for (int x = 0; x < srcWidth; x++) { const byte color = *srcPtr++; dst[0] = color; dst[1] = color; dst[newWidth] = color; dst[newWidth + 1] = color; dst += 2; } dst += newWidth; } } void GfxScreen::adjustToUpscaledCoordinates(int16 &y, int16 &x) { x *= 2; y = _upscaledMapping[y]; } void GfxScreen::adjustBackUpscaledCoordinates(int16 &y, int16 &x) { switch (_upscaledHires) { case GFX_SCREEN_UPSCALED_640x400: x /= 2; y /= 2; break; case GFX_SCREEN_UPSCALED_640x440: x /= 2; y = (y * 5) / 11; break; case GFX_SCREEN_UPSCALED_640x480: x /= 2; y = (y * 5) / 12; default: break; } } int16 GfxScreen::kernelPicNotValid(int16 newPicNotValid) { int16 oldPicNotValid; if (getSciVersion() >= SCI_VERSION_1_1) { oldPicNotValid = _picNotValidSci11; if (newPicNotValid != -1) _picNotValidSci11 = newPicNotValid; } else { oldPicNotValid = _picNotValid; if (newPicNotValid != -1) _picNotValid = newPicNotValid; } return oldPicNotValid; } } // End of namespace Sci