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