source: 2010/23/lavevake/Rise of darkness/Peli.cs @ 737

using System.Collections.Generic;
using Jypeli;
using Jypeli.ScreenObjects;
using Jypeli.Assets;


namespace Rise_of_darkness //  Lauri Kemppi 2010. All rights reserved.
{
    class Tasohyppely : PhysicsGame
    {

        protected enum Pelitila { Valikko, Peli, UusiPeli, Loppu, EiMikaan }
        Pelitila PelinTila = Pelitila.EiMikaan;
        const int ruudunLeveys = 50;
        const int ruudunKorkeus = 50;


        const double nopeus = 200;
        const double hyppyVoima = 4000;

        IntMeter pisteLaskuri;
        ValueDisplay pisteNaytto;
        Timer laskuri;

        const double virtaMaara = 5000;

        bool voikoHirvioitaSyoda = false;

        DoubleMeter virtaLaskuri;
        ValueDisplay virtaNaytto;
        BarGauge virtaNayttoBar;

        PlatformCharacter pelaaja1;
        PlatformCharacter Hirvio;
        PhysicsObject Virta;
        PhysicsObject Extra;
        PhysicsObject Raha;

        int kenttaNro; // monesko kenttä on menossa

        // Valikkoon liittyvät jutut
        Image valikonTaustakuva;
        PhysicsObject ValikonKursori;
        List<GameObject> ValikonValinnat = new List<GameObject>();


        #region Pelitila ja valikko
        protected bool AsetaPelitila(Pelitila tila)
        {
            if (PelinTila != tila)
            {
                PelinTila = tila;
                switch (tila)
                {
                    case Pelitila.Valikko:
                        {
                            LataaValikko();
                            NaytaValikko();
                            break;
                        }

                    case Pelitila.Peli:
                        {
                            //Level.Clear();
                            ClearAll();
                            pelialkaa();
                            break;
                        }
                    case Pelitila.UusiPeli:
                        {
                            AsetaPelitila(Pelitila.Peli);
                            break;
                        }


                    case Pelitila.Loppu:
                        {
                            Exit();
                            break;
                        }
                    default:
                        break;
                }

                return true;
            }
            return false;
        }

        /// <summary>
        /// Näyttää valikon
        /// </summary>
        void NaytaValikko()
        {
            ClearAll();
            MessageDisplay.Add("Näytä valikko");
            Camera.ZoomToLevel();
            Level.Background.Image = valikonTaustakuva;
            Level.Background.Size = new Vector(Screen.Width, Screen.Height);


            foreach (GameObject gobj in ValikonValinnat)
            {
                Add(gobj);
                Mouse.ListenOn(gobj, MouseButton.Left, ButtonState.Pressed, ValikkoKursorinValinta, null);
            }

            TextDisplay tekijat = new TextDisplay();
            tekijat.TextColor = Color.Green;
            tekijat.Text = "Tekijä:\n" +
                "Ohjelmointi ja grafiikka: Lauri Kemppi\n";
            tekijat.X = Screen.Center.X + 250;
            tekijat.Y = Screen.Center.Y - 300;
            Add(tekijat);

            Add(ValikonKursori);

            //Controls.Clear();
            Mouse.IsCursorVisible = false;
            Mouse.ListenMovement(1, ValikkoKursorinOhjaus, null);
        }


        /// <summary>
        /// Päivittää kursorin sijainnin ja korostaa nappulan
        /// </summary>
        /// <param name="e"></param>
        /// <returns></returns>
        void ValikkoKursorinOhjaus(AnalogState a)
        {
            foreach (PhysicsObject gobj in ValikonValinnat)
            {
                //if (ValikonKursori.X >= gobj.Left && ValikonKursori.X <= gobj.Right &&
                //  ValikonKursori.Top >= gobj.Bottom && ValikonKursori.Bottom <= gobj.Top)
                if (Mouse.IsCursorOnGameObject(gobj))
                {
                    gobj.Image = LoadImage(gobj.Tag + "_");

                }
                else
                    gobj.Image = LoadImage(gobj.Tag.ToString());
            }

            ValikonKursori.Position = Mouse.PositionOnScreen;
        }

