source: 2016/27/AnttiN/SalainenTehtävä/SalainenTehtävä/SalainenTehtävä/SalainenTehtävä.cs @ 7960

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

public class SalainenTehtävä : PhysicsGame
{

    
    private const double nopeus = 2000;

    private const int RUUDUN_KOKO = 40;

    private IntMeter tahtiMittari;
    private int kenttaNRO = 1;
    private const int maxKentat = 1;

    int pelaajia = 1;
    private PhysicsObject pelaaja1;
    private PhysicsObject pelaaja2;

    private Dictionary<int, int> tahtiaKeratty = new Dictionary<int, int>();

    [Save] public int[] tahtiaKerattyTaulukko = new int[maxKentat];

    private Image pelaajanKuva = LoadImage("Hahmo");
    private Image pelaajan2Kuva = LoadImage("Hahmo2");
    private Image tahtiKuva = LoadImage("tahti");
    private Image kovaKuutio = LoadImage("kovaKuutio");
    private Image LaskeutuminenKuva = LoadImage("Laskeutuminen");
    private Image SahkoansaKuva = LoadImage("Sähköansa");
    private Image SahkoansaTykkiKuva = LoadImage("SahkoansaTykki");
    private Image SahkoansaSahkoKuva = LoadImage("SahkoansaSahko");
    private Image RajahdysKuva = LoadImage("Rajahdys");
    private Image TykkiKuva = LoadImage("Tykki");


    private AssaultRifle pelaajan1Ase;
    private AssaultRifle pelaajan2Ase;

    private SoundEffect maaliAani = LoadSoundEffect("maali");

    public override void Begin()
    {
        ClearAll();
        LataaTahdet();
        LuoPaavalikko();
    }

    void LataaTahdet()
    {
        for (int i = 1; i <= maxKentat; i++)
        {
            tahtiaKeratty.Add(i, 0);
        }

        if (DataStorage.Exists("tilanne.xml"))
        {
            // pelitilanne olemassa, ladataan se
            LoadGame("tilanne.xml");
            int j = 0;
            for (int i = 1; i <= maxKentat; i++)
            {
                tahtiaKeratty[i] = tahtiaKerattyTaulukko[j];
            }
        }
        
    }

    void PalaaPaavalikkoon(Window ikkuna)
    {
        LuoPaavalikko();
    }

    void LuoPaavalikko()
    {
        Level.Background.Image = LoadImage("vuoristo");
        Level.Background.FitToLevel();
        Camera.ZoomToLevel();
        Level.Background.Color = Color.Blue;
        MultiSelectWindow alkuValikko = new MultiSelectWindow("Pelin alkuvalikko","Pelaa", "Lopeta");
        Add(alkuValikko);
        alkuValikko.AddItemHandler(0, Pelaa);
        alkuValikko.AddItemHandler(1, Exit);
    }

    void Pelaa()
    {
        Level.Background.Image = LoadImage("kiviseina");
        Level.Background.FitToLevel();
        Camera.ZoomToLevel();
        Level.Background.Color = Color.Gray;
        MultiSelectWindow alkuValikko = new MultiSelectWindow("Valitse kenttä",
        "Kenntä 1 | Tähtiä " + tahtiaKeratty[1],
        /*"Kenntä 2 | Tähtiä " + tahtiaKeratty[2],*/
        "Takaisin");
        Add(alkuValikko);
        alkuValikko.AddItemHandler(0, delegate { ValitsePelaajat(1); });
        alkuValikko.AddItemHandler(1, LuoPaavalikko);

    }

    void ValitsePelaajat(int kentta)
    {
        MultiSelectWindow alkuValikko = new MultiSelectWindow("Kenttä 1. Montako pelaajaa?", "1 Pelaaja", "2 Pelaajaa");
        Add(alkuValikko);
        alkuValikko.AddItemHandler(0, delegate { pelaajia = 1; AloitaPeli(kentta); });
        alkuValikko.AddItemHandler(1, delegate { pelaajia = 2; AloitaPeli(kentta); });
    }

    void AloitaPeli(int kentta)
    {
        this.kenttaNRO = kentta;
        IsMouseVisible = true;
        LuoKentta();
        LuoTahtiLaskuri();
        LisaaNappaimet();

        Camera.Follow(pelaaja1);
        Camera.ZoomFactor = 1.2;
        Camera.StayInLevel = true;
    }

