annotate dmsimple.c @ 620:5fda51e99fe5

More work.
author Matti Hamalainen <ccr@tnsp.org>
date Sat, 13 Apr 2013 01:27:25 +0300
parents 6c23042c546f
children 3a9d92533312
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
rev   line source
310
713c8018c3ce Fix includes in the dmsimple engine.
Matti Hamalainen <ccr@tnsp.org>
parents: 278
diff changeset
1 #include <SDL.h>
342
c6ec970dc3cf Separate some demo engine parts to two different modules.
Matti Hamalainen <ccr@tnsp.org>
parents: 336
diff changeset
2 #include "dmengine.h"
310
713c8018c3ce Fix includes in the dmsimple engine.
Matti Hamalainen <ccr@tnsp.org>
parents: 278
diff changeset
3 #include "dmargs.h"
593
17bf1704d42e More work on video setup.
Matti Hamalainen <ccr@tnsp.org>
parents: 591
diff changeset
4 #include "dmtext.h"
17bf1704d42e More work on video setup.
Matti Hamalainen <ccr@tnsp.org>
parents: 591
diff changeset
5 #include "dmimage.h"
591
f165883c2ea6 #include the default setup image and font.
Matti Hamalainen <ccr@tnsp.org>
parents: 578
diff changeset
6 #include "setupfont.h"
f165883c2ea6 #include the default setup image and font.
Matti Hamalainen <ccr@tnsp.org>
parents: 578
diff changeset
7 #include "setupimage.h"
608
9620208f7ff4 More work on setup.
Matti Hamalainen <ccr@tnsp.org>
parents: 603
diff changeset
8 #include "setupmenubar.h"
591
f165883c2ea6 #include the default setup image and font.
Matti Hamalainen <ccr@tnsp.org>
parents: 578
diff changeset
9
603
36b544eb6f4b Fixes in resource management.
Matti Hamalainen <ccr@tnsp.org>
parents: 600
diff changeset
10 static const char *engineSetupImageName = "SetupImage.png";
608
9620208f7ff4 More work on setup.
Matti Hamalainen <ccr@tnsp.org>
parents: 603
diff changeset
11 static const char *engineSetupMenuBarName = "SetupMenuBar.png";
603
36b544eb6f4b Fixes in resource management.
Matti Hamalainen <ccr@tnsp.org>
parents: 600
diff changeset
12 static const char *engineSetupFontName = "SetupFont.dmf";
32
d1a6833a5d67 Added a simple demo engine core.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
13
366
38e10b5f4e09 Work towards base engine re-entrancy.
Matti Hamalainen <ccr@tnsp.org>
parents: 361
diff changeset
14 static DMEngineData engine;
38e10b5f4e09 Work towards base engine re-entrancy.
Matti Hamalainen <ccr@tnsp.org>
parents: 361
diff changeset
15
121
16fc6e6cf3b5 Move option handling to the simple demo engine.
Matti Hamalainen <ccr@tnsp.org>
parents: 113
diff changeset
16 static DMOptArg optList[] =
16fc6e6cf3b5 Move option handling to the simple demo engine.
Matti Hamalainen <ccr@tnsp.org>
parents: 113
diff changeset
17 {
16fc6e6cf3b5 Move option handling to the simple demo engine.
Matti Hamalainen <ccr@tnsp.org>
parents: 113
diff changeset
18 { 0, '?', "help", "Show this help", OPT_NONE },
16fc6e6cf3b5 Move option handling to the simple demo engine.
Matti Hamalainen <ccr@tnsp.org>
parents: 113
diff changeset
19 { 1, 'v', "verbose", "Be more verbose", OPT_NONE },
16fc6e6cf3b5 Move option handling to the simple demo engine.
Matti Hamalainen <ccr@tnsp.org>
parents: 113
diff changeset
20 };
16fc6e6cf3b5 Move option handling to the simple demo engine.
Matti Hamalainen <ccr@tnsp.org>
parents: 113
diff changeset
21
16fc6e6cf3b5 Move option handling to the simple demo engine.
Matti Hamalainen <ccr@tnsp.org>
parents: 113
diff changeset
22 const int optListN = sizeof(optList) / sizeof(optList[0]);
16fc6e6cf3b5 Move option handling to the simple demo engine.
Matti Hamalainen <ccr@tnsp.org>
parents: 113
diff changeset
23
16fc6e6cf3b5 Move option handling to the simple demo engine.
Matti Hamalainen <ccr@tnsp.org>
parents: 113
diff changeset
24
16fc6e6cf3b5 Move option handling to the simple demo engine.
Matti Hamalainen <ccr@tnsp.org>
parents: 113
diff changeset
25
16fc6e6cf3b5 Move option handling to the simple demo engine.
Matti Hamalainen <ccr@tnsp.org>
parents: 113
diff changeset
26 static void argShowHelp()
16fc6e6cf3b5 Move option handling to the simple demo engine.
Matti Hamalainen <ccr@tnsp.org>
parents: 113
diff changeset
27 {
16fc6e6cf3b5 Move option handling to the simple demo engine.
Matti Hamalainen <ccr@tnsp.org>
parents: 113
diff changeset
28 dmPrintBanner(stdout, dmProgName, "[options]");
16fc6e6cf3b5 Move option handling to the simple demo engine.
Matti Hamalainen <ccr@tnsp.org>
parents: 113
diff changeset
29 dmArgsPrintHelp(stdout, optList, optListN);
16fc6e6cf3b5 Move option handling to the simple demo engine.
Matti Hamalainen <ccr@tnsp.org>
parents: 113
diff changeset
30 }
16fc6e6cf3b5 Move option handling to the simple demo engine.
Matti Hamalainen <ccr@tnsp.org>
parents: 113
diff changeset
31
16fc6e6cf3b5 Move option handling to the simple demo engine.
Matti Hamalainen <ccr@tnsp.org>
parents: 113
diff changeset
32
16fc6e6cf3b5 Move option handling to the simple demo engine.
Matti Hamalainen <ccr@tnsp.org>
parents: 113
diff changeset
33 static BOOL argHandleOpt(const int optN, char *optArg, char *currArg)
16fc6e6cf3b5 Move option handling to the simple demo engine.
Matti Hamalainen <ccr@tnsp.org>
parents: 113
diff changeset
34 {
16fc6e6cf3b5 Move option handling to the simple demo engine.
Matti Hamalainen <ccr@tnsp.org>
parents: 113
diff changeset
35 (void) optArg;
16fc6e6cf3b5 Move option handling to the simple demo engine.
Matti Hamalainen <ccr@tnsp.org>
parents: 113
diff changeset
36
16fc6e6cf3b5 Move option handling to the simple demo engine.
Matti Hamalainen <ccr@tnsp.org>
parents: 113
diff changeset
37 switch (optN)
16fc6e6cf3b5 Move option handling to the simple demo engine.
Matti Hamalainen <ccr@tnsp.org>
parents: 113
diff changeset
38 {
16fc6e6cf3b5 Move option handling to the simple demo engine.
Matti Hamalainen <ccr@tnsp.org>
parents: 113
diff changeset
39 case 0:
16fc6e6cf3b5 Move option handling to the simple demo engine.
Matti Hamalainen <ccr@tnsp.org>
parents: 113
diff changeset
40 argShowHelp();
16fc6e6cf3b5 Move option handling to the simple demo engine.
Matti Hamalainen <ccr@tnsp.org>
parents: 113
diff changeset
41 exit(0);
16fc6e6cf3b5 Move option handling to the simple demo engine.
Matti Hamalainen <ccr@tnsp.org>
parents: 113
diff changeset
42 break;
16fc6e6cf3b5 Move option handling to the simple demo engine.
Matti Hamalainen <ccr@tnsp.org>
parents: 113
diff changeset
43
16fc6e6cf3b5 Move option handling to the simple demo engine.
Matti Hamalainen <ccr@tnsp.org>
parents: 113
diff changeset
44 case 1:
16fc6e6cf3b5 Move option handling to the simple demo engine.
Matti Hamalainen <ccr@tnsp.org>
parents: 113
diff changeset
45 dmVerbosity++;
16fc6e6cf3b5 Move option handling to the simple demo engine.
Matti Hamalainen <ccr@tnsp.org>
parents: 113
diff changeset
46 break;
16fc6e6cf3b5 Move option handling to the simple demo engine.
Matti Hamalainen <ccr@tnsp.org>
parents: 113
diff changeset
47
16fc6e6cf3b5 Move option handling to the simple demo engine.
Matti Hamalainen <ccr@tnsp.org>
parents: 113
diff changeset
48 default:
16fc6e6cf3b5 Move option handling to the simple demo engine.
Matti Hamalainen <ccr@tnsp.org>
parents: 113
diff changeset
49 dmError("Unknown option '%s'.\n", currArg);
16fc6e6cf3b5 Move option handling to the simple demo engine.
Matti Hamalainen <ccr@tnsp.org>
parents: 113
diff changeset
50 return FALSE;
16fc6e6cf3b5 Move option handling to the simple demo engine.
Matti Hamalainen <ccr@tnsp.org>
parents: 113
diff changeset
51 }
16fc6e6cf3b5 Move option handling to the simple demo engine.
Matti Hamalainen <ccr@tnsp.org>
parents: 113
diff changeset
52
16fc6e6cf3b5 Move option handling to the simple demo engine.
Matti Hamalainen <ccr@tnsp.org>
parents: 113
diff changeset
53 return TRUE;
16fc6e6cf3b5 Move option handling to the simple demo engine.
Matti Hamalainen <ccr@tnsp.org>
parents: 113
diff changeset
54 }
16fc6e6cf3b5 Move option handling to the simple demo engine.
Matti Hamalainen <ccr@tnsp.org>
parents: 113
diff changeset
55
16fc6e6cf3b5 Move option handling to the simple demo engine.
Matti Hamalainen <ccr@tnsp.org>
parents: 113
diff changeset
56
342
c6ec970dc3cf Separate some demo engine parts to two different modules.
Matti Hamalainen <ccr@tnsp.org>
parents: 336
diff changeset
57 static void engineAudioCallback(void *userdata, Uint8 *stream, int len)
c6ec970dc3cf Separate some demo engine parts to two different modules.
Matti Hamalainen <ccr@tnsp.org>
parents: 336
diff changeset
58 {
c6ec970dc3cf Separate some demo engine parts to two different modules.
Matti Hamalainen <ccr@tnsp.org>
parents: 336
diff changeset
59 (void) userdata;
c6ec970dc3cf Separate some demo engine parts to two different modules.
Matti Hamalainen <ccr@tnsp.org>
parents: 336
diff changeset
60
c6ec970dc3cf Separate some demo engine parts to two different modules.
Matti Hamalainen <ccr@tnsp.org>
parents: 336
diff changeset
61 if (engine.paused)
c6ec970dc3cf Separate some demo engine parts to two different modules.
Matti Hamalainen <ccr@tnsp.org>
parents: 336
diff changeset
62 {
c6ec970dc3cf Separate some demo engine parts to two different modules.
Matti Hamalainen <ccr@tnsp.org>
parents: 336
diff changeset
63 memset(stream, 0, len);
c6ec970dc3cf Separate some demo engine parts to two different modules.
Matti Hamalainen <ccr@tnsp.org>
parents: 336
diff changeset
64 }
c6ec970dc3cf Separate some demo engine parts to two different modules.
Matti Hamalainen <ccr@tnsp.org>
parents: 336
diff changeset
65 else
c6ec970dc3cf Separate some demo engine parts to two different modules.
Matti Hamalainen <ccr@tnsp.org>
parents: 336
diff changeset
66 #ifdef DM_USE_JSS
c6ec970dc3cf Separate some demo engine parts to two different modules.
Matti Hamalainen <ccr@tnsp.org>
parents: 336
diff changeset
67 {
c6ec970dc3cf Separate some demo engine parts to two different modules.
Matti Hamalainen <ccr@tnsp.org>
parents: 336
diff changeset
68 if (engine.dev != NULL)
c6ec970dc3cf Separate some demo engine parts to two different modules.
Matti Hamalainen <ccr@tnsp.org>
parents: 336
diff changeset
69 jvmRenderAudio(engine.dev, stream, len / jvmGetSampleSize(engine.dev));
c6ec970dc3cf Separate some demo engine parts to two different modules.
Matti Hamalainen <ccr@tnsp.org>
parents: 336
diff changeset
70 }
c6ec970dc3cf Separate some demo engine parts to two different modules.
Matti Hamalainen <ccr@tnsp.org>
parents: 336
diff changeset
71 #endif
c6ec970dc3cf Separate some demo engine parts to two different modules.
Matti Hamalainen <ccr@tnsp.org>
parents: 336
diff changeset
72 #ifdef DM_USE_TREMOR
361
bf60f60cafba Fix engine breakage.
Matti Hamalainen <ccr@tnsp.org>
parents: 359
diff changeset
73 if (engine.audioPos + len >= engine.audioRes->rdataSize)
342
c6ec970dc3cf Separate some demo engine parts to two different modules.
Matti Hamalainen <ccr@tnsp.org>
parents: 336
diff changeset
74 {
c6ec970dc3cf Separate some demo engine parts to two different modules.
Matti Hamalainen <ccr@tnsp.org>
parents: 336
diff changeset
75 engine.exitFlag = TRUE;
c6ec970dc3cf Separate some demo engine parts to two different modules.
Matti Hamalainen <ccr@tnsp.org>
parents: 336
diff changeset
76 }
c6ec970dc3cf Separate some demo engine parts to two different modules.
Matti Hamalainen <ccr@tnsp.org>
parents: 336
diff changeset
77 else
c6ec970dc3cf Separate some demo engine parts to two different modules.
Matti Hamalainen <ccr@tnsp.org>
parents: 336
diff changeset
78 {
361
bf60f60cafba Fix engine breakage.
Matti Hamalainen <ccr@tnsp.org>
parents: 359
diff changeset
79 memcpy(stream, engine.audioRes->rdata + engine.audioPos, len);
342
c6ec970dc3cf Separate some demo engine parts to two different modules.
Matti Hamalainen <ccr@tnsp.org>
parents: 336
diff changeset
80 engine.audioPos += len;
c6ec970dc3cf Separate some demo engine parts to two different modules.
Matti Hamalainen <ccr@tnsp.org>
parents: 336
diff changeset
81 }
c6ec970dc3cf Separate some demo engine parts to two different modules.
Matti Hamalainen <ccr@tnsp.org>
parents: 336
diff changeset
82 #endif
c6ec970dc3cf Separate some demo engine parts to two different modules.
Matti Hamalainen <ccr@tnsp.org>
parents: 336
diff changeset
83 }
c6ec970dc3cf Separate some demo engine parts to two different modules.
Matti Hamalainen <ccr@tnsp.org>
parents: 336
diff changeset
84
c6ec970dc3cf Separate some demo engine parts to two different modules.
Matti Hamalainen <ccr@tnsp.org>
parents: 336
diff changeset
85
c6ec970dc3cf Separate some demo engine parts to two different modules.
Matti Hamalainen <ccr@tnsp.org>
parents: 336
diff changeset
86 static int engineShowProgress(int loaded, int total)
40
a239b7d4e13b Modularize progress meter.
Matti Hamalainen <ccr@tnsp.org>
parents: 32
diff changeset
87 {
a239b7d4e13b Modularize progress meter.
Matti Hamalainen <ccr@tnsp.org>
parents: 32
diff changeset
88 int dx = 60,
a239b7d4e13b Modularize progress meter.
Matti Hamalainen <ccr@tnsp.org>
parents: 32
diff changeset
89 dh = 20,
a239b7d4e13b Modularize progress meter.
Matti Hamalainen <ccr@tnsp.org>
parents: 32
diff changeset
90 dw = engine.screen->w - (2 * dx),
a239b7d4e13b Modularize progress meter.
Matti Hamalainen <ccr@tnsp.org>
parents: 32
diff changeset
91 dy = (engine.screen->h - dh) / 2;
a239b7d4e13b Modularize progress meter.
Matti Hamalainen <ccr@tnsp.org>
parents: 32
diff changeset
92
a239b7d4e13b Modularize progress meter.
Matti Hamalainen <ccr@tnsp.org>
parents: 32
diff changeset
93 if (SDL_MUSTLOCK(engine.screen) != 0 && SDL_LockSurface(engine.screen) != 0)
a239b7d4e13b Modularize progress meter.
Matti Hamalainen <ccr@tnsp.org>
parents: 32
diff changeset
94 return DMERR_INIT_FAIL;
a239b7d4e13b Modularize progress meter.
Matti Hamalainen <ccr@tnsp.org>
parents: 32
diff changeset
95
a239b7d4e13b Modularize progress meter.
Matti Hamalainen <ccr@tnsp.org>
parents: 32
diff changeset
96 // Draw the progress bar
a239b7d4e13b Modularize progress meter.
Matti Hamalainen <ccr@tnsp.org>
parents: 32
diff changeset
97 dmClearSurface(engine.screen, dmMapRGBA(engine.screen, 0,0,0,0));
a239b7d4e13b Modularize progress meter.
Matti Hamalainen <ccr@tnsp.org>
parents: 32
diff changeset
98 dmFillRect(engine.screen, dx, dy, dx+dw, dy+dh, dmMapRGB(engine.screen, 255,255,255));
a239b7d4e13b Modularize progress meter.
Matti Hamalainen <ccr@tnsp.org>
parents: 32
diff changeset
99 dmFillRect(engine.screen, dx+1, dy+1, dx+dw-1, dy+dh-1, dmMapRGB(engine.screen, 0,0,0));
a239b7d4e13b Modularize progress meter.
Matti Hamalainen <ccr@tnsp.org>
parents: 32
diff changeset
100
a239b7d4e13b Modularize progress meter.
Matti Hamalainen <ccr@tnsp.org>
parents: 32
diff changeset
101 if (total > 0)
a239b7d4e13b Modularize progress meter.
Matti Hamalainen <ccr@tnsp.org>
parents: 32
diff changeset
102 {
a239b7d4e13b Modularize progress meter.
Matti Hamalainen <ccr@tnsp.org>
parents: 32
diff changeset
103 dmFillRect(engine.screen,
a239b7d4e13b Modularize progress meter.
Matti Hamalainen <ccr@tnsp.org>
parents: 32
diff changeset
104 dx+3, dy+3,
a239b7d4e13b Modularize progress meter.
Matti Hamalainen <ccr@tnsp.org>
parents: 32
diff changeset
105 dx + 3 + ((dw - 3) * loaded) / total,
a239b7d4e13b Modularize progress meter.
Matti Hamalainen <ccr@tnsp.org>
parents: 32
diff changeset
106 dy + dh - 3,
a239b7d4e13b Modularize progress meter.
Matti Hamalainen <ccr@tnsp.org>
parents: 32
diff changeset
107 dmMapRGB(engine.screen, 200,200,200));
a239b7d4e13b Modularize progress meter.
Matti Hamalainen <ccr@tnsp.org>
parents: 32
diff changeset
108 }
a239b7d4e13b Modularize progress meter.
Matti Hamalainen <ccr@tnsp.org>
parents: 32
diff changeset
109
a239b7d4e13b Modularize progress meter.
Matti Hamalainen <ccr@tnsp.org>
parents: 32
diff changeset
110 // Flip screen
a239b7d4e13b Modularize progress meter.
Matti Hamalainen <ccr@tnsp.org>
parents: 32
diff changeset
111 if (SDL_MUSTLOCK(engine.screen) != 0)
a239b7d4e13b Modularize progress meter.
Matti Hamalainen <ccr@tnsp.org>
parents: 32
diff changeset
112 SDL_UnlockSurface(engine.screen);
a239b7d4e13b Modularize progress meter.
Matti Hamalainen <ccr@tnsp.org>
parents: 32
diff changeset
113
a239b7d4e13b Modularize progress meter.
Matti Hamalainen <ccr@tnsp.org>
parents: 32
diff changeset
114 SDL_Flip(engine.screen);
a239b7d4e13b Modularize progress meter.
Matti Hamalainen <ccr@tnsp.org>
parents: 32
diff changeset
115 return DMERR_OK;
a239b7d4e13b Modularize progress meter.
Matti Hamalainen <ccr@tnsp.org>
parents: 32
diff changeset
116 }
a239b7d4e13b Modularize progress meter.
Matti Hamalainen <ccr@tnsp.org>
parents: 32
diff changeset
117
a239b7d4e13b Modularize progress meter.
Matti Hamalainen <ccr@tnsp.org>
parents: 32
diff changeset
118
342
c6ec970dc3cf Separate some demo engine parts to two different modules.
Matti Hamalainen <ccr@tnsp.org>
parents: 336
diff changeset
119 static int engineLoadResources()
32
d1a6833a5d67 Added a simple demo engine core.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
120 {
578
cf5d44b36851 Add some initial code for video setup screen.
Matti Hamalainen <ccr@tnsp.org>
parents: 574
diff changeset
121 int err, loaded = 0, total = 0;
617
35c4fecad3fc Improve resource loading screen.
Matti Hamalainen <ccr@tnsp.org>
parents: 616
diff changeset
122 BOOL first = TRUE;
578
cf5d44b36851 Add some initial code for video setup screen.
Matti Hamalainen <ccr@tnsp.org>
parents: 574
diff changeset
123
617
35c4fecad3fc Improve resource loading screen.
Matti Hamalainen <ccr@tnsp.org>
parents: 616
diff changeset
124 do
32
d1a6833a5d67 Added a simple demo engine core.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
125 {
d1a6833a5d67 Added a simple demo engine core.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
126 // Show a nice progress bar while loading
617
35c4fecad3fc Improve resource loading screen.
Matti Hamalainen <ccr@tnsp.org>
parents: 616
diff changeset
127 if ((err = engineShowProgress(loaded, total)) != DMERR_OK)
35c4fecad3fc Improve resource loading screen.
Matti Hamalainen <ccr@tnsp.org>
parents: 616
diff changeset
128 return err;
35c4fecad3fc Improve resource loading screen.
Matti Hamalainen <ccr@tnsp.org>
parents: 616
diff changeset
129
35c4fecad3fc Improve resource loading screen.
Matti Hamalainen <ccr@tnsp.org>
parents: 616
diff changeset
130 err = dmres_preload(engine.resources, first, &loaded, &total);
35c4fecad3fc Improve resource loading screen.
Matti Hamalainen <ccr@tnsp.org>
parents: 616
diff changeset
131 first = FALSE;
32
d1a6833a5d67 Added a simple demo engine core.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
132 }
617
35c4fecad3fc Improve resource loading screen.
Matti Hamalainen <ccr@tnsp.org>
parents: 616
diff changeset
133 while (err == DMERR_PROGRESS);
32
d1a6833a5d67 Added a simple demo engine core.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
134
d1a6833a5d67 Added a simple demo engine core.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
135 return err;
d1a6833a5d67 Added a simple demo engine core.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
136 }
d1a6833a5d67 Added a simple demo engine core.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
137
d1a6833a5d67 Added a simple demo engine core.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
138
578
cf5d44b36851 Add some initial code for video setup screen.
Matti Hamalainen <ccr@tnsp.org>
parents: 574
diff changeset
139 static BOOL engineGenInitializeVideo(int width, int height, int depth, Uint32 flags)
332
d4802335cbbc Clean up video (re)initialization.
Matti Hamalainen <ccr@tnsp.org>
parents: 316
diff changeset
140 {
d4802335cbbc Clean up video (re)initialization.
Matti Hamalainen <ccr@tnsp.org>
parents: 316
diff changeset
141 dmPrint(1, "Initializing SDL video %d x %d x %dbpp, flags=0x%08x\n",
578
cf5d44b36851 Add some initial code for video setup screen.
Matti Hamalainen <ccr@tnsp.org>
parents: 574
diff changeset
142 width, height, depth, flags);
332
d4802335cbbc Clean up video (re)initialization.
Matti Hamalainen <ccr@tnsp.org>
parents: 316
diff changeset
143
d4802335cbbc Clean up video (re)initialization.
Matti Hamalainen <ccr@tnsp.org>
parents: 316
diff changeset
144 SDL_FreeSurface(engine.screen);
d4802335cbbc Clean up video (re)initialization.
Matti Hamalainen <ccr@tnsp.org>
parents: 316
diff changeset
145
578
cf5d44b36851 Add some initial code for video setup screen.
Matti Hamalainen <ccr@tnsp.org>
parents: 574
diff changeset
146 engine.screen = SDL_SetVideoMode(width, height, depth, flags);
332
d4802335cbbc Clean up video (re)initialization.
Matti Hamalainen <ccr@tnsp.org>
parents: 316
diff changeset
147 if (engine.screen == NULL)
d4802335cbbc Clean up video (re)initialization.
Matti Hamalainen <ccr@tnsp.org>
parents: 316
diff changeset
148 {
d4802335cbbc Clean up video (re)initialization.
Matti Hamalainen <ccr@tnsp.org>
parents: 316
diff changeset
149 dmError("Can't SDL_SetVideoMode(): %s\n", SDL_GetError());
d4802335cbbc Clean up video (re)initialization.
Matti Hamalainen <ccr@tnsp.org>
parents: 316
diff changeset
150 return FALSE;
d4802335cbbc Clean up video (re)initialization.
Matti Hamalainen <ccr@tnsp.org>
parents: 316
diff changeset
151 }
578
cf5d44b36851 Add some initial code for video setup screen.
Matti Hamalainen <ccr@tnsp.org>
parents: 574
diff changeset
152
cf5d44b36851 Add some initial code for video setup screen.
Matti Hamalainen <ccr@tnsp.org>
parents: 574
diff changeset
153 SDL_WM_SetCaption(dmProgDesc, dmProgName);
cf5d44b36851 Add some initial code for video setup screen.
Matti Hamalainen <ccr@tnsp.org>
parents: 574
diff changeset
154
332
d4802335cbbc Clean up video (re)initialization.
Matti Hamalainen <ccr@tnsp.org>
parents: 316
diff changeset
155 return TRUE;
d4802335cbbc Clean up video (re)initialization.
Matti Hamalainen <ccr@tnsp.org>
parents: 316
diff changeset
156 }
d4802335cbbc Clean up video (re)initialization.
Matti Hamalainen <ccr@tnsp.org>
parents: 316
diff changeset
157
d4802335cbbc Clean up video (re)initialization.
Matti Hamalainen <ccr@tnsp.org>
parents: 316
diff changeset
158
593
17bf1704d42e More work on video setup.
Matti Hamalainen <ccr@tnsp.org>
parents: 591
diff changeset
159 static BOOL engineInitializeVideo()
578
cf5d44b36851 Add some initial code for video setup screen.
Matti Hamalainen <ccr@tnsp.org>
parents: 574
diff changeset
160 {
593
17bf1704d42e More work on video setup.
Matti Hamalainen <ccr@tnsp.org>
parents: 591
diff changeset
161 return engineGenInitializeVideo(engine.optVidWidth, engine.optVidHeight,
17bf1704d42e More work on video setup.
Matti Hamalainen <ccr@tnsp.org>
parents: 591
diff changeset
162 engine.optVidDepth, engine.optVFlags);
578
cf5d44b36851 Add some initial code for video setup screen.
Matti Hamalainen <ccr@tnsp.org>
parents: 574
diff changeset
163 }
cf5d44b36851 Add some initial code for video setup screen.
Matti Hamalainen <ccr@tnsp.org>
parents: 574
diff changeset
164
cf5d44b36851 Add some initial code for video setup screen.
Matti Hamalainen <ccr@tnsp.org>
parents: 574
diff changeset
165
619
6c23042c546f Aaaand some more work on mode selector.
Matti Hamalainen <ccr@tnsp.org>
parents: 618
diff changeset
166 typedef struct
6c23042c546f Aaaand some more work on mode selector.
Matti Hamalainen <ccr@tnsp.org>
parents: 618
diff changeset
167 {
620
5fda51e99fe5 More work.
Matti Hamalainen <ccr@tnsp.org>
parents: 619
diff changeset
168 int w, h, aspect;
619
6c23042c546f Aaaand some more work on mode selector.
Matti Hamalainen <ccr@tnsp.org>
parents: 618
diff changeset
169 } DMModeEntry;
6c23042c546f Aaaand some more work on mode selector.
Matti Hamalainen <ccr@tnsp.org>
parents: 618
diff changeset
170
6c23042c546f Aaaand some more work on mode selector.
Matti Hamalainen <ccr@tnsp.org>
parents: 618
diff changeset
171
6c23042c546f Aaaand some more work on mode selector.
Matti Hamalainen <ccr@tnsp.org>
parents: 618
diff changeset
172 DMModeEntry *engineModeList = NULL;
6c23042c546f Aaaand some more work on mode selector.
Matti Hamalainen <ccr@tnsp.org>
parents: 618
diff changeset
173 int nengineModeList = 0, aengineModeList = 0;
6c23042c546f Aaaand some more work on mode selector.
Matti Hamalainen <ccr@tnsp.org>
parents: 618
diff changeset
174
6c23042c546f Aaaand some more work on mode selector.
Matti Hamalainen <ccr@tnsp.org>
parents: 618
diff changeset
175
6c23042c546f Aaaand some more work on mode selector.
Matti Hamalainen <ccr@tnsp.org>
parents: 618
diff changeset
176 static int engineModeSort(const void *pa, const void *pb)
6c23042c546f Aaaand some more work on mode selector.
Matti Hamalainen <ccr@tnsp.org>
parents: 618
diff changeset
177 {
6c23042c546f Aaaand some more work on mode selector.
Matti Hamalainen <ccr@tnsp.org>
parents: 618
diff changeset
178 DMModeEntry
6c23042c546f Aaaand some more work on mode selector.
Matti Hamalainen <ccr@tnsp.org>
parents: 618
diff changeset
179 *va = (DMModeEntry *) pa,
6c23042c546f Aaaand some more work on mode selector.
Matti Hamalainen <ccr@tnsp.org>
parents: 618
diff changeset
180 *vb = (DMModeEntry *) pb;
6c23042c546f Aaaand some more work on mode selector.
Matti Hamalainen <ccr@tnsp.org>
parents: 618
diff changeset
181
6c23042c546f Aaaand some more work on mode selector.
Matti Hamalainen <ccr@tnsp.org>
parents: 618
diff changeset
182 return (va->w - vb->w);
6c23042c546f Aaaand some more work on mode selector.
Matti Hamalainen <ccr@tnsp.org>
parents: 618
diff changeset
183 }
6c23042c546f Aaaand some more work on mode selector.
Matti Hamalainen <ccr@tnsp.org>
parents: 618
diff changeset
184
6c23042c546f Aaaand some more work on mode selector.
Matti Hamalainen <ccr@tnsp.org>
parents: 618
diff changeset
185
6c23042c546f Aaaand some more work on mode selector.
Matti Hamalainen <ccr@tnsp.org>
parents: 618
diff changeset
186 int engineAddModeToList(int w, int h)
6c23042c546f Aaaand some more work on mode selector.
Matti Hamalainen <ccr@tnsp.org>
parents: 618
diff changeset
187 {
6c23042c546f Aaaand some more work on mode selector.
Matti Hamalainen <ccr@tnsp.org>
parents: 618
diff changeset
188 DMModeEntry *mode;
6c23042c546f Aaaand some more work on mode selector.
Matti Hamalainen <ccr@tnsp.org>
parents: 618
diff changeset
189 int i;
620
5fda51e99fe5 More work.
Matti Hamalainen <ccr@tnsp.org>
parents: 619
diff changeset
190 int aspect = engineGetVideoAspect(w, h);
5fda51e99fe5 More work.
Matti Hamalainen <ccr@tnsp.org>
parents: 619
diff changeset
191
5fda51e99fe5 More work.
Matti Hamalainen <ccr@tnsp.org>
parents: 619
diff changeset
192 if (aspect <= 0)
5fda51e99fe5 More work.
Matti Hamalainen <ccr@tnsp.org>
parents: 619
diff changeset
193 return DMERR_INVALID_ARGS;
619
6c23042c546f Aaaand some more work on mode selector.
Matti Hamalainen <ccr@tnsp.org>
parents: 618
diff changeset
194
6c23042c546f Aaaand some more work on mode selector.
Matti Hamalainen <ccr@tnsp.org>
parents: 618
diff changeset
195 // Check if the mode is already in our list
6c23042c546f Aaaand some more work on mode selector.
Matti Hamalainen <ccr@tnsp.org>
parents: 618
diff changeset
196 for (i = 0; i < nengineModeList; i++)
6c23042c546f Aaaand some more work on mode selector.
Matti Hamalainen <ccr@tnsp.org>
parents: 618
diff changeset
197 {
6c23042c546f Aaaand some more work on mode selector.
Matti Hamalainen <ccr@tnsp.org>
parents: 618
diff changeset
198 mode = &engineModeList[i];
6c23042c546f Aaaand some more work on mode selector.
Matti Hamalainen <ccr@tnsp.org>
parents: 618
diff changeset
199 if (mode->w == w && mode->h == h)
6c23042c546f Aaaand some more work on mode selector.
Matti Hamalainen <ccr@tnsp.org>
parents: 618
diff changeset
200 return DMERR_OK;
6c23042c546f Aaaand some more work on mode selector.
Matti Hamalainen <ccr@tnsp.org>
parents: 618
diff changeset
201 }
6c23042c546f Aaaand some more work on mode selector.
Matti Hamalainen <ccr@tnsp.org>
parents: 618
diff changeset
202
620
5fda51e99fe5 More work.
Matti Hamalainen <ccr@tnsp.org>
parents: 619
diff changeset
203 // Check if the mode fits our criteria
5fda51e99fe5 More work.
Matti Hamalainen <ccr@tnsp.org>
parents: 619
diff changeset
204 switch (engine.optVidSetup)
5fda51e99fe5 More work.
Matti Hamalainen <ccr@tnsp.org>
parents: 619
diff changeset
205 {
5fda51e99fe5 More work.
Matti Hamalainen <ccr@tnsp.org>
parents: 619
diff changeset
206 case DM_VSETUP_ASPECT:
5fda51e99fe5 More work.
Matti Hamalainen <ccr@tnsp.org>
parents: 619
diff changeset
207 if (aspect != engine.optVidAspect)
5fda51e99fe5 More work.
Matti Hamalainen <ccr@tnsp.org>
parents: 619
diff changeset
208 return DMERR_OK;
5fda51e99fe5 More work.
Matti Hamalainen <ccr@tnsp.org>
parents: 619
diff changeset
209 break;
5fda51e99fe5 More work.
Matti Hamalainen <ccr@tnsp.org>
parents: 619
diff changeset
210
5fda51e99fe5 More work.
Matti Hamalainen <ccr@tnsp.org>
parents: 619
diff changeset
211 case DM_VSETUP_ANY:
5fda51e99fe5 More work.
Matti Hamalainen <ccr@tnsp.org>
parents: 619
diff changeset
212 break;
5fda51e99fe5 More work.
Matti Hamalainen <ccr@tnsp.org>
parents: 619
diff changeset
213 }
5fda51e99fe5 More work.
Matti Hamalainen <ccr@tnsp.org>
parents: 619
diff changeset
214
619
6c23042c546f Aaaand some more work on mode selector.
Matti Hamalainen <ccr@tnsp.org>
parents: 618
diff changeset
215 // Reallocate array if needed
6c23042c546f Aaaand some more work on mode selector.
Matti Hamalainen <ccr@tnsp.org>
parents: 618
diff changeset
216 if (nengineModeList + 1 >= aengineModeList)
6c23042c546f Aaaand some more work on mode selector.
Matti Hamalainen <ccr@tnsp.org>
parents: 618
diff changeset
217 {
6c23042c546f Aaaand some more work on mode selector.
Matti Hamalainen <ccr@tnsp.org>
parents: 618
diff changeset
218 aengineModeList += 16;
6c23042c546f Aaaand some more work on mode selector.
Matti Hamalainen <ccr@tnsp.org>
parents: 618
diff changeset
219 engineModeList = dmRealloc(engineModeList, sizeof(DMModeEntry) * aengineModeList);
6c23042c546f Aaaand some more work on mode selector.
Matti Hamalainen <ccr@tnsp.org>
parents: 618
diff changeset
220 if (engineModeList == NULL)
6c23042c546f Aaaand some more work on mode selector.
Matti Hamalainen <ccr@tnsp.org>
parents: 618
diff changeset
221 return DMERR_MALLOC;
6c23042c546f Aaaand some more work on mode selector.
Matti Hamalainen <ccr@tnsp.org>
parents: 618
diff changeset
222 }
6c23042c546f Aaaand some more work on mode selector.
Matti Hamalainen <ccr@tnsp.org>
parents: 618
diff changeset
223
6c23042c546f Aaaand some more work on mode selector.
Matti Hamalainen <ccr@tnsp.org>
parents: 618
diff changeset
224 // Store
6c23042c546f Aaaand some more work on mode selector.
Matti Hamalainen <ccr@tnsp.org>
parents: 618
diff changeset
225 mode = &engineModeList[nengineModeList];
6c23042c546f Aaaand some more work on mode selector.
Matti Hamalainen <ccr@tnsp.org>
parents: 618
diff changeset
226 mode->w = w;
6c23042c546f Aaaand some more work on mode selector.
Matti Hamalainen <ccr@tnsp.org>
parents: 618
diff changeset
227 mode->h = h;
620
5fda51e99fe5 More work.
Matti Hamalainen <ccr@tnsp.org>
parents: 619
diff changeset
228 mode->aspect = engineGetVideoAspect(w, h);
619
6c23042c546f Aaaand some more work on mode selector.
Matti Hamalainen <ccr@tnsp.org>
parents: 618
diff changeset
229
6c23042c546f Aaaand some more work on mode selector.
Matti Hamalainen <ccr@tnsp.org>
parents: 618
diff changeset
230 nengineModeList++;
6c23042c546f Aaaand some more work on mode selector.
Matti Hamalainen <ccr@tnsp.org>
parents: 618
diff changeset
231
6c23042c546f Aaaand some more work on mode selector.
Matti Hamalainen <ccr@tnsp.org>
parents: 618
diff changeset
232 return DMERR_OK;
6c23042c546f Aaaand some more work on mode selector.
Matti Hamalainen <ccr@tnsp.org>
parents: 618
diff changeset
233 }
6c23042c546f Aaaand some more work on mode selector.
Matti Hamalainen <ccr@tnsp.org>
parents: 618
diff changeset
234
603
36b544eb6f4b Fixes in resource management.
Matti Hamalainen <ccr@tnsp.org>
parents: 600
diff changeset
235
578
cf5d44b36851 Add some initial code for video setup screen.
Matti Hamalainen <ccr@tnsp.org>
parents: 574
diff changeset
236 int engineVideoSetup()
cf5d44b36851 Add some initial code for video setup screen.
Matti Hamalainen <ccr@tnsp.org>
parents: 574
diff changeset
237 {
597
8a9361179a1a More work on the video setup screen.
Matti Hamalainen <ccr@tnsp.org>
parents: 595
diff changeset
238 DMBitmapFont *menuFont = NULL;
578
cf5d44b36851 Add some initial code for video setup screen.
Matti Hamalainen <ccr@tnsp.org>
parents: 574
diff changeset
239 DMResource *file = NULL;
608
9620208f7ff4 More work on setup.
Matti Hamalainen <ccr@tnsp.org>
parents: 603
diff changeset
240 SDL_Surface *menuBgImage = NULL, *menuBarImage = NULL;
620
5fda51e99fe5 More work.
Matti Hamalainen <ccr@tnsp.org>
parents: 619
diff changeset
241 int result, menuState = -1;
619
6c23042c546f Aaaand some more work on mode selector.
Matti Hamalainen <ccr@tnsp.org>
parents: 618
diff changeset
242 BOOL fullScreen = TRUE;
578
cf5d44b36851 Add some initial code for video setup screen.
Matti Hamalainen <ccr@tnsp.org>
parents: 574
diff changeset
243
cf5d44b36851 Add some initial code for video setup screen.
Matti Hamalainen <ccr@tnsp.org>
parents: 574
diff changeset
244 // Compute a list of valid modes
619
6c23042c546f Aaaand some more work on mode selector.
Matti Hamalainen <ccr@tnsp.org>
parents: 618
diff changeset
245 if (!engineGenInitializeVideo(DM_VSETUP_WIDTH, DM_VSETUP_HEIGHT, engine.optVidDepth, engine.optVFlags))
6c23042c546f Aaaand some more work on mode selector.
Matti Hamalainen <ccr@tnsp.org>
parents: 618
diff changeset
246 goto out;
578
cf5d44b36851 Add some initial code for video setup screen.
Matti Hamalainen <ccr@tnsp.org>
parents: 574
diff changeset
247
619
6c23042c546f Aaaand some more work on mode selector.
Matti Hamalainen <ccr@tnsp.org>
parents: 618
diff changeset
248 SDL_Rect **modes = SDL_ListModes(engine.screen->format, engine.screen->flags | SDL_FULLSCREEN);
6c23042c546f Aaaand some more work on mode selector.
Matti Hamalainen <ccr@tnsp.org>
parents: 618
diff changeset
249 if (modes == (SDL_Rect**) 0)
6c23042c546f Aaaand some more work on mode selector.
Matti Hamalainen <ccr@tnsp.org>
parents: 618
diff changeset
250 {
6c23042c546f Aaaand some more work on mode selector.
Matti Hamalainen <ccr@tnsp.org>
parents: 618
diff changeset
251 dmError("No compatible video resolutions/depths available at all. Bailing out.\n");
6c23042c546f Aaaand some more work on mode selector.
Matti Hamalainen <ccr@tnsp.org>
parents: 618
diff changeset
252 goto out;
6c23042c546f Aaaand some more work on mode selector.
Matti Hamalainen <ccr@tnsp.org>
parents: 618
diff changeset
253 }
6c23042c546f Aaaand some more work on mode selector.
Matti Hamalainen <ccr@tnsp.org>
parents: 618
diff changeset
254
6c23042c546f Aaaand some more work on mode selector.
Matti Hamalainen <ccr@tnsp.org>
parents: 618
diff changeset
255 if (modes != (SDL_Rect**) -1)
6c23042c546f Aaaand some more work on mode selector.
Matti Hamalainen <ccr@tnsp.org>
parents: 618
diff changeset
256 {
6c23042c546f Aaaand some more work on mode selector.
Matti Hamalainen <ccr@tnsp.org>
parents: 618
diff changeset
257 int i;
6c23042c546f Aaaand some more work on mode selector.
Matti Hamalainen <ccr@tnsp.org>
parents: 618
diff changeset
258 for (i = 0; modes[i] != NULL; i++)
6c23042c546f Aaaand some more work on mode selector.
Matti Hamalainen <ccr@tnsp.org>
parents: 618
diff changeset
259 engineAddModeToList(modes[i]->w, modes[i]->h);
6c23042c546f Aaaand some more work on mode selector.
Matti Hamalainen <ccr@tnsp.org>
parents: 618
diff changeset
260 }
6c23042c546f Aaaand some more work on mode selector.
Matti Hamalainen <ccr@tnsp.org>
parents: 618
diff changeset
261
620
5fda51e99fe5 More work.
Matti Hamalainen <ccr@tnsp.org>
parents: 619
diff changeset
262 if (nengineModeList == 0)
5fda51e99fe5 More work.
Matti Hamalainen <ccr@tnsp.org>
parents: 619
diff changeset
263 {
5fda51e99fe5 More work.
Matti Hamalainen <ccr@tnsp.org>
parents: 619
diff changeset
264 dmError("Umm, no modes found.\n");
5fda51e99fe5 More work.
Matti Hamalainen <ccr@tnsp.org>
parents: 619
diff changeset
265 goto out;
5fda51e99fe5 More work.
Matti Hamalainen <ccr@tnsp.org>
parents: 619
diff changeset
266 }
5fda51e99fe5 More work.
Matti Hamalainen <ccr@tnsp.org>
parents: 619
diff changeset
267
619
6c23042c546f Aaaand some more work on mode selector.
Matti Hamalainen <ccr@tnsp.org>
parents: 618
diff changeset
268 qsort(engineModeList, nengineModeList, sizeof(engineModeList[0]), engineModeSort);
6c23042c546f Aaaand some more work on mode selector.
Matti Hamalainen <ccr@tnsp.org>
parents: 618
diff changeset
269
578
cf5d44b36851 Add some initial code for video setup screen.
Matti Hamalainen <ccr@tnsp.org>
parents: 574
diff changeset
270 // Open video temporarily
593
17bf1704d42e More work on video setup.
Matti Hamalainen <ccr@tnsp.org>
parents: 591
diff changeset
271 if (!engineGenInitializeVideo(DM_VSETUP_WIDTH, DM_VSETUP_HEIGHT, 32, SDL_SWSURFACE | SDL_DOUBLEBUF))
578
cf5d44b36851 Add some initial code for video setup screen.
Matti Hamalainen <ccr@tnsp.org>
parents: 574
diff changeset
272 goto out;
cf5d44b36851 Add some initial code for video setup screen.
Matti Hamalainen <ccr@tnsp.org>
parents: 574
diff changeset
273
cf5d44b36851 Add some initial code for video setup screen.
Matti Hamalainen <ccr@tnsp.org>
parents: 574
diff changeset
274 // Fetch and decompress setup image, try regular resources first
603
36b544eb6f4b Fixes in resource management.
Matti Hamalainen <ccr@tnsp.org>
parents: 600
diff changeset
275 file = dmf_open(engine.resources, engineSetupImageName);
578
cf5d44b36851 Add some initial code for video setup screen.
Matti Hamalainen <ccr@tnsp.org>
parents: 574
diff changeset
276 if (file == NULL)
603
36b544eb6f4b Fixes in resource management.
Matti Hamalainen <ccr@tnsp.org>
parents: 600
diff changeset
277 file = dmf_create_memio(NULL, engineSetupImageName, engineSetupImage, sizeof(engineSetupImage));
578
cf5d44b36851 Add some initial code for video setup screen.
Matti Hamalainen <ccr@tnsp.org>
parents: 574
diff changeset
278
593
17bf1704d42e More work on video setup.
Matti Hamalainen <ccr@tnsp.org>
parents: 591
diff changeset
279 menuBgImage = dmLoadImage(file);
578
cf5d44b36851 Add some initial code for video setup screen.
Matti Hamalainen <ccr@tnsp.org>
parents: 574
diff changeset
280 dmf_close(file);
603
36b544eb6f4b Fixes in resource management.
Matti Hamalainen <ccr@tnsp.org>
parents: 600
diff changeset
281
608
9620208f7ff4 More work on setup.
Matti Hamalainen <ccr@tnsp.org>
parents: 603
diff changeset
282 file = dmf_open(engine.resources, engineSetupMenuBarName);
9620208f7ff4 More work on setup.
Matti Hamalainen <ccr@tnsp.org>
parents: 603
diff changeset
283 if (file == NULL)
9620208f7ff4 More work on setup.
Matti Hamalainen <ccr@tnsp.org>
parents: 603
diff changeset
284 file = dmf_create_memio(NULL, engineSetupMenuBarName, engineSetupMenuBar, sizeof(engineSetupMenuBar));
9620208f7ff4 More work on setup.
Matti Hamalainen <ccr@tnsp.org>
parents: 603
diff changeset
285
9620208f7ff4 More work on setup.
Matti Hamalainen <ccr@tnsp.org>
parents: 603
diff changeset
286 menuBarImage = dmLoadImage(file);
9620208f7ff4 More work on setup.
Matti Hamalainen <ccr@tnsp.org>
parents: 603
diff changeset
287 dmf_close(file);
9620208f7ff4 More work on setup.
Matti Hamalainen <ccr@tnsp.org>
parents: 603
diff changeset
288
9620208f7ff4 More work on setup.
Matti Hamalainen <ccr@tnsp.org>
parents: 603
diff changeset
289 if (menuBgImage == NULL || menuBarImage == NULL)
578
cf5d44b36851 Add some initial code for video setup screen.
Matti Hamalainen <ccr@tnsp.org>
parents: 574
diff changeset
290 {
608
9620208f7ff4 More work on setup.
Matti Hamalainen <ccr@tnsp.org>
parents: 603
diff changeset
291 dmError("Could not instantiate setup screen images, %d: %s\n",
578
cf5d44b36851 Add some initial code for video setup screen.
Matti Hamalainen <ccr@tnsp.org>
parents: 574
diff changeset
292 result, dmErrorStr(result));
cf5d44b36851 Add some initial code for video setup screen.
Matti Hamalainen <ccr@tnsp.org>
parents: 574
diff changeset
293 goto out;
cf5d44b36851 Add some initial code for video setup screen.
Matti Hamalainen <ccr@tnsp.org>
parents: 574
diff changeset
294 }
cf5d44b36851 Add some initial code for video setup screen.
Matti Hamalainen <ccr@tnsp.org>
parents: 574
diff changeset
295
593
17bf1704d42e More work on video setup.
Matti Hamalainen <ccr@tnsp.org>
parents: 591
diff changeset
296 if (menuBgImage->w != DM_VSETUP_WIDTH ||
17bf1704d42e More work on video setup.
Matti Hamalainen <ccr@tnsp.org>
parents: 591
diff changeset
297 menuBgImage->h != DM_VSETUP_HEIGHT)
578
cf5d44b36851 Add some initial code for video setup screen.
Matti Hamalainen <ccr@tnsp.org>
parents: 574
diff changeset
298 {
cf5d44b36851 Add some initial code for video setup screen.
Matti Hamalainen <ccr@tnsp.org>
parents: 574
diff changeset
299 dmError("Setup screen background image does not match "
cf5d44b36851 Add some initial code for video setup screen.
Matti Hamalainen <ccr@tnsp.org>
parents: 574
diff changeset
300 "required dimensions (%dx%d vs %dx%d)\n",
cf5d44b36851 Add some initial code for video setup screen.
Matti Hamalainen <ccr@tnsp.org>
parents: 574
diff changeset
301 menuBgImage->w, menuBgImage->h,
593
17bf1704d42e More work on video setup.
Matti Hamalainen <ccr@tnsp.org>
parents: 591
diff changeset
302 DM_VSETUP_WIDTH, DM_VSETUP_HEIGHT);
578
cf5d44b36851 Add some initial code for video setup screen.
Matti Hamalainen <ccr@tnsp.org>
parents: 574
diff changeset
303 goto out;
cf5d44b36851 Add some initial code for video setup screen.
Matti Hamalainen <ccr@tnsp.org>
parents: 574
diff changeset
304 }
cf5d44b36851 Add some initial code for video setup screen.
Matti Hamalainen <ccr@tnsp.org>
parents: 574
diff changeset
305
cf5d44b36851 Add some initial code for video setup screen.
Matti Hamalainen <ccr@tnsp.org>
parents: 574
diff changeset
306
cf5d44b36851 Add some initial code for video setup screen.
Matti Hamalainen <ccr@tnsp.org>
parents: 574
diff changeset
307 // Load up the bitmap font
603
36b544eb6f4b Fixes in resource management.
Matti Hamalainen <ccr@tnsp.org>
parents: 600
diff changeset
308 file = dmf_open(engine.resources, engineSetupFontName);
578
cf5d44b36851 Add some initial code for video setup screen.
Matti Hamalainen <ccr@tnsp.org>
parents: 574
diff changeset
309 if (file == NULL)
603
36b544eb6f4b Fixes in resource management.
Matti Hamalainen <ccr@tnsp.org>
parents: 600
diff changeset
310 file = dmf_create_memio(NULL, engineSetupFontName, engineSetupFont, sizeof(engineSetupFont));
578
cf5d44b36851 Add some initial code for video setup screen.
Matti Hamalainen <ccr@tnsp.org>
parents: 574
diff changeset
311
597
8a9361179a1a More work on the video setup screen.
Matti Hamalainen <ccr@tnsp.org>
parents: 595
diff changeset
312 result = dmLoadBitmapFont(file, &menuFont);
578
cf5d44b36851 Add some initial code for video setup screen.
Matti Hamalainen <ccr@tnsp.org>
parents: 574
diff changeset
313 dmf_close(file);
cf5d44b36851 Add some initial code for video setup screen.
Matti Hamalainen <ccr@tnsp.org>
parents: 574
diff changeset
314 if (result != DMERR_OK)
cf5d44b36851 Add some initial code for video setup screen.
Matti Hamalainen <ccr@tnsp.org>
parents: 574
diff changeset
315 {
cf5d44b36851 Add some initial code for video setup screen.
Matti Hamalainen <ccr@tnsp.org>
parents: 574
diff changeset
316 dmError("Could not instantiate setup screen font, %d: %s\n",
cf5d44b36851 Add some initial code for video setup screen.
Matti Hamalainen <ccr@tnsp.org>
parents: 574
diff changeset
317 result, dmErrorStr(result));
cf5d44b36851 Add some initial code for video setup screen.
Matti Hamalainen <ccr@tnsp.org>
parents: 574
diff changeset
318 goto out;
cf5d44b36851 Add some initial code for video setup screen.
Matti Hamalainen <ccr@tnsp.org>
parents: 574
diff changeset
319 }
614
eed8d6abd89b Pre-convert/scale menu background and use direct blitting.
Matti Hamalainen <ccr@tnsp.org>
parents: 608
diff changeset
320
eed8d6abd89b Pre-convert/scale menu background and use direct blitting.
Matti Hamalainen <ccr@tnsp.org>
parents: 608
diff changeset
321 SDL_Surface *tmp = dmConvertScaledSurface(menuBgImage,
eed8d6abd89b Pre-convert/scale menu background and use direct blitting.
Matti Hamalainen <ccr@tnsp.org>
parents: 608
diff changeset
322 engine.screen->format, engine.screen->flags,
eed8d6abd89b Pre-convert/scale menu background and use direct blitting.
Matti Hamalainen <ccr@tnsp.org>
parents: 608
diff changeset
323 engine.screen->w, engine.screen->h);
eed8d6abd89b Pre-convert/scale menu background and use direct blitting.
Matti Hamalainen <ccr@tnsp.org>
parents: 608
diff changeset
324 if (tmp == NULL)
eed8d6abd89b Pre-convert/scale menu background and use direct blitting.
Matti Hamalainen <ccr@tnsp.org>
parents: 608
diff changeset
325 {
eed8d6abd89b Pre-convert/scale menu background and use direct blitting.
Matti Hamalainen <ccr@tnsp.org>
parents: 608
diff changeset
326 dmError("Could not convert setup screen background image.\n");
eed8d6abd89b Pre-convert/scale menu background and use direct blitting.
Matti Hamalainen <ccr@tnsp.org>
parents: 608
diff changeset
327 goto out;
eed8d6abd89b Pre-convert/scale menu background and use direct blitting.
Matti Hamalainen <ccr@tnsp.org>
parents: 608
diff changeset
328 }
eed8d6abd89b Pre-convert/scale menu background and use direct blitting.
Matti Hamalainen <ccr@tnsp.org>
parents: 608
diff changeset
329
eed8d6abd89b Pre-convert/scale menu background and use direct blitting.
Matti Hamalainen <ccr@tnsp.org>
parents: 608
diff changeset
330 SDL_FreeSurface(menuBgImage);
eed8d6abd89b Pre-convert/scale menu background and use direct blitting.
Matti Hamalainen <ccr@tnsp.org>
parents: 608
diff changeset
331 menuBgImage = tmp;
eed8d6abd89b Pre-convert/scale menu background and use direct blitting.
Matti Hamalainen <ccr@tnsp.org>
parents: 608
diff changeset
332
597
8a9361179a1a More work on the video setup screen.
Matti Hamalainen <ccr@tnsp.org>
parents: 595
diff changeset
333 SDL_EnableKeyRepeat(SDL_DEFAULT_REPEAT_DELAY, SDL_DEFAULT_REPEAT_INTERVAL);
614
eed8d6abd89b Pre-convert/scale menu background and use direct blitting.
Matti Hamalainen <ccr@tnsp.org>
parents: 608
diff changeset
334
620
5fda51e99fe5 More work.
Matti Hamalainen <ccr@tnsp.org>
parents: 619
diff changeset
335
5fda51e99fe5 More work.
Matti Hamalainen <ccr@tnsp.org>
parents: 619
diff changeset
336
5fda51e99fe5 More work.
Matti Hamalainen <ccr@tnsp.org>
parents: 619
diff changeset
337 // Enter the main loop of the menu
5fda51e99fe5 More work.
Matti Hamalainen <ccr@tnsp.org>
parents: 619
diff changeset
338 char menuStr[64];
5fda51e99fe5 More work.
Matti Hamalainen <ccr@tnsp.org>
parents: 619
diff changeset
339 int menuOffset = 0,
5fda51e99fe5 More work.
Matti Hamalainen <ccr@tnsp.org>
parents: 619
diff changeset
340 menuIndex = 0,
5fda51e99fe5 More work.
Matti Hamalainen <ccr@tnsp.org>
parents: 619
diff changeset
341 menuEntryHeight = menuFont->height + 2,
597
8a9361179a1a More work on the video setup screen.
Matti Hamalainen <ccr@tnsp.org>
parents: 595
diff changeset
342 menuHeight = DM_VSETUP_MENU_HEIGHT / menuEntryHeight;
578
cf5d44b36851 Add some initial code for video setup screen.
Matti Hamalainen <ccr@tnsp.org>
parents: 574
diff changeset
343
620
5fda51e99fe5 More work.
Matti Hamalainen <ccr@tnsp.org>
parents: 619
diff changeset
344 menuState = 0;
5fda51e99fe5 More work.
Matti Hamalainen <ccr@tnsp.org>
parents: 619
diff changeset
345
608
9620208f7ff4 More work on setup.
Matti Hamalainen <ccr@tnsp.org>
parents: 603
diff changeset
346 engine.startTime = SDL_GetTicks();
620
5fda51e99fe5 More work.
Matti Hamalainen <ccr@tnsp.org>
parents: 619
diff changeset
347
578
cf5d44b36851 Add some initial code for video setup screen.
Matti Hamalainen <ccr@tnsp.org>
parents: 574
diff changeset
348 while (!menuState)
cf5d44b36851 Add some initial code for video setup screen.
Matti Hamalainen <ccr@tnsp.org>
parents: 574
diff changeset
349 {
cf5d44b36851 Add some initial code for video setup screen.
Matti Hamalainen <ccr@tnsp.org>
parents: 574
diff changeset
350 while (SDL_PollEvent(&engine.event))
cf5d44b36851 Add some initial code for video setup screen.
Matti Hamalainen <ccr@tnsp.org>
parents: 574
diff changeset
351 switch (engine.event.type)
cf5d44b36851 Add some initial code for video setup screen.
Matti Hamalainen <ccr@tnsp.org>
parents: 574
diff changeset
352 {
cf5d44b36851 Add some initial code for video setup screen.
Matti Hamalainen <ccr@tnsp.org>
parents: 574
diff changeset
353 case SDL_KEYDOWN:
cf5d44b36851 Add some initial code for video setup screen.
Matti Hamalainen <ccr@tnsp.org>
parents: 574
diff changeset
354 switch (engine.event.key.keysym.sym)
cf5d44b36851 Add some initial code for video setup screen.
Matti Hamalainen <ccr@tnsp.org>
parents: 574
diff changeset
355 {
cf5d44b36851 Add some initial code for video setup screen.
Matti Hamalainen <ccr@tnsp.org>
parents: 574
diff changeset
356 case SDLK_ESCAPE:
cf5d44b36851 Add some initial code for video setup screen.
Matti Hamalainen <ccr@tnsp.org>
parents: 574
diff changeset
357 menuState = -1;
cf5d44b36851 Add some initial code for video setup screen.
Matti Hamalainen <ccr@tnsp.org>
parents: 574
diff changeset
358 break;
cf5d44b36851 Add some initial code for video setup screen.
Matti Hamalainen <ccr@tnsp.org>
parents: 574
diff changeset
359
cf5d44b36851 Add some initial code for video setup screen.
Matti Hamalainen <ccr@tnsp.org>
parents: 574
diff changeset
360 case SDLK_RETURN:
cf5d44b36851 Add some initial code for video setup screen.
Matti Hamalainen <ccr@tnsp.org>
parents: 574
diff changeset
361 menuState = 1;
cf5d44b36851 Add some initial code for video setup screen.
Matti Hamalainen <ccr@tnsp.org>
parents: 574
diff changeset
362 break;
cf5d44b36851 Add some initial code for video setup screen.
Matti Hamalainen <ccr@tnsp.org>
parents: 574
diff changeset
363
cf5d44b36851 Add some initial code for video setup screen.
Matti Hamalainen <ccr@tnsp.org>
parents: 574
diff changeset
364 case SDLK_UP:
620
5fda51e99fe5 More work.
Matti Hamalainen <ccr@tnsp.org>
parents: 619
diff changeset
365 if (menuIndex > 0)
5fda51e99fe5 More work.
Matti Hamalainen <ccr@tnsp.org>
parents: 619
diff changeset
366 menuIndex--;
5fda51e99fe5 More work.
Matti Hamalainen <ccr@tnsp.org>
parents: 619
diff changeset
367 else
5fda51e99fe5 More work.
Matti Hamalainen <ccr@tnsp.org>
parents: 619
diff changeset
368 if (menuOffset > 0)
5fda51e99fe5 More work.
Matti Hamalainen <ccr@tnsp.org>
parents: 619
diff changeset
369 menuOffset--;
578
cf5d44b36851 Add some initial code for video setup screen.
Matti Hamalainen <ccr@tnsp.org>
parents: 574
diff changeset
370 break;
cf5d44b36851 Add some initial code for video setup screen.
Matti Hamalainen <ccr@tnsp.org>
parents: 574
diff changeset
371
cf5d44b36851 Add some initial code for video setup screen.
Matti Hamalainen <ccr@tnsp.org>
parents: 574
diff changeset
372 case SDLK_DOWN:
620
5fda51e99fe5 More work.
Matti Hamalainen <ccr@tnsp.org>
parents: 619
diff changeset
373 if (menuIndex < menuHeight - 1 && menuOffset + menuIndex < nengineModeList - 1)
5fda51e99fe5 More work.
Matti Hamalainen <ccr@tnsp.org>
parents: 619
diff changeset
374 menuIndex++;
5fda51e99fe5 More work.
Matti Hamalainen <ccr@tnsp.org>
parents: 619
diff changeset
375 else
5fda51e99fe5 More work.
Matti Hamalainen <ccr@tnsp.org>
parents: 619
diff changeset
376 if (menuOffset + menuIndex < nengineModeList - 1)
5fda51e99fe5 More work.
Matti Hamalainen <ccr@tnsp.org>
parents: 619
diff changeset
377 menuOffset++;
578
cf5d44b36851 Add some initial code for video setup screen.
Matti Hamalainen <ccr@tnsp.org>
parents: 574
diff changeset
378 break;
619
6c23042c546f Aaaand some more work on mode selector.
Matti Hamalainen <ccr@tnsp.org>
parents: 618
diff changeset
379
6c23042c546f Aaaand some more work on mode selector.
Matti Hamalainen <ccr@tnsp.org>
parents: 618
diff changeset
380 case SDLK_SPACE:
6c23042c546f Aaaand some more work on mode selector.
Matti Hamalainen <ccr@tnsp.org>
parents: 618
diff changeset
381 fullScreen = !fullScreen;
6c23042c546f Aaaand some more work on mode selector.
Matti Hamalainen <ccr@tnsp.org>
parents: 618
diff changeset
382 break;
578
cf5d44b36851 Add some initial code for video setup screen.
Matti Hamalainen <ccr@tnsp.org>
parents: 574
diff changeset
383
cf5d44b36851 Add some initial code for video setup screen.
Matti Hamalainen <ccr@tnsp.org>
parents: 574
diff changeset
384 default:
cf5d44b36851 Add some initial code for video setup screen.
Matti Hamalainen <ccr@tnsp.org>
parents: 574
diff changeset
385 break;
cf5d44b36851 Add some initial code for video setup screen.
Matti Hamalainen <ccr@tnsp.org>
parents: 574
diff changeset
386 }
cf5d44b36851 Add some initial code for video setup screen.
Matti Hamalainen <ccr@tnsp.org>
parents: 574
diff changeset
387
cf5d44b36851 Add some initial code for video setup screen.
Matti Hamalainen <ccr@tnsp.org>
parents: 574
diff changeset
388 break;
cf5d44b36851 Add some initial code for video setup screen.
Matti Hamalainen <ccr@tnsp.org>
parents: 574
diff changeset
389
cf5d44b36851 Add some initial code for video setup screen.
Matti Hamalainen <ccr@tnsp.org>
parents: 574
diff changeset
390 case SDL_QUIT:
cf5d44b36851 Add some initial code for video setup screen.
Matti Hamalainen <ccr@tnsp.org>
parents: 574
diff changeset
391 menuState = -1;
cf5d44b36851 Add some initial code for video setup screen.
Matti Hamalainen <ccr@tnsp.org>
parents: 574
diff changeset
392 break;
cf5d44b36851 Add some initial code for video setup screen.
Matti Hamalainen <ccr@tnsp.org>
parents: 574
diff changeset
393 }
cf5d44b36851 Add some initial code for video setup screen.
Matti Hamalainen <ccr@tnsp.org>
parents: 574
diff changeset
394
cf5d44b36851 Add some initial code for video setup screen.
Matti Hamalainen <ccr@tnsp.org>
parents: 574
diff changeset
395 // Draw frame
608
9620208f7ff4 More work on setup.
Matti Hamalainen <ccr@tnsp.org>
parents: 603
diff changeset
396 engine.frameTime = SDL_GetTicks();
578
cf5d44b36851 Add some initial code for video setup screen.
Matti Hamalainen <ccr@tnsp.org>
parents: 574
diff changeset
397 if (SDL_MUSTLOCK(engine.screen) != 0 && SDL_LockSurface(engine.screen) != 0)
cf5d44b36851 Add some initial code for video setup screen.
Matti Hamalainen <ccr@tnsp.org>
parents: 574
diff changeset
398 {
cf5d44b36851 Add some initial code for video setup screen.
Matti Hamalainen <ccr@tnsp.org>
parents: 574
diff changeset
399 dmError("Can't lock surface.\n");
cf5d44b36851 Add some initial code for video setup screen.
Matti Hamalainen <ccr@tnsp.org>
parents: 574
diff changeset
400 goto out;
cf5d44b36851 Add some initial code for video setup screen.
Matti Hamalainen <ccr@tnsp.org>
parents: 574
diff changeset
401 }
cf5d44b36851 Add some initial code for video setup screen.
Matti Hamalainen <ccr@tnsp.org>
parents: 574
diff changeset
402
cf5d44b36851 Add some initial code for video setup screen.
Matti Hamalainen <ccr@tnsp.org>
parents: 574
diff changeset
403 // Render the menu
614
eed8d6abd89b Pre-convert/scale menu background and use direct blitting.
Matti Hamalainen <ccr@tnsp.org>
parents: 608
diff changeset
404 dmDirectBlitSurface(menuBgImage, engine.screen);
578
cf5d44b36851 Add some initial code for video setup screen.
Matti Hamalainen <ccr@tnsp.org>
parents: 574
diff changeset
405
597
8a9361179a1a More work on the video setup screen.
Matti Hamalainen <ccr@tnsp.org>
parents: 595
diff changeset
406 // XXX/TODO: Some hardcoded bits here ...
608
9620208f7ff4 More work on setup.
Matti Hamalainen <ccr@tnsp.org>
parents: 603
diff changeset
407 float t = engineGetTimeDT(&engine);
620
5fda51e99fe5 More work.
Matti Hamalainen <ccr@tnsp.org>
parents: 619
diff changeset
408 int index, entry;
615
024bc22c54d7 Cosmetics.
Matti Hamalainen <ccr@tnsp.org>
parents: 614
diff changeset
409
620
5fda51e99fe5 More work.
Matti Hamalainen <ccr@tnsp.org>
parents: 619
diff changeset
410 for (index = 0, entry = menuOffset; entry < nengineModeList && index < menuHeight; index++, entry++)
597
8a9361179a1a More work on the video setup screen.
Matti Hamalainen <ccr@tnsp.org>
parents: 595
diff changeset
411 {
619
6c23042c546f Aaaand some more work on mode selector.
Matti Hamalainen <ccr@tnsp.org>
parents: 618
diff changeset
412 DMModeEntry *mode = &engineModeList[entry];
6c23042c546f Aaaand some more work on mode selector.
Matti Hamalainen <ccr@tnsp.org>
parents: 618
diff changeset
413
620
5fda51e99fe5 More work.
Matti Hamalainen <ccr@tnsp.org>
parents: 619
diff changeset
414 if (entry == menuOffset + menuIndex)
5fda51e99fe5 More work.
Matti Hamalainen <ccr@tnsp.org>
parents: 619
diff changeset
415 {
5fda51e99fe5 More work.
Matti Hamalainen <ccr@tnsp.org>
parents: 619
diff changeset
416 dmScaledBlitSurface32to32TransparentGA(menuBarImage,
5fda51e99fe5 More work.
Matti Hamalainen <ccr@tnsp.org>
parents: 619
diff changeset
417 DM_VSETUP_MENU_XC,
5fda51e99fe5 More work.
Matti Hamalainen <ccr@tnsp.org>
parents: 619
diff changeset
418 DM_VSETUP_MENU_YC + (index * menuEntryHeight),
5fda51e99fe5 More work.
Matti Hamalainen <ccr@tnsp.org>
parents: 619
diff changeset
419 DM_VSETUP_MENU_WIDTH, menuEntryHeight + 2,
5fda51e99fe5 More work.
Matti Hamalainen <ccr@tnsp.org>
parents: 619
diff changeset
420 engine.screen,
5fda51e99fe5 More work.
Matti Hamalainen <ccr@tnsp.org>
parents: 619
diff changeset
421 200 + sin(t * 10.0) * 50);
5fda51e99fe5 More work.
Matti Hamalainen <ccr@tnsp.org>
parents: 619
diff changeset
422 }
5fda51e99fe5 More work.
Matti Hamalainen <ccr@tnsp.org>
parents: 619
diff changeset
423
619
6c23042c546f Aaaand some more work on mode selector.
Matti Hamalainen <ccr@tnsp.org>
parents: 618
diff changeset
424 snprintf(menuStr, sizeof(menuStr),
620
5fda51e99fe5 More work.
Matti Hamalainen <ccr@tnsp.org>
parents: 619
diff changeset
425 "%4d X %4d [%d:%d]",
5fda51e99fe5 More work.
Matti Hamalainen <ccr@tnsp.org>
parents: 619
diff changeset
426 mode->w, mode->h,
5fda51e99fe5 More work.
Matti Hamalainen <ccr@tnsp.org>
parents: 619
diff changeset
427 mode->aspect / 1000,
5fda51e99fe5 More work.
Matti Hamalainen <ccr@tnsp.org>
parents: 619
diff changeset
428 mode->aspect % 1000);
619
6c23042c546f Aaaand some more work on mode selector.
Matti Hamalainen <ccr@tnsp.org>
parents: 618
diff changeset
429
597
8a9361179a1a More work on the video setup screen.
Matti Hamalainen <ccr@tnsp.org>
parents: 595
diff changeset
430 dmDrawBMTextConst(
8a9361179a1a More work on the video setup screen.
Matti Hamalainen <ccr@tnsp.org>
parents: 595
diff changeset
431 engine.screen, menuFont, DMD_TRANSPARENT,
8a9361179a1a More work on the video setup screen.
Matti Hamalainen <ccr@tnsp.org>
parents: 595
diff changeset
432 DM_VSETUP_MENU_XC + 2,
620
5fda51e99fe5 More work.
Matti Hamalainen <ccr@tnsp.org>
parents: 619
diff changeset
433 DM_VSETUP_MENU_YC + 2 + (index * menuEntryHeight),
597
8a9361179a1a More work on the video setup screen.
Matti Hamalainen <ccr@tnsp.org>
parents: 595
diff changeset
434 menuStr);
8a9361179a1a More work on the video setup screen.
Matti Hamalainen <ccr@tnsp.org>
parents: 595
diff changeset
435 }
8a9361179a1a More work on the video setup screen.
Matti Hamalainen <ccr@tnsp.org>
parents: 595
diff changeset
436
619
6c23042c546f Aaaand some more work on mode selector.
Matti Hamalainen <ccr@tnsp.org>
parents: 618
diff changeset
437 dmDrawBMTextConst(
6c23042c546f Aaaand some more work on mode selector.
Matti Hamalainen <ccr@tnsp.org>
parents: 618
diff changeset
438 engine.screen, menuFont, DMD_TRANSPARENT,
6c23042c546f Aaaand some more work on mode selector.
Matti Hamalainen <ccr@tnsp.org>
parents: 618
diff changeset
439 80,
6c23042c546f Aaaand some more work on mode selector.
Matti Hamalainen <ccr@tnsp.org>
parents: 618
diff changeset
440 DM_VSETUP_MENU_YC + menuEntryHeight * (1 + menuHeight),
6c23042c546f Aaaand some more work on mode selector.
Matti Hamalainen <ccr@tnsp.org>
parents: 618
diff changeset
441 fullScreen ?
6c23042c546f Aaaand some more work on mode selector.
Matti Hamalainen <ccr@tnsp.org>
parents: 618
diff changeset
442 "[ FULLSCREEN ] - SPACE TO TOGGLE" :
6c23042c546f Aaaand some more work on mode selector.
Matti Hamalainen <ccr@tnsp.org>
parents: 618
diff changeset
443 "[ WINDOWED ] - SPACE TO TOGGLE");
6c23042c546f Aaaand some more work on mode selector.
Matti Hamalainen <ccr@tnsp.org>
parents: 618
diff changeset
444
6c23042c546f Aaaand some more work on mode selector.
Matti Hamalainen <ccr@tnsp.org>
parents: 618
diff changeset
445 dmDrawBMTextConst(
6c23042c546f Aaaand some more work on mode selector.
Matti Hamalainen <ccr@tnsp.org>
parents: 618
diff changeset
446 engine.screen, menuFont, DMD_TRANSPARENT,
6c23042c546f Aaaand some more work on mode selector.
Matti Hamalainen <ccr@tnsp.org>
parents: 618
diff changeset
447 80,
6c23042c546f Aaaand some more work on mode selector.
Matti Hamalainen <ccr@tnsp.org>
parents: 618
diff changeset
448 DM_VSETUP_MENU_YC + menuEntryHeight * (2 + menuHeight),
6c23042c546f Aaaand some more work on mode selector.
Matti Hamalainen <ccr@tnsp.org>
parents: 618
diff changeset
449 " PRESS [ENTER] TO START ");
578
cf5d44b36851 Add some initial code for video setup screen.
Matti Hamalainen <ccr@tnsp.org>
parents: 574
diff changeset
450
cf5d44b36851 Add some initial code for video setup screen.
Matti Hamalainen <ccr@tnsp.org>
parents: 574
diff changeset
451 // Flip screen
cf5d44b36851 Add some initial code for video setup screen.
Matti Hamalainen <ccr@tnsp.org>
parents: 574
diff changeset
452 if (SDL_MUSTLOCK(engine.screen) != 0)
cf5d44b36851 Add some initial code for video setup screen.
Matti Hamalainen <ccr@tnsp.org>
parents: 574
diff changeset
453 SDL_UnlockSurface(engine.screen);
cf5d44b36851 Add some initial code for video setup screen.
Matti Hamalainen <ccr@tnsp.org>
parents: 574
diff changeset
454
cf5d44b36851 Add some initial code for video setup screen.
Matti Hamalainen <ccr@tnsp.org>
parents: 574
diff changeset
455 SDL_Flip(engine.screen);
616
ed4536641796 A bit slower screen update rate.
Matti Hamalainen <ccr@tnsp.org>
parents: 615
diff changeset
456 SDL_Delay(25);
578
cf5d44b36851 Add some initial code for video setup screen.
Matti Hamalainen <ccr@tnsp.org>
parents: 574
diff changeset
457 }
cf5d44b36851 Add some initial code for video setup screen.
Matti Hamalainen <ccr@tnsp.org>
parents: 574
diff changeset
458
cf5d44b36851 Add some initial code for video setup screen.
Matti Hamalainen <ccr@tnsp.org>
parents: 574
diff changeset
459 out:
608
9620208f7ff4 More work on setup.
Matti Hamalainen <ccr@tnsp.org>
parents: 603
diff changeset
460 SDL_FreeSurface(menuBgImage);
9620208f7ff4 More work on setup.
Matti Hamalainen <ccr@tnsp.org>
parents: 603
diff changeset
461 SDL_FreeSurface(menuBarImage);
9620208f7ff4 More work on setup.
Matti Hamalainen <ccr@tnsp.org>
parents: 603
diff changeset
462 dmFreeBitmapFont(menuFont);
9620208f7ff4 More work on setup.
Matti Hamalainen <ccr@tnsp.org>
parents: 603
diff changeset
463
578
cf5d44b36851 Add some initial code for video setup screen.
Matti Hamalainen <ccr@tnsp.org>
parents: 574
diff changeset
464 return menuState;
cf5d44b36851 Add some initial code for video setup screen.
Matti Hamalainen <ccr@tnsp.org>
parents: 574
diff changeset
465 }
cf5d44b36851 Add some initial code for video setup screen.
Matti Hamalainen <ccr@tnsp.org>
parents: 574
diff changeset
466
cf5d44b36851 Add some initial code for video setup screen.
Matti Hamalainen <ccr@tnsp.org>
parents: 574
diff changeset
467
593
17bf1704d42e More work on video setup.
Matti Hamalainen <ccr@tnsp.org>
parents: 591
diff changeset
468 int engineGetVideoAspect(int width, int height)
17bf1704d42e More work on video setup.
Matti Hamalainen <ccr@tnsp.org>
parents: 591
diff changeset
469 {
17bf1704d42e More work on video setup.
Matti Hamalainen <ccr@tnsp.org>
parents: 591
diff changeset
470 if (width > 0 && height > 0)
17bf1704d42e More work on video setup.
Matti Hamalainen <ccr@tnsp.org>
parents: 591
diff changeset
471 return (width * 1000) / height;
17bf1704d42e More work on video setup.
Matti Hamalainen <ccr@tnsp.org>
parents: 591
diff changeset
472 else
17bf1704d42e More work on video setup.
Matti Hamalainen <ccr@tnsp.org>
parents: 591
diff changeset
473 return 1;
17bf1704d42e More work on video setup.
Matti Hamalainen <ccr@tnsp.org>
parents: 591
diff changeset
474 }
17bf1704d42e More work on video setup.
Matti Hamalainen <ccr@tnsp.org>
parents: 591
diff changeset
475
17bf1704d42e More work on video setup.
Matti Hamalainen <ccr@tnsp.org>
parents: 591
diff changeset
476
32
d1a6833a5d67 Added a simple demo engine core.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
477 int main(int argc, char *argv[])
d1a6833a5d67 Added a simple demo engine core.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
478 {
d1a6833a5d67 Added a simple demo engine core.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
479 int err;
d1a6833a5d67 Added a simple demo engine core.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
480 BOOL initSDL = FALSE;
d1a6833a5d67 Added a simple demo engine core.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
481
d1a6833a5d67 Added a simple demo engine core.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
482 memset(&engine, 0, sizeof(engine));
d1a6833a5d67 Added a simple demo engine core.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
483
d1a6833a5d67 Added a simple demo engine core.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
484 // Pre-initialization
366
38e10b5f4e09 Work towards base engine re-entrancy.
Matti Hamalainen <ccr@tnsp.org>
parents: 361
diff changeset
485 if ((err = demoPreInit(&engine)) != DMERR_OK)
32
d1a6833a5d67 Added a simple demo engine core.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
486 goto error_exit;
d1a6833a5d67 Added a simple demo engine core.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
487
121
16fc6e6cf3b5 Move option handling to the simple demo engine.
Matti Hamalainen <ccr@tnsp.org>
parents: 113
diff changeset
488 if (!dmArgsProcess(argc, argv, optList, optListN,
16fc6e6cf3b5 Move option handling to the simple demo engine.
Matti Hamalainen <ccr@tnsp.org>
parents: 113
diff changeset
489 argHandleOpt, NULL, FALSE))
16fc6e6cf3b5 Move option handling to the simple demo engine.
Matti Hamalainen <ccr@tnsp.org>
parents: 113
diff changeset
490 return DMERR_INIT_FAIL;
123
6f7356f3b91c Add engine startup messages showing prod name and "TNSP simple demoengine blurb".
Matti Hamalainen <ccr@tnsp.org>
parents: 122
diff changeset
491
6f7356f3b91c Add engine startup messages showing prod name and "TNSP simple demoengine blurb".
Matti Hamalainen <ccr@tnsp.org>
parents: 122
diff changeset
492 dmPrint(0,
6f7356f3b91c Add engine startup messages showing prod name and "TNSP simple demoengine blurb".
Matti Hamalainen <ccr@tnsp.org>
parents: 122
diff changeset
493 "%s\n"
312
99dc5d012081 Change startup messages.
Matti Hamalainen <ccr@tnsp.org>
parents: 310
diff changeset
494 "%s\n"
99dc5d012081 Change startup messages.
Matti Hamalainen <ccr@tnsp.org>
parents: 310
diff changeset
495 "TNSP simple demoengine initializing.\n",
123
6f7356f3b91c Add engine startup messages showing prod name and "TNSP simple demoengine blurb".
Matti Hamalainen <ccr@tnsp.org>
parents: 122
diff changeset
496 dmProgDesc, dmProgAuthor);
125
5102ec9e9bce Add a blurb about used features/3rd party code (zlib, Tremor, SDL).
Matti Hamalainen <ccr@tnsp.org>
parents: 123
diff changeset
497
5102ec9e9bce Add a blurb about used features/3rd party code (zlib, Tremor, SDL).
Matti Hamalainen <ccr@tnsp.org>
parents: 123
diff changeset
498 dmPrint(0,
5102ec9e9bce Add a blurb about used features/3rd party code (zlib, Tremor, SDL).
Matti Hamalainen <ccr@tnsp.org>
parents: 123
diff changeset
499 "Using libSDL, "
578
cf5d44b36851 Add some initial code for video setup screen.
Matti Hamalainen <ccr@tnsp.org>
parents: 574
diff changeset
500 #ifdef DM_USE_PACKFS
cf5d44b36851 Add some initial code for video setup screen.
Matti Hamalainen <ccr@tnsp.org>
parents: 574
diff changeset
501 "zlib, "
cf5d44b36851 Add some initial code for video setup screen.
Matti Hamalainen <ccr@tnsp.org>
parents: 574
diff changeset
502 #endif
125
5102ec9e9bce Add a blurb about used features/3rd party code (zlib, Tremor, SDL).
Matti Hamalainen <ccr@tnsp.org>
parents: 123
diff changeset
503 #ifdef DM_USE_TREMOR
5102ec9e9bce Add a blurb about used features/3rd party code (zlib, Tremor, SDL).
Matti Hamalainen <ccr@tnsp.org>
parents: 123
diff changeset
504 "Tremor Vorbis codec"
5102ec9e9bce Add a blurb about used features/3rd party code (zlib, Tremor, SDL).
Matti Hamalainen <ccr@tnsp.org>
parents: 123
diff changeset
505 #endif
5102ec9e9bce Add a blurb about used features/3rd party code (zlib, Tremor, SDL).
Matti Hamalainen <ccr@tnsp.org>
parents: 123
diff changeset
506 " and modified stb_image.\n"
5102ec9e9bce Add a blurb about used features/3rd party code (zlib, Tremor, SDL).
Matti Hamalainen <ccr@tnsp.org>
parents: 123
diff changeset
507 "See README.txt for more information.\n");
5102ec9e9bce Add a blurb about used features/3rd party code (zlib, Tremor, SDL).
Matti Hamalainen <ccr@tnsp.org>
parents: 123
diff changeset
508
32
d1a6833a5d67 Added a simple demo engine core.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
509 // Initialize resource subsystem
d1a6833a5d67 Added a simple demo engine core.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
510 dmPrint(1, "Initializing resources subsystem.\n");
600
663ae037bc00 Cosmetics.
Matti Hamalainen <ccr@tnsp.org>
parents: 599
diff changeset
511 if ((err = dmres_init(&engine.resources, engine.optPackFilename,
663ae037bc00 Cosmetics.
Matti Hamalainen <ccr@tnsp.org>
parents: 599
diff changeset
512 engine.optDataPath, engine.optResFlags, engineClassifier)) != DMERR_OK)
32
d1a6833a5d67 Added a simple demo engine core.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
513 {
574
2c3afff104c6 Fix some error messages.
Matti Hamalainen <ccr@tnsp.org>
parents: 573
diff changeset
514 dmError("Could not initialize resource manager, #%d: %s.\n", err, dmErrorStr(err));
32
d1a6833a5d67 Added a simple demo engine core.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
515 goto error_exit;
d1a6833a5d67 Added a simple demo engine core.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
516 }
d1a6833a5d67 Added a simple demo engine core.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
517
d1a6833a5d67 Added a simple demo engine core.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
518 // Initialize SDL components
122
5ba672ebe014 Add some verbose engine startup messages.
Matti Hamalainen <ccr@tnsp.org>
parents: 121
diff changeset
519 dmPrint(1, "Initializing libSDL.\n");
32
d1a6833a5d67 Added a simple demo engine core.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
520 if (SDL_Init(SDL_INIT_VIDEO | SDL_INIT_AUDIO | SDL_INIT_TIMER) != 0)
d1a6833a5d67 Added a simple demo engine core.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
521 {
d1a6833a5d67 Added a simple demo engine core.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
522 dmError("Could not initialize SDL: %s\n", SDL_GetError());
d1a6833a5d67 Added a simple demo engine core.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
523 goto error_exit;
d1a6833a5d67 Added a simple demo engine core.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
524 }
d1a6833a5d67 Added a simple demo engine core.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
525 initSDL = TRUE;
d1a6833a5d67 Added a simple demo engine core.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
526
578
cf5d44b36851 Add some initial code for video setup screen.
Matti Hamalainen <ccr@tnsp.org>
parents: 574
diff changeset
527
cf5d44b36851 Add some initial code for video setup screen.
Matti Hamalainen <ccr@tnsp.org>
parents: 574
diff changeset
528 // Present video mode selector
593
17bf1704d42e More work on video setup.
Matti Hamalainen <ccr@tnsp.org>
parents: 591
diff changeset
529 if (engine.optVidAspect <= 0)
17bf1704d42e More work on video setup.
Matti Hamalainen <ccr@tnsp.org>
parents: 591
diff changeset
530 engine.optVidAspect = engineGetVideoAspect(engine.optVidWidth, engine.optVidHeight);
17bf1704d42e More work on video setup.
Matti Hamalainen <ccr@tnsp.org>
parents: 591
diff changeset
531
578
cf5d44b36851 Add some initial code for video setup screen.
Matti Hamalainen <ccr@tnsp.org>
parents: 574
diff changeset
532 if (engine.optVidSetup)
593
17bf1704d42e More work on video setup.
Matti Hamalainen <ccr@tnsp.org>
parents: 591
diff changeset
533 {
17bf1704d42e More work on video setup.
Matti Hamalainen <ccr@tnsp.org>
parents: 591
diff changeset
534 if ((err = engineVideoSetup()) <= 0)
17bf1704d42e More work on video setup.
Matti Hamalainen <ccr@tnsp.org>
parents: 591
diff changeset
535 goto error_exit;
17bf1704d42e More work on video setup.
Matti Hamalainen <ccr@tnsp.org>
parents: 591
diff changeset
536 }
578
cf5d44b36851 Add some initial code for video setup screen.
Matti Hamalainen <ccr@tnsp.org>
parents: 574
diff changeset
537
122
5ba672ebe014 Add some verbose engine startup messages.
Matti Hamalainen <ccr@tnsp.org>
parents: 121
diff changeset
538 // Initialize audio parts
126
97488948215c Allow setting audio format settings.
Matti Hamalainen <ccr@tnsp.org>
parents: 125
diff changeset
539 if (engine.optAfmt.freq == 0 && engine.optAfmt.channels == 0)
97488948215c Allow setting audio format settings.
Matti Hamalainen <ccr@tnsp.org>
parents: 125
diff changeset
540 {
97488948215c Allow setting audio format settings.
Matti Hamalainen <ccr@tnsp.org>
parents: 125
diff changeset
541 // Defaults, if none seem to be set
97488948215c Allow setting audio format settings.
Matti Hamalainen <ccr@tnsp.org>
parents: 125
diff changeset
542 engine.optAfmt.freq = 44100;
97488948215c Allow setting audio format settings.
Matti Hamalainen <ccr@tnsp.org>
parents: 125
diff changeset
543 engine.optAfmt.format = AUDIO_S16SYS;
97488948215c Allow setting audio format settings.
Matti Hamalainen <ccr@tnsp.org>
parents: 125
diff changeset
544 engine.optAfmt.channels = 2;
316
a03e604f4e75 Adjust audio buffer size.
Matti Hamalainen <ccr@tnsp.org>
parents: 312
diff changeset
545 engine.optAfmt.samples = engine.optAfmt.freq / 16;
126
97488948215c Allow setting audio format settings.
Matti Hamalainen <ccr@tnsp.org>
parents: 125
diff changeset
546 }
105
d5d27f262227 Beging merging of dmsimple2-fork into the main "engine".
Matti Hamalainen <ccr@tnsp.org>
parents: 94
diff changeset
547
d5d27f262227 Beging merging of dmsimple2-fork into the main "engine".
Matti Hamalainen <ccr@tnsp.org>
parents: 94
diff changeset
548 #ifdef DM_USE_JSS
32
d1a6833a5d67 Added a simple demo engine core.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
549 jssInit();
d1a6833a5d67 Added a simple demo engine core.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
550
105
d5d27f262227 Beging merging of dmsimple2-fork into the main "engine".
Matti Hamalainen <ccr@tnsp.org>
parents: 94
diff changeset
551 switch (engine.optAfmt.format)
d5d27f262227 Beging merging of dmsimple2-fork into the main "engine".
Matti Hamalainen <ccr@tnsp.org>
parents: 94
diff changeset
552 {
110
8db49a23b393 Fixes to make the JSS audio subsystem support work again in the engine framework.
Matti Hamalainen <ccr@tnsp.org>
parents: 109
diff changeset
553 case AUDIO_S16SYS: engine.jss_format = JSS_AUDIO_S16; break;
8db49a23b393 Fixes to make the JSS audio subsystem support work again in the engine framework.
Matti Hamalainen <ccr@tnsp.org>
parents: 109
diff changeset
554 case AUDIO_U16SYS: engine.jss_format = JSS_AUDIO_U16; break;
8db49a23b393 Fixes to make the JSS audio subsystem support work again in the engine framework.
Matti Hamalainen <ccr@tnsp.org>
parents: 109
diff changeset
555 case AUDIO_S8: engine.jss_format = JSS_AUDIO_S8; break;
8db49a23b393 Fixes to make the JSS audio subsystem support work again in the engine framework.
Matti Hamalainen <ccr@tnsp.org>
parents: 109
diff changeset
556 case AUDIO_U8: engine.jss_format = JSS_AUDIO_U8; break;
105
d5d27f262227 Beging merging of dmsimple2-fork into the main "engine".
Matti Hamalainen <ccr@tnsp.org>
parents: 94
diff changeset
557 }
32
d1a6833a5d67 Added a simple demo engine core.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
558
105
d5d27f262227 Beging merging of dmsimple2-fork into the main "engine".
Matti Hamalainen <ccr@tnsp.org>
parents: 94
diff changeset
559 dmPrint(1, "Initializing miniJSS mixer with fmt=%d, chn=%d, freq=%d\n",
110
8db49a23b393 Fixes to make the JSS audio subsystem support work again in the engine framework.
Matti Hamalainen <ccr@tnsp.org>
parents: 109
diff changeset
560 engine.jss_format, engine.optAfmt.channels, engine.optAfmt.freq);
32
d1a6833a5d67 Added a simple demo engine core.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
561
110
8db49a23b393 Fixes to make the JSS audio subsystem support work again in the engine framework.
Matti Hamalainen <ccr@tnsp.org>
parents: 109
diff changeset
562 if ((engine.dev = jvmInit(engine.jss_format, engine.optAfmt.channels, engine.optAfmt.freq, JMIX_AUTO)) == NULL)
32
d1a6833a5d67 Added a simple demo engine core.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
563 {
d1a6833a5d67 Added a simple demo engine core.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
564 dmError("jvmInit() returned NULL, voi perkele.\n");
d1a6833a5d67 Added a simple demo engine core.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
565 goto error_exit;
d1a6833a5d67 Added a simple demo engine core.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
566 }
d1a6833a5d67 Added a simple demo engine core.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
567
d1a6833a5d67 Added a simple demo engine core.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
568 if ((engine.plr = jmpInit(engine.dev)) == NULL)
d1a6833a5d67 Added a simple demo engine core.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
569 {
d1a6833a5d67 Added a simple demo engine core.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
570 dmError("jmpInit() returned NULL\n");
d1a6833a5d67 Added a simple demo engine core.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
571 goto error_exit;
d1a6833a5d67 Added a simple demo engine core.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
572 }
105
d5d27f262227 Beging merging of dmsimple2-fork into the main "engine".
Matti Hamalainen <ccr@tnsp.org>
parents: 94
diff changeset
573 #endif
32
d1a6833a5d67 Added a simple demo engine core.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
574
d1a6833a5d67 Added a simple demo engine core.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
575 // Initialize SDL audio
105
d5d27f262227 Beging merging of dmsimple2-fork into the main "engine".
Matti Hamalainen <ccr@tnsp.org>
parents: 94
diff changeset
576 dmPrint(1, "Trying to init SDL audio with: fmt=%d, chn=%d, freq=%d\n",
d5d27f262227 Beging merging of dmsimple2-fork into the main "engine".
Matti Hamalainen <ccr@tnsp.org>
parents: 94
diff changeset
577 engine.optAfmt.format, engine.optAfmt.channels, engine.optAfmt.freq);
32
d1a6833a5d67 Added a simple demo engine core.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
578
342
c6ec970dc3cf Separate some demo engine parts to two different modules.
Matti Hamalainen <ccr@tnsp.org>
parents: 336
diff changeset
579 engine.optAfmt.callback = engineAudioCallback;
32
d1a6833a5d67 Added a simple demo engine core.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
580
105
d5d27f262227 Beging merging of dmsimple2-fork into the main "engine".
Matti Hamalainen <ccr@tnsp.org>
parents: 94
diff changeset
581 if (SDL_OpenAudio(&engine.optAfmt, NULL) < 0)
32
d1a6833a5d67 Added a simple demo engine core.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
582 {
122
5ba672ebe014 Add some verbose engine startup messages.
Matti Hamalainen <ccr@tnsp.org>
parents: 121
diff changeset
583 dmError("Couldn't open SDL audio: %s\n", SDL_GetError());
595
695a623eed63 Add a comment about no-sound support to the relevant part in audio setup
Matti Hamalainen <ccr@tnsp.org>
parents: 593
diff changeset
584 // We'll let this pass, as we want to support no-sound.
695a623eed63 Add a comment about no-sound support to the relevant part in audio setup
Matti Hamalainen <ccr@tnsp.org>
parents: 593
diff changeset
585 // goto error_exit;
32
d1a6833a5d67 Added a simple demo engine core.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
586 }
d1a6833a5d67 Added a simple demo engine core.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
587
d1a6833a5d67 Added a simple demo engine core.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
588 // Initialize SDL video
127
ab4086db7dad Various improvements in modularity.
Matti Hamalainen <ccr@tnsp.org>
parents: 126
diff changeset
589 if (engine.demoInitPreVideo != NULL &&
366
38e10b5f4e09 Work towards base engine re-entrancy.
Matti Hamalainen <ccr@tnsp.org>
parents: 361
diff changeset
590 (err = engine.demoInitPreVideo(&engine)) != DMERR_OK)
127
ab4086db7dad Various improvements in modularity.
Matti Hamalainen <ccr@tnsp.org>
parents: 126
diff changeset
591 {
574
2c3afff104c6 Fix some error messages.
Matti Hamalainen <ccr@tnsp.org>
parents: 573
diff changeset
592 dmError("demoInitPreVideo() failed, #%d: %s\n", err, dmErrorStr(err));
127
ab4086db7dad Various improvements in modularity.
Matti Hamalainen <ccr@tnsp.org>
parents: 126
diff changeset
593 goto error_exit;
ab4086db7dad Various improvements in modularity.
Matti Hamalainen <ccr@tnsp.org>
parents: 126
diff changeset
594 }
ab4086db7dad Various improvements in modularity.
Matti Hamalainen <ccr@tnsp.org>
parents: 126
diff changeset
595
332
d4802335cbbc Clean up video (re)initialization.
Matti Hamalainen <ccr@tnsp.org>
parents: 316
diff changeset
596 if (!engineInitializeVideo())
32
d1a6833a5d67 Added a simple demo engine core.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
597 goto error_exit;
d1a6833a5d67 Added a simple demo engine core.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
598
127
ab4086db7dad Various improvements in modularity.
Matti Hamalainen <ccr@tnsp.org>
parents: 126
diff changeset
599 if (engine.demoInitPostVideo != NULL &&
366
38e10b5f4e09 Work towards base engine re-entrancy.
Matti Hamalainen <ccr@tnsp.org>
parents: 361
diff changeset
600 (err = engine.demoInitPostVideo(&engine)) != DMERR_OK)
127
ab4086db7dad Various improvements in modularity.
Matti Hamalainen <ccr@tnsp.org>
parents: 126
diff changeset
601 {
574
2c3afff104c6 Fix some error messages.
Matti Hamalainen <ccr@tnsp.org>
parents: 573
diff changeset
602 dmError("demoInitPostVideo() failed, #%d: %s\n", err, dmErrorStr(err));
127
ab4086db7dad Various improvements in modularity.
Matti Hamalainen <ccr@tnsp.org>
parents: 126
diff changeset
603 goto error_exit;
ab4086db7dad Various improvements in modularity.
Matti Hamalainen <ccr@tnsp.org>
parents: 126
diff changeset
604 }
32
d1a6833a5d67 Added a simple demo engine core.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
605
593
17bf1704d42e More work on video setup.
Matti Hamalainen <ccr@tnsp.org>
parents: 591
diff changeset
606 // Hide cursor
17bf1704d42e More work on video setup.
Matti Hamalainen <ccr@tnsp.org>
parents: 591
diff changeset
607 SDL_ShowCursor(SDL_DISABLE);
17bf1704d42e More work on video setup.
Matti Hamalainen <ccr@tnsp.org>
parents: 591
diff changeset
608
32
d1a6833a5d67 Added a simple demo engine core.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
609 // Load resources
122
5ba672ebe014 Add some verbose engine startup messages.
Matti Hamalainen <ccr@tnsp.org>
parents: 121
diff changeset
610 dmPrint(1, "Loading resources, please wait...\n");
32
d1a6833a5d67 Added a simple demo engine core.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
611 if ((err = engineLoadResources()) != DMERR_OK)
d1a6833a5d67 Added a simple demo engine core.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
612 {
574
2c3afff104c6 Fix some error messages.
Matti Hamalainen <ccr@tnsp.org>
parents: 573
diff changeset
613 dmError("Error loading resources, #%d: %s.\n",
32
d1a6833a5d67 Added a simple demo engine core.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
614 err, dmErrorStr(err));
d1a6833a5d67 Added a simple demo engine core.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
615 goto error_exit;
d1a6833a5d67 Added a simple demo engine core.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
616 }
d1a6833a5d67 Added a simple demo engine core.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
617
d1a6833a5d67 Added a simple demo engine core.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
618 // Final initializations
366
38e10b5f4e09 Work towards base engine re-entrancy.
Matti Hamalainen <ccr@tnsp.org>
parents: 361
diff changeset
619 if ((err = engine.demoInit(&engine)) != DMERR_OK)
354
ba284f5e7ea5 More work on editor, etc.
Matti Hamalainen <ccr@tnsp.org>
parents: 351
diff changeset
620 {
574
2c3afff104c6 Fix some error messages.
Matti Hamalainen <ccr@tnsp.org>
parents: 573
diff changeset
621 dmError("Failure in demoInit(), #%d: %s\n",
354
ba284f5e7ea5 More work on editor, etc.
Matti Hamalainen <ccr@tnsp.org>
parents: 351
diff changeset
622 err, dmErrorStr(err));
32
d1a6833a5d67 Added a simple demo engine core.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
623 goto error_exit;
354
ba284f5e7ea5 More work on editor, etc.
Matti Hamalainen <ccr@tnsp.org>
parents: 351
diff changeset
624 }
ba284f5e7ea5 More work on editor, etc.
Matti Hamalainen <ccr@tnsp.org>
parents: 351
diff changeset
625
ba284f5e7ea5 More work on editor, etc.
Matti Hamalainen <ccr@tnsp.org>
parents: 351
diff changeset
626 // Initialize effects
369
e1c984404b6b Re-entrancy.
Matti Hamalainen <ccr@tnsp.org>
parents: 367
diff changeset
627 if ((err = engineInitializeEffects(&engine)) != DMERR_OK)
354
ba284f5e7ea5 More work on editor, etc.
Matti Hamalainen <ccr@tnsp.org>
parents: 351
diff changeset
628 {
574
2c3afff104c6 Fix some error messages.
Matti Hamalainen <ccr@tnsp.org>
parents: 573
diff changeset
629 dmError("Effects initialization failed, #%d: %s\n",
354
ba284f5e7ea5 More work on editor, etc.
Matti Hamalainen <ccr@tnsp.org>
parents: 351
diff changeset
630 err, dmErrorStr(err));
ba284f5e7ea5 More work on editor, etc.
Matti Hamalainen <ccr@tnsp.org>
parents: 351
diff changeset
631 goto error_exit;
ba284f5e7ea5 More work on editor, etc.
Matti Hamalainen <ccr@tnsp.org>
parents: 351
diff changeset
632 }
ba284f5e7ea5 More work on editor, etc.
Matti Hamalainen <ccr@tnsp.org>
parents: 351
diff changeset
633
ba284f5e7ea5 More work on editor, etc.
Matti Hamalainen <ccr@tnsp.org>
parents: 351
diff changeset
634 // Use a timeline, if set
573
14640d0688d3 Make timeline stuff optional.
Matti Hamalainen <ccr@tnsp.org>
parents: 571
diff changeset
635 #ifdef DM_USE_TIMELINE
354
ba284f5e7ea5 More work on editor, etc.
Matti Hamalainen <ccr@tnsp.org>
parents: 351
diff changeset
636 if (engine.timeline != NULL)
ba284f5e7ea5 More work on editor, etc.
Matti Hamalainen <ccr@tnsp.org>
parents: 351
diff changeset
637 {
ba284f5e7ea5 More work on editor, etc.
Matti Hamalainen <ccr@tnsp.org>
parents: 351
diff changeset
638 if ((err = dmLoadTimeline(engine.timeline, &engine.tl)) != DMERR_OK)
ba284f5e7ea5 More work on editor, etc.
Matti Hamalainen <ccr@tnsp.org>
parents: 351
diff changeset
639 {
574
2c3afff104c6 Fix some error messages.
Matti Hamalainen <ccr@tnsp.org>
parents: 573
diff changeset
640 dmError("Error loading timeline, #%d: %s\n", err,
354
ba284f5e7ea5 More work on editor, etc.
Matti Hamalainen <ccr@tnsp.org>
parents: 351
diff changeset
641 dmErrorStr(err));
ba284f5e7ea5 More work on editor, etc.
Matti Hamalainen <ccr@tnsp.org>
parents: 351
diff changeset
642 goto error_exit;
ba284f5e7ea5 More work on editor, etc.
Matti Hamalainen <ccr@tnsp.org>
parents: 351
diff changeset
643 }
ba284f5e7ea5 More work on editor, etc.
Matti Hamalainen <ccr@tnsp.org>
parents: 351
diff changeset
644
ba284f5e7ea5 More work on editor, etc.
Matti Hamalainen <ccr@tnsp.org>
parents: 351
diff changeset
645 if ((err = dmPrepareTimeline(engine.tl, engine.ptl)) != DMERR_OK)
ba284f5e7ea5 More work on editor, etc.
Matti Hamalainen <ccr@tnsp.org>
parents: 351
diff changeset
646 {
574
2c3afff104c6 Fix some error messages.
Matti Hamalainen <ccr@tnsp.org>
parents: 573
diff changeset
647 dmError("Error creating prepared timeline, #%d: %s\n",
354
ba284f5e7ea5 More work on editor, etc.
Matti Hamalainen <ccr@tnsp.org>
parents: 351
diff changeset
648 err, dmErrorStr(err));
ba284f5e7ea5 More work on editor, etc.
Matti Hamalainen <ccr@tnsp.org>
parents: 351
diff changeset
649 goto error_exit;
ba284f5e7ea5 More work on editor, etc.
Matti Hamalainen <ccr@tnsp.org>
parents: 351
diff changeset
650 }
ba284f5e7ea5 More work on editor, etc.
Matti Hamalainen <ccr@tnsp.org>
parents: 351
diff changeset
651 }
573
14640d0688d3 Make timeline stuff optional.
Matti Hamalainen <ccr@tnsp.org>
parents: 571
diff changeset
652 #endif
32
d1a6833a5d67 Added a simple demo engine core.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
653
122
5ba672ebe014 Add some verbose engine startup messages.
Matti Hamalainen <ccr@tnsp.org>
parents: 121
diff changeset
654 dmPrint(1, "Starting up.\n");
278
919e7de91758 Improve locking.
Matti Hamalainen <ccr@tnsp.org>
parents: 277
diff changeset
655
919e7de91758 Improve locking.
Matti Hamalainen <ccr@tnsp.org>
parents: 277
diff changeset
656 SDL_LockAudio();
41
780300a8d322 Move SDL_PauseAudio(0) to the "engine" instead of the demo code.
Matti Hamalainen <ccr@tnsp.org>
parents: 40
diff changeset
657 SDL_PauseAudio(0);
278
919e7de91758 Improve locking.
Matti Hamalainen <ccr@tnsp.org>
parents: 277
diff changeset
658 SDL_UnlockAudio();
919e7de91758 Improve locking.
Matti Hamalainen <ccr@tnsp.org>
parents: 277
diff changeset
659
32
d1a6833a5d67 Added a simple demo engine core.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
660 engine.startTime = SDL_GetTicks();
d1a6833a5d67 Added a simple demo engine core.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
661
d1a6833a5d67 Added a simple demo engine core.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
662 while (!engine.exitFlag)
d1a6833a5d67 Added a simple demo engine core.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
663 {
d1a6833a5d67 Added a simple demo engine core.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
664 while (SDL_PollEvent(&engine.event))
d1a6833a5d67 Added a simple demo engine core.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
665 switch (engine.event.type)
d1a6833a5d67 Added a simple demo engine core.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
666 {
d1a6833a5d67 Added a simple demo engine core.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
667 case SDL_KEYDOWN:
d1a6833a5d67 Added a simple demo engine core.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
668 switch (engine.event.key.keysym.sym)
d1a6833a5d67 Added a simple demo engine core.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
669 {
d1a6833a5d67 Added a simple demo engine core.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
670 case SDLK_ESCAPE:
d1a6833a5d67 Added a simple demo engine core.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
671 engine.exitFlag = TRUE;
d1a6833a5d67 Added a simple demo engine core.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
672 break;
d1a6833a5d67 Added a simple demo engine core.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
673
d1a6833a5d67 Added a simple demo engine core.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
674 case SDLK_SPACE:
d1a6833a5d67 Added a simple demo engine core.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
675 engine.pauseFlag = !engine.pauseFlag;
d1a6833a5d67 Added a simple demo engine core.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
676 break;
d1a6833a5d67 Added a simple demo engine core.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
677
336
13dba73cf28e Add 'F' key to fullscreen toggling, in addition to alt+enter.
Matti Hamalainen <ccr@tnsp.org>
parents: 335
diff changeset
678 case SDLK_f:
13dba73cf28e Add 'F' key to fullscreen toggling, in addition to alt+enter.
Matti Hamalainen <ccr@tnsp.org>
parents: 335
diff changeset
679 engine.optVFlags ^= SDL_FULLSCREEN;
13dba73cf28e Add 'F' key to fullscreen toggling, in addition to alt+enter.
Matti Hamalainen <ccr@tnsp.org>
parents: 335
diff changeset
680 if (!engineInitializeVideo())
13dba73cf28e Add 'F' key to fullscreen toggling, in addition to alt+enter.
Matti Hamalainen <ccr@tnsp.org>
parents: 335
diff changeset
681 goto error_exit;
13dba73cf28e Add 'F' key to fullscreen toggling, in addition to alt+enter.
Matti Hamalainen <ccr@tnsp.org>
parents: 335
diff changeset
682 break;
13dba73cf28e Add 'F' key to fullscreen toggling, in addition to alt+enter.
Matti Hamalainen <ccr@tnsp.org>
parents: 335
diff changeset
683
109
3de6301dcfe1 Implement fullscrene toggling via alt+enter
Matti Hamalainen <ccr@tnsp.org>
parents: 105
diff changeset
684 case SDLK_RETURN:
3de6301dcfe1 Implement fullscrene toggling via alt+enter
Matti Hamalainen <ccr@tnsp.org>
parents: 105
diff changeset
685 if (engine.event.key.keysym.mod & KMOD_ALT)
3de6301dcfe1 Implement fullscrene toggling via alt+enter
Matti Hamalainen <ccr@tnsp.org>
parents: 105
diff changeset
686 {
332
d4802335cbbc Clean up video (re)initialization.
Matti Hamalainen <ccr@tnsp.org>
parents: 316
diff changeset
687 engine.optVFlags ^= SDL_FULLSCREEN;
d4802335cbbc Clean up video (re)initialization.
Matti Hamalainen <ccr@tnsp.org>
parents: 316
diff changeset
688 if (!engineInitializeVideo())
d4802335cbbc Clean up video (re)initialization.
Matti Hamalainen <ccr@tnsp.org>
parents: 316
diff changeset
689 goto error_exit;
109
3de6301dcfe1 Implement fullscrene toggling via alt+enter
Matti Hamalainen <ccr@tnsp.org>
parents: 105
diff changeset
690 }
3de6301dcfe1 Implement fullscrene toggling via alt+enter
Matti Hamalainen <ccr@tnsp.org>
parents: 105
diff changeset
691 break;
93
15fdd5573344 Add simple (and buggy / not really working) debug mode.
Matti Hamalainen <ccr@tnsp.org>
parents: 42
diff changeset
692
32
d1a6833a5d67 Added a simple demo engine core.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
693 default:
d1a6833a5d67 Added a simple demo engine core.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
694 break;
d1a6833a5d67 Added a simple demo engine core.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
695 }
d1a6833a5d67 Added a simple demo engine core.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
696
d1a6833a5d67 Added a simple demo engine core.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
697 break;
d1a6833a5d67 Added a simple demo engine core.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
698
d1a6833a5d67 Added a simple demo engine core.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
699 case SDL_VIDEOEXPOSE:
d1a6833a5d67 Added a simple demo engine core.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
700 break;
d1a6833a5d67 Added a simple demo engine core.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
701
d1a6833a5d67 Added a simple demo engine core.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
702 case SDL_QUIT:
d1a6833a5d67 Added a simple demo engine core.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
703 engine.exitFlag = TRUE;
d1a6833a5d67 Added a simple demo engine core.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
704 break;
d1a6833a5d67 Added a simple demo engine core.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
705 }
d1a6833a5d67 Added a simple demo engine core.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
706
d1a6833a5d67 Added a simple demo engine core.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
707 // Draw frame
361
bf60f60cafba Fix engine breakage.
Matti Hamalainen <ccr@tnsp.org>
parents: 359
diff changeset
708 engine.frameTime = SDL_GetTicks();
93
15fdd5573344 Add simple (and buggy / not really working) debug mode.
Matti Hamalainen <ccr@tnsp.org>
parents: 42
diff changeset
709 if (engine.pauseFlag != engine.paused)
15fdd5573344 Add simple (and buggy / not really working) debug mode.
Matti Hamalainen <ccr@tnsp.org>
parents: 42
diff changeset
710 {
15fdd5573344 Add simple (and buggy / not really working) debug mode.
Matti Hamalainen <ccr@tnsp.org>
parents: 42
diff changeset
711 engine.paused = engine.pauseFlag;
367
9875c65029af Work towards re-entrancy.
Matti Hamalainen <ccr@tnsp.org>
parents: 366
diff changeset
712 engine.pauseTime = engineGetTick(&engine);
93
15fdd5573344 Add simple (and buggy / not really working) debug mode.
Matti Hamalainen <ccr@tnsp.org>
parents: 42
diff changeset
713 }
15fdd5573344 Add simple (and buggy / not really working) debug mode.
Matti Hamalainen <ccr@tnsp.org>
parents: 42
diff changeset
714
15fdd5573344 Add simple (and buggy / not really working) debug mode.
Matti Hamalainen <ccr@tnsp.org>
parents: 42
diff changeset
715 if (engine.paused)
15fdd5573344 Add simple (and buggy / not really working) debug mode.
Matti Hamalainen <ccr@tnsp.org>
parents: 42
diff changeset
716 {
361
bf60f60cafba Fix engine breakage.
Matti Hamalainen <ccr@tnsp.org>
parents: 359
diff changeset
717 engine.startTime = engine.frameTime - engine.pauseTime;
93
15fdd5573344 Add simple (and buggy / not really working) debug mode.
Matti Hamalainen <ccr@tnsp.org>
parents: 42
diff changeset
718 }
32
d1a6833a5d67 Added a simple demo engine core.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
719
d1a6833a5d67 Added a simple demo engine core.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
720 if (SDL_MUSTLOCK(engine.screen) != 0 && SDL_LockSurface(engine.screen) != 0)
d1a6833a5d67 Added a simple demo engine core.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
721 {
d1a6833a5d67 Added a simple demo engine core.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
722 dmError("Can't lock surface.\n");
d1a6833a5d67 Added a simple demo engine core.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
723 goto error_exit;
d1a6833a5d67 Added a simple demo engine core.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
724 }
d1a6833a5d67 Added a simple demo engine core.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
725
d1a6833a5d67 Added a simple demo engine core.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
726 // Call main tick
345
cac13f180169 Work towards timeline support.
Matti Hamalainen <ccr@tnsp.org>
parents: 342
diff changeset
727 if (engine.demoRender != NULL)
cac13f180169 Work towards timeline support.
Matti Hamalainen <ccr@tnsp.org>
parents: 342
diff changeset
728 {
366
38e10b5f4e09 Work towards base engine re-entrancy.
Matti Hamalainen <ccr@tnsp.org>
parents: 361
diff changeset
729 if ((err = engine.demoRender(&engine)) != DMERR_OK)
345
cac13f180169 Work towards timeline support.
Matti Hamalainen <ccr@tnsp.org>
parents: 342
diff changeset
730 goto error_exit;
cac13f180169 Work towards timeline support.
Matti Hamalainen <ccr@tnsp.org>
parents: 342
diff changeset
731 }
573
14640d0688d3 Make timeline stuff optional.
Matti Hamalainen <ccr@tnsp.org>
parents: 571
diff changeset
732 #ifdef DM_USE_TIMELINE
345
cac13f180169 Work towards timeline support.
Matti Hamalainen <ccr@tnsp.org>
parents: 342
diff changeset
733 else
cac13f180169 Work towards timeline support.
Matti Hamalainen <ccr@tnsp.org>
parents: 342
diff changeset
734 {
366
38e10b5f4e09 Work towards base engine re-entrancy.
Matti Hamalainen <ccr@tnsp.org>
parents: 361
diff changeset
735 if ((err = dmExecuteTimeline(engine.ptl, engine.screen, engineGetTick(&engine))) != DMERR_OK)
345
cac13f180169 Work towards timeline support.
Matti Hamalainen <ccr@tnsp.org>
parents: 342
diff changeset
736 goto error_exit;
cac13f180169 Work towards timeline support.
Matti Hamalainen <ccr@tnsp.org>
parents: 342
diff changeset
737 }
573
14640d0688d3 Make timeline stuff optional.
Matti Hamalainen <ccr@tnsp.org>
parents: 571
diff changeset
738 #endif
32
d1a6833a5d67 Added a simple demo engine core.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
739
d1a6833a5d67 Added a simple demo engine core.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
740 // Flip screen
d1a6833a5d67 Added a simple demo engine core.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
741 if (SDL_MUSTLOCK(engine.screen) != 0)
d1a6833a5d67 Added a simple demo engine core.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
742 SDL_UnlockSurface(engine.screen);
d1a6833a5d67 Added a simple demo engine core.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
743
d1a6833a5d67 Added a simple demo engine core.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
744 SDL_Flip(engine.screen);
105
d5d27f262227 Beging merging of dmsimple2-fork into the main "engine".
Matti Hamalainen <ccr@tnsp.org>
parents: 94
diff changeset
745 SDL_Delay(engine.paused ? 100 : 20);
32
d1a6833a5d67 Added a simple demo engine core.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
746
361
bf60f60cafba Fix engine breakage.
Matti Hamalainen <ccr@tnsp.org>
parents: 359
diff changeset
747 engine.frameCount++;
32
d1a6833a5d67 Added a simple demo engine core.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
748 }
d1a6833a5d67 Added a simple demo engine core.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
749
d1a6833a5d67 Added a simple demo engine core.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
750 // Print benchmark results
d1a6833a5d67 Added a simple demo engine core.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
751 engine.endTime = SDL_GetTicks();
d1a6833a5d67 Added a simple demo engine core.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
752 dmPrint(1, "%d frames in %d ms, fps = %1.3f\n",
361
bf60f60cafba Fix engine breakage.
Matti Hamalainen <ccr@tnsp.org>
parents: 359
diff changeset
753 engine.frameCount, engine.endTime - engine.startTime,
bf60f60cafba Fix engine breakage.
Matti Hamalainen <ccr@tnsp.org>
parents: 359
diff changeset
754 (float) (engine.frameCount * 1000.0f) / (float) (engine.endTime - engine.startTime));
32
d1a6833a5d67 Added a simple demo engine core.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
755
d1a6833a5d67 Added a simple demo engine core.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
756
d1a6833a5d67 Added a simple demo engine core.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
757 error_exit:
d1a6833a5d67 Added a simple demo engine core.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
758
d1a6833a5d67 Added a simple demo engine core.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
759 dmPrint(1, "Shutting down.\n");
d1a6833a5d67 Added a simple demo engine core.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
760 SDL_ShowCursor(SDL_ENABLE);
d1a6833a5d67 Added a simple demo engine core.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
761
278
919e7de91758 Improve locking.
Matti Hamalainen <ccr@tnsp.org>
parents: 277
diff changeset
762 SDL_LockAudio();
919e7de91758 Improve locking.
Matti Hamalainen <ccr@tnsp.org>
parents: 277
diff changeset
763 SDL_PauseAudio(1);
105
d5d27f262227 Beging merging of dmsimple2-fork into the main "engine".
Matti Hamalainen <ccr@tnsp.org>
parents: 94
diff changeset
764 #ifdef DM_USE_JSS
32
d1a6833a5d67 Added a simple demo engine core.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
765 jmpClose(engine.plr);
d1a6833a5d67 Added a simple demo engine core.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
766 jvmClose(engine.dev);
d1a6833a5d67 Added a simple demo engine core.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
767 jssClose();
278
919e7de91758 Improve locking.
Matti Hamalainen <ccr@tnsp.org>
parents: 277
diff changeset
768 #endif
32
d1a6833a5d67 Added a simple demo engine core.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
769 SDL_UnlockAudio();
d1a6833a5d67 Added a simple demo engine core.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
770
573
14640d0688d3 Make timeline stuff optional.
Matti Hamalainen <ccr@tnsp.org>
parents: 571
diff changeset
771 #ifdef DM_USE_TIMELINE
354
ba284f5e7ea5 More work on editor, etc.
Matti Hamalainen <ccr@tnsp.org>
parents: 351
diff changeset
772 dmFreeTimeline(engine.tl);
ba284f5e7ea5 More work on editor, etc.
Matti Hamalainen <ccr@tnsp.org>
parents: 351
diff changeset
773 dmFreePreparedTimelineData(engine.ptl);
573
14640d0688d3 Make timeline stuff optional.
Matti Hamalainen <ccr@tnsp.org>
parents: 571
diff changeset
774 #endif
14640d0688d3 Make timeline stuff optional.
Matti Hamalainen <ccr@tnsp.org>
parents: 571
diff changeset
775
369
e1c984404b6b Re-entrancy.
Matti Hamalainen <ccr@tnsp.org>
parents: 367
diff changeset
776 engineShutdownEffects(&engine);
359
59045853853d Make resource management re-entrant.
Matti Hamalainen <ccr@tnsp.org>
parents: 354
diff changeset
777 dmres_close(engine.resources);
32
d1a6833a5d67 Added a simple demo engine core.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
778
127
ab4086db7dad Various improvements in modularity.
Matti Hamalainen <ccr@tnsp.org>
parents: 126
diff changeset
779 if (engine.demoShutdown != NULL)
366
38e10b5f4e09 Work towards base engine re-entrancy.
Matti Hamalainen <ccr@tnsp.org>
parents: 361
diff changeset
780 engine.demoShutdown(&engine);
94
4bbfc0274b29 Change some function names, etc.
Matti Hamalainen <ccr@tnsp.org>
parents: 93
diff changeset
781
32
d1a6833a5d67 Added a simple demo engine core.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
782 if (initSDL)
d1a6833a5d67 Added a simple demo engine core.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
783 SDL_Quit();
d1a6833a5d67 Added a simple demo engine core.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
784
127
ab4086db7dad Various improvements in modularity.
Matti Hamalainen <ccr@tnsp.org>
parents: 126
diff changeset
785 if (engine.demoQuit != NULL)
366
38e10b5f4e09 Work towards base engine re-entrancy.
Matti Hamalainen <ccr@tnsp.org>
parents: 361
diff changeset
786 engine.demoQuit(&engine);
32
d1a6833a5d67 Added a simple demo engine core.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
787
d1a6833a5d67 Added a simple demo engine core.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
788 return 0;
d1a6833a5d67 Added a simple demo engine core.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
789 }