C++中用于计算四则混合运算表达式的递归函数

用于计算四则混合运算表达式的递归函数

　　by billow3（QQ：41965573）

　　//---------------------------------------------------------------------------

　　AnsiString __fastcall Calc(String sEXP)

　　{

　　 // 计算不带变量的四则混合运算表达式(只含数字、小数点、+-*/号和括号)

　　 // 正数不许带正号

　　 int posL, pos, posR;

　　 // pos->当前考虑的运算符的位置

　　 // posL->当前考虑的运算符之前最近的运算符的位置

　　 // posL->当前考虑的运算符之前后近的运算符的位置

　　 String sTmp, sL, sR;

　　 // sL->当前考虑的运算符的左操作数字符串，sR->当前考虑的运算符的右操作数字符串

　　 bool IsMinus; // IsMinus->当前*/序列的符号

　　 if(sExp.AnsiPos("error"))

　　 return(sExp);

　　 while(pos = sExp.AnsiPos(" "))

　　 sExp = sExp.Delete(pos, 1); // 去除表达式中的空格

　　 if(sExp.IsEmpty())

　　 return("0");

　　 while((pos = sExp.AnsiPos("[")) > 0

　　 (pos = sExp.AnsiPos("{")) > 0) // 统一左括号为(

　　 sExp = sExp.SubString(1, pos - 1) + "("

　　 + sExp.SubString(pos + 1, sExp.Length());

　　 while((pos = sExp.AnsiPos("]")) > 0

　　 (pos = sExp.AnsiPos("}")) > 0) // 统一右括号为)

　　 sExp = sExp.SubString(1, pos - 1) + ")"

　　 + sExp.SubString(pos+1, sExp.Length());

　　 // 处理括号：递归计算括号中的表达式，最后消去括号

　　 while(posL=sExp.LastDelimiter("(")) // 最里层(

　　 {

　　 sTmp = sExp.SubString(posL + 1, sExp.Length());

　　 posR = sTmp.AnsiPos(")"); // 最里层)

　　 if(posR == 0)

　　 return("error：没有配对的), 公式错！");

　　 sExp = sExp.SubString(1, posL - 1)

　　 + Calc(sTmp.SubString(1, posR - 1))

　　 + sTmp.SubString(posR + 1, sTmp.Length());

　　 }

　　 // 以下处理不带括号表达式中的*/序列

　　 IsMinus = false; // IsMinus->当前*/序列的符号

　　 while(sExp.LastDelimiter("*/")) // 存在*或/

　　 {

　　 for(pos = 1; !sExp.IsDelimiter("*/", pos)

　　 && pos <= sExp.Length(); pos++); // 第一个*或/

　　 if(pos == 1 pos == sExp.Length())

　　 return("error：首或尾字符是*/运算符, 公式错！");

　　 posL = sExp.SubString(1, pos - 1).LastDelimiter("+-");

　　 // posL->第一个*/之前的第一个+-

　　Minus0:

　　 for(posR = pos + 1; !sExp.IsDelimiter("+-*/", posR)

　　 && posR <= sExp.Length(); posR++);

　　 // posR->第一个*/之后的第一个+-*/运算符

　　 if(posR == sExp.Length())

　　 return("error：尾字符是+-*/运算符, 公式错！");

　　 if(sExp.SubString(pos, 2) == "*-"

　　 sExp.SubString(pos, 2) == "/-") // 乘数或除数为负

　　 {

　　 sExp.Delete(pos+1, 1);

　　 IsMinus = !IsMinus;

　　 goto Minus0;

　　 }

　　 sL = sExp.SubString(posL + 1, pos - posL - 1);

　　 sR = sExp.SubString(pos + 1, posR - pos - 1);

　　 if(sExp.IsDelimiter("/", pos) && sR == "0")

　　 return("error：除数为零，无意义！");

　　 sExp = (posL == 0? String(""): sExp.SubString(1, posL))

　　 + (sExp.IsDelimiter("*", pos)?

　　 (sL.ToDouble() * sR.ToDouble()):

　　 (sL.ToDouble() / sR.ToDouble()))

　　 + sExp.SubString(posR, sExp.Length());

　　 }

　　 if(IsMinus)

　　 sExp = String("-") + sExp;

　　 // 经过上面的系列处理，sExp中的运算