    void LuoKentta()
    {
        TileMap kentta = TileMap.FromLevelAsset("kentta"+kenttaNRO);
        kentta.SetTileMethod('#', LisaaTaso);
        kentta.SetTileMethod('*', LisaaTahti);
        kentta.SetTileMethod('N', LisaaPelaaja,1);
        kentta.SetTileMethod('L', LisaaLaskeutuminen);
        kentta.SetTileMethod('R', LisaaSahkoansaTykkiVaaka);
        kentta.SetTileMethod('S', LisaaSahkoansaTykkiPysty);
        kentta.SetTileMethod('T', LisaaTykki);
        if(pelaajia==2) kentta.SetTileMethod('2', LisaaPelaaja, 2);
        kentta.Execute(RUUDUN_KOKO, RUUDUN_KOKO);
        Level.CreateBorders();
        Level.Background.CreateGradient(Color.White, Color.SkyBlue);
        Level.Background.Image = LoadImage("kiviseina");
    }

    void LuoTahtiLaskuri()
    {
        tahtiMittari = new IntMeter(0,0,3);
        tahtiMittari.UpperLimit += VoimaMittariTaynna;

        ProgressBar voimaPalkki = new ProgressBar(150, 50);
        voimaPalkki.X = Screen.Right - 250;
        voimaPalkki.Y = Screen.Bottom + 100;
        voimaPalkki.BindTo(tahtiMittari);
        voimaPalkki.Image = LoadImage("harmaatTahdet");
        voimaPalkki.BarImage = LoadImage("kultaisetTahdet");
        Add(voimaPalkki);

    }

    void VoimaMittariTaynna()
    {
        MessageDisplay.Add("Keräsit kaikki kolme tähteä!");
    }

    void LisaaTaso(Vector paikka, double leveys, double korkeus)
    {
        PhysicsObject taso = PhysicsObject.CreateStaticObject(leveys, korkeus);
        taso.Position = paikka;
        taso.Image = kovaKuutio;
        Add(taso);
    }

    void LisaaTahti(Vector paikka, double leveys, double korkeus)
    {
        PhysicsObject tahti = PhysicsObject.CreateStaticObject(leveys, korkeus);
        tahti.IgnoresCollisionResponse = true;
        tahti.Position = paikka;
        tahti.Image = tahtiKuva;
        tahti.Tag = "tahti";
        Add(tahti);
    }

    void LisaaPelaaja(Vector paikka, double leveys, double korkeus, int pelaaja)
    {
        if (pelaaja == 1)
        {
            pelaaja1 = LuoPelaaja(paikka, leveys, korkeus, pelaajanKuva, "pelaaja1");
            pelaajan1Ase = LuoPelaajanAse(pelaaja1);
        }
        if (pelaaja == 2)
        {
            pelaaja2 = LuoPelaaja(paikka, leveys, korkeus, pelaajan2Kuva, "pelaaja2");
            pelaajan2Ase = LuoPelaajanAse(pelaaja2);
        }
    }

    PhysicsObject LuoPelaaja(Vector paikka, double leveys, double korkeus,Image kuva, string nimi)
    {
        PhysicsObject pelaaja = new PhysicsObject(leveys*0.9, korkeus*0.9);
        pelaaja.Position = paikka;
        pelaaja.Mass = 4.0;
        pelaaja.Image = kuva;
        AddCollisionHandler(pelaaja, "SahkoansaSahko", TuhoaPelaaja);
        AddCollisionHandler(pelaaja, "tahti", TormaaTahteen);
        AddCollisionHandler(pelaaja, "Laskeutuminen", TormaaLaskeutumiseen);
        Add(pelaaja);
        pelaaja.LinearDamping = 0.9;
        pelaaja.Tag = nimi;
        pelaaja.CanRotate = false;

        return pelaaja;
    }

    AssaultRifle LuoPelaajanAse(PhysicsObject pelaaja)
    {
        AssaultRifle pelaajanAse = new AssaultRifle(30, 10);
        pelaajanAse.Power.MaxValue = 50;
        pelaajanAse.FireRate = 1;
        pelaajanAse.ProjectileCollision = AmmusOsui;
        pelaaja.Add(pelaajanAse);
        return pelaajanAse;
    }

