2 Copyright (C) Prikol Software 1996-1997
3 Copyright (C) Aleksey Volynskov 1996-1997
4 Copyright (C) <ARembo@gmail.com> 2011
6 This file is part of the Doom2D:Rembo project.
8 Doom2D:Rembo is free software; you can redistribute it and/or modify
9 it under the terms of the GNU General Public License version 2 as
10 published by the Free Software Foundation.
12 Doom2D:Rembo is distributed in the hope that it will be useful,
13 but WITHOUT ANY WARRANTY; without even the implied warranty of
14 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
15 GNU General Public License for more details.
17 You should have received a copy of the GNU General Public License
18 along with this program; if not, see <http://www.gnu.org/licenses/> or
19 write to the Free Software Foundation, Inc.,
20 51 Franklin St, Fifth Floor, Boston, MA 02110-1301 USA
24 # include <emscripten.h>
30 #include <stdlib.h> // srand exit
31 #include <string.h> // strcasecmp
36 #include "my.h" // fexists
37 #include "player.h" // pl1 pl2
38 #include "menu.h" // G_keyf
39 #include "error.h" // logo
41 #include "files.h" // F_startup F_addwad F_initwads F_allocres
42 #include "config.h" // CFG_args CFG_load CFG_save
43 #include "memory.h" // M_startup
44 #include "game.h" // G_init G_act
45 #include "sound.h" // S_init S_done
46 #include "music.h" // S_initmusic S_updatemusic S_donemusic
47 #include "render.h" // R_init R_draw R_done
51 #define MODE_SOFTWARE 2
55 static SDL_Surface
*surf
= NULL
;
56 static int mode
= MODE_NONE
;
60 void logo (const char *s
, ...) {
68 void logo_gas (int cur
, int all
) {
72 void ERR_failinit (char *s
, ...) {
81 void ERR_fatal (char *s
, ...) {
88 puts("\nКРИТИЧЕСКАЯ ОШИБКА:");
96 void ERR_quit (void) {
100 /* --- system.h --- */
102 int Y_set_videomode_opengl (int w
, int h
, int fullscreen
) {
107 if (mode
== MODE_OPENGL
&& surf
->w
== w
&& surf
->h
== h
&& Y_get_fullscreen() == fullscreen
) {
110 flags
= SDL_DOUBLEBUF
| SDL_OPENGL
;
112 flags
= flags
| SDL_FULLSCREEN
;
115 flags
= flags
| SDL_RESIZABLE
;
117 s
= SDL_SetVideoMode(w
, h
, 0, flags
);
122 logo("Y_set_videomode_opengl: error: %s\n", SDL_GetError());
128 int Y_set_videomode_software (int w
, int h
, int fullscreen
) {
133 if (mode
== MODE_OPENGL
&& surf
->w
== w
&& surf
->h
== h
&& Y_get_fullscreen() == fullscreen
) {
136 flags
= SDL_DOUBLEBUF
| SDL_SWSURFACE
| SDL_HWPALETTE
;
138 flags
= flags
| SDL_FULLSCREEN
;
141 flags
= flags
| SDL_RESIZABLE
;
143 s
= SDL_SetVideoMode(w
, h
, 8, flags
);
145 mode
= MODE_SOFTWARE
;
152 void Y_get_videomode (int *w
, int *h
) {
153 if (mode
!= MODE_NONE
) {
162 int Y_videomode_setted (void) {
163 return mode
!= MODE_NONE
;
166 void Y_unset_videomode (void) {
169 #ifndef __EMSCRIPTEN__
170 SDL_QuitSubSystem(SDL_INIT_VIDEO
);
171 SDL_InitSubSystem(SDL_INIT_VIDEO
);
175 void Y_set_fullscreen (int fullscreen
) {
176 int fs
= Y_get_fullscreen();
177 if (mode
!= MODE_NONE
&& fs
!= fullscreen
) {
178 if (SDL_WM_ToggleFullScreen(surf
) == 0) {
181 Y_set_videomode_opengl(surf
->w
, surf
->h
, fullscreen
);
184 Y_set_videomode_software(surf
->w
, surf
->h
, fullscreen
);
191 int Y_get_fullscreen (void) {
192 return (mode
!= MODE_NONE
) && ((surf
->flags
& SDL_FULLSCREEN
) != 0);
195 void Y_swap_buffers (void) {
196 assert(mode
== MODE_OPENGL
);
197 SDL_GL_SwapBuffers();
200 void Y_get_buffer (byte
**buf
, int *w
, int *h
, int *pitch
) {
201 assert(mode
== MODE_SOFTWARE
);
205 *pitch
= surf
->pitch
;
208 void Y_set_vga_palette (byte
*vgapal
) {
211 assert(vgapal
!= NULL
);
212 assert(mode
== MODE_SOFTWARE
);
213 SDL_Color colors
[256];
214 for (i
= 0; i
< 256; i
++) {
215 colors
[i
] = (SDL_Color
) {
216 .r
= p
[0] * 255 / 63,
217 .g
= p
[1] * 255 / 63,
222 SDL_SetColors(surf
, colors
, 0, 256);
225 void Y_repaint_rect (int x
, int y
, int w
, int h
) {
226 assert(mode
== MODE_SOFTWARE
);
227 SDL_UpdateRect(surf
, x
, y
, w
, h
);
230 void Y_repaint (void) {
231 assert(mode
== MODE_SOFTWARE
);
237 static int sdl_to_key (int code
) {
239 case SDLK_0
: return KEY_0
;
240 case SDLK_1
: return KEY_1
;
241 case SDLK_2
: return KEY_2
;
242 case SDLK_3
: return KEY_3
;
243 case SDLK_4
: return KEY_4
;
244 case SDLK_5
: return KEY_5
;
245 case SDLK_6
: return KEY_6
;
246 case SDLK_7
: return KEY_7
;
247 case SDLK_8
: return KEY_8
;
248 case SDLK_9
: return KEY_9
;
249 case SDLK_a
: return KEY_A
;
250 case SDLK_b
: return KEY_B
;
251 case SDLK_c
: return KEY_C
;
252 case SDLK_d
: return KEY_D
;
253 case SDLK_e
: return KEY_E
;
254 case SDLK_f
: return KEY_F
;
255 case SDLK_g
: return KEY_G
;
256 case SDLK_h
: return KEY_H
;
257 case SDLK_i
: return KEY_I
;
258 case SDLK_j
: return KEY_J
;
259 case SDLK_k
: return KEY_K
;
260 case SDLK_l
: return KEY_L
;
261 case SDLK_m
: return KEY_M
;
262 case SDLK_n
: return KEY_N
;
263 case SDLK_o
: return KEY_O
;
264 case SDLK_p
: return KEY_P
;
265 case SDLK_q
: return KEY_Q
;
266 case SDLK_r
: return KEY_R
;
267 case SDLK_s
: return KEY_S
;
268 case SDLK_t
: return KEY_T
;
269 case SDLK_u
: return KEY_U
;
270 case SDLK_v
: return KEY_V
;
271 case SDLK_w
: return KEY_W
;
272 case SDLK_x
: return KEY_X
;
273 case SDLK_y
: return KEY_Y
;
274 case SDLK_z
: return KEY_Z
;
275 case SDLK_RETURN
: return KEY_RETURN
;
276 case SDLK_ESCAPE
: return KEY_ESCAPE
;
277 case SDLK_BACKSPACE
: return KEY_BACKSPACE
;
278 case SDLK_TAB
: return KEY_TAB
;
279 case SDLK_SPACE
: return KEY_SPACE
;
280 case SDLK_MINUS
: return KEY_MINUS
;
281 case SDLK_EQUALS
: return KEY_EQUALS
;
282 case SDLK_LEFTBRACKET
: return KEY_LEFTBRACKET
;
283 case SDLK_RIGHTBRACKET
: return KEY_RIGHTBRACKET
;
284 case SDLK_BACKSLASH
: return KEY_BACKSLASH
;
285 case SDLK_SEMICOLON
: return KEY_SEMICOLON
;
286 case SDLK_QUOTE
: return KEY_APOSTROPHE
;
287 case SDLK_BACKQUOTE
: return KEY_GRAVE
;
288 case SDLK_COMMA
: return KEY_COMMA
;
289 case SDLK_PERIOD
: return KEY_PERIOD
;
290 case SDLK_SLASH
: return KEY_SLASH
;
291 case SDLK_CAPSLOCK
: return KEY_CAPSLOCK
;
292 case SDLK_F1
: return KEY_F1
;
293 case SDLK_F2
: return KEY_F2
;
294 case SDLK_F3
: return KEY_F3
;
295 case SDLK_F4
: return KEY_F4
;
296 case SDLK_F5
: return KEY_F5
;
297 case SDLK_F6
: return KEY_F6
;
298 case SDLK_F7
: return KEY_F7
;
299 case SDLK_F8
: return KEY_F8
;
300 case SDLK_F9
: return KEY_F9
;
301 case SDLK_F10
: return KEY_F10
;
302 case SDLK_F11
: return KEY_F11
;
303 case SDLK_F12
: return KEY_F12
;
304 case SDLK_PRINT
: return KEY_PRINTSCREEN
;
305 case SDLK_SCROLLOCK
: return KEY_SCROLLLOCK
;
306 case SDLK_PAUSE
: return KEY_PAUSE
;
307 case SDLK_INSERT
: return KEY_INSERT
;
308 case SDLK_HOME
: return KEY_HOME
;
309 case SDLK_PAGEUP
: return KEY_PAGEUP
;
310 case SDLK_DELETE
: return KEY_DELETE
;
311 case SDLK_END
: return KEY_END
;
312 case SDLK_PAGEDOWN
: return KEY_PAGEDOWN
;
313 case SDLK_RIGHT
: return KEY_RIGHT
;
314 case SDLK_LEFT
: return KEY_LEFT
;
315 case SDLK_DOWN
: return KEY_DOWN
;
316 case SDLK_UP
: return KEY_UP
;
317 case SDLK_NUMLOCK
: return KEY_NUMLOCK
;
318 case SDLK_KP_DIVIDE
: return KEY_KP_DIVIDE
;
319 case SDLK_KP_MULTIPLY
: return KEY_KP_MULTIPLY
;
320 case SDLK_KP_MINUS
: return KEY_KP_MINUS
;
321 case SDLK_KP_PLUS
: return KEY_KP_PLUS
;
322 case SDLK_KP_ENTER
: return KEY_KP_ENTER
;
323 case SDLK_KP0
: return KEY_KP_0
;
324 case SDLK_KP1
: return KEY_KP_1
;
325 case SDLK_KP2
: return KEY_KP_2
;
326 case SDLK_KP3
: return KEY_KP_3
;
327 case SDLK_KP4
: return KEY_KP_4
;
328 case SDLK_KP5
: return KEY_KP_5
;
329 case SDLK_KP6
: return KEY_KP_6
;
330 case SDLK_KP7
: return KEY_KP_7
;
331 case SDLK_KP8
: return KEY_KP_8
;
332 case SDLK_KP9
: return KEY_KP_9
;
333 case SDLK_KP_PERIOD
: return KEY_KP_PERIOD
;
334 case SDLK_SYSREQ
: return KEY_SYSREQ
;
335 case SDLK_LCTRL
: return KEY_LCTRL
;
336 case SDLK_LSHIFT
: return KEY_LSHIFT
;
337 case SDLK_LALT
: return KEY_LALT
;
338 case SDLK_LSUPER
: return KEY_LSUPER
;
339 case SDLK_RCTRL
: return KEY_RCTRL
;
340 case SDLK_RSHIFT
: return KEY_RSHIFT
;
341 case SDLK_RALT
: return KEY_RALT
;
342 case SDLK_RSUPER
: return KEY_RSUPER
;
343 default: return KEY_UNKNOWN
;
347 static void poll_events (void (*h
)(int key
, int down
)) {
350 while (SDL_PollEvent(&ev
)) {
355 case SDL_VIDEORESIZE
:
356 R_set_videomode(ev
.resize
.w
, ev
.resize
.h
, Y_get_fullscreen());
360 key
= sdl_to_key(ev
.key
.keysym
.sym
);
361 I_press(key
, ev
.type
== SDL_KEYDOWN
);
363 (*h
)(key
, ev
.type
== SDL_KEYDOWN
);
370 static void step (void) {
371 poll_events(&G_keyf
);
373 Uint32 t
= SDL_GetTicks();
374 if (t
- ticks
> DELAY
) {
381 int main (int argc
, char *argv
[]) {
383 logo("main: initialize SDL\n");
384 if (SDL_Init(SDL_INIT_VIDEO
| SDL_INIT_TIMER
) == -1) {
385 logo("main: failed to init SDL: %s\n", SDL_GetError());
388 SDL_WM_SetCaption("Doom 2D v1.351", "Doom 2D");
394 pl1
.kf
= KEY_PAGEDOWN
;
409 srand(SDL_GetTicks());
412 pw
= "/usr/share/doom2d-rembo/doom2d.wad";
419 F_addwad("doom2d.wad");
421 CFG_args(argc
, argv
);
430 ticks
= SDL_GetTicks();
431 #ifdef __EMSCRIPTEN__
432 emscripten_set_main_loop(step
, 0, 1);