interuptsetdlg.cpp

模拟了tec2000的所有功能

// InteruptSetDlg.cpp : implementation file
//

#include "stdafx.h"
#include "TEC2000.h"
#include "InteruptSetDlg.h"
#include "CompileDlg.h"

#include "MainFrm.h"

#ifdef _DEBUG
#define new DEBUG_NEW
#undef THIS_FILE
static char THIS_FILE[] = __FILE__;
#endif

/////////////////////////////////////////////////////////////////////////////
// CInteruptSetDlg dialog


CInteruptSetDlg::CInteruptSetDlg(CWnd* pParent /*=NULL*/)
	: CDialog(CInteruptSetDlg::IDD, pParent)
{
	//{{AFX_DATA_INIT(CInteruptSetDlg)
	m_wordInterBase = 210;
	//}}AFX_DATA_INIT
}


void CInteruptSetDlg::DoDataExchange(CDataExchange* pDX)
{
	CDialog::DoDataExchange(pDX);
	//{{AFX_DATA_MAP(CInteruptSetDlg)
	DDX_Text(pDX, IDC_INTERBASE, m_wordInterBase);
	//}}AFX_DATA_MAP
}


BEGIN_MESSAGE_MAP(CInteruptSetDlg, CDialog)
	//{{AFX_MSG_MAP(CInteruptSetDlg)
	//}}AFX_MSG_MAP
END_MESSAGE_MAP()

/////////////////////////////////////////////////////////////////////////////
// CInteruptSetDlg message handlers

BOOL CInteruptSetDlg::OnInitDialog() 
{
	m_hIcon = AfxGetApp()->LoadIcon(IDR_MAINFRAME);
	CDialog::OnInitDialog();
	
	this->SetIcon(m_hIcon,TRUE);
	this->SetIcon(m_hIcon,FALSE);
	
	return TRUE;  // return TRUE unless you set the focus to a control
	              // EXCEPTION: OCX Property Pages should return FALSE
}

void CInteruptSetDlg::OnOK() 
{
	this->UpdateData(TRUE);

	CTEC2000App *pApp;
   	pApp=(CTEC2000App *)AfxGetApp();
    CMainFrame *p;
   	p=(CMainFrame *)pApp->GetMainWnd();
	WORD dear=(WORD)this->m_wordInterBase;
	WORD temp;

	int i1,i2,i3,i4;
    i1=int(dear/1000);
    i2=int((dear-i1*1000)/100);
    i3=int((dear-i1*1000-i2*100)/10);
    i4=dear-i1*1000-i2*100-i3*10;
    temp=i1*4096+i2*256+i3*16+i4; 
	temp*=16;
	p->m_pMCompileDlg->m_wndScriptEdit.interBase=temp;
	
	
	CDialog::OnOK();
}