/* 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/util.h" #include "common/stack.h" #include "common/system.h" #include "graphics/primitives.h" #include "sci/sci.h" #include "sci/engine/features.h" #include "sci/engine/state.h" #include "sci/engine/selector.h" #include "sci/graphics/cache.h" #include "sci/graphics/coordadjuster.h" #include "sci/graphics/ports.h" #include "sci/graphics/paint16.h" #include "sci/graphics/animate.h" #include "sci/graphics/font.h" #include "sci/graphics/picture.h" #include "sci/graphics/view.h" #include "sci/graphics/screen.h" #include "sci/graphics/palette.h" #include "sci/graphics/portrait.h" #include "sci/graphics/text16.h" #include "sci/graphics/transitions.h" namespace Sci { GfxPaint16::GfxPaint16(ResourceManager *resMan, SegManager *segMan, Kernel *kernel, GfxCache *cache, GfxPorts *ports, GfxCoordAdjuster *coordAdjuster, GfxScreen *screen, GfxPalette *palette, GfxTransitions *transitions, AudioPlayer *audio) : _resMan(resMan), _segMan(segMan), _kernel(kernel), _cache(cache), _ports(ports), _coordAdjuster(coordAdjuster), _screen(screen), _palette(palette), _transitions(transitions), _audio(audio) { } GfxPaint16::~GfxPaint16() { } void GfxPaint16::init(GfxAnimate *animate, GfxText16 *text16) { _animate = animate; _text16 = text16; _EGAdrawingVisualize = false; } void GfxPaint16::debugSetEGAdrawingVisualize(bool state) { _EGAdrawingVisualize = state; } void GfxPaint16::drawPicture(GuiResourceId pictureId, int16 animationNr, bool mirroredFlag, bool addToFlag, GuiResourceId paletteId) { GfxPicture *picture = new GfxPicture(_resMan, _coordAdjuster, _ports, _screen, _palette, pictureId, _EGAdrawingVisualize); // do we add to a picture? if not -> clear screen with white if (!addToFlag) clearScreen(_screen->getColorWhite()); picture->draw(animationNr, mirroredFlag, addToFlag, paletteId); delete picture; // We make a call to SciPalette here, for increasing sys timestamp and also loading targetpalette, if palvary active // (SCI1.1 only) if (getSciVersion() == SCI_VERSION_1_1) _palette->drewPicture(pictureId); } // This one is the only one that updates screen! void GfxPaint16::drawCelAndShow(GuiResourceId viewId, int16 loopNo, int16 celNo, uint16 leftPos, uint16 topPos, byte priority, uint16 paletteNo, uint16 scaleX, uint16 scaleY) { GfxView *view = _cache->getView(viewId); Common::Rect celRect; if (view) { celRect.left = leftPos; celRect.top = topPos; celRect.right = celRect.left + view->getWidth(loopNo, celNo); celRect.bottom = celRect.top + view->getHeight(loopNo, celNo); drawCel(view, loopNo, celNo, celRect, priority, paletteNo, scaleX, scaleY); if (getSciVersion() >= SCI_VERSION_1_1) { if (!_screen->_picNotValidSci11) { bitsShow(celRect); } } else { if (!_screen->_picNotValid) bitsShow(celRect); } } } // This version of drawCel is not supposed to call BitsShow()! void GfxPaint16::drawCel(GuiResourceId viewId, int16 loopNo, int16 celNo, Common::Rect celRect, byte priority, uint16 paletteNo, uint16 scaleX, uint16 scaleY) { drawCel(_cache->getView(viewId), loopNo, celNo, celRect, priority, paletteNo, scaleX, scaleY); } // This version of drawCel is not supposed to call BitsShow()! void GfxPaint16::drawCel(GfxView *view, int16 loopNo, int16 celNo, Common::Rect celRect, byte priority, uint16 paletteNo, uint16 scaleX, uint16 scaleY) { Common::Rect clipRect = celRect; clipRect.clip(_ports->_curPort->rect); if (clipRect.isEmpty()) // nothing to draw return; Common::Rect clipRectTranslated = clipRect; _ports->offsetRect(clipRectTranslated); if (scaleX == 128 && scaleY == 128) { view->draw(celRect, clipRect, clipRectTranslated, loopNo, celNo, priority, paletteNo, false); } else { view->drawScaled(celRect, clipRect, clipRectTranslated, loopNo, celNo, priority, scaleX, scaleY); } } // This is used as replacement for drawCelAndShow() when hires-cels are drawn to screen // Hires-cels are available only SCI 1.1+ void GfxPaint16::drawHiresCelAndShow(GuiResourceId viewId, int16 loopNo, int16 celNo, uint16 leftPos, uint16 topPos, byte priority, uint16 paletteNo, reg_t upscaledHiresHandle, uint16 scaleX, uint16 scaleY) { GfxView *view = _cache->getView(viewId); Common::Rect celRect, curPortRect, clipRect, clipRectTranslated; Common::Point curPortPos; bool upscaledHiresHack = false; if (view) { if ((leftPos == 0) && (topPos == 0)) { // HACK: in kq6, we get leftPos&topPos == 0 SOMETIMES, that's why we need to get coordinates from upscaledHiresHandle // I'm not sure if this is what we are supposed to do or if there is some other bug that actually makes // coordinates to be 0 in the first place byte *memoryPtr = NULL; memoryPtr = _segMan->getHunkPointer(upscaledHiresHandle); if (memoryPtr) { Common::Rect upscaledHiresRect; _screen->bitsGetRect(memoryPtr, &upscaledHiresRect); leftPos = upscaledHiresRect.left; topPos = upscaledHiresRect.top; upscaledHiresHack = true; } } celRect.left = leftPos; celRect.top = topPos; celRect.right = celRect.left + view->getWidth(loopNo, celNo); celRect.bottom = celRect.top + view->getHeight(loopNo, celNo); // adjust curPort to upscaled hires clipRect = celRect; curPortRect = _ports->_curPort->rect; _screen->adjustToUpscaledCoordinates(curPortRect.top, curPortRect.left); _screen->adjustToUpscaledCoordinates(curPortRect.bottom, curPortRect.right); curPortRect.bottom++; curPortRect.right++; clipRect.clip(curPortRect); if (clipRect.isEmpty()) // nothing to draw return; clipRectTranslated = clipRect; if (!upscaledHiresHack) { curPortPos.x = _ports->_curPort->left; curPortPos.y = _ports->_curPort->top; _screen->adjustToUpscaledCoordinates(curPortPos.y, curPortPos.x); clipRectTranslated.top += curPortPos.y; clipRectTranslated.bottom += curPortPos.y; clipRectTranslated.left += curPortPos.x; clipRectTranslated.right += curPortPos.x; } view->draw(celRect, clipRect, clipRectTranslated, loopNo, celNo, priority, paletteNo, true); if (!_screen->_picNotValidSci11) { _screen->copyDisplayRectToScreen(clipRectTranslated); } } } void GfxPaint16::clearScreen(byte color) { fillRect(_ports->_curPort->rect, GFX_SCREEN_MASK_ALL, color, 0, 0); } void GfxPaint16::invertRect(const Common::Rect &rect) { int16 oldpenmode = _ports->_curPort->penMode; _ports->_curPort->penMode = 2; fillRect(rect, GFX_SCREEN_MASK_VISUAL, _ports->_curPort->penClr, _ports->_curPort->backClr); _ports->_curPort->penMode = oldpenmode; } // used in SCI0early exclusively void GfxPaint16::invertRectViaXOR(const Common::Rect &rect) { Common::Rect r = rect; int16 x, y; byte curVisual; r.clip(_ports->_curPort->rect); if (r.isEmpty()) // nothing to invert return; _ports->offsetRect(r); for (y = r.top; y < r.bottom; y++) { for (x = r.left; x < r.right; x++) { curVisual = _screen->getVisual(x, y); _screen->putPixel(x, y, GFX_SCREEN_MASK_VISUAL, curVisual ^ 0x0f, 0, 0); } } } void GfxPaint16::eraseRect(const Common::Rect &rect) { fillRect(rect, GFX_SCREEN_MASK_VISUAL, _ports->_curPort->backClr); } void GfxPaint16::paintRect(const Common::Rect &rect) { fillRect(rect, GFX_SCREEN_MASK_VISUAL, _ports->_curPort->penClr); } void GfxPaint16::fillRect(const Common::Rect &rect, int16 drawFlags, byte clrPen, byte clrBack, byte bControl) { Common::Rect r = rect; r.clip(_ports->_curPort->rect); if (r.isEmpty()) // nothing to fill return; int16 oldPenMode = _ports->_curPort->penMode; _ports->offsetRect(r); int16 x, y; byte curVisual; // Doing visual first if (drawFlags & GFX_SCREEN_MASK_VISUAL) { if (oldPenMode == 2) { // invert mode for (y = r.top; y < r.bottom; y++) { for (x = r.left; x < r.right; x++) { curVisual = _screen->getVisual(x, y); if (curVisual == clrPen) { _screen->putPixel(x, y, GFX_SCREEN_MASK_VISUAL, clrBack, 0, 0); } else if (curVisual == clrBack) { _screen->putPixel(x, y, GFX_SCREEN_MASK_VISUAL, clrPen, 0, 0); } } } } else { // just fill rect with ClrPen for (y = r.top; y < r.bottom; y++) { for (x = r.left; x < r.right; x++) { _screen->putPixel(x, y, GFX_SCREEN_MASK_VISUAL, clrPen, 0, 0); } } } } if (drawFlags < 2) return; drawFlags &= GFX_SCREEN_MASK_PRIORITY|GFX_SCREEN_MASK_CONTROL; if (oldPenMode != 2) { for (y = r.top; y < r.bottom; y++) { for (x = r.left; x < r.right; x++) { _screen->putPixel(x, y, drawFlags, 0, clrBack, bControl); } } } else { for (y = r.top; y < r.bottom; y++) { for (x = r.left; x < r.right; x++) { _screen->putPixel(x, y, drawFlags, 0, !_screen->getPriority(x, y), !_screen->getControl(x, y)); } } } } void GfxPaint16::frameRect(const Common::Rect &rect) { Common::Rect r; // left r = rect; r.right = rect.left + 1; paintRect(r); // right r.right = rect.right; r.left = rect.right - 1; paintRect(r); //top r.left = rect.left; r.bottom = rect.top + 1; paintRect(r); //bottom r.bottom = rect.bottom; r.top = rect.bottom - 1; paintRect(r); } void GfxPaint16::bitsShow(const Common::Rect &rect) { Common::Rect workerRect(rect.left, rect.top, rect.right, rect.bottom); workerRect.clip(_ports->_curPort->rect); if (workerRect.isEmpty()) // nothing to show return; _ports->offsetRect(workerRect); _screen->copyRectToScreen(workerRect); } void GfxPaint16::bitsShowHires(const Common::Rect &rect) { _screen->copyDisplayRectToScreen(rect); } reg_t GfxPaint16::bitsSave(const Common::Rect &rect, byte screenMask) { reg_t memoryId; byte *memoryPtr; int size; Common::Rect workerRect(rect.left, rect.top, rect.right, rect.bottom); workerRect.clip(_ports->_curPort->rect); if (workerRect.isEmpty()) // nothing to save return NULL_REG; if (screenMask == GFX_SCREEN_MASK_DISPLAY) { // Adjust rect to upscaled hires, but dont adjust according to port _screen->adjustToUpscaledCoordinates(workerRect.top, workerRect.left); _screen->adjustToUpscaledCoordinates(workerRect.bottom, workerRect.right); workerRect.bottom++; workerRect.right++; } else { _ports->offsetRect(workerRect); } // now actually ask _screen how much space it will need for saving size = _screen->bitsGetDataSize(workerRect, screenMask); memoryId = _segMan->allocateHunkEntry("SaveBits()", size); memoryPtr = _segMan->getHunkPointer(memoryId); _screen->bitsSave(workerRect, screenMask, memoryPtr); return memoryId; } void GfxPaint16::bitsGetRect(reg_t memoryHandle, Common::Rect *destRect) { byte *memoryPtr = NULL; if (!memoryHandle.isNull()) { memoryPtr = _segMan->getHunkPointer(memoryHandle); if (memoryPtr) { _screen->bitsGetRect(memoryPtr, destRect); } } } void GfxPaint16::bitsRestore(reg_t memoryHandle) { byte *memoryPtr = NULL; if (!memoryHandle.isNull()) { memoryPtr = _segMan->getHunkPointer(memoryHandle); if (memoryPtr) { _screen->bitsRestore(memoryPtr); _segMan->freeHunkEntry(memoryHandle); } } } void GfxPaint16::bitsFree(reg_t memoryHandle) { if (!memoryHandle.isNull()) // happens in KQ5CD _segMan->freeHunkEntry(memoryHandle); } void GfxPaint16::kernelDrawPicture(GuiResourceId pictureId, int16 animationNr, bool animationBlackoutFlag, bool mirroredFlag, bool addToFlag, int16 EGApaletteNo) { Port *oldPort = _ports->setPort((Port *)_ports->_picWind); if (_ports->isFrontWindow(_ports->_picWind)) { _screen->_picNotValid = 1; drawPicture(pictureId, animationNr, mirroredFlag, addToFlag, EGApaletteNo); _transitions->setup(animationNr, animationBlackoutFlag); } else { _ports->beginUpdate(_ports->_picWind); drawPicture(pictureId, animationNr, mirroredFlag, addToFlag, EGApaletteNo); _ports->endUpdate(_ports->_picWind); } _ports->setPort(oldPort); } void GfxPaint16::kernelDrawCel(GuiResourceId viewId, int16 loopNo, int16 celNo, uint16 leftPos, uint16 topPos, int16 priority, uint16 paletteNo, bool hiresMode, reg_t upscaledHiresHandle) { // some calls are hiresMode even under kq6 DOS, that's why we check for upscaled hires here if ((!hiresMode) || (!_screen->getUpscaledHires())) { drawCelAndShow(viewId, loopNo, celNo, leftPos, topPos, priority, paletteNo); } else { drawHiresCelAndShow(viewId, loopNo, celNo, leftPos, topPos, priority, paletteNo, upscaledHiresHandle); } } void GfxPaint16::kernelGraphFillBoxForeground(Common::Rect rect) { paintRect(rect); } void GfxPaint16::kernelGraphFillBoxBackground(Common::Rect rect) { eraseRect(rect); } void GfxPaint16::kernelGraphFillBox(Common::Rect rect, uint16 colorMask, int16 color, int16 priority, int16 control) { fillRect(rect, colorMask, color, priority, control); } void GfxPaint16::kernelGraphFrameBox(Common::Rect rect, int16 color) { int16 oldColor = _ports->getPort()->penClr; _ports->penColor(color); frameRect(rect); _ports->penColor(oldColor); } void GfxPaint16::kernelGraphDrawLine(Common::Point startPoint, Common::Point endPoint, int16 color, int16 priority, int16 control) { _ports->offsetLine(startPoint, endPoint); _screen->drawLine(startPoint.x, startPoint.y, endPoint.x, endPoint.y, color, priority, control); } reg_t GfxPaint16::kernelGraphSaveBox(Common::Rect rect, uint16 screenMask) { return bitsSave(rect, screenMask); } reg_t GfxPaint16::kernelGraphSaveUpscaledHiresBox(Common::Rect rect) { return bitsSave(rect, GFX_SCREEN_MASK_DISPLAY); } void GfxPaint16::kernelGraphRestoreBox(reg_t handle) { bitsRestore(handle); } void GfxPaint16::kernelGraphUpdateBox(Common::Rect rect, bool hiresMode) { // some calls are hiresMode even under kq6 DOS, that's why we check for upscaled hires here if ((!hiresMode) || (!_screen->getUpscaledHires())) bitsShow(rect); else bitsShowHires(rect); } void GfxPaint16::kernelGraphRedrawBox(Common::Rect rect) { _coordAdjuster->kernelLocalToGlobal(rect.left, rect.top); _coordAdjuster->kernelLocalToGlobal(rect.right, rect.bottom); Port *oldPort = _ports->setPort((Port *)_ports->_picWind); _coordAdjuster->kernelGlobalToLocal(rect.left, rect.top); _coordAdjuster->kernelGlobalToLocal(rect.right, rect.bottom); _animate->reAnimate(rect); _ports->setPort(oldPort); } #define SCI_DISPLAY_MOVEPEN 100 #define SCI_DISPLAY_SETALIGNMENT 101 #define SCI_DISPLAY_SETPENCOLOR 102 #define SCI_DISPLAY_SETBACKGROUNDCOLOR 103 #define SCI_DISPLAY_SETGREYEDOUTPUT 104 #define SCI_DISPLAY_SETFONT 105 #define SCI_DISPLAY_WIDTH 106 #define SCI_DISPLAY_SAVEUNDER 107 #define SCI_DISPLAY_RESTOREUNDER 108 #define SCI_DISPLAY_DUMMY1 114 // used in longbow-demo, not supported in sierra sci - no parameters #define SCI_DISPLAY_DUMMY2 115 // used in longbow-demo, not supported in sierra sci - has 1 parameter #define SCI_DISPLAY_DONTSHOWBITS 121 reg_t GfxPaint16::kernelDisplay(const char *text, int argc, reg_t *argv) { int displayArg; TextAlignment alignment = SCI_TEXT16_ALIGNMENT_LEFT; int16 colorPen = -1, colorBack = -1, width = -1, bRedraw = 1; bool doSaveUnder = false; Common::Rect rect; reg_t result = NULL_REG; // Make a "backup" of the port settings (required for some SCI0LATE and SCI01+ only) Port oldPort = *_ports->getPort(); // setting defaults _ports->penMode(0); _ports->penColor(0); _ports->textGreyedOutput(false); // processing codes in argv while (argc > 0) { displayArg = argv[0].toUint16(); argc--; argv++; switch (displayArg) { case SCI_DISPLAY_MOVEPEN: _ports->moveTo(argv[0].toUint16(), argv[1].toUint16()); argc -= 2; argv += 2; break; case SCI_DISPLAY_SETALIGNMENT: alignment = argv[0].toSint16(); argc--; argv++; break; case SCI_DISPLAY_SETPENCOLOR: colorPen = argv[0].toUint16(); _ports->penColor(colorPen); argc--; argv++; break; case SCI_DISPLAY_SETBACKGROUNDCOLOR: colorBack = argv[0].toUint16(); argc--; argv++; break; case SCI_DISPLAY_SETGREYEDOUTPUT: _ports->textGreyedOutput(argv[0].isNull() ? false : true); argc--; argv++; break; case SCI_DISPLAY_SETFONT: _text16->SetFont(argv[0].toUint16()); argc--; argv++; break; case SCI_DISPLAY_WIDTH: width = argv[0].toUint16(); argc--; argv++; break; case SCI_DISPLAY_SAVEUNDER: doSaveUnder = true; break; case SCI_DISPLAY_RESTOREUNDER: bitsGetRect(argv[0], &rect); rect.translate(-_ports->getPort()->left, -_ports->getPort()->top); bitsRestore(argv[0]); kernelGraphRedrawBox(rect); // finishing loop argc = 0; break; case SCI_DISPLAY_DONTSHOWBITS: bRedraw = 0; break; // 2 Dummy functions, longbow-demo is using those several times but sierra sci doesn't support them at all case SCI_DISPLAY_DUMMY1: case SCI_DISPLAY_DUMMY2: if (!((g_sci->getGameId() == "longbow") && (g_sci->isDemo()))) error("Unknown kDisplay argument %X", displayArg); if (displayArg == SCI_DISPLAY_DUMMY2) { if (argc) { argc--; argv++; } else { error("No parameter left for kDisplay(0x73)"); } } break; default: error("Unknown kDisplay argument %X", displayArg); break; } } // now drawing the text _text16->Size(rect, text, -1, width); rect.moveTo(_ports->getPort()->curLeft, _ports->getPort()->curTop); if (getSciVersion() >= SCI_VERSION_1_LATE) { int16 leftPos = rect.right <= _screen->getWidth() ? 0 : _screen->getWidth() - rect.right; int16 topPos = rect.bottom <= _screen->getHeight() ? 0 : _screen->getHeight() - rect.bottom; _ports->move(leftPos, topPos); rect.moveTo(_ports->getPort()->curLeft, _ports->getPort()->curTop); } if (doSaveUnder) result = bitsSave(rect, GFX_SCREEN_MASK_VISUAL); if (colorBack != -1) fillRect(rect, GFX_SCREEN_MASK_VISUAL, colorBack, 0, 0); _text16->Box(text, 0, rect, alignment, -1); if (_screen->_picNotValid == 0 && bRedraw) bitsShow(rect); // restoring port and cursor pos Port *currport = _ports->getPort(); uint16 tTop = currport->curTop; uint16 tLeft = currport->curLeft; if (!g_sci->_features->usesOldGfxFunctions()) { // Restore port settings for some SCI0LATE and SCI01+ only // the change actually happened inbetween .530 (hoyle1) and .566 (heros quest). We don't have any detection for // that currently, so we are using oldGfxFunctions (.502). The only games that could get regressions because of // this are hoyle1, kq4 and funseeker. If there are regressions, we should use interpreter version (which would // require exe version detection) // If we restore the port for whole SCI0LATE, at least sq3old will get an issue - font 0 will get used when // scanning for planets instead of font 600 - a setfont parameter is missing in one of the kDisplay calls in // script 19. I assume this is a script bug, because it was added in sq3new. *currport = oldPort; } currport->curTop = tTop; currport->curLeft = tLeft; return result; } // TODO: If this matches the sci32 implementation, we may put it into GfxScreen void GfxPaint16::kernelShakeScreen(uint16 shakeCount, uint16 directions) { while (shakeCount--) { if (directions & SCI_SHAKE_DIRECTION_VERTICAL) _screen->setVerticalShakePos(10); // TODO: horizontal shakes g_system->updateScreen(); g_sci->getEngineState()->wait(3); if (directions & SCI_SHAKE_DIRECTION_VERTICAL) _screen->setVerticalShakePos(0); g_system->updateScreen(); g_sci->getEngineState()->wait(3); } } reg_t GfxPaint16::kernelPortraitLoad(Common::String resourceName) { //Portrait *myPortrait = new Portrait(g_sci->getResMan(), _screen, _palette, resourceName); return NULL_REG; } void GfxPaint16::kernelPortraitShow(Common::String resourceName, Common::Point position, uint16 resourceId, uint16 noun, uint16 verb, uint16 cond, uint16 seq) { Portrait *myPortrait = new Portrait(g_sci->getResMan(), g_sci->getEventManager(), _screen, _palette, _audio, resourceName); // TODO: cache portraits // adjust given coordinates to curPort (but dont adjust coordinates on upscaledHires_Save_Box and give us hires coordinates // on kDrawCel, yeah this whole stuff makes sense) position.x += _ports->getPort()->left; position.y += _ports->getPort()->top; _screen->adjustToUpscaledCoordinates(position.y, position.x); myPortrait->doit(position, resourceId, noun, verb, cond, seq); delete myPortrait; } void GfxPaint16::kernelPortraitUnload(uint16 portraitId) { } } // End of namespace Sci