source: 2011/24/VilmaK/Magneetti/Magneetti/Magneetti/Peli.cs @ 2096

using System;
using System.Collections.Generic;
using Jypeli;
using Jypeli.Assets;
using Jypeli.Controls;
using Jypeli.Effects;
using Jypeli.Widgets;

public class Peli : PhysicsGame
{
    PhysicsObject Magneetti;
    PhysicsObject JattiMagneetti;
    Image hahmo = LoadImage("örkki");
    GameObject Risti;
    Image liikuttaja = LoadImage("risti");
    IntMeter pisteLaskuri;
    Image lopputeksti = LoadImage("lopputeksti");
    List<Label> valikonKohdat;
    bool pelikaynnissa = false;
    ScoreList topLista = new ScoreList(10, true, 1000);

    int kenttanro = 1;


    public override void Begin()
    {

        Valikko();
        
    }


    void Valikko()
    {

        ClearAll();
        valikonKohdat = new List<Label>();

        Label ohjeet = new Label("Ohjaa hiirellä ristiä. Risti hylkii magneettia.\n" +
        "Ohjaa magneetti maaliin osumatta seiniin tai toiseen magneettiin.\n" +
        "Mitä vähemmän pisteitä, sen parempi.Lopettaaksesi pelin, paina ESC-näppäintä.");
        ohjeet.Y = +100;
        ohjeet.Width = 100;
        //ohjeet.HorizontalSizing = Sizing.FixedSize;
        ohjeet.SizeMode = TextSizeMode.Wrapped;
        Add(ohjeet);
        Label kohta1 = new Label("Aloita uusi peli");
        kohta1.Position = new Vector(0, 40);
        valikonKohdat.Add(kohta1);

        Label kohta2 = new Label("Lopeta");
        kohta2.Position = new Vector(0, -40);
        valikonKohdat.Add(kohta2);

        foreach (Label valikonKohta in valikonKohdat)
        {
            Add(valikonKohta);
        }

        Mouse.ListenOn(kohta1, MouseButton.Left, ButtonState.Pressed, AloitaPeli, null);
        Mouse.ListenOn(kohta2, MouseButton.Left, ButtonState.Pressed, Lopeta, null);

        Mouse.IsCursorVisible = true;
        Mouse.ListenMovement(1.0, ValikossaLiikkuminen, null);
        Keyboard.Listen(Key.Escape, ButtonState.Pressed, Lopeta, "");
    }

    void ValikossaLiikkuminen(AnalogState hiirenTila)
    {
        foreach (Label kohta in valikonKohdat)
        {
            if (Mouse.IsCursorOn(kohta))
            {
                kohta.TextColor = Color.Red;
            }
            else
            {
                kohta.TextColor = Color.Black;
            }

        }
    }

    void AloitaPeli()
    {
        pelikaynnissa = true;
        ClearAll();
        AsetaOhjaimet();
       // kenttanro = 4;
        //LuoKentta(4);
        LuoKentta(kenttanro);
        

        //Level.CreateBorders();

        // Keyboard.Listen(Key.Escape, ButtonState.Pressed, Valikko, "Palaa valikkoon");
    }

    void Lopeta()
    {
        Exit();
    }

    #region kentanluonti

    void LuoKentta(int kenttanro)
    {
        String kentta;
        ClearGameObjects();
        ClearWidgets();
        switch (kenttanro)
        {
            case 1: 
                kentta = "kentta.txt"; 
                Level.BackgroundColor = Color.LimeGreen;
                break;
            case 2: 
                kentta = "kentta2.txt"; 
                Level.BackgroundColor = Color.LimeGreen;
                break;
            case 3: 
                kentta = "kentta3.txt";
                Level.BackgroundColor = Color.LimeGreen;
                break;
            case 4: 
                kentta = "bonuskentta.txt"; 
                Level.BackgroundColor = Color.Aqua;
                break;
            default: kentta = ""; Exit(); break;
        }

        if (DataStorage.Exists("pisteet" + kenttanro + ".xml"))
            topLista = DataStorage.Load<ScoreList>(topLista, "pisteet" + kenttanro + ".xml");

        LuoRisti();
        LuoLaskuri();
        
        TileMap ruudut = TileMap.FromFile(kentta);
        ruudut.SetTileMethod('x', LuoPalikka);
        ruudut.SetTileMethod('p', LuoPuu);
        ruudut.SetTileMethod('o', LuoMaali);
        ruudut.SetTileMethod('j', LuoJarvi);
        ruudut.SetTileMethod('k', LuoKukka);
        ruudut.SetTileMethod('$', LuoMagneetti);
        ruudut.SetTileMethod('r', LuoRanta);
        ruudut.SetTileMethod('M', LuoJattiMagneetti);
        ruudut.SetTileMethod ('R', LuoBonusRanta);

        ruudut.Execute(50, 50);
        Level.CreateBorders(1.0, false);
    }

    void LuoBonusRanta(Vector paikka, double leveys, double korkeus)
    {
        
        GameObject BonusRanta = new GameObject(16 * leveys, 3 * korkeus );
        BonusRanta.Image = LoadImage("bonusranta");
        BonusRanta.Position = new Vector(paikka.X + BonusRanta.Width/2 - leveys / 2, paikka.Y - BonusRanta.Height/2+ korkeus/2);
        //BonusRanta.Position = paikka;
        Add(BonusRanta);
    }

    void LuoPalikka(Vector paikka, double leveys, double korkeus)
    {
        PhysicsObject palikka = PhysicsObject.CreateStaticObject(leveys, korkeus);
        palikka.Position = paikka;
        palikka.Tag = "x";
        palikka.Color = Color.Orange;
        Add(palikka);

    }

