jisuanqidlg.cpp

计算表达式是实现课程设计语言的基本问题之一

// jisuanqiDlg.cpp : implementation file
//
#include "stdafx.h"
#include "jisuanqi.h"
#include "jisuanqiDlg.h"
#ifdef _DEBUG
#define new DEBUG_NEW
#undef THIS_FILE
static char THIS_FILE[] = __FILE__;
#endif
//////////////////////////////////////////////////////////////////////////////////////////////
//////////////////////////////////////////////////////////////////////////////////////////////
#include <string.h>
#include <stdio.h>
#include <stdlib.h>
#include <math.h>
#include <ctype.h>     //其中有个isdigit(char)函数，判断是否为数字字符
#define N 40            //栈的空间大小
#define OK 1
#define ERROR 0

//数据的栈结构定义

typedef short status; 
typedef struct{
	int top;
	double array[N];
}NumStack;

//操作符的结构定义

typedef struct{      
	int top;
	char array[N];
}OpStack;

void InitNumStack(NumStack &S)
{
	int i;
	for(i=0;i<N;i++)
	{
		S.array[i]=-111111.111111;
	}
	S.top=0;
}
void InitOpStack(OpStack &O)
{
	int i;
	for(i=0;i<N;i++)
	{
		O.array[i]=' ';
	}
	O.top=0;
}

//////////////////////////////////////////////////////////////////////////////////////////////
//////////////////////////////////////////////////////////////////////////////////////////////

/////////////////////////////////////////////////////////////////////////////
// CAboutDlg dialog used for App About

class CAboutDlg : public CDialog
{
public:
	CAboutDlg();

// Dialog Data
	//{{AFX_DATA(CAboutDlg)
	enum { IDD = IDD_ABOUTBOX };
	//}}AFX_DATA

	// ClassWizard generated virtual function overrides
	//{{AFX_VIRTUAL(CAboutDlg)
	protected:
	virtual void DoDataExchange(CDataExchange* pDX);    // DDX/DDV support
	//}}AFX_VIRTUAL

// Implementation
protected:
	//{{AFX_MSG(CAboutDlg)
	//}}AFX_MSG
	DECLARE_MESSAGE_MAP()
};

CAboutDlg::CAboutDlg() : CDialog(CAboutDlg::IDD)
{
	//{{AFX_DATA_INIT(CAboutDlg)
	//}}AFX_DATA_INIT
}

void CAboutDlg::DoDataExchange(CDataExchange* pDX)
{
	CDialog::DoDataExchange(pDX);
	//{{AFX_DATA_MAP(CAboutDlg)
	//}}AFX_DATA_MAP
}

BEGIN_MESSAGE_MAP(CAboutDlg, CDialog)
	//{{AFX_MSG_MAP(CAboutDlg)
		// No message handlers
	//}}AFX_MSG_MAP
END_MESSAGE_MAP()

/////////////////////////////////////////////////////////////////////////////
// CJisuanqiDlg dialog

CJisuanqiDlg::CJisuanqiDlg(CWnd* pParent /*=NULL*/)
	: CDialog(CJisuanqiDlg::IDD, pParent)
{
	//{{AFX_DATA_INIT(CJisuanqiDlg)
	m_TXT = _T("");
	m_S3 = _T("");
	m_S2 = _T("");
	m_S4 = _T("");
	m_S5 = _T("");
	//}}AFX_DATA_INIT
	// Note that LoadIcon does not require a subsequent DestroyIcon in Win32
	m_hIcon = AfxGetApp()->LoadIcon(IDR_MAINFRAME);
}

