source: 2016/24/NikoJ/ArrowRUN/ArrowRUN/ArrowRUN/ArrowRUN.cs @ 8240

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



// http://www.bfxr.net/
//https://www.youtube.com/watch?v=YBJhzfvdyKw


public class ArrowRUN : PhysicsGame

{
    bool minigun = false, parina = false;
    bool nopeusHax = false;
    double NOPEUS = 800;
    const double hyppyNopeus = 750;
    const int RUUDUN_KOKO = 40;
    const double pyoriminenNopeus = 2.0;
    Timer vihuajastin;
    Timer pistehaxajastin;
    

    PhysicsObject Vihollinen;
    Image item2 = LoadImage("item2");
    PhysicsObject pelaaja1;
    Image[] pelaajankuvat = LoadImages("taivaansininen", "keltainen", "viininpunainen", "sininen", "ruskea", "pinkki", "liila", "punen", "Untitled");
    Image tahtiKuva = LoadImage("tahti");
    Image Laserkuva = LoadImage("laser");
    Image plasmakuva = LoadImage("plasma");
    Image YdinPommikuva = LoadImage("ydinPommi");

    

    SoundEffect laserAani = LoadSoundEffect("laser aani");
    SoundEffect kranaatti = LoadSoundEffect("kranaatti");
    SoundEffect pallo = LoadSoundEffect("pallo");
    SoundEffect erikoisvoima = LoadSoundEffect("erikois voima");
    SoundEffect valikko = LoadSoundEffect("valikko");
    SoundEffect ydinPommiAani = LoadSoundEffect("ydinPommi aani");
    SoundEffect superVoima = LoadSoundEffect("super voima");

    Color[] varit = { Color.Red, Color.Yellow, Color.Black, Color.Pink, Color.Blue, Color.Green, Color.Purple };
    int kaytetty = 0;

    Image donaldtrump = LoadImage("donald-trump");

    List<Vector> spawnit = new List<Vector>();
    List<Vector> vihuspawnit = new List<Vector>();
    List<LabyrinthWandererBrain> aivolista = new List<LabyrinthWandererBrain>();
    Vector aloituspaikka;

    IntMeter pisteLaskuri;

    string nykyinenAse = "perus";

    Weapon pelaajan1Ase;


    EasyHighScore topLista = new EasyHighScore();


    public override void Begin()
    {
        // Gravity = new Vector(0, -1000);

        ClearAll();




        MultiSelectWindow alkuValikko = new MultiSelectWindow("arrowRUN",
  "start", "top score", "exit");


        Level.Background.Color = new Color(127, 255, 212);
        alkuValikko.Color = Color.Mint;

        alkuValikko.AddItemHandler(0, AloitaPeli);
        alkuValikko.AddItemHandler(1, ParhaatPisteet);
        alkuValikko.AddItemHandler(2, Exit);
        Add(alkuValikko);

    }

