⭐ 欢迎来到虫虫下载站! | 📦 资源下载 📁 资源专辑 ℹ️ 关于我们
⭐ 虫虫下载站

📄 opticalnetworkdlg.cpp

📁 用vc++做的一个简单的基因算法程序,可以实现简单的基因算法功能
💻 CPP
📖 第 1 页 / 共 2 页
字号:
// OpticalNetworkDlg.cpp : implementation file
//

#include "stdafx.h"
#include "OpticalNetwork.h"
#include "OpticalNetworkDlg.h"
#include "math.h"
#include "stdlib.h"
#ifdef _DEBUG
#define new DEBUG_NEW
#undef THIS_FILE
static char THIS_FILE[] = __FILE__;
#endif
#define  MAX_GROUPSIZE 100       // 最大群体规模
#define  MAX_OBDNUM    10        // 最大OBD数目
double TotalF=0;                 // 总适应度值
int    *GeneSerial[MAX_GROUPSIZE];     // 当前一代个体序列   
int    *NextGeneSerial[MAX_GROUPSIZE]; // 下一代个体序列
double Cost[MAX_GROUPSIZE];      // 总费用
double F[MAX_GROUPSIZE];         // 每代个体适应度值
double Pm[MAX_GROUPSIZE];        // 辅助变量
double *OBD_OLT;                 // OBD_OLT之间路径长度
double *ONU_OBD;                 // ONU_OBD之间路径长度
double temp[MAX_GROUPSIZE][20];
int    nCurGANum    = 0;         // 基因算法当前进行的代数
int    nGACrossNum  = 0;         // 交叉个体数目
int    nGAVariNum   = 0;         // 变异个体数目
int    nOBDLimit[MAX_OBDNUM];    // 每个OBD的最大连接数         
int    nCurOBDLimit[MAX_GROUPSIZE][MAX_OBDNUM];   // 当前一代中每个OBD的连接数
int    nNextOBDLimit[MAX_GROUPSIZE][MAX_OBDNUM];  // 进行交叉、变异等操作后,每个OBD的连接数
int    colornum=0;               // 绘图时采用不同颜色的数目
COLORREF COLOR[16]={0x008080F0,0x0000D080,0x00800080,0x008080E0,  // 用于绘制OLT、ONU、OBD连线的颜色
                    0x0080E000,0x00E08000,0x0000E080,0x003020D0,
					0x0080F080,0x00F08080,0x008080F0,0x00F0F080,
					0x0080F020,0x00208080,0x008020F0,0x00A02080,};
                    

/////////////////////////////////////////////////////////////////////////////
// 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()

/////////////////////////////////////////////////////////////////////////////
// COpticalNetworkDlg dialog

COpticalNetworkDlg::COpticalNetworkDlg(CWnd* pParent /*=NULL*/)
	: CDialog(COpticalNetworkDlg::IDD, pParent)
{
	memset(m_OBDX,0,sizeof(double)*100);
	memset(m_OBDY,0,sizeof(double)*100);
	memset(m_ONUX,0,sizeof(double)*100);
	memset(m_ONUY,0,sizeof(double)*100);
	m_ONUX[0] =98;   m_ONUY[0] =70;
	m_ONUX[1] =16;   m_ONUY[1] =48;
	m_ONUX[2] =50;   m_ONUY[2] =15;
	m_ONUX[3] =94;   m_ONUY[3] =2;
	m_ONUX[4] =8;    m_ONUY[4] =8;
	m_ONUX[5] =88;   m_ONUY[5] =12;
	m_ONUX[6] =80;   m_ONUY[6] =30;
	m_ONUX[7] =18;   m_ONUY[7] =66;
	m_ONUX[8] =86;   m_ONUY[8] =45;
	m_ONUX[9] =22;   m_ONUY[9] =77;
	m_ONUX[10]=62;   m_ONUY[10]=86;
	m_ONUX[11]=24;   m_ONUY[11]=2;
	m_ONUX[12]=66;   m_ONUY[12]=32;
	m_ONUX[13]=87;   m_ONUY[13]=59;
	m_ONUX[14]=33;   m_ONUY[14]=88;
	m_ONUX[15]=44;   m_ONUY[15]=89;
	m_ONUX[16]=97;   m_ONUY[16]=8;
	m_ONUX[17]=18;   m_ONUY[17]=12;
	m_ONUX[18]=42;   m_ONUY[18]=58;
	m_ONUX[19]=73;   m_ONUY[19]=66;
	
	m_OBDX[0] =45;   m_OBDY[0] =55;
	m_OBDX[1] =78;   m_OBDY[1] =78;
	m_OBDX[2] =25;   m_OBDY[2] =25;
	m_OBDX[3] =30;   m_OBDY[3] =50;
	m_OBDX[4] =90;   m_OBDY[4] =70;
	m_OBDX[5] =30;   m_OBDY[5] =40;
	m_OBDX[6] =80;   m_OBDY[6] =10;
	m_OBDX[7] =10;   m_OBDY[7] =70;
	m_OBDX[8] =85;   m_OBDY[8] =40;
	m_OBDX[9] =80;   m_OBDY[9] =20;
	m_CurGANum = 0;
	m_MiniCost = 0.0;
	m_bIsGa = FALSE;
	for(int c=0;c<16;c++)
	    PenONU[c].CreatePen(PS_SOLID,1,COLOR[c]);
	PenOBD.CreatePen(PS_SOLID,2,0x00100000);
	//{{AFX_DATA_INIT(COpticalNetworkDlg)
	m_OLTX = 50.0;
	m_OLTY = 50.0;
	m_nONUNum = 20;
	m_GAVariProb = 0.05;
	m_GACrossProb = 0.6;	
	m_GANum = 100;
	m_nGroupSize = 50;	
	m_nOBDLimit = 4;
	m_nOBDNum = 10;
	m_SleepTime = 500;
	//}}AFX_DATA_INIT
	// Note that LoadIcon does not require a subsequent DestroyIcon in Win32
	m_hIcon = AfxGetApp()->LoadIcon(IDR_MAINFRAME);
}

