source: 2010/31/mimakrja/SeaWar/Peli.cs @ 1623

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

public class LaivanPala : GameObject
{
    public bool Ammuttu;

    public LaivanPala(double leveys, double korkeus)
        : base(leveys, korkeus)
    {
        Ammuttu = false;
    }

    public void Ammu()
    {
        this.Ammuttu = true;
        this.Color = Color.Blue;
    }
}

public class Peli : Game
{
    const int ruudunLeveys = 50;
    const int ruudunKorkeus = 50;
    Vector kursorinAllaOlevaPiste;
    GameObject kursori;
    List<LaivanPala> pelaajan1Laivat;
    List<LaivanPala> pelaajan2Laivat;
    List<GameObject> pelaajan1AmmututPisteet;
    List<GameObject> pelaajan2AmmututPisteet;
    Level pelaaja1Kentta;
    Level pelaaja2Kentta;

    int vuorossaOlevaPelaaja = 1;

    protected override void Begin()
    {
        LuoKentta();
        LisaaKontrollit();
        Camera.ZoomToLevel();
    }

    void LisaaKontrollit()
    {
        kursori = new GameObject(10, 10);
        kursori.Color = Color.Red;
        Add(kursori, 1);
        Mouse.IsCursorVisible = true;
        Mouse.ListenMovement(0.1, LiikutaTahtainta, "Liikuta tähtäintä");
        Mouse.Listen(MouseButton.Left, ButtonState.Pressed, Ammu, "Ammu");
    }

    void LiikutaTahtainta(AnalogState hiirenTila)
    {
        double jjX = (Level.Left + Mouse.PositionOnWorld.X) % ruudunLeveys;
        double lahinX = jjX;
        double jjY = (Mouse.PositionOnWorld.Y) % ruudunKorkeus;
        double lahinY = jjY;
        if (jjX < 25) lahinX = Mouse.PositionOnWorld.X - jjX;
        if (jjX >= 25) lahinX = Mouse.PositionOnWorld.X + (ruudunLeveys - jjX);
        if (jjY < 25) lahinY = Mouse.PositionOnWorld.Y - jjY;
        if (jjY >= 25) lahinY = Mouse.PositionOnWorld.Y + (ruudunKorkeus - jjY);
        kursori.X = lahinX - 25;
        kursori.Y = lahinY - 25;
        kursorinAllaOlevaPiste.X = kursori.X;
        kursorinAllaOlevaPiste.Y = kursori.Y;
    }

    void PiilotaKentta(int vuorossaOlevaPelaaja)
    {
        switch (vuorossaOlevaPelaaja)
        {
            case 1:
                foreach (LaivanPala pala in pelaajan1Laivat)
                {
                    pala.IsVisible = false;
                }

                foreach (GameObject ammuttu in pelaajan1AmmututPisteet)
                {
                    ammuttu.IsVisible = false;
                }


                break;
            case 2:
                foreach (LaivanPala pala in pelaajan2Laivat)
                {
                    pala.IsVisible = false;
                }

                foreach (GameObject ammuttu in pelaajan2AmmututPisteet)
                {
                    ammuttu.IsVisible = false;
                }

                break;
        }
        MessageDisplay.Add("Kenttä piilotettiin");

    }

    void NaytaKentta(int vuorossaOlevaPelaaja)
    {
        switch (vuorossaOlevaPelaaja)
        {
            case 1:
                foreach (LaivanPala pala in pelaajan1Laivat)
                {
                    if (pala.Ammuttu)
                        pala.IsVisible = true;
                }

                foreach (GameObject ammuttu in pelaajan1AmmututPisteet)
                {
                    ammuttu.IsVisible = true;
                }


                break;
            case 2:
                foreach (LaivanPala pala in pelaajan2Laivat)
                {
                    if (pala.Ammuttu)
                        pala.IsVisible = true;
                }

                foreach (GameObject ammuttu in pelaajan2AmmututPisteet)
                {
                    ammuttu.IsVisible = true;
                }

                break;
        }
    }

    void Ammu()
    {
        List<LaivanPala> tutkittavatLaivat = pelaajan1Laivat;
        List<GameObject> tutkittavatAmmututPisteet = pelaajan1AmmututPisteet;

        if (vuorossaOlevaPelaaja == 2)
        {
            tutkittavatLaivat = pelaajan2Laivat;
            tutkittavatAmmututPisteet = pelaajan2AmmututPisteet;
        }

        if (OnkoRuutuaAmmuttu(kursorinAllaOlevaPiste, tutkittavatAmmututPisteet, tutkittavatLaivat))
            return;
        bool allaOliLaiva = false;
        LaivanPala allaOlevaLaiva = tutkittavatLaivat[0];
        foreach (LaivanPala laiva in tutkittavatLaivat)
        {
            if (Vector.Distance(kursorinAllaOlevaPiste, laiva.Position) < ruudunKorkeus / 5)
            {
                MessageDisplay.Add("Osuma!");
                laiva.Ammu();
                allaOliLaiva = true;
                laiva.IsVisible = true;
                if (!OnkoLaivassaPalojaJaljella(laiva.Tag.ToString(), tutkittavatLaivat))
                    MessageDisplay.Add("Laiva tuhottu!");
                return;
            }
        }

        if (!allaOliLaiva)
        {
            GameObject tyhja = new GameObject(ruudunLeveys - 2, ruudunKorkeus - 2);
            tyhja.Color = Color.Gray;
            tyhja.Position = kursorinAllaOlevaPiste;
            Add(tyhja);
            tutkittavatAmmututPisteet.Add(tyhja);
            MessageDisplay.Add("Tyhjä!");
        }
        Timer.SingleShot(1.0, VuoroVaihtuu);
    }

