?? bydlg.cpp
字號:
// byDlg.cpp : implementation file
//
#include "stdafx.h"
#include "by.h"
#include "byDlg.h"
#ifdef _DEBUG
#define new DEBUG_NEW
#undef THIS_FILE
static char THIS_FILE[] = __FILE__;
#endif
/////////////////////////////////////////////////////////////////////////////
// CAboutDlg dialog used for App About
char ch =' '; // 存放讀入當前的輸入字符
int lineno;
struct reserve //關鍵字
{
char lexptr[MAXBUF];
int token;
};
struct reserve symtable[MAX];
char * str[]={"program","input","output","begin","end","var","integer","real","for","to","if","then","else","do","while","write","array","proceure" };
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()
/////////////////////////////////////////////////////////////////////////////
// CByDlg dialog
CByDlg::CByDlg(CWnd* pParent /*=NULL*/)
: CDialog(CByDlg::IDD, pParent)
{
//{{AFX_DATA_INIT(CByDlg)
// NOTE: the ClassWizard will add member initialization here
//}}AFX_DATA_INIT
// Note that LoadIcon does not require a subsequent DestroyIcon in Win32
m_hIcon = AfxGetApp()->LoadIcon(IDR_MAINFRAME);
}
void CByDlg::DoDataExchange(CDataExchange* pDX)
{
CDialog::DoDataExchange(pDX);
//{{AFX_DATA_MAP(CByDlg)
DDX_Control(pDX, IDC_STATIC1, m_me);
//}}AFX_DATA_MAP
}
BEGIN_MESSAGE_MAP(CByDlg, CDialog)
//{{AFX_MSG_MAP(CByDlg)
ON_WM_SYSCOMMAND()
ON_WM_PAINT()
ON_WM_QUERYDRAGICON()
ON_BN_CLICKED(IDC_OPEN, OnOpen)
ON_BN_CLICKED(IDC_FENXI, OnFenxi)
ON_BN_CLICKED(IDC_STATIC1, OnStatic1)
ON_BN_CLICKED(IDC_SAVE, OnSave)
//}}AFX_MSG_MAP
END_MESSAGE_MAP()
/////////////////////////////////////////////////////////////////////////////
// CByDlg message handlers
BOOL CByDlg::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_font.CreateFont(12, 0,0,0,FW_NORMAL, 0,0,0,
DEFAULT_CHARSET, OUT_CHARACTER_PRECIS, CLIP_CHARACTER_PRECIS,
DEFAULT_QUALITY, DEFAULT_PITCH | FF_DONTCARE, "Fixedsys");
GetDlgItem(IDC_EDIT1)->SetFont(&m_font);
GetDlgItem(IDC_EDIT2)->SetFont(&m_font);
m_me.SetToolTipText("訪問我的網(wǎng)站: http://www.59hao.com/chx");
return TRUE; // return TRUE unless you set the focus to a control
}
void CByDlg::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 CByDlg::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 CByDlg::OnQueryDragIcon()
{
return (HCURSOR) m_hIcon;
}
void CByDlg::init()
{
for( int j=0; j<18; j++)
{
strcpy(symtable[j].lexptr,str[j]);
symtable[j].token=j+3;
}
}
int CByDlg::search(char *temp)
{
for(int i=0; i<sizeof(symtable)/sizeof(symtable[0]); i++)
{
if(!strcmp(symtable[i].lexptr ,temp))
{
return symtable[i].token;
}
}
return 0;
}
void CByDlg::analyse(FILE *fpin, FILE *fpout)
{
char arr[MAXBUF];
int i=0;
int j=0;
while((ch=fgetc(fpin))!=EOF) //讀入字符判斷，空格、字母、數(shù)字、界符
{
if(ch==' '||ch=='\t')
{
}
else if(ch=='\n') //如果是換行符，則行號加1
{
lineno++;
}
else if(isdigit(ch)) //如果是數(shù)字
{
while(isdigit(ch)) //判斷和讀取數(shù)字
{
arr[j]=ch;
j++;
ch=fgetc(fpin);
}
arr[j]='\0';
j=0;
fseek(fpin,-1L,SEEK_CUR);
fprintf(fpout,"%s\t%d\n",arr,2) ;
}
else if (isalpha(ch)) //如果是字母
{
while(isalpha(ch)||isdigit(ch))
{
arr[j]=ch;
j++;
ch=fgetc(fpin);
}
fseek(fpin,-1L,SEEK_CUR);
arr[j]='\0';
j=0;
if (search(arr)) //如果是關鍵字
{
fprintf(fpout,"%s\t%d\n",arr,search(arr));
}
else
fprintf(fpout,"%s\t%d\n",arr,1); //普通標志符
}
else if(ch==':')
{
ch=fgetc(fpin);
if(ch=='=')
{
fprintf(fpout,"%s\t%d\n",":=",29); //如果是 :=
}
else
{
fprintf(fpout,"%s\t%d\n",":",30); //如果是 :
fseek(fpin,-1L,SEEK_CUR);
}
}
else if (ch=='>')
{
ch=fgetc(fpin);
if(ch=='=') //如果是 >=
{
fprintf(fpout,"%s\t%d\n",">=",32);
}
else
{
fprintf(fpout,"%s\t%d\n",">",31); //如果是 >
fseek(fpin,-1L,SEEK_CUR);
}
}
else if(ch=='<')
{
ch=fgetc(fpin);
if(ch=='>')
{
fprintf(fpout,"%s\t%d\n","<>",35); // 如果是 <>
}
else if(ch=='=')
{
fprintf(fpout,"%s\t%d\n","<=",34); //如果是 <=
}
else
{
fprintf(fpout,"%s\t%d\n","<",33); //如果是 <
fseek(fpin,-1L,SEEK_CUR);
}
}
else if(ch=='/')
{
ch=fgetc(fpin);
if(ch=='*')
{
ch=fgetc(fpin);
s:
while(ch!='*')
{
ch=fgetc(fpin);
}
while(ch=='*')
{
ch=fgetc(fpin);
while(ch!='/')
{
goto s; //如果是注釋 /* */
}
}
}
else if(ch=='/')
{
ch=fgetc(fpin);
while(ch!='\n')
{
ch=fgetc(fpin); //如果是注釋 //
}
}
else
{
fprintf(fpout,"%s\t%d\n","/",24);
fseek(fpin,-1L,SEEK_CUR);
}
}
else if(ch=='+')
{
fprintf(fpout,"%s\t%d\n","+",21);
}
else if(ch=='-')
{
fprintf(fpout,"%s\t%d\n","-",22);
}
else if(ch=='*')
{
fprintf(fpout,"%s\t%d\n","*",23);
}
else if(ch=='(')
{
fprintf(fpout,"%s\t%d\n","(",25);
}
else if(ch==')')
{
fprintf(fpout,"%s\t%d\n",")",26);
}
else if(ch=='[')
{
fprintf(fpout,"%s\t%d\n","[",27);
}
else if(ch==']')
{
fprintf(fpout,"%s\t%d\n","]",28);
}
else if(ch=='.')
{
fprintf(fpout,"%s\t%d\n",".",39);
}
else if(ch==';')
{
fprintf(fpout,"%s\t%d\n",";",36);
}
else if(ch=='=')
{
fprintf(fpout,"%s\t%d\n","=",38);
}
else if(ch==',')
{
fprintf(fpout,"%s\t%d\n",",",40);
}
else fprintf(fpout,"無法識別的字符 %c\n",ch) ;
}
}
void CByDlg::OnOpen()
{
CFileDialog fd(true);
fd.m_ofn.lpstrTitle="請選擇你要打開的文件"; //標題
fd.m_ofn.lpstrInitialDir="d:\\"; //初始目錄
if(fd.DoModal())
{
m_strFileName=fd.GetPathName();
CStdioFile sf;
CString str;
if(sf.Open(m_strFileName.GetBuffer(0),CFile::modeRead))
{
CString strTemp;
while(sf.ReadString(strTemp))
{
str+=strTemp;
str+="\r\n";
}
SetDlgItemText(IDC_EDIT1,str);
sf.Close();
}
}
}
void CByDlg::OnFenxi()
{
if(this->m_strFileName.IsEmpty())
{
MessageBox("請先選擇一個源文件或者保存你編輯的代碼后再進行詞法分析","詞法分析器",MB_ICONEXCLAMATION);
return;
}
FILE* fpin=fopen(m_strFileName.GetBuffer(0),"r");
FILE* fpout=fopen("output.txt","w");
init();
analyse(fpin,fpout);
fclose(fpin);
fclose(fpout);
CStdioFile sf;
CString str;
if(sf.Open("output.txt",CFile::modeRead))
{
CString strTemp;
while(sf.ReadString(strTemp))
{
str+=strTemp;
str+="\r\n";
}
SetDlgItemText(IDC_EDIT2,str);
sf.Close();
}
}
void CByDlg::OnStatic1()
{
::ShellExecute(NULL,"open","http://www.59hao.com/chx",NULL,NULL,SW_SHOWNORMAL);
}
BOOL CByDlg::PreTranslateMessage(MSG* pMsg)
{
if(pMsg -> message == WM_KEYDOWN)
{
if(pMsg -> wParam == VK_ESCAPE)
return TRUE;
}return CDialog::PreTranslateMessage(pMsg);
}
void CByDlg::OnSave()
{
if(this->m_strFileName.IsEmpty())
{
CFileDialog fd(false);
fd.m_ofn.lpstrTitle="請選擇你要打開的文件"; //標題
fd.m_ofn.lpstrInitialDir="d:\\"; //初始目錄
if(fd.DoModal())
{
m_strFileName=fd.GetPathName();
}
}
CFile sf;
if(sf.Open(this->m_strFileName,CFile::modeWrite|CFile::modeCreate))
{
UpdateData();
char buf[200]={0};
GetDlgItem(IDC_EDIT1)->GetWindowText(buf,200);
sf.Write(buf,strlen(buf));
sf.Close();
MessageBox("保存成功","詞法分析器",MB_ICONINFORMATION);
}
}
?? 快捷鍵說明
復制代碼
Ctrl + C
搜索代碼
Ctrl + F
全屏模式
F11
切換主題
Ctrl + Shift + D
顯示快捷鍵
?
增大字號
Ctrl + =
減小字號
Ctrl + -