/***********************************************************
* Rocks'n'Diamonds -- McDuffin Strikes Back! *
*----------------------------------------------------------*
-* (c) 1995-2002 Artsoft Entertainment *
+* (c) 1995-2006 Artsoft Entertainment *
* Holger Schemel *
* Detmolder Strasse 189 *
* 33604 Bielefeld *
#define CHUNK_ID_LEN 4 /* IFF style chunk id length */
#define CHUNK_SIZE_UNDEFINED 0 /* undefined chunk size == 0 */
#define CHUNK_SIZE_NONE -1 /* do not write chunk size */
-#define FILE_VERS_CHUNK_SIZE 8 /* size of file version chunk */
-#define LEVEL_HEADER_SIZE 80 /* size of level file header */
-#define LEVEL_HEADER_UNUSED 0 /* unused level header bytes */
+
+#define LEVEL_CHUNK_NAME_SIZE MAX_LEVEL_NAME_LEN
+#define LEVEL_CHUNK_AUTH_SIZE MAX_LEVEL_AUTHOR_LEN
+
+#define LEVEL_CHUNK_VERS_SIZE 8 /* size of file version chunk */
+#define LEVEL_CHUNK_DATE_SIZE 4 /* size of file date chunk */
+#define LEVEL_CHUNK_HEAD_SIZE 80 /* size of level file header */
+#define LEVEL_CHUNK_HEAD_UNUSED 0 /* unused level header bytes */
#define LEVEL_CHUNK_CNT2_SIZE 160 /* size of level CNT2 chunk */
#define LEVEL_CHUNK_CNT2_UNUSED 11 /* unused CNT2 chunk bytes */
#define LEVEL_CHUNK_CNT3_HEADER 16 /* size of level CNT3 header */
#define LEVEL_CPART_CUS3_SIZE 134 /* size of CUS3 chunk part */
#define LEVEL_CPART_CUS3_UNUSED 15 /* unused CUS3 bytes / part */
#define LEVEL_CHUNK_GRP1_SIZE 74 /* size of level GRP1 chunk */
-#define TAPE_HEADER_SIZE 20 /* size of tape file header */
-#define TAPE_HEADER_UNUSED 3 /* unused tape header bytes */
-#define LEVEL_CHUNK_CNT3_SIZE(x) (LEVEL_CHUNK_CNT3_HEADER + (x))
-#define LEVEL_CHUNK_CUS3_SIZE(x) (2 + (x) * LEVEL_CPART_CUS3_SIZE)
-#define LEVEL_CHUNK_CUS4_SIZE(x) (48 + 48 + (x) * 48)
+/* (element number, number of change pages, change page number) */
+#define LEVEL_CHUNK_CUSX_UNCHANGED (2 + (1 + 1) + (1 + 1))
-/* file identifier strings */
-#define LEVEL_COOKIE_TMPL "ROCKSNDIAMONDS_LEVEL_FILE_VERSION_x.x"
-#define TAPE_COOKIE_TMPL "ROCKSNDIAMONDS_TAPE_FILE_VERSION_x.x"
-#define SCORE_COOKIE "ROCKSNDIAMONDS_SCORE_FILE_VERSION_1.2"
+/* (element number only) */
+#define LEVEL_CHUNK_GRPX_UNCHANGED 2
+#define LEVEL_CHUNK_NOTE_UNCHANGED 2
-static struct
-{
- int filetype;
- char *id;
-}
-filetype_id_list[] =
-{
- { LEVEL_FILE_TYPE_RND, "RND" },
- { LEVEL_FILE_TYPE_BD, "BD" },
- { LEVEL_FILE_TYPE_EM, "EM" },
- { LEVEL_FILE_TYPE_SP, "SP" },
- { LEVEL_FILE_TYPE_DX, "DX" },
- { LEVEL_FILE_TYPE_SB, "SB" },
- { LEVEL_FILE_TYPE_DC, "DC" },
- { -1, NULL },
-};
+/* (nothing at all if unchanged) */
+#define LEVEL_CHUNK_ELEM_UNCHANGED 0
+#define TAPE_CHUNK_VERS_SIZE 8 /* size of file version chunk */
+#define TAPE_CHUNK_HEAD_SIZE 20 /* size of tape file header */
+#define TAPE_CHUNK_HEAD_UNUSED 3 /* unused tape header bytes */
-/* ========================================================================= */
-/* level file functions */
-/* ========================================================================= */
+#define LEVEL_CHUNK_CNT3_SIZE(x) (LEVEL_CHUNK_CNT3_HEADER + (x))
+#define LEVEL_CHUNK_CUS3_SIZE(x) (2 + (x) * LEVEL_CPART_CUS3_SIZE)
+#define LEVEL_CHUNK_CUS4_SIZE(x) (96 + (x) * 48)
-void setElementChangePages(struct ElementInfo *ei, int change_pages)
+/* file identifier strings */
+#define LEVEL_COOKIE_TMPL "ROCKSNDIAMONDS_LEVEL_FILE_VERSION_x.x"
+#define TAPE_COOKIE_TMPL "ROCKSNDIAMONDS_TAPE_FILE_VERSION_x.x"
+#define SCORE_COOKIE "ROCKSNDIAMONDS_SCORE_FILE_VERSION_1.2"
+
+/* values for deciding when (not) to save configuration data */
+#define SAVE_CONF_NEVER 0
+#define SAVE_CONF_ALWAYS 1
+#define SAVE_CONF_WHEN_CHANGED -1
+
+/* values for chunks using micro chunks */
+#define CONF_MASK_1_BYTE 0x00
+#define CONF_MASK_2_BYTE 0x40
+#define CONF_MASK_4_BYTE 0x80
+#define CONF_MASK_MULTI_BYTES 0xc0
+
+#define CONF_MASK_BYTES 0xc0
+#define CONF_MASK_TOKEN 0x3f
+
+#define CONF_VALUE_1_BYTE(x) (CONF_MASK_1_BYTE | (x))
+#define CONF_VALUE_2_BYTE(x) (CONF_MASK_2_BYTE | (x))
+#define CONF_VALUE_4_BYTE(x) (CONF_MASK_4_BYTE | (x))
+#define CONF_VALUE_MULTI_BYTES(x) (CONF_MASK_MULTI_BYTES | (x))
+
+/* these definitions are just for convenience of use and readability */
+#define CONF_VALUE_8_BIT(x) CONF_VALUE_1_BYTE(x)
+#define CONF_VALUE_16_BIT(x) CONF_VALUE_2_BYTE(x)
+#define CONF_VALUE_32_BIT(x) CONF_VALUE_4_BYTE(x)
+#define CONF_VALUE_BYTES(x) CONF_VALUE_MULTI_BYTES(x)
+
+#define CONF_VALUE_NUM_BYTES(x) ((x) == CONF_MASK_1_BYTE ? 1 : \
+ (x) == CONF_MASK_2_BYTE ? 2 : \
+ (x) == CONF_MASK_4_BYTE ? 4 : 0)
+
+#define CONF_CONTENT_NUM_ELEMENTS (3 * 3)
+#define CONF_CONTENT_NUM_BYTES (CONF_CONTENT_NUM_ELEMENTS * 2)
+#define CONF_ELEMENT_NUM_BYTES (2)
+
+#define CONF_ENTITY_NUM_BYTES(t) ((t) == TYPE_ELEMENT || \
+ (t) == TYPE_ELEMENT_LIST ? \
+ CONF_ELEMENT_NUM_BYTES : \
+ (t) == TYPE_CONTENT || \
+ (t) == TYPE_CONTENT_LIST ? \
+ CONF_CONTENT_NUM_BYTES : 1)
+
+#define CONF_ELEMENT_BYTE_POS(i) ((i) * CONF_ELEMENT_NUM_BYTES)
+#define CONF_ELEMENTS_ELEMENT(b,i) ((b[CONF_ELEMENT_BYTE_POS(i)] << 8) | \
+ (b[CONF_ELEMENT_BYTE_POS(i) + 1]))
+
+#define CONF_CONTENT_ELEMENT_POS(c,x,y) ((c) * CONF_CONTENT_NUM_ELEMENTS + \
+ (y) * 3 + (x))
+#define CONF_CONTENT_BYTE_POS(c,x,y) (CONF_CONTENT_ELEMENT_POS(c,x,y) * \
+ CONF_ELEMENT_NUM_BYTES)
+#define CONF_CONTENTS_ELEMENT(b,c,x,y) ((b[CONF_CONTENT_BYTE_POS(c,x,y)]<< 8)|\
+ (b[CONF_CONTENT_BYTE_POS(c,x,y) + 1]))
+
+/* temporary variables used to store pointers to structure members */
+static struct LevelInfo li;
+static struct ElementInfo xx_ei, yy_ei;
+static struct ElementChangeInfo xx_change;
+static struct ElementGroupInfo xx_group;
+static struct EnvelopeInfo xx_envelope;
+static unsigned int xx_event_bits[NUM_CE_BITFIELDS];
+static char xx_default_description[MAX_ELEMENT_NAME_LEN + 1];
+static int xx_num_contents;
+static int xx_current_change_page;
+static char xx_default_string_empty[1] = "";
+static int xx_string_length_unused;
+
+struct LevelFileConfigInfo
{
- int change_page_size = sizeof(struct ElementChangeInfo);
-
- ei->num_change_pages = MAX(1, change_pages);
-
- ei->change_page =
- checked_realloc(ei->change_page, ei->num_change_pages * change_page_size);
-
- if (ei->current_change_page >= ei->num_change_pages)
- ei->current_change_page = ei->num_change_pages - 1;
-
- ei->change = &ei->change_page[ei->current_change_page];
-}
+ int element; /* element for which data is to be stored */
+ int save_type; /* save data always, never or when changed */
+ int data_type; /* data type (used internally, not stored) */
+ int conf_type; /* micro chunk identifier (stored in file) */
+
+ /* (mandatory) */
+ void *value; /* variable that holds the data to be stored */
+ int default_value; /* initial default value for this variable */
+
+ /* (optional) */
+ void *value_copy; /* variable that holds the data to be copied */
+ void *num_entities; /* number of entities for multi-byte data */
+ int default_num_entities; /* default number of entities for this data */
+ int max_num_entities; /* maximal number of entities for this data */
+ char *default_string; /* optional default string for string data */
+};
-void setElementChangeInfoToDefaults(struct ElementChangeInfo *change)
+static struct LevelFileConfigInfo chunk_config_INFO[] =
{
- int i, x, y;
+ /* ---------- values not related to single elements ----------------------- */
- change->can_change = FALSE;
+ {
+ -1, SAVE_CONF_ALWAYS,
+ TYPE_INTEGER, CONF_VALUE_8_BIT(1),
+ &li.game_engine_type, GAME_ENGINE_TYPE_RND
+ },
- for (i = 0; i < NUM_CHANGE_EVENTS; i++)
- change->has_event[i] = FALSE;
+ {
+ -1, SAVE_CONF_ALWAYS,
+ TYPE_INTEGER, CONF_VALUE_16_BIT(1),
+ &li.fieldx, STD_LEV_FIELDX
+ },
+ {
+ -1, SAVE_CONF_ALWAYS,
+ TYPE_INTEGER, CONF_VALUE_16_BIT(2),
+ &li.fieldy, STD_LEV_FIELDY
+ },
- change->trigger_player = CH_PLAYER_ANY;
- change->trigger_side = CH_SIDE_ANY;
- change->trigger_page = CH_PAGE_ANY;
+ {
+ -1, SAVE_CONF_ALWAYS,
+ TYPE_INTEGER, CONF_VALUE_16_BIT(3),
+ &li.time, 100
+ },
- change->target_element = EL_EMPTY_SPACE;
+ {
+ -1, SAVE_CONF_ALWAYS,
+ TYPE_INTEGER, CONF_VALUE_16_BIT(4),
+ &li.gems_needed, 0
+ },
- change->delay_fixed = 0;
- change->delay_random = 0;
- change->delay_frames = 1;
+ {
+ -1, -1,
+ TYPE_BOOLEAN, CONF_VALUE_8_BIT(2),
+ &li.use_step_counter, FALSE
+ },
- change->trigger_element = EL_EMPTY_SPACE;
+ {
+ -1, -1,
+ TYPE_BITFIELD, CONF_VALUE_8_BIT(4),
+ &li.wind_direction_initial, MV_NONE
+ },
- change->explode = FALSE;
- change->use_target_content = FALSE;
- change->only_if_complete = FALSE;
- change->use_random_replace = FALSE;
- change->random_percentage = 100;
- change->replace_when = CP_WHEN_EMPTY;
+ {
+ -1, -1,
+ TYPE_BOOLEAN, CONF_VALUE_8_BIT(5),
+ &li.em_slippery_gems, FALSE
+ },
- change->has_action = FALSE;
- change->action_type = CA_NO_ACTION;
- change->action_mode = CA_MODE_UNDEFINED;
- change->action_arg = CA_ARG_UNDEFINED;
+ {
+ -1, -1,
+ TYPE_BOOLEAN, CONF_VALUE_8_BIT(6),
+ &li.use_custom_template, FALSE
+ },
- for (x = 0; x < 3; x++)
- for (y = 0; y < 3; y++)
- change->target_content[x][y] = EL_EMPTY_SPACE;
+ {
+ -1, -1,
+ TYPE_BITFIELD, CONF_VALUE_32_BIT(1),
+ &li.can_move_into_acid_bits, ~0 /* default: everything can */
+ },
- change->direct_action = 0;
- change->other_action = 0;
+ {
+ -1, -1,
+ TYPE_BITFIELD, CONF_VALUE_8_BIT(7),
+ &li.dont_collide_with_bits, ~0 /* default: always deadly */
+ },
- change->pre_change_function = NULL;
- change->change_function = NULL;
- change->post_change_function = NULL;
-}
+ {
+ -1, -1,
+ TYPE_INTEGER, CONF_VALUE_16_BIT(5),
+ &li.score[SC_TIME_BONUS], 1
+ },
-static void setLevelInfoToDefaults(struct LevelInfo *level)
-{
- static boolean clipboard_elements_initialized = FALSE;
- int i, j, x, y;
+ {
+ -1, -1,
+ -1, -1,
+ NULL, -1
+ }
+};
- setLevelInfoToDefaults_EM();
+static struct LevelFileConfigInfo chunk_config_ELEM[] =
+{
+ /* (these values are the same for each player) */
+ {
+ EL_PLAYER_1, -1,
+ TYPE_BOOLEAN, CONF_VALUE_8_BIT(1),
+ &li.block_last_field, FALSE /* default case for EM levels */
+ },
+ {
+ EL_PLAYER_1, -1,
+ TYPE_BOOLEAN, CONF_VALUE_8_BIT(2),
+ &li.sp_block_last_field, TRUE /* default case for SP levels */
+ },
+ {
+ EL_PLAYER_1, -1,
+ TYPE_BOOLEAN, CONF_VALUE_8_BIT(3),
+ &li.instant_relocation, FALSE
+ },
+ {
+ EL_PLAYER_1, -1,
+ TYPE_BOOLEAN, CONF_VALUE_8_BIT(4),
+ &li.can_pass_to_walkable, FALSE
+ },
+ {
+ EL_PLAYER_1, -1,
+ TYPE_BOOLEAN, CONF_VALUE_8_BIT(5),
+ &li.block_snap_field, TRUE
+ },
+ {
+ EL_PLAYER_1, -1,
+ TYPE_BOOLEAN, CONF_VALUE_8_BIT(6),
+ &li.continuous_snapping, TRUE
+ },
- level->native_em_level = &native_em_level;
+ /* (these values are different for each player) */
+ {
+ EL_PLAYER_1, -1,
+ TYPE_INTEGER, CONF_VALUE_8_BIT(7),
+ &li.initial_player_stepsize[0], STEPSIZE_NORMAL
+ },
+ {
+ EL_PLAYER_1, -1,
+ TYPE_BOOLEAN, CONF_VALUE_8_BIT(8),
+ &li.initial_player_gravity[0], FALSE
+ },
+ {
+ EL_PLAYER_1, -1,
+ TYPE_BOOLEAN, CONF_VALUE_8_BIT(9),
+ &li.use_start_element[0], FALSE
+ },
+ {
+ EL_PLAYER_1, -1,
+ TYPE_ELEMENT, CONF_VALUE_16_BIT(1),
+ &li.start_element[0], EL_PLAYER_1
+ },
+ {
+ EL_PLAYER_1, -1,
+ TYPE_BOOLEAN, CONF_VALUE_8_BIT(10),
+ &li.use_artwork_element[0], FALSE
+ },
+ {
+ EL_PLAYER_1, -1,
+ TYPE_ELEMENT, CONF_VALUE_16_BIT(2),
+ &li.artwork_element[0], EL_PLAYER_1
+ },
+ {
+ EL_PLAYER_1, -1,
+ TYPE_BOOLEAN, CONF_VALUE_8_BIT(11),
+ &li.use_explosion_element[0], FALSE
+ },
+ {
+ EL_PLAYER_1, -1,
+ TYPE_ELEMENT, CONF_VALUE_16_BIT(3),
+ &li.explosion_element[0], EL_PLAYER_1
+ },
- level->game_engine_type = GAME_ENGINE_TYPE_RND;
+ {
+ EL_PLAYER_2, -1,
+ TYPE_INTEGER, CONF_VALUE_8_BIT(7),
+ &li.initial_player_stepsize[1], STEPSIZE_NORMAL
+ },
+ {
+ EL_PLAYER_2, -1,
+ TYPE_BOOLEAN, CONF_VALUE_8_BIT(8),
+ &li.initial_player_gravity[1], FALSE
+ },
+ {
+ EL_PLAYER_2, -1,
+ TYPE_BOOLEAN, CONF_VALUE_8_BIT(9),
+ &li.use_start_element[1], FALSE
+ },
+ {
+ EL_PLAYER_2, -1,
+ TYPE_ELEMENT, CONF_VALUE_16_BIT(1),
+ &li.start_element[1], EL_PLAYER_2
+ },
+ {
+ EL_PLAYER_2, -1,
+ TYPE_BOOLEAN, CONF_VALUE_8_BIT(10),
+ &li.use_artwork_element[1], FALSE
+ },
+ {
+ EL_PLAYER_2, -1,
+ TYPE_ELEMENT, CONF_VALUE_16_BIT(2),
+ &li.artwork_element[1], EL_PLAYER_2
+ },
+ {
+ EL_PLAYER_2, -1,
+ TYPE_BOOLEAN, CONF_VALUE_8_BIT(11),
+ &li.use_explosion_element[1], FALSE
+ },
+ {
+ EL_PLAYER_2, -1,
+ TYPE_ELEMENT, CONF_VALUE_16_BIT(3),
+ &li.explosion_element[1], EL_PLAYER_2
+ },
- level->file_version = FILE_VERSION_ACTUAL;
- level->game_version = GAME_VERSION_ACTUAL;
+ {
+ EL_PLAYER_3, -1,
+ TYPE_INTEGER, CONF_VALUE_8_BIT(7),
+ &li.initial_player_stepsize[2], STEPSIZE_NORMAL
+ },
+ {
+ EL_PLAYER_3, -1,
+ TYPE_BOOLEAN, CONF_VALUE_8_BIT(8),
+ &li.initial_player_gravity[2], FALSE
+ },
+ {
+ EL_PLAYER_3, -1,
+ TYPE_BOOLEAN, CONF_VALUE_8_BIT(9),
+ &li.use_start_element[2], FALSE
+ },
+ {
+ EL_PLAYER_3, -1,
+ TYPE_ELEMENT, CONF_VALUE_16_BIT(1),
+ &li.start_element[2], EL_PLAYER_3
+ },
+ {
+ EL_PLAYER_3, -1,
+ TYPE_BOOLEAN, CONF_VALUE_8_BIT(10),
+ &li.use_artwork_element[2], FALSE
+ },
+ {
+ EL_PLAYER_3, -1,
+ TYPE_ELEMENT, CONF_VALUE_16_BIT(2),
+ &li.artwork_element[2], EL_PLAYER_3
+ },
+ {
+ EL_PLAYER_3, -1,
+ TYPE_BOOLEAN, CONF_VALUE_8_BIT(11),
+ &li.use_explosion_element[2], FALSE
+ },
+ {
+ EL_PLAYER_3, -1,
+ TYPE_ELEMENT, CONF_VALUE_16_BIT(3),
+ &li.explosion_element[2], EL_PLAYER_3
+ },
- level->encoding_16bit_field = FALSE; /* default: only 8-bit elements */
- level->encoding_16bit_yamyam = FALSE; /* default: only 8-bit elements */
- level->encoding_16bit_amoeba = FALSE; /* default: only 8-bit elements */
+ {
+ EL_PLAYER_4, -1,
+ TYPE_INTEGER, CONF_VALUE_8_BIT(7),
+ &li.initial_player_stepsize[3], STEPSIZE_NORMAL
+ },
+ {
+ EL_PLAYER_4, -1,
+ TYPE_BOOLEAN, CONF_VALUE_8_BIT(8),
+ &li.initial_player_gravity[3], FALSE
+ },
+ {
+ EL_PLAYER_4, -1,
+ TYPE_BOOLEAN, CONF_VALUE_8_BIT(9),
+ &li.use_start_element[3], FALSE
+ },
+ {
+ EL_PLAYER_4, -1,
+ TYPE_ELEMENT, CONF_VALUE_16_BIT(1),
+ &li.start_element[3], EL_PLAYER_4
+ },
+ {
+ EL_PLAYER_4, -1,
+ TYPE_BOOLEAN, CONF_VALUE_8_BIT(10),
+ &li.use_artwork_element[3], FALSE
+ },
+ {
+ EL_PLAYER_4, -1,
+ TYPE_ELEMENT, CONF_VALUE_16_BIT(2),
+ &li.artwork_element[3], EL_PLAYER_4
+ },
+ {
+ EL_PLAYER_4, -1,
+ TYPE_BOOLEAN, CONF_VALUE_8_BIT(11),
+ &li.use_explosion_element[3], FALSE
+ },
+ {
+ EL_PLAYER_4, -1,
+ TYPE_ELEMENT, CONF_VALUE_16_BIT(3),
+ &li.explosion_element[3], EL_PLAYER_4
+ },
- level->fieldx = STD_LEV_FIELDX;
- level->fieldy = STD_LEV_FIELDY;
+ {
+ EL_EMERALD, -1,
+ TYPE_INTEGER, CONF_VALUE_16_BIT(1),
+ &li.score[SC_EMERALD], 10
+ },
- for (x = 0; x < MAX_LEV_FIELDX; x++)
- for (y = 0; y < MAX_LEV_FIELDY; y++)
- level->field[x][y] = EL_SAND;
+ {
+ EL_DIAMOND, -1,
+ TYPE_INTEGER, CONF_VALUE_16_BIT(1),
+ &li.score[SC_DIAMOND], 10
+ },
- level->time = 100;
- level->gems_needed = 0;
-
- level->amoeba_speed = 10;
-
- level->time_magic_wall = 10;
- level->time_wheel = 10;
- level->time_light = 10;
- level->time_timegate = 10;
-
- level->amoeba_content = EL_DIAMOND;
-
- level->double_speed = FALSE;
- level->initial_gravity = FALSE;
- level->em_slippery_gems = FALSE;
- level->instant_relocation = FALSE;
- level->can_pass_to_walkable = FALSE;
- level->grow_into_diggable = TRUE;
-
- level->block_last_field = FALSE; /* EM does not block by default */
- level->sp_block_last_field = TRUE; /* SP blocks the last field */
-
- level->can_move_into_acid_bits = ~0; /* everything can move into acid */
- level->dont_collide_with_bits = ~0; /* always deadly when colliding */
-
- level->use_spring_bug = FALSE;
- level->use_step_counter = FALSE;
-
- /* values for the new EMC elements */
- level->android_move_time = 10;
- level->android_clone_time = 10;
- level->ball_random = FALSE;
- level->ball_state_initial = FALSE;
- level->ball_time = 10;
- level->lenses_score = 10;
- level->magnify_score = 10;
- level->slurp_score = 10;
- level->lenses_time = 10;
- level->magnify_time = 10;
- level->wind_direction_initial = MV_NO_MOVING;
- for (i = 0; i < NUM_MAGIC_BALL_CONTENTS; i++)
- for (x = 0; x < 3; x++)
- for (y = 0; y < 3; y++)
- level->ball_content[i][x][y] = EL_EMPTY;
- for (i = 0; i < 16; i++)
- level->android_array[i] = FALSE;
+ {
+ EL_BUG, -1,
+ TYPE_INTEGER, CONF_VALUE_16_BIT(1),
+ &li.score[SC_BUG], 10
+ },
- level->use_custom_template = FALSE;
+ {
+ EL_SPACESHIP, -1,
+ TYPE_INTEGER, CONF_VALUE_16_BIT(1),
+ &li.score[SC_SPACESHIP], 10
+ },
- for (i = 0; i < MAX_LEVEL_NAME_LEN; i++)
- level->name[i] = '\0';
- for (i = 0; i < MAX_LEVEL_AUTHOR_LEN; i++)
- level->author[i] = '\0';
+ {
+ EL_PACMAN, -1,
+ TYPE_INTEGER, CONF_VALUE_16_BIT(1),
+ &li.score[SC_PACMAN], 10
+ },
- strcpy(level->name, NAMELESS_LEVEL_NAME);
- strcpy(level->author, ANONYMOUS_NAME);
+ {
+ EL_NUT, -1,
+ TYPE_INTEGER, CONF_VALUE_16_BIT(1),
+ &li.score[SC_NUT], 10
+ },
- for (i = 0; i < 4; i++)
{
- level->envelope_text[i][0] = '\0';
- level->envelope_xsize[i] = MAX_ENVELOPE_XSIZE;
- level->envelope_ysize[i] = MAX_ENVELOPE_YSIZE;
- }
+ EL_DYNAMITE, -1,
+ TYPE_INTEGER, CONF_VALUE_16_BIT(1),
+ &li.score[SC_DYNAMITE], 10
+ },
- for (i = 0; i < LEVEL_SCORE_ELEMENTS; i++)
- level->score[i] = 10;
+ {
+ EL_KEY_1, -1,
+ TYPE_INTEGER, CONF_VALUE_16_BIT(1),
+ &li.score[SC_KEY], 10
+ },
- level->num_yamyam_contents = STD_ELEMENT_CONTENTS;
- for (i = 0; i < MAX_ELEMENT_CONTENTS; i++)
- for (x = 0; x < 3; x++)
- for (y = 0; y < 3; y++)
- level->yamyam_content[i][x][y] =
- (i < STD_ELEMENT_CONTENTS ? EL_ROCK : EL_EMPTY);
+ {
+ EL_PEARL, -1,
+ TYPE_INTEGER, CONF_VALUE_16_BIT(1),
+ &li.score[SC_PEARL], 10
+ },
- level->field[0][0] = EL_PLAYER_1;
- level->field[STD_LEV_FIELDX - 1][STD_LEV_FIELDY - 1] = EL_EXIT_CLOSED;
+ {
+ EL_CRYSTAL, -1,
+ TYPE_INTEGER, CONF_VALUE_16_BIT(1),
+ &li.score[SC_CRYSTAL], 10
+ },
- for (i = 0; i < MAX_NUM_ELEMENTS; i++)
{
- int element = i;
+ EL_BD_AMOEBA, -1,
+ TYPE_ELEMENT, CONF_VALUE_16_BIT(1),
+ &li.amoeba_content, EL_DIAMOND
+ },
+ {
+ EL_BD_AMOEBA, -1,
+ TYPE_INTEGER, CONF_VALUE_16_BIT(2),
+ &li.amoeba_speed, 10
+ },
+ {
+ EL_BD_AMOEBA, -1,
+ TYPE_BOOLEAN, CONF_VALUE_8_BIT(1),
+ &li.grow_into_diggable, TRUE
+ },
- /* never initialize clipboard elements after the very first time */
- if (IS_CLIPBOARD_ELEMENT(element) && clipboard_elements_initialized)
- continue;
+ {
+ EL_YAMYAM, -1,
+ TYPE_CONTENT_LIST, CONF_VALUE_BYTES(1),
+ &li.yamyam_content, EL_ROCK, NULL,
+ &li.num_yamyam_contents, 4, MAX_ELEMENT_CONTENTS
+ },
+ {
+ EL_YAMYAM, -1,
+ TYPE_INTEGER, CONF_VALUE_16_BIT(1),
+ &li.score[SC_YAMYAM], 10
+ },
- setElementChangePages(&element_info[element], 1);
- setElementChangeInfoToDefaults(element_info[element].change);
+ {
+ EL_ROBOT, -1,
+ TYPE_INTEGER, CONF_VALUE_16_BIT(1),
+ &li.score[SC_ROBOT], 10
+ },
+ {
+ EL_ROBOT, -1,
+ TYPE_INTEGER, CONF_VALUE_16_BIT(2),
+ &li.slurp_score, 10
+ },
- if (IS_CUSTOM_ELEMENT(element) ||
- IS_GROUP_ELEMENT(element) ||
- IS_INTERNAL_ELEMENT(element))
- {
- for (j = 0; j < MAX_ELEMENT_NAME_LEN + 1; j++)
- element_info[element].description[j] = '\0';
+ {
+ EL_ROBOT_WHEEL, -1,
+ TYPE_INTEGER, CONF_VALUE_16_BIT(1),
+ &li.time_wheel, 10
+ },
- if (element_info[element].custom_description != NULL)
- strncpy(element_info[element].description,
- element_info[element].custom_description,MAX_ELEMENT_NAME_LEN);
- else
- strcpy(element_info[element].description,
- element_info[element].editor_description);
+ {
+ EL_MAGIC_WALL, -1,
+ TYPE_INTEGER, CONF_VALUE_16_BIT(1),
+ &li.time_magic_wall, 10
+ },
- element_info[element].use_gfx_element = FALSE;
- element_info[element].gfx_element = EL_EMPTY_SPACE;
+ {
+ EL_GAME_OF_LIFE, -1,
+ TYPE_INTEGER, CONF_VALUE_8_BIT(1),
+ &li.game_of_life[0], 2
+ },
+ {
+ EL_GAME_OF_LIFE, -1,
+ TYPE_INTEGER, CONF_VALUE_8_BIT(2),
+ &li.game_of_life[1], 3
+ },
+ {
+ EL_GAME_OF_LIFE, -1,
+ TYPE_INTEGER, CONF_VALUE_8_BIT(3),
+ &li.game_of_life[2], 3
+ },
+ {
+ EL_GAME_OF_LIFE, -1,
+ TYPE_INTEGER, CONF_VALUE_8_BIT(4),
+ &li.game_of_life[3], 3
+ },
- element_info[element].modified_settings = FALSE;
- }
+ {
+ EL_BIOMAZE, -1,
+ TYPE_INTEGER, CONF_VALUE_8_BIT(1),
+ &li.biomaze[0], 2
+ },
+ {
+ EL_BIOMAZE, -1,
+ TYPE_INTEGER, CONF_VALUE_8_BIT(2),
+ &li.biomaze[1], 3
+ },
+ {
+ EL_BIOMAZE, -1,
+ TYPE_INTEGER, CONF_VALUE_8_BIT(3),
+ &li.biomaze[2], 3
+ },
+ {
+ EL_BIOMAZE, -1,
+ TYPE_INTEGER, CONF_VALUE_8_BIT(4),
+ &li.biomaze[3], 3
+ },
- if (IS_CUSTOM_ELEMENT(element) ||
- IS_INTERNAL_ELEMENT(element))
- {
- element_info[element].access_direction = MV_ALL_DIRECTIONS;
+ {
+ EL_TIMEGATE_SWITCH, -1,
+ TYPE_INTEGER, CONF_VALUE_16_BIT(1),
+ &li.time_timegate, 10
+ },
- element_info[element].collect_score_initial = 10; /* special default */
- element_info[element].collect_count_initial = 1; /* special default */
+ {
+ EL_LIGHT_SWITCH_ACTIVE, -1,
+ TYPE_INTEGER, CONF_VALUE_16_BIT(1),
+ &li.time_light, 10
+ },
- element_info[element].push_delay_fixed = -1; /* initialize later */
- element_info[element].push_delay_random = -1; /* initialize later */
- element_info[element].drop_delay_fixed = 0;
- element_info[element].drop_delay_random = 0;
- element_info[element].move_delay_fixed = 0;
- element_info[element].move_delay_random = 0;
+ {
+ EL_SHIELD_NORMAL, -1,
+ TYPE_INTEGER, CONF_VALUE_16_BIT(1),
+ &li.shield_normal_time, 10
+ },
+ {
+ EL_SHIELD_NORMAL, -1,
+ TYPE_INTEGER, CONF_VALUE_16_BIT(2),
+ &li.score[SC_SHIELD], 10
+ },
- element_info[element].move_pattern = MV_ALL_DIRECTIONS;
- element_info[element].move_direction_initial = MV_START_AUTOMATIC;
- element_info[element].move_stepsize = TILEX / 8;
+ {
+ EL_SHIELD_DEADLY, -1,
+ TYPE_INTEGER, CONF_VALUE_16_BIT(1),
+ &li.shield_deadly_time, 10
+ },
+ {
+ EL_SHIELD_DEADLY, -1,
+ TYPE_INTEGER, CONF_VALUE_16_BIT(2),
+ &li.score[SC_SHIELD], 10
+ },
- element_info[element].move_enter_element = EL_EMPTY_SPACE;
- element_info[element].move_leave_element = EL_EMPTY_SPACE;
- element_info[element].move_leave_type = LEAVE_TYPE_UNLIMITED;
+ {
+ EL_EXTRA_TIME, -1,
+ TYPE_INTEGER, CONF_VALUE_16_BIT(1),
+ &li.extra_time, 10
+ },
+ {
+ EL_EXTRA_TIME, -1,
+ TYPE_INTEGER, CONF_VALUE_16_BIT(2),
+ &li.extra_time_score, 10
+ },
- element_info[element].slippery_type = SLIPPERY_ANY_RANDOM;
+ {
+ EL_TIME_ORB_FULL, -1,
+ TYPE_INTEGER, CONF_VALUE_16_BIT(1),
+ &li.time_orb_time, 10
+ },
+ {
+ EL_TIME_ORB_FULL, -1,
+ TYPE_BOOLEAN, CONF_VALUE_8_BIT(1),
+ &li.use_time_orb_bug, FALSE
+ },
- element_info[element].explosion_type = EXPLODES_3X3;
- element_info[element].explosion_delay = 16;
- element_info[element].ignition_delay = 8;
+ {
+ EL_SPRING, -1,
+ TYPE_BOOLEAN, CONF_VALUE_8_BIT(1),
+ &li.use_spring_bug, FALSE
+ },
- for (x = 0; x < 3; x++)
- for (y = 0; y < 3; y++)
- element_info[element].content[x][y] = EL_EMPTY_SPACE;
+ {
+ EL_EMC_ANDROID, -1,
+ TYPE_INTEGER, CONF_VALUE_16_BIT(1),
+ &li.android_move_time, 10
+ },
+ {
+ EL_EMC_ANDROID, -1,
+ TYPE_INTEGER, CONF_VALUE_16_BIT(2),
+ &li.android_clone_time, 10
+ },
+ {
+ EL_EMC_ANDROID, -1,
+ TYPE_ELEMENT_LIST, CONF_VALUE_BYTES(1),
+ &li.android_clone_element[0], EL_EMPTY, NULL,
+ &li.num_android_clone_elements, 1, MAX_ANDROID_ELEMENTS
+ },
- element_info[element].access_type = 0;
- element_info[element].access_layer = 0;
- element_info[element].access_protected = 0;
- element_info[element].walk_to_action = 0;
- element_info[element].smash_targets = 0;
- element_info[element].deadliness = 0;
+ {
+ EL_EMC_LENSES, -1,
+ TYPE_INTEGER, CONF_VALUE_16_BIT(1),
+ &li.lenses_score, 10
+ },
+ {
+ EL_EMC_LENSES, -1,
+ TYPE_INTEGER, CONF_VALUE_16_BIT(2),
+ &li.lenses_time, 10
+ },
- element_info[element].can_explode_by_fire = FALSE;
- element_info[element].can_explode_smashed = FALSE;
- element_info[element].can_explode_impact = FALSE;
+ {
+ EL_EMC_MAGNIFIER, -1,
+ TYPE_INTEGER, CONF_VALUE_16_BIT(1),
+ &li.magnify_score, 10
+ },
+ {
+ EL_EMC_MAGNIFIER, -1,
+ TYPE_INTEGER, CONF_VALUE_16_BIT(2),
+ &li.magnify_time, 10
+ },
- element_info[element].current_change_page = 0;
+ {
+ EL_EMC_MAGIC_BALL, -1,
+ TYPE_INTEGER, CONF_VALUE_16_BIT(1),
+ &li.ball_time, 10
+ },
+ {
+ EL_EMC_MAGIC_BALL, -1,
+ TYPE_BOOLEAN, CONF_VALUE_8_BIT(1),
+ &li.ball_random, FALSE
+ },
+ {
+ EL_EMC_MAGIC_BALL, -1,
+ TYPE_BOOLEAN, CONF_VALUE_8_BIT(2),
+ &li.ball_state_initial, FALSE
+ },
+ {
+ EL_EMC_MAGIC_BALL, -1,
+ TYPE_CONTENT_LIST, CONF_VALUE_BYTES(1),
+ &li.ball_content, EL_EMPTY, NULL,
+ &li.num_ball_contents, 4, MAX_ELEMENT_CONTENTS
+ },
- /* start with no properties at all */
- for (j = 0; j < NUM_EP_BITFIELDS; j++)
- Properties[element][j] = EP_BITMASK_DEFAULT;
+ /* ---------- unused values ----------------------------------------------- */
- /* now set default properties */
- SET_PROPERTY(element, EP_CAN_MOVE_INTO_ACID, TRUE);
- }
+ {
+ EL_UNKNOWN, SAVE_CONF_NEVER,
+ TYPE_INTEGER, CONF_VALUE_16_BIT(1),
+ &li.score[SC_UNKNOWN_14], 10
+ },
+ {
+ EL_UNKNOWN, SAVE_CONF_NEVER,
+ TYPE_INTEGER, CONF_VALUE_16_BIT(2),
+ &li.score[SC_UNKNOWN_15], 10
+ },
- if (IS_GROUP_ELEMENT(element) ||
- IS_INTERNAL_ELEMENT(element))
- {
- /* initialize memory for list of elements in group */
- if (element_info[element].group == NULL)
- element_info[element].group =
- checked_malloc(sizeof(struct ElementGroupInfo));
+ {
+ -1, -1,
+ -1, -1,
+ NULL, -1
+ }
+};
- for (j = 0; j < MAX_ELEMENTS_IN_GROUP; j++)
- element_info[element].group->element[j] = EL_EMPTY_SPACE;
+static struct LevelFileConfigInfo chunk_config_NOTE[] =
+{
+ {
+ -1, -1,
+ TYPE_INTEGER, CONF_VALUE_8_BIT(1),
+ &xx_envelope.xsize, MAX_ENVELOPE_XSIZE,
+ },
+ {
+ -1, -1,
+ TYPE_INTEGER, CONF_VALUE_8_BIT(2),
+ &xx_envelope.ysize, MAX_ENVELOPE_YSIZE,
+ },
- /* default: only one element in group */
- element_info[element].group->num_elements = 1;
+ {
+ -1, -1,
+ TYPE_STRING, CONF_VALUE_BYTES(1),
+ &xx_envelope.text, -1, NULL,
+ &xx_string_length_unused, -1, MAX_ENVELOPE_TEXT_LEN,
+ &xx_default_string_empty[0]
+ },
- element_info[element].group->choice_mode = ANIM_RANDOM;
- }
+ {
+ -1, -1,
+ -1, -1,
+ NULL, -1
}
+};
- clipboard_elements_initialized = TRUE;
+static struct LevelFileConfigInfo chunk_config_CUSX_base[] =
+{
+ {
+ -1, -1,
+ TYPE_STRING, CONF_VALUE_BYTES(1),
+ &xx_ei.description[0], -1,
+ &yy_ei.description[0],
+ &xx_string_length_unused, -1, MAX_ELEMENT_NAME_LEN,
+ &xx_default_description[0]
+ },
- BorderElement = EL_STEELWALL;
+ {
+ -1, -1,
+ TYPE_BITFIELD, CONF_VALUE_32_BIT(1),
+ &xx_ei.properties[EP_BITFIELD_BASE_NR], EP_BITMASK_BASE_DEFAULT,
+ &yy_ei.properties[EP_BITFIELD_BASE_NR]
+ },
+#if 0
+ /* (reserved) */
+ {
+ -1, -1,
+ TYPE_BITFIELD, CONF_VALUE_32_BIT(2),
+ &xx_ei.properties[EP_BITFIELD_BASE_NR + 1], EP_BITMASK_DEFAULT,
+ &yy_ei.properties[EP_BITFIELD_BASE_NR + 1]
+ },
+#endif
- level->no_valid_file = FALSE;
+ {
+ -1, -1,
+ TYPE_BOOLEAN, CONF_VALUE_8_BIT(1),
+ &xx_ei.use_gfx_element, FALSE,
+ &yy_ei.use_gfx_element
+ },
+ {
+ -1, -1,
+ TYPE_ELEMENT, CONF_VALUE_16_BIT(1),
+ &xx_ei.gfx_element, EL_EMPTY_SPACE,
+ &yy_ei.gfx_element
+ },
- level->changed = FALSE;
+ {
+ -1, -1,
+ TYPE_BITFIELD, CONF_VALUE_8_BIT(2),
+ &xx_ei.access_direction, MV_ALL_DIRECTIONS,
+ &yy_ei.access_direction
+ },
- if (leveldir_current == NULL) /* only when dumping level */
- return;
+ {
+ -1, -1,
+ TYPE_INTEGER, CONF_VALUE_16_BIT(2),
+ &xx_ei.collect_score_initial, 10,
+ &yy_ei.collect_score_initial
+ },
+ {
+ -1, -1,
+ TYPE_INTEGER, CONF_VALUE_16_BIT(3),
+ &xx_ei.collect_count_initial, 1,
+ &yy_ei.collect_count_initial
+ },
- /* try to determine better author name than 'anonymous' */
- if (strcmp(leveldir_current->author, ANONYMOUS_NAME) != 0)
{
- strncpy(level->author, leveldir_current->author, MAX_LEVEL_AUTHOR_LEN);
- level->author[MAX_LEVEL_AUTHOR_LEN] = '\0';
- }
- else
+ -1, -1,
+ TYPE_INTEGER, CONF_VALUE_16_BIT(4),
+ &xx_ei.ce_value_fixed_initial, 0,
+ &yy_ei.ce_value_fixed_initial
+ },
{
- switch (LEVELCLASS(leveldir_current))
- {
- case LEVELCLASS_TUTORIAL:
- strcpy(level->author, PROGRAM_AUTHOR_STRING);
- break;
+ -1, -1,
+ TYPE_INTEGER, CONF_VALUE_16_BIT(5),
+ &xx_ei.ce_value_random_initial, 0,
+ &yy_ei.ce_value_random_initial
+ },
+ {
+ -1, -1,
+ TYPE_BOOLEAN, CONF_VALUE_8_BIT(3),
+ &xx_ei.use_last_ce_value, FALSE,
+ &yy_ei.use_last_ce_value
+ },
- case LEVELCLASS_CONTRIB:
- strncpy(level->author, leveldir_current->name, MAX_LEVEL_AUTHOR_LEN);
- level->author[MAX_LEVEL_AUTHOR_LEN] = '\0';
- break;
+ {
+ -1, -1,
+ TYPE_INTEGER, CONF_VALUE_16_BIT(6),
+ &xx_ei.push_delay_fixed, 8,
+ &yy_ei.push_delay_fixed
+ },
+ {
+ -1, -1,
+ TYPE_INTEGER, CONF_VALUE_16_BIT(7),
+ &xx_ei.push_delay_random, 8,
+ &yy_ei.push_delay_random
+ },
+ {
+ -1, -1,
+ TYPE_INTEGER, CONF_VALUE_16_BIT(8),
+ &xx_ei.drop_delay_fixed, 0,
+ &yy_ei.drop_delay_fixed
+ },
+ {
+ -1, -1,
+ TYPE_INTEGER, CONF_VALUE_16_BIT(9),
+ &xx_ei.drop_delay_random, 0,
+ &yy_ei.drop_delay_random
+ },
+ {
+ -1, -1,
+ TYPE_INTEGER, CONF_VALUE_16_BIT(10),
+ &xx_ei.move_delay_fixed, 0,
+ &yy_ei.move_delay_fixed
+ },
+ {
+ -1, -1,
+ TYPE_INTEGER, CONF_VALUE_16_BIT(11),
+ &xx_ei.move_delay_random, 0,
+ &yy_ei.move_delay_random
+ },
- case LEVELCLASS_PRIVATE:
- strncpy(level->author, getRealName(), MAX_LEVEL_AUTHOR_LEN);
- level->author[MAX_LEVEL_AUTHOR_LEN] = '\0';
- break;
+ {
+ -1, -1,
+ TYPE_BITFIELD, CONF_VALUE_32_BIT(3),
+ &xx_ei.move_pattern, MV_ALL_DIRECTIONS,
+ &yy_ei.move_pattern
+ },
+ {
+ -1, -1,
+ TYPE_BITFIELD, CONF_VALUE_8_BIT(4),
+ &xx_ei.move_direction_initial, MV_START_AUTOMATIC,
+ &yy_ei.move_direction_initial
+ },
+ {
+ -1, -1,
+ TYPE_INTEGER, CONF_VALUE_8_BIT(5),
+ &xx_ei.move_stepsize, TILEX / 8,
+ &yy_ei.move_stepsize
+ },
- default:
- /* keep default value */
- break;
- }
- }
-}
+ {
+ -1, -1,
+ TYPE_ELEMENT, CONF_VALUE_16_BIT(12),
+ &xx_ei.move_enter_element, EL_EMPTY_SPACE,
+ &yy_ei.move_enter_element
+ },
+ {
+ -1, -1,
+ TYPE_ELEMENT, CONF_VALUE_16_BIT(13),
+ &xx_ei.move_leave_element, EL_EMPTY_SPACE,
+ &yy_ei.move_leave_element
+ },
+ {
+ -1, -1,
+ TYPE_INTEGER, CONF_VALUE_8_BIT(6),
+ &xx_ei.move_leave_type, LEAVE_TYPE_UNLIMITED,
+ &yy_ei.move_leave_type
+ },
-static void setFileInfoToDefaults(struct LevelFileInfo *level_file_info)
-{
- level_file_info->nr = 0;
- level_file_info->type = LEVEL_FILE_TYPE_UNKNOWN;
- level_file_info->packed = FALSE;
- level_file_info->basename = NULL;
- level_file_info->filename = NULL;
-}
+ {
+ -1, -1,
+ TYPE_INTEGER, CONF_VALUE_8_BIT(7),
+ &xx_ei.slippery_type, SLIPPERY_ANY_RANDOM,
+ &yy_ei.slippery_type
+ },
-static void ActivateLevelTemplate()
-{
- /* Currently there is no special action needed to activate the template
- data, because 'element_info' and 'Properties' overwrite the original
- level data, while all other variables do not change. */
-}
+ {
+ -1, -1,
+ TYPE_INTEGER, CONF_VALUE_8_BIT(8),
+ &xx_ei.explosion_type, EXPLODES_3X3,
+ &yy_ei.explosion_type
+ },
+ {
+ -1, -1,
+ TYPE_INTEGER, CONF_VALUE_16_BIT(14),
+ &xx_ei.explosion_delay, 16,
+ &yy_ei.explosion_delay
+ },
+ {
+ -1, -1,
+ TYPE_INTEGER, CONF_VALUE_16_BIT(15),
+ &xx_ei.ignition_delay, 8,
+ &yy_ei.ignition_delay
+ },
-static char *getLevelFilenameFromBasename(char *basename)
-{
- static char *filename = NULL;
+ {
+ -1, -1,
+ TYPE_CONTENT_LIST, CONF_VALUE_BYTES(2),
+ &xx_ei.content, EL_EMPTY_SPACE,
+ &yy_ei.content,
+ &xx_num_contents, 1, 1
+ },
- checked_free(filename);
+ /* ---------- "num_change_pages" must be the last entry ------------------- */
- filename = getPath2(getCurrentLevelDir(), basename);
+ {
+ -1, SAVE_CONF_ALWAYS,
+ TYPE_INTEGER, CONF_VALUE_8_BIT(9),
+ &xx_ei.num_change_pages, 1,
+ &yy_ei.num_change_pages
+ },
- return filename;
-}
+ {
+ -1, -1,
+ -1, -1,
+ NULL, -1,
+ NULL
+ }
+};
-static int getFileTypeFromBasename(char *basename)
+static struct LevelFileConfigInfo chunk_config_CUSX_change[] =
{
- static char *filename = NULL;
- struct stat file_status;
-
- /* ---------- try to determine file type from filename ---------- */
+ /* ---------- "current_change_page" must be the first entry --------------- */
- /* check for typical filename of a Supaplex level package file */
- if (strlen(basename) == 10 && (strncmp(basename, "levels.d", 8) == 0 ||
- strncmp(basename, "LEVELS.D", 8) == 0))
- return LEVEL_FILE_TYPE_SP;
+ {
+ -1, SAVE_CONF_ALWAYS,
+ TYPE_INTEGER, CONF_VALUE_8_BIT(1),
+ &xx_current_change_page, -1
+ },
- /* ---------- try to determine file type from filesize ---------- */
+ /* ---------- (the remaining entries can be in any order) ----------------- */
- checked_free(filename);
- filename = getPath2(getCurrentLevelDir(), basename);
+ {
+ -1, -1,
+ TYPE_BOOLEAN, CONF_VALUE_8_BIT(2),
+ &xx_change.can_change, FALSE
+ },
- if (stat(filename, &file_status) == 0)
{
- /* check for typical filesize of a Supaplex level package file */
- if (file_status.st_size == 170496)
- return LEVEL_FILE_TYPE_SP;
- }
+ -1, -1,
+ TYPE_BITFIELD, CONF_VALUE_32_BIT(1),
+ &xx_event_bits[0], 0
+ },
+ {
+ -1, -1,
+ TYPE_BITFIELD, CONF_VALUE_32_BIT(2),
+ &xx_event_bits[1], 0
+ },
- return LEVEL_FILE_TYPE_UNKNOWN;
-}
+ {
+ -1, -1,
+ TYPE_BITFIELD, CONF_VALUE_8_BIT(3),
+ &xx_change.trigger_player, CH_PLAYER_ANY
+ },
+ {
+ -1, -1,
+ TYPE_BITFIELD, CONF_VALUE_8_BIT(4),
+ &xx_change.trigger_side, CH_SIDE_ANY
+ },
+ {
+ -1, -1,
+ TYPE_BITFIELD, CONF_VALUE_32_BIT(3),
+ &xx_change.trigger_page, CH_PAGE_ANY
+ },
-static char *getSingleLevelBasename(int nr)
-{
- static char basename[MAX_FILENAME_LEN];
+ {
+ -1, -1,
+ TYPE_ELEMENT, CONF_VALUE_16_BIT(1),
+ &xx_change.target_element, EL_EMPTY_SPACE
+ },
- if (nr < 0)
- sprintf(basename, "template.%s", LEVELFILE_EXTENSION);
- else
- sprintf(basename, "%03d.%s", nr, LEVELFILE_EXTENSION);
+ {
+ -1, -1,
+ TYPE_INTEGER, CONF_VALUE_16_BIT(2),
+ &xx_change.delay_fixed, 0
+ },
+ {
+ -1, -1,
+ TYPE_INTEGER, CONF_VALUE_16_BIT(3),
+ &xx_change.delay_random, 0
+ },
+ {
+ -1, -1,
+ TYPE_INTEGER, CONF_VALUE_16_BIT(4),
+ &xx_change.delay_frames, FRAMES_PER_SECOND
+ },
- return basename;
-}
+ {
+ -1, -1,
+ TYPE_ELEMENT, CONF_VALUE_16_BIT(5),
+ &xx_change.trigger_element, EL_EMPTY_SPACE
+ },
-static char *getPackedLevelBasename(int type)
-{
- static char basename[MAX_FILENAME_LEN];
- char *directory = getCurrentLevelDir();
- DIR *dir;
- struct dirent *dir_entry;
+ {
+ -1, -1,
+ TYPE_BOOLEAN, CONF_VALUE_8_BIT(6),
+ &xx_change.explode, FALSE
+ },
+ {
+ -1, -1,
+ TYPE_BOOLEAN, CONF_VALUE_8_BIT(7),
+ &xx_change.use_target_content, FALSE
+ },
+ {
+ -1, -1,
+ TYPE_BOOLEAN, CONF_VALUE_8_BIT(8),
+ &xx_change.only_if_complete, FALSE
+ },
+ {
+ -1, -1,
+ TYPE_BOOLEAN, CONF_VALUE_8_BIT(9),
+ &xx_change.use_random_replace, FALSE
+ },
+ {
+ -1, -1,
+ TYPE_INTEGER, CONF_VALUE_8_BIT(10),
+ &xx_change.random_percentage, 100
+ },
+ {
+ -1, -1,
+ TYPE_INTEGER, CONF_VALUE_8_BIT(11),
+ &xx_change.replace_when, CP_WHEN_EMPTY
+ },
- strcpy(basename, UNDEFINED_FILENAME); /* default: undefined file */
+ {
+ -1, -1,
+ TYPE_BOOLEAN, CONF_VALUE_8_BIT(12),
+ &xx_change.has_action, FALSE
+ },
+ {
+ -1, -1,
+ TYPE_INTEGER, CONF_VALUE_8_BIT(13),
+ &xx_change.action_type, CA_NO_ACTION
+ },
+ {
+ -1, -1,
+ TYPE_INTEGER, CONF_VALUE_8_BIT(14),
+ &xx_change.action_mode, CA_MODE_UNDEFINED
+ },
+ {
+ -1, -1,
+ TYPE_INTEGER, CONF_VALUE_16_BIT(6),
+ &xx_change.action_arg, CA_ARG_UNDEFINED
+ },
- if ((dir = opendir(directory)) == NULL)
{
- Error(ERR_WARN, "cannot read current level directory '%s'", directory);
+ -1, -1,
+ TYPE_CONTENT_LIST, CONF_VALUE_BYTES(1),
+ &xx_change.target_content, EL_EMPTY_SPACE, NULL,
+ &xx_num_contents, 1, 1
+ },
- return basename;
+ {
+ -1, -1,
+ -1, -1,
+ NULL, -1
}
+};
- while ((dir_entry = readdir(dir)) != NULL) /* loop until last dir entry */
+static struct LevelFileConfigInfo chunk_config_GRPX[] =
+{
{
- char *entry_basename = dir_entry->d_name;
- int entry_type = getFileTypeFromBasename(entry_basename);
+ -1, -1,
+ TYPE_STRING, CONF_VALUE_BYTES(1),
+ &xx_ei.description[0], -1, NULL,
+ &xx_string_length_unused, -1, MAX_ELEMENT_NAME_LEN,
+ &xx_default_description[0]
+ },
- if (entry_type != LEVEL_FILE_TYPE_UNKNOWN) /* found valid level package */
- {
- if (type == LEVEL_FILE_TYPE_UNKNOWN ||
- type == entry_type)
- {
- strcpy(basename, entry_basename);
+ {
+ -1, -1,
+ TYPE_BOOLEAN, CONF_VALUE_8_BIT(1),
+ &xx_ei.use_gfx_element, FALSE
+ },
+ {
+ -1, -1,
+ TYPE_ELEMENT, CONF_VALUE_16_BIT(1),
+ &xx_ei.gfx_element, EL_EMPTY_SPACE
+ },
- break;
- }
- }
+ {
+ -1, -1,
+ TYPE_INTEGER, CONF_VALUE_8_BIT(2),
+ &xx_group.choice_mode, ANIM_RANDOM
+ },
+
+ {
+ -1, -1,
+ TYPE_ELEMENT_LIST, CONF_VALUE_BYTES(2),
+ &xx_group.element[0], EL_EMPTY_SPACE, NULL,
+ &xx_group.num_elements, 1, MAX_ELEMENTS_IN_GROUP
+ },
+
+ {
+ -1, -1,
+ -1, -1,
+ NULL, -1
}
+};
- closedir(dir);
+static struct LevelFileConfigInfo chunk_config_CONF[] = /* (OBSOLETE) */
+{
+ {
+ EL_PLAYER_1, -1,
+ TYPE_BOOLEAN, CONF_VALUE_8_BIT(9),
+ &li.block_snap_field, TRUE
+ },
+ {
+ EL_PLAYER_1, -1,
+ TYPE_BOOLEAN, CONF_VALUE_8_BIT(13),
+ &li.continuous_snapping, TRUE
+ },
+ {
+ EL_PLAYER_1, -1,
+ TYPE_INTEGER, CONF_VALUE_8_BIT(1),
+ &li.initial_player_stepsize[0], STEPSIZE_NORMAL
+ },
+ {
+ EL_PLAYER_1, -1,
+ TYPE_BOOLEAN, CONF_VALUE_8_BIT(10),
+ &li.use_start_element[0], FALSE
+ },
+ {
+ EL_PLAYER_1, -1,
+ TYPE_ELEMENT, CONF_VALUE_16_BIT(1),
+ &li.start_element[0], EL_PLAYER_1
+ },
+ {
+ EL_PLAYER_1, -1,
+ TYPE_BOOLEAN, CONF_VALUE_8_BIT(11),
+ &li.use_artwork_element[0], FALSE
+ },
+ {
+ EL_PLAYER_1, -1,
+ TYPE_ELEMENT, CONF_VALUE_16_BIT(2),
+ &li.artwork_element[0], EL_PLAYER_1
+ },
+ {
+ EL_PLAYER_1, -1,
+ TYPE_BOOLEAN, CONF_VALUE_8_BIT(12),
+ &li.use_explosion_element[0], FALSE
+ },
+ {
+ EL_PLAYER_1, -1,
+ TYPE_ELEMENT, CONF_VALUE_16_BIT(3),
+ &li.explosion_element[0], EL_PLAYER_1
+ },
- return basename;
+ {
+ -1, -1,
+ -1, -1,
+ NULL, -1
+ }
+};
+
+static struct
+{
+ int filetype;
+ char *id;
}
+filetype_id_list[] =
+{
+ { LEVEL_FILE_TYPE_RND, "RND" },
+ { LEVEL_FILE_TYPE_BD, "BD" },
+ { LEVEL_FILE_TYPE_EM, "EM" },
+ { LEVEL_FILE_TYPE_SP, "SP" },
+ { LEVEL_FILE_TYPE_DX, "DX" },
+ { LEVEL_FILE_TYPE_SB, "SB" },
+ { LEVEL_FILE_TYPE_DC, "DC" },
+ { -1, NULL },
+};
-static char *getSingleLevelFilename(int nr)
+
+/* ========================================================================= */
+/* level file functions */
+/* ========================================================================= */
+
+static struct DateInfo getCurrentDate()
{
- return getLevelFilenameFromBasename(getSingleLevelBasename(nr));
+ time_t epoch_seconds = time(NULL);
+ struct tm *now = localtime(&epoch_seconds);
+ struct DateInfo date;
+
+ date.year = now->tm_year + 1900;
+ date.month = now->tm_mon + 1;
+ date.day = now->tm_mday;
+
+ return date;
}
-#if 0
-static char *getPackedLevelFilename(int type)
+static void resetEventFlags(struct ElementChangeInfo *change)
{
- return getLevelFilenameFromBasename(getPackedLevelBasename(type));
+ int i;
+
+ for (i = 0; i < NUM_CHANGE_EVENTS; i++)
+ change->has_event[i] = FALSE;
}
-#endif
-char *getDefaultLevelFilename(int nr)
+static void resetEventBits()
{
- return getSingleLevelFilename(nr);
+ int i;
+
+ for (i = 0; i < NUM_CE_BITFIELDS; i++)
+ xx_event_bits[i] = 0;
}
-#if 0
-static void setLevelFileInfo_SingleLevelFilename(struct LevelFileInfo *lfi,
- int type)
+static void setEventFlagsFromEventBits(struct ElementChangeInfo *change)
{
- lfi->type = type;
- lfi->packed = FALSE;
- lfi->basename = getSingleLevelBasename(lfi->nr, lfi->type);
- lfi->filename = getLevelFilenameFromBasename(lfi->basename);
+ int i;
+
+ /* important: only change event flag if corresponding event bit is set
+ (this is because all xx_event_bits[] values are loaded separately,
+ and all xx_event_bits[] values are set back to zero before loading
+ another value xx_event_bits[x] (each value representing 32 flags)) */
+
+ for (i = 0; i < NUM_CHANGE_EVENTS; i++)
+ if (xx_event_bits[CH_EVENT_BITFIELD_NR(i)] & CH_EVENT_BIT(i))
+ change->has_event[i] = TRUE;
}
-#endif
-static void setLevelFileInfo_FormatLevelFilename(struct LevelFileInfo *lfi,
- int type, char *format, ...)
+static void setEventBitsFromEventFlags(struct ElementChangeInfo *change)
{
- static char basename[MAX_FILENAME_LEN];
- va_list ap;
+ int i;
- va_start(ap, format);
- vsprintf(basename, format, ap);
- va_end(ap);
+ /* in contrast to the above function setEventFlagsFromEventBits(), it
+ would also be possible to set all bits in xx_event_bits[] to 0 or 1
+ depending on the corresponding change->has_event[i] values here, as
+ all xx_event_bits[] values are reset in resetEventBits() before */
- lfi->type = type;
- lfi->packed = FALSE;
- lfi->basename = basename;
- lfi->filename = getLevelFilenameFromBasename(lfi->basename);
+ for (i = 0; i < NUM_CHANGE_EVENTS; i++)
+ if (change->has_event[i])
+ xx_event_bits[CH_EVENT_BITFIELD_NR(i)] |= CH_EVENT_BIT(i);
}
-static void setLevelFileInfo_PackedLevelFilename(struct LevelFileInfo *lfi,
- int type)
+static char *getDefaultElementDescription(struct ElementInfo *ei)
{
- lfi->type = type;
- lfi->packed = TRUE;
- lfi->basename = getPackedLevelBasename(lfi->type);
- lfi->filename = getLevelFilenameFromBasename(lfi->basename);
+ static char description[MAX_ELEMENT_NAME_LEN + 1];
+ char *default_description = (ei->custom_description != NULL ?
+ ei->custom_description :
+ ei->editor_description);
+ int i;
+
+ /* always start with reliable default values */
+ for (i = 0; i < MAX_ELEMENT_NAME_LEN + 1; i++)
+ description[i] = '\0';
+
+ /* truncate element description to MAX_ELEMENT_NAME_LEN bytes */
+ strncpy(description, default_description, MAX_ELEMENT_NAME_LEN);
+
+ return &description[0];
}
-static int getFiletypeFromID(char *filetype_id)
+static void setElementDescriptionToDefault(struct ElementInfo *ei)
{
- char *filetype_id_lower;
- int filetype = LEVEL_FILE_TYPE_UNKNOWN;
+ char *default_description = getDefaultElementDescription(ei);
int i;
- if (filetype_id == NULL)
- return LEVEL_FILE_TYPE_UNKNOWN;
+ for (i = 0; i < MAX_ELEMENT_NAME_LEN + 1; i++)
+ ei->description[i] = default_description[i];
+}
- filetype_id_lower = getStringToLower(filetype_id);
+static void setConfigToDefaultsFromConfigList(struct LevelFileConfigInfo *conf)
+{
+ int i;
- for (i = 0; filetype_id_list[i].id != NULL; i++)
+ for (i = 0; conf[i].data_type != -1; i++)
{
- char *id_lower = getStringToLower(filetype_id_list[i].id);
-
- if (strcmp(filetype_id_lower, id_lower) == 0)
- filetype = filetype_id_list[i].filetype;
+ int default_value = conf[i].default_value;
+ int data_type = conf[i].data_type;
+ int conf_type = conf[i].conf_type;
+ int byte_mask = conf_type & CONF_MASK_BYTES;
- free(id_lower);
+ if (byte_mask == CONF_MASK_MULTI_BYTES)
+ {
+ int default_num_entities = conf[i].default_num_entities;
+ int max_num_entities = conf[i].max_num_entities;
- if (filetype != LEVEL_FILE_TYPE_UNKNOWN)
- break;
- }
+ *(int *)(conf[i].num_entities) = default_num_entities;
- free(filetype_id_lower);
+ if (data_type == TYPE_STRING)
+ {
+ char *default_string = conf[i].default_string;
+ char *string = (char *)(conf[i].value);
- return filetype;
+ strncpy(string, default_string, max_num_entities);
+ }
+ else if (data_type == TYPE_ELEMENT_LIST)
+ {
+ int *element_array = (int *)(conf[i].value);
+ int j;
+
+ for (j = 0; j < max_num_entities; j++)
+ element_array[j] = default_value;
+ }
+ else if (data_type == TYPE_CONTENT_LIST)
+ {
+ struct Content *content = (struct Content *)(conf[i].value);
+ int c, x, y;
+
+ for (c = 0; c < max_num_entities; c++)
+ for (y = 0; y < 3; y++)
+ for (x = 0; x < 3; x++)
+ content[c].e[x][y] = default_value;
+ }
+ }
+ else /* constant size configuration data (1, 2 or 4 bytes) */
+ {
+ if (data_type == TYPE_BOOLEAN)
+ *(boolean *)(conf[i].value) = default_value;
+ else
+ *(int *) (conf[i].value) = default_value;
+ }
+ }
}
-static void determineLevelFileInfo_Filename(struct LevelFileInfo *lfi)
+static void copyConfigFromConfigList(struct LevelFileConfigInfo *conf)
{
- int nr = lfi->nr;
+ int i;
- /* special case: level number is negative => check for level template file */
- if (nr < 0)
+ for (i = 0; conf[i].data_type != -1; i++)
{
- setLevelFileInfo_FormatLevelFilename(lfi, LEVEL_FILE_TYPE_RND,
- "template.%s", LEVELFILE_EXTENSION);
+ int data_type = conf[i].data_type;
+ int conf_type = conf[i].conf_type;
+ int byte_mask = conf_type & CONF_MASK_BYTES;
- /* no fallback if template file not existing */
- return;
- }
+ if (byte_mask == CONF_MASK_MULTI_BYTES)
+ {
+ int max_num_entities = conf[i].max_num_entities;
- /* special case: check for file name/pattern specified in "levelinfo.conf" */
- if (leveldir_current->level_filename != NULL)
- {
- int filetype = getFiletypeFromID(leveldir_current->level_filetype);
+ if (data_type == TYPE_STRING)
+ {
+ char *string = (char *)(conf[i].value);
+ char *string_copy = (char *)(conf[i].value_copy);
- setLevelFileInfo_FormatLevelFilename(lfi, filetype,
- leveldir_current->level_filename, nr);
- if (fileExists(lfi->filename))
- return;
- }
+ strncpy(string_copy, string, max_num_entities);
+ }
+ else if (data_type == TYPE_ELEMENT_LIST)
+ {
+ int *element_array = (int *)(conf[i].value);
+ int *element_array_copy = (int *)(conf[i].value_copy);
+ int j;
- /* check for native Rocks'n'Diamonds level file */
- setLevelFileInfo_FormatLevelFilename(lfi, LEVEL_FILE_TYPE_RND,
- "%03d.%s", nr, LEVELFILE_EXTENSION);
- if (fileExists(lfi->filename))
- return;
+ for (j = 0; j < max_num_entities; j++)
+ element_array_copy[j] = element_array[j];
+ }
+ else if (data_type == TYPE_CONTENT_LIST)
+ {
+ struct Content *content = (struct Content *)(conf[i].value);
+ struct Content *content_copy = (struct Content *)(conf[i].value_copy);
+ int c, x, y;
+
+ for (c = 0; c < max_num_entities; c++)
+ for (y = 0; y < 3; y++)
+ for (x = 0; x < 3; x++)
+ content_copy[c].e[x][y] = content[c].e[x][y];
+ }
+ }
+ else /* constant size configuration data (1, 2 or 4 bytes) */
+ {
+ if (data_type == TYPE_BOOLEAN)
+ *(boolean *)(conf[i].value_copy) = *(boolean *)(conf[i].value);
+ else
+ *(int *) (conf[i].value_copy) = *(int *) (conf[i].value);
+ }
+ }
+}
- /* check for Emerald Mine level file (V1) */
- setLevelFileInfo_FormatLevelFilename(lfi, LEVEL_FILE_TYPE_EM, "a%c%c",
- 'a' + (nr / 10) % 26, '0' + nr % 10);
- if (fileExists(lfi->filename))
- return;
- setLevelFileInfo_FormatLevelFilename(lfi, LEVEL_FILE_TYPE_EM, "A%c%c",
- 'A' + (nr / 10) % 26, '0' + nr % 10);
- if (fileExists(lfi->filename))
- return;
+void copyElementInfo(struct ElementInfo *ei_from, struct ElementInfo *ei_to)
+{
+ int i;
- /* check for Emerald Mine level file (V2 to V5) */
- setLevelFileInfo_FormatLevelFilename(lfi, LEVEL_FILE_TYPE_EM, "%d", nr);
- if (fileExists(lfi->filename))
- return;
+ xx_ei = *ei_from; /* copy element data into temporary buffer */
+ yy_ei = *ei_to; /* copy element data into temporary buffer */
- /* check for Emerald Mine level file (V6 / single mode) */
- setLevelFileInfo_FormatLevelFilename(lfi, LEVEL_FILE_TYPE_EM, "%02ds", nr);
- if (fileExists(lfi->filename))
- return;
- setLevelFileInfo_FormatLevelFilename(lfi, LEVEL_FILE_TYPE_EM, "%02dS", nr);
- if (fileExists(lfi->filename))
- return;
+ copyConfigFromConfigList(chunk_config_CUSX_base);
- /* check for Emerald Mine level file (V6 / teamwork mode) */
- setLevelFileInfo_FormatLevelFilename(lfi, LEVEL_FILE_TYPE_EM, "%02dt", nr);
- if (fileExists(lfi->filename))
- return;
- setLevelFileInfo_FormatLevelFilename(lfi, LEVEL_FILE_TYPE_EM, "%02dT", nr);
- if (fileExists(lfi->filename))
- return;
+ *ei_from = xx_ei;
+ *ei_to = yy_ei;
- /* check for various packed level file formats */
- setLevelFileInfo_PackedLevelFilename(lfi, LEVEL_FILE_TYPE_UNKNOWN);
- if (fileExists(lfi->filename))
- return;
+ /* ---------- reinitialize and copy change pages ---------- */
- /* no known level file found -- use default values (and fail later) */
- setLevelFileInfo_FormatLevelFilename(lfi, LEVEL_FILE_TYPE_RND,
- "%03d.%s", nr, LEVELFILE_EXTENSION);
-}
+ ei_to->num_change_pages = ei_from->num_change_pages;
+ ei_to->current_change_page = ei_from->current_change_page;
-static void determineLevelFileInfo_Filetype(struct LevelFileInfo *lfi)
-{
- if (lfi->type == LEVEL_FILE_TYPE_UNKNOWN)
- lfi->type = getFileTypeFromBasename(lfi->basename);
-}
+ setElementChangePages(ei_to, ei_to->num_change_pages);
-static void setLevelFileInfo(struct LevelFileInfo *level_file_info, int nr)
-{
- /* always start with reliable default values */
- setFileInfoToDefaults(level_file_info);
+ for (i = 0; i < ei_to->num_change_pages; i++)
+ ei_to->change_page[i] = ei_from->change_page[i];
- level_file_info->nr = nr; /* set requested level number */
+ /* ---------- copy group element info ---------- */
+ if (ei_from->group != NULL && ei_to->group != NULL) /* group or internal */
+ *ei_to->group = *ei_from->group;
- determineLevelFileInfo_Filename(level_file_info);
- determineLevelFileInfo_Filetype(level_file_info);
+ /* mark this custom element as modified */
+ ei_to->modified_settings = TRUE;
}
-/* ------------------------------------------------------------------------- */
-/* functions for loading R'n'D level */
-/* ------------------------------------------------------------------------- */
-
-int getMappedElement(int element)
+void setElementChangePages(struct ElementInfo *ei, int change_pages)
{
- /* remap some (historic, now obsolete) elements */
+ int change_page_size = sizeof(struct ElementChangeInfo);
- switch (element)
- {
- case EL_PLAYER_OBSOLETE:
- element = EL_PLAYER_1;
- break;
+ ei->num_change_pages = MAX(1, change_pages);
- case EL_KEY_OBSOLETE:
- element = EL_KEY_1;
+ ei->change_page =
+ checked_realloc(ei->change_page, ei->num_change_pages * change_page_size);
- case EL_EM_KEY_1_FILE_OBSOLETE:
- element = EL_EM_KEY_1;
- break;
+ if (ei->current_change_page >= ei->num_change_pages)
+ ei->current_change_page = ei->num_change_pages - 1;
- case EL_EM_KEY_2_FILE_OBSOLETE:
- element = EL_EM_KEY_2;
- break;
+ ei->change = &ei->change_page[ei->current_change_page];
+}
- case EL_EM_KEY_3_FILE_OBSOLETE:
- element = EL_EM_KEY_3;
- break;
+void setElementChangeInfoToDefaults(struct ElementChangeInfo *change)
+{
+ xx_change = *change; /* copy change data into temporary buffer */
- case EL_EM_KEY_4_FILE_OBSOLETE:
- element = EL_EM_KEY_4;
- break;
+#if 0
+ /* (not needed; set by setConfigToDefaultsFromConfigList()) */
+ xx_num_contents = 1;
+#endif
- case EL_ENVELOPE_OBSOLETE:
- element = EL_ENVELOPE_1;
- break;
+ setConfigToDefaultsFromConfigList(chunk_config_CUSX_change);
- case EL_SP_EMPTY:
- element = EL_EMPTY;
- break;
+ *change = xx_change;
- default:
- if (element >= NUM_FILE_ELEMENTS)
- {
- Error(ERR_WARN, "invalid level element %d", element);
+ resetEventFlags(change);
- element = EL_UNKNOWN;
- }
- break;
- }
+ change->direct_action = 0;
+ change->other_action = 0;
- return element;
+ change->pre_change_function = NULL;
+ change->change_function = NULL;
+ change->post_change_function = NULL;
}
-int getMappedElementByVersion(int element, int game_version)
+static void setLevelInfoToDefaults(struct LevelInfo *level)
{
- /* remap some elements due to certain game version */
+ static boolean clipboard_elements_initialized = FALSE;
+ int i, x, y;
- if (game_version <= VERSION_IDENT(2,2,0,0))
- {
- /* map game font elements */
- element = (element == EL_CHAR('[') ? EL_CHAR_AUMLAUT :
- element == EL_CHAR('\\') ? EL_CHAR_OUMLAUT :
- element == EL_CHAR(']') ? EL_CHAR_UUMLAUT :
- element == EL_CHAR('^') ? EL_CHAR_COPYRIGHT : element);
- }
+ InitElementPropertiesStatic();
- if (game_version < VERSION_IDENT(3,0,0,0))
- {
- /* map Supaplex gravity tube elements */
- element = (element == EL_SP_GRAVITY_PORT_LEFT ? EL_SP_PORT_LEFT :
- element == EL_SP_GRAVITY_PORT_RIGHT ? EL_SP_PORT_RIGHT :
- element == EL_SP_GRAVITY_PORT_UP ? EL_SP_PORT_UP :
- element == EL_SP_GRAVITY_PORT_DOWN ? EL_SP_PORT_DOWN :
- element);
- }
+ li = *level; /* copy level data into temporary buffer */
- return element;
-}
+ setConfigToDefaultsFromConfigList(chunk_config_INFO);
+ setConfigToDefaultsFromConfigList(chunk_config_ELEM);
-static int LoadLevel_VERS(FILE *file, int chunk_size, struct LevelInfo *level)
-{
- level->file_version = getFileVersion(file);
- level->game_version = getFileVersion(file);
+ *level = li; /* copy temporary buffer back to level data */
- return chunk_size;
-}
+ setLevelInfoToDefaults_EM();
-static int LoadLevel_HEAD(FILE *file, int chunk_size, struct LevelInfo *level)
-{
- int i, x, y;
+ level->native_em_level = &native_em_level;
- level->fieldx = getFile8Bit(file);
- level->fieldy = getFile8Bit(file);
+ level->file_version = FILE_VERSION_ACTUAL;
+ level->game_version = GAME_VERSION_ACTUAL;
- level->time = getFile16BitBE(file);
- level->gems_needed = getFile16BitBE(file);
+ level->creation_date = getCurrentDate();
+
+ level->encoding_16bit_field = TRUE;
+ level->encoding_16bit_yamyam = TRUE;
+ level->encoding_16bit_amoeba = TRUE;
+
+ for (x = 0; x < MAX_LEV_FIELDX; x++)
+ for (y = 0; y < MAX_LEV_FIELDY; y++)
+ level->field[x][y] = EL_SAND;
for (i = 0; i < MAX_LEVEL_NAME_LEN; i++)
- level->name[i] = getFile8Bit(file);
- level->name[MAX_LEVEL_NAME_LEN] = 0;
+ level->name[i] = '\0';
+ for (i = 0; i < MAX_LEVEL_AUTHOR_LEN; i++)
+ level->author[i] = '\0';
- for (i = 0; i < LEVEL_SCORE_ELEMENTS; i++)
- level->score[i] = getFile8Bit(file);
+ strcpy(level->name, NAMELESS_LEVEL_NAME);
+ strcpy(level->author, ANONYMOUS_NAME);
- level->num_yamyam_contents = STD_ELEMENT_CONTENTS;
- for (i = 0; i < STD_ELEMENT_CONTENTS; i++)
- for (y = 0; y < 3; y++)
- for (x = 0; x < 3; x++)
- level->yamyam_content[i][x][y] = getMappedElement(getFile8Bit(file));
+ level->field[0][0] = EL_PLAYER_1;
+ level->field[STD_LEV_FIELDX - 1][STD_LEV_FIELDY - 1] = EL_EXIT_CLOSED;
- level->amoeba_speed = getFile8Bit(file);
- level->time_magic_wall = getFile8Bit(file);
- level->time_wheel = getFile8Bit(file);
- level->amoeba_content = getMappedElement(getFile8Bit(file));
- level->double_speed = (getFile8Bit(file) == 1 ? TRUE : FALSE);
- level->initial_gravity = (getFile8Bit(file) == 1 ? TRUE : FALSE);
- level->encoding_16bit_field = (getFile8Bit(file) == 1 ? TRUE : FALSE);
- level->em_slippery_gems = (getFile8Bit(file) == 1 ? TRUE : FALSE);
+ for (i = 0; i < MAX_NUM_ELEMENTS; i++)
+ {
+ int element = i;
+ struct ElementInfo *ei = &element_info[element];
- level->use_custom_template = (getFile8Bit(file) == 1 ? TRUE : FALSE);
+ /* never initialize clipboard elements after the very first time */
+ /* (to be able to use clipboard elements between several levels) */
+ if (IS_CLIPBOARD_ELEMENT(element) && clipboard_elements_initialized)
+ continue;
- level->block_last_field = (getFile8Bit(file) == 1 ? TRUE : FALSE);
- level->sp_block_last_field = (getFile8Bit(file) == 1 ? TRUE : FALSE);
- level->can_move_into_acid_bits = getFile32BitBE(file);
- level->dont_collide_with_bits = getFile8Bit(file);
+ if (IS_ENVELOPE(element))
+ {
+ int envelope_nr = element - EL_ENVELOPE_1;
- level->use_spring_bug = (getFile8Bit(file) == 1 ? TRUE : FALSE);
- level->use_step_counter = (getFile8Bit(file) == 1 ? TRUE : FALSE);
+ setConfigToDefaultsFromConfigList(chunk_config_NOTE);
- level->instant_relocation = (getFile8Bit(file) == 1 ? TRUE : FALSE);
- level->can_pass_to_walkable = (getFile8Bit(file) == 1 ? TRUE : FALSE);
- level->grow_into_diggable = (getFile8Bit(file) == 1 ? TRUE : FALSE);
+ level->envelope[envelope_nr] = xx_envelope;
+ }
- level->game_engine_type = getFile8Bit(file);
+ if (IS_CUSTOM_ELEMENT(element) ||
+ IS_GROUP_ELEMENT(element) ||
+ IS_INTERNAL_ELEMENT(element))
+ {
+ xx_ei = *ei; /* copy element data into temporary buffer */
- ReadUnusedBytesFromFile(file, LEVEL_HEADER_UNUSED);
+ setConfigToDefaultsFromConfigList(chunk_config_CUSX_base);
- return chunk_size;
-}
+ *ei = xx_ei;
+ }
-static int LoadLevel_AUTH(FILE *file, int chunk_size, struct LevelInfo *level)
-{
- int i;
+ setElementChangePages(ei, 1);
+ setElementChangeInfoToDefaults(ei->change);
- for (i = 0; i < MAX_LEVEL_AUTHOR_LEN; i++)
- level->author[i] = getFile8Bit(file);
- level->author[MAX_LEVEL_NAME_LEN] = 0;
+ if (IS_CUSTOM_ELEMENT(element) ||
+ IS_GROUP_ELEMENT(element) ||
+ IS_INTERNAL_ELEMENT(element))
+ {
+ setElementDescriptionToDefault(ei);
- return chunk_size;
-}
+ ei->modified_settings = FALSE;
+ }
-static int LoadLevel_BODY(FILE *file, int chunk_size, struct LevelInfo *level)
-{
- int x, y;
- int chunk_size_expected = level->fieldx * level->fieldy;
+ if (IS_CUSTOM_ELEMENT(element) ||
+ IS_INTERNAL_ELEMENT(element))
+ {
+ /* internal values used in level editor */
- /* Note: "chunk_size" was wrong before version 2.0 when elements are
- stored with 16-bit encoding (and should be twice as big then).
- Even worse, playfield data was stored 16-bit when only yamyam content
- contained 16-bit elements and vice versa. */
+ ei->access_type = 0;
+ ei->access_layer = 0;
+ ei->access_protected = 0;
+ ei->walk_to_action = 0;
+ ei->smash_targets = 0;
+ ei->deadliness = 0;
- if (level->encoding_16bit_field && level->file_version >= FILE_VERSION_2_0)
- chunk_size_expected *= 2;
+ ei->can_explode_by_fire = FALSE;
+ ei->can_explode_smashed = FALSE;
+ ei->can_explode_impact = FALSE;
- if (chunk_size_expected != chunk_size)
- {
- ReadUnusedBytesFromFile(file, chunk_size);
- return chunk_size_expected;
- }
+ ei->current_change_page = 0;
+ }
- for (y = 0; y < level->fieldy; y++)
- for (x = 0; x < level->fieldx; x++)
- level->field[x][y] =
- getMappedElement(level->encoding_16bit_field ? getFile16BitBE(file) :
- getFile8Bit(file));
- return chunk_size;
-}
-
-static int LoadLevel_CONT(FILE *file, int chunk_size, struct LevelInfo *level)
-{
- int i, x, y;
- int header_size = 4;
- int content_size = MAX_ELEMENT_CONTENTS * 3 * 3;
- int chunk_size_expected = header_size + content_size;
-
- /* Note: "chunk_size" was wrong before version 2.0 when elements are
- stored with 16-bit encoding (and should be twice as big then).
- Even worse, playfield data was stored 16-bit when only yamyam content
- contained 16-bit elements and vice versa. */
-
- if (level->encoding_16bit_field && level->file_version >= FILE_VERSION_2_0)
- chunk_size_expected += content_size;
+ if (IS_GROUP_ELEMENT(element) ||
+ IS_INTERNAL_ELEMENT(element))
+ {
+ struct ElementGroupInfo *group;
- if (chunk_size_expected != chunk_size)
- {
- ReadUnusedBytesFromFile(file, chunk_size);
- return chunk_size_expected;
- }
+ /* initialize memory for list of elements in group */
+ if (ei->group == NULL)
+ ei->group = checked_malloc(sizeof(struct ElementGroupInfo));
- getFile8Bit(file);
- level->num_yamyam_contents = getFile8Bit(file);
- getFile8Bit(file);
- getFile8Bit(file);
+ group = ei->group;
- /* correct invalid number of content fields -- should never happen */
- if (level->num_yamyam_contents < 1 ||
- level->num_yamyam_contents > MAX_ELEMENT_CONTENTS)
- level->num_yamyam_contents = STD_ELEMENT_CONTENTS;
+ xx_group = *group; /* copy group data into temporary buffer */
- for (i = 0; i < MAX_ELEMENT_CONTENTS; i++)
- for (y = 0; y < 3; y++)
- for (x = 0; x < 3; x++)
- level->yamyam_content[i][x][y] =
- getMappedElement(level->encoding_16bit_field ?
- getFile16BitBE(file) : getFile8Bit(file));
- return chunk_size;
-}
+ setConfigToDefaultsFromConfigList(chunk_config_GRPX);
-static int LoadLevel_CNT2(FILE *file, int chunk_size, struct LevelInfo *level)
-{
- int i, x, y;
- int element;
- int num_contents, content_xsize, content_ysize;
- int content_array[MAX_ELEMENT_CONTENTS][3][3];
+ *group = xx_group;
+ }
+ }
- element = getMappedElement(getFile16BitBE(file));
- num_contents = getFile8Bit(file);
- content_xsize = getFile8Bit(file);
- content_ysize = getFile8Bit(file);
+ clipboard_elements_initialized = TRUE;
- ReadUnusedBytesFromFile(file, LEVEL_CHUNK_CNT2_UNUSED);
+ BorderElement = EL_STEELWALL;
- for (i = 0; i < MAX_ELEMENT_CONTENTS; i++)
- for (y = 0; y < 3; y++)
- for (x = 0; x < 3; x++)
- content_array[i][x][y] = getMappedElement(getFile16BitBE(file));
+ level->no_valid_file = FALSE;
- /* correct invalid number of content fields -- should never happen */
- if (num_contents < 1 || num_contents > MAX_ELEMENT_CONTENTS)
- num_contents = STD_ELEMENT_CONTENTS;
+ level->changed = FALSE;
- if (element == EL_YAMYAM)
- {
- level->num_yamyam_contents = num_contents;
+ if (leveldir_current == NULL) /* only when dumping level */
+ return;
- for (i = 0; i < num_contents; i++)
- for (y = 0; y < 3; y++)
- for (x = 0; x < 3; x++)
- level->yamyam_content[i][x][y] = content_array[i][x][y];
- }
- else if (element == EL_BD_AMOEBA)
+ /* try to determine better author name than 'anonymous' */
+ if (!strEqual(leveldir_current->author, ANONYMOUS_NAME))
{
- level->amoeba_content = content_array[0][0][0];
+ strncpy(level->author, leveldir_current->author, MAX_LEVEL_AUTHOR_LEN);
+ level->author[MAX_LEVEL_AUTHOR_LEN] = '\0';
}
else
{
- Error(ERR_WARN, "cannot load content for element '%d'", element);
- }
+ switch (LEVELCLASS(leveldir_current))
+ {
+ case LEVELCLASS_TUTORIAL:
+ strcpy(level->author, PROGRAM_AUTHOR_STRING);
+ break;
- return chunk_size;
+ case LEVELCLASS_CONTRIB:
+ strncpy(level->author, leveldir_current->name, MAX_LEVEL_AUTHOR_LEN);
+ level->author[MAX_LEVEL_AUTHOR_LEN] = '\0';
+ break;
+
+ case LEVELCLASS_PRIVATE:
+ strncpy(level->author, getRealName(), MAX_LEVEL_AUTHOR_LEN);
+ level->author[MAX_LEVEL_AUTHOR_LEN] = '\0';
+ break;
+
+ default:
+ /* keep default value */
+ break;
+ }
+ }
}
-static int LoadLevel_CNT3(FILE *file, int chunk_size, struct LevelInfo *level)
+static void setFileInfoToDefaults(struct LevelFileInfo *level_file_info)
{
- int i;
- int element;
- int envelope_nr;
- int envelope_len;
- int chunk_size_expected;
+ level_file_info->nr = 0;
+ level_file_info->type = LEVEL_FILE_TYPE_UNKNOWN;
+ level_file_info->packed = FALSE;
+ level_file_info->basename = NULL;
+ level_file_info->filename = NULL;
+}
- element = getMappedElement(getFile16BitBE(file));
- if (!IS_ENVELOPE(element))
- element = EL_ENVELOPE_1;
+static void ActivateLevelTemplate()
+{
+ /* Currently there is no special action needed to activate the template
+ data, because 'element_info' property settings overwrite the original
+ level data, while all other variables do not change. */
+}
- envelope_nr = element - EL_ENVELOPE_1;
+static char *getLevelFilenameFromBasename(char *basename)
+{
+ static char *filename = NULL;
- envelope_len = getFile16BitBE(file);
+ checked_free(filename);
- level->envelope_xsize[envelope_nr] = getFile8Bit(file);
- level->envelope_ysize[envelope_nr] = getFile8Bit(file);
+ filename = getPath2(getCurrentLevelDir(), basename);
- ReadUnusedBytesFromFile(file, LEVEL_CHUNK_CNT3_UNUSED);
+ return filename;
+}
- chunk_size_expected = LEVEL_CHUNK_CNT3_SIZE(envelope_len);
- if (chunk_size_expected != chunk_size)
- {
- ReadUnusedBytesFromFile(file, chunk_size - LEVEL_CHUNK_CNT3_HEADER);
- return chunk_size_expected;
- }
+static int getFileTypeFromBasename(char *basename)
+{
+ static char *filename = NULL;
+ struct stat file_status;
- for (i = 0; i < envelope_len; i++)
- level->envelope_text[envelope_nr][i] = getFile8Bit(file);
+ /* ---------- try to determine file type from filename ---------- */
- return chunk_size;
-}
+ /* check for typical filename of a Supaplex level package file */
+ if (strlen(basename) == 10 && (strncmp(basename, "levels.d", 8) == 0 ||
+ strncmp(basename, "LEVELS.D", 8) == 0))
+ return LEVEL_FILE_TYPE_SP;
-static int LoadLevel_CUS1(FILE *file, int chunk_size, struct LevelInfo *level)
-{
- int num_changed_custom_elements = getFile16BitBE(file);
- int chunk_size_expected = 2 + num_changed_custom_elements * 6;
- int i;
+ /* ---------- try to determine file type from filesize ---------- */
- if (chunk_size_expected != chunk_size)
- {
- ReadUnusedBytesFromFile(file, chunk_size - 2);
- return chunk_size_expected;
- }
+ checked_free(filename);
+ filename = getPath2(getCurrentLevelDir(), basename);
- for (i = 0; i < num_changed_custom_elements; i++)
+ if (stat(filename, &file_status) == 0)
{
- int element = getFile16BitBE(file);
- int properties = getFile32BitBE(file);
-
- if (IS_CUSTOM_ELEMENT(element))
- Properties[element][EP_BITFIELD_BASE] = properties;
- else
- Error(ERR_WARN, "invalid custom element number %d", element);
+ /* check for typical filesize of a Supaplex level package file */
+ if (file_status.st_size == 170496)
+ return LEVEL_FILE_TYPE_SP;
}
- return chunk_size;
+ return LEVEL_FILE_TYPE_UNKNOWN;
}
-static int LoadLevel_CUS2(FILE *file, int chunk_size, struct LevelInfo *level)
+static char *getSingleLevelBasename(int nr)
{
- int num_changed_custom_elements = getFile16BitBE(file);
- int chunk_size_expected = 2 + num_changed_custom_elements * 4;
- int i;
-
- if (chunk_size_expected != chunk_size)
- {
- ReadUnusedBytesFromFile(file, chunk_size - 2);
- return chunk_size_expected;
- }
-
- for (i = 0; i < num_changed_custom_elements; i++)
- {
- int element = getFile16BitBE(file);
- int custom_target_element = getFile16BitBE(file);
+ static char basename[MAX_FILENAME_LEN];
- if (IS_CUSTOM_ELEMENT(element))
- element_info[element].change->target_element = custom_target_element;
- else
- Error(ERR_WARN, "invalid custom element number %d", element);
- }
+ if (nr < 0)
+ sprintf(basename, "template.%s", LEVELFILE_EXTENSION);
+ else
+ sprintf(basename, "%03d.%s", nr, LEVELFILE_EXTENSION);
- return chunk_size;
+ return basename;
}
-static int LoadLevel_CUS3(FILE *file, int chunk_size, struct LevelInfo *level)
+static char *getPackedLevelBasename(int type)
{
- int num_changed_custom_elements = getFile16BitBE(file);
- int chunk_size_expected = LEVEL_CHUNK_CUS3_SIZE(num_changed_custom_elements);
- int i, j, x, y;
+ static char basename[MAX_FILENAME_LEN];
+ char *directory = getCurrentLevelDir();
+ DIR *dir;
+ struct dirent *dir_entry;
- if (chunk_size_expected != chunk_size)
+ strcpy(basename, UNDEFINED_FILENAME); /* default: undefined file */
+
+ if ((dir = opendir(directory)) == NULL)
{
- ReadUnusedBytesFromFile(file, chunk_size - 2);
- return chunk_size_expected;
+ Error(ERR_WARN, "cannot read current level directory '%s'", directory);
+
+ return basename;
}
- for (i = 0; i < num_changed_custom_elements; i++)
+ while ((dir_entry = readdir(dir)) != NULL) /* loop until last dir entry */
{
- int element = getFile16BitBE(file);
- unsigned long event_bits;
+ char *entry_basename = dir_entry->d_name;
+ int entry_type = getFileTypeFromBasename(entry_basename);
- if (!IS_CUSTOM_ELEMENT(element))
+ if (entry_type != LEVEL_FILE_TYPE_UNKNOWN) /* found valid level package */
{
- Error(ERR_WARN, "invalid custom element number %d", element);
+ if (type == LEVEL_FILE_TYPE_UNKNOWN ||
+ type == entry_type)
+ {
+ strcpy(basename, entry_basename);
- element = EL_INTERNAL_DUMMY;
+ break;
+ }
}
+ }
- for (j = 0; j < MAX_ELEMENT_NAME_LEN; j++)
- element_info[element].description[j] = getFile8Bit(file);
- element_info[element].description[MAX_ELEMENT_NAME_LEN] = 0;
+ closedir(dir);
- Properties[element][EP_BITFIELD_BASE] = getFile32BitBE(file);
+ return basename;
+}
- /* some free bytes for future properties and padding */
- ReadUnusedBytesFromFile(file, 7);
+static char *getSingleLevelFilename(int nr)
+{
+ return getLevelFilenameFromBasename(getSingleLevelBasename(nr));
+}
- element_info[element].use_gfx_element = getFile8Bit(file);
- element_info[element].gfx_element =
- getMappedElement(getFile16BitBE(file));
+#if 0
+static char *getPackedLevelFilename(int type)
+{
+ return getLevelFilenameFromBasename(getPackedLevelBasename(type));
+}
+#endif
- element_info[element].collect_score_initial = getFile8Bit(file);
- element_info[element].collect_count_initial = getFile8Bit(file);
+char *getDefaultLevelFilename(int nr)
+{
+ return getSingleLevelFilename(nr);
+}
- element_info[element].push_delay_fixed = getFile16BitBE(file);
- element_info[element].push_delay_random = getFile16BitBE(file);
- element_info[element].move_delay_fixed = getFile16BitBE(file);
- element_info[element].move_delay_random = getFile16BitBE(file);
-
- element_info[element].move_pattern = getFile16BitBE(file);
- element_info[element].move_direction_initial = getFile8Bit(file);
- element_info[element].move_stepsize = getFile8Bit(file);
-
- for (y = 0; y < 3; y++)
- for (x = 0; x < 3; x++)
- element_info[element].content[x][y] =
- getMappedElement(getFile16BitBE(file));
+#if 0
+static void setLevelFileInfo_SingleLevelFilename(struct LevelFileInfo *lfi,
+ int type)
+{
+ lfi->type = type;
+ lfi->packed = FALSE;
+ lfi->basename = getSingleLevelBasename(lfi->nr, lfi->type);
+ lfi->filename = getLevelFilenameFromBasename(lfi->basename);
+}
+#endif
- event_bits = getFile32BitBE(file);
- for (j = 0; j < NUM_CHANGE_EVENTS; j++)
- if (event_bits & (1 << j))
- element_info[element].change->has_event[j] = TRUE;
+static void setLevelFileInfo_FormatLevelFilename(struct LevelFileInfo *lfi,
+ int type, char *format, ...)
+{
+ static char basename[MAX_FILENAME_LEN];
+ va_list ap;
- element_info[element].change->target_element =
- getMappedElement(getFile16BitBE(file));
+ va_start(ap, format);
+ vsprintf(basename, format, ap);
+ va_end(ap);
- element_info[element].change->delay_fixed = getFile16BitBE(file);
- element_info[element].change->delay_random = getFile16BitBE(file);
- element_info[element].change->delay_frames = getFile16BitBE(file);
+ lfi->type = type;
+ lfi->packed = FALSE;
+ lfi->basename = basename;
+ lfi->filename = getLevelFilenameFromBasename(lfi->basename);
+}
- element_info[element].change->trigger_element =
- getMappedElement(getFile16BitBE(file));
+static void setLevelFileInfo_PackedLevelFilename(struct LevelFileInfo *lfi,
+ int type)
+{
+ lfi->type = type;
+ lfi->packed = TRUE;
+ lfi->basename = getPackedLevelBasename(lfi->type);
+ lfi->filename = getLevelFilenameFromBasename(lfi->basename);
+}
- element_info[element].change->explode = getFile8Bit(file);
- element_info[element].change->use_target_content = getFile8Bit(file);
- element_info[element].change->only_if_complete = getFile8Bit(file);
- element_info[element].change->use_random_replace = getFile8Bit(file);
+static int getFiletypeFromID(char *filetype_id)
+{
+ char *filetype_id_lower;
+ int filetype = LEVEL_FILE_TYPE_UNKNOWN;
+ int i;
- element_info[element].change->random_percentage = getFile8Bit(file);
- element_info[element].change->replace_when = getFile8Bit(file);
+ if (filetype_id == NULL)
+ return LEVEL_FILE_TYPE_UNKNOWN;
- for (y = 0; y < 3; y++)
- for (x = 0; x < 3; x++)
- element_info[element].change->target_content[x][y] =
- getMappedElement(getFile16BitBE(file));
+ filetype_id_lower = getStringToLower(filetype_id);
- element_info[element].slippery_type = getFile8Bit(file);
+ for (i = 0; filetype_id_list[i].id != NULL; i++)
+ {
+ char *id_lower = getStringToLower(filetype_id_list[i].id);
+
+ if (strEqual(filetype_id_lower, id_lower))
+ filetype = filetype_id_list[i].filetype;
- /* some free bytes for future properties and padding */
- ReadUnusedBytesFromFile(file, LEVEL_CPART_CUS3_UNUSED);
+ free(id_lower);
- /* mark that this custom element has been modified */
- element_info[element].modified_settings = TRUE;
+ if (filetype != LEVEL_FILE_TYPE_UNKNOWN)
+ break;
}
- return chunk_size;
+ free(filetype_id_lower);
+
+ return filetype;
}
-static int LoadLevel_CUS4(FILE *file, int chunk_size, struct LevelInfo *level)
+static void determineLevelFileInfo_Filename(struct LevelFileInfo *lfi)
{
- struct ElementInfo *ei;
- int chunk_size_expected;
- int element;
- int i, j, x, y;
-
- element = getFile16BitBE(file);
+ int nr = lfi->nr;
- if (!IS_CUSTOM_ELEMENT(element))
+ /* special case: level number is negative => check for level template file */
+ if (nr < 0)
{
- Error(ERR_WARN, "invalid custom element number %d", element);
+ setLevelFileInfo_FormatLevelFilename(lfi, LEVEL_FILE_TYPE_RND,
+ "template.%s", LEVELFILE_EXTENSION);
- ReadUnusedBytesFromFile(file, chunk_size - 2);
- return chunk_size;
+ /* no fallback if template file not existing */
+ return;
}
- ei = &element_info[element];
-
- for (i = 0; i < MAX_ELEMENT_NAME_LEN; i++)
- ei->description[i] = getFile8Bit(file);
- ei->description[MAX_ELEMENT_NAME_LEN] = 0;
-
- Properties[element][EP_BITFIELD_BASE] = getFile32BitBE(file);
- ReadUnusedBytesFromFile(file, 4); /* reserved for more base properties */
-
- ei->num_change_pages = getFile8Bit(file);
-
- /* some free bytes for future base property values and padding */
- ReadUnusedBytesFromFile(file, 5);
-
- chunk_size_expected = LEVEL_CHUNK_CUS4_SIZE(ei->num_change_pages);
- if (chunk_size_expected != chunk_size)
+ /* special case: check for file name/pattern specified in "levelinfo.conf" */
+ if (leveldir_current->level_filename != NULL)
{
- ReadUnusedBytesFromFile(file, chunk_size - 48);
- return chunk_size_expected;
- }
+ int filetype = getFiletypeFromID(leveldir_current->level_filetype);
- /* read custom property values */
+ setLevelFileInfo_FormatLevelFilename(lfi, filetype,
+ leveldir_current->level_filename, nr);
+ if (fileExists(lfi->filename))
+ return;
+ }
- ei->use_gfx_element = getFile8Bit(file);
- ei->gfx_element = getMappedElement(getFile16BitBE(file));
+ /* check for native Rocks'n'Diamonds level file */
+ setLevelFileInfo_FormatLevelFilename(lfi, LEVEL_FILE_TYPE_RND,
+ "%03d.%s", nr, LEVELFILE_EXTENSION);
+ if (fileExists(lfi->filename))
+ return;
- ei->collect_score_initial = getFile8Bit(file);
- ei->collect_count_initial = getFile8Bit(file);
+ /* check for Emerald Mine level file (V1) */
+ setLevelFileInfo_FormatLevelFilename(lfi, LEVEL_FILE_TYPE_EM, "a%c%c",
+ 'a' + (nr / 10) % 26, '0' + nr % 10);
+ if (fileExists(lfi->filename))
+ return;
+ setLevelFileInfo_FormatLevelFilename(lfi, LEVEL_FILE_TYPE_EM, "A%c%c",
+ 'A' + (nr / 10) % 26, '0' + nr % 10);
+ if (fileExists(lfi->filename))
+ return;
- ei->drop_delay_fixed = getFile8Bit(file);
- ei->push_delay_fixed = getFile8Bit(file);
- ei->drop_delay_random = getFile8Bit(file);
- ei->push_delay_random = getFile8Bit(file);
- ei->move_delay_fixed = getFile16BitBE(file);
- ei->move_delay_random = getFile16BitBE(file);
+ /* check for Emerald Mine level file (V2 to V5) */
+ setLevelFileInfo_FormatLevelFilename(lfi, LEVEL_FILE_TYPE_EM, "%d", nr);
+ if (fileExists(lfi->filename))
+ return;
- /* bits 0 - 15 of "move_pattern" ... */
- ei->move_pattern = getFile16BitBE(file);
- ei->move_direction_initial = getFile8Bit(file);
- ei->move_stepsize = getFile8Bit(file);
+ /* check for Emerald Mine level file (V6 / single mode) */
+ setLevelFileInfo_FormatLevelFilename(lfi, LEVEL_FILE_TYPE_EM, "%02ds", nr);
+ if (fileExists(lfi->filename))
+ return;
+ setLevelFileInfo_FormatLevelFilename(lfi, LEVEL_FILE_TYPE_EM, "%02dS", nr);
+ if (fileExists(lfi->filename))
+ return;
- ei->slippery_type = getFile8Bit(file);
+ /* check for Emerald Mine level file (V6 / teamwork mode) */
+ setLevelFileInfo_FormatLevelFilename(lfi, LEVEL_FILE_TYPE_EM, "%02dt", nr);
+ if (fileExists(lfi->filename))
+ return;
+ setLevelFileInfo_FormatLevelFilename(lfi, LEVEL_FILE_TYPE_EM, "%02dT", nr);
+ if (fileExists(lfi->filename))
+ return;
- for (y = 0; y < 3; y++)
- for (x = 0; x < 3; x++)
- ei->content[x][y] = getMappedElement(getFile16BitBE(file));
+ /* check for various packed level file formats */
+ setLevelFileInfo_PackedLevelFilename(lfi, LEVEL_FILE_TYPE_UNKNOWN);
+ if (fileExists(lfi->filename))
+ return;
- ei->move_enter_element = getMappedElement(getFile16BitBE(file));
- ei->move_leave_element = getMappedElement(getFile16BitBE(file));
- ei->move_leave_type = getFile8Bit(file);
+ /* no known level file found -- use default values (and fail later) */
+ setLevelFileInfo_FormatLevelFilename(lfi, LEVEL_FILE_TYPE_RND,
+ "%03d.%s", nr, LEVELFILE_EXTENSION);
+}
- /* ... bits 16 - 31 of "move_pattern" (not nice, but downward compatible) */
- ei->move_pattern |= (getFile16BitBE(file) << 16);
+static void determineLevelFileInfo_Filetype(struct LevelFileInfo *lfi)
+{
+ if (lfi->type == LEVEL_FILE_TYPE_UNKNOWN)
+ lfi->type = getFileTypeFromBasename(lfi->basename);
+}
- ei->access_direction = getFile8Bit(file);
+static void setLevelFileInfo(struct LevelFileInfo *level_file_info, int nr)
+{
+ /* always start with reliable default values */
+ setFileInfoToDefaults(level_file_info);
- ei->explosion_delay = getFile8Bit(file);
- ei->ignition_delay = getFile8Bit(file);
- ei->explosion_type = getFile8Bit(file);
+ level_file_info->nr = nr; /* set requested level number */
- /* some free bytes for future custom property values and padding */
- ReadUnusedBytesFromFile(file, 1);
+ determineLevelFileInfo_Filename(level_file_info);
+ determineLevelFileInfo_Filetype(level_file_info);
+}
- /* read change property values */
+/* ------------------------------------------------------------------------- */
+/* functions for loading R'n'D level */
+/* ------------------------------------------------------------------------- */
- setElementChangePages(ei, ei->num_change_pages);
+int getMappedElement(int element)
+{
+ /* remap some (historic, now obsolete) elements */
- for (i = 0; i < ei->num_change_pages; i++)
+ switch (element)
{
- struct ElementChangeInfo *change = &ei->change_page[i];
- unsigned long event_bits;
+ case EL_PLAYER_OBSOLETE:
+ element = EL_PLAYER_1;
+ break;
- /* always start with reliable default values */
- setElementChangeInfoToDefaults(change);
+ case EL_KEY_OBSOLETE:
+ element = EL_KEY_1;
- event_bits = getFile32BitBE(file);
- for (j = 0; j < NUM_CHANGE_EVENTS; j++)
- if (event_bits & (1 << j))
- change->has_event[j] = TRUE;
+ case EL_EM_KEY_1_FILE_OBSOLETE:
+ element = EL_EM_KEY_1;
+ break;
- change->target_element = getMappedElement(getFile16BitBE(file));
+ case EL_EM_KEY_2_FILE_OBSOLETE:
+ element = EL_EM_KEY_2;
+ break;
- change->delay_fixed = getFile16BitBE(file);
- change->delay_random = getFile16BitBE(file);
- change->delay_frames = getFile16BitBE(file);
+ case EL_EM_KEY_3_FILE_OBSOLETE:
+ element = EL_EM_KEY_3;
+ break;
- change->trigger_element = getMappedElement(getFile16BitBE(file));
+ case EL_EM_KEY_4_FILE_OBSOLETE:
+ element = EL_EM_KEY_4;
+ break;
- change->explode = getFile8Bit(file);
- change->use_target_content = getFile8Bit(file);
- change->only_if_complete = getFile8Bit(file);
- change->use_random_replace = getFile8Bit(file);
+ case EL_ENVELOPE_OBSOLETE:
+ element = EL_ENVELOPE_1;
+ break;
- change->random_percentage = getFile8Bit(file);
- change->replace_when = getFile8Bit(file);
+ case EL_SP_EMPTY:
+ element = EL_EMPTY;
+ break;
- for (y = 0; y < 3; y++)
- for (x = 0; x < 3; x++)
- change->target_content[x][y] = getMappedElement(getFile16BitBE(file));
+ default:
+ if (element >= NUM_FILE_ELEMENTS)
+ {
+ Error(ERR_WARN, "invalid level element %d", element);
- change->can_change = getFile8Bit(file);
+ element = EL_UNKNOWN;
+ }
+ break;
+ }
- change->trigger_side = getFile8Bit(file);
+ return element;
+}
- change->trigger_player = getFile8Bit(file);
- change->trigger_page = getFile8Bit(file);
+int getMappedElementByVersion(int element, int game_version)
+{
+ /* remap some elements due to certain game version */
- change->trigger_page = (change->trigger_page == CH_PAGE_ANY_FILE ?
- CH_PAGE_ANY : (1 << change->trigger_page));
-
- change->has_action = getFile8Bit(file);
- change->action_type = getFile8Bit(file);
- change->action_mode = getFile8Bit(file);
- change->action_arg = getFile16BitBE(file);
+ if (game_version <= VERSION_IDENT(2,2,0,0))
+ {
+ /* map game font elements */
+ element = (element == EL_CHAR('[') ? EL_CHAR_AUMLAUT :
+ element == EL_CHAR('\\') ? EL_CHAR_OUMLAUT :
+ element == EL_CHAR(']') ? EL_CHAR_UUMLAUT :
+ element == EL_CHAR('^') ? EL_CHAR_COPYRIGHT : element);
+ }
- /* some free bytes for future change property values and padding */
- ReadUnusedBytesFromFile(file, 1);
+ if (game_version < VERSION_IDENT(3,0,0,0))
+ {
+ /* map Supaplex gravity tube elements */
+ element = (element == EL_SP_GRAVITY_PORT_LEFT ? EL_SP_PORT_LEFT :
+ element == EL_SP_GRAVITY_PORT_RIGHT ? EL_SP_PORT_RIGHT :
+ element == EL_SP_GRAVITY_PORT_UP ? EL_SP_PORT_UP :
+ element == EL_SP_GRAVITY_PORT_DOWN ? EL_SP_PORT_DOWN :
+ element);
}
- /* mark this custom element as modified */
- ei->modified_settings = TRUE;
+ return element;
+}
+
+static int LoadLevel_VERS(FILE *file, int chunk_size, struct LevelInfo *level)
+{
+ level->file_version = getFileVersion(file);
+ level->game_version = getFileVersion(file);
return chunk_size;
}
-static int LoadLevel_GRP1(FILE *file, int chunk_size, struct LevelInfo *level)
+static int LoadLevel_DATE(FILE *file, int chunk_size, struct LevelInfo *level)
{
- struct ElementInfo *ei;
- struct ElementGroupInfo *group;
- int element;
- int i;
+ level->creation_date.year = getFile16BitBE(file);
+ level->creation_date.month = getFile8Bit(file);
+ level->creation_date.day = getFile8Bit(file);
- element = getFile16BitBE(file);
+ return chunk_size;
+}
- if (!IS_GROUP_ELEMENT(element))
- {
- Error(ERR_WARN, "invalid group element number %d", element);
+static int LoadLevel_HEAD(FILE *file, int chunk_size, struct LevelInfo *level)
+{
+ int initial_player_stepsize;
+ int initial_player_gravity;
+ int i, x, y;
- ReadUnusedBytesFromFile(file, chunk_size - 2);
- return chunk_size;
- }
+ level->fieldx = getFile8Bit(file);
+ level->fieldy = getFile8Bit(file);
- ei = &element_info[element];
+ level->time = getFile16BitBE(file);
+ level->gems_needed = getFile16BitBE(file);
- for (i = 0; i < MAX_ELEMENT_NAME_LEN; i++)
- ei->description[i] = getFile8Bit(file);
- ei->description[MAX_ELEMENT_NAME_LEN] = 0;
+ for (i = 0; i < MAX_LEVEL_NAME_LEN; i++)
+ level->name[i] = getFile8Bit(file);
+ level->name[MAX_LEVEL_NAME_LEN] = 0;
- group = element_info[element].group;
+ for (i = 0; i < LEVEL_SCORE_ELEMENTS; i++)
+ level->score[i] = getFile8Bit(file);
- group->num_elements = getFile8Bit(file);
+ level->num_yamyam_contents = STD_ELEMENT_CONTENTS;
+ for (i = 0; i < STD_ELEMENT_CONTENTS; i++)
+ for (y = 0; y < 3; y++)
+ for (x = 0; x < 3; x++)
+ level->yamyam_content[i].e[x][y] = getMappedElement(getFile8Bit(file));
- ei->use_gfx_element = getFile8Bit(file);
- ei->gfx_element = getMappedElement(getFile16BitBE(file));
+ level->amoeba_speed = getFile8Bit(file);
+ level->time_magic_wall = getFile8Bit(file);
+ level->time_wheel = getFile8Bit(file);
+ level->amoeba_content = getMappedElement(getFile8Bit(file));
- group->choice_mode = getFile8Bit(file);
+ initial_player_stepsize = (getFile8Bit(file) == 1 ? STEPSIZE_FAST :
+ STEPSIZE_NORMAL);
- /* some free bytes for future values and padding */
- ReadUnusedBytesFromFile(file, 3);
+ for (i = 0; i < MAX_PLAYERS; i++)
+ level->initial_player_stepsize[i] = initial_player_stepsize;
- for (i = 0; i < MAX_ELEMENTS_IN_GROUP; i++)
- group->element[i] = getMappedElement(getFile16BitBE(file));
+ initial_player_gravity = (getFile8Bit(file) == 1 ? TRUE : FALSE);
- /* mark this group element as modified */
- element_info[element].modified_settings = TRUE;
+ for (i = 0; i < MAX_PLAYERS; i++)
+ level->initial_player_gravity[i] = initial_player_gravity;
- return chunk_size;
-}
+ level->encoding_16bit_field = (getFile8Bit(file) == 1 ? TRUE : FALSE);
+ level->em_slippery_gems = (getFile8Bit(file) == 1 ? TRUE : FALSE);
-static void LoadLevelFromFileInfo_RND(struct LevelInfo *level,
- struct LevelFileInfo *level_file_info)
-{
- char *filename = level_file_info->filename;
- char cookie[MAX_LINE_LEN];
- char chunk_name[CHUNK_ID_LEN + 1];
- int chunk_size;
- FILE *file;
+ level->use_custom_template = (getFile8Bit(file) == 1 ? TRUE : FALSE);
- if (!(file = fopen(filename, MODE_READ)))
- {
- level->no_valid_file = TRUE;
+ level->block_last_field = (getFile8Bit(file) == 1 ? TRUE : FALSE);
+ level->sp_block_last_field = (getFile8Bit(file) == 1 ? TRUE : FALSE);
+ level->can_move_into_acid_bits = getFile32BitBE(file);
+ level->dont_collide_with_bits = getFile8Bit(file);
- if (level != &level_template)
- Error(ERR_WARN, "cannot read level '%s' -- using empty level", filename);
+ level->use_spring_bug = (getFile8Bit(file) == 1 ? TRUE : FALSE);
+ level->use_step_counter = (getFile8Bit(file) == 1 ? TRUE : FALSE);
- return;
- }
+ level->instant_relocation = (getFile8Bit(file) == 1 ? TRUE : FALSE);
+ level->can_pass_to_walkable = (getFile8Bit(file) == 1 ? TRUE : FALSE);
+ level->grow_into_diggable = (getFile8Bit(file) == 1 ? TRUE : FALSE);
- getFileChunkBE(file, chunk_name, NULL);
- if (strcmp(chunk_name, "RND1") == 0)
- {
- getFile32BitBE(file); /* not used */
+ level->game_engine_type = getFile8Bit(file);
- getFileChunkBE(file, chunk_name, NULL);
- if (strcmp(chunk_name, "CAVE") != 0)
- {
- level->no_valid_file = TRUE;
+ ReadUnusedBytesFromFile(file, LEVEL_CHUNK_HEAD_UNUSED);
- Error(ERR_WARN, "unknown format of level file '%s'", filename);
- fclose(file);
- return;
- }
- }
- else /* check for pre-2.0 file format with cookie string */
- {
- strcpy(cookie, chunk_name);
- fgets(&cookie[4], MAX_LINE_LEN - 4, file);
- if (strlen(cookie) > 0 && cookie[strlen(cookie) - 1] == '\n')
- cookie[strlen(cookie) - 1] = '\0';
+ return chunk_size;
+}
- if (!checkCookieString(cookie, LEVEL_COOKIE_TMPL))
- {
- level->no_valid_file = TRUE;
+static int LoadLevel_NAME(FILE *file, int chunk_size, struct LevelInfo *level)
+{
+ int i;
- Error(ERR_WARN, "unknown format of level file '%s'", filename);
- fclose(file);
- return;
- }
+ for (i = 0; i < MAX_LEVEL_NAME_LEN; i++)
+ level->name[i] = getFile8Bit(file);
+ level->name[MAX_LEVEL_NAME_LEN] = 0;
- if ((level->file_version = getFileVersionFromCookieString(cookie)) == -1)
- {
- level->no_valid_file = TRUE;
+ return chunk_size;
+}
- Error(ERR_WARN, "unsupported version of level file '%s'", filename);
- fclose(file);
- return;
- }
+static int LoadLevel_AUTH(FILE *file, int chunk_size, struct LevelInfo *level)
+{
+ int i;
- /* pre-2.0 level files have no game version, so use file version here */
- level->game_version = level->file_version;
- }
+ for (i = 0; i < MAX_LEVEL_AUTHOR_LEN; i++)
+ level->author[i] = getFile8Bit(file);
+ level->author[MAX_LEVEL_AUTHOR_LEN] = 0;
- if (level->file_version < FILE_VERSION_1_2)
- {
- /* level files from versions before 1.2.0 without chunk structure */
- LoadLevel_HEAD(file, LEVEL_HEADER_SIZE, level);
- LoadLevel_BODY(file, level->fieldx * level->fieldy, level);
- }
- else
- {
- static struct
- {
- char *name;
- int size;
- int (*loader)(FILE *, int, struct LevelInfo *);
- }
- chunk_info[] =
- {
- { "VERS", FILE_VERS_CHUNK_SIZE, LoadLevel_VERS },
- { "HEAD", LEVEL_HEADER_SIZE, LoadLevel_HEAD },
- { "AUTH", MAX_LEVEL_AUTHOR_LEN, LoadLevel_AUTH },
- { "BODY", -1, LoadLevel_BODY },
- { "CONT", -1, LoadLevel_CONT },
- { "CNT2", LEVEL_CHUNK_CNT2_SIZE, LoadLevel_CNT2 },
- { "CNT3", -1, LoadLevel_CNT3 },
- { "CUS1", -1, LoadLevel_CUS1 },
- { "CUS2", -1, LoadLevel_CUS2 },
- { "CUS3", -1, LoadLevel_CUS3 },
- { "CUS4", -1, LoadLevel_CUS4 },
- { "GRP1", -1, LoadLevel_GRP1 },
- { NULL, 0, NULL }
- };
+ return chunk_size;
+}
- while (getFileChunkBE(file, chunk_name, &chunk_size))
- {
- int i = 0;
+static int LoadLevel_BODY(FILE *file, int chunk_size, struct LevelInfo *level)
+{
+ int x, y;
+ int chunk_size_expected = level->fieldx * level->fieldy;
- while (chunk_info[i].name != NULL &&
- strcmp(chunk_name, chunk_info[i].name) != 0)
- i++;
+ /* Note: "chunk_size" was wrong before version 2.0 when elements are
+ stored with 16-bit encoding (and should be twice as big then).
+ Even worse, playfield data was stored 16-bit when only yamyam content
+ contained 16-bit elements and vice versa. */
- if (chunk_info[i].name == NULL)
- {
- Error(ERR_WARN, "unknown chunk '%s' in level file '%s'",
- chunk_name, filename);
- ReadUnusedBytesFromFile(file, chunk_size);
- }
- else if (chunk_info[i].size != -1 &&
- chunk_info[i].size != chunk_size)
- {
- Error(ERR_WARN, "wrong size (%d) of chunk '%s' in level file '%s'",
- chunk_size, chunk_name, filename);
- ReadUnusedBytesFromFile(file, chunk_size);
- }
- else
- {
- /* call function to load this level chunk */
- int chunk_size_expected =
- (chunk_info[i].loader)(file, chunk_size, level);
+ if (level->encoding_16bit_field && level->file_version >= FILE_VERSION_2_0)
+ chunk_size_expected *= 2;
- /* the size of some chunks cannot be checked before reading other
- chunks first (like "HEAD" and "BODY") that contain some header
- information, so check them here */
- if (chunk_size_expected != chunk_size)
- {
- Error(ERR_WARN, "wrong size (%d) of chunk '%s' in level file '%s'",
- chunk_size, chunk_name, filename);
- }
- }
- }
+ if (chunk_size_expected != chunk_size)
+ {
+ ReadUnusedBytesFromFile(file, chunk_size);
+ return chunk_size_expected;
}
- fclose(file);
+ for (y = 0; y < level->fieldy; y++)
+ for (x = 0; x < level->fieldx; x++)
+ level->field[x][y] =
+ getMappedElement(level->encoding_16bit_field ? getFile16BitBE(file) :
+ getFile8Bit(file));
+ return chunk_size;
}
-/* ------------------------------------------------------------------------- */
-/* functions for loading EM level */
-/* ------------------------------------------------------------------------- */
+static int LoadLevel_CONT(FILE *file, int chunk_size, struct LevelInfo *level)
+{
+ int i, x, y;
+ int header_size = 4;
+ int content_size = MAX_ELEMENT_CONTENTS * 3 * 3;
+ int chunk_size_expected = header_size + content_size;
-#if 0
+ /* Note: "chunk_size" was wrong before version 2.0 when elements are
+ stored with 16-bit encoding (and should be twice as big then).
+ Even worse, playfield data was stored 16-bit when only yamyam content
+ contained 16-bit elements and vice versa. */
-static int map_em_element_yam(int element)
+ if (level->encoding_16bit_field && level->file_version >= FILE_VERSION_2_0)
+ chunk_size_expected += content_size;
+
+ if (chunk_size_expected != chunk_size)
+ {
+ ReadUnusedBytesFromFile(file, chunk_size);
+ return chunk_size_expected;
+ }
+
+ getFile8Bit(file);
+ level->num_yamyam_contents = getFile8Bit(file);
+ getFile8Bit(file);
+ getFile8Bit(file);
+
+ /* correct invalid number of content fields -- should never happen */
+ if (level->num_yamyam_contents < 1 ||
+ level->num_yamyam_contents > MAX_ELEMENT_CONTENTS)
+ level->num_yamyam_contents = STD_ELEMENT_CONTENTS;
+
+ for (i = 0; i < MAX_ELEMENT_CONTENTS; i++)
+ for (y = 0; y < 3; y++)
+ for (x = 0; x < 3; x++)
+ level->yamyam_content[i].e[x][y] =
+ getMappedElement(level->encoding_16bit_field ?
+ getFile16BitBE(file) : getFile8Bit(file));
+ return chunk_size;
+}
+
+static int LoadLevel_CNT2(FILE *file, int chunk_size, struct LevelInfo *level)
{
- switch (element)
+ int i, x, y;
+ int element;
+ int num_contents, content_xsize, content_ysize;
+ int content_array[MAX_ELEMENT_CONTENTS][3][3];
+
+ element = getMappedElement(getFile16BitBE(file));
+ num_contents = getFile8Bit(file);
+ content_xsize = getFile8Bit(file);
+ content_ysize = getFile8Bit(file);
+
+ ReadUnusedBytesFromFile(file, LEVEL_CHUNK_CNT2_UNUSED);
+
+ for (i = 0; i < MAX_ELEMENT_CONTENTS; i++)
+ for (y = 0; y < 3; y++)
+ for (x = 0; x < 3; x++)
+ content_array[i][x][y] = getMappedElement(getFile16BitBE(file));
+
+ /* correct invalid number of content fields -- should never happen */
+ if (num_contents < 1 || num_contents > MAX_ELEMENT_CONTENTS)
+ num_contents = STD_ELEMENT_CONTENTS;
+
+ if (element == EL_YAMYAM)
{
- case 0x00: return EL_EMPTY;
- case 0x01: return EL_EMERALD;
- case 0x02: return EL_DIAMOND;
- case 0x03: return EL_ROCK;
- case 0x04: return EL_ROBOT;
- case 0x05: return EL_SPACESHIP_UP;
- case 0x06: return EL_BOMB;
- case 0x07: return EL_BUG_UP;
- case 0x08: return EL_AMOEBA_DROP;
- case 0x09: return EL_NUT;
- case 0x0a: return EL_YAMYAM;
- case 0x0b: return EL_QUICKSAND_FULL;
- case 0x0c: return EL_SAND;
- case 0x0d: return EL_WALL_SLIPPERY;
- case 0x0e: return EL_STEELWALL;
- case 0x0f: return EL_WALL;
- case 0x10: return EL_EM_KEY_1;
- case 0x11: return EL_EM_KEY_2;
- case 0x12: return EL_EM_KEY_4;
- case 0x13: return EL_EM_KEY_3;
- case 0x14: return EL_MAGIC_WALL;
- case 0x15: return EL_ROBOT_WHEEL;
- case 0x16: return EL_DYNAMITE;
+ level->num_yamyam_contents = num_contents;
- case 0x17: return EL_EM_KEY_1; /* EMC */
- case 0x18: return EL_BUG_UP; /* EMC */
- case 0x1a: return EL_DIAMOND; /* EMC */
- case 0x1b: return EL_EMERALD; /* EMC */
- case 0x25: return EL_NUT; /* EMC */
- case 0x80: return EL_EMPTY; /* EMC */
- case 0x85: return EL_EM_KEY_1; /* EMC */
- case 0x86: return EL_EM_KEY_2; /* EMC */
- case 0x87: return EL_EM_KEY_4; /* EMC */
- case 0x88: return EL_EM_KEY_3; /* EMC */
- case 0x94: return EL_QUICKSAND_EMPTY; /* EMC */
- case 0x9a: return EL_AMOEBA_WET; /* EMC */
- case 0xaf: return EL_DYNAMITE; /* EMC */
- case 0xbd: return EL_SAND; /* EMC */
+ for (i = 0; i < num_contents; i++)
+ for (y = 0; y < 3; y++)
+ for (x = 0; x < 3; x++)
+ level->yamyam_content[i].e[x][y] = content_array[i][x][y];
+ }
+ else if (element == EL_BD_AMOEBA)
+ {
+ level->amoeba_content = content_array[0][0][0];
+ }
+ else
+ {
+ Error(ERR_WARN, "cannot load content for element '%d'", element);
+ }
- default:
- Error(ERR_WARN, "invalid level element %d", element);
- return EL_UNKNOWN;
+ return chunk_size;
+}
+
+static int LoadLevel_CNT3(FILE *file, int chunk_size, struct LevelInfo *level)
+{
+ int i;
+ int element;
+ int envelope_nr;
+ int envelope_len;
+ int chunk_size_expected;
+
+ element = getMappedElement(getFile16BitBE(file));
+ if (!IS_ENVELOPE(element))
+ element = EL_ENVELOPE_1;
+
+ envelope_nr = element - EL_ENVELOPE_1;
+
+ envelope_len = getFile16BitBE(file);
+
+ level->envelope[envelope_nr].xsize = getFile8Bit(file);
+ level->envelope[envelope_nr].ysize = getFile8Bit(file);
+
+ ReadUnusedBytesFromFile(file, LEVEL_CHUNK_CNT3_UNUSED);
+
+ chunk_size_expected = LEVEL_CHUNK_CNT3_SIZE(envelope_len);
+ if (chunk_size_expected != chunk_size)
+ {
+ ReadUnusedBytesFromFile(file, chunk_size - LEVEL_CHUNK_CNT3_HEADER);
+ return chunk_size_expected;
}
+
+ for (i = 0; i < envelope_len; i++)
+ level->envelope[envelope_nr].text[i] = getFile8Bit(file);
+
+ return chunk_size;
}
-static int map_em_element_field(int element)
+static int LoadLevel_CUS1(FILE *file, int chunk_size, struct LevelInfo *level)
{
- if (element >= 0xc8 && element <= 0xe1)
- return EL_CHAR_A + (element - 0xc8);
- else if (element >= 0xe2 && element <= 0xeb)
- return EL_CHAR_0 + (element - 0xe2);
+ int num_changed_custom_elements = getFile16BitBE(file);
+ int chunk_size_expected = 2 + num_changed_custom_elements * 6;
+ int i;
- switch (element)
+ if (chunk_size_expected != chunk_size)
{
- case 0x00: return EL_ROCK;
- case 0x01: return EL_ROCK; /* EMC */
- case 0x02: return EL_DIAMOND;
- case 0x03: return EL_DIAMOND;
- case 0x04: return EL_ROBOT;
- case 0x05: return EL_ROBOT; /* EMC */
- case 0x06: return EL_EMPTY_SPACE; /* EMC */
- case 0x07: return EL_EMPTY_SPACE; /* EMC */
- case 0x08: return EL_SPACESHIP_UP;
- case 0x09: return EL_SPACESHIP_RIGHT;
- case 0x0a: return EL_SPACESHIP_DOWN;
- case 0x0b: return EL_SPACESHIP_LEFT;
- case 0x0c: return EL_SPACESHIP_UP;
- case 0x0d: return EL_SPACESHIP_RIGHT;
- case 0x0e: return EL_SPACESHIP_DOWN;
- case 0x0f: return EL_SPACESHIP_LEFT;
+ ReadUnusedBytesFromFile(file, chunk_size - 2);
+ return chunk_size_expected;
+ }
+
+ for (i = 0; i < num_changed_custom_elements; i++)
+ {
+ int element = getMappedElement(getFile16BitBE(file));
+ int properties = getFile32BitBE(file);
+
+ if (IS_CUSTOM_ELEMENT(element))
+ element_info[element].properties[EP_BITFIELD_BASE_NR] = properties;
+ else
+ Error(ERR_WARN, "invalid custom element number %d", element);
+
+ /* older game versions that wrote level files with CUS1 chunks used
+ different default push delay values (not yet stored in level file) */
+ element_info[element].push_delay_fixed = 2;
+ element_info[element].push_delay_random = 8;
+ }
+
+ return chunk_size;
+}
+
+static int LoadLevel_CUS2(FILE *file, int chunk_size, struct LevelInfo *level)
+{
+ int num_changed_custom_elements = getFile16BitBE(file);
+ int chunk_size_expected = 2 + num_changed_custom_elements * 4;
+ int i;
+
+ if (chunk_size_expected != chunk_size)
+ {
+ ReadUnusedBytesFromFile(file, chunk_size - 2);
+ return chunk_size_expected;
+ }
+
+ for (i = 0; i < num_changed_custom_elements; i++)
+ {
+ int element = getMappedElement(getFile16BitBE(file));
+ int custom_target_element = getMappedElement(getFile16BitBE(file));
+
+ if (IS_CUSTOM_ELEMENT(element))
+ element_info[element].change->target_element = custom_target_element;
+ else
+ Error(ERR_WARN, "invalid custom element number %d", element);
+ }
+
+ return chunk_size;
+}
+
+static int LoadLevel_CUS3(FILE *file, int chunk_size, struct LevelInfo *level)
+{
+ int num_changed_custom_elements = getFile16BitBE(file);
+ int chunk_size_expected = LEVEL_CHUNK_CUS3_SIZE(num_changed_custom_elements);
+ int i, j, x, y;
+
+ if (chunk_size_expected != chunk_size)
+ {
+ ReadUnusedBytesFromFile(file, chunk_size - 2);
+ return chunk_size_expected;
+ }
+
+ for (i = 0; i < num_changed_custom_elements; i++)
+ {
+ int element = getMappedElement(getFile16BitBE(file));
+ struct ElementInfo *ei = &element_info[element];
+ unsigned int event_bits;
+
+ if (!IS_CUSTOM_ELEMENT(element))
+ {
+ Error(ERR_WARN, "invalid custom element number %d", element);
+
+ element = EL_INTERNAL_DUMMY;
+ }
+
+ for (j = 0; j < MAX_ELEMENT_NAME_LEN; j++)
+ ei->description[j] = getFile8Bit(file);
+ ei->description[MAX_ELEMENT_NAME_LEN] = 0;
+
+ ei->properties[EP_BITFIELD_BASE_NR] = getFile32BitBE(file);
+
+ /* some free bytes for future properties and padding */
+ ReadUnusedBytesFromFile(file, 7);
+
+ ei->use_gfx_element = getFile8Bit(file);
+ ei->gfx_element = getMappedElement(getFile16BitBE(file));
+
+ ei->collect_score_initial = getFile8Bit(file);
+ ei->collect_count_initial = getFile8Bit(file);
+
+ ei->push_delay_fixed = getFile16BitBE(file);
+ ei->push_delay_random = getFile16BitBE(file);
+ ei->move_delay_fixed = getFile16BitBE(file);
+ ei->move_delay_random = getFile16BitBE(file);
+
+ ei->move_pattern = getFile16BitBE(file);
+ ei->move_direction_initial = getFile8Bit(file);
+ ei->move_stepsize = getFile8Bit(file);
+
+ for (y = 0; y < 3; y++)
+ for (x = 0; x < 3; x++)
+ ei->content.e[x][y] = getMappedElement(getFile16BitBE(file));
+
+ event_bits = getFile32BitBE(file);
+ for (j = 0; j < NUM_CHANGE_EVENTS; j++)
+ if (event_bits & (1 << j))
+ ei->change->has_event[j] = TRUE;
+
+ ei->change->target_element = getMappedElement(getFile16BitBE(file));
+
+ ei->change->delay_fixed = getFile16BitBE(file);
+ ei->change->delay_random = getFile16BitBE(file);
+ ei->change->delay_frames = getFile16BitBE(file);
+
+ ei->change->trigger_element = getMappedElement(getFile16BitBE(file));
+
+ ei->change->explode = getFile8Bit(file);
+ ei->change->use_target_content = getFile8Bit(file);
+ ei->change->only_if_complete = getFile8Bit(file);
+ ei->change->use_random_replace = getFile8Bit(file);
+
+ ei->change->random_percentage = getFile8Bit(file);
+ ei->change->replace_when = getFile8Bit(file);
+
+ for (y = 0; y < 3; y++)
+ for (x = 0; x < 3; x++)
+ ei->change->target_content.e[x][y] =
+ getMappedElement(getFile16BitBE(file));
+
+ ei->slippery_type = getFile8Bit(file);
+
+ /* some free bytes for future properties and padding */
+ ReadUnusedBytesFromFile(file, LEVEL_CPART_CUS3_UNUSED);
+
+ /* mark that this custom element has been modified */
+ ei->modified_settings = TRUE;
+ }
+
+ return chunk_size;
+}
+
+static int LoadLevel_CUS4(FILE *file, int chunk_size, struct LevelInfo *level)
+{
+ struct ElementInfo *ei;
+ int chunk_size_expected;
+ int element;
+ int i, j, x, y;
+
+ /* ---------- custom element base property values (96 bytes) ------------- */
+
+ element = getMappedElement(getFile16BitBE(file));
+
+ if (!IS_CUSTOM_ELEMENT(element))
+ {
+ Error(ERR_WARN, "invalid custom element number %d", element);
+
+ ReadUnusedBytesFromFile(file, chunk_size - 2);
+ return chunk_size;
+ }
+
+ ei = &element_info[element];
+
+ for (i = 0; i < MAX_ELEMENT_NAME_LEN; i++)
+ ei->description[i] = getFile8Bit(file);
+ ei->description[MAX_ELEMENT_NAME_LEN] = 0;
+
+ ei->properties[EP_BITFIELD_BASE_NR] = getFile32BitBE(file);
+
+ ReadUnusedBytesFromFile(file, 4); /* reserved for more base properties */
+
+ ei->num_change_pages = getFile8Bit(file);
+
+ chunk_size_expected = LEVEL_CHUNK_CUS4_SIZE(ei->num_change_pages);
+ if (chunk_size_expected != chunk_size)
+ {
+ ReadUnusedBytesFromFile(file, chunk_size - 43);
+ return chunk_size_expected;
+ }
+
+ ei->ce_value_fixed_initial = getFile16BitBE(file);
+ ei->ce_value_random_initial = getFile16BitBE(file);
+ ei->use_last_ce_value = getFile8Bit(file);
+
+ ei->use_gfx_element = getFile8Bit(file);
+ ei->gfx_element = getMappedElement(getFile16BitBE(file));
+
+ ei->collect_score_initial = getFile8Bit(file);
+ ei->collect_count_initial = getFile8Bit(file);
+
+ ei->drop_delay_fixed = getFile8Bit(file);
+ ei->push_delay_fixed = getFile8Bit(file);
+ ei->drop_delay_random = getFile8Bit(file);
+ ei->push_delay_random = getFile8Bit(file);
+ ei->move_delay_fixed = getFile16BitBE(file);
+ ei->move_delay_random = getFile16BitBE(file);
+
+ /* bits 0 - 15 of "move_pattern" ... */
+ ei->move_pattern = getFile16BitBE(file);
+ ei->move_direction_initial = getFile8Bit(file);
+ ei->move_stepsize = getFile8Bit(file);
+
+ ei->slippery_type = getFile8Bit(file);
+
+ for (y = 0; y < 3; y++)
+ for (x = 0; x < 3; x++)
+ ei->content.e[x][y] = getMappedElement(getFile16BitBE(file));
+
+ ei->move_enter_element = getMappedElement(getFile16BitBE(file));
+ ei->move_leave_element = getMappedElement(getFile16BitBE(file));
+ ei->move_leave_type = getFile8Bit(file);
+
+ /* ... bits 16 - 31 of "move_pattern" (not nice, but downward compatible) */
+ ei->move_pattern |= (getFile16BitBE(file) << 16);
+
+ ei->access_direction = getFile8Bit(file);
+
+ ei->explosion_delay = getFile8Bit(file);
+ ei->ignition_delay = getFile8Bit(file);
+ ei->explosion_type = getFile8Bit(file);
+
+ /* some free bytes for future custom property values and padding */
+ ReadUnusedBytesFromFile(file, 1);
+
+ /* ---------- change page property values (48 bytes) --------------------- */
+
+ setElementChangePages(ei, ei->num_change_pages);
+
+ for (i = 0; i < ei->num_change_pages; i++)
+ {
+ struct ElementChangeInfo *change = &ei->change_page[i];
+ unsigned int event_bits;
+
+ /* always start with reliable default values */
+ setElementChangeInfoToDefaults(change);
+
+ /* bits 0 - 31 of "has_event[]" ... */
+ event_bits = getFile32BitBE(file);
+ for (j = 0; j < MIN(NUM_CHANGE_EVENTS, 32); j++)
+ if (event_bits & (1 << j))
+ change->has_event[j] = TRUE;
+
+ change->target_element = getMappedElement(getFile16BitBE(file));
+
+ change->delay_fixed = getFile16BitBE(file);
+ change->delay_random = getFile16BitBE(file);
+ change->delay_frames = getFile16BitBE(file);
+
+ change->trigger_element = getMappedElement(getFile16BitBE(file));
+
+ change->explode = getFile8Bit(file);
+ change->use_target_content = getFile8Bit(file);
+ change->only_if_complete = getFile8Bit(file);
+ change->use_random_replace = getFile8Bit(file);
+
+ change->random_percentage = getFile8Bit(file);
+ change->replace_when = getFile8Bit(file);
+
+ for (y = 0; y < 3; y++)
+ for (x = 0; x < 3; x++)
+ change->target_content.e[x][y]= getMappedElement(getFile16BitBE(file));
+
+ change->can_change = getFile8Bit(file);
+
+ change->trigger_side = getFile8Bit(file);
+
+ change->trigger_player = getFile8Bit(file);
+ change->trigger_page = getFile8Bit(file);
+
+ change->trigger_page = (change->trigger_page == CH_PAGE_ANY_FILE ?
+ CH_PAGE_ANY : (1 << change->trigger_page));
+
+ change->has_action = getFile8Bit(file);
+ change->action_type = getFile8Bit(file);
+ change->action_mode = getFile8Bit(file);
+ change->action_arg = getFile16BitBE(file);
+
+ /* ... bits 32 - 39 of "has_event[]" (not nice, but downward compatible) */
+ event_bits = getFile8Bit(file);
+ for (j = 32; j < NUM_CHANGE_EVENTS; j++)
+ if (event_bits & (1 << (j - 32)))
+ change->has_event[j] = TRUE;
+ }
+
+ /* mark this custom element as modified */
+ ei->modified_settings = TRUE;
+
+ return chunk_size;
+}
+
+static int LoadLevel_GRP1(FILE *file, int chunk_size, struct LevelInfo *level)
+{
+ struct ElementInfo *ei;
+ struct ElementGroupInfo *group;
+ int element;
+ int i;
+
+ element = getMappedElement(getFile16BitBE(file));
+
+ if (!IS_GROUP_ELEMENT(element))
+ {
+ Error(ERR_WARN, "invalid group element number %d", element);
+
+ ReadUnusedBytesFromFile(file, chunk_size - 2);
+ return chunk_size;
+ }
+
+ ei = &element_info[element];
+
+ for (i = 0; i < MAX_ELEMENT_NAME_LEN; i++)
+ ei->description[i] = getFile8Bit(file);
+ ei->description[MAX_ELEMENT_NAME_LEN] = 0;
+
+ group = element_info[element].group;
+
+ group->num_elements = getFile8Bit(file);
+
+ ei->use_gfx_element = getFile8Bit(file);
+ ei->gfx_element = getMappedElement(getFile16BitBE(file));
+
+ group->choice_mode = getFile8Bit(file);
+
+ /* some free bytes for future values and padding */
+ ReadUnusedBytesFromFile(file, 3);
+
+ for (i = 0; i < MAX_ELEMENTS_IN_GROUP; i++)
+ group->element[i] = getMappedElement(getFile16BitBE(file));
+
+ /* mark this group element as modified */
+ element_info[element].modified_settings = TRUE;
+
+ return chunk_size;
+}
+
+static int LoadLevel_MicroChunk(FILE *file, struct LevelFileConfigInfo *conf,
+ int element, int real_element)
+{
+ int micro_chunk_size = 0;
+ int conf_type = getFile8Bit(file);
+ int byte_mask = conf_type & CONF_MASK_BYTES;
+ boolean element_found = FALSE;
+ int i;
+
+ micro_chunk_size += 1;
+
+ if (byte_mask == CONF_MASK_MULTI_BYTES)
+ {
+ int num_bytes = getFile16BitBE(file);
+ byte *buffer = checked_malloc(num_bytes);
+
+ ReadBytesFromFile(file, buffer, num_bytes);
+
+ for (i = 0; conf[i].data_type != -1; i++)
+ {
+ if (conf[i].element == element &&
+ conf[i].conf_type == conf_type)
+ {
+ int data_type = conf[i].data_type;
+ int num_entities = num_bytes / CONF_ENTITY_NUM_BYTES(data_type);
+ int max_num_entities = conf[i].max_num_entities;
+
+ if (num_entities > max_num_entities)
+ {
+ Error(ERR_WARN,
+ "truncating number of entities for element %d from %d to %d",
+ element, num_entities, max_num_entities);
+
+ num_entities = max_num_entities;
+ }
+
+ if (num_entities == 0 && (data_type == TYPE_ELEMENT_LIST ||
+ data_type == TYPE_CONTENT_LIST))
+ {
+ /* for element and content lists, zero entities are not allowed */
+ Error(ERR_WARN, "found empty list of entities for element %d",
+ element);
+
+ /* do not set "num_entities" here to prevent reading behind buffer */
+
+ *(int *)(conf[i].num_entities) = 1; /* at least one is required */
+ }
+ else
+ {
+ *(int *)(conf[i].num_entities) = num_entities;
+ }
+
+ element_found = TRUE;
+
+ if (data_type == TYPE_STRING)
+ {
+ char *string = (char *)(conf[i].value);
+ int j;
+
+ for (j = 0; j < max_num_entities; j++)
+ string[j] = (j < num_entities ? buffer[j] : '\0');
+ }
+ else if (data_type == TYPE_ELEMENT_LIST)
+ {
+ int *element_array = (int *)(conf[i].value);
+ int j;
+
+ for (j = 0; j < num_entities; j++)
+ element_array[j] =
+ getMappedElement(CONF_ELEMENTS_ELEMENT(buffer, j));
+ }
+ else if (data_type == TYPE_CONTENT_LIST)
+ {
+ struct Content *content= (struct Content *)(conf[i].value);
+ int c, x, y;
+
+ for (c = 0; c < num_entities; c++)
+ for (y = 0; y < 3; y++)
+ for (x = 0; x < 3; x++)
+ content[c].e[x][y] =
+ getMappedElement(CONF_CONTENTS_ELEMENT(buffer, c, x, y));
+ }
+ else
+ element_found = FALSE;
+
+ break;
+ }
+ }
+
+ checked_free(buffer);
+
+ micro_chunk_size += 2 + num_bytes;
+ }
+ else /* constant size configuration data (1, 2 or 4 bytes) */
+ {
+ int value = (byte_mask == CONF_MASK_1_BYTE ? getFile8Bit (file) :
+ byte_mask == CONF_MASK_2_BYTE ? getFile16BitBE(file) :
+ byte_mask == CONF_MASK_4_BYTE ? getFile32BitBE(file) : 0);
+
+ for (i = 0; conf[i].data_type != -1; i++)
+ {
+ if (conf[i].element == element &&
+ conf[i].conf_type == conf_type)
+ {
+ int data_type = conf[i].data_type;
+
+ if (data_type == TYPE_ELEMENT)
+ value = getMappedElement(value);
+
+ if (data_type == TYPE_BOOLEAN)
+ *(boolean *)(conf[i].value) = value;
+ else
+ *(int *) (conf[i].value) = value;
+
+ element_found = TRUE;
+
+ break;
+ }
+ }
+
+ micro_chunk_size += CONF_VALUE_NUM_BYTES(byte_mask);
+ }
+
+ if (!element_found)
+ {
+ char *error_conf_chunk_bytes =
+ (byte_mask == CONF_MASK_1_BYTE ? "CONF_VALUE_8_BIT" :
+ byte_mask == CONF_MASK_2_BYTE ? "CONF_VALUE_16_BIT" :
+ byte_mask == CONF_MASK_4_BYTE ? "CONF_VALUE_32_BIT" :"CONF_VALUE_BYTES");
+ int error_conf_chunk_token = conf_type & CONF_MASK_TOKEN;
+ int error_element = real_element;
+
+ Error(ERR_WARN, "cannot load micro chunk '%s(%d)' value for element %d ['%s']",
+ error_conf_chunk_bytes, error_conf_chunk_token,
+ error_element, EL_NAME(error_element));
+ }
+
+ return micro_chunk_size;
+}
+
+static int LoadLevel_INFO(FILE *file, int chunk_size, struct LevelInfo *level)
+{
+ int real_chunk_size = 0;
+
+ li = *level; /* copy level data into temporary buffer */
+
+ while (!feof(file))
+ {
+ real_chunk_size += LoadLevel_MicroChunk(file, chunk_config_INFO, -1, -1);
+
+ if (real_chunk_size >= chunk_size)
+ break;
+ }
+
+ *level = li; /* copy temporary buffer back to level data */
+
+ return real_chunk_size;
+}
+
+static int LoadLevel_CONF(FILE *file, int chunk_size, struct LevelInfo *level)
+{
+ int real_chunk_size = 0;
+
+ li = *level; /* copy level data into temporary buffer */
+
+ while (!feof(file))
+ {
+ int element = getMappedElement(getFile16BitBE(file));
+
+ real_chunk_size += 2;
+ real_chunk_size += LoadLevel_MicroChunk(file, chunk_config_CONF,
+ element, element);
+ if (real_chunk_size >= chunk_size)
+ break;
+ }
+
+ *level = li; /* copy temporary buffer back to level data */
+
+ return real_chunk_size;
+}
+
+static int LoadLevel_ELEM(FILE *file, int chunk_size, struct LevelInfo *level)
+{
+ int real_chunk_size = 0;
+
+ li = *level; /* copy level data into temporary buffer */
+
+ while (!feof(file))
+ {
+ int element = getMappedElement(getFile16BitBE(file));
+
+ real_chunk_size += 2;
+ real_chunk_size += LoadLevel_MicroChunk(file, chunk_config_ELEM,
+ element, element);
+ if (real_chunk_size >= chunk_size)
+ break;
+ }
+
+ *level = li; /* copy temporary buffer back to level data */
+
+ return real_chunk_size;
+}
+
+static int LoadLevel_NOTE(FILE *file, int chunk_size, struct LevelInfo *level)
+{
+ int element = getMappedElement(getFile16BitBE(file));
+ int envelope_nr = element - EL_ENVELOPE_1;
+ int real_chunk_size = 2;
+
+ while (!feof(file))
+ {
+ real_chunk_size += LoadLevel_MicroChunk(file, chunk_config_NOTE,
+ -1, element);
+
+ if (real_chunk_size >= chunk_size)
+ break;
+ }
+
+ level->envelope[envelope_nr] = xx_envelope;
+
+ return real_chunk_size;
+}
+
+static int LoadLevel_CUSX(FILE *file, int chunk_size, struct LevelInfo *level)
+{
+ int element = getMappedElement(getFile16BitBE(file));
+ int real_chunk_size = 2;
+ struct ElementInfo *ei = &element_info[element];
+ int i;
+
+ xx_ei = *ei; /* copy element data into temporary buffer */
+
+ xx_ei.num_change_pages = -1;
+
+ while (!feof(file))
+ {
+ real_chunk_size += LoadLevel_MicroChunk(file, chunk_config_CUSX_base,
+ -1, element);
+ if (xx_ei.num_change_pages != -1)
+ break;
+
+ if (real_chunk_size >= chunk_size)
+ break;
+ }
+
+ *ei = xx_ei;
+
+ if (ei->num_change_pages == -1)
+ {
+ Error(ERR_WARN, "LoadLevel_CUSX(): missing 'num_change_pages' for '%s'",
+ EL_NAME(element));
+
+ ei->num_change_pages = 1;
+
+ setElementChangePages(ei, 1);
+ setElementChangeInfoToDefaults(ei->change);
+
+ return real_chunk_size;
+ }
+
+ /* initialize number of change pages stored for this custom element */
+ setElementChangePages(ei, ei->num_change_pages);
+ for (i = 0; i < ei->num_change_pages; i++)
+ setElementChangeInfoToDefaults(&ei->change_page[i]);
+
+ /* start with reading properties for the first change page */
+ xx_current_change_page = 0;
+
+ while (!feof(file))
+ {
+ struct ElementChangeInfo *change = &ei->change_page[xx_current_change_page];
+
+ xx_change = *change; /* copy change data into temporary buffer */
+
+ resetEventBits(); /* reset bits; change page might have changed */
+
+ real_chunk_size += LoadLevel_MicroChunk(file, chunk_config_CUSX_change,
+ -1, element);
+
+ *change = xx_change;
+
+ setEventFlagsFromEventBits(change);
+
+ if (real_chunk_size >= chunk_size)
+ break;
+ }
+
+ return real_chunk_size;
+}
+
+static int LoadLevel_GRPX(FILE *file, int chunk_size, struct LevelInfo *level)
+{
+ int element = getMappedElement(getFile16BitBE(file));
+ int real_chunk_size = 2;
+ struct ElementInfo *ei = &element_info[element];
+ struct ElementGroupInfo *group = ei->group;
+
+ xx_ei = *ei; /* copy element data into temporary buffer */
+ xx_group = *group; /* copy group data into temporary buffer */
+
+ while (!feof(file))
+ {
+ real_chunk_size += LoadLevel_MicroChunk(file, chunk_config_GRPX,
+ -1, element);
+
+ if (real_chunk_size >= chunk_size)
+ break;
+ }
+
+ *ei = xx_ei;
+ *group = xx_group;
+
+ return real_chunk_size;
+}
+
+static void LoadLevelFromFileInfo_RND(struct LevelInfo *level,
+ struct LevelFileInfo *level_file_info)
+{
+ char *filename = level_file_info->filename;
+ char cookie[MAX_LINE_LEN];
+ char chunk_name[CHUNK_ID_LEN + 1];
+ int chunk_size;
+ FILE *file;
+
+ if (!(file = fopen(filename, MODE_READ)))
+ {
+ level->no_valid_file = TRUE;
+
+ if (level != &level_template)
+ Error(ERR_WARN, "cannot read level '%s' -- using empty level", filename);
+
+ return;
+ }
+
+ getFileChunkBE(file, chunk_name, NULL);
+ if (strEqual(chunk_name, "RND1"))
+ {
+ getFile32BitBE(file); /* not used */
+
+ getFileChunkBE(file, chunk_name, NULL);
+ if (!strEqual(chunk_name, "CAVE"))
+ {
+ level->no_valid_file = TRUE;
+
+ Error(ERR_WARN, "unknown format of level file '%s'", filename);
+ fclose(file);
+ return;
+ }
+ }
+ else /* check for pre-2.0 file format with cookie string */
+ {
+ strcpy(cookie, chunk_name);
+ fgets(&cookie[4], MAX_LINE_LEN - 4, file);
+ if (strlen(cookie) > 0 && cookie[strlen(cookie) - 1] == '\n')
+ cookie[strlen(cookie) - 1] = '\0';
+
+ if (!checkCookieString(cookie, LEVEL_COOKIE_TMPL))
+ {
+ level->no_valid_file = TRUE;
+
+ Error(ERR_WARN, "unknown format of level file '%s'", filename);
+ fclose(file);
+ return;
+ }
+
+ if ((level->file_version = getFileVersionFromCookieString(cookie)) == -1)
+ {
+ level->no_valid_file = TRUE;
+
+ Error(ERR_WARN, "unsupported version of level file '%s'", filename);
+ fclose(file);
+ return;
+ }
+
+ /* pre-2.0 level files have no game version, so use file version here */
+ level->game_version = level->file_version;
+ }
+
+ if (level->file_version < FILE_VERSION_1_2)
+ {
+ /* level files from versions before 1.2.0 without chunk structure */
+ LoadLevel_HEAD(file, LEVEL_CHUNK_HEAD_SIZE, level);
+ LoadLevel_BODY(file, level->fieldx * level->fieldy, level);
+ }
+ else
+ {
+ static struct
+ {
+ char *name;
+ int size;
+ int (*loader)(FILE *, int, struct LevelInfo *);
+ }
+ chunk_info[] =
+ {
+ { "VERS", LEVEL_CHUNK_VERS_SIZE, LoadLevel_VERS },
+ { "DATE", LEVEL_CHUNK_DATE_SIZE, LoadLevel_DATE },
+ { "HEAD", LEVEL_CHUNK_HEAD_SIZE, LoadLevel_HEAD },
+ { "NAME", LEVEL_CHUNK_NAME_SIZE, LoadLevel_NAME },
+ { "AUTH", LEVEL_CHUNK_AUTH_SIZE, LoadLevel_AUTH },
+ { "INFO", -1, LoadLevel_INFO },
+ { "BODY", -1, LoadLevel_BODY },
+ { "CONT", -1, LoadLevel_CONT },
+ { "CNT2", LEVEL_CHUNK_CNT2_SIZE, LoadLevel_CNT2 },
+ { "CNT3", -1, LoadLevel_CNT3 },
+ { "CUS1", -1, LoadLevel_CUS1 },
+ { "CUS2", -1, LoadLevel_CUS2 },
+ { "CUS3", -1, LoadLevel_CUS3 },
+ { "CUS4", -1, LoadLevel_CUS4 },
+ { "GRP1", -1, LoadLevel_GRP1 },
+ { "CONF", -1, LoadLevel_CONF },
+ { "ELEM", -1, LoadLevel_ELEM },
+ { "NOTE", -1, LoadLevel_NOTE },
+ { "CUSX", -1, LoadLevel_CUSX },
+ { "GRPX", -1, LoadLevel_GRPX },
+
+ { NULL, 0, NULL }
+ };
+
+ while (getFileChunkBE(file, chunk_name, &chunk_size))
+ {
+ int i = 0;
+
+ while (chunk_info[i].name != NULL &&
+ !strEqual(chunk_name, chunk_info[i].name))
+ i++;
+
+ if (chunk_info[i].name == NULL)
+ {
+ Error(ERR_WARN, "unknown chunk '%s' in level file '%s'",
+ chunk_name, filename);
+ ReadUnusedBytesFromFile(file, chunk_size);
+ }
+ else if (chunk_info[i].size != -1 &&
+ chunk_info[i].size != chunk_size)
+ {
+ Error(ERR_WARN, "wrong size (%d) of chunk '%s' in level file '%s'",
+ chunk_size, chunk_name, filename);
+ ReadUnusedBytesFromFile(file, chunk_size);
+ }
+ else
+ {
+ /* call function to load this level chunk */
+ int chunk_size_expected =
+ (chunk_info[i].loader)(file, chunk_size, level);
+
+ /* the size of some chunks cannot be checked before reading other
+ chunks first (like "HEAD" and "BODY") that contain some header
+ information, so check them here */
+ if (chunk_size_expected != chunk_size)
+ {
+ Error(ERR_WARN, "wrong size (%d) of chunk '%s' in level file '%s'",
+ chunk_size, chunk_name, filename);
+ }
+ }
+ }
+ }
+
+ fclose(file);
+}
+
+/* ------------------------------------------------------------------------- */
+/* functions for loading EM level */
+/* ------------------------------------------------------------------------- */
+
+#if 0
+
+static int map_em_element_yam(int element)
+{
+ switch (element)
+ {
+ case 0x00: return EL_EMPTY;
+ case 0x01: return EL_EMERALD;
+ case 0x02: return EL_DIAMOND;
+ case 0x03: return EL_ROCK;
+ case 0x04: return EL_ROBOT;
+ case 0x05: return EL_SPACESHIP_UP;
+ case 0x06: return EL_BOMB;
+ case 0x07: return EL_BUG_UP;
+ case 0x08: return EL_AMOEBA_DROP;
+ case 0x09: return EL_NUT;
+ case 0x0a: return EL_YAMYAM;
+ case 0x0b: return EL_QUICKSAND_FULL;
+ case 0x0c: return EL_SAND;
+ case 0x0d: return EL_WALL_SLIPPERY;
+ case 0x0e: return EL_STEELWALL;
+ case 0x0f: return EL_WALL;
+ case 0x10: return EL_EM_KEY_1;
+ case 0x11: return EL_EM_KEY_2;
+ case 0x12: return EL_EM_KEY_4;
+ case 0x13: return EL_EM_KEY_3;
+ case 0x14: return EL_MAGIC_WALL;
+ case 0x15: return EL_ROBOT_WHEEL;
+ case 0x16: return EL_DYNAMITE;
+
+ case 0x17: return EL_EM_KEY_1; /* EMC */
+ case 0x18: return EL_BUG_UP; /* EMC */
+ case 0x1a: return EL_DIAMOND; /* EMC */
+ case 0x1b: return EL_EMERALD; /* EMC */
+ case 0x25: return EL_NUT; /* EMC */
+ case 0x80: return EL_EMPTY; /* EMC */
+ case 0x85: return EL_EM_KEY_1; /* EMC */
+ case 0x86: return EL_EM_KEY_2; /* EMC */
+ case 0x87: return EL_EM_KEY_4; /* EMC */
+ case 0x88: return EL_EM_KEY_3; /* EMC */
+ case 0x94: return EL_QUICKSAND_EMPTY; /* EMC */
+ case 0x9a: return EL_AMOEBA_WET; /* EMC */
+ case 0xaf: return EL_DYNAMITE; /* EMC */
+ case 0xbd: return EL_SAND; /* EMC */
+
+ default:
+ Error(ERR_WARN, "invalid level element %d", element);
+ return EL_UNKNOWN;
+ }
+}
+
+static int map_em_element_field(int element)
+{
+ if (element >= 0xc8 && element <= 0xe1)
+ return EL_CHAR_A + (element - 0xc8);
+ else if (element >= 0xe2 && element <= 0xeb)
+ return EL_CHAR_0 + (element - 0xe2);
+
+ switch (element)
+ {
+ case 0x00: return EL_ROCK;
+ case 0x01: return EL_ROCK; /* EMC */
+ case 0x02: return EL_DIAMOND;
+ case 0x03: return EL_DIAMOND;
+ case 0x04: return EL_ROBOT;
+ case 0x05: return EL_ROBOT; /* EMC */
+ case 0x06: return EL_EMPTY_SPACE; /* EMC */
+ case 0x07: return EL_EMPTY_SPACE; /* EMC */
+ case 0x08: return EL_SPACESHIP_UP;
+ case 0x09: return EL_SPACESHIP_RIGHT;
+ case 0x0a: return EL_SPACESHIP_DOWN;
+ case 0x0b: return EL_SPACESHIP_LEFT;
+ case 0x0c: return EL_SPACESHIP_UP;
+ case 0x0d: return EL_SPACESHIP_RIGHT;
+ case 0x0e: return EL_SPACESHIP_DOWN;
+ case 0x0f: return EL_SPACESHIP_LEFT;
+
+ case 0x10: return EL_BOMB;
+ case 0x11: return EL_BOMB; /* EMC */
+ case 0x12: return EL_EMERALD;
+ case 0x13: return EL_EMERALD;
+ case 0x14: return EL_BUG_UP;
+ case 0x15: return EL_BUG_RIGHT;
+ case 0x16: return EL_BUG_DOWN;
+ case 0x17: return EL_BUG_LEFT;
+ case 0x18: return EL_BUG_UP;
+ case 0x19: return EL_BUG_RIGHT;
+ case 0x1a: return EL_BUG_DOWN;
+ case 0x1b: return EL_BUG_LEFT;
+ case 0x1c: return EL_AMOEBA_DROP;
+ case 0x1d: return EL_AMOEBA_DROP; /* EMC */
+ case 0x1e: return EL_AMOEBA_DROP; /* EMC */
+ case 0x1f: return EL_AMOEBA_DROP; /* EMC */
+
+ case 0x20: return EL_ROCK;
+ case 0x21: return EL_BOMB; /* EMC */
+ case 0x22: return EL_DIAMOND; /* EMC */
+ case 0x23: return EL_EMERALD; /* EMC */
+ case 0x24: return EL_MAGIC_WALL;
+ case 0x25: return EL_NUT;
+ case 0x26: return EL_NUT; /* EMC */
+ case 0x27: return EL_NUT; /* EMC */
+
+ /* looks like magic wheel, but is _always_ activated */
+ case 0x28: return EL_ROBOT_WHEEL; /* EMC */
+
+ case 0x29: return EL_YAMYAM; /* up */
+ case 0x2a: return EL_YAMYAM; /* down */
+ case 0x2b: return EL_YAMYAM; /* left */ /* EMC */
+ case 0x2c: return EL_YAMYAM; /* right */ /* EMC */
+ case 0x2d: return EL_QUICKSAND_FULL;
+ case 0x2e: return EL_EMPTY_SPACE; /* EMC */
+ case 0x2f: return EL_EMPTY_SPACE; /* EMC */
+
+ case 0x30: return EL_EMPTY_SPACE; /* EMC */
+ case 0x31: return EL_SAND; /* EMC */
+ case 0x32: return EL_SAND; /* EMC */
+ case 0x33: return EL_SAND; /* EMC */
+ case 0x34: return EL_QUICKSAND_FULL; /* EMC */
+ case 0x35: return EL_QUICKSAND_FULL; /* EMC */
+ case 0x36: return EL_QUICKSAND_FULL; /* EMC */
+ case 0x37: return EL_SAND; /* EMC */
+ case 0x38: return EL_ROCK; /* EMC */
+ case 0x39: return EL_EXPANDABLE_WALL_HORIZONTAL; /* EMC */
+ case 0x3a: return EL_EXPANDABLE_WALL_VERTICAL; /* EMC */
+ case 0x3b: return EL_DYNAMITE_ACTIVE; /* 1 */
+ case 0x3c: return EL_DYNAMITE_ACTIVE; /* 2 */
+ case 0x3d: return EL_DYNAMITE_ACTIVE; /* 3 */
+ case 0x3e: return EL_DYNAMITE_ACTIVE; /* 4 */
+ case 0x3f: return EL_ACID_POOL_BOTTOM;
+
+ case 0x40: return EL_EXIT_OPEN; /* 1 */
+ case 0x41: return EL_EXIT_OPEN; /* 2 */
+ case 0x42: return EL_EXIT_OPEN; /* 3 */
+ case 0x43: return EL_BALLOON; /* EMC */
+ case 0x44: return EL_UNKNOWN; /* EMC ("plant") */
+ case 0x45: return EL_SPRING; /* EMC */
+ case 0x46: return EL_SPRING; /* falling */ /* EMC */
+ case 0x47: return EL_SPRING; /* left */ /* EMC */
+ case 0x48: return EL_SPRING; /* right */ /* EMC */
+ case 0x49: return EL_UNKNOWN; /* EMC ("ball 1") */
+ case 0x4a: return EL_UNKNOWN; /* EMC ("ball 2") */
+ case 0x4b: return EL_UNKNOWN; /* EMC ("android") */
+ case 0x4c: return EL_EMPTY_SPACE; /* EMC */
+ case 0x4d: return EL_UNKNOWN; /* EMC ("android") */
+ case 0x4e: return EL_INVISIBLE_WALL; /* EMC (? "android") */
+ case 0x4f: return EL_UNKNOWN; /* EMC ("android") */
+
+ case 0x50: return EL_UNKNOWN; /* EMC ("android") */
+ case 0x51: return EL_UNKNOWN; /* EMC ("android") */
+ case 0x52: return EL_UNKNOWN; /* EMC ("android") */
+ case 0x53: return EL_UNKNOWN; /* EMC ("android") */
+ case 0x54: return EL_UNKNOWN; /* EMC ("android") */
+ case 0x55: return EL_EMPTY_SPACE; /* EMC */
+ case 0x56: return EL_EMPTY_SPACE; /* EMC */
+ case 0x57: return EL_EMPTY_SPACE; /* EMC */
+ case 0x58: return EL_EMPTY_SPACE; /* EMC */
+ case 0x59: return EL_EMPTY_SPACE; /* EMC */
+ case 0x5a: return EL_EMPTY_SPACE; /* EMC */
+ case 0x5b: return EL_EMPTY_SPACE; /* EMC */
+ case 0x5c: return EL_EMPTY_SPACE; /* EMC */
+ case 0x5d: return EL_EMPTY_SPACE; /* EMC */
+ case 0x5e: return EL_EMPTY_SPACE; /* EMC */
+ case 0x5f: return EL_EMPTY_SPACE; /* EMC */
+
+ case 0x60: return EL_EMPTY_SPACE; /* EMC */
+ case 0x61: return EL_EMPTY_SPACE; /* EMC */
+ case 0x62: return EL_EMPTY_SPACE; /* EMC */
+ case 0x63: return EL_SPRING; /* left */ /* EMC */
+ case 0x64: return EL_SPRING; /* right */ /* EMC */
+ case 0x65: return EL_ACID; /* 1 */ /* EMC */
+ case 0x66: return EL_ACID; /* 2 */ /* EMC */
+ case 0x67: return EL_ACID; /* 3 */ /* EMC */
+ case 0x68: return EL_ACID; /* 4 */ /* EMC */
+ case 0x69: return EL_ACID; /* 5 */ /* EMC */
+ case 0x6a: return EL_ACID; /* 6 */ /* EMC */
+ case 0x6b: return EL_ACID; /* 7 */ /* EMC */
+ case 0x6c: return EL_ACID; /* 8 */ /* EMC */
+ case 0x6d: return EL_EMPTY_SPACE; /* EMC */
+ case 0x6e: return EL_EMPTY_SPACE; /* EMC */
+ case 0x6f: return EL_EMPTY_SPACE; /* EMC */
+
+ case 0x70: return EL_EMPTY_SPACE; /* EMC */
+ case 0x71: return EL_EMPTY_SPACE; /* EMC */
+ case 0x72: return EL_NUT; /* left */ /* EMC */
+ case 0x73: return EL_SAND; /* EMC (? "nut") */
+ case 0x74: return EL_STEELWALL;
+ case 0x75: return EL_EMPTY_SPACE; /* EMC */
+ case 0x76: return EL_EMPTY_SPACE; /* EMC */
+ case 0x77: return EL_BOMB; /* left */ /* EMC */
+ case 0x78: return EL_BOMB; /* right */ /* EMC */
+ case 0x79: return EL_ROCK; /* left */ /* EMC */
+ case 0x7a: return EL_ROCK; /* right */ /* EMC */
+ case 0x7b: return EL_ACID; /* (? EMC "blank") */
+ case 0x7c: return EL_EMPTY_SPACE; /* EMC */
+ case 0x7d: return EL_EMPTY_SPACE; /* EMC */
+ case 0x7e: return EL_EMPTY_SPACE; /* EMC */
+ case 0x7f: return EL_EMPTY_SPACE; /* EMC */
+
+ case 0x80: return EL_EMPTY;
+ case 0x81: return EL_WALL_SLIPPERY;
+ case 0x82: return EL_SAND;
+ case 0x83: return EL_STEELWALL;
+ case 0x84: return EL_WALL;
+ case 0x85: return EL_EM_KEY_1;
+ case 0x86: return EL_EM_KEY_2;
+ case 0x87: return EL_EM_KEY_4;
+ case 0x88: return EL_EM_KEY_3;
+ case 0x89: return EL_EM_GATE_1;
+ case 0x8a: return EL_EM_GATE_2;
+ case 0x8b: return EL_EM_GATE_4;
+ case 0x8c: return EL_EM_GATE_3;
+ case 0x8d: return EL_INVISIBLE_WALL; /* EMC (? "dripper") */
+ case 0x8e: return EL_EM_GATE_1_GRAY;
+ case 0x8f: return EL_EM_GATE_2_GRAY;
+
+ case 0x90: return EL_EM_GATE_4_GRAY;
+ case 0x91: return EL_EM_GATE_3_GRAY;
+ case 0x92: return EL_MAGIC_WALL;
+ case 0x93: return EL_ROBOT_WHEEL;
+ case 0x94: return EL_QUICKSAND_EMPTY; /* (? EMC "sand") */
+ case 0x95: return EL_ACID_POOL_TOPLEFT;
+ case 0x96: return EL_ACID_POOL_TOPRIGHT;
+ case 0x97: return EL_ACID_POOL_BOTTOMLEFT;
+ case 0x98: return EL_ACID_POOL_BOTTOMRIGHT;
+ case 0x99: return EL_ACID; /* (? EMC "fake blank") */
+ case 0x9a: return EL_AMOEBA_DEAD; /* 1 */
+ case 0x9b: return EL_AMOEBA_DEAD; /* 2 */
+ case 0x9c: return EL_AMOEBA_DEAD; /* 3 */
+ case 0x9d: return EL_AMOEBA_DEAD; /* 4 */
+ case 0x9e: return EL_EXIT_CLOSED;
+ case 0x9f: return EL_CHAR_LESS; /* arrow left */
+
+ /* looks like normal sand, but behaves like wall */
+ case 0xa0: return EL_UNKNOWN; /* EMC ("fake grass") */
+ case 0xa1: return EL_UNKNOWN; /* EMC ("lenses") */
+ case 0xa2: return EL_UNKNOWN; /* EMC ("magnify") */
+ case 0xa3: return EL_UNKNOWN; /* EMC ("fake blank") */
+ case 0xa4: return EL_UNKNOWN; /* EMC ("fake grass") */
+ case 0xa5: return EL_UNKNOWN; /* EMC ("switch") */
+ case 0xa6: return EL_UNKNOWN; /* EMC ("switch") */
+ case 0xa7: return EL_EMPTY_SPACE; /* EMC */
+ case 0xa8: return EL_EMC_WALL_1; /* EMC ("decor 8") */
+ case 0xa9: return EL_EMC_WALL_2; /* EMC ("decor 9") */
+ case 0xaa: return EL_EMC_WALL_3; /* EMC ("decor 10") */
+ case 0xab: return EL_EMC_WALL_7; /* EMC ("decor 5") */
+ case 0xac: return EL_CHAR_COMMA; /* EMC */
+ case 0xad: return EL_CHAR_QUOTEDBL; /* EMC */
+ case 0xae: return EL_CHAR_MINUS; /* EMC */
+ case 0xaf: return EL_DYNAMITE;
+
+ case 0xb0: return EL_EMC_STEELWALL_1; /* EMC ("steel 3") */
+ case 0xb1: return EL_EMC_WALL_8; /* EMC ("decor 6") */
+ case 0xb2: return EL_UNKNOWN; /* EMC ("decor 7") */
+ case 0xb3: return EL_STEELWALL; /* 2 */ /* EMC */
+ case 0xb4: return EL_WALL_SLIPPERY; /* 2 */ /* EMC */
+ case 0xb5: return EL_EMC_WALL_6; /* EMC ("decor 2") */
+ case 0xb6: return EL_EMC_WALL_5; /* EMC ("decor 4") */
+ case 0xb7: return EL_EMC_WALL_4; /* EMC ("decor 3") */
+ case 0xb8: return EL_BALLOON_SWITCH_ANY; /* EMC */
+ case 0xb9: return EL_BALLOON_SWITCH_RIGHT; /* EMC */
+ case 0xba: return EL_BALLOON_SWITCH_DOWN; /* EMC */
+ case 0xbb: return EL_BALLOON_SWITCH_LEFT; /* EMC */
+ case 0xbc: return EL_BALLOON_SWITCH_UP; /* EMC */
+ case 0xbd: return EL_SAND; /* EMC ("dirt") */
+ case 0xbe: return EL_UNKNOWN; /* EMC ("plant") */
+ case 0xbf: return EL_UNKNOWN; /* EMC ("key 5") */
+
+ case 0xc0: return EL_UNKNOWN; /* EMC ("key 6") */
+ case 0xc1: return EL_UNKNOWN; /* EMC ("key 7") */
+ case 0xc2: return EL_UNKNOWN; /* EMC ("key 8") */
+ case 0xc3: return EL_UNKNOWN; /* EMC ("door 5") */
+ case 0xc4: return EL_UNKNOWN; /* EMC ("door 6") */
+ case 0xc5: return EL_UNKNOWN; /* EMC ("door 7") */
+ case 0xc6: return EL_UNKNOWN; /* EMC ("door 8") */
+ case 0xc7: return EL_UNKNOWN; /* EMC ("bumper") */
+
+ /* characters: see above */
+
+ case 0xec: return EL_CHAR_PERIOD;
+ case 0xed: return EL_CHAR_EXCLAM;
+ case 0xee: return EL_CHAR_COLON;
+ case 0xef: return EL_CHAR_QUESTION;
+
+ case 0xf0: return EL_CHAR_GREATER; /* arrow right */
+ case 0xf1: return EL_CHAR_COPYRIGHT; /* EMC: "decor 1" */
+ case 0xf2: return EL_UNKNOWN; /* EMC ("fake door 5") */
+ case 0xf3: return EL_UNKNOWN; /* EMC ("fake door 6") */
+ case 0xf4: return EL_UNKNOWN; /* EMC ("fake door 7") */
+ case 0xf5: return EL_UNKNOWN; /* EMC ("fake door 8") */
+ case 0xf6: return EL_EMPTY_SPACE; /* EMC */
+ case 0xf7: return EL_EMPTY_SPACE; /* EMC */
+
+ case 0xf8: return EL_EMPTY_SPACE; /* EMC */
+ case 0xf9: return EL_EMPTY_SPACE; /* EMC */
+ case 0xfa: return EL_EMPTY_SPACE; /* EMC */
+ case 0xfb: return EL_EMPTY_SPACE; /* EMC */
+ case 0xfc: return EL_EMPTY_SPACE; /* EMC */
+ case 0xfd: return EL_EMPTY_SPACE; /* EMC */
+
+ case 0xfe: return EL_PLAYER_1; /* EMC: "blank" */
+ case 0xff: return EL_PLAYER_2; /* EMC: "blank" */
+
+ default:
+ /* should never happen (all 8-bit value cases should be handled) */
+ Error(ERR_WARN, "invalid level element %d", element);
+ return EL_UNKNOWN;
+ }
+}
+
+#define EM_LEVEL_SIZE 2106
+#define EM_LEVEL_XSIZE 64
+#define EM_LEVEL_YSIZE 32
+
+static void OLD_LoadLevelFromFileInfo_EM(struct LevelInfo *level,
+ struct LevelFileInfo *level_file_info)
+{
+ char *filename = level_file_info->filename;
+ FILE *file;
+ unsigned char leveldata[EM_LEVEL_SIZE];
+ unsigned char *header = &leveldata[EM_LEVEL_XSIZE * EM_LEVEL_YSIZE];
+ int nr = level_file_info->nr;
+ int i, x, y;
+
+ if (!(file = fopen(filename, MODE_READ)))
+ {
+ level->no_valid_file = TRUE;
+
+ Error(ERR_WARN, "cannot read level '%s' -- using empty level", filename);
+
+ return;
+ }
+
+ for (i = 0; i < EM_LEVEL_SIZE; i++)
+ leveldata[i] = fgetc(file);
+
+ fclose(file);
+
+ /* check if level data is crypted by testing against known starting bytes
+ of the few existing crypted level files (from Emerald Mine 1 + 2) */
+
+ if ((leveldata[0] == 0xf1 ||
+ leveldata[0] == 0xf5) && leveldata[2] == 0xe7 && leveldata[3] == 0xee)
+ {
+ unsigned char code0 = 0x65;
+ unsigned char code1 = 0x11;
+
+ if (leveldata[0] == 0xf5) /* error in crypted Emerald Mine 2 levels */
+ leveldata[0] = 0xf1;
+
+ /* decode crypted level data */
+
+ for (i = 0; i < EM_LEVEL_SIZE; i++)
+ {
+ leveldata[i] ^= code0;
+ leveldata[i] -= code1;
+
+ code0 = (code0 + 7) & 0xff;
+ }
+ }
+
+ level->fieldx = EM_LEVEL_XSIZE;
+ level->fieldy = EM_LEVEL_YSIZE;
+
+ level->time = header[46] * 10;
+ level->gems_needed = header[47];
+
+ /* The original Emerald Mine levels have their level number stored
+ at the second byte of the level file...
+ Do not trust this information at other level files, e.g. EMC,
+ but correct it anyway (normally the first row is completely
+ steel wall, so the correction does not hurt anyway). */
+
+ if (leveldata[1] == nr)
+ leveldata[1] = leveldata[2]; /* correct level number field */
+
+ sprintf(level->name, "Level %d", nr); /* set level name */
+
+ level->score[SC_EMERALD] = header[36];
+ level->score[SC_DIAMOND] = header[37];
+ level->score[SC_ROBOT] = header[38];
+ level->score[SC_SPACESHIP] = header[39];
+ level->score[SC_BUG] = header[40];
+ level->score[SC_YAMYAM] = header[41];
+ level->score[SC_NUT] = header[42];
+ level->score[SC_DYNAMITE] = header[43];
+ level->score[SC_TIME_BONUS] = header[44];
+
+ level->num_yamyam_contents = 4;
+
+ for (i = 0; i < level->num_yamyam_contents; i++)
+ for (y = 0; y < 3; y++)
+ for (x = 0; x < 3; x++)
+ level->yamyam_content[i].e[x][y] =
+ map_em_element_yam(header[i * 9 + y * 3 + x]);
+
+ level->amoeba_speed = (header[52] * 256 + header[53]) % 256;
+ level->time_magic_wall = (header[54] * 256 + header[55]) * 16 / 100;
+ level->time_wheel = (header[56] * 256 + header[57]) * 16 / 100;
+ level->amoeba_content = EL_DIAMOND;
+
+ for (y = 0; y < level->fieldy; y++) for (x = 0; x < level->fieldx; x++)
+ {
+ int new_element = map_em_element_field(leveldata[y * EM_LEVEL_XSIZE + x]);
+
+ if (new_element == EL_AMOEBA_DEAD && level->amoeba_speed)
+ new_element = EL_AMOEBA_WET;
+
+ level->field[x][y] = new_element;
+ }
+
+ x = (header[48] * 256 + header[49]) % EM_LEVEL_XSIZE;
+ y = (header[48] * 256 + header[49]) / EM_LEVEL_XSIZE;
+ level->field[x][y] = EL_PLAYER_1;
+
+ x = (header[50] * 256 + header[51]) % EM_LEVEL_XSIZE;
+ y = (header[50] * 256 + header[51]) / EM_LEVEL_XSIZE;
+ level->field[x][y] = EL_PLAYER_2;
+}
+
+#endif
+
+void CopyNativeLevel_RND_to_EM(struct LevelInfo *level)
+{
+ static int ball_xy[8][2] =
+ {
+ { 0, 0 },
+ { 1, 0 },
+ { 2, 0 },
+ { 0, 1 },
+ { 2, 1 },
+ { 0, 2 },
+ { 1, 2 },
+ { 2, 2 },
+ };
+ struct LevelInfo_EM *level_em = level->native_em_level;
+ struct LEVEL *lev = level_em->lev;
+ struct PLAYER **ply = level_em->ply;
+ int i, j, x, y;
+
+ lev->width = MIN(level->fieldx, EM_MAX_CAVE_WIDTH);
+ lev->height = MIN(level->fieldy, EM_MAX_CAVE_HEIGHT);
+
+ lev->time_seconds = level->time;
+ lev->required_initial = level->gems_needed;
+
+ lev->emerald_score = level->score[SC_EMERALD];
+ lev->diamond_score = level->score[SC_DIAMOND];
+ lev->alien_score = level->score[SC_ROBOT];
+ lev->tank_score = level->score[SC_SPACESHIP];
+ lev->bug_score = level->score[SC_BUG];
+ lev->eater_score = level->score[SC_YAMYAM];
+ lev->nut_score = level->score[SC_NUT];
+ lev->dynamite_score = level->score[SC_DYNAMITE];
+ lev->key_score = level->score[SC_KEY];
+ lev->exit_score = level->score[SC_TIME_BONUS];
+
+ for (i = 0; i < MAX_ELEMENT_CONTENTS; i++)
+ for (y = 0; y < 3; y++)
+ for (x = 0; x < 3; x++)
+ lev->eater_array[i][y * 3 + x] =
+ map_element_RND_to_EM(level->yamyam_content[i].e[x][y]);
+
+ lev->amoeba_time = level->amoeba_speed;
+ lev->wonderwall_time_initial = level->time_magic_wall;
+ lev->wheel_time = level->time_wheel;
+
+ lev->android_move_time = level->android_move_time;
+ lev->android_clone_time = level->android_clone_time;
+ lev->ball_random = level->ball_random;
+ lev->ball_state_initial = level->ball_state_initial;
+ lev->ball_time = level->ball_time;
+ lev->num_ball_arrays = level->num_ball_contents;
+
+ lev->lenses_score = level->lenses_score;
+ lev->magnify_score = level->magnify_score;
+ lev->slurp_score = level->slurp_score;
+
+ lev->lenses_time = level->lenses_time;
+ lev->magnify_time = level->magnify_time;
+
+ lev->wind_direction_initial =
+ map_direction_RND_to_EM(level->wind_direction_initial);
+ lev->wind_cnt_initial = (level->wind_direction_initial != MV_NONE ?
+ lev->wind_time : 0);
+
+ for (i = 0; i < MAX_ELEMENT_CONTENTS; i++)
+ for (j = 0; j < 8; j++)
+ lev->ball_array[i][j] =
+ map_element_RND_to_EM(level->
+ ball_content[i].e[ball_xy[j][0]][ball_xy[j][1]]);
+
+ map_android_clone_elements_RND_to_EM(level);
+
+ /* first fill the complete playfield with the default border element */
+ for (y = 0; y < EM_MAX_CAVE_HEIGHT; y++)
+ for (x = 0; x < EM_MAX_CAVE_WIDTH; x++)
+ level_em->cave[x][y] = ZBORDER;
+
+ if (BorderElement == EL_STEELWALL)
+ {
+ for (y = 0; y < lev->height + 2; y++)
+ for (x = 0; x < lev->width + 2; x++)
+ level_em->cave[x + 1][y + 1] = map_element_RND_to_EM(EL_STEELWALL);
+ }
+
+ /* then copy the real level contents from level file into the playfield */
+ for (y = 0; y < lev->height; y++) for (x = 0; x < lev->width; x++)
+ {
+ int new_element = map_element_RND_to_EM(level->field[x][y]);
+ int offset = (BorderElement == EL_STEELWALL ? 1 : 0);
+ int xx = x + 1 + offset;
+ int yy = y + 1 + offset;
+
+ if (level->field[x][y] == EL_AMOEBA_DEAD)
+ new_element = map_element_RND_to_EM(EL_AMOEBA_WET);
+
+ level_em->cave[xx][yy] = new_element;
+ }
+
+ for (i = 0; i < MAX_PLAYERS; i++)
+ {
+ ply[i]->x_initial = 0;
+ ply[i]->y_initial = 0;
+ }
+
+ /* initialize player positions and delete players from the playfield */
+ for (y = 0; y < lev->height; y++) for (x = 0; x < lev->width; x++)
+ {
+ if (ELEM_IS_PLAYER(level->field[x][y]))
+ {
+ int player_nr = GET_PLAYER_NR(level->field[x][y]);
+ int offset = (BorderElement == EL_STEELWALL ? 1 : 0);
+ int xx = x + 1 + offset;
+ int yy = y + 1 + offset;
+
+ ply[player_nr]->x_initial = xx;
+ ply[player_nr]->y_initial = yy;
+
+ level_em->cave[xx][yy] = map_element_RND_to_EM(EL_EMPTY);
+ }
+ }
+
+ if (BorderElement == EL_STEELWALL)
+ {
+ lev->width += 2;
+ lev->height += 2;
+ }
+}
+
+void CopyNativeLevel_EM_to_RND(struct LevelInfo *level)
+{
+ static int ball_xy[8][2] =
+ {
+ { 0, 0 },
+ { 1, 0 },
+ { 2, 0 },
+ { 0, 1 },
+ { 2, 1 },
+ { 0, 2 },
+ { 1, 2 },
+ { 2, 2 },
+ };
+ struct LevelInfo_EM *level_em = level->native_em_level;
+ struct LEVEL *lev = level_em->lev;
+ struct PLAYER **ply = level_em->ply;
+ int i, j, x, y;
+
+ level->fieldx = MIN(lev->width, MAX_LEV_FIELDX);
+ level->fieldy = MIN(lev->height, MAX_LEV_FIELDY);
+
+ level->time = lev->time_seconds;
+ level->gems_needed = lev->required_initial;
+
+ sprintf(level->name, "Level %d", level->file_info.nr);
+
+ level->score[SC_EMERALD] = lev->emerald_score;
+ level->score[SC_DIAMOND] = lev->diamond_score;
+ level->score[SC_ROBOT] = lev->alien_score;
+ level->score[SC_SPACESHIP] = lev->tank_score;
+ level->score[SC_BUG] = lev->bug_score;
+ level->score[SC_YAMYAM] = lev->eater_score;
+ level->score[SC_NUT] = lev->nut_score;
+ level->score[SC_DYNAMITE] = lev->dynamite_score;
+ level->score[SC_KEY] = lev->key_score;
+ level->score[SC_TIME_BONUS] = lev->exit_score;
+
+ level->num_yamyam_contents = MAX_ELEMENT_CONTENTS;
+
+ for (i = 0; i < level->num_yamyam_contents; i++)
+ for (y = 0; y < 3; y++)
+ for (x = 0; x < 3; x++)
+ level->yamyam_content[i].e[x][y] =
+ map_element_EM_to_RND(lev->eater_array[i][y * 3 + x]);
+
+ level->amoeba_speed = lev->amoeba_time;
+ level->time_magic_wall = lev->wonderwall_time_initial;
+ level->time_wheel = lev->wheel_time;
+
+ level->android_move_time = lev->android_move_time;
+ level->android_clone_time = lev->android_clone_time;
+ level->ball_random = lev->ball_random;
+ level->ball_state_initial = lev->ball_state_initial;
+ level->ball_time = lev->ball_time;
+ level->num_ball_contents = lev->num_ball_arrays;
+
+ level->lenses_score = lev->lenses_score;
+ level->magnify_score = lev->magnify_score;
+ level->slurp_score = lev->slurp_score;
+
+ level->lenses_time = lev->lenses_time;
+ level->magnify_time = lev->magnify_time;
+
+ level->wind_direction_initial =
+ map_direction_EM_to_RND(lev->wind_direction_initial);
+
+ for (i = 0; i < MAX_ELEMENT_CONTENTS; i++)
+ for (j = 0; j < 8; j++)
+ level->ball_content[i].e[ball_xy[j][0]][ball_xy[j][1]] =
+ map_element_EM_to_RND(lev->ball_array[i][j]);
+
+ map_android_clone_elements_EM_to_RND(level);
+
+ /* convert the playfield (some elements need special treatment) */
+ for (y = 0; y < level->fieldy; y++) for (x = 0; x < level->fieldx; x++)
+ {
+ int new_element = map_element_EM_to_RND(level_em->cave[x + 1][y + 1]);
+
+ if (new_element == EL_AMOEBA_WET && level->amoeba_speed == 0)
+ new_element = EL_AMOEBA_DEAD;
+
+ level->field[x][y] = new_element;
+ }
+
+ for (i = 0; i < MAX_PLAYERS; i++)
+ {
+ /* in case of all players set to the same field, use the first player */
+ int nr = MAX_PLAYERS - i - 1;
+ int jx = ply[nr]->x_initial - 1;
+ int jy = ply[nr]->y_initial - 1;
+
+ if (jx != -1 && jy != -1)
+ level->field[jx][jy] = EL_PLAYER_1 + nr;
+ }
+}
+
+static void LoadLevelFromFileInfo_EM(struct LevelInfo *level,
+ struct LevelFileInfo *level_file_info)
+{
+ if (!LoadNativeLevel_EM(level_file_info->filename))
+ level->no_valid_file = TRUE;
+}
+
+void CopyNativeLevel_RND_to_Native(struct LevelInfo *level)
+{
+ if (level->game_engine_type == GAME_ENGINE_TYPE_EM)
+ CopyNativeLevel_RND_to_EM(level);
+}
+
+void CopyNativeLevel_Native_to_RND(struct LevelInfo *level)
+{
+ if (level->game_engine_type == GAME_ENGINE_TYPE_EM)
+ CopyNativeLevel_EM_to_RND(level);
+}
+
+
+/* ------------------------------------------------------------------------- */
+/* functions for loading SP level */
+/* ------------------------------------------------------------------------- */
+
+#define NUM_SUPAPLEX_LEVELS_PER_PACKAGE 111
+#define SP_LEVEL_SIZE 1536
+#define SP_LEVEL_XSIZE 60
+#define SP_LEVEL_YSIZE 24
+#define SP_LEVEL_NAME_LEN 23
+
+static void LoadLevelFromFileStream_SP(FILE *file, struct LevelInfo *level,
+ int nr)
+{
+ int initial_player_gravity;
+ int num_special_ports;
+ int i, x, y;
+
+ /* for details of the Supaplex level format, see Herman Perk's Supaplex
+ documentation file "SPFIX63.DOC" from his Supaplex "SpeedFix" package */
+
+ /* read level body (width * height == 60 * 24 tiles == 1440 bytes) */
+ for (y = 0; y < SP_LEVEL_YSIZE; y++)
+ {
+ for (x = 0; x < SP_LEVEL_XSIZE; x++)
+ {
+ int element_old = fgetc(file);
+ int element_new;
+
+ if (element_old <= 0x27)
+ element_new = getMappedElement(EL_SP_START + element_old);
+ else if (element_old == 0x28)
+ element_new = EL_INVISIBLE_WALL;
+ else
+ {
+ Error(ERR_WARN, "in level %d, at position %d, %d:", nr, x, y);
+ Error(ERR_WARN, "invalid level element %d", element_old);
+
+ element_new = EL_UNKNOWN;
+ }
+
+ level->field[x][y] = element_new;
+ }
+ }
+
+ ReadUnusedBytesFromFile(file, 4); /* (not used by Supaplex engine) */
+
+ /* initial gravity: 1 == "on", anything else (0) == "off" */
+ initial_player_gravity = (fgetc(file) == 1 ? TRUE : FALSE);
+
+ for (i = 0; i < MAX_PLAYERS; i++)
+ level->initial_player_gravity[i] = initial_player_gravity;
+
+ ReadUnusedBytesFromFile(file, 1); /* (not used by Supaplex engine) */
+
+ /* level title in uppercase letters, padded with dashes ("-") (23 bytes) */
+ for (i = 0; i < SP_LEVEL_NAME_LEN; i++)
+ level->name[i] = fgetc(file);
+ level->name[SP_LEVEL_NAME_LEN] = '\0';
+
+ /* initial "freeze zonks": 2 == "on", anything else (0, 1) == "off" */
+ ReadUnusedBytesFromFile(file, 1); /* (not used by R'n'D engine) */
+
+ /* number of infotrons needed; 0 means that Supaplex will count the total
+ amount of infotrons in the level and use the low byte of that number
+ (a multiple of 256 infotrons will result in "0 infotrons needed"!) */
+ level->gems_needed = fgetc(file);
+
+ /* number of special ("gravity") port entries below (maximum 10 allowed) */
+ num_special_ports = fgetc(file);
+
+ /* database of properties of up to 10 special ports (6 bytes per port) */
+ for (i = 0; i < 10; i++)
+ {
+ int port_location, port_x, port_y, port_element;
+ int gravity;
+
+ /* high and low byte of the location of a special port; if (x, y) are the
+ coordinates of a port in the field and (0, 0) is the top-left corner,
+ the 16 bit value here calculates as 2 * (x + (y * 60)) (this is twice
+ of what may be expected: Supaplex works with a game field in memory
+ which is 2 bytes per tile) */
+ port_location = getFile16BitBE(file);
+
+ /* change gravity: 1 == "turn on", anything else (0) == "turn off" */
+ gravity = fgetc(file);
+
+ /* "freeze zonks": 2 == "turn on", anything else (0, 1) == "turn off" */
+ ReadUnusedBytesFromFile(file, 1); /* (not used by R'n'D engine) */
+
+ /* "freeze enemies": 1 == "turn on", anything else (0) == "turn off" */
+ ReadUnusedBytesFromFile(file, 1); /* (not used by R'n'D engine) */
+
+ ReadUnusedBytesFromFile(file, 1); /* (not used by Supaplex engine) */
+
+ if (i >= num_special_ports)
+ continue;
+
+ port_x = (port_location / 2) % SP_LEVEL_XSIZE;
+ port_y = (port_location / 2) / SP_LEVEL_XSIZE;
+
+ if (port_x < 0 || port_x >= SP_LEVEL_XSIZE ||
+ port_y < 0 || port_y >= SP_LEVEL_YSIZE)
+ {
+ Error(ERR_WARN, "special port position (%d, %d) out of bounds",
+ port_x, port_y);
+
+ continue;
+ }
+
+ port_element = level->field[port_x][port_y];
+
+ if (port_element < EL_SP_GRAVITY_PORT_RIGHT ||
+ port_element > EL_SP_GRAVITY_PORT_UP)
+ {
+ Error(ERR_WARN, "no special port at position (%d, %d)", port_x, port_y);
+
+ continue;
+ }
+
+ /* change previous (wrong) gravity inverting special port to either
+ gravity enabling special port or gravity disabling special port */
+ level->field[port_x][port_y] +=
+ (gravity == 1 ? EL_SP_GRAVITY_ON_PORT_RIGHT :
+ EL_SP_GRAVITY_OFF_PORT_RIGHT) - EL_SP_GRAVITY_PORT_RIGHT;
+ }
+
+ ReadUnusedBytesFromFile(file, 4); /* (not used by Supaplex engine) */
+
+ /* change special gravity ports without database entries to normal ports */
+ for (y = 0; y < SP_LEVEL_YSIZE; y++)
+ for (x = 0; x < SP_LEVEL_XSIZE; x++)
+ if (level->field[x][y] >= EL_SP_GRAVITY_PORT_RIGHT &&
+ level->field[x][y] <= EL_SP_GRAVITY_PORT_UP)
+ level->field[x][y] += EL_SP_PORT_RIGHT - EL_SP_GRAVITY_PORT_RIGHT;
+
+ /* auto-determine number of infotrons if it was stored as "0" -- see above */
+ if (level->gems_needed == 0)
+ {
+ for (y = 0; y < SP_LEVEL_YSIZE; y++)
+ for (x = 0; x < SP_LEVEL_XSIZE; x++)
+ if (level->field[x][y] == EL_SP_INFOTRON)
+ level->gems_needed++;
+
+ level->gems_needed &= 0xff; /* only use low byte -- see above */
+ }
+
+ level->fieldx = SP_LEVEL_XSIZE;
+ level->fieldy = SP_LEVEL_YSIZE;
+
+ level->time = 0; /* no time limit */
+ level->amoeba_speed = 0;
+ level->time_magic_wall = 0;
+ level->time_wheel = 0;
+ level->amoeba_content = EL_EMPTY;
+
+#if 1
+ /* original Supaplex does not use score values -- use default values */
+#else
+ for (i = 0; i < LEVEL_SCORE_ELEMENTS; i++)
+ level->score[i] = 0;
+#endif
+
+ /* there are no yamyams in supaplex levels */
+ for (i = 0; i < level->num_yamyam_contents; i++)
+ for (y = 0; y < 3; y++)
+ for (x = 0; x < 3; x++)
+ level->yamyam_content[i].e[x][y] = EL_EMPTY;
+}
+
+static void LoadLevelFromFileInfo_SP(struct LevelInfo *level,
+ struct LevelFileInfo *level_file_info)
+{
+ char *filename = level_file_info->filename;
+ FILE *file;
+ int nr = level_file_info->nr - leveldir_current->first_level;
+ int i, l, x, y;
+ char name_first, name_last;
+ struct LevelInfo multipart_level;
+ int multipart_xpos, multipart_ypos;
+ boolean is_multipart_level;
+ boolean is_first_part;
+ boolean reading_multipart_level = FALSE;
+ boolean use_empty_level = FALSE;
+
+ if (!(file = fopen(filename, MODE_READ)))
+ {
+ level->no_valid_file = TRUE;
+
+ Error(ERR_WARN, "cannot read level '%s' -- using empty level", filename);
+
+ return;
+ }
+
+ /* position file stream to the requested level inside the level package */
+ if (fseek(file, nr * SP_LEVEL_SIZE, SEEK_SET) != 0)
+ {
+ level->no_valid_file = TRUE;
+
+ Error(ERR_WARN, "cannot fseek level '%s' -- using empty level", filename);
+
+ return;
+ }
+
+ /* there exist Supaplex level package files with multi-part levels which
+ can be detected as follows: instead of leading and trailing dashes ('-')
+ to pad the level name, they have leading and trailing numbers which are
+ the x and y coordinations of the current part of the multi-part level;
+ if there are '?' characters instead of numbers on the left or right side
+ of the level name, the multi-part level consists of only horizontal or
+ vertical parts */
+
+ for (l = nr; l < NUM_SUPAPLEX_LEVELS_PER_PACKAGE; l++)
+ {
+ LoadLevelFromFileStream_SP(file, level, l);
+
+ /* check if this level is a part of a bigger multi-part level */
+
+ name_first = level->name[0];
+ name_last = level->name[SP_LEVEL_NAME_LEN - 1];
+
+ is_multipart_level =
+ ((name_first == '?' || (name_first >= '0' && name_first <= '9')) &&
+ (name_last == '?' || (name_last >= '0' && name_last <= '9')));
+
+ is_first_part =
+ ((name_first == '?' || name_first == '1') &&
+ (name_last == '?' || name_last == '1'));
+
+ /* correct leading multipart level meta information in level name */
+ for (i = 0; i < SP_LEVEL_NAME_LEN && level->name[i] == name_first; i++)
+ level->name[i] = '-';
+
+ /* correct trailing multipart level meta information in level name */
+ for (i = SP_LEVEL_NAME_LEN - 1; i >= 0 && level->name[i] == name_last; i--)
+ level->name[i] = '-';
+
+ /* ---------- check for normal single level ---------- */
+
+ if (!reading_multipart_level && !is_multipart_level)
+ {
+ /* the current level is simply a normal single-part level, and we are
+ not reading a multi-part level yet, so return the level as it is */
+
+ break;
+ }
+
+ /* ---------- check for empty level (unused multi-part) ---------- */
+
+ if (!reading_multipart_level && is_multipart_level && !is_first_part)
+ {
+ /* this is a part of a multi-part level, but not the first part
+ (and we are not already reading parts of a multi-part level);
+ in this case, use an empty level instead of the single part */
+
+ use_empty_level = TRUE;
+
+ break;
+ }
+
+ /* ---------- check for finished multi-part level ---------- */
+
+ if (reading_multipart_level &&
+ (!is_multipart_level ||
+ !strEqual(level->name, multipart_level.name)))
+ {
+ /* we are already reading parts of a multi-part level, but this level is
+ either not a multi-part level, or a part of a different multi-part
+ level; in both cases, the multi-part level seems to be complete */
+
+ break;
+ }
+
+ /* ---------- here we have one part of a multi-part level ---------- */
+
+ reading_multipart_level = TRUE;
+
+ if (is_first_part) /* start with first part of new multi-part level */
+ {
+ /* copy level info structure from first part */
+ multipart_level = *level;
+
+ /* clear playfield of new multi-part level */
+ for (y = 0; y < MAX_LEV_FIELDY; y++)
+ for (x = 0; x < MAX_LEV_FIELDX; x++)
+ multipart_level.field[x][y] = EL_EMPTY;
+ }
+
+ if (name_first == '?')
+ name_first = '1';
+ if (name_last == '?')
+ name_last = '1';
+
+ multipart_xpos = (int)(name_first - '0');
+ multipart_ypos = (int)(name_last - '0');
+
+#if 0
+ printf("----------> part (%d/%d) of multi-part level '%s'\n",
+ multipart_xpos, multipart_ypos, multipart_level.name);
+#endif
+
+ if (multipart_xpos * SP_LEVEL_XSIZE > MAX_LEV_FIELDX ||
+ multipart_ypos * SP_LEVEL_YSIZE > MAX_LEV_FIELDY)
+ {
+ Error(ERR_WARN, "multi-part level is too big -- ignoring part of it");
+
+ break;
+ }
+
+ multipart_level.fieldx = MAX(multipart_level.fieldx,
+ multipart_xpos * SP_LEVEL_XSIZE);
+ multipart_level.fieldy = MAX(multipart_level.fieldy,
+ multipart_ypos * SP_LEVEL_YSIZE);
+
+ /* copy level part at the right position of multi-part level */
+ for (y = 0; y < SP_LEVEL_YSIZE; y++)
+ {
+ for (x = 0; x < SP_LEVEL_XSIZE; x++)
+ {
+ int start_x = (multipart_xpos - 1) * SP_LEVEL_XSIZE;
+ int start_y = (multipart_ypos - 1) * SP_LEVEL_YSIZE;
+
+ multipart_level.field[start_x + x][start_y + y] = level->field[x][y];
+ }
+ }
+ }
+
+ fclose(file);
+
+ if (use_empty_level)
+ {
+ setLevelInfoToDefaults(level);
+
+ level->fieldx = SP_LEVEL_XSIZE;
+ level->fieldy = SP_LEVEL_YSIZE;
+
+ for (y = 0; y < SP_LEVEL_YSIZE; y++)
+ for (x = 0; x < SP_LEVEL_XSIZE; x++)
+ level->field[x][y] = EL_EMPTY;
+
+ strcpy(level->name, "-------- EMPTY --------");
+
+ Error(ERR_WARN, "single part of multi-part level -- using empty level");
+ }
+
+ if (reading_multipart_level)
+ *level = multipart_level;
+}
+
+
+#define DC_LEVEL_HEADER_SIZE 344
+
+unsigned short getDecodedWord_DC(unsigned short data_encoded, boolean init)
+{
+ static int last_data_encoded;
+ static int offset1;
+ static int offset2;
+ int diff;
+ int diff_hi, diff_lo;
+ int data_hi, data_lo;
+ unsigned short data_decoded;
+
+ if (init)
+ {
+ last_data_encoded = 0;
+ offset1 = -1;
+ offset2 = 0;
+
+ return 0;
+ }
+
+ diff = data_encoded - last_data_encoded;
+ diff_hi = diff & ~0xff;
+ diff_lo = diff & 0xff;
+
+ offset2 += diff_lo;
+
+ data_hi = diff_hi - (offset1 << 8) + (offset2 & 0xff00);
+ data_lo = (diff_lo + (data_hi >> 16)) & 0x00ff;
+ data_hi = data_hi & 0xff00;
+
+ data_decoded = data_hi | data_lo;
+
+ last_data_encoded = data_encoded;
+
+ offset1 = (offset1 + 1) % 31;
+ offset2 = offset2 & 0xff;
+
+ return data_decoded;
+}
+
+int getMappedElement_DC(int element)
+{
+ switch (element)
+ {
+ case 0x0000:
+ element = EL_ROCK;
+ break;
+
+ /* 0x0117 - 0x036e: (?) */
+ /* EL_DIAMOND */
+
+ /* 0x042d - 0x0684: (?) */
+ /* EL_EMERALD */
+
+ case 0x06f1:
+ element = EL_NUT;
+ break;
+
+ case 0x074c:
+ element = EL_BOMB;
+ break;
+
+ case 0x07a4:
+ element = EL_PEARL;
+ break;
+
+ case 0x0823:
+ element = EL_CRYSTAL;
+ break;
+
+ case 0x0e77: /* quicksand (boulder) */
+ element = EL_QUICKSAND_FULL;
+ break;
+
+ case 0x0e99: /* slow quicksand (boulder) */
+ element = EL_QUICKSAND_FULL;
+ break;
+
+ case 0x0ed2:
+ element = EL_EXIT_OPEN;
+ break;
+
+ case 0x0ee3:
+ element = EL_EXIT_CLOSED;
+ break;
+
+ case 0x0eeb:
+ element = EL_STEEL_EXIT_OPEN;
+ break;
+
+ case 0x0efc:
+ element = EL_STEEL_EXIT_CLOSED;
+ break;
+
+ case 0x0f4f: /* dynamite (lit 1) */
+ element = EL_DYNAMITE_ACTIVE;
+ break;
+
+ case 0x0f57: /* dynamite (lit 2) */
+ element = EL_DYNAMITE_ACTIVE;
+ break;
+
+ case 0x0f5f: /* dynamite (lit 3) */
+ element = EL_DYNAMITE_ACTIVE;
+ break;
+
+ case 0x0f67: /* dynamite (lit 4) */
+ element = EL_DYNAMITE_ACTIVE;
+ break;
+
+ case 0x0f81:
+ case 0x0f82:
+ case 0x0f83:
+ case 0x0f84:
+ element = EL_AMOEBA_WET;
+ break;
+
+ case 0x0f85:
+ element = EL_AMOEBA_DROP;
+ break;
+
+ case 0x0fb9:
+ element = EL_MAGIC_WALL;
+ break;
+
+ case 0x0fd0:
+ element = EL_SPACESHIP_UP;
+ break;
+
+ case 0x0fd9:
+ element = EL_SPACESHIP_DOWN;
+ break;
+
+ case 0x0ff1:
+ element = EL_SPACESHIP_LEFT;
+ break;
+
+ case 0x0ff9:
+ element = EL_SPACESHIP_RIGHT;
+ break;
+
+ case 0x1057:
+ element = EL_BUG_UP;
+ break;
+
+ case 0x1060:
+ element = EL_BUG_DOWN;
+ break;
+
+ case 0x1078:
+ element = EL_BUG_LEFT;
+ break;
+
+ case 0x1080:
+ element = EL_BUG_RIGHT;
+ break;
+
+ case 0x10de:
+ element = EL_MOLE_UP;
+ break;
+
+ case 0x10e7:
+ element = EL_MOLE_DOWN;
+ break;
+
+ case 0x10ff:
+ element = EL_MOLE_LEFT;
+ break;
+
+ case 0x1107:
+ element = EL_MOLE_RIGHT;
+ break;
+
+ case 0x11c0:
+ element = EL_ROBOT;
+ break;
+
+ case 0x13f5:
+ element = EL_YAMYAM;
+ break;
+
+ case 0x1425:
+ element = EL_SWITCHGATE_OPEN;
+ break;
+
+ case 0x1426:
+ element = EL_SWITCHGATE_CLOSED;
+ break;
+
+ case 0x1437:
+ element = EL_SWITCHGATE_SWITCH_UP;
+ break;
+
+ case 0x143a:
+ element = EL_TIMEGATE_CLOSED;
+ break;
+
+ case 0x144c: /* conveyor belt switch (green) */
+ element = EL_CONVEYOR_BELT_3_SWITCH_MIDDLE;
+ break;
+
+ case 0x144f: /* conveyor belt switch (red) */
+ element = EL_CONVEYOR_BELT_1_SWITCH_MIDDLE;
+ break;
+
+ case 0x1452: /* conveyor belt switch (blue) */
+ element = EL_CONVEYOR_BELT_4_SWITCH_MIDDLE;
+ break;
+
+ case 0x145b:
+ element = EL_CONVEYOR_BELT_3_MIDDLE;
+ break;
+
+ case 0x1463:
+ element = EL_CONVEYOR_BELT_3_LEFT;
+ break;
+
+ case 0x146b:
+ element = EL_CONVEYOR_BELT_3_RIGHT;
+ break;
+
+ case 0x1473:
+ element = EL_CONVEYOR_BELT_1_MIDDLE;
+ break;
+
+ case 0x147b:
+ element = EL_CONVEYOR_BELT_1_LEFT;
+ break;
+
+ case 0x1483:
+ element = EL_CONVEYOR_BELT_1_RIGHT;
+ break;
+
+ case 0x148b:
+ element = EL_CONVEYOR_BELT_4_MIDDLE;
+ break;
+
+ case 0x1493:
+ element = EL_CONVEYOR_BELT_4_LEFT;
+ break;
+
+ case 0x149b:
+ element = EL_CONVEYOR_BELT_4_RIGHT;
+ break;
+
+ case 0x14ac:
+ element = EL_EXPANDABLE_WALL_HORIZONTAL;
+ break;
+
+ case 0x14bd:
+ element = EL_EXPANDABLE_WALL_VERTICAL;
+ break;
+
+ case 0x14c6:
+ element = EL_EXPANDABLE_WALL_ANY;
+ break;
+
+ case 0x14ce: /* growing steel wall (left/right) */
+ element = EL_EXPANDABLE_WALL_HORIZONTAL;
+ break;
+
+ case 0x14df: /* growing steel wall (up/down) */
+ element = EL_EXPANDABLE_WALL_VERTICAL;
+ break;
+
+ case 0x14e8: /* growing steel wall (up/down/left/right) */
+ element = EL_EXPANDABLE_WALL_ANY;
+ break;
+
+ case 0x14e9:
+ element = EL_SHIELD_NORMAL;
+ break;
+
+ case 0x1501:
+ element = EL_EXTRA_TIME;
+ break;
+
+ case 0x154f:
+ element = EL_ACID;
+ break;
+
+ case 0x1577:
+ element = EL_EMPTY_SPACE;
+ break;
+
+ case 0x1578: /* quicksand (empty) */
+ element = EL_QUICKSAND_EMPTY;
+ break;
+
+ case 0x1579: /* slow quicksand (empty) */
+ element = EL_QUICKSAND_EMPTY;
+ break;
+
+ /* 0x157c - 0x158b: */
+ /* EL_SAND */
+
+ /* 0x1590 - 0x159f: */
+ /* EL_LANDMINE */
+
+ case 0x15a0:
+ element = EL_DYNAMITE;
+ break;
+
+ case 0x15a1: /* key (red) */
+ element = EL_EM_KEY_1;
+ break;
+
+ case 0x15a2: /* key (yellow) */
+ element = EL_EM_KEY_2;
+ break;
+
+ case 0x15a3: /* key (blue) */
+ element = EL_EM_KEY_4;
+ break;
+
+ case 0x15a4: /* key (green) */
+ element = EL_EM_KEY_3;
+ break;
+
+ case 0x15a5: /* key (white) */
+ element = EL_KEY_WHITE;
+ break;
+
+ case 0x15a6:
+ element = EL_WALL_SLIPPERY;
+ break;
+
+ case 0x15a7:
+ element = EL_WALL;
+ break;
+
+ case 0x15a8: /* wall (not round) */
+ element = EL_WALL;
+ break;
+
+ case 0x15a9: /* (blue) */
+ element = EL_CHAR_A;
+ break;
+
+ case 0x15aa: /* (blue) */
+ element = EL_CHAR_B;
+ break;
+
+ case 0x15ab: /* (blue) */
+ element = EL_CHAR_C;
+ break;
+
+ case 0x15ac: /* (blue) */
+ element = EL_CHAR_D;
+ break;
+
+ case 0x15ad: /* (blue) */
+ element = EL_CHAR_E;
+ break;
+
+ case 0x15ae: /* (blue) */
+ element = EL_CHAR_F;
+ break;
+
+ case 0x15af: /* (blue) */
+ element = EL_CHAR_G;
+ break;
+
+ case 0x15b0: /* (blue) */
+ element = EL_CHAR_H;
+ break;
+
+ case 0x15b1: /* (blue) */
+ element = EL_CHAR_I;
+ break;
+
+ case 0x15b2: /* (blue) */
+ element = EL_CHAR_J;
+ break;
+
+ case 0x15b3: /* (blue) */
+ element = EL_CHAR_K;
+ break;
+
+ case 0x15b4: /* (blue) */
+ element = EL_CHAR_L;
+ break;
+
+ case 0x15b5: /* (blue) */
+ element = EL_CHAR_M;
+ break;
+
+ case 0x15b6: /* (blue) */
+ element = EL_CHAR_N;
+ break;
+
+ case 0x15b7: /* (blue) */
+ element = EL_CHAR_O;
+ break;
+
+ case 0x15b8: /* (blue) */
+ element = EL_CHAR_P;
+ break;
+
+ case 0x15b9: /* (blue) */
+ element = EL_CHAR_Q;
+ break;
+
+ case 0x15ba: /* (blue) */
+ element = EL_CHAR_R;
+ break;
+
+ case 0x15bb: /* (blue) */
+ element = EL_CHAR_S;
+ break;
+
+ case 0x15bc: /* (blue) */
+ element = EL_CHAR_T;
+ break;
+
+ case 0x15bd: /* (blue) */
+ element = EL_CHAR_U;
+ break;
+
+ case 0x15be: /* (blue) */
+ element = EL_CHAR_V;
+ break;
+
+ case 0x15bf: /* (blue) */
+ element = EL_CHAR_W;
+ break;
+
+ case 0x15c0: /* (blue) */
+ element = EL_CHAR_X;
+ break;
+
+ case 0x15c1: /* (blue) */
+ element = EL_CHAR_Y;
+ break;
+
+ case 0x15c2: /* (blue) */
+ element = EL_CHAR_Z;
+ break;
+
+ case 0x15c3: /* (blue) */
+ element = EL_CHAR_AUMLAUT;
+ break;
+
+ case 0x15c4: /* (blue) */
+ element = EL_CHAR_OUMLAUT;
+ break;
+
+ case 0x15c5: /* (blue) */
+ element = EL_CHAR_UUMLAUT;
+ break;
+
+ case 0x15c6: /* (blue) */
+ element = EL_CHAR_0;
+ break;
+
+ case 0x15c7: /* (blue) */
+ element = EL_CHAR_1;
+ break;
+
+ case 0x15c8: /* (blue) */
+ element = EL_CHAR_2;
+ break;
+
+ case 0x15c9: /* (blue) */
+ element = EL_CHAR_3;
+ break;
+
+ case 0x15ca: /* (blue) */
+ element = EL_CHAR_4;
+ break;
+
+ case 0x15cb: /* (blue) */
+ element = EL_CHAR_5;
+ break;
+
+ case 0x15cc: /* (blue) */
+ element = EL_CHAR_6;
+ break;
+
+ case 0x15cd: /* (blue) */
+ element = EL_CHAR_7;
+ break;
+
+ case 0x15ce: /* (blue) */
+ element = EL_CHAR_8;
+ break;
+
+ case 0x15cf: /* (blue) */
+ element = EL_CHAR_9;
+ break;
+
+ case 0x15d0: /* (blue) */
+ element = EL_CHAR_PERIOD;
+ break;
+
+ case 0x15d1: /* (blue) */
+ element = EL_CHAR_EXCLAM;
+ break;
+
+ case 0x15d2: /* (blue) */
+ element = EL_CHAR_COLON;
+ break;
+
+ case 0x15d3: /* (blue) */
+ element = EL_CHAR_LESS;
+ break;
+
+ case 0x15d4: /* (blue) */
+ element = EL_CHAR_GREATER;
+ break;
+
+ case 0x15d5: /* (blue) */
+ element = EL_CHAR_QUESTION;
+ break;
+
+ case 0x15d6: /* (blue) */
+ element = EL_CHAR_COPYRIGHT;
+ break;
+
+ case 0x15d7: /* (blue) */
+ element = EL_CHAR_UP;
+ break;
+
+ case 0x15d8: /* (blue) */
+ element = EL_CHAR_DOWN;
+ break;
+
+ case 0x15d9: /* (blue) */
+ element = EL_CHAR_BUTTON;
+ break;
+
+ case 0x15da: /* (blue) */
+ element = EL_CHAR_PLUS;
+ break;
+
+ case 0x15db: /* (blue) */
+ element = EL_CHAR_MINUS;
+ break;
+
+ case 0x15dc: /* (blue) */
+ element = EL_CHAR_APOSTROPHE;
+ break;
+
+ case 0x15dd: /* (blue) */
+ element = EL_CHAR_PARENLEFT;
+ break;
+
+ case 0x15de: /* (blue) */
+ element = EL_CHAR_PARENRIGHT;
+ break;
+
+ case 0x15df: /* (green) */
+ element = EL_CHAR_A;
+ break;
+
+ case 0x15e0: /* (green) */
+ element = EL_CHAR_B;
+ break;
+
+ case 0x15e1: /* (green) */
+ element = EL_CHAR_C;
+ break;
+
+ case 0x15e2: /* (green) */
+ element = EL_CHAR_D;
+ break;
+
+ case 0x15e3: /* (green) */
+ element = EL_CHAR_E;
+ break;
+
+ case 0x15e4: /* (green) */
+ element = EL_CHAR_F;
+ break;
+
+ case 0x15e5: /* (green) */
+ element = EL_CHAR_G;
+ break;
+
+ case 0x15e6: /* (green) */
+ element = EL_CHAR_H;
+ break;
+
+ case 0x15e7: /* (green) */
+ element = EL_CHAR_I;
+ break;
+
+ case 0x15e8: /* (green) */
+ element = EL_CHAR_J;
+ break;
+
+ case 0x15e9: /* (green) */
+ element = EL_CHAR_K;
+ break;
+
+ case 0x15ea: /* (green) */
+ element = EL_CHAR_L;
+ break;
+
+ case 0x15eb: /* (green) */
+ element = EL_CHAR_M;
+ break;
+
+ case 0x15ec: /* (green) */
+ element = EL_CHAR_N;
+ break;
+
+ case 0x15ed: /* (green) */
+ element = EL_CHAR_O;
+ break;
+
+ case 0x15ee: /* (green) */
+ element = EL_CHAR_P;
+ break;
+
+ case 0x15ef: /* (green) */
+ element = EL_CHAR_Q;
+ break;
+
+ case 0x15f0: /* (green) */
+ element = EL_CHAR_R;
+ break;
+
+ case 0x15f1: /* (green) */
+ element = EL_CHAR_S;
+ break;
+
+ case 0x15f2: /* (green) */
+ element = EL_CHAR_T;
+ break;
+
+ case 0x15f3: /* (green) */
+ element = EL_CHAR_U;
+ break;
+
+ case 0x15f4: /* (green) */
+ element = EL_CHAR_V;
+ break;
+
+ case 0x15f5: /* (green) */
+ element = EL_CHAR_W;
+ break;
+
+ case 0x15f6: /* (green) */
+ element = EL_CHAR_X;
+ break;
+
+ case 0x15f7: /* (green) */
+ element = EL_CHAR_Y;
+ break;
+
+ case 0x15f8: /* (green) */
+ element = EL_CHAR_Z;
+ break;
+
+ case 0x15f9: /* (green) */
+ element = EL_CHAR_AUMLAUT;
+ break;
+
+ case 0x15fa: /* (green) */
+ element = EL_CHAR_OUMLAUT;
+ break;
+
+ case 0x15fb: /* (green) */
+ element = EL_CHAR_UUMLAUT;
+ break;
+
+ case 0x15fc: /* (green) */
+ element = EL_CHAR_0;
+ break;
+
+ case 0x15fd: /* (green) */
+ element = EL_CHAR_1;
+ break;
+
+ case 0x15fe: /* (green) */
+ element = EL_CHAR_2;
+ break;
+
+ case 0x15ff: /* (green) */
+ element = EL_CHAR_3;
+ break;
+
+ case 0x1600: /* (green) */
+ element = EL_CHAR_4;
+ break;
+
+ case 0x1601: /* (green) */
+ element = EL_CHAR_5;
+ break;
+
+ case 0x1602: /* (green) */
+ element = EL_CHAR_6;
+ break;
+
+ case 0x1603: /* (green) */
+ element = EL_CHAR_7;
+ break;
+
+ case 0x1604: /* (green) */
+ element = EL_CHAR_8;
+ break;
+
+ case 0x1605: /* (green) */
+ element = EL_CHAR_9;
+ break;
+
+ case 0x1606: /* (green) */
+ element = EL_CHAR_PERIOD;
+ break;
+
+ case 0x1607: /* (green) */
+ element = EL_CHAR_EXCLAM;
+ break;
+
+ case 0x1608: /* (green) */
+ element = EL_CHAR_COLON;
+ break;
+
+ case 0x1609: /* (green) */
+ element = EL_CHAR_LESS;
+ break;
+
+ case 0x160a: /* (green) */
+ element = EL_CHAR_GREATER;
+ break;
+
+ case 0x160b: /* (green) */
+ element = EL_CHAR_QUESTION;
+ break;
+
+ case 0x160c: /* (green) */
+ element = EL_CHAR_COPYRIGHT;
+ break;
+
+ case 0x160d: /* (green) */
+ element = EL_CHAR_UP;
+ break;
+
+ case 0x160e: /* (green) */
+ element = EL_CHAR_DOWN;
+ break;
+
+ case 0x160f: /* (green) */
+ element = EL_CHAR_BUTTON;
+ break;
+
+ case 0x1610: /* (green) */
+ element = EL_CHAR_PLUS;
+ break;
+
+ case 0x1611: /* (green) */
+ element = EL_CHAR_MINUS;
+ break;
+
+ case 0x1612: /* (green) */
+ element = EL_CHAR_APOSTROPHE;
+ break;
+
+ case 0x1613: /* (green) */
+ element = EL_CHAR_PARENLEFT;
+ break;
+
+ case 0x1614: /* (green) */
+ element = EL_CHAR_PARENRIGHT;
+ break;
+
+ case 0x1615: /* (blue steel) */
+ element = EL_STEELCHAR_A;
+ break;
+
+ case 0x1616: /* (blue steel) */
+ element = EL_STEELCHAR_B;
+ break;
+
+ case 0x1617: /* (blue steel) */
+ element = EL_STEELCHAR_C;
+ break;
+
+ case 0x1618: /* (blue steel) */
+ element = EL_STEELCHAR_D;
+ break;
+
+ case 0x1619: /* (blue steel) */
+ element = EL_STEELCHAR_E;
+ break;
+
+ case 0x161a: /* (blue steel) */
+ element = EL_STEELCHAR_F;
+ break;
+
+ case 0x161b: /* (blue steel) */
+ element = EL_STEELCHAR_G;
+ break;
+
+ case 0x161c: /* (blue steel) */
+ element = EL_STEELCHAR_H;
+ break;
+
+ case 0x161d: /* (blue steel) */
+ element = EL_STEELCHAR_I;
+ break;
+
+ case 0x161e: /* (blue steel) */
+ element = EL_STEELCHAR_J;
+ break;
+
+ case 0x161f: /* (blue steel) */
+ element = EL_STEELCHAR_K;
+ break;
+
+ case 0x1620: /* (blue steel) */
+ element = EL_STEELCHAR_L;
+ break;
+
+ case 0x1621: /* (blue steel) */
+ element = EL_STEELCHAR_M;
+ break;
+
+ case 0x1622: /* (blue steel) */
+ element = EL_STEELCHAR_N;
+ break;
+
+ case 0x1623: /* (blue steel) */
+ element = EL_STEELCHAR_O;
+ break;
+
+ case 0x1624: /* (blue steel) */
+ element = EL_STEELCHAR_P;
+ break;
+
+ case 0x1625: /* (blue steel) */
+ element = EL_STEELCHAR_Q;
+ break;
+
+ case 0x1626: /* (blue steel) */
+ element = EL_STEELCHAR_R;
+ break;
+
+ case 0x1627: /* (blue steel) */
+ element = EL_STEELCHAR_S;
+ break;
+
+ case 0x1628: /* (blue steel) */
+ element = EL_STEELCHAR_T;
+ break;
+
+ case 0x1629: /* (blue steel) */
+ element = EL_STEELCHAR_U;
+ break;
+
+ case 0x162a: /* (blue steel) */
+ element = EL_STEELCHAR_V;
+ break;
+
+ case 0x162b: /* (blue steel) */
+ element = EL_STEELCHAR_W;
+ break;
+
+ case 0x162c: /* (blue steel) */
+ element = EL_STEELCHAR_X;
+ break;
- case 0x10: return EL_BOMB;
- case 0x11: return EL_BOMB; /* EMC */
- case 0x12: return EL_EMERALD;
- case 0x13: return EL_EMERALD;
- case 0x14: return EL_BUG_UP;
- case 0x15: return EL_BUG_RIGHT;
- case 0x16: return EL_BUG_DOWN;
- case 0x17: return EL_BUG_LEFT;
- case 0x18: return EL_BUG_UP;
- case 0x19: return EL_BUG_RIGHT;
- case 0x1a: return EL_BUG_DOWN;
- case 0x1b: return EL_BUG_LEFT;
- case 0x1c: return EL_AMOEBA_DROP;
- case 0x1d: return EL_AMOEBA_DROP; /* EMC */
- case 0x1e: return EL_AMOEBA_DROP; /* EMC */
- case 0x1f: return EL_AMOEBA_DROP; /* EMC */
+ case 0x162d: /* (blue steel) */
+ element = EL_STEELCHAR_Y;
+ break;
- case 0x20: return EL_ROCK;
- case 0x21: return EL_BOMB; /* EMC */
- case 0x22: return EL_DIAMOND; /* EMC */
- case 0x23: return EL_EMERALD; /* EMC */
- case 0x24: return EL_MAGIC_WALL;
- case 0x25: return EL_NUT;
- case 0x26: return EL_NUT; /* EMC */
- case 0x27: return EL_NUT; /* EMC */
+ case 0x162e: /* (blue steel) */
+ element = EL_STEELCHAR_Z;
+ break;
- /* looks like magic wheel, but is _always_ activated */
- case 0x28: return EL_ROBOT_WHEEL; /* EMC */
+ case 0x162f: /* (blue steel) */
+ element = EL_STEELCHAR_AUMLAUT;
+ break;
- case 0x29: return EL_YAMYAM; /* up */
- case 0x2a: return EL_YAMYAM; /* down */
- case 0x2b: return EL_YAMYAM; /* left */ /* EMC */
- case 0x2c: return EL_YAMYAM; /* right */ /* EMC */
- case 0x2d: return EL_QUICKSAND_FULL;
- case 0x2e: return EL_EMPTY_SPACE; /* EMC */
- case 0x2f: return EL_EMPTY_SPACE; /* EMC */
+ case 0x1630: /* (blue steel) */
+ element = EL_STEELCHAR_OUMLAUT;
+ break;
- case 0x30: return EL_EMPTY_SPACE; /* EMC */
- case 0x31: return EL_SAND; /* EMC */
- case 0x32: return EL_SAND; /* EMC */
- case 0x33: return EL_SAND; /* EMC */
- case 0x34: return EL_QUICKSAND_FULL; /* EMC */
- case 0x35: return EL_QUICKSAND_FULL; /* EMC */
- case 0x36: return EL_QUICKSAND_FULL; /* EMC */
- case 0x37: return EL_SAND; /* EMC */
- case 0x38: return EL_ROCK; /* EMC */
- case 0x39: return EL_EXPANDABLE_WALL_HORIZONTAL; /* EMC */
- case 0x3a: return EL_EXPANDABLE_WALL_VERTICAL; /* EMC */
- case 0x3b: return EL_DYNAMITE_ACTIVE; /* 1 */
- case 0x3c: return EL_DYNAMITE_ACTIVE; /* 2 */
- case 0x3d: return EL_DYNAMITE_ACTIVE; /* 3 */
- case 0x3e: return EL_DYNAMITE_ACTIVE; /* 4 */
- case 0x3f: return EL_ACID_POOL_BOTTOM;
+ case 0x1631: /* (blue steel) */
+ element = EL_STEELCHAR_UUMLAUT;
+ break;
- case 0x40: return EL_EXIT_OPEN; /* 1 */
- case 0x41: return EL_EXIT_OPEN; /* 2 */
- case 0x42: return EL_EXIT_OPEN; /* 3 */
- case 0x43: return EL_BALLOON; /* EMC */
- case 0x44: return EL_UNKNOWN; /* EMC ("plant") */
- case 0x45: return EL_SPRING; /* EMC */
- case 0x46: return EL_SPRING; /* falling */ /* EMC */
- case 0x47: return EL_SPRING; /* left */ /* EMC */
- case 0x48: return EL_SPRING; /* right */ /* EMC */
- case 0x49: return EL_UNKNOWN; /* EMC ("ball 1") */
- case 0x4a: return EL_UNKNOWN; /* EMC ("ball 2") */
- case 0x4b: return EL_UNKNOWN; /* EMC ("android") */
- case 0x4c: return EL_EMPTY_SPACE; /* EMC */
- case 0x4d: return EL_UNKNOWN; /* EMC ("android") */
- case 0x4e: return EL_INVISIBLE_WALL; /* EMC (? "android") */
- case 0x4f: return EL_UNKNOWN; /* EMC ("android") */
+ case 0x1632: /* (blue steel) */
+ element = EL_STEELCHAR_0;
+ break;
- case 0x50: return EL_UNKNOWN; /* EMC ("android") */
- case 0x51: return EL_UNKNOWN; /* EMC ("android") */
- case 0x52: return EL_UNKNOWN; /* EMC ("android") */
- case 0x53: return EL_UNKNOWN; /* EMC ("android") */
- case 0x54: return EL_UNKNOWN; /* EMC ("android") */
- case 0x55: return EL_EMPTY_SPACE; /* EMC */
- case 0x56: return EL_EMPTY_SPACE; /* EMC */
- case 0x57: return EL_EMPTY_SPACE; /* EMC */
- case 0x58: return EL_EMPTY_SPACE; /* EMC */
- case 0x59: return EL_EMPTY_SPACE; /* EMC */
- case 0x5a: return EL_EMPTY_SPACE; /* EMC */
- case 0x5b: return EL_EMPTY_SPACE; /* EMC */
- case 0x5c: return EL_EMPTY_SPACE; /* EMC */
- case 0x5d: return EL_EMPTY_SPACE; /* EMC */
- case 0x5e: return EL_EMPTY_SPACE; /* EMC */
- case 0x5f: return EL_EMPTY_SPACE; /* EMC */
+ case 0x1633: /* (blue steel) */
+ element = EL_STEELCHAR_1;
+ break;
- case 0x60: return EL_EMPTY_SPACE; /* EMC */
- case 0x61: return EL_EMPTY_SPACE; /* EMC */
- case 0x62: return EL_EMPTY_SPACE; /* EMC */
- case 0x63: return EL_SPRING; /* left */ /* EMC */
- case 0x64: return EL_SPRING; /* right */ /* EMC */
- case 0x65: return EL_ACID; /* 1 */ /* EMC */
- case 0x66: return EL_ACID; /* 2 */ /* EMC */
- case 0x67: return EL_ACID; /* 3 */ /* EMC */
- case 0x68: return EL_ACID; /* 4 */ /* EMC */
- case 0x69: return EL_ACID; /* 5 */ /* EMC */
- case 0x6a: return EL_ACID; /* 6 */ /* EMC */
- case 0x6b: return EL_ACID; /* 7 */ /* EMC */
- case 0x6c: return EL_ACID; /* 8 */ /* EMC */
- case 0x6d: return EL_EMPTY_SPACE; /* EMC */
- case 0x6e: return EL_EMPTY_SPACE; /* EMC */
- case 0x6f: return EL_EMPTY_SPACE; /* EMC */
+ case 0x1634: /* (blue steel) */
+ element = EL_STEELCHAR_2;
+ break;
- case 0x70: return EL_EMPTY_SPACE; /* EMC */
- case 0x71: return EL_EMPTY_SPACE; /* EMC */
- case 0x72: return EL_NUT; /* left */ /* EMC */
- case 0x73: return EL_SAND; /* EMC (? "nut") */
- case 0x74: return EL_STEELWALL;
- case 0x75: return EL_EMPTY_SPACE; /* EMC */
- case 0x76: return EL_EMPTY_SPACE; /* EMC */
- case 0x77: return EL_BOMB; /* left */ /* EMC */
- case 0x78: return EL_BOMB; /* right */ /* EMC */
- case 0x79: return EL_ROCK; /* left */ /* EMC */
- case 0x7a: return EL_ROCK; /* right */ /* EMC */
- case 0x7b: return EL_ACID; /* (? EMC "blank") */
- case 0x7c: return EL_EMPTY_SPACE; /* EMC */
- case 0x7d: return EL_EMPTY_SPACE; /* EMC */
- case 0x7e: return EL_EMPTY_SPACE; /* EMC */
- case 0x7f: return EL_EMPTY_SPACE; /* EMC */
+ case 0x1635: /* (blue steel) */
+ element = EL_STEELCHAR_3;
+ break;
- case 0x80: return EL_EMPTY;
- case 0x81: return EL_WALL_SLIPPERY;
- case 0x82: return EL_SAND;
- case 0x83: return EL_STEELWALL;
- case 0x84: return EL_WALL;
- case 0x85: return EL_EM_KEY_1;
- case 0x86: return EL_EM_KEY_2;
- case 0x87: return EL_EM_KEY_4;
- case 0x88: return EL_EM_KEY_3;
- case 0x89: return EL_EM_GATE_1;
- case 0x8a: return EL_EM_GATE_2;
- case 0x8b: return EL_EM_GATE_4;
- case 0x8c: return EL_EM_GATE_3;
- case 0x8d: return EL_INVISIBLE_WALL; /* EMC (? "dripper") */
- case 0x8e: return EL_EM_GATE_1_GRAY;
- case 0x8f: return EL_EM_GATE_2_GRAY;
+ case 0x1636: /* (blue steel) */
+ element = EL_STEELCHAR_4;
+ break;
- case 0x90: return EL_EM_GATE_4_GRAY;
- case 0x91: return EL_EM_GATE_3_GRAY;
- case 0x92: return EL_MAGIC_WALL;
- case 0x93: return EL_ROBOT_WHEEL;
- case 0x94: return EL_QUICKSAND_EMPTY; /* (? EMC "sand") */
- case 0x95: return EL_ACID_POOL_TOPLEFT;
- case 0x96: return EL_ACID_POOL_TOPRIGHT;
- case 0x97: return EL_ACID_POOL_BOTTOMLEFT;
- case 0x98: return EL_ACID_POOL_BOTTOMRIGHT;
- case 0x99: return EL_ACID; /* (? EMC "fake blank") */
- case 0x9a: return EL_AMOEBA_DEAD; /* 1 */
- case 0x9b: return EL_AMOEBA_DEAD; /* 2 */
- case 0x9c: return EL_AMOEBA_DEAD; /* 3 */
- case 0x9d: return EL_AMOEBA_DEAD; /* 4 */
- case 0x9e: return EL_EXIT_CLOSED;
- case 0x9f: return EL_CHAR_LESS; /* arrow left */
+ case 0x1637: /* (blue steel) */
+ element = EL_STEELCHAR_5;
+ break;
- /* looks like normal sand, but behaves like wall */
- case 0xa0: return EL_UNKNOWN; /* EMC ("fake grass") */
- case 0xa1: return EL_UNKNOWN; /* EMC ("lenses") */
- case 0xa2: return EL_UNKNOWN; /* EMC ("magnify") */
- case 0xa3: return EL_UNKNOWN; /* EMC ("fake blank") */
- case 0xa4: return EL_UNKNOWN; /* EMC ("fake grass") */
- case 0xa5: return EL_UNKNOWN; /* EMC ("switch") */
- case 0xa6: return EL_UNKNOWN; /* EMC ("switch") */
- case 0xa7: return EL_EMPTY_SPACE; /* EMC */
- case 0xa8: return EL_EMC_WALL_1; /* EMC ("decor 8") */
- case 0xa9: return EL_EMC_WALL_2; /* EMC ("decor 9") */
- case 0xaa: return EL_EMC_WALL_3; /* EMC ("decor 10") */
- case 0xab: return EL_EMC_WALL_7; /* EMC ("decor 5") */
- case 0xac: return EL_CHAR_COMMA; /* EMC */
- case 0xad: return EL_CHAR_QUOTEDBL; /* EMC */
- case 0xae: return EL_CHAR_MINUS; /* EMC */
- case 0xaf: return EL_DYNAMITE;
+ case 0x1638: /* (blue steel) */
+ element = EL_STEELCHAR_6;
+ break;
- case 0xb0: return EL_EMC_STEELWALL_1; /* EMC ("steel 3") */
- case 0xb1: return EL_EMC_WALL_8; /* EMC ("decor 6") */
- case 0xb2: return EL_UNKNOWN; /* EMC ("decor 7") */
- case 0xb3: return EL_STEELWALL; /* 2 */ /* EMC */
- case 0xb4: return EL_WALL_SLIPPERY; /* 2 */ /* EMC */
- case 0xb5: return EL_EMC_WALL_6; /* EMC ("decor 2") */
- case 0xb6: return EL_EMC_WALL_5; /* EMC ("decor 4") */
- case 0xb7: return EL_EMC_WALL_4; /* EMC ("decor 3") */
- case 0xb8: return EL_BALLOON_SWITCH_ANY; /* EMC */
- case 0xb9: return EL_BALLOON_SWITCH_RIGHT; /* EMC */
- case 0xba: return EL_BALLOON_SWITCH_DOWN; /* EMC */
- case 0xbb: return EL_BALLOON_SWITCH_LEFT; /* EMC */
- case 0xbc: return EL_BALLOON_SWITCH_UP; /* EMC */
- case 0xbd: return EL_SAND; /* EMC ("dirt") */
- case 0xbe: return EL_UNKNOWN; /* EMC ("plant") */
- case 0xbf: return EL_UNKNOWN; /* EMC ("key 5") */
+ case 0x1639: /* (blue steel) */
+ element = EL_STEELCHAR_7;
+ break;
- case 0xc0: return EL_UNKNOWN; /* EMC ("key 6") */
- case 0xc1: return EL_UNKNOWN; /* EMC ("key 7") */
- case 0xc2: return EL_UNKNOWN; /* EMC ("key 8") */
- case 0xc3: return EL_UNKNOWN; /* EMC ("door 5") */
- case 0xc4: return EL_UNKNOWN; /* EMC ("door 6") */
- case 0xc5: return EL_UNKNOWN; /* EMC ("door 7") */
- case 0xc6: return EL_UNKNOWN; /* EMC ("door 8") */
- case 0xc7: return EL_UNKNOWN; /* EMC ("bumper") */
+ case 0x163a: /* (blue steel) */
+ element = EL_STEELCHAR_8;
+ break;
- /* characters: see above */
+ case 0x163b: /* (blue steel) */
+ element = EL_STEELCHAR_9;
+ break;
- case 0xec: return EL_CHAR_PERIOD;
- case 0xed: return EL_CHAR_EXCLAM;
- case 0xee: return EL_CHAR_COLON;
- case 0xef: return EL_CHAR_QUESTION;
+ case 0x163c: /* (blue steel) */
+ element = EL_STEELCHAR_PERIOD;
+ break;
- case 0xf0: return EL_CHAR_GREATER; /* arrow right */
- case 0xf1: return EL_CHAR_COPYRIGHT; /* EMC: "decor 1" */
- case 0xf2: return EL_UNKNOWN; /* EMC ("fake door 5") */
- case 0xf3: return EL_UNKNOWN; /* EMC ("fake door 6") */
- case 0xf4: return EL_UNKNOWN; /* EMC ("fake door 7") */
- case 0xf5: return EL_UNKNOWN; /* EMC ("fake door 8") */
- case 0xf6: return EL_EMPTY_SPACE; /* EMC */
- case 0xf7: return EL_EMPTY_SPACE; /* EMC */
+ case 0x163d: /* (blue steel) */
+ element = EL_STEELCHAR_EXCLAM;
+ break;
- case 0xf8: return EL_EMPTY_SPACE; /* EMC */
- case 0xf9: return EL_EMPTY_SPACE; /* EMC */
- case 0xfa: return EL_EMPTY_SPACE; /* EMC */
- case 0xfb: return EL_EMPTY_SPACE; /* EMC */
- case 0xfc: return EL_EMPTY_SPACE; /* EMC */
- case 0xfd: return EL_EMPTY_SPACE; /* EMC */
+ case 0x163e: /* (blue steel) */
+ element = EL_STEELCHAR_COLON;
+ break;
- case 0xfe: return EL_PLAYER_1; /* EMC: "blank" */
- case 0xff: return EL_PLAYER_2; /* EMC: "blank" */
+ case 0x163f: /* (blue steel) */
+ element = EL_STEELCHAR_LESS;
+ break;
- default:
- /* should never happen (all 8-bit value cases should be handled) */
- Error(ERR_WARN, "invalid level element %d", element);
- return EL_UNKNOWN;
- }
-}
+ case 0x1640: /* (blue steel) */
+ element = EL_STEELCHAR_GREATER;
+ break;
-#define EM_LEVEL_SIZE 2106
-#define EM_LEVEL_XSIZE 64
-#define EM_LEVEL_YSIZE 32
+ case 0x1641: /* (blue steel) */
+ element = EL_STEELCHAR_QUESTION;
+ break;
-static void OLD_LoadLevelFromFileInfo_EM(struct LevelInfo *level,
- struct LevelFileInfo *level_file_info)
-{
- char *filename = level_file_info->filename;
- FILE *file;
- unsigned char leveldata[EM_LEVEL_SIZE];
- unsigned char *header = &leveldata[EM_LEVEL_XSIZE * EM_LEVEL_YSIZE];
- int nr = level_file_info->nr;
- int i, x, y;
+ case 0x1642: /* (blue steel) */
+ element = EL_STEELCHAR_COPYRIGHT;
+ break;
+
+ case 0x1643: /* (blue steel) */
+ element = EL_STEELCHAR_UP;
+ break;
+
+ case 0x1644: /* (blue steel) */
+ element = EL_STEELCHAR_DOWN;
+ break;
+
+ case 0x1645: /* (blue steel) */
+ element = EL_STEELCHAR_BUTTON;
+ break;
+
+ case 0x1646: /* (blue steel) */
+ element = EL_STEELCHAR_PLUS;
+ break;
+
+ case 0x1647: /* (blue steel) */
+ element = EL_STEELCHAR_MINUS;
+ break;
- if (!(file = fopen(filename, MODE_READ)))
- {
- level->no_valid_file = TRUE;
+ case 0x1648: /* (blue steel) */
+ element = EL_STEELCHAR_APOSTROPHE;
+ break;
- Error(ERR_WARN, "cannot read level '%s' -- using empty level", filename);
+ case 0x1649: /* (blue steel) */
+ element = EL_STEELCHAR_PARENLEFT;
+ break;
- return;
- }
+ case 0x164a: /* (blue steel) */
+ element = EL_STEELCHAR_PARENRIGHT;
+ break;
- for (i = 0; i < EM_LEVEL_SIZE; i++)
- leveldata[i] = fgetc(file);
+ case 0x164b: /* (green steel) */
+ element = EL_STEELCHAR_A;
+ break;
- fclose(file);
+ case 0x164c: /* (green steel) */
+ element = EL_STEELCHAR_B;
+ break;
- /* check if level data is crypted by testing against known starting bytes
- of the few existing crypted level files (from Emerald Mine 1 + 2) */
+ case 0x164d: /* (green steel) */
+ element = EL_STEELCHAR_C;
+ break;
- if ((leveldata[0] == 0xf1 ||
- leveldata[0] == 0xf5) && leveldata[2] == 0xe7 && leveldata[3] == 0xee)
- {
- unsigned char code0 = 0x65;
- unsigned char code1 = 0x11;
+ case 0x164e: /* (green steel) */
+ element = EL_STEELCHAR_D;
+ break;
- if (leveldata[0] == 0xf5) /* error in crypted Emerald Mine 2 levels */
- leveldata[0] = 0xf1;
+ case 0x164f: /* (green steel) */
+ element = EL_STEELCHAR_E;
+ break;
- /* decode crypted level data */
+ case 0x1650: /* (green steel) */
+ element = EL_STEELCHAR_F;
+ break;
- for (i = 0; i < EM_LEVEL_SIZE; i++)
- {
- leveldata[i] ^= code0;
- leveldata[i] -= code1;
+ case 0x1651: /* (green steel) */
+ element = EL_STEELCHAR_G;
+ break;
- code0 = (code0 + 7) & 0xff;
- }
- }
+ case 0x1652: /* (green steel) */
+ element = EL_STEELCHAR_H;
+ break;
- level->fieldx = EM_LEVEL_XSIZE;
- level->fieldy = EM_LEVEL_YSIZE;
+ case 0x1653: /* (green steel) */
+ element = EL_STEELCHAR_I;
+ break;
- level->time = header[46] * 10;
- level->gems_needed = header[47];
+ case 0x1654: /* (green steel) */
+ element = EL_STEELCHAR_J;
+ break;
- /* The original Emerald Mine levels have their level number stored
- at the second byte of the level file...
- Do not trust this information at other level files, e.g. EMC,
- but correct it anyway (normally the first row is completely
- steel wall, so the correction does not hurt anyway). */
+ case 0x1655: /* (green steel) */
+ element = EL_STEELCHAR_K;
+ break;
- if (leveldata[1] == nr)
- leveldata[1] = leveldata[2]; /* correct level number field */
+ case 0x1656: /* (green steel) */
+ element = EL_STEELCHAR_L;
+ break;
- sprintf(level->name, "Level %d", nr); /* set level name */
+ case 0x1657: /* (green steel) */
+ element = EL_STEELCHAR_M;
+ break;
- level->score[SC_EMERALD] = header[36];
- level->score[SC_DIAMOND] = header[37];
- level->score[SC_ROBOT] = header[38];
- level->score[SC_SPACESHIP] = header[39];
- level->score[SC_BUG] = header[40];
- level->score[SC_YAMYAM] = header[41];
- level->score[SC_NUT] = header[42];
- level->score[SC_DYNAMITE] = header[43];
- level->score[SC_TIME_BONUS] = header[44];
+ case 0x1658: /* (green steel) */
+ element = EL_STEELCHAR_N;
+ break;
- level->num_yamyam_contents = 4;
+ case 0x1659: /* (green steel) */
+ element = EL_STEELCHAR_O;
+ break;
- for (i = 0; i < level->num_yamyam_contents; i++)
- for (y = 0; y < 3; y++)
- for (x = 0; x < 3; x++)
- level->yamyam_content[i][x][y] =
- map_em_element_yam(header[i * 9 + y * 3 + x]);
+ case 0x165a: /* (green steel) */
+ element = EL_STEELCHAR_P;
+ break;
- level->amoeba_speed = (header[52] * 256 + header[53]) % 256;
- level->time_magic_wall = (header[54] * 256 + header[55]) * 16 / 100;
- level->time_wheel = (header[56] * 256 + header[57]) * 16 / 100;
- level->amoeba_content = EL_DIAMOND;
+ case 0x165b: /* (green steel) */
+ element = EL_STEELCHAR_Q;
+ break;
- for (y = 0; y < level->fieldy; y++) for (x = 0; x < level->fieldx; x++)
- {
- int new_element = map_em_element_field(leveldata[y * EM_LEVEL_XSIZE + x]);
+ case 0x165c: /* (green steel) */
+ element = EL_STEELCHAR_R;
+ break;
- if (new_element == EL_AMOEBA_DEAD && level->amoeba_speed)
- new_element = EL_AMOEBA_WET;
+ case 0x165d: /* (green steel) */
+ element = EL_STEELCHAR_S;
+ break;
- level->field[x][y] = new_element;
- }
+ case 0x165e: /* (green steel) */
+ element = EL_STEELCHAR_T;
+ break;
- x = (header[48] * 256 + header[49]) % EM_LEVEL_XSIZE;
- y = (header[48] * 256 + header[49]) / EM_LEVEL_XSIZE;
- level->field[x][y] = EL_PLAYER_1;
+ case 0x165f: /* (green steel) */
+ element = EL_STEELCHAR_U;
+ break;
- x = (header[50] * 256 + header[51]) % EM_LEVEL_XSIZE;
- y = (header[50] * 256 + header[51]) / EM_LEVEL_XSIZE;
- level->field[x][y] = EL_PLAYER_2;
-}
+ case 0x1660: /* (green steel) */
+ element = EL_STEELCHAR_V;
+ break;
-#endif
+ case 0x1661: /* (green steel) */
+ element = EL_STEELCHAR_W;
+ break;
-void CopyNativeLevel_RND_to_EM(struct LevelInfo *level)
-{
- static int ball_xy[8][2] =
- {
- { 0, 0 },
- { 1, 0 },
- { 2, 0 },
- { 0, 1 },
- { 2, 1 },
- { 0, 2 },
- { 1, 2 },
- { 2, 2 },
- };
- struct LevelInfo_EM *level_em = level->native_em_level;
- struct LEVEL *lev = level_em->lev;
- struct PLAYER *ply1 = level_em->ply1;
- struct PLAYER *ply2 = level_em->ply2;
- int i, j, x, y;
+ case 0x1662: /* (green steel) */
+ element = EL_STEELCHAR_X;
+ break;
- lev->width = MIN(level->fieldx, EM_MAX_CAVE_WIDTH);
- lev->height = MIN(level->fieldy, EM_MAX_CAVE_HEIGHT);
+ case 0x1663: /* (green steel) */
+ element = EL_STEELCHAR_Y;
+ break;
- lev->time_seconds = level->time;
- lev->required_initial = level->gems_needed;
+ case 0x1664: /* (green steel) */
+ element = EL_STEELCHAR_Z;
+ break;
- lev->emerald_score = level->score[SC_EMERALD];
- lev->diamond_score = level->score[SC_DIAMOND];
- lev->alien_score = level->score[SC_ROBOT];
- lev->tank_score = level->score[SC_SPACESHIP];
- lev->bug_score = level->score[SC_BUG];
- lev->eater_score = level->score[SC_YAMYAM];
- lev->nut_score = level->score[SC_NUT];
- lev->dynamite_score = level->score[SC_DYNAMITE];
- lev->key_score = level->score[SC_KEY];
- lev->exit_score = level->score[SC_TIME_BONUS];
+ case 0x1665: /* (green steel) */
+ element = EL_STEELCHAR_AUMLAUT;
+ break;
- for (i = 0; i < MAX_ELEMENT_CONTENTS; i++)
- for (y = 0; y < 3; y++)
- for (x = 0; x < 3; x++)
- lev->eater_array[i][y * 3 + x] =
- map_element_RND_to_EM(level->yamyam_content[i][x][y]);
+ case 0x1666: /* (green steel) */
+ element = EL_STEELCHAR_OUMLAUT;
+ break;
- lev->amoeba_time = level->amoeba_speed;
- lev->wonderwall_time_initial = level->time_magic_wall;
- lev->wheel_time = level->time_wheel;
+ case 0x1667: /* (green steel) */
+ element = EL_STEELCHAR_UUMLAUT;
+ break;
- lev->android_move_time = level->android_move_time;
- lev->android_clone_time = level->android_clone_time;
- lev->ball_random = level->ball_random;
- lev->ball_state_initial = level->ball_state_initial;
- lev->ball_time = level->ball_time;
+ case 0x1668: /* (green steel) */
+ element = EL_STEELCHAR_0;
+ break;
- lev->lenses_score = level->lenses_score;
- lev->magnify_score = level->magnify_score;
- lev->slurp_score = level->slurp_score;
+ case 0x1669: /* (green steel) */
+ element = EL_STEELCHAR_1;
+ break;
- lev->lenses_time = level->lenses_time;
- lev->magnify_time = level->magnify_time;
- lev->wind_direction_initial = level->wind_direction_initial;
+ case 0x166a: /* (green steel) */
+ element = EL_STEELCHAR_2;
+ break;
- for (i = 0; i < NUM_MAGIC_BALL_CONTENTS; i++)
- for (j = 0; j < 8; j++)
- lev->ball_array[i][j] =
- map_element_RND_to_EM(level->
- ball_content[i][ball_xy[j][0]][ball_xy[j][1]]);
+ case 0x166b: /* (green steel) */
+ element = EL_STEELCHAR_3;
+ break;
- for (i = 0; i < 16; i++)
- lev->android_array[i] = FALSE; /* !!! YET TO COME !!! */
+ case 0x166c: /* (green steel) */
+ element = EL_STEELCHAR_4;
+ break;
- /* first fill the complete playfield with the default border element */
- for (y = 0; y < EM_MAX_CAVE_HEIGHT; y++)
- for (x = 0; x < EM_MAX_CAVE_WIDTH; x++)
- level_em->cave[x][y] = ZBORDER;
+ case 0x166d: /* (green steel) */
+ element = EL_STEELCHAR_5;
+ break;
- /* then copy the real level contents from level file into the playfield */
- for (y = 0; y < lev->height; y++) for (x = 0; x < lev->width; x++)
- {
- int new_element = map_element_RND_to_EM(level->field[x][y]);
+ case 0x166e: /* (green steel) */
+ element = EL_STEELCHAR_6;
+ break;
- if (level->field[x][y] == EL_AMOEBA_DEAD)
- new_element = map_element_RND_to_EM(EL_AMOEBA_WET);
+ case 0x166f: /* (green steel) */
+ element = EL_STEELCHAR_7;
+ break;
- level_em->cave[x + 1][y + 1] = new_element;
- }
+ case 0x1670: /* (green steel) */
+ element = EL_STEELCHAR_8;
+ break;
- ply1->x_initial = 0;
- ply1->y_initial = 0;
+ case 0x1671: /* (green steel) */
+ element = EL_STEELCHAR_9;
+ break;
- ply2->x_initial = 0;
- ply2->y_initial = 0;
+ case 0x1672: /* (green steel) */
+ element = EL_STEELCHAR_PERIOD;
+ break;
- /* initialize player positions and delete players from the playfield */
- for (y = 0; y < lev->height; y++) for (x = 0; x < lev->width; x++)
- {
- if (level->field[x][y] == EL_PLAYER_1)
- {
- ply1->x_initial = x + 1;
- ply1->y_initial = y + 1;
- level_em->cave[x + 1][y + 1] = map_element_RND_to_EM(EL_EMPTY);
- }
- else if (level->field[x][y] == EL_PLAYER_2)
- {
- ply2->x_initial = x + 1;
- ply2->y_initial = y + 1;
- level_em->cave[x + 1][y + 1] = map_element_RND_to_EM(EL_EMPTY);
- }
- }
-}
+ case 0x1673: /* (green steel) */
+ element = EL_STEELCHAR_EXCLAM;
+ break;
-void CopyNativeLevel_EM_to_RND(struct LevelInfo *level)
-{
- static int ball_xy[8][2] =
- {
- { 0, 0 },
- { 1, 0 },
- { 2, 0 },
- { 0, 1 },
- { 2, 1 },
- { 0, 2 },
- { 1, 2 },
- { 2, 2 },
- };
- struct LevelInfo_EM *level_em = level->native_em_level;
- struct LEVEL *lev = level_em->lev;
- struct PLAYER *ply1 = level_em->ply1;
- struct PLAYER *ply2 = level_em->ply2;
- int i, j, x, y;
+ case 0x1674: /* (green steel) */
+ element = EL_STEELCHAR_COLON;
+ break;
- level->fieldx = MIN(lev->width, MAX_LEV_FIELDX);
- level->fieldy = MIN(lev->height, MAX_LEV_FIELDY);
+ case 0x1675: /* (green steel) */
+ element = EL_STEELCHAR_LESS;
+ break;
- level->time = lev->time_seconds;
- level->gems_needed = lev->required_initial;
+ case 0x1676: /* (green steel) */
+ element = EL_STEELCHAR_GREATER;
+ break;
- sprintf(level->name, "Level %d", level->file_info.nr);
+ case 0x1677: /* (green steel) */
+ element = EL_STEELCHAR_QUESTION;
+ break;
- level->score[SC_EMERALD] = lev->emerald_score;
- level->score[SC_DIAMOND] = lev->diamond_score;
- level->score[SC_ROBOT] = lev->alien_score;
- level->score[SC_SPACESHIP] = lev->tank_score;
- level->score[SC_BUG] = lev->bug_score;
- level->score[SC_YAMYAM] = lev->eater_score;
- level->score[SC_NUT] = lev->nut_score;
- level->score[SC_DYNAMITE] = lev->dynamite_score;
- level->score[SC_KEY] = lev->key_score;
- level->score[SC_TIME_BONUS] = lev->exit_score;
+ case 0x1678: /* (green steel) */
+ element = EL_STEELCHAR_COPYRIGHT;
+ break;
- level->num_yamyam_contents = MAX_ELEMENT_CONTENTS;
+ case 0x1679: /* (green steel) */
+ element = EL_STEELCHAR_UP;
+ break;
- for (i = 0; i < level->num_yamyam_contents; i++)
- for (y = 0; y < 3; y++)
- for (x = 0; x < 3; x++)
- level->yamyam_content[i][x][y] =
- map_element_EM_to_RND(lev->eater_array[i][y * 3 + x]);
+ case 0x167a: /* (green steel) */
+ element = EL_STEELCHAR_DOWN;
+ break;
- level->amoeba_speed = lev->amoeba_time;
- level->time_magic_wall = lev->wonderwall_time_initial;
- level->time_wheel = lev->wheel_time;
+ case 0x167b: /* (green steel) */
+ element = EL_STEELCHAR_BUTTON;
+ break;
- level->android_move_time = lev->android_move_time;
- level->android_clone_time = lev->android_clone_time;
- level->ball_random = lev->ball_random;
- level->ball_state_initial = lev->ball_state_initial;
- level->ball_time = lev->ball_time;
+ case 0x167c: /* (green steel) */
+ element = EL_STEELCHAR_PLUS;
+ break;
- level->lenses_score = lev->lenses_score;
- level->magnify_score = lev->magnify_score;
- level->slurp_score = lev->slurp_score;
+ case 0x167d: /* (green steel) */
+ element = EL_STEELCHAR_MINUS;
+ break;
- level->lenses_time = lev->lenses_time;
- level->magnify_time = lev->magnify_time;
- level->wind_direction_initial = lev->wind_direction_initial;
+ case 0x167e: /* (green steel) */
+ element = EL_STEELCHAR_APOSTROPHE;
+ break;
- for (i = 0; i < NUM_MAGIC_BALL_CONTENTS; i++)
- for (j = 0; j < 8; j++)
- level->ball_content[i][ball_xy[j][0]][ball_xy[j][1]] =
- map_element_EM_to_RND(lev->ball_array[i][j]);
+ case 0x167f: /* (green steel) */
+ element = EL_STEELCHAR_PARENLEFT;
+ break;
+
+ case 0x1680: /* (green steel) */
+ element = EL_STEELCHAR_PARENRIGHT;
+ break;
+
+ case 0x1681: /* gate (red) */
+ element = EL_EM_GATE_1;
+ break;
+
+ case 0x1682: /* secret gate (red) */
+ element = EL_GATE_1_GRAY;
+ break;
- for (i = 0; i < 16; i++)
- level->android_array[i] = FALSE; /* !!! YET TO COME !!! */
+ case 0x1683: /* gate (yellow) */
+ element = EL_EM_GATE_2;
+ break;
- /* convert the playfield (some elements need special treatment) */
- for (y = 0; y < level->fieldy; y++) for (x = 0; x < level->fieldx; x++)
- {
- int new_element = map_element_EM_to_RND(level_em->cave[x + 1][y + 1]);
+ case 0x1684: /* secret gate (yellow) */
+ element = EL_GATE_2_GRAY;
+ break;
- if (new_element == EL_AMOEBA_WET && level->amoeba_speed == 0)
- new_element = EL_AMOEBA_DEAD;
+ case 0x1685: /* gate (blue) */
+ element = EL_EM_GATE_4;
+ break;
- level->field[x][y] = new_element;
- }
+ case 0x1686: /* secret gate (blue) */
+ element = EL_GATE_4_GRAY;
+ break;
- /* in case of both players set to the same field, use the first player */
- level->field[ply2->x_initial - 1][ply2->y_initial - 1] = EL_PLAYER_2;
- level->field[ply1->x_initial - 1][ply1->y_initial - 1] = EL_PLAYER_1;
+ case 0x1687: /* gate (green) */
+ element = EL_EM_GATE_3;
+ break;
-#if 0
- printf("::: native Emerald Mine file version: %d\n", level_em->file_version);
-#endif
-}
+ case 0x1688: /* secret gate (green) */
+ element = EL_GATE_3_GRAY;
+ break;
-static void LoadLevelFromFileInfo_EM(struct LevelInfo *level,
- struct LevelFileInfo *level_file_info)
-{
- if (!LoadNativeLevel_EM(level_file_info->filename))
- level->no_valid_file = TRUE;
-}
+ case 0x1689: /* gate (white) */
+ element = EL_DOOR_WHITE;
+ break;
-void CopyNativeLevel_RND_to_Native(struct LevelInfo *level)
-{
- if (level->game_engine_type == GAME_ENGINE_TYPE_EM)
- CopyNativeLevel_RND_to_EM(level);
-}
+ case 0x168a: /* secret gate (white) */
+ element = EL_DOOR_WHITE_GRAY;
+ break;
-void CopyNativeLevel_Native_to_RND(struct LevelInfo *level)
-{
- if (level->game_engine_type == GAME_ENGINE_TYPE_EM)
- CopyNativeLevel_EM_to_RND(level);
-}
+ case 0x168b: /* secret gate (no key) */
+ element = EL_UNKNOWN;
+ break;
+ case 0x168c:
+ element = EL_ROBOT_WHEEL;
+ break;
-/* ------------------------------------------------------------------------- */
-/* functions for loading SP level */
-/* ------------------------------------------------------------------------- */
+ case 0x168d:
+ element = EL_TIMEGATE_SWITCH;
+ break;
-#define NUM_SUPAPLEX_LEVELS_PER_PACKAGE 111
-#define SP_LEVEL_SIZE 1536
-#define SP_LEVEL_XSIZE 60
-#define SP_LEVEL_YSIZE 24
-#define SP_LEVEL_NAME_LEN 23
+ case 0x168e:
+ element = EL_ACID_POOL_BOTTOM;
+ break;
-static void LoadLevelFromFileStream_SP(FILE *file, struct LevelInfo *level,
- int nr)
-{
- int num_special_ports;
- int i, x, y;
+ case 0x168f:
+ element = EL_ACID_POOL_TOPLEFT;
+ break;
- /* for details of the Supaplex level format, see Herman Perk's Supaplex
- documentation file "SPFIX63.DOC" from his Supaplex "SpeedFix" package */
+ case 0x1690:
+ element = EL_ACID_POOL_TOPRIGHT;
+ break;
- /* read level body (width * height == 60 * 24 tiles == 1440 bytes) */
- for (y = 0; y < SP_LEVEL_YSIZE; y++)
- {
- for (x = 0; x < SP_LEVEL_XSIZE; x++)
- {
- int element_old = fgetc(file);
- int element_new;
+ case 0x1691:
+ element = EL_ACID_POOL_BOTTOMLEFT;
+ break;
- if (element_old <= 0x27)
- element_new = getMappedElement(EL_SP_START + element_old);
- else if (element_old == 0x28)
- element_new = EL_INVISIBLE_WALL;
- else
- {
- Error(ERR_WARN, "in level %d, at position %d, %d:", nr, x, y);
- Error(ERR_WARN, "invalid level element %d", element_old);
+ case 0x1692:
+ element = EL_ACID_POOL_BOTTOMRIGHT;
+ break;
- element_new = EL_UNKNOWN;
- }
+ case 0x1693:
+ element = EL_STEELWALL;
+ break;
- level->field[x][y] = element_new;
- }
- }
+ case 0x1694:
+ element = EL_STEELWALL_SLIPPERY;
+ break;
- ReadUnusedBytesFromFile(file, 4); /* (not used by Supaplex engine) */
+ case 0x1695: /* steel wall (not round) */
+ element = EL_STEELWALL;
+ break;
- /* initial gravity: 1 == "on", anything else (0) == "off" */
- level->initial_gravity = (fgetc(file) == 1 ? TRUE : FALSE);
+ case 0x1696: /* steel wall (left) */
+ element = EL_STEELWALL;
+ break;
- ReadUnusedBytesFromFile(file, 1); /* (not used by Supaplex engine) */
+ case 0x1697: /* steel wall (bottom) */
+ element = EL_STEELWALL;
+ break;
- /* level title in uppercase letters, padded with dashes ("-") (23 bytes) */
- for (i = 0; i < SP_LEVEL_NAME_LEN; i++)
- level->name[i] = fgetc(file);
- level->name[SP_LEVEL_NAME_LEN] = '\0';
+ case 0x1698: /* steel wall (right) */
+ element = EL_STEELWALL;
+ break;
- /* initial "freeze zonks": 2 == "on", anything else (0, 1) == "off" */
- ReadUnusedBytesFromFile(file, 1); /* (not used by R'n'D engine) */
+ case 0x1699: /* steel wall (top) */
+ element = EL_STEELWALL;
+ break;
- /* number of infotrons needed; 0 means that Supaplex will count the total
- amount of infotrons in the level and use the low byte of that number
- (a multiple of 256 infotrons will result in "0 infotrons needed"!) */
- level->gems_needed = fgetc(file);
+ case 0x169a: /* steel wall (left/bottom) */
+ element = EL_STEELWALL;
+ break;
- /* number of special ("gravity") port entries below (maximum 10 allowed) */
- num_special_ports = fgetc(file);
+ case 0x169b: /* steel wall (right/bottom) */
+ element = EL_STEELWALL;
+ break;
- /* database of properties of up to 10 special ports (6 bytes per port) */
- for (i = 0; i < 10; i++)
- {
- int port_location, port_x, port_y, port_element;
- int gravity;
+ case 0x169c: /* steel wall (right/top) */
+ element = EL_STEELWALL;
+ break;
- /* high and low byte of the location of a special port; if (x, y) are the
- coordinates of a port in the field and (0, 0) is the top-left corner,
- the 16 bit value here calculates as 2 * (x + (y * 60)) (this is twice
- of what may be expected: Supaplex works with a game field in memory
- which is 2 bytes per tile) */
- port_location = getFile16BitBE(file);
+ case 0x169d: /* steel wall (left/top) */
+ element = EL_STEELWALL;
+ break;
- /* change gravity: 1 == "turn on", anything else (0) == "turn off" */
- gravity = fgetc(file);
+ case 0x169e: /* steel wall (right/bottom small) */
+ element = EL_STEELWALL;
+ break;
- /* "freeze zonks": 2 == "turn on", anything else (0, 1) == "turn off" */
- ReadUnusedBytesFromFile(file, 1); /* (not used by R'n'D engine) */
+ case 0x169f: /* steel wall (left/bottom small) */
+ element = EL_STEELWALL;
+ break;
- /* "freeze enemies": 1 == "turn on", anything else (0) == "turn off" */
- ReadUnusedBytesFromFile(file, 1); /* (not used by R'n'D engine) */
+ case 0x16a0: /* steel wall (right/top small) */
+ element = EL_STEELWALL;
+ break;
- ReadUnusedBytesFromFile(file, 1); /* (not used by Supaplex engine) */
+ case 0x16a1: /* steel wall (left/top small) */
+ element = EL_STEELWALL;
+ break;
- if (i >= num_special_ports)
- continue;
+ case 0x16a2: /* steel wall (left/right) */
+ element = EL_STEELWALL;
+ break;
- port_x = (port_location / 2) % SP_LEVEL_XSIZE;
- port_y = (port_location / 2) / SP_LEVEL_XSIZE;
+ case 0x16a3: /* steel wall (top/bottom) */
+ element = EL_STEELWALL;
+ break;
- if (port_x < 0 || port_x >= SP_LEVEL_XSIZE ||
- port_y < 0 || port_y >= SP_LEVEL_YSIZE)
- {
- Error(ERR_WARN, "special port position (%d, %d) out of bounds",
- port_x, port_y);
+ case 0x16a4: /* steel wall 2 (left end) */
+ element = EL_STEELWALL;
+ break;
- continue;
- }
+ case 0x16a5: /* steel wall 2 (right end) */
+ element = EL_STEELWALL;
+ break;
- port_element = level->field[port_x][port_y];
+ case 0x16a6: /* steel wall 2 (top end) */
+ element = EL_STEELWALL;
+ break;
- if (port_element < EL_SP_GRAVITY_PORT_RIGHT ||
- port_element > EL_SP_GRAVITY_PORT_UP)
- {
- Error(ERR_WARN, "no special port at position (%d, %d)", port_x, port_y);
+ case 0x16a7: /* steel wall 2 (bottom end) */
+ element = EL_STEELWALL;
+ break;
- continue;
- }
+ case 0x16a8: /* steel wall 2 (left/right) */
+ element = EL_STEELWALL;
+ break;
- /* change previous (wrong) gravity inverting special port to either
- gravity enabling special port or gravity disabling special port */
- level->field[port_x][port_y] +=
- (gravity == 1 ? EL_SP_GRAVITY_ON_PORT_RIGHT :
- EL_SP_GRAVITY_OFF_PORT_RIGHT) - EL_SP_GRAVITY_PORT_RIGHT;
- }
+ case 0x16a9: /* steel wall 2 (up/down) */
+ element = EL_STEELWALL;
+ break;
- ReadUnusedBytesFromFile(file, 4); /* (not used by Supaplex engine) */
+ case 0x16aa: /* steel wall 2 (mid) */
+ element = EL_STEELWALL;
+ break;
- /* change special gravity ports without database entries to normal ports */
- for (y = 0; y < SP_LEVEL_YSIZE; y++)
- for (x = 0; x < SP_LEVEL_XSIZE; x++)
- if (level->field[x][y] >= EL_SP_GRAVITY_PORT_RIGHT &&
- level->field[x][y] <= EL_SP_GRAVITY_PORT_UP)
- level->field[x][y] += EL_SP_PORT_RIGHT - EL_SP_GRAVITY_PORT_RIGHT;
+ case 0x16ab:
+ element = EL_SIGN_EXCLAMATION;
+ break;
- /* auto-determine number of infotrons if it was stored as "0" -- see above */
- if (level->gems_needed == 0)
- {
- for (y = 0; y < SP_LEVEL_YSIZE; y++)
- for (x = 0; x < SP_LEVEL_XSIZE; x++)
- if (level->field[x][y] == EL_SP_INFOTRON)
- level->gems_needed++;
+ case 0x16ac:
+ element = EL_SIGN_RADIOACTIVITY;
+ break;
- level->gems_needed &= 0xff; /* only use low byte -- see above */
- }
+ case 0x16ad:
+ element = EL_SIGN_STOP;
+ break;
- level->fieldx = SP_LEVEL_XSIZE;
- level->fieldy = SP_LEVEL_YSIZE;
+ case 0x16ae:
+ element = EL_SIGN_WHEELCHAIR;
+ break;
- level->time = 0; /* no time limit */
- level->amoeba_speed = 0;
- level->time_magic_wall = 0;
- level->time_wheel = 0;
- level->amoeba_content = EL_EMPTY;
+ case 0x16af:
+ element = EL_SIGN_PARKING;
+ break;
- for (i = 0; i < LEVEL_SCORE_ELEMENTS; i++)
- level->score[i] = 0; /* !!! CORRECT THIS !!! */
+ case 0x16b0:
+ element = EL_SIGN_NO_ENTRY;
+ break;
- /* there are no yamyams in supaplex levels */
- for (i = 0; i < level->num_yamyam_contents; i++)
- for (y = 0; y < 3; y++)
- for (x = 0; x < 3; x++)
- level->yamyam_content[i][x][y] = EL_EMPTY;
-}
+ case 0x16b1:
+ element = EL_SIGN_HEART;
+ break;
-static void LoadLevelFromFileInfo_SP(struct LevelInfo *level,
- struct LevelFileInfo *level_file_info)
-{
- char *filename = level_file_info->filename;
- FILE *file;
- int nr = level_file_info->nr - leveldir_current->first_level;
- int i, l, x, y;
- char name_first, name_last;
- struct LevelInfo multipart_level;
- int multipart_xpos, multipart_ypos;
- boolean is_multipart_level;
- boolean is_first_part;
- boolean reading_multipart_level = FALSE;
- boolean use_empty_level = FALSE;
+ case 0x16b2:
+ element = EL_SIGN_GIVE_WAY;
+ break;
- if (!(file = fopen(filename, MODE_READ)))
- {
- level->no_valid_file = TRUE;
+ case 0x16b3:
+ element = EL_SIGN_ENTRY_FORBIDDEN;
+ break;
- Error(ERR_WARN, "cannot read level '%s' -- using empty level", filename);
+ case 0x16b4:
+ element = EL_SIGN_EMERGENCY_EXIT;
+ break;
- return;
- }
+ case 0x16b5:
+ element = EL_SIGN_YIN_YANG;
+ break;
- /* position file stream to the requested level inside the level package */
- if (fseek(file, nr * SP_LEVEL_SIZE, SEEK_SET) != 0)
- {
- level->no_valid_file = TRUE;
+ case 0x16b6:
+ element = EL_WALL_EMERALD;
+ break;
- Error(ERR_WARN, "cannot fseek level '%s' -- using empty level", filename);
+ case 0x16b7:
+ element = EL_WALL_DIAMOND;
+ break;
- return;
- }
+ case 0x16b8:
+ element = EL_WALL_PEARL;
+ break;
- /* there exist Supaplex level package files with multi-part levels which
- can be detected as follows: instead of leading and trailing dashes ('-')
- to pad the level name, they have leading and trailing numbers which are
- the x and y coordinations of the current part of the multi-part level;
- if there are '?' characters instead of numbers on the left or right side
- of the level name, the multi-part level consists of only horizontal or
- vertical parts */
+ case 0x16b9:
+ element = EL_WALL_CRYSTAL;
+ break;
- for (l = nr; l < NUM_SUPAPLEX_LEVELS_PER_PACKAGE; l++)
- {
- LoadLevelFromFileStream_SP(file, level, l);
+ case 0x16ba:
+ element = EL_INVISIBLE_WALL;
+ break;
- /* check if this level is a part of a bigger multi-part level */
+ case 0x16bb:
+ element = EL_INVISIBLE_STEELWALL;
+ break;
- name_first = level->name[0];
- name_last = level->name[SP_LEVEL_NAME_LEN - 1];
+ /* 0x16bc - 0x16cb: */
+ /* EL_INVISIBLE_SAND */
- is_multipart_level =
- ((name_first == '?' || (name_first >= '0' && name_first <= '9')) &&
- (name_last == '?' || (name_last >= '0' && name_last <= '9')));
+ case 0x16cc:
+ element = EL_LIGHT_SWITCH;
+ break;
- is_first_part =
- ((name_first == '?' || name_first == '1') &&
- (name_last == '?' || name_last == '1'));
+ case 0x16cd:
+ element = EL_ENVELOPE_1;
+ break;
- /* correct leading multipart level meta information in level name */
- for (i = 0; i < SP_LEVEL_NAME_LEN && level->name[i] == name_first; i++)
- level->name[i] = '-';
+ default:
+ if (element >= 0x0117 && element <= 0x036e) /* (?) */
+ element = EL_DIAMOND;
+ else if (element >= 0x042d && element <= 0x0684) /* (?) */
+ element = EL_EMERALD;
+ else if (element >= 0x157c && element <= 0x158b)
+ element = EL_SAND;
+ else if (element >= 0x1590 && element <= 0x159f)
+ element = EL_LANDMINE;
+ else if (element >= 0x16bc && element <= 0x16cb)
+ element = EL_INVISIBLE_SAND;
+ else
+ {
+ Error(ERR_WARN, "unknown Diamond Caves element 0x%04x", element);
+ element = EL_UNKNOWN;
+ }
+ break;
+ }
- /* correct trailing multipart level meta information in level name */
- for (i = SP_LEVEL_NAME_LEN - 1; i>=0 && level->name[i] == name_last; i--)
- level->name[i] = '-';
+ return getMappedElement(element);
+}
- /* ---------- check for normal single level ---------- */
+static void LoadLevelFromFileInfo_DC(struct LevelInfo *level,
+ struct LevelFileInfo *level_file_info)
+{
+ char *filename = level_file_info->filename;
+ FILE *file;
+#if 0
+ int nr = level_file_info->nr - leveldir_current->first_level;
+#endif
+ byte header[DC_LEVEL_HEADER_SIZE];
+ int envelope_size;
+ int envelope_header_pos = 62;
+ int envelope_content_pos = 94;
+ int level_name_pos = 251;
+ int level_author_pos = 292;
+ int envelope_header_len;
+ int envelope_content_len;
+ int level_name_len;
+ int level_author_len;
+ int fieldx, fieldy;
+ int num_yamyam_contents;
+ int i, x, y;
- if (!reading_multipart_level && !is_multipart_level)
- {
- /* the current level is simply a normal single-part level, and we are
- not reading a multi-part level yet, so return the level as it is */
+ if (!(file = fopen(filename, MODE_READ)))
+ {
+ level->no_valid_file = TRUE;
- break;
- }
+ Error(ERR_WARN, "cannot read level '%s' -- using empty level", filename);
- /* ---------- check for empty level (unused multi-part) ---------- */
+ return;
+ }
- if (!reading_multipart_level && is_multipart_level && !is_first_part)
- {
- /* this is a part of a multi-part level, but not the first part
- (and we are not already reading parts of a multi-part level);
- in this case, use an empty level instead of the single part */
+#if 0
+ /* position file stream to the requested level inside the level package */
+ if (fseek(file, nr * SP_LEVEL_SIZE, SEEK_SET) != 0)
+ {
+ level->no_valid_file = TRUE;
- use_empty_level = TRUE;
+ Error(ERR_WARN, "cannot fseek level '%s' -- using empty level", filename);
- break;
- }
+ return;
+ }
+#endif
- /* ---------- check for finished multi-part level ---------- */
+ getDecodedWord_DC(0, TRUE); /* initialize DC2 decoding engine */
- if (reading_multipart_level &&
- (!is_multipart_level ||
- strcmp(level->name, multipart_level.name) != 0))
- {
- /* we are already reading parts of a multi-part level, but this level is
- either not a multi-part level, or a part of a different multi-part
- level; in both cases, the multi-part level seems to be complete */
+ for (i = 0; i < DC_LEVEL_HEADER_SIZE / 2; i++)
+ {
+ unsigned short header_word = getDecodedWord_DC(getFile16BitBE(file), FALSE);
- break;
- }
+ header[i * 2 + 0] = header_word >> 8;
+ header[i * 2 + 1] = header_word & 0xff;
+ }
- /* ---------- here we have one part of a multi-part level ---------- */
+ /* maximum envelope header size is 31 bytes */
+ envelope_header_len = header[envelope_header_pos];
+ /* maximum envelope content size is 110 (156?) bytes */
+ envelope_content_len = header[envelope_content_pos];
- reading_multipart_level = TRUE;
+ /* maximum level title size is 40 bytes */
+ level_name_len = MIN(header[level_name_pos], MAX_LEVEL_NAME_LEN);
+ /* maximum level author size is 30 (51?) bytes */
+ level_author_len = MIN(header[level_author_pos], MAX_LEVEL_AUTHOR_LEN);
- if (is_first_part) /* start with first part of new multi-part level */
- {
- /* copy level info structure from first part */
- multipart_level = *level;
+ envelope_size = 0;
- /* clear playfield of new multi-part level */
- for (y = 0; y < MAX_LEV_FIELDY; y++)
- for (x = 0; x < MAX_LEV_FIELDX; x++)
- multipart_level.field[x][y] = EL_EMPTY;
- }
+ for (i = 0; i < envelope_header_len; i++)
+ if (envelope_size < MAX_ENVELOPE_TEXT_LEN)
+ level->envelope[0].text[envelope_size++] =
+ header[envelope_header_pos + 1 + i];
- if (name_first == '?')
- name_first = '1';
- if (name_last == '?')
- name_last = '1';
+ if (envelope_header_len > 0 && envelope_content_len > 0)
+ {
+ if (envelope_size < MAX_ENVELOPE_TEXT_LEN)
+ level->envelope[0].text[envelope_size++] = '\n';
+ if (envelope_size < MAX_ENVELOPE_TEXT_LEN)
+ level->envelope[0].text[envelope_size++] = '\n';
+ }
- multipart_xpos = (int)(name_first - '0');
- multipart_ypos = (int)(name_last - '0');
+ for (i = 0; i < envelope_content_len; i++)
+ if (envelope_size < MAX_ENVELOPE_TEXT_LEN)
+ level->envelope[0].text[envelope_size++] =
+ header[envelope_content_pos + 1 + i];
-#if 0
- printf("----------> part (%d/%d) of multi-part level '%s'\n",
- multipart_xpos, multipart_ypos, multipart_level.name);
-#endif
+ level->envelope[0].text[envelope_size] = '\0';
- if (multipart_xpos * SP_LEVEL_XSIZE > MAX_LEV_FIELDX ||
- multipart_ypos * SP_LEVEL_YSIZE > MAX_LEV_FIELDY)
- {
- Error(ERR_WARN, "multi-part level is too big -- ignoring part of it");
+ for (i = 0; i < level_name_len; i++)
+ level->name[i] = header[level_name_pos + 1 + i];
+ level->name[level_name_len] = '\0';
- break;
- }
+ for (i = 0; i < level_author_len; i++)
+ level->author[i] = header[level_author_pos + 1 + i];
+ level->author[level_author_len] = '\0';
- multipart_level.fieldx = MAX(multipart_level.fieldx,
- multipart_xpos * SP_LEVEL_XSIZE);
- multipart_level.fieldy = MAX(multipart_level.fieldy,
- multipart_ypos * SP_LEVEL_YSIZE);
+ num_yamyam_contents = header[60] | (header[61] << 8);
+ level->num_yamyam_contents =
+ MIN(MAX(MIN_ELEMENT_CONTENTS, num_yamyam_contents), MAX_ELEMENT_CONTENTS);
- /* copy level part at the right position of multi-part level */
- for (y = 0; y < SP_LEVEL_YSIZE; y++)
+ for (i = 0; i < num_yamyam_contents; i++)
+ {
+ for (y = 0; y < 3; y++) for (x = 0; x < 3; x++)
{
- for (x = 0; x < SP_LEVEL_XSIZE; x++)
- {
- int start_x = (multipart_xpos - 1) * SP_LEVEL_XSIZE;
- int start_y = (multipart_ypos - 1) * SP_LEVEL_YSIZE;
+ unsigned short word = getDecodedWord_DC(getFile16BitBE(file), FALSE);
+#if 1
+ int element_dc = ((word & 0xff) << 8) | ((word >> 8) & 0xff);
+#else
+ int element_dc = word;
+#endif
- multipart_level.field[start_x + x][start_y + y] = level->field[x][y];
- }
+ if (i < MAX_ELEMENT_CONTENTS)
+ level->yamyam_content[i].e[x][y] = getMappedElement_DC(element_dc);
}
}
- fclose(file);
+ fieldx = header[6] | (header[7] << 8);
+ fieldy = header[8] | (header[9] << 8);
+ level->fieldx = MIN(MAX(MIN_LEV_FIELDX, fieldx), MAX_LEV_FIELDX);
+ level->fieldy = MIN(MAX(MIN_LEV_FIELDY, fieldy), MAX_LEV_FIELDY);
- if (use_empty_level)
+ for (y = 0; y < fieldy; y++) for (x = 0; x < fieldx; x++)
{
- setLevelInfoToDefaults(level);
+ unsigned short word = getDecodedWord_DC(getFile16BitBE(file), FALSE);
+#if 1
+ int element_dc = ((word & 0xff) << 8) | ((word >> 8) & 0xff);
+#else
+ int element_dc = word;
+#endif
- level->fieldx = SP_LEVEL_XSIZE;
- level->fieldy = SP_LEVEL_YSIZE;
+ if (x < MAX_LEV_FIELDX && y < MAX_LEV_FIELDY)
+ level->field[x][y] = getMappedElement_DC(element_dc);
+ }
- for (y = 0; y < SP_LEVEL_YSIZE; y++)
- for (x = 0; x < SP_LEVEL_XSIZE; x++)
- level->field[x][y] = EL_EMPTY;
+ x = MIN(MAX(0, (header[10] | (header[11] << 8)) - 1), MAX_LEV_FIELDX - 1);
+ y = MIN(MAX(0, (header[12] | (header[13] << 8)) - 1), MAX_LEV_FIELDY - 1);
+ level->field[x][y] = EL_PLAYER_1;
- strcpy(level->name, "-------- EMPTY --------");
+ x = MIN(MAX(0, (header[14] | (header[15] << 8)) - 1), MAX_LEV_FIELDX - 1);
+ y = MIN(MAX(0, (header[16] | (header[17] << 8)) - 1), MAX_LEV_FIELDY - 1);
+ level->field[x][y] = EL_PLAYER_2;
- Error(ERR_WARN, "single part of multi-part level -- using empty level");
- }
+ level->gems_needed = header[18] | (header[19] << 8);
+
+ level->score[SC_EMERALD] = header[20] | (header[21] << 8);
+ level->score[SC_DIAMOND] = header[22] | (header[23] << 8);
+ level->score[SC_PEARL] = header[24] | (header[25] << 8);
+ level->score[SC_CRYSTAL] = header[26] | (header[27] << 8);
+ level->score[SC_NUT] = header[28] | (header[29] << 8);
+ level->score[SC_ROBOT] = header[30] | (header[31] << 8);
+ level->score[SC_SPACESHIP] = header[32] | (header[33] << 8);
+ level->score[SC_BUG] = header[34] | (header[35] << 8);
+ level->score[SC_YAMYAM] = header[36] | (header[37] << 8);
+ level->score[SC_DYNAMITE] = header[38] | (header[39] << 8);
+ level->score[SC_KEY] = header[40] | (header[41] << 8);
+ level->score[SC_TIME_BONUS] = header[42] | (header[43] << 8);
+
+ level->time = header[44] | (header[45] << 8);
+
+ level->amoeba_speed = header[46] | (header[47] << 8);
+ level->time_light = header[48] | (header[49] << 8);
+ level->time_timegate = header[50] | (header[51] << 8);
+ level->time_wheel = header[52] | (header[53] << 8);
+ level->time_magic_wall = header[54] | (header[55] << 8);
+ level->extra_time = header[56] | (header[57] << 8);
+ level->shield_normal_time = header[58] | (header[59] << 8);
- if (reading_multipart_level)
- *level = multipart_level;
+ fclose(file);
}
+
/* ------------------------------------------------------------------------- */
/* functions for loading generic level */
/* ------------------------------------------------------------------------- */
LoadLevelFromFileInfo_SP(level, level_file_info);
break;
+ case LEVEL_FILE_TYPE_DC:
+ LoadLevelFromFileInfo_DC(level, level_file_info);
+ break;
+
default:
LoadLevelFromFileInfo_RND(level, level_file_info);
break;
if (level->game_engine_type == GAME_ENGINE_TYPE_UNKNOWN)
level->game_engine_type = GAME_ENGINE_TYPE_RND;
- if (level_file_info->type == LEVEL_FILE_TYPE_RND)
- CopyNativeLevel_RND_to_Native(level);
- else
+ if (level_file_info->type != LEVEL_FILE_TYPE_RND)
CopyNativeLevel_Native_to_RND(level);
}
static void LoadLevel_InitVersion(struct LevelInfo *level, char *filename)
{
+ int i, j;
+
if (leveldir_current == NULL) /* only when dumping level */
return;
+ /* all engine modifications also valid for levels which use latest engine */
+ if (level->game_version < VERSION_IDENT(3,2,0,5))
+ {
+ /* time bonus score was given for 10 s instead of 1 s before 3.2.0-5 */
+ level->score[SC_TIME_BONUS] /= 10;
+ }
+
#if 0
- printf("::: sort_priority: %d\n", leveldir_current->sort_priority);
+ leveldir_current->latest_engine = TRUE; /* !!! TEST ONLY !!! */
#endif
- /* determine correct game engine version of current level */
- if (!leveldir_current->latest_engine)
+ if (leveldir_current->latest_engine)
{
- /* For all levels which are not forced to use the latest game engine
- version (normally user contributed, private and undefined levels),
- use the version of the game engine the levels were created for.
-
- Since 2.0.1, the game engine version is now directly stored
- in the level file (chunk "VERS"), so there is no need anymore
- to set the game version from the file version (except for old,
- pre-2.0 levels, where the game version is still taken from the
- file format version used to store the level -- see above). */
-
- /* player was faster than enemies in 1.0.0 and before */
- if (level->file_version == FILE_VERSION_1_0)
- level->double_speed = TRUE;
-
- /* default behaviour for EM style gems was "slippery" only in 2.0.1 */
- if (level->game_version == VERSION_IDENT(2,0,1,0))
- level->em_slippery_gems = TRUE;
-
- /* springs could be pushed over pits before (pre-release version) 2.2.0 */
- if (level->game_version < VERSION_IDENT(2,2,0,0))
- level->use_spring_bug = TRUE;
-
- /* only few elements were able to actively move into acid before 3.1.0 */
- /* trigger settings did not exist before 3.1.0; set to default "any" */
- if (level->game_version < VERSION_IDENT(3,1,0,0))
- {
- int i, j;
-
- /* correct "can move into acid" settings (all zero in old levels) */
-
- level->can_move_into_acid_bits = 0; /* nothing can move into acid */
- level->dont_collide_with_bits = 0; /* nothing is deadly when colliding */
-
- setMoveIntoAcidProperty(level, EL_ROBOT, TRUE);
- setMoveIntoAcidProperty(level, EL_SATELLITE, TRUE);
- setMoveIntoAcidProperty(level, EL_PENGUIN, TRUE);
- setMoveIntoAcidProperty(level, EL_BALLOON, TRUE);
-
- for (i = 0; i < NUM_CUSTOM_ELEMENTS; i++)
- SET_PROPERTY(EL_CUSTOM_START + i, EP_CAN_MOVE_INTO_ACID, TRUE);
-
- /* correct trigger settings (stored as zero == "none" in old levels) */
+ /* ---------- use latest game engine ----------------------------------- */
- for (i = 0; i < NUM_CUSTOM_ELEMENTS; i++)
- {
- int element = EL_CUSTOM_START + i;
- struct ElementInfo *ei = &element_info[element];
-
- for (j = 0; j < ei->num_change_pages; j++)
- {
- struct ElementChangeInfo *change = &ei->change_page[j];
-
- change->trigger_player = CH_PLAYER_ANY;
- change->trigger_page = CH_PAGE_ANY;
- }
- }
- }
- }
- else /* always use the latest game engine version */
- {
/* For all levels which are forced to use the latest game engine version
(normally all but user contributed, private and undefined levels), set
the game engine version to the actual version; this allows for actual
if (level->file_version < FILE_VERSION_2_0)
level->em_slippery_gems = TRUE;
+
+ return;
+ }
+
+ /* ---------- use game engine the level was created with ----------------- */
+
+ /* For all levels which are not forced to use the latest game engine
+ version (normally user contributed, private and undefined levels),
+ use the version of the game engine the levels were created for.
+
+ Since 2.0.1, the game engine version is now directly stored
+ in the level file (chunk "VERS"), so there is no need anymore
+ to set the game version from the file version (except for old,
+ pre-2.0 levels, where the game version is still taken from the
+ file format version used to store the level -- see above). */
+
+ /* player was faster than enemies in 1.0.0 and before */
+ if (level->file_version == FILE_VERSION_1_0)
+ for (i = 0; i < MAX_PLAYERS; i++)
+ level->initial_player_stepsize[i] = STEPSIZE_FAST;
+
+ /* default behaviour for EM style gems was "slippery" only in 2.0.1 */
+ if (level->game_version == VERSION_IDENT(2,0,1,0))
+ level->em_slippery_gems = TRUE;
+
+ /* springs could be pushed over pits before (pre-release version) 2.2.0 */
+ if (level->game_version < VERSION_IDENT(2,2,0,0))
+ level->use_spring_bug = TRUE;
+
+ if (level->game_version < VERSION_IDENT(3,2,0,5))
+ {
+ /* time orb caused limited time in endless time levels before 3.2.0-5 */
+ level->use_time_orb_bug = TRUE;
+
+ /* default behaviour for snapping was "no snap delay" before 3.2.0-5 */
+ level->block_snap_field = FALSE;
+
+ /* extra time score was same value as time left score before 3.2.0-5 */
+ level->extra_time_score = level->score[SC_TIME_BONUS];
+
+#if 0
+ /* time bonus score was given for 10 s instead of 1 s before 3.2.0-5 */
+ level->score[SC_TIME_BONUS] /= 10;
+#endif
+ }
+
+ if (level->game_version < VERSION_IDENT(3,2,0,7))
+ {
+ /* default behaviour for snapping was "not continuous" before 3.2.0-7 */
+ level->continuous_snapping = FALSE;
+ }
+
+ /* only few elements were able to actively move into acid before 3.1.0 */
+ /* trigger settings did not exist before 3.1.0; set to default "any" */
+ if (level->game_version < VERSION_IDENT(3,1,0,0))
+ {
+ /* correct "can move into acid" settings (all zero in old levels) */
+
+ level->can_move_into_acid_bits = 0; /* nothing can move into acid */
+ level->dont_collide_with_bits = 0; /* nothing is deadly when colliding */
+
+ setMoveIntoAcidProperty(level, EL_ROBOT, TRUE);
+ setMoveIntoAcidProperty(level, EL_SATELLITE, TRUE);
+ setMoveIntoAcidProperty(level, EL_PENGUIN, TRUE);
+ setMoveIntoAcidProperty(level, EL_BALLOON, TRUE);
+
+ for (i = 0; i < NUM_CUSTOM_ELEMENTS; i++)
+ SET_PROPERTY(EL_CUSTOM_START + i, EP_CAN_MOVE_INTO_ACID, TRUE);
+
+ /* correct trigger settings (stored as zero == "none" in old levels) */
+
+ for (i = 0; i < NUM_CUSTOM_ELEMENTS; i++)
+ {
+ int element = EL_CUSTOM_START + i;
+ struct ElementInfo *ei = &element_info[element];
+
+ for (j = 0; j < ei->num_change_pages; j++)
+ {
+ struct ElementChangeInfo *change = &ei->change_page[j];
+
+ change->trigger_player = CH_PLAYER_ANY;
+ change->trigger_page = CH_PAGE_ANY;
+ }
+ }
+ }
+
+ /* try to detect and fix "Snake Bite" levels, which are broken with 3.2.0 */
+ {
+ int element = EL_CUSTOM_START + 255;
+ struct ElementInfo *ei = &element_info[element];
+ struct ElementChangeInfo *change = &ei->change_page[0];
+
+ /* This is needed to fix a problem that was caused by a bugfix in function
+ game.c/CreateFieldExt() introduced with 3.2.0 that corrects the behaviour
+ when a custom element changes to EL_SOKOBAN_FIELD_PLAYER (before, it did
+ not replace walkable elements, but instead just placed the player on it,
+ without placing the Sokoban field under the player). Unfortunately, this
+ breaks "Snake Bite" style levels when the snake is halfway through a door
+ that just closes (the snake head is still alive and can be moved in this
+ case). This can be fixed by replacing the EL_SOKOBAN_FIELD_PLAYER by the
+ player (without Sokoban element) which then gets killed as designed). */
+
+ if ((strncmp(leveldir_current->identifier, "snake_bite", 10) == 0 ||
+ strncmp(ei->description, "pause b4 death", 14) == 0) &&
+ change->target_element == EL_SOKOBAN_FIELD_PLAYER)
+ change->target_element = EL_PLAYER_1;
}
}
int element = EL_CUSTOM_START + i;
/* order of checking and copying events to be mapped is important */
- for (j = CE_BY_OTHER_ACTION; j >= CE_COUNT_AT_ZERO; j--)
+ /* (do not change the start and end value -- they are constant) */
+ for (j = CE_BY_OTHER_ACTION; j >= CE_VALUE_GETS_ZERO; j--)
{
if (HAS_CHANGE_EVENT(element, j - 2))
{
}
/* order of checking and copying events to be mapped is important */
+ /* (do not change the start and end value -- they are constant) */
for (j = CE_PLAYER_COLLECTS_X; j >= CE_HITTING_SOMETHING; j--)
{
if (HAS_CHANGE_EVENT(element, j - 1))
int element = EL_CUSTOM_START + i;
struct ElementInfo *ei = &element_info[element];
- if (ei->access_direction == MV_NO_MOVING)
+ if (ei->access_direction == MV_NO_DIRECTION)
ei->access_direction = MV_ALL_DIRECTIONS;
+ }
+ }
+
+ /* correct custom element values (fix invalid values for all versions) */
+ if (1)
+ {
+ for (i = 0; i < NUM_CUSTOM_ELEMENTS; i++)
+ {
+ int element = EL_CUSTOM_START + i;
+ struct ElementInfo *ei = &element_info[element];
for (j = 0; j < ei->num_change_pages; j++)
{
struct ElementChangeInfo *change = &ei->change_page[j];
+ if (change->trigger_player == CH_PLAYER_NONE)
+ change->trigger_player = CH_PLAYER_ANY;
+
if (change->trigger_side == CH_SIDE_NONE)
change->trigger_side = CH_SIDE_ANY;
}
for (i = 0; i < MAX_ELEMENT_CONTENTS; i++)
for (x = 0; x < 3; x++)
for (y = 0; y < 3; y++)
- level->yamyam_content[i][x][y] =
- getMappedElementByVersion(level->yamyam_content[i][x][y],
+ level->yamyam_content[i].e[x][y] =
+ getMappedElementByVersion(level->yamyam_content[i].e[x][y],
level->game_version);
/* initialize element properties for level editor etc. */
InitElementPropertiesEngine(level->game_version);
+ InitElementPropertiesAfterLoading(level->game_version);
}
static void LoadLevel_InitPlayfield(struct LevelInfo *level, char *filename)
SetBorderElement();
}
+static void LoadLevel_InitNativeEngines(struct LevelInfo *level,char *filename)
+{
+ struct LevelFileInfo *level_file_info = &level->file_info;
+
+ if (level_file_info->type == LEVEL_FILE_TYPE_RND)
+ CopyNativeLevel_RND_to_Native(level);
+}
+
void LoadLevelTemplate(int nr)
{
char *filename;
LoadLevel_InitVersion(&level, filename);
LoadLevel_InitElements(&level, filename);
LoadLevel_InitPlayfield(&level, filename);
+
+ LoadLevel_InitNativeEngines(&level, filename);
+}
+
+static int SaveLevel_VERS(FILE *file, struct LevelInfo *level)
+{
+ int chunk_size = 0;
+
+ chunk_size += putFileVersion(file, level->file_version);
+ chunk_size += putFileVersion(file, level->game_version);
+
+ return chunk_size;
}
-static void SaveLevel_VERS(FILE *file, struct LevelInfo *level)
+static int SaveLevel_DATE(FILE *file, struct LevelInfo *level)
{
- putFileVersion(file, level->file_version);
- putFileVersion(file, level->game_version);
+ int chunk_size = 0;
+
+ chunk_size += putFile16BitBE(file, level->creation_date.year);
+ chunk_size += putFile8Bit(file, level->creation_date.month);
+ chunk_size += putFile8Bit(file, level->creation_date.day);
+
+ return chunk_size;
}
+#if 0
static void SaveLevel_HEAD(FILE *file, struct LevelInfo *level)
{
int i, x, y;
for (y = 0; y < 3; y++)
for (x = 0; x < 3; x++)
putFile8Bit(file, (level->encoding_16bit_yamyam ? EL_EMPTY :
- level->yamyam_content[i][x][y]));
+ level->yamyam_content[i].e[x][y]));
putFile8Bit(file, level->amoeba_speed);
putFile8Bit(file, level->time_magic_wall);
putFile8Bit(file, level->time_wheel);
putFile8Bit(file, (level->encoding_16bit_amoeba ? EL_EMPTY :
level->amoeba_content));
- putFile8Bit(file, (level->double_speed ? 1 : 0));
+ putFile8Bit(file, (level->initial_player_stepsize == STEPSIZE_FAST ? 1 : 0));
putFile8Bit(file, (level->initial_gravity ? 1 : 0));
putFile8Bit(file, (level->encoding_16bit_field ? 1 : 0));
putFile8Bit(file, (level->em_slippery_gems ? 1 : 0));
putFile8Bit(file, level->game_engine_type);
- WriteUnusedBytesToFile(file, LEVEL_HEADER_UNUSED);
+ WriteUnusedBytesToFile(file, LEVEL_CHUNK_HEAD_UNUSED);
+}
+#endif
+
+static int SaveLevel_NAME(FILE *file, struct LevelInfo *level)
+{
+ int chunk_size = 0;
+ int i;
+
+ for (i = 0; i < MAX_LEVEL_NAME_LEN; i++)
+ chunk_size += putFile8Bit(file, level->name[i]);
+
+ return chunk_size;
}
-static void SaveLevel_AUTH(FILE *file, struct LevelInfo *level)
+static int SaveLevel_AUTH(FILE *file, struct LevelInfo *level)
{
+ int chunk_size = 0;
int i;
for (i = 0; i < MAX_LEVEL_AUTHOR_LEN; i++)
- putFile8Bit(file, level->author[i]);
+ chunk_size += putFile8Bit(file, level->author[i]);
+
+ return chunk_size;
}
-static void SaveLevel_BODY(FILE *file, struct LevelInfo *level)
+#if 0
+static int SaveLevel_BODY(FILE *file, struct LevelInfo *level)
{
+ int chunk_size = 0;
int x, y;
for (y = 0; y < level->fieldy; y++)
for (x = 0; x < level->fieldx; x++)
if (level->encoding_16bit_field)
- putFile16BitBE(file, level->field[x][y]);
+ chunk_size += putFile16BitBE(file, level->field[x][y]);
else
- putFile8Bit(file, level->field[x][y]);
+ chunk_size += putFile8Bit(file, level->field[x][y]);
+
+ return chunk_size;
+}
+#endif
+
+static int SaveLevel_BODY(FILE *file, struct LevelInfo *level)
+{
+ int chunk_size = 0;
+ int x, y;
+
+ for (y = 0; y < level->fieldy; y++)
+ for (x = 0; x < level->fieldx; x++)
+ chunk_size += putFile16BitBE(file, level->field[x][y]);
+
+ return chunk_size;
}
#if 0
for (y = 0; y < 3; y++)
for (x = 0; x < 3; x++)
if (level->encoding_16bit_field)
- putFile16BitBE(file, level->yamyam_content[i][x][y]);
+ putFile16BitBE(file, level->yamyam_content[i].e[x][y]);
else
- putFile8Bit(file, level->yamyam_content[i][x][y]);
+ putFile8Bit(file, level->yamyam_content[i].e[x][y]);
}
#endif
+#if 0
static void SaveLevel_CNT2(FILE *file, struct LevelInfo *level, int element)
{
int i, x, y;
for (i = 0; i < MAX_ELEMENT_CONTENTS; i++)
for (y = 0; y < 3; y++)
for (x = 0; x < 3; x++)
- content_array[i][x][y] = level->yamyam_content[i][x][y];
+ content_array[i][x][y] = level->yamyam_content[i].e[x][y];
}
else if (element == EL_BD_AMOEBA)
{
for (x = 0; x < 3; x++)
putFile16BitBE(file, content_array[i][x][y]);
}
+#endif
-static void SaveLevel_CNT3(FILE *file, struct LevelInfo *level, int element)
+#if 0
+static int SaveLevel_CNT3(FILE *file, struct LevelInfo *level, int element)
{
- int i;
int envelope_nr = element - EL_ENVELOPE_1;
int envelope_len = strlen(level->envelope_text[envelope_nr]) + 1;
+ int chunk_size = 0;
+ int i;
- putFile16BitBE(file, element);
- putFile16BitBE(file, envelope_len);
- putFile8Bit(file, level->envelope_xsize[envelope_nr]);
- putFile8Bit(file, level->envelope_ysize[envelope_nr]);
+ chunk_size += putFile16BitBE(file, element);
+ chunk_size += putFile16BitBE(file, envelope_len);
+ chunk_size += putFile8Bit(file, level->envelope_xsize[envelope_nr]);
+ chunk_size += putFile8Bit(file, level->envelope_ysize[envelope_nr]);
WriteUnusedBytesToFile(file, LEVEL_CHUNK_CNT3_UNUSED);
+ chunk_size += LEVEL_CHUNK_CNT3_UNUSED;
for (i = 0; i < envelope_len; i++)
- putFile8Bit(file, level->envelope_text[envelope_nr][i]);
+ chunk_size += putFile8Bit(file, level->envelope_text[envelope_nr][i]);
+
+ return chunk_size;
}
+#endif
#if 0
static void SaveLevel_CUS1(FILE *file, struct LevelInfo *level,
{
int element = EL_CUSTOM_START + i;
- if (Properties[element][EP_BITFIELD_BASE] != EP_BITMASK_DEFAULT)
+ struct ElementInfo *ei = &element_info[element];
+
+ if (ei->properties[EP_BITFIELD_BASE_NR] != EP_BITMASK_DEFAULT)
{
if (check < num_changed_custom_elements)
{
putFile16BitBE(file, element);
- putFile32BitBE(file, Properties[element][EP_BITFIELD_BASE]);
+ putFile32BitBE(file, ei->properties[EP_BITFIELD_BASE_NR]);
}
check++;
for (i = 0; i < NUM_CUSTOM_ELEMENTS; i++)
{
int element = EL_CUSTOM_START + i;
+ struct ElementInfo *ei = &element_info[element];
- if (element_info[element].modified_settings)
+ if (ei->modified_settings)
{
if (check < num_changed_custom_elements)
{
putFile16BitBE(file, element);
for (j = 0; j < MAX_ELEMENT_NAME_LEN; j++)
- putFile8Bit(file, element_info[element].description[j]);
+ putFile8Bit(file, ei->description[j]);
- putFile32BitBE(file, Properties[element][EP_BITFIELD_BASE]);
+ putFile32BitBE(file, ei->properties[EP_BITFIELD_BASE_NR]);
/* some free bytes for future properties and padding */
WriteUnusedBytesToFile(file, 7);
- putFile8Bit(file, element_info[element].use_gfx_element);
- putFile16BitBE(file, element_info[element].gfx_element);
+ putFile8Bit(file, ei->use_gfx_element);
+ putFile16BitBE(file, ei->gfx_element);
- putFile8Bit(file, element_info[element].collect_score_initial);
- putFile8Bit(file, element_info[element].collect_count_initial);
+ putFile8Bit(file, ei->collect_score_initial);
+ putFile8Bit(file, ei->collect_count_initial);
- putFile16BitBE(file, element_info[element].push_delay_fixed);
- putFile16BitBE(file, element_info[element].push_delay_random);
- putFile16BitBE(file, element_info[element].move_delay_fixed);
- putFile16BitBE(file, element_info[element].move_delay_random);
+ putFile16BitBE(file, ei->push_delay_fixed);
+ putFile16BitBE(file, ei->push_delay_random);
+ putFile16BitBE(file, ei->move_delay_fixed);
+ putFile16BitBE(file, ei->move_delay_random);
- putFile16BitBE(file, element_info[element].move_pattern);
- putFile8Bit(file, element_info[element].move_direction_initial);
- putFile8Bit(file, element_info[element].move_stepsize);
+ putFile16BitBE(file, ei->move_pattern);
+ putFile8Bit(file, ei->move_direction_initial);
+ putFile8Bit(file, ei->move_stepsize);
for (y = 0; y < 3; y++)
for (x = 0; x < 3; x++)
- putFile16BitBE(file, element_info[element].content[x][y]);
+ putFile16BitBE(file, ei->content.e[x][y]);
- putFile32BitBE(file, element_info[element].change->events);
+ putFile32BitBE(file, ei->change->events);
- putFile16BitBE(file, element_info[element].change->target_element);
+ putFile16BitBE(file, ei->change->target_element);
- putFile16BitBE(file, element_info[element].change->delay_fixed);
- putFile16BitBE(file, element_info[element].change->delay_random);
- putFile16BitBE(file, element_info[element].change->delay_frames);
+ putFile16BitBE(file, ei->change->delay_fixed);
+ putFile16BitBE(file, ei->change->delay_random);
+ putFile16BitBE(file, ei->change->delay_frames);
- putFile16BitBE(file, element_info[element].change->trigger_element);
+ putFile16BitBE(file, ei->change->trigger_element);
- putFile8Bit(file, element_info[element].change->explode);
- putFile8Bit(file, element_info[element].change->use_target_content);
- putFile8Bit(file, element_info[element].change->only_if_complete);
- putFile8Bit(file, element_info[element].change->use_random_replace);
+ putFile8Bit(file, ei->change->explode);
+ putFile8Bit(file, ei->change->use_target_content);
+ putFile8Bit(file, ei->change->only_if_complete);
+ putFile8Bit(file, ei->change->use_random_replace);
- putFile8Bit(file, element_info[element].change->random_percentage);
- putFile8Bit(file, element_info[element].change->replace_when);
+ putFile8Bit(file, ei->change->random_percentage);
+ putFile8Bit(file, ei->change->replace_when);
for (y = 0; y < 3; y++)
for (x = 0; x < 3; x++)
- putFile16BitBE(file, element_info[element].change->content[x][y]);
+ putFile16BitBE(file, ei->change->content.e[x][y]);
- putFile8Bit(file, element_info[element].slippery_type);
+ putFile8Bit(file, ei->slippery_type);
/* some free bytes for future properties and padding */
WriteUnusedBytesToFile(file, LEVEL_CPART_CUS3_UNUSED);
}
#endif
+#if 0
static void SaveLevel_CUS4(FILE *file, struct LevelInfo *level, int element)
{
struct ElementInfo *ei = &element_info[element];
int i, j, x, y;
+ /* ---------- custom element base property values (96 bytes) ------------- */
+
putFile16BitBE(file, element);
for (i = 0; i < MAX_ELEMENT_NAME_LEN; i++)
putFile8Bit(file, ei->description[i]);
- putFile32BitBE(file, Properties[element][EP_BITFIELD_BASE]);
+ putFile32BitBE(file, ei->properties[EP_BITFIELD_BASE_NR]);
+
WriteUnusedBytesToFile(file, 4); /* reserved for more base properties */
putFile8Bit(file, ei->num_change_pages);
- /* some free bytes for future base property values and padding */
- WriteUnusedBytesToFile(file, 5);
-
- /* write custom property values */
+ putFile16BitBE(file, ei->ce_value_fixed_initial);
+ putFile16BitBE(file, ei->ce_value_random_initial);
+ putFile8Bit(file, ei->use_last_ce_value);
putFile8Bit(file, ei->use_gfx_element);
putFile16BitBE(file, ei->gfx_element);
for (y = 0; y < 3; y++)
for (x = 0; x < 3; x++)
- putFile16BitBE(file, ei->content[x][y]);
+ putFile16BitBE(file, ei->content.e[x][y]);
putFile16BitBE(file, ei->move_enter_element);
putFile16BitBE(file, ei->move_leave_element);
/* some free bytes for future custom property values and padding */
WriteUnusedBytesToFile(file, 1);
- /* write change property values */
+ /* ---------- change page property values (48 bytes) --------------------- */
for (i = 0; i < ei->num_change_pages; i++)
{
struct ElementChangeInfo *change = &ei->change_page[i];
- unsigned long event_bits = 0;
+ unsigned int event_bits;
- for (j = 0; j < NUM_CHANGE_EVENTS; j++)
+ /* bits 0 - 31 of "has_event[]" ... */
+ event_bits = 0;
+ for (j = 0; j < MIN(NUM_CHANGE_EVENTS, 32); j++)
if (change->has_event[j])
event_bits |= (1 << j);
-
putFile32BitBE(file, event_bits);
putFile16BitBE(file, change->target_element);
for (y = 0; y < 3; y++)
for (x = 0; x < 3; x++)
- putFile16BitBE(file, change->target_content[x][y]);
+ putFile16BitBE(file, change->target_content.e[x][y]);
putFile8Bit(file, change->can_change);
putFile8Bit(file, change->action_mode);
putFile16BitBE(file, change->action_arg);
- /* some free bytes for future change property values and padding */
- WriteUnusedBytesToFile(file, 1);
+ /* ... bits 32 - 39 of "has_event[]" (not nice, but downward compatible) */
+ event_bits = 0;
+ for (j = 32; j < NUM_CHANGE_EVENTS; j++)
+ if (change->has_event[j])
+ event_bits |= (1 << (j - 32));
+ putFile8Bit(file, event_bits);
}
}
+#endif
+#if 0
static void SaveLevel_GRP1(FILE *file, struct LevelInfo *level, int element)
{
struct ElementInfo *ei = &element_info[element];
for (i = 0; i < MAX_ELEMENTS_IN_GROUP; i++)
putFile16BitBE(file, group->element[i]);
}
+#endif
+
+static int SaveLevel_MicroChunk(FILE *file, struct LevelFileConfigInfo *entry,
+ boolean write_element)
+{
+ int save_type = entry->save_type;
+ int data_type = entry->data_type;
+ int conf_type = entry->conf_type;
+ int byte_mask = conf_type & CONF_MASK_BYTES;
+ int element = entry->element;
+ int default_value = entry->default_value;
+ int num_bytes = 0;
+ boolean modified = FALSE;
+
+ if (byte_mask != CONF_MASK_MULTI_BYTES)
+ {
+ void *value_ptr = entry->value;
+ int value = (data_type == TYPE_BOOLEAN ? *(boolean *)value_ptr :
+ *(int *)value_ptr);
+
+ /* check if any settings have been modified before saving them */
+ if (value != default_value)
+ modified = TRUE;
+
+ /* do not save if explicitly told or if unmodified default settings */
+ if ((save_type == SAVE_CONF_NEVER) ||
+ (save_type == SAVE_CONF_WHEN_CHANGED && !modified))
+ return 0;
+
+ if (write_element)
+ num_bytes += putFile16BitBE(file, element);
+
+ num_bytes += putFile8Bit(file, conf_type);
+ num_bytes += (byte_mask == CONF_MASK_1_BYTE ? putFile8Bit (file, value) :
+ byte_mask == CONF_MASK_2_BYTE ? putFile16BitBE(file, value) :
+ byte_mask == CONF_MASK_4_BYTE ? putFile32BitBE(file, value) :
+ 0);
+ }
+ else if (data_type == TYPE_STRING)
+ {
+ char *default_string = entry->default_string;
+ char *string = (char *)(entry->value);
+ int string_length = strlen(string);
+ int i;
+
+ /* check if any settings have been modified before saving them */
+ if (!strEqual(string, default_string))
+ modified = TRUE;
+
+ /* do not save if explicitly told or if unmodified default settings */
+ if ((save_type == SAVE_CONF_NEVER) ||
+ (save_type == SAVE_CONF_WHEN_CHANGED && !modified))
+ return 0;
+
+ if (write_element)
+ num_bytes += putFile16BitBE(file, element);
+
+ num_bytes += putFile8Bit(file, conf_type);
+ num_bytes += putFile16BitBE(file, string_length);
+
+ for (i = 0; i < string_length; i++)
+ num_bytes += putFile8Bit(file, string[i]);
+ }
+ else if (data_type == TYPE_ELEMENT_LIST)
+ {
+ int *element_array = (int *)(entry->value);
+ int num_elements = *(int *)(entry->num_entities);
+ int i;
+
+ /* check if any settings have been modified before saving them */
+ for (i = 0; i < num_elements; i++)
+ if (element_array[i] != default_value)
+ modified = TRUE;
+
+ /* do not save if explicitly told or if unmodified default settings */
+ if ((save_type == SAVE_CONF_NEVER) ||
+ (save_type == SAVE_CONF_WHEN_CHANGED && !modified))
+ return 0;
+
+ if (write_element)
+ num_bytes += putFile16BitBE(file, element);
+
+ num_bytes += putFile8Bit(file, conf_type);
+ num_bytes += putFile16BitBE(file, num_elements * CONF_ELEMENT_NUM_BYTES);
+
+ for (i = 0; i < num_elements; i++)
+ num_bytes += putFile16BitBE(file, element_array[i]);
+ }
+ else if (data_type == TYPE_CONTENT_LIST)
+ {
+ struct Content *content = (struct Content *)(entry->value);
+ int num_contents = *(int *)(entry->num_entities);
+ int i, x, y;
+
+ /* check if any settings have been modified before saving them */
+ for (i = 0; i < num_contents; i++)
+ for (y = 0; y < 3; y++)
+ for (x = 0; x < 3; x++)
+ if (content[i].e[x][y] != default_value)
+ modified = TRUE;
+
+ /* do not save if explicitly told or if unmodified default settings */
+ if ((save_type == SAVE_CONF_NEVER) ||
+ (save_type == SAVE_CONF_WHEN_CHANGED && !modified))
+ return 0;
+
+ if (write_element)
+ num_bytes += putFile16BitBE(file, element);
+
+ num_bytes += putFile8Bit(file, conf_type);
+ num_bytes += putFile16BitBE(file, num_contents * CONF_CONTENT_NUM_BYTES);
+
+ for (i = 0; i < num_contents; i++)
+ for (y = 0; y < 3; y++)
+ for (x = 0; x < 3; x++)
+ num_bytes += putFile16BitBE(file, content[i].e[x][y]);
+ }
+
+ return num_bytes;
+}
+
+static int SaveLevel_INFO(FILE *file, struct LevelInfo *level)
+{
+ int chunk_size = 0;
+ int i;
+
+ li = *level; /* copy level data into temporary buffer */
+
+ for (i = 0; chunk_config_INFO[i].data_type != -1; i++)
+ chunk_size += SaveLevel_MicroChunk(file, &chunk_config_INFO[i], FALSE);
+
+ return chunk_size;
+}
+
+static int SaveLevel_ELEM(FILE *file, struct LevelInfo *level)
+{
+ int chunk_size = 0;
+ int i;
+
+ li = *level; /* copy level data into temporary buffer */
+
+ for (i = 0; chunk_config_ELEM[i].data_type != -1; i++)
+ chunk_size += SaveLevel_MicroChunk(file, &chunk_config_ELEM[i], TRUE);
+
+ return chunk_size;
+}
+
+static int SaveLevel_NOTE(FILE *file, struct LevelInfo *level, int element)
+{
+ int envelope_nr = element - EL_ENVELOPE_1;
+ int chunk_size = 0;
+ int i;
+
+ chunk_size += putFile16BitBE(file, element);
+
+ /* copy envelope data into temporary buffer */
+ xx_envelope = level->envelope[envelope_nr];
+
+ for (i = 0; chunk_config_NOTE[i].data_type != -1; i++)
+ chunk_size += SaveLevel_MicroChunk(file, &chunk_config_NOTE[i], FALSE);
+
+ return chunk_size;
+}
+
+static int SaveLevel_CUSX(FILE *file, struct LevelInfo *level, int element)
+{
+ struct ElementInfo *ei = &element_info[element];
+ int chunk_size = 0;
+ int i, j;
+
+ chunk_size += putFile16BitBE(file, element);
+
+ xx_ei = *ei; /* copy element data into temporary buffer */
+
+ /* set default description string for this specific element */
+ strcpy(xx_default_description, getDefaultElementDescription(ei));
+
+#if 0
+ /* set (fixed) number of content areas (may be wrong by broken level file) */
+ /* (this is now directly corrected for broken level files after loading) */
+ xx_num_contents = 1;
+#endif
+
+ for (i = 0; chunk_config_CUSX_base[i].data_type != -1; i++)
+ chunk_size += SaveLevel_MicroChunk(file, &chunk_config_CUSX_base[i], FALSE);
+
+ for (i = 0; i < ei->num_change_pages; i++)
+ {
+ struct ElementChangeInfo *change = &ei->change_page[i];
+
+ xx_current_change_page = i;
+
+ xx_change = *change; /* copy change data into temporary buffer */
+
+ resetEventBits();
+ setEventBitsFromEventFlags(change);
+
+ for (j = 0; chunk_config_CUSX_change[j].data_type != -1; j++)
+ chunk_size += SaveLevel_MicroChunk(file, &chunk_config_CUSX_change[j],
+ FALSE);
+ }
+
+ return chunk_size;
+}
+
+static int SaveLevel_GRPX(FILE *file, struct LevelInfo *level, int element)
+{
+ struct ElementInfo *ei = &element_info[element];
+ struct ElementGroupInfo *group = ei->group;
+ int chunk_size = 0;
+ int i;
+
+ chunk_size += putFile16BitBE(file, element);
+
+ xx_ei = *ei; /* copy element data into temporary buffer */
+ xx_group = *group; /* copy group data into temporary buffer */
+
+ /* set default description string for this specific element */
+ strcpy(xx_default_description, getDefaultElementDescription(ei));
+
+ for (i = 0; chunk_config_GRPX[i].data_type != -1; i++)
+ chunk_size += SaveLevel_MicroChunk(file, &chunk_config_GRPX[i], FALSE);
+
+ return chunk_size;
+}
static void SaveLevelFromFilename(struct LevelInfo *level, char *filename)
{
- int body_chunk_size;
- int i, x, y;
+ int chunk_size;
+ int i;
FILE *file;
if (!(file = fopen(filename, MODE_WRITE)))
level->file_version = FILE_VERSION_ACTUAL;
level->game_version = GAME_VERSION_ACTUAL;
- /* check level field for 16-bit elements */
- level->encoding_16bit_field = FALSE;
- for (y = 0; y < level->fieldy; y++)
- for (x = 0; x < level->fieldx; x++)
- if (level->field[x][y] > 255)
- level->encoding_16bit_field = TRUE;
-
- /* check yamyam content for 16-bit elements */
- level->encoding_16bit_yamyam = FALSE;
- for (i = 0; i < level->num_yamyam_contents; i++)
- for (y = 0; y < 3; y++)
- for (x = 0; x < 3; x++)
- if (level->yamyam_content[i][x][y] > 255)
- level->encoding_16bit_yamyam = TRUE;
-
- /* check amoeba content for 16-bit elements */
- level->encoding_16bit_amoeba = FALSE;
- if (level->amoeba_content > 255)
- level->encoding_16bit_amoeba = TRUE;
-
- /* calculate size of "BODY" chunk */
- body_chunk_size =
- level->fieldx * level->fieldy * (level->encoding_16bit_field ? 2 : 1);
+ level->creation_date = getCurrentDate();
putFileChunkBE(file, "RND1", CHUNK_SIZE_UNDEFINED);
putFileChunkBE(file, "CAVE", CHUNK_SIZE_NONE);
- putFileChunkBE(file, "VERS", FILE_VERS_CHUNK_SIZE);
+ chunk_size = SaveLevel_VERS(NULL, level);
+ putFileChunkBE(file, "VERS", chunk_size);
SaveLevel_VERS(file, level);
- putFileChunkBE(file, "HEAD", LEVEL_HEADER_SIZE);
- SaveLevel_HEAD(file, level);
+ chunk_size = SaveLevel_DATE(NULL, level);
+ putFileChunkBE(file, "DATE", chunk_size);
+ SaveLevel_DATE(file, level);
+
+ chunk_size = SaveLevel_NAME(NULL, level);
+ putFileChunkBE(file, "NAME", chunk_size);
+ SaveLevel_NAME(file, level);
- putFileChunkBE(file, "AUTH", MAX_LEVEL_AUTHOR_LEN);
+ chunk_size = SaveLevel_AUTH(NULL, level);
+ putFileChunkBE(file, "AUTH", chunk_size);
SaveLevel_AUTH(file, level);
- putFileChunkBE(file, "BODY", body_chunk_size);
+ chunk_size = SaveLevel_INFO(NULL, level);
+ putFileChunkBE(file, "INFO", chunk_size);
+ SaveLevel_INFO(file, level);
+
+ chunk_size = SaveLevel_BODY(NULL, level);
+ putFileChunkBE(file, "BODY", chunk_size);
SaveLevel_BODY(file, level);
- if (level->encoding_16bit_yamyam ||
- level->num_yamyam_contents != STD_ELEMENT_CONTENTS)
+ chunk_size = SaveLevel_ELEM(NULL, level);
+ if (chunk_size > LEVEL_CHUNK_ELEM_UNCHANGED) /* save if changed */
{
- putFileChunkBE(file, "CNT2", LEVEL_CHUNK_CNT2_SIZE);
- SaveLevel_CNT2(file, level, EL_YAMYAM);
+ putFileChunkBE(file, "ELEM", chunk_size);
+ SaveLevel_ELEM(file, level);
}
- if (level->encoding_16bit_amoeba)
+ for (i = 0; i < NUM_ENVELOPES; i++)
{
- putFileChunkBE(file, "CNT2", LEVEL_CHUNK_CNT2_SIZE);
- SaveLevel_CNT2(file, level, EL_BD_AMOEBA);
- }
+ int element = EL_ENVELOPE_1 + i;
- /* check for envelope content */
- for (i = 0; i < 4; i++)
- {
- if (strlen(level->envelope_text[i]) > 0)
+ chunk_size = SaveLevel_NOTE(NULL, level, element);
+ if (chunk_size > LEVEL_CHUNK_NOTE_UNCHANGED) /* save if changed */
{
- int envelope_len = strlen(level->envelope_text[i]) + 1;
-
- putFileChunkBE(file, "CNT3", LEVEL_CHUNK_CNT3_SIZE(envelope_len));
- SaveLevel_CNT3(file, level, EL_ENVELOPE_1 + i);
+ putFileChunkBE(file, "NOTE", chunk_size);
+ SaveLevel_NOTE(file, level, element);
}
}
- /* check for non-default custom elements (unless using template level) */
+ /* if not using template level, check for non-default custom/group elements */
if (!level->use_custom_template)
{
for (i = 0; i < NUM_CUSTOM_ELEMENTS; i++)
{
int element = EL_CUSTOM_START + i;
- if (element_info[element].modified_settings)
+ chunk_size = SaveLevel_CUSX(NULL, level, element);
+ if (chunk_size > LEVEL_CHUNK_CUSX_UNCHANGED) /* save if changed */
{
- int num_change_pages = element_info[element].num_change_pages;
-
- putFileChunkBE(file, "CUS4", LEVEL_CHUNK_CUS4_SIZE(num_change_pages));
- SaveLevel_CUS4(file, level, element);
+ putFileChunkBE(file, "CUSX", chunk_size);
+ SaveLevel_CUSX(file, level, element);
}
}
- }
- /* check for non-default group elements (unless using template level) */
- if (!level->use_custom_template)
- {
for (i = 0; i < NUM_GROUP_ELEMENTS; i++)
{
int element = EL_GROUP_START + i;
- if (element_info[element].modified_settings)
+ chunk_size = SaveLevel_GRPX(NULL, level, element);
+ if (chunk_size > LEVEL_CHUNK_GRPX_UNCHANGED) /* save if changed */
{
- putFileChunkBE(file, "GRP1", LEVEL_CHUNK_GRP1_SIZE);
- SaveLevel_GRP1(file, level, element);
+ putFileChunkBE(file, "GRPX", chunk_size);
+ SaveLevel_GRPX(file, level, element);
}
}
}
SaveLevelFromFilename(&level, filename);
}
+boolean SaveLevelChecked(int nr)
+{
+ char *filename = getDefaultLevelFilename(nr);
+ boolean new_level = !fileExists(filename);
+ boolean level_saved = FALSE;
+
+ if (new_level || Request("Save this level and kill the old ?", REQ_ASK))
+ {
+ SaveLevel(nr);
+
+ if (new_level)
+ Request("Level saved !", REQ_CONFIRM);
+
+ level_saved = TRUE;
+ }
+
+ return level_saved;
+}
+
void DumpLevel(struct LevelInfo *level)
{
if (level->no_valid_file)
printf("\n");
printf("Amoeba speed: %d\n", level->amoeba_speed);
printf("\n");
- printf("Initial gravity: %s\n", (level->initial_gravity ? "yes" : "no"));
- printf("Double speed movement: %s\n", (level->double_speed ? "yes" : "no"));
+
printf("EM style slippery gems: %s\n", (level->em_slippery_gems ? "yes" : "no"));
printf("Player blocks last field: %s\n", (level->block_last_field ? "yes" : "no"));
printf("SP player blocks last field: %s\n", (level->sp_block_last_field ? "yes" : "no"));
}
}
- ReadUnusedBytesFromFile(file, TAPE_HEADER_UNUSED);
+ ReadUnusedBytesFromFile(file, TAPE_CHUNK_HEAD_UNUSED);
engine_version = getFileVersion(file);
if (engine_version > 0)
for (j = 0; j < MAX_PLAYERS; j++)
{
- tape->pos[i].action[j] = MV_NO_MOVING;
+ tape->pos[i].action[j] = MV_NONE;
if (tape->player_participates[j])
tape->pos[i].action[j] = getFile8Bit(file);
/* delay part */
for (j = 0; j < MAX_PLAYERS; j++)
- tape->pos[i].action[j] = MV_NO_MOVING;
+ tape->pos[i].action[j] = MV_NONE;
tape->pos[i].delay--;
i++;
}
getFileChunkBE(file, chunk_name, NULL);
- if (strcmp(chunk_name, "RND1") == 0)
+ if (strEqual(chunk_name, "RND1"))
{
getFile32BitBE(file); /* not used */
getFileChunkBE(file, chunk_name, NULL);
- if (strcmp(chunk_name, "TAPE") != 0)
+ if (!strEqual(chunk_name, "TAPE"))
{
tape.no_valid_file = TRUE;
if (tape.file_version < FILE_VERSION_1_2)
{
/* tape files from versions before 1.2.0 without chunk structure */
- LoadTape_HEAD(file, TAPE_HEADER_SIZE, &tape);
- LoadTape_BODY(file, 2 * tape.length, &tape);
+ LoadTape_HEAD(file, TAPE_CHUNK_HEAD_SIZE, &tape);
+ LoadTape_BODY(file, 2 * tape.length, &tape);
}
else
{
}
chunk_info[] =
{
- { "VERS", FILE_VERS_CHUNK_SIZE, LoadTape_VERS },
- { "HEAD", TAPE_HEADER_SIZE, LoadTape_HEAD },
+ { "VERS", TAPE_CHUNK_VERS_SIZE, LoadTape_VERS },
+ { "HEAD", TAPE_CHUNK_HEAD_SIZE, LoadTape_HEAD },
{ "INFO", -1, LoadTape_INFO },
{ "BODY", -1, LoadTape_BODY },
{ NULL, 0, NULL }
int i = 0;
while (chunk_info[i].name != NULL &&
- strcmp(chunk_name, chunk_info[i].name) != 0)
+ !strEqual(chunk_name, chunk_info[i].name))
i++;
if (chunk_info[i].name == NULL)
tape.length_seconds = GetTapeLength();
#if 0
+ printf("::: tape file version: %d\n", tape.file_version);
printf("::: tape game version: %d\n", tape.game_version);
printf("::: tape engine version: %d\n", tape.engine_version);
#endif
putFile8Bit(file, store_participating_players);
/* unused bytes not at the end here for 4-byte alignment of engine_version */
- WriteUnusedBytesToFile(file, TAPE_HEADER_UNUSED);
+ WriteUnusedBytesToFile(file, TAPE_CHUNK_HEAD_UNUSED);
putFileVersion(file, tape->engine_version);
}
{
char *filename = getTapeFilename(nr);
FILE *file;
+#if 0
boolean new_tape = TRUE;
+#endif
int num_participating_players = 0;
int info_chunk_size;
int body_chunk_size;
InitTapeDirectory(leveldir_current->subdir);
+#if 0
/* if a tape still exists, ask to overwrite it */
if (fileExists(filename))
{
if (!Request("Replace old tape ?", REQ_ASK))
return;
}
+#endif
if (!(file = fopen(filename, MODE_WRITE)))
{
putFileChunkBE(file, "RND1", CHUNK_SIZE_UNDEFINED);
putFileChunkBE(file, "TAPE", CHUNK_SIZE_NONE);
- putFileChunkBE(file, "VERS", FILE_VERS_CHUNK_SIZE);
+ putFileChunkBE(file, "VERS", TAPE_CHUNK_VERS_SIZE);
SaveTape_VERS(file, &tape);
- putFileChunkBE(file, "HEAD", TAPE_HEADER_SIZE);
+ putFileChunkBE(file, "HEAD", TAPE_CHUNK_HEAD_SIZE);
SaveTape_HEAD(file, &tape);
putFileChunkBE(file, "INFO", info_chunk_size);
tape.changed = FALSE;
+#if 0
if (new_tape)
Request("Tape saved !", REQ_CONFIRM);
+#endif
+}
+
+boolean SaveTapeChecked(int nr)
+{
+ char *filename = getTapeFilename(nr);
+ boolean new_tape = !fileExists(filename);
+ boolean tape_saved = FALSE;
+
+ if (new_tape || Request("Replace old tape ?", REQ_ASK))
+ {
+ SaveTape(nr);
+
+ if (new_tape)
+ Request("Tape saved !", REQ_CONFIRM);
+
+ tape_saved = TRUE;
+ }
+
+ return tape_saved;
}
void DumpTape(struct TapeInfo *tape)
{
+ int tape_frame_counter;
int i, j;
if (tape->no_valid_file)
printf("Level series identifier: '%s'\n", tape->level_identifier);
printf_line("-", 79);
+ tape_frame_counter = 0;
+
for (i = 0; i < tape->length; i++)
{
if (i >= MAX_TAPE_LEN)
break;
- printf("%03d: ", i);
+ printf("%04d: ", i);
for (j = 0; j < MAX_PLAYERS; j++)
{
}
}
- printf("(%03d)\n", tape->pos[i].delay);
+ printf("(%03d) ", tape->pos[i].delay);
+ printf("[%05d]\n", tape_frame_counter);
+
+ tape_frame_counter += tape->pos[i].delay;
}
printf_line("-", 79);
#define SETUP_TOKEN_TOONS 5
#define SETUP_TOKEN_SCROLL_DELAY 6
#define SETUP_TOKEN_SOFT_SCROLLING 7
-#define SETUP_TOKEN_FADING 8
+#define SETUP_TOKEN_FADE_SCREENS 8
#define SETUP_TOKEN_AUTORECORD 9
-#define SETUP_TOKEN_QUICK_DOORS 10
-#define SETUP_TOKEN_TEAM_MODE 11
-#define SETUP_TOKEN_HANDICAP 12
-#define SETUP_TOKEN_SKIP_LEVELS 13
-#define SETUP_TOKEN_TIME_LIMIT 14
-#define SETUP_TOKEN_FULLSCREEN 15
-#define SETUP_TOKEN_ASK_ON_ESCAPE 16
-#define SETUP_TOKEN_GRAPHICS_SET 17
-#define SETUP_TOKEN_SOUNDS_SET 18
-#define SETUP_TOKEN_MUSIC_SET 19
-#define SETUP_TOKEN_OVERRIDE_LEVEL_GRAPHICS 20
-#define SETUP_TOKEN_OVERRIDE_LEVEL_SOUNDS 21
-#define SETUP_TOKEN_OVERRIDE_LEVEL_MUSIC 22
-
-#define NUM_GLOBAL_SETUP_TOKENS 23
+#define SETUP_TOKEN_SHOW_TITLESCREEN 10
+#define SETUP_TOKEN_QUICK_DOORS 11
+#define SETUP_TOKEN_TEAM_MODE 12
+#define SETUP_TOKEN_HANDICAP 13
+#define SETUP_TOKEN_SKIP_LEVELS 14
+#define SETUP_TOKEN_TIME_LIMIT 15
+#define SETUP_TOKEN_FULLSCREEN 16
+#define SETUP_TOKEN_FULLSCREEN_MODE 17
+#define SETUP_TOKEN_ASK_ON_ESCAPE 18
+#define SETUP_TOKEN_ASK_ON_ESCAPE_EDITOR 19
+#define SETUP_TOKEN_QUICK_SWITCH 20
+#define SETUP_TOKEN_INPUT_ON_FOCUS 21
+#define SETUP_TOKEN_PREFER_AGA_GRAPHICS 22
+#define SETUP_TOKEN_GRAPHICS_SET 23
+#define SETUP_TOKEN_SOUNDS_SET 24
+#define SETUP_TOKEN_MUSIC_SET 25
+#define SETUP_TOKEN_OVERRIDE_LEVEL_GRAPHICS 26
+#define SETUP_TOKEN_OVERRIDE_LEVEL_SOUNDS 27
+#define SETUP_TOKEN_OVERRIDE_LEVEL_MUSIC 28
+
+#define NUM_GLOBAL_SETUP_TOKENS 29
/* editor setup */
#define SETUP_TOKEN_EDITOR_EL_BOULDERDASH 0
#define SETUP_TOKEN_EDITOR_EL_DIAMOND_CAVES 6
#define SETUP_TOKEN_EDITOR_EL_DX_BOULDERDASH 7
#define SETUP_TOKEN_EDITOR_EL_CHARS 8
-#define SETUP_TOKEN_EDITOR_EL_CUSTOM 9
-#define SETUP_TOKEN_EDITOR_EL_CUSTOM_MORE 10
+#define SETUP_TOKEN_EDITOR_EL_STEELCHARS 9
+#define SETUP_TOKEN_EDITOR_EL_CUSTOM 10
#define SETUP_TOKEN_EDITOR_EL_HEADLINES 11
#define SETUP_TOKEN_EDITOR_EL_USER_DEFINED 12
-
-#define NUM_EDITOR_SETUP_TOKENS 13
+#define SETUP_TOKEN_EDITOR_EL_DYNAMIC 13
+#define SETUP_TOKEN_EDITOR_EL_BY_GAME 14
+#define SETUP_TOKEN_EDITOR_EL_BY_TYPE 15
+#define SETUP_TOKEN_EDITOR_SHOW_ELEMENT_TOKEN 16
+
+#define NUM_EDITOR_SETUP_TOKENS 17
+
+/* editor cascade setup */
+#define SETUP_TOKEN_EDITOR_CASCADE_BD 0
+#define SETUP_TOKEN_EDITOR_CASCADE_EM 1
+#define SETUP_TOKEN_EDITOR_CASCADE_EMC 2
+#define SETUP_TOKEN_EDITOR_CASCADE_RND 3
+#define SETUP_TOKEN_EDITOR_CASCADE_SB 4
+#define SETUP_TOKEN_EDITOR_CASCADE_SP 5
+#define SETUP_TOKEN_EDITOR_CASCADE_DC 6
+#define SETUP_TOKEN_EDITOR_CASCADE_DX 7
+#define SETUP_TOKEN_EDITOR_CASCADE_TEXT 8
+#define SETUP_TOKEN_EDITOR_CASCADE_STEELTEXT 9
+#define SETUP_TOKEN_EDITOR_CASCADE_CE 10
+#define SETUP_TOKEN_EDITOR_CASCADE_GE 11
+#define SETUP_TOKEN_EDITOR_CASCADE_REF 12
+#define SETUP_TOKEN_EDITOR_CASCADE_USER 13
+#define SETUP_TOKEN_EDITOR_CASCADE_DYNAMIC 14
+
+#define NUM_EDITOR_CASCADE_SETUP_TOKENS 15
/* shortcut setup */
#define SETUP_TOKEN_SHORTCUT_SAVE_GAME 0
#define SETUP_TOKEN_SHORTCUT_LOAD_GAME 1
#define SETUP_TOKEN_SHORTCUT_TOGGLE_PAUSE 2
+#define SETUP_TOKEN_SHORTCUT_FOCUS_PLAYER_1 3
+#define SETUP_TOKEN_SHORTCUT_FOCUS_PLAYER_2 4
+#define SETUP_TOKEN_SHORTCUT_FOCUS_PLAYER_3 5
+#define SETUP_TOKEN_SHORTCUT_FOCUS_PLAYER_4 6
+#define SETUP_TOKEN_SHORTCUT_FOCUS_PLAYER_ALL 7
-#define NUM_SHORTCUT_SETUP_TOKENS 3
+#define NUM_SHORTCUT_SETUP_TOKENS 8
/* player setup */
#define SETUP_TOKEN_PLAYER_USE_JOYSTICK 0
static struct SetupInfo si;
static struct SetupEditorInfo sei;
+static struct SetupEditorCascadeInfo seci;
static struct SetupShortcutInfo ssi;
static struct SetupInputInfo sii;
static struct SetupSystemInfo syi;
{ TYPE_SWITCH, &si.toons, "toons" },
{ TYPE_SWITCH, &si.scroll_delay, "scroll_delay" },
{ TYPE_SWITCH, &si.soft_scrolling, "soft_scrolling" },
- { TYPE_SWITCH, &si.fading, "screen_fading" },
+ { TYPE_SWITCH, &si.fade_screens, "fade_screens" },
{ TYPE_SWITCH, &si.autorecord, "automatic_tape_recording" },
+ { TYPE_SWITCH, &si.show_titlescreen, "show_titlescreen" },
{ TYPE_SWITCH, &si.quick_doors, "quick_doors" },
{ TYPE_SWITCH, &si.team_mode, "team_mode" },
{ TYPE_SWITCH, &si.handicap, "handicap" },
{ TYPE_SWITCH, &si.skip_levels, "skip_levels" },
{ TYPE_SWITCH, &si.time_limit, "time_limit" },
{ TYPE_SWITCH, &si.fullscreen, "fullscreen" },
+ { TYPE_STRING, &si.fullscreen_mode, "fullscreen_mode" },
{ TYPE_SWITCH, &si.ask_on_escape, "ask_on_escape" },
+ { TYPE_SWITCH, &si.ask_on_escape_editor, "ask_on_escape_editor" },
+ { TYPE_SWITCH, &si.quick_switch, "quick_player_switch" },
+ { TYPE_SWITCH, &si.input_on_focus, "input_on_focus" },
+ { TYPE_SWITCH, &si.prefer_aga_graphics, "prefer_aga_graphics" },
{ TYPE_STRING, &si.graphics_set, "graphics_set" },
{ TYPE_STRING, &si.sounds_set, "sounds_set" },
{ TYPE_STRING, &si.music_set, "music_set" },
{ TYPE_SWITCH, &si.override_level_music, "override_level_music" },
};
+static boolean not_used = FALSE;
static struct TokenInfo editor_setup_tokens[] =
{
+#if 1
+ { TYPE_SWITCH, ¬_used, "editor.el_boulderdash" },
+ { TYPE_SWITCH, ¬_used, "editor.el_emerald_mine" },
+ { TYPE_SWITCH, ¬_used, "editor.el_emerald_mine_club" },
+ { TYPE_SWITCH, ¬_used, "editor.el_more" },
+ { TYPE_SWITCH, ¬_used, "editor.el_sokoban" },
+ { TYPE_SWITCH, ¬_used, "editor.el_supaplex" },
+ { TYPE_SWITCH, ¬_used, "editor.el_diamond_caves" },
+ { TYPE_SWITCH, ¬_used, "editor.el_dx_boulderdash" },
+#else
{ TYPE_SWITCH, &sei.el_boulderdash, "editor.el_boulderdash" },
{ TYPE_SWITCH, &sei.el_emerald_mine, "editor.el_emerald_mine" },
{ TYPE_SWITCH, &sei.el_emerald_mine_club,"editor.el_emerald_mine_club"},
{ TYPE_SWITCH, &sei.el_supaplex, "editor.el_supaplex" },
{ TYPE_SWITCH, &sei.el_diamond_caves, "editor.el_diamond_caves" },
{ TYPE_SWITCH, &sei.el_dx_boulderdash,"editor.el_dx_boulderdash" },
+#endif
{ TYPE_SWITCH, &sei.el_chars, "editor.el_chars" },
+ { TYPE_SWITCH, &sei.el_steelchars, "editor.el_steelchars" },
{ TYPE_SWITCH, &sei.el_custom, "editor.el_custom" },
- { TYPE_SWITCH, &sei.el_custom_more, "editor.el_custom_more" },
+#if 1
+ { TYPE_SWITCH, ¬_used, "editor.el_headlines" },
+#else
{ TYPE_SWITCH, &sei.el_headlines, "editor.el_headlines" },
+#endif
{ TYPE_SWITCH, &sei.el_user_defined, "editor.el_user_defined" },
+ { TYPE_SWITCH, &sei.el_dynamic, "editor.el_dynamic" },
+ { TYPE_SWITCH, &sei.el_by_game, "editor.el_by_game" },
+ { TYPE_SWITCH, &sei.el_by_type, "editor.el_by_type" },
+ { TYPE_SWITCH, &sei.show_element_token,"editor.show_element_token" },
+};
+
+static struct TokenInfo editor_cascade_setup_tokens[] =
+{
+ { TYPE_SWITCH, &seci.el_bd, "editor.cascade.el_bd" },
+ { TYPE_SWITCH, &seci.el_em, "editor.cascade.el_em" },
+ { TYPE_SWITCH, &seci.el_emc, "editor.cascade.el_emc" },
+ { TYPE_SWITCH, &seci.el_rnd, "editor.cascade.el_rnd" },
+ { TYPE_SWITCH, &seci.el_sb, "editor.cascade.el_sb" },
+ { TYPE_SWITCH, &seci.el_sp, "editor.cascade.el_sp" },
+ { TYPE_SWITCH, &seci.el_dc, "editor.cascade.el_dc" },
+ { TYPE_SWITCH, &seci.el_dx, "editor.cascade.el_dx" },
+ { TYPE_SWITCH, &seci.el_chars, "editor.cascade.el_chars" },
+ { TYPE_SWITCH, &seci.el_steelchars, "editor.cascade.el_steelchars" },
+ { TYPE_SWITCH, &seci.el_ce, "editor.cascade.el_ce" },
+ { TYPE_SWITCH, &seci.el_ge, "editor.cascade.el_ge" },
+ { TYPE_SWITCH, &seci.el_ref, "editor.cascade.el_ref" },
+ { TYPE_SWITCH, &seci.el_user, "editor.cascade.el_user" },
+ { TYPE_SWITCH, &seci.el_dynamic, "editor.cascade.el_dynamic" },
};
static struct TokenInfo shortcut_setup_tokens[] =
{
{ TYPE_KEY_X11, &ssi.save_game, "shortcut.save_game" },
{ TYPE_KEY_X11, &ssi.load_game, "shortcut.load_game" },
- { TYPE_KEY_X11, &ssi.toggle_pause, "shortcut.toggle_pause" }
+ { TYPE_KEY_X11, &ssi.toggle_pause, "shortcut.toggle_pause" },
+ { TYPE_KEY_X11, &ssi.focus_player[0], "shortcut.focus_player_1" },
+ { TYPE_KEY_X11, &ssi.focus_player[1], "shortcut.focus_player_2" },
+ { TYPE_KEY_X11, &ssi.focus_player[2], "shortcut.focus_player_3" },
+ { TYPE_KEY_X11, &ssi.focus_player[3], "shortcut.focus_player_4" },
+ { TYPE_KEY_X11, &ssi.focus_player_all,"shortcut.focus_player_all" },
};
static struct TokenInfo player_setup_tokens[] =
{ TYPE_KEY_X11, &sii.key.up, ".key.move_up" },
{ TYPE_KEY_X11, &sii.key.down, ".key.move_down" },
{ TYPE_KEY_X11, &sii.key.snap, ".key.snap_field" },
- { TYPE_KEY_X11, &sii.key.drop, ".key.place_bomb" }
+ { TYPE_KEY_X11, &sii.key.drop, ".key.place_bomb" },
};
static struct TokenInfo system_setup_tokens[] =
{
{ TYPE_STRING, &syi.sdl_audiodriver, "system.sdl_audiodriver" },
- { TYPE_INTEGER, &syi.audio_fragment_size,"system.audio_fragment_size" }
+ { TYPE_INTEGER, &syi.audio_fragment_size,"system.audio_fragment_size" },
};
static struct TokenInfo options_setup_tokens[] =
{
- { TYPE_BOOLEAN, &soi.verbose, "options.verbose" }
+ { TYPE_BOOLEAN, &soi.verbose, "options.verbose" },
};
static char *get_corrected_login_name(char *login_name)
si->direct_draw = !si->double_buffering;
si->scroll_delay = TRUE;
si->soft_scrolling = TRUE;
- si->fading = FALSE;
+ si->fade_screens = TRUE;
si->autorecord = TRUE;
+ si->show_titlescreen = TRUE;
si->quick_doors = FALSE;
si->team_mode = FALSE;
si->handicap = TRUE;
si->skip_levels = TRUE;
si->time_limit = TRUE;
si->fullscreen = FALSE;
+ si->fullscreen_mode = getStringCopy(DEFAULT_FULLSCREEN_MODE);
si->ask_on_escape = TRUE;
+ si->ask_on_escape_editor = TRUE;
+ si->quick_switch = FALSE;
+ si->input_on_focus = FALSE;
+ si->prefer_aga_graphics = TRUE;
si->graphics_set = getStringCopy(GFX_CLASSIC_SUBDIR);
si->sounds_set = getStringCopy(SND_CLASSIC_SUBDIR);
si->editor.el_diamond_caves = TRUE;
si->editor.el_dx_boulderdash = TRUE;
si->editor.el_chars = TRUE;
+ si->editor.el_steelchars = TRUE;
si->editor.el_custom = TRUE;
- si->editor.el_custom_more = FALSE;
si->editor.el_headlines = TRUE;
si->editor.el_user_defined = FALSE;
+ si->editor.el_dynamic = TRUE;
+
+ si->editor.show_element_token = FALSE;
si->shortcut.save_game = DEFAULT_KEY_SAVE_GAME;
si->shortcut.load_game = DEFAULT_KEY_LOAD_GAME;
si->shortcut.toggle_pause = DEFAULT_KEY_TOGGLE_PAUSE;
+ si->shortcut.focus_player[0] = DEFAULT_KEY_FOCUS_PLAYER_1;
+ si->shortcut.focus_player[1] = DEFAULT_KEY_FOCUS_PLAYER_2;
+ si->shortcut.focus_player[2] = DEFAULT_KEY_FOCUS_PLAYER_3;
+ si->shortcut.focus_player[3] = DEFAULT_KEY_FOCUS_PLAYER_4;
+ si->shortcut.focus_player_all = DEFAULT_KEY_FOCUS_PLAYER_ALL;
+
for (i = 0; i < MAX_PLAYERS; i++)
{
si->input[i].use_joystick = FALSE;
si->options.verbose = FALSE;
}
+static void setSetupInfoToDefaults_EditorCascade(struct SetupInfo *si)
+{
+ si->editor_cascade.el_bd = TRUE;
+ si->editor_cascade.el_em = TRUE;
+ si->editor_cascade.el_emc = TRUE;
+ si->editor_cascade.el_rnd = TRUE;
+ si->editor_cascade.el_sb = TRUE;
+ si->editor_cascade.el_sp = TRUE;
+ si->editor_cascade.el_dc = TRUE;
+ si->editor_cascade.el_dx = TRUE;
+
+ si->editor_cascade.el_chars = FALSE;
+ si->editor_cascade.el_steelchars = FALSE;
+ si->editor_cascade.el_ce = FALSE;
+ si->editor_cascade.el_ge = FALSE;
+ si->editor_cascade.el_ref = FALSE;
+ si->editor_cascade.el_user = FALSE;
+ si->editor_cascade.el_dynamic = FALSE;
+}
+
static void decodeSetupFileHash(SetupFileHash *setup_file_hash)
{
int i, pnr;
setup.options = soi;
}
+static void decodeSetupFileHash_EditorCascade(SetupFileHash *setup_file_hash)
+{
+ int i;
+
+ if (!setup_file_hash)
+ return;
+
+ /* editor cascade setup */
+ seci = setup.editor_cascade;
+ for (i = 0; i < NUM_EDITOR_CASCADE_SETUP_TOKENS; i++)
+ setSetupInfo(editor_cascade_setup_tokens, i,
+ getHashEntry(setup_file_hash,
+ editor_cascade_setup_tokens[i].text));
+ setup.editor_cascade = seci;
+}
+
void LoadSetup()
{
char *filename = getSetupFilename();
{
char *player_name_new;
- checkSetupFileHashIdentifier(setup_file_hash, getCookie("SETUP"));
+ checkSetupFileHashIdentifier(setup_file_hash, filename,getCookie("SETUP"));
decodeSetupFileHash(setup_file_hash);
setup.direct_draw = !setup.double_buffering;
Error(ERR_WARN, "using default setup values");
}
+void LoadSetup_EditorCascade()
+{
+ char *filename = getPath2(getSetupDir(), EDITORCASCADE_FILENAME);
+ SetupFileHash *setup_file_hash = NULL;
+
+ /* always start with reliable default values */
+ setSetupInfoToDefaults_EditorCascade(&setup);
+
+ setup_file_hash = loadSetupFileHash(filename);
+
+ if (setup_file_hash)
+ {
+ checkSetupFileHashIdentifier(setup_file_hash, filename,getCookie("SETUP"));
+ decodeSetupFileHash_EditorCascade(setup_file_hash);
+
+ freeSetupFileHash(setup_file_hash);
+ }
+
+ free(filename);
+}
+
void SaveSetup()
{
char *filename = getSetupFilename();
SetFilePermissions(filename, PERMS_PRIVATE);
}
+void SaveSetup_EditorCascade()
+{
+ char *filename = getPath2(getSetupDir(), EDITORCASCADE_FILENAME);
+ FILE *file;
+ int i;
+
+ InitUserDataDirectory();
+
+ if (!(file = fopen(filename, MODE_WRITE)))
+ {
+ Error(ERR_WARN, "cannot write editor cascade state file '%s'", filename);
+ free(filename);
+ return;
+ }
+
+ fprintf(file, "%s\n", getFormattedSetupEntry(TOKEN_STR_FILE_IDENTIFIER,
+ getCookie("SETUP")));
+ fprintf(file, "\n");
+
+ seci = setup.editor_cascade;
+ fprintf(file, "\n");
+ for (i = 0; i < NUM_EDITOR_CASCADE_SETUP_TOKENS; i++)
+ fprintf(file, "%s\n", getSetupLine(editor_cascade_setup_tokens, "", i));
+
+ fclose(file);
+
+ SetFilePermissions(filename, PERMS_PRIVATE);
+
+ free(filename);
+}
+
void LoadCustomElementDescriptions()
{
char *filename = getCustomArtworkConfigFilename(ARTWORK_TYPE_GRAPHICS);
freeSetupFileHash(setup_file_hash);
}
-void LoadSpecialMenuDesignSettings()
+static void LoadSpecialMenuDesignSettingsFromFilename(char *filename)
{
- char *filename = getCustomArtworkConfigFilename(ARTWORK_TYPE_GRAPHICS);
SetupFileHash *setup_file_hash;
- int i, j;
+ int i;
- /* always start with reliable default values from default config */
- for (i = 0; image_config_vars[i].token != NULL; i++)
- for (j = 0; image_config[j].token != NULL; j++)
- if (strcmp(image_config_vars[i].token, image_config[j].token) == 0)
- *image_config_vars[i].value =
- get_auto_parameter_value(image_config_vars[i].token,
- image_config[j].value);
+#if 0
+ printf("LoadSpecialMenuDesignSettings from file '%s' ...\n", filename);
+#endif
if ((setup_file_hash = loadSetupFileHash(filename)) == NULL)
return;
menu.list_size[i] = get_integer_from_string(list_size);
}
+ /* special case: initialize with default values that may be overwritten */
+ for (i = 0; i < NUM_SPECIAL_GFX_INFO_ARGS; i++)
+ {
+ char *value_x = getHashEntry(setup_file_hash, "menu.draw_xoffset.INFO");
+ char *value_y = getHashEntry(setup_file_hash, "menu.draw_yoffset.INFO");
+
+ if (value_x != NULL)
+ menu.draw_xoffset_info[i] = get_integer_from_string(value_x);
+ if (value_y != NULL)
+ menu.draw_yoffset_info[i] = get_integer_from_string(value_y);
+ }
+
/* read (and overwrite with) values that may be specified in config file */
for (i = 0; image_config_vars[i].token != NULL; i++)
{
freeSetupFileHash(setup_file_hash);
}
+void LoadSpecialMenuDesignSettings()
+{
+ char *filename_base = UNDEFINED_FILENAME, *filename_local;
+ int i, j;
+
+ /* always start with reliable default values from default config */
+ for (i = 0; image_config_vars[i].token != NULL; i++)
+ for (j = 0; image_config[j].token != NULL; j++)
+ if (strEqual(image_config_vars[i].token, image_config[j].token))
+ *image_config_vars[i].value =
+ get_auto_parameter_value(image_config_vars[i].token,
+ image_config[j].value);
+
+ if (!SETUP_OVERRIDE_ARTWORK(setup, ARTWORK_TYPE_GRAPHICS))
+ {
+ /* first look for special settings configured in level series config */
+ filename_base = getCustomArtworkLevelConfigFilename(ARTWORK_TYPE_GRAPHICS);
+
+ if (fileExists(filename_base))
+ LoadSpecialMenuDesignSettingsFromFilename(filename_base);
+ }
+
+ filename_local = getCustomArtworkConfigFilename(ARTWORK_TYPE_GRAPHICS);
+
+ if (filename_local != NULL && !strEqual(filename_base, filename_local))
+ LoadSpecialMenuDesignSettingsFromFilename(filename_local);
+}
+
void LoadUserDefinedEditorElementList(int **elements, int *num_elements)
{
char *filename = getEditorSetupFilename();
/* add space for up to 3 more elements for padding that may be needed */
*num_elements += 3;
+ /* free memory for old list of elements, if needed */
+ checked_free(*elements);
+
+ /* allocate memory for new list of elements */
*elements = checked_malloc(*num_elements * sizeof(int));
*num_elements = 0;
char *basename, boolean is_sound)
{
for (; list != NULL; list = list->next)
- if (list->is_sound == is_sound && strcmp(list->basename, basename) == 0)
+ if (list->is_sound == is_sound && strEqual(list->basename, basename))
return TRUE;
return FALSE;
if (music->filename == NULL)
continue;
- if (strcmp(music->filename, UNDEFINED_FILENAME) == 0)
+ if (strEqual(music->filename, UNDEFINED_FILENAME))
continue;
/* a configured file may be not recognized as music */
if (music->filename == NULL)
continue;
- if (strcmp(basename, music->filename) == 0)
+ if (strEqual(basename, music->filename))
{
music_already_used = TRUE;
break;
if (sound->filename == NULL)
continue;
- if (strcmp(sound->filename, UNDEFINED_FILENAME) == 0)
+ if (strEqual(sound->filename, UNDEFINED_FILENAME))
continue;
/* a configured file may be not recognized as sound */
i_to_a(element_action_info[i].value));
/* do not store direction index (bit) here, but direction value! */
- for (i = 0; i < NUM_DIRECTIONS; i++)
+ for (i = 0; i < NUM_DIRECTIONS_FULL; i++)
setHashEntry(direction_hash, element_direction_info[i].suffix,
i_to_a(1 << element_direction_info[i].value));
char *element_value, *action_value, *direction_value;
int delay = atoi(list->value);
- if (strcmp(list->token, "end") == 0)
+ if (strEqual(list->token, "end"))
{
add_helpanim_entry(HELPANIM_LIST_NEXT, -1, -1, -1, &num_list_entries);
#if 0
for (i = 0; i < num_list_entries; i++)
- printf("::: %d, %d, %d => %d\n",
+ printf("::: '%s': %d, %d, %d => %d\n",
+ EL_NAME(helpanim_info[i].element),
helpanim_info[i].element,
helpanim_info[i].action,
helpanim_info[i].direction,
projects / rocksndiamonds.git / blobdiff