void CJisuanqiDlg::DoDataExchange(CDataExchange* pDX)
{
	CDialog::DoDataExchange(pDX);
	//{{AFX_DATA_MAP(CJisuanqiDlg)
	DDX_Control(pDX, IDC_SLIDER1, m_Slider1);
	DDX_Text(pDX, IDC_EDIT1, m_TXT);
	DDX_Text(pDX, IDC_STATIC3, m_S3);
	DDX_Text(pDX, IDC_STATIC2, m_S2);
	DDX_Text(pDX, IDC_STATIC4, m_S4);
	DDX_Text(pDX, IDC_STATIC5, m_S5);
	//}}AFX_DATA_MAP
}

BEGIN_MESSAGE_MAP(CJisuanqiDlg, CDialog)
	//{{AFX_MSG_MAP(CJisuanqiDlg)
	ON_WM_SYSCOMMAND()
	ON_WM_PAINT()
	ON_WM_QUERYDRAGICON()
	ON_BN_CLICKED(IDC_BUTTON1, OnButton1)
	ON_BN_CLICKED(IDC_BUTTON2, OnButton2)
	ON_NOTIFY(NM_OUTOFMEMORY, IDC_SLIDER1, OnOutofmemorySlider1)
	ON_WM_HSCROLL()
	ON_BN_CLICKED(IDC_STATIC3, OnStatic3)
	ON_BN_CLICKED(IDC_BUTTON3, OnButton3)
	//}}AFX_MSG_MAP
END_MESSAGE_MAP()

/////////////////////////////////////////////////////////////////////////////
// CJisuanqiDlg message handlers

BOOL CJisuanqiDlg::OnInitDialog()
{
	CDialog::OnInitDialog();

	// Add "About..." menu item to system menu.

	// IDM_ABOUTBOX must be in the system command range.
	ASSERT((IDM_ABOUTBOX & 0xFFF0) == IDM_ABOUTBOX);
	ASSERT(IDM_ABOUTBOX < 0xF000);

	CMenu* pSysMenu = GetSystemMenu(FALSE);
	if (pSysMenu != NULL)
	{
		CString strAboutMenu;
		strAboutMenu.LoadString(IDS_ABOUTBOX);
		if (!strAboutMenu.IsEmpty())
		{
			pSysMenu->AppendMenu(MF_SEPARATOR);
			pSysMenu->AppendMenu(MF_STRING, IDM_ABOUTBOX, strAboutMenu);
		}
	}

	// Set the icon for this dialog.  The framework does this automatically
	//  when the application's main window is not a dialog
	SetIcon(m_hIcon, TRUE);			// Set big icon
	SetIcon(m_hIcon, FALSE);		// Set small icon
	m_Slider1.SetRange(20,1000,true);          //设置控制条的取值范围
	m_Slider1.SetTicFreq(4);
	m_Slider1.SetLineSize(1);
	m_Slider1.SetPageSize(4);
	
	// TODO: Add extra initialization here
	
	return TRUE;  // return TRUE  unless you set the focus to a control
}

void CJisuanqiDlg::OnSysCommand(UINT nID, LPARAM lParam)
{
	if ((nID & 0xFFF0) == IDM_ABOUTBOX)
	{
		CAboutDlg dlgAbout;
		dlgAbout.DoModal();
	}
	else
	{
		CDialog::OnSysCommand(nID, lParam);
	}
}

// If you add a minimize button to your dialog, you will need the code below
//  to draw the icon.  For MFC applications using the document/view model,
//  this is automatically done for you by the framework.

void CJisuanqiDlg::OnPaint() 
{
	if (IsIconic())
	{
		CPaintDC dc(this); // device context for painting

		SendMessage(WM_ICONERASEBKGND, (WPARAM) dc.GetSafeHdc(), 0);

		// Center icon in client rectangle
		int cxIcon = GetSystemMetrics(SM_CXICON);
		int cyIcon = GetSystemMetrics(SM_CYICON);
		CRect rect;
		GetClientRect(&rect);
		int x = (rect.Width() - cxIcon + 1) / 2;
		int y = (rect.Height() - cyIcon + 1) / 2;

		// Draw the icon
		dc.DrawIcon(x, y, m_hIcon);
	}
	else
	{
		CDialog::OnPaint();
	}
}

