1 /***********************************************************
2 * Rocks'n'Diamonds -- McDuffin Strikes Back! *
3 *----------------------------------------------------------*
4 * (c) 1995-2001 Artsoft Entertainment *
6 * Detmolder Strasse 189 *
9 * e-mail: info@artsoft.org *
10 *----------------------------------------------------------*
12 ***********************************************************/
14 #include "libgame/libgame.h"
27 static void InitPlayerInfo(void);
28 static void InitLevelInfo(void);
29 static void InitNetworkServer(void);
30 static void InitSound(void);
31 static void InitGfx(void);
32 static void InitGfxBackground(void);
33 static void InitGadgets(void);
34 static void InitElementProperties(void);
38 if (options.serveronly)
40 #if defined(PLATFORM_UNIX)
41 NetworkServer(options.server_port, options.serveronly);
43 Error(ERR_WARN, "networking only supported in Unix version");
45 exit(0); /* never reached */
48 InitProgramInfo(UNIX_USERDATA_DIRECTORY,
49 PROGRAM_TITLE_STRING, WINDOW_TITLE_STRING,
50 ICON_TITLE_STRING, X11_ICON_FILENAME, X11_ICONMASK_FILENAME,
51 MSDOS_POINTER_FILENAME);
58 InitRND(NEW_RANDOMIZE);
61 InitVideoBuffer(&backbuffer, &window, WIN_XSIZE, WIN_YSIZE, DEFAULT_DEPTH,
64 InitEventFilter(FilterMouseMotionEvents);
67 InitElementProperties(); /* initializes IS_CHAR() for el2gfx() */
70 InitGadgets(); /* needs to know number of level series */
82 /* choose default local player */
83 local_player = &stored_player[0];
85 for (i=0; i<MAX_PLAYERS; i++)
86 stored_player[i].connected = FALSE;
88 local_player->connected = TRUE;
90 LoadSetup(); /* global setup info */
95 LoadLevelInfo(); /* global level info */
96 LoadLevelSetup_LastSeries(); /* last played series info */
97 LoadLevelSetup_SeriesInfo(); /* last played level info */
100 void InitNetworkServer()
102 #if defined(PLATFORM_UNIX)
106 if (!options.network)
109 #if defined(PLATFORM_UNIX)
110 nr_wanted = Request("Choose player", REQ_PLAYER | REQ_STAY_CLOSED);
112 if (!ConnectToServer(options.server_host, options.server_port))
113 Error(ERR_EXIT, "cannot connect to network game server");
115 SendToServer_PlayerName(setup.player_name);
116 SendToServer_ProtocolVersion();
119 SendToServer_NrWanted(nr_wanted);
129 for(i=0; i<NUM_SOUNDS; i++)
131 if (!LoadSound(sound_name[i]))
133 audio.sound_available = FALSE;
134 audio.loops_available = FALSE;
135 audio.sound_enabled = FALSE;
141 num_bg_loops = LoadMusic();
148 #if defined(TARGET_SDL)
149 static boolean sdl_joystick_subsystem_initialized = FALSE;
154 /* always start with reliable default values */
155 joystick.status = JOYSTICK_NOT_AVAILABLE;
156 for (i=0; i<MAX_PLAYERS; i++)
157 joystick.fd[i] = -1; /* joystick device closed */
159 if (global_joystick_status == JOYSTICK_NOT_AVAILABLE)
162 #if defined(TARGET_SDL)
164 if (!sdl_joystick_subsystem_initialized)
166 sdl_joystick_subsystem_initialized = TRUE;
168 if (SDL_Init(SDL_INIT_JOYSTICK) < 0)
170 Error(ERR_EXIT, "SDL_Init() failed: %s", SDL_GetError());
175 for (i=0; i<MAX_PLAYERS; i++)
177 char *device_name = setup.input[i].joy.device_name;
178 int joystick_nr = getJoystickNrFromDeviceName(device_name);
180 if (joystick_nr >= SDL_NumJoysticks())
183 /* misuse joystick file descriptor variable to store joystick number */
184 joystick.fd[i] = joystick_nr;
186 /* this allows subsequent calls to 'InitJoysticks' for re-initialization */
187 if (Check_SDL_JoystickOpened(joystick_nr))
188 Close_SDL_Joystick(joystick_nr);
190 if (!setup.input[i].use_joystick)
193 if (!Open_SDL_Joystick(joystick_nr))
195 Error(ERR_WARN, "cannot open joystick %d", joystick_nr);
199 joystick.status = JOYSTICK_ACTIVATED;
202 #else /* !TARGET_SDL */
204 #if defined(PLATFORM_UNIX)
205 for (i=0; i<MAX_PLAYERS; i++)
207 char *device_name = setup.input[i].joy.device_name;
209 /* this allows subsequent calls to 'InitJoysticks' for re-initialization */
210 if (joystick.fd[i] != -1)
212 close(joystick.fd[i]);
216 if (!setup.input[i].use_joystick)
219 if (access(device_name, R_OK) != 0)
221 Error(ERR_WARN, "cannot access joystick device '%s'", device_name);
225 if ((joystick.fd[i] = open(device_name, O_RDONLY)) < 0)
227 Error(ERR_WARN, "cannot open joystick device '%s'", device_name);
231 joystick.status = JOYSTICK_ACTIVATED;
234 #else /* !PLATFORM_UNIX */
236 /* try to access two joysticks; if that fails, try to access just one */
237 if (install_joystick(JOY_TYPE_2PADS) == 0 ||
238 install_joystick(JOY_TYPE_AUTODETECT) == 0)
239 joystick.status = JOYSTICK_ACTIVATED;
242 load_joystick_data(JOYSTICK_FILENAME);
245 for (i=0; i<MAX_PLAYERS; i++)
247 char *device_name = setup.input[i].joy.device_name;
248 int joystick_nr = getJoystickNrFromDeviceName(device_name);
250 if (joystick_nr >= num_joysticks)
253 /* misuse joystick file descriptor variable to store joystick number */
254 joystick.fd[i] = joystick_nr;
258 #endif /* !TARGET_SDL */
265 #if defined(TARGET_X11)
267 XGCValues clip_gc_values;
268 unsigned long clip_gc_valuemask;
271 #if !defined(PLATFORM_MSDOS)
272 static char *image_filename[NUM_PICTURES] =
286 static char *image_filename[NUM_PICTURES] =
301 #if defined(TARGET_X11_NATIVE)
307 tile_needs_clipping[] =
309 { GFX_SPIELER1_UP, 4 },
310 { GFX_SPIELER1_DOWN, 4 },
311 { GFX_SPIELER1_LEFT, 4 },
312 { GFX_SPIELER1_RIGHT, 4 },
313 { GFX_SPIELER1_PUSH_LEFT, 4 },
314 { GFX_SPIELER1_PUSH_RIGHT, 4 },
315 { GFX_SPIELER2_UP, 4 },
316 { GFX_SPIELER2_DOWN, 4 },
317 { GFX_SPIELER2_LEFT, 4 },
318 { GFX_SPIELER2_RIGHT, 4 },
319 { GFX_SPIELER2_PUSH_LEFT, 4 },
320 { GFX_SPIELER2_PUSH_RIGHT, 4 },
321 { GFX_SPIELER3_UP, 4 },
322 { GFX_SPIELER3_DOWN, 4 },
323 { GFX_SPIELER3_LEFT, 4 },
324 { GFX_SPIELER3_RIGHT, 4 },
325 { GFX_SPIELER3_PUSH_LEFT, 4 },
326 { GFX_SPIELER3_PUSH_RIGHT, 4 },
327 { GFX_SPIELER4_UP, 4 },
328 { GFX_SPIELER4_DOWN, 4 },
329 { GFX_SPIELER4_LEFT, 4 },
330 { GFX_SPIELER4_RIGHT, 4 },
331 { GFX_SPIELER4_PUSH_LEFT, 4 },
332 { GFX_SPIELER4_PUSH_RIGHT, 4 },
333 { GFX_SP_MURPHY, 1 },
334 { GFX_MURPHY_GO_LEFT, 3 },
335 { GFX_MURPHY_GO_RIGHT, 3 },
336 { GFX_MURPHY_SNAP_UP, 1 },
337 { GFX_MURPHY_SNAP_DOWN, 1 },
338 { GFX_MURPHY_SNAP_RIGHT, 1 },
339 { GFX_MURPHY_SNAP_LEFT, 1 },
340 { GFX_MURPHY_PUSH_RIGHT, 1 },
341 { GFX_MURPHY_PUSH_LEFT, 1 },
342 { GFX_GEBLUBBER, 4 },
345 { GFX_EXPLOSION, 8 },
346 { GFX_SOKOBAN_OBJEKT, 1 },
347 { GFX_FUNKELN_BLAU, 3 },
348 { GFX_FUNKELN_WEISS, 3 },
349 { GFX2_SHIELD_PASSIVE, 3 },
350 { GFX2_SHIELD_ACTIVE, 3 },
355 /* initialize some global variables */
356 global.frames_per_second = 0;
357 global.fps_slowdown = FALSE;
358 global.fps_slowdown_factor = 1;
360 /* initialize screen properties */
361 InitGfxFieldInfo(SX, SY, SXSIZE, SYSIZE,
362 REAL_SX, REAL_SY, FULL_SXSIZE, FULL_SYSIZE);
363 InitGfxDoor1Info(DX, DY, DXSIZE, DYSIZE);
364 InitGfxDoor2Info(VX, VY, VXSIZE, VYSIZE);
365 InitGfxScrollbufferInfo(FXSIZE, FYSIZE);
367 /* create additional image buffers for double-buffering */
368 pix[PIX_DB_DOOR] = CreateBitmap(3 * DXSIZE, DYSIZE + VYSIZE, DEFAULT_DEPTH);
369 pix[PIX_DB_FIELD] = CreateBitmap(FXSIZE, FYSIZE, DEFAULT_DEPTH);
371 pix[PIX_SMALLFONT] = LoadImage(image_filename[PIX_SMALLFONT]);
372 InitFontInfo(NULL, NULL, pix[PIX_SMALLFONT]);
374 DrawInitText(WINDOW_TITLE_STRING, 20, FC_YELLOW);
375 DrawInitText(WINDOW_SUBTITLE_STRING, 50, FC_RED);
376 #if defined(PLATFORM_MSDOS)
377 DrawInitText(PROGRAM_DOS_PORT_STRING, 210, FC_BLUE);
380 DrawInitText("Loading graphics:",120,FC_GREEN);
382 for(i=0; i<NUM_PICTURES; i++)
384 if (i != PIX_SMALLFONT)
386 DrawInitText(image_filename[i], 150, FC_YELLOW);
387 pix[i] = LoadImage(image_filename[i]);
391 InitFontInfo(pix[PIX_BIGFONT], pix[PIX_MEDIUMFONT], pix[PIX_SMALLFONT]);
393 /* initialize pixmap array for special X11 tile clipping to Pixmap 'None' */
394 for(i=0; i<NUM_TILES; i++)
395 tile_clipmask[i] = None;
397 #if defined(TARGET_X11)
398 /* This stuff is needed because X11 (XSetClipOrigin(), to be precise) is
399 often very slow when preparing a masked XCopyArea() for big Pixmaps.
400 To prevent this, create small (tile-sized) mask Pixmaps which will then
401 be set much faster with XSetClipOrigin() and speed things up a lot. */
403 /* create graphic context structures needed for clipping */
404 clip_gc_values.graphics_exposures = False;
405 clip_gc_valuemask = GCGraphicsExposures;
407 XCreateGC(display, pix[PIX_BACK]->clip_mask,
408 clip_gc_valuemask, &clip_gc_values);
410 clip_gc_values.graphics_exposures = False;
411 clip_gc_valuemask = GCGraphicsExposures;
413 XCreateGC(display, window->drawable, clip_gc_valuemask, &clip_gc_values);
415 for(i=0; i<NUM_BITMAPS; i++)
417 if (pix[i]->clip_mask)
419 clip_gc_values.graphics_exposures = False;
420 clip_gc_values.clip_mask = pix[i]->clip_mask;
421 clip_gc_valuemask = GCGraphicsExposures | GCClipMask;
422 pix[i]->stored_clip_gc = XCreateGC(display, window->drawable,
423 clip_gc_valuemask,&clip_gc_values);
427 #if defined(TARGET_X11_NATIVE)
428 /* create only those clipping Pixmaps we really need */
429 for(i=0; tile_needs_clipping[i].start>=0; i++)
433 for(j=0; j<tile_needs_clipping[i].count; j++)
435 int tile = tile_needs_clipping[i].start + j;
441 getGraphicSource(graphic, &pixmap_nr, &src_x, &src_y);
442 src_pixmap = pix[pixmap_nr]->clip_mask;
444 tile_clipmask[tile] = XCreatePixmap(display, window->drawable,
447 XCopyArea(display, src_pixmap, tile_clipmask[tile], copy_clipmask_gc,
448 src_x, src_y, TILEX, TILEY, 0, 0);
451 #endif /* TARGET_X11_NATIVE */
452 #endif /* TARGET_X11 */
455 void InitGfxBackground()
460 fieldbuffer = pix[PIX_DB_FIELD];
461 SetDrawtoField(DRAW_BACKBUFFER);
463 BlitBitmap(pix[PIX_BACK], backbuffer, 0,0, WIN_XSIZE,WIN_YSIZE, 0,0);
464 ClearRectangle(backbuffer, REAL_SX,REAL_SY, FULL_SXSIZE,FULL_SYSIZE);
465 ClearRectangle(pix[PIX_DB_DOOR], 0,0, 3*DXSIZE,DYSIZE+VYSIZE);
467 for(x=0; x<MAX_BUF_XSIZE; x++)
468 for(y=0; y<MAX_BUF_YSIZE; y++)
471 redraw_mask = REDRAW_ALL;
476 CreateLevelEditorGadgets();
480 CreateScreenGadgets();
483 void InitElementProperties()
487 static int ep_amoebalive[] =
494 static int ep_amoebalive_num = SIZEOF_ARRAY_INT(ep_amoebalive);
496 static int ep_amoeboid[] =
504 static int ep_amoeboid_num = SIZEOF_ARRAY_INT(ep_amoeboid);
506 static int ep_schluessel[] =
517 static int ep_schluessel_num = SIZEOF_ARRAY_INT(ep_schluessel);
519 static int ep_pforte[] =
538 EL_SWITCHGATE_CLOSED,
553 static int ep_pforte_num = SIZEOF_ARRAY_INT(ep_pforte);
555 static int ep_solid[] =
575 EL_QUICKSAND_FILLING,
576 EL_QUICKSAND_EMPTYING,
581 EL_MAGIC_WALL_BD_OFF,
582 EL_MAGIC_WALL_BD_EMPTY,
583 EL_MAGIC_WALL_BD_FULL,
584 EL_MAGIC_WALL_BD_DEAD,
611 EL_BELT1_SWITCH_LEFT,
612 EL_BELT1_SWITCH_MIDDLE,
613 EL_BELT1_SWITCH_RIGHT,
614 EL_BELT2_SWITCH_LEFT,
615 EL_BELT2_SWITCH_MIDDLE,
616 EL_BELT2_SWITCH_RIGHT,
617 EL_BELT3_SWITCH_LEFT,
618 EL_BELT3_SWITCH_MIDDLE,
619 EL_BELT3_SWITCH_RIGHT,
620 EL_BELT4_SWITCH_LEFT,
621 EL_BELT4_SWITCH_MIDDLE,
622 EL_BELT4_SWITCH_RIGHT,
623 EL_SWITCHGATE_SWITCH_1,
624 EL_SWITCHGATE_SWITCH_2,
627 EL_TIMEGATE_SWITCH_OFF,
628 EL_TIMEGATE_SWITCH_ON,
630 EL_SIGN_RADIOACTIVITY,
669 static int ep_solid_num = SIZEOF_ARRAY_INT(ep_solid);
671 static int ep_massive[] =
697 EL_SWITCHGATE_CLOSED,
712 EL_BELT1_SWITCH_LEFT,
713 EL_BELT1_SWITCH_MIDDLE,
714 EL_BELT1_SWITCH_RIGHT,
715 EL_BELT2_SWITCH_LEFT,
716 EL_BELT2_SWITCH_MIDDLE,
717 EL_BELT2_SWITCH_RIGHT,
718 EL_BELT3_SWITCH_LEFT,
719 EL_BELT3_SWITCH_MIDDLE,
720 EL_BELT3_SWITCH_RIGHT,
721 EL_BELT4_SWITCH_LEFT,
722 EL_BELT4_SWITCH_MIDDLE,
723 EL_BELT4_SWITCH_RIGHT,
727 EL_SIGN_RADIOACTIVITY,
756 static int ep_massive_num = SIZEOF_ARRAY_INT(ep_massive);
758 static int ep_slippery[] =
793 static int ep_slippery_num = SIZEOF_ARRAY_INT(ep_slippery);
795 static int ep_enemy[] =
808 static int ep_enemy_num = SIZEOF_ARRAY_INT(ep_enemy);
810 static int ep_mauer[] =
873 static int ep_mauer_num = SIZEOF_ARRAY_INT(ep_mauer);
875 static int ep_can_fall[] =
890 EL_MAGIC_WALL_BD_FULL,
901 static int ep_can_fall_num = SIZEOF_ARRAY_INT(ep_can_fall);
903 static int ep_can_smash[] =
934 static int ep_can_smash_num = SIZEOF_ARRAY_INT(ep_can_smash);
936 static int ep_can_change[] =
947 static int ep_can_change_num = SIZEOF_ARRAY_INT(ep_can_change);
949 static int ep_can_move[] =
969 static int ep_can_move_num = SIZEOF_ARRAY_INT(ep_can_move);
971 static int ep_could_move[] =
994 static int ep_could_move_num = SIZEOF_ARRAY_INT(ep_could_move);
996 static int ep_dont_touch[] =
1003 static int ep_dont_touch_num = SIZEOF_ARRAY_INT(ep_dont_touch);
1005 static int ep_dont_go_to[] =
1023 static int ep_dont_go_to_num = SIZEOF_ARRAY_INT(ep_dont_go_to);
1025 static int ep_mampf2[] =
1050 static int ep_mampf2_num = SIZEOF_ARRAY_INT(ep_mampf2);
1052 static int ep_bd_element[] =
1061 EL_MAGIC_WALL_BD_OFF,
1079 static int ep_bd_element_num = SIZEOF_ARRAY_INT(ep_bd_element);
1081 static int ep_sb_element[] =
1086 EL_SOKOBAN_FELD_LEER,
1087 EL_SOKOBAN_FELD_VOLL,
1091 static int ep_sb_element_num = SIZEOF_ARRAY_INT(ep_sb_element);
1093 static int ep_gem[] =
1102 static int ep_gem_num = SIZEOF_ARRAY_INT(ep_gem);
1104 static int ep_inactive[] =
1141 EL_DYNAMITE_INACTIVE,
1153 EL_SOKOBAN_FELD_LEER,
1154 EL_SOKOBAN_FELD_VOLL,
1164 EL_MAGIC_WALL_BD_OFF,
1165 EL_MAGIC_WALL_BD_DEAD,
1201 EL_BELT1_SWITCH_LEFT,
1202 EL_BELT1_SWITCH_MIDDLE,
1203 EL_BELT1_SWITCH_RIGHT,
1204 EL_BELT2_SWITCH_LEFT,
1205 EL_BELT2_SWITCH_MIDDLE,
1206 EL_BELT2_SWITCH_RIGHT,
1207 EL_BELT3_SWITCH_LEFT,
1208 EL_BELT3_SWITCH_MIDDLE,
1209 EL_BELT3_SWITCH_RIGHT,
1210 EL_BELT4_SWITCH_LEFT,
1211 EL_BELT4_SWITCH_MIDDLE,
1212 EL_BELT4_SWITCH_RIGHT,
1213 EL_SIGN_EXCLAMATION,
1214 EL_SIGN_RADIOACTIVITY,
1226 EL_EMC_STEEL_WALL_1,
1227 EL_EMC_STEEL_WALL_2,
1228 EL_EMC_STEEL_WALL_3,
1229 EL_EMC_STEEL_WALL_4,
1239 static int ep_inactive_num = SIZEOF_ARRAY_INT(ep_inactive);
1241 static int ep_explosive[] =
1245 EL_DYNAMITE_INACTIVE,
1246 EL_DYNABOMB_ACTIVE_1,
1247 EL_DYNABOMB_ACTIVE_2,
1248 EL_DYNABOMB_ACTIVE_3,
1249 EL_DYNABOMB_ACTIVE_4,
1266 static int ep_explosive_num = SIZEOF_ARRAY_INT(ep_explosive);
1268 static int ep_mampf3[] =
1279 static int ep_mampf3_num = SIZEOF_ARRAY_INT(ep_mampf3);
1281 static int ep_pushable[] =
1288 EL_SOKOBAN_FELD_VOLL,
1298 static int ep_pushable_num = SIZEOF_ARRAY_INT(ep_pushable);
1300 static int ep_player[] =
1308 static int ep_player_num = SIZEOF_ARRAY_INT(ep_player);
1310 static int ep_has_content[] =
1318 static int ep_has_content_num = SIZEOF_ARRAY_INT(ep_has_content);
1320 static int ep_eatable[] =
1328 static int ep_eatable_num = SIZEOF_ARRAY_INT(ep_eatable);
1330 static int ep_sp_element[] =
1372 /* additional elements that appeared in newer Supaplex levels */
1374 /* more than one murphy in a level results in an inactive clone */
1377 static int ep_sp_element_num = SIZEOF_ARRAY_INT(ep_sp_element);
1379 static int ep_quick_gate[] =
1403 static int ep_quick_gate_num = SIZEOF_ARRAY_INT(ep_quick_gate);
1405 static int ep_over_player[] =
1430 static int ep_over_player_num = SIZEOF_ARRAY_INT(ep_over_player);
1432 static int ep_active_bomb[] =
1435 EL_DYNABOMB_ACTIVE_1,
1436 EL_DYNABOMB_ACTIVE_2,
1437 EL_DYNABOMB_ACTIVE_3,
1438 EL_DYNABOMB_ACTIVE_4
1440 static int ep_active_bomb_num = SIZEOF_ARRAY_INT(ep_active_bomb);
1442 static int ep_belt[] =
1457 static int ep_belt_num = SIZEOF_ARRAY_INT(ep_belt);
1459 static int ep_belt_switch[] =
1461 EL_BELT1_SWITCH_LEFT,
1462 EL_BELT1_SWITCH_MIDDLE,
1463 EL_BELT1_SWITCH_RIGHT,
1464 EL_BELT2_SWITCH_LEFT,
1465 EL_BELT2_SWITCH_MIDDLE,
1466 EL_BELT2_SWITCH_RIGHT,
1467 EL_BELT3_SWITCH_LEFT,
1468 EL_BELT3_SWITCH_MIDDLE,
1469 EL_BELT3_SWITCH_RIGHT,
1470 EL_BELT4_SWITCH_LEFT,
1471 EL_BELT4_SWITCH_MIDDLE,
1472 EL_BELT4_SWITCH_RIGHT,
1474 static int ep_belt_switch_num = SIZEOF_ARRAY_INT(ep_belt_switch);
1476 static int ep_tube[] =
1490 static int ep_tube_num = SIZEOF_ARRAY_INT(ep_tube);
1492 static long ep1_bit[] =
1526 static long ep2_bit[] =
1532 static int *ep1_array[] =
1566 static int *ep2_array[] =
1572 static int *ep1_num[] =
1599 &ep_has_content_num,
1603 &ep_over_player_num,
1606 static int *ep2_num[] =
1609 &ep_belt_switch_num,
1612 static int num_properties1 = SIZEOF_ARRAY(ep1_num, int *);
1613 static int num_properties2 = SIZEOF_ARRAY(ep2_num, int *);
1615 for(i=0; i<MAX_ELEMENTS; i++)
1617 Elementeigenschaften1[i] = 0;
1618 Elementeigenschaften2[i] = 0;
1621 for(i=0; i<num_properties1; i++)
1622 for(j=0; j<*(ep1_num[i]); j++)
1623 Elementeigenschaften1[(ep1_array[i])[j]] |= ep1_bit[i];
1624 for(i=0; i<num_properties2; i++)
1625 for(j=0; j<*(ep2_num[i]); j++)
1626 Elementeigenschaften2[(ep2_array[i])[j]] |= ep2_bit[i];
1628 for(i=EL_CHAR_START; i<=EL_CHAR_END; i++)
1629 Elementeigenschaften1[i] |= (EP_BIT_CHAR | EP_BIT_INACTIVE);
1632 void CloseAllAndExit(int exit_value)
1637 FreeSounds(NUM_SOUNDS);
1640 for(i=0; i<NUM_BITMAPS; i++)
1642 CloseVideoDisplay();
1644 ClosePlatformDependantStuff();