source: 2010/24/ramipasa/ALTKTileEngine/Peli.cs @ 810

using System;                        // Tämän tarpeellisuus pitäisi olla itsestäänselvyys
using Jypeli;                        // Jypeli
using Jypeli.ScreenObjects;          // Jypeli.ScreenObjects
using Jypeli.Assets;                 // Jypeli.Assets
using System.Collections.Generic;    // Jypelin tutoriaali
using System.IO;                     // Streamreader vaatii tämän
using System.Windows.Forms;          // jotta voin näyttää msgboxeja

namespace ALTKTileEngine
{
    public class Peli : Game
    {
        //int[,] MapObjectCoords;
        int[,] TerrainMap;
        int[,] DTerrainMap;

        int kartanLeveys;
        int kartanKorkeus;

        // perusmaastotyypit
        const int Aavikko = 2, Tundra = 3, Vuoristo = 1, Lehtimetsa = 0;
        
        // erikoismaastotyypit
        const int Havumetsa = 2, Tyhja = 0;

        // Pelissä on kaksi eri tasoa, toisella perusmaasto ja toisella tarkempaa tietoa (esim. onko ruutu metsää ym.)
        PhysicsObject[,] tile;
        PhysicsObject[,] DTile;
        //Vector tileVector;

        protected override void Begin()
        {
            LuoKentta();
        }
        # region Kartan luominen
        void LuoKentta()
        {
            //tileVector = new Vector();
            Int32 num;
            Int32 i;
            Int32 j;
            Int32 a;
            Int32 b;
            string mLine;
            //string chars;
            num = RandomGen.NextInt(1, 6);
            //chars = " VAT";
            TextReader bReader;
            bReader = new StreamReader("Content\\Maps\\1\\base.txt");

            //try
            //{

                // Yleensä kartan kaksi ensimmäistä riviä ovat kommentteja
                bReader.ReadLine();
                bReader.ReadLine();

                kartanLeveys = Convert.ToInt32(bReader.ReadLine().Substring(9, 2));
                kartanKorkeus = Convert.ToInt32(bReader.ReadLine().Substring(10, 2));

                Int32 mapWidthJ = (kartanLeveys * 48) / 2;
                Int32 mapHeightJ = (kartanKorkeus * 48) / 2;

                bReader.ReadLine();
                // Ladataan TerrainMapit muistiin

                TerrainMap = new int[kartanKorkeus, kartanLeveys];
                for (a = 0; a <= (kartanKorkeus - 1); a++)
                {
                    for (b = 0; b <= (kartanLeveys - 1); b++)
                    {
                        TerrainMap[a, b] = new int();
                    }
                }

                DTerrainMap = new int[kartanKorkeus, kartanLeveys];
                for (a = 0; a <= (kartanKorkeus - 1); a++)
                {
                    for (b = 0; b <= (kartanKorkeus - 1); b++)
                    {
                        DTerrainMap[a, b] = new int();
                    }
                }

                // Ladataan ruudut muistiin

                tile = new PhysicsObject[kartanKorkeus, kartanLeveys];
                for (a = 0; a <= (kartanKorkeus - 1); a++)
                {
                    for (b = 0; b <= (kartanLeveys - 1); b++)
                    {
                        tile[a, b] = new PhysicsObject(48.0, 48.0);
                    }
                }

                DTile = new PhysicsObject[kartanKorkeus, kartanLeveys];
                for (a = 0; a <= (kartanKorkeus - 1); a++)
                {
                    for (b = 0; b <= (kartanLeveys - 1); b++)
                    {
                        DTile[a, b] = new PhysicsObject(48.0, 48.0);
                    }
                }

                // Koodi käännetty RGE:n VB.netistä
            // Asettaa ja piirtää pohjamaaston
            
                for (i = 0; i <= (kartanKorkeus - 1); i++)
                {
                    mLine = bReader.ReadLine();
                    for (j = 0; j <= (kartanLeveys - 1); j++)
                    {
                        // MessageBox.Show(mLine + " " + j + " " + i);
                        TerrainMap[i, j] = getTerrainType(mLine.Substring(j, 1));
                        //tileVector.X = j * 48;
                        //tileVector.Y = i * 48;
                        tile[i, j].Shape = Shapes.Rectangle;
                        tile[i, j].X = (j * 48) - mapWidthJ;
                        tile[i, j].Y = (i * 48) - mapHeightJ;
                        tile[i, j].Restitution = 0.0;
                        tile[i, j].Image = LoadImage(getTexture_fromTerrainType(TerrainMap[i, j]));
                        // tile.Position = tileVector;
                        Add(tile[i, j]);
                        // MessageBox.Show(Convert.ToString(TerrainMap[i, j]));
                    }
                }

            // Luetaan karttatiedoston rivivälit
                bReader.ReadLine();
                bReader.ReadLine();

            // Asettaa ja piirtää erikoismaaston

                for (i = 0; i <= (kartanKorkeus - 1); i++)
                {
                    mLine = bReader.ReadLine();
                    for (j = 0; j <= (kartanLeveys - 1); j++)
                    {
                        // MessageBox.Show(mLine + " " + j + " " + i);
                        DTerrainMap[i, j] = getDetailTerrainType(mLine.Substring(j, 1));
                        //DTileVector.X = j * 48;
                        //DTileVector.Y = i * 48;
                        DTile[i, j].Shape = Shapes.Rectangle;
                        DTile[i, j].X = (j * 48) - mapWidthJ;
                        DTile[i, j].Y = (i * 48) - mapHeightJ;
                        DTile[i, j].Restitution = 0.0;
                        DTile[i, j].Image = LoadImage(getTexture_fromDetailTerrainType(DTerrainMap[i, j]));
                        // DTile.Position = DTileVector;
                        Add(DTile[i, j]);
                        // MessageBox.Show(Convert.ToString(TerrainMap[i, j]));
                    }
                }


            //catch
            //{
            //    MessageBox.Show("Map error!");
            //    bReader.Close();
            //    Exit();
            //}
            bReader.Close();
            Level.BackgroundColor = Color.Black;
            //MapObjectCoords = new int[kartanLeveys, kartanKorkeus];
            // var merkit = new Dictionary<char, ObjectCreator>();
            // merkit['='] = LuoPalikka;
            // merkit['*'] = LuoTahti;

            // char[,] ruudut = Tiles.ReadFromFile("Content\\Maps\\1\\base.txt");
            //Tiles.Insert(this, ruudut, merkit, kartanLeveys, kartanKorkeus);
        }
        # endregion
        int getTerrainType(string ch)
        {
            /*/ Maastotyypit
             * 0 = lehtimetsää
             * 1 = vuoristoa
             * 2 = aavikkoa
             * 3 = tundraa
            /*/
            if (ch == " ") { return Lehtimetsa; }
            if (ch == "V") { return Vuoristo; }
            if (ch == "A") { return Aavikko; }
            if (ch == "T") { return Tundra; }
            return 0;
        }

