/*

　  ディスプレイのデバイスコンテキスト

　　　　 1998/10/ 4  宍戸　輝光

*/

#include <windows.h>

int WINAPI WinMain (HINSTANCE hInstance, HINSTANCE hPrevInstance,
                    PSTR szCmdLine, int iCmdShow){

	HDC hdc,hdcMem;
	HBITMAP hBMP;

	LPBITMAPINFO lpDIB;
	LPBYTE lpBMP;

	int i,iWidth,iHeight;
	BYTE bRed,bGreen,bBlue,bGray;

	hdc=CreateDC("DISPLAY",NULL,NULL,NULL);

	iWidth=GetDeviceCaps(hdc,HORZRES); /* 画面の大きさ取得 */
	iHeight=GetDeviceCaps(hdc,VERTRES);

	lpDIB=(LPBITMAPINFO)GlobalAlloc(GPTR,
	   sizeof(BITMAPINFO)); /* ＤＩＢ用メモリ確保 */

	/* DIBSection 用BITMAPINFO構造体設定 */
	lpDIB->bmiHeader.biSize=sizeof(BITMAPINFOHEADER);
	lpDIB->bmiHeader.biWidth=iWidth;
	lpDIB->bmiHeader.biHeight=iHeight;
	lpDIB->bmiHeader.biPlanes=1;
	lpDIB->bmiHeader.biBitCount=24;
	lpDIB->bmiHeader.biCompression=BI_RGB;
	lpDIB->bmiHeader.biSizeImage=0;
	lpDIB->bmiHeader.biXPelsPerMeter=0;
	lpDIB->bmiHeader.biYPelsPerMeter=0;
	lpDIB->bmiHeader.biClrUsed=0;
	lpDIB->bmiHeader.biClrImportant=0;

	/* DIB と画面のDC からDIBSection を作成 */
	hBMP=CreateDIBSection(hdc,lpDIB,DIB_RGB_COLORS,&lpBMP,NULL,0);

	hdcMem=CreateCompatibleDC(hdc); /* メモリDC を作成 */
	SelectObject(hdcMem,hBMP); /* メモリDC にDIBSectionを選択 */

	/* 画面全体をDIBSection のビットマップにコピー */
	BitBlt(hdcMem,0,0,iWidth,iHeight,hdc,0,0,SRCCOPY);

	for (i=0;i<iWidth*iHeight;i++) { /* ビットマップを白黒化 */

		bRed=lpBMP[i*3+2]; // ピクセルのＲＧＢ成分を取得
		bGreen=lpBMP[i*3+1];
		bBlue=lpBMP[i*3];

		bGray=(BYTE)(bRed*0.3+bGreen*0.59+bBlue*0.11); // 明るさを計算

		lpBMP[i*3]=bGray; /* ピクセルを白黒化 */
		lpBMP[i*3+1]=bGray;
		lpBMP[i*3+2]=bGray;

	}

	/* 白黒化したビットマップを画面のデバイスコンテキストに描画 */
	BitBlt(hdc,0,0,iWidth,iHeight,hdcMem,0,0,SRCCOPY);

	DeleteDC(hdcMem);
	DeleteObject(hBMP);

	GlobalFree(lpDIB);

	return 0;

}