// 9812MTrgDlg.cpp : implementation file
//

#include "stdafx.h"
#include "9812MTrg.h"
#include "9812MTrgDlg.h"

#ifdef _DEBUG
#define new DEBUG_NEW
#endif

CRect plotRect;

// CAboutDlg dialog used for App About

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

// Dialog Data
	enum { IDD = IDD_ABOUTBOX };

	protected:
	virtual void DoDataExchange(CDataExchange* pDX);    // DDX/DDV support

// Implementation
protected:
	DECLARE_MESSAGE_MAP()
};

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

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

BEGIN_MESSAGE_MAP(CAboutDlg, CDialog)
END_MESSAGE_MAP()


// C9812MTrgDlg dialog




C9812MTrgDlg::C9812MTrgDlg(I16 hCard, U16 wCardType, CWnd* pParent /*=NULL*/)
	: CDialog(C9812MTrgDlg::IDD, pParent)
{
	m_hIcon = AfxGetApp()->LoadIcon(IDR_MAINFRAME);

	n_PlotWidth = n_PlotHeight = -1;
 	OnBrush = OffBrush = NULL;

	min_val = 0x00;
	max_val = 0xFFFF;

	m_fSampleRate = 500000.0; // 500KHz

	m_hCard = hCard;

	m_wScanChans = 0;
	m_nTimer = -1;
	m_hMem=NULL;

	m_wRange = AD_B_1_V;
	m_dwReadCount = 102400;
	m_wPostCount = 1024;

	m_wCardType = wCardType;

}

void C9812MTrgDlg::DoDataExchange(CDataExchange* pDX)
{
	CDialog::DoDataExchange(pDX);
}

BEGIN_MESSAGE_MAP(C9812MTrgDlg, CDialog)
	ON_WM_SYSCOMMAND()
	ON_WM_PAINT()
	ON_WM_QUERYDRAGICON()
	//}}AFX_MSG_MAP
	ON_WM_DESTROY()
	ON_WM_VSCROLL()
	ON_BN_CLICKED(IDC_BT_START, &C9812MTrgDlg::OnStart)
	ON_WM_TIMER()
	ON_BN_CLICKED(IDC_BT_STOP, &C9812MTrgDlg::OnStop)
END_MESSAGE_MAP()


// C9812MTrgDlg message handlers

BOOL C9812MTrgDlg::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)
	{
		BOOL bNameValid;
		CString strAboutMenu;
		bNameValid = strAboutMenu.LoadString(IDS_ABOUTBOX);
		ASSERT(bNameValid);
		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
	x_divider = 5; y_divider = 4;	

	OnBrush = CreateSolidBrush( RGB(255,0,0) );
	OffBrush = CreateSolidBrush( RGB(125,0,0) );

	RedPen.CreatePen( PS_SOLID, 1, RGB(255,0,0));


	if(	n_PlotWidth == -1 && n_PlotHeight == -1 )
	{
		((CWnd*)GetDlgItem(IDC_STATIC_DRAW))->GetWindowRect(&plotRect);
		ScreenToClient(&plotRect);

		n_PlotWidth = min( plotRect.Width(), 512);
		n_PlotHeight = plotRect.Height() - 10;
	}
	
	// set the default SampleRate
	SetDlgItemInt( IDC_EDIT_SAMPLE_RATE, (UINT)(m_fSampleRate/1000) );
	SetDlgItemInt( IDC_EDIT_BUF_SIZE, (UINT)(m_dwReadCount) );
	SetDlgItemInt( IDC_EDIT_TRACE_CNT, (UINT)(m_wPostCount) );
	((CButton*)GetDlgItem( IDC_RADIO_CH0 ))->SetCheck( TRUE );

	max_range = 1.0;
	min_range = -1.0;

	return TRUE;  // return TRUE  unless you set the focus to a control
}

