表白程序+心形玫瑰+记事本自动表白

/*============================== Roses.cpp -- 一千朵玫瑰 QQ:353813171 VC 6.0环境下编译通过 ===============================*/ #include <windows.h> #include <stdlib.h> #include "resource.h" #include <dshow.h> #include <string.h> #define WS_EX_LAYERED 0x00080000 #define LWA_ALPHA 0x00000002 #define LWA_COLORKEY 0x00000001 #define ID_TIMER 1 #define IMGCOUNT 6 //图片数 #define SAFE_RELEASE(x) { if (x) x->Release(); x = NULL; }//自己定义一个宏 //因为没有导出SetLayeredWindowAttributes API 所以要我们自己到user32.dll里搜索 typedef BOOL (WINAPI *LPFNSETLAYEREDWINDOWATTRIBUTES) (HWND hwnd,COLORREF crKey,BYTE bAlpha,DWORD dwFlags) ; LRESULT CALLBACK WndProc (HWND, UINT, WPARAM, LPARAM) ; int xPosition=600,yPosition=100; int addPosition=0; int PicPosition[10][2]={{600,100},{550,80},{500,60},{450,40},{400,20},{350,0},{300,20},{250,40},{200,60}}; //int addFlag=0; /////播放音乐 IGraphBuilder* pGBuilder; IMediaControl* pMControl; IMediaPosition* pMPos; int stop=0; //设置窗口的透明度 hwnd是被设置的窗口 byAlpha是指示了透明度(0完全透明 255完全不透明) BOOL TransparentWnd(HWND hwnd, BYTE byAlpha) { long lStyle; HMODULE hModule; BOOL bRet; LPFNSETLAYEREDWINDOWATTRIBUTES lpSetLayeredWindowAttributes; if(FALSE == IsWindow(hwnd)) { MessageBox(NULL,TEXT("窗口句柄无效!"),NULL,0); return FALSE; } hModule = (HMODULE)LoadLibrary(TEXT("user32.dll")); if(hModule) { lpSetLayeredWindowAttributes = (LPFNSETLAYEREDWINDOWATTRIBUTES)GetProcAddress(hModule,TEXT("SetLayeredWindowAttributes")); if(!lpSetLayeredWindowAttributes) { MessageBox(hwnd, TEXT("未找到API SetLayeredWindowAttributes的地址!"),NULL, MB_OK); return FALSE ; } } lStyle = GetWindowLong(hwnd, GWL_EXSTYLE) ; if(!lStyle) { MessageBox(hwnd,TEXT("获取窗口扩展样式失败!"),NULL,MB_OK); return FALSE; } lStyle = lStyle | WS_EX_LAYERED; bRet = SetWindowLong(hwnd,GWL_EXSTYLE,lStyle); if(!bRet) { MessageBox(hwnd,TEXT("设置窗口扩展样式失败!"),NULL,MB_OK); return FALSE; } bRet = lpSetLayeredWindowAttributes(hwnd,0,byAlpha,LWA_ALPHA); if(!bRet) { MessageBox(hwnd,TEXT("设置窗口透明度失败!"),NULL,MB_OK); return FALSE; } RedrawWindow(hwnd,NULL,NULL,RDW_ERASE | RDW_INVALIDATE | RDW_FRAME | RDW_ALLCHILDREN); FreeLibrary(hModule); return TRUE; } int WINAPI WinMain (HINSTANCE hInstance, HINSTANCE hPrevInstance, PSTR szCmdLine, int iCmdShow) { CoInitialize(NULL); //初始化COM //创建各个对象 CoCreateInstance(CLSID_FilterGraph,NULL,CLSCTX_INPROC,IID_IGraphBuilder,(void**)&pGBuilder); pGBuilder->QueryInterface(IID_IMediaControl,(void**)&pMControl); pGBuilder->QueryInterface(IID_IMediaPosition,(void**)&pMPos); CHAR strSoundPath[MAX_PATH]; //存储音乐所在路径 WCHAR wstrSoundPath[MAX_PATH]; //存储UNICODE形式的路径 GetCurrentDirectory(MAX_PATH, strSoundPath); strcat(strSoundPath,"\\唯一.mp3"); MultiByteToWideChar(CP_ACP,0,strSoundPath,-1,wstrSoundPath,MAX_PATH); pGBuilder->RenderFile(wstrSoundPath,NULL); //调入文件 pMPos-> put_CurrentPosition(0); //移动到文件头 pMControl->Run(); //播放 /////////////////////////////////////////// static TCHAR szAppName[] = TEXT ("Roses"); HWND hwnd; MSG msg; WNDCLASS wndclass; BOOL bRet; wndclass.style = CS_HREDRAW | CS_VREDRAW; wndclass.lpfnWndProc = WndProc; wndclass.cbClsExtra = 0; wndclass.cbWndExtra = 0; wndclass.hInstance = hInstance; wndclass.hIcon = LoadIcon (hInstance, szAppName); wndclass.hCursor = LoadCursor (NULL, IDC_ARROW); wndclass.hbrBackground = (HBRUSH) GetStockObject (WHITE_BRUSH); wndclass.lpszMenuName = NULL; wndclass.lpszClassName = szAppName; if(!RegisterClass (&wndclass)) { MessageBox (NULL, TEXT ("This program requires Windows NT!"), szAppName, MB_ICONERROR); return 0; } srand ((int)GetTickCount()); //初始化随机数发生器 hwnd = CreateWindow (szAppName, TEXT ("玫瑰花"), WS_DLGFRAME | WS_POPUP, 0, 0, GetSystemMetrics(SM_CXSCREEN), GetSystemMetrics(SM_CYSCREEN), NULL, NULL, hInstance, NULL); TransparentWnd(hwnd, 1); //设置窗口透明度 SetWindowPos(hwnd, HWND_TOPMOST, 0, 0, 0, 0, SWP_NOMOVE | SWP_NOSIZE | SWP_NOREDRAW); //窗口置顶 ShowWindow (hwnd, iCmdShow); UpdateWindow (hwnd); while ( (bRet = GetMessage (&msg, NULL, 0, 0) ) != 0 ) { if (bRet == -1) { MessageBox (hwnd, TEXT ("Such code can lead to fatal application errors"), szAppName, MB_ICONERROR); return -1; } else { TranslateMessage (&msg); DispatchMessage (&msg); } } return msg.wParam; } LRESULT CALLBACK WndProc (HWND hwnd, UINT message, WPARAM wParam, LPARAM lParam) { static HBITMAP hBmpI[IMGCOUNT], hBmpM[IMGCOUNT] ; HINSTANCE hInstance = NULL ; HDC hdc, hdcMemImag, hdcMemMask ; BITMAP bmp ; int i; char buf1[100]="I Love You!"; char buf2[100]=" **** "; char buf3[100]="********"; HDC hdc2=::GetDC(NULL); int OldBkMode=::SetBkMode(hdc2,TRANSPARENT); HFONT myFont; myFont=CreateFont(150,0,0,0,FW_BLACK,FALSE,FALSE,FALSE, GB2312_CHARSET,OUT_DEFAULT_PRECIS,CLIP_DEFAULT_PRECIS, DEFAULT_QUALITY,FIXED_PITCH|FF_MODERN,"楷体"); switch (message) { case WM_CREATE: hInstance = ((LPCREATESTRUCT) lParam)->hInstance; for(i=0; i<IMGCOUNT; i++) { TCHAR szBmpName[16] ; wsprintf(szBmpName, TEXT("BM_I%d"), i); hBmpI[i] = LoadBitmap (hInstance, szBmpName); //载入位图 wsprintf(szBmpName, TEXT("BM_M%d"), i); hBmpM[i] = LoadBitmap (hInstance, szBmpName); //载入相应的屏蔽位图 } SetTimer(hwnd, ID_TIMER, 100, NULL); //设置定时器100毫秒 return 0; //按鼠标左键 或者 键盘 退出程序 /* case WM_KEYDOWN: SendMessage(hwnd, WM_CLOSE, 0, 0); return 0;*/ case WM_TIMER: //最主要的部分 显示透明位图 //SelectObject(hdc2,myFont1); //选入字体1 //TextOut(hdc2,50,50,"",strlen("")); hdc = GetDC(hwnd); i = rand()%IMGCOUNT; // 创建一个与指定设备兼容的内存设备上下文环境（DC） hdcMemImag = CreateCompatibleDC (hdc); DeleteObject(SelectObject (hdcMemImag, hBmpI[i])); GetObject (hBmpI[i], sizeof (BITMAP), &bmp); hdcMemMask = CreateCompatibleDC (hdc); DeleteObject(SelectObject (hdcMemMask, hBmpM[i])); ReleaseDC(hwnd, hdc); //释放设备上下文环境（DC） if ((xPosition<=600)&&(xPosition>=200+addPosition)&&(yPosition>=0+addPosition)&&(yPosition<=100+addPosition)) { ////一 xPosition-=10; yPosition-=10; if (yPosition<0+addPosition) { yPosition=0+addPosition; } } else if ((xPosition<200+addPosition)&&(xPosition>=100+addPosition)&&(yPosition>=0+addPosition)&&(yPosition<100+addPosition)) { ////二 xPosition-=10; yPosition+=10; if (xPosition<100+addPosition) { xPosition=100+addPosition; } } else if ((xPosition<=600)&&(xPosition>=100+addPosition)&&(yPosition>=100+addPosition)&&(yPosition<=930-addPosition)) { ////三 xPosition+=10; yPosition+=10; } else if ((xPosition<=1100-addPosition)&&(xPosition>=600)&&(yPosition>=100+addPosition)&&(yPosition<=930-addPosition)) { ////四 xPosition+=10; yPosition-=10; if (xPosition>1100-addPosition) { xPosition=1100-addPosition; } } else if ((xPosition<=1100-addPosition)&&(xPosition>1000-addPosition)&&(yPosition>=0+addPosition)&&(yPosition<=100+addPosition)) { ////五 xPosition-=10; yPosition-=10; if (yPosition<0+addPosition) { yPosition=0+addPosition; } } else if ((xPosition<=1000-addPosition)&&(xPosition>600)&&(yPosition>=0+addPosition)&&(yPosition<=100+addPosition)) { ////六 xPosition-=10; if (xPosition<=700) { yPosition+=10; } if (yPosition>=100+addPosition) { yPosition=99+addPosition; } if (xPosition<=600) { addPosition+=7