movepic.cpp

DirectX初级编程

//******************************************************
//
//	特效例程——之——位图卷轴
//
//	全部代码由：
//		DirectX工作室  王正盛  编写
//
//		电子邮箱：[e-mail]
//		个人主页：http://dxstudio.yeah.net
//
//	要获得这个程序的最新版本以及更多的特效例程
//	请访问作者的个人主页
//
//	! 要正确编译这个程序，你必须拥有DirectX SDK !
//
//******************************************************

#include <windows.h>
#include <windowsx.h>
#include <stdio.h>
#include <ddraw.h>

#include "ddutil.h"

#define		TITLE		"图象卷轴"	//窗口标题
#define		CLASSNAME	"Scroll"	//窗口类名

HINSTANCE	hInst;		//应用程序实例句柄
HWND		hWndMain;	//主窗口句柄

LPDIRECTDRAW            lpDD;           // DirectDraw对象
LPDIRECTDRAWSURFACE     lpDDSPrimary;   // 主页面
LPDIRECTDRAWSURFACE     lpDDSBack;      // 后台缓冲区
LPDIRECTDRAWSURFACE     lpDDSPic1;      // 离屏页面1
LPDIRECTDRAWSURFACE     lpDDSPic2;      // 离屏页面2
LPDIRECTDRAWPALETTE     lpDDPal;        // 调色板
BOOL                    bActive;        // 应用程序是否活跃?

//函数声明
BOOL InitSurfaces( void );
void UpdateFrame( void );
void MakeRect(RECT *rect, long left, long top, long right, long bottom);

//*******************************************************************
//函数：FreeObject
//功能：释放我们用过的所有DirectDraw对象
//*******************************************************************
void FreeObjects( void )
{
    if( lpDD != NULL )//释放DirectDraw对象
    {
        if( lpDDSPrimary != NULL )//释放主页面
        {
            lpDDSPrimary->Release();
            lpDDSPrimary = NULL;
        }
        if( lpDDSPic1 != NULL )//释放离屏页面1
        {
            lpDDSPic1->Release();
            lpDDSPic1 = NULL;
        }
        if( lpDDSPic2 != NULL )//释放离屏页面2
        {
            lpDDSPic2->Release();
            lpDDSPic2 = NULL;
        }
        if( lpDDPal != NULL )//释放调色板
        {
            lpDDPal->Release();
            lpDDPal = NULL;
        }
        lpDD->Release();
        lpDD = NULL;
    }
} 

//*******************************************************************
//函数：RestoreAll
//功能：页面丢失后，恢复页面内存
//*******************************************************************
HRESULT RestoreAll( void )
{
    HRESULT     ddrval;

	//恢复主页面，这也将恢复换页链中的所有页面
    ddrval = lpDDSPrimary->Restore();

	//恢复离屏页面
    ddrval = lpDDSPic1->Restore();
    ddrval = lpDDSPic2->Restore();

	//重新绘制页面图象
	InitSurfaces();

    return ddrval;
}

//*******************************************************************
//函数：WindowProc
//功能：主窗口的消息处理过程
//*******************************************************************
LRESULT CALLBACK WinProc( HWND hWnd, UINT message, 
                            WPARAM wParam, LPARAM lParam )
{
    switch( message )
    {
    case WM_ACTIVATEAPP://应用程序激活消息
        bActive = wParam;
        break;

    case WM_KEYDOWN://击键消息
        switch( wParam )
        {
        case VK_ESCAPE:
            PostMessage(hWnd, WM_CLOSE, 0, 0);
            break;
        }
        break;

    case WM_DESTROY://销毁窗口消息
        FreeObjects();
        PostQuitMessage(0);
        break;
    }

	//调用缺省的过程处理过程
    return DefWindowProc(hWnd, message, wParam, lParam);
}

