Changeset 1623 for 2010

Timestamp:

2010-08-05 14:55:54 (13 years ago)

Author:

mimakrja

Message:

 

Location:

2010/31/mimakrja/SeaWar

Files:

• Peli.cs (modified) (1 diff)
• SeaWar.csproj (modified) (1 diff)
• TextFile1.txt (deleted)
• kentta-.txt (added)
• kentta.txt (deleted)
• kentta1.txt (added)
• kentta2.txt (modified) (1 diff)
• kentta3.txt (modified) (1 diff)
• kentta4.txt (modified) (1 diff)
• kentta5.txt (modified) (1 diff)
• kentta6.txt (modified) (1 diff)

2010/31/mimakrja/SeaWar/Peli.cs

@@ -1 +1 @@
 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;
     }
 }

2010/31/mimakrja/SeaWar/SeaWar.csproj

@@ -89 +89 @@
     <Content Include="Game.ico" />
     <Content Include="GameThumbnail.png" />
-    <Content Include="TextFile1.txt" />
+    <Content Include="kentta1.txt">
+      <CopyToOutputDirectory>PreserveNewest</CopyToOutputDirectory>
+    </Content>
+    <Content Include="kentta10.txt">
+      <CopyToOutputDirectory>PreserveNewest</CopyToOutputDirectory>
+    </Content>
+    <Content Include="kentta11.txt">
+      <CopyToOutputDirectory>PreserveNewest</CopyToOutputDirectory>
+    </Content>
+    <Content Include="kentta12.txt">
+      <CopyToOutputDirectory>PreserveNewest</CopyToOutputDirectory>
+    </Content>
+    <Content Include="kentta13.txt">
+      <CopyToOutputDirectory>PreserveNewest</CopyToOutputDirectory>
+    </Content>
+    <Content Include="kentta14.txt">
+      <CopyToOutputDirectory>PreserveNewest</CopyToOutputDirectory>
+    </Content>
+    <Content Include="kentta15.txt">
+      <CopyToOutputDirectory>PreserveNewest</CopyToOutputDirectory>
+    </Content>
+    <Content Include="kentta16.txt">
+      <CopyToOutputDirectory>PreserveNewest</CopyToOutputDirectory>
+    </Content>
+    <Content Include="kentta17.txt">
+      <CopyToOutputDirectory>PreserveNewest</CopyToOutputDirectory>
+    </Content>
+    <Content Include="kentta18.txt">
+      <CopyToOutputDirectory>PreserveNewest</CopyToOutputDirectory>
+    </Content>
+    <Content Include="kentta19.txt">
+      <CopyToOutputDirectory>PreserveNewest</CopyToOutputDirectory>
+    </Content>
+    <Content Include="kentta2.txt">
+      <CopyToOutputDirectory>PreserveNewest</CopyToOutputDirectory>
+    </Content>
+    <Content Include="kentta20.txt">
+      <CopyToOutputDirectory>PreserveNewest</CopyToOutputDirectory>
+    </Content>
+    <Content Include="kentta3.txt">
+      <CopyToOutputDirectory>PreserveNewest</CopyToOutputDirectory>
+    </Content>
+    <Content Include="kentta4.txt">
+      <CopyToOutputDirectory>PreserveNewest</CopyToOutputDirectory>
+    </Content>
+    <Content Include="kentta5.txt">
+      <CopyToOutputDirectory>PreserveNewest</CopyToOutputDirectory>
+    </Content>
+    <Content Include="kentta6.txt">
+      <CopyToOutputDirectory>PreserveNewest</CopyToOutputDirectory>
+    </Content>
+    <Content Include="kentta7.txt">
+      <CopyToOutputDirectory>PreserveNewest</CopyToOutputDirectory>
+    </Content>
+    <Content Include="kentta8.txt">
+      <CopyToOutputDirectory>PreserveNewest</CopyToOutputDirectory>
+    </Content>
+    <Content Include="kentta9.txt">
+      <CopyToOutputDirectory>PreserveNewest</CopyToOutputDirectory>
+    </Content>
   </ItemGroup>
   <ItemGroup>

2010/31/mimakrja/SeaWar/kentta2.txt

@@ -2 +2 @@
 .........
 ..4......
-..4..1..3
+..4..5..3
 ..4.....3
 ..4.....3
-.....22..
-.1.......
-.....333.
-22.....1.
+.....66..
+.7.......
+.....888.
+99.....0.

2010/31/mimakrja/SeaWar/kentta3.txt

@@ -1 @@
-3.1......
-3...22..1
-3........
-.......2.
-.1.....2.
+2.1......
+2...33..4
+2........
+.......5.
+.6.....5.
 .........
-..4444...
-.1.......
-........2
-.333....2
+..7777...
+.8.......
+........9
+.000....9

2010/31/mimakrja/SeaWar/kentta4.txt

@@ -1 +1 @@
 1........
-..333.2..
-......2..
-..22...1.
-1...2....
-....2....
-333...4..
-......4..
-...1..4..
-......4..
+..222.3..
+......3..
+..44...5.
+6...8....
+....8....
+777...0..
+......0..
+...9..0..
+......0..

2010/31/mimakrja/SeaWar/kentta5.txt

@@ -3 +3 @@
 ..3.22..4
 ........4
-..333...4
-..1..22..
+..555...4
+..1..66..
 .........
-.1....2..
-......2..
-...1....1
+.7....8..
+......8..
+...0....9

2010/31/mimakrja/SeaWar/kentta6.txt

@@ -1 @@
-.4444....
+.9999....
 .......1.
-333......
-...1.....
-.......22
-.1...2...
-.....2...
+000......
+...2.....
+.......33
+.5...4...
+.....4...
 .........
-.333..2..
-.1....2..
+.666..7..
+.8....7..