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

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

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

int WINAPI WinMain( HINSTANCE hi, HINSTANCE, LPSTR, int )
{
	DWORD r;
	r = DioOpen( &h,				// デバイスのハンドル
				 3,					// Driver No
				 1		);			// Group  No

	if ( r != 0) {
		MessageBox( NULL, "PCCardデバイスがオープンできません","err", MB_OK);
		return 0;
	}
	
	DialogBox( hi, "DLG_DATA",		// ダイアログボックスを開く
			   HWND_DESKTOP, (DLGPROC)dlgproc );
										
	DioClose( 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;
	BYTE 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);
												// 表示に反映
			x = 0;								// 出力データを組み立てる
			for( i = 0; i < 4; i++){
				x = x + ( sw[ i ] << i ) ;
			}
			DioOutByte( h,						// デバイスハンドル　
						0,						// 出力ポート0を指定
						~x	);					// 出力データ				
					
		}
		return TRUE;
	
	case WM_TIMER:						// このウィンドウに対してタイマは
										// １つしかないのでタイマIDのチェックは省略
		DioInpByte( h, 					// デバイスハンドル
					0,					// 入力ポート0を指定
					&x	);				// データ格納用変数へのポインタ

		if( x & 0x8 )
			SetDlgItemText(hwnd,ID_i3,"0");
		else
			SetDlgItemText(hwnd,ID_i3,"1");
		if( x & 0x4 )
			SetDlgItemText(hwnd,ID_i2,"0");
		else
			SetDlgItemText(hwnd,ID_i2,"1");
		if( x & 0x2 )
			SetDlgItemText(hwnd,ID_i1,"0");
		else
			SetDlgItemText(hwnd,ID_i1,"1");
		if( x & 0x1 )
			SetDlgItemText(hwnd,ID_i0,"0");
		else
			SetDlgItemText(hwnd,ID_i0,"1");
		return TRUE;

	case WM_CLOSE:

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