source: 2010/24/tekrjant/Laskuvarjo/Peli.cs @ 928

using System;
using Jypeli;
using Jypeli.ScreenObjects;
using Jypeli.Assets;

public class Peli : PhysicsGame
{
    const double KavelyNopeus = 100;
    const bool Gore = false; // K-18

    Image[] laskuvarjonKuvat;
    Image kuusenKuva;
    Image vuorenKuva;
    Image seinanKuva;

    PhysicsObject maasto;
    PlatformCharacter pelaaja;
    GameObject laskuvarjo;

    double keinumisSuunta = 1.0;
    bool hengissa = true;

    protected override void Begin()
    {
        LataaKuvat();

        Gravity = new Vector(0, -500);

        Level.Width = 3000;
        Level.Height = 10000;
        Level.BackgroundColor = Color.LightBlue;

        PhysicsObject leftBorder = Level.CreateLeftBorder();
        PhysicsObject rightBorder = Level.CreateRightBorder();
        leftBorder.IsVisible = false;
        rightBorder.IsVisible = false;

        LuoMaasto();
        LuoTalo();
        LisaaPilvet();

        pelaaja = new PlatformCharacter(20, 30);
        pelaaja.CanMoveOnAir = false;
        pelaaja.Mass = 80;
        pelaaja.Image = LoadImage("hahmo");
        pelaaja.Color = Color.Black;
        pelaaja.LinearDamping = 0.99;
        pelaaja.X = 0;
        pelaaja.Y = Level.Top - 100;
        //pelaaja.X = -200;
        //pelaaja.Y = Level.Bottom + 20;
        Add(pelaaja);

        AddCollisionHandler(pelaaja, PelaajaOsuu);

        laskuvarjo = new GameObject(50, 50);
        laskuvarjo.IsVisible = false;
        laskuvarjo.X = 0;
        laskuvarjo.Y = 20;
        laskuvarjo.Animation = new Animation(laskuvarjonKuvat);
        laskuvarjo.Animation.StopOnLastFrame = true;
        pelaaja.Add(laskuvarjo);

        Camera.Follow(pelaaja);

        Timer korkeusAjastin = new Timer();
        korkeusAjastin.Interval = 1;
        korkeusAjastin.Trigger += NaytaKorkeus;
        Add(korkeusAjastin);
        korkeusAjastin.Start();

        AsetaOhjaimet();
    }

    void LataaKuvat()
    {
        kuusenKuva = LoadImage("kuusi");
        vuorenKuva = LoadImage("vuori");
        seinanKuva = LoadImage("seina");
        laskuvarjonKuvat = LoadImages(
            "laskuvarjo1",
            "laskuvarjo2",
            "laskuvarjo3",
            "laskuvarjo4",
            "laskuvarjo5",
            "laskuvarjo6",
            "laskuvarjo7"
            );
    }

    void NaytaKorkeus(Timer sender)
    {
        double korkeus = pelaaja.Y - Level.Bottom;
        MessageDisplay.Add("Korkeus: " + korkeus.ToString("F0"));

        if (korkeus < 100)
        {
            sender.Stop();
        }
    }

    void PelaajaOsuu(PhysicsObject pelaaja, PhysicsObject toinen)
    {
        SuljeLaskuvarjo();

        if (Math.Abs(pelaaja.Velocity.Y) > 200)
        {
            // auts...
            if (Gore)
            {
                for (int i = 0; i < 50; i++)
                {
                    PhysicsObject jama = new PhysicsObject(RandomGen.NextInt(1, 5), RandomGen.NextInt(1, 5), Shapes.Rectangle, CollisionShapeQuality.Worst);
                    jama.X = pelaaja.X;
                    jama.Y = pelaaja.Y;
                    Vector maiskeenlento = Vector.FromLengthAndAngle(RandomGen.NextDouble(0, 800), RandomGen.NextAngle());
                    jama.KineticFriction = 0.5;
                    jama.LinearDamping = 0.99;
                    jama.Color = RandomGen.NextColor(Color.Red, Color.Brown);
                    jama.Hit(maiskeenlento);
                    Add(jama);
                }
            }

            pelaaja.Image = null;
            pelaaja.Color = Color.Black;
            pelaaja.Size = new Vector(20, 5);
            hengissa = false;
            // TODO: poista kontrollit...
        }
    }