//******************************************************************
//函数：InitWindow()
//功能：创建主窗口。
//******************************************************************
BOOL InitWindow( HINSTANCE hInstance, int nCmdShow )
{
    WNDCLASS			wc;		//窗口类结构

	//填充窗口类结构
    wc.style = 0;
    wc.lpfnWndProc = WinProc;
    wc.cbClsExtra = 0;
    wc.cbWndExtra = 0;
    wc.hInstance = hInstance;
    wc.hIcon = LoadIcon( hInstance, IDI_APPLICATION );
    wc.hCursor = LoadCursor( NULL, IDC_ARROW );
    wc.hbrBackground = (HBRUSH__ *)GetStockObject(BLACK_BRUSH);//选择黑色刷做为窗口背景
    wc.lpszMenuName = NULL;
	wc.lpszClassName = CLASSNAME;

	//注册窗口类
    RegisterClass( &wc );
    
	//创建主窗口
    hWndMain= CreateWindowEx(
		0,
		CLASSNAME,	//窗口的类名称，必须与上面的wc.lpszClassName一致
		TITLE,		//窗口的标题名
		WS_POPUP,
		0,
		0,
		GetSystemMetrics( SM_CXSCREEN ),
		GetSystemMetrics( SM_CYSCREEN ),
		NULL,
		NULL,
		hInstance,
		NULL );

    if( !hWndMain )		return FALSE;

	//显示并更新窗口
    ShowWindow( hWndMain, nCmdShow );
    UpdateWindow( hWndMain );

	return TRUE;
}

//******************************************************************
//函数：InitDDraw()
//功能：初始化DirectDraw环境，创建换页链（主页面，一个后台缓冲区）
//		以及创建一个定时器。
//******************************************************************
BOOL InitDDraw(void)
{
    DDSURFACEDESC       ddsd;
    DDSCAPS             ddscaps;
    HRESULT             ddrval;

    //创建DirectDraw对象
	ddrval = DirectDrawCreate( NULL, &lpDD, NULL );
    if( ddrval != DD_OK )
        return FALSE;

    //取得全屏独占模式
    ddrval = lpDD->SetCooperativeLevel( hWndMain, DDSCL_EXCLUSIVE | DDSCL_FULLSCREEN );
    if( ddrval != DD_OK )
        return FALSE;

    //设置显示器显示模式为640x480x8
    ddrval = lpDD->SetDisplayMode( 640, 480, 16);
    if( ddrval != DD_OK )
        return FALSE;

    //填充换页链结构
    ddsd.dwSize = sizeof( ddsd );
    ddsd.dwFlags = DDSD_CAPS | DDSD_BACKBUFFERCOUNT;
    ddsd.ddsCaps.dwCaps = DDSCAPS_PRIMARYSURFACE |
                          DDSCAPS_FLIP |
                          DDSCAPS_COMPLEX;
	//指定后台缓冲区数量为1
    ddsd.dwBackBufferCount = 1;

	//创建换页链，包括了主页面及其后台缓冲区
    ddrval = lpDD->CreateSurface( &ddsd, &lpDDSPrimary, NULL );
    if( ddrval != DD_OK )
        return FALSE;

    //获得指向后台缓冲区的页面指针
	ddscaps.dwCaps = DDSCAPS_BACKBUFFER;
    ddrval = lpDDSPrimary->GetAttachedSurface(&ddscaps, &lpDDSBack);
    if( ddrval != DD_OK )
        return FALSE;

	//创建离屏页面
	ZeroMemory(&ddsd, sizeof(ddsd));
    ddsd.dwSize = sizeof(ddsd);
    ddsd.dwFlags = DDSD_CAPS | DDSD_HEIGHT |DDSD_WIDTH;
    ddsd.ddsCaps.dwCaps = DDSCAPS_OFFSCREENPLAIN;
    ddsd.dwWidth = 640;
    ddsd.dwHeight = 480;

    if (lpDD->CreateSurface(&ddsd, &lpDDSPic1, NULL) != DD_OK)
		return FALSE;
	if (lpDD->CreateSurface(&ddsd, &lpDDSPic2, NULL) != DD_OK)
		return FALSE;

    //从磁盘文件中载入调色板
	lpDDPal = DDLoadPalette(lpDD, "all.bmp");
	//将调色板设置给主页面
    if (lpDDPal)
        lpDDSPrimary->SetPalette( lpDDPal );


	//调用页面初始化函数
	if( !InitSurfaces() )
        return FALSE;

    return TRUE;
}