// The system calls this to obtain the cursor to display while the user drags
//  the minimized window.
HCURSOR CJisuanqiDlg::OnQueryDragIcon()
{
	return (HCURSOR) m_hIcon;
}
//////////////////////////////////////////////////////////////////////////
//////////////////////////////////////////////////////////////////////////
//数字进栈的函数

status PushNum(NumStack &numstack,double num)
{
    if(numstack.top<N)
    {
         numstack.top++;
         numstack.array[numstack.top-1]=num;
         return OK;
    }
    else return ERROR;
}

//数字出栈的函数

status PopNum(NumStack &numstack,double &num)
{
    if(numstack.top>0)
    {
        num=numstack.array[numstack.top-1];
		numstack.array[numstack.top-1]=-111111.111111;
        numstack.top--;
        return OK;
    }
    else return ERROR;
}

status GetTopNum(NumStack numstack,double &num)
{
	if(numstack.top>0)
	{
		num=numstack.array[numstack.top-1];
		return OK;
	}
	else return ERROR;
}

//操作符进栈的函数

status PushOp(OpStack &opstack,char op)
{
    if(opstack.top<N)
    {
        opstack.top++;
        opstack.array[opstack.top-1]=op;/**/
        return OK;
    }
    else return ERROR;
}

//操作符出栈的函数

status PopOp(OpStack &opstack,char &op)
{
    if(opstack.top>0)
    { 
		op=opstack.array[opstack.top-1];
		opstack.array[opstack.top-1]=' ';    //清除当前内容
        
        opstack.top--;
        return OK;
    }
    else return ERROR;
}

status GetTopOp(OpStack opstack,char &op)
{
    if(opstack.top>0)
    { 
        op=opstack.array[opstack.top-1];       
        return OK;
    }
    else return ERROR;
}



//运算函数  c 为操作符

double Operation(double a,double b,char c)
{
    double result;
    switch(c)
	{
        case '+':result=a+b;break;
        case '-':result=a-b;break;
        case '*':result=a*b;break;
        case '/':result=a/b;break;
		case '^':result=pow(a,b);break;
		default:break;
    }
    return result;
}

//优先级判断

char Precede(char y,char x)
{
	char priority='<';     //以“＃”表示字符串结束
	switch(x)
	{
	case '+':
	case '-':if(y=='(' || y=='#')priority='>';break;
	case '*':
	case '/':if(y=='(' || y=='#'|| y=='+' || y=='-') priority='>';break;
	case '^':if(y=='(' || y=='#'|| y=='+' || y=='-'||y=='*'||y=='/') priority='>';break;
	case '(':priority='>';break;
	case ')':if(y=='(')priority='=';break;
	case '#':if(y=='#')priority='=';break;
	default:priority='E';
	}	
	return priority;
}


//录入表达式并转换！分别入栈 判断优先级并出栈计算，将结果入栈！
static double NUMBER=0,a,b;           //NUMBER 是取出的一整个实数，a是当前从字符串得到的数
static bool dot=FALSE;                //小数点标记
static long length=1;                 //记录小数位数
static int flag=0;                    //控制是否push一个新的实数，避免重复push
static int next;
static short ERROR1=0;                //判断除数是否为0
void EvaluateExpression(char c,NumStack &OPND,OpStack &OPTR)//::CJisuanqiDlg()
{
	//取得字符串内容并将其进栈
    char fuhao;	
	if(isdigit(c)||c=='.')            //判断是否为数字
	{
		flag=1;
		if(c=='.')
		{
			dot=TRUE;
		}
		else
		{
			a=c-48;
			if(dot)                   //如果已经使实数
			{
				length*=10;
				NUMBER+=a/length;
			}
			else                      //还不是实数
			{
				NUMBER=NUMBER*10+a;
			}
		}
		
	}                                 //当前的NUMBER已经完成一个实数的录入
	else                              //如果是操作符
	{ 
		if(flag)
		{
			PushNum(OPND,NUMBER);dot=FALSE;NUMBER=0;length=1;flag=0;  //push一个实数，还原初始值
		}
		switch(Precede(OPTR.array[OPTR.top-1],c))
		{
		case '<':PopOp(OPTR,fuhao);
			PopNum(OPND,b);
			if(b==0&&fuhao=='/') {ERROR1=1;return;}
			PopNum(OPND,a);	
			PushNum(OPND,Operation(a,b,fuhao));	
			next--;			
			break;
		case '>':PushOp(OPTR,c);GetTopOp(OPTR,c);break;
		case '=':PopOp(OPTR,fuhao);break;
		}
	}
}