    void aloitapelaaminen()
    {

        LuoPistelaskuri();


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

    void ParhaatPisteet()

    {
        topLista.Color = Color.Mint;
        topLista.Show();
        topLista.HighScoreWindow.Closed += delegate (Window a) { Begin(); };

    }

    void AloitaPeli()

    {
        LuoKentta();
        aloitapelaaminen();
        LisaaNappaimet();
    }


    void LuoKentta()
    {
        TileMap kentta = TileMap.FromLevelAsset("kentta1");
        kentta.SetTileMethod('.', LisaaSpawn);
        kentta.SetTileMethod('o', LisaaTaso);
        kentta.SetTileMethod('i', LisaaTahti);
        kentta.SetTileMethod('N', LisaaPelaaja);
        kentta.SetTileMethod('v', LisaaVihollisSpawn);
        kentta.Execute(RUUDUN_KOKO, RUUDUN_KOKO);
        Level.CreateBorders();
        Level.Background.Color = Color.White;



    }


    void ProcessInput(InputWindow ikkuna)
    {
        string vastaus = ikkuna.InputBox.Text;

        if (vastaus == "speed mlg")
        {
            NOPEUS = 80000;

            Keyboard.Clear();
            LisaaNappaimet();

        }

        if (vastaus == "mlg minigun")

        {
            minigun = true;
        }

        if (vastaus == "skin")

        {
            pelaaja1.Image = donaldtrump;
        }

        if (vastaus == "mlg mode")
        {
            parina = true;
            Camera.Reset();
            Camera.ZoomFactor = 1.2;
            Camera.StayInLevel = true;
            MediaPlayer.Play("musa");
        }

        if (vastaus == "hullu")
        {
            nopeusHax = true;
            vihuajastin.Interval = RandomGen.NextDouble(0.1, 0.1);
            foreach (LabyrinthWandererBrain aivo in aivolista) 
            {
                aivo.Speed = 600;
            }
        }

        if (vastaus == "piste hax")
        {
            pistehaxajastin = new Timer();
            pistehaxajastin.Interval = 0.01;
            pistehaxajastin.Timeout += delegate { pisteLaskuri.Value += 666; };
            pistehaxajastin.Start();
        }
    }

    protected override void Update (Time time)
    {
        if (parina)
        {
            Level.Background.Color = varit[kaytetty];

            Camera.Position = pelaaja1.Position + new Vector(RandomGen.NextDouble(-10, 10), RandomGen.NextDouble(-10, 10));

            if (kaytetty + 1 >= varit.Length)
            {
                kaytetty = 0;
            }
            else
            {
                kaytetty++;
            }
        }

        base.Update(time);
    }



    void LuoPistelaskuri()
    {
        pisteLaskuri = new IntMeter(0);

        Label pisteNaytto = new Label();
        pisteNaytto.X = Screen.Left + 100;
        pisteNaytto.Y = Screen.Top - 100;
        pisteNaytto.TextColor = Color.Black;
        pisteNaytto.Color = Color.White;

        pisteNaytto.BindTo(pisteLaskuri);
        Add(pisteNaytto);
    }

    void LisaaTaso(Vector paikka, double leveys, double korkeus)
    {
        PhysicsObject taso = PhysicsObject.CreateStaticObject(leveys, korkeus);
        taso.Position = paikka;
        taso.Color = Color.Black;
        taso.Tag = "seina";
        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 LisaaItem2(Vector paikka, double leveys, double korkeus)
    {
        PhysicsObject tahti = PhysicsObject.CreateStaticObject(leveys, korkeus);
        tahti.IgnoresCollisionResponse = true;
        tahti.Position = paikka;
        tahti.Image = item2;
        tahti.Tag = "item2";
        Add(tahti);
    }

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

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


    void LisaaPelaaja(Vector paikka, double leveys, double korkeus)
    {
        pelaaja1 = new PhysicsObject(leveys, korkeus);
        pelaaja1.Position = paikka;
        aloituspaikka = paikka;
        pelaaja1.Mass = 4.0;
        AddCollisionHandler(pelaaja1, "tahti", TormaaTahteen);
        AddCollisionHandler(pelaaja1, "item2", TormaaItem2);
        AddCollisionHandler(pelaaja1, "laser", TormaaLaser);
        AddCollisionHandler(pelaaja1, "item4", TormaaItem4);
        AddCollisionHandler(pelaaja1, "ydinPommi", TormaaydinPommi);
        Image arvottukuva = RandomGen.SelectOne<Image>(pelaajankuvat);
        //pelaaja1.Color = vari;
        pelaaja1.CanRotate = false;
        pelaaja1.Image = arvottukuva;
        pelaaja1.LinearDamping = 0.975;

        AddCollisionHandler(pelaaja1, "Vihollinen", TormaaViholliseen);


        pelaajan1Ase = new AssaultRifle(0, 001);
        pelaajan1Ase.FireRate = 0.5;
        pelaajan1Ase.ProjectileCollision = AmmusOsui;
        pelaaja1.Add(pelaajan1Ase);

        Add(pelaaja1);
    }

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

        Keyboard.Listen(Key.Left, ButtonState.Down, Kaanna, "Liikkuu vasemmalle", pelaaja1, pyoriminenNopeus);
        Keyboard.Listen(Key.Up, ButtonState.Down, Liikuta, "Liikkuu vasemmalle", pelaaja1, NOPEUS);
        Keyboard.Listen(Key.Down, ButtonState.Down, Liikuta, "Liikkuu vasemmalle", pelaaja1, -NOPEUS);
        Keyboard.Listen(Key.Right, ButtonState.Down, Kaanna, "Liikkuu vasemmalle", pelaaja1, -pyoriminenNopeus);

        Keyboard.Listen(Key.Space, ButtonState.Down, AmmuAseella, "Ammu");
        Keyboard.Listen(Key.Z, ButtonState.Down, lisaaHAX, "HAX");
        Keyboard.Listen(Key.X, ButtonState.Down, poistaHAX, "HAX off");
        Keyboard.Listen<PhysicsObject,PhysicsObject>(Key.K, ButtonState.Down, TormaaViholliseen, "kill",pelaaja1,null);
        Keyboard.Listen(Key.R, ButtonState.Down, Aloitus, "reset");

        /*Keyboard.Listen(Key.Right, ButtonState.Released, () => pelaaja1.Stop(), null);
        Keyboard.Listen(Key.Left, ButtonState.Released, () => pelaaja1.Stop(), null);
        Keyboard.Listen(Key.Down, ButtonState.Released, () => pelaaja1.Stop(), null);
        Keyboard.Listen(Key.Up, ButtonState.Released, () => pelaaja1.Stop(), null);*/
        //Keyboard.Listen(Key.Up, ButtonState.Down, Hyppaa, "Pelaaja hyppää", pelaaja1, hyppyNopeus);

    }

    void LisaaVihollinen(Vector paikka, double leveys, double korkeus)

    {
        Vihollinen = new PhysicsObject(40.0, 40.0, Shape.Diamond);

        Vihollinen.Color = Color.Red;

        const int RUUDUN_KOKO = 40;

        Vihollinen.Position = paikka;

        PhysicsObject LisaaVihollinen = new PhysicsObject(RUUDUN_KOKO / 2, RUUDUN_KOKO / 2);
        Add(Vihollinen);

        LabyrinthWandererBrain labyrinttiAivot = new LabyrinthWandererBrain(RUUDUN_KOKO);
        labyrinttiAivot.Speed = 200.0;
        if (nopeusHax)
        {
            labyrinttiAivot.Speed = 600.0;
        }
        aivolista.Add(labyrinttiAivot);
        labyrinttiAivot.LabyrinthWallTag = "seina";

        Vihollinen.Brain = labyrinttiAivot;

        Vihollinen.Tag = "Vihollinen";

        Add(Vihollinen);


    }




    void Liikuta(PhysicsObject hahmo, double nopeus)
    {
        Vector pelaajanSuunta = Vector.FromLengthAndAngle(nopeus, pelaaja1.Angle);
        hahmo.Push(pelaajanSuunta);
        //hahmo.Push(suunta);
        // hahmo.Angle = suunta.Angle;
    }
    //void Liikuta2(PhysicsObject hahmo)

    void Kaanna(PhysicsObject hahmo, double suunta)
    {
        hahmo.Angle += Angle.FromDegrees(suunta);
    }


    void TormaaTahteen(PhysicsObject hahmo, PhysicsObject tahti)
    {
        nykyinenAse = "tahti";

        MessageDisplay.Add("you pick special item");

        pisteLaskuri.Value += 10;

        erikoisvoima.Play();

        tahti.Destroy();

    }

    void TormaaItem2(PhysicsObject hahmo, PhysicsObject Item2)
    {
        MessageDisplay.Add("you pick special item");
        nykyinenAse = "item2";
        Timer.SingleShot(10, delegate () { nykyinenAse = "perus"; });
        pisteLaskuri.Value += 10;
        erikoisvoima.Play();
        Item2.Destroy();

    }

    void TormaaLaser(PhysicsObject hahmo, PhysicsObject Item2)
    {
        nykyinenAse = "laser";
        MessageDisplay.Add("you pick special item");
        pisteLaskuri.Value += 10;
        erikoisvoima.Play();
        Item2.Destroy();
    }

    void TormaaItem4(PhysicsObject hahmo, PhysicsObject Item4)
    {
        MessageDisplay.Add("you pick special item");
        nykyinenAse = "item4";
        //Timer.SingleShot(30, delegate () { nykyinenAse = "perus"; });
        pisteLaskuri.Value += 10;
        erikoisvoima.Play();
        Item4.Destroy();

    }

    void TormaaydinPommi(PhysicsObject hahmo, PhysicsObject ydinPommi)
    {
        MessageDisplay.Add("you pick super item");
        nykyinenAse = "ydinPommi";
        Timer.SingleShot(10, delegate () { nykyinenAse = "perus"; });
        pisteLaskuri.Value += 1000;
        superVoima.Play();
        ydinPommi.Destroy();

    }

    void LisaaSpawn(Vector paikka, double leveys, double korkeus)
    {
        spawnit.Add(paikka);
    }
    void esinespawn()
    {

        // 5.0 30.0
        Timer ajastin = new Timer();
        ajastin.Interval = RandomGen.NextDouble(5.0, 5.0);
        ajastin.Timeout += delegate
        {
            Vector arvottupaikka = spawnit[RandomGen.NextInt(spawnit.Count - 1)];

            int luku = RandomGen.NextInt(0, 103);

            if (luku < 25)
            {
                LisaaTahti(arvottupaikka, RUUDUN_KOKO, RUUDUN_KOKO);
            }
            else if (luku < 50)
            {
                LisaaItem2(arvottupaikka, RUUDUN_KOKO, RUUDUN_KOKO);
            }
            else if (luku < 75)
            {
                LisaaLaser(arvottupaikka, RUUDUN_KOKO, RUUDUN_KOKO);
            }
            else if (luku < 100)
            {
                LisaaItem4(arvottupaikka, RUUDUN_KOKO, RUUDUN_KOKO);
            }

            else if (luku < 103)
            {
                LisaaYdinPommi(arvottupaikka, RUUDUN_KOKO, RUUDUN_KOKO);
            }
        };
        ajastin.Start();

    }

    void AmmusOsui(PhysicsObject ammus, PhysicsObject kohde)
    {
        if (kohde.Tag.Equals("Vihollinen"))
        {
            if (!ammus.Tag.Equals("plasma"))
                ammus.Destroy();
            kohde.Destroy();

            pisteLaskuri.Value += 100;
        }
    }

    void AmmuAseella()
    {
        if (nykyinenAse == "tahti")
        {
            HeitaKranaatti(pelaaja1, 250);
            nykyinenAse = "perus";
            return;
        }

        if (minigun)
        {
            HeitaKranaatti(pelaaja1, 250);
            return;
        }

        if (nykyinenAse == "ydinPommi")
        {
            HeitaKranaatti(pelaaja1, 3000);
            ydinPommiAani.Play();
            nykyinenAse = "perus";
            return;
        }

        Vector ammuksenKoko = new Vector(10, 10);
        Color ammuksenVari = Color.Gray;
        pelaajan1Ase.FireRate = 1;

        if (nykyinenAse == "item2")
        {
            pelaajan1Ase.FireRate = 50;
        }

       

        if (nykyinenAse == "item4")
        {
            pelaajan1Ase.FireRate = 50;
            ammuksenVari = Color.DarkGreen;
            ammuksenKoko = new Vector(100, 100);
            pallo.Play();

        }

        if (nykyinenAse == "laser")
        {
            ammuksenVari = Color.Red;
            pelaajan1Ase.FireRate = 100;
            ammuksenKoko = new Vector(40, 2);

            if (!laserAani.IsPlaying)
            {
                laserAani.Play();
            }
            Timer.SingleShot(1, delegate () { nykyinenAse = "perus"; });
        }





        PhysicsObject ammus = pelaajan1Ase.Shoot();
        if (ammus != null)
        {
            ammus.Size = ammuksenKoko;
            ammus.Image = null;
            ammus.Shape = Shape.Circle;
            ammus.Color = ammuksenVari;

            ammus.MaximumLifetime = TimeSpan.FromSeconds(3.0);

            if (nykyinenAse == "item4")
            {
                ammus.MaximumLifetime = TimeSpan.FromSeconds(30.0);
                ammus.IgnoresCollisionResponse = true;
                ammus.Image = plasmakuva;
                ammus.MaxVelocity = 100;
                ammus.Tag = "plasma";
                nykyinenAse = "perus";
            }
        }
    }

    void LisaaVihollisSpawn(Vector paikka, double leveys, double korkeus)
    {
        vihuspawnit.Add(paikka);
    }

    //void TormaaViholliseen(PhysicsObject ammus, PhysicsObject Sihollinen)

    void vihollisspawn()
    {

        //1.0 3.0

        vihuajastin = new Timer();
        vihuajastin.Interval = RandomGen.NextDouble(1.0, 3.0);
        vihuajastin.Timeout += delegate
        {
            Vector arvottupaikka = vihuspawnit[RandomGen.NextInt(vihuspawnit.Count - 1)];
            LisaaVihollinen(arvottupaikka, RUUDUN_KOKO, RUUDUN_KOKO);

        };
        vihuajastin.Start();

    }

    void TormaaViholliseen(PhysicsObject hahmo, PhysicsObject tahti)

    {
        hahmo.Destroy();
        NOPEUS = 800;
        topLista.EnterAndShow(pisteLaskuri.Value);
        topLista.HighScoreWindow.Closed += delegate (Window a) { Begin(); };

        // Timer.SingleShot(3.0,Begin);

        poistaHAX();
    }

    void HeitaKranaatti(PhysicsObject pelaaja, double radius)
    {
        Grenade kranaatti = new Grenade(4.0);
        kranaatti.Explosion.MaxRadius = radius;
        pelaaja.Throw(kranaatti, Angle.FromDegrees(30), 30000);
        kranaatti.Explosion.AddShockwaveHandler("Vihollinen", KranaattiOsui);

        Keyboard.Clear();
        LisaaNappaimet();
    }

    void KranaattiOsui(IPhysicsObject rajahdyksenKohde, Vector v)
    {

        rajahdyksenKohde.Destroy();
        pisteLaskuri.Value += 100;
    }

    void LisaaYdinPommi(Vector paikka, double leveys, double korkeus)

    {
        PhysicsObject pommi = PhysicsObject.CreateStaticObject(leveys, korkeus);
        pommi.IgnoresCollisionResponse = true;
        pommi.Position = paikka;
        pommi.Image = YdinPommikuva;
        pommi.Tag = "ydinPommi";
        Add(pommi);
    }

    void lisaaHAX()

    {

        InputWindow kysymysIkkuna = new InputWindow("HAX");
        kysymysIkkuna.TextEntered += ProcessInput;
        Add(kysymysIkkuna);

    }

    void poistaHAX()

    {
        minigun = false;
        parina = false;
        nopeusHax = false;
        NOPEUS = 800;

        Image arvottukuva = RandomGen.SelectOne<Image>(pelaajankuvat);
        pelaaja1.Image = arvottukuva;

        parina = false;
        Camera.Reset();
        Camera.Follow(pelaaja1);
        Camera.ZoomFactor = 1.2;
        Camera.StayInLevel = true;
        Level.Background.Color = Color.White;
        MediaPlayer.Stop();
        vihuajastin.Interval = RandomGen.NextDouble(1.0, 3.0);
        if (pistehaxajastin != null)
        {
            pistehaxajastin.Stop();
        }
        foreach (LabyrinthWandererBrain aivot in aivolista)
        {
            aivot.Speed = 200;
        }
    }

    void Aloitus()

    {
        pelaaja1.Position = aloituspaikka;     
    }




}