Esempio n. 1
0
        /// <summary>
        /// Проводит вычисления в автоматическом режиме
        /// </summary>
        /// <param name="expression">Выражение для подсчета</param>
        /// <returns>Результат вычислений</returns>
        public static string CalcToResult(string expression)
        {
            Dictionary <string, string> mas = new Dictionary <string, string>();

            GetMatrixes(ref expression, ref mas);
            List <Token> RPN = MatrixArithmetic.GetRPN(expression);

            return(MatrixArithmetic.Calculate(RPN, mas));
        }
Esempio n. 2
0
        // Начать вычисление
        private void buttonEnter_Click(object sender, EventArgs e)
        {
            if (buttonEnter.Text == "WA=")
            {
                if (ScreenBox.Text.Length > 200 && (DialogResult.Yes != MessageBox.Show("Похоже, у вас слишком длинный.. запрос. Возможно, WolframAlpha обрежет его и вычисления будут неверны. Продолжить?", "Превышена длина запроса", MessageBoxButtons.YesNo, MessageBoxIcon.Question)))
                {
                    return;
                }
                string inpstr = ScreenBox.Text;

                String WolframAlphaApplicationID = Properties.Settings.Default.WA_AppKey;
                if (WolframAlphaApplicationID == "")
                {
                    MessageBox.Show("Неверно задан ключ для WolframAPI. Введите действительный ключ.", "Не задан ключ приложения", MessageBoxButtons.OK, MessageBoxIcon.Asterisk);
                    return;
                }
                if (Properties.Settings.Default.WA_RespSend >= Properties.Settings.Default.WA_RespLimit)
                {
                    MessageBox.Show("Превышен месячный лимит запросов. Увеличить лимит или отключить контроль можно в настройках.", "Превышен лимит запросов", MessageBoxButtons.OK, MessageBoxIcon.Asterisk);
                    return;
                }

                ScreenBox.Clear();
                WolframResult WR = new WolframResult();
                WR.ShowAndCalculate(inpstr, WolframAlphaApplicationID);
                if (HistoryBox1.Text == "")
                {
                    HistoryBox1.Text += "WAQUERY~" + inpstr;
                }
                else
                {
                    HistoryBox1.Text += "\r\n" + inpstr;
                }
            }
            else
            {
                string inpstr = ScreenBox.Text;
                if (inpstr.Contains("X") || inpstr.Contains("Y"))
                {
                    buttonDigit_Click(sender, e);
                }
                else if (inpstr.StartsWith("set"))
                {
                    if (inpstr.Contains("="))
                    {
                        KeyValuePair <string, string> parsedres = new KeyValuePair <string, string>();
                        if (parseVariable(inpstr, ref parsedres))
                        {
                            if (savedVariables == null)
                            {
                                savedVariables = new Dictionary <string, string>();
                            }
                            if (savedVariables.Keys.Contains(parsedres.Key))
                            {
                                if (DialogResult.No == MessageBox.Show("Переменная с таким именем уже существует. Перезаписать?", "Замена", MessageBoxButtons.YesNo, MessageBoxIcon.Question))
                                {
                                    return;
                                }
                            }

                            ScreenBox.Clear();
                            List <Token> RPN1   = Arithmetic.GetRPN(parsedres.Value, savedVariables);
                            string       result = savedVariables[parsedres.Key] = PostProcess(Arithmetic.Calculate(ref RPN1, gradusmode));
                            if (RPN1 != null)
                            {
                                RPN1.Clear();
                            }
                            savedVariables[parsedres.Key] = result;
                            if (HistoryBox1.Text == "")
                            {
                                HistoryBox1.Text += parsedres.Key + "=" + result + ((parsedres.Value == result) ? "" : " [" + parsedres.Value + "]");
                            }
                            else
                            {
                                HistoryBox1.Text += "\r\n" + parsedres.Key + "=" + result + ((parsedres.Value == result) ? "" : " [" + parsedres.Value + "]");
                            }
                        }
                    }
                    else
                    {
                        buttonDigit_Click(sender, e);
                    }
                }
                else
                {
                    string heststr = inpstr;
                    PreProcess(ref inpstr);
                    string result = "";

                    switch (panelmode)
                    {
                    case "norm":
                    case "engen":
                    default:
                        //Вычисление на обычной или инженерной панели
                        //List<Token> RPN1 = Arithmetic.GetRPN(inpstr);
                        //result = Convert.ToString(Arithmetic.Calculate(ref RPN1, gradusmode));
                        //result = PostProcess(Convert.ToDouble(result));
                        //if (RPN1 != null) RPN1.Clear();
                        List <Token> RPN1 = Arithmetic.GetRPN(inpstr, savedVariables);
                        result = Convert.ToString(Arithmetic.Calculate(ref RPN1, gradusmode));
                        result = PostProcess(Convert.ToDouble(result));
                        if (RPN1 != null)
                        {
                            RPN1.Clear();
                        }
                        break;

                    case "prog":
                        //Вычисление на програмной панели
                        if (radioLogicExpr.Checked)
                        {
                            List <Token> RPN2 = BinaryArithmetic.GetRPN(inpstr);
                            Dictionary <string, bool> variables = BinaryArithmetic.GetVariables(RPN2);
                            int count = (int)Math.Pow(2, variables.Count);
                            result = "{[";
                            for (int i = 0; i < count; i++)
                            {
                                BinaryArithmetic.AddVariableData(i + count, variables);
                                result += (BinaryArithmetic.Calculate(RPN2, variables) ? "1|" : "0|");
                            }
                            result = result.Substring(0, result.Length - 1) + "]}";
                        }
                        else
                        {
                            List <Token> RPN2 = Arithmetic.GetRPN(BinaryArithmetic.ConvertStringToSS(inpstr, SSmode, 10));
                            result = Convert.ToString(Arithmetic.Calculate(ref RPN2, gradusmode));
                            result = BinaryArithmetic.ConvertStringToSS(result, 10, SSmode);
                            if (RPN2 != null)
                            {
                                RPN2.Clear();
                            }
                        }
                        break;

                    case "matr":
                        //Вычисление на матричной панели
                        //Dictionary<string, string> mas = new Dictionary<string, string>();
                        //MatrixArithmetic.GetMatrixes(ref inpstr, ref mas);
                        List <Token> RPN3 = MatrixArithmetic.GetRPN(inpstr);
                        //result = MatrixArithmetic.Calculate(RPN3, mas);
                        result = MatrixArithmetic.Calculate(RPN3, savedVariables);
                        if (RPN3 != null)
                        {
                            RPN3.Clear();
                        }
                        //mas.Clear();
                        break;
                    }

                    heststr       += "=" + result;
                    ScreenBox.Text = result;
                    if (HistoryBox1.Text == "")
                    {
                        HistoryBox1.Text += heststr;
                    }
                    else
                    {
                        HistoryBox1.Text += "\r\n" + heststr;
                    }
                }
            }
        }