Mestint.ketszemelyesV11.Cimkezes.InfiniteLoop

using System;
using System.Collections.Generic;
using System.Linq;
using System.Text;
using System.Threading.Tasks;

namespace ketszemelyesV3
{
    class Program
    {
        static void Main(string[] args)
        {
            List<Csucs> fa = new List<Csucs>();
            treeSetup(fa);

            Console.WriteLine("#####################  LISTA  #####################");
            kiirFullLista(fa);


            globaljatekfa.Add(new Jatekfa(0, 0, 1, fa));

            Console.WriteLine("\n\n#####################  JATEKFAK  #####################");
            jatekfaFeltolt(globaljatekfa);

            eredmenyszamolas(globaljatekfa);

            foreach (Jatekfa jatekfa in globaljatekfa.Where(x=>x.eredmeny != 0))
                jatekfa.kiir();

           // Console.WriteLine(jolepes(globaljatekfa));


            Console.ReadKey();
        }

        static void treeSetup(List<Csucs> lista)
        {
            /*
             *                  A
             *         B                C
             *     D   E   F        G       H
             *   I   J     K                L
             *
             */

            lista.Add(new Csucs(0, 1, "A"));
            lista.Add(new Csucs(1, 2, "B"));
            lista.Add(new Csucs(1, 3, "C"));
            lista.Add(new Csucs(2, 4, "D"));
            lista.Add(new Csucs(2, 5, "E"));
            lista.Add(new Csucs(2, 6, "F"));
            lista.Add(new Csucs(3, 7, "G"));
            lista.Add(new Csucs(3, 8, "H"));
            lista.Add(new Csucs(4, 9, "I"));
            /*lista.Add(new Csucs(4, 10, "J"));
            lista.Add(new Csucs(6, 11, "K"));
            lista.Add(new Csucs(8, 12, "L"));
            */
            foreach (Csucs item in lista)
            {
                foreach (Csucs item2 in lista)
                {
                    if (item.sorszam != item2.sorszam && item.sorszam == item2.szulosorszam)
                    {
                        item.gyerekekInt.Add(item2.sorszam);
                        item.gyerekekString.Add(lista.Where(x => x.sorszam == item2.sorszam).First().nev);

                    }
                }
                item.letezik = 1;
            }
        }

        public static void kiirFullLista(List<Csucs> lista)
        {
            //Console.WriteLine("###############\t   Lista\t##################");
            foreach (Csucs item in lista)
            {
                if (item.letezik == 1)
                {
                    if(item.szulosorszam == 0)
                        Console.Write(item.sorszam + ".\t" + item.nev + "\t(szulo: * gyerekei:");
                    else
                        Console.Write(item.sorszam + ".\t" + item.nev + "\t(szulo: " + item.szulosorszam  + " gyerekei:");
                    if (item.gyerekekInt.Count != 0)
                    {
                        foreach (int item2 in item.gyerekekInt)
                        {
                            Console.Write("  " + item2 + "(" + lista.Find(x => x.sorszam == item2).nev + ")");
                        }
                    }
                    else
                        Console.Write("  nincs gyereke");
                    Console.WriteLine(")");
                }
            }
        }

        public static List<Jatekfa> globaljatekfa = new List<Jatekfa>();

        static void jatekfaFeltolt(List<Jatekfa> jf)
        {
            List<Jatekfa> localjatekfa = new List<Jatekfa>(jf);

            foreach (Jatekfa jatekfa in localjatekfa.Where(x=>x.kiterjesztve == 0))
            {
                jatekfa.kiterjesztve = 1;
                globaljatekfa.Find(x => x.sorszam == jatekfa.sorszam).kiterjesztve = 1;

                int lepes = jatekfa.lepes + 1;

                int szulo = jatekfa.sorszam;

                // Az összes olyan csúcson végigmegyünk, ami létezik és van(nak) gyerekei
                foreach (Csucs csucs in jatekfa.adottFaAllapot.Where(x=>x.letezik == 1 && x.gyerekekInt.Count() != 0))
                {
                    List<Csucs> localfa = new List<Csucs>();
                    foreach (Csucs node in jatekfa.adottFaAllapot)
                        localfa.Add(new Csucs(node.szulosorszam, node.sorszam, node.nev, node.letezik, node.gyerekekInt.ToList(), node.gyerekekString.ToList()));

                    List<int> gyerekek = csucs.gyerekekInt.ToList();

                    // A csúcs.gyerekek kiürítése
                    localfa.Find(x => x.sorszam == csucs.sorszam).gyerekekInt.Clear();
                    localfa.Find(x => x.sorszam == csucs.sorszam).gyerekekString.Clear();

                    // A csúcs gyerekeinek logikai törlése
                    foreach (Csucs gyerek in localfa)
                        if (gyerekek.Contains(gyerek.sorszam))
                        {
                            localfa.Find(x => x.sorszam == gyerek.sorszam).letezik = 0;
                            localfa.Find(x => x.sorszam == gyerek.sorszam).gyerekekString.Clear();
                            localfa.Find(x => x.sorszam == gyerek.sorszam).gyerekekInt.Clear();
                        }

                    // A csúcs unokáinak új fába mozgatása
                    foreach (Csucs unoka in localfa)
                        if (gyerekek.Contains(unoka.szulosorszam))
                            localfa.Find(x=>x.sorszam == unoka.sorszam).szulosorszam = 0;

                    //kiirFullLista(localfa);
                    globaljatekfa.Add(new Jatekfa(szulo, lepes, globaljatekfa.Count()+1, localfa));
                    if ((localfa.Where(x => x.szulosorszam == 0 && x.letezik == 1).Count() == localfa.Where(x => x.letezik == 1).Count()) && (lepes % 2 == 1))
                        globaljatekfa.Find(x => x.sorszam == globaljatekfa.Count()).eredmeny = 1;
                    else if ((localfa.Where(x => x.szulosorszam == 0 && x.letezik == 1).Count() == localfa.Where(x => x.letezik == 1).Count()) && (lepes % 2 == 0))
                        globaljatekfa.Find(x => x.sorszam == globaljatekfa.Count()).eredmeny = -1;
                    globaljatekfa.Find(x => x.sorszam == globaljatekfa.Count()).valasztottCsucsNum = csucs.sorszam;
                    globaljatekfa.Find(x => x.sorszam == globaljatekfa.Count()).valasztottCsucsString = csucs.nev;
                    jatekfaFeltolt(globaljatekfa);
                }
            }
        }

