scummvm/engines/hopkins/graphics.cpp
2012-12-26 08:27:32 +01:00

2100 lines
51 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.
*
*/
#include "common/system.h"
#include "graphics/palette.h"
#include "graphics/decoders/pcx.h"
#include "common/file.h"
#include "common/rect.h"
#include "engines/util.h"
#include "hopkins/files.h"
#include "hopkins/globals.h"
#include "hopkins/graphics.h"
#include "hopkins/hopkins.h"
namespace Hopkins {
GraphicsManager::GraphicsManager() {
_lockCounter = 0;
SDL_MODEYES = false;
XSCREEN = YSCREEN = 0;
WinScan = 0;
PAL_PIXELS = NULL;
_lineNbr = 0;
_videoPtr = NULL;
ofscroll = 0;
SCROLL = 0;
PCX_L = PCX_H = 0;
DOUBLE_ECRAN = false;
OLD_SCROLL = 0;
_lineNbr2 = 0;
Agr_x = Agr_y = 0;
Agr_Flag_x = Agr_Flag_y = 0;
FADESPD = 15;
FADE_LINUX = 0;
_skipVideoLockFl = false;
no_scroll = 0;
REDRAW = false;
min_x = 0;
min_y = 20;
max_x = SCREEN_WIDTH * 2;
max_y = SCREEN_HEIGHT - 20;
clip_x = clip_y = 0;
clip_x1 = clip_y1 = 0;
clip_flag = false;
SDL_NBLOCS = 0;
Red_x = Red_y = 0;
Red = 0;
_width = 0;
Compteur_y = 0;
spec_largeur = 0;
Common::fill(&SD_PIXELS[0], &SD_PIXELS[PALETTE_SIZE * 2], 0);
Common::fill(&_colorTable[0], &_colorTable[PALETTE_EXT_BLOCK_SIZE], 0);
Common::fill(&_palette[0], &_palette[PALETTE_EXT_BLOCK_SIZE], 0);
Common::fill(&_oldPalette[0], &_oldPalette[PALETTE_EXT_BLOCK_SIZE], 0);
}
GraphicsManager::~GraphicsManager() {
_vm->_globals.freeMemory(_vesaScreen);
_vm->_globals.freeMemory(_vesaBuffer);
}
void GraphicsManager::setParent(HopkinsEngine *vm) {
_vm = vm;
if (_vm->getIsDemo()) {
if (_vm->getPlatform() == Common::kPlatformLinux)
// CHECKME: Should be 0?
MANU_SCROLL = true;
else
MANU_SCROLL = false;
SPEED_SCROLL = 16;
} else {
MANU_SCROLL = false;
SPEED_SCROLL = 32;
}
}
void GraphicsManager::setGraphicalMode(int width, int height) {
if (!SDL_MODEYES) {
Graphics::PixelFormat pixelFormat16(2, 5, 6, 5, 0, 11, 5, 0, 0);
initGraphics(width, height, true, &pixelFormat16);
// Init surfaces
_vesaScreen = _vm->_globals.allocMemory(SCREEN_WIDTH * 2 * SCREEN_HEIGHT);
_vesaBuffer = _vm->_globals.allocMemory(SCREEN_WIDTH * 2 * SCREEN_HEIGHT);
_videoPtr = NULL;
XSCREEN = width;
YSCREEN = height;
WinScan = width * 2; // Refactor me
PAL_PIXELS = SD_PIXELS;
_lineNbr = width;
SDL_MODEYES = true;
} else {
error("Called SET_MODE multiple times");
}
}
/**
* (try to) Lock Screen
*/
void GraphicsManager::lockScreen() {
if (!_skipVideoLockFl) {
if (_lockCounter++ == 0)
_videoPtr = g_system->lockScreen();
}
}
/**
* (try to) Unlock Screen
*/
void GraphicsManager::unlockScreen() {
assert(_videoPtr);
if (--_lockCounter == 0) {
g_system->unlockScreen();
_videoPtr = NULL;
}
}
/**
* Clear Screen
*/
void GraphicsManager::clearScreen() {
assert(_videoPtr);
_videoPtr->fillRect(Common::Rect(0, 0, XSCREEN, YSCREEN), 0);
}
/**
* Load Image
*/
void GraphicsManager::loadImage(const Common::String &file) {
Common::String filename = Common::String::format("%s.PCX", file.c_str());
loadScreen(filename);
initColorTable(165, 170, _palette);
}
/**
* Load VGA Image
*/
void GraphicsManager::loadVgaImage(const Common::String &file) {
SCANLINE(SCREEN_WIDTH);
lockScreen();
clearScreen();
unlockScreen();
_vm->_fileManager.constructFilename(_vm->_globals.HOPIMAGE, file);
A_PCX320(_vesaScreen, _vm->_globals.NFICHIER, _palette);
memcpy(_vesaBuffer, _vesaScreen, 64000);
SCANLINE(320);
max_x = 320;
lockScreen();
CopyAsm16(_vesaBuffer);
unlockScreen();
fadeInBreakout();
}
/**
* Load Screen
*/
void GraphicsManager::loadScreen(const Common::String &file) {
Common::File f;
bool flag = true;
if (_vm->_fileManager.searchCat(file, 6) == g_PTRNUL) {
_vm->_fileManager.constructFilename(_vm->_globals.HOPIMAGE, file);
if (!f.open(_vm->_globals.NFICHIER))
error("loadScreen - %s", file.c_str());
f.seek(0, SEEK_END);
f.close();
flag = false;
}
scrollScreen(0);
A_PCX640_480((byte *)_vesaScreen, file, _palette, flag);
SCROLL = 0;
OLD_SCROLL = 0;
clearPalette();
if (!DOUBLE_ECRAN) {
SCANLINE(SCREEN_WIDTH);
max_x = SCREEN_WIDTH;
lockScreen();
clearScreen();
m_scroll16(_vesaScreen, 0, 0, SCREEN_WIDTH, SCREEN_HEIGHT, 0, 0);
unlockScreen();
} else {
SCANLINE(SCREEN_WIDTH * 2);
max_x = SCREEN_WIDTH * 2;
lockScreen();
clearScreen();
unlockScreen();
if (MANU_SCROLL) {
lockScreen();
m_scroll16(_vesaScreen, 0, 0, SCREEN_WIDTH, SCREEN_HEIGHT, 0, 0);
unlockScreen();
}
}
memcpy(_vesaBuffer, _vesaScreen, SCREEN_WIDTH * 2 * SCREEN_HEIGHT);
}
void GraphicsManager::initColorTable(int minIndex, int maxIndex, byte *palette) {
for (int idx = 0; idx < 256; ++idx)
_colorTable[idx] = idx;
Trans_bloc(_colorTable, palette, 256, minIndex, maxIndex);
for (int idx = 0; idx < 256; ++idx) {
byte v = _colorTable[idx];
if (v > 27)
_colorTable[idx] = 0;
if (!v)
_colorTable[idx] = 0;
}
_colorTable[0] = 1;
}
/**
* Scroll Screen
*/
void GraphicsManager::scrollScreen(int amount) {
int result = CLIP(amount, 0, SCREEN_WIDTH);
_vm->_eventsManager._startPos.x = result;
ofscroll = result;
SCROLL = result;
}
void GraphicsManager::Trans_bloc(byte *destP, const byte *srcP, int count, int minThreshold, int maxThreshold) {
byte *destPosP;
int palIndex;
int srcOffset;
int col1, col2;
destPosP = destP;
for (int idx = 0; idx < count; ++idx) {
palIndex = *(byte *)destPosP++;
srcOffset = 3 * palIndex;
col1 = *(srcP + srcOffset) + *(srcP + srcOffset + 1) + *(srcP + srcOffset + 2);
for (int idx2 = 0; idx2 < 38; ++idx2) {
srcOffset = 3 * idx2;
col2 = *(srcP + srcOffset) + *(srcP + srcOffset + 1) + *(srcP + srcOffset + 2);
col2 += minThreshold;
if (col2 < col1)
continue;
col2 -= maxThreshold;
if (col2 > col1)
continue;
*(destPosP - 1) = (idx2 == 0) ? 1 : idx2;
break;
}
}
}
void GraphicsManager::Trans_bloc2(byte *surface, byte *col, int size) {
byte dataVal;
byte *dataP = surface;
for (int count = size - 1; count; count--){
dataVal = *dataP++;
*(dataP - 1) = *(dataVal + col);
}
}
// TODO: See if it's feasible and/or desirable to change this to use the Common PCX decoder
void GraphicsManager::A_PCX640_480(byte *surface, const Common::String &file, byte *palette, bool typeFlag) {
Common::File f;
Graphics::PCXDecoder pcxDecoder;
// Clear the passed surface
memset(surface, 0, SCREEN_WIDTH * 2 * SCREEN_HEIGHT);
if (typeFlag) {
// Load PCX from within the PIC resource
_vm->_fileManager.constructFilename(_vm->_globals.HOPIMAGE, "PIC.RES");
if (!f.open(_vm->_globals.NFICHIER))
error("(nom)Erreur en cours de lecture.");
f.seek(_vm->_globals._catalogPos);
} else {
// Load stand alone PCX file
_vm->_fileManager.constructFilename(_vm->_globals.HOPIMAGE, file);
if (!f.open(_vm->_globals.NFICHIER))
error("(nom)Erreur en cours de lecture.");
}
// Decode the PCX
if (!pcxDecoder.loadStream(f))
error("Error decoding PCX %s", file.c_str());
const Graphics::Surface *s = pcxDecoder.getSurface();
// Copy out the dimensions and pixels of the decoded surface
DOUBLE_ECRAN = s->w > SCREEN_WIDTH;
PCX_L = s->w;
PCX_H = s->h;
Common::copy((byte *)s->pixels, (byte *)s->pixels + (s->pitch * s->h), surface);
// Copy out the palette
const byte *palSrc = pcxDecoder.getPalette();
Common::copy((const byte *)palSrc, (const byte *)palSrc + PALETTE_BLOCK_SIZE, palette);
f.close();
}
void GraphicsManager::A_PCX320(byte *surface, const Common::String &file, byte *palette) {
size_t filesize;
int v4;
size_t v5;
size_t v7;
byte v9;
int v10;
char v12;
int v15;
int v16;
int32 v17;
byte *ptr;
Common::File f;
if (!f.open(file))
error("File not found - %s", file.c_str());
filesize = f.size();
f.read(surface, 128);
v4 = filesize - 896;
ptr = _vm->_globals.allocMemory(65024);
if (v4 >= 64000) {
v15 = v4 / 64000 + 1;
v17 = 64000 * (v4 / 64000) - v4;
if (v17 < 0)
v17 = -v17;
f.read(ptr, 64000);
v5 = 64000;
} else {
v15 = 1;
v17 = v4;
f.read(ptr, v4);
v5 = v4;
}
v16 = v15 - 1;
v7 = 0;
for (int i = 0; i < 64000; i++) {
if (v7 == v5) {
v7 = 0;
--v16;
v5 = 64000;
if (!v16)
v5 = v17;
// v8 = i;
f.read(ptr, v5);
// i = v8;
}
v9 = *(ptr + v7++);
if (v9 > 192) {
v10 = v9 - 192;
if (v7 == v5) {
v7 = 0;
--v16;
v5 = 64000;
if (v16 == 1)
v5 = v17;
// v11 = i;
f.read(ptr, v5);
// i = v11;
}
v12 = *(ptr + v7++);
do {
*(surface + i++) = v12;
--v10;
} while (v10);
} else {
*(surface + i++) = v9;
}
}
f.seek(filesize - 768);
f.read(palette, 768);
f.close();
_vm->_globals.freeMemory(ptr);
}
// Clear Palette
void GraphicsManager::clearPalette() {
SD_PIXELS[0] = 0;
}
void GraphicsManager::SCANLINE(int pitch) {
_lineNbr = _lineNbr2 = pitch;
}
void GraphicsManager::m_scroll(const byte *surface, int xs, int ys, int width, int height, int destX, int destY) {
const byte *srcP;
byte *destP;
int yNext;
int yCtr;
byte *dest2P;
const byte *src2P;
unsigned int widthRemaining;
assert(_videoPtr);
srcP = xs + _lineNbr2 * ys + surface;
destP = destX + WinScan * destY + (byte *)_videoPtr->pixels;
yNext = height;
do {
yCtr = yNext;
memcpy((byte *)destP, (const byte *)srcP, 4 * (width >> 2));
src2P = (const byte *)(srcP + 4 * (width >> 2));
dest2P = (byte *)(destP + 4 * (width >> 2));
widthRemaining = width - 4 * (width >> 2);
memcpy(dest2P, src2P, widthRemaining);
destP = dest2P + widthRemaining + WinScan - width;
srcP = src2P + widthRemaining + _lineNbr2 - width;
yNext = yCtr - 1;
} while (yCtr != 1);
}
/**
* Copies data from a 8-bit palette surface into the 16-bit screen
*/
void GraphicsManager::m_scroll16(const byte *surface, int xs, int ys, int width, int height, int destX, int destY) {
lockScreen();
assert(_videoPtr);
const byte *srcP = xs + _lineNbr2 * ys + surface;
uint16 *destP = (uint16 *)((byte *)_videoPtr->pixels + destX * 2 + WinScan * destY);
for (int yp = 0; yp < height; ++yp) {
// Copy over the line, using the source pixels as lookups into the pixels palette
const byte *lineSrcP = srcP;
uint16 *lineDestP = destP;
for (int xp = 0; xp < width; ++xp)
*lineDestP++ = *(uint16 *)&PAL_PIXELS[*lineSrcP++ * 2];
// Move to the start of the next line
srcP += _lineNbr2;
destP += WinScan / 2;
}
unlockScreen();
}
// TODO: See if PAL_PIXELS can be converted to a uint16 array
void GraphicsManager::m_scroll16A(const byte *surface, int xs, int ys, int width, int height, int destX, int destY) {
const byte *srcP;
const byte *destP;
int yNext;
int xCtr;
const byte *palette;
int pixelWord;
int yCtr;
const byte *srcCopyP;
const byte *destCopyP;
assert(_videoPtr);
srcP = xs + _lineNbr2 * ys + surface;
destP = destX + destX + WinScan * destY + (byte *)_videoPtr->pixels;
yNext = height;
Agr_x = 0;
Agr_y = 0;
Agr_Flag_y = 0;
do {
for (;;) {
destCopyP = destP;
srcCopyP = srcP;
xCtr = width;
yCtr = yNext;
palette = PAL_PIXELS;
Agr_x = 0;
do {
pixelWord = *(uint16 *)(palette + 2 * *srcP);
*(uint16 *)destP = pixelWord;
++srcP;
destP += 2;
if ((unsigned int)Agr_x >= 100) {
Agr_x -= 100;
*(uint16 *)destP = pixelWord;
destP += 2;
}
--xCtr;
} while (xCtr);
yNext = yCtr;
srcP = srcCopyP;
destP = WinScan + destCopyP;
if (Agr_Flag_y == 1)
break;
if ((unsigned int)Agr_y < 100)
break;
Agr_y -= 100;
Agr_Flag_y = 1;
}
Agr_Flag_y = 0;
srcP = _lineNbr2 + srcCopyP;
yNext = yCtr - 1;
} while (yCtr != 1);
}
void GraphicsManager::Copy_Vga16(const byte *surface, int xp, int yp, int width, int height, int destX, int destY) {
const byte *srcP;
uint16 *destP;
int yCount;
int xCount;
int xCtr;
const byte *palette;
uint16 *tempSrcP;
uint16 srcByte;
uint16 *tempDestP;
int savedXCount;
uint16 *loopDestP;
const byte *loopSrcP;
int yCtr;
assert(_videoPtr);
srcP = xp + 320 * yp + surface;
destP = (uint16 *)(30 * WinScan + destX + destX + destX + destX + WinScan * 2 * destY + (byte *)_videoPtr->pixels);
yCount = height;
xCount = width;
do {
yCtr = yCount;
xCtr = xCount;
loopSrcP = srcP;
loopDestP = destP;
savedXCount = xCount;
palette = PAL_PIXELS;
do {
tempSrcP = (uint16 *)(palette + 2 * *srcP);
srcByte = *tempSrcP;
*destP = *tempSrcP;
*(destP + 1) = srcByte;
tempDestP = (uint16 *)((byte *)destP + WinScan);
*tempDestP = srcByte;
*(tempDestP + 1) = srcByte;
++srcP;
destP = (uint16 *)((byte *)tempDestP - WinScan + 4);
--xCtr;
} while (xCtr);
xCount = savedXCount;
destP = (uint16 *)((byte *)loopDestP + WinScan * 2);
srcP = loopSrcP + 320;
yCount = yCtr - 1;
} while (yCtr != 1);
}
void GraphicsManager::fadeIn(const byte *palette, int step, const byte *surface) {
uint16 palData1[PALETTE_BLOCK_SIZE * 2];
byte palData2[PALETTE_BLOCK_SIZE];
// Initialise temporary palettes
Common::fill(&palData1[0], &palData1[PALETTE_BLOCK_SIZE], 0);
Common::fill(&palData2[0], &palData2[PALETTE_BLOCK_SIZE], 0);
// Set current palette to black
setpal_vga256(palData2);
// Loop through fading in the palette
uint16 *pTemp1 = &palData1[1];
for (int fadeIndex = 0; fadeIndex < FADESPD; ++fadeIndex) {
uint16 *pTemp2 = &palData1[2];
for (int palOffset = 0; palOffset < PALETTE_BLOCK_SIZE; palOffset += 3) {
if (palData2[palOffset] < palette[palOffset]) {
uint16 v = (palette[palOffset] & 0xff) * 256 / FADESPD;
palData1[palOffset] = v;
palData2[palOffset] = (v >> 8) & 0xff;
}
if (palData2[palOffset + 1] < palette[palOffset + 1]) {
uint16 *pDest = &pTemp1[palOffset];
uint16 v = (palette[palOffset] & 0xff) * 256 / FADESPD + *pDest;
*pDest = v;
palData2[palOffset + 1] = (v >> 8) & 0xff;
}
if (palData2[palOffset + 2] < palette[palOffset + 2]) {
uint16 *pDest = &pTemp2[palOffset];
uint16 v = (palette[palOffset] & 0xff) * 256 / FADESPD + *pDest;
*pDest = v;
palData2[palOffset + 2] = (v >> 8) & 0xff;
}
}
setpal_vga256(palData2);
m_scroll16(surface, _vm->_eventsManager._startPos.x, 0, SCREEN_WIDTH, SCREEN_HEIGHT, 0, 0);
DD_VBL();
}
// Set the final palette
setpal_vga256(palette);
// Refresh the screen
m_scroll16(surface, _vm->_eventsManager._startPos.x, 0, SCREEN_WIDTH, SCREEN_HEIGHT, 0, 0);
DD_VBL();
}
void GraphicsManager::fadeOut(const byte *palette, int step, const byte *surface) {
int palByte;
uint16 palMax;
byte palData[PALETTE_BLOCK_SIZE];
int tempPalette[PALETTE_BLOCK_SIZE];
palMax = palByte = FADESPD;
if (palette) {
for (int palIndex = 0; palIndex < PALETTE_BLOCK_SIZE; palIndex++) {
int palDataIndex = palIndex;
palByte = palette[palIndex];
palByte <<= 8;
tempPalette[palDataIndex] = palByte;
palData[palDataIndex] = palette[palIndex];
}
setpal_vga256(palData);
m_scroll16(surface, _vm->_eventsManager._startPos.x, 0, SCREEN_WIDTH, SCREEN_HEIGHT, 0, 0);
DD_VBL();
for (int palCtr3 = 0; palCtr3 < palMax; palCtr3++) {
for (int palCtr4 = 0; palCtr4 < PALETTE_BLOCK_SIZE; palCtr4++) {
int palCtr5 = palCtr4;
int palValue = tempPalette[palCtr4] - (palette[palCtr4] << 8) / palMax;
tempPalette[palCtr5] = palValue;
palData[palCtr5] = (palValue >> 8) & 0xff;
}
setpal_vga256(palData);
m_scroll16(surface, _vm->_eventsManager._startPos.x, 0, SCREEN_WIDTH, SCREEN_HEIGHT, 0, 0);
DD_VBL();
}
for (int i = 0; i < PALETTE_BLOCK_SIZE; i++)
palData[i] = 0;
setpal_vga256(palData);
m_scroll16(surface, _vm->_eventsManager._startPos.x, 0, SCREEN_WIDTH, SCREEN_HEIGHT, 0, 0);
return DD_VBL();
} else {
for (int i = 0; i < PALETTE_BLOCK_SIZE; i++)
palData[i] = 0;
setpal_vga256(palData);
m_scroll16(surface, _vm->_eventsManager._startPos.x, 0, SCREEN_WIDTH, SCREEN_HEIGHT, 0, 0);
return DD_VBL();
}
}
void GraphicsManager::FADE_INS() {
FADESPD = 1;
fadeIn(_palette, 1, (const byte *)_vesaBuffer);
}
void GraphicsManager::FADE_OUTS() {
FADESPD = 1;
fadeOut(_palette, 1, (const byte *)_vesaBuffer);
}
void GraphicsManager::FADE_INW() {
FADESPD = 15;
fadeIn(_palette, 20, (const byte *)_vesaBuffer);
}
void GraphicsManager::FADE_OUTW() {
FADESPD = 15;
fadeOut(_palette, 20, (const byte *)_vesaBuffer);
}
void GraphicsManager::setpal_vga256(const byte *palette) {
changePalette(palette);
}
void GraphicsManager::setpal_vga256_linux(const byte *palette, const byte *surface) {
changePalette(palette);
m_scroll16(surface, _vm->_eventsManager._startPos.x, 0, SCREEN_WIDTH, SCREEN_HEIGHT, 0, 0);
DD_VBL();
}
void GraphicsManager::SETCOLOR3(int palIndex, int r, int g, int b) {
int palOffset = 3 * palIndex;
_palette[palOffset] = 255 * r / 100;
_palette[palOffset + 1] = 255 * g / 100;
_palette[palOffset + 2] = 255 * b / 100;
}
void GraphicsManager::SETCOLOR4(int palIndex, int r, int g, int b) {
int rv = 255 * r / 100;
int gv = 255 * g / 100;
int bv = 255 * b / 100;
int palOffset = 3 * palIndex;
_palette[palOffset] = rv;
_palette[palOffset + 1] = gv;
_palette[palOffset + 2] = bv;
WRITE_LE_UINT16(&SD_PIXELS[2 * palIndex], mapRGB(rv, gv, bv));
}
void GraphicsManager::changePalette(const byte *palette) {
const byte *srcP = &palette[0];
for (int idx = 0; idx < PALETTE_SIZE; ++idx, srcP += 3) {
*(uint16 *)&SD_PIXELS[2 * idx] = mapRGB(*srcP, *(srcP + 1), *(srcP + 2));
}
}
uint16 GraphicsManager::mapRGB(byte r, byte g, byte b) {
Graphics::PixelFormat format = g_system->getScreenFormat();
return (r >> format.rLoss) << format.rShift
| (g >> format.gLoss) << format.gShift
| (b >> format.bLoss) << format.bShift;
}
void GraphicsManager::DD_VBL() {
// TODO: Is this okay here?
g_system->updateScreen();
}
void GraphicsManager::FADE_OUTW_LINUX(const byte *surface) {
assert(surface);
fadeOut(_palette, FADESPD, surface);
}
void GraphicsManager::FADE_INW_LINUX(const byte *surface) {
assert(surface);
fadeIn(_palette, FADESPD, surface);
}
void GraphicsManager::fadeInBreakout() {
setpal_vga256(_palette);
lockScreen();
CopyAsm16(_vesaBuffer);
unlockScreen();
DD_VBL();
}
void GraphicsManager::fateOutBreakout() {
byte palette[PALETTE_EXT_BLOCK_SIZE];
memset(palette, 0, PALETTE_EXT_BLOCK_SIZE);
setpal_vga256(palette);
lockScreen();
CopyAsm16(_vesaBuffer);
unlockScreen();
DD_VBL();
}
void GraphicsManager::Copy_WinScan_Vbe3(const byte *srcData, byte *destSurface) {
int rleValue;
int destOffset;
const byte *srcP;
byte srcByte;
byte destLen1;
byte *destSlice1P;
byte destLen2;
byte *destSlice2P;
rleValue = 0;
destOffset = 0;
srcP = srcData;
for (;;) {
srcByte = *srcP;
if (*srcP < 222)
goto Video_Cont3_wVbe;
if (srcByte == kByteStop)
return;
if (srcByte < kSetOffset) {
destOffset += (byte)(*srcP + 35);
srcByte = *(srcP++ + 1);
} else if (srcByte == k8bVal) {
destOffset += *(srcP + 1);
srcByte = *(srcP + 2);
srcP += 2;
} else if (srcByte == k16bVal) {
destOffset += READ_LE_UINT16(srcP + 1);
srcByte = *(srcP + 3);
srcP += 3;
} else {
destOffset += READ_LE_UINT32(srcP + 1);
srcByte = *(srcP + 5);
srcP += 5;
}
Video_Cont3_wVbe:
if (srcByte > 210) {
if (srcByte == (byte)-45) {
destLen1 = *(srcP + 1);
rleValue = *(srcP + 2);
destSlice1P = destOffset + destSurface;
destOffset += destLen1;
memset(destSlice1P, rleValue, destLen1);
srcP += 3;
} else {
destLen2 = (byte)(*srcP + 45);
rleValue = *(srcP + 1);
destSlice2P = destOffset + destSurface;
destOffset += destLen2;
memset(destSlice2P, rleValue, destLen2);
srcP += 2;
}
} else {
*(destOffset + destSurface) = srcByte;
++srcP;
++destOffset;
}
}
}
void GraphicsManager::Copy_Video_Vbe16(const byte *srcData) {
const byte *srcP = srcData;
int destOffset = 0;
assert(_videoPtr);
for (;;) {
byte srcByte = *srcP;
if (srcByte >= 222) {
if (srcByte == kByteStop)
return;
if (srcByte < kSetOffset) {
destOffset += srcByte - 221;
srcByte = *++srcP;
} else if (srcByte == k8bVal) {
destOffset += *(const byte *)(srcP + 1);
srcByte = *(const byte *)(srcP + 2);
srcP += 2;
} else if (srcByte == k16bVal) {
destOffset += READ_LE_UINT16(srcP + 1);
srcByte = *(const byte *)(srcP + 3);
srcP += 3;
} else {
destOffset += READ_LE_UINT32(srcP + 1);
srcByte = *(const byte *)(srcP + 5);
srcP += 5;
}
}
if (destOffset > SCREEN_WIDTH * SCREEN_HEIGHT) {
warning("HACK: Stopping anim, out of bounds - 0x%x %d", srcByte, destOffset);
return;
}
if (srcByte > 210) {
if (srcByte == 211) {
int pixelCount = *(srcP + 1);
int pixelIndex = *(srcP + 2);
uint16 *destP = (uint16 *)((byte *)_videoPtr->pixels + destOffset * 2);
uint16 pixelValue = *(uint16 *)(PAL_PIXELS + 2 * pixelIndex);
destOffset += pixelCount;
while (pixelCount--)
*destP++ = pixelValue;
srcP += 3;
} else {
int pixelCount = srcByte - 211;
int pixelIndex = *(srcP + 1);
uint16 *destP = (uint16 *)((byte *)_videoPtr->pixels + destOffset * 2);
uint16 pixelValue = *(uint16 *)(PAL_PIXELS + 2 * pixelIndex);
destOffset += pixelCount;
while (pixelCount--)
*destP++ = pixelValue;
srcP += 2;
}
} else {
*((uint16 *)_videoPtr->pixels + destOffset) = *(uint16 *)(PAL_PIXELS + 2 * srcByte);
++srcP;
++destOffset;
}
}
}
void GraphicsManager::Copy_Video_Vbe16a(const byte *srcData) {
int destOffset;
const byte *srcP;
byte pixelIndex;
destOffset = 0;
srcP = srcData;
for (;;) {
pixelIndex = *srcP;
if (*srcP < kByteStop)
goto Video_Cont_Vbe16a;
if (pixelIndex == kByteStop)
return;
if (pixelIndex == k8bVal) {
destOffset += *(srcP + 1);
pixelIndex = *(srcP + 2);
srcP += 2;
} else if (pixelIndex == k16bVal) {
destOffset += READ_LE_UINT16(srcP + 1);
pixelIndex = *(srcP + 3);
srcP += 3;
} else {
destOffset += READ_LE_UINT32(srcP + 1);
pixelIndex = *(srcP + 5);
srcP += 5;
}
Video_Cont_Vbe16a:
WRITE_LE_UINT16((byte *)_videoPtr->pixels + destOffset * 2, READ_LE_UINT16(PAL_PIXELS + 2 * pixelIndex));
++srcP;
++destOffset;
}
}
void GraphicsManager::Capture_Mem(const byte *srcSurface, byte *destSurface, int xs, int ys, int width, int height) {
const byte *srcP;
byte *destP;
int rowCount;
int i;
int rowCount2;
// TODO: This code in the original is potentially dangerous, as it doesn't clip the area to within
// the screen, and so thus can read areas outside of the allocated surface buffer
srcP = xs + _lineNbr2 * ys + srcSurface;
destP = destSurface;
rowCount = height;
do {
rowCount2 = rowCount;
if (width & 1) {
memcpy(destP, srcP, width);
srcP += width;
destP += width;
} else if (width & 2) {
for (i = width >> 1; i; --i) {
*(uint16 *)destP = *(uint16 *)srcP;
srcP += 2;
destP += 2;
}
} else {
memcpy(destP, srcP, 4 * (width >> 2));
srcP += 4 * (width >> 2);
destP += 4 * (width >> 2);
}
srcP = _lineNbr2 + srcP - width;
rowCount = rowCount2 - 1;
} while (rowCount2 != 1);
}
void GraphicsManager::Sprite_Vesa(byte *surface, const byte *spriteData, int xp, int yp, int spriteIndex) {
// Get a pointer to the start of the desired sprite
const byte *spriteP = spriteData + 3;
for (int i = spriteIndex; i; --i)
spriteP += READ_LE_UINT32(spriteP) + 16;
clip_x = 0;
clip_y = 0;
clip_flag = false;
spriteP += 4;
int width = READ_LE_UINT16(spriteP);
spriteP += 2;
int height = READ_LE_UINT16(spriteP);
// Clip X
clip_x1 = width;
if ((xp + width) <= (min_x + 300))
return;
if (xp < (min_x + 300)) {
clip_x = min_x + 300 - xp;
clip_flag = true;
}
// Clip Y
// TODO: This is weird, but it's that way in the original. Original game bug?
if ((yp + height) <= height)
return;
if (yp < (min_y + 300)) {
clip_y = min_y + 300 - yp;
clip_flag = true;
}
// Clip X1
if (xp >= (max_x + 300))
return;
if ((xp + width) > (max_x + 300)) {
int xAmount = width + 10 - (xp + width - (max_x + 300));
if (xAmount <= 10)
return;
clip_x1 = xAmount - 10;
clip_flag = true;
}
// Clip Y1
if (yp >= (max_y + 300))
return;
if ((yp + height) > (max_y + 300)) {
int yAmount = height + 10 - (yp + height - (max_y + 300));
if (yAmount <= 10)
return;
clip_y1 = yAmount - 10;
clip_flag = true;
}
// Sprite display
// Set up source
spriteP += 6;
int srcOffset = READ_LE_UINT16(spriteP);
spriteP += 4;
const byte *srcP = spriteP;
spriteP += srcOffset;
// Set up surface destination
byte *destP = surface + (yp - 300) * _lineNbr2 + (xp - 300);
// Handling for clipped versus non-clipped
if (clip_flag) {
// Clipped version
for (int yc = 0; yc < height; ++yc, destP += _lineNbr2) {
byte *tempDestP = destP;
byte byteVal;
int xc = 0;
while ((byteVal = *srcP) != 253) {
++srcP;
width = READ_LE_UINT16(srcP);
srcP += 2;
if (byteVal == 254) {
// Copy pixel range
for (int xv = 0; xv < width; ++xv, ++xc, ++spriteP, ++tempDestP) {
if (clip_y == 0 && xc >= clip_x && xc < clip_x1)
*tempDestP = *spriteP;
}
} else {
// Skip over bytes
tempDestP += width;
xc += width;
}
}
if (clip_y > 0)
--clip_y;
srcP += 3;
}
} else {
// Non-clipped
for (int yc = 0; yc < height; ++yc, destP += _lineNbr2) {
byte *tempDestP = destP;
byte byteVal;
while ((byteVal = *srcP) != 253) {
++srcP;
width = READ_LE_UINT16(srcP);
srcP += 2;
if (byteVal == 254) {
// Copy pixel range
Common::copy(spriteP, spriteP + width, tempDestP);
spriteP += width;
}
tempDestP += width;
}
// Skip over control byte and width
srcP += 3;
}
}
}
void GraphicsManager::FIN_VISU() {
for (int idx = 1; idx <= 20; ++idx) {
if (_vm->_globals.Bqe_Anim[idx].field4 == 1)
_vm->_objectsManager.BOB_OFF(idx);
}
_vm->_eventsManager.VBL();
_vm->_eventsManager.VBL();
for (int idx = 1; idx <= 20; ++idx) {
if (_vm->_globals.Bqe_Anim[idx].field4 == 1)
_vm->_objectsManager.BOB_ZERO(idx);
}
for (int idx = 1; idx <= 29; ++idx) {
_vm->_globals.BL_ANIM[idx].v1 = 0;
}
for (int idx = 1; idx <= 20; ++idx) {
_vm->_globals.Bqe_Anim[idx].field4 = 0;
}
}
void GraphicsManager::VISU_ALL() {
for (int idx = 1; idx <= 20; ++idx) {
if (_vm->_globals.Bqe_Anim[idx].field4 == 1)
_vm->_objectsManager.BOB_VISU(idx);
}
}
void GraphicsManager::RESET_SEGMENT_VESA() {
if (_vm->_globals.NBBLOC > 0) {
for (int idx = 0; idx != _vm->_globals.NBBLOC; idx++)
_vm->_globals.BLOC[idx]._activeFl = false;
_vm->_globals.NBBLOC = 0;
}
}
// Add VESA Segment
void GraphicsManager::Ajoute_Segment_Vesa(int x1, int y1, int x2, int y2) {
int tempX;
int blocCount;
bool addFlag;
tempX = x1;
addFlag = true;
if (x2 > max_x)
x2 = max_x;
if (y2 > max_y)
y2 = max_y;
if (x1 < min_x)
tempX = min_x;
if (y1 < min_y)
y1 = min_y;
blocCount = _vm->_globals.NBBLOC;
if (_vm->_globals.NBBLOC > 1) {
int16 blocIndex = 0;
do {
BlocItem &bloc = _vm->_globals.BLOC[blocIndex];
if (bloc._activeFl && tempX >= bloc._x1 && x2 <= bloc._x2
&& y1 >= bloc._y1 && y2 <= bloc._y2)
addFlag = false;
++blocIndex;
blocCount = blocIndex;
} while (_vm->_globals.NBBLOC + 1 != blocIndex);
}
if (addFlag) {
assert(_vm->_globals.NBBLOC < 250);
BlocItem &bloc = _vm->_globals.BLOC[++_vm->_globals.NBBLOC];
bloc._activeFl = true;
bloc._x1 = tempX;
bloc._x2 = x2;
bloc._y1 = y1;
bloc._y2 = y2;
}
}
// Display VESA Segment
void GraphicsManager::Affiche_Segment_Vesa() {
if (_vm->_globals.NBBLOC == 0)
return;
SDL_NBLOCS = _vm->_globals.NBBLOC;
lockScreen();
for (int idx = 1; idx <= _vm->_globals.NBBLOC; ++idx) {
BlocItem &bloc = _vm->_globals.BLOC[idx];
Common::Rect &dstRect = dstrect[idx - 1];
if (!bloc._activeFl)
continue;
if (_vm->_eventsManager._breakoutFl) {
Copy_Vga16(_vesaBuffer, bloc._x1, bloc._y1, bloc._x2 - bloc._x1, bloc._y2 - bloc._y1, bloc._x1, bloc._y1);
dstRect.left = bloc._x1 * 2;
dstRect.top = bloc._y1 * 2 + 30;
dstRect.setWidth((bloc._x2 - bloc._x1) * 2);
dstRect.setHeight((bloc._y2 - bloc._y1) * 2);
} else if (bloc._x2 > _vm->_eventsManager._startPos.x && bloc._x1 < (_vm->_eventsManager._startPos.x + SCREEN_WIDTH)) {
if (bloc._x1 < _vm->_eventsManager._startPos.x)
bloc._x1 = _vm->_eventsManager._startPos.x;
if (bloc._x2 > (_vm->_eventsManager._startPos.x + SCREEN_WIDTH))
bloc._x2 = _vm->_eventsManager._startPos.x + SCREEN_WIDTH;
// WORKAROUND: Original didn't lock the screen for access
lockScreen();
m_scroll16(_vesaBuffer, bloc._x1, bloc._y1, bloc._x2 - bloc._x1, bloc._y2 - bloc._y1, bloc._x1 - _vm->_eventsManager._startPos.x, bloc._y1);
dstRect.left = bloc._x1 - _vm->_eventsManager._startPos.x;
dstRect.top = bloc._y1;
dstRect.setWidth(bloc._x2 - bloc._x1);
dstRect.setHeight(bloc._y2 - bloc._y1);
unlockScreen();
}
_vm->_globals.BLOC[idx]._activeFl = false;
}
_vm->_globals.NBBLOC = 0;
unlockScreen();
if (!_vm->_globals.BPP_NOAFF) {
// SDL_UpdateRects(LinuxScr, SDL_NBLOCS, dstrect);
}
SDL_NBLOCS = 0;
}
void GraphicsManager::AFFICHE_SPEEDVGA(const byte *objectData, int xp, int yp, int idx) {
int height, width;
width = _vm->_objectsManager.getWidth(objectData, idx);
height = _vm->_objectsManager.getHeight(objectData, idx);
if (*objectData == 78) {
Affiche_Perfect(_vesaScreen, objectData, xp + 300, yp + 300, idx, 0, 0, 0);
Affiche_Perfect(_vesaBuffer, objectData, xp + 300, yp + 300, idx, 0, 0, 0);
} else {
Sprite_Vesa(_vesaBuffer, objectData, xp + 300, yp + 300, idx);
Sprite_Vesa(_vesaScreen, objectData, xp + 300, yp + 300, idx);
}
if (!_vm->_globals.NO_VISU)
Ajoute_Segment_Vesa(xp, yp, xp + width, yp + height);
}
void GraphicsManager::CopyAsm(const byte *surface) {
const byte *srcP;
byte srcByte;
byte *destP;
byte *dest1P;
byte *dest2P;
byte *dest3P;
byte *destPitch;
const byte *srcPitch;
assert(_videoPtr);
srcP = surface;
srcByte = 30 * WinScan;
destP = (byte *)_videoPtr->pixels + 30 * WinScan;
for (int yCtr = 200; yCtr != 0; yCtr--) {
srcPitch = srcP;
destPitch = destP;
for (int xCtr = 320; xCtr != 0; xCtr--) {
srcByte = *srcP;
*destP = *srcP;
dest1P = WinScan + destP;
*dest1P = srcByte;
dest2P = dest1P - WinScan + 1;
*dest2P = srcByte;
dest3P = WinScan + dest2P;
*dest3P = srcByte;
destP = dest3P - WinScan + 1;
++srcP;
}
srcP = srcPitch + 320;
destP = WinScan + WinScan + destPitch;
}
}
void GraphicsManager::CopyAsm16(const byte *surface) {
const byte *v1;
byte *v2;
int v3;
byte *v5;
uint16 *v6;
int v;
uint16 *v8;
int v9;
byte *v10;
const byte *v11;
assert(_videoPtr);
v1 = surface;
v2 = 30 * WinScan + (byte *)_videoPtr->pixels;
v3 = 200;
do {
v11 = v1;
v10 = v2;
v9 = v3;
v5 = PAL_PIXELS;
for (int v4 = 320; v4; v4--) {
v = 2 * *v1;
v6 = (uint16 *)(v5 + 2 * *v1);
v = *v6;
*v2 = *v6;
*(v2 + 1) = v;
v8 = (uint16 *)(WinScan + v2);
*v8 = v;
*(v8 + 1) = v;
++v1;
v2 = (byte *)v8 - WinScan + 4;
}
v1 = v11 + 320;
v2 = WinScan * 2 + v10;
v3 = v9 - 1;
} while (v9 != 1);
}
void GraphicsManager::Restore_Mem(byte *destSurface, const byte *src, int xp, int yp, int width, int height) {
byte *destP;
int yNext;
const byte *srcP;
int i;
int yCtr;
destP = xp + _lineNbr2 * yp + destSurface;
yNext = height;
srcP = src;
do {
yCtr = yNext;
if (width & 1) {
memcpy(destP, srcP, width);
srcP += width;
destP += width;
} else if (width & 2) {
for (i = width >> 1; i; --i) {
*(uint16 *)destP = *(uint16 *)srcP;
srcP += 2;
destP += 2;
}
} else {
memcpy(destP, srcP, 4 * (width >> 2));
srcP += 4 * (width >> 2);
destP += 4 * (width >> 2);
}
destP = _lineNbr2 + destP - width;
yNext = yCtr - 1;
} while (yCtr != 1);
}
/**
* Compute the value of a parameter plus a given percentage
*/
int GraphicsManager::zoomIn( int v, int percentage ) {
if (v)
v += percentage * (long int)v / 100;
return v;
}
/**
* Compute the value of a parameter minus a given percentage
*/
int GraphicsManager::zoomOut(int v, int percentage) {
if (v)
v -= percentage * (long int)v / 100;
return v;
}
// Display 'Perfect?'
void GraphicsManager::Affiche_Perfect(byte *surface, const byte *srcData, int xp300, int yp300, int frameIndex, int zoom1, int zoom2, int modeFlag) {
const byte *spriteStartP;
int i;
const byte *spriteSizeP;
const byte *spritePixelsP;
byte *dest1P;
byte *dest2P;
byte *v29;
byte *v40;
const byte *v45;
const byte *v46;
spriteStartP = srcData + 3;
for (i = frameIndex; i; --i)
spriteStartP += READ_LE_UINT32(spriteStartP) + 16;
spriteSizeP = spriteStartP + 4;
int spriteWidth = (int16)READ_LE_UINT16(spriteSizeP);
spriteSizeP += 2;
int spriteHeight2 = (int16)READ_LE_UINT16(spriteSizeP);
int spriteHeight1 = spriteHeight2;
spritePixelsP = spriteSizeP + 10;
clip_x = 0;
clip_y = 0;
clip_x1 = 0;
clip_y1 = 0;
if ((uint16)xp300 > min_x) {
if ((uint16)xp300 < (uint16)(min_x + 300))
clip_x = min_x + 300 - xp300;
if ((uint16)yp300 > min_y) {
if ((uint16)yp300 < (uint16)(min_y + 300))
clip_y = min_y + 300 - yp300;
if ((uint16)xp300 < (uint16)(max_x + 300)) {
clip_x1 = max_x + 300 - xp300;
if ((uint16)yp300 < (uint16)(max_y + 300)) {
clip_y1 = max_y + 300 - yp300;
dest1P = xp300 + _lineNbr2 * (yp300 - 300) - 300 + surface;
if (zoom2) {
Compteur_y = 0;
Agr_x = 0;
Agr_y = 0;
Agr_Flag_y = 0;
Agr_Flag_x = 0;
_width = spriteWidth;
int v20 = zoomIn(spriteWidth, zoom2);
int v22 = zoomIn(spriteHeight1, zoom2);
if (modeFlag) {
v29 = v20 + dest1P;
if (clip_y) {
if ((uint16)clip_y >= v22)
return;
int v61 = v22;
int v52 = v20;
int v30 = 0;
int v31 = (uint16)clip_y;
while (zoomIn(v30 + 1, zoom2) < v31)
;
v20 = v52;
spritePixelsP += _width * v30;
v29 += _lineNbr2 * (uint16)clip_y;
v22 = v61 - (uint16)clip_y;
}
if (v22 > (uint16)clip_y1)
v22 = (uint16)clip_y1;
if (clip_x) {
if ((uint16)clip_x >= v20)
return;
v20 -= (uint16)clip_x;
}
if (v20 > (uint16)clip_x1) {
int v32 = v20 - (uint16)clip_x1;
v29 -= v32;
int v62 = v22;
int v33 = 0;
while (zoomIn(v33 + 1, zoom2) < v32)
;
int v34 = v33;
v22 = v62;
spritePixelsP += v34;
v20 = (uint16)clip_x1;
}
int v63;
do {
for (;;) {
v63 = v22;
byte *v53 = v29;
v46 = spritePixelsP;
Agr_Flag_x = 0;
Agr_x = 0;
for (int v35 = v20; v35; v35--) {
for (;;) {
if (*spritePixelsP)
*v29 = *spritePixelsP;
--v29;
++spritePixelsP;
if (!Agr_Flag_x)
Agr_x = zoom2 + Agr_x;
if ((uint16)Agr_x < 100)
break;
Agr_x = Agr_x - 100;
--spritePixelsP;
Agr_Flag_x = 1;
--v35;
if (!v35)
goto R_Aff_Zoom_Larg_Cont1;
}
Agr_Flag_x = 0;
}
R_Aff_Zoom_Larg_Cont1:
spritePixelsP = _width + v46;
v29 = _lineNbr2 + v53;
++Compteur_y;
if (!Agr_Flag_y)
Agr_y = zoom2 + Agr_y;
if ((uint16)Agr_y < 100)
break;
Agr_y = Agr_y - 100;
spritePixelsP = v46;
Agr_Flag_y = 1;
v22 = v63 - 1;
if (v63 == 1)
return;
}
Agr_Flag_y = 0;
v22 = v63 - 1;
} while (v63 != 1);
} else {
if (clip_y) {
if ((uint16)clip_y >= v22)
return;
int v58 = v22;
int v49 = v20;
int v23 = 0;
int v24 = (uint16)clip_y;
while (zoomIn(v23 + 1, zoom2) < v24)
;
v20 = v49;
spritePixelsP += _width * v23;
dest1P += _lineNbr2 * (uint16)clip_y;
v22 = v58 - (uint16)clip_y;
}
if (v22 > (uint16)clip_y1)
v22 = (uint16)clip_y1;
if (clip_x) {
if ((uint16)clip_x >= v20)
return;
int v59 = v22;
int v50 = v20;
int v25 = (uint16)clip_x;
int v26 = 0;
while (zoomIn(v26 + 1, zoom2) < v25)
;
int v27 = v26;
v22 = v59;
spritePixelsP += v27;
dest1P += (uint16)clip_x;
v20 = v50 - (uint16)clip_x;
}
if (v20 > (uint16)clip_x1)
v20 = (uint16)clip_x1;
int v60;
do {
for (;;) {
v60 = v22;
byte *v51 = dest1P;
v45 = spritePixelsP;
int v28 = v20;
Agr_Flag_x = 0;
Agr_x = 0;
do {
for (;;) {
if (*spritePixelsP)
*dest1P = *spritePixelsP;
++dest1P;
++spritePixelsP;
if (!Agr_Flag_x)
Agr_x = zoom2 + Agr_x;
if ((uint16)Agr_x < 100)
break;
Agr_x = Agr_x - 100;
--spritePixelsP;
Agr_Flag_x = 1;
--v28;
if (!v28)
goto Aff_Zoom_Larg_Cont1;
}
Agr_Flag_x = 0;
--v28;
} while (v28);
Aff_Zoom_Larg_Cont1:
spritePixelsP = _width + v45;
dest1P = _lineNbr2 + v51;
if (!Agr_Flag_y)
Agr_y = zoom2 + Agr_y;
if ((uint16)Agr_y < 100)
break;
Agr_y = Agr_y - 100;
spritePixelsP = v45;
Agr_Flag_y = 1;
v22 = v60 - 1;
if (v60 == 1)
return;
}
Agr_Flag_y = 0;
v22 = v60 - 1;
} while (v60 != 1);
}
} else if (zoom1) {
Compteur_y = 0;
Red_x = 0;
Red_y = 0;
_width = spriteWidth;
Red = zoom1;
if (zoom1 < 100) {
int v37 = zoomOut(spriteWidth, Red);
if (modeFlag) {
v40 = v37 + dest1P;
do {
int v65 = spriteHeight2;
byte *v55 = v40;
Red_y = Red + Red_y;
if ((uint16)Red_y < 100) {
Red_x = 0;
int v42 = v37;
for (int v41 = _width; v41; v41--) {
Red_x = Red + Red_x;
if ((uint16)Red_x < 100) {
if (v42 >= clip_x && v42 < clip_x1 && *spritePixelsP)
*v40 = *spritePixelsP;
--v40;
++spritePixelsP;
--v42;
} else {
Red_x = Red_x - 100;
++spritePixelsP;
}
}
spriteHeight2 = v65;
v40 = _lineNbr2 + v55;
} else {
Red_y = Red_y - 100;
spritePixelsP += _width;
}
--spriteHeight2;
} while (spriteHeight2);
} else {
do {
int v64 = spriteHeight2;
byte *v54 = dest1P;
Red_y = Red + Red_y;
if ((uint16)Red_y < 100) {
Red_x = 0;
int v39 = 0;
for (int v38 = _width; v38; v38--) {
Red_x = Red + Red_x;
if ((uint16)Red_x < 100) {
if (v39 >= clip_x && v39 < clip_x1 && *spritePixelsP)
*dest1P = *spritePixelsP;
++dest1P;
++spritePixelsP;
++v39;
} else {
Red_x = Red_x - 100;
++spritePixelsP;
}
}
spriteHeight2 = v64;
dest1P = _lineNbr2 + v54;
} else {
Red_y = Red_y - 100;
spritePixelsP += _width;
}
--spriteHeight2;
} while (spriteHeight2);
}
}
} else {
_width = spriteWidth;
Compteur_y = 0;
if (modeFlag) {
dest2P = spriteWidth + dest1P;
spec_largeur = spriteWidth;
if (clip_y) {
if ((uint16)clip_y >= (unsigned int)spriteHeight1)
return;
spritePixelsP += spriteWidth * (uint16)clip_y;
dest2P += _lineNbr2 * (uint16)clip_y;
spriteHeight1 -= (uint16)clip_y;
}
int xLeft = (uint16)clip_y1;
if (spriteHeight1 > clip_y1)
spriteHeight1 = clip_y1;
xLeft = clip_x;
if (clip_x) {
if (xLeft >= spriteWidth)
return;
spriteWidth -= xLeft;
}
if (spriteWidth > (uint16)clip_x1) {
int clippedWidth = spriteWidth - (uint16)clip_x1;
spritePixelsP += clippedWidth;
dest2P -= clippedWidth;
spriteWidth = (uint16)clip_x1;
}
int yCtr2;
do {
yCtr2 = spriteHeight1;
byte *destCopy2P = dest2P;
const byte *spritePixelsCopy2P = spritePixelsP;
for (int xCtr2 = spriteWidth; xCtr2; xCtr2--) {
if (*spritePixelsP)
*dest2P = *spritePixelsP;
++spritePixelsP;
--dest2P;
}
spritePixelsP = spec_largeur + spritePixelsCopy2P;
dest2P = _lineNbr2 + destCopy2P;
spriteHeight1 = yCtr2 - 1;
} while (yCtr2 != 1);
} else {
spec_largeur = spriteWidth;
if (clip_y) {
if ((uint16)clip_y >= (unsigned int)spriteHeight1)
return;
spritePixelsP += spriteWidth * (uint16)clip_y;
dest1P += _lineNbr2 * (uint16)clip_y;
spriteHeight1 -= (uint16)clip_y;
}
if (spriteHeight1 > clip_y1)
spriteHeight1 = clip_y1;
if (clip_x) {
if ((uint16)clip_x >= spriteWidth)
return;
spritePixelsP += (uint16)clip_x;
dest1P += (uint16)clip_x;
spriteWidth -= (uint16)clip_x;
}
if (spriteWidth > (uint16)clip_x1)
spriteWidth = (uint16)clip_x1;
int yCtr1;
do {
yCtr1 = spriteHeight1;
byte *dest1CopyP = dest1P;
const byte *spritePixelsCopyP = spritePixelsP;
for (int xCtr1 = spriteWidth; xCtr1; xCtr1--) {
if (*spritePixelsP)
*dest1P = *spritePixelsP;
++dest1P;
++spritePixelsP;
}
spritePixelsP = spec_largeur + spritePixelsCopyP;
dest1P = _lineNbr2 + dest1CopyP;
spriteHeight1 = yCtr1 - 1;
} while (yCtr1 != 1);
}
}
}
}
}
}
}
// Display Speed
void GraphicsManager::fastDisplay(const byte *spriteData, int xp, int yp, int spriteIndex) {
int width, height;
width = _vm->_objectsManager.getWidth(spriteData, spriteIndex);
height = _vm->_objectsManager.getHeight(spriteData, spriteIndex);
if (*spriteData == 78) {
Affiche_Perfect(_vesaScreen, spriteData, xp + 300, yp + 300, spriteIndex, 0, 0, 0);
Affiche_Perfect(_vesaBuffer, spriteData, xp + 300, yp + 300, spriteIndex, 0, 0, 0);
} else {
Sprite_Vesa(_vesaBuffer, spriteData, xp + 300, yp + 300, spriteIndex);
Sprite_Vesa(_vesaScreen, spriteData, xp + 300, yp + 300, spriteIndex);
}
if (!_vm->_globals.NO_VISU)
Ajoute_Segment_Vesa(xp, yp, xp + width, yp + height);
}
void GraphicsManager::SCOPY(const byte *surface, int x1, int y1, int width, int height, byte *destSurface, int destX, int destY) {
int top;
int croppedWidth;
int croppedHeight;
int xRight;
int top2;
int left;
left = x1;
top = y1;
croppedWidth = width;
croppedHeight = height;
if (x1 < min_x) {
croppedWidth = width - (min_x - x1);
left = min_x;
}
if (y1 < min_y) {
croppedHeight = height - (min_y - y1);
top = min_y;
}
top2 = top;
if (top + croppedHeight > max_y)
croppedHeight = max_y - top;
xRight = left + croppedWidth;
if (xRight > max_x)
croppedWidth = max_x - left;
if (croppedWidth > 0 && croppedHeight > 0) {
int height2 = croppedHeight;
Copy_Mem(surface, left, top2, croppedWidth, croppedHeight, destSurface, destX, destY);
Ajoute_Segment_Vesa(left, top2, left + croppedWidth, top2 + height2);
}
}
void GraphicsManager::Copy_Mem(const byte *srcSurface, int x1, int y1, unsigned int width, int height, byte *destSurface, int destX, int destY) {
const byte *srcP;
byte *destP;
int yp;
int yCurrent;
byte *dest2P;
const byte *src2P;
unsigned int pitch;
srcP = x1 + _lineNbr2 * y1 + srcSurface;
destP = destX + _lineNbr2 * destY + destSurface;
yp = height;
do {
yCurrent = yp;
memcpy(destP, srcP, 4 * (width >> 2));
src2P = (srcP + 4 * (width >> 2));
dest2P = (destP + 4 * (width >> 2));
pitch = width - 4 * (width >> 2);
memcpy(dest2P, src2P, pitch);
destP = (dest2P + pitch + _lineNbr2 - width);
srcP = (src2P + pitch + _lineNbr2 - width);
yp = yCurrent - 1;
} while (yCurrent != 1);
}
// Display Font
void GraphicsManager::displayFont(byte *surface, const byte *spriteData, int xp, int yp,
int characterIndex, int colour) {
const byte *spriteDataP;
int i;
const byte *spriteSizeP;
int spriteWidth;
int spriteHeight;
const byte *spritePixelsP;
byte *destP;
byte destByte;
byte *destLineP;
int yCtr;
spriteDataP = spriteData + 3;
for (i = characterIndex; i; --i)
spriteDataP += READ_LE_UINT32(spriteDataP) + 16;
spriteWidth = 0;
spriteHeight = 0;
spriteSizeP = spriteDataP + 4;
spriteWidth = (int16)READ_LE_UINT16(spriteSizeP);
spriteSizeP += 2;
spriteHeight = (int16)READ_LE_UINT16(spriteSizeP);
spritePixelsP = spriteSizeP + 10;
destP = surface + xp + _lineNbr2 * yp;
_width = spriteWidth;
do {
yCtr = spriteHeight;
destLineP = destP;
for (int xCtr = spriteWidth; xCtr; xCtr--) {
destByte = *spritePixelsP;
if (*spritePixelsP) {
if (destByte == (byte)-4)
destByte = colour;
*destP = destByte;
}
++destP;
++spritePixelsP;
}
destP = _lineNbr2 + destLineP;
spriteHeight = yCtr - 1;
} while (yCtr != 1);
}
// Init Screen
void GraphicsManager::INI_ECRAN(const Common::String &file) {
OPTI_INI(file, 0);
}
// Init Screen 2
void GraphicsManager::INI_ECRAN2(const Common::String &file) {
OPTI_INI(file, 2);
}
void GraphicsManager::OPTI_INI(const Common::String &file, int mode) {
Common::String filename = file + ".ini";
byte *ptr = _vm->_fileManager.searchCat(filename, 1);
if (ptr == g_PTRNUL) {
_vm->_fileManager.constructFilename(_vm->_globals.HOPLINK, filename);
ptr = _vm->_fileManager.loadFile(_vm->_globals.NFICHIER);
}
if (!mode) {
filename = file + ".spr";
_vm->_globals.SPRITE_ECRAN = _vm->_globals.freeMemory(_vm->_globals.SPRITE_ECRAN);
if (!_vm->_globals.NOSPRECRAN) {
_vm->_globals.SPRITE_ECRAN = _vm->_fileManager.searchCat(filename, 8);
if (_vm->_globals.SPRITE_ECRAN) {
_vm->_fileManager.constructFilename(_vm->_globals.HOPLINK, filename);
} else {
_vm->_fileManager.constructFilename(_vm->_globals.HOPLINK, "RES_SLI.RES");
}
_vm->_globals.SPRITE_ECRAN = _vm->_fileManager.loadFile(_vm->_globals.NFICHIER);
}
}
if (*ptr != 'I' || *(ptr + 1) != 'N' || *(ptr + 2) != 'I') {
error("Error, file not ini");
} else {
bool doneFlag = false;
int dataOffset = 1;
do {
int dataVal1 = _vm->_scriptManager.handleOpcode(ptr + 20 * dataOffset);
if (_vm->shouldQuit())
return;
if (dataVal1 == 2)
dataOffset = _vm->_scriptManager.handleGoto((ptr + 20 * dataOffset));
if (dataVal1 == 3)
dataOffset = _vm->_scriptManager.handleIf(ptr, dataOffset);
if (dataOffset == -1)
error("Error, defective IFF");
if (dataVal1 == 1 || dataVal1 == 4)
++dataOffset;
if (!dataVal1 || dataVal1 == 5)
doneFlag = true;
} while (!doneFlag);
}
_vm->_globals.freeMemory(ptr);
if (mode != 1) {
_vm->_globals.COUCOU = _vm->_globals.freeMemory(_vm->_globals.COUCOU);
filename = file + ".rep";
byte *dataP = _vm->_fileManager.searchCat(filename, 2);
_vm->_globals.COUCOU = dataP;
if (g_PTRNUL == dataP) {
_vm->_fileManager.constructFilename(_vm->_globals.HOPLINK, filename);
dataP = _vm->_fileManager.loadFile(_vm->_globals.NFICHIER);
_vm->_globals.COUCOU = dataP;
}
}
_vm->_objectsManager._forceZoneFl = true;
_vm->_objectsManager._changeVerbFl = false;
}
void GraphicsManager::NB_SCREEN() {
byte *destP;
const byte *srcP;
if (!_vm->_globals.NECESSAIRE)
initColorTable(50, 65, _palette);
if (_lineNbr == SCREEN_WIDTH)
Trans_bloc2(_vesaBuffer, _colorTable, SCREEN_WIDTH * SCREEN_HEIGHT);
else if (_lineNbr == (SCREEN_WIDTH * 2))
Trans_bloc2(_vesaBuffer, _colorTable, SCREEN_WIDTH * SCREEN_HEIGHT * 2);
lockScreen();
m_scroll16(_vesaBuffer, _vm->_eventsManager._startPos.x, 0, SCREEN_WIDTH, SCREEN_HEIGHT, 0, 0);
unlockScreen();
destP = _vesaScreen;
srcP = _vesaBuffer;
memcpy(_vesaScreen, _vesaBuffer, 614396);
srcP = srcP + 614396;
destP = destP + 614396;
*destP = *srcP;
*(destP + 2) = *(srcP + 2);
DD_VBL();
}
void GraphicsManager::SHOW_PALETTE() {
setpal_vga256(_palette);
}
void GraphicsManager::Copy_WinScan_Vbe(const byte *src, byte *dest) {
int result;
int destOffset;
const byte *srcPtr;
byte byteVal;
result = 0;
destOffset = 0;
srcPtr = src;
for (;;) {
byteVal = *srcPtr;
if (*srcPtr < kByteStop)
goto Video_Cont_wVbe;
if (byteVal == kByteStop)
return;
if (byteVal == k8bVal) {
destOffset += *(srcPtr + 1);
byteVal = *(srcPtr + 2);
srcPtr += 2;
} else if (byteVal == k16bVal) {
destOffset += READ_LE_UINT16(srcPtr + 1);
byteVal = *(srcPtr + 3);
srcPtr += 3;
} else {
destOffset += READ_LE_UINT32(srcPtr + 1);
byteVal = *(srcPtr + 5);
srcPtr += 5;
}
Video_Cont_wVbe:
*(dest + destOffset) = byteVal;
++srcPtr;
++destOffset;
}
}
void GraphicsManager::Copy_Video_Vbe(const byte *src) {
int destOffset;
const byte *srcP;
byte byteVal;
assert(_videoPtr);
destOffset = 0;
srcP = src;
for (;;) {
byteVal = *srcP;
if (*srcP < kByteStop)
break;
else {
if (byteVal == kByteStop)
return;
if (byteVal == k8bVal) {
destOffset += *(srcP + 1);
byteVal = *(srcP + 2);
srcP += 2;
} else if (byteVal == k16bVal) {
destOffset += READ_LE_UINT16(srcP + 1);
byteVal = *(srcP + 3);
srcP += 3;
} else {
destOffset += READ_LE_UINT32(srcP + 1);
byteVal = *(srcP + 5);
srcP += 5;
}
}
*((byte *)_videoPtr->pixels + destOffset) = byteVal;
++srcP;
++destOffset;
}
}
// Reduce Screen
void GraphicsManager::Reduc_Ecran(const byte *srcSurface, byte *destSurface, int xp, int yp, int width, int height, int zoom) {
const byte *srcP;
byte *destP;
srcP = xp + _lineNbr2 * yp + srcSurface;
destP = destSurface;
Red = zoom;
_width = width;
Red_x = 0;
Red_y = 0;
if (zoom < 100) {
for (int yCtr = 0; yCtr < height; ++yCtr, srcP += _lineNbr2) {
Red_y += Red;
if (Red_y < 100) {
Red_x = 0;
const byte *lineSrcP = srcP;
for (int xCtr = 0; xCtr < _width; ++xCtr) {
Red_x += Red;
if (Red_x < 100) {
*destP++ = *lineSrcP++;
} else {
Red_x -= 100;
++lineSrcP;
}
}
} else {
Red_y -= 100;
}
}
}
}
/**
* Draw horizontal line
*/
void GraphicsManager::drawHorizontalLine(byte *surface, int xp, int yp, unsigned int width, byte col) {
memset(surface + xp + _lineNbr2 * yp, col, width);
}
/**
* Draw vertical line
*/
void GraphicsManager::drawVerticalLine(byte *surface, int xp, int yp, int height, byte col) {
byte *destP = surface + xp + _lineNbr2 * yp;
for (int yCtr = height; yCtr; yCtr--) {
*destP = col;
destP += _lineNbr2;
}
}
void GraphicsManager::setModeVesa() {
setGraphicalMode(640, 480);
}
} // End of namespace Hopkins