source: 2011/31/TeemuT/Diamond TD/Diamond TD/Diamond TD/Peli.cs @ 2548

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

public class Peli : PhysicsGame
{
    List<Vector> polku = new List<Vector>();
    List<GameObject> ruohoelementit = new List<GameObject>();
    Vector[] reitti;
    int montakoRiviaKentassa = 55;
    int montakoSarakettaKentassa = 74;
    GameObject start;
    PhysicsObject maali;
    Image ruohokuva = LoadImage("ruoho");

    bool asetetaanTykkia = false;
    //double kuvaruudunLeveys = Screen.Width;
    //double kuvaruudunKorkeus = Screen.Height;
    double ruudunLeveys;
    double ruudunKorkeus;

    public override void Begin()
    {
        TeeKentta();
        TeeKayttoliittyma();
        LuoPolku();
        /*
        Timer ajastin = new Timer();
        ajastin.Interval = 5;
        ajastin.Timeout += LahetaAalto;
        ajastin.Start(10);
         */
        Mouse.IsCursorVisible = true;
    }
        

    void LahetaAalto()
    {
        Timer ajastin = new Timer();
        ajastin.Interval = 0.2;
        ajastin.Timeout += delegate { LuoVihollinen(3); };
        ajastin.Start(10);
    }

    void TeeKentta()
    {
        Level.BackgroundColor = Color.ForestGreen;
        TileMap ruudut = TileMap.FromLevelAsset("kentta2");        
        ruudut.SetTileMethod('=', LuoPalikka);
        ruudut.SetTileMethod('o', LuoPalikka);
        ruudut.SetTileMethod('a', LuoWaypoint);
        ruudut.SetTileMethod('s', LuoStartti);
        ruudut.SetTileMethod('l', LuoMaali);
        ruudut.SetTileMethod('r', LuoRuoho);
        ruudunLeveys = Screen.Width / montakoSarakettaKentassa;
        ruudunKorkeus = Screen.Height / montakoRiviaKentassa;
        ruudut.Execute(ruudunLeveys, ruudunKorkeus);
        Level.CreateBorders(1.0, true);
        Camera.ZoomToLevel();
    }
    void LuoRuoho(Vector paikka, double leveys, double korkeus)
    {
        GameObject ruoho = new GameObject(leveys, korkeus);
        ruoho.Position = paikka;
        ruoho.Image = ruohokuva;
        Add(ruoho);
        ruohoelementit.Add(ruoho);

    }

    void TeeKayttoliittyma()
    {
        Widget playnappula = new Widget(90, 90);
        playnappula.Bottom = Screen.Bottom + 10;
        playnappula.Left = Screen.Left + 20;
        playnappula.Image = LoadImage("play");
        Add(playnappula);
        Mouse.ListenOn(playnappula, MouseButton.Left, ButtonState.Pressed, LahetaAalto, null);

        Widget tykkinappula = new Widget(90, 90);
        tykkinappula.Left = playnappula.Right + 10;
        tykkinappula.Bottom = playnappula.Bottom;
        Add(tykkinappula);
        Mouse.ListenOn(tykkinappula, MouseButton.Left, ButtonState.Pressed, NappiPainettu, null, tykkinappula);


    }

    void NappiPainettu(Widget w)
    {
        asetetaanTykkia = true;
        Mouse.Listen(MouseButton.Left, ButtonState.Pressed, AsetaTykki, null, w);
        w.Color = Color.Black;
        // Voit muuttaa kuvaa
    }

    void AsetaTykki(Widget w)
    {
        if (asetetaanTykkia)
        {
            GameObject allaolevaruoho = ruohoelementit[0];
            int i = 0;
            while (i < ruohoelementit.Count)
            {
                if (Mouse.IsCursorOn(ruohoelementit[i]))
                {
                    allaolevaruoho = ruohoelementit[i];
                    LuoTykki(allaolevaruoho.Position);
                    break;
                }
                i++;
            }
            w.Color = Color.White;
            asetetaanTykkia = false;
        }
    }

    void LuoTykki(Vector paikka)
    {

        GameObject tykki = new GameObject(ruudunLeveys, ruudunKorkeus);
        Add(tykki);
        tykki.Position = paikka;
        // Ajastin, jonka avulla ammutaan
        Timer ajastin = new Timer();
        ajastin.Interval = 0.2;
        ajastin.Timeout += delegate { tykkiAmpuu(tykki); };
        ajastin.Start();
    }

