source: 2014/30/AleksiK/TToDHS/TToDHS/TToDHS/TToDHS.cs @ 5588

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

public class TToDHS : PhysicsGame
{
    PhysicsObject stein;
    PhysicsObject taistoStein;
    //VAIHDA NIMI NAISESTA NIMEKSI
    PhysicsObject nainen;
    PhysicsObject taistoNainen;
    PhysicsObject mustaTakki;
    PhysicsObject taistoMustaTakki;
    PhysicsObject oviEteen;
    PhysicsObject oviTaakse;
    PhysicsObject inventory;
    double ruutuNelionSivu;

    Light valo;
    Timer valoAjastin = new Timer();
    Vector steinLuontiPiste = new Vector(0, 0);

    IntMeter huoneLaskuri = new IntMeter(0);
    IntMeter potionLaskuri = new IntMeter(0);
    IntMeter steinHp = new IntMeter(20);
    IntMeter steinDmg = new IntMeter(6);
    IntMeter steinDef = new IntMeter(4);
    IntMeter steinLvl = new IntMeter(1);
    IntMeter steinExp = new IntMeter(0);
    IntMeter mustaTakkiHp = new IntMeter(10);
    IntMeter mustaTakkiDmg = new IntMeter(6);
    IntMeter mustaTakkiDef = new IntMeter(3);

    List<Label> alkuKohdat;
    List<Label> taistoKohdat;
    Label luetDocua;
    Label potionInInv;

    //TO DO: Nainen + MustaTakit, TutorialBattle + Stats + Party, Tarinaa ->, muut huoneet, itemit, battlet

    public override void Begin()
    {
        //IsFullScreen = true;
        ruutuNelionSivu = Screen.Height / 20;
        AlkuValikko();

        Level.Background.Color = Color.Black;
        Level.AmbientLight = 0;

        valo = new Light();
        valo.Intensity = 0;
        valo.Distance = 1000;
        Add(valo);

        PotionienLaskuri();

        steinExp.MaxValue = 32;

        //Tee tälle oma aliohjelmansa, joka kutsutaan, kun stein voittaa taistelun!

        steinExp.UpperLimit += delegate { steinLvl.Value += 1; };
        steinExp.UpperLimit += delegate { steinHp.Value += RandomGen.NextInt(1 - 5); };
        steinExp.UpperLimit += delegate { steinDmg.Value += 1; };
        steinExp.UpperLimit += delegate { steinDef.Value += 1; };
        steinExp.UpperLimit += delegate { steinExp.MaxValue *= steinLvl.Value; };
        steinExp.UpperLimit += delegate { steinExp.Reset(); };
    }

    void AlkuValikko()
    {
        Mouse.IsCursorVisible = true;

        Label otsikko = new Label("The Tale of Dr Harvard Stein");
        otsikko.Position = new Vector(0, 140);
        otsikko.Font = Font.DefaultLargeBold;
        otsikko.TextColor = Color.BrightGreen;
        Add(otsikko);

        alkuKohdat = new List<Label>();

        Label alku1 = new Label("New Game");
        alku1.Position = new Vector(0, 80);
        alku1.Font = Font.DefaultLarge;
        alkuKohdat.Add(alku1);

        Label alku2 = new Label("Exit");
        alku2.Position = new Vector(0, 30);
        alku2.Font = Font.DefaultLarge;
        alkuKohdat.Add(alku2);


        foreach (Label alkuKohta in alkuKohdat)
        {
            Add(alkuKohta);
        }

        Mouse.ListenOn(alku1, MouseButton.Left, ButtonState.Pressed, HuoneenLaskuri, null, 2);
        Mouse.ListenOn(alku2, MouseButton.Left, ButtonState.Pressed, Exit, null);
        Mouse.ListenMovement(1.0, AlkuKohtaHiiri, null);
    }

    void AlkuKohtaHiiri(AnalogState hiiri)
    {
        foreach (Label alkuKohta in alkuKohdat)
        {
            if (Mouse.IsCursorOn(alkuKohta))
            {
                alkuKohta.TextColor = Color.Red;
            }

            else
            {
                alkuKohta.TextColor = Color.Blue;
            }
        }
    }