static int speed;                      //设置执行速度！！
void CJisuanqiDlg::OnButton1() 
{
	UpdateData(TRUE);
	NumStack OPND;                     //运算数
	OpStack  OPTR;                     //运算符
	double value;
	char *optr;
	int lenth=m_TXT.GetLength();       //输入的字符串的长度！
	InitNumStack(OPND);
	InitOpStack(OPTR);
	PushOp(OPTR,'#');                  //栈顶用‘＃’表示结束
	for(next=0;next<=lenth;next++)
	{
		if(ERROR1==1) 
		{
			MessageBox("输入的表达式中或计算过程中，除数为0");
			break;
		}
		char c;
		if(next==lenth)
		{
			c='#';                     //以“＃”表示结尾
		}
		else
		{
			c=m_TXT.GetAt(next);
		}	

		EvaluateExpression(c,OPND,OPTR);
		m_S3.Format("%d  C='%c'",next,c);
		Sleep(speed);
		m_S4.Format("%f\t%f\t%f\t%f\t%f\t%f\t%f\t%f\t",OPND.array[0],OPND.array[1],OPND.array[2],
				OPND.array[3],OPND.array[4],OPND.array[5],OPND.array[6],OPND.array[7]);
		optr=OPTR.array;
		m_S5.Format("%s",optr);
		UpdateData(FALSE);

	}
	PopNum(OPND,value);
	m_S2.Format("%f",value);            //输出表达式的值
	m_S4.Format("%f\t%f\t%f\t%f\t%f\t%f\t%f\t%f\t",OPND.array[0],OPND.array[1],OPND.array[2],
				OPND.array[3],OPND.array[4],OPND.array[5],OPND.array[6],OPND.array[7]);
	optr=OPTR.array;
	m_S5.Format("%s",optr);
	UpdateData(FALSE);
}

void CJisuanqiDlg::OnButton2() 
{
	MessageBox("于2005年6月3日课程设计!版权所有：03级计科2班杨钦洪!");
	
}


//////////////////////////////////////////////////////////////////////////////////////////////
//////////////////////////////////////////////////////////////////////////////////////////////

void CJisuanqiDlg::OnOutofmemorySlider1(NMHDR* pNMHDR, LRESULT* pResult) 
{
	// TODO: Add your control notification handler code here
	
	*pResult = 0;
}


void CJisuanqiDlg::OnHScroll(UINT nSBCode, UINT nPos, CScrollBar* pScrollBar) 
{
	// TODO: Add your message handler code here and/or call default
	CSliderCtrl*slider=(CSliderCtrl*)pScrollBar;
	speed=slider->GetPos();
//	UpdateData(FALSE);        //不能更新，不然表达式里面的内容就被更新了。没有了

	CDialog::OnHScroll(nSBCode, nPos, pScrollBar);
}

void CJisuanqiDlg::OnStatic3() 
{
	// TODO: Add your control notification handler code here
	
}

void CJisuanqiDlg::OnButton3() 
{
 MessageBox("程序已经在表达式的头和尾加上'#'，所以OPTR是以'#'开始和结尾的!");	
}