        int getDetailTerrainType(string ch)
        {
            /*/ Erikoismaastotyypit
             * 0 = ei mitään
             * 1 = vuoristoa
             * 2 = metsää
            /*/
            if (ch == " ") { return Tyhja; }
            if (ch == "M") { return Havumetsa; }
            if (ch == "V") { return Vuoristo; }
            return Tyhja;
        }

        string getTexture_fromTerrainType(int terraintype)
        {
            if (terraintype == Lehtimetsa) { return Application.StartupPath + "\\Content\\Textures\\grassland"; }
            if (terraintype == Vuoristo) { return Application.StartupPath + "\\Content\\Textures\\mountain"; }
            if (terraintype == Aavikko) { return Application.StartupPath + "\\Content\\Textures\\desert"; }
            if (terraintype == Tundra) { return Application.StartupPath + "\\Content\\Textures\\water"; }
            return Application.StartupPath + "\\Content\\Textures\\grassland.jpg";
        }

        string getTexture_fromDetailTerrainType(int dtType)
        {
            if (dtType == Tyhja) { return Application.StartupPath + "\\Content\\Textures\\nothing"; }
            if (dtType == Vuoristo) { return Application.StartupPath + "\\Content\\Textures\\mountain"; }
            if (dtType == Havumetsa) { return Application.StartupPath + "\\Content\\Textures\\forest"; }
            return Application.StartupPath + "\\Content\\Textures\\nothing";
        }
        }

            //bReader.ReadLine();

            //chars = ".a";

            //for (i = 0; i <= 19; i++)
            //{
            //    Log("LoadBattle: ShadowField; i = " + i + "; luetaan rivi", false);
            //    mLine = bReader.ReadLine;
            //    for (j = 0; j <= 19; j++)
            //    {
            //        ShadowField(j, i) = Strings.InStr(chars, Strings.Mid(mLine, j + 1, 1)) - 1;
            //    }
            //}
            //bReader.ReadLine();

            //chars = ".rasp+k";
            //string a = null;
            //for (i = 0; i <= 19; i++)
            //{
            //    Log("LoadBattle: DetailTerrainField; i = " + i + "; luetaan rivi", false);
            //    mLine = bReader.ReadLine;
            //    for (j = 0; j <= 19; j++)
            //    {
            //        DetailTerrainField(j, i) = Strings.InStr(chars, Strings.Mid(mLine, j + 1, 1)) - 1;
            //        a = Strings.InStr(chars, Strings.Mid(mLine, j + 1, 1)) - 1;
            //    }
            //}

        //PhysicsObject LuoPalikka()
        //{
        //    PhysicsObject palikka = PhysicsObject.CreateStaticObject(50.0, 50.0);
        //    palikka.Shape = Shapes.Circle;
        //    palikka.Color = Color.LimeGreen;
        //    this.Add(palikka);
        //    return palikka;
        //}

        //PhysicsObject LuoTahti()
        //{
        //    PhysicsObject tahti = PhysicsObject.CreateStaticObject(25.0, 25.0);
        //    tahti.Shape = Shapes.Rectangle;
        //    tahti.Color = Color.LightGray;
        //    this.Add(tahti);
        //    return tahti;
        //}

    }