ButOkKoment = new Button(),
            ButRight = new Button(),
            ButLeft = new Button(), 
            Proverka1 = new Button(),
            Proverka2 = new Button();
        TextBox tbAdd = new TextBox(),
            tbWord = new TextBox(),
            tbKoment = new TextBox();
        CheckBox cbLett = new CheckBox(),
            cbEnd = new CheckBox();
        [Serializable]
        public class Letter
        {
            public int CooX;            //координаты в сетке
            public int CooY;          
            public String s;
            public Letter(int x, int y, String str)
            {
                CooX = x; CooY = y; s = str;
            }
            public Letter(Letter l)
            {
                this.CooX = l.CooX; this.CooY = l.CooY; this.s = l.s;
            }
        }
        //[Serializable]
        ArrayList LetterArray = new ArrayList();
        [Serializable]
        public class Word
        {
            public int CooX, CooY;          //координаты в сетке
            public int ComX, ComY;          //координаты коментария
            public string name,descriptor;  
            public bool napravlenie;//ver - true;
            public Word(string s) { name = s; }
            public Word() { name = ""; }
            public Word(int x, int y, string s, bool n)
            {
                CooX = x; CooY = y;
                name = s; napravlenie = n;
                descriptor = null;
            }
            public Word(int x, int y, int xx, int yy, string s, bool n)
            {
                CooX = x; CooY = y;
                ComX = xx; ComY = yy;
                name = s; napravlenie = n;
                descriptor = null;
            }
            public Word(Word w)
            {
                this.CooX = w.CooX; this.CooY = w.CooY;
                this.name = w.name; this.napravlenie = w.napravlenie;
                this.descriptor = w.descriptor;
                this.ComX = w.ComX; this.ComY = w.ComY;
            }
        }
        //[Serializable]
        ArrayList WordArray = new ArrayList();
        [Serializable]
        public class Picture
        {
            public int CooX;            //координаты в сетке
            public int CooY;
            public int DX, DY;          //длина-ширина
            public Image img;
            public Picture(int x, int y,int xx, int yy,Image im)
            {
                CooX = x; CooY = y;
                DX = xx; DY = yy;
                img = im;
            }
            public Picture(Picture pict)
            {
                this.CooX = pict.CooX; this.CooY = pict.CooY;
                this.DX = pict.DX; this.DY = pict.DY;
                this.img = pict.img;
            }
        }
        ArrayList PicArray = new ArrayList();
 
        Program()
        {
            //lbSlovar.Parent = this;
            //lbSlovar.Bounds = new Rectangle(850,20,130,220);
            tbAdd.Parent = this;
            tbAdd.Bounds = new Rectangle(520, 550, 150, 25);
            tbAdd.KeyUp += new KeyEventHandler(tbAdd_KeyUp);
            AddWord.Parent = this;
            AddWord.Bounds = new Rectangle(520, 580, 70, 25);
            AddWord.Text = "Добавить";
            AddWord.Click += new EventHandler(AddWord_Click);
            DelWord.Parent = this;
            DelWord.Bounds = new Rectangle(600, 580, 70, 25);
            DelWord.Text = "Удалить";
            DelWord.Click += new EventHandler(DelWord_Click);
            lbSlovar.Sorted = true;
            lbPodhodit.Parent = this;
            lbPodhodit.Bounds = new Rectangle(520, 35, 150, 500);
            lbPodhodit.Click += new EventHandler(lb_Click);
            lbPodhodit.Sorted = true;
            lbUse.Parent = this;
            lbUse.Bounds = new Rectangle(690, 35, 150, 500);
            lbUse.Click += new EventHandler(lbUse_Click);
            lbUse.Sorted = true;
            ButSave.Parent = this;
            ButSave.Bounds = new Rectangle(860, 10, 70, 25);
            ButSave.Text = "Сохранить";
            ButSave.Click += new EventHandler(Save_Click);
            ButLoad.Parent = this;
            ButLoad.Bounds = new Rectangle(860, 40, 70, 25);
            ButLoad.Text = "Загрузить";
            ButLoad.Click += new EventHandler(Load_Click);
            ButClear.Parent = this;
            ButClear.Bounds = new Rectangle(860, 70, 70, 25);
            ButClear.Text = "Очистить";
            ButClear.Click += new EventHandler(Clear_Click);
 
            Proverka1.Parent = this;
            Proverka1.Bounds = new Rectangle(860, 250, 120, 25);
            Proverka1.Text = "Все стрелки?";
            Proverka1.Click += new EventHandler(Proverka1_Click);
            Proverka2.Parent = this;
            Proverka2.Bounds = new Rectangle(860, 280, 120, 25);
            Proverka2.Text = "Все комментарии?";
            Proverka2.Click += new EventHandler(Proverka2_Click);
 
            ButLeft.Parent = this;
            ButLeft.Bounds = new Rectangle(690, 550, 30, 20);
            ButLeft.Text = "<--";
            ButLeft.Click += new EventHandler(ButLeft_Click);
            ButRight.Parent = this;
            ButRight.Bounds = new Rectangle(810, 550, 30, 20);
            ButRight.Text = "-->";
            ButRight.Click += new EventHandler(ButRight_Click);
            ButOkKoment.Parent = this;
            ButOkKoment.Bounds = new Rectangle(810, 580, 30, 20);
            ButOkKoment.Text = "OK";
            ButOkKoment.Click += new EventHandler(ButOkKoment_Click);
            tbWord.Parent = this;
            tbWord.Bounds = new Rectangle(720, 550, 90, 20);
            tbWord.ReadOnly = true;
//            tbWord.BorderStyle = BorderStyle.None;
            tbKoment.Parent = this;
            tbKoment.Bounds = new Rectangle(690, 580, 120, 20);
            cbLett.Parent = this;
            cbLett.Text = "Буквы";
            cbLett.Bounds = new Rectangle(860, 150, 120, 20);
            cbLett.Checked = true;
            cbLett.Click += new EventHandler(cb_Click);
            cbEnd.Parent = this;
            cbEnd.Text = "Конец слова";
            cbEnd.Bounds = new Rectangle(860, 170, 120, 20);
            cbEnd.Checked = true;
            cbEnd.Click += new EventHandler(cb_Click);
 
            StreamReader sr = new StreamReader("lib.rus", Encoding.Default);
            string line;
            int i = 0;
            while ((line = sr.ReadLine()) != null)
            {
                lbSlovar.Items.Add(line.ToUpper());
                i++;
            }
            sr.Close();
 
            this.StartPosition = FormStartPosition.CenterScreen;
            this.Bounds = new Rectangle(0, 0, XX, YY);
            this.MaximizeBox = false;
            this.Paint += new PaintEventHandler(Program_Paint);
            this.MouseUp += new MouseEventHandler(Program_MouseUp);
            this.MouseDown += new MouseEventHandler(Program_MouseDown);
            this.MouseMove += new MouseEventHandler(Program_MouseMove);
 
            scene = new Bitmap(XX, YY, CreateGraphics());
            fon = new Bitmap(XX, YY);
            Graphics fondc = Graphics.FromImage((Image)fon);
            fondc.Clear(Color.White);
            fondc.Dispose();
            StrelkiVNiz = new Bitmap(Image.FromFile("niz.png"));
            StrelkiVBok = new Bitmap(Image.FromFile("bok.png"));
        }
 
        void cb_Click(object sender, EventArgs e)
        {
            this.Invalidate();
        }
 
        void ButOkKoment_Click(object sender, EventArgs e)
        {
            try
            {
                WordNow = tbWord.Text;
                foreach (Word w in WordArray)
                    if (w.name == WordNow)
                    {
                        if (tbKoment.Text != "" && tbKoment.Text != " " && tbKoment.Text != null)
                        {
                            w.descriptor = tbKoment.Text;
                            return;
                        }
                    }
            }
            catch { }
        }
 
        void ButLeft_Click(object sender, EventArgs e)
        {
            try
            {
                int i = lbUse.SelectedIndex;
                if (i > 0)
                    lbUse.SetSelected(--i, true);
                else
                    lbUse.SetSelected(lbUse.Items.Count - 1, true);
                WordNow = lbUse.SelectedItem.ToString();
                tbWord.Text = WordNow;
                Select(WordNow);
            }
            catch { }
        }
 
        void ButRight_Click(object sender, EventArgs e)
        {
            try
            {
                int i = lbUse.SelectedIndex;
                if (i < (lbUse.Items.Count - 1))
                    lbUse.SetSelected(++i, true);
                else
                    lbUse.SetSelected(0, true);
                WordNow = lbUse.SelectedItem.ToString();
                tbWord.Text = WordNow;
                Select(WordNow);
                /*
                foreach (Word w in WordArray)
                    if (w.name == WordNow)
                    {
                        SelR = new Rectangle(w.CooX, w.CooY,
                            (w.napravlenie) ? 1 : w.name.Length,
                            (w.napravlenie) ? w.name.Length : 1);
                        if (w.descriptor != null)
                            tbKoment.Text = w.descriptor;
                        else
                            tbKoment.Text = "";
                        this.Invalidate(SelR);
                        return;
                    }*/
            }
            catch { }
        }
 
        void Proverka2_Click(object sender, EventArgs e)
        {
            foreach (Word w in WordArray)
                if (w.descriptor == null)
                {
                    Select(w.name);
                    MessageBox.Show("Слово " + w.name + " без комментария");
                    return;
                }
            MessageBox.Show("Все слова с комментариями");
        }
 
        void Proverka1_Click(object sender, EventArgs e)
        {
            foreach (Word w in WordArray)
                if (w.ComX < 0 || w.ComY < 0)
                {
                    Select(w.name);
                    MessageBox.Show("Слово " + w.name + " без стрелки");
                    return;
                }
            MessageBox.Show("Все слова со стрелками");
        }
 
        void tbAdd_KeyUp(object sender, KeyEventArgs e)
        {
            if (SelP.X != -1 && SelP.Y != -1)
            {
                String s = (tbAdd.Text[tbAdd.Text.Length - 1]).ToString().ToUpper();
                bool b = true;
                foreach (Letter l in LetterArray)
                    if (l.CooX == SelP.X && l.CooY == SelP.Y)
                    {
                        l.s = s;
                        b = false;
                    }
                if (b)
                {
                    Letter l = new Letter(SelP.X, SelP.Y, s);
                    LetterArray.Add(l);
                }
                //tbAdd.Text="";
                this.Invalidate(new Rectangle(SelR.X * KX + 10, SelR.Y * KY + 10, KX, KY));
            }
        }
 
        void Save_Click(object sender, EventArgs e)
        {
            try
            {
                BinaryFormatter formatter = new BinaryFormatter();
                SaveFileDialog fd = new SaveFileDialog();
                fd.Filter = "kro files (*.kro)|*.kro|sha files (*.sha)|*.sha|All files (*.*)|*.*";
                fd.RestoreDirectory = true;
                fd.ShowDialog();
                Stream stream = new FileStream(fd.FileName, FileMode.Create, FileAccess.Write, FileShare.None);
                //foreach(Word w in WordArray)
                    //formatter.Serialize(stream, w);
                formatter.Serialize(stream, WordArray);
                formatter.Serialize(stream, LetterArray);
                formatter.Serialize(stream, PicArray);
                stream.Close();
            }
            catch
            {
                MessageBox.Show("Ошибка зaписи");
            }
        }
 
        void Load_Click(object sender, EventArgs e)
        {
            try
            {
                BinaryFormatter formatter = new BinaryFormatter();
                OpenFileDialog fd = new OpenFileDialog();
                fd.Filter = "kro files (*.kro)|*.kro|sha files (*.sha)|*.sha|All files (*.*)|*.*";
                fd.RestoreDirectory = true;
                fd.ShowDialog();
                WordArray.Clear();
                this.Text = fd.FileName;
                Stream stream = new FileStream(fd.FileName, FileMode.Open, FileAccess.Read, FileShare.None);
                WordArray = (ArrayList)formatter.Deserialize(stream);
                LetterArray = (ArrayList)formatter.Deserialize(stream);
                PicArray = (ArrayList)formatter.Deserialize(stream);
                FillUses();
                stream.Close();
            }
            catch
            {
                MessageBox.Show("Ошибка чтения");
            }
        }
 
        void Clear_Click(object sender, EventArgs e)
        {
            WordArray.Clear();
            LetterArray.Clear();
            PicArray.Clear();
            FillUses();
            Invalidate(true);
        }
 
        void AddWord_Click(object sender, EventArgs e)
        {
            if (lbSlovar.Items.Contains(tbAdd.Text.ToUpper()))
            {
                MessageBox.Show("Слово " + tbAdd.Text + " уже есть в словаре");
                return;
            }
            if (tbAdd.Text.Length > 1)
                if (DialogResult.Yes == MessageBox.Show("Добавить слово " + tbAdd.Text + "?", "Добавление", MessageBoxButtons.YesNo))
                {
                    lbSlovar.Items.Add(tbAdd.Text.ToUpper());
                    try
                    {
                        if (lbPodhodit.Items.Count>0)
                            if(lbPodhodit.Items[0].ToString().Length==tbAdd.Text.Length)
                                lbPodhodit.Items.Add(tbAdd.Text.ToUpper());
                    }
                    catch { }
                    StreamWriter sr = new StreamWriter("lib.rus",false, Encoding.Default);
                    for (int i = 0; i < lbSlovar.Items.Count;i++)
                    {
                        sr.WriteLine(lbSlovar.Items[i]);
                    }
                    sr.Close();
                }
        }
 
        void DelWord_Click(object sender, EventArgs e)
        {
            try
            {
                if (DialogResult.Yes == MessageBox.Show("Удалить слово " + lbPodhodit.SelectedItem + "?", "Удаление", MessageBoxButtons.YesNo))
                {
                    String ts = lbPodhodit.SelectedItem.ToString();
                    lbSlovar.Items.Remove(ts);
                    lbPodhodit.Items.Remove(ts);
                    StreamWriter sr = new StreamWriter("lib.rus", false, Encoding.Default);
                    for (int i = 0; i < lbSlovar.Items.Count; i++)
                    {
                        sr.WriteLine(lbSlovar.Items[i]);
                    }
                    Word w2 = null;
                    foreach (Word w1 in WordArray)
                        if (w1.name == ts)
                            w2 = w1;
                    WordArray.Remove(w2);
                    FillUses();
                    Invalidate(true);
                    sr.Close();
                }
            }
            catch { }
        }
 
        void lbUse_Click(object sender, EventArgs e)
        {
            WordNow = ((ListBox)sender).SelectedItem.ToString();
            tbWord.Text = WordNow;
            tbKoment.Text = "";
            Word w = new Word();
            foreach (Word w1 in WordArray)
                if (w1.name == WordNow)
                {
                    w = new Word(w1);
                    SelR = new Rectangle(w.CooX, w.CooY,
                        (w.napravlenie) ? 1 : w.name.Length ,
                        (w.napravlenie) ? w.name.Length : 1);
                    if (w.descriptor != null)
                        tbKoment.Text = w.descriptor;
                }
            int count = w.name.Length;
            vertgor = w.napravlenie;
 
            lbPodhodit.Items.Clear();
            foreach (string s in lbSlovar.Items)
            {
                if (s.Length == w.name.Length)
                {
                    bool yes = true;
                    try
                    {
                        for (int k = 0; k < count; k++)
                        {
                            string st = GetLeter(SelR.X, SelR.Y + k, w.name).ToUpper();
                            if (vertgor && (s[k].ToString().ToUpper() == st ||
                                st == "" || st == " "))
                            { }
                            else
                                yes = false;
                        }
                        if (yes && !lbUse.Items.Contains(s))
                            lbPodhodit.Items.Add(s);
                    }
                    catch { }
                    yes = true;
                    try
                    {
                        for (int k = 0; k < count; k++)
                        {
                            string st = GetLeter(SelR.X + k, SelR.Y, w.name).ToUpper();
                            if (!vertgor && (s[k].ToString().ToUpper() == st ||
                                st == "" || st == " "))
                            { }
                            else
                                yes = false;
                        }
                        if (yes && !lbUse.Items.Contains(s))
                            lbPodhodit.Items.Add(s);
                    }
                    catch { }
                }
            }
            this.Invalidate(new Rectangle(SelR.X * KX + 10, SelR.Y * KY + 10, KX, KY));
        }
 
        void Program_MouseMove(object sender, MouseEventArgs e)
        {
            string ts=e.Button.ToString();
            if (ts == "Left")
            {
                int tx = (e.X - 10) / KX;
                int ty = (e.Y - 10) / KY;
                SelR = new Rectangle((MX <= tx) ? MX : tx, (MY <= ty) ? MY : ty,
                    Math.Abs(MX - tx)+1, Math.Abs(MY - ty)+1);
                Invalidate(SelR);
            }
            if (ts == "Right")
            {
                int tx = (e.X - 10) / KX;
                int ty = (e.Y - 10) / KY;
                RSelR = new Rectangle((RMX <= tx) ? RMX : tx, (RMY <= ty) ? RMY : ty,
                    Math.Abs(RMX - tx) + 1, Math.Abs(RMY - ty) + 1);
                Invalidate(RSelR);
            }
        }
 
        void Program_MouseDown(object sender, MouseEventArgs e)
        {
            string ts=e.Button.ToString();
            Point tp = new Point(e.X, e.Y);
            Rectangle tr = new Rectangle(10, 10, PoX * KX, PoY * KY);
            if (ts == "Left")
            {
                SelP = new Point(-1, -1);
                SelR = new Rectangle(-1, -1, 0, 0);
                MX = -1; MY = -1;
                if (tr.Contains(tp))
                {
                    MX = (e.X - 10) / KX;
                    MY = (e.Y - 10) / KY;
                }
                if (Dyrka.Contains(MX, MY))
                {
                    MX = -1; MY = -1;
                }
            }
            if (ts == "Right")
            {
//                SelP = new Point(-1, -1);
                RSelR = new Rectangle(-1, -1, 0, 0);
                RMX = -1; RMY = -1;
                if (tr.Contains(tp))
                {
                    RMX = (e.X - 10) / KX;
                    RMY = (e.Y - 10) / KY;
                }
                if (Dyrka.Contains(RMX, RMY))
                {
                    RMX = -1; RMY = -1;
                }
            }
       }
 
        void Program_MouseUp(object sender, MouseEventArgs e)
        {
            Point tp = new Point(e.X, e.Y);
            Rectangle tr = new Rectangle(10, 10, PoX * KX, PoY * KY);
            int tx=-1, ty=-1;
            SelP = new Point(-1, -1);
            SelR = new Rectangle(-1, -1, 0, 0);
            RSelR = new Rectangle(-1, -1, 0, 0);
 
            if (tr.Contains(tp))
            {
                tx = (e.X - 10) / KX;
                ty = (e.Y - 10) / KY;
            }
            if (Dyrka.Contains(tx, ty) || Dyrka.Contains(MX, MY))
            {
                MX = -1; MY = -1; tx = -1; ty = -1;
            }
            if (MX != -1&&e.Button.ToString() == "Left")
            {
                if (MX == tx && MY == ty)
                    SelP = new Point(tx, ty);
                else
                {
                    SelP = new Point(-1, -1);
                    if (MX == tx || MY == ty)
                    {
                        SelR = new Rectangle(
                            (MX < tx) ? MX : tx, (MY < ty) ? MY : ty, Math.Abs(MX - tx) + 1, Math.Abs(MY - ty) + 1);
                        int count = (Math.Abs(MX - tx) > Math.Abs(MY - ty) ?
                            Math.Abs(MX - tx) : Math.Abs(MY - ty)) + 1;
                        vertgor = (Math.Abs(MX - tx) > Math.Abs(MY - ty)) ? false : true;
 
                        String ss = GetMask(SelR.X, SelR.Y, vertgor, count);
                        //this.Text = ss;
                        if (ss == null)
                        {
                            lbPodhodit.Items.Clear();
                            MX = -1; MY = -1; tx = -1; ty = -1;
                            Invalidate(SelR);
                            SelR = new Rectangle(-1, -1, 0, 0);
                            RSelR = new Rectangle(-1, -1, 0, 0);
                            return;
                        }
                        if (lbUse.Items.Contains(ss) && ss.Length == count)
                        {
                            Select(ss);
                        }
                        else
                        {
                            lbUse.ClearSelected();
                            lbPodhodit.Items.Clear();
                            foreach (string s in lbSlovar.Items)
                            {
                                if (s.Length == ss.Length)
                                {
                                    bool yes = true;
                                    try
                                    {
                                        for (int k = 0; k < count; k++)
                                            if (vertgor && (ss[k].ToString().ToUpper() == s[k].ToString().ToUpper() ||
                                                ss[k].ToString().ToUpper() == " "))
                                            { }
                                            else
                                                yes = false;
                                        if (yes && !lbUse.Items.Contains(s))
                                            lbPodhodit.Items.Add(s);
                                    }
                                    catch { }
                                    yes = true;
                                    try
                                    {
                                        for (int k = 0; k < count; k++)
                                            if ((!vertgor) && (ss[k].ToString().ToUpper() == s[k].ToString().ToUpper() ||
                                                ss[k].ToString().ToUpper() == " "))
                                            { }
                                            else
                                                yes = false;
                                        if (yes && !lbUse.Items.Contains(s))
                                            lbPodhodit.Items.Add(s);
                                    }
                                    catch { }
                                }
                            }
                        }
                    }
                }
            }
            if (e.Button.ToString() == "Right")
            {
                if (RMX == tx && RMY == ty)
                {
                    Word w1 = null, w2 = null;
                    bool tb = true;
                    /*Letter l2 = null;
                    foreach (Letter l in LetterArray)
                    {
                        if (l.CooX == tx && l.CooY == ty)
                            l2 = l;    
                    }LetterArray.Remove(l2);
                    */
                    foreach (Word w in WordArray)
                    {
                        if (w.napravlenie)
                        {
                            if (w.CooX == ((RMX < tx) ? RMX : tx) && w.CooY <= ((RMY < ty) ? RMY : ty) &&
                                (w.CooY + w.name.Length-1 >= ((RMY < ty) ? RMY : ty)))
                            {
                                if (DialogResult.Yes == MessageBox.Show("Удалить слово " + w.name + "?", "Удаление", MessageBoxButtons.YesNo))
                                    w1 = w; 
                                tb = false;
                            }
                        }
                        else
                        {
                            if (w.CooY == ((RMY < ty) ? RMY : ty) && w.CooX <= ((RMX < tx) ? RMX : tx) &&
                                (w.CooX + w.name.Length-1 >= ((RMX < tx) ? RMX : tx)))
                            {
                                if (DialogResult.Yes == MessageBox.Show("Удалить слово " + w.name + "?", "Удаление", MessageBoxButtons.YesNo))
                                    w2 = w;
                                tb = false; 
                            }
                        }
                    }
                    WordArray.Remove(w1);
                    WordArray.Remove(w2);
                    try
                    {
                        if (tb)
                        {
                            Word w3 = null;
                            if (lbUse.SelectedItem != null)
                            {
                                foreach (Word w in WordArray)
                                    if (lbUse.SelectedItem.ToString() == w.name)
                                        w3 = w;
                            }
                            if (w3 != null)
                                if ((Math.Abs(w3.CooX - RMX) < 2) && (Math.Abs(w3.CooY - RMY) < 2))
                                {
                                    w3.ComX = RMX;
                                    w3.ComY = RMY;
                                }
                        }
 
                    }
                    catch { }
                    FillUses();
                }
                SelP = new Point(-1, -1);
                SelR = new Rectangle(-1, -1, 0, 0);
            }
            Invalidate();
        }
 
        void lb_Click(object sender, EventArgs e)
        {
            if (SelR.X != -1)
            {
                WordNow = ((ListBox)sender).SelectedItem.ToString();
                bool tb = true;
                foreach (Word w in WordArray)
                {
                    if (w.CooX == SelR.X && w.CooY == SelR.Y && w.napravlenie == vertgor)
                    {
                        w.name = WordNow;
                        tb = false;
                    }
                }
                if (tb)
                {
                    Rectangle tr = new Rectangle(0, 0, PoX, PoY);
                    int xx = SelR.X, yy = SelR.Y;
                    if(vertgor) 
                        yy--;
                    else xx--;
                    if ((Dyrka.Contains(xx, yy)) || (!tr.Contains(xx, yy)))
                        WordArray.Add(new Word(SelR.X, SelR.Y, -1, -1, WordNow, vertgor));
                    else
                        WordArray.Add(new