一个费诺编码器,输入N个总和为1的小数,就可以得到N个费诺码

// 费诺编码Dlg.cpp : implementation file
//

#include "stdafx.h"
#include "费诺编码.h"
#include "费诺编码Dlg.h"
#include <iostream> 
#include <math.h> 
#include <stack>
#include <queue>

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

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

/////////////////////////////////////////////////////////////////////////////
// CMyDlg dialog

CMyDlg::CMyDlg(CWnd* pParent /*=NULL*/)
	: CDialog(CMyDlg::IDD, pParent)
{
	//{{AFX_DATA_INIT(CMyDlg)
	m_nsize = 0;
	//}}AFX_DATA_INIT
	// Note that LoadIcon does not require a subsequent DestroyIcon in Win32
	m_hIcon = AfxGetApp()->LoadIcon(IDR_MAINFRAME);
}

void CMyDlg::DoDataExchange(CDataExchange* pDX)
{
	CDialog::DoDataExchange(pDX);
	//{{AFX_DATA_MAP(CMyDlg)
	DDX_Control(pDX, IDC_EDIT2, m_edit2);
	DDX_Control(pDX, IDC_LIST1, m_ListCtrl);
	DDX_Text(pDX, IDC_EDIT1, m_nsize);
	DDV_MinMaxInt(pDX, m_nsize, 0, 100);
	//}}AFX_DATA_MAP
}

BEGIN_MESSAGE_MAP(CMyDlg, CDialog)
	//{{AFX_MSG_MAP(CMyDlg)
	ON_WM_SYSCOMMAND()
	ON_WM_PAINT()
	ON_WM_QUERYDRAGICON()
	ON_BN_CLICKED(IDC_BUTTON1, OnButton1)
	//}}AFX_MSG_MAP
END_MESSAGE_MAP()

/////////////////////////////////////////////////////////////////////////////
// CMyDlg message handlers

BOOL CMyDlg::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
	m_ListCtrl.InsertColumn(0,"序号",LVCFMT_LEFT,120);
    m_ListCtrl.InsertColumn(1,"概率",LVCFMT_LEFT,120);
    m_ListCtrl.InsertColumn(2,"码字",LVCFMT_LEFT,120); 
	return TRUE;  // return TRUE  unless you set the focus to a control
}

void CMyDlg::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 CMyDlg::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 CMyDlg::OnQueryDragIcon()
{
	return (HCURSOR) m_hIcon;
}