void C9812MTrgDlg::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 C9812MTrgDlg::OnPaint()
{
	if (IsIconic())
	{
		CPaintDC dc(this); // device context for painting

		SendMessage(WM_ICONERASEBKGND, reinterpret_cast<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
	{
		redraw_display_area();
		CDialog::OnPaint();
	}
}

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


void C9812MTrgDlg::redraw_display_area(void)
{
	CPen *oldPen;

	int oldMode;
	COLORREF oldColor;

	CString y_lable;

	CPen minor_tick( PS_SOLID,1,RGB(132,130,132) );
//		CPen y_grid( PS_SOLID,1,RGB(206,203,132) );

	int i, x_intv, y_intv;
//		long total_sec;

	CClientDC dc_plot(this);

	// draw the base-line for x-y axises
	oldPen = (CPen *)dc_plot.SelectStockObject(BLACK_PEN);

	// redraw the background
	dc_plot.FillSolidRect( plotRect, RGB(0,0,0) );

	// Re-Draw the AREA for Y-Lable
	{
		CBrush DIALOG_BRUSH;
		CRect redraw_area, full_client;

		GetClientRect(&full_client);
		ScreenToClient(&full_client);

		redraw_area.left = full_client.left;
		redraw_area.top = plotRect.top - 5;
		redraw_area.right = plotRect.left - 3;
		redraw_area.bottom = plotRect.bottom + 10;

		DIALOG_BRUSH.CreateSysColorBrush( COLOR_3DFACE );

		dc_plot.FillRect( redraw_area, &DIALOG_BRUSH );

		DIALOG_BRUSH.DeleteObject();
	}

	dc_plot.MoveTo( plotRect.left - 3, plotRect.top );
	dc_plot.LineTo( plotRect.left - 3, plotRect.bottom );

	// calculate the interval for tick/grid
	y_intv = (plotRect.Height() - 10) /y_divider;
	x_intv = plotRect.Width()/x_divider;


	// set the color for tick
	oldColor = dc_plot.SetTextColor( RGB(0,0,0) );
	oldMode = dc_plot.SetBkMode( TRANSPARENT );

	for( i=0; i<= y_divider; i++ )
	{
		CString tick_str;
		CRect tmp_rect, tick_rect;

		// draw the tick for y-axis
		dc_plot.MoveTo( plotRect.left -12, plotRect.bottom -5 - (i*y_intv) );
		dc_plot.LineTo( plotRect.left -3, plotRect.bottom -5 - (i*y_intv) );

		tick_str.Format( _T("%.1f"), ( ((max_range-min_range)/y_divider) * i)+min_range );

		// calculate the rectangle for text
		dc_plot.DrawText(  tick_str, &tmp_rect, DT_CALCRECT|DT_SINGLELINE );
		tick_rect.right = plotRect.left -14;
		tick_rect.left = tick_rect.right - tmp_rect.Width();
		tick_rect.top = plotRect.bottom -5 - (i*y_intv) - tmp_rect.Height()/2;
		tick_rect.bottom = tick_rect.top + tmp_rect.Height();

		// draw the text 
		dc_plot.DrawText( tick_str, &tick_rect, DT_SINGLELINE|DT_RIGHT );

	}

	// draw the minor_tick for Y axises
	dc_plot.SelectObject(&minor_tick);
	for( i=0; i< y_divider; i++ )
	{
		dc_plot.MoveTo( plotRect.left -9, plotRect.bottom -5 - (i*y_intv) - y_intv/2 );
		dc_plot.LineTo( plotRect.left -4, plotRect.bottom -5 - (i*y_intv) - y_intv/2 );
	}

	dc_plot.SetTextColor( oldColor );
	dc_plot.SetBkMode( oldMode );
	dc_plot.SelectObject( oldPen );
}

void C9812MTrgDlg::OnDestroy()
{
	CDialog::OnDestroy();

	// TODO: Add your message handler code here
	if( m_nTimer != -1 )
	{
		KillTimer( m_nTimer );
		m_nTimer = -1;
	}

	if (m_hMem != NULL)
	{
		GlobalUnfix(m_hMem);
		GlobalUnlock(m_hMem);
		GlobalFree(m_hMem);

		m_hMem = NULL;
	}

	if( OnBrush != NULL )
		::DeleteObject( OnBrush );

	if( OffBrush != NULL )
		::DeleteObject( OffBrush );

	RedPen.DeleteObject();

}

void C9812MTrgDlg::OnVScroll(UINT nSBCode, UINT nPos, CScrollBar* pScrollBar)
{
	// TODO: Add your message handler code here and/or call default
    switch ( nSBCode ) 
	{
       case SB_LINEUP :
          m_fSampleRate += 100000.0;
          if (m_fSampleRate > 5*1000000.0 ) m_fSampleRate = 5*1000000.0;
              break;
       case SB_LINEDOWN:
          m_fSampleRate -= 100000.0;
          if (m_fSampleRate < 5000.0 ) m_fSampleRate = 5000.0;
              break;
    }

	SetDlgItemInt( IDC_EDIT_SAMPLE_RATE, (UINT)(m_fSampleRate/1000) );

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


void C9812MTrgDlg::OnStop()
{
	// TODO: Add your control notification handler code here
	U32 count;

	AI_AsyncClear(m_hCard, &count);

	if( m_nTimer != -1 )
	{
		KillTimer( m_nTimer );
		m_nTimer = -1;
	}

	GetDlgItem( IDC_BT_START )->EnableWindow(TRUE);

}

void C9812MTrgDlg::OnStart()
{
	// TODO: Add your control notification handler code here
	DWORD  mem_size;
	CString strTemp;
	I16 err;

    GetDlgItem( IDC_BT_START )->EnableWindow(FALSE);

	m_dwReadCount = GetDlgItemInt(IDC_EDIT_BUF_SIZE);

	m_wPostCount = GetDlgItemInt(IDC_EDIT_TRACE_CNT);
	
	if (m_hMem != NULL)
	{
		GlobalUnfix(m_hMem);
		GlobalUnlock(m_hMem);
		GlobalFree(m_hMem);

		m_hMem = NULL;
	}
	
	// allocate a memory for user DMA buffer
	mem_size = m_dwReadCount * sizeof(I16);
	m_hMem = GlobalAlloc(GMEM_ZEROINIT, mem_size);
	m_pAIBuf = (U16*) GlobalLock(m_hMem);
	if (m_pAIBuf == NULL )
	{
		AfxMessageBox( TEXT("Memory allocation failed"), MB_OK);
		return;
	}
	
	GlobalFix(m_hMem);

	err = AI_9812_Config(m_hCard, P9812_TRGMOD_MIDL, P9812_TRGSRC_EXT_DIG, P9812_TRGSLP_POS, P9812_AD2_GT_PCI|P9812_CLKSRC_INT, 0, m_wPostCount);
	if (err!=0)
	{
		strTemp.Format( TEXT("AI_9812_Config error=%d"), err);
		AfxMessageBox( strTemp );
	}
	
	err=AI_AsyncDblBufferMode(m_hCard, 1); // single-buffer mode
	if (err!=0)
	{
		strTemp.Format( TEXT("AI_DblBufferMode error=%d"), err);
		AfxMessageBox( strTemp );
	}

	err=AI_ContReadChannel (m_hCard, 0, m_wRange, (U16*)m_pAIBuf, m_dwReadCount, (F64)m_fSampleRate, ASYNCH_OP);
	if (err!=0)
	{
		strTemp.Format( TEXT("AI_ContReadChannel error=%d"), err);
		AfxMessageBox( strTemp );
	}

	m_nTimer = SetTimer( 1, 10, NULL );

}

int C9812MTrgDlg::display_buffer_data(U16* pBuf, U32 dwDataSize)
{
	CClientDC dc_plot(this);
	int nDraw_Origin_Y; 
	int cur_channel;

	int newY = -1;
	int newX = -1;
	U32 dwReadCount = (m_dwReadCount/2); // for double-buffer operation
	U32 index;
	I16 ai_data;
		
	// redraw the background
	dc_plot.FillSolidRect( plotRect, RGB(0,0,0) );

	dc_plot.SelectObject(&RedPen);
	nDraw_Origin_Y = ( plotRect.bottom - 5 ) - n_PlotHeight/2;

	for( index=0; index<dwDataSize; index++ )
	{                    

		if( m_wCardType == PCI_9812 )
		{
			cur_channel = index%(m_wScanChans+1);
			ai_data = (I16)(pBuf[index]) >> 4;
			newY = (int)( nDraw_Origin_Y - ((n_PlotHeight * ai_data) >> 12 ) ); // (n_PlotHeight * ai_data / 4096 ) ); // ( (n_PlotHeight/2) * ai_data/2048 ) );
		}
		else // PCI_9810
		{
			cur_channel = index%(m_wScanChans+1);
			ai_data = (I16)(pBuf[index]) >> 6;
			newY = (int)( nDraw_Origin_Y - ((n_PlotHeight * ai_data) >> 10 ) ); // (n_PlotHeight * ai_data / 1024 ) ); // ( (n_PlotHeight/2) * ai_data/512 ) );
		}

		newX = (int)( index*n_PlotWidth/dwReadCount + plotRect.left );

		if (  index == 0 ) 
		{
			dc_plot.MoveTo( newX, newY );
		}
		else
		{
			dc_plot.MoveTo( m_oldX, m_oldY );
			dc_plot.LineTo( newX, newY );
		}

		m_oldX = newX; 
		m_oldY = newY;
	}

	return 0;
}


void C9812MTrgDlg::OnTimer(UINT_PTR nIDEvent)
{
	// TODO: Add your message handler code here and/or call default
	BOOLEAN HalfReady;
	BOOLEAN fstop;
	U32 count;

	AI_AsyncDblBufferHalfReady(m_hCard, &HalfReady, &fstop);

	if(  fstop == FALSE )
	{
		if( HalfReady == TRUE ) // half-buffer is ready
		{
			AI_AsyncDblBufferTransfer(m_hCard, m_pAIBuf);
			display_buffer_data( m_pAIBuf, m_dwReadCount/2 );
		}
	}
	else // AI operation stops
	{
		AI_AsyncDblBufferHalfReady(m_hCard, &HalfReady, &fstop);  //Get the index of working buffer of Double Buffer
		AI_AsyncClear(m_hCard, &count);

		if( (count > 0) && (count <  (m_dwReadCount/2))  )
		{
			AI_AsyncDblBufferTransfer(m_hCard, m_pAIBuf);
			display_buffer_data( m_pAIBuf, count );
		}

		if( m_nTimer != -1 )
		{
			KillTimer( m_nTimer );
			m_nTimer = -1;
		}
		
		GetDlgItem( IDC_BT_START )->EnableWindow(TRUE);

	}

	CDialog::OnTimer(nIDEvent);
}