    void tykkiAmpuu(GameObject tykki)

    {
        PhysicsObject ammus = new PhysicsObject(5, 5, Shape.Circle);
        Add(ammus);
        ammus.Color = Color.Black;
        ammus.Tag = "ammus";
        ammus.Position = tykki.Position;
        ammus.Hit(new Vector(0, 1000));

        PhysicsObject vihu = EtsiLahinVihu(tykki.Position);

    }

    PhysicsObject EtsiLahinVihu(Vector position)
    {
        double pieninEtaisyys = 10000000.0;
        PhysicsObject lahin = null;

        foreach (PhysicsObject vihu in viholliset)
        {
            double etaisyys = Vector.Distance(vihu.Position, position);
            if (etaisyys < pieninEtaisyys)
            {
                pieninEtaisyys = etaisyys;
                lahin = vihu;
            }
        }

        return lahin;
    }

    void LuoPolku()
    {
        reitti = ParsiReitti(start, polku);
    }

    void LuoWaypoint(Vector paikka, double leveys, double korkeus)
    {
        polku.Add(paikka);
    }

    void LuoStartti(Vector paikka, double leveys, double korkeus)
    {
        start = new GameObject(1, 1);
        start.Position = paikka;
    }

    void LuoMaali(Vector paikka, double lev, double korkeus)
    {
        maali = PhysicsObject.CreateStaticObject(20, 20);
        polku.Add(paikka);
        maali.Position = paikka;
        Add(maali);
        AddCollisionHandler(maali, KasitteleMaalinTormaus);
        maali.IsVisible = false;

    }

    void KasitteleMaalinTormaus(PhysicsObject maali, PhysicsObject vih)
    {
        vih.Destroy();
    }

    List<PhysicsObject> viholliset = new List<PhysicsObject>();

    void LuoVihollinen(int elamapisteet)
    {
        Vihollinen vihu = new Vihollinen(20, 20);
        vihu.Elamat = elamapisteet;
        vihu.Position = start.Position;
        vihu.IgnoresCollisionResponse = true;
        viholliset.Add(vihu);

        PathFollowerBrain testiaivot = new PathFollowerBrain();
        testiaivot.Path = reitti;
        testiaivot.Speed = 200;
        testiaivot.Loop = false;

        vihu.Brain = testiaivot;
        Add(vihu);
        vihu.Color = Color.Red;
        vihu.Shape = Shape.Circle;
        AddCollisionHandler(vihu, VihuOsui);
    }

    void VihuOsui(PhysicsObject vihu, PhysicsObject kohde)
    {
        if (kohde.Tag.ToString() == "ammus")
        {
            Vihollinen v = (Vihollinen)vihu;
            v.Elamat--; // Vähennetään yksi elämäpiste
            if (v.Elamat < 0) v.Destroy(); // Jos elämät menee alle 0 niin tuhotaan vihu
        }
    }

    void LuoPalikka(Vector paikka, double leveys, double korkeus)
    {
        GameObject palikka = new GameObject(leveys, korkeus);
        palikka.Position = paikka;
        palikka.Shape = Shape.Rectangle;
        palikka.Color = Color.Gray;
        Add(palikka);

    }

    Vector[] ParsiReitti(GameObject npc, List<Vector> waypoints)
    {
        int n = waypoints.Count;
        Vector[] reitti = new Vector[n];
        Vector v = npc.Position;

        for (int i = 0; i < n; i++)
        {
            v = FindNearest(waypoints, v);
            waypoints.Remove(v);
            reitti[i] = v;
        }

        return reitti;
    }

    Vector FindNearest(IEnumerable<Vector> list, Vector vector)
    {
        Vector nearest = Vector.Zero;
        double minDistance = double.PositiveInfinity;

        foreach (Vector candidate in list)
        {
            double d = Vector.Distance(vector, candidate);

            if (d < minDistance)
            {
                nearest = candidate;
                minDistance = d;
            }
        }

        return nearest;






    }
}

class Vihollinen : PhysicsObject
{
    public int Elamat = 3;

    public Vihollinen(double leveys, double korkeus)
        : base(leveys, korkeus)
    {
    }
}