//******************************************************************
//函数：WinMain()
//功能：应用程序入口
//******************************************************************
int PASCAL WinMain( HINSTANCE hInstance, HINSTANCE hPrevInstance,
                        LPSTR lpCmdLine, int nCmdShow)
{
    MSG         msg;
	hInst=hInstance;

	//初始化主窗口
	if (!InitWindow( hInstance, nCmdShow))
			return FALSE;
	
	//初始化DirectDraw环境
	if (!InitDDraw())
	{
		MessageBox(hWndMain, "初始化DirectDraw过程中出错！", "Error", MB_OK);
		FreeObjects();
		DestroyWindow(hWndMain);
		return FALSE;
	}

	//进入消息循环
	while(1)
	{
		if(PeekMessage(&msg, NULL, 0, 0, PM_NOREMOVE))
		{
			if(!GetMessage(&msg, NULL, 0, 0 )) return msg.wParam;
			TranslateMessage(&msg); 
			DispatchMessage(&msg);
		}
		else if(bActive)
		{
			UpdateFrame();
		}
		else WaitMessage();
	}

    return msg.wParam;
} 

//******************************************************************
//函数：InitSurfaces()
//功能：初始化页面图象
//******************************************************************
BOOL InitSurfaces( void )
{
    HBITMAP hbm;

    //从磁盘文件中将我们所需要的图象载入到一个hbm位图对象中
    hbm = (HBITMAP)LoadImage(hInst, "all.bmp", IMAGE_BITMAP, 0, 0, LR_CREATEDIBSECTION|LR_LOADFROMFILE);
    if (hbm == NULL)
		return FALSE;

	DDCopyBitmap(lpDDSPic1, hbm, 0, 0,   640, 480);
    DDCopyBitmap(lpDDSPic2, hbm, 640, 0, 640, 480);

	DDSetColorKey(lpDDSPic2, CLR_INVALID);

	//释放hbm位图对象
    DeleteObject(hbm);

    return TRUE;
}

//更新屏幕
void UpdateFrame( void )
{
	HRESULT		ddrval;

	//计算刷新率
	static int fps=0, frame=0, nt=0, ot=0;
	frame++;
	nt=timeGetTime(); 
	if (nt > ot+1000)
	{
		ot=nt;
		fps=frame;
		frame=0;
	}

	//计算图象卷轴的坐标数据
	static n=320;
	RECT srect, drect, srect2, drect2;

	n++;
	if (n>1280) n=n-1280;
	if (n>640) 
	{
		MakeRect(&srect, 0, 0, 1280-n, 480);
		MakeRect(&drect, n-640, 0, 640, 480);
		MakeRect(&srect2, n-640, 0, 640, 480);
		MakeRect(&drect2, 0, 0, 1280-n, 480);
	}
	else
	{
		MakeRect(&srect, 640-n, 0, 640, 480);
		MakeRect(&drect, 0, 0, n, 480);
		MakeRect(&srect2, 0, 0, n, 480);
		MakeRect(&drect2, 640-n, 0, 640, 480);
	}

	//清屏后台缓冲区
	DDBLTFX	ddBltFx;
	ddBltFx.dwSize = sizeof(DDBLTFX);
	ddBltFx.dwFillColor = DDColorMatch(lpDDSBack, RGB(0,0,0));
	lpDDSBack->Blt(NULL, NULL, NULL, DDBLT_WAIT | DDBLT_COLORFILL, &ddBltFx);
	
	//将背景图象Blit到后台缓冲区
	lpDDSBack->Blt(&drect2, lpDDSPic1, &srect2, DDBLT_WAIT, NULL);

	//将前景图象透明Blit到后台缓冲区
	lpDDSBack->Blt(&drect, lpDDSPic2, &srect,DDBLT_WAIT|DDBLT_KEYSRC,NULL);

	//打印刷新率fps
	HDC hdc;
	char temp[32];
	lpDDSBack->GetDC(&hdc);
		SetBkMode(hdc, TRANSPARENT);
		SetTextColor(hdc, RGB(0,255,0)); 
		sprintf(temp, "fps=%d", fps);
		TextOut(hdc, 0, 0, temp, strlen(temp));
	lpDDSBack->ReleaseDC(hdc);

    // 换页
    while( 1 )
    {
        ddrval = lpDDSPrimary->Flip( NULL, DDFLIP_WAIT );//调用换页函数
        if( ddrval == DD_OK )//成功则退出while循环
            break;
        else if( ddrval == DDERR_SURFACELOST )//如果页面丢失，则恢复页面，再继续while循环
            RestoreAll();
        else
			break;
	}
}

void MakeRect(RECT *rect, long left, long top, long right, long bottom)
{
	rect->left=left;
	rect->top=top;
	rect->right=right;
	rect->bottom=bottom;
}