void COpticalNetworkDlg::DoDataExchange(CDataExchange* pDX)
{
	CDialog::DoDataExchange(pDX);
	//{{AFX_DATA_MAP(COpticalNetworkDlg)
	DDX_Text(pDX, IDC_EDIT_OLTX, m_OLTX);
	DDV_MinMaxDouble(pDX, m_OLTX, 0., 100.);
	DDX_Text(pDX, IDC_EDIT_OLTY, m_OLTY);
	DDV_MinMaxDouble(pDX, m_OLTY, 0., 100.);
	DDX_Text(pDX, IDC_EDIT_ONUNUM, m_nONUNum);
	DDV_MinMaxInt(pDX, m_nONUNum, 1, 100);
	DDX_Text(pDX, IDC_EDIT_VARIPROB, m_GAVariProb);
	DDV_MinMaxDouble(pDX, m_GAVariProb, 0., 1.);
	DDX_Text(pDX, IDC_EDIT_CROSSPROB, m_GACrossProb);
	DDV_MinMaxDouble(pDX, m_GACrossProb, 0., 1.);
	DDX_Text(pDX, IDC_EDIT_GANUM, m_GANum);
	DDX_Text(pDX, IDC_EDIT_GROUPSIZE, m_nGroupSize);
	DDX_Text(pDX, IDC_EDIT_OBDLIMIT, m_nOBDLimit);
	DDX_Text(pDX, IDC_EDIT_OBDNUM, m_nOBDNum);   
	DDX_Text(pDX, IDC_EDIT_SLEEPTIME, m_SleepTime);
	DDV_MinMaxInt(pDX, m_SleepTime, 0, 10000);
	//}}AFX_DATA_MAP
	int i=0;
	int Start=0;
	for(Start=IDC_EDIT_OBDX1;Start<IDC_EDIT_OBDX1+10;Start++)
	{
		DDX_Text(pDX, IDC_EDIT_OBDX1+i, m_OBDX[i]);
	    i++;
	}
	i=0;
	for(Start=IDC_EDIT_OBDY1;Start<IDC_EDIT_OBDY1+10;Start++)
	{
		DDX_Text(pDX, IDC_EDIT_OBDY1+i, m_OBDY[i]);
	    i++;
	}
	i=0;
	for(Start=IDC_EDIT_ONUX1;Start<IDC_EDIT_ONUX1+20;Start++)
	{
		DDX_Text(pDX, IDC_EDIT_ONUX1+i, m_ONUX[i]);
	    i++;
	}
    i=0;
	for(Start=IDC_EDIT_ONUY1;Start<IDC_EDIT_ONUY1+20;Start++)
	{
		DDX_Text(pDX, IDC_EDIT_ONUY1+i, m_ONUY[i]);
	    i++;
	}
}

BEGIN_MESSAGE_MAP(COpticalNetworkDlg, CDialog)
	//{{AFX_MSG_MAP(COpticalNetworkDlg)
	ON_WM_SYSCOMMAND()
	ON_WM_PAINT()
	ON_WM_QUERYDRAGICON()
	ON_BN_CLICKED(IDC_BUTTON_GA, OnButtonGa)
	ON_BN_CLICKED(IDABOUT, OnAbout)
	//}}AFX_MSG_MAP
END_MESSAGE_MAP()

/////////////////////////////////////////////////////////////////////////////
// COpticalNetworkDlg message handlers

BOOL COpticalNetworkDlg::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
	
	// TODO: Add extra initialization here
	CAboutDlg about;
	about.DoModal();
		
	return TRUE;  // return TRUE  unless you set the focus to a control
}