    void HuoneenLaskuri(int x)
    {
        Mouse.IsCursorVisible = false;

        huoneLaskuri.MinValue = 0;
        huoneLaskuri.MaxValue = 10;

        if (huoneLaskuri.Value == 0)
        {
            if (x == 1)
            {
                steinLuontiPiste = new Vector(100, 100);
            }

            LuoHuone("Labrahuone");
        }

        else if (huoneLaskuri.Value == 1)
        {
            if (x == 0)
            {
                steinLuontiPiste = new Vector(-200, 200);
            }

            else if (x == 1)
            {
                steinLuontiPiste = new Vector(200, -200);
            }

            LuoHuone("INSERT ROOM 2 HERE");
        }
    }

    void LuoHuone(String tekstinNimi)
    {
        ClearGameObjects();
        TileMap huone = TileMap.FromLevelAsset(tekstinNimi);
        huone.SetTileMethod('X', LuoSeina);
        huone.SetTileMethod('S', LuoStein);
        huone.SetTileMethod('D', LuoDoc);
        huone.SetTileMethod('V', LuoVitriini);
        huone.SetTileMethod('A', LuoPotionhuone1);
        huone.SetTileMethod('F', LuoOviEteen);
        huone.SetTileMethod('B', LuoOviTaakse);
        huone.Execute(ruutuNelionSivu, ruutuNelionSivu);

        HuoneenValo(0, 1);
    }

    void LuoSeina(Vector paikka, double leveys, double korkeus)
    {
        PhysicsObject seina = PhysicsObject.CreateStaticObject(leveys, korkeus);
        seina.Position = paikka;
        seina.Color = Color.Gray;
        seina.CollisionIgnoreGroup = 1;
        seina.Restitution = 0;
        AddCollisionHandler(seina, "stein", PalautaStein);
        Add(seina);
    }

    void LuoStein(Vector paikka, double leveys, double korkeus)
    {
        stein = new PhysicsObject(leveys * 0.8, korkeus * 0.8);
        stein.Position = steinLuontiPiste;
        stein.Color = Color.Green;
        stein.Restitution = 0;
        stein.CanRotate = false;
        stein.Tag = "stein";
        Add(stein);

        Camera.Follow(stein);
        Camera.Zoom(0.75);

        Timer.SingleShot(1, delegate { SteinKontrollit(0); });
    }

    void SteinKontrollit(int x)
    {
        if (x == 1)
        {
            luetDocua.Destroy();
        }

        ClearControls();

        //Jos muutat nopeutta, moni Timer.Singleshot menee väärään aikaan, mm. PalautaStein, SteinNopeus ja LuetDoc
        Keyboard.Listen(Key.D, ButtonState.Down, AsiaNopeus, null, stein, ruutuNelionSivu * 5, 0.0, 0.0);
        Keyboard.Listen(Key.A, ButtonState.Down, AsiaNopeus, null, stein, -ruutuNelionSivu * 5, 0.0, 0.0);
        Keyboard.Listen(Key.W, ButtonState.Down, AsiaNopeus, null, stein, 0.0, ruutuNelionSivu * 5, 0.0);
        Keyboard.Listen(Key.S, ButtonState.Down, AsiaNopeus, null, stein, 0.0, -ruutuNelionSivu * 5, 0.0);
        Keyboard.Listen(Key.E, ButtonState.Pressed, InventorinTilanMuutos, null, 0);
    }

    void AsiaNopeus(PhysicsObject liikkuja, double x, double y, double z)
    {
        liikkuja.Velocity = new Vector(x, y);

        if ((x + 1 ) * (y + 1) > 2)
        {
            ClearControls();
            Timer.SingleShot(0.2, delegate { AsiaNopeus(liikkuja, 0, 0, 0); });
        }

        else if ((x + 1) * (y + 1) < 1)
        {
            ClearControls();
            Timer.SingleShot(0.2, delegate { AsiaNopeus(liikkuja, 0, 0, 0); });
        }

        else if (z == 0)
        {
            SteinKontrollit(0);
        }
    }