        /// <summary>
        /// Kun valikon nappulaa painetaan
        /// </summary>
        /// <param name="e"></param>
        /// <returns></returns>
        void ValikkoKursorinValinta()
        {
            foreach (PhysicsObject gobj in ValikonValinnat)
            {
                //if (ValikonKursori.X >= gobj.Left && ValikonKursori.X <= gobj.Right &&
                //    ValikonKursori.Top >= gobj.Bottom && ValikonKursori.Bottom <= gobj.Top)
                if (Mouse.IsCursorOnGameObject(gobj))
                {
                    switch (gobj.Tag.ToString())
                    {
                        case "aloita":
                            
                            AsetaPelitila(Pelitila.Peli);
                            MessageDisplay.Add("Aloita peli");
                            break;
                        case "lopeta":
                            AsetaPelitila(Pelitila.Loppu);
                            MessageDisplay.Add("Lopeta");
                            break;
                    }
                }
            }
        }

        /// <summary>
        /// Lataa valikon ja luo sen oliot, mutta ei lisää niitä kenttään
        /// </summary>
        void LataaValikko()
        {
            valikonTaustakuva = LoadImage("dark-castle-1");

            LisaaNappula(0, 50, LoadImage("aloita"), "aloita");
            LisaaNappula(0, -50, LoadImage("lopeta"), "lopeta");
            ValikonKursori = PhysicsObject.CreateStaticObject(16, 16);
            ValikonKursori.Shape = Shapes.Triangle;
            ValikonKursori.Color = Color.DarkRed;
        }

        void LisaaNappula(double x, double y, Image kuva, string tagi)
        {
            PhysicsObject nappula = PhysicsObject.CreateStaticObject(200, 60, Shapes.Rectangle);
            // TODO: Nappulat ScreenObjecteina, esim. TextDisplay
            nappula.Tag = tagi;
            nappula.X = x; nappula.Y = y;
            nappula.Image = kuva;
            //nappula.Color = Color.Aqua;

            ValikonValinnat.Add(nappula);
        }

        #endregion

        protected override void Begin()
        {
            
            AsetaPelitila(Pelitila.Valikko);
        }

        private void pelialkaa()
        {
            kenttaNro = 0;
            Level.Width = 2000;
            Level.Height = 1000;


            // Zoomataan lähemmäksi
            Camera.ZoomFactor = 2.0;

            Camera.StayInLevel = true;

            seuraavaKentta();
            MessageDisplay.Add("Pääse koneelle ennen kuin energia loppuu!");

        }

        void vahennaVirtaa(Timer t)
        {
            virtaLaskuri.Value -=7;
        }

        void seuraavaKentta()
        {
            ClearAll();
            
            LuoPistelaskuri();
            pisteLaskuri.Reset();

            kenttaNro += 1; // lisätään kenttänumeroa yhdellä
            MessageDisplay.Add("Kenttä " + kenttaNro);

            // Asetetaan painovoima
            Gravity = new Vector(0, -1000);

            LuoKentta(kenttaNro);
            LisaaNappaimet();
            Camera.Follow(pelaaja1);
            LuoNaytot();
            laskuri = new Timer();
            laskuri.Interval = 0.001;
            laskuri.Trigger += vahennaVirtaa;
            Add(laskuri);
            laskuri.Start();
        }

        private void LuoPistelaskuri()
        {
            // Luodaan pistelaskuri
            pisteLaskuri = new IntMeter(0);

            // luodaan pistelaskunäyttö
            pisteNaytto = new ValueDisplay();
            pisteNaytto.Text = "Pisteitä: ";
            pisteNaytto.X = Screen.RightSafe - 250;
            pisteNaytto.Y = Screen.TopSafe - 50;
            pisteNaytto.BindTo(pisteLaskuri);
            pisteNaytto.TextColor = Color.Yellow;
            pisteNaytto.ValueColor = Color.Red;
            Add(pisteNaytto);    // lisätään peliin

        }

        void LuoKentta(int kentanNro)
        {
            Level.Background.CreateGradient(Color.Black, Color.SkyBlue);
            char[,] ruudut;
            var merkit = new Dictionary<char, ObjectCreator>();
            merkit['='] = LisaaTaso;
            merkit['X'] = Pelaaja1;
            merkit['0'] = LuoHirvio;
            merkit['V'] = LuoVirta;
            merkit['A'] = LisaaMaali;
            merkit['E'] = LuoExtra;
            merkit['R'] = LuoRaha;

            if (kentanNro == 1)
            {
                ruudut = Tiles.ReadFromFile("Text.txt");
                Tiles.Insert(this, ruudut, merkit, ruudunLeveys, ruudunKorkeus);
                //lisaaMaali();
            }

            if (kentanNro == 2)
            {
                ruudut = Tiles.ReadFromFile("Text2.txt");
                Tiles.Insert(this, ruudut, merkit, ruudunLeveys, ruudunKorkeus);
            }

            if (kentanNro > 2)
            {
                Exit();
            }

            

        }


