private void radioSS_CheckedChanged(object sender, EventArgs e)
{
if (sender is RadioButton)
{
if (!((RadioButton)sender).Checked)
{
return;
}
}
else
{
return;
}
switch (((RadioButton)sender).Name)
{
case "radioSS16":
default:
textSSX.Enabled = false;
ScreenBox.Text = BinaryArithmetic.ConvertStringToSS(ScreenBox.Text, SSmode, 16);
SSmode = 16;
break;
case "radioSS10":
textSSX.Enabled = false;
ScreenBox.Text = BinaryArithmetic.ConvertStringToSS(ScreenBox.Text, SSmode, 10);
SSmode = 10;
break;
case "radioSSX":
textSSX.Enabled = true;
short newSS;
if (Int16.TryParse(textSSX.Text, out newSS))
{
if (newSS >= 2 && newSS <= 16)
{
textSSX.BackColor = SystemColors.Window;
ScreenBox.Text = BinaryArithmetic.ConvertStringToSS(ScreenBox.Text, SSmode, newSS);
SSmode = newSS;
if (newSS == 2 || newSS == 10 || newSS == 16)
{
textSSX.Text = "8";
}
}
else
{
textSSX.BackColor = Color.LightCoral;
}
}
else
{
textSSX.BackColor = Color.LightCoral;
}
break;
case "radioSS2":
textSSX.Enabled = false;
ScreenBox.Text = BinaryArithmetic.ConvertStringToSS(ScreenBox.Text, SSmode, 2);
SSmode = 2;
break;
}
ChangeSSTo(SSmode);
}
// Начать вычисление
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;
}
}
}
}