mirror of
https://github.com/libretro/scummvm.git
synced 2024-12-23 18:24:59 +00:00
3099 lines
72 KiB
C++
3099 lines
72 KiB
C++
/* 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/endian.h"
|
|
#include "common/system.h"
|
|
#include "graphics/cursorman.h"
|
|
#include "kyra/screen.h"
|
|
#include "kyra/kyra.h"
|
|
#include "kyra/resource.h"
|
|
|
|
namespace Kyra {
|
|
|
|
#define BITBLIT_RECTS 10
|
|
|
|
Screen::Screen(KyraEngine *vm, OSystem *system)
|
|
: _system(system), _vm(vm) {
|
|
}
|
|
|
|
Screen::~Screen() {
|
|
for (int i = 0; i < SCREEN_OVLS_NUM; ++i)
|
|
delete [] _sjisOverlayPtrs[i];
|
|
|
|
for (int pageNum = 0; pageNum < SCREEN_PAGE_NUM; pageNum += 2) {
|
|
delete [] _pagePtrs[pageNum];
|
|
_pagePtrs[pageNum] = _pagePtrs[pageNum + 1] = 0;
|
|
}
|
|
|
|
for (int f = 0; f < ARRAYSIZE(_fonts); ++f) {
|
|
delete[] _fonts[f].fontData;
|
|
_fonts[f].fontData = NULL;
|
|
}
|
|
|
|
delete [] _sjisFontData;
|
|
delete [] _sjisTempPage;
|
|
delete [] _currentPalette;
|
|
delete [] _screenPalette;
|
|
delete [] _decodeShapeBuffer;
|
|
delete [] _animBlockPtr;
|
|
|
|
if (_vm->gameFlags().platform != Common::kPlatformAmiga) {
|
|
for (int i = 0; i < ARRAYSIZE(_palettes); ++i)
|
|
delete [] _palettes[i];
|
|
}
|
|
|
|
delete [] _bitBlitRects;
|
|
|
|
for (int i = 0; i < ARRAYSIZE(_saveLoadPage); ++i) {
|
|
delete [] _saveLoadPage[i];
|
|
_saveLoadPage[i] = 0;
|
|
}
|
|
|
|
for (int i = 0; i < ARRAYSIZE(_saveLoadPageOvl); ++i) {
|
|
delete [] _saveLoadPageOvl[i];
|
|
_saveLoadPageOvl[i] = 0;
|
|
}
|
|
|
|
delete [] _unkPtr1;
|
|
delete [] _unkPtr2;
|
|
|
|
delete [] _dirtyRects;
|
|
}
|
|
|
|
bool Screen::init() {
|
|
debugC(9, kDebugLevelScreen, "Screen::init()");
|
|
_disableScreen = false;
|
|
_debugEnabled = false;
|
|
|
|
_system->setFeatureState(OSystem::kFeatureAutoComputeDirtyRects, false);
|
|
|
|
memset(_sjisOverlayPtrs, 0, sizeof(_sjisOverlayPtrs));
|
|
_useOverlays = false;
|
|
_useSJIS = false;
|
|
_sjisTempPage = _sjisFontData = 0;
|
|
|
|
setResolution();
|
|
|
|
_curPage = 0;
|
|
for (int pageNum = 0; pageNum < SCREEN_PAGE_NUM; pageNum += 2) {
|
|
uint8 *pagePtr = new uint8[SCREEN_PAGE_SIZE];
|
|
assert(pagePtr);
|
|
memset(pagePtr, 0, SCREEN_PAGE_SIZE);
|
|
_pagePtrs[pageNum] = _pagePtrs[pageNum + 1] = pagePtr;
|
|
}
|
|
memset(_shapePages, 0, sizeof(_shapePages));
|
|
|
|
memset(_palettes, 0, sizeof(_palettes));
|
|
_screenPalette = new uint8[768];
|
|
assert(_screenPalette);
|
|
memset(_screenPalette, 0, 768);
|
|
|
|
if (_vm->gameFlags().platform == Common::kPlatformAmiga) {
|
|
_currentPalette = new uint8[1248];
|
|
assert(_currentPalette);
|
|
memset(_currentPalette, 0, 1248);
|
|
|
|
for (int i = 0; i < 6; ++i)
|
|
_palettes[i] = _currentPalette + (i+1)*96;
|
|
} else {
|
|
_currentPalette = new uint8[768];
|
|
assert(_currentPalette);
|
|
memset(_currentPalette, 0, 768);
|
|
for (int i = 0; i < 3; ++i) {
|
|
_palettes[i] = new uint8[768];
|
|
assert(_palettes[i]);
|
|
memset(_palettes[i], 0, 768);
|
|
}
|
|
}
|
|
|
|
setScreenPalette(_currentPalette);
|
|
_curDim = &_screenDimTable[0];
|
|
_charWidth = 0;
|
|
_charOffset = 0;
|
|
memset(_fonts, 0, sizeof(_fonts));
|
|
for (int i = 0; i < ARRAYSIZE(_textColorsMap); ++i)
|
|
_textColorsMap[i] = i;
|
|
_decodeShapeBuffer = NULL;
|
|
_decodeShapeBufferSize = 0;
|
|
_animBlockPtr = NULL;
|
|
_animBlockSize = 0;
|
|
_mouseLockCount = 1;
|
|
CursorMan.showMouse(false);
|
|
|
|
_bitBlitRects = new Rect[BITBLIT_RECTS];
|
|
assert(_bitBlitRects);
|
|
memset(_bitBlitRects, 0, sizeof(Rect)*BITBLIT_RECTS);
|
|
_bitBlitNum = 0;
|
|
memset(_saveLoadPage, 0, sizeof(_saveLoadPage));
|
|
memset(_saveLoadPageOvl, 0, sizeof(_saveLoadPageOvl));
|
|
|
|
_unkPtr1 = new uint8[getRectSize(1, 144)];
|
|
assert(_unkPtr1);
|
|
memset(_unkPtr1, 0, getRectSize(1, 144));
|
|
_unkPtr2 = new uint8[getRectSize(1, 144)];
|
|
assert(_unkPtr2);
|
|
memset(_unkPtr2, 0, getRectSize(1, 144));
|
|
|
|
_forceFullUpdate = false;
|
|
_numDirtyRects = 0;
|
|
_dirtyRects = new Rect[kMaxDirtyRects];
|
|
assert(_dirtyRects);
|
|
|
|
return true;
|
|
}
|
|
|
|
bool Screen::enableScreenDebug(bool enable) {
|
|
bool temp = _debugEnabled;
|
|
|
|
if (_debugEnabled != enable) {
|
|
_debugEnabled = enable;
|
|
setResolution();
|
|
_forceFullUpdate = true;
|
|
updateScreen();
|
|
}
|
|
|
|
return temp;
|
|
}
|
|
|
|
void Screen::setResolution() {
|
|
byte palette[4*256];
|
|
_system->grabPalette(palette, 0, 256);
|
|
|
|
if (_vm->gameFlags().useHiResOverlay) {
|
|
_system->beginGFXTransaction();
|
|
_vm->initCommonGFX(true);
|
|
if (_debugEnabled)
|
|
_system->initSize(960, 400);
|
|
else
|
|
_system->initSize(640, 400);
|
|
_system->endGFXTransaction();
|
|
|
|
for (int i = 0; i < SCREEN_OVLS_NUM; ++i) {
|
|
if (!_sjisOverlayPtrs[i]) {
|
|
_sjisOverlayPtrs[i] = new uint8[SCREEN_OVL_SJIS_SIZE];
|
|
assert(_sjisOverlayPtrs[i]);
|
|
memset(_sjisOverlayPtrs[i], 0x80, SCREEN_OVL_SJIS_SIZE);
|
|
}
|
|
}
|
|
_useOverlays = true;
|
|
_useSJIS = (_vm->gameFlags().lang == Common::JA_JPN);
|
|
|
|
if (_useSJIS) {
|
|
if (!_sjisFontData) {
|
|
_sjisFontData = _vm->resource()->fileData("FMT_FNT.ROM", 0);
|
|
if (!_sjisFontData)
|
|
error("missing font rom ('FMT_FNT.ROM') required for this version");
|
|
}
|
|
|
|
if (!_sjisTempPage) {
|
|
_sjisTempPage = new uint8[420];
|
|
assert(_sjisTempPage);
|
|
_sjisTempPage2 = _sjisTempPage + 60;
|
|
_sjisSourceChar = _sjisTempPage + 384;
|
|
}
|
|
}
|
|
} else {
|
|
_system->beginGFXTransaction();
|
|
_vm->initCommonGFX(false);
|
|
if (_debugEnabled)
|
|
_system->initSize(640, 200);
|
|
else
|
|
_system->initSize(320, 200);
|
|
_system->endGFXTransaction();
|
|
}
|
|
|
|
_system->setPalette(palette, 0, 256);
|
|
}
|
|
|
|
void Screen::updateScreen() {
|
|
debugC(9, kDebugLevelScreen, "Screen::updateScreen()");
|
|
if (_disableScreen)
|
|
return;
|
|
|
|
if (_useOverlays)
|
|
updateDirtyRectsOvl();
|
|
else
|
|
updateDirtyRects();
|
|
|
|
if (_debugEnabled) {
|
|
if (!_useOverlays)
|
|
_system->copyRectToScreen(getPagePtr(2), SCREEN_W, 320, 0, SCREEN_W, SCREEN_H);
|
|
else
|
|
_system->copyRectToScreen(getPagePtr(2), SCREEN_W, 640, 0, SCREEN_W, SCREEN_H);
|
|
}
|
|
|
|
_system->updateScreen();
|
|
}
|
|
|
|
void Screen::updateDirtyRects() {
|
|
if (_forceFullUpdate) {
|
|
_system->copyRectToScreen(getCPagePtr(0), SCREEN_W, 0, 0, SCREEN_W, SCREEN_H);
|
|
} else {
|
|
const byte *page0 = getCPagePtr(0);
|
|
for (int i = 0; i < _numDirtyRects; ++i) {
|
|
Rect &cur = _dirtyRects[i];
|
|
_system->copyRectToScreen(page0 + cur.y * SCREEN_W + cur.x, SCREEN_W, cur.x, cur.y, cur.x2, cur.y2);
|
|
}
|
|
}
|
|
_forceFullUpdate = false;
|
|
_numDirtyRects = 0;
|
|
}
|
|
|
|
void Screen::updateDirtyRectsOvl() {
|
|
if (_forceFullUpdate) {
|
|
const byte *src = getCPagePtr(0);
|
|
byte *dst = _sjisOverlayPtrs[0];
|
|
|
|
scale2x(dst, 640, src, SCREEN_W, SCREEN_W, SCREEN_H);
|
|
mergeOverlay(0, 0, 640, 400);
|
|
_system->copyRectToScreen(dst, 640, 0, 0, 640, 400);
|
|
} else {
|
|
const byte *page0 = getCPagePtr(0);
|
|
byte *ovl0 = _sjisOverlayPtrs[0];
|
|
|
|
for (int i = 0; i < _numDirtyRects; ++i) {
|
|
Rect &cur = _dirtyRects[i];
|
|
byte *dst = ovl0 + cur.y * 1280 + (cur.x<<1);
|
|
const byte *src = page0 + cur.y * SCREEN_W + cur.x;
|
|
|
|
scale2x(dst, 640, src, SCREEN_W, cur.x2, cur.y2);
|
|
mergeOverlay(cur.x<<1, cur.y<<1, cur.x2<<1, cur.y2<<1);
|
|
_system->copyRectToScreen(dst, 640, cur.x<<1, cur.y<<1, cur.x2<<1, cur.y2<<1);
|
|
}
|
|
}
|
|
_forceFullUpdate = false;
|
|
_numDirtyRects = 0;
|
|
}
|
|
|
|
void Screen::scale2x(byte *dst, int dstPitch, const byte *src, int srcPitch, int w, int h) {
|
|
byte *dstL1 = dst;
|
|
byte *dstL2 = dst + dstPitch;
|
|
|
|
int dstAdd = dstPitch * 2 - w * 2;
|
|
int srcAdd = srcPitch - w;
|
|
|
|
while (h--) {
|
|
for (int x = 0; x < w; ++x, dstL1 += 2, dstL2 += 2) {
|
|
uint16 col = *src++;
|
|
col |= col << 8;
|
|
*(uint16*)(dstL1) = col;
|
|
*(uint16*)(dstL2) = col;
|
|
}
|
|
dstL1 += dstAdd; dstL2 += dstAdd;
|
|
src += srcAdd;
|
|
}
|
|
}
|
|
|
|
void Screen::mergeOverlay(int x, int y, int w, int h) {
|
|
byte *dst = _sjisOverlayPtrs[0] + y * 640 + x;
|
|
const byte *src = _sjisOverlayPtrs[1] + y * 640 + x;
|
|
|
|
int add = 640 - w;
|
|
|
|
while (h--) {
|
|
for (x = 0; x < w; ++x, ++dst) {
|
|
byte col = *src++;
|
|
if (col != 0x80)
|
|
*dst = col;
|
|
}
|
|
dst += add;
|
|
src += add;
|
|
}
|
|
}
|
|
|
|
uint8 *Screen::getPagePtr(int pageNum) {
|
|
debugC(9, kDebugLevelScreen, "Screen::getPagePtr(%d)", pageNum);
|
|
assert(pageNum < SCREEN_PAGE_NUM);
|
|
return _pagePtrs[pageNum];
|
|
}
|
|
|
|
const uint8 *Screen::getCPagePtr(int pageNum) const {
|
|
debugC(9, kDebugLevelScreen, "Screen::getCPagePtr(%d)", pageNum);
|
|
assert(pageNum < SCREEN_PAGE_NUM);
|
|
return _pagePtrs[pageNum];
|
|
}
|
|
|
|
uint8 *Screen::getPageRect(int pageNum, int x, int y, int w, int h) {
|
|
debugC(9, kDebugLevelScreen, "Screen::getPageRect(%d, %d, %d, %d, %d)", pageNum, x, y, w, h);
|
|
assert(pageNum < SCREEN_PAGE_NUM);
|
|
if (pageNum == 0 || pageNum == 1) addDirtyRect(x, y, w, h);
|
|
return _pagePtrs[pageNum] + y * SCREEN_W + x;
|
|
}
|
|
|
|
void Screen::clearPage(int pageNum) {
|
|
debugC(9, kDebugLevelScreen, "Screen::clearPage(%d)", pageNum);
|
|
assert(pageNum < SCREEN_PAGE_NUM);
|
|
if (pageNum == 0 || pageNum == 1) _forceFullUpdate = true;
|
|
memset(getPagePtr(pageNum), 0, SCREEN_PAGE_SIZE);
|
|
clearOverlayPage(pageNum);
|
|
}
|
|
|
|
int Screen::setCurPage(int pageNum) {
|
|
debugC(9, kDebugLevelScreen, "Screen::setCurPage(%d)", pageNum);
|
|
assert(pageNum < SCREEN_PAGE_NUM);
|
|
int previousPage = _curPage;
|
|
_curPage = pageNum;
|
|
return previousPage;
|
|
}
|
|
|
|
void Screen::clearCurPage() {
|
|
debugC(9, kDebugLevelScreen, "Screen::clearCurPage()");
|
|
if (_curPage == 0 || _curPage == 1) _forceFullUpdate = true;
|
|
memset(getPagePtr(_curPage), 0, SCREEN_PAGE_SIZE);
|
|
clearOverlayPage(_curPage);
|
|
}
|
|
|
|
uint8 Screen::getPagePixel(int pageNum, int x, int y) {
|
|
debugC(9, kDebugLevelScreen, "Screen::getPagePixel(%d, %d, %d)", pageNum, x, y);
|
|
assert(pageNum < SCREEN_PAGE_NUM);
|
|
assert(x >= 0 && x < SCREEN_W && y >= 0 && y < SCREEN_H);
|
|
return _pagePtrs[pageNum][y * SCREEN_W + x];
|
|
}
|
|
|
|
void Screen::setPagePixel(int pageNum, int x, int y, uint8 color) {
|
|
debugC(9, kDebugLevelScreen, "Screen::setPagePixel(%d, %d, %d, %d)", pageNum, x, y, color);
|
|
assert(pageNum < SCREEN_PAGE_NUM);
|
|
assert(x >= 0 && x < SCREEN_W && y >= 0 && y < SCREEN_H);
|
|
if (pageNum == 0 || pageNum == 1)
|
|
addDirtyRect(x, y, 1, 1);
|
|
_pagePtrs[pageNum][y * SCREEN_W + x] = color;
|
|
}
|
|
|
|
void Screen::fadeFromBlack(int delay, const UpdateFunctor *upFunc) {
|
|
debugC(9, kDebugLevelScreen, "Screen::fadeFromBlack(%d, %p)", delay, (const void*)upFunc);
|
|
fadePalette(_currentPalette, delay, upFunc);
|
|
}
|
|
|
|
void Screen::fadeToBlack(int delay, const UpdateFunctor *upFunc) {
|
|
debugC(9, kDebugLevelScreen, "Screen::fadeToBlack(%d, %p)", delay, (const void*)upFunc);
|
|
uint8 blackPal[768];
|
|
memset(blackPal, 0, 768);
|
|
fadePalette(blackPal, delay, upFunc);
|
|
}
|
|
|
|
void Screen::fadePalette(const uint8 *palData, int delay, const UpdateFunctor *upFunc) {
|
|
debugC(9, kDebugLevelScreen, "Screen::fadePalette(%p, %d, %p)", (const void *)palData, delay, (const void*)upFunc);
|
|
updateScreen();
|
|
|
|
uint8 fadePal[768];
|
|
memcpy(fadePal, _screenPalette, 768);
|
|
uint8 diff, maxDiff = 0;
|
|
for (int i = 0; i < 768; ++i) {
|
|
diff = ABS(palData[i] - fadePal[i]);
|
|
if (diff > maxDiff) {
|
|
maxDiff = diff;
|
|
}
|
|
}
|
|
|
|
int16 delayInc = delay << 8;
|
|
if (maxDiff != 0)
|
|
delayInc /= maxDiff;
|
|
|
|
delay = delayInc;
|
|
for (diff = 1; diff <= maxDiff; ++diff) {
|
|
if (delayInc >= 512)
|
|
break;
|
|
delayInc += delay;
|
|
}
|
|
|
|
int delayAcc = 0;
|
|
while (!_vm->quit()) {
|
|
delayAcc += delayInc;
|
|
bool needRefresh = false;
|
|
for (int i = 0; i < 768; ++i) {
|
|
int c1 = palData[i];
|
|
int c2 = fadePal[i];
|
|
if (c1 != c2) {
|
|
needRefresh = true;
|
|
if (c1 > c2) {
|
|
c2 += diff;
|
|
if (c1 < c2)
|
|
c2 = c1;
|
|
}
|
|
|
|
if (c1 < c2) {
|
|
c2 -= diff;
|
|
if (c1 > c2)
|
|
c2 = c1;
|
|
}
|
|
|
|
fadePal[i] = (uint8)c2;
|
|
}
|
|
}
|
|
|
|
if (!needRefresh)
|
|
break;
|
|
|
|
setScreenPalette(fadePal);
|
|
if (upFunc && upFunc->isValid())
|
|
(*upFunc)();
|
|
else
|
|
_system->updateScreen();
|
|
//_system->delayMillis((delayAcc >> 8) * 1000 / 60);
|
|
_vm->delay((delayAcc >> 8) * 1000 / 60);
|
|
delayAcc &= 0xFF;
|
|
}
|
|
|
|
if (_vm->quit()) {
|
|
setScreenPalette(palData);
|
|
if (upFunc && upFunc->isValid())
|
|
(*upFunc)();
|
|
else
|
|
_system->updateScreen();
|
|
}
|
|
}
|
|
|
|
void Screen::setPaletteIndex(uint8 index, uint8 red, uint8 green, uint8 blue) {
|
|
debugC(9, kDebugLevelScreen, "Screen::setPaletteIndex(%u, %u, %u, %u)", index, red, green, blue);
|
|
_currentPalette[index * 3 + 0] = red;
|
|
_currentPalette[index * 3 + 1] = green;
|
|
_currentPalette[index * 3 + 2] = blue;
|
|
setScreenPalette(_currentPalette);
|
|
}
|
|
|
|
void Screen::setScreenPalette(const uint8 *palData) {
|
|
debugC(9, kDebugLevelScreen, "Screen::setScreenPalette(%p)", (const void *)palData);
|
|
|
|
int colors = (_vm->gameFlags().platform == Common::kPlatformAmiga ? 32 : 256);
|
|
if (palData != _screenPalette)
|
|
memcpy(_screenPalette, palData, colors*3);
|
|
|
|
uint8 screenPal[256 * 4];
|
|
for (int i = 0; i < colors; ++i) {
|
|
screenPal[4 * i + 0] = (palData[0] << 2) | (palData[0] & 3);
|
|
screenPal[4 * i + 1] = (palData[1] << 2) | (palData[1] & 3);
|
|
screenPal[4 * i + 2] = (palData[2] << 2) | (palData[2] & 3);
|
|
screenPal[4 * i + 3] = 0;
|
|
palData += 3;
|
|
}
|
|
_system->setPalette(screenPal, 0, colors);
|
|
}
|
|
|
|
void Screen::copyToPage0(int y, int h, uint8 page, uint8 *seqBuf) {
|
|
debugC(9, kDebugLevelScreen, "Screen::copyToPage0(%d, %d, %d, %p)", y, h, page, (const void *)seqBuf);
|
|
assert(y + h <= SCREEN_H);
|
|
const uint8 *src = getPagePtr(page) + y * SCREEN_W;
|
|
uint8 *dstPage = getPagePtr(0) + y * SCREEN_W;
|
|
for (int i = 0; i < h; ++i) {
|
|
for (int x = 0; x < SCREEN_W; ++x) {
|
|
if (seqBuf[x] != src[x]) {
|
|
seqBuf[x] = src[x];
|
|
dstPage[x] = src[x];
|
|
}
|
|
}
|
|
src += SCREEN_W;
|
|
seqBuf += SCREEN_W;
|
|
dstPage += SCREEN_W;
|
|
}
|
|
addDirtyRect(0, y, SCREEN_W, h);
|
|
// This would remove the text in the end sequence of
|
|
// the FM-Towns version.
|
|
// Since this method is just used for the Seqplayer
|
|
// this shouldn't be a problem anywhere else, so it's
|
|
// safe to disable the call here.
|
|
//clearOverlayRect(0, 0, y, SCREEN_W, h);
|
|
}
|
|
|
|
void Screen::copyRegion(int x1, int y1, int x2, int y2, int w, int h, int srcPage, int dstPage, int flags) {
|
|
debugC(9, kDebugLevelScreen, "Screen::copyRegion(%d, %d, %d, %d, %d, %d, %d, %d, %d)", x1, y1, x2, y2, w, h, srcPage, dstPage, flags);
|
|
|
|
if (flags & CR_CLIPPED) {
|
|
if (x2 < 0) {
|
|
if (x2 <= -w)
|
|
return;
|
|
w += x2;
|
|
x1 -= x2;
|
|
x2 = 0;
|
|
} else if (x2 + w >= SCREEN_W) {
|
|
if (x2 > SCREEN_W)
|
|
return;
|
|
w = SCREEN_W - x2;
|
|
}
|
|
|
|
if (y2 < 0) {
|
|
if (y2 <= -h )
|
|
return;
|
|
h += y2;
|
|
y1 -= y2;
|
|
y2 = 0;
|
|
} else if (y2 + h >= SCREEN_H) {
|
|
if (y2 > SCREEN_H)
|
|
return;
|
|
h = SCREEN_H - y2;
|
|
}
|
|
}
|
|
|
|
assert(x1 + w <= SCREEN_W && y1 + h <= SCREEN_H);
|
|
const uint8 *src = getPagePtr(srcPage) + y1 * SCREEN_W + x1;
|
|
assert(x2 + w <= SCREEN_W && y2 + h <= SCREEN_H);
|
|
uint8 *dst = getPagePtr(dstPage) + y2 * SCREEN_W + x2;
|
|
|
|
if (dstPage == 0 || dstPage == 1)
|
|
addDirtyRect(x2, y2, w, h);
|
|
|
|
copyOverlayRegion(x1, y1, x2, y2, w, h, srcPage, dstPage);
|
|
|
|
if (flags & CR_X_FLIPPED) {
|
|
while (h--) {
|
|
for (int i = 0; i < w; ++i) {
|
|
if (src[i] || (flags & CR_NO_P_CHECK))
|
|
dst[w-i] = src[i];
|
|
}
|
|
src += SCREEN_W;
|
|
dst += SCREEN_W;
|
|
}
|
|
} else {
|
|
while (h--) {
|
|
for (int i = 0; i < w; ++i) {
|
|
if (src[i] || (flags & CR_NO_P_CHECK))
|
|
dst[i] = src[i];
|
|
}
|
|
src += SCREEN_W;
|
|
dst += SCREEN_W;
|
|
}
|
|
}
|
|
}
|
|
|
|
void Screen::copyRegionToBuffer(int pageNum, int x, int y, int w, int h, uint8 *dest) {
|
|
debugC(9, kDebugLevelScreen, "Screen::copyRegionToBuffer(%d, %d, %d, %d, %d)", pageNum, x, y, w, h);
|
|
if (y < 0) {
|
|
dest += (-y) * w;
|
|
h += y;
|
|
y = 0;
|
|
} else if (y + h > SCREEN_H) {
|
|
h = SCREEN_H - y;
|
|
}
|
|
|
|
if (x < 0) {
|
|
dest += -x;
|
|
w += x;
|
|
x = 0;
|
|
} else if (x + w > SCREEN_W) {
|
|
w = SCREEN_W - x;
|
|
}
|
|
|
|
if (w < 0 || h < 0)
|
|
return;
|
|
|
|
uint8 *pagePtr = getPagePtr(pageNum);
|
|
|
|
for (int i = y; i < y + h; ++i)
|
|
memcpy(dest + (i - y) * w, pagePtr + i * SCREEN_W + x, w);
|
|
}
|
|
|
|
void Screen::copyPage(uint8 srcPage, uint8 dstPage) {
|
|
debugC(9, kDebugLevelScreen, "Screen::copyPage(%d, %d)", srcPage, dstPage);
|
|
|
|
uint8 *src = getPagePtr(srcPage);
|
|
uint8 *dst = getPagePtr(dstPage);
|
|
memcpy(dst, src, SCREEN_W * SCREEN_H);
|
|
copyOverlayRegion(0, 0, 0, 0, SCREEN_W, SCREEN_H, srcPage, dstPage);
|
|
|
|
if (dstPage == 0 || dstPage == 1) _forceFullUpdate = true;
|
|
}
|
|
|
|
void Screen::copyBlockToPage(int pageNum, int x, int y, int w, int h, const uint8 *src) {
|
|
debugC(9, kDebugLevelScreen, "Screen::copyBlockToPage(%d, %d, %d, %d, %d, %p)", pageNum, x, y, w, h, (const void *)src);
|
|
if (y < 0) {
|
|
src += (-y) * w;
|
|
h += y;
|
|
y = 0;
|
|
} else if (y + h > SCREEN_H) {
|
|
h = SCREEN_H - y;
|
|
}
|
|
|
|
if (x < 0) {
|
|
src += -x;
|
|
w += x;
|
|
x = 0;
|
|
} else if (x + w > SCREEN_W) {
|
|
w = SCREEN_W - x;
|
|
}
|
|
|
|
if (w < 0 || h < 0)
|
|
return;
|
|
|
|
uint8 *dst = getPagePtr(pageNum) + y * SCREEN_W + x;
|
|
|
|
if (pageNum == 0 || pageNum == 1)
|
|
addDirtyRect(x, y, w, h);
|
|
|
|
clearOverlayRect(pageNum, x, y, w, h);
|
|
|
|
while (h--) {
|
|
memcpy(dst, src, w);
|
|
dst += SCREEN_W;
|
|
src += w;
|
|
}
|
|
}
|
|
|
|
void Screen::copyFromCurPageBlock(int x, int y, int w, int h, const uint8 *src) {
|
|
debugC(9, kDebugLevelScreen, "Screen::copyFromCurPageBlock(%d, %d, %d, %d, %p)", x, y, w, h, (const void *)src);
|
|
if (x < 0)
|
|
x = 0;
|
|
else if (x >= 40)
|
|
return;
|
|
|
|
if (x + w > 40)
|
|
w = 40 - x;
|
|
|
|
if (y < 0)
|
|
y = 0;
|
|
else if (y >= 200)
|
|
return;
|
|
|
|
if (y + h > 200)
|
|
h = 200 - y;
|
|
|
|
uint8 *dst = getPagePtr(_curPage) + y * SCREEN_W + x * 8;
|
|
|
|
if (_curPage == 0 || _curPage == 1)
|
|
addDirtyRect(x*8, y, w*8, h);
|
|
|
|
clearOverlayRect(_curPage, x*8, y, w*8, h);
|
|
|
|
while (h--) {
|
|
memcpy(dst, src, w*8);
|
|
dst += SCREEN_W;
|
|
src += w*8;
|
|
}
|
|
}
|
|
|
|
void Screen::copyCurPageBlock(int x, int y, int w, int h, uint8 *dst) {
|
|
debugC(9, kDebugLevelScreen, "Screen::copyCurPageBlock(%d, %d, %d, %d, %p)", x, y, w, h, (const void *)dst);
|
|
assert(dst);
|
|
if (x < 0)
|
|
x = 0;
|
|
else if (x >= 40)
|
|
return;
|
|
|
|
if (x + w > 40)
|
|
w = 40 - x;
|
|
|
|
if (y < 0)
|
|
y = 0;
|
|
else if (y >= 200)
|
|
return;
|
|
|
|
if (y + h > 200)
|
|
h = 200 - y;
|
|
|
|
const uint8 *src = getPagePtr(_curPage) + y * SCREEN_W + x * 8;
|
|
while (h--) {
|
|
memcpy(dst, src, w*8);
|
|
dst += w*8;
|
|
src += SCREEN_W;
|
|
}
|
|
}
|
|
|
|
void Screen::shuffleScreen(int sx, int sy, int w, int h, int srcPage, int dstPage, int ticks, bool transparent) {
|
|
debugC(9, kDebugLevelScreen, "Screen::shuffleScreen(%d, %d, %d, %d, %d, %d, %d, %d)", sx, sy, w, h, srcPage, dstPage, ticks, transparent);
|
|
assert(sx >= 0 && w <= SCREEN_W);
|
|
int x;
|
|
uint16 x_offs[SCREEN_W];
|
|
for (x = 0; x < SCREEN_W; ++x)
|
|
x_offs[x] = x;
|
|
|
|
for (x = 0; x < w; ++x) {
|
|
int i = _vm->_rnd.getRandomNumber(w - 1);
|
|
SWAP(x_offs[x], x_offs[i]);
|
|
}
|
|
|
|
assert(sy >= 0 && h <= SCREEN_H);
|
|
int y;
|
|
uint8 y_offs[SCREEN_H];
|
|
for (y = 0; y < SCREEN_H; ++y)
|
|
y_offs[y] = y;
|
|
|
|
for (y = 0; y < h; ++y) {
|
|
int i = _vm->_rnd.getRandomNumber(h - 1);
|
|
SWAP(y_offs[y], y_offs[i]);
|
|
}
|
|
|
|
int32 start, now;
|
|
int wait;
|
|
for (y = 0; y < h && !_vm->quit(); ++y) {
|
|
start = (int32)_system->getMillis();
|
|
int y_cur = y;
|
|
for (x = 0; x < w; ++x) {
|
|
int i = sx + x_offs[x];
|
|
int j = sy + y_offs[y_cur];
|
|
++y_cur;
|
|
if (y_cur >= h)
|
|
y_cur = 0;
|
|
|
|
uint8 color = getPagePixel(srcPage, i, j);
|
|
if (!transparent || color != 0)
|
|
setPagePixel(dstPage, i, j, color);
|
|
}
|
|
// forcing full update for now
|
|
_forceFullUpdate = true;
|
|
updateScreen();
|
|
now = (int32)_system->getMillis();
|
|
wait = ticks * _vm->tickLength() - (now - start);
|
|
if (wait > 0)
|
|
_vm->delay(wait);
|
|
}
|
|
|
|
copyOverlayRegion(sx, sy, sx, sy, w, h, srcPage, dstPage);
|
|
|
|
if (_vm->quit()) {
|
|
copyRegion(sx, sy, sx, sy, w, h, srcPage, dstPage);
|
|
_system->updateScreen();
|
|
}
|
|
}
|
|
|
|
void Screen::fillRect(int x1, int y1, int x2, int y2, uint8 color, int pageNum) {
|
|
debugC(9, kDebugLevelScreen, "Screen::fillRect(%d, %d, %d, %d, %d, %d)", x1, y1, x2, y2, color, pageNum);
|
|
assert(x2 < SCREEN_W && y2 < SCREEN_H);
|
|
if (pageNum == -1)
|
|
pageNum = _curPage;
|
|
|
|
uint8 *dst = getPagePtr(pageNum) + y1 * SCREEN_W + x1;
|
|
|
|
if (pageNum == 0 || pageNum == 1)
|
|
addDirtyRect(x1, y1, x2-x1+1, y2-y1+1);
|
|
|
|
clearOverlayRect(pageNum, x1, y1, x2-x1+1, y2-y1+1);
|
|
|
|
for (; y1 <= y2; ++y1) {
|
|
memset(dst, color, x2 - x1 + 1);
|
|
dst += SCREEN_W;
|
|
}
|
|
}
|
|
|
|
void Screen::drawBox(int x1, int y1, int x2, int y2, int color) {
|
|
debugC(9, kDebugLevelScreen, "Screen::drawBox(%i, %i, %i, %i, %i)", x1, y1, x2, y2, color);
|
|
|
|
drawClippedLine(x1, y1, x2, y1, color);
|
|
drawClippedLine(x1, y1, x1, y2, color);
|
|
drawClippedLine(x2, y1, x2, y2, color);
|
|
drawClippedLine(x1, y2, x2, y2, color);
|
|
}
|
|
|
|
void Screen::drawShadedBox(int x1, int y1, int x2, int y2, int color1, int color2) {
|
|
debugC(9, kDebugLevelScreen, "Screen::drawShadedBox(%i, %i, %i, %i, %i, %i)", x1, y1, x2, y2, color1, color2);
|
|
assert(x1 > 0 && y1 > 0);
|
|
hideMouse();
|
|
|
|
fillRect(x1, y1, x2, y1 + 1, color1);
|
|
fillRect(x2 - 1, y1, x2, y2, color1);
|
|
|
|
drawClippedLine(x1, y1, x1, y2, color2);
|
|
drawClippedLine(x1 + 1, y1 + 1, x1 + 1, y2 - 1, color2);
|
|
drawClippedLine(x1, y2, x2, y2, color2);
|
|
drawClippedLine(x1, y2 - 1, x2 - 1, y2 - 1, color2);
|
|
|
|
showMouse();
|
|
}
|
|
|
|
void Screen::drawClippedLine(int x1, int y1, int x2, int y2, int color) {
|
|
debugC(9, kDebugLevelScreen, "Screen::drawClippedLine(%i, %i, %i, %i, %i)", x1, y1, x2, y2, color);
|
|
|
|
if (x1 < 0)
|
|
x1 = 0;
|
|
else if (x1 > 319)
|
|
x1 = 319;
|
|
|
|
if (x2 < 0)
|
|
x2 = 0;
|
|
else if (x2 > 319)
|
|
x2 = 319;
|
|
|
|
if (y1 < 0)
|
|
y1 = 0;
|
|
else if (y1 > 199)
|
|
y1 = 199;
|
|
|
|
if (y2 < 0)
|
|
y2 = 0;
|
|
else if (y2 > 199)
|
|
y2 = 199;
|
|
|
|
if (x1 == x2)
|
|
if (y1 > y2)
|
|
drawLine(true, x1, y2, y1 - y2 + 1, color);
|
|
else
|
|
drawLine(true, x1, y1, y2 - y1 + 1, color);
|
|
else
|
|
if (x1 > x2)
|
|
drawLine(false, x2, y1, x1 - x2 + 1, color);
|
|
else
|
|
drawLine(false, x1, y1, x2 - x1 + 1, color);
|
|
}
|
|
|
|
void Screen::drawLine(bool vertical, int x, int y, int length, int color) {
|
|
debugC(9, kDebugLevelScreen, "Screen::drawLine(%i, %i, %i, %i, %i)", vertical, x, y, length, color);
|
|
|
|
uint8 *ptr = getPagePtr(_curPage) + y * SCREEN_W + x;
|
|
|
|
if (vertical) {
|
|
assert((y + length) <= SCREEN_H);
|
|
int currLine = 0;
|
|
while (currLine < length) {
|
|
*ptr = color;
|
|
ptr += SCREEN_W;
|
|
currLine++;
|
|
}
|
|
} else {
|
|
assert((x + length) <= SCREEN_W);
|
|
memset(ptr, color, length);
|
|
}
|
|
|
|
if (_curPage == 0 || _curPage == 1)
|
|
addDirtyRect(x, y, (vertical) ? 1 : length, (vertical) ? length : 1);
|
|
|
|
clearOverlayRect(_curPage, x, y, (vertical) ? 1 : length, (vertical) ? length : 1);
|
|
}
|
|
|
|
void Screen::setAnimBlockPtr(int size) {
|
|
debugC(9, kDebugLevelScreen, "Screen::setAnimBlockPtr(%d)", size);
|
|
delete [] _animBlockPtr;
|
|
_animBlockPtr = new uint8[size];
|
|
assert(_animBlockPtr);
|
|
memset(_animBlockPtr, 0, size);
|
|
_animBlockSize = size;
|
|
}
|
|
|
|
void Screen::setTextColorMap(const uint8 *cmap) {
|
|
debugC(9, kDebugLevelScreen, "Screen::setTextColorMap(%p)", (const void *)cmap);
|
|
setTextColor(cmap, 0, 11);
|
|
}
|
|
|
|
void Screen::setTextColor(const uint8 *cmap, int a, int b) {
|
|
debugC(9, kDebugLevelScreen, "Screen::setTextColor(%p, %d, %d)", (const void *)cmap, a, b);
|
|
memcpy(&_textColorsMap[a], cmap, b-a+1);
|
|
}
|
|
|
|
bool Screen::loadFont(FontId fontId, const char *filename) {
|
|
debugC(9, kDebugLevelScreen, "Screen::loadFont(%d, '%s')", fontId, filename);
|
|
Font *fnt = &_fonts[fontId];
|
|
|
|
// FIXME: add font support for amiga version
|
|
if (_vm->gameFlags().platform == Common::kPlatformAmiga)
|
|
return true;
|
|
|
|
if (!fnt)
|
|
error("fontId %d is invalid", fontId);
|
|
|
|
if (fnt->fontData)
|
|
delete [] fnt->fontData;
|
|
|
|
uint32 sz = 0;
|
|
uint8 *fontData = fnt->fontData = _vm->resource()->fileData(filename, &sz);
|
|
|
|
if (!fontData || !sz)
|
|
error("couldn't load font file '%s'", filename);
|
|
|
|
uint16 fontSig = READ_LE_UINT16(fontData + 2);
|
|
|
|
if (fontSig != 0x500)
|
|
error("Invalid font data (file '%s')", filename);
|
|
|
|
fnt->charWidthTable = fontData + READ_LE_UINT16(fontData + 8);
|
|
fnt->charSizeOffset = READ_LE_UINT16(fontData + 4);
|
|
fnt->charBitmapOffset = READ_LE_UINT16(fontData + 6);
|
|
fnt->charWidthTableOffset = READ_LE_UINT16(fontData + 8);
|
|
fnt->charHeightTableOffset = READ_LE_UINT16(fontData + 0xC);
|
|
|
|
return true;
|
|
}
|
|
|
|
Screen::FontId Screen::setFont(FontId fontId) {
|
|
debugC(9, kDebugLevelScreen, "Screen::setFont(%d)", fontId);
|
|
FontId prev = _currentFont;
|
|
_currentFont = fontId;
|
|
return prev;
|
|
}
|
|
|
|
int Screen::getFontHeight() const {
|
|
// FIXME: add font support for amiga version
|
|
if (_vm->gameFlags().platform == Common::kPlatformAmiga)
|
|
return 0;
|
|
return *(_fonts[_currentFont].fontData + _fonts[_currentFont].charSizeOffset + 4);
|
|
}
|
|
|
|
int Screen::getFontWidth() const {
|
|
// FIXME: add font support for amiga version
|
|
if (_vm->gameFlags().platform == Common::kPlatformAmiga)
|
|
return 0;
|
|
return *(_fonts[_currentFont].fontData + _fonts[_currentFont].charSizeOffset + 5);
|
|
}
|
|
|
|
int Screen::getCharWidth(uint16 c) const {
|
|
// FIXME: add font support for amiga version
|
|
if (_vm->gameFlags().platform == Common::kPlatformAmiga)
|
|
return 0;
|
|
debugC(9, kDebugLevelScreen, "Screen::getCharWidth('%c'|%d)", c & 0xFF, c);
|
|
if (c & 0xFF00)
|
|
return SJIS_CHARSIZE >> 1;
|
|
return (int)_fonts[_currentFont].charWidthTable[c] + _charWidth;
|
|
}
|
|
|
|
int Screen::getTextWidth(const char *str) const {
|
|
// FIXME: add font support for amiga version
|
|
if (_vm->gameFlags().platform == Common::kPlatformAmiga)
|
|
return 0;
|
|
debugC(9, kDebugLevelScreen, "Screen::getTextWidth('%s')", str);
|
|
|
|
int curLineLen = 0;
|
|
int maxLineLen = 0;
|
|
while (1) {
|
|
uint c = *str++;
|
|
c &= 0xFF;
|
|
if (c == 0) {
|
|
break;
|
|
} else if (c == '\r') {
|
|
if (curLineLen > maxLineLen) {
|
|
maxLineLen = curLineLen;
|
|
} else {
|
|
curLineLen = 0;
|
|
}
|
|
} else {
|
|
if (c <= 0x7F || !_useSJIS)
|
|
curLineLen += getCharWidth(c);
|
|
else {
|
|
c = READ_LE_UINT16(str - 1);
|
|
++str;
|
|
curLineLen += getCharWidth(c);
|
|
}
|
|
}
|
|
}
|
|
|
|
return MAX(curLineLen, maxLineLen);
|
|
}
|
|
|
|
void Screen::printText(const char *str, int x, int y, uint8 color1, uint8 color2) {
|
|
// FIXME: add font support for amiga version
|
|
if (_vm->gameFlags().platform == Common::kPlatformAmiga)
|
|
return;
|
|
debugC(9, kDebugLevelScreen, "Screen::printText('%s', %d, %d, 0x%X, 0x%X)", str, x, y, color1, color2);
|
|
uint8 cmap[2];
|
|
cmap[0] = color2;
|
|
cmap[1] = color1;
|
|
setTextColor(cmap, 0, 1);
|
|
|
|
Font *fnt = &_fonts[_currentFont];
|
|
const uint8 charHeightFnt = *(fnt->fontData + fnt->charSizeOffset + 4);
|
|
uint8 charHeight = 0;
|
|
|
|
if (x < 0)
|
|
x = 0;
|
|
else if (x >= SCREEN_W)
|
|
return;
|
|
|
|
int x_start = x;
|
|
if (y < 0)
|
|
y = 0;
|
|
else if (y >= SCREEN_H)
|
|
return;
|
|
|
|
while (1) {
|
|
uint c = *str++;
|
|
c &= 0xFF;
|
|
if (c == 0) {
|
|
break;
|
|
} else if (c == '\r') {
|
|
x = x_start;
|
|
y += charHeight + _charOffset;
|
|
} else {
|
|
int charWidth = getCharWidth(c);
|
|
if (x + charWidth > SCREEN_W) {
|
|
x = x_start;
|
|
y += charHeight + _charOffset;
|
|
if (y >= SCREEN_H) {
|
|
break;
|
|
}
|
|
}
|
|
if (c <= 0x7F || !_useSJIS) {
|
|
drawCharANSI(c, x, y);
|
|
charHeight = charHeightFnt;
|
|
} else {
|
|
c = READ_LE_UINT16(str - 1);
|
|
++str;
|
|
charWidth = getCharWidth(c);
|
|
charHeight = SJIS_CHARSIZE >> 1;
|
|
drawCharSJIS(c, x, y);
|
|
}
|
|
x += charWidth;
|
|
}
|
|
}
|
|
}
|
|
|
|
void Screen::drawCharANSI(uint8 c, int x, int y) {
|
|
debugC(9, kDebugLevelScreen, "Screen::drawChar('%c', %d, %d)", c, x, y);
|
|
Font *fnt = &_fonts[_currentFont];
|
|
uint8 *dst = getPagePtr(_curPage) + y * SCREEN_W + x;
|
|
|
|
uint16 bitmapOffset = READ_LE_UINT16(fnt->fontData + fnt->charBitmapOffset + c * 2);
|
|
if (bitmapOffset == 0)
|
|
return;
|
|
|
|
uint8 charWidth = *(fnt->fontData + fnt->charWidthTableOffset + c);
|
|
if (charWidth + x > SCREEN_W)
|
|
return;
|
|
|
|
uint8 charH0 = *(fnt->fontData + fnt->charSizeOffset + 4);
|
|
if (charH0 + y > SCREEN_H)
|
|
return;
|
|
|
|
uint8 charH1 = *(fnt->fontData + fnt->charHeightTableOffset + c * 2);
|
|
uint8 charH2 = *(fnt->fontData + fnt->charHeightTableOffset + c * 2 + 1);
|
|
charH0 -= charH1 + charH2;
|
|
|
|
const uint8 *src = fnt->fontData + bitmapOffset;
|
|
const int pitch = SCREEN_W - charWidth;
|
|
|
|
while (charH1--) {
|
|
uint8 col = _textColorsMap[0];
|
|
for (int i = 0; i < charWidth; ++i) {
|
|
if (col != 0)
|
|
*dst = col;
|
|
++dst;
|
|
}
|
|
dst += pitch;
|
|
}
|
|
|
|
while (charH2--) {
|
|
uint8 b = 0;
|
|
for (int i = 0; i < charWidth; ++i) {
|
|
uint8 col;
|
|
if (i & 1) {
|
|
col = _textColorsMap[b >> 4];
|
|
} else {
|
|
b = *src++;
|
|
col = _textColorsMap[b & 0xF];
|
|
}
|
|
if (col != 0) {
|
|
*dst = col;
|
|
}
|
|
++dst;
|
|
}
|
|
dst += pitch;
|
|
}
|
|
|
|
while (charH0--) {
|
|
uint8 col = _textColorsMap[0];
|
|
for (int i = 0; i < charWidth; ++i) {
|
|
if (col != 0)
|
|
*dst = col;
|
|
++dst;
|
|
}
|
|
dst += pitch;
|
|
}
|
|
|
|
if (_curPage == 0 || _curPage == 1)
|
|
addDirtyRect(x, y, charWidth, *(fnt->fontData + fnt->charSizeOffset + 4));
|
|
}
|
|
|
|
void Screen::setScreenDim(int dim) {
|
|
debugC(9, kDebugLevelScreen, "Screen::setScreenDim(%d)", dim);
|
|
assert(dim < _screenDimTableCount);
|
|
_curDim = &_screenDimTable[dim];
|
|
}
|
|
|
|
void Screen::drawShape(uint8 pageNum, const uint8 *shapeData, int x, int y, int sd, int flags, ...) {
|
|
debugC(9, kDebugLevelScreen, "Screen::drawShape(%d, %p, %d, %d, %d, 0x%.04X, ...)", pageNum, (const void *)shapeData, x, y, sd, flags);
|
|
if (!shapeData)
|
|
return;
|
|
va_list args;
|
|
va_start(args, flags);
|
|
|
|
static int drawShapeVar1 = 0;
|
|
static int drawShapeVar2[] = {
|
|
1, 3, 2, 5, 4, 3, 2, 1
|
|
};
|
|
static int drawShapeVar3 = 1;
|
|
static int drawShapeVar4 = 0;
|
|
static int drawShapeVar5 = 0;
|
|
|
|
uint8 *table = 0;
|
|
int tableLoopCount = 0;
|
|
int drawLayer = 0;
|
|
uint8 *table2 = 0;
|
|
uint8 *table3 = 0;
|
|
uint8 *table4 = 0;
|
|
|
|
if (flags & 0x8000)
|
|
table2 = va_arg(args, uint8*);
|
|
|
|
if (flags & 0x100) {
|
|
table = va_arg(args, uint8*);
|
|
tableLoopCount = va_arg(args, int);
|
|
if (!tableLoopCount)
|
|
flags &= 0xFFFFFEFF;
|
|
}
|
|
|
|
if (flags & 0x1000) {
|
|
table3 = va_arg(args, uint8*);
|
|
table4 = va_arg(args, uint8*);
|
|
}
|
|
|
|
if (flags & 0x200) {
|
|
drawShapeVar1 += 1;
|
|
drawShapeVar1 &= 7;
|
|
drawShapeVar3 = drawShapeVar2[drawShapeVar1];
|
|
drawShapeVar4 = 0;
|
|
drawShapeVar5 = 256;
|
|
}
|
|
|
|
if (flags & 0x4000) {
|
|
drawShapeVar5 = va_arg(args, int);
|
|
}
|
|
|
|
if (flags & 0x800) {
|
|
drawLayer = va_arg(args, int);
|
|
}
|
|
|
|
int scale_w, scale_h;
|
|
if (flags & DSF_SCALE) {
|
|
scale_w = va_arg(args, int);
|
|
scale_h = va_arg(args, int);
|
|
} else {
|
|
scale_w = 0x100;
|
|
scale_h = 0x100;
|
|
}
|
|
|
|
int ppc = (flags >> 8) & 0x3F;
|
|
|
|
const uint8 *src = shapeData;
|
|
if (_vm->gameFlags().useAltShapeHeader)
|
|
src += 2;
|
|
|
|
uint16 shapeFlags = READ_LE_UINT16(src); src += 2;
|
|
|
|
int shapeHeight = *src++;
|
|
int scaledShapeHeight = (shapeHeight * scale_h) >> 8;
|
|
if (scaledShapeHeight == 0) {
|
|
va_end(args);
|
|
return;
|
|
}
|
|
|
|
int shapeWidth = READ_LE_UINT16(src); src += 2;
|
|
int scaledShapeWidth = (shapeWidth * scale_w) >> 8;
|
|
if (scaledShapeWidth == 0) {
|
|
va_end(args);
|
|
return;
|
|
}
|
|
|
|
if (flags & DSF_CENTER) {
|
|
x -= scaledShapeWidth >> 1;
|
|
y -= scaledShapeHeight >> 1;
|
|
}
|
|
|
|
src += 3;
|
|
|
|
uint16 frameSize = READ_LE_UINT16(src); src += 2;
|
|
if ((shapeFlags & 1) || (flags & 0x400))
|
|
src += 0x10;
|
|
|
|
if (!(shapeFlags & 2)) {
|
|
decodeFrame4(src, _animBlockPtr, frameSize);
|
|
src = _animBlockPtr;
|
|
}
|
|
|
|
int shapeSize = shapeWidth * shapeHeight;
|
|
if (_decodeShapeBufferSize < shapeSize) {
|
|
delete [] _decodeShapeBuffer;
|
|
_decodeShapeBuffer = new uint8[shapeSize];
|
|
_decodeShapeBufferSize = shapeSize;
|
|
}
|
|
|
|
if (!_decodeShapeBuffer) {
|
|
_decodeShapeBufferSize = 0;
|
|
va_end(args);
|
|
return;
|
|
}
|
|
memset(_decodeShapeBuffer, 0, _decodeShapeBufferSize);
|
|
uint8 *decodedShapeFrame = _decodeShapeBuffer;
|
|
|
|
// only used if shapeFlag & 1 is NOT zero
|
|
const uint8 *colorTable = shapeData + 10;
|
|
if (_vm->gameFlags().useAltShapeHeader)
|
|
colorTable += 2;
|
|
|
|
for (int j = 0; j < shapeHeight; ++j) {
|
|
uint8 *dsbNextLine = decodedShapeFrame + shapeWidth;
|
|
int count = shapeWidth;
|
|
while (count > 0) {
|
|
uint8 code = *src++;
|
|
if (code != 0) {
|
|
// this is guessed
|
|
if (shapeFlags & 1) {
|
|
if (code < 16)
|
|
*decodedShapeFrame++ = colorTable[code];
|
|
} else {
|
|
*decodedShapeFrame++ = code;
|
|
}
|
|
--count;
|
|
} else {
|
|
code = *src++;
|
|
decodedShapeFrame += code;
|
|
count -= code;
|
|
}
|
|
}
|
|
decodedShapeFrame = dsbNextLine;
|
|
}
|
|
|
|
uint16 sx1 = _screenDimTable[sd].sx * 8;
|
|
uint16 sy1 = _screenDimTable[sd].sy;
|
|
uint16 sx2 = sx1 + _screenDimTable[sd].w * 8;
|
|
uint16 sy2 = sy1 + _screenDimTable[sd].h;
|
|
if (flags & DSF_WND_COORDS) {
|
|
x += sx1;
|
|
y += sy1;
|
|
}
|
|
|
|
int x1, x2;
|
|
if (x >= 0) {
|
|
x1 = 0;
|
|
if (x + scaledShapeWidth < sx2)
|
|
x2 = scaledShapeWidth;
|
|
else
|
|
x2 = sx2 - x;
|
|
} else {
|
|
x2 = scaledShapeWidth;
|
|
x1 = -x;
|
|
x = 0;
|
|
if (x2 > sx2)
|
|
x2 = sx2;
|
|
}
|
|
|
|
int y1, y2;
|
|
if (y >= 0) {
|
|
y1 = 0;
|
|
if (y + scaledShapeHeight < sy2)
|
|
y2 = scaledShapeHeight;
|
|
else
|
|
y2 = sy2 - y;
|
|
} else {
|
|
y2 = scaledShapeHeight;
|
|
y1 = -y;
|
|
y = 0;
|
|
if (y2 > sy2)
|
|
y2 = sy2;
|
|
}
|
|
|
|
uint8 *dst = getPagePtr(pageNum) + y * SCREEN_W + x;
|
|
uint8 *dstStart = getPagePtr(pageNum);
|
|
if (pageNum == 0 || pageNum == 1)
|
|
addDirtyRect(x, y, x2-x1, y2-y1);
|
|
clearOverlayRect(pageNum, x, y, x2-x1, y2-y1);
|
|
|
|
int scaleYTable[SCREEN_H];
|
|
assert(y1 >= 0 && y2 < SCREEN_H);
|
|
for (y = y1; y < y2; ++y)
|
|
scaleYTable[y] = (y << 8) / scale_h;
|
|
|
|
int scaleXTable[SCREEN_W];
|
|
assert(x1 >= 0 && x2 < SCREEN_W);
|
|
for (x = x1; x < x2; ++x)
|
|
scaleXTable[x] = (x << 8) / scale_w;
|
|
|
|
const uint8 *shapeBuffer = _decodeShapeBuffer;
|
|
if (flags & DSF_Y_FLIPPED)
|
|
shapeBuffer += shapeWidth * (shapeHeight - 1);
|
|
if (flags & DSF_X_FLIPPED)
|
|
shapeBuffer += shapeWidth - 1;
|
|
|
|
for (y = y1; y < y2; ++y) {
|
|
uint8 *dstNextLine = dst + SCREEN_W;
|
|
int j = scaleYTable[y];
|
|
if (flags & DSF_Y_FLIPPED)
|
|
j = -j;
|
|
|
|
for (x = x1; x < x2; ++x) {
|
|
int xpos = scaleXTable[x];
|
|
if (flags & DSF_X_FLIPPED)
|
|
xpos = -xpos;
|
|
|
|
uint8 color = shapeBuffer[j * shapeWidth + xpos];
|
|
if (color != 0) {
|
|
switch (ppc) {
|
|
case 0:
|
|
*dst = color;
|
|
break;
|
|
|
|
case 1:
|
|
for (int i = 0; i < tableLoopCount; ++i)
|
|
color = table[color];
|
|
break;
|
|
|
|
case 2: {
|
|
int temp = drawShapeVar4 + drawShapeVar5;
|
|
if (temp & 0xFF00) {
|
|
drawShapeVar4 = temp & 0xFF;
|
|
dst += drawShapeVar3;
|
|
color = *dst;
|
|
dst -= drawShapeVar3;
|
|
} else {
|
|
drawShapeVar4 = temp;
|
|
}
|
|
}
|
|
break;
|
|
|
|
case 7:
|
|
case 3:
|
|
color = *dst;
|
|
for (int i = 0; i < tableLoopCount; ++i)
|
|
color = table[color];
|
|
break;
|
|
|
|
case 4:
|
|
color = table2[color];
|
|
break;
|
|
|
|
case 5:
|
|
color = table2[color];
|
|
for (int i = 0; i < tableLoopCount; ++i)
|
|
color = table[color];
|
|
break;
|
|
|
|
case 6: {
|
|
int temp = drawShapeVar4 + drawShapeVar5;
|
|
if (temp & 0xFF00) {
|
|
drawShapeVar4 = temp & 0xFF;
|
|
dst += drawShapeVar3;
|
|
color = *dst;
|
|
dst -= drawShapeVar3;
|
|
} else {
|
|
drawShapeVar4 = temp;
|
|
color = table2[color];
|
|
}
|
|
}
|
|
break;
|
|
|
|
case 8: {
|
|
int offset = dst - dstStart;
|
|
uint8 pixel = *(_shapePages[0] + offset);
|
|
pixel &= 0x7F;
|
|
pixel &= 0x87;
|
|
if (drawLayer < pixel)
|
|
color = *(_shapePages[1] + offset);
|
|
}
|
|
break;
|
|
|
|
case 9: {
|
|
int offset = dst - dstStart;
|
|
uint8 pixel = *(_shapePages[0] + offset);
|
|
pixel &= 0x7F;
|
|
pixel &= 0x87;
|
|
|
|
if (drawLayer < pixel) {
|
|
color = *(_shapePages[1] + offset);
|
|
} else {
|
|
for (int i = 0; i < tableLoopCount; ++i)
|
|
color = table[color];
|
|
}
|
|
}
|
|
break;
|
|
|
|
case 10: {
|
|
int offset = dst - dstStart;
|
|
uint8 pixel = *(_shapePages[0] + offset);
|
|
pixel &= 0x7F;
|
|
pixel &= 0x87;
|
|
if (drawLayer < pixel) {
|
|
color = *(_shapePages[1] + offset);
|
|
drawShapeVar4 = pixel;
|
|
} else {
|
|
int temp = drawShapeVar4 + drawShapeVar5;
|
|
if (temp & 0xFF00) {
|
|
dst += drawShapeVar3;
|
|
color = *dst;
|
|
dst -= drawShapeVar3;
|
|
}
|
|
drawShapeVar4 = temp & 0xFF;
|
|
}
|
|
}
|
|
break;
|
|
|
|
case 15:
|
|
case 11: {
|
|
int offset = dst - dstStart;
|
|
uint8 pixel = *(_shapePages[0] + offset);
|
|
pixel &= 0x7F;
|
|
pixel &= 0x87;
|
|
if (drawLayer < pixel) {
|
|
color = *(_shapePages[1] + offset);
|
|
} else {
|
|
color = *dst;
|
|
for (int i = 0; i < tableLoopCount; ++i)
|
|
color = table[color];
|
|
}
|
|
}
|
|
break;
|
|
|
|
case 12: {
|
|
int offset = dst - dstStart;
|
|
uint8 pixel = *(_shapePages[0] + offset);
|
|
pixel &= 0x7F;
|
|
pixel &= 0x87;
|
|
if (drawLayer < pixel) {
|
|
color = *(_shapePages[1] + offset);
|
|
} else {
|
|
color = table2[color];
|
|
}
|
|
}
|
|
break;
|
|
|
|
case 13: {
|
|
int offset = dst - dstStart;
|
|
uint8 pixel = *(_shapePages[0] + offset);
|
|
pixel &= 0x7F;
|
|
pixel &= 0x87;
|
|
if (drawLayer < pixel) {
|
|
color = *(_shapePages[1] + offset);
|
|
} else {
|
|
color = table2[color];
|
|
for (int i = 0; i < tableLoopCount; ++i)
|
|
color = table[color];
|
|
}
|
|
}
|
|
break;
|
|
|
|
case 14: {
|
|
int offset = dst - dstStart;
|
|
uint8 pixel = *(_shapePages[0] + offset);
|
|
pixel &= 0x7F;
|
|
pixel &= 0x87;
|
|
if (drawLayer < pixel) {
|
|
color = *(_shapePages[1] + offset);
|
|
drawShapeVar4 = pixel;
|
|
} else {
|
|
int temp = drawShapeVar4 + drawShapeVar5;
|
|
if (temp & 0xFF00) {
|
|
dst += drawShapeVar3;
|
|
color = *dst;
|
|
dst -= drawShapeVar3;
|
|
drawShapeVar4 = temp % 0xFF;
|
|
} else {
|
|
drawShapeVar4 = temp;
|
|
color = table2[color];
|
|
}
|
|
}
|
|
}
|
|
break;
|
|
|
|
case 16: {
|
|
uint8 newColor = table3[color];
|
|
if (!(newColor & 0x80)) {
|
|
color = *dst;
|
|
color = table4[color + (newColor << 8)];
|
|
}
|
|
}
|
|
break;
|
|
|
|
case 17: {
|
|
for (int i = 0; i < tableLoopCount; ++i)
|
|
color = table[color];
|
|
|
|
uint8 newColor = table3[color];
|
|
if (!(newColor & 0x80)) {
|
|
color = *dst;
|
|
color = table4[color + (newColor << 8)];
|
|
}
|
|
}
|
|
break;
|
|
|
|
case 18: {
|
|
int temp = drawShapeVar4 + drawShapeVar5;
|
|
if (temp & 0xFF00) {
|
|
drawShapeVar4 = temp & 0xFF;
|
|
dst += drawShapeVar3;
|
|
color = *dst;
|
|
dst -= drawShapeVar3;
|
|
uint8 newColor = table3[color];
|
|
if (!(newColor & 0x80)) {
|
|
color = *dst;
|
|
color = table4[color + (newColor << 8)];
|
|
}
|
|
} else {
|
|
drawShapeVar4 = temp;
|
|
}
|
|
}
|
|
break;
|
|
|
|
case 23:
|
|
case 19: {
|
|
color = *dst;
|
|
for (int i = 0; i < tableLoopCount; ++i)
|
|
color = table[color];
|
|
|
|
uint8 newColor = table3[color];
|
|
if (!(newColor & 0x80)) {
|
|
color = *dst;
|
|
color = table4[color + (newColor << 8)];
|
|
}
|
|
}
|
|
break;
|
|
|
|
case 20: {
|
|
color = table2[color];
|
|
uint8 newColor = table3[color];
|
|
if (!(newColor & 0x80)) {
|
|
color = *dst;
|
|
color = table4[color + (newColor << 8)];
|
|
}
|
|
}
|
|
break;
|
|
|
|
case 21: {
|
|
color = table2[color];
|
|
for (int i = 0; i < tableLoopCount; ++i)
|
|
color = table[color];
|
|
|
|
uint8 newColor = table3[color];
|
|
if (!(newColor & 0x80)) {
|
|
color = *dst;
|
|
color = table4[color + (newColor << 8)];
|
|
}
|
|
}
|
|
break;
|
|
|
|
case 22: {
|
|
int temp = drawShapeVar4 + drawShapeVar5;
|
|
if (temp & 0xFF00) {
|
|
drawShapeVar4 = temp & 0xFF;
|
|
dst += drawShapeVar3;
|
|
color = *dst;
|
|
dst -= drawShapeVar3;
|
|
uint8 newColor = table3[color];
|
|
if (!(newColor & 0x80)) {
|
|
color = *dst;
|
|
color = table4[color + (newColor << 8)];
|
|
}
|
|
} else {
|
|
drawShapeVar4 = temp;
|
|
color = table2[color];
|
|
uint8 newColor = table3[color];
|
|
if (!(newColor & 0x80)) {
|
|
color = *dst;
|
|
color = table4[color + (newColor << 8)];
|
|
}
|
|
}
|
|
}
|
|
break;
|
|
|
|
case 24: {
|
|
int offset = dst - dstStart;
|
|
uint8 pixel = *(_shapePages[0] + offset);
|
|
pixel &= 0x7F;
|
|
pixel &= 0x87;
|
|
if (drawLayer < pixel)
|
|
color = *(_shapePages[1] + offset);
|
|
|
|
uint8 newColor = table3[color];
|
|
if (!(newColor & 0x80)) {
|
|
color = *dst;
|
|
color = table4[color + (newColor << 8)];
|
|
}
|
|
}
|
|
break;
|
|
|
|
default:
|
|
warning("unhandled ppc: %d", ppc);
|
|
break;
|
|
}
|
|
*dst = color;
|
|
}
|
|
++dst;
|
|
}
|
|
dst = dstNextLine;
|
|
}
|
|
va_end(args);
|
|
}
|
|
|
|
void Screen::decodeFrame3(const uint8 *src, uint8 *dst, uint32 size) {
|
|
debugC(9, kDebugLevelScreen, "Screen::decodeFrame3(%p, %p, %u)", (const void *)src, (const void *)dst, size);
|
|
const uint8 *dstEnd = dst + size;
|
|
while (dst < dstEnd) {
|
|
int8 code = *src++;
|
|
if (code == 0) {
|
|
uint16 sz = READ_BE_UINT16(src);
|
|
src += 2;
|
|
memset(dst, *src++, sz);
|
|
dst += sz;
|
|
} else if (code < 0) {
|
|
memset(dst, *src++, -code);
|
|
dst -= code;
|
|
} else {
|
|
memcpy(dst, src, code);
|
|
dst += code;
|
|
src += code;
|
|
}
|
|
}
|
|
}
|
|
|
|
uint Screen::decodeFrame4(const uint8 *src, uint8 *dst, uint32 dstSize) {
|
|
debugC(9, kDebugLevelScreen, "Screen::decodeFrame4(%p, %p, %u)", (const void *)src, (const void *)dst, dstSize);
|
|
uint8 *dstOrig = dst;
|
|
uint8 *dstEnd = dst + dstSize;
|
|
while (1) {
|
|
int count = dstEnd - dst;
|
|
if (count == 0)
|
|
break;
|
|
|
|
uint8 code = *src++;
|
|
if (!(code & 0x80)) { // 8th bit isn't set
|
|
int len = MIN(count, (code >> 4) + 3); //upper half of code is the length
|
|
int offs = ((code & 0xF) << 8) | *src++; //lower half of code as byte 2 of offset.
|
|
const uint8 *dstOffs = dst - offs;
|
|
while (len--)
|
|
*dst++ = *dstOffs++;
|
|
} else if (code & 0x40) { // 7th bit is set
|
|
int len = (code & 0x3F) + 3;
|
|
if (code == 0xFE) {
|
|
len = READ_LE_UINT16(src); src += 2;
|
|
if (len > count)
|
|
len = count;
|
|
|
|
memset(dst, *src++, len); dst += len;
|
|
} else {
|
|
if (code == 0xFF) {
|
|
len = READ_LE_UINT16(src);
|
|
src += 2;
|
|
}
|
|
|
|
int offs = READ_LE_UINT16(src); src += 2;
|
|
if (len > count)
|
|
len = count;
|
|
|
|
const uint8 *dstOffs = dstOrig + offs;
|
|
while (len--)
|
|
*dst++ = *dstOffs++;
|
|
}
|
|
} else if (code != 0x80) { // not just the 8th bit set.
|
|
//Copy some bytes from source to dest.
|
|
int len = MIN(count, code & 0x3F);
|
|
while (len--)
|
|
*dst++ = *src++;
|
|
} else {
|
|
break;
|
|
}
|
|
}
|
|
return dst - dstOrig;
|
|
}
|
|
|
|
void Screen::decodeFrameDelta(uint8 *dst, const uint8 *src, bool noXor) {
|
|
debugC(9, kDebugLevelScreen, "Screen::decodeFrameDelta(%p, %p, %d)", (const void *)dst, (const void *)src, noXor);
|
|
if (noXor)
|
|
wrapped_decodeFrameDelta<true>(dst, src);
|
|
else
|
|
wrapped_decodeFrameDelta<false>(dst, src);
|
|
}
|
|
|
|
template <bool noXor>
|
|
void Screen::wrapped_decodeFrameDelta(uint8 *dst, const uint8 *src) {
|
|
while (1) {
|
|
uint8 code = *src++;
|
|
if (code == 0) {
|
|
uint8 len = *src++;
|
|
code = *src++;
|
|
while (len--) {
|
|
if (noXor)
|
|
*dst++ = code;
|
|
else
|
|
*dst++ ^= code;
|
|
}
|
|
} else if (code & 0x80) {
|
|
code -= 0x80;
|
|
if (code != 0) {
|
|
dst += code;
|
|
} else {
|
|
uint16 subcode = READ_LE_UINT16(src); src += 2;
|
|
if (subcode == 0) {
|
|
break;
|
|
} else if (subcode & 0x8000) {
|
|
subcode -= 0x8000;
|
|
if (subcode & 0x4000) {
|
|
uint16 len = subcode - 0x4000;
|
|
code = *src++;
|
|
while (len--) {
|
|
if (noXor)
|
|
*dst++ = code;
|
|
else
|
|
*dst++ ^= code;
|
|
}
|
|
} else {
|
|
while (subcode--) {
|
|
if (noXor)
|
|
*dst++ = *src++;
|
|
else
|
|
*dst++ ^= *src++;
|
|
}
|
|
}
|
|
} else {
|
|
dst += subcode;
|
|
}
|
|
}
|
|
} else {
|
|
while (code--) {
|
|
if (noXor)
|
|
*dst++ = *src++;
|
|
else
|
|
*dst++ ^= *src++;
|
|
}
|
|
}
|
|
}
|
|
}
|
|
|
|
void Screen::decodeFrameDeltaPage(uint8 *dst, const uint8 *src, int pitch, bool noXor) {
|
|
debugC(9, kDebugLevelScreen, "Screen::decodeFrameDeltaPage(%p, %p, %d, %d)", (const void *)dst, (const void *)src, pitch, noXor);
|
|
|
|
if (noXor) {
|
|
wrapped_decodeFrameDeltaPage<true>(dst, src, pitch);
|
|
} else {
|
|
wrapped_decodeFrameDeltaPage<false>(dst, src, pitch);
|
|
}
|
|
}
|
|
|
|
void Screen::convertAmigaGfx(uint8 *data, int w, int h, bool offscreen) {
|
|
static uint8 tmp[320*200];
|
|
|
|
if (offscreen) {
|
|
uint8 *curLine = tmp;
|
|
const uint8 *src = data;
|
|
int hC = h;
|
|
while (hC--) {
|
|
uint8 *dst1 = curLine;
|
|
uint8 *dst2 = dst1 + 8000;
|
|
uint8 *dst3 = dst2 + 8000;
|
|
uint8 *dst4 = dst3 + 8000;
|
|
uint8 *dst5 = dst4 + 8000;
|
|
|
|
int width = w >> 3;
|
|
while (width--) {
|
|
*dst1++ = *src++;
|
|
*dst2++ = *src++;
|
|
*dst3++ = *src++;
|
|
*dst4++ = *src++;
|
|
*dst5++ = *src++;
|
|
}
|
|
|
|
curLine += 40;
|
|
}
|
|
} else {
|
|
memcpy(tmp, data, w*h);
|
|
}
|
|
|
|
for (int y = 0; y < h; ++y) {
|
|
for (int x = 0; x < w; ++x) {
|
|
int bytePos = x/8+y*40;
|
|
int bitPos = 7-x&7;
|
|
|
|
byte colorIndex = 0;
|
|
colorIndex |= (((tmp[bytePos + 8000 * 0] & (1 << bitPos)) >> bitPos) & 0x1) << 0;
|
|
colorIndex |= (((tmp[bytePos + 8000 * 1] & (1 << bitPos)) >> bitPos) & 0x1) << 1;
|
|
colorIndex |= (((tmp[bytePos + 8000 * 2] & (1 << bitPos)) >> bitPos) & 0x1) << 2;
|
|
colorIndex |= (((tmp[bytePos + 8000 * 3] & (1 << bitPos)) >> bitPos) & 0x1) << 3;
|
|
colorIndex |= (((tmp[bytePos + 8000 * 4] & (1 << bitPos)) >> bitPos) & 0x1) << 4;
|
|
*data++ = colorIndex;
|
|
}
|
|
}
|
|
}
|
|
|
|
void Screen::convertAmigaMsc(uint8 *data) {
|
|
byte *plane1 = data + 5760 * 1;
|
|
byte *plane2 = data + 5760 * 2;
|
|
byte *plane3 = data + 5760 * 3;
|
|
byte *plane4 = data + 5760 * 4;
|
|
byte *plane5 = data + 5760 * 5;
|
|
byte *plane6 = data + 5760 * 6;
|
|
for (int i = 0; i < 5760; ++i) {
|
|
byte d = plane6[i];
|
|
d = (plane5[i] |= d);
|
|
d = (plane4[i] |= d);
|
|
d = (plane3[i] |= d);
|
|
d = (plane2[i] |= d);
|
|
d = (plane1[i] |= d);
|
|
}
|
|
byte dst[320*144];
|
|
memset(dst, 0, sizeof(dst));
|
|
static const byte flagTable[] = { 0x80, 0x40, 0x20, 0x10, 0x08, 0x04, 0x02, 0x01 };
|
|
for (int y = 0; y < 144; ++y) {
|
|
for (int x = 0; x < 320; ++x) {
|
|
if (!(flagTable[x&7] & data[y*40+(x>>3)]))
|
|
dst[y*320+x] |= 0x80;
|
|
|
|
int layer = 0;
|
|
for (int i = 0; i < 7; ++i) {
|
|
if (flagTable[x&7] & data[y*40+(x>>3)+i*5760])
|
|
layer = i;
|
|
}
|
|
|
|
if (layer)
|
|
dst[y*320+x] |= (layer+1);
|
|
}
|
|
}
|
|
memcpy(data, dst, 320*144);
|
|
}
|
|
|
|
template<bool noXor>
|
|
void Screen::wrapped_decodeFrameDeltaPage(uint8 *dst, const uint8 *src, int pitch) {
|
|
int count = 0;
|
|
uint8 *dstNext = dst;
|
|
while (1) {
|
|
uint8 code = *src++;
|
|
if (code == 0) {
|
|
uint8 len = *src++;
|
|
code = *src++;
|
|
while (len--) {
|
|
if (noXor)
|
|
*dst++ = code;
|
|
else
|
|
*dst++ ^= code;
|
|
|
|
if (++count == pitch) {
|
|
count = 0;
|
|
dstNext += SCREEN_W;
|
|
dst = dstNext;
|
|
}
|
|
}
|
|
} else if (code & 0x80) {
|
|
code -= 0x80;
|
|
if (code != 0) {
|
|
dst += code;
|
|
|
|
count += code;
|
|
while (count >= pitch) {
|
|
count -= pitch;
|
|
dstNext += SCREEN_W;
|
|
dst = dstNext + count;
|
|
}
|
|
} else {
|
|
uint16 subcode = READ_LE_UINT16(src); src += 2;
|
|
if (subcode == 0) {
|
|
break;
|
|
} else if (subcode & 0x8000) {
|
|
subcode -= 0x8000;
|
|
if (subcode & 0x4000) {
|
|
uint16 len = subcode - 0x4000;
|
|
code = *src++;
|
|
while (len--) {
|
|
if (noXor)
|
|
*dst++ = code;
|
|
else
|
|
*dst++ ^= code;
|
|
|
|
if (++count == pitch) {
|
|
count = 0;
|
|
dstNext += SCREEN_W;
|
|
dst = dstNext;
|
|
}
|
|
}
|
|
} else {
|
|
while (subcode--) {
|
|
if (noXor)
|
|
*dst++ = *src++;
|
|
else
|
|
*dst++ ^= *src++;
|
|
|
|
if (++count == pitch) {
|
|
count = 0;
|
|
dstNext += SCREEN_W;
|
|
dst = dstNext;
|
|
}
|
|
}
|
|
}
|
|
} else {
|
|
dst += subcode;
|
|
|
|
count += subcode;
|
|
while (count >= pitch) {
|
|
count -= pitch;
|
|
dstNext += SCREEN_W;
|
|
dst = dstNext + count;
|
|
}
|
|
|
|
}
|
|
}
|
|
} else {
|
|
while (code--) {
|
|
if (noXor)
|
|
*dst++ = *src++;
|
|
else
|
|
*dst++ ^= *src++;
|
|
|
|
if (++count == pitch) {
|
|
count = 0;
|
|
dstNext += SCREEN_W;
|
|
dst = dstNext;
|
|
}
|
|
}
|
|
}
|
|
}
|
|
}
|
|
|
|
uint8 *Screen::encodeShape(int x, int y, int w, int h, int flags) {
|
|
debugC(9, kDebugLevelScreen, "Screen::encodeShape(%d, %d, %d, %d, %d)", x, y, w, h, flags);
|
|
uint8 *srcPtr = &_pagePtrs[_curPage][y * SCREEN_W + x];
|
|
int16 shapeSize = 0;
|
|
uint8 *tmp = srcPtr;
|
|
int xpos = w;
|
|
|
|
for (int i = h; i > 0; --i) {
|
|
uint8 *start = tmp;
|
|
shapeSize += w;
|
|
xpos = w;
|
|
while (xpos) {
|
|
uint8 value = *tmp++;
|
|
--xpos;
|
|
|
|
if (!value) {
|
|
shapeSize += 2;
|
|
int16 curX = xpos;
|
|
bool skip = false;
|
|
|
|
while (xpos) {
|
|
value = *tmp++;
|
|
--xpos;
|
|
|
|
if (value) {
|
|
skip = true;
|
|
break;
|
|
}
|
|
}
|
|
|
|
if (!skip)
|
|
++curX;
|
|
|
|
curX -= xpos;
|
|
shapeSize -= curX;
|
|
|
|
while (curX > 0xFF) {
|
|
curX -= 0xFF;
|
|
shapeSize += 2;
|
|
}
|
|
}
|
|
}
|
|
|
|
tmp = start + SCREEN_W;
|
|
}
|
|
|
|
int16 shapeSize2 = shapeSize;
|
|
if (_vm->gameFlags().useAltShapeHeader)
|
|
shapeSize += 12;
|
|
else
|
|
shapeSize += 10;
|
|
|
|
if (flags & 1)
|
|
shapeSize += 16;
|
|
|
|
static uint8 table[274];
|
|
int tableIndex = 0;
|
|
|
|
uint8 *newShape = 0;
|
|
newShape = new uint8[shapeSize+16];
|
|
assert(newShape);
|
|
|
|
byte *dst = newShape;
|
|
|
|
if (_vm->gameFlags().useAltShapeHeader)
|
|
dst += 2;
|
|
|
|
WRITE_LE_UINT16(dst, (flags & 3)); dst += 2;
|
|
*dst = h; dst += 1;
|
|
WRITE_LE_UINT16(dst, w); dst += 2;
|
|
*dst = h; dst += 1;
|
|
WRITE_LE_UINT16(dst, shapeSize); dst += 2;
|
|
WRITE_LE_UINT16(dst, shapeSize2); dst += 2;
|
|
|
|
byte *src = srcPtr;
|
|
if (flags & 1) {
|
|
dst += 16;
|
|
memset(table, 0, sizeof(uint8)*274);
|
|
tableIndex = 1;
|
|
}
|
|
|
|
for (int ypos = h; ypos > 0; --ypos) {
|
|
uint8 *srcBackUp = src;
|
|
xpos = w;
|
|
while (xpos) {
|
|
uint8 value = *src++;
|
|
if (value) {
|
|
if (flags & 1) {
|
|
if (!table[value]) {
|
|
if (tableIndex == 16) {
|
|
value = 1;
|
|
} else {
|
|
table[0x100+tableIndex] = value;
|
|
table[value] = tableIndex;
|
|
++tableIndex;
|
|
value = table[value];
|
|
}
|
|
} else {
|
|
value = table[value];
|
|
}
|
|
}
|
|
--xpos;
|
|
*dst++ = value;
|
|
} else {
|
|
int16 temp = 1;
|
|
--xpos;
|
|
|
|
while (xpos) {
|
|
if (*src)
|
|
break;
|
|
++src;
|
|
++temp;
|
|
--xpos;
|
|
}
|
|
|
|
while (temp > 0xFF) {
|
|
*dst++ = 0;
|
|
*dst++ = 0xFF;
|
|
temp -= 0xFF;
|
|
}
|
|
|
|
if (temp & 0xFF) {
|
|
*dst++ = 0;
|
|
*dst++ = temp & 0xFF;
|
|
}
|
|
}
|
|
}
|
|
src = srcBackUp + SCREEN_W;
|
|
}
|
|
|
|
if (!(flags & 2)) {
|
|
if (shapeSize > _animBlockSize) {
|
|
dst = newShape;
|
|
if (_vm->gameFlags().useAltShapeHeader)
|
|
dst += 2;
|
|
|
|
flags = READ_LE_UINT16(dst);
|
|
flags |= 2;
|
|
WRITE_LE_UINT16(dst, flags);
|
|
} else {
|
|
src = newShape;
|
|
if (_vm->gameFlags().useAltShapeHeader)
|
|
src += 2;
|
|
if (flags & 1)
|
|
src += 16;
|
|
|
|
src += 10;
|
|
uint8 *shapePtrBackUp = src;
|
|
dst = _animBlockPtr;
|
|
memcpy(dst, src, shapeSize2);
|
|
|
|
int16 size = encodeShapeAndCalculateSize(_animBlockPtr, shapePtrBackUp, shapeSize2);
|
|
if (size > shapeSize2) {
|
|
shapeSize -= shapeSize2 - size;
|
|
uint8 *newShape2 = new uint8[shapeSize];
|
|
assert(newShape2);
|
|
memcpy(newShape2, newShape, shapeSize);
|
|
delete [] newShape;
|
|
newShape = newShape2;
|
|
} else {
|
|
dst = shapePtrBackUp;
|
|
src = _animBlockPtr;
|
|
memcpy(dst, src, shapeSize2);
|
|
dst = newShape;
|
|
flags = READ_LE_UINT16(dst);
|
|
flags |= 2;
|
|
WRITE_LE_UINT16(dst, flags);
|
|
}
|
|
}
|
|
}
|
|
|
|
dst = newShape;
|
|
if (_vm->gameFlags().useAltShapeHeader)
|
|
dst += 2;
|
|
WRITE_LE_UINT16((dst + 6), shapeSize);
|
|
|
|
if (flags & 1) {
|
|
dst = newShape + 10;
|
|
if (_vm->gameFlags().useAltShapeHeader)
|
|
dst += 2;
|
|
src = &table[0x100];
|
|
memcpy(dst, src, sizeof(uint8)*16);
|
|
}
|
|
|
|
return newShape;
|
|
}
|
|
|
|
int16 Screen::encodeShapeAndCalculateSize(uint8 *from, uint8 *to, int size_to) {
|
|
debugC(9, kDebugLevelScreen, "Screen::encodeShapeAndCalculateSize(%p, %p, %d)", (const void *)from, (const void *)to, size_to);
|
|
byte *fromPtrEnd = from + size_to;
|
|
bool skipPixel = true;
|
|
byte *tempPtr = 0;
|
|
byte *toPtr = to;
|
|
byte *fromPtr = from;
|
|
byte *toPtr2 = to;
|
|
|
|
*to++ = 0x81;
|
|
*to++ = *from++;
|
|
|
|
while (from < fromPtrEnd) {
|
|
byte *curToPtr = to;
|
|
to = fromPtr;
|
|
int size = 1;
|
|
|
|
while (true) {
|
|
byte curPixel = *from;
|
|
if (curPixel == *(from+0x40)) {
|
|
byte *toBackUp = to;
|
|
to = from;
|
|
|
|
for (int i = 0; i < (fromPtrEnd - from); ++i) {
|
|
if (*to++ != curPixel)
|
|
break;
|
|
}
|
|
--to;
|
|
uint16 diffSize = (to - from);
|
|
if (diffSize >= 0x41) {
|
|
skipPixel = false;
|
|
from = to;
|
|
to = curToPtr;
|
|
*to++ = 0xFE;
|
|
WRITE_LE_UINT16(to, diffSize); to += 2;
|
|
*to++ = (size >> 8) & 0xFF;
|
|
curToPtr = to;
|
|
to = toBackUp;
|
|
continue;
|
|
} else {
|
|
to = toBackUp;
|
|
}
|
|
}
|
|
|
|
bool breakLoop = false;
|
|
while (true) {
|
|
if ((from - to) == 0) {
|
|
breakLoop = true;
|
|
break;
|
|
}
|
|
for (int i = 0; i < (from - to); ++i) {
|
|
if (*to++ == curPixel)
|
|
break;
|
|
}
|
|
if (*to == curPixel) {
|
|
if (*(from+size-1) == *(to+size-2))
|
|
break;
|
|
|
|
byte *fromBackUp = from;
|
|
byte *toBackUp = to;
|
|
--to;
|
|
for (int i = 0; i < (fromPtrEnd - from); ++i) {
|
|
if (*from++ != *to++)
|
|
break;
|
|
}
|
|
if (*(from - 1) == *(to - 1))
|
|
++to;
|
|
from = fromBackUp;
|
|
int temp = to - toBackUp;
|
|
to = toBackUp;
|
|
if (temp >= size) {
|
|
size = temp;
|
|
tempPtr = toBackUp - 1;
|
|
}
|
|
break;
|
|
} else {
|
|
breakLoop = true;
|
|
break;
|
|
}
|
|
}
|
|
|
|
if (breakLoop)
|
|
break;
|
|
}
|
|
|
|
to = curToPtr;
|
|
if (size > 2) {
|
|
uint16 word = 0;
|
|
if (size <= 0x0A) {
|
|
uint16 diffSize = from - tempPtr;
|
|
if (size <= 0x0FFF) {
|
|
byte highByte = ((diffSize & 0xFF00) >> 8) + (((size & 0xFF) - 3) << 4);
|
|
word = ((diffSize & 0xFF) << 8) | highByte;
|
|
WRITE_LE_UINT16(to, word); to += 2;
|
|
from += size;
|
|
skipPixel = false;
|
|
continue;
|
|
}
|
|
}
|
|
|
|
if (size > 0x40) {
|
|
*to++ = 0xFF;
|
|
WRITE_LE_UINT16(to, size); to += 2;
|
|
} else {
|
|
*to++ = ((size & 0xFF) - 3) | 0xC0;
|
|
}
|
|
|
|
word = tempPtr - fromPtr;
|
|
WRITE_LE_UINT16(to, word); to += 2;
|
|
from += size;
|
|
skipPixel = false;
|
|
} else {
|
|
if (!skipPixel) {
|
|
toPtr2 = to;
|
|
*to++ = 0x80;
|
|
}
|
|
|
|
if (*toPtr2 == 0xBF) {
|
|
toPtr2 = to;
|
|
*to++ = 0x80;
|
|
}
|
|
|
|
++(*toPtr2);
|
|
*to++ = *from++;
|
|
skipPixel = true;
|
|
}
|
|
}
|
|
*to++ = 0x80;
|
|
|
|
return (to - toPtr);
|
|
}
|
|
|
|
int Screen::getRectSize(int x, int y) {
|
|
if (x < 1)
|
|
x = 1;
|
|
else if (x > 40)
|
|
x = 40;
|
|
|
|
if (y < 1)
|
|
y = 1;
|
|
else if (y > 200)
|
|
y = 200;
|
|
|
|
return ((x*y) << 3);
|
|
}
|
|
|
|
void Screen::hideMouse() {
|
|
debugC(9, kDebugLevelScreen, "Screen::hideMouse()");
|
|
++_mouseLockCount;
|
|
CursorMan.showMouse(false);
|
|
}
|
|
|
|
void Screen::showMouse() {
|
|
debugC(9, kDebugLevelScreen, "Screen::showMouse()");
|
|
|
|
if (_mouseLockCount == 1)
|
|
CursorMan.showMouse(true);
|
|
|
|
if (_mouseLockCount > 0)
|
|
_mouseLockCount--;
|
|
}
|
|
|
|
void Screen::setShapePages(int page1, int page2) {
|
|
debugC(9, kDebugLevelScreen, "Screen::setShapePages(%d, %d)", page1, page2);
|
|
_shapePages[0] = _pagePtrs[page1];
|
|
_shapePages[1] = _pagePtrs[page2];
|
|
}
|
|
|
|
void Screen::setMouseCursor(int x, int y, byte *shape) {
|
|
debugC(9, kDebugLevelScreen, "Screen::setMouseCursor(%d, %d, %p)", x, y, (const void *)shape);
|
|
if (!shape)
|
|
return;
|
|
// if mouseDisabled
|
|
// return _mouseShape
|
|
|
|
if (_vm->gameFlags().useAltShapeHeader)
|
|
shape += 2;
|
|
|
|
int mouseHeight = *(shape + 2);
|
|
int mouseWidth = (READ_LE_UINT16(shape + 3)) + 2;
|
|
|
|
if (_vm->gameFlags().useAltShapeHeader)
|
|
shape -= 2;
|
|
|
|
if (_vm->gameFlags().useHiResOverlay) {
|
|
mouseWidth <<= 1;
|
|
mouseHeight <<= 1;
|
|
fillRect(mouseWidth, 0, mouseWidth, mouseHeight, 0, 8);
|
|
}
|
|
|
|
|
|
uint8 *cursor = new uint8[mouseHeight * mouseWidth];
|
|
fillRect(0, 0, mouseWidth, mouseHeight, 0, 8);
|
|
drawShape(8, shape, 0, 0, 0, 0);
|
|
|
|
int xOffset = 0;
|
|
|
|
if (_vm->gameFlags().useHiResOverlay) {
|
|
xOffset = mouseWidth;
|
|
scale2x(getPagePtr(8) + mouseWidth, SCREEN_W, getPagePtr(8), SCREEN_W, mouseWidth, mouseHeight);
|
|
}
|
|
|
|
CursorMan.showMouse(false);
|
|
copyRegionToBuffer(8, xOffset, 0, mouseWidth, mouseHeight, cursor);
|
|
CursorMan.replaceCursor(cursor, mouseWidth, mouseHeight, x, y, 0);
|
|
CursorMan.showMouse(true);
|
|
delete [] cursor;
|
|
|
|
// makes sure that the cursor is drawn
|
|
// we do not use Screen::updateScreen here
|
|
// so we can be sure that changes to page 0
|
|
// are NOT updated on the real screen here
|
|
_system->updateScreen();
|
|
}
|
|
|
|
void Screen::copyScreenFromRect(int x, int y, int w, int h, const uint8 *ptr) {
|
|
debugC(9, kDebugLevelScreen, "Screen::copyScreenFromRect(%d, %d, %d, %d, %p)", x, y, w, h, (const void *)ptr);
|
|
x <<= 3; w <<= 3;
|
|
const uint8 *src = ptr;
|
|
uint8 *dst = &_pagePtrs[0][y * SCREEN_W + x];
|
|
for (int i = 0; i < h; ++i) {
|
|
memcpy(dst, src, w);
|
|
src += w;
|
|
dst += SCREEN_W;
|
|
}
|
|
|
|
addDirtyRect(x, y, w, h);
|
|
clearOverlayRect(0, x, y, w, h);
|
|
}
|
|
|
|
void Screen::copyScreenToRect(int x, int y, int w, int h, uint8 *ptr) {
|
|
debugC(9, kDebugLevelScreen, "Screen::copyScreenToRect(%d, %d, %d, %d, %p)", x, y, w, h, (const void *)ptr);
|
|
x <<= 3; w <<= 3;
|
|
const uint8 *src = &_pagePtrs[0][y * SCREEN_W + x];
|
|
uint8 *dst = ptr;
|
|
for (int i = 0; i < h; ++i) {
|
|
memcpy(dst, src, w);
|
|
dst += w;
|
|
src += SCREEN_W;
|
|
}
|
|
}
|
|
|
|
uint8 *Screen::getPalette(int num) {
|
|
debugC(9, kDebugLevelScreen, "Screen::getPalette(%d)", num);
|
|
assert(num >= 0 && num < (_vm->gameFlags().platform == Common::kPlatformAmiga ? 6 : 4));
|
|
if (num == 0)
|
|
return _currentPalette;
|
|
|
|
return _palettes[num-1];
|
|
}
|
|
|
|
byte Screen::getShapeFlag1(int x, int y) {
|
|
debugC(9, kDebugLevelScreen, "Screen::getShapeFlag1(%d, %d)", x, y);
|
|
uint8 color = _shapePages[0][y * SCREEN_W + x];
|
|
color &= 0x80;
|
|
color ^= 0x80;
|
|
|
|
if (color & 0x80)
|
|
return 1;
|
|
return 0;
|
|
}
|
|
|
|
byte Screen::getShapeFlag2(int x, int y) {
|
|
debugC(9, kDebugLevelScreen, "Screen::getShapeFlag2(%d, %d)", x, y);
|
|
uint8 color = _shapePages[0][y * SCREEN_W + x];
|
|
color &= 0x7F;
|
|
color &= 0x87;
|
|
return color;
|
|
}
|
|
|
|
int Screen::setNewShapeHeight(uint8 *shape, int height) {
|
|
debugC(9, kDebugLevelScreen, "Screen::setNewShapeHeight(%p, %d)", (const void *)shape, height);
|
|
if (_vm->gameFlags().useAltShapeHeader)
|
|
shape += 2;
|
|
|
|
int oldHeight = shape[2];
|
|
shape[2] = height;
|
|
return oldHeight;
|
|
}
|
|
|
|
int Screen::resetShapeHeight(uint8 *shape) {
|
|
debugC(9, kDebugLevelScreen, "Screen::setNewShapeHeight(%p)", (const void *)shape);
|
|
if (_vm->gameFlags().useAltShapeHeader)
|
|
shape += 2;
|
|
|
|
int oldHeight = shape[2];
|
|
shape[2] = shape[5];
|
|
return oldHeight;
|
|
}
|
|
|
|
void Screen::addBitBlitRect(int x, int y, int w, int h) {
|
|
debugC(9, kDebugLevelScreen, "Screen::addBitBlitRects(%d, %d, %d, %d)", x, y, w, h);
|
|
if (_bitBlitNum >= BITBLIT_RECTS)
|
|
error("too many bit blit rects");
|
|
|
|
_bitBlitRects[_bitBlitNum].x = x;
|
|
_bitBlitRects[_bitBlitNum].y = y;
|
|
_bitBlitRects[_bitBlitNum].x2 = w;
|
|
_bitBlitRects[_bitBlitNum].y2 = h;
|
|
++_bitBlitNum;
|
|
}
|
|
|
|
void Screen::bitBlitRects() {
|
|
debugC(9, kDebugLevelScreen, "Screen::bitBlitRects()");
|
|
Rect *cur = _bitBlitRects;
|
|
while (_bitBlitNum) {
|
|
_bitBlitNum--;
|
|
copyRegion(cur->x, cur->y, cur->x, cur->y, cur->x2, cur->y2, 2, 0);
|
|
++cur;
|
|
}
|
|
}
|
|
|
|
void Screen::savePageToDisk(const char *file, int page) {
|
|
debugC(9, kDebugLevelScreen, "Screen::savePageToDisk('%s', %d)", file, page);
|
|
if (!_saveLoadPage[page/2]) {
|
|
_saveLoadPage[page/2] = new uint8[SCREEN_W * SCREEN_H];
|
|
assert(_saveLoadPage[page/2]);
|
|
}
|
|
memcpy(_saveLoadPage[page/2], getPagePtr(page), SCREEN_W * SCREEN_H);
|
|
|
|
if (_useOverlays) {
|
|
if (!_saveLoadPageOvl[page/2]) {
|
|
_saveLoadPageOvl[page/2] = new uint8[SCREEN_OVL_SJIS_SIZE];
|
|
assert(_saveLoadPageOvl[page/2]);
|
|
}
|
|
|
|
uint8 *srcPage = getOverlayPtr(page);
|
|
if (!srcPage) {
|
|
warning("trying to save unsupported overlay page %d", page);
|
|
return;
|
|
}
|
|
|
|
memcpy(_saveLoadPageOvl[page/2], srcPage, SCREEN_OVL_SJIS_SIZE);
|
|
}
|
|
}
|
|
|
|
void Screen::loadPageFromDisk(const char *file, int page) {
|
|
debugC(9, kDebugLevelScreen, "Screen::loadPageFromDisk('%s', %d)", file, page);
|
|
copyBlockToPage(page, 0, 0, SCREEN_W, SCREEN_H, _saveLoadPage[page/2]);
|
|
delete [] _saveLoadPage[page/2];
|
|
|
|
if (_saveLoadPageOvl[page/2]) {
|
|
uint8 *dstPage = getOverlayPtr(page);
|
|
if (!dstPage) {
|
|
warning("trying to restore unsupported overlay page %d", page);
|
|
return;
|
|
}
|
|
|
|
memcpy(dstPage, _saveLoadPageOvl[page/2], SCREEN_OVL_SJIS_SIZE);
|
|
delete [] _saveLoadPageOvl[page/2];
|
|
_saveLoadPageOvl[page/2] = 0;
|
|
} _saveLoadPage[page/2] = 0;
|
|
}
|
|
|
|
void Screen::deletePageFromDisk(int page) {
|
|
debugC(9, kDebugLevelScreen, "Screen::deletePageFromDisk(%d)", page);
|
|
delete [] _saveLoadPage[page/2];
|
|
_saveLoadPage[page/2] = 0;
|
|
|
|
if (_saveLoadPageOvl[page/2]) {
|
|
delete [] _saveLoadPageOvl[page/2];
|
|
_saveLoadPageOvl[page/2] = 0;
|
|
}
|
|
}
|
|
|
|
void Screen::blockInRegion(int x, int y, int width, int height) {
|
|
debugC(9, kDebugLevelScreen, "Screen::blockInRegion(%d, %d, %d, %d)", x, y, width, height);
|
|
assert(_shapePages[0]);
|
|
byte *toPtr = _shapePages[0] + (y * 320 + x);
|
|
for (int i = 0; i < height; ++i) {
|
|
byte *backUpTo = toPtr;
|
|
for (int i2 = 0; i2 < width; ++i2)
|
|
*toPtr++ &= 0x7F;
|
|
toPtr = (backUpTo + 320);
|
|
}
|
|
}
|
|
|
|
void Screen::blockOutRegion(int x, int y, int width, int height) {
|
|
debugC(9, kDebugLevelScreen, "Screen::blockOutRegion(%d, %d, %d, %d)", x, y, width, height);
|
|
assert(_shapePages[0]);
|
|
byte *toPtr = _shapePages[0] + (y * 320 + x);
|
|
for (int i = 0; i < height; ++i) {
|
|
byte *backUpTo = toPtr;
|
|
for (int i2 = 0; i2 < width; ++i2)
|
|
*toPtr++ |= 0x80;
|
|
toPtr = (backUpTo + 320);
|
|
}
|
|
}
|
|
|
|
void Screen::rectClip(int &x, int &y, int w, int h) {
|
|
if (x < 0)
|
|
x = 0;
|
|
else if (x + w >= 320)
|
|
x = 320 - w;
|
|
|
|
if (y < 0)
|
|
y = 0;
|
|
else if (y + h >= 200)
|
|
y = 200 - h;
|
|
}
|
|
|
|
int Screen::getDrawLayer(int x, int y) {
|
|
debugC(9, kDebugLevelScreen, "Screen::getDrawLayer(%d, %d)", x, y);
|
|
int xpos = x - 8;
|
|
int ypos = y - 1;
|
|
int layer = 1;
|
|
|
|
for (int curX = xpos; curX < xpos + 16; ++curX) {
|
|
int tempLayer = getShapeFlag2(curX, ypos);
|
|
|
|
if (layer < tempLayer)
|
|
layer = tempLayer;
|
|
|
|
if (layer >= 7)
|
|
return 7;
|
|
}
|
|
return layer;
|
|
}
|
|
|
|
int Screen::getDrawLayer2(int x, int y, int height) {
|
|
debugC(9, kDebugLevelScreen, "Screen::getDrawLayer2(%d, %d, %d)", x, y, height);
|
|
int xpos = x - 8;
|
|
int ypos = y - 1;
|
|
int layer = 1;
|
|
|
|
for (int useX = xpos; useX < xpos + 16; ++useX) {
|
|
for (int useY = ypos - height; useY < ypos; ++useY) {
|
|
int tempLayer = getShapeFlag2(useX, useY);
|
|
|
|
if (tempLayer > layer)
|
|
layer = tempLayer;
|
|
|
|
if (tempLayer >= 7)
|
|
return 7;
|
|
}
|
|
}
|
|
return layer;
|
|
}
|
|
|
|
void Screen::copyBackgroundBlock(int x, int page, int flag) {
|
|
debugC(9, kDebugLevelScreen, "Screen::copyBackgroundBlock(%d, %d, %d)", x, page, flag);
|
|
|
|
if (x < 1)
|
|
return;
|
|
|
|
int height = 128;
|
|
if (flag)
|
|
height += 8;
|
|
if (!(x & 1))
|
|
++x;
|
|
if (x == 19)
|
|
x = 17;
|
|
|
|
uint8 *ptr1 = _unkPtr1;
|
|
uint8 *ptr2 = _unkPtr2;
|
|
int oldVideoPage = _curPage;
|
|
_curPage = page;
|
|
|
|
int curX = x;
|
|
hideMouse();
|
|
copyRegionToBuffer(_curPage, 8, 8, 8, height, ptr2);
|
|
for (int i = 0; i < 19; ++i) {
|
|
int tempX = curX + 1;
|
|
copyRegionToBuffer(_curPage, tempX<<3, 8, 8, height, ptr1);
|
|
copyBlockToPage(_curPage, tempX<<3, 8, 8, height, ptr2);
|
|
int newXPos = curX + x;
|
|
if (newXPos > 37)
|
|
newXPos = newXPos % 38;
|
|
|
|
tempX = newXPos + 1;
|
|
copyRegionToBuffer(_curPage, tempX<<3, 8, 8, height, ptr2);
|
|
copyBlockToPage(_curPage, tempX<<3, 8, 8, height, ptr1);
|
|
curX += x*2;
|
|
if (curX > 37) {
|
|
curX = curX % 38;
|
|
}
|
|
}
|
|
showMouse();
|
|
_curPage = oldVideoPage;
|
|
}
|
|
|
|
void Screen::copyBackgroundBlock2(int x) {
|
|
copyBackgroundBlock(x, 4, 1);
|
|
}
|
|
|
|
void Screen::shakeScreen(int times) {
|
|
debugC(9, kDebugLevelScreen, "Screen::shakeScreen(%d)", times);
|
|
|
|
while (times--) {
|
|
// seems to be 1 line (320 pixels) offset in the original
|
|
// 4 looks more like dosbox though, maybe check this again
|
|
_system->setShakePos(4);
|
|
_system->updateScreen();
|
|
_system->setShakePos(0);
|
|
_system->updateScreen();
|
|
}
|
|
}
|
|
|
|
void Screen::loadBitmap(const char *filename, int tempPage, int dstPage, uint8 *palData) {
|
|
debugC(9, kDebugLevelScreen, "KyraEngine::loadBitmap('%s', %d, %d, %p)", filename, tempPage, dstPage, (void *)palData);
|
|
uint32 fileSize;
|
|
uint8 *srcData = _vm->resource()->fileData(filename, &fileSize);
|
|
|
|
if (!srcData) {
|
|
warning("couldn't load bitmap: '%s'", filename);
|
|
return;
|
|
}
|
|
|
|
const char *ext = filename + strlen(filename) - 3;
|
|
uint8 compType = srcData[2];
|
|
uint32 imgSize = scumm_stricmp(ext, "CMP") ? READ_LE_UINT32(srcData + 4) : READ_LE_UINT16(srcData);
|
|
uint16 palSize = READ_LE_UINT16(srcData + 8);
|
|
|
|
if (palData && palSize) {
|
|
debugC(9, kDebugLevelMain,"Loading a palette of size %i from %s", palSize, filename);
|
|
loadPalette(srcData + 10, palData, palSize);
|
|
}
|
|
|
|
uint8 *srcPtr = srcData + 10 + palSize;
|
|
uint8 *dstData = getPagePtr(dstPage);
|
|
if (dstPage == 0 || tempPage == 0)
|
|
_forceFullUpdate = true;
|
|
|
|
switch (compType) {
|
|
case 0:
|
|
memcpy(dstData, srcPtr, imgSize);
|
|
break;
|
|
case 3:
|
|
Screen::decodeFrame3(srcPtr, dstData, imgSize);
|
|
break;
|
|
case 4:
|
|
Screen::decodeFrame4(srcPtr, dstData, imgSize);
|
|
break;
|
|
default:
|
|
error("Unhandled bitmap compression %d", compType);
|
|
break;
|
|
}
|
|
|
|
if (_vm->gameFlags().platform == Common::kPlatformAmiga) {
|
|
if (!scumm_stricmp(ext, "MSC"))
|
|
Screen::convertAmigaMsc(dstData);
|
|
else
|
|
Screen::convertAmigaGfx(dstData, 320, 200, false);
|
|
}
|
|
|
|
delete [] srcData;
|
|
}
|
|
|
|
void Screen::loadPalette(const char *filename, uint8 *palData) {
|
|
debugC(9, kDebugLevelScreen, "Screen::loadPalette('%s' %p)", filename, (void *)palData);
|
|
uint32 fileSize = 0;
|
|
uint8 *srcData = _vm->resource()->fileData(filename, &fileSize);
|
|
|
|
if (palData && fileSize) {
|
|
debugC(9, kDebugLevelScreen,"Loading a palette of size %u from '%s'", fileSize, filename);
|
|
if (_vm->gameFlags().platform == Common::kPlatformAmiga) {
|
|
assert(fileSize % 2 == 0);
|
|
assert(fileSize / 2 <= 256);
|
|
fileSize >>= 1;
|
|
const uint16 *src = (const uint16 *)srcData;
|
|
for (uint i = 0; i < fileSize; ++i) {
|
|
uint16 col = READ_BE_UINT16(src); ++src;
|
|
palData[2] = (col & 0xF) << 2; col >>= 4;
|
|
palData[1] = (col & 0xF) << 2; col >>= 4;
|
|
palData[0] = (col & 0xF) << 2; col >>= 4;
|
|
palData += 3;
|
|
}
|
|
} else {
|
|
memcpy(palData, srcData, fileSize);
|
|
}
|
|
}
|
|
delete [] srcData;
|
|
}
|
|
|
|
void Screen::loadPalette(const byte *data, uint8 *palData, int bytes) {
|
|
debugC(9, kDebugLevelScreen, "Screen::loadPalette(%p, %p %d)", (const void *)data, (void *)palData, bytes);
|
|
if (_vm->gameFlags().platform == Common::kPlatformAmiga) {
|
|
assert(bytes % 2 == 0);
|
|
assert(bytes / 2 <= 256);
|
|
bytes >>= 1;
|
|
const uint16 *src = (const uint16 *)data;
|
|
for (int i = 0; i < bytes; ++i) {
|
|
uint16 col = READ_BE_UINT16(src); ++src;
|
|
palData[2] = (col & 0xF) << 2; col >>= 4;
|
|
palData[1] = (col & 0xF) << 2; col >>= 4;
|
|
palData[0] = (col & 0xF) << 2; col >>= 4;
|
|
palData += 3;
|
|
}
|
|
} else {
|
|
memcpy(palData, data, bytes);
|
|
}
|
|
}
|
|
|
|
// dirty rect handling
|
|
|
|
void Screen::addDirtyRect(int x, int y, int w, int h) {
|
|
if (_numDirtyRects == kMaxDirtyRects || _forceFullUpdate) {
|
|
_forceFullUpdate = true;
|
|
return;
|
|
}
|
|
|
|
if (w == 0 || h == 0 || x >= SCREEN_W || y >= SCREEN_H || x + w < 0 || y + h < 0)
|
|
return;
|
|
|
|
if (x < 0) {
|
|
w += x;
|
|
x = 0;
|
|
}
|
|
|
|
if (x + w >= 320)
|
|
w = 320 - x;
|
|
|
|
if (y < 0) {
|
|
h += y;
|
|
y = 0;
|
|
}
|
|
|
|
if (y + h >= 200)
|
|
h = 200 - y;
|
|
|
|
Rect &cur = _dirtyRects[_numDirtyRects++];
|
|
cur.x = x;
|
|
cur.x2 = w;
|
|
cur.y = y;
|
|
cur.y2 = h;
|
|
}
|
|
|
|
// overlay functions
|
|
|
|
byte *Screen::getOverlayPtr(int page) {
|
|
if (page == 0 || page == 1)
|
|
return _sjisOverlayPtrs[1];
|
|
else if (page == 2 || page == 3)
|
|
return _sjisOverlayPtrs[2];
|
|
|
|
if (_vm->gameFlags().gameID == GI_KYRA2) {
|
|
if (page == 12 || page == 13)
|
|
return _sjisOverlayPtrs[3];
|
|
}
|
|
|
|
warning("Trying to access unimplemented SJIS overlay page %d", page);
|
|
return 0;
|
|
}
|
|
|
|
void Screen::clearOverlayPage(int page) {
|
|
byte *dst = getOverlayPtr(page);
|
|
if (!dst)
|
|
return;
|
|
memset(dst, 0x80, SCREEN_OVL_SJIS_SIZE);
|
|
}
|
|
|
|
void Screen::clearOverlayRect(int page, int x, int y, int w, int h) {
|
|
byte *dst = getOverlayPtr(page);
|
|
|
|
if (!dst || w < 0 || h < 0)
|
|
return;
|
|
|
|
x <<= 1; y <<= 1;
|
|
w <<= 1; h <<= 1;
|
|
|
|
dst += y * 640 + x;
|
|
|
|
if (w == 640 && h == 400) {
|
|
memset(dst, 0x80, SCREEN_OVL_SJIS_SIZE);
|
|
} else {
|
|
while (h--) {
|
|
memset(dst, 0x80, w);
|
|
dst += 640;
|
|
}
|
|
}
|
|
}
|
|
|
|
void Screen::copyOverlayRegion(int x, int y, int x2, int y2, int w, int h, int srcPage, int dstPage) {
|
|
byte *dst = getOverlayPtr(dstPage);
|
|
const byte *src = getOverlayPtr(srcPage);
|
|
|
|
if (!dst || !src)
|
|
return;
|
|
|
|
x <<= 1; x2 <<= 1;
|
|
y <<= 1; y2 <<= 1;
|
|
w <<= 1; h <<= 1;
|
|
|
|
if (w == 640 && h == 400) {
|
|
memcpy(dst, src, SCREEN_OVL_SJIS_SIZE);
|
|
} else {
|
|
dst += y2 * 640 + x2;
|
|
src += y * 640 + x;
|
|
|
|
while (h--) {
|
|
for (x = 0; x < w; ++x)
|
|
memcpy(dst, src, w);
|
|
dst += 640;
|
|
src += 640;
|
|
}
|
|
}
|
|
}
|
|
|
|
// SJIS rendering
|
|
|
|
namespace {
|
|
int SJIStoFMTChunk(int f, int s) { // copied from scumm\charset.cpp
|
|
enum {
|
|
KANA = 0,
|
|
KANJI = 1,
|
|
EKANJI = 2
|
|
};
|
|
int base = s - ((s + 1) % 32);
|
|
int c = 0, p = 0, chunk_f = 0, chunk = 0, cr = 0, kanjiType = KANA;
|
|
|
|
if (f >= 0x81 && f <= 0x84) kanjiType = KANA;
|
|
if (f >= 0x88 && f <= 0x9f) kanjiType = KANJI;
|
|
if (f >= 0xe0 && f <= 0xea) kanjiType = EKANJI;
|
|
|
|
if ((f > 0xe8 || (f == 0xe8 && base >= 0x9f)) || (f > 0x90 || (f == 0x90 && base >= 0x9f))) {
|
|
c = 48; //correction
|
|
p = -8; //correction
|
|
}
|
|
|
|
if (kanjiType == KANA) {//Kana
|
|
chunk_f = (f - 0x81) * 2;
|
|
} else if (kanjiType == KANJI) {//Standard Kanji
|
|
p += f - 0x88;
|
|
chunk_f = c + 2 * p;
|
|
} else if (kanjiType == EKANJI) {//Enhanced Kanji
|
|
p += f - 0xe0;
|
|
chunk_f = c + 2 * p;
|
|
}
|
|
|
|
// Base corrections
|
|
if (base == 0x7f && s == 0x7f)
|
|
base -= 0x20;
|
|
if (base == 0x9f && s == 0xbe)
|
|
base += 0x20;
|
|
if (base == 0xbf && s == 0xde)
|
|
base += 0x20;
|
|
//if (base == 0x7f && s == 0x9e)
|
|
// base += 0x20;
|
|
|
|
switch (base) {
|
|
case 0x3f:
|
|
cr = 0; //3f
|
|
if (kanjiType == KANA) chunk = 1;
|
|
else if (kanjiType == KANJI) chunk = 31;
|
|
else if (kanjiType == EKANJI) chunk = 111;
|
|
break;
|
|
case 0x5f:
|
|
cr = 0; //5f
|
|
if (kanjiType == KANA) chunk = 17;
|
|
else if (kanjiType == KANJI) chunk = 47;
|
|
else if (kanjiType == EKANJI) chunk = 127;
|
|
break;
|
|
case 0x7f:
|
|
cr = -1; //80
|
|
if (kanjiType == KANA) chunk = 9;
|
|
else if (kanjiType == KANJI) chunk = 63;
|
|
else if (kanjiType == EKANJI) chunk = 143;
|
|
break;
|
|
case 0x9f:
|
|
cr = 1; //9e
|
|
if (kanjiType == KANA) chunk = 2;
|
|
else if (kanjiType == KANJI) chunk = 32;
|
|
else if (kanjiType == EKANJI) chunk = 112;
|
|
break;
|
|
case 0xbf:
|
|
cr = 1; //be
|
|
if (kanjiType == KANA) chunk = 18;
|
|
else if (kanjiType == KANJI) chunk = 48;
|
|
else if (kanjiType == EKANJI) chunk = 128;
|
|
break;
|
|
case 0xdf:
|
|
cr = 1; //de
|
|
if (kanjiType == KANA) chunk = 10;
|
|
else if (kanjiType == KANJI) chunk = 64;
|
|
else if (kanjiType == EKANJI) chunk = 144;
|
|
break;
|
|
default:
|
|
debug(4, "Invalid Char! f %x s %x base %x c %d p %d", f, s, base, c, p);
|
|
return 0;
|
|
}
|
|
|
|
debug(6, "Kanji: %c%c f 0x%x s 0x%x base 0x%x c %d p %d chunk %d cr %d index %d", f, s, f, s, base, c, p, chunk, cr, ((chunk_f + chunk) * 32 + (s - base)) + cr);
|
|
return ((chunk_f + chunk) * 32 + (s - base)) + cr;
|
|
}
|
|
} // end of anonymous namespace
|
|
|
|
void Screen::drawCharSJIS(uint16 c, int x, int y) {
|
|
debugC(9, kDebugLevelScreen, "Screen::drawCharSJIS('%c', %d, %d)", c, x, y);
|
|
|
|
int color1 = _textColorsMap[1];
|
|
int color2 = _textColorsMap[0];
|
|
|
|
memset(_sjisTempPage2, 0x80, 324);
|
|
memset(_sjisSourceChar, 0, 36);
|
|
memcpy(_sjisSourceChar, _sjisFontData + 0x20 * SJIStoFMTChunk(c & 0xff, c >> 8), 0x20);
|
|
|
|
if (_curPage == 0 || _curPage == 1)
|
|
addDirtyRect(x, y, SJIS_CHARSIZE >> 1, SJIS_CHARSIZE >> 1);
|
|
|
|
x <<= 1;
|
|
y <<= 1;
|
|
|
|
uint8 *destPage = getOverlayPtr(_curPage);
|
|
if (!destPage) {
|
|
warning("trying to draw SJIS char on unsupported page %d", _curPage);
|
|
return;
|
|
}
|
|
|
|
destPage += y * 640 + x;
|
|
uint8 *src = 0, *dst = 0;
|
|
|
|
if (color2 != 0x80) {
|
|
// draw color2 shadow
|
|
src = _sjisSourceChar;
|
|
dst = _sjisTempPage2;
|
|
|
|
for (int i = 0; i < SJIS_CHARSIZE; i++) {
|
|
*((uint16*)dst) = READ_LE_UINT16(src);
|
|
dst += 2; src += 2;
|
|
*dst++ = 0;
|
|
}
|
|
|
|
src = _sjisTempPage2;
|
|
dst = _sjisTempPage;
|
|
memset(dst, 0, 60);
|
|
for (int i = 0; i < 48; i++)
|
|
*dst++ |= *src++;
|
|
|
|
src = _sjisTempPage2;
|
|
dst = _sjisTempPage + 3;
|
|
for (int i = 0; i < 48; i++)
|
|
*dst++ |= *src++;
|
|
|
|
src = _sjisTempPage2;
|
|
dst = _sjisTempPage + 6;
|
|
for (int i = 0; i < 48; i++)
|
|
*dst++ |= *src++;
|
|
|
|
for (int i = 0; i < 2; i++) {
|
|
src = _sjisTempPage;
|
|
for (int ii = 0; ii < SJIS_CHARSIZE; ii++) {
|
|
uint8 cy2 = 0;
|
|
uint8 cy1 = 0;
|
|
for (int iii = 0; iii < 3; iii++) {
|
|
cy1 = *src & 1;
|
|
*src |= ((*src >> 1) | (cy2 << 7));
|
|
cy2 = cy1;
|
|
src++;
|
|
}
|
|
}
|
|
}
|
|
|
|
src = _sjisTempPage2;
|
|
for (int i = 0; i < SJIS_CHARSIZE; i++) {
|
|
uint8 cy2 = 0;
|
|
uint8 cy1 = 0;
|
|
for (int ii = 0; ii < 3; ii++) {
|
|
cy1 = *src & 1;
|
|
*src = ((*src >> 1) | (cy2 << 7));
|
|
cy2 = cy1;
|
|
src++;
|
|
}
|
|
}
|
|
|
|
src = _sjisTempPage2;
|
|
dst = _sjisTempPage + 3;
|
|
for (int i = 0; i < 48; i++)
|
|
*dst++ ^= *src++;
|
|
|
|
memset(_sjisTempPage2, 0x80, 324);
|
|
src = _sjisTempPage;
|
|
dst = _sjisTempPage2;
|
|
|
|
uint8 height = SJIS_CHARSIZE * 3;
|
|
uint8 width = SJIS_CHARSIZE;
|
|
if (color2 & 0xff00) {
|
|
height -= 3;
|
|
width--;
|
|
dst += 0x13;
|
|
}
|
|
|
|
for (int i = 0; i < height; i++) {
|
|
uint8 rs = *src++;
|
|
for (int ii = 0; ii < 8; ii++) {
|
|
if (rs & 0x80)
|
|
*dst = (color2 & 0xff);
|
|
rs <<= 1;
|
|
dst++;
|
|
|
|
if (!--width) {
|
|
width = SJIS_CHARSIZE;
|
|
if (color2 & 0xff00) {
|
|
width--;
|
|
dst++;
|
|
}
|
|
break;
|
|
}
|
|
}
|
|
}
|
|
}
|
|
|
|
// draw color1 char
|
|
src = _sjisSourceChar;
|
|
dst = _sjisTempPage;
|
|
|
|
for (int i = 0; i < SJIS_CHARSIZE; i++) {
|
|
*(uint16*)dst = READ_LE_UINT16(src);
|
|
dst += 2; src += 2;
|
|
*dst++ = 0;
|
|
}
|
|
|
|
src = _sjisTempPage;
|
|
dst = _sjisTempPage2;
|
|
if (color2 != 0x80)
|
|
color1 = (color1 & 0xff) | 0x100;
|
|
|
|
uint8 height = SJIS_CHARSIZE * 3;
|
|
uint8 width = SJIS_CHARSIZE;
|
|
if (color1 & 0xff00) {
|
|
height -= 3;
|
|
width--;
|
|
dst += 0x13;
|
|
}
|
|
|
|
for (int i = 0; i < height; i++) {
|
|
uint8 rs = *src++;
|
|
for (int ii = 0; ii < 8; ii++) {
|
|
if (rs & 0x80)
|
|
*dst = (color1 & 0xff);
|
|
rs <<= 1;
|
|
dst++;
|
|
|
|
if (!--width) {
|
|
width = SJIS_CHARSIZE;
|
|
if (color1 & 0xff00) {
|
|
width--;
|
|
dst++;
|
|
}
|
|
break;
|
|
}
|
|
}
|
|
}
|
|
|
|
// copy char to surface
|
|
src = _sjisTempPage2;
|
|
dst = destPage;
|
|
int pitch = 640 - SJIS_CHARSIZE;
|
|
|
|
for (int i = 0; i < SJIS_CHARSIZE; i++) {
|
|
for (int ii = 0; ii < SJIS_CHARSIZE; ii++) {
|
|
if (*src != 0x80)
|
|
*dst = *src;
|
|
src++;
|
|
dst++;
|
|
}
|
|
dst += pitch;
|
|
}
|
|
}
|
|
|
|
} // End of namespace Kyra
|
|
|