        PhysicsObject LisaaTaso()
        {
            PhysicsObject taso = PhysicsObject.CreateStaticObject(100, 30);
            taso.Color = Color.Black;

            Add(taso);
            return taso;
        }

        PhysicsObject LisaaMaali()
        {
            PhysicsObject maali = PhysicsObject.CreateStaticObject(50, 50, Shapes.Circle);
            maali.Tag = "maali";
            maali.IgnoresCollisionResponse = true;
            maali.Image = LoadImage("Kone 2");
            return maali;
        }

        void LisaaNappaimet()
        {
            Keyboard.Listen(Key.F1, ButtonState.Pressed, ShowControlHelp, "Näytä ohjeet");
            Keyboard.Listen(Key.Escape, ButtonState.Pressed, Exit, "Poistu pelistä");

            Keyboard.Listen(Key.Left, ButtonState.Down, Liikuta, "Liikkuu vasemmalle", -nopeus);
            Keyboard.Listen(Key.Right, ButtonState.Down, Liikuta, "Liikkuu oikealle", nopeus);
            Keyboard.Listen(Key.Up, ButtonState.Pressed, Hyppaa, "Hyppää", hyppyVoima);

            LisaaGamePadNappaimet(ControllerOne);
        }

        void LisaaGamePadNappaimet(GamePad controller)
        {
            controller.Listen(Button.Back, ButtonState.Pressed, Exit, "Poistu pelistä");

            controller.Listen(Button.DPadLeft, ButtonState.Down, Liikuta, "Pelaaja liikkuu vasemmalle", -nopeus);
            controller.Listen(Button.DPadRight, ButtonState.Down, Liikuta, "Pelaaja liikkuu oikealle", nopeus);
            controller.Listen(Button.A, ButtonState.Pressed, Hyppaa, "Pelaaja hyppää", hyppyVoima);
        }

        void Liikuta(double nopeus)
        {
            pelaaja1.Walk(nopeus);
        }

        void Hyppaa(double voima)
        {
            pelaaja1.Jump(voima);
        }

        void OsuiMaaliin(PhysicsObject collidingObject, PhysicsObject otherObject)
        {
            if (otherObject.Tag.ToString() == "maali")
            {
                this.PlaySound("maali");
                int edellisenKentanPisteet = pisteLaskuri.Value;
                seuraavaKentta();
                MessageDisplay.Add("Pääsit läpi kentän " + kenttaNro + ". Pisteitä: " + edellisenKentanPisteet);
            }
        }

        void LopetaPeli()
        {
            pelaaja1.Stop();

            TextDisplay lopetus = new TextDisplay();
            lopetus.Position = Screen.Center;
            lopetus.TextColor = Color.Red;
            Add(lopetus);
            lopetus.Text = "                              Game over.\n" +
            "Jos haluat aloittaa alusta, paina enter. Jos taas haluat lopettaa, paina Esc.";
            ClearControls();
            Keyboard.Listen(Key.Escape, ButtonState.Pressed, Valikkoon, "Poistu pelistä");
            Keyboard.Listen(Key.Enter, ButtonState.Pressed, AloitaAlusta, null);
            //controller.Listen(Button.A, ButtonState.Pressed, AloitaAlusta, null);

        }

        void Valikkoon()
        {
            AsetaPelitila(Pelitila.Valikko);
        }

        void KasitteleTormays(PhysicsObject pelaaja1, PhysicsObject toinen)
        {
            if (toinen.Tag.ToString() == "H")
            {
                if (voikoHirvioitaSyoda == true)
                {
                    toinen.Destroy();
                    MessageDisplay.Add("Tuhosit hirviön!");
                    pisteLaskuri.Value += 1;
                }
                else
                {

                    //Timer lopetus = new Timer();
                    //lopetus.Interval = 0.01;
                    //lopetus.Trigger += new Timer.TriggerHandler(lopetaPeli);
                    //Add(lopetus);
                    //lopetus.Enabled = true;

                    LopetaPeli();
                }
            }

            else if (toinen.Tag.ToString() == "V")
            {
                virtaLaskuri.Value += 1500;
                MessageDisplay.Add("Sait lisää virtaa taskulamppuusi.");
                toinen.Destroy();
                pisteLaskuri.Value += 1;
            }
            else if (toinen.Tag.ToString() == "E")
            {
                voikoHirvioitaSyoda = true;



                MessageDisplay.Add("Voit nyt syödä hirviöitä kymmenen sekunnin ajan!");

                Timer syonti = new Timer();
                syonti.Interval = 10;
                syonti.Trigger += ajastin;
                Add(syonti);
                syonti.Start();

                toinen.Destroy();

                pisteLaskuri.Value += 1;
            }
            else if (toinen.Tag.ToString() == "R")
            {
                MessageDisplay.Add("Poimit rahan!");
                pisteLaskuri.Value += 1;
                toinen.Destroy();
            }
        }

