?  search:
summary | log | graphiclog1 | graphiclog2 | commit | commitdiff | tree | refs | edit | fork
blame | history | raw | HEAD
mshtml: Added get_childNodes implementation.
[wine/multimedia.git] / programs / winemine / main.c
blob5e3ab4a923bbad422dac08c703379ce94ad722da
1 /*
2 * WineMine (main.c)
3 *
4 * Copyright 2000 Joshua Thielen
5 *
6 * This library is free software; you can redistribute it and/or
7 * modify it under the terms of the GNU Lesser General Public
8 * License as published by the Free Software Foundation; either
9 * version 2.1 of the License, or (at your option) any later version.
10 *
11 * This library is distributed in the hope that it will be useful,
12 * but WITHOUT ANY WARRANTY; without even the implied warranty of
13 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
14 * Lesser General Public License for more details.
15 *
16 * You should have received a copy of the GNU Lesser General Public
17 * License along with this library; if not, write to the Free Software
18 * Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301, USA
19 */
20
21 #define WIN32_LEAN_AND_MEAN
22
23 #include <string.h>
24 #include <time.h>
25 #include <windows.h>
26 #include <stdlib.h>
27 #include <shellapi.h>
28 #include "main.h"
29 #include "resource.h"
30
31 #include <wine/debug.h>
32
33 WINE_DEFAULT_DEBUG_CHANNEL(winemine);
34
35 static const DWORD wnd_style = WS_OVERLAPPEDWINDOW & ~WS_THICKFRAME & ~WS_MAXIMIZEBOX;
36 static const char* registry_key = "Software\\Microsoft\\WinMine";
37
38
39 int WINAPI WinMain( HINSTANCE hInst, HINSTANCE hPrevInst, LPSTR cmdline, int cmdshow )
40 {
41 MSG msg;
42 WNDCLASS wc;
43 HWND hWnd;
44 HACCEL haccel;
45 char appname[20];
46
47 LoadString( hInst, IDS_APPNAME, appname, sizeof(appname));
48
49 wc.style = 0;
50 wc.lpfnWndProc = MainProc;
51 wc.cbClsExtra = 0;
52 wc.cbWndExtra = 0;
53 wc.hInstance = hInst;
54 wc.hIcon = LoadIcon( hInst, "WINEMINE" );
55 wc.hCursor = LoadCursor( 0, IDI_APPLICATION );
56 wc.hbrBackground = (HBRUSH) GetStockObject( BLACK_BRUSH );
57 wc.lpszMenuName = "MENU_WINEMINE";
58 wc.lpszClassName = appname;
59
60 if (!RegisterClass(&wc)) ExitProcess(1);
61 hWnd = CreateWindow( appname, appname,
62 wnd_style,
63 CW_USEDEFAULT, CW_USEDEFAULT, CW_USEDEFAULT, CW_USEDEFAULT,
64 0, 0, hInst, NULL );
65
66 if (!hWnd) ExitProcess(1);
67
68 ShowWindow( hWnd, cmdshow );
69 UpdateWindow( hWnd );
70
71 haccel = LoadAccelerators( hInst, MAKEINTRESOURCE(IDA_WINEMINE) );
72 SetTimer( hWnd, ID_TIMER, 1000, NULL );
73
74 while( GetMessage(&msg, 0, 0, 0) ) {
75 if (!TranslateAccelerator( hWnd, haccel, &msg ))
76 TranslateMessage( &msg );
77
78 DispatchMessage( &msg );
79 }
80 return msg.wParam;
81 }
82
83 LRESULT WINAPI MainProc( HWND hWnd, UINT msg, WPARAM wParam, LPARAM lParam)
84 {
85 HDC hdc;
86 PAINTSTRUCT ps;
87 HMENU hMenu;
88 static BOARD board;
89
90 switch( msg ) {
91 case WM_CREATE:
92 board.hInst = ((LPCREATESTRUCT) lParam)->hInstance;
93 board.hWnd = hWnd;
94 InitBoard( &board );
95 CreateBoard( &board );
96 return 0;
97
98 case WM_PAINT:
99 {
100 HDC hMemDC;
101
102 WINE_TRACE("WM_PAINT\n");
103 hdc = BeginPaint( hWnd, &ps );
104 hMemDC = CreateCompatibleDC( hdc );
105
106 DrawBoard( hdc, hMemDC, &ps, &board );
107
108 DeleteDC( hMemDC );
109 EndPaint( hWnd, &ps );
110
111 return 0;
112 }
113
114 case WM_MOVE:
115 WINE_TRACE("WM_MOVE\n");
116 board.pos.x = (short)LOWORD(lParam);
117 board.pos.y = (short)HIWORD(lParam);
118 return 0;
119
120 case WM_DESTROY:
121 SaveBoard( &board );
122 DestroyBoard( &board );
123 PostQuitMessage( 0 );
124 return 0;
125
126 case WM_TIMER:
127 if( board.status == PLAYING ) {
128 board.time++;
129 RedrawWindow( hWnd, &board.timer_rect, 0,
130 RDW_INVALIDATE | RDW_UPDATENOW );
131 }
132 return 0;
133
134 case WM_LBUTTONDOWN:
135 WINE_TRACE("WM_LBUTTONDOWN\n");
136 if( wParam & MK_RBUTTON )
137 msg = WM_MBUTTONDOWN;
138 TestBoard( hWnd, &board, (short)LOWORD(lParam), (short)HIWORD(lParam), msg );
139 SetCapture( hWnd );
140 return 0;
141
142 case WM_LBUTTONUP:
143 WINE_TRACE("WM_LBUTTONUP\n");
144 if( wParam & MK_RBUTTON )
145 msg = WM_MBUTTONUP;
146 TestBoard( hWnd, &board, (short)LOWORD(lParam), (short)HIWORD(lParam), msg );
147 ReleaseCapture();
148 return 0;
149
150 case WM_RBUTTONDOWN:
151 WINE_TRACE("WM_RBUTTONDOWN\n");
152 if( wParam & MK_LBUTTON ) {
153 board.press.x = 0;
154 board.press.y = 0;
155 msg = WM_MBUTTONDOWN;
156 }
157 TestBoard( hWnd, &board, (short)LOWORD(lParam), (short)HIWORD(lParam), msg );
158 return 0;
159
160 case WM_RBUTTONUP:
161 WINE_TRACE("WM_RBUTTONUP\n");
162 if( wParam & MK_LBUTTON )
163 msg = WM_MBUTTONUP;
164 TestBoard( hWnd, &board, (short)LOWORD(lParam), (short)HIWORD(lParam), msg );
165 return 0;
166
167 case WM_MBUTTONDOWN:
168 WINE_TRACE("WM_MBUTTONDOWN\n");
169 TestBoard( hWnd, &board, (short)LOWORD(lParam), (short)HIWORD(lParam), msg );
170 return 0;
171
172 case WM_MBUTTONUP:
173 WINE_TRACE("WM_MBUTTONUP\n");
174 TestBoard( hWnd, &board, (short)LOWORD(lParam), (short)HIWORD(lParam), msg );
175 return 0;
176
177 case WM_MOUSEMOVE:
178 {
179 if( (wParam & MK_LBUTTON) && (wParam & MK_RBUTTON) ) {
180 msg = WM_MBUTTONDOWN;
181 }
182 else if( wParam & MK_LBUTTON ) {
183 msg = WM_LBUTTONDOWN;
184 }
185 else {
186 return 0;
187 }
188
189 TestBoard( hWnd, &board, (short)LOWORD(lParam), (short)HIWORD(lParam), msg );
190
191 return 0;
192 }
193
194 case WM_COMMAND:
195 switch(LOWORD(wParam)) {
196 case IDM_NEW:
197 CreateBoard( &board );
198 return 0;
199
200 case IDM_MARKQ:
201 hMenu = GetMenu( hWnd );
202 board.IsMarkQ = !board.IsMarkQ;
203 if( board.IsMarkQ )
204 CheckMenuItem( hMenu, IDM_MARKQ, MF_CHECKED );
205 else
206 CheckMenuItem( hMenu, IDM_MARKQ, MF_UNCHECKED );
207 return 0;
208
209 case IDM_BEGINNER:
210 SetDifficulty( &board, BEGINNER );
211 CreateBoard( &board );
212 return 0;
213
214 case IDM_ADVANCED:
215 SetDifficulty( &board, ADVANCED );
216 CreateBoard( &board );
217 return 0;
218
219 case IDM_EXPERT:
220 SetDifficulty( &board, EXPERT );
221 CreateBoard( &board );
222 return 0;
223
224 case IDM_CUSTOM:
225 SetDifficulty( &board, CUSTOM );
226 CreateBoard( &board );
227 return 0;
228
229 case IDM_EXIT:
230 SendMessage( hWnd, WM_CLOSE, 0, 0);
231 return 0;
232
233 case IDM_TIMES:
234 DialogBoxParam( board.hInst, "DLG_TIMES", hWnd,
235 TimesDlgProc, (LPARAM) &board);
236 return 0;
237
238 case IDM_ABOUT:
239 {
240 WCHAR appname[256], other[256];
241 LoadStringW( board.hInst, IDS_APPNAME, appname, sizeof(appname)/sizeof(WCHAR) );
242 LoadStringW( board.hInst, IDS_ABOUT, other, sizeof(other)/sizeof(WCHAR) );
243 ShellAboutW( hWnd, appname, other,
244 LoadImageA( board.hInst, "WINEMINE", IMAGE_ICON, 48, 48, LR_SHARED ));
245 return 0;
246 }
247 default:
248 WINE_TRACE("Unknown WM_COMMAND command message received\n");
249 break;
250 }
251 }
252 return( DefWindowProc( hWnd, msg, wParam, lParam ));
253 }
254
255 void InitBoard( BOARD *p_board )
256 {
257 HMENU hMenu;
258
259 p_board->hMinesBMP = LoadBitmap( p_board->hInst, "mines");
260 p_board->hFacesBMP = LoadBitmap( p_board->hInst, "faces");
261 p_board->hLedsBMP = LoadBitmap( p_board->hInst, "leds");
262
263 LoadBoard( p_board );
264
265 hMenu = GetMenu( p_board->hWnd );
266 CheckMenuItem( hMenu, IDM_BEGINNER + (unsigned) p_board->difficulty,
267 MF_CHECKED );
268 if( p_board->IsMarkQ )
269 CheckMenuItem( hMenu, IDM_MARKQ, MF_CHECKED );
270 else
271 CheckMenuItem( hMenu, IDM_MARKQ, MF_UNCHECKED );
272 CheckLevel( p_board );
273 }
274
275 void LoadBoard( BOARD *p_board )
276 {
277 DWORD size;
278 DWORD type;
279 HKEY hkey;
280 char data[16];
281 char key_name[8];
282 unsigned i;
283
284 RegOpenKeyEx( HKEY_CURRENT_USER, registry_key,
285 0, KEY_QUERY_VALUE, &hkey );
286
287 size = sizeof( p_board->pos.x );
288 if( !RegQueryValueEx( hkey, "Xpos", NULL, (LPDWORD) &type,
289 (LPBYTE) &p_board->pos.x, (LPDWORD) &size ) == ERROR_SUCCESS )
290 p_board->pos.x = 0;
291
292 size = sizeof( p_board->pos.y );
293 if( !RegQueryValueEx( hkey, "Ypos", NULL, (LPDWORD) &type,
294 (LPBYTE) &p_board->pos.y, (LPDWORD) &size ) == ERROR_SUCCESS )
295 p_board->pos.y = 0;
296
297 size = sizeof( p_board->rows );
298 if( !RegQueryValueEx( hkey, "Height", NULL, (LPDWORD) &type,
299 (LPBYTE) &p_board->rows, (LPDWORD) &size ) == ERROR_SUCCESS )
300 p_board->rows = BEGINNER_ROWS;
301
302 size = sizeof( p_board->cols );
303 if( !RegQueryValueEx( hkey, "Width", NULL, (LPDWORD) &type,
304 (LPBYTE) &p_board->cols, (LPDWORD) &size ) == ERROR_SUCCESS )
305 p_board->cols = BEGINNER_COLS;
306
307 size = sizeof( p_board->mines );
308 if( !RegQueryValueEx( hkey, "Mines", NULL, (LPDWORD) &type,
309 (LPBYTE) &p_board->mines, (LPDWORD) &size ) == ERROR_SUCCESS )
310 p_board->mines = BEGINNER_MINES;
311
312 size = sizeof( p_board->difficulty );
313 if( !RegQueryValueEx( hkey, "Difficulty", NULL, (LPDWORD) &type,
314 (LPBYTE) &p_board->difficulty, (LPDWORD) &size ) == ERROR_SUCCESS )
315 p_board->difficulty = BEGINNER;
316
317 size = sizeof( p_board->IsMarkQ );
318 if( !RegQueryValueEx( hkey, "Mark", NULL, (LPDWORD) &type,
319 (LPBYTE) &p_board->IsMarkQ, (LPDWORD) &size ) == ERROR_SUCCESS )
320 p_board->IsMarkQ = TRUE;
321
322 for( i = 0; i < 3; i++ ) {
323 wsprintf( key_name, "Name%d", i+1 );
324 size = sizeof( data );
325 if( RegQueryValueEx( hkey, key_name, NULL, (LPDWORD) &type,
326 (LPBYTE) data,
327 (LPDWORD) &size ) == ERROR_SUCCESS )
328 lstrcpynA( p_board->best_name[i], data, sizeof(p_board->best_name[i]) );
329 else
330 LoadString( p_board->hInst, IDS_NOBODY, p_board->best_name[i], 16 );
331 }
332
333 for( i = 0; i < 3; i++ ) {
334 wsprintf( key_name, "Time%d", i+1 );
335 size = sizeof( p_board->best_time[i] );
336 if( !RegQueryValueEx( hkey, key_name, NULL, (LPDWORD) &type,
337 (LPBYTE) &p_board->best_time[i],
338 (LPDWORD) &size ) == ERROR_SUCCESS )
339 p_board->best_time[i] = 999;
340 }
341 RegCloseKey( hkey );
342 }
343
344 void SaveBoard( BOARD *p_board )
345 {
346 HKEY hkey;
347 unsigned i;
348 char data[16];
349 char key_name[8];
350
351 if( RegCreateKeyEx( HKEY_CURRENT_USER, registry_key,
352 0, NULL,
353 REG_OPTION_NON_VOLATILE, KEY_WRITE, NULL,
354 &hkey, NULL ) != ERROR_SUCCESS)
355 return;
356
357 RegSetValueEx( hkey, "Xpos", 0, REG_DWORD, (LPBYTE) &p_board->pos.x, sizeof(p_board->pos.x) );
358 RegSetValueEx( hkey, "Ypos", 0, REG_DWORD, (LPBYTE) &p_board->pos.y, sizeof(p_board->pos.y) );
359 RegSetValueEx( hkey, "Difficulty", 0, REG_DWORD, (LPBYTE) &p_board->difficulty, sizeof(p_board->difficulty) );
360 RegSetValueEx( hkey, "Height", 0, REG_DWORD, (LPBYTE) &p_board->rows, sizeof(p_board->rows) );
361 RegSetValueEx( hkey, "Width", 0, REG_DWORD, (LPBYTE) &p_board->cols, sizeof(p_board->cols) );
362 RegSetValueEx( hkey, "Mines", 0, REG_DWORD, (LPBYTE) &p_board->mines, sizeof(p_board->mines) );
363 RegSetValueEx( hkey, "Mark", 0, REG_DWORD, (LPBYTE) &p_board->IsMarkQ, sizeof(p_board->IsMarkQ) );
364
365 for( i = 0; i < 3; i++ ) {
366 wsprintf( key_name, "Name%u", i+1 );
367 lstrcpyn( data, p_board->best_name[i], sizeof( data ) );
368 RegSetValueEx( hkey, key_name, 0, REG_SZ, (LPBYTE) data, strlen(data)+1 );
369 }
370
371 for( i = 0; i < 3; i++ ) {
372 wsprintf( key_name, "Time%u", i+1 );
373 RegSetValueEx( hkey, key_name, 0, REG_DWORD, (LPBYTE) &p_board->best_time[i], sizeof(p_board->best_time[i]) );
374 }
375 RegCloseKey( hkey );
376 }
377
378 void DestroyBoard( BOARD *p_board )
379 {
380 DeleteObject( p_board->hFacesBMP );
381 DeleteObject( p_board->hLedsBMP );
382 DeleteObject( p_board->hMinesBMP );
383 }
384
385 void SetDifficulty( BOARD *p_board, DIFFICULTY difficulty )
386 {
387 HMENU hMenu;
388
389 if ( difficulty == CUSTOM )
390 if (DialogBoxParam( p_board->hInst, "DLG_CUSTOM", p_board->hWnd,
391 CustomDlgProc, (LPARAM) p_board) != 0)
392 return;
393
394 hMenu = GetMenu( p_board->hWnd );
395 CheckMenuItem( hMenu, IDM_BEGINNER + p_board->difficulty, MF_UNCHECKED );
396 p_board->difficulty = difficulty;
397 CheckMenuItem( hMenu, IDM_BEGINNER + difficulty, MF_CHECKED );
398
399 switch( difficulty ) {
400 case BEGINNER:
401 p_board->cols = BEGINNER_COLS;
402 p_board->rows = BEGINNER_ROWS;
403 p_board->mines = BEGINNER_MINES;
404 break;
405
406 case ADVANCED:
407 p_board->cols = ADVANCED_COLS;
408 p_board->rows = ADVANCED_ROWS;
409 p_board->mines = ADVANCED_MINES;
410 break;
411
412 case EXPERT:
413 p_board->cols = EXPERT_COLS;
414 p_board->rows = EXPERT_ROWS;
415
416 p_board->mines = EXPERT_MINES;
417 break;
418
419 case CUSTOM:
420 break;
421 }
422 }
423
424 static void ShiftBetween(LONG* x, LONG* y, LONG a, LONG b)
425 {
426 if (*x < a) {
427 *y += a - *x;
428 *x = a;
429 }
430 else if (*y > b) {
431 *x -= *y - b;
432 *y = b;
433 }
434 }
435
436 static void MoveOnScreen(RECT* rect)
437 {
438 HMONITOR hMonitor;
439 MONITORINFO mi;
440
441 /* find the nearest monitor ... */
442 hMonitor = MonitorFromRect(rect, MONITOR_DEFAULTTONEAREST);
443
444 /* ... and move it into the work area (ie excluding task bar)*/
445 mi.cbSize = sizeof(mi);
446 GetMonitorInfo(hMonitor, &mi);
447
448 ShiftBetween(&rect->left, &rect->right, mi.rcWork.left, mi.rcWork.right);
449 ShiftBetween(&rect->top, &rect->bottom, mi.rcWork.top, mi.rcWork.bottom);
450 }
451
452 void CreateBoard( BOARD *p_board )
453 {
454 int left, top, bottom, right;
455 RECT wnd_rect;
456
457 p_board->mb = MB_NONE;
458 p_board->boxes_left = p_board->cols * p_board->rows - p_board->mines;
459 p_board->num_flags = 0;
460
461 CreateBoxes( p_board );
462
463 p_board->width = p_board->cols * MINE_WIDTH + BOARD_WMARGIN * 2;
464
465 p_board->height = p_board->rows * MINE_HEIGHT + LED_HEIGHT
466 + BOARD_HMARGIN * 3;
467
468 /* setting the mines rectangle boundary */
469 left = BOARD_WMARGIN;
470 top = BOARD_HMARGIN * 2 + LED_HEIGHT;
471 right = left + p_board->cols * MINE_WIDTH;
472 bottom = top + p_board->rows * MINE_HEIGHT;
473 SetRect( &p_board->mines_rect, left, top, right, bottom );
474
475 /* setting the face rectangle boundary */
476 left = p_board->width / 2 - FACE_WIDTH / 2;
477 top = BOARD_HMARGIN;
478 right = left + FACE_WIDTH;
479 bottom = top + FACE_HEIGHT;
480 SetRect( &p_board->face_rect, left, top, right, bottom );
481
482 /* setting the timer rectangle boundary */
483 left = BOARD_WMARGIN;
484 top = BOARD_HMARGIN;
485 right = left + LED_WIDTH * 3;
486 bottom = top + LED_HEIGHT;
487 SetRect( &p_board->timer_rect, left, top, right, bottom );
488
489 /* setting the counter rectangle boundary */
490 left = p_board->width - BOARD_WMARGIN - LED_WIDTH * 3;
491 top = BOARD_HMARGIN;
492 right = p_board->width - BOARD_WMARGIN;
493 bottom = top + LED_HEIGHT;
494 SetRect( &p_board->counter_rect, left, top, right, bottom );
495
496 p_board->status = WAITING;
497 p_board->face_bmp = SMILE_BMP;
498 p_board->time = 0;
499
500 wnd_rect.left = p_board->pos.x;
501 wnd_rect.right = p_board->pos.x + p_board->width;
502 wnd_rect.top = p_board->pos.y;
503 wnd_rect.bottom = p_board->pos.y + p_board->height;
504 AdjustWindowRect(&wnd_rect, wnd_style, TRUE);
505
506 /* Make sure the window is completely on the screen */
507 MoveOnScreen(&wnd_rect);
508 MoveWindow( p_board->hWnd, wnd_rect.left, wnd_rect.top,
509 wnd_rect.right - wnd_rect.left,
510 wnd_rect.bottom - wnd_rect.top,
511 TRUE );
512 RedrawWindow( p_board->hWnd, NULL, 0,
513 RDW_INVALIDATE | RDW_UPDATENOW | RDW_ERASE);
514 }
515
516
517 void CheckLevel( BOARD *p_board )
518 {
519 if( p_board->rows < BEGINNER_ROWS )
520 p_board->rows = BEGINNER_ROWS;
521
522 if( p_board->rows > MAX_ROWS )
523 p_board->rows = MAX_ROWS;
524
525 if( p_board->cols < BEGINNER_COLS )
526 p_board->cols = BEGINNER_COLS;
527
528 if( p_board->cols > MAX_COLS )
529 p_board->cols = MAX_COLS;
530
531 if( p_board->mines < BEGINNER_MINES )
532 p_board->mines = BEGINNER_MINES;
533
534 if( p_board->mines > p_board->cols * p_board->rows - 1 )
535 p_board->mines = p_board->cols * p_board->rows - 1;
536 }
537
538
539 void CreateBoxes( BOARD *p_board )
540 {
541 int i, j;
542 unsigned col, row;
543
544 srand( (unsigned) time( NULL ) );
545
546 /* Create the boxes...
547 * We actually create them with an empty border,
548 * so special care doesn't have to be taken on the edges
549 */
550
551 for( col = 0; col <= p_board->cols + 1; col++ )
552 for( row = 0; row <= p_board->rows + 1; row++ ) {
553 p_board->box[col][row].IsPressed = FALSE;
554 p_board->box[col][row].IsMine = FALSE;
555 p_board->box[col][row].FlagType = NORMAL;
556 p_board->box[col][row].NumMines = 0;
557 }
558
559 /* create mines */
560 i = 0;
561 while( (unsigned) i < p_board->mines ) {
562 col = (int) (p_board->cols * (float) rand() / RAND_MAX + 1);
563 row = (int) (p_board->rows * (float) rand() / RAND_MAX + 1);
564
565 if( !p_board->box[col][row].IsMine ) {
566 i++;
567 p_board->box[col][row].IsMine = TRUE;
568 }
569 }
570
571 /*
572 * Now we label the remaining boxes with the
573 * number of mines surrounding them.
574 */
575
576 for( col = 1; col < p_board->cols + 1; col++ )
577 for( row = 1; row < p_board->rows + 1; row++ ) {
578 for( i = -1; i <= 1; i++ )
579 for( j = -1; j <= 1; j++ ) {
580 if( p_board->box[col + i][row + j].IsMine ) {
581 p_board->box[col][row].NumMines++ ;
582 }
583 }
584 }
585 }
586
587 void DrawMines ( HDC hdc, HDC hMemDC, BOARD *p_board )
588 {
589 HGDIOBJ hOldObj;
590 unsigned col, row;
591 hOldObj = SelectObject (hMemDC, p_board->hMinesBMP);
592
593 for( row = 1; row <= p_board->rows; row++ ) {
594 for( col = 1; col <= p_board->cols; col++ ) {
595 DrawMine( hdc, hMemDC, p_board, col, row, FALSE );
596 }
597 }
598 SelectObject( hMemDC, hOldObj );
599 }
600
601 void DrawMine( HDC hdc, HDC hMemDC, BOARD *p_board, unsigned col, unsigned row, BOOL IsPressed )
602 {
603 MINEBMP_OFFSET offset = BOX_BMP;
604
605 if( col == 0 || col > p_board->cols || row == 0 || row > p_board->rows )
606 return;
607
608 if( p_board->status == GAMEOVER ) {
609 if( p_board->box[col][row].IsMine ) {
610 switch( p_board->box[col][row].FlagType ) {
611 case FLAG:
612 offset = FLAG_BMP;
613 break;
614 case COMPLETE:
615 offset = EXPLODE_BMP;
616 break;
617 case QUESTION:
618 /* fall through */
619 case NORMAL:
620 offset = MINE_BMP;
621 }
622 } else {
623 switch( p_board->box[col][row].FlagType ) {
624 case QUESTION:
625 offset = QUESTION_BMP;
626 break;
627 case FLAG:
628 offset = WRONG_BMP;
629 break;
630 case NORMAL:
631 offset = BOX_BMP;
632 break;
633 case COMPLETE:
634 /* Do nothing */
635 break;
636 default:
637 WINE_TRACE("Unknown FlagType during game over in DrawMine\n");
638 break;
639 }
640 }
641 } else { /* WAITING or PLAYING */
642 switch( p_board->box[col][row].FlagType ) {
643 case QUESTION:
644 if( !IsPressed )
645 offset = QUESTION_BMP;
646 else
647 offset = QPRESS_BMP;
648 break;
649 case FLAG:
650 offset = FLAG_BMP;
651 break;
652 case NORMAL:
653 if( !IsPressed )
654 offset = BOX_BMP;
655 else
656 offset = MPRESS_BMP;
657 break;
658 case COMPLETE:
659 /* Do nothing */
660 break;
661 default:
662 WINE_TRACE("Unknown FlagType while playing in DrawMine\n");
663 break;
664 }
665 }
666
667 if( p_board->box[col][row].FlagType == COMPLETE
668 && !p_board->box[col][row].IsMine )
669 offset = (MINEBMP_OFFSET) p_board->box[col][row].NumMines;
670
671 BitBlt( hdc,
672 (col - 1) * MINE_WIDTH + p_board->mines_rect.left,
673 (row - 1) * MINE_HEIGHT + p_board->mines_rect.top,
674 MINE_WIDTH, MINE_HEIGHT,
675 hMemDC, 0, offset * MINE_HEIGHT, SRCCOPY );
676 }
677
678 void DrawLeds( HDC hdc, HDC hMemDC, BOARD *p_board, int number, int x, int y )
679 {
680 HGDIOBJ hOldObj;
681 unsigned led[3], i;
682 int count;
683
684 count = number;
685 if( count < 1000 ) {
686 if( count >= 0 ) {
687 led[0] = count / 100 ;
688 count -= led[0] * 100;
689 }
690 else {
691 led[0] = 10; /* negative sign */
692 count = -count;
693 }
694 led[1] = count / 10;
695 count -= led[1] * 10;
696 led[2] = count;
697 }
698 else {
699 for( i = 0; i < 3; i++ )
700 led[i] = 10;
701 }
702
703 /* use unlit led if not playing */
704 if( p_board->status == WAITING )
705 for( i = 0; i < 3; i++ )
706 led[i] = 11;
707
708 hOldObj = SelectObject (hMemDC, p_board->hLedsBMP);
709
710 for( i = 0; i < 3; i++ ) {
711 BitBlt( hdc,
712 i * LED_WIDTH + x,
713 y,
714 LED_WIDTH,
715 LED_HEIGHT,
716 hMemDC,
717 0,
718 led[i] * LED_HEIGHT,
719 SRCCOPY);
720 }
721
722 SelectObject( hMemDC, hOldObj );
723 }
724
725
726 void DrawFace( HDC hdc, HDC hMemDC, BOARD *p_board )
727 {
728 HGDIOBJ hOldObj;
729
730 hOldObj = SelectObject (hMemDC, p_board->hFacesBMP);
731
732 BitBlt( hdc,
733 p_board->face_rect.left,
734 p_board->face_rect.top,
735 FACE_WIDTH,
736 FACE_HEIGHT,
737 hMemDC, 0, p_board->face_bmp * FACE_HEIGHT, SRCCOPY);
738
739 SelectObject( hMemDC, hOldObj );
740 }
741
742
743 void DrawBoard( HDC hdc, HDC hMemDC, PAINTSTRUCT *ps, BOARD *p_board )
744 {
745 RECT tmp_rect;
746
747 if( IntersectRect( &tmp_rect, &ps->rcPaint, &p_board->counter_rect ) )
748 DrawLeds( hdc, hMemDC, p_board, p_board->mines - p_board->num_flags,
749 p_board->counter_rect.left,
750 p_board->counter_rect.top );
751
752 if( IntersectRect( &tmp_rect, &ps->rcPaint, &p_board->timer_rect ) )
753 DrawLeds( hdc, hMemDC, p_board, p_board->time,
754 p_board->timer_rect.left,
755 p_board->timer_rect.top );
756
757 if( IntersectRect( &tmp_rect, &ps->rcPaint, &p_board->face_rect ) )
758 DrawFace( hdc, hMemDC, p_board );
759
760 if( IntersectRect( &tmp_rect, &ps->rcPaint, &p_board->mines_rect ) )
761 DrawMines( hdc, hMemDC, p_board );
762 }
763
764
765 void TestBoard( HWND hWnd, BOARD *p_board, int x, int y, int msg )
766 {
767 POINT pt;
768 unsigned col,row;
769
770 pt.x = x;
771 pt.y = y;
772
773 if( PtInRect( &p_board->mines_rect, pt ) && p_board->status != GAMEOVER
774 && p_board->status != WON )
775 TestMines( p_board, pt, msg );
776 else {
777 UnpressBoxes( p_board,
778 p_board->press.x,
779 p_board->press.y );
780 p_board->press.x = 0;
781 p_board->press.y = 0;
782 }
783
784 if( p_board->boxes_left == 0 ) {
785 p_board->status = WON;
786
787 if (p_board->num_flags < p_board->mines) {
788 for( row = 1; row <= p_board->rows; row++ ) {
789 for( col = 1; col <= p_board->cols; col++ ) {
790 if (p_board->box[col][row].IsMine && p_board->box[col][row].FlagType != FLAG)
791 p_board->box[col][row].FlagType = FLAG;
792 }
793 }
794
795 p_board->num_flags = p_board->mines;
796
797 RedrawWindow( p_board->hWnd, NULL, 0,
798 RDW_INVALIDATE | RDW_UPDATENOW );
799 }
800
801 if( p_board->difficulty != CUSTOM &&
802 p_board->time < p_board->best_time[p_board->difficulty] ) {
803 p_board->best_time[p_board->difficulty] = p_board->time;
804
805 DialogBoxParam( p_board->hInst, "DLG_CONGRATS", hWnd,
806 CongratsDlgProc, (LPARAM) p_board);
807
808 DialogBoxParam( p_board->hInst, "DLG_TIMES", hWnd,
809 TimesDlgProc, (LPARAM) p_board);
810 }
811 }
812 TestFace( p_board, pt, msg );
813 }
814
815 void TestMines( BOARD *p_board, POINT pt, int msg )
816 {
817 BOOL draw = TRUE;
818 int col, row;
819
820 col = (pt.x - p_board->mines_rect.left) / MINE_WIDTH + 1;
821 row = (pt.y - p_board->mines_rect.top ) / MINE_HEIGHT + 1;
822
823 switch ( msg ) {
824 case WM_LBUTTONDOWN:
825 if( p_board->press.x != col || p_board->press.y != row ) {
826 UnpressBox( p_board,
827 p_board->press.x, p_board->press.y );
828 p_board->press.x = col;
829 p_board->press.y = row;
830 PressBox( p_board, col, row );
831 }
832 draw = FALSE;
833 break;
834
835 case WM_LBUTTONUP:
836 if( p_board->press.x != col || p_board->press.y != row )
837 UnpressBox( p_board,
838 p_board->press.x, p_board->press.y );
839 p_board->press.x = 0;
840 p_board->press.y = 0;
841 if( p_board->box[col][row].FlagType != FLAG )
842 p_board->status = PLAYING;
843 CompleteBox( p_board, col, row );
844 break;
845
846 case WM_MBUTTONDOWN:
847 PressBoxes( p_board, col, row );
848 draw = FALSE;
849 break;
850
851 case WM_MBUTTONUP:
852 if( p_board->press.x != col || p_board->press.y != row )
853 UnpressBoxes( p_board,
854 p_board->press.x, p_board->press.y );
855 p_board->press.x = 0;
856 p_board->press.y = 0;
857 CompleteBoxes( p_board, col, row );
858 break;
859
860 case WM_RBUTTONDOWN:
861 AddFlag( p_board, col, row );
862 p_board->status = PLAYING;
863 break;
864 default:
865 WINE_TRACE("Unknown message type received in TestMines\n");
866 break;
867 }
868
869 if( draw )
870 {
871 RedrawWindow( p_board->hWnd, NULL, 0,
872 RDW_INVALIDATE | RDW_UPDATENOW );
873 }
874 }
875
876
877 void TestFace( BOARD *p_board, POINT pt, int msg )
878 {
879 if( p_board->status == PLAYING || p_board->status == WAITING ) {
880 if( msg == WM_LBUTTONDOWN || msg == WM_MBUTTONDOWN )
881 p_board->face_bmp = OOH_BMP;
882 else p_board->face_bmp = SMILE_BMP;
883 }
884 else if( p_board->status == GAMEOVER )
885 p_board->face_bmp = DEAD_BMP;
886 else if( p_board->status == WON )
887 p_board->face_bmp = COOL_BMP;
888
889 if( PtInRect( &p_board->face_rect, pt ) ) {
890 if( msg == WM_LBUTTONDOWN )
891 p_board->face_bmp = SPRESS_BMP;
892
893 if( msg == WM_LBUTTONUP )
894 CreateBoard( p_board );
895 }
896
897 RedrawWindow( p_board->hWnd, &p_board->face_rect, 0,
898 RDW_INVALIDATE | RDW_UPDATENOW );
899 }
900
901
902 void CompleteBox( BOARD *p_board, unsigned col, unsigned row )
903 {
904 int i, j;
905
906 if( p_board->box[col][row].FlagType != COMPLETE &&
907 p_board->box[col][row].FlagType != FLAG &&
908 col > 0 && col < p_board->cols + 1 &&
909 row > 0 && row < p_board->rows + 1 ) {
910 p_board->box[col][row].FlagType = COMPLETE;
911
912 if( p_board->box[col][row].IsMine ) {
913 p_board->face_bmp = DEAD_BMP;
914 p_board->status = GAMEOVER;
915 }
916 else if( p_board->status != GAMEOVER )
917 p_board->boxes_left--;
918
919 if( p_board->box[col][row].NumMines == 0 )
920 {
921 for( i = -1; i <= 1; i++ )
922 for( j = -1; j <= 1; j++ )
923 CompleteBox( p_board, col + i, row + j );
924 }
925 }
926 }
927
928
929 void CompleteBoxes( BOARD *p_board, unsigned col, unsigned row )
930 {
931 unsigned numFlags = 0;
932 int i, j;
933
934 if( p_board->box[col][row].FlagType == COMPLETE ) {
935 for( i = -1; i <= 1; i++ )
936 for( j = -1; j <= 1; j++ ) {
937 if( p_board->box[col+i][row+j].FlagType == FLAG )
938 numFlags++;
939 }
940
941 if( numFlags == p_board->box[col][row].NumMines ) {
942 for( i = -1; i <= 1; i++ )
943 for( j = -1; j <= 1; j++ ) {
944 if( p_board->box[col+i][row+j].FlagType != FLAG )
945 CompleteBox( p_board, col+i, row+j );
946 }
947 }
948 }
949 }
950
951
952 void AddFlag( BOARD *p_board, unsigned col, unsigned row )
953 {
954 if( p_board->box[col][row].FlagType != COMPLETE ) {
955 switch( p_board->box[col][row].FlagType ) {
956 case FLAG:
957 if( p_board->IsMarkQ )
958 p_board->box[col][row].FlagType = QUESTION;
959 else
960 p_board->box[col][row].FlagType = NORMAL;
961 p_board->num_flags--;
962 break;
963
964 case QUESTION:
965 p_board->box[col][row].FlagType = NORMAL;
966 break;
967
968 default:
969 p_board->box[col][row].FlagType = FLAG;
970 p_board->num_flags++;
971 }
972 }
973 }
974
975
976 void PressBox( BOARD *p_board, unsigned col, unsigned row )
977 {
978 HDC hdc;
979 HGDIOBJ hOldObj;
980 HDC hMemDC;
981
982 hdc = GetDC( p_board->hWnd );
983 hMemDC = CreateCompatibleDC( hdc );
984 hOldObj = SelectObject (hMemDC, p_board->hMinesBMP);
985
986 DrawMine( hdc, hMemDC, p_board, col, row, TRUE );
987
988 SelectObject( hMemDC, hOldObj );
989 DeleteDC( hMemDC );
990 ReleaseDC( p_board->hWnd, hdc );
991 }
992
993
994 void PressBoxes( BOARD *p_board, unsigned col, unsigned row )
995 {
996 int i, j;
997
998 for( i = -1; i <= 1; i++ )
999 for( j = -1; j <= 1; j++ ) {
1000 p_board->box[col + i][row + j].IsPressed = TRUE;
1001 PressBox( p_board, col + i, row + j );
1002 }
1003
1004 for( i = -1; i <= 1; i++ )
1005 for( j = -1; j <= 1; j++ ) {
1006 if( !p_board->box[p_board->press.x + i][p_board->press.y + j].IsPressed )
1007 UnpressBox( p_board, p_board->press.x + i, p_board->press.y + j );
1008 }
1009
1010 for( i = -1; i <= 1; i++ )
1011 for( j = -1; j <= 1; j++ ) {
1012 p_board->box[col + i][row + j].IsPressed = FALSE;
1013 PressBox( p_board, col + i, row + j );
1014 }
1015
1016 p_board->press.x = col;
1017 p_board->press.y = row;
1018 }
1019
1020
1021 void UnpressBox( BOARD *p_board, unsigned col, unsigned row )
1022 {
1023 HDC hdc;
1024 HGDIOBJ hOldObj;
1025 HDC hMemDC;
1026
1027 hdc = GetDC( p_board->hWnd );
1028 hMemDC = CreateCompatibleDC( hdc );
1029 hOldObj = SelectObject( hMemDC, p_board->hMinesBMP );
1030
1031 DrawMine( hdc, hMemDC, p_board, col, row, FALSE );
1032
1033 SelectObject( hMemDC, hOldObj );
1034 DeleteDC( hMemDC );
1035 ReleaseDC( p_board->hWnd, hdc );
1036 }
1037
1038
1039 void UnpressBoxes( BOARD *p_board, unsigned col, unsigned row )
1040 {
1041 int i, j;
1042
1043 for( i = -1; i <= 1; i++ )
1044 for( j = -1; j <= 1; j++ ) {
1045 UnpressBox( p_board, col + i, row + j );
1046 }
1047 }
Maarten's multimedia branch