    void LisaaPilvet()
    {
        for (int i = 0; i < 100; i++)
        {
            double leveys = RandomGen.NextDouble(100, 600);
            double korkeus = RandomGen.NextDouble(100, 500);
            GameObject pilvi = new GameObject(leveys, korkeus, Shapes.Circle);
            pilvi.X = RandomGen.NextDouble(Level.Left, Level.Right);
            pilvi.Y = RandomGen.NextDouble(Level.Bottom + 1000, Level.Top);
            pilvi.Color = Color.White;
            Add(pilvi);
        }
    }

    void LuoMaasto()
    {
        GameObject vuori = new GameObject(256, 256);
        vuori.Image = vuorenKuva;
        vuori.X = RandomGen.NextDouble(Level.Left + vuori.Width / 2, Level.Right - vuori.Width / 2);
        vuori.Y = Level.Bottom + vuori.Height / 2 - 100;
        Add(vuori);

        maasto = PhysicsObject.CreateStaticObject(Level.Width, 1000, Shapes.Rectangle);
        maasto.KineticFriction = 0.2;
        maasto.X = 0;
        maasto.Y = Level.Bottom - maasto.Height / 2;
        maasto.Color = Color.Green;
        Add(maasto);

        for (int i = 0; i < 40; i++)
        {
            double leveys = RandomGen.NextDouble(40, 60);
            double korkeus = RandomGen.NextDouble(80, 200);
            GameObject kuusi = new GameObject(leveys, korkeus);
            kuusi.Image = kuusenKuva;
            kuusi.X = RandomGen.NextDouble(Level.Left, Level.Right);
            kuusi.Y = Level.Bottom + kuusi.Height / 2;
            Add(kuusi);
        }
    }

    void LuoTalo()
    {
        LuoKerros( 200, 100, 0, Level.Bottom );
        LuoKerros( 200, 100, 0, Level.Bottom + 100 );
        LuoKerros( 200, 100, 0, Level.Bottom + 200 );
        LuoKerros( 200, 100, 0, Level.Bottom + 300 );
        LuoKerros( 200, 100, 0, Level.Bottom + 400 );
    }

    void LuoKerros(double leveys, double korkeus, double x, double y)
    {
        double left = x - leveys / 2;
        double right = x + leveys / 2;
        double katonPaksuus = 20;

        GameObject takaSeina = new GameObject(leveys, korkeus);
        takaSeina.Image = seinanKuva;
        takaSeina.X = x;
        takaSeina.Y = y + korkeus / 2;
        takaSeina.TextureWrapSize = new Vector(leveys / 64, korkeus / 64);
        Add(takaSeina);

        PhysicsObject vasenSeina = LuoSeina(20, korkeus - katonPaksuus);
        vasenSeina.X = left + vasenSeina.Width / 2;
        vasenSeina.Y = y + vasenSeina.Height / 2;

        PhysicsObject oikeaSeina = LuoSeina(20, korkeus - katonPaksuus);
        oikeaSeina.X = right - oikeaSeina.Width / 2;
        oikeaSeina.Y = y + oikeaSeina.Height / 2;

        PhysicsObject vasenTukiPalkki = PhysicsObject.CreateStaticObject( 20, 20 );
        vasenTukiPalkki.X = left + vasenSeina.Width + vasenTukiPalkki.Width / 2;
        vasenTukiPalkki.Y = y + korkeus - katonPaksuus - vasenTukiPalkki.Height / 2;
        vasenTukiPalkki.Color = Color.Black;
        Add( vasenTukiPalkki );

        PhysicsObject oikeaTukiPalkki = PhysicsObject.CreateStaticObject( 20, 20 );
        oikeaTukiPalkki.X = right - oikeaSeina.Width - oikeaTukiPalkki.Width / 2;
        oikeaTukiPalkki.Y = y + korkeus - katonPaksuus - oikeaTukiPalkki.Height / 2;
        oikeaTukiPalkki.Color = Color.Black;
        Add( oikeaTukiPalkki );

        PhysicsObject katto = LuoKatto( leveys, katonPaksuus );
        katto.X = x;
        katto.Y = y + korkeus - katto.Height / 2;
    }

