]> git.saurik.com Git - wxWidgets.git/blame - demos/forty/card.cpp
No changes, just use "@since 3.0" consistently in the documentation.
[wxWidgets.git] / demos / forty / card.cpp
CommitLineData
63cafd27
JS
1/////////////////////////////////////////////////////////////////////////////
2// Name: card.cpp
3// Purpose: Forty Thieves patience game
4// Author: Chris Breeze
5// Modified by:
6// Created: 21/07/97
63cafd27 7// Copyright: (c) 1993-1998 Chris Breeze
010216e3 8// Licence: wxWindows licence
63cafd27 9//---------------------------------------------------------------------------
be5a51fb 10// Last modified: 22nd July 1998 - ported to wxWidgets 2.0
63cafd27
JS
11/////////////////////////////////////////////////////////////////////////////
12//+-------------------------------------------------------------+
e3e65dac 13//| Description
010216e3
WS
14//| A class for drawing playing cards.
15//| Currently assumes that the card symbols have been
16//| loaded into hbmap_symbols and the pictures for the
17//| Jack, Queen and King have been loaded into
18//| hbmap_pictures.
63cafd27
JS
19//+-------------------------------------------------------------+
20
63cafd27
JS
21// For compilers that support precompilation, includes "wx/wx.h".
22#include "wx/wxprec.h"
23
24#ifdef __BORLANDC__
25#pragma hdrstop
26#endif
27
28#ifndef WX_PRECOMP
29#include "wx/wx.h"
30#endif
31
32#include <stdlib.h>
33#include <stdio.h>
34#include <string.h>
35#include "forty.h"
36#include "card.h"
37
63cafd27 38#include "pictures.xpm"
91feb0d1 39#include "symbols.xpm"
63cafd27
JS
40
41wxBitmap* Card::m_pictureBmap = 0;
42wxBitmap* Card::m_symbolBmap = 0;
43
fc799548
JS
44double Card::m_scale = 1.0;
45int Card::m_width = 50;
46int Card::m_height = 70;
63cafd27
JS
47
48//+-------------------------------------------------------------+
010216e3 49//| Card::Card() |
63cafd27 50//+-------------------------------------------------------------+
010216e3
WS
51//| Description: |
52//| Constructor for a playing card. |
53//| Checks that the value is in the range 1..52 and then |
54//| initialises the suit, colour, pipValue and wayUp. |
63cafd27
JS
55//+-------------------------------------------------------------+
56Card::Card(int value, WayUp way_up) :
010216e3 57 m_wayUp(way_up)
63cafd27 58{
010216e3
WS
59 if (!m_symbolBmap)
60 {
91feb0d1 61 m_symbolBmap = new wxBitmap(symbols_xpm);
a1b806b9 62 if (!m_symbolBmap->IsOk())
010216e3 63 {
9a83f860 64 ::wxMessageBox(wxT("Failed to load bitmap CardSymbols"), wxT("Error"));
010216e3
WS
65 }
66 }
67 if (!m_pictureBmap)
68 {
010216e3 69 m_pictureBmap = new wxBitmap(Pictures);
a1b806b9 70 if (!m_pictureBmap->IsOk())
010216e3 71 {
9a83f860 72 ::wxMessageBox(wxT("Failed to load bitmap CardPictures"), wxT("Error"));
010216e3
WS
73 }
74 }
63cafd27
JS
75
76 if (value >= 1 && value <= PackSize)
77 {
010216e3
WS
78 switch ((value - 1) / 13)
79 {
80 case 0:
81 m_suit = clubs;
82 m_colour = black;
83 break;
84 case 1:
85 m_suit = diamonds;
86 m_colour = red;
87 break;
88 case 2:
89 m_suit = hearts;
90 m_colour = red;
91 break;
92 case 3:
93 m_suit = spades;
94 m_colour = black;
95 break;
96 }
97 m_pipValue = 1 + (value - 1) % 13;
98 m_status = true;
63cafd27
JS
99 }
100 else
101 {
e0b5519a 102 m_status = false;
63cafd27
JS
103 }
104} // Card::Card()
105
106
fc799548 107//+-------------------------------------------------------------+
010216e3 108//| Card::SetScale() |
fc799548 109//+-------------------------------------------------------------+
010216e3
WS
110//| Description: |
111//| Scales the cards |
fc799548
JS
112//+-------------------------------------------------------------+
113void Card::SetScale(double scale)
114{
115 m_scale = scale;
116 m_width = int(50*scale);
117 m_height = int(70*scale);
118}
119
63cafd27 120//+-------------------------------------------------------------+
010216e3 121//| Card::Erase() |
63cafd27 122//+-------------------------------------------------------------+
010216e3
WS
123//| Description: |
124//| Erase the card at (x, y) by drawing a rectangle in the |
125//| background colour. |
63cafd27
JS
126//+-------------------------------------------------------------+
127void Card::Erase(wxDC& dc, int x, int y)
128{
010216e3
WS
129 wxPen* pen = wxThePenList->FindOrCreatePen(
130 FortyApp::BackgroundColour(),
131 1,
132 wxSOLID
133 );
134 dc.SetPen(* pen);
135 dc.SetBrush(FortyApp::BackgroundBrush());
fc799548 136 dc.DrawRectangle(x, y, m_width, m_height);
63cafd27
JS
137} // Card::Erase()
138
139
140//+-------------------------------------------------------------+
010216e3 141//| Card::Draw() |
63cafd27 142//+-------------------------------------------------------------+
010216e3
WS
143//| Description: |
144//| Draw the card at (x, y). |
145//| If the card is facedown draw the back of the card. |
146//| If the card is faceup draw the front of the card. |
147//| Cards are not held in bitmaps, instead they are drawn |
148//| from their constituent parts when required. |
149//| hbmap_symbols contains large and small suit symbols and |
150//| pip values. These are copied to the appropriate part of |
151//| the card. Picture cards use the pictures defined in |
152//| hbmap_pictures. Note that only one picture is defined |
153//| for the Jack, Queen and King, unlike a real pack where |
154//| each suit is different. |
155//| |
156//| WARNING: |
157//| The locations of these symbols is 'hard-wired' into the |
158//| code. Editing the bitmaps or the numbers below will |
159//| result in the wrong symbols being displayed. |
63cafd27
JS
160//+-------------------------------------------------------------+
161void Card::Draw(wxDC& dc, int x, int y)
162{
010216e3
WS
163 wxBrush backgroundBrush( dc.GetBackground() );
164 dc.SetBrush(* wxWHITE_BRUSH);
165 dc.SetPen(* wxBLACK_PEN);
fc799548 166 dc.DrawRoundedRectangle(x, y, m_width, m_height, 4);
010216e3
WS
167 if (m_wayUp == facedown)
168 {
169 dc.SetBackground(* wxRED_BRUSH);
170 dc.SetBackgroundMode(wxSOLID);
171 wxBrush* brush = wxTheBrushList->FindOrCreateBrush(
19bc1514 172 *wxBLACK, wxCROSSDIAG_HATCH
010216e3
WS
173 );
174 dc.SetBrush(* brush);
175
176 dc.DrawRoundedRectangle(
177 x + 4, y + 4,
178 m_width - 8, m_height - 8,
179 2
180 );
181 }
182 else
183 {
184 wxMemoryDC memoryDC;
185
186 memoryDC.SelectObject(*m_symbolBmap);
187
188// dc.SetBackgroundMode(wxTRANSPARENT);
189
190 dc.SetTextBackground(*wxWHITE);
191 switch (m_suit)
192 {
193 case spades:
194 case clubs:
195 dc.SetTextForeground(*wxBLACK);
196 break;
197 case diamonds:
198 case hearts:
199 dc.SetTextForeground(*wxRED);
200 break;
201 }
202
203 int symsize = 11;
204 int sympos = 14;
205 int sympos2 = 25;
206 int symdist = 5;
207 int symdist2 = 6;
208
209 int pipsize,pippos,valueheight,valuewidth;
210 int valuepos;
211 if (m_scale > 1.2)
212 {
213 pipsize = symsize;
214 pippos = sympos;
215 valueheight = 10;
216 valuewidth = 9;
217 valuepos = 50;
218 }
219 else
220 {
221 pipsize = 7;
222 pippos = 0;
223 valueheight = 7;
224 valuewidth = 6;
225 valuepos = 36;
226 }
227
228 // Draw the value
229 dc.Blit((wxCoord)(x + m_scale*3),
230 (wxCoord)(y + m_scale*3),
254a2129 231 valuewidth,
010216e3 232 valueheight,
254a2129
WS
233 &memoryDC,
234 valuewidth * (m_pipValue - 1),
235 valuepos,
010216e3 236 wxCOPY);
254a2129 237 dc.Blit((wxCoord)(x + m_width - m_scale*3 - valuewidth),
010216e3 238 (wxCoord)(y + m_height - valueheight - m_scale*3),
254a2129 239 valuewidth,
010216e3 240 valueheight,
254a2129
WS
241 &memoryDC,
242 valuewidth * (m_pipValue - 1),
243 valuepos+valueheight,
010216e3
WS
244 wxCOPY);
245
246 // Draw the pips
254a2129
WS
247 dc.Blit((wxCoord)(x + m_scale*3 + valuewidth+2),
248 (wxCoord)(y + m_scale*3),
010216e3 249 pipsize,
254a2129
WS
250 pipsize,
251 &memoryDC,
252 pipsize * m_suit,
253 pippos,
010216e3 254 wxCOPY);
254a2129 255 dc.Blit((wxCoord)(x + m_width - m_scale*3-valuewidth-pipsize-2),
010216e3 256 (wxCoord)(y + m_height - pipsize - m_scale*3),
010216e3 257 pipsize,
254a2129
WS
258 pipsize,
259 &memoryDC,
260 pipsize * m_suit,
261 pipsize+pippos,
010216e3
WS
262 wxCOPY);
263
264 switch (m_pipValue)
265 {
266 case 1:
254a2129
WS
267 dc.Blit((wxCoord)(x - symdist + m_width / 2),
268 (wxCoord)(y - m_scale*5 + m_height / 2),
269 symsize,
010216e3 270 symsize,
254a2129
WS
271 &memoryDC,
272 symsize * m_suit,
273 sympos,
010216e3
WS
274 wxCOPY);
275 break;
276
277 case 3:
254a2129
WS
278 dc.Blit((wxCoord)(x - symdist + m_width / 2),
279 (wxCoord)(y - symdist + m_height / 2),
010216e3 280 symsize,
254a2129
WS
281 symsize,
282 &memoryDC,
283 symsize * m_suit,
284 sympos,
010216e3
WS
285 wxCOPY);
286 case 2:
287 dc.Blit((wxCoord)(x - symdist + m_width / 2),
254a2129
WS
288 (wxCoord)(y - symdist + m_height / 4),
289 symsize,
010216e3 290 symsize,
254a2129
WS
291 &memoryDC,
292 symsize * m_suit,
293 sympos,
010216e3
WS
294 wxCOPY);
295 dc.Blit((wxCoord)(x - symdist + m_width / 2),
254a2129
WS
296 (wxCoord)(y - symdist + 3 * m_height / 4),
297 symsize,
010216e3 298 symsize,
254a2129
WS
299 &memoryDC,
300 symsize * m_suit,
301 sympos2,
010216e3
WS
302 wxCOPY);
303 break;
304
305 case 5:
254a2129
WS
306 dc.Blit((wxCoord)(x - symdist + m_width / 2),
307 (wxCoord)(y - symdist + m_height / 2),
308 symsize,
010216e3 309 symsize,
254a2129
WS
310 &memoryDC,
311 symsize * m_suit,
312 sympos,
010216e3
WS
313 wxCOPY);
314 case 4:
315 dc.Blit((wxCoord)(x - symdist + m_width / 4),
254a2129
WS
316 (wxCoord)(y - symdist + m_height / 4),
317 symsize,
010216e3 318 symsize,
254a2129
WS
319 &memoryDC,
320 symsize * m_suit,
321 sympos,
010216e3
WS
322 wxCOPY);
323 dc.Blit((wxCoord)(x - symdist + m_width / 4),
254a2129 324 (wxCoord)(y - symdist + 3 * m_height / 4),
010216e3 325 symsize,
254a2129
WS
326 symsize,
327 &memoryDC,
328 symsize * m_suit,
329 sympos2,
010216e3
WS
330 wxCOPY);
331 dc.Blit((wxCoord)(x - symdist + 3 * m_width / 4),
254a2129
WS
332 (wxCoord)(y - symdist + m_height / 4),
333 symsize,
010216e3 334 symsize,
254a2129
WS
335 &memoryDC,
336 symsize * m_suit,
337 sympos,
010216e3
WS
338 wxCOPY);
339 dc.Blit((wxCoord)(x - symdist + 3 * m_width / 4),
254a2129 340 (wxCoord)(y - symdist + 3 * m_height / 4),
010216e3 341 symsize,
254a2129
WS
342 symsize,
343 &memoryDC,
344 symsize * m_suit,
345 sympos2,
010216e3
WS
346 wxCOPY);
347 break;
348
349 case 8:
350 dc.Blit((wxCoord)(x - symdist + 5 * m_width / 10),
254a2129
WS
351 (wxCoord)(y - symdist + 5 * m_height / 8),
352 symsize,
010216e3 353 symsize,
254a2129
WS
354 &memoryDC,
355 symsize * m_suit,
356 sympos2,
010216e3
WS
357 wxCOPY);
358 case 7:
359 dc.Blit((wxCoord)(x - symdist + 5 * m_width / 10),
254a2129
WS
360 (wxCoord)(y - symdist + 3 * m_height / 8),
361 symsize,
010216e3 362 symsize,
254a2129
WS
363 &memoryDC,
364 symsize * m_suit,
365 sympos,
010216e3
WS
366 wxCOPY);
367 case 6:
368 dc.Blit((wxCoord)(x - symdist + m_width / 4),
254a2129
WS
369 (wxCoord)(y - symdist + m_height / 4),
370 symsize,
010216e3
WS
371 symsize,
372 &memoryDC, symsize * m_suit, sympos, wxCOPY);
373 dc.Blit((wxCoord)(x - symdist + m_width / 4),
254a2129
WS
374 (wxCoord)(y - symdist + m_height / 2),
375 symsize,
010216e3 376 symsize,
254a2129
WS
377 &memoryDC,
378 symsize * m_suit,
379 sympos,
010216e3
WS
380 wxCOPY);
381 dc.Blit((wxCoord)(x - symdist + m_width / 4),
254a2129
WS
382 (wxCoord)(y - symdist + 3 * m_height / 4),
383 symsize,
010216e3 384 symsize,
254a2129
WS
385 &memoryDC,
386 symsize * m_suit,
387 sympos2,
010216e3
WS
388 wxCOPY);
389 dc.Blit((wxCoord)(x - symdist + 3 * m_width / 4),
254a2129 390 (wxCoord)(y - symdist + m_height / 4),
010216e3 391 symsize,
254a2129
WS
392 symsize,
393 &memoryDC,
394 symsize * m_suit,
395 sympos,
010216e3
WS
396 wxCOPY);
397 dc.Blit((wxCoord)(x - symdist + 3 * m_width / 4),
254a2129
WS
398 (wxCoord)(y - symdist + m_height / 2),
399 symsize,
010216e3 400 symsize,
254a2129
WS
401 &memoryDC,
402 symsize * m_suit,
403 sympos,
010216e3
WS
404 wxCOPY);
405 dc.Blit((wxCoord)(x - symdist + 3 * m_width / 4),
254a2129
WS
406 (wxCoord)(y - symdist + 3 * m_height / 4),
407 symsize,
010216e3 408 symsize,
254a2129
WS
409 &memoryDC,
410 symsize * m_suit,
411 sympos2,
010216e3
WS
412 wxCOPY);
413 break;
414
415 case 10:
416 dc.Blit((wxCoord)(x - symdist + m_width / 2),
254a2129 417 (wxCoord)(y - symdist + 2 * m_height / 3),
010216e3 418 symsize,
254a2129
WS
419 symsize,
420 &memoryDC,
421 symsize * m_suit,
422 sympos2,
010216e3
WS
423 wxCOPY);
424 case 9:
425 dc.Blit((wxCoord)(x - symdist + m_width / 4),
254a2129
WS
426 (wxCoord)(y - symdist2 + m_height / 4),
427 symsize,
010216e3 428 symsize,
254a2129
WS
429 &memoryDC,
430 symsize * m_suit,
431 sympos,
010216e3
WS
432 wxCOPY);
433 dc.Blit((wxCoord)(x - symdist + m_width / 4),
254a2129 434 (wxCoord)(y - symdist2 + 5 * m_height / 12),
010216e3 435 symsize,
254a2129
WS
436 symsize,
437 &memoryDC,
438 symsize * m_suit,
439 sympos,
010216e3
WS
440 wxCOPY);
441 dc.Blit((wxCoord)(x - symdist + m_width / 4),
254a2129
WS
442 (wxCoord)(y - symdist + 7 * m_height / 12),
443 symsize,
010216e3 444 symsize,
254a2129
WS
445 &memoryDC,
446 symsize * m_suit,
447 sympos2,
010216e3
WS
448 wxCOPY);
449 dc.Blit((wxCoord)(x - symdist + m_width / 4),
254a2129
WS
450 (wxCoord)(y - symdist + 3 * m_height / 4),
451 symsize,
010216e3 452 symsize,
254a2129
WS
453 &memoryDC,
454 symsize * m_suit,
455 sympos2,
010216e3
WS
456 wxCOPY);
457
458 dc.Blit((wxCoord)(x - symdist + 3 * m_width / 4),
254a2129 459 (wxCoord)(y - symdist2 + m_height / 4),
010216e3 460 symsize,
254a2129
WS
461 symsize,
462 &memoryDC,
463 symsize * m_suit,
464 sympos,
010216e3
WS
465 wxCOPY);
466 dc.Blit((wxCoord)(x - symdist + 3 * m_width / 4),
254a2129
WS
467 (wxCoord)(y - symdist2 + 5 * m_height / 12),
468 symsize,
010216e3 469 symsize,
254a2129
WS
470 &memoryDC,
471 symsize * m_suit,
472 sympos,
010216e3
WS
473 wxCOPY);
474 dc.Blit((wxCoord)(x - symdist + 3 * m_width / 4),
254a2129 475 (wxCoord)(y - symdist + 7 * m_height / 12),
010216e3 476 symsize,
254a2129
WS
477 symsize,
478 &memoryDC,
479 symsize * m_suit,
480 sympos2,
010216e3
WS
481 wxCOPY);
482 dc.Blit((wxCoord)(x - symdist + 3 * m_width / 4),
254a2129
WS
483 (wxCoord)(y - symdist + 3 * m_height / 4),
484 symsize,
010216e3 485 symsize,
254a2129
WS
486 &memoryDC,
487 symsize * m_suit,
488 sympos2,
010216e3
WS
489 wxCOPY);
490 dc.Blit((wxCoord)(x - symdist + m_width / 2),
254a2129
WS
491 (wxCoord)(y - symdist + m_height / 3),
492 symsize,
010216e3 493 symsize,
254a2129
WS
494 &memoryDC,
495 symsize * m_suit,
496 sympos,
010216e3
WS
497 wxCOPY);
498 break;
499 case 11:
500 case 12:
501 case 13:
502 memoryDC.SelectObject(*m_pictureBmap);
503 int picwidth = 40,picheight = 45;
254a2129 504 dc.Blit((wxCoord)(x + (m_width-picwidth)/2),
010216e3 505 (wxCoord)(y - picheight/2 + m_height/2),
254a2129 506 picwidth,
010216e3 507 picheight,
254a2129
WS
508 &memoryDC,
509 picwidth * (m_pipValue - 11),
510 0,
010216e3
WS
511 wxCOPY);
512
513 memoryDC.SelectObject(*m_symbolBmap);
514 dc.Blit((wxCoord)(x + m_width-(m_width-picwidth)/2-symsize-3),
254a2129 515 (wxCoord)(y - picheight/2+m_height/2+1),
010216e3 516 symsize,
254a2129
WS
517 symsize,
518 &memoryDC,
519 symsize * m_suit,
520 sympos,
010216e3
WS
521 wxCOPY);
522 dc.Blit((wxCoord)(x + (m_width-picwidth)/2+2),
254a2129
WS
523 (wxCoord)(y + picheight/2 + m_height/2-symsize),
524 symsize,
010216e3 525 symsize,
254a2129
WS
526 &memoryDC,
527 symsize * m_suit,
528 sympos2,
010216e3
WS
529 wxCOPY);
530 break;
531 }
532
533 }
534 dc.SetBackground( backgroundBrush );
63cafd27
JS
535} // Card:Draw()
536
537
538//+-------------------------------------------------------------+
010216e3 539//| Card::DrawNullCard() |
63cafd27 540//+-------------------------------------------------------------+
010216e3
WS
541//| Description: |
542//| Draws the outline of a card at (x, y). |
543//| Used to draw place holders for empty piles of cards. |
63cafd27
JS
544//+-------------------------------------------------------------+
545void Card::DrawNullCard(wxDC& dc, int x, int y)
546{
010216e3
WS
547 wxPen* pen = wxThePenList->FindOrCreatePen(FortyApp::TextColour(), 1, wxSOLID);
548 dc.SetBrush(FortyApp::BackgroundBrush());
549 dc.SetPen(*pen);
550 dc.DrawRoundedRectangle(x, y, m_width, m_height, 4);
63cafd27 551} // Card::DrawNullCard()