]> git.saurik.com Git - wxWidgets.git/blob - demos/forty/forty.cpp
fbf0f1c546471b007f16c14a7b39357b105eee16
[wxWidgets.git] / demos / forty / forty.cpp
1 /////////////////////////////////////////////////////////////////////////////
2 // Name: forty.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
14 #ifdef __GNUG__
15 #pragma implementation
16 #pragma interface
17 #endif
18
19 // For compilers that support precompilation, includes "wx/wx.h".
20 #include "wx/wxprec.h"
21
22 #ifdef __BORLANDC__
23 #pragma hdrstop
24 #endif
25
26 #ifndef WX_PRECOMP
27 #include "wx/wx.h"
28 #endif
29
30 #include "canvas.h"
31 #include "forty.h"
32 #include "card.h"
33 #include "scoredg.h"
34
35 BEGIN_EVENT_TABLE(FortyFrame, wxFrame)
36 EVT_MENU(NEW_GAME, FortyFrame::NewGame)
37 EVT_MENU(EXIT, FortyFrame::Exit)
38 EVT_MENU(ABOUT, FortyFrame::About)
39 EVT_MENU(UNDO, FortyFrame::Undo)
40 EVT_MENU(REDO, FortyFrame::Redo)
41 EVT_MENU(SCORES, FortyFrame::Scores)
42 EVT_MENU(RIGHT_BUTTON_UNDO, FortyFrame::ToggleRightButtonUndo)
43 EVT_MENU(HELPING_HAND, FortyFrame::ToggleHelpingHand)
44 EVT_MENU(LARGE_CARDS, FortyFrame::ToggleCardSize)
45 EVT_CLOSE(FortyFrame::OnCloseWindow)
46 END_EVENT_TABLE()
47
48 // Create a new application object
49 IMPLEMENT_APP (FortyApp)
50
51 wxColour* FortyApp::m_backgroundColour = 0;
52 wxColour* FortyApp::m_textColour = 0;
53 wxBrush* FortyApp::m_backgroundBrush = 0;
54
55 bool FortyApp::OnInit()
56 {
57 bool largecards = FALSE;
58 wxSize size(668,510);
59
60 if ((argc > 1) && (!wxStrcmp(argv[1],"-L")))
61 {
62 largecards = TRUE;
63 size = wxSize(1000,750);
64 }
65
66 FortyFrame* frame = new FortyFrame(
67 0,
68 "Forty Thieves",
69 -1, -1, size.x, size.y,largecards
70 );
71
72 // Show the frame
73 frame->Show(TRUE);
74
75 frame->GetCanvas()->ShowPlayerDialog();
76
77 return TRUE;
78 }
79
80 const wxColour& FortyApp::BackgroundColour()
81 {
82 if (!m_backgroundColour)
83 {
84 m_backgroundColour = new wxColour(0, 128, 0);
85 }
86
87 return *m_backgroundColour;
88 }
89
90 const wxBrush& FortyApp::BackgroundBrush()
91 {
92 if (!m_backgroundBrush)
93 {
94 m_backgroundBrush = new wxBrush(BackgroundColour(), wxSOLID);
95 }
96
97 return *m_backgroundBrush;
98 }
99
100 const wxColour& FortyApp::TextColour()
101 {
102 if (!m_textColour)
103 {
104 m_textColour = new wxColour("BLACK");
105 }
106
107 return *m_textColour;
108 }
109
110 // My frame constructor
111 FortyFrame::FortyFrame(wxFrame* frame, char* title, int x, int y, int w, int h,bool largecards):
112 wxFrame(frame, -1, title, wxPoint(x, y), wxSize(w, h))
113 {
114 #ifdef __WXMAC__
115 // we need this in order to allow the about menu relocation, since ABOUT is not the default id of the about menu
116 wxApp::s_macAboutMenuItemId = ABOUT ;
117 #endif
118 // set the icon
119 #ifdef __WXMSW__
120 SetIcon(wxIcon("CardsIcon"));
121 #else
122 #ifdef GTK_TBD
123 SetIcon(wxIcon(Cards_bits, Cards_width, Cards_height));
124 #endif
125 #endif
126
127 // Make a menu bar
128 wxMenu* gameMenu = new wxMenu;
129 gameMenu->Append(NEW_GAME, "&New", "Start a new game");
130 gameMenu->Append(SCORES, "&Scores...", "Displays scores");
131 gameMenu->Append(EXIT, "E&xit", "Exits Forty Thieves");
132
133 wxMenu* editMenu = new wxMenu;
134 editMenu->Append(UNDO, "&Undo", "Undo the last move");
135 editMenu->Append(REDO, "&Redo", "Redo a move that has been undone");
136
137 wxMenu* optionsMenu = new wxMenu;
138 optionsMenu->Append(RIGHT_BUTTON_UNDO,
139 "&Right button undo",
140 "Enables/disables right mouse button undo and redo",
141 TRUE
142 );
143 optionsMenu->Append(HELPING_HAND,
144 "&Helping hand",
145 "Enables/disables hand cursor when a card can be moved",
146 TRUE
147 );
148 optionsMenu->Append(LARGE_CARDS,
149 "&Large cards",
150 "Enables/disables large cards for high resolution displays",
151 TRUE
152 );
153 optionsMenu->Check(HELPING_HAND, TRUE);
154 optionsMenu->Check(RIGHT_BUTTON_UNDO, TRUE);
155 optionsMenu->Check(LARGE_CARDS, largecards ? TRUE : FALSE);
156
157 wxMenu* helpMenu = new wxMenu;
158 helpMenu->Append(ABOUT, "&About", "Displays program version information");
159
160 m_menuBar = new wxMenuBar;
161 m_menuBar->Append(gameMenu, "&Game");
162 m_menuBar->Append(editMenu, "&Edit");
163 m_menuBar->Append(optionsMenu, "&Options");
164 m_menuBar->Append(helpMenu, "&Help");
165
166 SetMenuBar(m_menuBar);
167
168 if (largecards)
169 Card::SetScale(1.3);
170
171 m_canvas = new FortyCanvas(this, 0, 0, 400, 400);
172 wxLayoutConstraints* constr = new wxLayoutConstraints;
173 constr->left.SameAs(this, wxLeft);
174 constr->top.SameAs(this, wxTop);
175 constr->right.SameAs(this, wxRight);
176 constr->height.SameAs(this, wxHeight);
177 m_canvas->SetConstraints(constr);
178
179 CreateStatusBar();
180 }
181
182 FortyFrame::~FortyFrame()
183 {
184 }
185
186 void FortyFrame::OnCloseWindow(wxCloseEvent& event)
187 {
188 if (m_canvas->OnCloseCanvas() )
189 {
190 this->Destroy();
191 }
192 else
193 event.Veto();
194 }
195
196 void
197 FortyFrame::NewGame(wxCommandEvent&)
198 {
199 m_canvas->NewGame();
200 }
201
202 void
203 FortyFrame::Exit(wxCommandEvent&)
204 {
205 #ifdef __WXGTK__
206 // wxGTK doesn't call OnClose() so we do it here
207 // if (OnClose())
208 #endif
209 Close(TRUE);
210 }
211
212 void
213 FortyFrame::About(wxCommandEvent&)
214 {
215 wxMessageBox(
216 "Forty Thieves\n\n"
217 "A freeware program using the wxWindows\n"
218 "portable C++ GUI toolkit.\n"
219 "http://www.wxwindows.org\n"
220 "http://www.freiburg.linux.de/~wxxt\n\n"
221 "Author: Chris Breeze (c) 1992-1998\n"
222 "email: chris.breeze@iname.com",
223 "About Forty Thieves",
224 wxOK, this
225 );
226 }
227
228 void
229 FortyFrame::Undo(wxCommandEvent&)
230 {
231 m_canvas->Undo();
232 }
233
234 void
235 FortyFrame::Redo(wxCommandEvent&)
236 {
237 m_canvas->Redo();
238 }
239
240 void
241 FortyFrame::Scores(wxCommandEvent&)
242 {
243 m_canvas->UpdateScores();
244 ScoreDialog scores(this, m_canvas->GetScoreFile());
245 scores.Display();
246 }
247
248 void
249 FortyFrame::ToggleRightButtonUndo(wxCommandEvent& event)
250 {
251 bool checked = m_menuBar->IsChecked(event.GetId());
252 m_canvas->EnableRightButtonUndo(checked);
253 }
254
255 void
256 FortyFrame::ToggleHelpingHand(wxCommandEvent& event)
257 {
258 bool checked = m_menuBar->IsChecked(event.GetId());
259 m_canvas->EnableHelpingHand(checked);
260 }
261
262 void
263 FortyFrame::ToggleCardSize(wxCommandEvent& event)
264 {
265 bool checked = m_menuBar->IsChecked(event.GetId());
266 Card::SetScale(checked ? 1.3 : 1);
267 m_canvas->LayoutGame();
268 m_canvas->Refresh();
269 }
270
271