        static void eredmenyszamolas(List<Jatekfa> jf)
        {
            while(jf.Count() != jf.Where(x=>x.eredmeny != 0).Count())
            {
                foreach (Jatekfa jatekfa in jf.Where(x=>x.eredmeny == 0))
                {
                    foreach (Jatekfa gyerekjatekfa in jf.Where(x=>x.szulo == jatekfa.sorszam))
                    {
                        if ((jatekfa.lepes % 2 == 1) && gyerekjatekfa.eredmeny == -1)
                        {
                            jatekfa.eredmeny = -1;
                            break;
                        }
                        else if ((jatekfa.lepes % 2 == 0) && gyerekjatekfa.eredmeny == 1)
                        {
                            jatekfa.eredmeny = 1;
                            break;
                        }
                    }
                }
            }
        }

        static String jolepes(List<Jatekfa> jf)
        {
            foreach (Jatekfa jatekfa in jf.Where(x=>x.szulo == 1))
            {
                if (jatekfa.eredmeny == 1)
                    return jatekfa.valasztottCsucsString + " (" + jatekfa.valasztottCsucsNum + ". csucs) gyerekeit kell torolni (Nyertes allapot)";
            }
            return jf.Find(x=>x.szulo == 1).valasztottCsucsString + " (" + jf.Find(x => x.szulo == 1).valasztottCsucsNum + ". csucs) gyerekeit kell torolni (Vesztes allapot)";
        }

    }

    public class Csucs
    {
        public int szulosorszam;
        public int sorszam;
        public String nev;
        public int letezik;

        public List<int> gyerekekInt = new List<int>();
        public List<String> gyerekekString = new List<string>();

        public Csucs(int szulosorszam, int sorszam, String nev)
        {
            this.szulosorszam = szulosorszam;
            this.sorszam = sorszam;
            this.nev = nev;
            this.letezik = 1;
        }

        public Csucs(int szulosorszam, int sorszam, String nev, int letezik, List<int> gyerekekInt, List<String> gyerekekString)
        {
            this.szulosorszam = szulosorszam;
            this.sorszam = sorszam;
            this.nev = nev;
            this.letezik = letezik;
            this.gyerekekInt = gyerekekInt.ToList();
            this.gyerekekString = gyerekekString.ToList();
        }
    }

    public class Jatekfa
    {
        public int szulo;
        public int lepes;
        public int sorszam;
        public List<Csucs> adottFaAllapot;
        public int kiterjesztve;
        public int eredmeny;
        public int valasztottCsucsNum;
        public String valasztottCsucsString;

        public Jatekfa(int szulo, int lepes, int sorszam, List<Csucs> adottFaAllapot)
        {
            this.szulo = szulo;
            this.lepes = lepes;
            this.sorszam = sorszam;
            this.adottFaAllapot = adottFaAllapot;
            this.kiterjesztve = 0;
            this.eredmeny = 0;
        }

        public Jatekfa(int szulo, int lepes, int sorszam, List<Csucs> adottFaAllapot, int kiterjesztve)
        {
            this.szulo = szulo;
            this.lepes = lepes;
            this.sorszam = sorszam;
            this.adottFaAllapot = adottFaAllapot;
            this.kiterjesztve = kiterjesztve;
            this.eredmeny = 0;
        }

        public void kiir()
        {
             Console.WriteLine("JATEKFA\t" + this.sorszam + ". elem (szulo : " + this.szulo + ", " + this.lepes + ". lepes)" + "\ta valasztott csucs: " + this.valasztottCsucsString);
             ketszemelyesV3.Program.kiirFullLista(this.adottFaAllapot);
            if (this.eredmeny != 0)
                Console.WriteLine((this.eredmeny == 1) ? "WIN" : "LOSE");
            Console.WriteLine("\n\n");
        }
    }
}