mirror of
https://github.com/libretro/scummvm.git
synced 2024-12-18 07:39:08 +00:00
421 lines
8.8 KiB
C++
421 lines
8.8 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.
|
|
*
|
|
*/
|
|
|
|
/*
|
|
* This code is based on original Mortville Manor DOS source code
|
|
* Copyright (c) 1988-1989 Lankhor
|
|
*/
|
|
|
|
#include "common/scummsys.h"
|
|
#include "common/str.h"
|
|
#include "common/textconsole.h"
|
|
#include "mortevielle/level15.h"
|
|
#include "mortevielle/menu.h"
|
|
#include "mortevielle/mortevielle.h"
|
|
#include "mortevielle/mouse.h"
|
|
#include "mortevielle/sprint.h"
|
|
#include "mortevielle/var_mor.h"
|
|
|
|
namespace Mortevielle {
|
|
|
|
/* NIVEAU 14*/
|
|
|
|
/* overlay */ void menut(int no, Common::String nom) {
|
|
byte h, l;
|
|
Common::String s;
|
|
|
|
|
|
/* debug('menut'); */
|
|
h = hi(no);
|
|
l = lo(no);
|
|
s = nom;
|
|
if (! tesok) {
|
|
clrscr;
|
|
mortevielle_exit(0);
|
|
}
|
|
while (s.size() < 20) s = s + ' ';
|
|
switch (h) {
|
|
case invent :
|
|
if (l != 7) {
|
|
inv[l] = s;
|
|
inv[l].insertChar(' ', 0);
|
|
}
|
|
break;
|
|
case depla :
|
|
dep[l] = s;
|
|
break;
|
|
case action :
|
|
act[l] = s;
|
|
break;
|
|
case saction :
|
|
self_[l] = s;
|
|
break;
|
|
case discut :
|
|
dis[l] = s;
|
|
break;
|
|
}
|
|
}
|
|
|
|
/* overlay */ void menu_disable(int no) {
|
|
byte h, l;
|
|
|
|
/* debug('menu_disable'); */
|
|
h = hi(no);
|
|
l = lo(no);
|
|
switch (h) {
|
|
case invent : {
|
|
if (l > 6) {
|
|
inv[l].setChar('<', 0);
|
|
inv[l].setChar('>', 21);
|
|
} else inv[l].setChar('*', 0);
|
|
}
|
|
break;
|
|
case depla :
|
|
dep[l].setChar('*', 0);
|
|
break;
|
|
case action :
|
|
act[l].setChar('*', 0);
|
|
break;
|
|
case saction :
|
|
self_[l].setChar('*', 0);
|
|
break;
|
|
case discut :
|
|
dis[l].setChar('*', 0);
|
|
break;
|
|
}
|
|
}
|
|
|
|
/* overlay */ void menu_enable(int no) {
|
|
byte h, l;
|
|
|
|
/* debug('menu_disable'); */
|
|
h = hi(no);
|
|
l = lo(no);
|
|
switch (h) {
|
|
case invent : {
|
|
inv[l].setChar(' ', 0);
|
|
inv[l].setChar(' ', 21);
|
|
}
|
|
break;
|
|
case depla :
|
|
dep[l].setChar(' ', 0);
|
|
break;
|
|
case action :
|
|
act[l].setChar(' ', 0);
|
|
break;
|
|
case saction : {
|
|
self_[l].setChar(' ', 0);
|
|
self_[l].setChar(' ', 0);
|
|
}
|
|
break;
|
|
case discut :
|
|
dis[l].setChar(' ', 0);
|
|
break;
|
|
}
|
|
}
|
|
|
|
void menu_aff() {
|
|
int ind_tabl, k, col;
|
|
// char c;
|
|
int pt, x, y, color, msk,
|
|
num_letr;
|
|
|
|
/* debug('menu_aff'); */
|
|
hide_mouse();
|
|
/*if not tesok then
|
|
begin
|
|
clrscr;
|
|
halt;
|
|
end;*/
|
|
box(7, gd, 0, 0, 639, 10, 255);
|
|
col = 28 * res;
|
|
if (gd == cga) color = 1;
|
|
else color = 9;
|
|
num_letr = 0;
|
|
do { /* lettre par lettre */
|
|
num_letr = num_letr + 1;
|
|
ind_tabl = 0;
|
|
y = 1;
|
|
do { /* colonne par colonne */
|
|
k = 0;
|
|
x = col;
|
|
do { /* ligne par ligne */
|
|
msk = 0x80;
|
|
for (pt = 0; pt <= 7; pt ++) {
|
|
if ((lettres[num_letr - 1][ind_tabl] & msk) != 0) {
|
|
putpix(gd, x + 1, y + 1, 0);
|
|
putpix(gd, x, y + 1, 0);
|
|
putpix(gd, x, y, color);
|
|
}
|
|
msk = (uint)msk >> 1;
|
|
x = x + 1;
|
|
}
|
|
ind_tabl = succ(int, ind_tabl);
|
|
k = succ(int, k);
|
|
} while (!(k == 3));
|
|
y = y + 1;
|
|
} while (!(y == 9));
|
|
col = col + 48 * res;
|
|
} while (!(num_letr == 6));
|
|
show_mouse();
|
|
}
|
|
|
|
|
|
void draw_menu() {
|
|
/* debug('draw_menu'); */
|
|
menu_aff();
|
|
active_menu = true;
|
|
msg4 = no_choice;
|
|
msg3 = no_choice;
|
|
choisi = false;
|
|
g_vm->setMouseClick(false);
|
|
test0 = false;
|
|
}
|
|
|
|
void invers(int ix) {
|
|
Common::String s;
|
|
|
|
/* debug('invers'); */
|
|
if (msg4 == no_choice) return;
|
|
putxy(don[msg3][1] << 3, succ(void, lo(msg4)) << 3);
|
|
switch (msg3) {
|
|
case 1 :
|
|
s = inv[lo(msg4)];
|
|
break;
|
|
case 2 :
|
|
s = dep[lo(msg4)];
|
|
break;
|
|
case 3 :
|
|
s = act[lo(msg4)];
|
|
break;
|
|
case 4 :
|
|
s = self_[lo(msg4)];
|
|
break;
|
|
case 5 :
|
|
s = dis[lo(msg4)];
|
|
break;
|
|
case 6 :
|
|
s = fic[lo(msg4)];
|
|
break;
|
|
case 7 :
|
|
s = fic[1];
|
|
s += ' ';
|
|
s += (char)(48 + lo(msg4));
|
|
break;
|
|
case 8 :
|
|
if (lo(msg4) == 1) {
|
|
s = recom;
|
|
} else {
|
|
s = fic[2];
|
|
s += ' ';
|
|
s += (char)(47 + lo(msg4));
|
|
}
|
|
break;
|
|
}
|
|
if ((s[0] != '*') && (s[0] != '<'))
|
|
writeg(s, ix);
|
|
else
|
|
msg4 = no_choice;
|
|
}
|
|
|
|
void util(int x, int y) {
|
|
int ymx, dxcar, xmn, xmx, ix;
|
|
|
|
/* debug('util'); */
|
|
ymx = (don[msg3][4] << 3) + 16;
|
|
dxcar = don[msg3][3];
|
|
xmn = (don[msg3][1] << 2) * res;
|
|
if (res == 1) ix = 5;
|
|
else ix = 3;
|
|
xmx = dxcar * ix * res + xmn + 2;
|
|
if ((x > xmn) && (x < xmx) && (y < ymx) && (y > 15)) {
|
|
ix = pred(int, ((uint)y >> 3)) + (msg3 << 8);
|
|
if (ix != msg4) {
|
|
invers(1);
|
|
msg4 = ix;
|
|
invers(0);
|
|
}
|
|
} else if (msg4 != no_choice) {
|
|
invers(1);
|
|
msg4 = no_choice;
|
|
}
|
|
}
|
|
|
|
void menu_down(int ii) {
|
|
int cx, xcc;
|
|
int xco, nb_lig;
|
|
|
|
/* debug('menu_down'); */
|
|
|
|
// Make a copy of the current screen surface for later restore
|
|
g_vm->_backgroundSurface.copyFrom(g_vm->_screenSurface);
|
|
|
|
// Draw the menu
|
|
xco = don[ii][1];
|
|
nb_lig = don[ii][4];
|
|
hide_mouse();
|
|
sauvecr(10, succ(byte, don[ii][2]) << 1);
|
|
xco = xco << 3;
|
|
if (res == 1) cx = 10;
|
|
else cx = 6;
|
|
xcc = xco + (don[ii][3] * cx) + 6;
|
|
box(15, gd, xco, 12, xcc, 10 + (don[ii][2] << 1), 255);
|
|
box(0, gd, xcc, 12, xcc + 4, 10 + (don[ii][2] << 1), 255);
|
|
box(0, gd, xco, 8 + (don[ii][2] << 1), xcc + 4, 12 + (don[ii][2] << 1), 255);
|
|
putxy(xco, 16);
|
|
cx = 0;
|
|
do {
|
|
cx = succ(int, cx);
|
|
switch (ii) {
|
|
case 1 :
|
|
if (inv[cx][0] != '*') writeg(inv[cx], 4);
|
|
break;
|
|
case 2 :
|
|
if (dep[cx][0] != '*') writeg(dep[cx], 4);
|
|
break;
|
|
case 3 :
|
|
if (act[cx][0] != '*') writeg(act[cx], 4);
|
|
break;
|
|
case 4 :
|
|
if (self_[cx][0] != '*') writeg(self_[cx], 4);
|
|
break;
|
|
case 5 :
|
|
if (dis[cx][0] != '*') writeg(dis[cx], 4);
|
|
break;
|
|
case 6 :
|
|
writeg(fic[cx], 4);
|
|
break;
|
|
case 7 : {
|
|
Common::String s = fic[1];
|
|
s += ' ';
|
|
s += (char)(48 + cx);
|
|
writeg(s, 4);
|
|
break;
|
|
}
|
|
case 8 :
|
|
if (cx == 1)
|
|
writeg(recom, 4);
|
|
else {
|
|
Common::String s = fic[2];
|
|
s += ' ';
|
|
s += (char)(47 + cx);
|
|
writeg(s, 4);
|
|
}
|
|
break;
|
|
}
|
|
putxy(xco, ywhere + 8);
|
|
} while (!(cx == nb_lig));
|
|
test0 = true;
|
|
show_mouse();
|
|
}
|
|
|
|
void menu_up(int xx) {
|
|
/* debug('menu_up'); */
|
|
if (test0) {
|
|
charecr(10, succ(byte, don[xx][2]) << 1);
|
|
|
|
/* Restore the background area */
|
|
assert(g_vm->_screenSurface.pitch == g_vm->_backgroundSurface.pitch);
|
|
|
|
// Get a pointer to the source and destination of the area to restore
|
|
const byte *pSrc = (const byte *)g_vm->_backgroundSurface.getBasePtr(0, 10);
|
|
Graphics::Surface destArea = g_vm->_screenSurface.lockArea(Common::Rect(0, 10, SCREEN_WIDTH, SCREEN_HEIGHT));
|
|
byte *pDest = (byte *)destArea.getBasePtr(0, 0);
|
|
|
|
// Copy the data
|
|
Common::copy(pSrc, pSrc + (400 - 10) * SCREEN_WIDTH, pDest);
|
|
|
|
test0 = false;
|
|
}
|
|
}
|
|
|
|
void erase_menu() {
|
|
/* debug('erase_menu'); */
|
|
active_menu = false;
|
|
g_vm->setMouseClick(false);
|
|
menu_up(msg3);
|
|
}
|
|
|
|
void mdn() {
|
|
//int x, y, c, a, ix;
|
|
int x, y, ix;
|
|
bool tes;
|
|
|
|
/* debug('mdn'); */
|
|
if (! active_menu) return;
|
|
x = x_s;
|
|
y = y_s;
|
|
if (!g_vm->getMouseClick()) {
|
|
if ((x == xprec) &&
|
|
(y == yprec)) return;
|
|
else {
|
|
xprec = x;
|
|
yprec = y;
|
|
}
|
|
tes = (y < 11) && ((x >= (28 * res) && x <= (28 * res + 24))
|
|
|| (x >= (76 * res) && x <= (76 * res + 24))
|
|
|| ((x > 124 * res) && (x < 124 * res + 24))
|
|
|| ((x > 172 * res) && (x < 172 * res + 24))
|
|
|| ((x > 220 * res) && (x < 220 * res + 24))
|
|
|| ((x > 268 * res) && (x < 268 * res + 24)));
|
|
if (tes) {
|
|
if (x < 76 * res) ix = invent;
|
|
else if (x < 124 * res) ix = depla;
|
|
else if (x < 172 * res) ix = action;
|
|
else if (x < 220 * res) ix = saction;
|
|
else if (x < 268 * res) ix = discut;
|
|
else ix = fichier;
|
|
if ((ix != msg3) || (! test0))
|
|
if (!((ix == fichier) && ((msg3 == sauve) || (msg3 == charge)))) {
|
|
menu_up(msg3);
|
|
menu_down(ix);
|
|
msg3 = ix;
|
|
msg4 = no_choice;
|
|
}
|
|
} else { /* Not in the MenuTitle line */
|
|
if ((y > 11) && (test0)) util(x, y);
|
|
}
|
|
} else /* There was a click */
|
|
if ((msg3 == fichier) && (msg4 != no_choice)) {
|
|
// Another menu to be displayed
|
|
g_vm->setMouseClick(false);
|
|
menu_up(msg3);
|
|
if (lo(msg4) == 1) msg3 = 7;
|
|
else msg3 = 8;
|
|
menu_down(msg3);
|
|
|
|
g_vm->setMouseClick(false);
|
|
} else {
|
|
// A menu was clicked on
|
|
choisi = (test0) && (msg4 != no_choice);
|
|
menu_up(msg3);
|
|
msg[4] = msg4;
|
|
msg[3] = msg3;
|
|
msg3 = no_choice;
|
|
msg4 = no_choice;
|
|
|
|
g_vm->setMouseClick(false);
|
|
}
|
|
}
|
|
|
|
} // End of namespace Mortevielle
|