]>
Commit | Line | Data |
---|---|---|
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 | |
7 | // RCS-ID: $Id$ | |
8 | // Copyright: (c) 1993-1998 Chris Breeze | |
9 | // Licence: wxWindows licence | |
10 | //--------------------------------------------------------------------------- | |
11 | // Last modified: 22nd July 1998 - ported to wxWindows 2.0 | |
12 | ///////////////////////////////////////////////////////////////////////////// | |
13 | //+-------------------------------------------------------------+ | |
e3e65dac RR |
14 | //| Description |
15 | //| A class for drawing playing cards. | |
16 | //| Currently assumes that the card symbols have been | |
17 | //| loaded into hbmap_symbols and the pictures for the | |
18 | //| Jack, Queen and King have been loaded into | |
19 | //| hbmap_pictures. | |
63cafd27 JS |
20 | //+-------------------------------------------------------------+ |
21 | ||
22 | #ifdef __GNUG__ | |
23 | #pragma implementation | |
24 | #pragma interface | |
25 | #endif | |
26 | ||
27 | // For compilers that support precompilation, includes "wx/wx.h". | |
28 | #include "wx/wxprec.h" | |
29 | ||
30 | #ifdef __BORLANDC__ | |
31 | #pragma hdrstop | |
32 | #endif | |
33 | ||
34 | #ifndef WX_PRECOMP | |
35 | #include "wx/wx.h" | |
36 | #endif | |
37 | ||
38 | #include <stdlib.h> | |
39 | #include <stdio.h> | |
40 | #include <string.h> | |
41 | #include "forty.h" | |
42 | #include "card.h" | |
43 | ||
d27294ac | 44 | #if defined(__WXGTK__) || defined(__WXMOTIF__) || defined(__WXMAC__) || defined(__WXX11__) |
63cafd27 JS |
45 | #include "pictures.xpm" |
46 | #include "symbols.xbm" | |
47 | #endif | |
48 | ||
49 | wxBitmap* Card::m_pictureBmap = 0; | |
50 | wxBitmap* Card::m_symbolBmap = 0; | |
51 | ||
fc799548 JS |
52 | double Card::m_scale = 1.0; |
53 | int Card::m_width = 50; | |
54 | int Card::m_height = 70; | |
63cafd27 JS |
55 | |
56 | //+-------------------------------------------------------------+ | |
57 | //| Card::Card() | | |
58 | //+-------------------------------------------------------------+ | |
59 | //| Description: | | |
60 | //| Constructor for a playing card. | | |
61 | //| Checks that the value is in the range 1..52 and then | | |
62 | //| initialises the suit, colour, pipValue and wayUp. | | |
63 | //+-------------------------------------------------------------+ | |
64 | Card::Card(int value, WayUp way_up) : | |
65 | m_wayUp(way_up) | |
66 | { | |
67 | if (!m_symbolBmap) | |
68 | { | |
69 | #ifdef __WXMSW__ | |
f37c24e0 | 70 | m_symbolBmap = new wxBitmap(_T("CardSymbols"), wxBITMAP_TYPE_BMP_RESOURCE); |
63cafd27 JS |
71 | #else |
72 | m_symbolBmap = new wxBitmap(Symbols_bits, Symbols_width, Symbols_height); | |
73 | #endif | |
74 | if (!m_symbolBmap->Ok()) | |
75 | { | |
f37c24e0 | 76 | ::wxMessageBox(_T("Failed to load bitmap CardSymbols"), _T("Error")); |
63cafd27 JS |
77 | } |
78 | } | |
79 | if (!m_pictureBmap) | |
80 | { | |
81 | #ifdef __WXMSW__ | |
f37c24e0 | 82 | m_pictureBmap = new wxBitmap(_T("CardPictures"), wxBITMAP_TYPE_BMP_RESOURCE); |
63cafd27 JS |
83 | #else |
84 | m_pictureBmap = new wxBitmap(Pictures); | |
85 | #endif | |
86 | if (!m_pictureBmap->Ok()) | |
87 | { | |
f37c24e0 | 88 | ::wxMessageBox(_T("Failed to load bitmap CardPictures"), _T("Error")); |
63cafd27 JS |
89 | } |
90 | } | |
91 | ||
92 | if (value >= 1 && value <= PackSize) | |
93 | { | |
94 | switch ((value - 1) / 13) | |
95 | { | |
96 | case 0: | |
97 | m_suit = clubs; | |
98 | m_colour = black; | |
99 | break; | |
100 | case 1: | |
101 | m_suit = diamonds; | |
102 | m_colour = red; | |
103 | break; | |
104 | case 2: | |
105 | m_suit = hearts; | |
106 | m_colour = red; | |
107 | break; | |
108 | case 3: | |
109 | m_suit = spades; | |
110 | m_colour = black; | |
111 | break; | |
112 | } | |
113 | m_pipValue = 1 + (value - 1) % 13; | |
114 | m_status = TRUE; | |
115 | } | |
116 | else | |
117 | { | |
118 | m_status = FALSE; | |
119 | } | |
120 | } // Card::Card() | |
121 | ||
122 | ||
fc799548 JS |
123 | //+-------------------------------------------------------------+ |
124 | //| Card::SetScale() | | |
125 | //+-------------------------------------------------------------+ | |
126 | //| Description: | | |
127 | //| Scales the cards | | |
128 | //+-------------------------------------------------------------+ | |
129 | void Card::SetScale(double scale) | |
130 | { | |
131 | m_scale = scale; | |
132 | m_width = int(50*scale); | |
133 | m_height = int(70*scale); | |
134 | } | |
135 | ||
63cafd27 JS |
136 | //+-------------------------------------------------------------+ |
137 | //| Card::~Card() | | |
138 | //+-------------------------------------------------------------+ | |
139 | //| Description: | | |
140 | //| Destructor - nothing to do at present. | | |
141 | //+-------------------------------------------------------------+ | |
142 | Card::~Card() | |
143 | { | |
144 | } | |
145 | ||
146 | ||
147 | //+-------------------------------------------------------------+ | |
148 | //| Card::Erase() | | |
149 | //+-------------------------------------------------------------+ | |
150 | //| Description: | | |
151 | //| Erase the card at (x, y) by drawing a rectangle in the | | |
152 | //| background colour. | | |
153 | //+-------------------------------------------------------------+ | |
154 | void Card::Erase(wxDC& dc, int x, int y) | |
155 | { | |
156 | wxPen* pen = wxThePenList->FindOrCreatePen( | |
16553659 | 157 | FortyApp::BackgroundColour(), |
63cafd27 JS |
158 | 1, |
159 | wxSOLID | |
160 | ); | |
16553659 | 161 | dc.SetPen(* pen); |
63cafd27 | 162 | dc.SetBrush(FortyApp::BackgroundBrush()); |
fc799548 | 163 | dc.DrawRectangle(x, y, m_width, m_height); |
63cafd27 JS |
164 | } // Card::Erase() |
165 | ||
166 | ||
167 | //+-------------------------------------------------------------+ | |
168 | //| Card::Draw() | | |
169 | //+-------------------------------------------------------------+ | |
170 | //| Description: | | |
171 | //| Draw the card at (x, y). | | |
172 | //| If the card is facedown draw the back of the card. | | |
173 | //| If the card is faceup draw the front of the card. | | |
174 | //| Cards are not held in bitmaps, instead they are drawn | | |
175 | //| from their constituent parts when required. | | |
176 | //| hbmap_symbols contains large and small suit symbols and | | |
177 | //| pip values. These are copied to the appropriate part of | | |
178 | //| the card. Picture cards use the pictures defined in | | |
179 | //| hbmap_pictures. Note that only one picture is defined | | |
180 | //| for the Jack, Queen and King, unlike a real pack where | | |
181 | //| each suit is different. | | |
182 | //| | | |
183 | //| WARNING: | | |
184 | //| The locations of these symbols is 'hard-wired' into the | | |
185 | //| code. Editing the bitmaps or the numbers below will | | |
186 | //| result in the wrong symbols being displayed. | | |
187 | //+-------------------------------------------------------------+ | |
188 | void Card::Draw(wxDC& dc, int x, int y) | |
189 | { | |
f234c60c | 190 | wxBrush backgroundBrush( dc.GetBackground() ); |
16553659 JS |
191 | dc.SetBrush(* wxWHITE_BRUSH); |
192 | dc.SetPen(* wxBLACK_PEN); | |
fc799548 | 193 | dc.DrawRoundedRectangle(x, y, m_width, m_height, 4); |
63cafd27 JS |
194 | if (m_wayUp == facedown) |
195 | { | |
16553659 | 196 | dc.SetBackground(* wxRED_BRUSH); |
63cafd27 JS |
197 | dc.SetBackgroundMode(wxSOLID); |
198 | wxBrush* brush = wxTheBrushList->FindOrCreateBrush( | |
f37c24e0 | 199 | _T("BLACK"), wxCROSSDIAG_HATCH |
63cafd27 | 200 | ); |
16553659 | 201 | dc.SetBrush(* brush); |
63cafd27 JS |
202 | |
203 | dc.DrawRoundedRectangle( | |
204 | x + 4, y + 4, | |
fc799548 | 205 | m_width - 8, m_height - 8, |
63cafd27 JS |
206 | 2 |
207 | ); | |
208 | } | |
209 | else | |
210 | { | |
211 | wxMemoryDC memoryDC; | |
fc799548 JS |
212 | |
213 | memoryDC.SelectObject(*m_symbolBmap); | |
63cafd27 JS |
214 | |
215 | // dc.SetBackgroundMode(wxTRANSPARENT); | |
216 | ||
217 | dc.SetTextBackground(*wxWHITE); | |
218 | switch (m_suit) | |
219 | { | |
220 | case spades: | |
221 | case clubs: | |
222 | dc.SetTextForeground(*wxBLACK); | |
223 | break; | |
224 | case diamonds: | |
225 | case hearts: | |
226 | dc.SetTextForeground(*wxRED); | |
227 | break; | |
228 | } | |
fc799548 JS |
229 | |
230 | int symsize = 11; | |
231 | int sympos = 14; | |
232 | int sympos2 = 25; | |
233 | int symdist = 5; | |
234 | int symdist2 = 6; | |
235 | ||
236 | int pipsize,pippos,valueheight,valuewidth; | |
237 | int valuepos; | |
238 | if (m_scale > 1.2) | |
239 | { | |
240 | pipsize = symsize; | |
241 | pippos = sympos; | |
242 | valueheight = 10; | |
243 | valuewidth = 9; | |
244 | valuepos = 50; | |
245 | } | |
246 | else | |
247 | { | |
248 | pipsize = 7; | |
249 | pippos = 0; | |
250 | valueheight = 7; | |
251 | valuewidth = 6; | |
252 | valuepos = 36; | |
253 | } | |
254 | ||
63cafd27 | 255 | // Draw the value |
babd36de | 256 | dc.Blit((wxCoord)(x + m_scale*3), (wxCoord)(y + m_scale*3), valuewidth, valueheight, |
fc799548 | 257 | &memoryDC, valuewidth * (m_pipValue - 1), valuepos, wxCOPY); |
babd36de | 258 | dc.Blit((wxCoord)(x + m_width - m_scale*3 - valuewidth), (wxCoord)(y + m_height - valueheight - m_scale*3), |
fc799548 JS |
259 | valuewidth, valueheight, |
260 | &memoryDC, valuewidth * (m_pipValue - 1), valuepos+valueheight, wxCOPY); | |
63cafd27 JS |
261 | |
262 | // Draw the pips | |
babd36de | 263 | dc.Blit((wxCoord)(x + m_scale*3 + valuewidth+2), (wxCoord)(y + m_scale*3), pipsize, pipsize, |
fc799548 | 264 | &memoryDC, pipsize * m_suit, pippos, wxCOPY); |
babd36de | 265 | dc.Blit((wxCoord)(x + m_width - m_scale*3-valuewidth-pipsize-2), (wxCoord)(y + m_height - pipsize - m_scale*3), |
fc799548 JS |
266 | pipsize, pipsize, |
267 | &memoryDC, pipsize * m_suit, pipsize+pippos, wxCOPY); | |
63cafd27 JS |
268 | |
269 | switch (m_pipValue) | |
270 | { | |
271 | case 1: | |
babd36de | 272 | dc.Blit((wxCoord)(x - symdist + m_width / 2), (wxCoord)(y - m_scale*5 + m_height / 2), symsize, symsize, |
fc799548 | 273 | &memoryDC, symsize * m_suit, sympos, wxCOPY); |
63cafd27 JS |
274 | break; |
275 | ||
276 | case 3: | |
babd36de | 277 | dc.Blit((wxCoord)(x - symdist + m_width / 2), (wxCoord)(y - symdist + m_height / 2), symsize, symsize, |
fc799548 | 278 | &memoryDC, symsize * m_suit, sympos, wxCOPY); |
63cafd27 | 279 | case 2: |
babd36de JS |
280 | dc.Blit((wxCoord)(x - symdist + m_width / 2), |
281 | (wxCoord)(y - symdist + m_height / 4), symsize, symsize, | |
fc799548 | 282 | &memoryDC, symsize * m_suit, sympos, wxCOPY); |
babd36de JS |
283 | dc.Blit((wxCoord)(x - symdist + m_width / 2), |
284 | (wxCoord)(y - symdist + 3 * m_height / 4), symsize, symsize, | |
fc799548 | 285 | &memoryDC, symsize * m_suit, sympos2, wxCOPY); |
63cafd27 JS |
286 | break; |
287 | ||
288 | case 5: | |
babd36de | 289 | dc.Blit((wxCoord)(x - symdist + m_width / 2), (wxCoord)(y - symdist + m_height / 2), symsize, symsize, |
fc799548 | 290 | &memoryDC, symsize * m_suit, sympos, wxCOPY); |
63cafd27 | 291 | case 4: |
babd36de JS |
292 | dc.Blit((wxCoord)(x - symdist + m_width / 4), |
293 | (wxCoord)(y - symdist + m_height / 4), symsize, symsize, | |
fc799548 | 294 | &memoryDC, symsize * m_suit, sympos, wxCOPY); |
babd36de JS |
295 | dc.Blit((wxCoord)(x - symdist + m_width / 4), |
296 | (wxCoord)(y - symdist + 3 * m_height / 4), symsize, symsize, | |
fc799548 | 297 | &memoryDC, symsize * m_suit, sympos2, wxCOPY); |
babd36de JS |
298 | dc.Blit((wxCoord)(x - symdist + 3 * m_width / 4), |
299 | (wxCoord)(y - symdist + m_height / 4), symsize, symsize, | |
fc799548 | 300 | &memoryDC, symsize * m_suit, sympos, wxCOPY); |
babd36de JS |
301 | dc.Blit((wxCoord)(x - symdist + 3 * m_width / 4), |
302 | (wxCoord)(y - symdist + 3 * m_height / 4), symsize, symsize, | |
fc799548 | 303 | &memoryDC, symsize * m_suit, sympos2, wxCOPY); |
63cafd27 JS |
304 | break; |
305 | ||
306 | case 8: | |
babd36de JS |
307 | dc.Blit((wxCoord)(x - symdist + 5 * m_width / 10), |
308 | (wxCoord)(y - symdist + 5 * m_height / 8), symsize, symsize, | |
fc799548 | 309 | &memoryDC, symsize * m_suit, sympos2, wxCOPY); |
63cafd27 | 310 | case 7: |
babd36de JS |
311 | dc.Blit((wxCoord)(x - symdist + 5 * m_width / 10), |
312 | (wxCoord)(y - symdist + 3 * m_height / 8), symsize, symsize, | |
fc799548 | 313 | &memoryDC, symsize * m_suit, sympos, wxCOPY); |
63cafd27 | 314 | case 6: |
babd36de JS |
315 | dc.Blit((wxCoord)(x - symdist + m_width / 4), |
316 | (wxCoord)(y - symdist + m_height / 4), symsize, symsize, | |
fc799548 | 317 | &memoryDC, symsize * m_suit, sympos, wxCOPY); |
babd36de JS |
318 | dc.Blit((wxCoord)(x - symdist + m_width / 4), |
319 | (wxCoord)(y - symdist + m_height / 2), symsize, symsize, | |
fc799548 | 320 | &memoryDC, symsize * m_suit, sympos, wxCOPY); |
babd36de JS |
321 | dc.Blit((wxCoord)(x - symdist + m_width / 4), |
322 | (wxCoord)(y - symdist + 3 * m_height / 4), symsize, symsize, | |
fc799548 | 323 | &memoryDC, symsize * m_suit, sympos2, wxCOPY); |
babd36de JS |
324 | dc.Blit((wxCoord)(x - symdist + 3 * m_width / 4), |
325 | (wxCoord)(y - symdist + m_height / 4), symsize, symsize, | |
fc799548 | 326 | &memoryDC, symsize * m_suit, sympos, wxCOPY); |
babd36de JS |
327 | dc.Blit((wxCoord)(x - symdist + 3 * m_width / 4), |
328 | (wxCoord)(y - symdist + m_height / 2), symsize, symsize, | |
fc799548 | 329 | &memoryDC, symsize * m_suit, sympos, wxCOPY); |
babd36de JS |
330 | dc.Blit((wxCoord)(x - symdist + 3 * m_width / 4), |
331 | (wxCoord)(y - symdist + 3 * m_height / 4), symsize, symsize, | |
fc799548 | 332 | &memoryDC, symsize * m_suit, sympos2, wxCOPY); |
63cafd27 JS |
333 | break; |
334 | ||
335 | case 10: | |
babd36de JS |
336 | dc.Blit((wxCoord)(x - symdist + m_width / 2), |
337 | (wxCoord)(y - symdist + 2 * m_height / 3), symsize, symsize, | |
fc799548 | 338 | &memoryDC, symsize * m_suit, sympos2, wxCOPY); |
63cafd27 | 339 | case 9: |
babd36de JS |
340 | dc.Blit((wxCoord)(x - symdist + m_width / 4), |
341 | (wxCoord)(y - symdist2 + m_height / 4), symsize, symsize, | |
fc799548 | 342 | &memoryDC, symsize * m_suit, sympos, wxCOPY); |
babd36de JS |
343 | dc.Blit((wxCoord)(x - symdist + m_width / 4), |
344 | (wxCoord)(y - symdist2 + 5 * m_height / 12), symsize, symsize, | |
fc799548 | 345 | &memoryDC, symsize * m_suit, sympos, wxCOPY); |
babd36de JS |
346 | dc.Blit((wxCoord)(x - symdist + m_width / 4), |
347 | (wxCoord)(y - symdist + 7 * m_height / 12), symsize, symsize, | |
fc799548 | 348 | &memoryDC, symsize * m_suit, sympos2, wxCOPY); |
babd36de JS |
349 | dc.Blit((wxCoord)(x - symdist + m_width / 4), |
350 | (wxCoord)(y - symdist + 3 * m_height / 4), symsize, symsize, | |
fc799548 JS |
351 | &memoryDC, symsize * m_suit, sympos2, wxCOPY); |
352 | ||
babd36de JS |
353 | dc.Blit((wxCoord)(x - symdist + 3 * m_width / 4), |
354 | (wxCoord)(y - symdist2 + m_height / 4), symsize, symsize, | |
fc799548 | 355 | &memoryDC, symsize * m_suit, sympos, wxCOPY); |
babd36de JS |
356 | dc.Blit((wxCoord)(x - symdist + 3 * m_width / 4), |
357 | (wxCoord)(y - symdist2 + 5 * m_height / 12), symsize, symsize, | |
fc799548 | 358 | &memoryDC, symsize * m_suit, sympos, wxCOPY); |
babd36de JS |
359 | dc.Blit((wxCoord)(x - symdist + 3 * m_width / 4), |
360 | (wxCoord)(y - symdist + 7 * m_height / 12), symsize, symsize, | |
fc799548 | 361 | &memoryDC, symsize * m_suit, sympos2, wxCOPY); |
babd36de JS |
362 | dc.Blit((wxCoord)(x - symdist + 3 * m_width / 4), |
363 | (wxCoord)(y - symdist + 3 * m_height / 4), symsize, symsize, | |
fc799548 | 364 | &memoryDC, symsize * m_suit, sympos2, wxCOPY); |
babd36de JS |
365 | dc.Blit((wxCoord)(x - symdist + m_width / 2), |
366 | (wxCoord)(y - symdist + m_height / 3), symsize, symsize, | |
fc799548 | 367 | &memoryDC, symsize * m_suit, sympos, wxCOPY); |
63cafd27 JS |
368 | break; |
369 | case 11: | |
370 | case 12: | |
371 | case 13: | |
fc799548 JS |
372 | memoryDC.SelectObject(*m_pictureBmap); |
373 | int picwidth = 40,picheight = 45; | |
babd36de | 374 | dc.Blit((wxCoord)(x + (m_width-picwidth)/2), (wxCoord)(y - picheight/2 + m_height/2), |
fc799548 JS |
375 | picwidth, picheight, |
376 | &memoryDC, picwidth * (m_pipValue - 11), 0, wxCOPY); | |
377 | ||
378 | memoryDC.SelectObject(*m_symbolBmap); | |
babd36de | 379 | dc.Blit((wxCoord)(x + m_width-(m_width-picwidth)/2-symsize-3),(wxCoord)(y - picheight/2+m_height/2+1), symsize, symsize, |
fc799548 | 380 | &memoryDC, symsize * m_suit, sympos, wxCOPY); |
babd36de | 381 | dc.Blit((wxCoord)(x + (m_width-picwidth)/2+2),(wxCoord)(y + picheight/2 + m_height/2-symsize), symsize, symsize, |
fc799548 | 382 | &memoryDC, symsize * m_suit, sympos2, wxCOPY); |
63cafd27 JS |
383 | break; |
384 | } | |
385 | ||
386 | } | |
f234c60c | 387 | dc.SetBackground( backgroundBrush ); |
63cafd27 JS |
388 | } // Card:Draw() |
389 | ||
390 | ||
391 | //+-------------------------------------------------------------+ | |
392 | //| Card::DrawNullCard() | | |
393 | //+-------------------------------------------------------------+ | |
394 | //| Description: | | |
395 | //| Draws the outline of a card at (x, y). | | |
396 | //| Used to draw place holders for empty piles of cards. | | |
397 | //+-------------------------------------------------------------+ | |
398 | void Card::DrawNullCard(wxDC& dc, int x, int y) | |
399 | { | |
16553659 | 400 | wxPen* pen = wxThePenList->FindOrCreatePen(FortyApp::TextColour(), 1, wxSOLID); |
63cafd27 | 401 | dc.SetBrush(FortyApp::BackgroundBrush()); |
16553659 | 402 | dc.SetPen(*pen); |
fc799548 | 403 | dc.DrawRoundedRectangle(x, y, m_width, m_height, 4); |
63cafd27 JS |
404 | } // Card::DrawNullCard() |
405 | ||
406 |