Inheritance: IComparable
Esempio n. 1
0
        public Bag subtract(Bag subtrahend)
        {
            string m = guts;
            string s = subtrahend.guts;
            string difference = "";

            while (true)
            {
                if (s.Length == 0) return new Bag(difference + m);
                if (m.Length == 0) return null;
                {
                    char s0 = s[0];
                    char m0 = m[0];
                    if (m0 > s0) return null;
                    if (m0 < s0)
                    {
                        m = m.Substring(1);
                        difference += m0;
                        continue;
                    }
                    System.Diagnostics.Trace.Assert(m0 == s0,
                        "internal error!  Aggggh");
                    m = m.Substring(1);
                    s = s.Substring(1);
                }
            }
        }
Esempio n. 2
0
        private void anagrams_Click(object sender, EventArgs e)
        {
            input.Enabled = false;
            Bag input_bag = new Bag(input.Text);
            listView1.Items.Clear();
            fileToolStripMenuItem.Enabled = false;
            start_time = DateTime.Now;
            elapsed_time.Text = "00:00:00";
            timer1.Enabled = true;
            ProgressBar.Value = 0;
            Anagrams.anagrams(input_bag, dictionary, 0,

                // bottom of main loop
                delegate()
                {
                    ProgressBar.PerformStep();
                    Application.DoEvents();
                },

                // done pruning
                delegate(uint recursion_level, List<bag_and_anagrams> pruned_dict)
                {
                    if (recursion_level == 0)
                    {
                        ProgressBar.Maximum = pruned_dict.Count;
                        Application.DoEvents();
                    }
                },

                // found a top-level anagram
                delegate(strings words)
                {
                    string display_me = "";
                    foreach (string s in words)
                    {
                        if (display_me.Length > 0)
                            display_me += " ";
                        display_me += s;
                    }

                    listView1.Items.Add(display_me);
                    listView1.EnsureVisible(listView1.Items.Count - 1);
                    toolStripStatusLabel1.Text = listView1.Items.Count.ToString() + " anagrams so far";
                    if (listView1.Items.Count % 1000 == 0)
                    {
                        Application.DoEvents();
                    }

                });
            timer1.Enabled = false;
            toolStripStatusLabel1.Text = String.Format("Done.  {0} anagrams",
                listView1.Items.Count);
            if (listView1.Items.Count > 0)
                listView1.EnsureVisible(0);
            input.Enabled = true;
            input.Focus();
            // the leading spaces work around a bug in the control: I
            // want the text centered, but that doesn't work.
            // Another workaround is for me to handle the
            // DrawColumnHeader event myself, but I'm too lazy to do that.
            listView1.Columns[0].Text = "                   Click to sort";
            fileToolStripMenuItem.Enabled = true;
        }
Esempio n. 3
0
        private void Form1_Shown(object sender, EventArgs e)
        {
            System.IO.Stream wordlist_stream;
            System.Reflection.Assembly thisExe;
            thisExe = System.Reflection.Assembly.GetExecutingAssembly();
            wordlist_stream =
                thisExe.GetManifestResourceStream("Anagrams.words");
            System.Diagnostics.Trace.Assert(wordlist_stream != null,
                "Uh oh, can't find word list inside myself!");
            toolStripStatusLabel1.Text = "Compiling dictionary ...";
            ProgressBar.Value = 0;
            ProgressBar.Maximum = (int)wordlist_stream.Length;
            listView1_Resize(sender, e);
            using (StreamReader sr = new StreamReader(wordlist_stream))
            {
                String line;
                // Read and display lines from the file until the end of
                // the file is reached.
                int linesRead = 0;
                Hashtable stringlists_by_bag = new Hashtable();
                while ((line = sr.ReadLine()) != null)
                {
                    // TODO -- filter out nonletters.  Thus "god's"
                    // should become "gods".  And since both of those
                    // are likely to appear, we need to ensure that we
                    // only store one.
                    line = line.ToLower();
                    if (!acceptable(line))
                        continue;
                    Bag aBag = new Bag(line);
                    if (!stringlists_by_bag.ContainsKey(aBag))
                    {
                        strings l = new strings();
                        l.Add(line);
                        stringlists_by_bag.Add(aBag, l);
                    }
                    else
                    {
                        strings l = (strings)stringlists_by_bag[aBag];
                        if (!l.Contains(line))
                            l.Add(line);
                    }
                    linesRead++;
                    ProgressBar.Increment(line.Length + 1); // the +1 is for the line ending character, I'd guess.

                    Application.DoEvents();
                }

                // Now convert the hash table, which isn't useful for
                // actually generating anagrams, into a list, which is.

                dictionary = new List<bag_and_anagrams>();
                foreach (DictionaryEntry de in stringlists_by_bag)
                {
                    dictionary.Add(new bag_and_anagrams((Bag)de.Key, (strings)de.Value));
                }

                // Now just for amusement, sort the list so that the biggest bags
                // come first.  This might make more interesting anagrams appear first.
                bag_and_anagrams[] sort_me = new bag_and_anagrams[dictionary.Count];
                dictionary.CopyTo(sort_me);
                Array.Sort(sort_me);
                dictionary.Clear();
                dictionary.InsertRange(0, sort_me);
            }
            toolStripStatusLabel1.Text = "Compiling dictionary ... done.";
            listView1.Enabled = true;
            input.Enabled = true;
            input.Focus();
        }