    void PalautaStein(PhysicsObject wall, PhysicsObject dr)
    {
        dr.Velocity = dr.Velocity * -1;
        //Määritetty Steinin koosta ja nopeudesta
        Timer.SingleShot( 0.02, delegate { AsiaNopeus(dr, 0, 0, 1); });
    }

    void LuoDoc(Vector paikka, double leveys, double korkeus)
    {
        PhysicsObject doc = PhysicsObject.CreateStaticObject(leveys, korkeus);
        doc.Position = paikka;
        doc.Color = Color.White;
        doc.CollisionIgnoreGroup = 1;
        doc.Restitution = 0;
        AddCollisionHandler(doc, "stein", PalautaStein);
        AddCollisionHandler(doc, "stein", LuetDoc);
        Add(doc);
    }

    void LuetDoc(PhysicsObject doku, PhysicsObject dr)
    {
        luetDocua = new Label("It's full of complicated calculations. Better leave it alone.");
        luetDocua.Y = Screen.Bottom + 100;
        luetDocua.Font = Font.DefaultLarge;
        luetDocua.TextColor = Color.Green;
        luetDocua.Color = Color.DarkGray;
        luetDocua.BorderColor = Color.Gray;
        Add(luetDocua);

        ClearControls();
        Timer.SingleShot(0.042, delegate { ClearControls(); });
        Timer.SingleShot(0.161, delegate { ClearControls(); });

        Timer.SingleShot(1, delegate { Keyboard.Listen(Key.Space, ButtonState.Pressed, SteinKontrollit, null, 1); });
    }

    void LuoVitriini(Vector paikka, double leveys, double korkeus)
    {
        PhysicsObject vitriini = PhysicsObject.CreateStaticObject(leveys * 3, korkeus);
        vitriini.Position = paikka;
        vitriini.CollisionIgnoreGroup = 1;
        vitriini.Restitution = 0;
        AddCollisionHandler(vitriini, "stein", PalautaStein);
        Add(vitriini);
    }

    void LuoPotionhuone1(Vector paikka, double leveys, double korkeus)
    {
        PhysicsObject potionhuone1 = PhysicsObject.CreateStaticObject(leveys, korkeus);
        potionhuone1.Position = paikka;
        potionhuone1.Color = Color.Red;
        potionhuone1.IgnoresCollisionResponse = true;
        AddCollisionHandler(potionhuone1, "stein", SaitPotioninHuoneessa1);
        Add(potionhuone1);
    }

    void SaitPotioninHuoneessa1(PhysicsObject esine, PhysicsObject dr)
    {
        esine.Destroy();
        potionLaskuri.Value += 1;

        ClearControls();
        Timer.SingleShot(0.201, delegate { ClearControls(); });
        Timer.SingleShot(2, Cutscene1);
    }

    //Säädä CUTSCENE!!!

    void Cutscene1()
    {
        LuoNainen(new Vector(-ruutuNelionSivu * 12, -ruutuNelionSivu * 1), ruutuNelionSivu, ruutuNelionSivu);
        nainen.Velocity = new Vector(ruutuNelionSivu * 5, 0);
        Timer.SingleShot(1, delegate { AsiaNopeus(nainen, 0, 0, 1);
                                       nainen.Velocity = new Vector(0, -ruutuNelionSivu * 5); });
        Timer.SingleShot(1.8, delegate { AsiaNopeus(nainen, 0, 0, 1);
                                         nainen.Velocity = new Vector(ruutuNelionSivu * 5, 0); });
        Timer.SingleShot(3.2, delegate { AsiaNopeus(nainen, 0, 0, 1); });

        Timer.SingleShot(0.4, delegate { LuoMustaTakki(new Vector(-ruutuNelionSivu * 12, -ruutuNelionSivu * 1), ruutuNelionSivu, ruutuNelionSivu);
                                         mustaTakki.Velocity = new Vector(ruutuNelionSivu * 5, 0); });
        Timer.SingleShot(1.4, delegate { AsiaNopeus(mustaTakki, 0, 0, 1);
                                         mustaTakki.Velocity = new Vector(0, -ruutuNelionSivu * 5); });
        Timer.SingleShot(2.4, delegate { AsiaNopeus(mustaTakki, 0, 0, 1);
                                         mustaTakki.Velocity = new Vector(ruutuNelionSivu * 5, 0); });
        Timer.SingleShot(4, delegate { AsiaNopeus(mustaTakki, 0, 0, 1);
                                       mustaTakki.Velocity = new Vector(0, ruutuNelionSivu * 5); });
        Timer.SingleShot(4.02, delegate { AsiaNopeus(mustaTakki, 0, 0, 1); });
    }

