/* 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.
 *
 */
/**************************************************************************
 *                                     НННННННННННННННННННННННННННННННННН *
 *                                             Nayma Software srl         *
 *                    e                -= We create much MORE than ALL =- *
 *        u-        z$$$c        '.    НННННННННННННННННННННННННННННННННН *
 *      .d"        d$$$$$b        "b.                                     *
 *   .z$*         d$$$$$$$L        ^*$c.                                  *
 *  #$$$.         $$$$$$$$$         .$$$" Project: Roasted Moths........  *
 *    ^*$b       4$$$$$$$$$F      .d$*"                                   *
 *      ^$$.     4$$$$$$$$$F     .$P"     Module:  Font.CPP.............  *
 *        *$.    '$$$$$$$$$     4$P 4                                     *
 *     J   *$     "$$$$$$$"     $P   r    Author:  Giovanni Bajo........  *
 *    z$   '$$$P*4c.*$$$*.z@*R$$$    $.                                   *
 *   z$"    ""       #$F^      ""    '$c                                  *
 *  z$$beu     .ue="  $  "=e..    .zed$$c                                 *
 *      "#$e z$*"   .  `.   ^*Nc e$""                                     *
 *         "$$".  .r"   ^4.  .^$$"                                        *
 *          ^.@*"6L=\ebu^+C$"*b."                                         *
 *        "**$.  "c 4$$$  J"  J$P*"    OS:  [ ] DOS  [X] WIN95  [ ] PORT  *
 *            ^"--.^ 9$"  .--""      COMP:  [ ] WATCOM  [X] VISUAL C++    *
 *                    "                     [ ] EIFFEL  [ ] GCC/GXX/DJGPP *
 *                                                                        *
 * This source code is Copyright (C) Nayma Software.  ALL RIGHTS RESERVED *
 *                                                                        *
 **************************************************************************/

#include "common/textconsole.h"
#include "tony/mpal/mpalutils.h"
#include "tony/mpal/stubs.h"
#include "tony/font.h"
#include "tony/input.h"
#include "tony/inventory.h"
#include "tony/loc.h"
#include "tony/tony.h"