Esempio n. 4
0
        private static string subtract_strings(string minuend, string subtrahend)
        {
            Bag m = new Bag(minuend);

            Bag s = new Bag(subtrahend);
            Bag diff = m.subtract(s);
            if (diff == null) return null;
            return diff.AsString();
        }
Esempio n. 5
0
        private void Form1_Shown(object sender, EventArgs e)
        {
            System.IO.Stream           wordlist_stream;
            System.Reflection.Assembly thisExe;
            thisExe         = System.Reflection.Assembly.GetExecutingAssembly();
            wordlist_stream =
                thisExe.GetManifestResourceStream("Anagrams.words");
            System.Diagnostics.Trace.Assert(wordlist_stream != null,
                                            "Uh oh, can't find word list inside myself!");
            toolStripStatusLabel1.Text = "Compiling dictionary ...";
            ProgressBar.Value          = 0;
            ProgressBar.Maximum        = (int)wordlist_stream.Length;
            listView1_Resize(sender, e);
            using (StreamReader sr = new StreamReader(wordlist_stream))
            {
                String line;
                // Read and display lines from the file until the end of
                // the file is reached.
                int       linesRead          = 0;
                Hashtable stringlists_by_bag = new Hashtable();
                while ((line = sr.ReadLine()) != null)
                {
                    // TODO -- filter out nonletters.  Thus "god's"
                    // should become "gods".  And since both of those
                    // are likely to appear, we need to ensure that we
                    // only store one.
                    line = line.ToLower();
                    if (!acceptable(line))
                    {
                        continue;
                    }
                    Bag aBag = new Bag(line);
                    if (!stringlists_by_bag.ContainsKey(aBag))
                    {
                        strings l = new strings();
                        l.Add(line);
                        stringlists_by_bag.Add(aBag, l);
                    }
                    else
                    {
                        strings l = (strings)stringlists_by_bag[aBag];
                        if (!l.Contains(line))
                        {
                            l.Add(line);
                        }
                    }
                    linesRead++;
                    ProgressBar.Increment(line.Length + 1); // the +1 is for the line ending character, I'd guess.

                    Application.DoEvents();
                }

                // Now convert the hash table, which isn't useful for
                // actually generating anagrams, into a list, which is.

                dictionary = new List <bag_and_anagrams>();
                foreach (DictionaryEntry de in stringlists_by_bag)
                {
                    dictionary.Add(new bag_and_anagrams((Bag)de.Key, (strings)de.Value));
                }

                // Now just for amusement, sort the list so that the biggest bags
                // come first.  This might make more interesting anagrams appear first.
                bag_and_anagrams[] sort_me = new bag_and_anagrams[dictionary.Count];
                dictionary.CopyTo(sort_me);
                Array.Sort(sort_me);
                dictionary.Clear();
                dictionary.InsertRange(0, sort_me);
            }
            toolStripStatusLabel1.Text = "Compiling dictionary ... done.";
            listView1.Enabled          = true;
            input.Enabled = true;
            input.Focus();
        }
Esempio n. 6
0
 private void Form1_Load(object sender, EventArgs e)
 {
     Bag.test();
 }
Esempio n. 7
0
        private void anagrams_Click(object sender, EventArgs e)
        {
            input.Enabled = false;
            Bag input_bag = new Bag(input.Text);

            listView1.Items.Clear();
            fileToolStripMenuItem.Enabled = false;
            start_time        = DateTime.Now;
            elapsed_time.Text = "00:00:00";
            timer1.Enabled    = true;
            ProgressBar.Value = 0;
            Anagrams.anagrams(input_bag, dictionary, 0,

                              // bottom of main loop
                              delegate()
            {
                ProgressBar.PerformStep();
                Application.DoEvents();
            },

                              // done pruning
                              delegate(uint recursion_level, List <bag_and_anagrams> pruned_dict)
            {
                if (recursion_level == 0)
                {
                    ProgressBar.Maximum = pruned_dict.Count;
                    Application.DoEvents();
                }
            },

                              // found a top-level anagram
                              delegate(strings words)
            {
                string display_me = "";
                foreach (string s in words)
                {
                    if (display_me.Length > 0)
                    {
                        display_me += " ";
                    }
                    display_me += s;
                }

                listView1.Items.Add(display_me);
                listView1.EnsureVisible(listView1.Items.Count - 1);
                toolStripStatusLabel1.Text = listView1.Items.Count.ToString() + " anagrams so far";
                if (listView1.Items.Count % 1000 == 0)
                {
                    Application.DoEvents();
                }
            });
            timer1.Enabled             = false;
            toolStripStatusLabel1.Text = String.Format("Done.  {0} anagrams",
                                                       listView1.Items.Count);
            if (listView1.Items.Count > 0)
            {
                listView1.EnsureVisible(0);
            }
            input.Enabled = true;
            input.Focus();
            // the leading spaces work around a bug in the control: I
            // want the text centered, but that doesn't work.
            // Another workaround is for me to handle the
            // DrawColumnHeader event myself, but I'm too lazy to do that.
            listView1.Columns[0].Text     = "                   Click to sort";
            fileToolStripMenuItem.Enabled = true;
        }