    void LisaaLaskeutuminen(Vector paikka, double leveys, double korkeus)
    {
        PhysicsObject Laskeutuminen = PhysicsObject.CreateStaticObject(leveys, korkeus);
        Laskeutuminen.IgnoresCollisionResponse = true;
        Laskeutuminen.Position = paikka;
        Laskeutuminen.Image = LaskeutuminenKuva;
        Laskeutuminen.Tag = "Laskeutuminen";
        Add(Laskeutuminen);
    }

    void LisaaSahkoansaTykkiPysty(Vector paikka, double leveys, double korkeus)
    {
        PhysicsObject sahko = LisaaSahkoansaSahko(new Vector(paikka.X, paikka.Y-korkeus), leveys/2, korkeus, Angle.FromDegrees(0));
        LisaaSahkoansaTykki(paikka, leveys, korkeus, sahko, Angle.FromDegrees(180));
        LisaaSahkoansaTykki(new Vector(paikka.X, paikka.Y-korkeus*2), leveys, korkeus, sahko, Angle.FromDegrees(0));
    }

    void LisaaSahkoansaTykkiVaaka(Vector paikka, double leveys, double korkeus)
    {
        PhysicsObject sahko = LisaaSahkoansaSahko(new Vector(paikka.X + leveys, paikka.Y), leveys/2, korkeus, Angle.FromDegrees(-90));
        LisaaSahkoansaTykki(paikka,leveys,korkeus,sahko, Angle.FromDegrees(-90));
        LisaaSahkoansaTykki(new Vector(paikka.X + leveys*2, paikka.Y), leveys, korkeus, sahko, Angle.FromDegrees(90));
    }

    void LisaaSahkoansaTykki(Vector paikka, double leveys, double korkeus, PhysicsObject sahko, Angle kaanna)
    {
        SahkoansaTykki Sahkoansa = new SahkoansaTykki(leveys, korkeus, sahko);
        Sahkoansa.Position = paikka;
        Sahkoansa.Image = SahkoansaTykkiKuva;
        Sahkoansa.Tag = "SahkoansaTykki";
        Add(Sahkoansa);
        Sahkoansa.RotateImage = true;
        Sahkoansa.Angle = kaanna;

        Label pisteNaytto = new Label();
        //pisteNaytto.Position = Camera.WorldToScreen(paikka);
        pisteNaytto.TextColor = Color.Red;
        pisteNaytto.BindTo(Sahkoansa.ElamaLaskuri);
        Sahkoansa.Add(pisteNaytto);
    }



    PhysicsObject LisaaSahkoansaSahko(Vector paikka, double leveys, double korkeus,Angle kaanna)
    {
        PhysicsObject SahkoansaSahko = PhysicsObject.CreateStaticObject(leveys, korkeus);
        SahkoansaSahko.Position = paikka;
        SahkoansaSahko.Image = SahkoansaSahkoKuva;
        SahkoansaSahko.Tag = "SahkoansaSahko";
        Add(SahkoansaSahko);
        SahkoansaSahko.RotateImage = true;
        SahkoansaSahko.Angle = kaanna;
        return SahkoansaSahko;
    }

    void LisaaTykki(Vector paikka, double leveys, double korkeus)
    {
        Tykki tykki = new Tykki(leveys, korkeus);
        tykki.Position = paikka;
        tykki.Image = TykkiKuva;
        tykki.Tag = "Tykki";
        Add(tykki);

        AssaultRifle tykkiAse = new AssaultRifle(30, 10);
        tykkiAse.IsVisible = false;
        tykkiAse.Power.MaxValue = 50;
        tykkiAse.FireRate = 0.5;
        tykkiAse.ProjectileCollision = AmmusOsuiPelaajaan;
        tykki.Add(tykkiAse);

        Timer tykkiAjastin = new Timer();
        tykkiAjastin.Interval = 0.5;
        tykkiAjastin.Timeout += delegate
        {
            AmmuAseella(tykkiAse);
        };
        tykkiAjastin.Start();

        tykki.Destroyed += delegate { tykkiAjastin.Stop(); };

        Label pisteNaytto = new Label();
        //pisteNaytto.Position = Camera.WorldToScreen(paikka);
        pisteNaytto.TextColor = Color.Red;
        pisteNaytto.BindTo(tykki.ElamaLaskuri);
        tykki.Add(pisteNaytto);

    }

