using System;
using System.Globalization;
using System.Windows.Forms;

namespace Szamologep
{
    public partial class Form1 : Form
    {
        private double elozo = 0;
        private string muvelet = "";
        private bool ujSzamKezdes = true;
        private bool hiba = false;

        private readonly string tizedesjel = CultureInfo.CurrentCulture.NumberFormat.NumberDecimalSeparator;

        public Form1()
        {
            InitializeComponent();
        }

        private void Form1_Load(object sender, EventArgs e)
        {
            btnTizedes.Text = tizedesjel;
            lblKijelzo.Text = "0";
        }

        // ---- segédmetódusok ----

        private double Aktualis()
        {
            double szam;

            if (double.TryParse(lblKijelzo.Text, NumberStyles.Float, CultureInfo.CurrentCulture, out szam))
            {
                return szam;
            }

            return 0;
        }

        private string Formaz(double szam)
        {
            return Math.Round(szam, 10).ToString("0.##########", CultureInfo.CurrentCulture);
        }

        private void Hibaja(string uzenet)
        {
            lblKijelzo.Text = uzenet;
            hiba = true;
            elozo = 0;
            muvelet = "";
            ujSzamKezdes = true;
        }

        private void Mindent_Torol()
        {
            lblKijelzo.Text = "0";
            elozo = 0;
            muvelet = "";
            ujSzamKezdes = true;
            hiba = false;
        }

        private double Szamol(double a, double b, string m, out bool siker)
        {
            siker = true;

            if (m == "+")
            {
                return a + b;
            }

            if (m == "-")
            {
                return a - b;
            }

            if (m == "×")
            {
                return a * b;
            }

            if (m == "÷")
            {
                if (b == 0)
                {
                    siker = false;
                    return 0;
                }

                return a / b;
            }

            return b;   // nincs várakozó művelet: az új szám az eredmény
        }

        // ---- közös műveletek (gombok és billentyűzet is ezeket hívja) ----

        private void SzamBeiras(string jegy)
        {
            if (hiba)
            {
                Mindent_Torol();
            }

            if (ujSzamKezdes || lblKijelzo.Text == "0")
            {
                lblKijelzo.Text = jegy;
            }
            else if (lblKijelzo.Text.Replace("-", "").Length < 15)
            {
                lblKijelzo.Text = lblKijelzo.Text + jegy;
            }

            ujSzamKezdes = false;
        }

        private void TizedesBeiras()
        {
            if (hiba)
            {
                Mindent_Torol();
            }

            if (ujSzamKezdes)
            {
                lblKijelzo.Text = "0" + tizedesjel;
                ujSzamKezdes = false;
            }
            else if (!lblKijelzo.Text.Contains(tizedesjel))
            {
                lblKijelzo.Text = lblKijelzo.Text + tizedesjel;
            }
        }

        private void MuveletValaszt(string uj)
        {
            if (hiba)
            {
                return;
            }

            double akt = Aktualis();

            if (muvelet != "" && !ujSzamKezdes)
            {
                bool siker;
                double eredmeny = Szamol(elozo, akt, muvelet, out siker);

                if (!siker)
                {
                    Hibaja("Nullával nem lehet osztani");
                    return;
                }

                elozo = eredmeny;
                lblKijelzo.Text = Formaz(eredmeny);
            }
            else
            {
                elozo = akt;
            }

            muvelet = uj;
            ujSzamKezdes = true;
        }

        private void Egyenlo()
        {
            if (hiba || muvelet == "")
            {
                return;
            }

            double akt = Aktualis();
            bool siker;
            double eredmeny = Szamol(elozo, akt, muvelet, out siker);

            if (!siker)
            {
                Hibaja("Nullával nem lehet osztani");
                return;
            }

            lstElozmeny.Items.Insert(0, $"{Formaz(elozo)} {muvelet} {Formaz(akt)} = {Formaz(eredmeny)}");

            lblKijelzo.Text = Formaz(eredmeny);
            elozo = eredmeny;
            muvelet = "";
            ujSzamKezdes = true;
        }

        private void UtolsoTorlese()
        {
            if (hiba)
            {
                Mindent_Torol();
                return;
            }

            if (ujSzamKezdes)
            {
                return;
            }

            string szoveg = lblKijelzo.Text;

            if (szoveg.Length <= 1 || (szoveg.Length == 2 && szoveg.StartsWith("-")))
            {
                lblKijelzo.Text = "0";
                ujSzamKezdes = true;
            }
            else
            {
                lblKijelzo.Text = szoveg.Substring(0, szoveg.Length - 1);
            }
        }

        private void ElojelValt()
        {
            if (hiba || lblKijelzo.Text == "0")
            {
                return;
            }

            if (lblKijelzo.Text.StartsWith("-"))
            {
                lblKijelzo.Text = lblKijelzo.Text.Substring(1);
            }
            else
            {
                lblKijelzo.Text = "-" + lblKijelzo.Text;
            }
        }

        // ---- gombok ----

        private void SzamGomb_Click(object sender, EventArgs e)
        {
            Button gomb = (Button)sender;
            SzamBeiras(gomb.Text);
        }

        private void MuveletGomb_Click(object sender, EventArgs e)
        {
            Button gomb = (Button)sender;
            MuveletValaszt(gomb.Text);
        }

        private void btnTizedes_Click(object sender, EventArgs e) { TizedesBeiras(); }
        private void btnEgyenlo_Click(object sender, EventArgs e) { Egyenlo(); }
        private void btnC_Click(object sender, EventArgs e) { Mindent_Torol(); }
        private void btnTorles_Click(object sender, EventArgs e) { UtolsoTorlese(); }
        private void btnElojel_Click(object sender, EventArgs e) { ElojelValt(); }

        // ---- billentyűzet ----

        private void Form1_KeyPress(object sender, KeyPressEventArgs e)
        {
            if (char.IsDigit(e.KeyChar))
            {
                SzamBeiras(e.KeyChar.ToString());
                e.Handled = true;
            }
            else if (e.KeyChar == ',' || e.KeyChar == '.')
            {
                TizedesBeiras();
                e.Handled = true;
            }
            else if (e.KeyChar == '+')
            {
                MuveletValaszt("+");
                e.Handled = true;
            }
            else if (e.KeyChar == '-')
            {
                MuveletValaszt("-");
                e.Handled = true;
            }
            else if (e.KeyChar == '*')
            {
                MuveletValaszt("×");
                e.Handled = true;
            }
            else if (e.KeyChar == '/')
            {
                MuveletValaszt("÷");
                e.Handled = true;
            }
        }

        private void Form1_KeyDown(object sender, KeyEventArgs e)
        {
            if (e.KeyCode == Keys.Enter)
            {
                Egyenlo();
                e.SuppressKeyPress = true;
                e.Handled = true;
            }
            else if (e.KeyCode == Keys.Back)
            {
                UtolsoTorlese();
                e.SuppressKeyPress = true;
                e.Handled = true;
            }
            else if (e.KeyCode == Keys.Escape)
            {
                Mindent_Torol();
                e.SuppressKeyPress = true;
                e.Handled = true;
            }
        }

        // ---- előzmény ----

        private void lstElozmeny_DoubleClick(object sender, EventArgs e)
        {
            if (lstElozmeny.SelectedItem == null)
            {
                return;
            }

            string sor = lstElozmeny.SelectedItem.ToString();
            int egyenlo = sor.LastIndexOf('=');

            if (egyenlo >= 0)
            {
                lblKijelzo.Text = sor.Substring(egyenlo + 1).Trim();
                ujSzamKezdes = true;
                muvelet = "";
                hiba = false;
            }
        }
    }
}