    void VuoroVaihtuu()
    {
        MessageDisplay.Add("Vuoro vaihtuu");
        PiilotaKentta(vuorossaOlevaPelaaja);

        switch (vuorossaOlevaPelaaja)
        {
            case 1:
                vuorossaOlevaPelaaja = 2;
                break;
            case 2:
                vuorossaOlevaPelaaja = 1;
                break;
        }

        NaytaKentta(vuorossaOlevaPelaaja);
    }

    bool OnkoRuutuaAmmuttu(Vector piste, List<GameObject> tutkittavatAmmututPisteet, List<LaivanPala> tutkittavatLaivat)
    {
        foreach (GameObject ammuttuPiste in tutkittavatAmmututPisteet)
        {
            if (Vector.Distance(kursorinAllaOlevaPiste, ammuttuPiste.Position) < ruudunKorkeus / 5)
                return true;
        }

        foreach (LaivanPala laiva in tutkittavatLaivat)
        {
            if (Vector.Distance(kursorinAllaOlevaPiste, laiva.Position) < ruudunKorkeus / 5)
            {
                if (laiva.Ammuttu)
                {
                    MessageDisplay.Add("Laiva jo ammuttu");
                    return true;
                }
            }
        }

        return false;
    }

    bool OnkoLaivassaPalojaJaljella(String tagi, List<LaivanPala> tutkittavatLaivat)
    {
        foreach (LaivanPala laiva in tutkittavatLaivat)
        {
            if (laiva.Tag.ToString() == tagi && laiva.IsVisible == false)
                return true;
        }
        return false;
    }

    void LuoKentta()
    {
        pelaajan1Laivat = new List<LaivanPala>();
        pelaajan2Laivat = new List<LaivanPala>();
        pelaajan1AmmututPisteet = new List<GameObject>();
        pelaajan2AmmututPisteet = new List<GameObject>();
        kursorinAllaOlevaPiste = new Vector(0, 0);

        int kentanNro = RandomGen.NextInt(1, 20);
        TileMap ruudut = TileMap.FromFile("kentta"+kentanNro+".txt");
        LuoLaivat(ruudut);
        ruudut.Insert(ruudunLeveys, ruudunKorkeus);

        vuorossaOlevaPelaaja = 2;
        kentanNro = RandomGen.NextInt(1, 20);
        ruudut = TileMap.FromFile("kentta"+kentanNro+".txt");
        LuoLaivat(ruudut);
        ruudut.Insert(ruudunLeveys, ruudunKorkeus);

        vuorossaOlevaPelaaja = 1;
        Level.CreateBorders();
    }

    void LuoLaivat(TileMap ruudut)
    {
        ruudut['0'] = LuoLaiva0;
        ruudut['1'] = LuoLaiva1;
        ruudut['2'] = LuoLaiva2;
        ruudut['3'] = LuoLaiva3;
        ruudut['4'] = LuoLaiva4;
        ruudut['5'] = LuoLaiva5;
        ruudut['6'] = LuoLaiva6;
        ruudut['7'] = LuoLaiva7;
        ruudut['8'] = LuoLaiva8;
        ruudut['9'] = LuoLaiva9;
    }

    GameObject LuoLaiva0()
    {
        return LuoLaiva("0");
    }
    GameObject LuoLaiva1()
    {
        return LuoLaiva("1");
    }
    GameObject LuoLaiva2()
    {
        return LuoLaiva("2");
    }
    GameObject LuoLaiva3()
    {
        return LuoLaiva("3");
    }
    GameObject LuoLaiva4()
    {
        return LuoLaiva("4");
    }
    GameObject LuoLaiva5()
    {
        return LuoLaiva("5");
    }
    GameObject LuoLaiva6()
    {
        return LuoLaiva("6");
    }
    GameObject LuoLaiva7()
    {
        return LuoLaiva("7");
    }
    GameObject LuoLaiva8()
    {
        return LuoLaiva("8");
    }
    GameObject LuoLaiva9()
    {
        return LuoLaiva("9");
    }

    GameObject LuoLaiva(String tagi)
    {
        LaivanPala laiva = new LaivanPala(ruudunLeveys - 2, ruudunKorkeus - 2);
        laiva.IsVisible = false;
        laiva.Tag = tagi;
        switch (vuorossaOlevaPelaaja)
        {
            case 1:
                pelaajan1Laivat.Add(laiva);
                break;
            case 2:
                pelaajan2Laivat.Add(laiva);
                break;
        }
        return laiva;
    }
}