#include "mensajes.h"

extern Configuracion *Config;

Mensajes::Mensajes()
{

const int num = 91;

Numero = num;
Long = 63;

char MensajeEsp [num][63] = {
"Dinero: ",
"Puntos: ",
"Record: ",
"            * Gastos de ambulancia, 10 $ *            ",
"            * Precio por esquiar 10 $ *            ",
"  SIN DINERO, NO HAY ESQUI  ",
"            * Los esquies estan bien *            ",
"            * Se han roto los esquis *            ",
"            *** 100 Puntos Extra ***            ",
"HORACIO",
"esquiador",
" ",
"Iniciar",
"Translate to english",
"Opciones",
"Tabla de Records",
"Creditos",
"Salir",
"Pantalla completa",
"En ventana",
"Sonido: ",
"Definir teclado",
"Set Grafico: ",
"Off",
"On",
"Arriba",
"Abajo",
"Izquierda",
"Derecha",
"Seleccionar",
"Pausa / Abortar",
"Volver",
"Nuevo",
"Original",
"Pulsa...",
"Volver al juego",
"Salir",
"Enhorabuena",
"Introduce tu nombre",
"Frame skipping:",
"Horacio Esquiador PC",
"--------------------",
" ",
" ",
"PROGRAMA, GRAFICOS Y SONIDO",
"--------------------",
"Luis I. Garcia (aka Benway)",
" ",
" ",
"PORTS",
"--------------------",
"Traperic (Linux)",
"Peter Hull (Mac)",
" ",
" ",
"TRADUCCION",
"--------------------",
"Bisarma (Asturianu)",
"Araubi (Galego)",
"TBrazil (Catala)",
" ",
" ",
"PRUEBAS DEL PROGRAMA",
"--------------------",
"Maria Rengel",
"Marta Garcia",
"TBrazil",
" ",
" ",
"DEDICADO A...",
"--------------------",
"Jose A. Garcia", 
"Nicolas Garcia",
" ",
" ",
"FOTO ORIGINAL",
"--------------------",
"(c) 2.002 Sandy White",
" ",
" ",
"AGRADECIMIENTOS",
"--------------------",
"Maria Rengel",
"William Tang",
" ",
" ",
"(c) 1.982 Melbourne House ",
"(c) 2.005 Panik Software",
" ",
" ",
"www.paniksoftware.tk"
};

char MensajeEng [num][63] = {
"Cash: ",
"Score: ",
"Hi: ",
"            Ambulance fee $ 10            ",
"            Ski hire, 10 $            ",
"  SORRY: NO MONEY, NO SKI  ",
"            Lucky! Skis still ok            ",
"            Bad Luck!: Skis broken            ",
"            *** BONUS: 100 Points ***            ",
"HORACE",
"GOES",
"SKIING",
"Start game",
"Tornar a L'Asturianu",
"Settings",
"Hall of fame",
"Credits",
"Exit",
"Full Screen",
"Windowed",
"Sound: ",
"Define keys",
"Graphic set: ",
"Off",
"On",
"Up",
"Down",
"Left",
"Right",
"Select",
"Pause / Abort",
"Back to main menu",
"New",
"Original",
"Press...",
"Return to game",
"Abort",
"Congratulations",
"Enter your name",
"Frame skipping:",
"Horace goes skiing PC",
"--------------------",
" ",
" ",
"PROGRAM, GRAPHICS & SOUND",
"--------------------",
"Luis I. Garcia (aka Benway)",
" ",
" ",
"PORTS",
"--------------------",
"Traperic (Linux)",
"Peter Hull (Mac)",
" ",
" ",
"TRANSLATION"
"--------------------",
"Bisarma (Asturianu)",
"Araubi (Galego)",
"TBrazil (Catala)",
" ",
" ",
"BETA TESTING",
"--------------------",
"Maria Rengel",
"Marta Garcia",
"TBrazil ",
" ",
"DEDICATED TO...",
"--------------------",
"Jose A. Garcia", 
"Nicolas Garcia",
" ",
" ",
"ORIGINAL CREDITS PHOTO",
"--------------------",
"(c) 2.002 Sandy White",
" ",
" ",
"THANKS TO...",
"--------------------",
"Maria Rengel",
"William Tang",
" ",
" ",
"(c) 1.982 Melbourne House ",
"(c) 2.005 Panik Software",
" ",
" ",
"www.paniksoftware.tk"
};

char MensajeAst [num][63] = {
"Perres: ",
"Puntos: ",
"Record: ",
"            * Gastos d'ambulancia, 10 $ *            ",
"            * Preciu por esquiar 10 $ *            ",
"  ENSIN PERRES, NUN HAI ESQUI  ",
"            * Los esquiis tan bien *            ",
"            * Francieronse los esquis *            ",
"            *** 100 Puntos Estra ***            ",
"HORACIU",
"esquiador",
" ",
"Entamar",
"Traducir o galego",
"Opciones",
"Tabla de Records",
"Creitos",
"Salir",
"Pantalla completa",
"En ventanu",
"Soniu: ",
"Definir teclau",
"Set Graficu: ",
"Off",
"On",
"P'arriba",
"P'abaxo",
"Izquierda",
"Drecha",
"Escoyer",
"Parar / Abortiar",
"Tornar",
"Nueu",
"Orixinal",
"Calca...",
"Tornar al xuegu",
"Salir",
"Felicidaes",
"Mete'l to nome",
"Frame skipping:",
"Horaciu Esquiador PC",
"--------------------",
" ",
" ",
"PROGRAMA, GRAFICOS Y SONIU",
"--------------------",
"Luis I. Garcia (aka Benway)",
" ",
" ",
"PORTS",
"--------------------",
"Traperic (Linux)",
"Peter Hull (Mac)",
" ",
" ",
"TORNA",
"--------------------",
"Bisarma (Asturianu)",
"Araubi (Galego)",
"TBrazil (Catala)",
" ",
" ",
"PREBES DEL PROGRAMA",
"--------------------",
"Maria Rengel",
"Marta Garcia",
"TBrazil",
" ",
" ",
"DEDICAU A...",
"--------------------",
"Jose A. Garcia",
"Nicolas Garcia",
" ",
" ",
"SEMEYA ORIXINAL",
"--------------------",
"(c) 2.002 Sandy White",
" ",
" ",
"AGRADECIMIENTOS",
"--------------------",
"Maria Rengel",
"William Tang",
" ",
" ",
"(c) 1.982 Melbourne House ",
"(c) 2.005 Panik Software",
" ",
" ",
"www.paniksoftware.tk"
};

char MensajeGal [num][63] = {
 "Cartos: ",
 "Puntos: ",
 "Record: ",
 "            * Gastos de ambulancia, 10 $ *            ",
 "            * Prezo por esquiar 10 $ *            ",
 "  SEN CARTOS, NON HAI ESQUI  ",
 "            * Os esquis estan ben *            ",
 "            * Romperonse os esquis *            ",
 "            *** 100 Puntos Extra ***            ",
 "HORACIO",
 "esquiador",
 " ",
 "Comezar",
 "Traduir al catala",
 "Opcions",
 "Taboa de Records",
 "Creditos",
 "Sair",
 "Pantalla completa",
 "En fiestra",
 "Son: ",
 "Definir teclado",
 "Set Grafico: ",
 "Off",
 "On",
 "Arriba",
 "Abaixo",
 "Esquerda",
 "Dereita",
 "Elexir",
 "Pausa / Abortar",
 "Volver",
 "Novo",
 "Orixinal",
 "Pulsa...",
 "Volver o xogo",
 "Sair",
 "Noraboa",
 "Introduce o teu nome",
 "Frame skipping:",
 "Horacio Esquiador",
 "--------------------",
 " ",
 " ",
 "PROGRAMA, GRAFICOS E SON",
 "--------------------",
 "Luis I. Garcia (aka Benway)",
 " ",
 " ",
 "PORTS",
 "--------------------",
 "Traperic (LINUX)",
 "Peter Hull (Mac)",
 " ",
 " ",
 "TRADUCCION",
 "--------------------",
 "Bisarma (Asturianu)",
 "Araubi (Galego)",
 "TBrazil (Catala)",
 " ",
 " ",
 "PROBAS DO PROGRAMA",
 "--------------------",
 "Maria Rengel",
 "Marta Garcia",
 "TBrazil",
 " ",
 " ",
 "DEDICADO A...",
 "--------------------",
 "Jose A. Garcia",
 "Nicolas Garcia",
 " ",
 " ",
 "FOTO ORIXINAL",
 "--------------------",
 "(c) 2.002 Sandy White",
 " ",
 " ",
 "AGRADECEMENTOS",
 "--------------------",
 "Maria Rengel",
 "William Tang",
 " ",
 " ",
 "(c) 1.982 Melbourne House ",
 "(c) 2.005 Panik Software",
 " ",
 " ",
 "www.paniksoftware.tk"
};

char MensajeCat [num][63] = {  
 "Diners: ",
 "Punts: ",
 "Record: ",
 "            * Cost ambulancia, 10 $ *            ",
 "            * Preu per esquiar 10 $ *            ",
 "  SENSE DINERS, NO HI HA ESQUIS  ",
 "            * Els esquis estan be *            ",
 "            * S'han trenquat els esquis *            ",
 "            *** 100 Punts Extra ***            ",
 "HORACI",
 "esquiador",
 " ",
 "Iniciar",
 "Poner en castellano",
 "Opcions",
 "Taula de Records",
 "Credits",
 "Sortir",
 "Pantalla complerta",
 "En Finestra",
 "So: ",
 "Definir teclat",
 "Set Grafic: ",
 "Off",
 "On",
 "A dalt",
 "A baix",
 "Esquerra",
 "Dreta",
 "Seleccionar",
 "Pausa / Abortar",
 "Tornar",
 "Nou",
 "Original",
 "Polsar...",
 "Tornar al joc",
 "Sortir",
 "Enhorabona",
 "Introdueix el teu nom",
 "Frame skipping:",
 "Horaci Esquiador PC",
 "--------------------",
 " ",
 " ",
 "PROGRAMA, GRAFICS I SO",
 "--------------------",
 "Luis I. Garcia (aka Benway)",
 " ",
 " ",
 "PORTS",
 "--------------------",
 "Traperic (Linux)",
 "Peter Hull (Mac)",
 " ",
 " ",
 "TRADUCCIO",
 "--------------------",
 "Bisarma (Asturianu)",
 "Araubi (Galego)",
 "TBrazil (Catala)",
 " ",
 " ",
 "PROBAS DE PROGRAMA",
 "--------------------",
 "Maria Rengel",
 "Marta Garcia",
 "TBrazil",
 " ",
 " ",
 "DEDICAT A...",
 "--------------------",
 "Jose A. Garcia",
 "Nicolas Garcia",
 " ",
 " ",
 "FOTO ORIGINAL",
 "--------------------",
 "(c) 2.002 Sandy White",
 " ",
 " ",
 "AGRAIMENTS",
 "--------------------",
 "Maria Rengel",
 "William Tang",
 " ",
 " ",
 "(c) 1.982 Melbourne House ",
 "(c) 2.005 Panik Software",
 " ",
 " ",
 "www.paniksoftware.tk"
 };
   
   int n;

   Espanol = new char *[Numero];
   English = new char *[Numero];
   Asturianu = new char *[Numero];
   Galego = new char *[Numero];
   Catala = new char *[Numero];
   for (n=0;n<Numero;n++){
       Espanol [n] = new char [Long];
       English [n] = new char [Long];
       Asturianu [n] = new char [Long];
       Galego [n] = new char [Long];
       Catala [n] = new char [Long];
       strcpy (Espanol [n], MensajeEsp [n]);
       strcpy (English [n], MensajeEng [n]);
       strcpy (Asturianu [n], MensajeAst [n]);
       strcpy (Galego [n], MensajeGal [n]);
       strcpy (Catala [n], MensajeCat [n]);
       }
}

Mensajes::~Mensajes()
{
 int n;
 for (n=0;n<Numero;n++){
     delete [] Espanol [n];
     delete [] English [n];
     delete [] Asturianu [n];
     delete [] Galego [n];
     delete [] Catala [n];
     }
    delete[] Espanol;
    delete[] English;
    delete[] Asturianu;
    delete[] Galego;
    delete[] Catala;
    
 delete Config;
    
}

const char* Mensajes::Leer (int NMensaje) {

      Idioma = Config->VerIdioma();
      
      switch (Idioma) {
             case ESPANOL:
                  return Espanol[NMensaje];
             case ENGLISH:
                  return English[NMensaje];
             case ASTURIANU:
                  return Asturianu[NMensaje];
             case GALEGO:
                  return Galego[NMensaje];
             case CATALA:
                  return Catala[NMensaje];
		default:
		return Espanol[NMensaje];
             }
}