    void LisaaNappaimet()
    {
        Keyboard.Listen(Key.F1, ButtonState.Pressed, ShowControlHelp, "Näytä ohjeet");
        Keyboard.Listen(Key.Escape, ButtonState.Pressed, ConfirmExit, "Lopeta peli");

        //Pelaajan 1 näppäimet
        Keyboard.Listen(Key.Left, ButtonState.Down, Liikuta, "Liikkuu vasemmalle", pelaaja1, new Vector(-nopeus, 0));
        Keyboard.Listen(Key.Right, ButtonState.Down, Liikuta, "Liikkuu oikealle", pelaaja1, new Vector(nopeus, 0));
        Keyboard.Listen(Key.Up, ButtonState.Down, Liikuta, "Pelaaja liikkuu ylöspäin", pelaaja1, new Vector(0, nopeus));
        Keyboard.Listen(Key.Down, ButtonState.Down, Liikuta, "pelaaja liikkuu alaspäin", pelaaja1, new Vector(0, -nopeus));
        Mouse.Listen(MouseButton.Left, ButtonState.Down, AmmuAseella, "Ammu", pelaajan1Ase);
        Mouse.ListenMovement(0.1, Tahtaa, "Tähtää aseella");


        ControllerOne.Listen(Button.Back, ButtonState.Pressed, Exit, "Poistu pelistä");
        ControllerOne.Listen(Button.DPadUp, ButtonState.Down, Liikuta, "Pelaaja liikkuu ylöspäin", pelaaja1, new Vector(0, nopeus));
        ControllerOne.Listen(Button.DPadDown, ButtonState.Down, Liikuta, "pelaaja liikkuu alaspäin", pelaaja1, new Vector(0, -nopeus));
        ControllerOne.Listen(Button.DPadLeft, ButtonState.Down, Liikuta, "Liikkuu vasemmalle", pelaaja1, new Vector(-nopeus, 0));
        ControllerOne.Listen(Button.DPadRight, ButtonState.Down, Liikuta, "Liikkuu oikealle", pelaaja1, new Vector(nopeus, 0));
        ControllerOne.Listen(Button.A, ButtonState.Down, AmmuAseella, "Ammu", pelaajan1Ase);
        ControllerOne.ListenAnalog(AnalogControl.RightStick, 0.1, Tahtaa2, "Liikuta pelaajaa tattia pyörittämällä.", pelaajan1Ase);


        // Pelaajan 2 ohjaimet
        ControllerTwo.Listen(Button.DPadUp, ButtonState.Down, Liikuta, "Pelaaja liikkuu ylöspäin", pelaaja2, new Vector(0, nopeus));
        ControllerTwo.Listen(Button.DPadDown, ButtonState.Down, Liikuta, "pelaaja liikkuu alaspäin", pelaaja2, new Vector(0, -nopeus));
        ControllerTwo.Listen(Button.DPadLeft, ButtonState.Down, Liikuta, "Liikkuu vasemmalle", pelaaja2, new Vector(-nopeus, 0));
        ControllerTwo.Listen(Button.DPadRight, ButtonState.Down, Liikuta, "Liikkuu oikealle", pelaaja2, new Vector(nopeus, 0));
        ControllerTwo.Listen(Button.A, ButtonState.Down, AmmuAseella, "Ammu", pelaajan2Ase);
        ControllerTwo.ListenAnalog(AnalogControl.RightStick, 0.1, Tahtaa2, "Liikuta pelaajaa tattia pyörittämällä.", pelaajan2Ase);



        PhoneBackButton.Listen(ConfirmExit, "Lopeta peli");
    }

    void Tahtaa2(AnalogState tatinTila, AssaultRifle ase)
    {
        ase.Angle = tatinTila.StateVector.Angle;
    }

    void Liikuta(PhysicsObject hahmo, Vector nopeus)
    {
        hahmo.Push(nopeus);
    }



    void TormaaTahteen(PhysicsObject hahmo, PhysicsObject tahti)
    {
        maaliAani.Play();
        MessageDisplay.Add("Keräsit tähden!");
        tahti.Destroy();
        tahtiMittari.Value += 1;
    }

    void TormaaLaskeutumiseen(PhysicsObject hahmo, PhysicsObject Laskeutuminen)
    {

        MessageDisplay.Add("Läpäisit tason");
        if (tahtiaKeratty[kenttaNRO] < tahtiMittari.Value) tahtiaKeratty[kenttaNRO] = tahtiMittari.Value;
        Timer.SingleShot(1, Voitit);
    }