    //Vaihda nimi Luo[NaisenNimi]
    //Muista parametrit!

    void LuoNainen(Vector paikka, double leveys, double korkeus)
    {
        nainen = new PhysicsObject(leveys, korkeus);
        nainen.Position = paikka;
        nainen.Color = Color.Red;
        nainen.Restitution = 0;
        nainen.CanRotate = false;
        Add(nainen);
    }

    //Muista parametrit!

    void LuoMustaTakki(Vector paikka, double leveys, double korkeus)
    {
        mustaTakki = new PhysicsObject(leveys, korkeus);
        mustaTakki.Position = paikka;
        mustaTakki.Color = Color.DarkGray;
        mustaTakki.Restitution = 0;
        mustaTakki.CanRotate = false;
        AddCollisionHandler(mustaTakki, "stein", AloitaTaistelu);
        AddCollisionHandler(mustaTakki, "stein", PalautaStein);
        Add(mustaTakki);
    }

    void LuoOviEteen(Vector paikka, double leveys, double korkeus)
    {
        oviEteen = PhysicsObject.CreateStaticObject(leveys, korkeus);
        oviEteen.Position = paikka;
        oviEteen.IgnoresCollisionResponse = true;
        AddCollisionHandler(oviEteen, "stein", SeuraavaHuone);
        Add(oviEteen);
    }

    void SeuraavaHuone(PhysicsObject door, PhysicsObject dr)
    {
        huoneLaskuri.Value = huoneLaskuri.Value + 1;
        HuoneenValo(0, 2);
        Timer.SingleShot(1.5, delegate { HuoneenLaskuri(0); });
    }

    void LuoOviTaakse(Vector paikka, double leveys, double korkeus)
    {
        oviTaakse = PhysicsObject.CreateStaticObject(leveys, korkeus);
        oviTaakse.Position = paikka;
        oviTaakse.IgnoresCollisionResponse = true;
        AddCollisionHandler(oviTaakse, "stein", EdellinenHuone);
        Add(oviTaakse);
    }

    void EdellinenHuone(PhysicsObject door, PhysicsObject dr)
    {
        huoneLaskuri.Value = huoneLaskuri.Value - 1;
        HuoneenValo(0, 2);
        Timer.SingleShot(1.5, delegate { HuoneenLaskuri(1); });
    }

    void HuoneenValo(int x, int y)
    {
        if (x == 1)
        {
            valo.Intensity += 0.067;
        }

        else if (x == 2)
        {
            valo.Intensity -= 0.067;
        }

        else if (x == 0)
        {
            valoAjastin.Interval = 0.05;
            valoAjastin.Timeout += delegate { HuoneenValo(y, 0); };
            valoAjastin.Start(15);
        }
    }

    void PotionienLaskuri()
    {
        potionLaskuri.MinValue = 0;
        potionLaskuri.MaxValue = 10;
    }

    //Laita Label("Inventory") Inventoryn yläosaan!

    void InventorinTilanMuutos(int x)
    {
        if (x == 0)
        {
            ClearControls();
            Keyboard.Listen(Key.E, ButtonState.Pressed, InventorinTilanMuutos, null, 1);

            inventory = PhysicsObject.CreateStaticObject(ruutuNelionSivu * 10, ruutuNelionSivu * 20);
            inventory.Color = Color.LightGray;
            inventory.IgnoresCollisionResponse = true;
            inventory.CollisionIgnoreGroup = 1;
            inventory.Position = new Vector(0, 0);
            Add(inventory);

            if (potionLaskuri.Value > 0)
            {
                potionInInv = new Label("Potion");
                potionInInv.Position = new Vector(-inventory.Width / 4, inventory.Height / 7 * 2.3);
                potionInInv.Font = Font.DefaultLarge;
                potionInInv.TextColor = Color.Red;
                Add(potionInInv);
            }
        }

        else if (x == 1 && potionLaskuri.Value > 0)
        {
            inventory.Destroy();
            potionInInv.Destroy();
            SteinKontrollit(0);
        }

        else if (x== 1)
        {
            inventory.Destroy();  
            SteinKontrollit(0);
        }
    }