    PhysicsObject LuoSeina( double leveys, double korkeus)
    {
        PhysicsObject seina = PhysicsObject.CreateStaticObject( leveys, korkeus, Shapes.Rectangle, CollisionShapeQuality.FromValue( 0.8 ) );
        seina.KineticFriction = 0.0;
        seina.Restitution = 0.1;
        seina.Color = Color.Brown;
        Add( seina );
        return seina;
    }

    PhysicsObject LuoKatto(double leveys, double korkeus)
    {
        PhysicsObject parru = new PhysicsObject(leveys, korkeus, Shapes.Rectangle, CollisionShapeQuality.FromValue(0.8));
        parru.Mass = 500;
        parru.AngularDamping = 0.95;
        parru.LinearDamping = 0.95;
        parru.StaticFriction = 0.0;
        parru.KineticFriction = 0.0;
        parru.Restitution = 0.0;
        parru.Color = Color.Brown;
        Add(parru);
        AddCollisionHandler( parru, kattoonOsuu );
        return parru;
    }

    void kattoonOsuu( PhysicsObject katto, PhysicsObject toinen )
    {
        if ( katto.Width > 50 && Math.Abs(toinen.Velocity.Y) > 100 )
        {
            toinen.Velocity = new Vector( toinen.Velocity.X, toinen.Velocity.Y * 0.6 );
            katto.Destroy();

            PhysicsObject pala1 = LuoKatto( katto.Width * 0.3, katto.Height );
            pala1.X = katto.X - katto.Width * 0.15;
            pala1.Y = katto.Y;

            PhysicsObject pala2 = LuoKatto( katto.Width * 0.3, katto.Height );
            pala2.X = katto.X + katto.Width * 0.15;
            pala2.Y = katto.Y;
        }
    }

    void SuljeLaskuvarjo()
    {
        laskuvarjo.Animation.Stop();
        laskuvarjo.IsVisible = false;
        pelaaja.Angle = Angle.Zero;
    }

    void AsetaOhjaimet()
    {
        Keyboard.Listen(Key.Escape, ButtonState.Pressed, Exit, null);

        // huijaus
        Keyboard.Listen(Key.F2, ButtonState.Pressed, PelaajaMaahan, null);
        Keyboard.Listen(Key.F3, ButtonState.Pressed, pelaajaMatalalle, null);

        Keyboard.Listen(Key.Space, ButtonState.Pressed, AukaiseLaskuvarjo, "Aukaise laskuvarjo");
        Keyboard.Listen(Key.Left, ButtonState.Down, pelaaja.Walk, null, -KavelyNopeus);
        Keyboard.Listen(Key.Right, ButtonState.Down, pelaaja.Walk, null, KavelyNopeus);
        Keyboard.Listen(Key.Left, ButtonState.Released, pelaaja.StopHorizontal, null);
        Keyboard.Listen(Key.Right, ButtonState.Released, pelaaja.StopHorizontal, null);
        Keyboard.Listen(Key.Up, ButtonState.Pressed, Hyppaa, null, 20000.0);
    }

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

    void PelaajaMaahan()
    {
        pelaaja.X = -200;
        pelaaja.Y = Level.Bottom + pelaaja.Height;
        pelaaja.StopVertical();
    }

    void pelaajaMatalalle()
    {
        pelaaja.X = 0;
        pelaaja.Y = Level.Bottom + 1500;
    }

    void AukaiseLaskuvarjo()
    {
        if (!laskuvarjo.IsVisible)
        {
            laskuvarjo.IsVisible = true;
            laskuvarjo.Animation.Start(1);
        }
    }

    protected override void Update(Time time)
    {
        if (laskuvarjo.IsVisible)
        {
            Vector nostoVoima = new Vector(0, 32000);
            pelaaja.Push(nostoVoima);

            Angle asteitaSekunnissa = Angle.Degrees(5);
            pelaaja.Angle += keinumisSuunta * asteitaSekunnissa * time.SinceLastUpdate.TotalSeconds;

            if (pelaaja.Angle.Degree > 10)
            {
                keinumisSuunta = -1.0;
            }
            else if (pelaaja.Angle.Degree < -5)
            {
                keinumisSuunta = 1.0;
            }
        }

        base.Update(time);
    }
}