void COpticalNetworkDlg::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 COpticalNetworkDlg::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
	{   
		if(!m_bIsGa)
		{
		   int NetLeft,NetBottom;
		   int x_coordinate=0,y_coordinate=0;
	       char txt[4];
	       CString info;
	       CPen Pen;
	       CPen* OldPen;	 
	       CDC* pDC=GetDC();
		   CRect RectClient,Workarea;
           GetClientRect(RectClient);
           Workarea.left=RectClient.left+RectClient.right/3-15;
           Workarea.right=RectClient.right;
           Workarea.top=RectClient.top;
           Workarea.bottom=RectClient.bottom;
           pDC->Rectangle(Workarea);
           pDC->SetBkColor(0x00FFFFFF);
	       NetLeft=Workarea.left+25;
	       NetBottom=Workarea.bottom-20;
	       pDC->MoveTo(NetLeft,NetBottom);
           pDC->LineTo(NetLeft+500,NetBottom);
	       pDC->MoveTo(NetLeft,NetBottom);
	       pDC->LineTo(NetLeft,NetBottom-500);	 
	       pDC->TextOut(NetLeft+500,NetBottom-12,"X");
	       pDC->TextOut(NetLeft+5,NetBottom-505,"Y");
	       pDC->SetTextColor(0x000000FF);
	       info.Format("已进化代数 %d",0);//+1);//wsprintf(txt,"%d",m_CurGANum+1);
	       pDC->TextOut(NetLeft+100,NetBottom-520,info);
	       info="最小费用 ";//_MiniCost);//wsprintf(txt,"%4.6f",m_MiniCost);
	       pDC->TextOut(NetLeft+250,NetBottom-520,info);
	 
	       Pen.CreatePen(PS_SOLID,2,0x00100000);
	       OldPen=pDC->SelectObject(&PenOBD);
	       for(int b1=0;b1<m_nOBDNum;b1++)
		   {   
		       pDC->MoveTo(NetLeft+m_OBDX[b1]*5,NetBottom-m_OBDY[b1]*5);
		       pDC->LineTo(NetLeft+m_OLTX*5,NetBottom-m_OLTY*5);
		   }
	       Pen.DeleteObject();
	       pDC->SelectObject(OldPen);
	       pDC->SetTextColor(GetSysColor(COLOR_WINDOWTEXT));
	       for(x_coordinate=0;x_coordinate<=10;x_coordinate++)
		   {
	           char xn[4];
	 	       wsprintf(xn,"%d",x_coordinate*10);
		       pDC->TextOut(NetLeft+x_coordinate*50-8,NetBottom+2,xn);
		   }
	       for(y_coordinate=1;y_coordinate<=10;y_coordinate++)
		   {
	           char yn[4];
		       wsprintf(yn,"%d",y_coordinate*10);
		       if(y_coordinate==10)
		       pDC->TextOut(NetLeft-24,NetBottom-y_coordinate*50,yn);
		       else
		       pDC->TextOut(NetLeft-22,NetBottom-y_coordinate*50,yn);
		   }	
	       pDC->SetTextColor(0x000000FF);
	       pDC->TextOut(NetLeft+m_OLTX*5-7,NetBottom-m_OLTY*5-7,"★");
	       pDC->SetTextColor(0x00FF0000);
	       for(int a1=0;a1<m_nOBDNum;a1++)
		   {
		       wsprintf(txt,"%d",a1+1);
	           pDC->TextOut(NetLeft+m_OBDX[a1]*5-3,NetBottom-m_OBDY[a1]*5-9,txt);
		   }
	       pDC->SetTextColor(0x0000FF00);
	       for(int a2=0;a2<m_nONUNum;a2++)
		   {
               wsprintf(txt,"%d",a2+1);
               pDC->TextOut(NetLeft+m_ONUX[a2]*5-3,NetBottom-m_ONUY[a2]*5-9,txt);
		   }
	       pDC->SetTextColor(0x00FFFFFF);
	       pDC->TextOut(NetLeft+507,NetBottom-508,"c");
	       pDC->SetTextColor(GetSysColor(COLOR_WINDOWTEXT));
	       pDC->SetBkColor(GetSysColor(COLOR_WINDOW));
		}
	    else
		 DrawNetwork();
	 CDialog::OnPaint();
	}
}

// The system calls this to obtain the cursor to display while the user drags
//  the minimized window.
HCURSOR COpticalNetworkDlg::OnQueryDragIcon()
{
	return (HCURSOR) m_hIcon;
}

⌨️ 快捷键说明

复制代码 Ctrl + C
搜索代码 Ctrl + F
全屏模式 F11
切换主题 Ctrl + Shift + D
显示快捷键 ?
增大字号 Ctrl + =
减小字号 Ctrl + -