    //Selvitä miksi valo ei vähene HuoneenValo(0,2); -komennolla

    void AloitaTaistelu(PhysicsObject vastus, PhysicsObject dr)
    {
        steinLuontiPiste = stein.Position;
        HuoneenValo(0, 2);

        Timer.SingleShot(0.75, delegate { ClearGameObjects();
                                          //HuoneenValo(0, 1);
                                          TileMap taistelu = TileMap.FromLevelAsset("Taistelu");
                                          taistelu.SetTileMethod('V', LuoTaistoon, 0);
                                          taistelu.SetTileMethod('S', LuoTaistoon, 1);
                                          taistelu.SetTileMethod('N', LuoTaistoon, 2);
                                          taistelu.Execute(ruutuNelionSivu, ruutuNelionSivu); });
        Timer.SingleShot(1.5, delegate { LuoTaistoValikko(); });
    }

    void LuoTaistoon(Vector paikka, double leveys, double korkeus, int x)
    {
        if (x == 0)
        {
            taistoMustaTakki = LuoTaistoOtus(paikka, leveys, korkeus, Color.DarkGray);
        }

        else if (x == 1)
        {
            taistoStein = LuoTaistoOtus(paikka, leveys, korkeus, Color.Green);
        }

        else if (x == 2)
        {
            taistoNainen = LuoTaistoOtus(paikka, leveys, korkeus, Color.Red);
        }
    }

    PhysicsObject LuoTaistoOtus(Vector paikka, double leveys, double korkeus, Color vari)
    {
        PhysicsObject taistelija = new PhysicsObject(leveys, korkeus);
        taistelija.Position = paikka;
        taistelija.Color = vari;
        Add(taistelija);
        return (taistelija);
    }

    void LuoTaistoValikko()
    {
        Mouse.IsCursorVisible = true;

        taistoKohdat = new List<Label>();

        Label taisto1 = new Label("Attack");
        taisto1.Position = new Vector(-160, -30);
        taisto1.Font = Font.DefaultLarge;
        taistoKohdat.Add(taisto1);

        Label taisto2 = new Label("Defend");
        taisto2.Position = new Vector(-10, -30);
        taisto2.Font = Font.DefaultLarge;
        taistoKohdat.Add(taisto2);

        Label taisto3 = new Label("Inventory");
        taisto3.Position = new Vector(140, -30);
        taisto3.Font = Font.DefaultLarge;
        taistoKohdat.Add(taisto3);

        foreach (Label taistoKohta in taistoKohdat)
        {
            Add(taistoKohta);
        }

        Mouse.ListenOn(taisto1, MouseButton.Left, ButtonState.Pressed, SteinAttack, null);
        Mouse.ListenOn(taisto2, MouseButton.Left, ButtonState.Pressed, SteinDefend, null);
        Mouse.ListenOn(taisto3, MouseButton.Left, ButtonState.Pressed, InventorinTilanMuutos, null, 0);
        Mouse.ListenMovement(1.0, TaistoKohtaHiiri, null);
    }

    void TaistoKohtaHiiri(AnalogState hiiri)
    {
        foreach (Label taistoKohta in taistoKohdat)
        {
            if (Mouse.IsCursorOn(taistoKohta))
            {
                taistoKohta.TextColor = Color.Red;
            }

            else
            {
                taistoKohta.TextColor = Color.Blue;
            }
        }
    }

    void SteinAttack()
    {
        mustaTakkiHp.Value -= (steinDmg.Value -= mustaTakkiDef.Value);
    }

    void SteinDefend()
    {
        steinDef.Value += 1;
    }
}