void CMyDlg::OnOK() 
{
	// TODO: Add extra validation here
	//把排序按钮置灰
	GetDlgItem(IDOK)->EnableWindow(FALSE);

	//从对话框中获得相应数据
	UpdateData(TRUE);
	
	//取得用户输入的排序数据
	CString strElements;
	GetDlgItem(IDC_EDIT2)->GetWindowText(strElements);

	//检查数据是否合法
	if (strElements.IsEmpty() || m_nsize <= 0)
	{
		AfxMessageBox("请输入必要的数据");
		//置排序按钮有效
		GetDlgItem(IDOK)->EnableWindow(TRUE);

		return;
	}
   	//取出各个子串
	CStringArray list;
	GetElements(strElements,m_nsize,list);
	double* dList = new double[m_nsize];
	if (dList == NULL)
	{
		//置排序按钮有效
		GetDlgItem(IDOK)->EnableWindow(TRUE);
		AfxMessageBox("分配内存失败");
		return;
	}
		
	//取得各个数据
	double total=0;
	for (int h=0;h<list.GetSize();h++)
	{
		dList[h] = atof(list.GetAt(h));
		total= total + dList[h];
	}
	
	if (fabs(total-1)>0.0000000001)
    { 
		GetDlgItem(IDOK)->EnableWindow(TRUE);
		AfxMessageBox("概率值输入有误!");
		return;
	}
     //排序
    int min;
	for (int j = 0; j < m_nsize - 1; j++)
	{
		double temp;
		min = j;
		for (int n = j + 1; n < m_nsize; n++)
		{
			if (dList[n] < dList[min])
			{
				min = n;
			}
		}
		temp = dList[min];
		dList[min] = dList[j];
		dList[j] = temp;	
	}

	//开始分段
    CStringArray elist;
	elist.SetSize(m_nsize);

	int* fList=new int[m_nsize];
	for(int o=0;o<m_nsize-1;o++)
	{
		fList[o]=2;
	}
		fList[m_nsize-1]=1;
	int mid;
    int front=0;
	int back=m_nsize-1;
	int ttl=m_nsize;
	while(ttl!=0)
	{   
		mid=0;
        apart(front,back,dList,mid);
		for(int p=front;p<=back;p++)
		{
		  if (p<=mid)  {elist[p] +="0";}
          else         {elist[p] +="1";}
		}
	
        if (mid==front&&(mid+1)==back)
		{
		  fList[front]=0;
		  fList[back]=0;
		  ttl=ttl-2;
		}

		else if (mid==front)
		{
			fList[front]=0;
			ttl--;
		}
		else if((mid+1)==back)
		{
		
			fList[back]=0;
			fList[mid]=1;
			ttl--;
		}
		else 
		{  
			fList[mid]=1;
		}	     

		for (int max=0;max<m_nsize;max++)		
		{if (fList[max]==2)
		{front=max;break;}
		}
	    for (int max2=0;max2<m_nsize;max2++)	
		{if (fList[max2]==1)
		{back=max2;break;}
		}
  	}
	//清空列表框
     m_ListCtrl.DeleteAllItems();

	//设置最后的显示结果
   for(int q=0;q<m_nsize;q++)
   {   CString str1,str2;
       str1.Format("%d",q+1);
	   m_ListCtrl.InsertItem(q,str1);
	   str2.Format("%f",dList[q]);
       m_ListCtrl.SetItemText(q,1,str2);
	   m_ListCtrl.SetItemText(q,2,elist[q]);
   }  
	//释放内存
  	delete[] dList;
	delete[] fList;
	//置排序按钮有效
	GetDlgItem(IDOK)->EnableWindow(TRUE);

}

void CMyDlg::GetElements(CString str,int nSize,CStringArray& list)
{
	//先去掉左右的空格
	str.TrimLeft();
	str.TrimRight();

	//清空列表元素
	list.RemoveAll();
	list.SetSize(nSize);
	//先把数组元素置'0'值
	//如果用户输入的元素数目小于它设定的数组尺寸
	//则剩余的元素默认会被置成0
	for (int i=0;i<nSize;i++)
	{
		list.SetAt(i,'0');
	}

	int nIndex;
	int nTotalNum =0;
	CString strTemp;
	
	while(str.GetLength()>0 && nTotalNum<m_nsize)
	{
		nIndex = str.Find(' ');    //查找空格
		if (nIndex != -1)
		{
			strTemp = str.Left(nIndex);  
			list.SetAt(nTotalNum,strTemp);
			str = str.Right(str.GetLength()-strTemp.GetLength());
			
			//如果左端有空格则删掉
			str.TrimLeft();		

			nTotalNum++;
		}
		else
		{
			list.SetAt(nTotalNum,str);       //最后一个子串
			str.Empty();

			nTotalNum++;
		}
	}	

}



void CMyDlg::apart(int m,int n,const double dList[],int& mid)
{
    double  temp=0,temp1=0,temp2=0,totaltemp=0;
	for(int t=m;t<=n;t++)
	{ 
	  totaltemp=totaltemp+dList[t];
	}
	for(int i=m;i<=n;i++)
	{ temp=temp+dList[i];
	  temp1= fabs(totaltemp-2*temp);
	  temp2= fabs(totaltemp-2*(temp+dList[i+1]));
	  if (temp1<=temp2)
	  {mid=i;
	  break;
	  }
	}
}



void CMyDlg::OnButton1() 
{
	// TODO: Add your control notification handler code here
	m_nsize=0;
	m_edit2.SetWindowText("");
    m_ListCtrl.DeleteAllItems();
}