    void LuoPuu(Vector paikka, double leveys, double korkeus)
    {
        PhysicsObject puu = PhysicsObject.CreateStaticObject(leveys, korkeus);
        puu.Image = LoadImage("puu");
        puu.Position = paikka;

        Add(puu);
    }

    void LuoMaali(Vector paikka, double leveys, double korkeus)
    {
        PhysicsObject maali = PhysicsObject.CreateStaticObject(leveys, korkeus);
        maali.Image = LoadImage("maali");
        maali.Position = paikka;
        maali.Tag = "o";
        Add(maali);
    }

    void LuoJarvi(Vector paikka, double leveys, double korkeus)
    {
        GameObject jarvi = new GameObject(leveys * 8, korkeus);
        jarvi.Image = LoadImage("järvi");
        jarvi.Position = new Vector(paikka.X + jarvi.Width / 2 - leveys / 2, paikka.Y);
        Add(jarvi);
    }

    void LuoKukka(Vector paikka, double leveys, double korkeus)
    {
        PhysicsObject kukka = PhysicsObject.CreateStaticObject (leveys, korkeus);
        kukka.Image = LoadImage("kukka");
        kukka.Position = paikka;
        Add(kukka);
    }

    void LuoMagneetti(Vector paikka, double leveys, double korkeus)
    {
        Magneetti = new PhysicsObject(20, 20);
        Magneetti.Shape = Shape.Circle;
        Magneetti.Position = paikka;
        Magneetti.Image = hahmo;
        Magneetti.CanRotate = false;
        Magneetti.Restitution = 0.25;
        AddCollisionHandler(Magneetti, KasitteleMagneetinTormays);

        Add(Magneetti, 1);

    }

    void LuoRanta(Vector paikka, double leveys, double korkeus)
    {
        GameObject Ranta = new GameObject(3 * leveys, korkeus);
        Ranta.Image = LoadImage("beach");
        Ranta.Position = new Vector(paikka.X + Ranta.Width / 1.5 - leveys / 2, paikka.Y);
        Add(Ranta);

    }


    void LuoJattiMagneetti(Vector paikka, double leveys, double korkeus)
    {
        JattiMagneetti = PhysicsObject.CreateStaticObject(50, 50);
        JattiMagneetti.Image = LoadImage("jättimagneetti");
        JattiMagneetti.Position = paikka;
        JattiMagneetti.Tag = "M";
        Add(JattiMagneetti);

    }

    void LuoRisti()
    {
        Risti = new GameObject(200, 200);
        Risti.Shape = Shape.Circle;
        Risti.Image = liikuttaja;
        Add(Risti, 1);

    }

    #endregion 

    void AsetaOhjaimet()
    {
        Mouse.IsCursorVisible = false;
        Mouse.ListenMovement(0.1, KuunteleLiiketta, null);
        Keyboard.Listen(Key.Escape, ButtonState.Pressed, Exit, "Lopeta Peli");

    }
    void KuunteleLiiketta(AnalogState hiirentila)
    {
        Risti.X = Mouse.PositionOnWorld.X;
        Risti.Y = Mouse.PositionOnWorld.Y;
    }

    void LuoLaskuri()
    {
        pisteLaskuri = new IntMeter(0);
        pisteLaskuri.MinValue = int.MinValue;
        Label pisteNaytto = new Label();
        pisteNaytto.X = Screen.Right - 100;
        pisteNaytto.Y = Screen.Top - 100;
        pisteNaytto.TextColor = Color.White;
        pisteNaytto.BindTo(pisteLaskuri);
        Add(pisteNaytto);
    }

    void KasitteleMagneetinTormays(PhysicsObject Magneetti, PhysicsObject kohde)
    {
        // Seinä
        if (kohde.Tag.ToString() == "x")
        {
            pisteLaskuri.Value++;
        }

        // Iso magneetti
        if (kohde.Tag.ToString() == "M")
        {
            pisteLaskuri.Value += 100;
        }

        // Loppu eli maali
        if (kohde.Tag.ToString() == "o")
        {
            GameObject loppu = new GameObject(226, 29);
            Magneetti.Destroy();
            loppu.Image = lopputeksti;

            Add(loppu);
            pisteLaskuri.MaxValue = pisteLaskuri.Value;
            Label loppupiste = new Label();
            loppupiste.Y = -40;
            loppupiste.BindTo(pisteLaskuri);
            Add(loppupiste);
            if ((kenttanro == 4 && pisteLaskuri.Value <= 1) || (kenttanro != 4 && pisteLaskuri.Value <= 1000))
            {
                HighScoreWindow topIkkuna = new HighScoreWindow("Magneetti",
                                 "Parhaat pisteet",
                                 "Onneksi olkoon, pääsit listalle pisteillä %p! Syötä nimesi:",
                                 topLista, pisteLaskuri.Value);
                topIkkuna.Closed += TallennaPisteet;
                Add(topIkkuna);
            }
            else
            {
                HighScoreWindow topIkkuna = new HighScoreWindow("Magneetti",
                                 "Parhaat pisteet",
                                 topLista);
                Add(topIkkuna);
            }
        }
    }

    void TallennaPisteet(Window sender)
    {
        DataStorage.Save<ScoreList>(topLista, "pisteet" + kenttanro + ".xml");
        LuoKentta(++kenttanro);
    }

    protected override void Update(Time time)
    {

        // SetWindowSize(1024, 768, false);
        if (pelikaynnissa)
        {

            Vector v = Magneetti.Position - Risti.Position;
            // MessageDisplay.Add(v.X + " " + v.Y);
            Magneetti.Push(1000 / v.Magnitude * v.Normalize());

            Vector z = JattiMagneetti.Position - Magneetti.Position;
            Magneetti.Push(1500 / z.Magnitude * z.Normalize());
        }

        base.Update(time);
    }
}