        void LuoNaytot()
        {
            // viestinäytön väri valkoiseksi, jotta näkyy
            MessageDisplay.TextColor = Color.White;

            // polttoainelaskuri ja näytöt
            virtaLaskuri = new DoubleMeter(virtaMaara);
            virtaLaskuri.MaxValue = virtaMaara;
            virtaLaskuri.LowerAlertValue = 750;
            virtaLaskuri.DefaultValue = virtaMaara;
            virtaLaskuri.LowerAlertValue = 1500;
            virtaLaskuri.LowerAlert += virtaUhkaaLoppua;
            virtaLaskuri.LowerLimit += virtaLoppui;

            virtaNayttoBar = new BarGauge();
            virtaNayttoBar.HorizontalOrigin = HorizontalAlignment.Left;
            virtaNayttoBar.VerticalOrigin = VerticalAlignment.Top;
            virtaNayttoBar.ValueColor = Color.Green;
            virtaNayttoBar.Max = virtaMaara;
            virtaNayttoBar.X = Screen.RightSafe - 20;
            virtaNayttoBar.Y = Screen.TopSafe - 20;
            virtaNayttoBar.Width = 30;
            virtaNayttoBar.Height = 200;
            virtaNayttoBar.BindTo(virtaLaskuri);
            Add(virtaNayttoBar);

            virtaNaytto = new ValueDisplay();
            virtaNaytto.HorizontalOrigin = HorizontalAlignment.Left;
            virtaNaytto.VerticalOrigin = VerticalAlignment.Top;
            virtaNaytto.TextColor = Color.Wheat;
            virtaNaytto.ValueColor = Color.Wheat;
            virtaNaytto.X = Screen.RightSafe - 330;
            virtaNaytto.Y = Screen.TopSafe;
            virtaNaytto.BindTo(virtaLaskuri);
            virtaNaytto.Text = "Virtaa jäljellä: ";
            Add(virtaNaytto);
        }

        void virtaUhkaaLoppua(double maara)
        {
            virtaNaytto.ValueColor = Color.Red;
            virtaNayttoBar.ValueColor = Color.Red;
            MessageDisplay.Add("Varoitus: virta alkaa olla vähissä!");
        }

        void virtaLoppui(double polttoAineMaara)
        {

            //Timer lopetus = new Timer();
            //lopetus.Interval = 0.01;
            //lopetus.Trigger += new Timer.TriggerHandler(lopetaPeli);
            //Add(lopetus);
            //lopetus.Enabled = true;
            LopetaPeli();
        }

        PhysicsObject Pelaaja1()
        {
            pelaaja1 = new PlatformCharacter(40, 40);
            pelaaja1.Mass = 4.0;
            pelaaja1.Image = LoadImage("Ukko 2");

            AddCollisionHandler(pelaaja1, OsuiMaaliin);

            AddCollisionHandler(pelaaja1, KasitteleTormays);

            return pelaaja1;
        }

        PhysicsObject LuoHirvio()
        {
            Hirvio = new PlatformCharacter(80, 80);
            Hirvio.Mass = 4.0;
            Hirvio.Image = LoadImage("hirviö");

            Hirvio.Tag = "H";

            return Hirvio;

        }

        PhysicsObject LuoVirta()
        {

            Virta = new PhysicsObject(40, 40);
            Virta.Mass = 4.0;
            Virta.Image = LoadImage("Virta");

            Virta.Tag = "V";

            return Virta;
        }

        PhysicsObject LuoExtra()
        {
            Extra = new PhysicsObject(40, 40);
            Extra.Mass = 4.0;
            Extra.Image = LoadImage("Extra");

            Extra.Tag = "E";

            return Extra;
        }

        PhysicsObject LuoRaha()
        {
            Raha = new PhysicsObject(40, 40);
            Raha.Mass = 4.0;
            Raha.Image = LoadImage("Raha");

            Raha.Tag = "R";

            return Raha;
        }

        void ajastin(Timer sender)
        {
            MessageDisplay.Add("Et voi enää syödä hirviöitä.");
            voikoHirvioitaSyoda = false;
            sender.Stop();
        }

        void AloitaAlusta()
        {
            kenttaNro = 0;
            seuraavaKentta(); // TODO: Aiheuttaa poikkeuksen??
        }
    }
}