namespace Tony {

/****************************************************************************\
*       Metodi di RMFont
\****************************************************************************/

RMFont::RMFont() {
	m_letter = NULL;
}

RMFont::~RMFont() {
	Unload();
}

/****************************************************************************\
*
* Function:     void RMFont::Load(byte *buf, int nChars, int dimx, int dimy);
*
* Description:  Carica un font da buffer
*
* Input:        byte *buf              Buffer contenente il font
*               int nChars              Numero di caratteri (max 256)
*               int dimx,dimy           Dimensione in pixel di un carattere
*
\****************************************************************************/

void DumpFontBMP(const char *filename, const byte *buf, int nChars, int charX, int charY, byte *pal) {
	error("DumpFontBMP not supported in ScummVM");
}


void RMFont::Load(const byte *buf, int nChars, int dimx, int dimy, uint32 palResID) {
	m_letter = new RMGfxSourceBuffer8RLEByte[nChars];

#if 0
	if (nChars == 112 && palResID == RES_F_PAL) {
		// Font parla
		DumpFontBMP("font_parla.bmp", buf, nChars, dimx, dimy, RMRes(palResID));
	}
	else if (nChars == 102 && palResID == RES_F_PAL) {
		// Font macc
		DumpFontBMP("font_macc.bmp", buf, nChars, dimx, dimy, RMRes(palResID));
	} else if (nChars == 85 && palResID == RES_F_PAL) {
		// Font obj
		DumpFontBMP("font_obj.bmp", buf, nChars, dimx, dimy, RMRes(palResID));
	} else if (nChars == 112 && palResID == RES_F_CPAL) {
		// Font credits
		DumpFontBMP("font_credits.bmp", buf, nChars, dimx, dimy, RMRes(palResID));		
	}
#endif

	// Carichiamoce 'sto font
	for (int i = 0; i < nChars; i++) {
		// Inizializza il buffer con le lettere
		m_letter[i].Init(buf + i * (dimx * dimy + 8) + 8, dimx, dimy);
		m_letter[i].LoadPaletteWA(palResID);
	}

	m_fontDimx = dimx;
	m_fontDimy = dimy;

	nLetters=nChars;
}

void RMFont::Load(uint32 resID, int nChars, int dimx, int dimy, uint32 palResID) {
	RMRes res(resID);

	if ((int)res.Size() < nChars * (dimy * dimx + 8))
		nChars = res.Size() / (dimy * dimx + 8);

	Load(res, nChars, dimx, dimy, palResID);
}

void RMFont::Unload(void) {
	if (m_letter != NULL) {
		delete[] m_letter;
		m_letter = NULL;
	}
}


RMGfxPrimitive *RMFont::MakeLetterPrimitive(byte bChar, int &nLength) {
	RMFontPrimitive *prim;
	int nLett;

	// Converte da carattere a lettera
	nLett = ConvertToLetter(bChar);

	// Crea la primitiva per il font
	prim = new RMFontPrimitive(this);
	prim->m_nChar = nLett;

	// Si fa' dare la lunghezza della lettera in pixel
	nLength = LetterLength(bChar);

	return prim;
}

void RMFont::Draw(RMGfxTargetBuffer &bigBuf, RMGfxPrimitive *prim2) {
  RMFontPrimitive *prim = (RMFontPrimitive *)prim2;

  // Richiama la Draw della lettera assegnata alla primitiva
  if (prim->m_nChar != -1)
	  m_letter[prim->m_nChar].Draw(bigBuf,prim);
}

void RMFont::Close(void) {
	Unload();
}

int RMFont::StringLen(RMString text) {
	int len, i;

	len = 0;
	for (i = 0; i < text.Length() - 1; i++)
		len += LetterLength(text[i], text[i + 1]);
	len += LetterLength(text[i]);

	return len;
}

int RMFont::StringLen(char bChar, char bNext) {
	return LetterLength(bChar, bNext);
}

/****************************************************************************\
*       Metodi di RMFontColor
\****************************************************************************/

RMFontColor::RMFontColor() : RMFont() {
 m_r = m_g = m_b = 255;
}

RMFontColor::~RMFontColor() {

}

void RMFontColor::SetBaseColor(byte r1, byte g1, byte b1) {
	int r = (int)r1 << 16;
	int g = (int)g1 << 16;
	int b = (int)b1 << 16;

	int rstep = r / 14;
	int gstep = g / 14;
	int bstep = b / 14;

	int i;
	byte pal[768*3];

	// Controlla se siamo gia' sul colore giusto
	if (m_r == r1 && m_g == g1 && m_b == b1)
		return;

	m_r = r1;
	m_g = g1;
	m_b = b1;

	// Costruisce la nuova palette per il font
	for (i = 1; i < 16; i++) {
		pal[i * 3 + 0] = r >> 16;	
		pal[i * 3 + 1] = g >> 16;	
		pal[i * 3 + 2] = b >> 16;	

		r -= rstep;
		g -= gstep;
		b -= bstep;
	}

	pal[15*3 + 0] += 8;
	pal[15*3 + 1] += 8;
	pal[15*3 + 2] += 8;

	// La mette in tutte le lettere
	for (i = 0; i < nLetters; i++)
		m_letter[i].LoadPaletteWA(pal);
}


/***************************************************************************\
*       Metodi di RMFontParla
\****************************************************************************/

void RMFontParla::Init(void) {
	int i;

	// bernie: numero di caratteri nel font
	int nchars =
		 112	// base
		+ 18	// polish
		+ 66	// russian
		+ 30	// czech
		+  8	// french
		+  5;	// deutsch

	Load(RES_F_PARL, nchars, 20, 20);

	// Inizializziamo le tabelline del cazzo
	lDefault = 13;
	hDefault = 18;
	Common::fill(&l2Table[0][0], &l2Table[0][0] + (256 * 256), '\0');
	for (i = 0; i < 256; i++) {
		cTable[i] = -1;
		lTable[i] = lDefault;
	}

	for (i = 0; i < 26; i++)
		cTable['A' + i] = i + 0;

	for (i = 0; i < 26; i++)
		cTable['a' + i] = i + 26;

	for (i = 0; i < 10; i++)
		cTable['0' + i] = i + 52;

	cTable[';'] = 62;
	cTable[','] = 63;
	cTable['.'] = 64;
	cTable[':'] = 65;
	cTable['-'] = 66;
	cTable['_'] = 67;
	cTable['+'] = 68;
	cTable['<'] = 69;
	cTable['>'] = 70;
	cTable['!'] = 71;
	//cTable['!'] = 72;  Esclamativo alla rovescia
	cTable['?'] = 73;
	//cTable['?'] = 74;  Interrogativo alla rovescia
	cTable['('] = 75;
	cTable[')'] = 76;
	cTable['\"'] = 77;
	cTable['^'] = 77;
	cTable['/'] = 78;
	cTable['Ј'] = 79;
	cTable['$'] = 80;
	cTable['%'] = 81;
	cTable['&'] = 82;
	cTable['='] = 83;
	cTable['«'] = 84;
	cTable['»'] = 85;
	cTable['®'] = 86;
	cTable['©'] = 87;
	cTable['а'] = 88;
	cTable['и'] = 89;
	cTable['й'] = 89;
	cTable['м'] = 90;
	cTable['т'] = 91;
	cTable['щ'] = 92;
	cTable['д'] = 93;
	cTable['л'] = 94;
	cTable['п'] = 95;
	cTable['ц'] = 96;
	cTable['ь'] = 97;
	cTable['я'] = 98;
	cTable['е'] = 99;
	//cTable[' '] = 100;  e cerchietto
	//cTable[' '] = 101;  i cerchietto
	//cTable[' '] = 102;  o cerchietto
	//cTable[' '] = 103;  u cerchietto
	cTable['с'] = 104;
	cTable['С'] = 105;
	cTable['з'] = 106;
	cTable['ж'] = 107;
	cTable['Ж'] = 108;
	cTable['ш'] = 109;
	//cTable['ѓ'] = 110;  integrale 
	cTable['\''] = 111; 

	// Un po' di lunghezze
	lTable[' '] = 9;
	lTable['\''] = 5;
	lTable['.'] = 5;
	lTable[','] = 5;
	lTable[':'] = 5;
	lTable[';'] = 5;
	lTable['!'] = 5;
	lTable['?'] = 10;
	lTable['\"'] = 5;
	lTable['^'] = 5;
	lTable['('] = 7;
	lTable[')'] = 7;

	lTable['4'] = 10;

	lTable['a'] = 14;
	lTable['b'] = 15;
	lTable['c'] = 12;
	lTable['e'] = 12;
	lTable['i'] = 6;
	lTable['м'] = 6;
	lTable['l'] = 5;
	lTable['m'] = 16;
	lTable['n'] = 12;
	lTable['o'] = 11;
	lTable['p'] = 11;
	lTable['s'] = 12;
	lTable['u'] = 12;

	lTable['E'] = 10;
	lTable['F'] = 11;


	// Polish characters
	//AaCcEeLlNnOoSsZzZz
	//Ґ№ЖжКкЈіСсУуЊњЇїЏџ
	
	cTable['Ґ'] = 112;
	cTable['№'] = 113;
	cTable['Ж'] = 114;
	cTable['ж'] = 115;
	cTable['К'] = 116;
	cTable['к'] = 117;
	cTable['Ј'] = 118;
	cTable['і'] = 119;
	cTable['С'] = 120;
	cTable['с'] = 121;
	cTable['У'] = 122;
	cTable['у'] = 123;
	cTable['Њ'] = 124;
	cTable['њ'] = 125;
	cTable['Ї'] = 126;
	cTable['ї'] = 127;
	cTable['Џ'] = 128;
	cTable['џ'] = 129;

	lTable['Ґ'] = 14;
	lTable['№'] = 16;
	lTable['Ж'] = 12;
	lTable['ж'] = 12;
	lTable['К'] = 11;
	lTable['к'] = 12;
	lTable['Ј'] = 14;
	lTable['і'] = 9;
	lTable['С'] = 10;
	lTable['с'] = 11;
	lTable['У'] = 13;
	lTable['у'] = 11;
	lTable['Њ'] = 12;
	lTable['њ'] = 12;
	lTable['Ї'] = 13;
	lTable['ї'] = 13;
	lTable['Џ'] = 14;
	lTable['џ'] = 13;

#ifdef FONT_RUSSIAN
	// Russian Characters
	// WARNING: Il russo usa molti dei caratteri ISO-Latin-1 che servono
	// per le altre traduzioni. Per compilare Tony in altre lingue,
	// commentare via queste definizioni.

	cTable['А'] = 130;
	cTable['Б'] = 131;
	cTable['В'] = 132;
	cTable['Г'] = 133;
	cTable['Д'] = 134;
	cTable['Е'] = 135;
	cTable['Ё'] = 136;
	cTable['Ж'] = 137;
	cTable['З'] = 138;
	cTable['И'] = 139;
	cTable['Й'] = 140;
	cTable['К'] = 141;
	cTable['Л'] = 142;
	cTable['М'] = 143;
	cTable['Н'] = 144;
	cTable['О'] = 145;
	cTable['П'] = 146;
	cTable['Р'] = 147;
	cTable['С'] = 148;
	cTable['Т'] = 149;
	cTable['У'] = 150;
	cTable['Ф'] = 151;
	cTable['Х'] = 152;
	cTable['Ц'] = 153;
	cTable['Ч'] = 154;
	cTable['Ш'] = 155;
	cTable['Щ'] = 156;
	cTable['Ь'] = 157;
	cTable['Ъ'] = 158;
	cTable['Ы'] = 159;
	cTable['Э'] = 160;
	cTable['Ю'] = 161;
	cTable['Я'] = 162;

	cTable['а'] = 163;
	cTable['б'] = 164;
	cTable['в'] = 165;
	cTable['г'] = 166;
	cTable['д'] = 167;
	cTable['е'] = 168;
	cTable['ё'] = 169;
	cTable['ж'] = 170;
	cTable['з'] = 171;
	cTable['и'] = 172;
	cTable['й'] = 173;
	cTable['к'] = 174;
	cTable['л'] = 175;
	cTable['м'] = 176;
	cTable['н'] = 177;
	cTable['о'] = 178;
	cTable['п'] = 179;
	cTable['р'] = 180;
	cTable['с'] = 181;
	cTable['т'] = 182;
	cTable['у'] = 183;
	cTable['ф'] = 184;
	cTable['х'] = 185;
	cTable['ц'] = 186;
	cTable['ч'] = 187;
	cTable['ш'] = 188;
	cTable['щ'] = 189;
	cTable['ь'] = 190;
	cTable['ъ'] = 191;
	cTable['ы'] = 192;
	cTable['э'] = 193;
	cTable['ю'] = 194;
	cTable['я'] = 195;

	lTable['А'] = 13;
	lTable['Б'] = 15;
	lTable['В'] = 15;
	lTable['Г'] = 11;
	lTable['Д'] = 15;
	lTable['Е'] = 11;
	lTable['Ё'] = 11;
	lTable['Ж'] = 15;
	lTable['З'] = 10;
	lTable['И'] = 13;
	lTable['Й'] = 13;
	lTable['К'] = 12;
	lTable['Л'] = 13;
	lTable['М'] = 14;
	lTable['Н'] = 14;
	lTable['О'] = 13;
	lTable['П'] = 11;
	lTable['Р'] = 12;
	lTable['С'] = 12;
	lTable['Т'] = 18;
	lTable['У'] = 11;
	lTable['Ф'] = 13;
	lTable['Х'] = 12;
	lTable['Ц'] = 13;
	lTable['Ч'] = 12;
	lTable['Ш'] = 17;
	lTable['Щ'] = 18;
	lTable['Ь'] = 16;
	lTable['Ъ'] = 18;	
	lTable['Ы'] = 19;
	lTable['Э'] = 11;
	lTable['Ю'] = 16;
	lTable['Я'] = 14;

	lTable['а'] = 14;
	lTable['б'] = 15;
	lTable['в'] = 10;
	lTable['г'] = 12;
	lTable['д'] = 13;
	lTable['е'] = 12;
	lTable['ё'] = 12;
	lTable['ж'] = 12;
	lTable['з'] = 10;
	lTable['и'] = 10;
	lTable['й'] = 10;
	lTable['к'] = 11;
	lTable['л'] = 12;
	lTable['м'] = 12;
	lTable['н'] = 12;
	lTable['о'] = 12;
	lTable['п'] = 10;
	lTable['р'] = 11;
	lTable['с'] = 10;
	lTable['т'] = 14;
	lTable['у'] =  8;
	lTable['ф'] = 11;
	lTable['х'] = 11;
	lTable['ц'] = 12;
	lTable['ч'] = 10;
	lTable['ш'] = 15;
	lTable['щ'] = 16;
	lTable['ь'] = 14;
	lTable['ъ'] = 16;
	lTable['ы'] = 16;
	lTable['э'] =  9;
	lTable['ю'] = 15;
	lTable['я'] = 14;

#endif // FONT_RUSSIAN

#ifdef FONT_CZECH

	cTable['М'] = 196;
	cTable['Љ'] = 197;
	cTable['И'] = 198;
	cTable['Ш'] = 199;
	cTable['Ћ'] = 200;
	cTable['Э'] = 201;
	cTable['Б'] = 202;
	cTable['Н'] = 203;
	cTable['Й'] = 204;
	cTable['П'] = 205;
	cTable['Ќ'] = 206;
	cTable['Т'] = 207;
	cTable['У'] = 208;
	cTable['Щ'] = 209;
	cTable['Ъ'] = 210;

	cTable['м'] = 211;
	cTable['љ'] = 212;
	cTable['и'] = 213;
	cTable['ш'] = 214;
	cTable['ћ'] = 215;
	cTable['э'] = 216;
	cTable['б'] = 217;
	cTable['н'] = 218;
	cTable['й'] = 219;
	cTable['п'] = 220;
	cTable['ќ'] = 221;
	cTable['т'] = 222;
	cTable['у'] = 223;
	cTable['щ'] = 224;
	cTable['ъ'] = 225;

	lTable['М'] = 11;
	lTable['Љ'] = 12;
	lTable['И'] = 12;
	lTable['Ш'] = 14;
	lTable['Ћ'] = 13;
	lTable['Э'] = 11;
	lTable['Б'] = 13;
	lTable['Н'] = 11;
	lTable['Й'] = 11;
	lTable['П'] = 15;
	lTable['Ќ'] = 19;
	lTable['Т'] = 10;
	lTable['У'] = 13;
	lTable['Щ'] = 13;
	lTable['Ъ'] = 13;

	lTable['м'] = 12;
	lTable['љ'] = 12;
	lTable['и'] = 12;
	lTable['ш'] = 12;
	lTable['ћ'] = 13;
	lTable['э'] = 11;
	lTable['б'] = 15;
	lTable['н'] = 7;
	lTable['й'] = 12;
	lTable['п'] = 17;
	lTable['ќ'] = 16;
	lTable['т'] = 11;
	lTable['у'] = 11;
	lTable['щ'] = 13;
	lTable['ъ'] = 13;

#endif // FONT_CZECH

#ifdef FONT_FRENCH
	cTable['в'] = 226;
	cTable['й'] = 227;
	cTable['к'] = 228;
	cTable['о'] = 229;
	cTable['щ'] = 230;
	cTable['ы'] = 231;
	cTable['ф'] = 232;
	cTable['ц'] = 233;

	lTable['в'] = 15;
	lTable['й'] = 12;
	lTable['к'] = 12;
	lTable['о'] =  9;
	lTable['щ'] = 13;
	lTable['ы'] = 13;
	lTable['ф'] = 11;
	lTable['ц'] = 11;

#endif // FONT_FRENCH

#ifdef FONT_GERMAN
	cTable['Я'] = 234;
	// 'SS' = 235
	cTable['Д'] = 236;
	cTable['Ц'] = 237;
	cTable['Ь'] = 238;

	lTable['Я'] = 15;

#endif // FONT_GERMAN
}


/***************************************************************************\
*       Metodi di RMFontMacc
\****************************************************************************/

void RMFontMacc::Init(void) {
	int i;

	// bernie: numero di caratteri nel font
	int nchars =
		 102	// base
		+ 18	// polish
		+ 66	// russian
		+ 30	// czech
		+  8	// francais
		+  5;	// deutsch


	Load(RES_F_MACC, nchars, 11, 16);

	// Default
	lDefault = 10;
	hDefault = 17;
	Common::fill(&l2Table[0][0], &l2Table[0][0] + (256 * 256), '\0');
	
	for (i = 0; i < 256; i++) {
		cTable[i] = -1;
		lTable[i] = lDefault;
	}

	for (i = 0; i < 26; i++)
		cTable['A'+i] = i + 0;

	for (i = 0; i < 26; i++)
		cTable['a'+i] = i + 26;

	for (i = 0; i < 10; i++)
		cTable['0'+i] = i + 52;

	cTable['!'] = 62;
	//cTable['!'] = 63;			// ! rovescia
	cTable['\"'] = 64;		
	cTable['$'] = 65;		
	cTable['%'] = 66;		
	cTable['&'] = 67;		
	cTable['/'] = 68;		
	cTable['('] = 69;		
	cTable[')'] = 70;		
	cTable['='] = 71;		
	cTable['?'] = 72;		
	//cTable['?'] = 73;		   // ? rovescia
	cTable['*'] = 74;		
	cTable['+'] = 75;		
	cTable['с'] = 76;		
	cTable[';'] = 77;		
	cTable[','] = 78;		
	cTable['.'] = 79;
	cTable[':'] = 80;		
	cTable['-'] = 81;		
	cTable['<'] = 82;
	cTable['>'] = 83;
	cTable['/'] = 84;
	cTable['я'] = 85;
	cTable['а'] = 86;
	cTable['д'] = 87;
	cTable['е'] = 88;
	cTable['и'] = 89;
	cTable['л'] = 90;
	//cTable[''] = 91;		  // e col pallino
	cTable['м'] = 92;		
	cTable['п'] = 93;		
	//cTable[''] = 94;			// i col pallino
	cTable['т'] = 95;		
	cTable['ц'] = 96;		
	//cTable[''] = 97;		  // o col pallino
	cTable['щ'] = 98;		
	cTable['ь'] = 99;		
	//cTable[''] = 100;		  // u col pallino
	cTable['з'] = 101;		

	// Polish characters
	//AaCcEeLlNnOoSsZzZz
	//Ґ№ЖжКкЈіСсУуЊњЇїЏџ
	
	cTable['Ґ'] = 102;
	cTable['№'] = 103;
	cTable['Ж'] = 104;
	cTable['ж'] = 105;
	cTable['К'] = 106;
	cTable['к'] = 107;
	cTable['Ј'] = 108;
	cTable['і'] = 109;
	cTable['С'] = 110;
	cTable['с'] = 111;
	cTable['У'] = 112;
	cTable['у'] = 113;
	cTable['Њ'] = 114;
	cTable['њ'] = 115;
	cTable['Ї'] = 116;
	cTable['ї'] = 117;
	cTable['Џ'] = 118;
	cTable['џ'] = 119;
	
	lTable['Ґ'] = 14;
	lTable['№'] = 16;
	lTable['Ж'] = 12;
	lTable['ж'] = 12;
	lTable['К'] = 11;
	lTable['к'] = 12;
	lTable['Ј'] = 14;
	lTable['і'] = 9;
	lTable['С'] = 10;
	lTable['с'] = 11;
	lTable['У'] = 13;
	lTable['у'] = 11;
	lTable['Њ'] = 12;
	lTable['њ'] = 12;
	lTable['Ї'] = 13;
	lTable['ї'] = 13;
	lTable['Џ'] = 14;
	lTable['џ'] = 13;


#ifdef FONT_RUSSIAN
	// Russian Characters
	// WARNING: Il russo usa molti dei caratteri ISO-Latin-1 che servono
	// per le altre traduzioni. Per compilare Tony in altre lingue,
	// commentare via queste definizioni.

	cTable['А'] = 120;
	cTable['Б'] = 121;
	cTable['В'] = 122;
	cTable['Г'] = 123;
	cTable['Д'] = 124;
	cTable['Е'] = 125;
	cTable['Ё'] = 126;
	cTable['Ж'] = 127;
	cTable['З'] = 128;
	cTable['И'] = 129;
	cTable['Й'] = 130;
	cTable['К'] = 131;
	cTable['Л'] = 132;
	cTable['М'] = 133;
	cTable['Н'] = 134;
	cTable['О'] = 135;
	cTable['П'] = 136;
	cTable['Р'] = 137;
	cTable['С'] = 138;
	cTable['Т'] = 139;
	cTable['У'] = 140;
	cTable['Ф'] = 141;
	cTable['Х'] = 142;
	cTable['Ц'] = 143;
	cTable['Ч'] = 144;
	cTable['Ш'] = 145;
	cTable['Щ'] = 146;
	cTable['Ь'] = 147;
	cTable['Ъ'] = 148;
	cTable['Ы'] = 149;
	cTable['Э'] = 150;
	cTable['Ю'] = 151;
	cTable['Я'] = 152;

	cTable['а'] = 153;
	cTable['б'] = 154;
	cTable['в'] = 155;
	cTable['г'] = 156;
	cTable['д'] = 157;
	cTable['е'] = 158;
	cTable['ё'] = 159;
	cTable['ж'] = 160;
	cTable['з'] = 161;
	cTable['и'] = 162;
	cTable['й'] = 163;
	cTable['к'] = 164;
	cTable['л'] = 165;
	cTable['м'] = 166;
	cTable['н'] = 167;
	cTable['о'] = 168;
	cTable['п'] = 169;
	cTable['р'] = 170;
	cTable['с'] = 171;
	cTable['т'] = 172;
	cTable['у'] = 173;
	cTable['ф'] = 174;
	cTable['х'] = 175;
	cTable['ц'] = 176;
	cTable['ч'] = 177;
	cTable['ш'] = 178;
	cTable['щ'] = 179;
	cTable['ь'] = 180;
	cTable['ъ'] = 181;
	cTable['ы'] = 182;
	cTable['э'] = 183;
	cTable['ю'] = 184;
	cTable['я'] = 185;

	lTable['А'] = 11;
	lTable['Б'] = 11;
	lTable['В'] = 11;
	lTable['Г'] = 9;
	lTable['Д'] = 10;
	lTable['Е'] = 10;
	lTable['Ё'] = 10;
	lTable['Ж'] = 11;
	lTable['З'] = 10;
	lTable['И'] = 10;
	lTable['Й'] = 10;
	lTable['К'] = 11;
	lTable['Л'] = 9;
	lTable['М'] = 11;
	lTable['Н'] = 10;
	lTable['О'] = 11;
	lTable['П'] = 8;
	lTable['Р'] = 10;
	lTable['С'] = 10;
	lTable['Т'] = 11;
	lTable['У'] = 11;
	lTable['Ф'] = 11;
	lTable['Х'] = 11;
	lTable['Ц'] = 10;
	lTable['Ч'] = 10;
	lTable['Ш'] = 10;
	lTable['Щ'] = 10;
	lTable['Ь'] = 11;
	lTable['Ъ'] = 11;
	lTable['Ы'] = 11;
	lTable['Э'] = 11;
	lTable['Ю'] = 11;
	lTable['Я'] = 11;

	lTable['а'] = 10;
	lTable['б'] = 10;
	lTable['в'] = 11;
	lTable['г'] = 10;
	lTable['д'] = 9;
	lTable['е'] = 10;
	lTable['ё'] = 9;
	lTable['ж'] = 10;
	lTable['з'] = 9;
	lTable['и'] = 11;
	lTable['й'] = 11;
	lTable['к'] = 11;
	lTable['л'] = 11;
	lTable['м'] = 11;
	lTable['н'] = 11;
	lTable['о'] = 10;
	lTable['п'] = 9;
	lTable['р'] = 11;
	lTable['с'] = 10;
	lTable['т'] = 9;
	lTable['у'] = 11;
	lTable['ф'] = 10;
	lTable['х'] = 11;
	lTable['ц'] = 10;
	lTable['ч'] = 10;
	lTable['ш'] = 11;
	lTable['щ'] = 11;
	lTable['ь'] = 10;
	lTable['ъ'] = 10;
	lTable['ы'] = 10;
	lTable['э'] =  9;
	lTable['ю'] = 11;
	lTable['я'] = 11;

#endif // FONT_RUSSIAN

#ifdef FONT_CZECH
	
	cTable['М'] = 186;
	cTable['Љ'] = 187;
	cTable['И'] = 188;
	cTable['Ш'] = 189;
	cTable['Ћ'] = 190;
	cTable['Э'] = 191;
	cTable['Б'] = 192;
	cTable['Н'] = 193;
	cTable['Й'] = 194;
	cTable['П'] = 195;
	cTable['Ќ'] = 196;
	cTable['Т'] = 197;
	cTable['У'] = 198;
	cTable['Щ'] = 199;
	cTable['Ъ'] = 200;

	cTable['м'] = 201;
	cTable['љ'] = 202;
	cTable['и'] = 203;
	cTable['ш'] = 204;
	cTable['ћ'] = 205;
	cTable['э'] = 206;
	cTable['б'] = 207;
	cTable['н'] = 208;
	cTable['й'] = 209;
	cTable['п'] = 210;
	cTable['ќ'] = 211;
	cTable['т'] = 212;
	cTable['у'] = 213;
	cTable['щ'] = 214;
	cTable['ъ'] = 215;

	lTable['М'] = 10;
	lTable['Љ'] = 10;
	lTable['И'] = 10;
	lTable['Ш'] = 11;
	lTable['Ћ'] = 9;
	lTable['Э'] = 11;
	lTable['Б'] = 11;
	lTable['Н'] = 9;
	lTable['Й'] = 10;
	lTable['П'] = 11;
	lTable['Ќ'] = 11;
	lTable['Т'] = 11;
	lTable['У'] = 11;
	lTable['Щ'] = 11;
	lTable['Ъ'] = 11;

	lTable['м'] = 10;
	lTable['љ'] = 9;
	lTable['и'] = 10;
	lTable['ш'] = 10;
	lTable['ћ'] = 9;
	lTable['э'] = 11;
	lTable['б'] = 10;
	lTable['н'] = 9;
	lTable['й'] = 10;
	lTable['п'] = 11;
	lTable['ќ'] = 11;
	lTable['т'] = 11;
	lTable['у'] = 10;
	lTable['щ'] = 11;
	lTable['ъ'] = 11;

#endif // FONT_CZECH

#ifdef FONT_FRENCH

	cTable['в'] = 226;
	cTable['й'] = 227;
	cTable['и'] = 228;
	cTable['о'] = 229;
	cTable['щ'] = 230;
	cTable['ы'] = 231;
	cTable['ф'] = 232;
	cTable['ц'] = 233;

	lTable['в'] = 10;
	lTable['й'] = 10;
	lTable['к'] = 10;
	lTable['о'] = 8;
	lTable['щ'] = 11;
	lTable['ы'] = 11;
	lTable['ф'] = 10;
	lTable['ц'] = 10;

#endif // FONT_FRENCH

#ifdef FONT_GERMAN
	cTable['Я'] = 234;
	// 'SS' = 235
	cTable['Д'] = 236;
	cTable['Ц'] = 237;
	cTable['Ь'] = 238;

	lTable['Я'] = 11;
#endif // FONT_GERMAN
}

/***************************************************************************\
*       Metodi di RMFontCredits
\****************************************************************************/

void RMFontCredits::Init(void) {
	int i;

	// bernie: numero di caratteri nel font
	int nchars =
		 112	// base
		+ 18	// polish
		+ 66	// russian
		+ 30	// czech
		+  8	// french
		+  2;	// deutsch


	Load(RES_F_CREDITS, nchars, 27, 28, RES_F_CPAL);

	// Default
	lDefault=10;
	hDefault=28;
	Common::fill(&l2Table[0][0], &l2Table[0][0] + (256 * 256), '\0');
	
	for (i = 0; i < 256; i++) {
		cTable[i] = -1;
		lTable[i] = lDefault;
	}

	for (i = 0; i < 26; i++)
		cTable['A' + i] = i + 0;

	for (i = 0; i < 26; i++)
		cTable['a' + i] = i + 26;


	cTable['а'] = 52;
	cTable['б'] = 53;
//	cTable[''] = 54; // a ^
//	cTable[''] = 55; // a pallini
	cTable['и'] = 56;
	cTable['й'] = 57; 
//	cTable[''] = 58; // e ^
//	cTable[''] = 59; // e pallini
	cTable['м'] = 60;
	cTable['н'] = 61;
//	cTable[''] = 62; // i ^
//	cTable[''] = 63; // i pallini
	cTable['т'] = 64;
	cTable['у'] = 65;
//	cTable[''] = 66; // o ^
//	cTable[''] = 67; // o pallini
	cTable['щ'] = 68;
	cTable['ъ'] = 69;
//	cTable[''] = 70; // u ^
//	cTable[''] = 71; // u pallini
//	cTable[''] = 72; // y pallini
	cTable['с'] = 73;
	cTable['з'] = 74; 
//	cTable[''] = 75; // o barrato
//	cTable[''] = 76; // ac
	cTable['©'] = 77;
//	cTable[''] = 78; // ? rovesciato
	cTable['?'] = 79; 
//	cTable[''] = 80; // ! rovesciato
	cTable['!'] = 81; 
//	cTable[''] = 82; // 1/2
//	cTable[''] = 83; // 1/4
	cTable['('] = 84;
	cTable[')'] = 85;
	cTable['«'] = 86;
	cTable['»'] = 87;
//	cTable[''] = 88; // AE
	cTable[':'] = 89;
	cTable['%'] = 90;
	cTable['&'] = 91;
	cTable['/'] = 92;
	cTable['+'] = 93;
	cTable[';'] = 94;
	cTable[','] = 95;
	cTable['^'] = 96;
	cTable['='] = 97;
	cTable['_'] = 98; 
	cTable['*'] = 99; 
	cTable['.'] = 100;  

	for (i = 0; i < 10; i++)
		cTable['0'+i] = i+101;
	cTable['\''] = 111;  

	lTable[' '] = 11;
	lTable['Д'] = lTable['A'] = 19;
	lTable['B'] = 15;
	lTable['C'] = 14;
	lTable['D'] = 13;
	lTable['E'] = 14;
	lTable['F'] = 13;
	lTable['G'] = 16;
	lTable['H'] = 15;
	lTable['I'] = 5;
	lTable['J'] = 8;
	lTable['K'] = 15;
	lTable['L'] = 13;
	lTable['M'] = 17;
	lTable['N'] = 15;
	lTable['Ц'] = lTable['O'] = 14;
	lTable['P'] = 12;
	lTable['Q'] = 14;
	lTable['R'] = 14;
	lTable['S'] = 15;
	lTable['T'] = 11;
	lTable['Ь'] = lTable['U'] = 12;
	lTable['V'] = 12;
	lTable['W'] = 16;
	lTable['X'] = 12;
	lTable['Y'] = 13;
	lTable['Z'] = 14;

	lTable['a'] = 11;
	lTable['b'] = 9;
	lTable['c'] = 9;
	lTable['d'] = 10;
	lTable['e'] = 9;
	lTable['f'] = 8;
	lTable['g'] = 9;
	lTable['h'] = 10;
	lTable['i'] = 5;
	lTable['j'] = 6;
	lTable['k'] = 12;
	lTable['l'] = 6;
	lTable['m'] = 14;
	lTable['n'] = 10;
	lTable['o'] = 11;
	lTable['p'] = 11;
	lTable['q'] = 9;
	lTable['r'] = 9;
	lTable['s'] = 9;
	lTable['t'] = 6;
	lTable['u'] = 9;
	lTable['v'] = 10;
	lTable['w'] = 14;
	lTable['x'] = 9;
	lTable['y'] = 10;
	lTable['z'] = 9;

	lTable['0'] = 12;
	lTable['1'] = 8;
	lTable['2'] = 10;
	lTable['3'] = 11;
	lTable['4'] = 12;
	lTable['5'] = 11;
	lTable['6'] = 12;
	lTable['7'] = 10;
	lTable['8'] = 11;
	lTable['9'] = 10;

	lTable['/'] = 10;
	lTable['^'] = 9;
	lTable[','] = 5;
	lTable['.'] = 5;
	lTable[';'] = 5;
	lTable[':'] = 5;
	lTable['\''] = 5;


	// Polish characters
	//AaCcEeLlNnOoSsZzZz
	//Ґ№ЖжКкЈіСсУуЊњЇїЏџ
	
	cTable['Ґ'] = 112;
	cTable['№'] = 113;
	cTable['Ж'] = 114;
	cTable['ж'] = 115;
	cTable['К'] = 116;
	cTable['к'] = 117;
	cTable['Ј'] = 118;
	cTable['і'] = 119;
	cTable['С'] = 120;
	cTable['с'] = 121;
	cTable['У'] = 122;
	cTable['у'] = 123;
	cTable['Њ'] = 124;
	cTable['њ'] = 125;
	cTable['Ї'] = 126;
	cTable['ї'] = 127;
	cTable['Џ'] = 128;
	cTable['џ'] = 129;
	
	lTable['Ґ'] = 20;
	lTable['№'] = 12;
	lTable['Ж'] = 15;
	lTable['ж'] = 10;
	lTable['К'] = 15;
	lTable['к'] = 10;
	lTable['Ј'] = 14;
	lTable['і'] = 11;
	lTable['С'] = 16;
	lTable['с'] = 10;
	lTable['У'] = 15;
	lTable['у'] = 11;
	lTable['Њ'] = 15;
	lTable['њ'] = 10;
	lTable['Ї'] = 15;
	lTable['ї'] = 10;
	lTable['Џ'] = 15;
	lTable['џ'] = 10;


#ifdef FONT_RUSSIAN
	// Russian Characters
	// WARNING: Il russo usa molti dei caratteri ISO-Latin-1 che servono
	// per le altre traduzioni. Per compilare Tony in altre lingue,
	// commentare via queste definizioni.

	cTable['А'] = 130;
	cTable['Б'] = 131;
	cTable['В'] = 132;
	cTable['Г'] = 133;
	cTable['Д'] = 134;
	cTable['Е'] = 135;
	cTable['Ё'] = 136;
	cTable['Ж'] = 137;
	cTable['З'] = 138;
	cTable['И'] = 139;
	cTable['Й'] = 140;
	cTable['К'] = 141;
	cTable['Л'] = 142;
	cTable['М'] = 143;
	cTable['Н'] = 144;
	cTable['О'] = 145;
	cTable['П'] = 146;
	cTable['Р'] = 147;
	cTable['С'] = 148;
	cTable['Т'] = 149;
	cTable['У'] = 150;
	cTable['Ф'] = 151;
	cTable['Х'] = 152;
	cTable['Ц'] = 153;
	cTable['Ч'] = 154;
	cTable['Ш'] = 155;
	cTable['Щ'] = 156;
	cTable['Ь'] = 157;
	cTable['Ъ'] = 158;
	cTable['Ы'] = 159;
	cTable['Э'] = 160;
	cTable['Ю'] = 161;
	cTable['Я'] = 162;

	cTable['а'] = 163;
	cTable['б'] = 164;
	cTable['в'] = 165;
	cTable['г'] = 166;
	cTable['д'] = 167;
	cTable['е'] = 168;
	cTable['ё'] = 169;
	cTable['ж'] = 170;
	cTable['з'] = 171;
	cTable['и'] = 172;
	cTable['й'] = 173;
	cTable['к'] = 174;
	cTable['л'] = 175;
	cTable['м'] = 176;
	cTable['н'] = 177;
	cTable['о'] = 178;
	cTable['п'] = 179;
	cTable['р'] = 180;
	cTable['с'] = 181;
	cTable['т'] = 182;
	cTable['у'] = 183;
	cTable['ф'] = 184;
	cTable['х'] = 185;
	cTable['ц'] = 186;
	cTable['ч'] = 187;
	cTable['ш'] = 188;
	cTable['щ'] = 189;
	cTable['ь'] = 190;
	cTable['ъ'] = 191;
	cTable['ы'] = 192;
	cTable['э'] = 193;
	cTable['ю'] = 194;
	cTable['я'] = 195;

	lTable['А'] = 20;
	lTable['Б'] = 16;
	lTable['В'] = 16;
	lTable['Г'] = 14;
	lTable['Д'] = 22;
	lTable['Е'] = 15;
	lTable['Ё'] = 15;
	lTable['Ж'] = 20;
	lTable['З'] = 12;
	lTable['И'] = 16;
	lTable['Й'] = 16;
	lTable['К'] = 16;
	lTable['Л'] = 22;
	lTable['М'] = 18;
	lTable['Н'] = 16;
	lTable['О'] = 15;
	lTable['П'] = 14;
	lTable['Р'] = 13;
	lTable['С'] = 15;
	lTable['Т'] = 12;
	lTable['У'] = 14;
	lTable['Ф'] = 15;
	lTable['Х'] = 13;
	lTable['Ц'] = 16;
	lTable['Ч'] = 14;
	lTable['Ш'] = 23;
	lTable['Щ'] = 23;
	lTable['Ь'] = 10;
	lTable['Ъ'] = 12;	
	lTable['Ы'] = 16;
	lTable['Э'] = 12;
	lTable['Ю'] = 20;
	lTable['Я'] = 15;

	lTable['а'] = 12;
	lTable['б'] = 10;
	lTable['в'] = 10;
	lTable['г'] = 11;
	lTable['д'] = 16;
	lTable['е'] = 10;
	lTable['ё'] = 11;
	lTable['ж'] = 13;
	lTable['з'] = 12;
	lTable['и'] = 13;
	lTable['й'] = 13;
	lTable['к'] = 12;
	lTable['л'] = 13;
	lTable['м'] = 14;
	lTable['н'] = 11;
	lTable['о'] = 11;
	lTable['п'] = 11;
	lTable['р'] = 12;
	lTable['с'] = 10;
	lTable['т'] = 10;
	lTable['у'] = 10;
	lTable['ф'] = 11;
	lTable['х'] = 10;
	lTable['ц'] = 11;
	lTable['ч'] = 10;
	lTable['ш'] = 15;
	lTable['щ'] = 15;
	lTable['ь'] = 10;
	lTable['ъ'] = 12;
	lTable['ы'] = 16;
	lTable['э'] = 11;
	lTable['ю'] = 13;
	lTable['я'] = 11;

#endif // FONT_RUSSIAN

#ifdef FONT_CZECH

	cTable['М'] = 196;
	cTable['Љ'] = 197;
	cTable['И'] = 198;
	cTable['Ш'] = 199;
	cTable['Ћ'] = 200;
	cTable['Э'] = 201;
	cTable['Б'] = 202;
	cTable['Н'] = 203;
	cTable['Й'] = 204;
	cTable['П'] = 205;
	cTable['Ќ'] = 206;
	cTable['Т'] = 207;
	cTable['У'] = 208;
	cTable['Щ'] = 209;
	cTable['Ъ'] = 210;

	cTable['м'] = 211;
	cTable['љ'] = 212;
	cTable['и'] = 213;
	cTable['ш'] = 214;
	cTable['ћ'] = 215;
	cTable['э'] = 216;
	cTable['б'] = 217;
	cTable['н'] = 218;
	cTable['й'] = 219;
	cTable['п'] = 220;
	cTable['ќ'] = 221;
	cTable['т'] = 222;
	cTable['у'] = 223;
	cTable['щ'] = 224;
	cTable['ъ'] = 225;

	lTable['М'] = 15;
	lTable['Љ'] = 15;
	lTable['И'] = 15;
	lTable['Ш'] = 15;
	lTable['Ћ'] = 15;
	lTable['Э'] = 14;
	lTable['Б'] = 20;
	lTable['Н'] = 7;
	lTable['Й'] = 15;
	lTable['П'] = 20;
	lTable['Ќ'] = 19;
	lTable['Т'] = 16;
	lTable['У'] = 15;
	lTable['Щ'] = 13;
	lTable['Ъ'] = 13;

	lTable['м'] = 11;
	lTable['љ'] = 11;
	lTable['и'] = 11;
	lTable['ш'] = 11;
	lTable['ћ'] = 11;
	lTable['э'] = 10;
	lTable['б'] = 12;
	lTable['н'] = 6;
	lTable['й'] = 10;
	lTable['п'] = 15;
	lTable['ќ'] = 12;
	lTable['т'] = 11;
	lTable['у'] = 11;
	lTable['щ'] = 10;
	lTable['ъ'] = 10;

#endif // FONT_CZECH

#ifdef FONT_FRENCH

	cTable['в'] = 226;
	cTable['й'] = 227;
	cTable['к'] = 228;
	cTable['о'] = 229;
	cTable['щ'] = 230;
	cTable['ы'] = 231;
	cTable['ф'] = 232;
	cTable['ц'] = 233;

	lTable['в'] = 12;
	lTable['й'] = 10;
	lTable['к'] = 10;
	lTable['о'] = 6;
	lTable['щ'] = 10;
	lTable['ы'] = 10;
	lTable['ф'] = 11;
	lTable['ц'] = 11;

#endif // FONT_FRENCH

#ifdef FONT_GERMAN
	cTable['Я'] = 234;
	// 'SS' = 235

	// old chars overrides
	cTable['Д'] = cTable['д'] = 55;
	cTable['Ц'] = cTable['ц'] = 67;
	cTable['Ь'] = cTable['ь'] = 71;

	lTable['Я'] = 11;

#endif // FONT_GERMAN
}


/***************************************************************************\
*       Metodi di RMFontObj
\****************************************************************************/

#define TOUPPER(a)	((a) >='a'&&(a)<='z'?(a)+'A'-'a':(a))
#define TOLOWER(a)	((a) >='A'&&(a)<='Z'?(a)+'a'-'A':(a))

void RMFontObj::SetBothCase(int nChar, int nNext, signed char spiazz) {
	l2Table[TOUPPER(nChar)][TOUPPER(nNext)] = spiazz;
	l2Table[TOUPPER(nChar)][TOLOWER(nNext)] = spiazz;
	l2Table[TOLOWER(nChar)][TOUPPER(nNext)] = spiazz;
	l2Table[TOLOWER(nChar)][TOLOWER(nNext)] = spiazz;
}


void RMFontObj::Init(void) {
	int i;

	//bernie: numero di caratteri nel font (solo maiuscolo)
	int nchars =
		  85	// base
		+  9	// polish
		+ 33	// russian
		+ 15	// czech
		+  0	// francais (no uppercase chars)
		+  1;	// deutsch


	Load(RES_F_OBJ, nchars, 25, 30);

	// Inizializziamo le tabelline del cazzo
	lDefault = 26;
	hDefault = 30;
	Common::fill(&l2Table[0][0], &l2Table[0][0] + (256 * 256), '\0');

	for (i = 0; i < 256; i++) {
		cTable[i] = -1;
		lTable[i] = lDefault;
	}

	for (i = 0; i < 26; i++) {
		cTable['A' + i] = i+0;
		cTable['a' + i] = i+0;
	}

	for (i = 0; i < 10; i++)
		cTable['0' + i] = i + 26;

	cTable[','] = 36;
	cTable[';'] = 37;
	cTable['.'] = 38;
	cTable[':'] = 39;
	cTable['-'] = 40;
	cTable['+'] = 41;
	cTable['!'] = 42;
	// cTable['!'] = 43; Esclamativo alla rovescia
	cTable['?'] = 44;
	//cTable['?'] = 45;  Interrogativo alla rovescia
	cTable['/'] = 46;
	cTable['('] = 47;
	cTable[')'] = 48;
	cTable['='] = 49;
	cTable['\''] = 50;
	cTable['\"'] = 51;
	cTable['Ј'] = 52;
	cTable['$'] = 53;
	cTable['%'] = 54;
	cTable['&'] = 55;
	cTable['^'] = 56;
	cTable['*'] = 57;
	cTable['<'] = 58;
	cTable['>'] = 59;
	cTable['«'] = 60;
	cTable['»'] = 61;
	cTable['ш'] = 62;
	cTable['з'] = 63;
	//cTable['ѓ'] = 64;   integrale
	cTable['С'] = 65;
	cTable['®'] = 66;
	cTable['©'] = 67;
	cTable['Ж'] = 68;
	cTable['Б'] = 69;
	cTable['Д'] = cTable['д'] = 70;
	cTable['Е'] = 71;
	cTable['И'] = 72;
	cTable['Л'] = 73;
	//cTable[' '] = 74;   e cerchietto
	cTable['М'] = 75;
	cTable['П'] = 76;
	//cTable[' '] = 77;	  i cerchietto
	cTable['Т'] = 78;
	cTable['Ц'] = cTable['ц'] = 79;
	//cTable[' '] = 80;		o cerchietto
	cTable['Щ'] = 81;
	cTable['Ь'] = cTable['ь'] = 82;
	//cTable[' '] = 83;		u cerchietto
	//cTable[' '] = 84;   y dieresi

	/* Un po' di lunghezze */
	lTable[' '] = 11;
	lTable['.'] = 8;
	lTable['-'] = 12;
	lTable['\''] = 8;
	lTable['0'] = 20;
	lTable['1'] = 20;
	lTable['2'] = 15;
	lTable['3'] = 20;
	lTable['4'] = 20;
	lTable['5'] = 20;
	lTable['6'] = 20;
	lTable['7'] = 20;
	lTable['8'] = 20;
	lTable['9'] = 20;

	
	lTable['a'] = lTable['A'] = lTable['д'] = lTable['Д'] = 17;
	lTable['b'] = lTable['B'] = 17;
	lTable['c'] = lTable['C'] = 19;
	lTable['d'] = lTable['D'] = 17;
	lTable['e'] = lTable['E'] = 15;
	lTable['f'] = lTable['F'] = 17;
	lTable['g'] = lTable['G'] = 19;
	lTable['i'] = lTable['I'] = 16;
	lTable['h'] = lTable['H'] = 17;
	lTable['k'] = lTable['K'] = 17;
	lTable['l'] = lTable['L'] = 14;
	lTable['m'] = lTable['M'] = 19;
	lTable['n'] = lTable['N'] = 17;
	lTable['o'] = lTable['O'] = lTable['ц'] = lTable['Ц'] = 19;
	lTable['p'] = lTable['P'] = 17;
	lTable['q'] = lTable['Q'] = 19;
	lTable['r'] = lTable['R'] = 14;
	lTable['s'] = lTable['S'] = 13;
	lTable['t'] = lTable['T'] = 15;
	lTable['u'] = lTable['U'] = lTable['ь'] = lTable['Ь'] = 15;
	lTable['v'] = lTable['V'] = 13;
	lTable['x'] = lTable['X'] = 15;
	lTable['y'] = lTable['Y'] = 13;
	lTable['w'] = lTable['W'] = 19;
	lTable['z'] = lTable['Z'] = 20;
	lTable['С'] = 17;

	/* Casi particolari */
	SetBothCase('C','C',2);
	SetBothCase('A','T',-2);
	SetBothCase('R','S',2);
	SetBothCase('H','I',-2);
	SetBothCase('T','S',2);
	SetBothCase('O','R',2);
	SetBothCase('O','L',2);
	SetBothCase('O','G',2);
	SetBothCase('Z','A',-1);
	SetBothCase('R','R',1);
	SetBothCase('R','U',3);


	// Polish characters
	//Ґ№ЖжКкЈіСсУуЊњЇїЏџ
	//AaCcEeLlNnOoSsZzZz
	cTable['Ґ'] = cTable['№'] = 85;
	lTable['Ґ'] = lTable['№'] = 20;

	cTable['Ж'] = cTable['ж'] = 86;
	lTable['Ж'] = lTable['ж'] = 22;
	
	cTable['К'] = cTable['к'] = 87;
	lTable['К'] = lTable['к'] = 17;
	
	cTable['Ј'] = cTable['і'] = 88;
	lTable['Ј'] = lTable['і'] = 19;

	cTable['С'] = cTable['с'] = 89;
	lTable['С'] = lTable['с'] = 17;

	cTable['У'] = cTable['у'] = 90;
	lTable['У'] = lTable['у'] = 22;

	cTable['Њ'] = cTable['њ'] = 91;
	lTable['Њ'] = lTable['њ'] = 15;

	cTable['Ї'] = cTable['ї'] = 92;
	lTable['Ї'] = lTable['ї'] = 21;

	cTable['Џ'] = cTable['џ'] = 93;
	lTable['Џ'] = lTable['џ'] = 21;


#ifdef FONT_RUSSIAN
	// Russian Characters
	// WARNING: Il russo usa molti dei caratteri ISO-Latin-1 che servono
	// per le altre traduzioni. Per compilare Tony in altre lingue,
	// commentare via queste definizioni.

	cTable['Ґ'] = cTable['№'] = 85;
	lTable['Ґ'] = lTable['№'] = 20;

	cTable['А'] = cTable['а'] =94;
	cTable['Б'] = cTable['б'] =95;
	cTable['В'] = cTable['в'] =96;
	cTable['Г'] = cTable['г'] =97;
	cTable['Д'] = cTable['д'] =98;
	cTable['Е'] = cTable['е'] =99;
	cTable['Ё'] = cTable['ё'] =100;
	cTable['Ж'] = cTable['ж'] =101;
	cTable['З'] = cTable['з'] =102;
	cTable['И'] = cTable['и'] =103;
	cTable['Й'] = cTable['й'] =104;
	cTable['К'] = cTable['к'] =105;
	cTable['Л'] = cTable['л'] =106;
	cTable['М'] = cTable['м'] =107;
	cTable['Н'] = cTable['н'] =108;
	cTable['О'] = cTable['о'] =109;
	cTable['П'] = cTable['п'] =110;
	cTable['Р'] = cTable['р'] =111;
	cTable['С'] = cTable['с'] =112;
	cTable['Т'] = cTable['т'] =113;
	cTable['У'] = cTable['у'] =114;
	cTable['Ф'] = cTable['ф'] =115;
	cTable['Х'] = cTable['х'] =116;
	cTable['Ц'] = cTable['ц'] =117;
	cTable['Ч'] = cTable['ч'] =118;
	cTable['Ш'] = cTable['ш'] =119;
	cTable['Щ'] = cTable['щ'] =120;
	cTable['Ь'] = cTable['ь'] =121;
	cTable['Ъ'] = cTable['ъ'] =122;
	cTable['Ы'] = cTable['ы'] =123;
	cTable['Э'] = cTable['э'] =124;
	cTable['Ю'] = cTable['ю'] =125;
	cTable['Я'] = cTable['я'] =126;


	lTable['А'] = lTable['а'] = 18;
	lTable['Б'] = lTable['б'] = 18;
	lTable['В'] = lTable['в'] = 18;
	lTable['Г'] = lTable['г'] = 17;
	lTable['Д'] = lTable['д'] = 16;
	lTable['Е'] = lTable['е'] = 18;
	lTable['Ё'] = lTable['ё'] = 18;
	lTable['Ж'] = lTable['ж'] = 20;
	lTable['З'] = lTable['з'] = 18;
	lTable['И'] = lTable['и'] = 18;
	lTable['Й'] = lTable['й'] = 18;
	lTable['К'] = lTable['к'] = 18;
	lTable['Л'] = lTable['л'] = 16;
	lTable['М'] = lTable['м'] = 18;
	lTable['Н'] = lTable['н'] = 15;
	lTable['О'] = lTable['о'] = 22;
	lTable['П'] = lTable['п'] = 15;
	lTable['Р'] = lTable['р'] = 18;
	lTable['С'] = lTable['с'] = 22;
	lTable['Т'] = lTable['т'] = 19;
	lTable['У'] = lTable['у'] = 16;
	lTable['Ф'] = lTable['ф'] = 21;
	lTable['Х'] = lTable['х'] = 20;
	lTable['Ц'] = lTable['ц'] = 16;
	lTable['Ч'] = lTable['ч'] = 16;
	lTable['Ш'] = lTable['ш'] = 19;
	lTable['Щ'] = lTable['щ'] = 22;
	lTable['Ь'] = lTable['ь'] = 18;
	lTable['Ъ'] = lTable['ъ'] = 19;	
	lTable['Ы'] = lTable['ы'] = 19;
	lTable['Э'] = lTable['э'] = 15;
	lTable['Ю'] = lTable['ю'] = 18;
	lTable['Я'] = lTable['я'] = 18;

#endif // FONT_RUSSIAN

#ifdef FONT_CZECH
	// rep. ceca characters	

	cTable['М'] = cTable['м'] = 127;
	cTable['Љ'] = cTable['љ'] = 128;
	cTable['И'] = cTable['и'] = 129;
	cTable['Ш'] = cTable['ш'] = 130;
	cTable['Ћ'] = cTable['ћ'] = 131;
	cTable['Э'] = cTable['э'] = 132;
	cTable['Б'] = cTable['б'] = 133;
	cTable['Н'] = cTable['н'] = 134;
	cTable['Й'] = cTable['й'] = 135;
	cTable['П'] = cTable['п'] = 136;
	cTable['Ќ'] = cTable['ќ'] = 137;
	cTable['Т'] = cTable['т'] = 138;
	cTable['У'] = cTable['у'] = 139;
	cTable['Щ'] = cTable['щ'] = 140;
	cTable['Ъ'] = cTable['ъ'] = 141;

	lTable['М'] = lTable['м'] =17;
	lTable['Љ'] = lTable['љ'] =15;
	lTable['И'] = lTable['и'] =22;
	lTable['Ш'] = lTable['ш'] =18;
	lTable['Ћ'] = lTable['ћ'] =21;
	lTable['Э'] = lTable['э'] =16;
	lTable['Б'] = lTable['б'] =18;
	lTable['Н'] = lTable['н'] =19;
	lTable['Й'] = lTable['й'] =17;
	lTable['П'] = lTable['п'] =23;
	lTable['Ќ'] = lTable['ќ'] =24;
	lTable['Т'] = lTable['т'] =17;
	lTable['У'] = lTable['у'] =22;
	lTable['Щ'] = lTable['щ'] =16;
	lTable['Ъ'] = lTable['ъ'] =16;

#endif // FONT_CZECH

#ifdef FONT_FRENCH

	// traduci le lettere accentate in lettere normali

	cTable['а'] = cTable['б'] = cTable['в'] = 0; // a
	lTable['а'] = lTable['б'] = lTable['в'] = 17;

	cTable['й'] = cTable['и'] = 4; // e
	lTable['й'] = lTable['и'] = 15;

	cTable['м'] = cTable['н'] = cTable['о'] = 8; // i
	lTable['м'] = lTable['н'] = lTable['о'] = 16;

	cTable['т'] = cTable['у'] = cTable['ф'] = cTable['ц'] = 14; // o
	lTable['т'] = lTable['у'] = lTable['ф'] = lTable['ц'] = 19;

	cTable['щ'] = cTable['ы'] = 20; // u
	lTable['щ'] = lTable['ы'] = 15;

#endif // FONT_FRENCH

#ifdef FONT_GERMAN
	cTable['Я'] = 142;
	// SS = 143

	lTable['Я'] = 24;
#endif // FONT_GERMAN
}


/****************************************************************************\
*       Metodi di RMText
\****************************************************************************/

RMFontColor *RMText::m_fonts[4] = { NULL, NULL, NULL, NULL };
OSystem::MutexRef RMText::m_cs;
RMGfxClearTask RMText::m_clear;

RMText::RMText() {
	// Colore di default: bianco
	m_r = m_g = m_b = 255;

	// Lunghezza di default
	maxLineLength = 350;

	m_bTrasp0 = true;
	aHorType = HCENTER;
	aVerType = VTOP;
	SetPriority(150);
}

RMText::~RMText() {
	
}

void RMText::SetMaxLineLength(int max) {
	maxLineLength = max;
}

bool RMText::RemoveThis() {
 // Qui possiamo fare i controlli sul numero di frame, sul tempo trascorso
 // etc.
	return true;
}


void RMText::WriteText(RMString text, int nFont, int *time) {
	// Inizializza i font (una volta sola)	
	if (m_fonts[0] == NULL) {
		m_fonts[0] = new RMFontParla; m_fonts[0]->Init();
		m_fonts[1] = new RMFontObj;   m_fonts[1]->Init();
		m_fonts[2] = new RMFontMacc;  m_fonts[2]->Init();
		m_fonts[3] = new RMFontCredits;  m_fonts[3]->Init();

		m_cs = g_system->createMutex();
	}

	g_system->lockMutex(m_cs);
	WriteText(text,m_fonts[nFont],time);
	g_system->unlockMutex(m_cs);
}


void RMText::WriteText(RMString text, RMFontColor *font, int *time) {
	RMGfxPrimitive *prim;
	char *p, *old_p;
	int i, j, x, y;
	int len;
	int numchar;
	int width, height;
	char *string;
	int numlines;

	// Setta il colore di base
	font->SetBaseColor(m_r, m_g, m_b);

	// Si autodistrugge il buffer prima di iniziare
	Destroy();

	// Se la stringa и vuota, non fare nulla	
	if (text == NULL || text[0] == '\0')
		return;
	
	// Divide la frase in linee. In questo ciclo, X contiene la lunghezza massima raggiunta da una linea
	// e I il numero delle linee
	string=p = text;
	i = j = x = 0;
	while (*p != '\0') {
		j += font->StringLen(*p);
		if (j > (((aHorType == HLEFTPAR) && (i > 0)) ? maxLineLength - 25 : maxLineLength)) {
			j -= font->StringLen(*p, p[1]);
			if (j > x) x = j;

			// Torna indietro al primo spazio utile
			//
			// BERNIE: nella versione originale le frasi contenenti
			// parole che superano la larghezza di una riga causavano
			// l'interruzione dell'intera frase.
			// Questo workaround e' parziale: la parola troppo lunga
			// viene spezzata bruscamente e si perde una lettera.
			// Oltre allo spazio e' ammesso il wrap sul carattere '-'.
			//
			old_p = p;
			while (*p != ' ' && *p != '-' && p > string) p--;

			if (p == string)
				p = old_p;

			// Controlla se sono tutti spazi fino alla fine
			while (*p == ' ' && *p != '\0') p++;
			if (*p == '\0')
				break;
			p--;
			i++;
			*p = '\0';
			j = 0;
		}
		p++;
	}

	if (j > x) x = j;
 
	i++;
	numlines = i;

	// X=Lunghezza della linea piu' lunga. Controlla se puo' essere puttata a X1
	//x+=font->StringLen(-1)+1;          // Meglio esagerare per sicurezza
	x += 8;

	// Posizione di partenza per la surface: X1,Y
	width = x;
	height = (numlines - 1) * font->LetterHeight() + font->m_fontDimy;

	// Crea la surface
	Create(width, height);
	//AddPrim(new RMGfxPrimitive(&m_clear));
	Common::fill(m_buf, m_buf + width * height * 2, 0);

	p = string;

	y = 0;
	numchar = 0;
	for (; i > 0; i--) {
		// Misura la lunghezza della linea
		x = 0;
		j = font->StringLen(RMString(p));

		switch (aHorType) {
		case HLEFT:
			x = 0;
			break;

		case HLEFTPAR:
			if (i == numlines)
				x=0;
			else
				x = 25;
			break;

		case HCENTER:
			x = width / 2 - j / 2;
			break;

		case HRIGHT:
			x = width - j - 1;
			break;
		}

		while (*p != '\0') {
			if (*p == ' ') {
				x += font->StringLen(*p);
				p++;
				continue;
			}

			prim = font->MakeLetterPrimitive(*p, len);
			prim->Dst().x1 = x;
			prim->Dst().y1 = y;
			AddPrim(prim);

			numchar++;

			x += font->StringLen(*p, p[1]);
			p++;
		}
		p++;
		y += font->LetterHeight();
	}

	if (time != NULL)
		*time = 1000 + numchar * (11 - nCfgTextSpeed) * 14;
}

void RMText::ClipOnScreen(RMGfxPrimitive *prim) {
	// Cerca di non farlo uscire dallo schermo
	if (prim->Dst().x1 < 5) prim->Dst().x1 = 5;
	if (prim->Dst().y1 < 5) prim->Dst().y1 = 5;
	if (prim->Dst().x1+m_dimx > 635) prim->Dst().x1 = 635 - m_dimx;
	if (prim->Dst().y1+m_dimy > 475) prim->Dst().y1 = 475 - m_dimy;
}

void RMText::Draw(RMGfxTargetBuffer &bigBuf, RMGfxPrimitive *prim) {
	// Allinea orizzontalmente
	if (aHorType == HCENTER)
		prim->Dst().TopLeft() -= RMPoint(m_dimx / 2, 0);
	else if (aHorType == HRIGHT)
		prim->Dst().TopLeft() -= RMPoint(m_dimx, 0);


	// Alinea verticalemente
	switch (aVerType) {
	case VTOP:
		break;

	case VCENTER:
		prim->Dst().y1-=m_dimy/2;
		break;

	case VBOTTOM:
		prim->Dst().y1-=m_dimy;
		break;
	}

	ClipOnScreen(prim);

	RMGfxWoodyBuffer::Draw(bigBuf,prim);
}

/****************************************************************************\
*       Metodi di RMTextDialog
\****************************************************************************/

RMTextDialog::RMTextDialog() : RMText() {
	m_startTime = 0;
	dst = RMPoint(0,0);

	m_bSkipStatus = true;
	m_bShowed = true;
	m_bForceTime = false;
	m_bForceNoTime = false;
	m_bAlwaysDisplay = false;
	m_bNoTab = false;
	hCustomSkip = INVALID_HANDLE_VALUE;
	hCustomSkip2 = INVALID_HANDLE_VALUE;
	m_input = NULL;

	// Crea l'evento di fine displaying
	hEndDisplay = CreateEvent(NULL, false, false, NULL);
}

RMTextDialog::~RMTextDialog() {
	CloseHandle(hEndDisplay);
}

void RMTextDialog::Show(void) {
	m_bShowed = true;
}

void RMTextDialog::Hide(void) {
	m_bShowed = false;
}

void RMTextDialog::WriteText(RMString text, int font, int *time) {
	RMText::WriteText(text,font,&m_time);

	if (time != NULL)
		*time = m_time;
}

void RMTextDialog::WriteText(RMString text, RMFontColor *font, int *time) {
	RMText::WriteText(text,font,&m_time);

	if (time != NULL)
		*time = m_time;
}


void RMTextDialog::SetSkipStatus(bool bEnabled) {
	m_bSkipStatus=bEnabled;
}

void RMTextDialog::ForceTime(void) {
	m_bForceTime = true;
}

void RMTextDialog::ForceNoTime(void) {
	m_bForceNoTime = true;
}

void RMTextDialog::SetNoTab(void) {
	m_bNoTab = true;
}

void RMTextDialog::SetForcedTime(uint32 dwTime) {
	m_time = dwTime;	
}

void RMTextDialog::SetAlwaysDisplay(void) {
	m_bAlwaysDisplay = true;
}

bool RMTextDialog::RemoveThis(void) {
	// Frase NON di background
	if (m_bSkipStatus) {
		if (!(bCfgDubbing && hCustomSkip2 != INVALID_HANDLE_VALUE))
			if (bCfgTimerizedText) {
				if (!m_bForceNoTime)
					if (_vm->GetTime() > (uint32)m_time + m_startTime)
						return true;
			}

		if (!m_bNoTab)
			if ((GetAsyncKeyState(Common::KEYCODE_TAB) & 0x8001) == 0x8001)
				return true;

		if (!m_bNoTab)
			if (m_input)
				if (m_input->MouseLeftClicked() || m_input->MouseRightClicked())
					return true;
	}
	// Frase di background
	else {
		if (!(bCfgDubbing && hCustomSkip2 != INVALID_HANDLE_VALUE))
			if (!m_bForceNoTime)
				if (_vm->GetTime() > (uint32)m_time + m_startTime)
					return true;
	}

	// Se il tempo и forzato
	if (m_bForceTime)
		if (_vm->GetTime() > (uint32)m_time + m_startTime)
			return true;

	if (hCustomSkip != INVALID_HANDLE_VALUE)
		if (WaitForSingleObject(hCustomSkip, 0) == WAIT_OBJECT_0)
			return true;

	if (bCfgDubbing && hCustomSkip2 != INVALID_HANDLE_VALUE)
		if (WaitForSingleObject(hCustomSkip2,0) == WAIT_OBJECT_0)
			return true;

	return false;
}

void RMTextDialog::Unregister(void) {
	RMGfxTask::Unregister();
	assert(m_nInList == 0);
	SetEvent(hEndDisplay);
}

void RMTextDialog::Draw(RMGfxTargetBuffer &bigBuf, RMGfxPrimitive *prim) {
	if (m_startTime == 0)
		m_startTime = _vm->GetTime();
	
	if (m_bShowed) {
		if (bCfgSottotitoli || m_bAlwaysDisplay) {
			prim->Dst().TopLeft() = dst;
			RMText::Draw(bigBuf, prim);
		}
	}
}

void RMTextDialog::SetCustomSkipHandle(HANDLE hCustom) {
	hCustomSkip = hCustom;
}

void RMTextDialog::SetCustomSkipHandle2(HANDLE hCustom) {
	hCustomSkip2 = hCustom;
}

void RMTextDialog::WaitForEndDisplay(void) {
	WaitForSingleObject(hEndDisplay, INFINITE);
}

void RMTextDialog::SetInput(RMInput *input) {
	m_input = input;
}

/****************************************************************************\
*       Metodi di RMTextDialogScrolling
\****************************************************************************/

RMTextDialogScrolling::RMTextDialogScrolling() {
	curLoc = NULL;
}

RMTextDialogScrolling::RMTextDialogScrolling(RMLocation *loc) {
	curLoc = loc;
	startScroll = loc->ScrollPosition();
}

RMTextDialogScrolling::~RMTextDialogScrolling() {
}

void RMTextDialogScrolling::Draw(RMGfxTargetBuffer &bigBuf, RMGfxPrimitive *prim) {
	RMPoint curDst;

	curDst = dst;

	if (curLoc != NULL)
		dst -= curLoc->ScrollPosition() - startScroll;

	RMTextDialog::Draw(bigBuf, prim);

	dst = curDst;
}

void RMTextDialogScrolling::ClipOnScreen(RMGfxPrimitive *prim) {
	// Non dobbiamo fare nulla!
}


/****************************************************************************\
*       Metodi di RMTextItemName
\****************************************************************************/

RMTextItemName::RMTextItemName() : RMText() {
	m_item = NULL;
	SetPriority(220);
}

RMTextItemName::~RMTextItemName() {

}

void RMTextItemName::DoFrame(RMGfxTargetBuffer& bigBuf, RMLocation &loc, RMPointer &ptr, RMInventory &inv) {
	RMString itemName;
	RMItem *lastItem = m_item;

	// Si aggiunge alla lista se c'e' bisogno
	if (!m_nInList)
		bigBuf.AddPrim(new RMGfxPrimitive(this));
	
	// Aggiorna le coordinate di scrolling
	m_curscroll = loc.ScrollPosition();

	// Controlla se siamo sopra l'inventario
	if (inv.ItemInFocus(m_mpos))
		m_item = inv.WhichItemIsIn(m_mpos);
	else
		m_item = loc.WhichItemIsIn(m_mpos);
	
	itemName = "";

	// Si fa dare il nuovo nome
	if (m_item != NULL)
		m_item->GetName(itemName);

	// Se lo scrive
	WriteText(itemName, 1);

	// Se e' diverso dal precedente, e' il caso di aggiornare anche il puntatore con la WhichPointer
	if (lastItem != m_item) {
		if (m_item == NULL)
			ptr.SetSpecialPointer(RMPointer::PTR_NONE);
		else {
			HANDLE hThread = mpalQueryDoAction(20, m_item->MpalCode(), 0);		
			if (hThread == INVALID_HANDLE_VALUE)
				ptr.SetSpecialPointer(RMPointer::PTR_NONE);
			else
				WaitForSingleObject(hThread,INFINITE);
		}
	}
}


void RMTextItemName::Draw(RMGfxTargetBuffer &bigBuf, RMGfxPrimitive *prim) {
	// Se non c'e' testo, e' inutile continuare
	if (m_buf == NULL)
		return;

	// Setta come coordinate destinazione quelle del mouse
	prim->Dst().TopLeft() = m_mpos-RMPoint(0, 30);

	RMText::Draw(bigBuf,prim);
}

RMPoint RMTextItemName::GetHotspot() { 
	if (m_item == NULL) 
		return m_mpos + m_curscroll; 
	else 
		return m_item->Hotspot();  
}

RMItem *RMTextItemName::GetSelectedItem() { 
	return m_item; 
}

bool RMTextItemName::IsItemSelected() { 
	return m_item != NULL; 
}

bool RMTextItemName::IsNormalItemSelected() { 
	return m_item != NULL && m_itemName.Length() > 0; 
}


/****************************************************************************\
*       Metodi di RMDialogChoice
\****************************************************************************/

RMDialogChoice::RMDialogChoice() {
	RMResRaw dlg1(RES_I_DLGTEXT);
	RMResRaw dlg2(RES_I_DLGTEXTLINE);
	RMRes dlgpal(RES_I_DLGTEXTPAL);
	
	DlgText.Init(dlg1, dlg1.Width(), dlg1.Height());
	DlgTextLine.Init(dlg2, dlg2.Width(), dlg2.Height());

	DlgText.LoadPaletteWA(dlgpal);
	DlgTextLine.LoadPaletteWA(dlgpal);
	
	hUnreg=CreateEvent(NULL, false, false, NULL);
	bRemoveFromOT = false;
}

RMDialogChoice::~RMDialogChoice() {
	CloseHandle(hUnreg);
}

void RMDialogChoice::Unregister(void) {
	RMGfxWoodyBuffer::Unregister();
	assert(!m_nInList);
	PulseEvent(hUnreg);

	bRemoveFromOT = false;
}

void RMDialogChoice::Init(void)
{
	m_numChoices = 0;
	m_drawedStrings = NULL;
	m_ptDrawStrings = NULL;
	m_curSelection = -1;

	Create(640, 477);
	SetPriority(140);
}


void RMDialogChoice::Close(void) {
	if (m_drawedStrings != NULL) {
		delete[] m_drawedStrings;
		m_drawedStrings = NULL;
	}

	if (m_ptDrawStrings != NULL) {
		delete[] m_ptDrawStrings;
		m_ptDrawStrings = NULL;
	}

	Destroy();
}

void RMDialogChoice::SetNumChoices(int num) {
	int i;

	m_numChoices = num;
	m_curAdded = 0;
	
	// Alloca lo spazio per le stringhe disegnate
	m_drawedStrings = new RMText[num];
	m_ptDrawStrings = new RMPoint[num];

	// Le inizializza
	for (i = 0; i < m_numChoices; i++) {
		m_drawedStrings[i].SetColor(0, 255, 0);
		m_drawedStrings[i].SetAlignType(RMText::HLEFTPAR, RMText::VTOP);
		m_drawedStrings[i].SetMaxLineLength(600);
		m_drawedStrings[i].SetPriority(10);
	}
}

void RMDialogChoice::AddChoice(RMString string) {
	// Si disegna la stringa
	assert(m_curAdded < m_numChoices);
	m_drawedStrings[m_curAdded++].WriteText(string,0);	
}

void RMDialogChoice::Prepare(void) {
	int i;
	RMPoint ptPos;

	AddPrim(new RMGfxPrimitive(&DlgText,RMPoint(0,0)));
	AddPrim(new RMGfxPrimitive(&DlgTextLine,RMPoint(0,155)));
	AddPrim(new RMGfxPrimitive(&DlgTextLine,RMPoint(0,155+83)));
	AddPrim(new RMGfxPrimitive(&DlgTextLine,RMPoint(0,155+83+83)));
	AddPrim(new RMGfxPrimitive(&DlgTextLine,RMPoint(0,155+83+83+83)));

	ptPos.Set(20,90);

	for (i = 0; i < m_numChoices; i++) {
		AddPrim(new RMGfxPrimitive(&m_drawedStrings[i], ptPos));
		m_ptDrawStrings[i] = ptPos;
		ptPos.Offset(0,m_drawedStrings[i].Dimy() + 15);
	}

	DrawOT();
	ClearOT();

	m_ptDrawPos.Set(0,480-ptPos.y);
}

void RMDialogChoice::SetSelected(int pos) {
	//uint16 * buf = (uint16 *)m_buf;
	RMGfxBox box;
	RMRect rc;

	if (pos == m_curSelection)
		return;

	box.SetPriority(5);

	if (m_curSelection != -1) {
		box.SetColor(0xCC, 0xCC, 0xFF);
		rc.TopLeft()=RMPoint(18, m_ptDrawStrings[m_curSelection].y); 
		rc.BottomRight() = rc.TopLeft() + RMPoint(597, m_drawedStrings[m_curSelection].Dimy());
		AddPrim(new RMGfxPrimitive(&box, rc));

		AddPrim(new RMGfxPrimitive(&m_drawedStrings[m_curSelection], m_ptDrawStrings[m_curSelection]));
		DrawOT();
		ClearOT();
	}

	if (pos != -1) {
		box.SetColor(100, 100, 100);
		rc.TopLeft()=RMPoint(18, m_ptDrawStrings[pos].y); 
		rc.BottomRight() = rc.TopLeft()+RMPoint(597, m_drawedStrings[pos].Dimy());
		AddPrim(new RMGfxPrimitive(&box, rc));
		AddPrim(new RMGfxPrimitive(&m_drawedStrings[pos], m_ptDrawStrings[pos]));
	}

	DrawOT();
	ClearOT();

	m_curSelection = pos;
}

void RMDialogChoice::Show(RMGfxTargetBuffer *bigBuf) {
	Prepare();
	m_bShow = false;

	if (!m_nInList && bigBuf != NULL)
		bigBuf->AddPrim(new RMGfxPrimitive(this));

	if (0) {
		m_bShow = true;
	} else {
		RMPoint destpt;
		int deltay;
		int starttime = _vm->GetTime();
		int elaps;

		deltay=480 - m_ptDrawPos.y;
		destpt = m_ptDrawPos;
		m_ptDrawPos.Set(0, 480);

  	if (!m_nInList && bigBuf != NULL)
	  	bigBuf->AddPrim(new RMGfxPrimitive(this));
		m_bShow = true;

		elaps = 0;
		while (elaps < 700) {
			MainWaitFrame();
			MainFreeze();
			elaps = _vm->GetTime() - starttime;
			m_ptDrawPos.y = 480 - ((deltay * 100) / 700 * elaps) / 100;
			MainUnfreeze();
		}

		m_ptDrawPos.y = destpt.y;
	}
}

void RMDialogChoice::Draw(RMGfxTargetBuffer &bigBuf, RMGfxPrimitive *prim) {
	if (m_bShow == false)
		return;

	prim->SetDst(m_ptDrawPos);
	RMGfxSourceBuffer16::Draw(bigBuf, prim);
}


void RMDialogChoice::Hide(void) {
	if (1) {
		int deltay;
		int starttime = _vm->GetTime();
		int elaps;

		deltay=480 - m_ptDrawPos.y;
		elaps = 0;
		while (elaps < 700) {
			MainWaitFrame();
			MainFreeze();
			elaps=_vm->GetTime()-starttime;
			m_ptDrawPos.y=480-((deltay*100)/700*(700-elaps))/100;
			MainUnfreeze();
		}
	}

	m_bShow = false;
	bRemoveFromOT = true;
	WaitForSingleObject(hUnreg, INFINITE);
}


bool RMDialogChoice::RemoveThis(void) {
	return bRemoveFromOT;
}

void RMDialogChoice::DoFrame(RMPoint ptMousePos) {
	int i;
	
	if (ptMousePos.y > m_ptDrawPos.y) {		
		for (i = 0; i < m_numChoices; i++) {
			if ((ptMousePos.y >= m_ptDrawPos.y+m_ptDrawStrings[i].y) && (ptMousePos.y < m_ptDrawPos.y+m_ptDrawStrings[i].y+m_drawedStrings[i].Dimy())) {
				SetSelected(i);
				break;
			}
		}

		if (i == m_numChoices)
			SetSelected(-1);
	}
}

int RMDialogChoice::GetSelection(void) {
	return m_curSelection;
}

} // End of namespace Tony