    void AmmusOsui(PhysicsObject ammus, PhysicsObject kohde)
    {
        ammus.Destroy();
        if(kohde.Tag.ToString() == "SahkoansaTykki")
        {
            ((SahkoansaTykki)kohde).ElamaLaskuri.Value -= 10;
        }
        if (kohde.Tag.ToString() == "Tykki")
        {

            ((Tykki)kohde).ElamaLaskuri.Value -= 10;

        }
    }

    void AmmusOsuiPelaajaan(PhysicsObject ammus, PhysicsObject kohde)
    {
        ammus.Destroy();
        if (kohde.Tag.ToString() == "pelaaja1")
        {
            TuhoaPelaaja(pelaaja1, ammus);
        }
        if (kohde.Tag.ToString() == "pelaaja2")
        {
            TuhoaPelaaja(pelaaja2, ammus);
        }

    }

    void Tahtaa(AnalogState hiirenLiike)
    {
        Vector suunta = (Mouse.PositionOnWorld - pelaajan1Ase.AbsolutePosition).Normalize();
        pelaajan1Ase.Angle = suunta.Angle;
    }
    void AmmuAseella(AssaultRifle ase)
    {
        PhysicsObject ammus = ase.Shoot();

        if (ammus != null)
        {
            ammus.Size *= 1;
            //ammus.Image = ...
            ammus.MaximumLifetime = TimeSpan.FromSeconds(200.0);
        }
    }

    void TuhoaPelaaja(PhysicsObject pelaaja, PhysicsObject kohde)
    {
        pelaaja.Destroy();
        Explosion rajahdys = new Explosion(500);
        rajahdys.Position = pelaaja.Position;
        Add(rajahdys);
        
        Timer.SingleShot(2, delegate { if (pelaaja1.IsDestroyed && pelaaja2.IsDestroyed)
            {
                Mouse.Disable(MouseButton.Left);
                Havisit();
            }
        });
    }

    void Havisit()
    {
        ClearAll();
        Level.Background.Color = Color.Black;
        MultiSelectWindow havioValikko = new MultiSelectWindow("Hävisit pelin", "Aloita alusta", "Päävalikko", "Lopeta");
        Add(havioValikko);
        havioValikko.AddItemHandler(0, delegate { AloitaPeli(kenttaNRO); });
        havioValikko.AddItemHandler(1, LuoPaavalikko);
        havioValikko.AddItemHandler(2, Exit);
    }

    void Voitit()
    {
        ClearAll();
        Level.Background.Color = Color.Black;
        MultiSelectWindow voittoValikko = new MultiSelectWindow("Taso suoritettu", "Pelaa uudelleen", "Päävalikko","Seuraava kenttä", "Lopeta");
        Add(voittoValikko);
        voittoValikko.AddItemHandler(0, delegate { AloitaPeli(kenttaNRO); });
        voittoValikko.AddItemHandler(1, LuoPaavalikko);
        voittoValikko.AddItemHandler(2, delegate { if ((kenttaNRO >= maxKentat)) { MessageWindow ikkuna = new MessageWindow("Ei lisää kenttiä vielä!"); Add(ikkuna); ikkuna.Closed += PalaaPaavalikkoon; } else AloitaPeli(kenttaNRO += 1); });
        voittoValikko.AddItemHandler(3, Exit);

    }

    protected override void OnExiting(object sender, EventArgs args)
    {
        int j = 0;
        for (int i = 1; i <= maxKentat; i++)
        {
            tahtiaKerattyTaulukko[j] = tahtiaKeratty[i];
        }
        SaveGame("tilanne.xml");
        base.OnExiting(sender, args);
    }

}
    


class SahkoansaTykki : PhysicsObject
{
    private IntMeter elamaLaskuri = new IntMeter(50, 0, 50);

    private PhysicsObject sahko;
    public IntMeter ElamaLaskuri { get { return elamaLaskuri; } }

    public SahkoansaTykki(double leveys, double korkeus, PhysicsObject sahko)
        : base(leveys, korkeus)
    {
        MakeStatic();
        this.sahko = sahko;
        elamaLaskuri.LowerLimit += delegate { this.sahko.Destroy(); this.Destroy(); };
    }




}

class Tykki : PhysicsObject
{
    private IntMeter elamaLaskuri = new IntMeter(20, 0, 20);
    public IntMeter ElamaLaskuri { get { return elamaLaskuri; } }

    public Tykki(double leveys, double korkeus)
        : base(leveys, korkeus)
    {
        MakeStatic();
        elamaLaskuri.LowerLimit += delegate { this.Destroy(); };
    }
}