scummvm/engines/agos/gfx.cpp
2009-07-11 00:38:50 +00:00

1501 lines
38 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/system.h"
#include "graphics/surface.h"
#include "agos/agos.h"
#include "agos/intern.h"
#include "agos/vga.h"
namespace AGOS {
byte *vc10_depackColumn(VC10_state * vs) {
int8 a = vs->depack_cont;
const byte *src = vs->srcPtr;
byte *dst = vs->depack_dest;
uint16 dh = vs->dh;
byte color;
if (a == -0x80)
a = *src++;
for (;;) {
if (a >= 0) {
color = *src++;
do {
*dst++ = color;
if (!--dh) {
if (--a < 0)
a = -0x80;
else
src--;
goto get_out;
}
} while (--a >= 0);
} else {
do {
*dst++ = *src++;
if (!--dh) {
if (++a == 0)
a = -0x80;
goto get_out;
}
} while (++a != 0);
}
a = *src++;
}
get_out:;
vs->srcPtr = src;
vs->depack_cont = a;
return vs->depack_dest + vs->y_skip;
}
void vc10_skip_cols(VC10_state *vs) {
while (vs->x_skip) {
vc10_depackColumn(vs);
vs->x_skip--;
}
}
void AGOSEngine::decodeColumn(byte *dst, const byte *src, uint16 height, uint16 pitch) {
int8 reps = (int8)0x80;
byte color;
byte *dstPtr = dst;
uint h = height, w = 8;
for (;;) {
reps = *src++;
if (reps >= 0) {
color = *src++;
do {
*dst = color;
dst += pitch;
/* reached bottom? */
if (--h == 0) {
/* reached right edge? */
if (--w == 0)
return;
dst = ++dstPtr;
h = height;
}
} while (--reps >= 0);
} else {
do {
*dst = *src++;
dst += pitch;
/* reached bottom? */
if (--h == 0) {
/* reached right edge? */
if (--w == 0)
return;
dst = ++dstPtr;
h = height;
}
} while (++reps != 0);
}
}
}
void AGOSEngine::decodeRow(byte *dst, const byte *src, uint16 width, uint16 pitch) {
int8 reps = (int8)0x80;
byte color;
byte *dstPtr = dst;
uint w = width, h = 8;
for (;;) {
reps = *src++;
if (reps >= 0) {
color = *src++;
do {
*dst++ = color;
/* reached right edge? */
if (--w == 0) {
/* reached bottom? */
if (--h == 0)
return;
dstPtr += pitch;
dst = dstPtr;
w = width;
}
} while (--reps >= 0);
} else {
do {
*dst++ = *src++;
/* reached right edge? */
if (--w == 0) {
/* reached bottom? */
if (--h == 0)
return;
dstPtr += pitch;
dst = dstPtr;
w = width;
}
} while (++reps != 0);
}
}
}
bool AGOSEngine::drawImage_clip(VC10_state *state) {
const uint16 *vlut;
uint maxWidth, maxHeight;
int cur;
vlut = &_videoWindows[_windowNum * 4];
if (getGameType() != GType_FF && getGameType() != GType_PP) {
state->draw_width = state->width * 2;
}
cur = state->x;
if (cur < 0) {
do {
if (!--state->draw_width)
return 0;
state->x_skip++;
} while (++cur);
}
state->x = cur;
maxWidth = (getGameType() == GType_FF || getGameType() == GType_PP) ? _screenWidth : (vlut[2] * 2);
cur += state->draw_width - maxWidth;
if (cur > 0) {
do {
if (!--state->draw_width)
return 0;
} while (--cur);
}
cur = state->y;
if (cur < 0) {
do {
if (!--state->draw_height)
return 0;
state->y_skip++;
} while (++cur);
}
state->y = cur;
maxHeight = (getGameType() == GType_FF || getGameType() == GType_PP) ? _screenHeight : vlut[3];
cur += state->draw_height - maxHeight;
if (cur > 0) {
do {
if (!--state->draw_height)
return 0;
} while (--cur);
}
if (getGameType() != GType_FF && getGameType() != GType_PP) {
state->draw_width *= 4;
}
return (state->draw_width != 0 && state->draw_height != 0);
}
void AGOSEngine_Feeble::scaleClip(int16 h, int16 w, int16 y, int16 x, int16 scrollY) {
Common::Rect srcRect, dstRect;
float factor, xscale;
srcRect.left = 0;
srcRect.top = 0;
srcRect.right = w;
srcRect.bottom = h;
if (scrollY > _baseY)
factor = 1 + ((scrollY - _baseY) * _scale);
else
factor = 1 - ((_baseY - scrollY) * _scale);
xscale = ((w * factor) / 2);
dstRect.left = (int16)(x - xscale);
if (dstRect.left > _screenWidth - 1)
return;
dstRect.top = (int16)(y - (h * factor));
if (dstRect.top > _screenHeight - 1)
return;
dstRect.right = (int16)(x + xscale);
dstRect.bottom = y;
_feebleRect = dstRect;
_variableArray[20] = _feebleRect.top;
_variableArray[21] = _feebleRect.left;
_variableArray[22] = _feebleRect.bottom;
_variableArray[23] = _feebleRect.right;
debug(5, "Left %d Right %d Top %d Bottom %d", dstRect.left, dstRect.right, dstRect.top, dstRect.bottom);
// Unlike normal rectangles in ScummVM, it seems that in the case of
// the destination rectangle the bottom and right coordinates are
// considered to be inside the rectangle. For the source rectangle,
// I believe that they are not.
int scaledW = dstRect.width() + 1;
int scaledH = dstRect.height() + 1;
byte *src = getScaleBuf();
byte *dst = getBackBuf();
dst += dstRect.top * _backBuf->pitch + dstRect.left;
for (int dstY = 0; dstY < scaledH; dstY++) {
if (dstRect.top + dstY >= 0 && dstRect.top + dstY < _screenHeight) {
int srcY = (dstY * h) / scaledH;
byte *srcPtr = src + _scaleBuf->pitch * srcY;
byte *dstPtr = dst + _backBuf->pitch * dstY;
for (int dstX = 0; dstX < scaledW; dstX++) {
if (dstRect.left + dstX >= 0 && dstRect.left + dstX < _screenWidth) {
int srcX = (dstX * w) / scaledW;
if (srcPtr[srcX])
dstPtr[dstX] = srcPtr[srcX];
}
}
}
}
}
void AGOSEngine_Feeble::drawImage(VC10_state *state) {
state->surf_addr = getBackBuf();
state->surf_pitch = _backBuf->pitch;
if (state->flags & kDFCompressed) {
if (state->flags & kDFScaled) {
state->surf_addr = getScaleBuf();
state->surf_pitch = _scaleBuf->pitch;
uint w, h;
byte *src, *dst, *dstPtr;
state->dl = state->width;
state->dh = state->height;
dstPtr = state->surf_addr;
w = 0;
do {
src = vc10_depackColumn(state);
dst = dstPtr;
h = 0;
do {
*dst = *src;
dst += state->surf_pitch;
src++;
} while (++h != state->draw_height);
dstPtr++;
} while (++w != state->draw_width);
if (_vgaCurSpritePriority % 10 != 9) {
_scaleX = state->x;
_scaleY = state->y;
_scaleWidth = state->width;
_scaleHeight = state->height;
} else {
scaleClip(state->height, state->width, state->y, state->x, state->y + _scrollY);
}
} else if (state->flags & kDFOverlayed) {
state->surf_addr = getScaleBuf();
state->surf_pitch = _scaleBuf->pitch;
state->surf_addr += (state->x + _scrollX) + (state->y + _scrollY) * state->surf_pitch;
uint w, h;
byte *src, *dst, *dstPtr;
state->dl = state->width;
state->dh = state->height;
dstPtr = state->surf_addr;
w = 0;
do {
byte color;
src = vc10_depackColumn(state);
dst = dstPtr;
h = 0;
do {
color = *src;
if (color != 0)
*dst = color;
dst += state->surf_pitch;
src++;
} while (++h != state->draw_height);
dstPtr++;
} while (++w != state->draw_width);
if (_vgaCurSpritePriority % 10 == 9) {
scaleClip(_scaleHeight, _scaleWidth, _scaleY, _scaleX, _scaleY + _scrollY);
}
} else {
if (!drawImage_clip(state)) {
return;
}
state->surf_addr += state->x + state->y * state->surf_pitch;
uint w, h;
byte *src, *dst, *dstPtr;
state->dl = state->width;
state->dh = state->height;
vc10_skip_cols(state);
if (state->flags & kDFMasked) {
if (getGameType() == GType_FF && !getBitFlag(81)) {
if (state->x > _feebleRect.right) {
return;
}
if (state->y > _feebleRect.bottom) {
return;
}
if (state->x + state->width < _feebleRect.left) {
return;
}
if (state->y + state->height < _feebleRect.top) {
return;
}
}
dstPtr = state->surf_addr;
w = 0;
do {
byte color;
src = vc10_depackColumn(state);
dst = dstPtr;
h = 0;
do {
color = *src;
if (color)
*dst = color;
dst += state->surf_pitch;
src++;
} while (++h != state->draw_height);
dstPtr++;
} while (++w != state->draw_width);
} else {
dstPtr = state->surf_addr;
w = 0;
do {
byte color;
src = vc10_depackColumn(state);
dst = dstPtr;
h = 0;
do {
color = *src;
if ((state->flags & kDFNonTrans) || color != 0)
*dst = color;
dst += state->surf_pitch;
src++;
} while (++h != state->draw_height);
dstPtr++;
} while (++w != state->draw_width);
}
}
} else {
if (!drawImage_clip(state)) {
return;
}
state->surf_addr += state->x + state->y * state->surf_pitch;
const byte *src;
byte *dst;
uint count;
src = state->srcPtr + state->width * state->y_skip;
dst = state->surf_addr;
do {
for (count = 0; count != state->draw_width; count++) {
byte color;
color = src[count + state->x_skip];
if (color) {
if ((state->flags & kDFShaded) && color == 220)
color = 244;
dst[count] = color;
}
}
dst += state->surf_pitch;
src += state->width;
} while (--state->draw_height);
}
}
void AGOSEngine_Simon1::drawMaskedImage(VC10_state *state) {
if (getGameType() == GType_SIMON1 && (_windowNum == 3 || _windowNum == 4 || _windowNum >= 10)) {
state->surf2_addr += _videoWindows[17] * 320;
}
if (getFeatures() & GF_32COLOR) {
const byte *mask = state->srcPtr + (state->width * state->y_skip * 16) + (state->x_skip * 8);
byte *src = state->surf2_addr;
byte *dst = state->surf_addr;
state->draw_width *= 2;
uint h = state->draw_height;
do {
for (uint i = 0; i != state->draw_width; i++) {
if (getGameType() == GType_SIMON1 && getBitFlag(88)) {
/* transparency */
if (mask[i] && (dst[i] & 16))
dst[i] = src[i];
} else {
/* no transparency */
if (mask[i])
dst[i] = src[i];
}
}
dst += state->surf_pitch;
src += state->surf2_pitch;
mask += state->width * 16;
} while (--h);
} else if (state->flags & kDFCompressed) {
byte *mask, *src, *dst;
byte h;
uint w;
state->x_skip *= 4;
state->dl = state->width;
state->dh = state->height;
vc10_skip_cols(state);
w = 0;
do {
mask = vc10_depackColumn(state); /* esi */
src = state->surf2_addr + w * 2; /* ebx */
dst = state->surf_addr + w * 2; /* edi */
h = state->draw_height;
do {
if (getGameType() == GType_SIMON1 && getBitFlag(88)) {
/* transparency */
if ((mask[0] & 0xF0) && (dst[0] & 0x0F0) == 0x20)
dst[0] = src[0];
if ((mask[0] & 0x0F) && (dst[1] & 0x0F0) == 0x20)
dst[1] = src[1];
} else {
/* no transparency */
if (mask[0] & 0xF0)
dst[0] = src[0];
if (mask[0] & 0x0F)
dst[1] = src[1];
}
mask++;
dst += state->surf_pitch;
src += state->surf2_pitch;
} while (--h);
} while (++w != state->draw_width);
} else {
const byte *src, *mask;
byte *dst;
uint count;
mask = state->srcPtr + (state->width * state->y_skip) * 8;
src = state->surf2_addr;
dst = state->surf_addr;
state->x_skip *= 4;
do {
for (count = 0; count != state->draw_width; count++) {
if (getGameType() == GType_SIMON1 && getBitFlag(88)) {
/* transparency */
if (mask[count + state->x_skip] & 0xF0)
if ((dst[count * 2] & 0xF0) == 0x20)
dst[count * 2] = src[count * 2];
if (mask[count + state->x_skip] & 0x0F)
if ((dst[count * 2 + 1] & 0x0F) == 0x20)
dst[count * 2 + 1] = src[count * 2 + 1];
} else {
/* no transparency */
if (mask[count + state->x_skip] & 0xF0)
dst[count * 2] = src[count * 2];
if (mask[count + state->x_skip] & 0x0F)
dst[count * 2 + 1] = src[count * 2 + 1];
}
}
src += state->surf2_pitch;
dst += state->surf_pitch;
mask += state->width * 8;
} while (--state->draw_height);
}
}
void AGOSEngine_Simon1::draw32ColorImage(VC10_state *state) {
const byte *src;
byte *dst;
uint h, i;
if (state->flags & kDFCompressed) {
byte *dstPtr = state->surf_addr;
src = state->srcPtr;
/* AAAAAAAA BBBBBBBB CCCCCCCC DDDDDDDD EEEEEEEE
* aaaaabbb bbcccccd ddddeeee efffffgg ggghhhhh
*/
do {
uint count = state->draw_width / 4;
dst = dstPtr;
do {
uint32 bits = (src[0] << 24) | (src[1] << 16) | (src[2] << 8) | (src[3]);
byte color;
color = (byte)((bits >> (32 - 5)) & 31);
if ((state->flags & kDFNonTrans) || color)
dst[0] = color;
color = (byte)((bits >> (32 - 10)) & 31);
if ((state->flags & kDFNonTrans) || color)
dst[1] = color;
color = (byte)((bits >> (32 - 15)) & 31);
if ((state->flags & kDFNonTrans) || color)
dst[2] = color;
color = (byte)((bits >> (32 - 20)) & 31);
if ((state->flags & kDFNonTrans) || color)
dst[3] = color;
color = (byte)((bits >> (32 - 25)) & 31);
if ((state->flags & kDFNonTrans) || color)
dst[4] = color;
color = (byte)((bits >> (32 - 30)) & 31);
if ((state->flags & kDFNonTrans) || color)
dst[5] = color;
bits = (bits << 8) | src[4];
color = (byte)((bits >> (40 - 35)) & 31);
if ((state->flags & kDFNonTrans) || color)
dst[6] = color;
color = (byte)((bits) & 31);
if ((state->flags & kDFNonTrans) || color)
dst[7] = color;
dst += 8;
src += 5;
} while (--count);
dstPtr += state->surf_pitch;
} while (--state->draw_height);
} else {
src = state->srcPtr + (state->width * state->y_skip * 16) + (state->x_skip * 8);
dst = state->surf_addr;
state->draw_width *= 2;
h = state->draw_height;
do {
for (i = 0; i != state->draw_width; i++)
if ((state->flags & kDFNonTrans) || src[i])
dst[i] = src[i] + state->paletteMod;
dst += state->surf_pitch;
src += state->width * 16;
} while (--h);
}
}
void AGOSEngine_Simon1::drawImage(VC10_state *state) {
const uint16 *vlut = &_videoWindows[_windowNum * 4];
if (!drawImage_clip(state))
return;
Graphics::Surface *screen = _system->lockScreen();
if (getFeatures() & GF_32COLOR)
state->palette = 0xC0;
uint16 xoffs, yoffs;
if (getGameType() == GType_SIMON2) {
state->surf2_addr = getBackGround();
state->surf2_pitch = _backGroundBuf->pitch;
state->surf_addr = (byte *)_window4BackScn->pixels;
state->surf_pitch = _window4BackScn->pitch;
xoffs = ((vlut[0] - _videoWindows[16]) * 2 + state->x) * 8;
yoffs = (vlut[1] - _videoWindows[17] + state->y);
uint xmax = (xoffs + state->draw_width * 2);
uint ymax = (yoffs + state->draw_height);
setMoveRect(xoffs, yoffs, xmax, ymax);
_window4Flag = 1;
} else if (getGameType() == GType_SIMON1 && (getFeatures() & GF_DEMO)) {
// The DOS Floppy demo was based off Waxworks engine
if (_windowNum == 4 || (_windowNum >= 10 && _windowNum <= 27)) {
state->surf2_addr = getBackGround();
state->surf2_pitch = _backGroundBuf->pitch;
state->surf_addr = (byte *)_window4BackScn->pixels;
state->surf_pitch = _videoWindows[18] * 16;
xoffs = ((vlut[0] - _videoWindows[16]) * 2 + state->x) * 8;
yoffs = (vlut[1] - _videoWindows[17] + state->y);
uint xmax = (xoffs + state->draw_width * 2);
uint ymax = (yoffs + state->draw_height);
setMoveRect(xoffs, yoffs, xmax, ymax);
_window4Flag = 1;
} else {
state->surf_addr = (byte *)screen->pixels;
state->surf_pitch = screen->pitch;
xoffs = (vlut[0] * 2 + state->x) * 8;
yoffs = vlut[1] + state->y;
}
} else {
if (_windowNum == 3 || _windowNum == 4 || _windowNum >= 10) {
if (_window3Flag == 1) {
state->surf2_addr = getBackGround();
state->surf2_pitch = _backGroundBuf->pitch;
state->surf_addr = getBackGround();
state->surf_pitch = _backGroundBuf->pitch;
} else {
state->surf2_addr = getBackGround();
state->surf2_pitch = _backGroundBuf->pitch;
state->surf_addr = (byte *)_window4BackScn->pixels;
state->surf_pitch = _window4BackScn->pitch;
}
xoffs = ((vlut[0] - _videoWindows[16]) * 2 + state->x) * 8;
yoffs = (vlut[1] - _videoWindows[17] + state->y);
uint xmax = (xoffs + state->draw_width * 2);
uint ymax = (yoffs + state->draw_height);
setMoveRect(xoffs, yoffs, xmax, ymax);
_window4Flag = 1;
} else {
state->surf2_addr = getBackGround();
state->surf2_pitch = _backGroundBuf->pitch;
state->surf_addr = (byte *)screen->pixels;
state->surf_pitch = screen->pitch;
xoffs = (vlut[0] * 2 + state->x) * 8;
yoffs = vlut[1] + state->y;
}
}
state->surf_addr += xoffs + yoffs * state->surf_pitch;
state->surf2_addr += xoffs + yoffs * state->surf2_pitch;
if ((getFeatures() & GF_32COLOR) && !_window3Flag && yoffs > 133) {
state->paletteMod = 208;
}
if (_backFlag == 1) {
drawBackGroundImage(state);
} else if (state->flags & kDFMasked) {
drawMaskedImage(state);
} else if (((_videoLockOut & 0x20) && state->palette == 0) || state->palette == 0xC0) {
draw32ColorImage(state);
} else {
drawVertImage(state);
}
_system->unlockScreen();
}
void AGOSEngine::drawBackGroundImage(VC10_state *state) {
state->width = _screenWidth;
if (_window3Flag == 1) {
state->width = 0;
state->x_skip = 0;
state->y_skip = 0;
}
const byte* src = state->srcPtr + (state->width * state->y_skip) + (state->x_skip * 8);
byte* dst = state->surf_addr;
state->draw_width *= 2;
uint h = state->draw_height;
const uint w = state->draw_width;
const byte paletteMod = state->paletteMod;
do {
for (uint i = 0; i != w; i+=2) {
dst[i] = src[i] + paletteMod;
dst[i+1] = src[i+1] + paletteMod;
}
dst += state->surf_pitch;
src += state->width;
} while (--h);
}
void AGOSEngine::drawVertImage(VC10_state *state) {
if (state->flags & kDFCompressed) {
drawVertImageCompressed(state);
} else {
drawVertImageUncompressed(state);
}
}
void AGOSEngine::drawVertImageUncompressed(VC10_state *state) {
assert ((state->flags & kDFCompressed) == 0) ;
const byte *src;
byte *dst;
uint count;
src = state->srcPtr + (state->width * state->y_skip) * 8;
dst = state->surf_addr;
state->x_skip *= 4;
do {
for (count = 0; count != state->draw_width; count++) {
byte color;
color = (src[count + state->x_skip] / 16) + state->paletteMod;
if ((state->flags & kDFNonTrans) || color)
dst[count * 2] = color | state->palette;
color = (src[count + state->x_skip] & 15) + state->paletteMod;
if ((state->flags & kDFNonTrans) || color)
dst[count * 2 + 1] = color | state->palette;
}
dst += state->surf_pitch;
src += state->width * 8;
} while (--state->draw_height);
}
void AGOSEngine::drawVertImageCompressed(VC10_state *state) {
assert (state->flags & kDFCompressed) ;
uint w, h;
state->x_skip *= 4; /* reached */
state->dl = state->width;
state->dh = state->height;
vc10_skip_cols(state);
byte *dstPtr = state->surf_addr;
if (!(state->flags & kDFNonTrans) && (state->flags & 0x40)) { /* reached */
dstPtr += vcReadVar(252);
}
w = 0;
do {
byte color;
const byte *src = vc10_depackColumn(state);
byte *dst = dstPtr;
h = 0;
if (state->flags & kDFNonTrans) {
do {
byte colors = *src;
color = (colors / 16);
dst[0] = color | state->palette;
color = (colors & 15);
dst[1] = color | state->palette;
dst += state->surf_pitch;
src++;
} while (++h != state->draw_height);
} else {
do {
byte colors = *src;
color = (colors / 16);
if (color != 0)
dst[0] = color | state->palette;
color = (colors & 15);
if (color != 0)
dst[1] = color | state->palette;
dst += state->surf_pitch;
src++;
} while (++h != state->draw_height);
}
dstPtr += 2;
} while (++w != state->draw_width);
}
void AGOSEngine::drawImage(VC10_state *state) {
const uint16 *vlut = &_videoWindows[_windowNum * 4];
if (!drawImage_clip(state))
return;
Graphics::Surface *screen = _system->lockScreen();
uint16 xoffs = 0, yoffs = 0;
if (getGameType() == GType_WW) {
if (_windowNum == 4 || (_windowNum >= 10 && _windowNum <= 27)) {
state->surf_addr = (byte *)_window4BackScn->pixels;
state->surf_pitch = _videoWindows[18] * 16;
xoffs = ((vlut[0] - _videoWindows[16]) * 2 + state->x) * 8;
yoffs = (vlut[1] - _videoWindows[17] + state->y);
uint xmax = (xoffs + state->draw_width * 2);
uint ymax = (yoffs + state->draw_height);
setMoveRect(xoffs, yoffs, xmax, ymax);
_window4Flag = 1;
} else {
state->surf_addr = (byte *)screen->pixels;
state->surf_pitch = screen->pitch;
xoffs = (vlut[0] * 2 + state->x) * 8;
yoffs = vlut[1] + state->y;
}
} else if (getGameType() == GType_ELVIRA2) {
if (_windowNum == 4 || _windowNum >= 10) {
state->surf_addr = (byte *)_window4BackScn->pixels;
state->surf_pitch = _videoWindows[18] * 16;
xoffs = ((vlut[0] - _videoWindows[16]) * 2 + state->x) * 8;
yoffs = (vlut[1] - _videoWindows[17] + state->y);
uint xmax = (xoffs + state->draw_width * 2);
uint ymax = (yoffs + state->draw_height);
setMoveRect(xoffs, yoffs, xmax, ymax);
_window4Flag = 1;
} else {
state->surf_addr = (byte *)screen->pixels;
state->surf_pitch = screen->pitch;
xoffs = (vlut[0] * 2 + state->x) * 8;
yoffs = vlut[1] + state->y;
}
} else if (getGameType() == GType_ELVIRA1) {
if (_windowNum == 6) {
state->surf_addr = (byte *)_window6BackScn->pixels;
state->surf_pitch = _window6BackScn->pitch;
xoffs = state->x * 8;
yoffs = state->y;
} else if (_windowNum == 2 || _windowNum == 3) {
state->surf_addr = (byte *)screen->pixels;
state->surf_pitch = screen->pitch;
xoffs = (vlut[0] * 2 + state->x) * 8;
yoffs = vlut[1] + state->y;
} else {
state->surf_addr = (byte *)_window4BackScn->pixels;
state->surf_pitch = _videoWindows[18] * 16;
xoffs = ((vlut[0] - _videoWindows[16]) * 2 + state->x) * 8;
yoffs = (vlut[1] - _videoWindows[17] + state->y);
uint xmax = (xoffs + state->draw_width * 2);
uint ymax = (yoffs + state->draw_height);
setMoveRect(xoffs, yoffs, xmax, ymax);
_window4Flag = 1;
}
} else {
state->surf_addr = (byte *)screen->pixels;
state->surf_pitch = screen->pitch;
xoffs = (vlut[0] * 2 + state->x) * 8;
yoffs = vlut[1] + state->y;
}
state->surf_addr += xoffs + yoffs * state->surf_pitch;
if (getGameType() == GType_ELVIRA1 && (state->flags & kDFNonTrans) && yoffs > 133)
state->paletteMod = 16;
if (getGameType() == GType_ELVIRA2 || getGameType() == GType_WW)
state->palette = state->surf_addr[0] & 0xF0;
if (getGameType() == GType_ELVIRA2 && getPlatform() == Common::kPlatformAtariST && yoffs > 133)
state->palette = 208;
if (_backFlag == 1) {
drawBackGroundImage(state);
} else {
drawVertImage(state);
}
_system->unlockScreen();
}
void AGOSEngine::horizontalScroll(VC10_state *state) {
const byte *src;
byte *dst;
int dstPitch, w;
if (getGameType() == GType_FF)
_scrollXMax = state->width - 640;
else
_scrollXMax = state->width * 2 - 40;
_scrollYMax = 0;
_scrollImage = state->srcPtr;
_scrollHeight = state->height;
if (_variableArrayPtr[34] < 0)
state->x = _variableArrayPtr[251];
_scrollX = state->x;
vcWriteVar(251, _scrollX);
if (getGameType() == GType_SIMON2) {
dst = (byte *)_window4BackScn->pixels;
dstPitch = _window4BackScn->pitch;
} else {
dst = getBackBuf();
dstPitch = _backBuf->pitch;
}
if (getGameType() == GType_FF)
src = state->srcPtr + _scrollX / 2;
else
src = state->srcPtr + _scrollX * 4;
for (w = 0; w < _screenWidth; w += 8) {
decodeColumn(dst, src + readUint32Wrapper(src), state->height, dstPitch);
dst += 8;
src += 4;
}
setMoveRect(0, 0, 320, _scrollHeight);
_window4Flag = 1;
}
void AGOSEngine::verticalScroll(VC10_state *state) {
const byte *src;
byte *dst;
int h;
_scrollXMax = 0;
_scrollYMax = state->height - 480;
_scrollImage = state->srcPtr;
_scrollWidth = state->width;
if (_variableArrayPtr[34] < 0)
state->y = _variableArrayPtr[250];
_scrollY = state->y;
vcWriteVar(250, _scrollY);
dst = getBackBuf();
src = state->srcPtr + _scrollY / 2;
for (h = 0; h < _screenHeight; h += 8) {
decodeRow(dst, src + READ_LE_UINT32(src), state->width, _backBuf->pitch);
dst += 8 * state->width;
src += 4;
}
}
void AGOSEngine::paletteFadeOut(byte *palPtr, uint num, uint size) {
byte *p = palPtr;
do {
if (p[0] >= size)
p[0] -= size;
else
p[0] = 0;
if (p[1] >= size)
p[1] -= size;
else
p[1] = 0;
if (p[2] >= size)
p[2] -= size;
else
p[2] = 0;
p += 4;
} while (--num);
}
void AGOSEngine::animate(uint16 windowNum, uint16 zoneNum, uint16 vgaSpriteId, int16 x, int16 y, uint16 palette, bool vgaScript) {
VgaSprite *vsp;
VgaPointersEntry *vpe;
byte *p, *pp;
uint count;
if (getGameType() != GType_PN && getGameType() != GType_ELVIRA1) {
if (isSpriteLoaded(vgaSpriteId, zoneNum))
return;
}
vsp = _vgaSprites;
while (vsp->id != 0)
vsp++;
vsp->windowNum = windowNum;
vsp->priority = 0;
vsp->flags = 0;
vsp->y = y;
vsp->x = x;
vsp->image = 0;
if (getGameType() == GType_PN || getGameType() == GType_ELVIRA1 || getGameType() == GType_ELVIRA2 || getGameType() == GType_WW)
vsp->palette = 0;
else
vsp->palette = palette;
vsp->id = vgaSpriteId;
vsp->zoneNum = zoneNum;
for (;;) {
vpe = &_vgaBufferPointers[zoneNum];
_curVgaFile1 = vpe->vgaFile1;
if (vgaScript) {
if (vpe->vgaFile1 != NULL)
break;
if (_zoneNumber != zoneNum)
_noOverWrite = _zoneNumber;
loadZone(zoneNum);
_noOverWrite = 0xFFFF;
} else {
_zoneNumber = zoneNum;
if (vpe->vgaFile1 != NULL)
break;
loadZone(zoneNum);
}
}
pp = _curVgaFile1;
if (getGameType() == GType_FF || getGameType() == GType_PP) {
p = pp + READ_LE_UINT16(pp + 2);
count = READ_LE_UINT16(&((VgaFile1Header_Feeble *) p)->animationCount);
p = pp + READ_LE_UINT16(&((VgaFile1Header_Feeble *) p)->animationTable);
while (count--) {
if (READ_LE_UINT16(&((AnimationHeader_Feeble *) p)->id) == vgaSpriteId)
break;
p += sizeof(AnimationHeader_Feeble);
}
assert(READ_LE_UINT16(&((AnimationHeader_Feeble *) p)->id) == vgaSpriteId);
} else if (getGameType() == GType_SIMON1 || getGameType() == GType_SIMON2) {
p = pp + READ_BE_UINT16(pp + 4);
count = READ_BE_UINT16(&((VgaFile1Header_Common *) p)->animationCount);
p = pp + READ_BE_UINT16(&((VgaFile1Header_Common *) p)->animationTable);
while (count--) {
if (READ_BE_UINT16(&((AnimationHeader_Simon *) p)->id) == vgaSpriteId)
break;
p += sizeof(AnimationHeader_Simon);
}
assert(READ_BE_UINT16(&((AnimationHeader_Simon *) p)->id) == vgaSpriteId);
} else {
p = pp + READ_BE_UINT16(pp + 10);
p += 20;
count = READ_BE_UINT16(&((VgaFile1Header_Common *) p)->animationCount);
p = pp + READ_BE_UINT16(&((VgaFile1Header_Common *) p)->animationTable);
while (count--) {
if (READ_BE_UINT16(&((AnimationHeader_WW *) p)->id) == vgaSpriteId)
break;
p += sizeof(AnimationHeader_WW);
}
assert(READ_BE_UINT16(&((AnimationHeader_WW *) p)->id) == vgaSpriteId);
}
if (_dumpVgaScripts) {
if (getGameType() == GType_FF || getGameType() == GType_PP) {
dumpVgaScript(_curVgaFile1 + READ_LE_UINT16(&((AnimationHeader_Feeble*)p)->scriptOffs), zoneNum, vgaSpriteId);
} else if (getGameType() == GType_SIMON1 || getGameType() == GType_SIMON2) {
dumpVgaScript(_curVgaFile1 + READ_BE_UINT16(&((AnimationHeader_Simon*)p)->scriptOffs), zoneNum, vgaSpriteId);
} else {
dumpVgaScript(_curVgaFile1 + READ_BE_UINT16(&((AnimationHeader_WW*)p)->scriptOffs), zoneNum, vgaSpriteId);
}
}
if (getGameType() == GType_FF || getGameType() == GType_PP) {
addVgaEvent(_vgaBaseDelay, ANIMATE_EVENT, _curVgaFile1 + READ_LE_UINT16(&((AnimationHeader_Feeble *) p)->scriptOffs), vgaSpriteId, zoneNum);
} else if (getGameType() == GType_SIMON1 || getGameType() == GType_SIMON2) {
addVgaEvent(_vgaBaseDelay, ANIMATE_EVENT, _curVgaFile1 + READ_BE_UINT16(&((AnimationHeader_Simon *) p)->scriptOffs), vgaSpriteId, zoneNum);
} else {
addVgaEvent(_vgaBaseDelay, ANIMATE_EVENT, _curVgaFile1 + READ_BE_UINT16(&((AnimationHeader_WW *) p)->scriptOffs), vgaSpriteId, zoneNum);
}
}
void AGOSEngine::setImage(uint16 vgaSpriteId, bool vgaScript) {
uint zoneNum;
VgaPointersEntry *vpe;
byte *bb, *b;
uint16 count;
const byte *vc_ptr_org;
zoneNum = (getGameType() == GType_PN) ? 0 : vgaSpriteId / 100;
for (;;) {
vpe = &_vgaBufferPointers[zoneNum];
_curVgaFile1 = vpe->vgaFile1;
_curVgaFile2 = vpe->vgaFile2;
if (vgaScript) {
if (vpe->vgaFile1 != NULL)
break;
if (_zoneNumber != zoneNum)
_noOverWrite = _zoneNumber;
loadZone(zoneNum);
_noOverWrite = 0xFFFF;
} else {
_curSfxFile = vpe->sfxFile;
_curSfxFileSize = vpe->sfxFileEnd - vpe->sfxFile;
_zoneNumber = zoneNum;
if (vpe->vgaFile1 != NULL)
break;
loadZone(zoneNum);
}
}
bb = _curVgaFile1;
if (getGameType() == GType_FF || getGameType() == GType_PP) {
b = bb + READ_LE_UINT16(bb + 2);
count = READ_LE_UINT16(&((VgaFile1Header_Feeble *) b)->imageCount);
b = bb + READ_LE_UINT16(&((VgaFile1Header_Feeble *) b)->imageTable);
while (count--) {
if (READ_LE_UINT16(&((ImageHeader_Feeble *) b)->id) == vgaSpriteId)
break;
b += sizeof(ImageHeader_Feeble);
}
assert(READ_LE_UINT16(&((ImageHeader_Feeble *) b)->id) == vgaSpriteId);
} else if (getGameType() == GType_SIMON1 || getGameType() == GType_SIMON2) {
b = bb + READ_BE_UINT16(bb + 4);
count = READ_BE_UINT16(&((VgaFile1Header_Common *) b)->imageCount);
b = bb + READ_BE_UINT16(&((VgaFile1Header_Common *) b)->imageTable);
while (count--) {
if (READ_BE_UINT16(&((ImageHeader_Simon *) b)->id) == vgaSpriteId)
break;
b += sizeof(ImageHeader_Simon);
}
assert(READ_BE_UINT16(&((ImageHeader_Simon *) b)->id) == vgaSpriteId);
if (!vgaScript)
clearVideoWindow(_windowNum, READ_BE_UINT16(&((ImageHeader_Simon *) b)->color));
} else {
b = bb + READ_BE_UINT16(bb + 10);
b += 20;
count = READ_BE_UINT16(&((VgaFile1Header_Common *) b)->imageCount);
b = bb + READ_BE_UINT16(&((VgaFile1Header_Common *) b)->imageTable);
while (count--) {
if (READ_BE_UINT16(&((ImageHeader_WW *) b)->id) == vgaSpriteId)
break;
b += sizeof(ImageHeader_WW);
}
assert(READ_BE_UINT16(&((ImageHeader_WW *) b)->id) == vgaSpriteId);
if (!vgaScript) {
uint16 color = READ_BE_UINT16(&((ImageHeader_WW *) b)->color);
if (getGameType() == GType_PN) {
if (color & 0x80)
_wiped = true;
else if (_wiped == true)
restoreMenu();
color &= 0xFF7F;
}
clearVideoWindow(_windowNum, color);
}
}
if (_dumpVgaScripts) {
if (getGameType() == GType_FF || getGameType() == GType_PP) {
dumpVgaScript(_curVgaFile1 + READ_LE_UINT16(&((ImageHeader_Feeble*)b)->scriptOffs), zoneNum, vgaSpriteId);
} else if (getGameType() == GType_SIMON1 || getGameType() == GType_SIMON2) {
dumpVgaScript(_curVgaFile1 + READ_BE_UINT16(&((ImageHeader_Simon*)b)->scriptOffs), zoneNum, vgaSpriteId);
} else {
dumpVgaScript(_curVgaFile1 + READ_BE_UINT16(&((ImageHeader_WW*)b)->scriptOffs), zoneNum, vgaSpriteId);
}
}
vc_ptr_org = _vcPtr;
if (getGameType() == GType_FF || getGameType() == GType_PP) {
_vcPtr = _curVgaFile1 + READ_LE_UINT16(&((ImageHeader_Feeble *) b)->scriptOffs);
} else if (getGameType() == GType_SIMON1 || getGameType() == GType_SIMON2) {
_vcPtr = _curVgaFile1 + READ_BE_UINT16(&((ImageHeader_Simon *) b)->scriptOffs);
} else {
_vcPtr = _curVgaFile1 + READ_BE_UINT16(&((ImageHeader_WW *) b)->scriptOffs);
}
runVgaScript();
_vcPtr = vc_ptr_org;
}
#ifdef ENABLE_PN
void AGOSEngine_PN::setWindowImageEx(uint16 mode, uint16 vga_res) {
if (!_initMouse) {
_initMouse = 1;
vc33_setMouseOn();
}
setWindowImage(mode, vga_res);
}
#endif
void AGOSEngine::setWindowImageEx(uint16 mode, uint16 vgaSpriteId) {
_window3Flag = 0;
if (mode == 4) {
vc29_stopAllSounds();
if (getGameType() == GType_ELVIRA1) {
if (_variableArray[299] == 0) {
_variableArray[293] = 0;
_wallOn = 0;
}
} else if (getGameType() == GType_ELVIRA2) {
if (_variableArray[70] == 0) {
_variableArray[71] = 0;
_wallOn = 0;
}
}
}
if (_videoLockOut & 0x10)
error("setWindowImageEx: _videoLockOut & 0x10");
if (getGameType() != GType_PP && getGameType() != GType_FF) {
if (getGameType() == GType_WW && (mode == 6 || mode == 8 || mode == 9)) {
setWindowImage(mode, vgaSpriteId);
} else {
while (_copyScnFlag && !shouldQuit())
delay(1);
setWindowImage(mode, vgaSpriteId);
}
} else {
setWindowImage(mode, vgaSpriteId);
}
}
void AGOSEngine::setWindowImage(uint16 mode, uint16 vgaSpriteId, bool specialCase) {
uint16 updateWindow;
_windowNum = updateWindow = mode;
_videoLockOut |= 0x20;
if (getGameType() == GType_FF || getGameType() == GType_PP) {
vc27_resetSprite();
} else if (!specialCase) {
VgaTimerEntry *vte = _vgaTimerList;
while (vte->type != ANIMATE_INT)
vte++;
vte->delay = 2;
}
if (getGameType() == GType_PN) {
AnimTable *animTable = _screenAnim1;
while (animTable->srcPtr) {
animTable->srcPtr = 0;
animTable++;
}
}
if (getGameType() == GType_SIMON2 || getGameType() == GType_FF) {
_scrollX = 0;
_scrollY = 0;
_scrollXMax = 0;
_scrollYMax = 0;
_scrollCount = 0;
_scrollFlag = 0;
_scrollHeight = 134;
_variableArrayPtr = _variableArray;
if (_variableArray[34] >= 0) {
if (getGameType() == GType_FF)
_variableArray[250] = 0;
_variableArray[251] = 0;
}
}
setImage(vgaSpriteId, specialCase);
if (getGameType() == GType_FF || getGameType() == GType_PP) {
fillBackGroundFromBack();
_syncFlag2 = 1;
} else {
_copyScnFlag = 2;
_vgaSpriteChanged++;
if (_window3Flag == 1) {
clearVideoBackGround(3, 0);
_videoLockOut &= ~0x20;
return;
}
uint xoffs = _videoWindows[updateWindow * 4 + 0] * 16;
uint yoffs = _videoWindows[updateWindow * 4 + 1];
uint width = _videoWindows[updateWindow * 4 + 2] * 16;
uint height = _videoWindows[updateWindow * 4 + 3];
Graphics::Surface *screen = _system->lockScreen();
byte *dst = (byte *)_backGroundBuf->getBasePtr(xoffs, yoffs);
byte *src = 0;
uint srcWidth = 0;
if (getGameType() == GType_SIMON2) {
src = (byte *)_window4BackScn->getBasePtr(xoffs, yoffs);
srcWidth = 320;
} else if (getGameType() == GType_SIMON1 && (getFeatures() & GF_DEMO)) {
// The DOS Floppy demo was based off Waxworks engine
if (updateWindow == 4 || updateWindow >= 10) {
src = (byte *)_window4BackScn->pixels;
srcWidth = _videoWindows[18] * 16;
} else if (updateWindow == 3 || updateWindow == 9) {
src = (byte *)screen->pixels + yoffs * screen->pitch + xoffs;
srcWidth = screen->pitch;
} else {
_system->unlockScreen();
_videoLockOut &= ~0x20;
return;
}
} else if (getGameType() == GType_SIMON1) {
if (updateWindow == 4) {
src = (byte *)_window4BackScn->pixels;
srcWidth = _videoWindows[18] * 16;
} else if (updateWindow >= 10) {
src = (byte *)_window4BackScn->pixels + xoffs + yoffs * 320;
srcWidth = _videoWindows[18] * 16;
} else if (updateWindow == 0) {
src = (byte *)screen->pixels + yoffs * screen->pitch + xoffs;
srcWidth = screen->pitch;
} else {
_system->unlockScreen();
_videoLockOut &= ~0x20;
return;
}
} else if (getGameType() == GType_WW) {
if (updateWindow == 4 || updateWindow >= 10) {
src = (byte *)_window4BackScn->pixels;
srcWidth = _videoWindows[18] * 16;
} else if (updateWindow == 3 || updateWindow == 9) {
src = (byte *)screen->pixels + yoffs * screen->pitch + xoffs;
srcWidth = screen->pitch;
} else {
_system->unlockScreen();
_videoLockOut &= ~0x20;
return;
}
} else if (getGameType() == GType_ELVIRA2) {
if (updateWindow == 4 || updateWindow >= 10) {
src = (byte *)_window4BackScn->pixels;
srcWidth = _videoWindows[18] * 16;
} else if (updateWindow == 3) {
src = (byte *)screen->pixels + yoffs * screen->pitch + xoffs;
srcWidth = screen->pitch;
} else {
_system->unlockScreen();
_videoLockOut &= ~0x20;
return;
}
} else if (getGameType() == GType_ELVIRA1) {
if (updateWindow == 6) {
_window6Flag = 1;
src = (byte *)_window6BackScn->pixels;
srcWidth = 48;
} else if (updateWindow == 2 || updateWindow == 3) {
src = (byte *)screen->pixels + yoffs * screen->pitch + xoffs;
srcWidth = screen->pitch;
} else {
src = (byte *)_window4BackScn->pixels;
srcWidth = _videoWindows[18] * 16;
}
} else {
src = (byte *)screen->pixels + yoffs * screen->pitch + xoffs;
srcWidth = screen->pitch;
}
_boxStarHeight = height;
for (; height > 0; height--) {
memcpy(dst, src, width);
dst += _backGroundBuf->pitch;
src += srcWidth;
}
if (getGameType() == GType_PN && !_wiped && !specialCase) {
uint8 color = (getPlatform() == Common::kPlatformPC) ? 7 : 15;
dst = (byte *)screen->pixels + 48;
memset(dst, color, 224);
dst = (byte *)screen->pixels + 132 * screen->pitch + 48;
memset(dst, color, 224);
} else if (getGameType() == GType_ELVIRA1 && updateWindow == 3 && _bottomPalette) {
dst = (byte *)screen->pixels + 133 * screen->pitch;
for (int h = 0; h < 67; h++) {
for (int w = 0; w < _screenWidth; w++)
dst[w] += 0x10;
dst += screen->pitch;
}
}
_system->unlockScreen();
}
_videoLockOut &= ~0x20;
}
// Personal Nightmare specific
void AGOSEngine::drawEdging() {
byte *dst;
uint8 color = (getPlatform() == Common::kPlatformPC) ? 7 : 15;
Graphics::Surface *screen = _system->lockScreen();
dst = (byte *)screen->pixels + 136 * screen->pitch;
uint8 len = 52;
while (len--) {
dst[0] = color;
dst[319] = color;
dst += screen->pitch;
}
dst = (byte *)screen->pixels + 187 * screen->pitch;
memset(dst, color, _screenWidth);
_system->unlockScreen();
}
} // End of namespace AGOS