// Copyright 2005 Doi Shigeki
// list0503.cpp COMポートのテスト，ダイアログボックス版
//			入力はタイマでトリガ
//			list309.h、list309.rcを一緒にビルドすること
#include  <Windows.h>
#include "list309.h"

BOOL CALLBACK dlgproc( HWND, UINT, WPARAM, LPARAM );

HANDLE h;							// ダイアログプロシージャでも使うので
									// グローバル変数にする

int WINAPI WinMain( HINSTANCE hi, HINSTANCE, LPSTR, int )
{
	h = CreateFile( "COM4",				// ポート名
					0, 0,				// アクセスモード，非共有
					0,					// セキュリティ属性，使用しない
					OPEN_EXISTING,		// 既存ファイルのオープン
					0, 0 );				// 属性，テンプレート

	if( h == INVALID_HANDLE_VALUE ){
		MessageBox( NULL, "COMポートがオープンできません","err", MB_OK);
		return 0;
	}
	
	DialogBox( hi, "DLG_DATA",			// ダイアログボックスを開く
			   HWND_DESKTOP, (DLGPROC)dlgproc );
										
	CloseHandle( h );					// デバイスのクローズ

	return TRUE;
}

BOOL CALLBACK dlgproc( HWND hwnd, UINT msg, WPARAM wp, LPARAM lp)
{
	static int sw[8] = { 0, 0, 0, 0, 0, 0, 0, 0 };
	int i,n,n2;
	DWORD x;
	
	switch(msg){

	case WM_INITDIALOG:	
		SetTimer( hwnd, 999, 100, NULL);		// タイマの起動
												// 0.1秒毎にタイマメッセージをhWndへ送る
		
		return TRUE;							// 処理を行った場合はTRUEを返す
	
	case WM_COMMAND:
		n = LOWORD( wp );
		if( ID_o0 <= n && n <= ID_o3 ){			// あるチェックボックスが操作された
			n2 = ( n - ID_o0 ) / 10;			// ID値は連続して10づつ増加であること
			sw[ n2 ] = ! sw[ n2 ];				// 値を反転
			SendMessage( GetDlgItem( hwnd, n ), BM_SETCHECK, sw[n2], 0);
												// 表示に反映
			if( n2 == 1 )						// 2ビット目用のスイッチ
				if( sw[ n2 ] )
					EscapeCommFunction( h, CLRDTR );
				else
					EscapeCommFunction( h, SETDTR );
			if( n2 == 2 )						// 1ビット目用のスイッチ
				if( sw[ n2 ] )
					EscapeCommFunction( h, CLRRTS );
				else		
					EscapeCommFunction( h, SETRTS );
					
		}
		return TRUE;
	
	case WM_TIMER:								// このウィンドウに対してタイマは
												// １つしかないのでタイマIDのチェックは省略
		GetCommModemStatus( h, &x );
		if( x & MS_CTS_ON )						// 1ビット目用のテキスト
			SetDlgItemText(hwnd,ID_i2,"0");
		else
			SetDlgItemText(hwnd,ID_i2,"1");
		if( x & MS_DSR_ON )						// 2ビット目用のテキスト
			SetDlgItemText(hwnd,ID_i1,"0");
		else
			SetDlgItemText(hwnd,ID_i1,"1");
	
		return TRUE;

	case WM_CLOSE:

		KillTimer( hwnd, 999);
		EndDialog( hwnd, 0 );
		return TRUE;
	}
	return FALSE;
}