1 // ============================================================================
2 // Rocks'n'Diamonds - McDuffin Strikes Back!
3 // ----------------------------------------------------------------------------
4 // (c) 1995-2014 by Artsoft Entertainment
7 // http://www.artsoft.org/
8 // ----------------------------------------------------------------------------
10 // ============================================================================
17 #include "libgame/libgame.h"
25 #define ENABLE_UNUSED_CODE 0 /* currently unused functions */
26 #define ENABLE_HISTORIC_CHUNKS 0 /* only for historic reference */
27 #define ENABLE_RESERVED_CODE 0 /* reserved for later use */
29 #define CHUNK_ID_LEN 4 /* IFF style chunk id length */
30 #define CHUNK_SIZE_UNDEFINED 0 /* undefined chunk size == 0 */
31 #define CHUNK_SIZE_NONE -1 /* do not write chunk size */
33 #define LEVEL_CHUNK_NAME_SIZE MAX_LEVEL_NAME_LEN
34 #define LEVEL_CHUNK_AUTH_SIZE MAX_LEVEL_AUTHOR_LEN
36 #define LEVEL_CHUNK_VERS_SIZE 8 /* size of file version chunk */
37 #define LEVEL_CHUNK_DATE_SIZE 4 /* size of file date chunk */
38 #define LEVEL_CHUNK_HEAD_SIZE 80 /* size of level file header */
39 #define LEVEL_CHUNK_HEAD_UNUSED 0 /* unused level header bytes */
40 #define LEVEL_CHUNK_CNT2_SIZE 160 /* size of level CNT2 chunk */
41 #define LEVEL_CHUNK_CNT2_UNUSED 11 /* unused CNT2 chunk bytes */
42 #define LEVEL_CHUNK_CNT3_HEADER 16 /* size of level CNT3 header */
43 #define LEVEL_CHUNK_CNT3_UNUSED 10 /* unused CNT3 chunk bytes */
44 #define LEVEL_CPART_CUS3_SIZE 134 /* size of CUS3 chunk part */
45 #define LEVEL_CPART_CUS3_UNUSED 15 /* unused CUS3 bytes / part */
46 #define LEVEL_CHUNK_GRP1_SIZE 74 /* size of level GRP1 chunk */
48 /* (element number, number of change pages, change page number) */
49 #define LEVEL_CHUNK_CUSX_UNCHANGED (2 + (1 + 1) + (1 + 1))
51 /* (element number only) */
52 #define LEVEL_CHUNK_GRPX_UNCHANGED 2
53 #define LEVEL_CHUNK_NOTE_UNCHANGED 2
55 /* (nothing at all if unchanged) */
56 #define LEVEL_CHUNK_ELEM_UNCHANGED 0
58 #define TAPE_CHUNK_VERS_SIZE 8 /* size of file version chunk */
59 #define TAPE_CHUNK_HEAD_SIZE 20 /* size of tape file header */
60 #define TAPE_CHUNK_HEAD_UNUSED 3 /* unused tape header bytes */
62 #define LEVEL_CHUNK_CNT3_SIZE(x) (LEVEL_CHUNK_CNT3_HEADER + (x))
63 #define LEVEL_CHUNK_CUS3_SIZE(x) (2 + (x) * LEVEL_CPART_CUS3_SIZE)
64 #define LEVEL_CHUNK_CUS4_SIZE(x) (96 + (x) * 48)
66 /* file identifier strings */
67 #define LEVEL_COOKIE_TMPL "ROCKSNDIAMONDS_LEVEL_FILE_VERSION_x.x"
68 #define TAPE_COOKIE_TMPL "ROCKSNDIAMONDS_TAPE_FILE_VERSION_x.x"
69 #define SCORE_COOKIE "ROCKSNDIAMONDS_SCORE_FILE_VERSION_1.2"
71 /* values for deciding when (not) to save configuration data */
72 #define SAVE_CONF_NEVER 0
73 #define SAVE_CONF_ALWAYS 1
74 #define SAVE_CONF_WHEN_CHANGED -1
76 /* values for chunks using micro chunks */
77 #define CONF_MASK_1_BYTE 0x00
78 #define CONF_MASK_2_BYTE 0x40
79 #define CONF_MASK_4_BYTE 0x80
80 #define CONF_MASK_MULTI_BYTES 0xc0
82 #define CONF_MASK_BYTES 0xc0
83 #define CONF_MASK_TOKEN 0x3f
85 #define CONF_VALUE_1_BYTE(x) (CONF_MASK_1_BYTE | (x))
86 #define CONF_VALUE_2_BYTE(x) (CONF_MASK_2_BYTE | (x))
87 #define CONF_VALUE_4_BYTE(x) (CONF_MASK_4_BYTE | (x))
88 #define CONF_VALUE_MULTI_BYTES(x) (CONF_MASK_MULTI_BYTES | (x))
90 /* these definitions are just for convenience of use and readability */
91 #define CONF_VALUE_8_BIT(x) CONF_VALUE_1_BYTE(x)
92 #define CONF_VALUE_16_BIT(x) CONF_VALUE_2_BYTE(x)
93 #define CONF_VALUE_32_BIT(x) CONF_VALUE_4_BYTE(x)
94 #define CONF_VALUE_BYTES(x) CONF_VALUE_MULTI_BYTES(x)
96 #define CONF_VALUE_NUM_BYTES(x) ((x) == CONF_MASK_1_BYTE ? 1 : \
97 (x) == CONF_MASK_2_BYTE ? 2 : \
98 (x) == CONF_MASK_4_BYTE ? 4 : 0)
100 #define CONF_CONTENT_NUM_ELEMENTS (3 * 3)
101 #define CONF_CONTENT_NUM_BYTES (CONF_CONTENT_NUM_ELEMENTS * 2)
102 #define CONF_ELEMENT_NUM_BYTES (2)
104 #define CONF_ENTITY_NUM_BYTES(t) ((t) == TYPE_ELEMENT || \
105 (t) == TYPE_ELEMENT_LIST ? \
106 CONF_ELEMENT_NUM_BYTES : \
107 (t) == TYPE_CONTENT || \
108 (t) == TYPE_CONTENT_LIST ? \
109 CONF_CONTENT_NUM_BYTES : 1)
111 #define CONF_ELEMENT_BYTE_POS(i) ((i) * CONF_ELEMENT_NUM_BYTES)
112 #define CONF_ELEMENTS_ELEMENT(b,i) ((b[CONF_ELEMENT_BYTE_POS(i)] << 8) | \
113 (b[CONF_ELEMENT_BYTE_POS(i) + 1]))
115 #define CONF_CONTENT_ELEMENT_POS(c,x,y) ((c) * CONF_CONTENT_NUM_ELEMENTS + \
117 #define CONF_CONTENT_BYTE_POS(c,x,y) (CONF_CONTENT_ELEMENT_POS(c,x,y) * \
118 CONF_ELEMENT_NUM_BYTES)
119 #define CONF_CONTENTS_ELEMENT(b,c,x,y) ((b[CONF_CONTENT_BYTE_POS(c,x,y)]<< 8)|\
120 (b[CONF_CONTENT_BYTE_POS(c,x,y) + 1]))
122 /* temporary variables used to store pointers to structure members */
123 static struct LevelInfo li;
124 static struct ElementInfo xx_ei, yy_ei;
125 static struct ElementChangeInfo xx_change;
126 static struct ElementGroupInfo xx_group;
127 static struct EnvelopeInfo xx_envelope;
128 static unsigned int xx_event_bits[NUM_CE_BITFIELDS];
129 static char xx_default_description[MAX_ELEMENT_NAME_LEN + 1];
130 static int xx_num_contents;
131 static int xx_current_change_page;
132 static char xx_default_string_empty[1] = "";
133 static int xx_string_length_unused;
135 struct LevelFileConfigInfo
137 int element; /* element for which data is to be stored */
138 int save_type; /* save data always, never or when changed */
139 int data_type; /* data type (used internally, not stored) */
140 int conf_type; /* micro chunk identifier (stored in file) */
143 void *value; /* variable that holds the data to be stored */
144 int default_value; /* initial default value for this variable */
147 void *value_copy; /* variable that holds the data to be copied */
148 void *num_entities; /* number of entities for multi-byte data */
149 int default_num_entities; /* default number of entities for this data */
150 int max_num_entities; /* maximal number of entities for this data */
151 char *default_string; /* optional default string for string data */
154 static struct LevelFileConfigInfo chunk_config_INFO[] =
156 /* ---------- values not related to single elements ----------------------- */
159 -1, SAVE_CONF_ALWAYS,
160 TYPE_INTEGER, CONF_VALUE_8_BIT(1),
161 &li.game_engine_type, GAME_ENGINE_TYPE_RND
165 -1, SAVE_CONF_ALWAYS,
166 TYPE_INTEGER, CONF_VALUE_16_BIT(1),
167 &li.fieldx, STD_LEV_FIELDX
170 -1, SAVE_CONF_ALWAYS,
171 TYPE_INTEGER, CONF_VALUE_16_BIT(2),
172 &li.fieldy, STD_LEV_FIELDY
176 -1, SAVE_CONF_ALWAYS,
177 TYPE_INTEGER, CONF_VALUE_16_BIT(3),
182 -1, SAVE_CONF_ALWAYS,
183 TYPE_INTEGER, CONF_VALUE_16_BIT(4),
189 TYPE_INTEGER, CONF_VALUE_32_BIT(2),
195 TYPE_BOOLEAN, CONF_VALUE_8_BIT(2),
196 &li.use_step_counter, FALSE
201 TYPE_BITFIELD, CONF_VALUE_8_BIT(4),
202 &li.wind_direction_initial, MV_NONE
207 TYPE_BOOLEAN, CONF_VALUE_8_BIT(5),
208 &li.em_slippery_gems, FALSE
213 TYPE_BOOLEAN, CONF_VALUE_8_BIT(6),
214 &li.use_custom_template, FALSE
219 TYPE_BITFIELD, CONF_VALUE_32_BIT(1),
220 &li.can_move_into_acid_bits, ~0 /* default: everything can */
225 TYPE_BITFIELD, CONF_VALUE_8_BIT(7),
226 &li.dont_collide_with_bits, ~0 /* default: always deadly */
231 TYPE_BOOLEAN, CONF_VALUE_8_BIT(8),
232 &li.em_explodes_by_fire, FALSE
237 TYPE_INTEGER, CONF_VALUE_16_BIT(5),
238 &li.score[SC_TIME_BONUS], 1
243 TYPE_BOOLEAN, CONF_VALUE_8_BIT(9),
244 &li.auto_exit_sokoban, FALSE
254 static struct LevelFileConfigInfo chunk_config_ELEM[] =
256 /* (these values are the same for each player) */
259 TYPE_BOOLEAN, CONF_VALUE_8_BIT(1),
260 &li.block_last_field, FALSE /* default case for EM levels */
264 TYPE_BOOLEAN, CONF_VALUE_8_BIT(2),
265 &li.sp_block_last_field, TRUE /* default case for SP levels */
269 TYPE_BOOLEAN, CONF_VALUE_8_BIT(3),
270 &li.instant_relocation, FALSE
274 TYPE_BOOLEAN, CONF_VALUE_8_BIT(4),
275 &li.can_pass_to_walkable, FALSE
279 TYPE_BOOLEAN, CONF_VALUE_8_BIT(5),
280 &li.block_snap_field, TRUE
284 TYPE_BOOLEAN, CONF_VALUE_8_BIT(6),
285 &li.continuous_snapping, TRUE
289 TYPE_BOOLEAN, CONF_VALUE_8_BIT(12),
290 &li.shifted_relocation, FALSE
294 TYPE_BOOLEAN, CONF_VALUE_8_BIT(15),
295 &li.lazy_relocation, FALSE
298 /* (these values are different for each player) */
301 TYPE_INTEGER, CONF_VALUE_8_BIT(7),
302 &li.initial_player_stepsize[0], STEPSIZE_NORMAL
306 TYPE_BOOLEAN, CONF_VALUE_8_BIT(8),
307 &li.initial_player_gravity[0], FALSE
311 TYPE_BOOLEAN, CONF_VALUE_8_BIT(9),
312 &li.use_start_element[0], FALSE
316 TYPE_ELEMENT, CONF_VALUE_16_BIT(1),
317 &li.start_element[0], EL_PLAYER_1
321 TYPE_BOOLEAN, CONF_VALUE_8_BIT(10),
322 &li.use_artwork_element[0], FALSE
326 TYPE_ELEMENT, CONF_VALUE_16_BIT(2),
327 &li.artwork_element[0], EL_PLAYER_1
331 TYPE_BOOLEAN, CONF_VALUE_8_BIT(11),
332 &li.use_explosion_element[0], FALSE
336 TYPE_ELEMENT, CONF_VALUE_16_BIT(3),
337 &li.explosion_element[0], EL_PLAYER_1
341 TYPE_BOOLEAN, CONF_VALUE_8_BIT(13),
342 &li.use_initial_inventory[0], FALSE
346 TYPE_BOOLEAN, CONF_VALUE_8_BIT(14),
347 &li.initial_inventory_size[0], 1
351 TYPE_ELEMENT_LIST, CONF_VALUE_BYTES(1),
352 &li.initial_inventory_content[0][0],EL_EMPTY, NULL,
353 &li.initial_inventory_size[0], 1, MAX_INITIAL_INVENTORY_SIZE
358 TYPE_INTEGER, CONF_VALUE_8_BIT(7),
359 &li.initial_player_stepsize[1], STEPSIZE_NORMAL
363 TYPE_BOOLEAN, CONF_VALUE_8_BIT(8),
364 &li.initial_player_gravity[1], FALSE
368 TYPE_BOOLEAN, CONF_VALUE_8_BIT(9),
369 &li.use_start_element[1], FALSE
373 TYPE_ELEMENT, CONF_VALUE_16_BIT(1),
374 &li.start_element[1], EL_PLAYER_2
378 TYPE_BOOLEAN, CONF_VALUE_8_BIT(10),
379 &li.use_artwork_element[1], FALSE
383 TYPE_ELEMENT, CONF_VALUE_16_BIT(2),
384 &li.artwork_element[1], EL_PLAYER_2
388 TYPE_BOOLEAN, CONF_VALUE_8_BIT(11),
389 &li.use_explosion_element[1], FALSE
393 TYPE_ELEMENT, CONF_VALUE_16_BIT(3),
394 &li.explosion_element[1], EL_PLAYER_2
398 TYPE_BOOLEAN, CONF_VALUE_8_BIT(13),
399 &li.use_initial_inventory[1], FALSE
403 TYPE_BOOLEAN, CONF_VALUE_8_BIT(14),
404 &li.initial_inventory_size[1], 1
408 TYPE_ELEMENT_LIST, CONF_VALUE_BYTES(1),
409 &li.initial_inventory_content[1][0],EL_EMPTY, NULL,
410 &li.initial_inventory_size[1], 1, MAX_INITIAL_INVENTORY_SIZE
415 TYPE_INTEGER, CONF_VALUE_8_BIT(7),
416 &li.initial_player_stepsize[2], STEPSIZE_NORMAL
420 TYPE_BOOLEAN, CONF_VALUE_8_BIT(8),
421 &li.initial_player_gravity[2], FALSE
425 TYPE_BOOLEAN, CONF_VALUE_8_BIT(9),
426 &li.use_start_element[2], FALSE
430 TYPE_ELEMENT, CONF_VALUE_16_BIT(1),
431 &li.start_element[2], EL_PLAYER_3
435 TYPE_BOOLEAN, CONF_VALUE_8_BIT(10),
436 &li.use_artwork_element[2], FALSE
440 TYPE_ELEMENT, CONF_VALUE_16_BIT(2),
441 &li.artwork_element[2], EL_PLAYER_3
445 TYPE_BOOLEAN, CONF_VALUE_8_BIT(11),
446 &li.use_explosion_element[2], FALSE
450 TYPE_ELEMENT, CONF_VALUE_16_BIT(3),
451 &li.explosion_element[2], EL_PLAYER_3
455 TYPE_BOOLEAN, CONF_VALUE_8_BIT(13),
456 &li.use_initial_inventory[2], FALSE
460 TYPE_BOOLEAN, CONF_VALUE_8_BIT(14),
461 &li.initial_inventory_size[2], 1
465 TYPE_ELEMENT_LIST, CONF_VALUE_BYTES(1),
466 &li.initial_inventory_content[2][0],EL_EMPTY, NULL,
467 &li.initial_inventory_size[2], 1, MAX_INITIAL_INVENTORY_SIZE
472 TYPE_INTEGER, CONF_VALUE_8_BIT(7),
473 &li.initial_player_stepsize[3], STEPSIZE_NORMAL
477 TYPE_BOOLEAN, CONF_VALUE_8_BIT(8),
478 &li.initial_player_gravity[3], FALSE
482 TYPE_BOOLEAN, CONF_VALUE_8_BIT(9),
483 &li.use_start_element[3], FALSE
487 TYPE_ELEMENT, CONF_VALUE_16_BIT(1),
488 &li.start_element[3], EL_PLAYER_4
492 TYPE_BOOLEAN, CONF_VALUE_8_BIT(10),
493 &li.use_artwork_element[3], FALSE
497 TYPE_ELEMENT, CONF_VALUE_16_BIT(2),
498 &li.artwork_element[3], EL_PLAYER_4
502 TYPE_BOOLEAN, CONF_VALUE_8_BIT(11),
503 &li.use_explosion_element[3], FALSE
507 TYPE_ELEMENT, CONF_VALUE_16_BIT(3),
508 &li.explosion_element[3], EL_PLAYER_4
512 TYPE_BOOLEAN, CONF_VALUE_8_BIT(13),
513 &li.use_initial_inventory[3], FALSE
517 TYPE_BOOLEAN, CONF_VALUE_8_BIT(14),
518 &li.initial_inventory_size[3], 1
522 TYPE_ELEMENT_LIST, CONF_VALUE_BYTES(1),
523 &li.initial_inventory_content[3][0],EL_EMPTY, NULL,
524 &li.initial_inventory_size[3], 1, MAX_INITIAL_INVENTORY_SIZE
529 TYPE_INTEGER, CONF_VALUE_16_BIT(1),
530 &li.score[SC_EMERALD], 10
535 TYPE_INTEGER, CONF_VALUE_16_BIT(1),
536 &li.score[SC_DIAMOND], 10
541 TYPE_INTEGER, CONF_VALUE_16_BIT(1),
542 &li.score[SC_BUG], 10
547 TYPE_INTEGER, CONF_VALUE_16_BIT(1),
548 &li.score[SC_SPACESHIP], 10
553 TYPE_INTEGER, CONF_VALUE_16_BIT(1),
554 &li.score[SC_PACMAN], 10
559 TYPE_INTEGER, CONF_VALUE_16_BIT(1),
560 &li.score[SC_NUT], 10
565 TYPE_INTEGER, CONF_VALUE_16_BIT(1),
566 &li.score[SC_DYNAMITE], 10
571 TYPE_INTEGER, CONF_VALUE_16_BIT(1),
572 &li.score[SC_KEY], 10
577 TYPE_INTEGER, CONF_VALUE_16_BIT(1),
578 &li.score[SC_PEARL], 10
583 TYPE_INTEGER, CONF_VALUE_16_BIT(1),
584 &li.score[SC_CRYSTAL], 10
589 TYPE_ELEMENT, CONF_VALUE_16_BIT(1),
590 &li.amoeba_content, EL_DIAMOND
594 TYPE_INTEGER, CONF_VALUE_16_BIT(2),
599 TYPE_BOOLEAN, CONF_VALUE_8_BIT(1),
600 &li.grow_into_diggable, TRUE
605 TYPE_CONTENT_LIST, CONF_VALUE_BYTES(1),
606 &li.yamyam_content, EL_ROCK, NULL,
607 &li.num_yamyam_contents, 4, MAX_ELEMENT_CONTENTS
611 TYPE_INTEGER, CONF_VALUE_16_BIT(1),
612 &li.score[SC_YAMYAM], 10
617 TYPE_INTEGER, CONF_VALUE_16_BIT(1),
618 &li.score[SC_ROBOT], 10
622 TYPE_INTEGER, CONF_VALUE_16_BIT(2),
628 TYPE_INTEGER, CONF_VALUE_16_BIT(1),
634 TYPE_INTEGER, CONF_VALUE_16_BIT(1),
635 &li.time_magic_wall, 10
640 TYPE_INTEGER, CONF_VALUE_8_BIT(1),
641 &li.game_of_life[0], 2
645 TYPE_INTEGER, CONF_VALUE_8_BIT(2),
646 &li.game_of_life[1], 3
650 TYPE_INTEGER, CONF_VALUE_8_BIT(3),
651 &li.game_of_life[2], 3
655 TYPE_INTEGER, CONF_VALUE_8_BIT(4),
656 &li.game_of_life[3], 3
661 TYPE_INTEGER, CONF_VALUE_8_BIT(1),
666 TYPE_INTEGER, CONF_VALUE_8_BIT(2),
671 TYPE_INTEGER, CONF_VALUE_8_BIT(3),
676 TYPE_INTEGER, CONF_VALUE_8_BIT(4),
681 EL_TIMEGATE_SWITCH, -1,
682 TYPE_INTEGER, CONF_VALUE_16_BIT(1),
683 &li.time_timegate, 10
687 EL_LIGHT_SWITCH_ACTIVE, -1,
688 TYPE_INTEGER, CONF_VALUE_16_BIT(1),
693 EL_SHIELD_NORMAL, -1,
694 TYPE_INTEGER, CONF_VALUE_16_BIT(1),
695 &li.shield_normal_time, 10
698 EL_SHIELD_NORMAL, -1,
699 TYPE_INTEGER, CONF_VALUE_16_BIT(2),
700 &li.score[SC_SHIELD], 10
704 EL_SHIELD_DEADLY, -1,
705 TYPE_INTEGER, CONF_VALUE_16_BIT(1),
706 &li.shield_deadly_time, 10
709 EL_SHIELD_DEADLY, -1,
710 TYPE_INTEGER, CONF_VALUE_16_BIT(2),
711 &li.score[SC_SHIELD], 10
716 TYPE_INTEGER, CONF_VALUE_16_BIT(1),
721 TYPE_INTEGER, CONF_VALUE_16_BIT(2),
722 &li.extra_time_score, 10
726 EL_TIME_ORB_FULL, -1,
727 TYPE_INTEGER, CONF_VALUE_16_BIT(1),
728 &li.time_orb_time, 10
731 EL_TIME_ORB_FULL, -1,
732 TYPE_BOOLEAN, CONF_VALUE_8_BIT(1),
733 &li.use_time_orb_bug, FALSE
738 TYPE_BOOLEAN, CONF_VALUE_8_BIT(1),
739 &li.use_spring_bug, FALSE
744 TYPE_INTEGER, CONF_VALUE_16_BIT(1),
745 &li.android_move_time, 10
749 TYPE_INTEGER, CONF_VALUE_16_BIT(2),
750 &li.android_clone_time, 10
754 TYPE_ELEMENT_LIST, CONF_VALUE_BYTES(1),
755 &li.android_clone_element[0], EL_EMPTY, NULL,
756 &li.num_android_clone_elements, 1, MAX_ANDROID_ELEMENTS
761 TYPE_INTEGER, CONF_VALUE_16_BIT(1),
766 TYPE_INTEGER, CONF_VALUE_16_BIT(2),
771 EL_EMC_MAGNIFIER, -1,
772 TYPE_INTEGER, CONF_VALUE_16_BIT(1),
773 &li.magnify_score, 10
776 EL_EMC_MAGNIFIER, -1,
777 TYPE_INTEGER, CONF_VALUE_16_BIT(2),
782 EL_EMC_MAGIC_BALL, -1,
783 TYPE_INTEGER, CONF_VALUE_16_BIT(1),
787 EL_EMC_MAGIC_BALL, -1,
788 TYPE_BOOLEAN, CONF_VALUE_8_BIT(1),
789 &li.ball_random, FALSE
792 EL_EMC_MAGIC_BALL, -1,
793 TYPE_BOOLEAN, CONF_VALUE_8_BIT(2),
794 &li.ball_state_initial, FALSE
797 EL_EMC_MAGIC_BALL, -1,
798 TYPE_CONTENT_LIST, CONF_VALUE_BYTES(1),
799 &li.ball_content, EL_EMPTY, NULL,
800 &li.num_ball_contents, 4, MAX_ELEMENT_CONTENTS
803 /* ---------- unused values ----------------------------------------------- */
806 EL_UNKNOWN, SAVE_CONF_NEVER,
807 TYPE_INTEGER, CONF_VALUE_16_BIT(1),
808 &li.score[SC_UNKNOWN_14], 10
811 EL_UNKNOWN, SAVE_CONF_NEVER,
812 TYPE_INTEGER, CONF_VALUE_16_BIT(2),
813 &li.score[SC_UNKNOWN_15], 10
823 static struct LevelFileConfigInfo chunk_config_NOTE[] =
827 TYPE_INTEGER, CONF_VALUE_8_BIT(1),
828 &xx_envelope.xsize, MAX_ENVELOPE_XSIZE,
832 TYPE_INTEGER, CONF_VALUE_8_BIT(2),
833 &xx_envelope.ysize, MAX_ENVELOPE_YSIZE,
838 TYPE_BOOLEAN, CONF_VALUE_8_BIT(3),
839 &xx_envelope.autowrap, FALSE
843 TYPE_BOOLEAN, CONF_VALUE_8_BIT(4),
844 &xx_envelope.centered, FALSE
849 TYPE_STRING, CONF_VALUE_BYTES(1),
850 &xx_envelope.text, -1, NULL,
851 &xx_string_length_unused, -1, MAX_ENVELOPE_TEXT_LEN,
852 &xx_default_string_empty[0]
862 static struct LevelFileConfigInfo chunk_config_CUSX_base[] =
866 TYPE_STRING, CONF_VALUE_BYTES(1),
867 &xx_ei.description[0], -1,
868 &yy_ei.description[0],
869 &xx_string_length_unused, -1, MAX_ELEMENT_NAME_LEN,
870 &xx_default_description[0]
875 TYPE_BITFIELD, CONF_VALUE_32_BIT(1),
876 &xx_ei.properties[EP_BITFIELD_BASE_NR], EP_BITMASK_BASE_DEFAULT,
877 &yy_ei.properties[EP_BITFIELD_BASE_NR]
879 #if ENABLE_RESERVED_CODE
880 /* (reserved for later use) */
883 TYPE_BITFIELD, CONF_VALUE_32_BIT(2),
884 &xx_ei.properties[EP_BITFIELD_BASE_NR + 1], EP_BITMASK_DEFAULT,
885 &yy_ei.properties[EP_BITFIELD_BASE_NR + 1]
891 TYPE_BOOLEAN, CONF_VALUE_8_BIT(1),
892 &xx_ei.use_gfx_element, FALSE,
893 &yy_ei.use_gfx_element
897 TYPE_ELEMENT, CONF_VALUE_16_BIT(1),
898 &xx_ei.gfx_element_initial, EL_EMPTY_SPACE,
899 &yy_ei.gfx_element_initial
904 TYPE_BITFIELD, CONF_VALUE_8_BIT(2),
905 &xx_ei.access_direction, MV_ALL_DIRECTIONS,
906 &yy_ei.access_direction
911 TYPE_INTEGER, CONF_VALUE_16_BIT(2),
912 &xx_ei.collect_score_initial, 10,
913 &yy_ei.collect_score_initial
917 TYPE_INTEGER, CONF_VALUE_16_BIT(3),
918 &xx_ei.collect_count_initial, 1,
919 &yy_ei.collect_count_initial
924 TYPE_INTEGER, CONF_VALUE_16_BIT(4),
925 &xx_ei.ce_value_fixed_initial, 0,
926 &yy_ei.ce_value_fixed_initial
930 TYPE_INTEGER, CONF_VALUE_16_BIT(5),
931 &xx_ei.ce_value_random_initial, 0,
932 &yy_ei.ce_value_random_initial
936 TYPE_BOOLEAN, CONF_VALUE_8_BIT(3),
937 &xx_ei.use_last_ce_value, FALSE,
938 &yy_ei.use_last_ce_value
943 TYPE_INTEGER, CONF_VALUE_16_BIT(6),
944 &xx_ei.push_delay_fixed, 8,
945 &yy_ei.push_delay_fixed
949 TYPE_INTEGER, CONF_VALUE_16_BIT(7),
950 &xx_ei.push_delay_random, 8,
951 &yy_ei.push_delay_random
955 TYPE_INTEGER, CONF_VALUE_16_BIT(8),
956 &xx_ei.drop_delay_fixed, 0,
957 &yy_ei.drop_delay_fixed
961 TYPE_INTEGER, CONF_VALUE_16_BIT(9),
962 &xx_ei.drop_delay_random, 0,
963 &yy_ei.drop_delay_random
967 TYPE_INTEGER, CONF_VALUE_16_BIT(10),
968 &xx_ei.move_delay_fixed, 0,
969 &yy_ei.move_delay_fixed
973 TYPE_INTEGER, CONF_VALUE_16_BIT(11),
974 &xx_ei.move_delay_random, 0,
975 &yy_ei.move_delay_random
980 TYPE_BITFIELD, CONF_VALUE_32_BIT(3),
981 &xx_ei.move_pattern, MV_ALL_DIRECTIONS,
986 TYPE_BITFIELD, CONF_VALUE_8_BIT(4),
987 &xx_ei.move_direction_initial, MV_START_AUTOMATIC,
988 &yy_ei.move_direction_initial
992 TYPE_INTEGER, CONF_VALUE_8_BIT(5),
993 &xx_ei.move_stepsize, TILEX / 8,
999 TYPE_ELEMENT, CONF_VALUE_16_BIT(12),
1000 &xx_ei.move_enter_element, EL_EMPTY_SPACE,
1001 &yy_ei.move_enter_element
1005 TYPE_ELEMENT, CONF_VALUE_16_BIT(13),
1006 &xx_ei.move_leave_element, EL_EMPTY_SPACE,
1007 &yy_ei.move_leave_element
1011 TYPE_INTEGER, CONF_VALUE_8_BIT(6),
1012 &xx_ei.move_leave_type, LEAVE_TYPE_UNLIMITED,
1013 &yy_ei.move_leave_type
1018 TYPE_INTEGER, CONF_VALUE_8_BIT(7),
1019 &xx_ei.slippery_type, SLIPPERY_ANY_RANDOM,
1020 &yy_ei.slippery_type
1025 TYPE_INTEGER, CONF_VALUE_8_BIT(8),
1026 &xx_ei.explosion_type, EXPLODES_3X3,
1027 &yy_ei.explosion_type
1031 TYPE_INTEGER, CONF_VALUE_16_BIT(14),
1032 &xx_ei.explosion_delay, 16,
1033 &yy_ei.explosion_delay
1037 TYPE_INTEGER, CONF_VALUE_16_BIT(15),
1038 &xx_ei.ignition_delay, 8,
1039 &yy_ei.ignition_delay
1044 TYPE_CONTENT_LIST, CONF_VALUE_BYTES(2),
1045 &xx_ei.content, EL_EMPTY_SPACE,
1047 &xx_num_contents, 1, 1
1050 /* ---------- "num_change_pages" must be the last entry ------------------- */
1053 -1, SAVE_CONF_ALWAYS,
1054 TYPE_INTEGER, CONF_VALUE_8_BIT(9),
1055 &xx_ei.num_change_pages, 1,
1056 &yy_ei.num_change_pages
1067 static struct LevelFileConfigInfo chunk_config_CUSX_change[] =
1069 /* ---------- "current_change_page" must be the first entry --------------- */
1072 -1, SAVE_CONF_ALWAYS,
1073 TYPE_INTEGER, CONF_VALUE_8_BIT(1),
1074 &xx_current_change_page, -1
1077 /* ---------- (the remaining entries can be in any order) ----------------- */
1081 TYPE_BOOLEAN, CONF_VALUE_8_BIT(2),
1082 &xx_change.can_change, FALSE
1087 TYPE_BITFIELD, CONF_VALUE_32_BIT(1),
1088 &xx_event_bits[0], 0
1092 TYPE_BITFIELD, CONF_VALUE_32_BIT(2),
1093 &xx_event_bits[1], 0
1098 TYPE_BITFIELD, CONF_VALUE_8_BIT(3),
1099 &xx_change.trigger_player, CH_PLAYER_ANY
1103 TYPE_BITFIELD, CONF_VALUE_8_BIT(4),
1104 &xx_change.trigger_side, CH_SIDE_ANY
1108 TYPE_BITFIELD, CONF_VALUE_32_BIT(3),
1109 &xx_change.trigger_page, CH_PAGE_ANY
1114 TYPE_ELEMENT, CONF_VALUE_16_BIT(1),
1115 &xx_change.target_element, EL_EMPTY_SPACE
1120 TYPE_INTEGER, CONF_VALUE_16_BIT(2),
1121 &xx_change.delay_fixed, 0
1125 TYPE_INTEGER, CONF_VALUE_16_BIT(3),
1126 &xx_change.delay_random, 0
1130 TYPE_INTEGER, CONF_VALUE_16_BIT(4),
1131 &xx_change.delay_frames, FRAMES_PER_SECOND
1136 TYPE_ELEMENT, CONF_VALUE_16_BIT(5),
1137 &xx_change.initial_trigger_element, EL_EMPTY_SPACE
1142 TYPE_BOOLEAN, CONF_VALUE_8_BIT(6),
1143 &xx_change.explode, FALSE
1147 TYPE_BOOLEAN, CONF_VALUE_8_BIT(7),
1148 &xx_change.use_target_content, FALSE
1152 TYPE_BOOLEAN, CONF_VALUE_8_BIT(8),
1153 &xx_change.only_if_complete, FALSE
1157 TYPE_BOOLEAN, CONF_VALUE_8_BIT(9),
1158 &xx_change.use_random_replace, FALSE
1162 TYPE_INTEGER, CONF_VALUE_8_BIT(10),
1163 &xx_change.random_percentage, 100
1167 TYPE_INTEGER, CONF_VALUE_8_BIT(11),
1168 &xx_change.replace_when, CP_WHEN_EMPTY
1173 TYPE_BOOLEAN, CONF_VALUE_8_BIT(12),
1174 &xx_change.has_action, FALSE
1178 TYPE_INTEGER, CONF_VALUE_8_BIT(13),
1179 &xx_change.action_type, CA_NO_ACTION
1183 TYPE_INTEGER, CONF_VALUE_8_BIT(14),
1184 &xx_change.action_mode, CA_MODE_UNDEFINED
1188 TYPE_INTEGER, CONF_VALUE_16_BIT(6),
1189 &xx_change.action_arg, CA_ARG_UNDEFINED
1194 TYPE_ELEMENT, CONF_VALUE_16_BIT(7),
1195 &xx_change.action_element, EL_EMPTY_SPACE
1200 TYPE_CONTENT_LIST, CONF_VALUE_BYTES(1),
1201 &xx_change.target_content, EL_EMPTY_SPACE, NULL,
1202 &xx_num_contents, 1, 1
1212 static struct LevelFileConfigInfo chunk_config_GRPX[] =
1216 TYPE_STRING, CONF_VALUE_BYTES(1),
1217 &xx_ei.description[0], -1, NULL,
1218 &xx_string_length_unused, -1, MAX_ELEMENT_NAME_LEN,
1219 &xx_default_description[0]
1224 TYPE_BOOLEAN, CONF_VALUE_8_BIT(1),
1225 &xx_ei.use_gfx_element, FALSE
1229 TYPE_ELEMENT, CONF_VALUE_16_BIT(1),
1230 &xx_ei.gfx_element_initial, EL_EMPTY_SPACE
1235 TYPE_INTEGER, CONF_VALUE_8_BIT(2),
1236 &xx_group.choice_mode, ANIM_RANDOM
1241 TYPE_ELEMENT_LIST, CONF_VALUE_BYTES(2),
1242 &xx_group.element[0], EL_EMPTY_SPACE, NULL,
1243 &xx_group.num_elements, 1, MAX_ELEMENTS_IN_GROUP
1253 static struct LevelFileConfigInfo chunk_config_CONF[] = /* (OBSOLETE) */
1257 TYPE_BOOLEAN, CONF_VALUE_8_BIT(9),
1258 &li.block_snap_field, TRUE
1262 TYPE_BOOLEAN, CONF_VALUE_8_BIT(13),
1263 &li.continuous_snapping, TRUE
1267 TYPE_INTEGER, CONF_VALUE_8_BIT(1),
1268 &li.initial_player_stepsize[0], STEPSIZE_NORMAL
1272 TYPE_BOOLEAN, CONF_VALUE_8_BIT(10),
1273 &li.use_start_element[0], FALSE
1277 TYPE_ELEMENT, CONF_VALUE_16_BIT(1),
1278 &li.start_element[0], EL_PLAYER_1
1282 TYPE_BOOLEAN, CONF_VALUE_8_BIT(11),
1283 &li.use_artwork_element[0], FALSE
1287 TYPE_ELEMENT, CONF_VALUE_16_BIT(2),
1288 &li.artwork_element[0], EL_PLAYER_1
1292 TYPE_BOOLEAN, CONF_VALUE_8_BIT(12),
1293 &li.use_explosion_element[0], FALSE
1297 TYPE_ELEMENT, CONF_VALUE_16_BIT(3),
1298 &li.explosion_element[0], EL_PLAYER_1
1313 filetype_id_list[] =
1315 { LEVEL_FILE_TYPE_RND, "RND" },
1316 { LEVEL_FILE_TYPE_BD, "BD" },
1317 { LEVEL_FILE_TYPE_EM, "EM" },
1318 { LEVEL_FILE_TYPE_SP, "SP" },
1319 { LEVEL_FILE_TYPE_DX, "DX" },
1320 { LEVEL_FILE_TYPE_SB, "SB" },
1321 { LEVEL_FILE_TYPE_DC, "DC" },
1326 /* ========================================================================= */
1327 /* level file functions */
1328 /* ========================================================================= */
1330 static boolean check_special_flags(char *flag)
1332 if (strEqual(options.special_flags, flag) ||
1333 strEqual(leveldir_current->special_flags, flag))
1339 static struct DateInfo getCurrentDate()
1341 time_t epoch_seconds = time(NULL);
1342 struct tm *now = localtime(&epoch_seconds);
1343 struct DateInfo date;
1345 date.year = now->tm_year + 1900;
1346 date.month = now->tm_mon + 1;
1347 date.day = now->tm_mday;
1349 date.src = DATE_SRC_CLOCK;
1354 static void resetEventFlags(struct ElementChangeInfo *change)
1358 for (i = 0; i < NUM_CHANGE_EVENTS; i++)
1359 change->has_event[i] = FALSE;
1362 static void resetEventBits()
1366 for (i = 0; i < NUM_CE_BITFIELDS; i++)
1367 xx_event_bits[i] = 0;
1370 static void setEventFlagsFromEventBits(struct ElementChangeInfo *change)
1374 /* important: only change event flag if corresponding event bit is set
1375 (this is because all xx_event_bits[] values are loaded separately,
1376 and all xx_event_bits[] values are set back to zero before loading
1377 another value xx_event_bits[x] (each value representing 32 flags)) */
1379 for (i = 0; i < NUM_CHANGE_EVENTS; i++)
1380 if (xx_event_bits[CH_EVENT_BITFIELD_NR(i)] & CH_EVENT_BIT(i))
1381 change->has_event[i] = TRUE;
1384 static void setEventBitsFromEventFlags(struct ElementChangeInfo *change)
1388 /* in contrast to the above function setEventFlagsFromEventBits(), it
1389 would also be possible to set all bits in xx_event_bits[] to 0 or 1
1390 depending on the corresponding change->has_event[i] values here, as
1391 all xx_event_bits[] values are reset in resetEventBits() before */
1393 for (i = 0; i < NUM_CHANGE_EVENTS; i++)
1394 if (change->has_event[i])
1395 xx_event_bits[CH_EVENT_BITFIELD_NR(i)] |= CH_EVENT_BIT(i);
1398 static char *getDefaultElementDescription(struct ElementInfo *ei)
1400 static char description[MAX_ELEMENT_NAME_LEN + 1];
1401 char *default_description = (ei->custom_description != NULL ?
1402 ei->custom_description :
1403 ei->editor_description);
1406 /* always start with reliable default values */
1407 for (i = 0; i < MAX_ELEMENT_NAME_LEN + 1; i++)
1408 description[i] = '\0';
1410 /* truncate element description to MAX_ELEMENT_NAME_LEN bytes */
1411 strncpy(description, default_description, MAX_ELEMENT_NAME_LEN);
1413 return &description[0];
1416 static void setElementDescriptionToDefault(struct ElementInfo *ei)
1418 char *default_description = getDefaultElementDescription(ei);
1421 for (i = 0; i < MAX_ELEMENT_NAME_LEN + 1; i++)
1422 ei->description[i] = default_description[i];
1425 static void setConfigToDefaultsFromConfigList(struct LevelFileConfigInfo *conf)
1429 for (i = 0; conf[i].data_type != -1; i++)
1431 int default_value = conf[i].default_value;
1432 int data_type = conf[i].data_type;
1433 int conf_type = conf[i].conf_type;
1434 int byte_mask = conf_type & CONF_MASK_BYTES;
1436 if (byte_mask == CONF_MASK_MULTI_BYTES)
1438 int default_num_entities = conf[i].default_num_entities;
1439 int max_num_entities = conf[i].max_num_entities;
1441 *(int *)(conf[i].num_entities) = default_num_entities;
1443 if (data_type == TYPE_STRING)
1445 char *default_string = conf[i].default_string;
1446 char *string = (char *)(conf[i].value);
1448 strncpy(string, default_string, max_num_entities);
1450 else if (data_type == TYPE_ELEMENT_LIST)
1452 int *element_array = (int *)(conf[i].value);
1455 for (j = 0; j < max_num_entities; j++)
1456 element_array[j] = default_value;
1458 else if (data_type == TYPE_CONTENT_LIST)
1460 struct Content *content = (struct Content *)(conf[i].value);
1463 for (c = 0; c < max_num_entities; c++)
1464 for (y = 0; y < 3; y++)
1465 for (x = 0; x < 3; x++)
1466 content[c].e[x][y] = default_value;
1469 else /* constant size configuration data (1, 2 or 4 bytes) */
1471 if (data_type == TYPE_BOOLEAN)
1472 *(boolean *)(conf[i].value) = default_value;
1474 *(int *) (conf[i].value) = default_value;
1479 static void copyConfigFromConfigList(struct LevelFileConfigInfo *conf)
1483 for (i = 0; conf[i].data_type != -1; i++)
1485 int data_type = conf[i].data_type;
1486 int conf_type = conf[i].conf_type;
1487 int byte_mask = conf_type & CONF_MASK_BYTES;
1489 if (byte_mask == CONF_MASK_MULTI_BYTES)
1491 int max_num_entities = conf[i].max_num_entities;
1493 if (data_type == TYPE_STRING)
1495 char *string = (char *)(conf[i].value);
1496 char *string_copy = (char *)(conf[i].value_copy);
1498 strncpy(string_copy, string, max_num_entities);
1500 else if (data_type == TYPE_ELEMENT_LIST)
1502 int *element_array = (int *)(conf[i].value);
1503 int *element_array_copy = (int *)(conf[i].value_copy);
1506 for (j = 0; j < max_num_entities; j++)
1507 element_array_copy[j] = element_array[j];
1509 else if (data_type == TYPE_CONTENT_LIST)
1511 struct Content *content = (struct Content *)(conf[i].value);
1512 struct Content *content_copy = (struct Content *)(conf[i].value_copy);
1515 for (c = 0; c < max_num_entities; c++)
1516 for (y = 0; y < 3; y++)
1517 for (x = 0; x < 3; x++)
1518 content_copy[c].e[x][y] = content[c].e[x][y];
1521 else /* constant size configuration data (1, 2 or 4 bytes) */
1523 if (data_type == TYPE_BOOLEAN)
1524 *(boolean *)(conf[i].value_copy) = *(boolean *)(conf[i].value);
1526 *(int *) (conf[i].value_copy) = *(int *) (conf[i].value);
1531 void copyElementInfo(struct ElementInfo *ei_from, struct ElementInfo *ei_to)
1535 xx_ei = *ei_from; /* copy element data into temporary buffer */
1536 yy_ei = *ei_to; /* copy element data into temporary buffer */
1538 copyConfigFromConfigList(chunk_config_CUSX_base);
1543 /* ---------- reinitialize and copy change pages ---------- */
1545 ei_to->num_change_pages = ei_from->num_change_pages;
1546 ei_to->current_change_page = ei_from->current_change_page;
1548 setElementChangePages(ei_to, ei_to->num_change_pages);
1550 for (i = 0; i < ei_to->num_change_pages; i++)
1551 ei_to->change_page[i] = ei_from->change_page[i];
1553 /* ---------- copy group element info ---------- */
1554 if (ei_from->group != NULL && ei_to->group != NULL) /* group or internal */
1555 *ei_to->group = *ei_from->group;
1557 /* mark this custom element as modified */
1558 ei_to->modified_settings = TRUE;
1561 void setElementChangePages(struct ElementInfo *ei, int change_pages)
1563 int change_page_size = sizeof(struct ElementChangeInfo);
1565 ei->num_change_pages = MAX(1, change_pages);
1568 checked_realloc(ei->change_page, ei->num_change_pages * change_page_size);
1570 if (ei->current_change_page >= ei->num_change_pages)
1571 ei->current_change_page = ei->num_change_pages - 1;
1573 ei->change = &ei->change_page[ei->current_change_page];
1576 void setElementChangeInfoToDefaults(struct ElementChangeInfo *change)
1578 xx_change = *change; /* copy change data into temporary buffer */
1580 setConfigToDefaultsFromConfigList(chunk_config_CUSX_change);
1582 *change = xx_change;
1584 resetEventFlags(change);
1586 change->direct_action = 0;
1587 change->other_action = 0;
1589 change->pre_change_function = NULL;
1590 change->change_function = NULL;
1591 change->post_change_function = NULL;
1594 static void setLevelInfoToDefaults_Level(struct LevelInfo *level)
1598 li = *level; /* copy level data into temporary buffer */
1599 setConfigToDefaultsFromConfigList(chunk_config_INFO);
1600 *level = li; /* copy temporary buffer back to level data */
1602 setLevelInfoToDefaults_EM();
1603 setLevelInfoToDefaults_SP();
1605 level->native_em_level = &native_em_level;
1606 level->native_sp_level = &native_sp_level;
1608 level->file_version = FILE_VERSION_ACTUAL;
1609 level->game_version = GAME_VERSION_ACTUAL;
1611 level->creation_date = getCurrentDate();
1613 level->encoding_16bit_field = TRUE;
1614 level->encoding_16bit_yamyam = TRUE;
1615 level->encoding_16bit_amoeba = TRUE;
1617 /* clear level name and level author string buffers */
1618 for (i = 0; i < MAX_LEVEL_NAME_LEN; i++)
1619 level->name[i] = '\0';
1620 for (i = 0; i < MAX_LEVEL_AUTHOR_LEN; i++)
1621 level->author[i] = '\0';
1623 /* set level name and level author to default values */
1624 strcpy(level->name, NAMELESS_LEVEL_NAME);
1625 strcpy(level->author, ANONYMOUS_NAME);
1627 /* set level playfield to playable default level with player and exit */
1628 for (x = 0; x < MAX_LEV_FIELDX; x++)
1629 for (y = 0; y < MAX_LEV_FIELDY; y++)
1630 level->field[x][y] = EL_SAND;
1632 level->field[0][0] = EL_PLAYER_1;
1633 level->field[STD_LEV_FIELDX - 1][STD_LEV_FIELDY - 1] = EL_EXIT_CLOSED;
1635 BorderElement = EL_STEELWALL;
1637 /* set all bug compatibility flags to "false" => do not emulate this bug */
1638 level->use_action_after_change_bug = FALSE;
1640 if (leveldir_current)
1642 /* try to determine better author name than 'anonymous' */
1643 if (!strEqual(leveldir_current->author, ANONYMOUS_NAME))
1645 strncpy(level->author, leveldir_current->author, MAX_LEVEL_AUTHOR_LEN);
1646 level->author[MAX_LEVEL_AUTHOR_LEN] = '\0';
1650 switch (LEVELCLASS(leveldir_current))
1652 case LEVELCLASS_TUTORIAL:
1653 strcpy(level->author, PROGRAM_AUTHOR_STRING);
1656 case LEVELCLASS_CONTRIB:
1657 strncpy(level->author, leveldir_current->name, MAX_LEVEL_AUTHOR_LEN);
1658 level->author[MAX_LEVEL_AUTHOR_LEN] = '\0';
1661 case LEVELCLASS_PRIVATE:
1662 strncpy(level->author, getRealName(), MAX_LEVEL_AUTHOR_LEN);
1663 level->author[MAX_LEVEL_AUTHOR_LEN] = '\0';
1667 /* keep default value */
1674 static void setLevelInfoToDefaults_Elements(struct LevelInfo *level)
1676 static boolean clipboard_elements_initialized = FALSE;
1679 InitElementPropertiesStatic();
1681 li = *level; /* copy level data into temporary buffer */
1682 setConfigToDefaultsFromConfigList(chunk_config_ELEM);
1683 *level = li; /* copy temporary buffer back to level data */
1685 for (i = 0; i < MAX_NUM_ELEMENTS; i++)
1688 struct ElementInfo *ei = &element_info[element];
1690 /* never initialize clipboard elements after the very first time */
1691 /* (to be able to use clipboard elements between several levels) */
1692 if (IS_CLIPBOARD_ELEMENT(element) && clipboard_elements_initialized)
1695 if (IS_ENVELOPE(element))
1697 int envelope_nr = element - EL_ENVELOPE_1;
1699 setConfigToDefaultsFromConfigList(chunk_config_NOTE);
1701 level->envelope[envelope_nr] = xx_envelope;
1704 if (IS_CUSTOM_ELEMENT(element) ||
1705 IS_GROUP_ELEMENT(element) ||
1706 IS_INTERNAL_ELEMENT(element))
1708 xx_ei = *ei; /* copy element data into temporary buffer */
1710 setConfigToDefaultsFromConfigList(chunk_config_CUSX_base);
1715 setElementChangePages(ei, 1);
1716 setElementChangeInfoToDefaults(ei->change);
1718 if (IS_CUSTOM_ELEMENT(element) ||
1719 IS_GROUP_ELEMENT(element) ||
1720 IS_INTERNAL_ELEMENT(element))
1722 setElementDescriptionToDefault(ei);
1724 ei->modified_settings = FALSE;
1727 if (IS_CUSTOM_ELEMENT(element) ||
1728 IS_INTERNAL_ELEMENT(element))
1730 /* internal values used in level editor */
1732 ei->access_type = 0;
1733 ei->access_layer = 0;
1734 ei->access_protected = 0;
1735 ei->walk_to_action = 0;
1736 ei->smash_targets = 0;
1739 ei->can_explode_by_fire = FALSE;
1740 ei->can_explode_smashed = FALSE;
1741 ei->can_explode_impact = FALSE;
1743 ei->current_change_page = 0;
1746 if (IS_GROUP_ELEMENT(element) ||
1747 IS_INTERNAL_ELEMENT(element))
1749 struct ElementGroupInfo *group;
1751 /* initialize memory for list of elements in group */
1752 if (ei->group == NULL)
1753 ei->group = checked_malloc(sizeof(struct ElementGroupInfo));
1757 xx_group = *group; /* copy group data into temporary buffer */
1759 setConfigToDefaultsFromConfigList(chunk_config_GRPX);
1765 clipboard_elements_initialized = TRUE;
1768 static void setLevelInfoToDefaults(struct LevelInfo *level,
1769 boolean level_info_only,
1770 boolean reset_file_status)
1772 setLevelInfoToDefaults_Level(level);
1774 if (!level_info_only)
1775 setLevelInfoToDefaults_Elements(level);
1777 if (reset_file_status)
1779 level->no_valid_file = FALSE;
1780 level->no_level_file = FALSE;
1783 level->changed = FALSE;
1786 static void setFileInfoToDefaults(struct LevelFileInfo *level_file_info)
1788 level_file_info->nr = 0;
1789 level_file_info->type = LEVEL_FILE_TYPE_UNKNOWN;
1790 level_file_info->packed = FALSE;
1791 level_file_info->basename = NULL;
1792 level_file_info->filename = NULL;
1795 int getMappedElement_SB(int, boolean);
1797 static void ActivateLevelTemplate()
1801 if (check_special_flags("load_xsb_to_ces"))
1803 /* fill smaller playfields with padding "beyond border wall" elements */
1804 if (level.fieldx < level_template.fieldx ||
1805 level.fieldy < level_template.fieldy)
1807 short field[level.fieldx][level.fieldy];
1808 int new_fieldx = MAX(level.fieldx, level_template.fieldx);
1809 int new_fieldy = MAX(level.fieldy, level_template.fieldy);
1810 int pos_fieldx = (new_fieldx - level.fieldx) / 2;
1811 int pos_fieldy = (new_fieldy - level.fieldy) / 2;
1813 /* copy old playfield (which is smaller than the visible area) */
1814 for (y = 0; y < level.fieldy; y++) for (x = 0; x < level.fieldx; x++)
1815 field[x][y] = level.field[x][y];
1817 /* fill new, larger playfield with "beyond border wall" elements */
1818 for (y = 0; y < new_fieldy; y++) for (x = 0; x < new_fieldx; x++)
1819 level.field[x][y] = getMappedElement_SB('_', TRUE);
1821 /* copy the old playfield to the middle of the new playfield */
1822 for (y = 0; y < level.fieldy; y++) for (x = 0; x < level.fieldx; x++)
1823 level.field[pos_fieldx + x][pos_fieldy + y] = field[x][y];
1825 level.fieldx = new_fieldx;
1826 level.fieldy = new_fieldy;
1830 /* Currently there is no special action needed to activate the template
1831 data, because 'element_info' property settings overwrite the original
1832 level data, while all other variables do not change. */
1834 /* Exception: 'from_level_template' elements in the original level playfield
1835 are overwritten with the corresponding elements at the same position in
1836 playfield from the level template. */
1838 for (x = 0; x < level.fieldx; x++)
1839 for (y = 0; y < level.fieldy; y++)
1840 if (level.field[x][y] == EL_FROM_LEVEL_TEMPLATE)
1841 level.field[x][y] = level_template.field[x][y];
1843 if (check_special_flags("load_xsb_to_ces"))
1845 struct LevelInfo level_backup = level;
1847 /* overwrite all individual level settings from template level settings */
1848 level = level_template;
1850 /* restore playfield size */
1851 level.fieldx = level_backup.fieldx;
1852 level.fieldy = level_backup.fieldy;
1854 /* restore playfield content */
1855 for (x = 0; x < level.fieldx; x++)
1856 for (y = 0; y < level.fieldy; y++)
1857 level.field[x][y] = level_backup.field[x][y];
1859 /* restore name and author from individual level */
1860 strcpy(level.name, level_backup.name);
1861 strcpy(level.author, level_backup.author);
1863 /* restore flag "use_custom_template" */
1864 level.use_custom_template = level_backup.use_custom_template;
1868 static char *getLevelFilenameFromBasename(char *basename)
1870 static char *filename[2] = { NULL, NULL };
1871 int pos = (strEqual(basename, LEVELTEMPLATE_FILENAME) ? 0 : 1);
1873 checked_free(filename[pos]);
1875 filename[pos] = getPath2(getCurrentLevelDir(), basename);
1877 return filename[pos];
1880 static int getFileTypeFromBasename(char *basename)
1882 /* !!! ALSO SEE COMMENT IN checkForPackageFromBasename() !!! */
1884 static char *filename = NULL;
1885 struct stat file_status;
1887 /* ---------- try to determine file type from filename ---------- */
1889 /* check for typical filename of a Supaplex level package file */
1890 if (strlen(basename) == 10 && strPrefixLower(basename, "levels.d"))
1891 return LEVEL_FILE_TYPE_SP;
1893 /* check for typical filename of a Diamond Caves II level package file */
1894 if (strSuffixLower(basename, ".dc") ||
1895 strSuffixLower(basename, ".dc2"))
1896 return LEVEL_FILE_TYPE_DC;
1898 /* check for typical filename of a Sokoban level package file */
1899 if (strSuffixLower(basename, ".xsb") &&
1900 strchr(basename, '%') == NULL)
1901 return LEVEL_FILE_TYPE_SB;
1903 /* ---------- try to determine file type from filesize ---------- */
1905 checked_free(filename);
1906 filename = getPath2(getCurrentLevelDir(), basename);
1908 if (stat(filename, &file_status) == 0)
1910 /* check for typical filesize of a Supaplex level package file */
1911 if (file_status.st_size == 170496)
1912 return LEVEL_FILE_TYPE_SP;
1915 return LEVEL_FILE_TYPE_UNKNOWN;
1918 static boolean checkForPackageFromBasename(char *basename)
1920 /* !!! WON'T WORK ANYMORE IF getFileTypeFromBasename() ALSO DETECTS !!!
1921 !!! SINGLE LEVELS (CURRENTLY ONLY DETECTS LEVEL PACKAGES !!! */
1923 return (getFileTypeFromBasename(basename) != LEVEL_FILE_TYPE_UNKNOWN);
1926 static char *getSingleLevelBasenameExt(int nr, char *extension)
1928 static char basename[MAX_FILENAME_LEN];
1931 sprintf(basename, "%s", LEVELTEMPLATE_FILENAME);
1933 sprintf(basename, "%03d.%s", nr, extension);
1938 static char *getSingleLevelBasename(int nr)
1940 return getSingleLevelBasenameExt(nr, LEVELFILE_EXTENSION);
1943 static char *getPackedLevelBasename(int type)
1945 static char basename[MAX_FILENAME_LEN];
1946 char *directory = getCurrentLevelDir();
1948 DirectoryEntry *dir_entry;
1950 strcpy(basename, UNDEFINED_FILENAME); /* default: undefined file */
1952 if ((dir = openDirectory(directory)) == NULL)
1954 Error(ERR_WARN, "cannot read current level directory '%s'", directory);
1959 while ((dir_entry = readDirectory(dir)) != NULL) /* loop all entries */
1961 char *entry_basename = dir_entry->basename;
1962 int entry_type = getFileTypeFromBasename(entry_basename);
1964 if (entry_type != LEVEL_FILE_TYPE_UNKNOWN) /* found valid level package */
1966 if (type == LEVEL_FILE_TYPE_UNKNOWN ||
1969 strcpy(basename, entry_basename);
1976 closeDirectory(dir);
1981 static char *getSingleLevelFilename(int nr)
1983 return getLevelFilenameFromBasename(getSingleLevelBasename(nr));
1986 #if ENABLE_UNUSED_CODE
1987 static char *getPackedLevelFilename(int type)
1989 return getLevelFilenameFromBasename(getPackedLevelBasename(type));
1993 char *getDefaultLevelFilename(int nr)
1995 return getSingleLevelFilename(nr);
1998 #if ENABLE_UNUSED_CODE
1999 static void setLevelFileInfo_SingleLevelFilename(struct LevelFileInfo *lfi,
2003 lfi->packed = FALSE;
2004 lfi->basename = getSingleLevelBasename(lfi->nr, lfi->type);
2005 lfi->filename = getLevelFilenameFromBasename(lfi->basename);
2009 static void setLevelFileInfo_FormatLevelFilename(struct LevelFileInfo *lfi,
2010 int type, char *format, ...)
2012 static char basename[MAX_FILENAME_LEN];
2015 va_start(ap, format);
2016 vsprintf(basename, format, ap);
2020 lfi->packed = FALSE;
2021 lfi->basename = basename;
2022 lfi->filename = getLevelFilenameFromBasename(lfi->basename);
2025 static void setLevelFileInfo_PackedLevelFilename(struct LevelFileInfo *lfi,
2030 lfi->basename = getPackedLevelBasename(lfi->type);
2031 lfi->filename = getLevelFilenameFromBasename(lfi->basename);
2034 static int getFiletypeFromID(char *filetype_id)
2036 char *filetype_id_lower;
2037 int filetype = LEVEL_FILE_TYPE_UNKNOWN;
2040 if (filetype_id == NULL)
2041 return LEVEL_FILE_TYPE_UNKNOWN;
2043 filetype_id_lower = getStringToLower(filetype_id);
2045 for (i = 0; filetype_id_list[i].id != NULL; i++)
2047 char *id_lower = getStringToLower(filetype_id_list[i].id);
2049 if (strEqual(filetype_id_lower, id_lower))
2050 filetype = filetype_id_list[i].filetype;
2054 if (filetype != LEVEL_FILE_TYPE_UNKNOWN)
2058 free(filetype_id_lower);
2063 char *getLocalLevelTemplateFilename()
2065 return getDefaultLevelFilename(-1);
2068 char *getGlobalLevelTemplateFilename()
2070 /* global variable "leveldir_current" must be modified in the loop below */
2071 LevelDirTree *leveldir_current_last = leveldir_current;
2072 char *filename = NULL;
2074 /* check for template level in path from current to topmost tree node */
2076 while (leveldir_current != NULL)
2078 filename = getDefaultLevelFilename(-1);
2080 if (fileExists(filename))
2083 leveldir_current = leveldir_current->node_parent;
2086 /* restore global variable "leveldir_current" modified in above loop */
2087 leveldir_current = leveldir_current_last;
2092 static void determineLevelFileInfo_Filename(struct LevelFileInfo *lfi)
2096 /* special case: level number is negative => check for level template file */
2099 setLevelFileInfo_FormatLevelFilename(lfi, LEVEL_FILE_TYPE_RND,
2100 getSingleLevelBasename(-1));
2102 /* replace local level template filename with global template filename */
2103 lfi->filename = getGlobalLevelTemplateFilename();
2105 /* no fallback if template file not existing */
2109 /* special case: check for file name/pattern specified in "levelinfo.conf" */
2110 if (leveldir_current->level_filename != NULL)
2112 int filetype = getFiletypeFromID(leveldir_current->level_filetype);
2114 setLevelFileInfo_FormatLevelFilename(lfi, filetype,
2115 leveldir_current->level_filename, nr);
2117 lfi->packed = checkForPackageFromBasename(leveldir_current->level_filename);
2119 if (fileExists(lfi->filename))
2123 /* check for native Rocks'n'Diamonds level file */
2124 setLevelFileInfo_FormatLevelFilename(lfi, LEVEL_FILE_TYPE_RND,
2125 "%03d.%s", nr, LEVELFILE_EXTENSION);
2126 if (fileExists(lfi->filename))
2129 /* check for Emerald Mine level file (V1) */
2130 setLevelFileInfo_FormatLevelFilename(lfi, LEVEL_FILE_TYPE_EM, "a%c%c",
2131 'a' + (nr / 10) % 26, '0' + nr % 10);
2132 if (fileExists(lfi->filename))
2134 setLevelFileInfo_FormatLevelFilename(lfi, LEVEL_FILE_TYPE_EM, "A%c%c",
2135 'A' + (nr / 10) % 26, '0' + nr % 10);
2136 if (fileExists(lfi->filename))
2139 /* check for Emerald Mine level file (V2 to V5) */
2140 setLevelFileInfo_FormatLevelFilename(lfi, LEVEL_FILE_TYPE_EM, "%d", nr);
2141 if (fileExists(lfi->filename))
2144 /* check for Emerald Mine level file (V6 / single mode) */
2145 setLevelFileInfo_FormatLevelFilename(lfi, LEVEL_FILE_TYPE_EM, "%02ds", nr);
2146 if (fileExists(lfi->filename))
2148 setLevelFileInfo_FormatLevelFilename(lfi, LEVEL_FILE_TYPE_EM, "%02dS", nr);
2149 if (fileExists(lfi->filename))
2152 /* check for Emerald Mine level file (V6 / teamwork mode) */
2153 setLevelFileInfo_FormatLevelFilename(lfi, LEVEL_FILE_TYPE_EM, "%02dt", nr);
2154 if (fileExists(lfi->filename))
2156 setLevelFileInfo_FormatLevelFilename(lfi, LEVEL_FILE_TYPE_EM, "%02dT", nr);
2157 if (fileExists(lfi->filename))
2160 /* check for various packed level file formats */
2161 setLevelFileInfo_PackedLevelFilename(lfi, LEVEL_FILE_TYPE_UNKNOWN);
2162 if (fileExists(lfi->filename))
2165 /* no known level file found -- use default values (and fail later) */
2166 setLevelFileInfo_FormatLevelFilename(lfi, LEVEL_FILE_TYPE_RND,
2167 "%03d.%s", nr, LEVELFILE_EXTENSION);
2170 static void determineLevelFileInfo_Filetype(struct LevelFileInfo *lfi)
2172 if (lfi->type == LEVEL_FILE_TYPE_UNKNOWN)
2173 lfi->type = getFileTypeFromBasename(lfi->basename);
2176 static void setLevelFileInfo(struct LevelFileInfo *level_file_info, int nr)
2178 /* always start with reliable default values */
2179 setFileInfoToDefaults(level_file_info);
2181 level_file_info->nr = nr; /* set requested level number */
2183 determineLevelFileInfo_Filename(level_file_info);
2184 determineLevelFileInfo_Filetype(level_file_info);
2187 /* ------------------------------------------------------------------------- */
2188 /* functions for loading R'n'D level */
2189 /* ------------------------------------------------------------------------- */
2191 int getMappedElement(int element)
2193 /* remap some (historic, now obsolete) elements */
2197 case EL_PLAYER_OBSOLETE:
2198 element = EL_PLAYER_1;
2201 case EL_KEY_OBSOLETE:
2205 case EL_EM_KEY_1_FILE_OBSOLETE:
2206 element = EL_EM_KEY_1;
2209 case EL_EM_KEY_2_FILE_OBSOLETE:
2210 element = EL_EM_KEY_2;
2213 case EL_EM_KEY_3_FILE_OBSOLETE:
2214 element = EL_EM_KEY_3;
2217 case EL_EM_KEY_4_FILE_OBSOLETE:
2218 element = EL_EM_KEY_4;
2221 case EL_ENVELOPE_OBSOLETE:
2222 element = EL_ENVELOPE_1;
2230 if (element >= NUM_FILE_ELEMENTS)
2232 Error(ERR_WARN, "invalid level element %d", element);
2234 element = EL_UNKNOWN;
2242 int getMappedElementByVersion(int element, int game_version)
2244 /* remap some elements due to certain game version */
2246 if (game_version <= VERSION_IDENT(2,2,0,0))
2248 /* map game font elements */
2249 element = (element == EL_CHAR('[') ? EL_CHAR_AUMLAUT :
2250 element == EL_CHAR('\\') ? EL_CHAR_OUMLAUT :
2251 element == EL_CHAR(']') ? EL_CHAR_UUMLAUT :
2252 element == EL_CHAR('^') ? EL_CHAR_COPYRIGHT : element);
2255 if (game_version < VERSION_IDENT(3,0,0,0))
2257 /* map Supaplex gravity tube elements */
2258 element = (element == EL_SP_GRAVITY_PORT_LEFT ? EL_SP_PORT_LEFT :
2259 element == EL_SP_GRAVITY_PORT_RIGHT ? EL_SP_PORT_RIGHT :
2260 element == EL_SP_GRAVITY_PORT_UP ? EL_SP_PORT_UP :
2261 element == EL_SP_GRAVITY_PORT_DOWN ? EL_SP_PORT_DOWN :
2268 static int LoadLevel_VERS(File *file, int chunk_size, struct LevelInfo *level)
2270 level->file_version = getFileVersion(file);
2271 level->game_version = getFileVersion(file);
2276 static int LoadLevel_DATE(File *file, int chunk_size, struct LevelInfo *level)
2278 level->creation_date.year = getFile16BitBE(file);
2279 level->creation_date.month = getFile8Bit(file);
2280 level->creation_date.day = getFile8Bit(file);
2282 level->creation_date.src = DATE_SRC_LEVELFILE;
2287 static int LoadLevel_HEAD(File *file, int chunk_size, struct LevelInfo *level)
2289 int initial_player_stepsize;
2290 int initial_player_gravity;
2293 level->fieldx = getFile8Bit(file);
2294 level->fieldy = getFile8Bit(file);
2296 level->time = getFile16BitBE(file);
2297 level->gems_needed = getFile16BitBE(file);
2299 for (i = 0; i < MAX_LEVEL_NAME_LEN; i++)
2300 level->name[i] = getFile8Bit(file);
2301 level->name[MAX_LEVEL_NAME_LEN] = 0;
2303 for (i = 0; i < LEVEL_SCORE_ELEMENTS; i++)
2304 level->score[i] = getFile8Bit(file);
2306 level->num_yamyam_contents = STD_ELEMENT_CONTENTS;
2307 for (i = 0; i < STD_ELEMENT_CONTENTS; i++)
2308 for (y = 0; y < 3; y++)
2309 for (x = 0; x < 3; x++)
2310 level->yamyam_content[i].e[x][y] = getMappedElement(getFile8Bit(file));
2312 level->amoeba_speed = getFile8Bit(file);
2313 level->time_magic_wall = getFile8Bit(file);
2314 level->time_wheel = getFile8Bit(file);
2315 level->amoeba_content = getMappedElement(getFile8Bit(file));
2317 initial_player_stepsize = (getFile8Bit(file) == 1 ? STEPSIZE_FAST :
2320 for (i = 0; i < MAX_PLAYERS; i++)
2321 level->initial_player_stepsize[i] = initial_player_stepsize;
2323 initial_player_gravity = (getFile8Bit(file) == 1 ? TRUE : FALSE);
2325 for (i = 0; i < MAX_PLAYERS; i++)
2326 level->initial_player_gravity[i] = initial_player_gravity;
2328 level->encoding_16bit_field = (getFile8Bit(file) == 1 ? TRUE : FALSE);
2329 level->em_slippery_gems = (getFile8Bit(file) == 1 ? TRUE : FALSE);
2331 level->use_custom_template = (getFile8Bit(file) == 1 ? TRUE : FALSE);
2333 level->block_last_field = (getFile8Bit(file) == 1 ? TRUE : FALSE);
2334 level->sp_block_last_field = (getFile8Bit(file) == 1 ? TRUE : FALSE);
2335 level->can_move_into_acid_bits = getFile32BitBE(file);
2336 level->dont_collide_with_bits = getFile8Bit(file);
2338 level->use_spring_bug = (getFile8Bit(file) == 1 ? TRUE : FALSE);
2339 level->use_step_counter = (getFile8Bit(file) == 1 ? TRUE : FALSE);
2341 level->instant_relocation = (getFile8Bit(file) == 1 ? TRUE : FALSE);
2342 level->can_pass_to_walkable = (getFile8Bit(file) == 1 ? TRUE : FALSE);
2343 level->grow_into_diggable = (getFile8Bit(file) == 1 ? TRUE : FALSE);
2345 level->game_engine_type = getFile8Bit(file);
2347 ReadUnusedBytesFromFile(file, LEVEL_CHUNK_HEAD_UNUSED);
2352 static int LoadLevel_NAME(File *file, int chunk_size, struct LevelInfo *level)
2356 for (i = 0; i < MAX_LEVEL_NAME_LEN; i++)
2357 level->name[i] = getFile8Bit(file);
2358 level->name[MAX_LEVEL_NAME_LEN] = 0;
2363 static int LoadLevel_AUTH(File *file, int chunk_size, struct LevelInfo *level)
2367 for (i = 0; i < MAX_LEVEL_AUTHOR_LEN; i++)
2368 level->author[i] = getFile8Bit(file);
2369 level->author[MAX_LEVEL_AUTHOR_LEN] = 0;
2374 static int LoadLevel_BODY(File *file, int chunk_size, struct LevelInfo *level)
2377 int chunk_size_expected = level->fieldx * level->fieldy;
2379 /* Note: "chunk_size" was wrong before version 2.0 when elements are
2380 stored with 16-bit encoding (and should be twice as big then).
2381 Even worse, playfield data was stored 16-bit when only yamyam content
2382 contained 16-bit elements and vice versa. */
2384 if (level->encoding_16bit_field && level->file_version >= FILE_VERSION_2_0)
2385 chunk_size_expected *= 2;
2387 if (chunk_size_expected != chunk_size)
2389 ReadUnusedBytesFromFile(file, chunk_size);
2390 return chunk_size_expected;
2393 for (y = 0; y < level->fieldy; y++)
2394 for (x = 0; x < level->fieldx; x++)
2395 level->field[x][y] =
2396 getMappedElement(level->encoding_16bit_field ? getFile16BitBE(file) :
2401 static int LoadLevel_CONT(File *file, int chunk_size, struct LevelInfo *level)
2404 int header_size = 4;
2405 int content_size = MAX_ELEMENT_CONTENTS * 3 * 3;
2406 int chunk_size_expected = header_size + content_size;
2408 /* Note: "chunk_size" was wrong before version 2.0 when elements are
2409 stored with 16-bit encoding (and should be twice as big then).
2410 Even worse, playfield data was stored 16-bit when only yamyam content
2411 contained 16-bit elements and vice versa. */
2413 if (level->encoding_16bit_field && level->file_version >= FILE_VERSION_2_0)
2414 chunk_size_expected += content_size;
2416 if (chunk_size_expected != chunk_size)
2418 ReadUnusedBytesFromFile(file, chunk_size);
2419 return chunk_size_expected;
2423 level->num_yamyam_contents = getFile8Bit(file);
2427 /* correct invalid number of content fields -- should never happen */
2428 if (level->num_yamyam_contents < 1 ||
2429 level->num_yamyam_contents > MAX_ELEMENT_CONTENTS)
2430 level->num_yamyam_contents = STD_ELEMENT_CONTENTS;
2432 for (i = 0; i < MAX_ELEMENT_CONTENTS; i++)
2433 for (y = 0; y < 3; y++)
2434 for (x = 0; x < 3; x++)
2435 level->yamyam_content[i].e[x][y] =
2436 getMappedElement(level->encoding_16bit_field ?
2437 getFile16BitBE(file) : getFile8Bit(file));
2441 static int LoadLevel_CNT2(File *file, int chunk_size, struct LevelInfo *level)
2446 int content_array[MAX_ELEMENT_CONTENTS][3][3];
2448 element = getMappedElement(getFile16BitBE(file));
2449 num_contents = getFile8Bit(file);
2451 getFile8Bit(file); /* content x size (unused) */
2452 getFile8Bit(file); /* content y size (unused) */
2454 ReadUnusedBytesFromFile(file, LEVEL_CHUNK_CNT2_UNUSED);
2456 for (i = 0; i < MAX_ELEMENT_CONTENTS; i++)
2457 for (y = 0; y < 3; y++)
2458 for (x = 0; x < 3; x++)
2459 content_array[i][x][y] = getMappedElement(getFile16BitBE(file));
2461 /* correct invalid number of content fields -- should never happen */
2462 if (num_contents < 1 || num_contents > MAX_ELEMENT_CONTENTS)
2463 num_contents = STD_ELEMENT_CONTENTS;
2465 if (element == EL_YAMYAM)
2467 level->num_yamyam_contents = num_contents;
2469 for (i = 0; i < num_contents; i++)
2470 for (y = 0; y < 3; y++)
2471 for (x = 0; x < 3; x++)
2472 level->yamyam_content[i].e[x][y] = content_array[i][x][y];
2474 else if (element == EL_BD_AMOEBA)
2476 level->amoeba_content = content_array[0][0][0];
2480 Error(ERR_WARN, "cannot load content for element '%d'", element);
2486 static int LoadLevel_CNT3(File *file, int chunk_size, struct LevelInfo *level)
2492 int chunk_size_expected;
2494 element = getMappedElement(getFile16BitBE(file));
2495 if (!IS_ENVELOPE(element))
2496 element = EL_ENVELOPE_1;
2498 envelope_nr = element - EL_ENVELOPE_1;
2500 envelope_len = getFile16BitBE(file);
2502 level->envelope[envelope_nr].xsize = getFile8Bit(file);
2503 level->envelope[envelope_nr].ysize = getFile8Bit(file);
2505 ReadUnusedBytesFromFile(file, LEVEL_CHUNK_CNT3_UNUSED);
2507 chunk_size_expected = LEVEL_CHUNK_CNT3_SIZE(envelope_len);
2508 if (chunk_size_expected != chunk_size)
2510 ReadUnusedBytesFromFile(file, chunk_size - LEVEL_CHUNK_CNT3_HEADER);
2511 return chunk_size_expected;
2514 for (i = 0; i < envelope_len; i++)
2515 level->envelope[envelope_nr].text[i] = getFile8Bit(file);
2520 static int LoadLevel_CUS1(File *file, int chunk_size, struct LevelInfo *level)
2522 int num_changed_custom_elements = getFile16BitBE(file);
2523 int chunk_size_expected = 2 + num_changed_custom_elements * 6;
2526 if (chunk_size_expected != chunk_size)
2528 ReadUnusedBytesFromFile(file, chunk_size - 2);
2529 return chunk_size_expected;
2532 for (i = 0; i < num_changed_custom_elements; i++)
2534 int element = getMappedElement(getFile16BitBE(file));
2535 int properties = getFile32BitBE(file);
2537 if (IS_CUSTOM_ELEMENT(element))
2538 element_info[element].properties[EP_BITFIELD_BASE_NR] = properties;
2540 Error(ERR_WARN, "invalid custom element number %d", element);
2542 /* older game versions that wrote level files with CUS1 chunks used
2543 different default push delay values (not yet stored in level file) */
2544 element_info[element].push_delay_fixed = 2;
2545 element_info[element].push_delay_random = 8;
2551 static int LoadLevel_CUS2(File *file, int chunk_size, struct LevelInfo *level)
2553 int num_changed_custom_elements = getFile16BitBE(file);
2554 int chunk_size_expected = 2 + num_changed_custom_elements * 4;
2557 if (chunk_size_expected != chunk_size)
2559 ReadUnusedBytesFromFile(file, chunk_size - 2);
2560 return chunk_size_expected;
2563 for (i = 0; i < num_changed_custom_elements; i++)
2565 int element = getMappedElement(getFile16BitBE(file));
2566 int custom_target_element = getMappedElement(getFile16BitBE(file));
2568 if (IS_CUSTOM_ELEMENT(element))
2569 element_info[element].change->target_element = custom_target_element;
2571 Error(ERR_WARN, "invalid custom element number %d", element);
2577 static int LoadLevel_CUS3(File *file, int chunk_size, struct LevelInfo *level)
2579 int num_changed_custom_elements = getFile16BitBE(file);
2580 int chunk_size_expected = LEVEL_CHUNK_CUS3_SIZE(num_changed_custom_elements);
2583 if (chunk_size_expected != chunk_size)
2585 ReadUnusedBytesFromFile(file, chunk_size - 2);
2586 return chunk_size_expected;
2589 for (i = 0; i < num_changed_custom_elements; i++)
2591 int element = getMappedElement(getFile16BitBE(file));
2592 struct ElementInfo *ei = &element_info[element];
2593 unsigned int event_bits;
2595 if (!IS_CUSTOM_ELEMENT(element))
2597 Error(ERR_WARN, "invalid custom element number %d", element);
2599 element = EL_INTERNAL_DUMMY;
2602 for (j = 0; j < MAX_ELEMENT_NAME_LEN; j++)
2603 ei->description[j] = getFile8Bit(file);
2604 ei->description[MAX_ELEMENT_NAME_LEN] = 0;
2606 ei->properties[EP_BITFIELD_BASE_NR] = getFile32BitBE(file);
2608 /* some free bytes for future properties and padding */
2609 ReadUnusedBytesFromFile(file, 7);
2611 ei->use_gfx_element = getFile8Bit(file);
2612 ei->gfx_element_initial = getMappedElement(getFile16BitBE(file));
2614 ei->collect_score_initial = getFile8Bit(file);
2615 ei->collect_count_initial = getFile8Bit(file);
2617 ei->push_delay_fixed = getFile16BitBE(file);
2618 ei->push_delay_random = getFile16BitBE(file);
2619 ei->move_delay_fixed = getFile16BitBE(file);
2620 ei->move_delay_random = getFile16BitBE(file);
2622 ei->move_pattern = getFile16BitBE(file);
2623 ei->move_direction_initial = getFile8Bit(file);
2624 ei->move_stepsize = getFile8Bit(file);
2626 for (y = 0; y < 3; y++)
2627 for (x = 0; x < 3; x++)
2628 ei->content.e[x][y] = getMappedElement(getFile16BitBE(file));
2630 event_bits = getFile32BitBE(file);
2631 for (j = 0; j < NUM_CHANGE_EVENTS; j++)
2632 if (event_bits & (1 << j))
2633 ei->change->has_event[j] = TRUE;
2635 ei->change->target_element = getMappedElement(getFile16BitBE(file));
2637 ei->change->delay_fixed = getFile16BitBE(file);
2638 ei->change->delay_random = getFile16BitBE(file);
2639 ei->change->delay_frames = getFile16BitBE(file);
2641 ei->change->initial_trigger_element= getMappedElement(getFile16BitBE(file));
2643 ei->change->explode = getFile8Bit(file);
2644 ei->change->use_target_content = getFile8Bit(file);
2645 ei->change->only_if_complete = getFile8Bit(file);
2646 ei->change->use_random_replace = getFile8Bit(file);
2648 ei->change->random_percentage = getFile8Bit(file);
2649 ei->change->replace_when = getFile8Bit(file);
2651 for (y = 0; y < 3; y++)
2652 for (x = 0; x < 3; x++)
2653 ei->change->target_content.e[x][y] =
2654 getMappedElement(getFile16BitBE(file));
2656 ei->slippery_type = getFile8Bit(file);
2658 /* some free bytes for future properties and padding */
2659 ReadUnusedBytesFromFile(file, LEVEL_CPART_CUS3_UNUSED);
2661 /* mark that this custom element has been modified */
2662 ei->modified_settings = TRUE;
2668 static int LoadLevel_CUS4(File *file, int chunk_size, struct LevelInfo *level)
2670 struct ElementInfo *ei;
2671 int chunk_size_expected;
2675 /* ---------- custom element base property values (96 bytes) ------------- */
2677 element = getMappedElement(getFile16BitBE(file));
2679 if (!IS_CUSTOM_ELEMENT(element))
2681 Error(ERR_WARN, "invalid custom element number %d", element);
2683 ReadUnusedBytesFromFile(file, chunk_size - 2);
2687 ei = &element_info[element];
2689 for (i = 0; i < MAX_ELEMENT_NAME_LEN; i++)
2690 ei->description[i] = getFile8Bit(file);
2691 ei->description[MAX_ELEMENT_NAME_LEN] = 0;
2693 ei->properties[EP_BITFIELD_BASE_NR] = getFile32BitBE(file);
2695 ReadUnusedBytesFromFile(file, 4); /* reserved for more base properties */
2697 ei->num_change_pages = getFile8Bit(file);
2699 chunk_size_expected = LEVEL_CHUNK_CUS4_SIZE(ei->num_change_pages);
2700 if (chunk_size_expected != chunk_size)
2702 ReadUnusedBytesFromFile(file, chunk_size - 43);
2703 return chunk_size_expected;
2706 ei->ce_value_fixed_initial = getFile16BitBE(file);
2707 ei->ce_value_random_initial = getFile16BitBE(file);
2708 ei->use_last_ce_value = getFile8Bit(file);
2710 ei->use_gfx_element = getFile8Bit(file);
2711 ei->gfx_element_initial = getMappedElement(getFile16BitBE(file));
2713 ei->collect_score_initial = getFile8Bit(file);
2714 ei->collect_count_initial = getFile8Bit(file);
2716 ei->drop_delay_fixed = getFile8Bit(file);
2717 ei->push_delay_fixed = getFile8Bit(file);
2718 ei->drop_delay_random = getFile8Bit(file);
2719 ei->push_delay_random = getFile8Bit(file);
2720 ei->move_delay_fixed = getFile16BitBE(file);
2721 ei->move_delay_random = getFile16BitBE(file);
2723 /* bits 0 - 15 of "move_pattern" ... */
2724 ei->move_pattern = getFile16BitBE(file);
2725 ei->move_direction_initial = getFile8Bit(file);
2726 ei->move_stepsize = getFile8Bit(file);
2728 ei->slippery_type = getFile8Bit(file);
2730 for (y = 0; y < 3; y++)
2731 for (x = 0; x < 3; x++)
2732 ei->content.e[x][y] = getMappedElement(getFile16BitBE(file));
2734 ei->move_enter_element = getMappedElement(getFile16BitBE(file));
2735 ei->move_leave_element = getMappedElement(getFile16BitBE(file));
2736 ei->move_leave_type = getFile8Bit(file);
2738 /* ... bits 16 - 31 of "move_pattern" (not nice, but downward compatible) */
2739 ei->move_pattern |= (getFile16BitBE(file) << 16);
2741 ei->access_direction = getFile8Bit(file);
2743 ei->explosion_delay = getFile8Bit(file);
2744 ei->ignition_delay = getFile8Bit(file);
2745 ei->explosion_type = getFile8Bit(file);
2747 /* some free bytes for future custom property values and padding */
2748 ReadUnusedBytesFromFile(file, 1);
2750 /* ---------- change page property values (48 bytes) --------------------- */
2752 setElementChangePages(ei, ei->num_change_pages);
2754 for (i = 0; i < ei->num_change_pages; i++)
2756 struct ElementChangeInfo *change = &ei->change_page[i];
2757 unsigned int event_bits;
2759 /* always start with reliable default values */
2760 setElementChangeInfoToDefaults(change);
2762 /* bits 0 - 31 of "has_event[]" ... */
2763 event_bits = getFile32BitBE(file);
2764 for (j = 0; j < MIN(NUM_CHANGE_EVENTS, 32); j++)
2765 if (event_bits & (1 << j))
2766 change->has_event[j] = TRUE;
2768 change->target_element = getMappedElement(getFile16BitBE(file));
2770 change->delay_fixed = getFile16BitBE(file);
2771 change->delay_random = getFile16BitBE(file);
2772 change->delay_frames = getFile16BitBE(file);
2774 change->initial_trigger_element = getMappedElement(getFile16BitBE(file));
2776 change->explode = getFile8Bit(file);
2777 change->use_target_content = getFile8Bit(file);
2778 change->only_if_complete = getFile8Bit(file);
2779 change->use_random_replace = getFile8Bit(file);
2781 change->random_percentage = getFile8Bit(file);
2782 change->replace_when = getFile8Bit(file);
2784 for (y = 0; y < 3; y++)
2785 for (x = 0; x < 3; x++)
2786 change->target_content.e[x][y]= getMappedElement(getFile16BitBE(file));
2788 change->can_change = getFile8Bit(file);
2790 change->trigger_side = getFile8Bit(file);
2792 change->trigger_player = getFile8Bit(file);
2793 change->trigger_page = getFile8Bit(file);
2795 change->trigger_page = (change->trigger_page == CH_PAGE_ANY_FILE ?
2796 CH_PAGE_ANY : (1 << change->trigger_page));
2798 change->has_action = getFile8Bit(file);
2799 change->action_type = getFile8Bit(file);
2800 change->action_mode = getFile8Bit(file);
2801 change->action_arg = getFile16BitBE(file);
2803 /* ... bits 32 - 39 of "has_event[]" (not nice, but downward compatible) */
2804 event_bits = getFile8Bit(file);
2805 for (j = 32; j < NUM_CHANGE_EVENTS; j++)
2806 if (event_bits & (1 << (j - 32)))
2807 change->has_event[j] = TRUE;
2810 /* mark this custom element as modified */
2811 ei->modified_settings = TRUE;
2816 static int LoadLevel_GRP1(File *file, int chunk_size, struct LevelInfo *level)
2818 struct ElementInfo *ei;
2819 struct ElementGroupInfo *group;
2823 element = getMappedElement(getFile16BitBE(file));
2825 if (!IS_GROUP_ELEMENT(element))
2827 Error(ERR_WARN, "invalid group element number %d", element);
2829 ReadUnusedBytesFromFile(file, chunk_size - 2);
2833 ei = &element_info[element];
2835 for (i = 0; i < MAX_ELEMENT_NAME_LEN; i++)
2836 ei->description[i] = getFile8Bit(file);
2837 ei->description[MAX_ELEMENT_NAME_LEN] = 0;
2839 group = element_info[element].group;
2841 group->num_elements = getFile8Bit(file);
2843 ei->use_gfx_element = getFile8Bit(file);
2844 ei->gfx_element_initial = getMappedElement(getFile16BitBE(file));
2846 group->choice_mode = getFile8Bit(file);
2848 /* some free bytes for future values and padding */
2849 ReadUnusedBytesFromFile(file, 3);
2851 for (i = 0; i < MAX_ELEMENTS_IN_GROUP; i++)
2852 group->element[i] = getMappedElement(getFile16BitBE(file));
2854 /* mark this group element as modified */
2855 element_info[element].modified_settings = TRUE;
2860 static int LoadLevel_MicroChunk(File *file, struct LevelFileConfigInfo *conf,
2861 int element, int real_element)
2863 int micro_chunk_size = 0;
2864 int conf_type = getFile8Bit(file);
2865 int byte_mask = conf_type & CONF_MASK_BYTES;
2866 boolean element_found = FALSE;
2869 micro_chunk_size += 1;
2871 if (byte_mask == CONF_MASK_MULTI_BYTES)
2873 int num_bytes = getFile16BitBE(file);
2874 byte *buffer = checked_malloc(num_bytes);
2876 ReadBytesFromFile(file, buffer, num_bytes);
2878 for (i = 0; conf[i].data_type != -1; i++)
2880 if (conf[i].element == element &&
2881 conf[i].conf_type == conf_type)
2883 int data_type = conf[i].data_type;
2884 int num_entities = num_bytes / CONF_ENTITY_NUM_BYTES(data_type);
2885 int max_num_entities = conf[i].max_num_entities;
2887 if (num_entities > max_num_entities)
2890 "truncating number of entities for element %d from %d to %d",
2891 element, num_entities, max_num_entities);
2893 num_entities = max_num_entities;
2896 if (num_entities == 0 && (data_type == TYPE_ELEMENT_LIST ||
2897 data_type == TYPE_CONTENT_LIST))
2899 /* for element and content lists, zero entities are not allowed */
2900 Error(ERR_WARN, "found empty list of entities for element %d",
2903 /* do not set "num_entities" here to prevent reading behind buffer */
2905 *(int *)(conf[i].num_entities) = 1; /* at least one is required */
2909 *(int *)(conf[i].num_entities) = num_entities;
2912 element_found = TRUE;
2914 if (data_type == TYPE_STRING)
2916 char *string = (char *)(conf[i].value);
2919 for (j = 0; j < max_num_entities; j++)
2920 string[j] = (j < num_entities ? buffer[j] : '\0');
2922 else if (data_type == TYPE_ELEMENT_LIST)
2924 int *element_array = (int *)(conf[i].value);
2927 for (j = 0; j < num_entities; j++)
2929 getMappedElement(CONF_ELEMENTS_ELEMENT(buffer, j));
2931 else if (data_type == TYPE_CONTENT_LIST)
2933 struct Content *content= (struct Content *)(conf[i].value);
2936 for (c = 0; c < num_entities; c++)
2937 for (y = 0; y < 3; y++)
2938 for (x = 0; x < 3; x++)
2939 content[c].e[x][y] =
2940 getMappedElement(CONF_CONTENTS_ELEMENT(buffer, c, x, y));
2943 element_found = FALSE;
2949 checked_free(buffer);
2951 micro_chunk_size += 2 + num_bytes;
2953 else /* constant size configuration data (1, 2 or 4 bytes) */
2955 int value = (byte_mask == CONF_MASK_1_BYTE ? getFile8Bit (file) :
2956 byte_mask == CONF_MASK_2_BYTE ? getFile16BitBE(file) :
2957 byte_mask == CONF_MASK_4_BYTE ? getFile32BitBE(file) : 0);
2959 for (i = 0; conf[i].data_type != -1; i++)
2961 if (conf[i].element == element &&
2962 conf[i].conf_type == conf_type)
2964 int data_type = conf[i].data_type;
2966 if (data_type == TYPE_ELEMENT)
2967 value = getMappedElement(value);
2969 if (data_type == TYPE_BOOLEAN)
2970 *(boolean *)(conf[i].value) = value;
2972 *(int *) (conf[i].value) = value;
2974 element_found = TRUE;
2980 micro_chunk_size += CONF_VALUE_NUM_BYTES(byte_mask);
2985 char *error_conf_chunk_bytes =
2986 (byte_mask == CONF_MASK_1_BYTE ? "CONF_VALUE_8_BIT" :
2987 byte_mask == CONF_MASK_2_BYTE ? "CONF_VALUE_16_BIT" :
2988 byte_mask == CONF_MASK_4_BYTE ? "CONF_VALUE_32_BIT" :"CONF_VALUE_BYTES");
2989 int error_conf_chunk_token = conf_type & CONF_MASK_TOKEN;
2990 int error_element = real_element;
2992 Error(ERR_WARN, "cannot load micro chunk '%s(%d)' value for element %d ['%s']",
2993 error_conf_chunk_bytes, error_conf_chunk_token,
2994 error_element, EL_NAME(error_element));
2997 return micro_chunk_size;
3000 static int LoadLevel_INFO(File *file, int chunk_size, struct LevelInfo *level)
3002 int real_chunk_size = 0;
3004 li = *level; /* copy level data into temporary buffer */
3006 while (!checkEndOfFile(file))
3008 real_chunk_size += LoadLevel_MicroChunk(file, chunk_config_INFO, -1, -1);
3010 if (real_chunk_size >= chunk_size)
3014 *level = li; /* copy temporary buffer back to level data */
3016 return real_chunk_size;
3019 static int LoadLevel_CONF(File *file, int chunk_size, struct LevelInfo *level)
3021 int real_chunk_size = 0;
3023 li = *level; /* copy level data into temporary buffer */
3025 while (!checkEndOfFile(file))
3027 int element = getMappedElement(getFile16BitBE(file));
3029 real_chunk_size += 2;
3030 real_chunk_size += LoadLevel_MicroChunk(file, chunk_config_CONF,
3032 if (real_chunk_size >= chunk_size)
3036 *level = li; /* copy temporary buffer back to level data */
3038 return real_chunk_size;
3041 static int LoadLevel_ELEM(File *file, int chunk_size, struct LevelInfo *level)
3043 int real_chunk_size = 0;
3045 li = *level; /* copy level data into temporary buffer */
3047 while (!checkEndOfFile(file))
3049 int element = getMappedElement(getFile16BitBE(file));
3051 real_chunk_size += 2;
3052 real_chunk_size += LoadLevel_MicroChunk(file, chunk_config_ELEM,
3054 if (real_chunk_size >= chunk_size)
3058 *level = li; /* copy temporary buffer back to level data */
3060 return real_chunk_size;
3063 static int LoadLevel_NOTE(File *file, int chunk_size, struct LevelInfo *level)
3065 int element = getMappedElement(getFile16BitBE(file));
3066 int envelope_nr = element - EL_ENVELOPE_1;
3067 int real_chunk_size = 2;
3069 xx_envelope = level->envelope[envelope_nr]; /* copy into temporary buffer */
3071 while (!checkEndOfFile(file))
3073 real_chunk_size += LoadLevel_MicroChunk(file, chunk_config_NOTE,
3076 if (real_chunk_size >= chunk_size)
3080 level->envelope[envelope_nr] = xx_envelope; /* copy from temporary buffer */
3082 return real_chunk_size;
3085 static int LoadLevel_CUSX(File *file, int chunk_size, struct LevelInfo *level)
3087 int element = getMappedElement(getFile16BitBE(file));
3088 int real_chunk_size = 2;
3089 struct ElementInfo *ei = &element_info[element];
3092 xx_ei = *ei; /* copy element data into temporary buffer */
3094 xx_ei.num_change_pages = -1;
3096 while (!checkEndOfFile(file))
3098 real_chunk_size += LoadLevel_MicroChunk(file, chunk_config_CUSX_base,
3100 if (xx_ei.num_change_pages != -1)
3103 if (real_chunk_size >= chunk_size)
3109 if (ei->num_change_pages == -1)
3111 Error(ERR_WARN, "LoadLevel_CUSX(): missing 'num_change_pages' for '%s'",
3114 ei->num_change_pages = 1;
3116 setElementChangePages(ei, 1);
3117 setElementChangeInfoToDefaults(ei->change);
3119 return real_chunk_size;
3122 /* initialize number of change pages stored for this custom element */
3123 setElementChangePages(ei, ei->num_change_pages);
3124 for (i = 0; i < ei->num_change_pages; i++)
3125 setElementChangeInfoToDefaults(&ei->change_page[i]);
3127 /* start with reading properties for the first change page */
3128 xx_current_change_page = 0;
3130 while (!checkEndOfFile(file))
3132 struct ElementChangeInfo *change = &ei->change_page[xx_current_change_page];
3134 xx_change = *change; /* copy change data into temporary buffer */
3136 resetEventBits(); /* reset bits; change page might have changed */
3138 real_chunk_size += LoadLevel_MicroChunk(file, chunk_config_CUSX_change,
3141 *change = xx_change;
3143 setEventFlagsFromEventBits(change);
3145 if (real_chunk_size >= chunk_size)
3149 return real_chunk_size;
3152 static int LoadLevel_GRPX(File *file, int chunk_size, struct LevelInfo *level)
3154 int element = getMappedElement(getFile16BitBE(file));
3155 int real_chunk_size = 2;
3156 struct ElementInfo *ei = &element_info[element];
3157 struct ElementGroupInfo *group = ei->group;
3159 xx_ei = *ei; /* copy element data into temporary buffer */
3160 xx_group = *group; /* copy group data into temporary buffer */
3162 while (!checkEndOfFile(file))
3164 real_chunk_size += LoadLevel_MicroChunk(file, chunk_config_GRPX,
3167 if (real_chunk_size >= chunk_size)
3174 return real_chunk_size;
3177 static void LoadLevelFromFileInfo_RND(struct LevelInfo *level,
3178 struct LevelFileInfo *level_file_info,
3179 boolean level_info_only)
3181 char *filename = level_file_info->filename;
3182 char cookie[MAX_LINE_LEN];
3183 char chunk_name[CHUNK_ID_LEN + 1];
3187 if (!(file = openFile(filename, MODE_READ)))
3189 level->no_valid_file = TRUE;
3190 level->no_level_file = TRUE;
3192 if (level_info_only)
3195 Error(ERR_WARN, "cannot read level '%s' -- using empty level", filename);
3197 if (!setup.editor.use_template_for_new_levels)
3200 /* if level file not found, try to initialize level data from template */
3201 filename = getGlobalLevelTemplateFilename();
3203 if (!(file = openFile(filename, MODE_READ)))
3206 /* default: for empty levels, use level template for custom elements */
3207 level->use_custom_template = TRUE;
3209 level->no_valid_file = FALSE;
3212 getFileChunkBE(file, chunk_name, NULL);
3213 if (strEqual(chunk_name, "RND1"))
3215 getFile32BitBE(file); /* not used */
3217 getFileChunkBE(file, chunk_name, NULL);
3218 if (!strEqual(chunk_name, "CAVE"))
3220 level->no_valid_file = TRUE;
3222 Error(ERR_WARN, "unknown format of level file '%s'", filename);
3229 else /* check for pre-2.0 file format with cookie string */
3231 strcpy(cookie, chunk_name);
3232 if (getStringFromFile(file, &cookie[4], MAX_LINE_LEN - 4) == NULL)
3234 if (strlen(cookie) > 0 && cookie[strlen(cookie) - 1] == '\n')
3235 cookie[strlen(cookie) - 1] = '\0';
3237 if (!checkCookieString(cookie, LEVEL_COOKIE_TMPL))
3239 level->no_valid_file = TRUE;
3241 Error(ERR_WARN, "unknown format of level file '%s'", filename);
3248 if ((level->file_version = getFileVersionFromCookieString(cookie)) == -1)
3250 level->no_valid_file = TRUE;
3252 Error(ERR_WARN, "unsupported version of level file '%s'", filename);
3259 /* pre-2.0 level files have no game version, so use file version here */
3260 level->game_version = level->file_version;
3263 if (level->file_version < FILE_VERSION_1_2)
3265 /* level files from versions before 1.2.0 without chunk structure */
3266 LoadLevel_HEAD(file, LEVEL_CHUNK_HEAD_SIZE, level);
3267 LoadLevel_BODY(file, level->fieldx * level->fieldy, level);
3275 int (*loader)(File *, int, struct LevelInfo *);
3279 { "VERS", LEVEL_CHUNK_VERS_SIZE, LoadLevel_VERS },
3280 { "DATE", LEVEL_CHUNK_DATE_SIZE, LoadLevel_DATE },
3281 { "HEAD", LEVEL_CHUNK_HEAD_SIZE, LoadLevel_HEAD },
3282 { "NAME", LEVEL_CHUNK_NAME_SIZE, LoadLevel_NAME },
3283 { "AUTH", LEVEL_CHUNK_AUTH_SIZE, LoadLevel_AUTH },
3284 { "INFO", -1, LoadLevel_INFO },
3285 { "BODY", -1, LoadLevel_BODY },
3286 { "CONT", -1, LoadLevel_CONT },
3287 { "CNT2", LEVEL_CHUNK_CNT2_SIZE, LoadLevel_CNT2 },
3288 { "CNT3", -1, LoadLevel_CNT3 },
3289 { "CUS1", -1, LoadLevel_CUS1 },
3290 { "CUS2", -1, LoadLevel_CUS2 },
3291 { "CUS3", -1, LoadLevel_CUS3 },
3292 { "CUS4", -1, LoadLevel_CUS4 },
3293 { "GRP1", -1, LoadLevel_GRP1 },
3294 { "CONF", -1, LoadLevel_CONF },
3295 { "ELEM", -1, LoadLevel_ELEM },
3296 { "NOTE", -1, LoadLevel_NOTE },
3297 { "CUSX", -1, LoadLevel_CUSX },
3298 { "GRPX", -1, LoadLevel_GRPX },
3303 while (getFileChunkBE(file, chunk_name, &chunk_size))
3307 while (chunk_info[i].name != NULL &&
3308 !strEqual(chunk_name, chunk_info[i].name))
3311 if (chunk_info[i].name == NULL)
3313 Error(ERR_WARN, "unknown chunk '%s' in level file '%s'",
3314 chunk_name, filename);
3315 ReadUnusedBytesFromFile(file, chunk_size);
3317 else if (chunk_info[i].size != -1 &&
3318 chunk_info[i].size != chunk_size)
3320 Error(ERR_WARN, "wrong size (%d) of chunk '%s' in level file '%s'",
3321 chunk_size, chunk_name, filename);
3322 ReadUnusedBytesFromFile(file, chunk_size);
3326 /* call function to load this level chunk */
3327 int chunk_size_expected =
3328 (chunk_info[i].loader)(file, chunk_size, level);
3330 /* the size of some chunks cannot be checked before reading other
3331 chunks first (like "HEAD" and "BODY") that contain some header
3332 information, so check them here */
3333 if (chunk_size_expected != chunk_size)
3335 Error(ERR_WARN, "wrong size (%d) of chunk '%s' in level file '%s'",
3336 chunk_size, chunk_name, filename);
3346 /* ------------------------------------------------------------------------- */
3347 /* functions for loading EM level */
3348 /* ------------------------------------------------------------------------- */
3350 void CopyNativeLevel_RND_to_EM(struct LevelInfo *level)
3352 static int ball_xy[8][2] =
3363 struct LevelInfo_EM *level_em = level->native_em_level;
3364 struct LEVEL *lev = level_em->lev;
3365 struct PLAYER **ply = level_em->ply;
3368 lev->width = MIN(level->fieldx, EM_MAX_CAVE_WIDTH);
3369 lev->height = MIN(level->fieldy, EM_MAX_CAVE_HEIGHT);
3371 lev->time_seconds = level->time;
3372 lev->required_initial = level->gems_needed;
3374 lev->emerald_score = level->score[SC_EMERALD];
3375 lev->diamond_score = level->score[SC_DIAMOND];
3376 lev->alien_score = level->score[SC_ROBOT];
3377 lev->tank_score = level->score[SC_SPACESHIP];
3378 lev->bug_score = level->score[SC_BUG];
3379 lev->eater_score = level->score[SC_YAMYAM];
3380 lev->nut_score = level->score[SC_NUT];
3381 lev->dynamite_score = level->score[SC_DYNAMITE];
3382 lev->key_score = level->score[SC_KEY];
3383 lev->exit_score = level->score[SC_TIME_BONUS];
3385 for (i = 0; i < MAX_ELEMENT_CONTENTS; i++)
3386 for (y = 0; y < 3; y++)
3387 for (x = 0; x < 3; x++)
3388 lev->eater_array[i][y * 3 + x] =
3389 map_element_RND_to_EM(level->yamyam_content[i].e[x][y]);
3391 lev->amoeba_time = level->amoeba_speed;
3392 lev->wonderwall_time_initial = level->time_magic_wall;
3393 lev->wheel_time = level->time_wheel;
3395 lev->android_move_time = level->android_move_time;
3396 lev->android_clone_time = level->android_clone_time;
3397 lev->ball_random = level->ball_random;
3398 lev->ball_state_initial = level->ball_state_initial;
3399 lev->ball_time = level->ball_time;
3400 lev->num_ball_arrays = level->num_ball_contents;
3402 lev->lenses_score = level->lenses_score;
3403 lev->magnify_score = level->magnify_score;
3404 lev->slurp_score = level->slurp_score;
3406 lev->lenses_time = level->lenses_time;
3407 lev->magnify_time = level->magnify_time;
3409 lev->wind_direction_initial =
3410 map_direction_RND_to_EM(level->wind_direction_initial);
3411 lev->wind_cnt_initial = (level->wind_direction_initial != MV_NONE ?
3412 lev->wind_time : 0);
3414 for (i = 0; i < MAX_ELEMENT_CONTENTS; i++)
3415 for (j = 0; j < 8; j++)
3416 lev->ball_array[i][j] =
3417 map_element_RND_to_EM(level->
3418 ball_content[i].e[ball_xy[j][0]][ball_xy[j][1]]);
3420 map_android_clone_elements_RND_to_EM(level);
3422 /* first fill the complete playfield with the default border element */
3423 for (y = 0; y < EM_MAX_CAVE_HEIGHT; y++)
3424 for (x = 0; x < EM_MAX_CAVE_WIDTH; x++)
3425 level_em->cave[x][y] = ZBORDER;
3427 if (BorderElement == EL_STEELWALL)
3429 for (y = 0; y < lev->height + 2; y++)
3430 for (x = 0; x < lev->width + 2; x++)
3431 level_em->cave[x + 1][y + 1] = map_element_RND_to_EM(EL_STEELWALL);
3434 /* then copy the real level contents from level file into the playfield */
3435 for (y = 0; y < lev->height; y++) for (x = 0; x < lev->width; x++)
3437 int new_element = map_element_RND_to_EM(level->field[x][y]);
3438 int offset = (BorderElement == EL_STEELWALL ? 1 : 0);
3439 int xx = x + 1 + offset;
3440 int yy = y + 1 + offset;
3442 if (level->field[x][y] == EL_AMOEBA_DEAD)
3443 new_element = map_element_RND_to_EM(EL_AMOEBA_WET);
3445 level_em->cave[xx][yy] = new_element;
3448 for (i = 0; i < MAX_PLAYERS; i++)
3450 ply[i]->x_initial = 0;
3451 ply[i]->y_initial = 0;
3454 /* initialize player positions and delete players from the playfield */
3455 for (y = 0; y < lev->height; y++) for (x = 0; x < lev->width; x++)
3457 if (ELEM_IS_PLAYER(level->field[x][y]))
3459 int player_nr = GET_PLAYER_NR(level->field[x][y]);
3460 int offset = (BorderElement == EL_STEELWALL ? 1 : 0);
3461 int xx = x + 1 + offset;
3462 int yy = y + 1 + offset;
3464 ply[player_nr]->x_initial = xx;
3465 ply[player_nr]->y_initial = yy;
3467 level_em->cave[xx][yy] = map_element_RND_to_EM(EL_EMPTY);
3471 if (BorderElement == EL_STEELWALL)
3478 void CopyNativeLevel_EM_to_RND(struct LevelInfo *level)
3480 static int ball_xy[8][2] =
3491 struct LevelInfo_EM *level_em = level->native_em_level;
3492 struct LEVEL *lev = level_em->lev;
3493 struct PLAYER **ply = level_em->ply;
3496 level->fieldx = MIN(lev->width, MAX_LEV_FIELDX);
3497 level->fieldy = MIN(lev->height, MAX_LEV_FIELDY);
3499 level->time = lev->time_seconds;
3500 level->gems_needed = lev->required_initial;
3502 sprintf(level->name, "Level %d", level->file_info.nr);
3504 level->score[SC_EMERALD] = lev->emerald_score;
3505 level->score[SC_DIAMOND] = lev->diamond_score;
3506 level->score[SC_ROBOT] = lev->alien_score;
3507 level->score[SC_SPACESHIP] = lev->tank_score;
3508 level->score[SC_BUG] = lev->bug_score;
3509 level->score[SC_YAMYAM] = lev->eater_score;
3510 level->score[SC_NUT] = lev->nut_score;
3511 level->score[SC_DYNAMITE] = lev->dynamite_score;
3512 level->score[SC_KEY] = lev->key_score;
3513 level->score[SC_TIME_BONUS] = lev->exit_score;
3515 level->num_yamyam_contents = MAX_ELEMENT_CONTENTS;
3517 for (i = 0; i < level->num_yamyam_contents; i++)
3518 for (y = 0; y < 3; y++)
3519 for (x = 0; x < 3; x++)
3520 level->yamyam_content[i].e[x][y] =
3521 map_element_EM_to_RND(lev->eater_array[i][y * 3 + x]);
3523 level->amoeba_speed = lev->amoeba_time;
3524 level->time_magic_wall = lev->wonderwall_time_initial;
3525 level->time_wheel = lev->wheel_time;
3527 level->android_move_time = lev->android_move_time;
3528 level->android_clone_time = lev->android_clone_time;
3529 level->ball_random = lev->ball_random;
3530 level->ball_state_initial = lev->ball_state_initial;
3531 level->ball_time = lev->ball_time;
3532 level->num_ball_contents = lev->num_ball_arrays;
3534 level->lenses_score = lev->lenses_score;
3535 level->magnify_score = lev->magnify_score;
3536 level->slurp_score = lev->slurp_score;
3538 level->lenses_time = lev->lenses_time;
3539 level->magnify_time = lev->magnify_time;
3541 level->wind_direction_initial =
3542 map_direction_EM_to_RND(lev->wind_direction_initial);
3544 for (i = 0; i < MAX_ELEMENT_CONTENTS; i++)
3545 for (j = 0; j < 8; j++)
3546 level->ball_content[i].e[ball_xy[j][0]][ball_xy[j][1]] =
3547 map_element_EM_to_RND(lev->ball_array[i][j]);
3549 map_android_clone_elements_EM_to_RND(level);
3551 /* convert the playfield (some elements need special treatment) */
3552 for (y = 0; y < level->fieldy; y++) for (x = 0; x < level->fieldx; x++)
3554 int new_element = map_element_EM_to_RND(level_em->cave[x + 1][y + 1]);
3556 if (new_element == EL_AMOEBA_WET && level->amoeba_speed == 0)
3557 new_element = EL_AMOEBA_DEAD;
3559 level->field[x][y] = new_element;
3562 for (i = 0; i < MAX_PLAYERS; i++)
3564 /* in case of all players set to the same field, use the first player */
3565 int nr = MAX_PLAYERS - i - 1;
3566 int jx = ply[nr]->x_initial - 1;
3567 int jy = ply[nr]->y_initial - 1;
3569 if (jx != -1 && jy != -1)
3570 level->field[jx][jy] = EL_PLAYER_1 + nr;
3575 /* ------------------------------------------------------------------------- */
3576 /* functions for loading SP level */
3577 /* ------------------------------------------------------------------------- */
3579 void CopyNativeLevel_RND_to_SP(struct LevelInfo *level)
3581 struct LevelInfo_SP *level_sp = level->native_sp_level;
3582 LevelInfoType *header = &level_sp->header;
3585 level_sp->width = level->fieldx;
3586 level_sp->height = level->fieldy;
3588 for (x = 0; x < level->fieldx; x++)
3589 for (y = 0; y < level->fieldy; y++)
3590 level_sp->playfield[x][y] = map_element_RND_to_SP(level->field[x][y]);
3592 header->InitialGravity = (level->initial_player_gravity[0] ? 1 : 0);
3594 for (i = 0; i < SP_LEVEL_NAME_LEN; i++)
3595 header->LevelTitle[i] = level->name[i];
3596 /* !!! NO STRING TERMINATION IN SUPAPLEX VB CODE YET -- FIX THIS !!! */
3598 header->InfotronsNeeded = level->gems_needed;
3600 header->SpecialPortCount = 0;
3602 for (x = 0; x < level->fieldx; x++) for (y = 0; y < level->fieldy; y++)
3604 boolean gravity_port_found = FALSE;
3605 boolean gravity_port_valid = FALSE;
3606 int gravity_port_flag;
3607 int gravity_port_base_element;
3608 int element = level->field[x][y];
3610 if (element >= EL_SP_GRAVITY_ON_PORT_RIGHT &&
3611 element <= EL_SP_GRAVITY_ON_PORT_UP)
3613 gravity_port_found = TRUE;
3614 gravity_port_valid = TRUE;
3615 gravity_port_flag = 1;
3616 gravity_port_base_element = EL_SP_GRAVITY_ON_PORT_RIGHT;
3618 else if (element >= EL_SP_GRAVITY_OFF_PORT_RIGHT &&
3619 element <= EL_SP_GRAVITY_OFF_PORT_UP)
3621 gravity_port_found = TRUE;
3622 gravity_port_valid = TRUE;
3623 gravity_port_flag = 0;
3624 gravity_port_base_element = EL_SP_GRAVITY_OFF_PORT_RIGHT;
3626 else if (element >= EL_SP_GRAVITY_PORT_RIGHT &&
3627 element <= EL_SP_GRAVITY_PORT_UP)
3629 /* change R'n'D style gravity inverting special port to normal port
3630 (there are no gravity inverting ports in native Supaplex engine) */
3632 gravity_port_found = TRUE;
3633 gravity_port_valid = FALSE;
3634 gravity_port_base_element = EL_SP_GRAVITY_PORT_RIGHT;
3637 if (gravity_port_found)
3639 if (gravity_port_valid &&
3640 header->SpecialPortCount < SP_MAX_SPECIAL_PORTS)
3642 SpecialPortType *port = &header->SpecialPort[header->SpecialPortCount];
3644 port->PortLocation = (y * level->fieldx + x) * 2;
3645 port->Gravity = gravity_port_flag;
3647 element += EL_SP_GRAVITY_PORT_RIGHT - gravity_port_base_element;
3649 header->SpecialPortCount++;
3653 /* change special gravity port to normal port */
3655 element += EL_SP_PORT_RIGHT - gravity_port_base_element;
3658 level_sp->playfield[x][y] = element - EL_SP_START;
3663 void CopyNativeLevel_SP_to_RND(struct LevelInfo *level)
3665 struct LevelInfo_SP *level_sp = level->native_sp_level;
3666 LevelInfoType *header = &level_sp->header;
3669 level->fieldx = level_sp->width;
3670 level->fieldy = level_sp->height;
3672 for (x = 0; x < level->fieldx; x++)
3674 for (y = 0; y < level->fieldy; y++)
3676 int element_old = level_sp->playfield[x][y];
3677 int element_new = getMappedElement(map_element_SP_to_RND(element_old));
3679 if (element_new == EL_UNKNOWN)
3680 Error(ERR_WARN, "invalid element %d at position %d, %d",
3683 level->field[x][y] = element_new;
3687 for (i = 0; i < MAX_PLAYERS; i++)
3688 level->initial_player_gravity[i] =
3689 (header->InitialGravity == 1 ? TRUE : FALSE);
3691 /* skip leading spaces */
3692 for (i = 0; i < SP_LEVEL_NAME_LEN; i++)
3693 if (header->LevelTitle[i] != ' ')
3696 /* copy level title */
3697 for (j = 0; i < SP_LEVEL_NAME_LEN; i++, j++)
3698 level->name[j] = header->LevelTitle[i];
3699 level->name[j] = '\0';
3701 /* cut trailing spaces */
3703 if (level->name[j - 1] == ' ' && level->name[j] == '\0')
3704 level->name[j - 1] = '\0';
3706 level->gems_needed = header->InfotronsNeeded;
3708 for (i = 0; i < header->SpecialPortCount; i++)
3710 SpecialPortType *port = &header->SpecialPort[i];
3711 int port_location = port->PortLocation;
3712 int gravity = port->Gravity;
3713 int port_x, port_y, port_element;
3715 port_x = (port_location / 2) % level->fieldx;
3716 port_y = (port_location / 2) / level->fieldx;
3718 if (port_x < 0 || port_x >= level->fieldx ||
3719 port_y < 0 || port_y >= level->fieldy)
3721 Error(ERR_WARN, "special port position (%d, %d) out of bounds",
3727 port_element = level->field[port_x][port_y];
3729 if (port_element < EL_SP_GRAVITY_PORT_RIGHT ||
3730 port_element > EL_SP_GRAVITY_PORT_UP)
3732 Error(ERR_WARN, "no special port at position (%d, %d)", port_x, port_y);
3737 /* change previous (wrong) gravity inverting special port to either
3738 gravity enabling special port or gravity disabling special port */
3739 level->field[port_x][port_y] +=
3740 (gravity == 1 ? EL_SP_GRAVITY_ON_PORT_RIGHT :
3741 EL_SP_GRAVITY_OFF_PORT_RIGHT) - EL_SP_GRAVITY_PORT_RIGHT;
3744 /* change special gravity ports without database entries to normal ports */
3745 for (x = 0; x < level->fieldx; x++)
3746 for (y = 0; y < level->fieldy; y++)
3747 if (level->field[x][y] >= EL_SP_GRAVITY_PORT_RIGHT &&
3748 level->field[x][y] <= EL_SP_GRAVITY_PORT_UP)
3749 level->field[x][y] += EL_SP_PORT_RIGHT - EL_SP_GRAVITY_PORT_RIGHT;
3751 level->time = 0; /* no time limit */
3752 level->amoeba_speed = 0;
3753 level->time_magic_wall = 0;
3754 level->time_wheel = 0;
3755 level->amoeba_content = EL_EMPTY;
3758 /* original Supaplex does not use score values -- use default values */
3760 for (i = 0; i < LEVEL_SCORE_ELEMENTS; i++)
3761 level->score[i] = 0;
3764 /* there are no yamyams in supaplex levels */
3765 for (i = 0; i < level->num_yamyam_contents; i++)
3766 for (x = 0; x < 3; x++)
3767 for (y = 0; y < 3; y++)
3768 level->yamyam_content[i].e[x][y] = EL_EMPTY;
3771 static void CopyNativeTape_RND_to_SP(struct LevelInfo *level)
3773 struct LevelInfo_SP *level_sp = level->native_sp_level;
3774 struct DemoInfo_SP *demo = &level_sp->demo;
3777 /* always start with reliable default values */
3778 demo->is_available = FALSE;
3781 if (TAPE_IS_EMPTY(tape))
3784 demo->level_nr = tape.level_nr; /* (currently not used) */
3786 level_sp->header.DemoRandomSeed = tape.random_seed;
3790 for (i = 0; i < tape.length; i++)
3792 int demo_action = map_key_RND_to_SP(tape.pos[i].action[0]);
3793 int demo_repeat = tape.pos[i].delay;
3794 int demo_entries = (demo_repeat + 15) / 16;
3796 if (demo->length + demo_entries >= SP_MAX_TAPE_LEN)
3798 Error(ERR_WARN, "tape truncated: size exceeds maximum SP demo size %d",
3804 for (j = 0; j < demo_repeat / 16; j++)
3805 demo->data[demo->length++] = 0xf0 | demo_action;
3807 if (demo_repeat % 16)
3808 demo->data[demo->length++] = ((demo_repeat % 16 - 1) << 4) | demo_action;
3811 demo->is_available = TRUE;
3814 static void setTapeInfoToDefaults();
3816 static void CopyNativeTape_SP_to_RND(struct LevelInfo *level)
3818 struct LevelInfo_SP *level_sp = level->native_sp_level;
3819 struct DemoInfo_SP *demo = &level_sp->demo;
3820 char *filename = level->file_info.filename;
3823 /* always start with reliable default values */
3824 setTapeInfoToDefaults();
3826 if (!demo->is_available)
3829 tape.level_nr = demo->level_nr; /* (currently not used) */
3830 tape.random_seed = level_sp->header.DemoRandomSeed;
3832 TapeSetDateFromEpochSeconds(getFileTimestampEpochSeconds(filename));
3835 tape.pos[tape.counter].delay = 0;
3837 for (i = 0; i < demo->length; i++)
3839 int demo_action = demo->data[i] & 0x0f;
3840 int demo_repeat = (demo->data[i] & 0xf0) >> 4;
3841 int tape_action = map_key_SP_to_RND(demo_action);
3842 int tape_repeat = demo_repeat + 1;
3843 byte action[MAX_PLAYERS] = { tape_action, 0, 0, 0 };
3844 boolean success = 0;
3847 for (j = 0; j < tape_repeat; j++)
3848 success = TapeAddAction(action);
3852 Error(ERR_WARN, "SP demo truncated: size exceeds maximum tape size %d",
3859 TapeHaltRecording();
3863 /* ------------------------------------------------------------------------- */
3864 /* functions for loading DC level */
3865 /* ------------------------------------------------------------------------- */
3867 #define DC_LEVEL_HEADER_SIZE 344
3869 unsigned short getDecodedWord_DC(unsigned short data_encoded, boolean init)
3871 static int last_data_encoded;
3875 int diff_hi, diff_lo;
3876 int data_hi, data_lo;
3877 unsigned short data_decoded;
3881 last_data_encoded = 0;
3888 diff = data_encoded - last_data_encoded;
3889 diff_hi = diff & ~0xff;
3890 diff_lo = diff & 0xff;
3894 data_hi = diff_hi - (offset1 << 8) + (offset2 & 0xff00);
3895 data_lo = (diff_lo + (data_hi >> 16)) & 0x00ff;
3896 data_hi = data_hi & 0xff00;
3898 data_decoded = data_hi | data_lo;
3900 last_data_encoded = data_encoded;
3902 offset1 = (offset1 + 1) % 31;
3903 offset2 = offset2 & 0xff;
3905 return data_decoded;
3908 int getMappedElement_DC(int element)
3916 /* 0x0117 - 0x036e: (?) */
3919 /* 0x042d - 0x0684: (?) */
3935 element = EL_CRYSTAL;
3938 case 0x0e77: /* quicksand (boulder) */
3939 element = EL_QUICKSAND_FAST_FULL;
3942 case 0x0e99: /* slow quicksand (boulder) */
3943 element = EL_QUICKSAND_FULL;
3947 element = EL_EM_EXIT_OPEN;
3951 element = EL_EM_EXIT_CLOSED;
3955 element = EL_EM_STEEL_EXIT_OPEN;
3959 element = EL_EM_STEEL_EXIT_CLOSED;
3962 case 0x0f4f: /* dynamite (lit 1) */
3963 element = EL_EM_DYNAMITE_ACTIVE;
3966 case 0x0f57: /* dynamite (lit 2) */
3967 element = EL_EM_DYNAMITE_ACTIVE;
3970 case 0x0f5f: /* dynamite (lit 3) */
3971 element = EL_EM_DYNAMITE_ACTIVE;
3974 case 0x0f67: /* dynamite (lit 4) */
3975 element = EL_EM_DYNAMITE_ACTIVE;
3982 element = EL_AMOEBA_WET;
3986 element = EL_AMOEBA_DROP;
3990 element = EL_DC_MAGIC_WALL;
3994 element = EL_SPACESHIP_UP;
3998 element = EL_SPACESHIP_DOWN;
4002 element = EL_SPACESHIP_LEFT;
4006 element = EL_SPACESHIP_RIGHT;
4010 element = EL_BUG_UP;
4014 element = EL_BUG_DOWN;
4018 element = EL_BUG_LEFT;
4022 element = EL_BUG_RIGHT;
4026 element = EL_MOLE_UP;
4030 element = EL_MOLE_DOWN;
4034 element = EL_MOLE_LEFT;
4038 element = EL_MOLE_RIGHT;
4046 element = EL_YAMYAM;
4050 element = EL_SWITCHGATE_OPEN;
4054 element = EL_SWITCHGATE_CLOSED;
4058 element = EL_DC_SWITCHGATE_SWITCH_UP;
4062 element = EL_TIMEGATE_CLOSED;
4065 case 0x144c: /* conveyor belt switch (green) */
4066 element = EL_CONVEYOR_BELT_3_SWITCH_MIDDLE;
4069 case 0x144f: /* conveyor belt switch (red) */
4070 element = EL_CONVEYOR_BELT_1_SWITCH_MIDDLE;
4073 case 0x1452: /* conveyor belt switch (blue) */
4074 element = EL_CONVEYOR_BELT_4_SWITCH_MIDDLE;
4078 element = EL_CONVEYOR_BELT_3_MIDDLE;
4082 element = EL_CONVEYOR_BELT_3_LEFT;
4086 element = EL_CONVEYOR_BELT_3_RIGHT;
4090 element = EL_CONVEYOR_BELT_1_MIDDLE;
4094 element = EL_CONVEYOR_BELT_1_LEFT;
4098 element = EL_CONVEYOR_BELT_1_RIGHT;
4102 element = EL_CONVEYOR_BELT_4_MIDDLE;
4106 element = EL_CONVEYOR_BELT_4_LEFT;
4110 element = EL_CONVEYOR_BELT_4_RIGHT;
4114 element = EL_EXPANDABLE_WALL_HORIZONTAL;
4118 element = EL_EXPANDABLE_WALL_VERTICAL;
4122 element = EL_EXPANDABLE_WALL_ANY;
4125 case 0x14ce: /* growing steel wall (left/right) */
4126 element = EL_EXPANDABLE_STEELWALL_HORIZONTAL;
4129 case 0x14df: /* growing steel wall (up/down) */
4130 element = EL_EXPANDABLE_STEELWALL_VERTICAL;
4133 case 0x14e8: /* growing steel wall (up/down/left/right) */
4134 element = EL_EXPANDABLE_STEELWALL_ANY;
4138 element = EL_SHIELD_DEADLY;
4142 element = EL_EXTRA_TIME;
4150 element = EL_EMPTY_SPACE;
4153 case 0x1578: /* quicksand (empty) */
4154 element = EL_QUICKSAND_FAST_EMPTY;
4157 case 0x1579: /* slow quicksand (empty) */
4158 element = EL_QUICKSAND_EMPTY;
4161 /* 0x157c - 0x158b: */
4164 /* 0x1590 - 0x159f: */
4165 /* EL_DC_LANDMINE */
4168 element = EL_EM_DYNAMITE;
4171 case 0x15a1: /* key (red) */
4172 element = EL_EM_KEY_1;
4175 case 0x15a2: /* key (yellow) */
4176 element = EL_EM_KEY_2;
4179 case 0x15a3: /* key (blue) */
4180 element = EL_EM_KEY_4;
4183 case 0x15a4: /* key (green) */
4184 element = EL_EM_KEY_3;
4187 case 0x15a5: /* key (white) */
4188 element = EL_DC_KEY_WHITE;
4192 element = EL_WALL_SLIPPERY;
4199 case 0x15a8: /* wall (not round) */
4203 case 0x15a9: /* (blue) */
4204 element = EL_CHAR_A;
4207 case 0x15aa: /* (blue) */
4208 element = EL_CHAR_B;
4211 case 0x15ab: /* (blue) */
4212 element = EL_CHAR_C;
4215 case 0x15ac: /* (blue) */
4216 element = EL_CHAR_D;
4219 case 0x15ad: /* (blue) */
4220 element = EL_CHAR_E;
4223 case 0x15ae: /* (blue) */
4224 element = EL_CHAR_F;
4227 case 0x15af: /* (blue) */
4228 element = EL_CHAR_G;
4231 case 0x15b0: /* (blue) */
4232 element = EL_CHAR_H;
4235 case 0x15b1: /* (blue) */
4236 element = EL_CHAR_I;
4239 case 0x15b2: /* (blue) */
4240 element = EL_CHAR_J;
4243 case 0x15b3: /* (blue) */
4244 element = EL_CHAR_K;
4247 case 0x15b4: /* (blue) */
4248 element = EL_CHAR_L;
4251 case 0x15b5: /* (blue) */
4252 element = EL_CHAR_M;
4255 case 0x15b6: /* (blue) */
4256 element = EL_CHAR_N;
4259 case 0x15b7: /* (blue) */
4260 element = EL_CHAR_O;
4263 case 0x15b8: /* (blue) */
4264 element = EL_CHAR_P;
4267 case 0x15b9: /* (blue) */
4268 element = EL_CHAR_Q;
4271 case 0x15ba: /* (blue) */
4272 element = EL_CHAR_R;
4275 case 0x15bb: /* (blue) */
4276 element = EL_CHAR_S;
4279 case 0x15bc: /* (blue) */
4280 element = EL_CHAR_T;
4283 case 0x15bd: /* (blue) */
4284 element = EL_CHAR_U;
4287 case 0x15be: /* (blue) */
4288 element = EL_CHAR_V;
4291 case 0x15bf: /* (blue) */
4292 element = EL_CHAR_W;
4295 case 0x15c0: /* (blue) */
4296 element = EL_CHAR_X;
4299 case 0x15c1: /* (blue) */
4300 element = EL_CHAR_Y;
4303 case 0x15c2: /* (blue) */
4304 element = EL_CHAR_Z;
4307 case 0x15c3: /* (blue) */
4308 element = EL_CHAR_AUMLAUT;
4311 case 0x15c4: /* (blue) */
4312 element = EL_CHAR_OUMLAUT;
4315 case 0x15c5: /* (blue) */
4316 element = EL_CHAR_UUMLAUT;
4319 case 0x15c6: /* (blue) */
4320 element = EL_CHAR_0;
4323 case 0x15c7: /* (blue) */
4324 element = EL_CHAR_1;
4327 case 0x15c8: /* (blue) */
4328 element = EL_CHAR_2;
4331 case 0x15c9: /* (blue) */
4332 element = EL_CHAR_3;
4335 case 0x15ca: /* (blue) */
4336 element = EL_CHAR_4;
4339 case 0x15cb: /* (blue) */
4340 element = EL_CHAR_5;
4343 case 0x15cc: /* (blue) */
4344 element = EL_CHAR_6;
4347 case 0x15cd: /* (blue) */
4348 element = EL_CHAR_7;
4351 case 0x15ce: /* (blue) */
4352 element = EL_CHAR_8;
4355 case 0x15cf: /* (blue) */
4356 element = EL_CHAR_9;
4359 case 0x15d0: /* (blue) */
4360 element = EL_CHAR_PERIOD;
4363 case 0x15d1: /* (blue) */
4364 element = EL_CHAR_EXCLAM;
4367 case 0x15d2: /* (blue) */
4368 element = EL_CHAR_COLON;
4371 case 0x15d3: /* (blue) */
4372 element = EL_CHAR_LESS;
4375 case 0x15d4: /* (blue) */
4376 element = EL_CHAR_GREATER;
4379 case 0x15d5: /* (blue) */
4380 element = EL_CHAR_QUESTION;
4383 case 0x15d6: /* (blue) */
4384 element = EL_CHAR_COPYRIGHT;
4387 case 0x15d7: /* (blue) */
4388 element = EL_CHAR_UP;
4391 case 0x15d8: /* (blue) */
4392 element = EL_CHAR_DOWN;
4395 case 0x15d9: /* (blue) */
4396 element = EL_CHAR_BUTTON;
4399 case 0x15da: /* (blue) */
4400 element = EL_CHAR_PLUS;
4403 case 0x15db: /* (blue) */
4404 element = EL_CHAR_MINUS;
4407 case 0x15dc: /* (blue) */
4408 element = EL_CHAR_APOSTROPHE;
4411 case 0x15dd: /* (blue) */
4412 element = EL_CHAR_PARENLEFT;
4415 case 0x15de: /* (blue) */
4416 element = EL_CHAR_PARENRIGHT;
4419 case 0x15df: /* (green) */
4420 element = EL_CHAR_A;
4423 case 0x15e0: /* (green) */
4424 element = EL_CHAR_B;
4427 case 0x15e1: /* (green) */
4428 element = EL_CHAR_C;
4431 case 0x15e2: /* (green) */
4432 element = EL_CHAR_D;
4435 case 0x15e3: /* (green) */
4436 element = EL_CHAR_E;
4439 case 0x15e4: /* (green) */
4440 element = EL_CHAR_F;
4443 case 0x15e5: /* (green) */
4444 element = EL_CHAR_G;
4447 case 0x15e6: /* (green) */
4448 element = EL_CHAR_H;
4451 case 0x15e7: /* (green) */
4452 element = EL_CHAR_I;
4455 case 0x15e8: /* (green) */
4456 element = EL_CHAR_J;
4459 case 0x15e9: /* (green) */
4460 element = EL_CHAR_K;
4463 case 0x15ea: /* (green) */
4464 element = EL_CHAR_L;
4467 case 0x15eb: /* (green) */
4468 element = EL_CHAR_M;
4471 case 0x15ec: /* (green) */
4472 element = EL_CHAR_N;
4475 case 0x15ed: /* (green) */
4476 element = EL_CHAR_O;
4479 case 0x15ee: /* (green) */
4480 element = EL_CHAR_P;
4483 case 0x15ef: /* (green) */
4484 element = EL_CHAR_Q;
4487 case 0x15f0: /* (green) */
4488 element = EL_CHAR_R;
4491 case 0x15f1: /* (green) */
4492 element = EL_CHAR_S;
4495 case 0x15f2: /* (green) */
4496 element = EL_CHAR_T;
4499 case 0x15f3: /* (green) */
4500 element = EL_CHAR_U;
4503 case 0x15f4: /* (green) */
4504 element = EL_CHAR_V;
4507 case 0x15f5: /* (green) */
4508 element = EL_CHAR_W;
4511 case 0x15f6: /* (green) */
4512 element = EL_CHAR_X;
4515 case 0x15f7: /* (green) */
4516 element = EL_CHAR_Y;
4519 case 0x15f8: /* (green) */
4520 element = EL_CHAR_Z;
4523 case 0x15f9: /* (green) */
4524 element = EL_CHAR_AUMLAUT;
4527 case 0x15fa: /* (green) */
4528 element = EL_CHAR_OUMLAUT;
4531 case 0x15fb: /* (green) */
4532 element = EL_CHAR_UUMLAUT;
4535 case 0x15fc: /* (green) */
4536 element = EL_CHAR_0;
4539 case 0x15fd: /* (green) */
4540 element = EL_CHAR_1;
4543 case 0x15fe: /* (green) */
4544 element = EL_CHAR_2;
4547 case 0x15ff: /* (green) */
4548 element = EL_CHAR_3;
4551 case 0x1600: /* (green) */
4552 element = EL_CHAR_4;
4555 case 0x1601: /* (green) */
4556 element = EL_CHAR_5;
4559 case 0x1602: /* (green) */
4560 element = EL_CHAR_6;
4563 case 0x1603: /* (green) */
4564 element = EL_CHAR_7;
4567 case 0x1604: /* (green) */
4568 element = EL_CHAR_8;
4571 case 0x1605: /* (green) */
4572 element = EL_CHAR_9;
4575 case 0x1606: /* (green) */
4576 element = EL_CHAR_PERIOD;
4579 case 0x1607: /* (green) */
4580 element = EL_CHAR_EXCLAM;
4583 case 0x1608: /* (green) */
4584 element = EL_CHAR_COLON;
4587 case 0x1609: /* (green) */
4588 element = EL_CHAR_LESS;
4591 case 0x160a: /* (green) */
4592 element = EL_CHAR_GREATER;
4595 case 0x160b: /* (green) */
4596 element = EL_CHAR_QUESTION;
4599 case 0x160c: /* (green) */
4600 element = EL_CHAR_COPYRIGHT;
4603 case 0x160d: /* (green) */
4604 element = EL_CHAR_UP;
4607 case 0x160e: /* (green) */
4608 element = EL_CHAR_DOWN;
4611 case 0x160f: /* (green) */
4612 element = EL_CHAR_BUTTON;
4615 case 0x1610: /* (green) */
4616 element = EL_CHAR_PLUS;
4619 case 0x1611: /* (green) */
4620 element = EL_CHAR_MINUS;
4623 case 0x1612: /* (green) */
4624 element = EL_CHAR_APOSTROPHE;
4627 case 0x1613: /* (green) */
4628 element = EL_CHAR_PARENLEFT;
4631 case 0x1614: /* (green) */
4632 element = EL_CHAR_PARENRIGHT;
4635 case 0x1615: /* (blue steel) */
4636 element = EL_STEEL_CHAR_A;
4639 case 0x1616: /* (blue steel) */
4640 element = EL_STEEL_CHAR_B;
4643 case 0x1617: /* (blue steel) */
4644 element = EL_STEEL_CHAR_C;
4647 case 0x1618: /* (blue steel) */
4648 element = EL_STEEL_CHAR_D;
4651 case 0x1619: /* (blue steel) */
4652 element = EL_STEEL_CHAR_E;
4655 case 0x161a: /* (blue steel) */
4656 element = EL_STEEL_CHAR_F;
4659 case 0x161b: /* (blue steel) */
4660 element = EL_STEEL_CHAR_G;
4663 case 0x161c: /* (blue steel) */
4664 element = EL_STEEL_CHAR_H;
4667 case 0x161d: /* (blue steel) */
4668 element = EL_STEEL_CHAR_I;
4671 case 0x161e: /* (blue steel) */
4672 element = EL_STEEL_CHAR_J;
4675 case 0x161f: /* (blue steel) */
4676 element = EL_STEEL_CHAR_K;
4679 case 0x1620: /* (blue steel) */
4680 element = EL_STEEL_CHAR_L;
4683 case 0x1621: /* (blue steel) */
4684 element = EL_STEEL_CHAR_M;
4687 case 0x1622: /* (blue steel) */
4688 element = EL_STEEL_CHAR_N;
4691 case 0x1623: /* (blue steel) */
4692 element = EL_STEEL_CHAR_O;
4695 case 0x1624: /* (blue steel) */
4696 element = EL_STEEL_CHAR_P;
4699 case 0x1625: /* (blue steel) */
4700 element = EL_STEEL_CHAR_Q;
4703 case 0x1626: /* (blue steel) */
4704 element = EL_STEEL_CHAR_R;
4707 case 0x1627: /* (blue steel) */
4708 element = EL_STEEL_CHAR_S;
4711 case 0x1628: /* (blue steel) */
4712 element = EL_STEEL_CHAR_T;
4715 case 0x1629: /* (blue steel) */
4716 element = EL_STEEL_CHAR_U;
4719 case 0x162a: /* (blue steel) */
4720 element = EL_STEEL_CHAR_V;
4723 case 0x162b: /* (blue steel) */
4724 element = EL_STEEL_CHAR_W;
4727 case 0x162c: /* (blue steel) */
4728 element = EL_STEEL_CHAR_X;
4731 case 0x162d: /* (blue steel) */
4732 element = EL_STEEL_CHAR_Y;
4735 case 0x162e: /* (blue steel) */
4736 element = EL_STEEL_CHAR_Z;
4739 case 0x162f: /* (blue steel) */
4740 element = EL_STEEL_CHAR_AUMLAUT;
4743 case 0x1630: /* (blue steel) */
4744 element = EL_STEEL_CHAR_OUMLAUT;
4747 case 0x1631: /* (blue steel) */
4748 element = EL_STEEL_CHAR_UUMLAUT;
4751 case 0x1632: /* (blue steel) */
4752 element = EL_STEEL_CHAR_0;
4755 case 0x1633: /* (blue steel) */
4756 element = EL_STEEL_CHAR_1;
4759 case 0x1634: /* (blue steel) */
4760 element = EL_STEEL_CHAR_2;
4763 case 0x1635: /* (blue steel) */
4764 element = EL_STEEL_CHAR_3;
4767 case 0x1636: /* (blue steel) */
4768 element = EL_STEEL_CHAR_4;
4771 case 0x1637: /* (blue steel) */
4772 element = EL_STEEL_CHAR_5;
4775 case 0x1638: /* (blue steel) */
4776 element = EL_STEEL_CHAR_6;
4779 case 0x1639: /* (blue steel) */
4780 element = EL_STEEL_CHAR_7;
4783 case 0x163a: /* (blue steel) */
4784 element = EL_STEEL_CHAR_8;
4787 case 0x163b: /* (blue steel) */
4788 element = EL_STEEL_CHAR_9;
4791 case 0x163c: /* (blue steel) */
4792 element = EL_STEEL_CHAR_PERIOD;
4795 case 0x163d: /* (blue steel) */
4796 element = EL_STEEL_CHAR_EXCLAM;
4799 case 0x163e: /* (blue steel) */
4800 element = EL_STEEL_CHAR_COLON;
4803 case 0x163f: /* (blue steel) */
4804 element = EL_STEEL_CHAR_LESS;
4807 case 0x1640: /* (blue steel) */
4808 element = EL_STEEL_CHAR_GREATER;
4811 case 0x1641: /* (blue steel) */
4812 element = EL_STEEL_CHAR_QUESTION;
4815 case 0x1642: /* (blue steel) */
4816 element = EL_STEEL_CHAR_COPYRIGHT;
4819 case 0x1643: /* (blue steel) */
4820 element = EL_STEEL_CHAR_UP;
4823 case 0x1644: /* (blue steel) */
4824 element = EL_STEEL_CHAR_DOWN;
4827 case 0x1645: /* (blue steel) */
4828 element = EL_STEEL_CHAR_BUTTON;
4831 case 0x1646: /* (blue steel) */
4832 element = EL_STEEL_CHAR_PLUS;
4835 case 0x1647: /* (blue steel) */
4836 element = EL_STEEL_CHAR_MINUS;
4839 case 0x1648: /* (blue steel) */
4840 element = EL_STEEL_CHAR_APOSTROPHE;
4843 case 0x1649: /* (blue steel) */
4844 element = EL_STEEL_CHAR_PARENLEFT;
4847 case 0x164a: /* (blue steel) */
4848 element = EL_STEEL_CHAR_PARENRIGHT;
4851 case 0x164b: /* (green steel) */
4852 element = EL_STEEL_CHAR_A;
4855 case 0x164c: /* (green steel) */
4856 element = EL_STEEL_CHAR_B;
4859 case 0x164d: /* (green steel) */
4860 element = EL_STEEL_CHAR_C;
4863 case 0x164e: /* (green steel) */
4864 element = EL_STEEL_CHAR_D;
4867 case 0x164f: /* (green steel) */
4868 element = EL_STEEL_CHAR_E;
4871 case 0x1650: /* (green steel) */
4872 element = EL_STEEL_CHAR_F;
4875 case 0x1651: /* (green steel) */
4876 element = EL_STEEL_CHAR_G;
4879 case 0x1652: /* (green steel) */
4880 element = EL_STEEL_CHAR_H;
4883 case 0x1653: /* (green steel) */
4884 element = EL_STEEL_CHAR_I;
4887 case 0x1654: /* (green steel) */
4888 element = EL_STEEL_CHAR_J;
4891 case 0x1655: /* (green steel) */
4892 element = EL_STEEL_CHAR_K;
4895 case 0x1656: /* (green steel) */
4896 element = EL_STEEL_CHAR_L;
4899 case 0x1657: /* (green steel) */
4900 element = EL_STEEL_CHAR_M;
4903 case 0x1658: /* (green steel) */
4904 element = EL_STEEL_CHAR_N;
4907 case 0x1659: /* (green steel) */
4908 element = EL_STEEL_CHAR_O;
4911 case 0x165a: /* (green steel) */
4912 element = EL_STEEL_CHAR_P;
4915 case 0x165b: /* (green steel) */
4916 element = EL_STEEL_CHAR_Q;
4919 case 0x165c: /* (green steel) */
4920 element = EL_STEEL_CHAR_R;
4923 case 0x165d: /* (green steel) */
4924 element = EL_STEEL_CHAR_S;
4927 case 0x165e: /* (green steel) */
4928 element = EL_STEEL_CHAR_T;
4931 case 0x165f: /* (green steel) */
4932 element = EL_STEEL_CHAR_U;
4935 case 0x1660: /* (green steel) */
4936 element = EL_STEEL_CHAR_V;
4939 case 0x1661: /* (green steel) */
4940 element = EL_STEEL_CHAR_W;
4943 case 0x1662: /* (green steel) */
4944 element = EL_STEEL_CHAR_X;
4947 case 0x1663: /* (green steel) */
4948 element = EL_STEEL_CHAR_Y;
4951 case 0x1664: /* (green steel) */
4952 element = EL_STEEL_CHAR_Z;
4955 case 0x1665: /* (green steel) */
4956 element = EL_STEEL_CHAR_AUMLAUT;
4959 case 0x1666: /* (green steel) */
4960 element = EL_STEEL_CHAR_OUMLAUT;
4963 case 0x1667: /* (green steel) */
4964 element = EL_STEEL_CHAR_UUMLAUT;
4967 case 0x1668: /* (green steel) */
4968 element = EL_STEEL_CHAR_0;
4971 case 0x1669: /* (green steel) */
4972 element = EL_STEEL_CHAR_1;
4975 case 0x166a: /* (green steel) */
4976 element = EL_STEEL_CHAR_2;
4979 case 0x166b: /* (green steel) */
4980 element = EL_STEEL_CHAR_3;
4983 case 0x166c: /* (green steel) */
4984 element = EL_STEEL_CHAR_4;
4987 case 0x166d: /* (green steel) */
4988 element = EL_STEEL_CHAR_5;
4991 case 0x166e: /* (green steel) */
4992 element = EL_STEEL_CHAR_6;
4995 case 0x166f: /* (green steel) */
4996 element = EL_STEEL_CHAR_7;
4999 case 0x1670: /* (green steel) */
5000 element = EL_STEEL_CHAR_8;
5003 case 0x1671: /* (green steel) */
5004 element = EL_STEEL_CHAR_9;
5007 case 0x1672: /* (green steel) */
5008 element = EL_STEEL_CHAR_PERIOD;
5011 case 0x1673: /* (green steel) */
5012 element = EL_STEEL_CHAR_EXCLAM;
5015 case 0x1674: /* (green steel) */
5016 element = EL_STEEL_CHAR_COLON;
5019 case 0x1675: /* (green steel) */
5020 element = EL_STEEL_CHAR_LESS;
5023 case 0x1676: /* (green steel) */
5024 element = EL_STEEL_CHAR_GREATER;
5027 case 0x1677: /* (green steel) */
5028 element = EL_STEEL_CHAR_QUESTION;
5031 case 0x1678: /* (green steel) */
5032 element = EL_STEEL_CHAR_COPYRIGHT;
5035 case 0x1679: /* (green steel) */
5036 element = EL_STEEL_CHAR_UP;
5039 case 0x167a: /* (green steel) */
5040 element = EL_STEEL_CHAR_DOWN;
5043 case 0x167b: /* (green steel) */
5044 element = EL_STEEL_CHAR_BUTTON;
5047 case 0x167c: /* (green steel) */
5048 element = EL_STEEL_CHAR_PLUS;
5051 case 0x167d: /* (green steel) */
5052 element = EL_STEEL_CHAR_MINUS;
5055 case 0x167e: /* (green steel) */
5056 element = EL_STEEL_CHAR_APOSTROPHE;
5059 case 0x167f: /* (green steel) */
5060 element = EL_STEEL_CHAR_PARENLEFT;
5063 case 0x1680: /* (green steel) */
5064 element = EL_STEEL_CHAR_PARENRIGHT;
5067 case 0x1681: /* gate (red) */
5068 element = EL_EM_GATE_1;
5071 case 0x1682: /* secret gate (red) */
5072 element = EL_GATE_1_GRAY;
5075 case 0x1683: /* gate (yellow) */
5076 element = EL_EM_GATE_2;
5079 case 0x1684: /* secret gate (yellow) */
5080 element = EL_GATE_2_GRAY;
5083 case 0x1685: /* gate (blue) */
5084 element = EL_EM_GATE_4;
5087 case 0x1686: /* secret gate (blue) */
5088 element = EL_GATE_4_GRAY;
5091 case 0x1687: /* gate (green) */
5092 element = EL_EM_GATE_3;
5095 case 0x1688: /* secret gate (green) */
5096 element = EL_GATE_3_GRAY;
5099 case 0x1689: /* gate (white) */
5100 element = EL_DC_GATE_WHITE;
5103 case 0x168a: /* secret gate (white) */
5104 element = EL_DC_GATE_WHITE_GRAY;
5107 case 0x168b: /* secret gate (no key) */
5108 element = EL_DC_GATE_FAKE_GRAY;
5112 element = EL_ROBOT_WHEEL;
5116 element = EL_DC_TIMEGATE_SWITCH;
5120 element = EL_ACID_POOL_BOTTOM;
5124 element = EL_ACID_POOL_TOPLEFT;
5128 element = EL_ACID_POOL_TOPRIGHT;
5132 element = EL_ACID_POOL_BOTTOMLEFT;
5136 element = EL_ACID_POOL_BOTTOMRIGHT;
5140 element = EL_STEELWALL;
5144 element = EL_STEELWALL_SLIPPERY;
5147 case 0x1695: /* steel wall (not round) */
5148 element = EL_STEELWALL;
5151 case 0x1696: /* steel wall (left) */
5152 element = EL_DC_STEELWALL_1_LEFT;
5155 case 0x1697: /* steel wall (bottom) */
5156 element = EL_DC_STEELWALL_1_BOTTOM;
5159 case 0x1698: /* steel wall (right) */
5160 element = EL_DC_STEELWALL_1_RIGHT;
5163 case 0x1699: /* steel wall (top) */
5164 element = EL_DC_STEELWALL_1_TOP;
5167 case 0x169a: /* steel wall (left/bottom) */
5168 element = EL_DC_STEELWALL_1_BOTTOMLEFT;
5171 case 0x169b: /* steel wall (right/bottom) */
5172 element = EL_DC_STEELWALL_1_BOTTOMRIGHT;
5175 case 0x169c: /* steel wall (right/top) */
5176 element = EL_DC_STEELWALL_1_TOPRIGHT;
5179 case 0x169d: /* steel wall (left/top) */
5180 element = EL_DC_STEELWALL_1_TOPLEFT;
5183 case 0x169e: /* steel wall (right/bottom small) */
5184 element = EL_DC_STEELWALL_1_BOTTOMRIGHT_2;
5187 case 0x169f: /* steel wall (left/bottom small) */
5188 element = EL_DC_STEELWALL_1_BOTTOMLEFT_2;
5191 case 0x16a0: /* steel wall (right/top small) */
5192 element = EL_DC_STEELWALL_1_TOPRIGHT_2;
5195 case 0x16a1: /* steel wall (left/top small) */
5196 element = EL_DC_STEELWALL_1_TOPLEFT_2;
5199 case 0x16a2: /* steel wall (left/right) */
5200 element = EL_DC_STEELWALL_1_VERTICAL;
5203 case 0x16a3: /* steel wall (top/bottom) */
5204 element = EL_DC_STEELWALL_1_HORIZONTAL;
5207 case 0x16a4: /* steel wall 2 (left end) */
5208 element = EL_DC_STEELWALL_2_LEFT;
5211 case 0x16a5: /* steel wall 2 (right end) */
5212 element = EL_DC_STEELWALL_2_RIGHT;
5215 case 0x16a6: /* steel wall 2 (top end) */
5216 element = EL_DC_STEELWALL_2_TOP;
5219 case 0x16a7: /* steel wall 2 (bottom end) */
5220 element = EL_DC_STEELWALL_2_BOTTOM;
5223 case 0x16a8: /* steel wall 2 (left/right) */
5224 element = EL_DC_STEELWALL_2_HORIZONTAL;
5227 case 0x16a9: /* steel wall 2 (up/down) */
5228 element = EL_DC_STEELWALL_2_VERTICAL;
5231 case 0x16aa: /* steel wall 2 (mid) */
5232 element = EL_DC_STEELWALL_2_MIDDLE;
5236 element = EL_SIGN_EXCLAMATION;
5240 element = EL_SIGN_RADIOACTIVITY;
5244 element = EL_SIGN_STOP;
5248 element = EL_SIGN_WHEELCHAIR;
5252 element = EL_SIGN_PARKING;
5256 element = EL_SIGN_NO_ENTRY;
5260 element = EL_SIGN_HEART;
5264 element = EL_SIGN_GIVE_WAY;
5268 element = EL_SIGN_ENTRY_FORBIDDEN;
5272 element = EL_SIGN_EMERGENCY_EXIT;
5276 element = EL_SIGN_YIN_YANG;
5280 element = EL_WALL_EMERALD;
5284 element = EL_WALL_DIAMOND;
5288 element = EL_WALL_PEARL;
5292 element = EL_WALL_CRYSTAL;
5296 element = EL_INVISIBLE_WALL;
5300 element = EL_INVISIBLE_STEELWALL;
5303 /* 0x16bc - 0x16cb: */
5304 /* EL_INVISIBLE_SAND */
5307 element = EL_LIGHT_SWITCH;
5311 element = EL_ENVELOPE_1;
5315 if (element >= 0x0117 && element <= 0x036e) /* (?) */
5316 element = EL_DIAMOND;
5317 else if (element >= 0x042d && element <= 0x0684) /* (?) */
5318 element = EL_EMERALD;
5319 else if (element >= 0x157c && element <= 0x158b)
5321 else if (element >= 0x1590 && element <= 0x159f)
5322 element = EL_DC_LANDMINE;
5323 else if (element >= 0x16bc && element <= 0x16cb)
5324 element = EL_INVISIBLE_SAND;
5327 Error(ERR_WARN, "unknown Diamond Caves element 0x%04x", element);
5328 element = EL_UNKNOWN;
5333 return getMappedElement(element);
5336 static void LoadLevelFromFileStream_DC(File *file, struct LevelInfo *level,
5339 byte header[DC_LEVEL_HEADER_SIZE];
5341 int envelope_header_pos = 62;
5342 int envelope_content_pos = 94;
5343 int level_name_pos = 251;
5344 int level_author_pos = 292;
5345 int envelope_header_len;
5346 int envelope_content_len;
5348 int level_author_len;
5350 int num_yamyam_contents;
5353 getDecodedWord_DC(0, TRUE); /* initialize DC2 decoding engine */
5355 for (i = 0; i < DC_LEVEL_HEADER_SIZE / 2; i++)
5357 unsigned short header_word = getDecodedWord_DC(getFile16BitBE(file), FALSE);
5359 header[i * 2 + 0] = header_word >> 8;
5360 header[i * 2 + 1] = header_word & 0xff;
5363 /* read some values from level header to check level decoding integrity */
5364 fieldx = header[6] | (header[7] << 8);
5365 fieldy = header[8] | (header[9] << 8);
5366 num_yamyam_contents = header[60] | (header[61] << 8);
5368 /* do some simple sanity checks to ensure that level was correctly decoded */
5369 if (fieldx < 1 || fieldx > 256 ||
5370 fieldy < 1 || fieldy > 256 ||
5371 num_yamyam_contents < 1 || num_yamyam_contents > 8)
5373 level->no_valid_file = TRUE;
5375 Error(ERR_WARN, "cannot decode level from stream -- using empty level");
5380 /* maximum envelope header size is 31 bytes */
5381 envelope_header_len = header[envelope_header_pos];
5382 /* maximum envelope content size is 110 (156?) bytes */
5383 envelope_content_len = header[envelope_content_pos];
5385 /* maximum level title size is 40 bytes */
5386 level_name_len = MIN(header[level_name_pos], MAX_LEVEL_NAME_LEN);
5387 /* maximum level author size is 30 (51?) bytes */
5388 level_author_len = MIN(header[level_author_pos], MAX_LEVEL_AUTHOR_LEN);
5392 for (i = 0; i < envelope_header_len; i++)
5393 if (envelope_size < MAX_ENVELOPE_TEXT_LEN)
5394 level->envelope[0].text[envelope_size++] =
5395 header[envelope_header_pos + 1 + i];
5397 if (envelope_header_len > 0 && envelope_content_len > 0)
5399 if (envelope_size < MAX_ENVELOPE_TEXT_LEN)
5400 level->envelope[0].text[envelope_size++] = '\n';
5401 if (envelope_size < MAX_ENVELOPE_TEXT_LEN)
5402 level->envelope[0].text[envelope_size++] = '\n';
5405 for (i = 0; i < envelope_content_len; i++)
5406 if (envelope_size < MAX_ENVELOPE_TEXT_LEN)
5407 level->envelope[0].text[envelope_size++] =
5408 header[envelope_content_pos + 1 + i];
5410 level->envelope[0].text[envelope_size] = '\0';
5412 level->envelope[0].xsize = MAX_ENVELOPE_XSIZE;
5413 level->envelope[0].ysize = 10;
5414 level->envelope[0].autowrap = TRUE;
5415 level->envelope[0].centered = TRUE;
5417 for (i = 0; i < level_name_len; i++)
5418 level->name[i] = header[level_name_pos + 1 + i];
5419 level->name[level_name_len] = '\0';
5421 for (i = 0; i < level_author_len; i++)
5422 level->author[i] = header[level_author_pos + 1 + i];
5423 level->author[level_author_len] = '\0';
5425 num_yamyam_contents = header[60] | (header[61] << 8);
5426 level->num_yamyam_contents =
5427 MIN(MAX(MIN_ELEMENT_CONTENTS, num_yamyam_contents), MAX_ELEMENT_CONTENTS);
5429 for (i = 0; i < num_yamyam_contents; i++)
5431 for (y = 0; y < 3; y++) for (x = 0; x < 3; x++)
5433 unsigned short word = getDecodedWord_DC(getFile16BitBE(file), FALSE);
5434 int element_dc = ((word & 0xff) << 8) | ((word >> 8) & 0xff);
5436 if (i < MAX_ELEMENT_CONTENTS)
5437 level->yamyam_content[i].e[x][y] = getMappedElement_DC(element_dc);
5441 fieldx = header[6] | (header[7] << 8);
5442 fieldy = header[8] | (header[9] << 8);
5443 level->fieldx = MIN(MAX(MIN_LEV_FIELDX, fieldx), MAX_LEV_FIELDX);
5444 level->fieldy = MIN(MAX(MIN_LEV_FIELDY, fieldy), MAX_LEV_FIELDY);
5446 for (y = 0; y < fieldy; y++) for (x = 0; x < fieldx; x++)
5448 unsigned short word = getDecodedWord_DC(getFile16BitBE(file), FALSE);
5449 int element_dc = ((word & 0xff) << 8) | ((word >> 8) & 0xff);
5451 if (x < MAX_LEV_FIELDX && y < MAX_LEV_FIELDY)
5452 level->field[x][y] = getMappedElement_DC(element_dc);
5455 x = MIN(MAX(0, (header[10] | (header[11] << 8)) - 1), MAX_LEV_FIELDX - 1);
5456 y = MIN(MAX(0, (header[12] | (header[13] << 8)) - 1), MAX_LEV_FIELDY - 1);
5457 level->field[x][y] = EL_PLAYER_1;
5459 x = MIN(MAX(0, (header[14] | (header[15] << 8)) - 1), MAX_LEV_FIELDX - 1);
5460 y = MIN(MAX(0, (header[16] | (header[17] << 8)) - 1), MAX_LEV_FIELDY - 1);
5461 level->field[x][y] = EL_PLAYER_2;
5463 level->gems_needed = header[18] | (header[19] << 8);
5465 level->score[SC_EMERALD] = header[20] | (header[21] << 8);
5466 level->score[SC_DIAMOND] = header[22] | (header[23] << 8);
5467 level->score[SC_PEARL] = header[24] | (header[25] << 8);
5468 level->score[SC_CRYSTAL] = header[26] | (header[27] << 8);
5469 level->score[SC_NUT] = header[28] | (header[29] << 8);
5470 level->score[SC_ROBOT] = header[30] | (header[31] << 8);
5471 level->score[SC_SPACESHIP] = header[32] | (header[33] << 8);
5472 level->score[SC_BUG] = header[34] | (header[35] << 8);
5473 level->score[SC_YAMYAM] = header[36] | (header[37] << 8);
5474 level->score[SC_DYNAMITE] = header[38] | (header[39] << 8);
5475 level->score[SC_KEY] = header[40] | (header[41] << 8);
5476 level->score[SC_TIME_BONUS] = header[42] | (header[43] << 8);
5478 level->time = header[44] | (header[45] << 8);
5480 level->amoeba_speed = header[46] | (header[47] << 8);
5481 level->time_light = header[48] | (header[49] << 8);
5482 level->time_timegate = header[50] | (header[51] << 8);
5483 level->time_wheel = header[52] | (header[53] << 8);
5484 level->time_magic_wall = header[54] | (header[55] << 8);
5485 level->extra_time = header[56] | (header[57] << 8);
5486 level->shield_normal_time = header[58] | (header[59] << 8);
5488 /* Diamond Caves has the same (strange) behaviour as Emerald Mine that gems
5489 can slip down from flat walls, like normal walls and steel walls */
5490 level->em_slippery_gems = TRUE;
5493 static void LoadLevelFromFileInfo_DC(struct LevelInfo *level,
5494 struct LevelFileInfo *level_file_info,
5495 boolean level_info_only)
5497 char *filename = level_file_info->filename;
5499 int num_magic_bytes = 8;
5500 char magic_bytes[num_magic_bytes + 1];
5501 int num_levels_to_skip = level_file_info->nr - leveldir_current->first_level;
5503 if (!(file = openFile(filename, MODE_READ)))
5505 level->no_valid_file = TRUE;
5507 if (!level_info_only)
5508 Error(ERR_WARN, "cannot read level '%s' -- using empty level", filename);
5513 // fseek(file, 0x0000, SEEK_SET);
5515 if (level_file_info->packed)
5517 /* read "magic bytes" from start of file */
5518 if (getStringFromFile(file, magic_bytes, num_magic_bytes + 1) == NULL)
5519 magic_bytes[0] = '\0';
5521 /* check "magic bytes" for correct file format */
5522 if (!strPrefix(magic_bytes, "DC2"))
5524 level->no_valid_file = TRUE;
5526 Error(ERR_WARN, "unknown DC level file '%s' -- using empty level",
5532 if (strPrefix(magic_bytes, "DC2Win95") ||
5533 strPrefix(magic_bytes, "DC2Win98"))
5535 int position_first_level = 0x00fa;
5536 int extra_bytes = 4;
5539 /* advance file stream to first level inside the level package */
5540 skip_bytes = position_first_level - num_magic_bytes - extra_bytes;
5542 /* each block of level data is followed by block of non-level data */
5543 num_levels_to_skip *= 2;
5545 /* at least skip header bytes, therefore use ">= 0" instead of "> 0" */
5546 while (num_levels_to_skip >= 0)
5548 /* advance file stream to next level inside the level package */
5549 if (seekFile(file, skip_bytes, SEEK_CUR) != 0)
5551 level->no_valid_file = TRUE;
5553 Error(ERR_WARN, "cannot fseek in file '%s' -- using empty level",
5559 /* skip apparently unused extra bytes following each level */
5560 ReadUnusedBytesFromFile(file, extra_bytes);
5562 /* read size of next level in level package */
5563 skip_bytes = getFile32BitLE(file);
5565 num_levels_to_skip--;
5570 level->no_valid_file = TRUE;
5572 Error(ERR_WARN, "unknown DC2 level file '%s' -- using empty level",
5579 LoadLevelFromFileStream_DC(file, level, level_file_info->nr);
5585 /* ------------------------------------------------------------------------- */
5586 /* functions for loading SB level */
5587 /* ------------------------------------------------------------------------- */
5589 int getMappedElement_SB(int element_ascii, boolean use_ces)
5597 sb_element_mapping[] =
5599 { ' ', EL_EMPTY, EL_CUSTOM_1 }, /* floor (space) */
5600 { '#', EL_STEELWALL, EL_CUSTOM_2 }, /* wall */
5601 { '@', EL_PLAYER_1, EL_CUSTOM_3 }, /* player */
5602 { '$', EL_SOKOBAN_OBJECT, EL_CUSTOM_4 }, /* box */
5603 { '.', EL_SOKOBAN_FIELD_EMPTY, EL_CUSTOM_5 }, /* goal square */
5604 { '*', EL_SOKOBAN_FIELD_FULL, EL_CUSTOM_6 }, /* box on goal square */
5605 { '+', EL_SOKOBAN_FIELD_PLAYER, EL_CUSTOM_7 }, /* player on goal square */
5606 { '_', EL_INVISIBLE_STEELWALL, EL_FROM_LEVEL_TEMPLATE }, /* floor beyond border */
5613 for (i = 0; sb_element_mapping[i].ascii != 0; i++)
5614 if (element_ascii == sb_element_mapping[i].ascii)
5615 return (use_ces ? sb_element_mapping[i].ce : sb_element_mapping[i].sb);
5617 return EL_UNDEFINED;
5620 static void LoadLevelFromFileInfo_SB(struct LevelInfo *level,
5621 struct LevelFileInfo *level_file_info,
5622 boolean level_info_only)
5624 char *filename = level_file_info->filename;
5625 char line[MAX_LINE_LEN], line_raw[MAX_LINE_LEN], previous_line[MAX_LINE_LEN];
5626 char last_comment[MAX_LINE_LEN];
5627 char level_name[MAX_LINE_LEN];
5630 int num_levels_to_skip = level_file_info->nr - leveldir_current->first_level;
5631 boolean read_continued_line = FALSE;
5632 boolean reading_playfield = FALSE;
5633 boolean got_valid_playfield_line = FALSE;
5634 boolean invalid_playfield_char = FALSE;
5635 boolean load_xsb_to_ces = check_special_flags("load_xsb_to_ces");
5636 int file_level_nr = 0;
5638 int x = 0, y = 0; /* initialized to make compilers happy */
5640 last_comment[0] = '\0';
5641 level_name[0] = '\0';
5643 if (!(file = openFile(filename, MODE_READ)))
5645 level->no_valid_file = TRUE;
5647 if (!level_info_only)
5648 Error(ERR_WARN, "cannot read level '%s' -- using empty level", filename);
5653 while (!checkEndOfFile(file))
5655 /* level successfully read, but next level may follow here */
5656 if (!got_valid_playfield_line && reading_playfield)
5658 /* read playfield from single level file -- skip remaining file */
5659 if (!level_file_info->packed)
5662 if (file_level_nr >= num_levels_to_skip)
5667 last_comment[0] = '\0';
5668 level_name[0] = '\0';
5670 reading_playfield = FALSE;
5673 got_valid_playfield_line = FALSE;
5675 /* read next line of input file */
5676 if (!getStringFromFile(file, line, MAX_LINE_LEN))
5679 /* check if line was completely read and is terminated by line break */
5680 if (strlen(line) > 0 && line[strlen(line) - 1] == '\n')
5683 /* cut trailing line break (this can be newline and/or carriage return) */
5684 for (line_ptr = &line[strlen(line)]; line_ptr >= line; line_ptr--)
5685 if ((*line_ptr == '\n' || *line_ptr == '\r') && *(line_ptr + 1) == '\0')
5688 /* copy raw input line for later use (mainly debugging output) */
5689 strcpy(line_raw, line);
5691 if (read_continued_line)
5693 /* append new line to existing line, if there is enough space */
5694 if (strlen(previous_line) + strlen(line_ptr) < MAX_LINE_LEN)
5695 strcat(previous_line, line_ptr);
5697 strcpy(line, previous_line); /* copy storage buffer to line */
5699 read_continued_line = FALSE;
5702 /* if the last character is '\', continue at next line */
5703 if (strlen(line) > 0 && line[strlen(line) - 1] == '\\')
5705 line[strlen(line) - 1] = '\0'; /* cut off trailing backslash */
5706 strcpy(previous_line, line); /* copy line to storage buffer */
5708 read_continued_line = TRUE;
5713 /* skip empty lines */
5714 if (line[0] == '\0')
5717 /* extract comment text from comment line */
5720 for (line_ptr = line; *line_ptr; line_ptr++)
5721 if (*line_ptr != ' ' && *line_ptr != '\t' && *line_ptr != ';')
5724 strcpy(last_comment, line_ptr);
5729 /* extract level title text from line containing level title */
5730 if (line[0] == '\'')
5732 strcpy(level_name, &line[1]);
5734 if (strlen(level_name) > 0 && level_name[strlen(level_name) - 1] == '\'')
5735 level_name[strlen(level_name) - 1] = '\0';
5740 /* skip lines containing only spaces (or empty lines) */
5741 for (line_ptr = line; *line_ptr; line_ptr++)
5742 if (*line_ptr != ' ')
5744 if (*line_ptr == '\0')
5747 /* at this point, we have found a line containing part of a playfield */
5749 got_valid_playfield_line = TRUE;
5751 if (!reading_playfield)
5753 reading_playfield = TRUE;
5754 invalid_playfield_char = FALSE;
5756 for (x = 0; x < MAX_LEV_FIELDX; x++)
5757 for (y = 0; y < MAX_LEV_FIELDY; y++)
5758 level->field[x][y] = getMappedElement_SB(' ', load_xsb_to_ces);
5763 /* start with topmost tile row */
5767 /* skip playfield line if larger row than allowed */
5768 if (y >= MAX_LEV_FIELDY)
5771 /* start with leftmost tile column */
5774 /* read playfield elements from line */
5775 for (line_ptr = line; *line_ptr; line_ptr++)
5777 int mapped_sb_element = getMappedElement_SB(*line_ptr, load_xsb_to_ces);
5779 /* stop parsing playfield line if larger column than allowed */
5780 if (x >= MAX_LEV_FIELDX)
5783 if (mapped_sb_element == EL_UNDEFINED)
5785 invalid_playfield_char = TRUE;
5790 level->field[x][y] = mapped_sb_element;
5792 /* continue with next tile column */
5795 level->fieldx = MAX(x, level->fieldx);
5798 if (invalid_playfield_char)
5800 /* if first playfield line, treat invalid lines as comment lines */
5802 reading_playfield = FALSE;
5807 /* continue with next tile row */
5815 level->fieldx = MIN(MAX(MIN_LEV_FIELDX, level->fieldx), MAX_LEV_FIELDX);
5816 level->fieldy = MIN(MAX(MIN_LEV_FIELDY, level->fieldy), MAX_LEV_FIELDY);
5818 if (!reading_playfield)
5820 level->no_valid_file = TRUE;
5822 Error(ERR_WARN, "cannot read level '%s' -- using empty level", filename);
5827 if (*level_name != '\0')
5829 strncpy(level->name, level_name, MAX_LEVEL_NAME_LEN);
5830 level->name[MAX_LEVEL_NAME_LEN] = '\0';
5832 else if (*last_comment != '\0')
5834 strncpy(level->name, last_comment, MAX_LEVEL_NAME_LEN);
5835 level->name[MAX_LEVEL_NAME_LEN] = '\0';
5839 sprintf(level->name, "--> Level %d <--", level_file_info->nr);
5842 /* set all empty fields beyond the border walls to invisible steel wall */
5843 for (y = 0; y < level->fieldy; y++) for (x = 0; x < level->fieldx; x++)
5845 if ((x == 0 || x == level->fieldx - 1 ||
5846 y == 0 || y == level->fieldy - 1) &&
5847 level->field[x][y] == getMappedElement_SB(' ', load_xsb_to_ces))
5848 FloodFillLevel(x, y, getMappedElement_SB('_', load_xsb_to_ces),
5849 level->field, level->fieldx, level->fieldy);
5852 /* set special level settings for Sokoban levels */
5855 level->use_step_counter = TRUE;
5857 if (load_xsb_to_ces)
5859 /* special global settings can now be set in level template */
5861 level->use_custom_template = TRUE;
5866 /* ------------------------------------------------------------------------- */
5867 /* functions for handling native levels */
5868 /* ------------------------------------------------------------------------- */
5870 static void LoadLevelFromFileInfo_EM(struct LevelInfo *level,
5871 struct LevelFileInfo *level_file_info,
5872 boolean level_info_only)
5874 if (!LoadNativeLevel_EM(level_file_info->filename, level_info_only))
5875 level->no_valid_file = TRUE;
5878 static void LoadLevelFromFileInfo_SP(struct LevelInfo *level,
5879 struct LevelFileInfo *level_file_info,
5880 boolean level_info_only)
5884 /* determine position of requested level inside level package */
5885 if (level_file_info->packed)
5886 pos = level_file_info->nr - leveldir_current->first_level;
5888 if (!LoadNativeLevel_SP(level_file_info->filename, pos, level_info_only))
5889 level->no_valid_file = TRUE;
5892 void CopyNativeLevel_RND_to_Native(struct LevelInfo *level)
5894 if (level->game_engine_type == GAME_ENGINE_TYPE_EM)
5895 CopyNativeLevel_RND_to_EM(level);
5896 else if (level->game_engine_type == GAME_ENGINE_TYPE_SP)
5897 CopyNativeLevel_RND_to_SP(level);
5900 void CopyNativeLevel_Native_to_RND(struct LevelInfo *level)
5902 if (level->game_engine_type == GAME_ENGINE_TYPE_EM)
5903 CopyNativeLevel_EM_to_RND(level);
5904 else if (level->game_engine_type == GAME_ENGINE_TYPE_SP)
5905 CopyNativeLevel_SP_to_RND(level);
5908 void SaveNativeLevel(struct LevelInfo *level)
5910 if (level->game_engine_type == GAME_ENGINE_TYPE_SP)
5912 char *basename = getSingleLevelBasenameExt(level->file_info.nr, "sp");
5913 char *filename = getLevelFilenameFromBasename(basename);
5915 CopyNativeLevel_RND_to_SP(level);
5916 CopyNativeTape_RND_to_SP(level);
5918 SaveNativeLevel_SP(filename);
5923 /* ------------------------------------------------------------------------- */
5924 /* functions for loading generic level */
5925 /* ------------------------------------------------------------------------- */
5927 static void LoadLevelFromFileInfo(struct LevelInfo *level,
5928 struct LevelFileInfo *level_file_info,
5929 boolean level_info_only)
5931 /* always start with reliable default values */
5932 setLevelInfoToDefaults(level, level_info_only, TRUE);
5934 switch (level_file_info->type)
5936 case LEVEL_FILE_TYPE_RND:
5937 LoadLevelFromFileInfo_RND(level, level_file_info, level_info_only);
5940 case LEVEL_FILE_TYPE_EM:
5941 LoadLevelFromFileInfo_EM(level, level_file_info, level_info_only);
5942 level->game_engine_type = GAME_ENGINE_TYPE_EM;
5945 case LEVEL_FILE_TYPE_SP:
5946 LoadLevelFromFileInfo_SP(level, level_file_info, level_info_only);
5947 level->game_engine_type = GAME_ENGINE_TYPE_SP;
5950 case LEVEL_FILE_TYPE_DC:
5951 LoadLevelFromFileInfo_DC(level, level_file_info, level_info_only);
5954 case LEVEL_FILE_TYPE_SB:
5955 LoadLevelFromFileInfo_SB(level, level_file_info, level_info_only);
5959 LoadLevelFromFileInfo_RND(level, level_file_info, level_info_only);
5963 /* if level file is invalid, restore level structure to default values */
5964 if (level->no_valid_file)
5965 setLevelInfoToDefaults(level, level_info_only, FALSE);
5967 if (level->game_engine_type == GAME_ENGINE_TYPE_UNKNOWN)
5968 level->game_engine_type = GAME_ENGINE_TYPE_RND;
5970 if (level_file_info->type != LEVEL_FILE_TYPE_RND)
5971 CopyNativeLevel_Native_to_RND(level);
5974 void LoadLevelFromFilename(struct LevelInfo *level, char *filename)
5976 static struct LevelFileInfo level_file_info;
5978 /* always start with reliable default values */
5979 setFileInfoToDefaults(&level_file_info);
5981 level_file_info.nr = 0; /* unknown level number */
5982 level_file_info.type = LEVEL_FILE_TYPE_RND; /* no others supported yet */
5983 level_file_info.filename = filename;
5985 LoadLevelFromFileInfo(level, &level_file_info, FALSE);
5988 static void LoadLevel_InitVersion(struct LevelInfo *level, char *filename)
5992 if (leveldir_current == NULL) /* only when dumping level */
5995 /* all engine modifications also valid for levels which use latest engine */
5996 if (level->game_version < VERSION_IDENT(3,2,0,5))
5998 /* time bonus score was given for 10 s instead of 1 s before 3.2.0-5 */
5999 level->score[SC_TIME_BONUS] /= 10;
6002 if (leveldir_current->latest_engine)
6004 /* ---------- use latest game engine ----------------------------------- */
6006 /* For all levels which are forced to use the latest game engine version
6007 (normally all but user contributed, private and undefined levels), set
6008 the game engine version to the actual version; this allows for actual
6009 corrections in the game engine to take effect for existing, converted
6010 levels (from "classic" or other existing games) to make the emulation
6011 of the corresponding game more accurate, while (hopefully) not breaking
6012 existing levels created from other players. */
6014 level->game_version = GAME_VERSION_ACTUAL;
6016 /* Set special EM style gems behaviour: EM style gems slip down from
6017 normal, steel and growing wall. As this is a more fundamental change,
6018 it seems better to set the default behaviour to "off" (as it is more
6019 natural) and make it configurable in the level editor (as a property
6020 of gem style elements). Already existing converted levels (neither
6021 private nor contributed levels) are changed to the new behaviour. */
6023 if (level->file_version < FILE_VERSION_2_0)
6024 level->em_slippery_gems = TRUE;
6029 /* ---------- use game engine the level was created with ----------------- */
6031 /* For all levels which are not forced to use the latest game engine
6032 version (normally user contributed, private and undefined levels),
6033 use the version of the game engine the levels were created for.
6035 Since 2.0.1, the game engine version is now directly stored
6036 in the level file (chunk "VERS"), so there is no need anymore
6037 to set the game version from the file version (except for old,
6038 pre-2.0 levels, where the game version is still taken from the
6039 file format version used to store the level -- see above). */
6041 /* player was faster than enemies in 1.0.0 and before */
6042 if (level->file_version == FILE_VERSION_1_0)
6043 for (i = 0; i < MAX_PLAYERS; i++)
6044 level->initial_player_stepsize[i] = STEPSIZE_FAST;
6046 /* default behaviour for EM style gems was "slippery" only in 2.0.1 */
6047 if (level->game_version == VERSION_IDENT(2,0,1,0))
6048 level->em_slippery_gems = TRUE;
6050 /* springs could be pushed over pits before (pre-release version) 2.2.0 */
6051 if (level->game_version < VERSION_IDENT(2,2,0,0))
6052 level->use_spring_bug = TRUE;
6054 if (level->game_version < VERSION_IDENT(3,2,0,5))
6056 /* time orb caused limited time in endless time levels before 3.2.0-5 */
6057 level->use_time_orb_bug = TRUE;
6059 /* default behaviour for snapping was "no snap delay" before 3.2.0-5 */
6060 level->block_snap_field = FALSE;
6062 /* extra time score was same value as time left score before 3.2.0-5 */
6063 level->extra_time_score = level->score[SC_TIME_BONUS];
6066 if (level->game_version < VERSION_IDENT(3,2,0,7))
6068 /* default behaviour for snapping was "not continuous" before 3.2.0-7 */
6069 level->continuous_snapping = FALSE;
6072 /* only few elements were able to actively move into acid before 3.1.0 */
6073 /* trigger settings did not exist before 3.1.0; set to default "any" */
6074 if (level->game_version < VERSION_IDENT(3,1,0,0))
6076 /* correct "can move into acid" settings (all zero in old levels) */
6078 level->can_move_into_acid_bits = 0; /* nothing can move into acid */
6079 level->dont_collide_with_bits = 0; /* nothing is deadly when colliding */
6081 setMoveIntoAcidProperty(level, EL_ROBOT, TRUE);
6082 setMoveIntoAcidProperty(level, EL_SATELLITE, TRUE);
6083 setMoveIntoAcidProperty(level, EL_PENGUIN, TRUE);
6084 setMoveIntoAcidProperty(level, EL_BALLOON, TRUE);
6086 for (i = 0; i < NUM_CUSTOM_ELEMENTS; i++)
6087 SET_PROPERTY(EL_CUSTOM_START + i, EP_CAN_MOVE_INTO_ACID, TRUE);
6089 /* correct trigger settings (stored as zero == "none" in old levels) */
6091 for (i = 0; i < NUM_CUSTOM_ELEMENTS; i++)
6093 int element = EL_CUSTOM_START + i;
6094 struct ElementInfo *ei = &element_info[element];
6096 for (j = 0; j < ei->num_change_pages; j++)
6098 struct ElementChangeInfo *change = &ei->change_page[j];
6100 change->trigger_player = CH_PLAYER_ANY;
6101 change->trigger_page = CH_PAGE_ANY;
6106 /* try to detect and fix "Snake Bite" levels, which are broken with 3.2.0 */
6108 int element = EL_CUSTOM_256;
6109 struct ElementInfo *ei = &element_info[element];
6110 struct ElementChangeInfo *change = &ei->change_page[0];
6112 /* This is needed to fix a problem that was caused by a bugfix in function
6113 game.c/CreateFieldExt() introduced with 3.2.0 that corrects the behaviour
6114 when a custom element changes to EL_SOKOBAN_FIELD_PLAYER (before, it did
6115 not replace walkable elements, but instead just placed the player on it,
6116 without placing the Sokoban field under the player). Unfortunately, this
6117 breaks "Snake Bite" style levels when the snake is halfway through a door
6118 that just closes (the snake head is still alive and can be moved in this
6119 case). This can be fixed by replacing the EL_SOKOBAN_FIELD_PLAYER by the
6120 player (without Sokoban element) which then gets killed as designed). */
6122 if ((strncmp(leveldir_current->identifier, "snake_bite", 10) == 0 ||
6123 strncmp(ei->description, "pause b4 death", 14) == 0) &&
6124 change->target_element == EL_SOKOBAN_FIELD_PLAYER)
6125 change->target_element = EL_PLAYER_1;
6128 /* try to detect and fix "Zelda" style levels, which are broken with 3.2.5 */
6129 if (level->game_version < VERSION_IDENT(3,2,5,0))
6131 /* This is needed to fix a problem that was caused by a bugfix in function
6132 game.c/CheckTriggeredElementChangeExt() introduced with 3.2.5 that
6133 corrects the behaviour when a custom element changes to another custom
6134 element with a higher element number that has change actions defined.
6135 Normally, only one change per frame is allowed for custom elements.
6136 Therefore, it is checked if a custom element already changed in the
6137 current frame; if it did, subsequent changes are suppressed.
6138 Unfortunately, this is only checked for element changes, but not for
6139 change actions, which are still executed. As the function above loops
6140 through all custom elements from lower to higher, an element change
6141 resulting in a lower CE number won't be checked again, while a target
6142 element with a higher number will also be checked, and potential change
6143 actions will get executed for this CE, too (which is wrong), while
6144 further changes are ignored (which is correct). As this bugfix breaks
6145 Zelda II (and introduces graphical bugs to Zelda I, and also breaks a
6146 few other levels like Alan Bond's "FMV"), allow the previous, incorrect
6147 behaviour for existing levels and tapes that make use of this bug */
6149 level->use_action_after_change_bug = TRUE;
6152 /* not centering level after relocating player was default only in 3.2.3 */
6153 if (level->game_version == VERSION_IDENT(3,2,3,0)) /* (no pre-releases) */
6154 level->shifted_relocation = TRUE;
6156 /* EM style elements always chain-exploded in R'n'D engine before 3.2.6 */
6157 if (level->game_version < VERSION_IDENT(3,2,6,0))
6158 level->em_explodes_by_fire = TRUE;
6161 static void LoadLevel_InitElements(struct LevelInfo *level, char *filename)
6165 /* map custom element change events that have changed in newer versions
6166 (these following values were accidentally changed in version 3.0.1)
6167 (this seems to be needed only for 'ab_levelset3' and 'ab_levelset4') */
6168 if (level->game_version <= VERSION_IDENT(3,0,0,0))
6170 for (i = 0; i < NUM_CUSTOM_ELEMENTS; i++)
6172 int element = EL_CUSTOM_START + i;
6174 /* order of checking and copying events to be mapped is important */
6175 /* (do not change the start and end value -- they are constant) */
6176 for (j = CE_BY_OTHER_ACTION; j >= CE_VALUE_GETS_ZERO; j--)
6178 if (HAS_CHANGE_EVENT(element, j - 2))
6180 SET_CHANGE_EVENT(element, j - 2, FALSE);
6181 SET_CHANGE_EVENT(element, j, TRUE);
6185 /* order of checking and copying events to be mapped is important */
6186 /* (do not change the start and end value -- they are constant) */
6187 for (j = CE_PLAYER_COLLECTS_X; j >= CE_HITTING_SOMETHING; j--)
6189 if (HAS_CHANGE_EVENT(element, j - 1))
6191 SET_CHANGE_EVENT(element, j - 1, FALSE);
6192 SET_CHANGE_EVENT(element, j, TRUE);
6198 /* initialize "can_change" field for old levels with only one change page */
6199 if (level->game_version <= VERSION_IDENT(3,0,2,0))
6201 for (i = 0; i < NUM_CUSTOM_ELEMENTS; i++)
6203 int element = EL_CUSTOM_START + i;
6205 if (CAN_CHANGE(element))
6206 element_info[element].change->can_change = TRUE;
6210 /* correct custom element values (for old levels without these options) */
6211 if (level->game_version < VERSION_IDENT(3,1,1,0))
6213 for (i = 0; i < NUM_CUSTOM_ELEMENTS; i++)
6215 int element = EL_CUSTOM_START + i;
6216 struct ElementInfo *ei = &element_info[element];
6218 if (ei->access_direction == MV_NO_DIRECTION)
6219 ei->access_direction = MV_ALL_DIRECTIONS;
6223 /* correct custom element values (fix invalid values for all versions) */
6226 for (i = 0; i < NUM_CUSTOM_ELEMENTS; i++)
6228 int element = EL_CUSTOM_START + i;
6229 struct ElementInfo *ei = &element_info[element];
6231 for (j = 0; j < ei->num_change_pages; j++)
6233 struct ElementChangeInfo *change = &ei->change_page[j];
6235 if (change->trigger_player == CH_PLAYER_NONE)
6236 change->trigger_player = CH_PLAYER_ANY;
6238 if (change->trigger_side == CH_SIDE_NONE)
6239 change->trigger_side = CH_SIDE_ANY;
6244 /* initialize "can_explode" field for old levels which did not store this */
6245 /* !!! CHECK THIS -- "<= 3,1,0,0" IS PROBABLY WRONG !!! */
6246 if (level->game_version <= VERSION_IDENT(3,1,0,0))
6248 for (i = 0; i < NUM_CUSTOM_ELEMENTS; i++)
6250 int element = EL_CUSTOM_START + i;
6252 if (EXPLODES_1X1_OLD(element))
6253 element_info[element].explosion_type = EXPLODES_1X1;
6255 SET_PROPERTY(element, EP_CAN_EXPLODE, (EXPLODES_BY_FIRE(element) ||
6256 EXPLODES_SMASHED(element) ||
6257 EXPLODES_IMPACT(element)));
6261 /* correct previously hard-coded move delay values for maze runner style */
6262 if (level->game_version < VERSION_IDENT(3,1,1,0))
6264 for (i = 0; i < NUM_CUSTOM_ELEMENTS; i++)
6266 int element = EL_CUSTOM_START + i;
6268 if (element_info[element].move_pattern & MV_MAZE_RUNNER_STYLE)
6270 /* previously hard-coded and therefore ignored */
6271 element_info[element].move_delay_fixed = 9;
6272 element_info[element].move_delay_random = 0;
6277 /* map elements that have changed in newer versions */
6278 level->amoeba_content = getMappedElementByVersion(level->amoeba_content,
6279 level->game_version);
6280 for (i = 0; i < MAX_ELEMENT_CONTENTS; i++)
6281 for (x = 0; x < 3; x++)
6282 for (y = 0; y < 3; y++)
6283 level->yamyam_content[i].e[x][y] =
6284 getMappedElementByVersion(level->yamyam_content[i].e[x][y],
6285 level->game_version);
6287 /* initialize element properties for level editor etc. */
6288 InitElementPropertiesEngine(level->game_version);
6289 InitElementPropertiesAfterLoading(level->game_version);
6290 InitElementPropertiesGfxElement();
6293 static void LoadLevel_InitPlayfield(struct LevelInfo *level, char *filename)
6297 /* map elements that have changed in newer versions */
6298 for (y = 0; y < level->fieldy; y++)
6299 for (x = 0; x < level->fieldx; x++)
6300 level->field[x][y] = getMappedElementByVersion(level->field[x][y],
6301 level->game_version);
6303 /* clear unused playfield data (nicer if level gets resized in editor) */
6304 for (x = 0; x < MAX_LEV_FIELDX; x++)
6305 for (y = 0; y < MAX_LEV_FIELDY; y++)
6306 if (x >= level->fieldx || y >= level->fieldy)
6307 level->field[x][y] = EL_EMPTY;
6309 /* copy elements to runtime playfield array */
6310 for (x = 0; x < MAX_LEV_FIELDX; x++)
6311 for (y = 0; y < MAX_LEV_FIELDY; y++)
6312 Feld[x][y] = level->field[x][y];
6314 /* initialize level size variables for faster access */
6315 lev_fieldx = level->fieldx;
6316 lev_fieldy = level->fieldy;
6318 /* determine border element for this level */
6319 if (level->file_info.type == LEVEL_FILE_TYPE_DC)
6320 BorderElement = EL_EMPTY; /* (in editor, SetBorderElement() is used) */
6325 static void LoadLevel_InitNativeEngines(struct LevelInfo *level,char *filename)
6327 struct LevelFileInfo *level_file_info = &level->file_info;
6329 if (level_file_info->type == LEVEL_FILE_TYPE_RND)
6330 CopyNativeLevel_RND_to_Native(level);
6333 void LoadLevelTemplate(int nr)
6337 setLevelFileInfo(&level_template.file_info, nr);
6338 filename = level_template.file_info.filename;
6340 LoadLevelFromFileInfo(&level_template, &level_template.file_info, FALSE);
6342 LoadLevel_InitVersion(&level_template, filename);
6343 LoadLevel_InitElements(&level_template, filename);
6345 ActivateLevelTemplate();
6348 void LoadLevel(int nr)
6352 setLevelFileInfo(&level.file_info, nr);
6353 filename = level.file_info.filename;
6355 LoadLevelFromFileInfo(&level, &level.file_info, FALSE);
6357 if (level.use_custom_template)
6358 LoadLevelTemplate(-1);
6360 LoadLevel_InitVersion(&level, filename);
6361 LoadLevel_InitElements(&level, filename);
6362 LoadLevel_InitPlayfield(&level, filename);
6364 LoadLevel_InitNativeEngines(&level, filename);
6367 void LoadLevelInfoOnly(int nr)
6369 setLevelFileInfo(&level.file_info, nr);
6371 LoadLevelFromFileInfo(&level, &level.file_info, TRUE);
6374 static int SaveLevel_VERS(FILE *file, struct LevelInfo *level)
6378 chunk_size += putFileVersion(file, level->file_version);
6379 chunk_size += putFileVersion(file, level->game_version);
6384 static int SaveLevel_DATE(FILE *file, struct LevelInfo *level)
6388 chunk_size += putFile16BitBE(file, level->creation_date.year);
6389 chunk_size += putFile8Bit(file, level->creation_date.month);
6390 chunk_size += putFile8Bit(file, level->creation_date.day);
6395 #if ENABLE_HISTORIC_CHUNKS
6396 static void SaveLevel_HEAD(FILE *file, struct LevelInfo *level)
6400 putFile8Bit(file, level->fieldx);
6401 putFile8Bit(file, level->fieldy);
6403 putFile16BitBE(file, level->time);
6404 putFile16BitBE(file, level->gems_needed);
6406 for (i = 0; i < MAX_LEVEL_NAME_LEN; i++)
6407 putFile8Bit(file, level->name[i]);
6409 for (i = 0; i < LEVEL_SCORE_ELEMENTS; i++)
6410 putFile8Bit(file, level->score[i]);
6412 for (i = 0; i < STD_ELEMENT_CONTENTS; i++)
6413 for (y = 0; y < 3; y++)
6414 for (x = 0; x < 3; x++)
6415 putFile8Bit(file, (level->encoding_16bit_yamyam ? EL_EMPTY :
6416 level->yamyam_content[i].e[x][y]));
6417 putFile8Bit(file, level->amoeba_speed);
6418 putFile8Bit(file, level->time_magic_wall);
6419 putFile8Bit(file, level->time_wheel);
6420 putFile8Bit(file, (level->encoding_16bit_amoeba ? EL_EMPTY :
6421 level->amoeba_content));
6422 putFile8Bit(file, (level->initial_player_stepsize == STEPSIZE_FAST ? 1 : 0));
6423 putFile8Bit(file, (level->initial_gravity ? 1 : 0));
6424 putFile8Bit(file, (level->encoding_16bit_field ? 1 : 0));
6425 putFile8Bit(file, (level->em_slippery_gems ? 1 : 0));
6427 putFile8Bit(file, (level->use_custom_template ? 1 : 0));
6429 putFile8Bit(file, (level->block_last_field ? 1 : 0));
6430 putFile8Bit(file, (level->sp_block_last_field ? 1 : 0));
6431 putFile32BitBE(file, level->can_move_into_acid_bits);
6432 putFile8Bit(file, level->dont_collide_with_bits);
6434 putFile8Bit(file, (level->use_spring_bug ? 1 : 0));
6435 putFile8Bit(file, (level->use_step_counter ? 1 : 0));
6437 putFile8Bit(file, (level->instant_relocation ? 1 : 0));
6438 putFile8Bit(file, (level->can_pass_to_walkable ? 1 : 0));
6439 putFile8Bit(file, (level->grow_into_diggable ? 1 : 0));
6441 putFile8Bit(file, level->game_engine_type);
6443 WriteUnusedBytesToFile(file, LEVEL_CHUNK_HEAD_UNUSED);
6447 static int SaveLevel_NAME(FILE *file, struct LevelInfo *level)
6452 for (i = 0; i < MAX_LEVEL_NAME_LEN; i++)
6453 chunk_size += putFile8Bit(file, level->name[i]);
6458 static int SaveLevel_AUTH(FILE *file, struct LevelInfo *level)
6463 for (i = 0; i < MAX_LEVEL_AUTHOR_LEN; i++)
6464 chunk_size += putFile8Bit(file, level->author[i]);
6469 #if ENABLE_HISTORIC_CHUNKS
6470 static int SaveLevel_BODY(FILE *file, struct LevelInfo *level)
6475 for (y = 0; y < level->fieldy; y++)
6476 for (x = 0; x < level->fieldx; x++)
6477 if (level->encoding_16bit_field)
6478 chunk_size += putFile16BitBE(file, level->field[x][y]);
6480 chunk_size += putFile8Bit(file, level->field[x][y]);
6486 static int SaveLevel_BODY(FILE *file, struct LevelInfo *level)
6491 for (y = 0; y < level->fieldy; y++)
6492 for (x = 0; x < level->fieldx; x++)
6493 chunk_size += putFile16BitBE(file, level->field[x][y]);
6498 #if ENABLE_HISTORIC_CHUNKS
6499 static void SaveLevel_CONT(FILE *file, struct LevelInfo *level)
6503 putFile8Bit(file, EL_YAMYAM);
6504 putFile8Bit(file, level->num_yamyam_contents);
6505 putFile8Bit(file, 0);
6506 putFile8Bit(file, 0);
6508 for (i = 0; i < MAX_ELEMENT_CONTENTS; i++)
6509 for (y = 0; y < 3; y++)
6510 for (x = 0; x < 3; x++)
6511 if (level->encoding_16bit_field)
6512 putFile16BitBE(file, level->yamyam_content[i].e[x][y]);
6514 putFile8Bit(file, level->yamyam_content[i].e[x][y]);
6518 #if ENABLE_HISTORIC_CHUNKS
6519 static void SaveLevel_CNT2(FILE *file, struct LevelInfo *level, int element)
6522 int num_contents, content_xsize, content_ysize;
6523 int content_array[MAX_ELEMENT_CONTENTS][3][3];
6525 if (element == EL_YAMYAM)
6527 num_contents = level->num_yamyam_contents;
6531 for (i = 0; i < MAX_ELEMENT_CONTENTS; i++)
6532 for (y = 0; y < 3; y++)
6533 for (x = 0; x < 3; x++)
6534 content_array[i][x][y] = level->yamyam_content[i].e[x][y];
6536 else if (element == EL_BD_AMOEBA)
6542 for (i = 0; i < MAX_ELEMENT_CONTENTS; i++)
6543 for (y = 0; y < 3; y++)
6544 for (x = 0; x < 3; x++)
6545 content_array[i][x][y] = EL_EMPTY;
6546 content_array[0][0][0] = level->amoeba_content;
6550 /* chunk header already written -- write empty chunk data */
6551 WriteUnusedBytesToFile(file, LEVEL_CHUNK_CNT2_SIZE);
6553 Error(ERR_WARN, "cannot save content for element '%d'", element);
6557 putFile16BitBE(file, element);
6558 putFile8Bit(file, num_contents);
6559 putFile8Bit(file, content_xsize);
6560 putFile8Bit(file, content_ysize);
6562 WriteUnusedBytesToFile(file, LEVEL_CHUNK_CNT2_UNUSED);
6564 for (i = 0; i < MAX_ELEMENT_CONTENTS; i++)
6565 for (y = 0; y < 3; y++)
6566 for (x = 0; x < 3; x++)
6567 putFile16BitBE(file, content_array[i][x][y]);
6571 #if ENABLE_HISTORIC_CHUNKS
6572 static int SaveLevel_CNT3(FILE *file, struct LevelInfo *level, int element)
6574 int envelope_nr = element - EL_ENVELOPE_1;
6575 int envelope_len = strlen(level->envelope_text[envelope_nr]) + 1;
6579 chunk_size += putFile16BitBE(file, element);
6580 chunk_size += putFile16BitBE(file, envelope_len);
6581 chunk_size += putFile8Bit(file, level->envelope_xsize[envelope_nr]);
6582 chunk_size += putFile8Bit(file, level->envelope_ysize[envelope_nr]);
6584 WriteUnusedBytesToFile(file, LEVEL_CHUNK_CNT3_UNUSED);
6585 chunk_size += LEVEL_CHUNK_CNT3_UNUSED;
6587 for (i = 0; i < envelope_len; i++)
6588 chunk_size += putFile8Bit(file, level->envelope_text[envelope_nr][i]);
6594 #if ENABLE_HISTORIC_CHUNKS
6595 static void SaveLevel_CUS1(FILE *file, struct LevelInfo *level,
6596 int num_changed_custom_elements)
6600 putFile16BitBE(file, num_changed_custom_elements);
6602 for (i = 0; i < NUM_CUSTOM_ELEMENTS; i++)
6604 int element = EL_CUSTOM_START + i;
6606 struct ElementInfo *ei = &element_info[element];
6608 if (ei->properties[EP_BITFIELD_BASE_NR] != EP_BITMASK_DEFAULT)
6610 if (check < num_changed_custom_elements)
6612 putFile16BitBE(file, element);
6613 putFile32BitBE(file, ei->properties[EP_BITFIELD_BASE_NR]);
6620 if (check != num_changed_custom_elements) /* should not happen */
6621 Error(ERR_WARN, "inconsistent number of custom element properties");
6625 #if ENABLE_HISTORIC_CHUNKS
6626 static void SaveLevel_CUS2(FILE *file, struct LevelInfo *level,
6627 int num_changed_custom_elements)
6631 putFile16BitBE(file, num_changed_custom_elements);
6633 for (i = 0; i < NUM_CUSTOM_ELEMENTS; i++)
6635 int element = EL_CUSTOM_START + i;
6637 if (element_info[element].change->target_element != EL_EMPTY_SPACE)
6639 if (check < num_changed_custom_elements)
6641 putFile16BitBE(file, element);
6642 putFile16BitBE(file, element_info[element].change->target_element);
6649 if (check != num_changed_custom_elements) /* should not happen */
6650 Error(ERR_WARN, "inconsistent number of custom target elements");
6654 #if ENABLE_HISTORIC_CHUNKS
6655 static void SaveLevel_CUS3(FILE *file, struct LevelInfo *level,
6656 int num_changed_custom_elements)
6658 int i, j, x, y, check = 0;
6660 putFile16BitBE(file, num_changed_custom_elements);
6662 for (i = 0; i < NUM_CUSTOM_ELEMENTS; i++)
6664 int element = EL_CUSTOM_START + i;
6665 struct ElementInfo *ei = &element_info[element];
6667 if (ei->modified_settings)
6669 if (check < num_changed_custom_elements)
6671 putFile16BitBE(file, element);
6673 for (j = 0; j < MAX_ELEMENT_NAME_LEN; j++)
6674 putFile8Bit(file, ei->description[j]);
6676 putFile32BitBE(file, ei->properties[EP_BITFIELD_BASE_NR]);
6678 /* some free bytes for future properties and padding */
6679 WriteUnusedBytesToFile(file, 7);
6681 putFile8Bit(file, ei->use_gfx_element);
6682 putFile16BitBE(file, ei->gfx_element_initial);
6684 putFile8Bit(file, ei->collect_score_initial);
6685 putFile8Bit(file, ei->collect_count_initial);
6687 putFile16BitBE(file, ei->push_delay_fixed);
6688 putFile16BitBE(file, ei->push_delay_random);
6689 putFile16BitBE(file, ei->move_delay_fixed);
6690 putFile16BitBE(file, ei->move_delay_random);
6692 putFile16BitBE(file, ei->move_pattern);
6693 putFile8Bit(file, ei->move_direction_initial);
6694 putFile8Bit(file, ei->move_stepsize);
6696 for (y = 0; y < 3; y++)
6697 for (x = 0; x < 3; x++)
6698 putFile16BitBE(file, ei->content.e[x][y]);
6700 putFile32BitBE(file, ei->change->events);
6702 putFile16BitBE(file, ei->change->target_element);
6704 putFile16BitBE(file, ei->change->delay_fixed);
6705 putFile16BitBE(file, ei->change->delay_random);
6706 putFile16BitBE(file, ei->change->delay_frames);
6708 putFile16BitBE(file, ei->change->initial_trigger_element);
6710 putFile8Bit(file, ei->change->explode);
6711 putFile8Bit(file, ei->change->use_target_content);
6712 putFile8Bit(file, ei->change->only_if_complete);
6713 putFile8Bit(file, ei->change->use_random_replace);
6715 putFile8Bit(file, ei->change->random_percentage);
6716 putFile8Bit(file, ei->change->replace_when);
6718 for (y = 0; y < 3; y++)
6719 for (x = 0; x < 3; x++)
6720 putFile16BitBE(file, ei->change->content.e[x][y]);
6722 putFile8Bit(file, ei->slippery_type);
6724 /* some free bytes for future properties and padding */
6725 WriteUnusedBytesToFile(file, LEVEL_CPART_CUS3_UNUSED);
6732 if (check != num_changed_custom_elements) /* should not happen */
6733 Error(ERR_WARN, "inconsistent number of custom element properties");
6737 #if ENABLE_HISTORIC_CHUNKS
6738 static void SaveLevel_CUS4(FILE *file, struct LevelInfo *level, int element)
6740 struct ElementInfo *ei = &element_info[element];
6743 /* ---------- custom element base property values (96 bytes) ------------- */
6745 putFile16BitBE(file, element);
6747 for (i = 0; i < MAX_ELEMENT_NAME_LEN; i++)
6748 putFile8Bit(file, ei->description[i]);
6750 putFile32BitBE(file, ei->properties[EP_BITFIELD_BASE_NR]);
6752 WriteUnusedBytesToFile(file, 4); /* reserved for more base properties */
6754 putFile8Bit(file, ei->num_change_pages);
6756 putFile16BitBE(file, ei->ce_value_fixed_initial);
6757 putFile16BitBE(file, ei->ce_value_random_initial);
6758 putFile8Bit(file, ei->use_last_ce_value);
6760 putFile8Bit(file, ei->use_gfx_element);
6761 putFile16BitBE(file, ei->gfx_element_initial);
6763 putFile8Bit(file, ei->collect_score_initial);
6764 putFile8Bit(file, ei->collect_count_initial);
6766 putFile8Bit(file, ei->drop_delay_fixed);
6767 putFile8Bit(file, ei->push_delay_fixed);
6768 putFile8Bit(file, ei->drop_delay_random);
6769 putFile8Bit(file, ei->push_delay_random);
6770 putFile16BitBE(file, ei->move_delay_fixed);
6771 putFile16BitBE(file, ei->move_delay_random);
6773 /* bits 0 - 15 of "move_pattern" ... */
6774 putFile16BitBE(file, ei->move_pattern & 0xffff);
6775 putFile8Bit(file, ei->move_direction_initial);
6776 putFile8Bit(file, ei->move_stepsize);
6778 putFile8Bit(file, ei->slippery_type);
6780 for (y = 0; y < 3; y++)
6781 for (x = 0; x < 3; x++)
6782 putFile16BitBE(file, ei->content.e[x][y]);
6784 putFile16BitBE(file, ei->move_enter_element);
6785 putFile16BitBE(file, ei->move_leave_element);
6786 putFile8Bit(file, ei->move_leave_type);
6788 /* ... bits 16 - 31 of "move_pattern" (not nice, but downward compatible) */
6789 putFile16BitBE(file, (ei->move_pattern >> 16) & 0xffff);
6791 putFile8Bit(file, ei->access_direction);
6793 putFile8Bit(file, ei->explosion_delay);
6794 putFile8Bit(file, ei->ignition_delay);
6795 putFile8Bit(file, ei->explosion_type);
6797 /* some free bytes for future custom property values and padding */
6798 WriteUnusedBytesToFile(file, 1);
6800 /* ---------- change page property values (48 bytes) --------------------- */
6802 for (i = 0; i < ei->num_change_pages; i++)
6804 struct ElementChangeInfo *change = &ei->change_page[i];
6805 unsigned int event_bits;
6807 /* bits 0 - 31 of "has_event[]" ... */
6809 for (j = 0; j < MIN(NUM_CHANGE_EVENTS, 32); j++)
6810 if (change->has_event[j])
6811 event_bits |= (1 << j);
6812 putFile32BitBE(file, event_bits);
6814 putFile16BitBE(file, change->target_element);
6816 putFile16BitBE(file, change->delay_fixed);
6817 putFile16BitBE(file, change->delay_random);
6818 putFile16BitBE(file, change->delay_frames);
6820 putFile16BitBE(file, change->initial_trigger_element);
6822 putFile8Bit(file, change->explode);
6823 putFile8Bit(file, change->use_target_content);
6824 putFile8Bit(file, change->only_if_complete);
6825 putFile8Bit(file, change->use_random_replace);
6827 putFile8Bit(file, change->random_percentage);
6828 putFile8Bit(file, change->replace_when);
6830 for (y = 0; y < 3; y++)
6831 for (x = 0; x < 3; x++)
6832 putFile16BitBE(file, change->target_content.e[x][y]);
6834 putFile8Bit(file, change->can_change);
6836 putFile8Bit(file, change->trigger_side);
6838 putFile8Bit(file, change->trigger_player);
6839 putFile8Bit(file, (change->trigger_page == CH_PAGE_ANY ? CH_PAGE_ANY_FILE :
6840 log_2(change->trigger_page)));
6842 putFile8Bit(file, change->has_action);
6843 putFile8Bit(file, change->action_type);
6844 putFile8Bit(file, change->action_mode);
6845 putFile16BitBE(file, change->action_arg);
6847 /* ... bits 32 - 39 of "has_event[]" (not nice, but downward compatible) */
6849 for (j = 32; j < NUM_CHANGE_EVENTS; j++)
6850 if (change->has_event[j])
6851 event_bits |= (1 << (j - 32));
6852 putFile8Bit(file, event_bits);
6857 #if ENABLE_HISTORIC_CHUNKS
6858 static void SaveLevel_GRP1(FILE *file, struct LevelInfo *level, int element)
6860 struct ElementInfo *ei = &element_info[element];
6861 struct ElementGroupInfo *group = ei->group;
6864 putFile16BitBE(file, element);
6866 for (i = 0; i < MAX_ELEMENT_NAME_LEN; i++)
6867 putFile8Bit(file, ei->description[i]);
6869 putFile8Bit(file, group->num_elements);
6871 putFile8Bit(file, ei->use_gfx_element);
6872 putFile16BitBE(file, ei->gfx_element_initial);
6874 putFile8Bit(file, group->choice_mode);
6876 /* some free bytes for future values and padding */
6877 WriteUnusedBytesToFile(file, 3);
6879 for (i = 0; i < MAX_ELEMENTS_IN_GROUP; i++)
6880 putFile16BitBE(file, group->element[i]);
6884 static int SaveLevel_MicroChunk(FILE *file, struct LevelFileConfigInfo *entry,
6885 boolean write_element)
6887 int save_type = entry->save_type;
6888 int data_type = entry->data_type;
6889 int conf_type = entry->conf_type;
6890 int byte_mask = conf_type & CONF_MASK_BYTES;
6891 int element = entry->element;
6892 int default_value = entry->default_value;
6894 boolean modified = FALSE;
6896 if (byte_mask != CONF_MASK_MULTI_BYTES)
6898 void *value_ptr = entry->value;
6899 int value = (data_type == TYPE_BOOLEAN ? *(boolean *)value_ptr :
6902 /* check if any settings have been modified before saving them */
6903 if (value != default_value)
6906 /* do not save if explicitly told or if unmodified default settings */
6907 if ((save_type == SAVE_CONF_NEVER) ||
6908 (save_type == SAVE_CONF_WHEN_CHANGED && !modified))
6912 num_bytes += putFile16BitBE(file, element);
6914 num_bytes += putFile8Bit(file, conf_type);
6915 num_bytes += (byte_mask == CONF_MASK_1_BYTE ? putFile8Bit (file, value) :
6916 byte_mask == CONF_MASK_2_BYTE ? putFile16BitBE(file, value) :
6917 byte_mask == CONF_MASK_4_BYTE ? putFile32BitBE(file, value) :
6920 else if (data_type == TYPE_STRING)
6922 char *default_string = entry->default_string;
6923 char *string = (char *)(entry->value);
6924 int string_length = strlen(string);
6927 /* check if any settings have been modified before saving them */
6928 if (!strEqual(string, default_string))
6931 /* do not save if explicitly told or if unmodified default settings */
6932 if ((save_type == SAVE_CONF_NEVER) ||
6933 (save_type == SAVE_CONF_WHEN_CHANGED && !modified))
6937 num_bytes += putFile16BitBE(file, element);
6939 num_bytes += putFile8Bit(file, conf_type);
6940 num_bytes += putFile16BitBE(file, string_length);
6942 for (i = 0; i < string_length; i++)
6943 num_bytes += putFile8Bit(file, string[i]);
6945 else if (data_type == TYPE_ELEMENT_LIST)
6947 int *element_array = (int *)(entry->value);
6948 int num_elements = *(int *)(entry->num_entities);
6951 /* check if any settings have been modified before saving them */
6952 for (i = 0; i < num_elements; i++)
6953 if (element_array[i] != default_value)
6956 /* do not save if explicitly told or if unmodified default settings */
6957 if ((save_type == SAVE_CONF_NEVER) ||
6958 (save_type == SAVE_CONF_WHEN_CHANGED && !modified))
6962 num_bytes += putFile16BitBE(file, element);
6964 num_bytes += putFile8Bit(file, conf_type);
6965 num_bytes += putFile16BitBE(file, num_elements * CONF_ELEMENT_NUM_BYTES);
6967 for (i = 0; i < num_elements; i++)
6968 num_bytes += putFile16BitBE(file, element_array[i]);
6970 else if (data_type == TYPE_CONTENT_LIST)
6972 struct Content *content = (struct Content *)(entry->value);
6973 int num_contents = *(int *)(entry->num_entities);
6976 /* check if any settings have been modified before saving them */
6977 for (i = 0; i < num_contents; i++)
6978 for (y = 0; y < 3; y++)
6979 for (x = 0; x < 3; x++)
6980 if (content[i].e[x][y] != default_value)
6983 /* do not save if explicitly told or if unmodified default settings */
6984 if ((save_type == SAVE_CONF_NEVER) ||
6985 (save_type == SAVE_CONF_WHEN_CHANGED && !modified))
6989 num_bytes += putFile16BitBE(file, element);
6991 num_bytes += putFile8Bit(file, conf_type);
6992 num_bytes += putFile16BitBE(file, num_contents * CONF_CONTENT_NUM_BYTES);
6994 for (i = 0; i < num_contents; i++)
6995 for (y = 0; y < 3; y++)
6996 for (x = 0; x < 3; x++)
6997 num_bytes += putFile16BitBE(file, content[i].e[x][y]);
7003 static int SaveLevel_INFO(FILE *file, struct LevelInfo *level)
7008 li = *level; /* copy level data into temporary buffer */
7010 for (i = 0; chunk_config_INFO[i].data_type != -1; i++)
7011 chunk_size += SaveLevel_MicroChunk(file, &chunk_config_INFO[i], FALSE);
7016 static int SaveLevel_ELEM(FILE *file, struct LevelInfo *level)
7021 li = *level; /* copy level data into temporary buffer */
7023 for (i = 0; chunk_config_ELEM[i].data_type != -1; i++)
7024 chunk_size += SaveLevel_MicroChunk(file, &chunk_config_ELEM[i], TRUE);
7029 static int SaveLevel_NOTE(FILE *file, struct LevelInfo *level, int element)
7031 int envelope_nr = element - EL_ENVELOPE_1;
7035 chunk_size += putFile16BitBE(file, element);
7037 /* copy envelope data into temporary buffer */
7038 xx_envelope = level->envelope[envelope_nr];
7040 for (i = 0; chunk_config_NOTE[i].data_type != -1; i++)
7041 chunk_size += SaveLevel_MicroChunk(file, &chunk_config_NOTE[i], FALSE);
7046 static int SaveLevel_CUSX(FILE *file, struct LevelInfo *level, int element)
7048 struct ElementInfo *ei = &element_info[element];
7052 chunk_size += putFile16BitBE(file, element);
7054 xx_ei = *ei; /* copy element data into temporary buffer */
7056 /* set default description string for this specific element */
7057 strcpy(xx_default_description, getDefaultElementDescription(ei));
7059 for (i = 0; chunk_config_CUSX_base[i].data_type != -1; i++)
7060 chunk_size += SaveLevel_MicroChunk(file, &chunk_config_CUSX_base[i], FALSE);
7062 for (i = 0; i < ei->num_change_pages; i++)
7064 struct ElementChangeInfo *change = &ei->change_page[i];
7066 xx_current_change_page = i;
7068 xx_change = *change; /* copy change data into temporary buffer */
7071 setEventBitsFromEventFlags(change);
7073 for (j = 0; chunk_config_CUSX_change[j].data_type != -1; j++)
7074 chunk_size += SaveLevel_MicroChunk(file, &chunk_config_CUSX_change[j],
7081 static int SaveLevel_GRPX(FILE *file, struct LevelInfo *level, int element)
7083 struct ElementInfo *ei = &element_info[element];
7084 struct ElementGroupInfo *group = ei->group;
7088 chunk_size += putFile16BitBE(file, element);
7090 xx_ei = *ei; /* copy element data into temporary buffer */
7091 xx_group = *group; /* copy group data into temporary buffer */
7093 /* set default description string for this specific element */
7094 strcpy(xx_default_description, getDefaultElementDescription(ei));
7096 for (i = 0; chunk_config_GRPX[i].data_type != -1; i++)
7097 chunk_size += SaveLevel_MicroChunk(file, &chunk_config_GRPX[i], FALSE);
7102 static void SaveLevelFromFilename(struct LevelInfo *level, char *filename,
7103 boolean save_as_template)
7109 if (!(file = fopen(filename, MODE_WRITE)))
7111 Error(ERR_WARN, "cannot save level file '%s'", filename);
7115 level->file_version = FILE_VERSION_ACTUAL;
7116 level->game_version = GAME_VERSION_ACTUAL;
7118 level->creation_date = getCurrentDate();
7120 putFileChunkBE(file, "RND1", CHUNK_SIZE_UNDEFINED);
7121 putFileChunkBE(file, "CAVE", CHUNK_SIZE_NONE);
7123 chunk_size = SaveLevel_VERS(NULL, level);
7124 putFileChunkBE(file, "VERS", chunk_size);
7125 SaveLevel_VERS(file, level);
7127 chunk_size = SaveLevel_DATE(NULL, level);
7128 putFileChunkBE(file, "DATE", chunk_size);
7129 SaveLevel_DATE(file, level);
7131 chunk_size = SaveLevel_NAME(NULL, level);
7132 putFileChunkBE(file, "NAME", chunk_size);
7133 SaveLevel_NAME(file, level);
7135 chunk_size = SaveLevel_AUTH(NULL, level);
7136 putFileChunkBE(file, "AUTH", chunk_size);
7137 SaveLevel_AUTH(file, level);
7139 chunk_size = SaveLevel_INFO(NULL, level);
7140 putFileChunkBE(file, "INFO", chunk_size);
7141 SaveLevel_INFO(file, level);
7143 chunk_size = SaveLevel_BODY(NULL, level);
7144 putFileChunkBE(file, "BODY", chunk_size);
7145 SaveLevel_BODY(file, level);
7147 chunk_size = SaveLevel_ELEM(NULL, level);
7148 if (chunk_size > LEVEL_CHUNK_ELEM_UNCHANGED) /* save if changed */
7150 putFileChunkBE(file, "ELEM", chunk_size);
7151 SaveLevel_ELEM(file, level);
7154 for (i = 0; i < NUM_ENVELOPES; i++)
7156 int element = EL_ENVELOPE_1 + i;
7158 chunk_size = SaveLevel_NOTE(NULL, level, element);
7159 if (chunk_size > LEVEL_CHUNK_NOTE_UNCHANGED) /* save if changed */
7161 putFileChunkBE(file, "NOTE", chunk_size);
7162 SaveLevel_NOTE(file, level, element);
7166 /* if not using template level, check for non-default custom/group elements */
7167 if (!level->use_custom_template || save_as_template)
7169 for (i = 0; i < NUM_CUSTOM_ELEMENTS; i++)
7171 int element = EL_CUSTOM_START + i;
7173 chunk_size = SaveLevel_CUSX(NULL, level, element);
7174 if (chunk_size > LEVEL_CHUNK_CUSX_UNCHANGED) /* save if changed */
7176 putFileChunkBE(file, "CUSX", chunk_size);
7177 SaveLevel_CUSX(file, level, element);
7181 for (i = 0; i < NUM_GROUP_ELEMENTS; i++)
7183 int element = EL_GROUP_START + i;
7185 chunk_size = SaveLevel_GRPX(NULL, level, element);
7186 if (chunk_size > LEVEL_CHUNK_GRPX_UNCHANGED) /* save if changed */
7188 putFileChunkBE(file, "GRPX", chunk_size);
7189 SaveLevel_GRPX(file, level, element);
7196 SetFilePermissions(filename, PERMS_PRIVATE);
7199 void SaveLevel(int nr)
7201 char *filename = getDefaultLevelFilename(nr);
7203 SaveLevelFromFilename(&level, filename, FALSE);
7206 void SaveLevelTemplate()
7208 char *filename = getLocalLevelTemplateFilename();
7210 SaveLevelFromFilename(&level, filename, TRUE);
7213 boolean SaveLevelChecked(int nr)
7215 char *filename = getDefaultLevelFilename(nr);
7216 boolean new_level = !fileExists(filename);
7217 boolean level_saved = FALSE;
7219 if (new_level || Request("Save this level and kill the old?", REQ_ASK))
7224 Request("Level saved!", REQ_CONFIRM);
7232 void DumpLevel(struct LevelInfo *level)
7234 if (level->no_level_file || level->no_valid_file)
7236 Error(ERR_WARN, "cannot dump -- no valid level file found");
7242 Print("Level xxx (file version %08d, game version %08d)\n",
7243 level->file_version, level->game_version);
7246 Print("Level author: '%s'\n", level->author);
7247 Print("Level title: '%s'\n", level->name);
7249 Print("Playfield size: %d x %d\n", level->fieldx, level->fieldy);
7251 Print("Level time: %d seconds\n", level->time);
7252 Print("Gems needed: %d\n", level->gems_needed);
7254 Print("Time for magic wall: %d seconds\n", level->time_magic_wall);
7255 Print("Time for wheel: %d seconds\n", level->time_wheel);
7256 Print("Time for light: %d seconds\n", level->time_light);
7257 Print("Time for timegate: %d seconds\n", level->time_timegate);
7259 Print("Amoeba speed: %d\n", level->amoeba_speed);
7262 Print("EM style slippery gems: %s\n", (level->em_slippery_gems ? "yes" : "no"));
7263 Print("Player blocks last field: %s\n", (level->block_last_field ? "yes" : "no"));
7264 Print("SP player blocks last field: %s\n", (level->sp_block_last_field ? "yes" : "no"));
7265 Print("use spring bug: %s\n", (level->use_spring_bug ? "yes" : "no"));
7266 Print("use step counter: %s\n", (level->use_step_counter ? "yes" : "no"));
7272 /* ========================================================================= */
7273 /* tape file functions */
7274 /* ========================================================================= */
7276 static void setTapeInfoToDefaults()
7280 /* always start with reliable default values (empty tape) */
7283 /* default values (also for pre-1.2 tapes) with only the first player */
7284 tape.player_participates[0] = TRUE;
7285 for (i = 1; i < MAX_PLAYERS; i++)
7286 tape.player_participates[i] = FALSE;
7288 /* at least one (default: the first) player participates in every tape */
7289 tape.num_participating_players = 1;
7291 tape.level_nr = level_nr;
7293 tape.changed = FALSE;
7295 tape.recording = FALSE;
7296 tape.playing = FALSE;
7297 tape.pausing = FALSE;
7299 tape.no_valid_file = FALSE;
7302 static int LoadTape_VERS(File *file, int chunk_size, struct TapeInfo *tape)
7304 tape->file_version = getFileVersion(file);
7305 tape->game_version = getFileVersion(file);
7310 static int LoadTape_HEAD(File *file, int chunk_size, struct TapeInfo *tape)
7314 tape->random_seed = getFile32BitBE(file);
7315 tape->date = getFile32BitBE(file);
7316 tape->length = getFile32BitBE(file);
7318 /* read header fields that are new since version 1.2 */
7319 if (tape->file_version >= FILE_VERSION_1_2)
7321 byte store_participating_players = getFile8Bit(file);
7324 /* since version 1.2, tapes store which players participate in the tape */
7325 tape->num_participating_players = 0;
7326 for (i = 0; i < MAX_PLAYERS; i++)
7328 tape->player_participates[i] = FALSE;
7330 if (store_participating_players & (1 << i))
7332 tape->player_participates[i] = TRUE;
7333 tape->num_participating_players++;
7337 ReadUnusedBytesFromFile(file, TAPE_CHUNK_HEAD_UNUSED);
7339 engine_version = getFileVersion(file);
7340 if (engine_version > 0)
7341 tape->engine_version = engine_version;
7343 tape->engine_version = tape->game_version;
7349 static int LoadTape_INFO(File *file, int chunk_size, struct TapeInfo *tape)
7351 int level_identifier_size;
7354 level_identifier_size = getFile16BitBE(file);
7356 tape->level_identifier =
7357 checked_realloc(tape->level_identifier, level_identifier_size);
7359 for (i = 0; i < level_identifier_size; i++)
7360 tape->level_identifier[i] = getFile8Bit(file);
7362 tape->level_nr = getFile16BitBE(file);
7364 chunk_size = 2 + level_identifier_size + 2;
7369 static int LoadTape_BODY(File *file, int chunk_size, struct TapeInfo *tape)
7372 int chunk_size_expected =
7373 (tape->num_participating_players + 1) * tape->length;
7375 if (chunk_size_expected != chunk_size)
7377 ReadUnusedBytesFromFile(file, chunk_size);
7378 return chunk_size_expected;
7381 for (i = 0; i < tape->length; i++)
7383 if (i >= MAX_TAPE_LEN)
7385 Error(ERR_WARN, "tape truncated -- size exceeds maximum tape size %d",
7388 // tape too large; read and ignore remaining tape data from this chunk
7389 for (;i < tape->length; i++)
7390 ReadUnusedBytesFromFile(file, tape->num_participating_players + 1);
7395 for (j = 0; j < MAX_PLAYERS; j++)
7397 tape->pos[i].action[j] = MV_NONE;
7399 if (tape->player_participates[j])
7400 tape->pos[i].action[j] = getFile8Bit(file);
7403 tape->pos[i].delay = getFile8Bit(file);
7405 if (tape->file_version == FILE_VERSION_1_0)
7407 /* eliminate possible diagonal moves in old tapes */
7408 /* this is only for backward compatibility */
7410 byte joy_dir[4] = { JOY_LEFT, JOY_RIGHT, JOY_UP, JOY_DOWN };
7411 byte action = tape->pos[i].action[0];
7412 int k, num_moves = 0;
7414 for (k = 0; k<4; k++)
7416 if (action & joy_dir[k])
7418 tape->pos[i + num_moves].action[0] = joy_dir[k];
7420 tape->pos[i + num_moves].delay = 0;
7429 tape->length += num_moves;
7432 else if (tape->file_version < FILE_VERSION_2_0)
7434 /* convert pre-2.0 tapes to new tape format */
7436 if (tape->pos[i].delay > 1)
7439 tape->pos[i + 1] = tape->pos[i];
7440 tape->pos[i + 1].delay = 1;
7443 for (j = 0; j < MAX_PLAYERS; j++)
7444 tape->pos[i].action[j] = MV_NONE;
7445 tape->pos[i].delay--;
7452 if (checkEndOfFile(file))
7456 if (i != tape->length)
7457 chunk_size = (tape->num_participating_players + 1) * i;
7462 void LoadTape_SokobanSolution(char *filename)
7465 int move_delay = TILESIZE / level.initial_player_stepsize[0];
7467 if (!(file = openFile(filename, MODE_READ)))
7469 tape.no_valid_file = TRUE;
7474 while (!checkEndOfFile(file))
7476 unsigned char c = getByteFromFile(file);
7478 if (checkEndOfFile(file))
7485 tape.pos[tape.length].action[0] = MV_UP;
7486 tape.pos[tape.length].delay = move_delay + (c < 'a' ? 2 : 0);
7492 tape.pos[tape.length].action[0] = MV_DOWN;
7493 tape.pos[tape.length].delay = move_delay + (c < 'a' ? 2 : 0);
7499 tape.pos[tape.length].action[0] = MV_LEFT;
7500 tape.pos[tape.length].delay = move_delay + (c < 'a' ? 2 : 0);
7506 tape.pos[tape.length].action[0] = MV_RIGHT;
7507 tape.pos[tape.length].delay = move_delay + (c < 'a' ? 2 : 0);
7515 /* ignore white-space characters */
7519 tape.no_valid_file = TRUE;
7521 Error(ERR_WARN, "unsupported Sokoban solution file '%s' ['%d']", filename, c);
7529 if (tape.no_valid_file)
7532 tape.length_frames = GetTapeLengthFrames();
7533 tape.length_seconds = GetTapeLengthSeconds();
7536 void LoadTapeFromFilename(char *filename)
7538 char cookie[MAX_LINE_LEN];
7539 char chunk_name[CHUNK_ID_LEN + 1];
7543 /* always start with reliable default values */
7544 setTapeInfoToDefaults();
7546 if (strSuffix(filename, ".sln"))
7548 LoadTape_SokobanSolution(filename);
7553 if (!(file = openFile(filename, MODE_READ)))
7555 tape.no_valid_file = TRUE;
7560 getFileChunkBE(file, chunk_name, NULL);
7561 if (strEqual(chunk_name, "RND1"))
7563 getFile32BitBE(file); /* not used */
7565 getFileChunkBE(file, chunk_name, NULL);
7566 if (!strEqual(chunk_name, "TAPE"))
7568 tape.no_valid_file = TRUE;
7570 Error(ERR_WARN, "unknown format of tape file '%s'", filename);
7577 else /* check for pre-2.0 file format with cookie string */
7579 strcpy(cookie, chunk_name);
7580 if (getStringFromFile(file, &cookie[4], MAX_LINE_LEN - 4) == NULL)
7582 if (strlen(cookie) > 0 && cookie[strlen(cookie) - 1] == '\n')
7583 cookie[strlen(cookie) - 1] = '\0';
7585 if (!checkCookieString(cookie, TAPE_COOKIE_TMPL))
7587 tape.no_valid_file = TRUE;
7589 Error(ERR_WARN, "unknown format of tape file '%s'", filename);
7596 if ((tape.file_version = getFileVersionFromCookieString(cookie)) == -1)
7598 tape.no_valid_file = TRUE;
7600 Error(ERR_WARN, "unsupported version of tape file '%s'", filename);
7607 /* pre-2.0 tape files have no game version, so use file version here */
7608 tape.game_version = tape.file_version;
7611 if (tape.file_version < FILE_VERSION_1_2)
7613 /* tape files from versions before 1.2.0 without chunk structure */
7614 LoadTape_HEAD(file, TAPE_CHUNK_HEAD_SIZE, &tape);
7615 LoadTape_BODY(file, 2 * tape.length, &tape);
7623 int (*loader)(File *, int, struct TapeInfo *);
7627 { "VERS", TAPE_CHUNK_VERS_SIZE, LoadTape_VERS },
7628 { "HEAD", TAPE_CHUNK_HEAD_SIZE, LoadTape_HEAD },
7629 { "INFO", -1, LoadTape_INFO },
7630 { "BODY", -1, LoadTape_BODY },
7634 while (getFileChunkBE(file, chunk_name, &chunk_size))
7638 while (chunk_info[i].name != NULL &&
7639 !strEqual(chunk_name, chunk_info[i].name))
7642 if (chunk_info[i].name == NULL)
7644 Error(ERR_WARN, "unknown chunk '%s' in tape file '%s'",
7645 chunk_name, filename);
7646 ReadUnusedBytesFromFile(file, chunk_size);
7648 else if (chunk_info[i].size != -1 &&
7649 chunk_info[i].size != chunk_size)
7651 Error(ERR_WARN, "wrong size (%d) of chunk '%s' in tape file '%s'",
7652 chunk_size, chunk_name, filename);
7653 ReadUnusedBytesFromFile(file, chunk_size);
7657 /* call function to load this tape chunk */
7658 int chunk_size_expected =
7659 (chunk_info[i].loader)(file, chunk_size, &tape);
7661 /* the size of some chunks cannot be checked before reading other
7662 chunks first (like "HEAD" and "BODY") that contain some header
7663 information, so check them here */
7664 if (chunk_size_expected != chunk_size)
7666 Error(ERR_WARN, "wrong size (%d) of chunk '%s' in tape file '%s'",
7667 chunk_size, chunk_name, filename);
7675 tape.length_frames = GetTapeLengthFrames();
7676 tape.length_seconds = GetTapeLengthSeconds();
7679 printf("::: tape file version: %d\n", tape.file_version);
7680 printf("::: tape game version: %d\n", tape.game_version);
7681 printf("::: tape engine version: %d\n", tape.engine_version);
7685 void LoadTape(int nr)
7687 char *filename = getTapeFilename(nr);
7689 LoadTapeFromFilename(filename);
7692 void LoadSolutionTape(int nr)
7694 char *filename = getSolutionTapeFilename(nr);
7696 LoadTapeFromFilename(filename);
7698 if (TAPE_IS_EMPTY(tape) &&
7699 level.game_engine_type == GAME_ENGINE_TYPE_SP &&
7700 level.native_sp_level->demo.is_available)
7701 CopyNativeTape_SP_to_RND(&level);
7704 static void SaveTape_VERS(FILE *file, struct TapeInfo *tape)
7706 putFileVersion(file, tape->file_version);
7707 putFileVersion(file, tape->game_version);
7710 static void SaveTape_HEAD(FILE *file, struct TapeInfo *tape)
7713 byte store_participating_players = 0;
7715 /* set bits for participating players for compact storage */
7716 for (i = 0; i < MAX_PLAYERS; i++)
7717 if (tape->player_participates[i])
7718 store_participating_players |= (1 << i);
7720 putFile32BitBE(file, tape->random_seed);
7721 putFile32BitBE(file, tape->date);
7722 putFile32BitBE(file, tape->length);
7724 putFile8Bit(file, store_participating_players);
7726 /* unused bytes not at the end here for 4-byte alignment of engine_version */
7727 WriteUnusedBytesToFile(file, TAPE_CHUNK_HEAD_UNUSED);
7729 putFileVersion(file, tape->engine_version);
7732 static void SaveTape_INFO(FILE *file, struct TapeInfo *tape)
7734 int level_identifier_size = strlen(tape->level_identifier) + 1;
7737 putFile16BitBE(file, level_identifier_size);
7739 for (i = 0; i < level_identifier_size; i++)
7740 putFile8Bit(file, tape->level_identifier[i]);
7742 putFile16BitBE(file, tape->level_nr);
7745 static void SaveTape_BODY(FILE *file, struct TapeInfo *tape)
7749 for (i = 0; i < tape->length; i++)
7751 for (j = 0; j < MAX_PLAYERS; j++)
7752 if (tape->player_participates[j])
7753 putFile8Bit(file, tape->pos[i].action[j]);
7755 putFile8Bit(file, tape->pos[i].delay);
7759 void SaveTape(int nr)
7761 char *filename = getTapeFilename(nr);
7763 int num_participating_players = 0;
7764 int info_chunk_size;
7765 int body_chunk_size;
7768 InitTapeDirectory(leveldir_current->subdir);
7770 if (!(file = fopen(filename, MODE_WRITE)))
7772 Error(ERR_WARN, "cannot save level recording file '%s'", filename);
7776 tape.file_version = FILE_VERSION_ACTUAL;
7777 tape.game_version = GAME_VERSION_ACTUAL;
7779 /* count number of participating players */
7780 for (i = 0; i < MAX_PLAYERS; i++)
7781 if (tape.player_participates[i])
7782 num_participating_players++;
7784 info_chunk_size = 2 + (strlen(tape.level_identifier) + 1) + 2;
7785 body_chunk_size = (num_participating_players + 1) * tape.length;
7787 putFileChunkBE(file, "RND1", CHUNK_SIZE_UNDEFINED);
7788 putFileChunkBE(file, "TAPE", CHUNK_SIZE_NONE);
7790 putFileChunkBE(file, "VERS", TAPE_CHUNK_VERS_SIZE);
7791 SaveTape_VERS(file, &tape);
7793 putFileChunkBE(file, "HEAD", TAPE_CHUNK_HEAD_SIZE);
7794 SaveTape_HEAD(file, &tape);
7796 putFileChunkBE(file, "INFO", info_chunk_size);
7797 SaveTape_INFO(file, &tape);
7799 putFileChunkBE(file, "BODY", body_chunk_size);
7800 SaveTape_BODY(file, &tape);
7804 SetFilePermissions(filename, PERMS_PRIVATE);
7806 tape.changed = FALSE;
7809 boolean SaveTapeChecked(int nr)
7811 char *filename = getTapeFilename(nr);
7812 boolean new_tape = !fileExists(filename);
7813 boolean tape_saved = FALSE;
7815 if (new_tape || Request("Replace old tape?", REQ_ASK))
7820 Request("Tape saved!", REQ_CONFIRM);
7828 void DumpTape(struct TapeInfo *tape)
7830 int tape_frame_counter;
7833 if (tape->no_valid_file)
7835 Error(ERR_WARN, "cannot dump -- no valid tape file found");
7841 Print("Tape of Level %03d (file version %08d, game version %08d)\n",
7842 tape->level_nr, tape->file_version, tape->game_version);
7843 Print(" (effective engine version %08d)\n",
7844 tape->engine_version);
7845 Print("Level series identifier: '%s'\n", tape->level_identifier);
7848 tape_frame_counter = 0;
7850 for (i = 0; i < tape->length; i++)
7852 if (i >= MAX_TAPE_LEN)
7857 for (j = 0; j < MAX_PLAYERS; j++)
7859 if (tape->player_participates[j])
7861 int action = tape->pos[i].action[j];
7863 Print("%d:%02x ", j, action);
7864 Print("[%c%c%c%c|%c%c] - ",
7865 (action & JOY_LEFT ? '<' : ' '),
7866 (action & JOY_RIGHT ? '>' : ' '),
7867 (action & JOY_UP ? '^' : ' '),
7868 (action & JOY_DOWN ? 'v' : ' '),
7869 (action & JOY_BUTTON_1 ? '1' : ' '),
7870 (action & JOY_BUTTON_2 ? '2' : ' '));
7874 Print("(%03d) ", tape->pos[i].delay);
7875 Print("[%05d]\n", tape_frame_counter);
7877 tape_frame_counter += tape->pos[i].delay;
7884 /* ========================================================================= */
7885 /* score file functions */
7886 /* ========================================================================= */
7888 void LoadScore(int nr)
7891 char *filename = getScoreFilename(nr);
7892 char cookie[MAX_LINE_LEN];
7893 char line[MAX_LINE_LEN];
7897 /* always start with reliable default values */
7898 for (i = 0; i < MAX_SCORE_ENTRIES; i++)
7900 strcpy(highscore[i].Name, EMPTY_PLAYER_NAME);
7901 highscore[i].Score = 0;
7904 if (!(file = fopen(filename, MODE_READ)))
7907 /* check file identifier */
7908 if (fgets(cookie, MAX_LINE_LEN, file) == NULL)
7910 if (strlen(cookie) > 0 && cookie[strlen(cookie) - 1] == '\n')
7911 cookie[strlen(cookie) - 1] = '\0';
7913 if (!checkCookieString(cookie, SCORE_COOKIE))
7915 Error(ERR_WARN, "unknown format of score file '%s'", filename);
7920 for (i = 0; i < MAX_SCORE_ENTRIES; i++)
7922 if (fscanf(file, "%d", &highscore[i].Score) == EOF)
7923 Error(ERR_WARN, "fscanf() failed; %s", strerror(errno));
7924 if (fgets(line, MAX_LINE_LEN, file) == NULL)
7927 if (strlen(line) > 0 && line[strlen(line) - 1] == '\n')
7928 line[strlen(line) - 1] = '\0';
7930 for (line_ptr = line; *line_ptr; line_ptr++)
7932 if (*line_ptr != ' ' && *line_ptr != '\t' && *line_ptr != '\0')
7934 strncpy(highscore[i].Name, line_ptr, MAX_PLAYER_NAME_LEN);
7935 highscore[i].Name[MAX_PLAYER_NAME_LEN] = '\0';
7944 void SaveScore(int nr)
7947 int permissions = (program.global_scores ? PERMS_PUBLIC : PERMS_PRIVATE);
7948 char *filename = getScoreFilename(nr);
7951 InitScoreDirectory(leveldir_current->subdir);
7953 if (!(file = fopen(filename, MODE_WRITE)))
7955 Error(ERR_WARN, "cannot save score for level %d", nr);
7959 fprintf(file, "%s\n\n", SCORE_COOKIE);
7961 for (i = 0; i < MAX_SCORE_ENTRIES; i++)
7962 fprintf(file, "%d %s\n", highscore[i].Score, highscore[i].Name);
7966 SetFilePermissions(filename, permissions);
7970 /* ========================================================================= */
7971 /* setup file functions */
7972 /* ========================================================================= */
7974 #define TOKEN_STR_PLAYER_PREFIX "player_"
7977 #define SETUP_TOKEN_PLAYER_NAME 0
7978 #define SETUP_TOKEN_SOUND 1
7979 #define SETUP_TOKEN_SOUND_LOOPS 2
7980 #define SETUP_TOKEN_SOUND_MUSIC 3
7981 #define SETUP_TOKEN_SOUND_SIMPLE 4
7982 #define SETUP_TOKEN_TOONS 5
7983 #define SETUP_TOKEN_SCROLL_DELAY 6
7984 #define SETUP_TOKEN_SCROLL_DELAY_VALUE 7
7985 #define SETUP_TOKEN_ENGINE_SNAPSHOT_MODE 8
7986 #define SETUP_TOKEN_ENGINE_SNAPSHOT_MEMORY 9
7987 #define SETUP_TOKEN_FADE_SCREENS 10
7988 #define SETUP_TOKEN_AUTORECORD 11
7989 #define SETUP_TOKEN_SHOW_TITLESCREEN 12
7990 #define SETUP_TOKEN_QUICK_DOORS 13
7991 #define SETUP_TOKEN_TEAM_MODE 14
7992 #define SETUP_TOKEN_HANDICAP 15
7993 #define SETUP_TOKEN_SKIP_LEVELS 16
7994 #define SETUP_TOKEN_INCREMENT_LEVELS 17
7995 #define SETUP_TOKEN_TIME_LIMIT 18
7996 #define SETUP_TOKEN_FULLSCREEN 19
7997 #define SETUP_TOKEN_WINDOW_SCALING_PERCENT 20
7998 #define SETUP_TOKEN_WINDOW_SCALING_QUALITY 21
7999 #define SETUP_TOKEN_SCREEN_RENDERING_MODE 22
8000 #define SETUP_TOKEN_ASK_ON_ESCAPE 23
8001 #define SETUP_TOKEN_ASK_ON_ESCAPE_EDITOR 24
8002 #define SETUP_TOKEN_QUICK_SWITCH 25
8003 #define SETUP_TOKEN_INPUT_ON_FOCUS 26
8004 #define SETUP_TOKEN_PREFER_AGA_GRAPHICS 27
8005 #define SETUP_TOKEN_GAME_FRAME_DELAY 28
8006 #define SETUP_TOKEN_SP_SHOW_BORDER_ELEMENTS 29
8007 #define SETUP_TOKEN_SMALL_GAME_GRAPHICS 30
8008 #define SETUP_TOKEN_SHOW_SNAPSHOT_BUTTONS 31
8009 #define SETUP_TOKEN_GRAPHICS_SET 32
8010 #define SETUP_TOKEN_SOUNDS_SET 33
8011 #define SETUP_TOKEN_MUSIC_SET 34
8012 #define SETUP_TOKEN_OVERRIDE_LEVEL_GRAPHICS 35
8013 #define SETUP_TOKEN_OVERRIDE_LEVEL_SOUNDS 36
8014 #define SETUP_TOKEN_OVERRIDE_LEVEL_MUSIC 37
8015 #define SETUP_TOKEN_VOLUME_SIMPLE 38
8016 #define SETUP_TOKEN_VOLUME_LOOPS 39
8017 #define SETUP_TOKEN_VOLUME_MUSIC 40
8018 #define SETUP_TOKEN_TOUCH_CONTROL_TYPE 41
8019 #define SETUP_TOKEN_TOUCH_MOVE_DISTANCE 42
8020 #define SETUP_TOKEN_TOUCH_DROP_DISTANCE 43
8022 #define NUM_GLOBAL_SETUP_TOKENS 44
8025 #define SETUP_TOKEN_EDITOR_EL_CLASSIC 0
8026 #define SETUP_TOKEN_EDITOR_EL_CUSTOM 1
8027 #define SETUP_TOKEN_EDITOR_EL_USER_DEFINED 2
8028 #define SETUP_TOKEN_EDITOR_EL_DYNAMIC 3
8029 #define SETUP_TOKEN_EDITOR_EL_HEADLINES 4
8030 #define SETUP_TOKEN_EDITOR_SHOW_ELEMENT_TOKEN 5
8032 #define NUM_EDITOR_SETUP_TOKENS 6
8034 /* editor cascade setup */
8035 #define SETUP_TOKEN_EDITOR_CASCADE_BD 0
8036 #define SETUP_TOKEN_EDITOR_CASCADE_EM 1
8037 #define SETUP_TOKEN_EDITOR_CASCADE_EMC 2
8038 #define SETUP_TOKEN_EDITOR_CASCADE_RND 3
8039 #define SETUP_TOKEN_EDITOR_CASCADE_SB 4
8040 #define SETUP_TOKEN_EDITOR_CASCADE_SP 5
8041 #define SETUP_TOKEN_EDITOR_CASCADE_DC 6
8042 #define SETUP_TOKEN_EDITOR_CASCADE_DX 7
8043 #define SETUP_TOKEN_EDITOR_CASCADE_TEXT 8
8044 #define SETUP_TOKEN_EDITOR_CASCADE_STEELTEXT 9
8045 #define SETUP_TOKEN_EDITOR_CASCADE_CE 10
8046 #define SETUP_TOKEN_EDITOR_CASCADE_GE 11
8047 #define SETUP_TOKEN_EDITOR_CASCADE_REF 12
8048 #define SETUP_TOKEN_EDITOR_CASCADE_USER 13
8049 #define SETUP_TOKEN_EDITOR_CASCADE_DYNAMIC 14
8051 #define NUM_EDITOR_CASCADE_SETUP_TOKENS 15
8053 /* shortcut setup */
8054 #define SETUP_TOKEN_SHORTCUT_SAVE_GAME 0
8055 #define SETUP_TOKEN_SHORTCUT_LOAD_GAME 1
8056 #define SETUP_TOKEN_SHORTCUT_TOGGLE_PAUSE 2
8057 #define SETUP_TOKEN_SHORTCUT_FOCUS_PLAYER_1 3
8058 #define SETUP_TOKEN_SHORTCUT_FOCUS_PLAYER_2 4
8059 #define SETUP_TOKEN_SHORTCUT_FOCUS_PLAYER_3 5
8060 #define SETUP_TOKEN_SHORTCUT_FOCUS_PLAYER_4 6
8061 #define SETUP_TOKEN_SHORTCUT_FOCUS_PLAYER_ALL 7
8062 #define SETUP_TOKEN_SHORTCUT_TAPE_EJECT 8
8063 #define SETUP_TOKEN_SHORTCUT_TAPE_EXTRA 9
8064 #define SETUP_TOKEN_SHORTCUT_TAPE_STOP 10
8065 #define SETUP_TOKEN_SHORTCUT_TAPE_PAUSE 11
8066 #define SETUP_TOKEN_SHORTCUT_TAPE_RECORD 12
8067 #define SETUP_TOKEN_SHORTCUT_TAPE_PLAY 13
8068 #define SETUP_TOKEN_SHORTCUT_SOUND_SIMPLE 14
8069 #define SETUP_TOKEN_SHORTCUT_SOUND_LOOPS 15
8070 #define SETUP_TOKEN_SHORTCUT_SOUND_MUSIC 16
8071 #define SETUP_TOKEN_SHORTCUT_SNAP_LEFT 17
8072 #define SETUP_TOKEN_SHORTCUT_SNAP_RIGHT 18
8073 #define SETUP_TOKEN_SHORTCUT_SNAP_UP 19
8074 #define SETUP_TOKEN_SHORTCUT_SNAP_DOWN 20
8076 #define NUM_SHORTCUT_SETUP_TOKENS 21
8079 #define SETUP_TOKEN_PLAYER_USE_JOYSTICK 0
8080 #define SETUP_TOKEN_PLAYER_JOY_DEVICE_NAME 1
8081 #define SETUP_TOKEN_PLAYER_JOY_XLEFT 2
8082 #define SETUP_TOKEN_PLAYER_JOY_XMIDDLE 3
8083 #define SETUP_TOKEN_PLAYER_JOY_XRIGHT 4
8084 #define SETUP_TOKEN_PLAYER_JOY_YUPPER 5
8085 #define SETUP_TOKEN_PLAYER_JOY_YMIDDLE 6
8086 #define SETUP_TOKEN_PLAYER_JOY_YLOWER 7
8087 #define SETUP_TOKEN_PLAYER_JOY_SNAP 8
8088 #define SETUP_TOKEN_PLAYER_JOY_DROP 9
8089 #define SETUP_TOKEN_PLAYER_KEY_LEFT 10
8090 #define SETUP_TOKEN_PLAYER_KEY_RIGHT 11
8091 #define SETUP_TOKEN_PLAYER_KEY_UP 12
8092 #define SETUP_TOKEN_PLAYER_KEY_DOWN 13
8093 #define SETUP_TOKEN_PLAYER_KEY_SNAP 14
8094 #define SETUP_TOKEN_PLAYER_KEY_DROP 15
8096 #define NUM_PLAYER_SETUP_TOKENS 16
8099 #define SETUP_TOKEN_SYSTEM_SDL_VIDEODRIVER 0
8100 #define SETUP_TOKEN_SYSTEM_SDL_AUDIODRIVER 1
8101 #define SETUP_TOKEN_SYSTEM_AUDIO_FRAGMENT_SIZE 2
8103 #define NUM_SYSTEM_SETUP_TOKENS 3
8105 /* internal setup */
8106 #define SETUP_TOKEN_INT_PROGRAM_TITLE 0
8107 #define SETUP_TOKEN_INT_PROGRAM_VERSION 1
8108 #define SETUP_TOKEN_INT_PROGRAM_AUTHOR 2
8109 #define SETUP_TOKEN_INT_PROGRAM_EMAIL 3
8110 #define SETUP_TOKEN_INT_PROGRAM_WEBSITE 4
8111 #define SETUP_TOKEN_INT_PROGRAM_COPYRIGHT 5
8112 #define SETUP_TOKEN_INT_PROGRAM_COMPANY 6
8113 #define SETUP_TOKEN_INT_PROGRAM_ICON_FILE 7
8114 #define SETUP_TOKEN_INT_DEFAULT_GRAPHICS_SET 8
8115 #define SETUP_TOKEN_INT_DEFAULT_SOUNDS_SET 9
8116 #define SETUP_TOKEN_INT_DEFAULT_MUSIC_SET 10
8117 #define SETUP_TOKEN_INT_FALLBACK_GRAPHICS_FILE 11
8118 #define SETUP_TOKEN_INT_FALLBACK_SOUNDS_FILE 12
8119 #define SETUP_TOKEN_INT_FALLBACK_MUSIC_FILE 13
8120 #define SETUP_TOKEN_INT_DEFAULT_LEVEL_SERIES 14
8121 #define SETUP_TOKEN_INT_CHOOSE_FROM_TOP_LEVELDIR 15
8122 #define SETUP_TOKEN_INT_SHOW_SCALING_IN_TITLE 16
8123 #define SETUP_TOKEN_INT_DEFAULT_WINDOW_WIDTH 17
8124 #define SETUP_TOKEN_INT_DEFAULT_WINDOW_HEIGHT 18
8126 #define NUM_INTERNAL_SETUP_TOKENS 19
8129 #define SETUP_TOKEN_DEBUG_FRAME_DELAY_0 0
8130 #define SETUP_TOKEN_DEBUG_FRAME_DELAY_1 1
8131 #define SETUP_TOKEN_DEBUG_FRAME_DELAY_2 2
8132 #define SETUP_TOKEN_DEBUG_FRAME_DELAY_3 3
8133 #define SETUP_TOKEN_DEBUG_FRAME_DELAY_4 4
8134 #define SETUP_TOKEN_DEBUG_FRAME_DELAY_5 5
8135 #define SETUP_TOKEN_DEBUG_FRAME_DELAY_6 6
8136 #define SETUP_TOKEN_DEBUG_FRAME_DELAY_7 7
8137 #define SETUP_TOKEN_DEBUG_FRAME_DELAY_8 8
8138 #define SETUP_TOKEN_DEBUG_FRAME_DELAY_9 9
8139 #define SETUP_TOKEN_DEBUG_FRAME_DELAY_KEY_0 10
8140 #define SETUP_TOKEN_DEBUG_FRAME_DELAY_KEY_1 11
8141 #define SETUP_TOKEN_DEBUG_FRAME_DELAY_KEY_2 12
8142 #define SETUP_TOKEN_DEBUG_FRAME_DELAY_KEY_3 13
8143 #define SETUP_TOKEN_DEBUG_FRAME_DELAY_KEY_4 14
8144 #define SETUP_TOKEN_DEBUG_FRAME_DELAY_KEY_5 15
8145 #define SETUP_TOKEN_DEBUG_FRAME_DELAY_KEY_6 16
8146 #define SETUP_TOKEN_DEBUG_FRAME_DELAY_KEY_7 17
8147 #define SETUP_TOKEN_DEBUG_FRAME_DELAY_KEY_8 18
8148 #define SETUP_TOKEN_DEBUG_FRAME_DELAY_KEY_9 19
8149 #define SETUP_TOKEN_DEBUG_FRAME_DELAY_USE_MOD_KEY 20
8150 #define SETUP_TOKEN_DEBUG_FRAME_DELAY_GAME_ONLY 21
8151 #define SETUP_TOKEN_DEBUG_SHOW_FRAMES_PER_SECOND 22
8153 #define NUM_DEBUG_SETUP_TOKENS 23
8156 #define SETUP_TOKEN_OPTIONS_VERBOSE 0
8158 #define NUM_OPTIONS_SETUP_TOKENS 1
8161 static struct SetupInfo si;
8162 static struct SetupEditorInfo sei;
8163 static struct SetupEditorCascadeInfo seci;
8164 static struct SetupShortcutInfo ssi;
8165 static struct SetupInputInfo sii;
8166 static struct SetupSystemInfo syi;
8167 static struct SetupInternalInfo sxi;
8168 static struct SetupDebugInfo sdi;
8169 static struct OptionInfo soi;
8171 static struct TokenInfo global_setup_tokens[] =
8173 { TYPE_STRING, &si.player_name, "player_name" },
8174 { TYPE_SWITCH, &si.sound, "sound" },
8175 { TYPE_SWITCH, &si.sound_loops, "repeating_sound_loops" },
8176 { TYPE_SWITCH, &si.sound_music, "background_music" },
8177 { TYPE_SWITCH, &si.sound_simple, "simple_sound_effects" },
8178 { TYPE_SWITCH, &si.toons, "toons" },
8179 { TYPE_SWITCH, &si.scroll_delay, "scroll_delay" },
8180 { TYPE_INTEGER,&si.scroll_delay_value, "scroll_delay_value" },
8181 { TYPE_STRING, &si.engine_snapshot_mode, "engine_snapshot_mode" },
8182 { TYPE_INTEGER,&si.engine_snapshot_memory, "engine_snapshot_memory" },
8183 { TYPE_SWITCH, &si.fade_screens, "fade_screens" },
8184 { TYPE_SWITCH, &si.autorecord, "automatic_tape_recording"},
8185 { TYPE_SWITCH, &si.show_titlescreen, "show_titlescreen" },
8186 { TYPE_SWITCH, &si.quick_doors, "quick_doors" },
8187 { TYPE_SWITCH, &si.team_mode, "team_mode" },
8188 { TYPE_SWITCH, &si.handicap, "handicap" },
8189 { TYPE_SWITCH, &si.skip_levels, "skip_levels" },
8190 { TYPE_SWITCH, &si.increment_levels, "increment_levels" },
8191 { TYPE_SWITCH, &si.time_limit, "time_limit" },
8192 { TYPE_SWITCH, &si.fullscreen, "fullscreen" },
8193 { TYPE_INTEGER,&si.window_scaling_percent, "window_scaling_percent" },
8194 { TYPE_STRING, &si.window_scaling_quality, "window_scaling_quality" },
8195 { TYPE_STRING, &si.screen_rendering_mode, "screen_rendering_mode" },
8196 { TYPE_SWITCH, &si.ask_on_escape, "ask_on_escape" },
8197 { TYPE_SWITCH, &si.ask_on_escape_editor, "ask_on_escape_editor" },
8198 { TYPE_SWITCH, &si.quick_switch, "quick_player_switch" },
8199 { TYPE_SWITCH, &si.input_on_focus, "input_on_focus" },
8200 { TYPE_SWITCH, &si.prefer_aga_graphics, "prefer_aga_graphics" },
8201 { TYPE_INTEGER,&si.game_frame_delay, "game_frame_delay" },
8202 { TYPE_SWITCH, &si.sp_show_border_elements, "sp_show_border_elements" },
8203 { TYPE_SWITCH, &si.small_game_graphics, "small_game_graphics" },
8204 { TYPE_SWITCH, &si.show_snapshot_buttons, "show_snapshot_buttons" },
8205 { TYPE_STRING, &si.graphics_set, "graphics_set" },
8206 { TYPE_STRING, &si.sounds_set, "sounds_set" },
8207 { TYPE_STRING, &si.music_set, "music_set" },
8208 { TYPE_SWITCH3,&si.override_level_graphics, "override_level_graphics" },
8209 { TYPE_SWITCH3,&si.override_level_sounds, "override_level_sounds" },
8210 { TYPE_SWITCH3,&si.override_level_music, "override_level_music" },
8211 { TYPE_INTEGER,&si.volume_simple, "volume_simple" },
8212 { TYPE_INTEGER,&si.volume_loops, "volume_loops" },
8213 { TYPE_INTEGER,&si.volume_music, "volume_music" },
8214 { TYPE_STRING, &si.touch.control_type, "touch.control_type" },
8215 { TYPE_INTEGER,&si.touch.move_distance, "touch.move_distance" },
8216 { TYPE_INTEGER,&si.touch.drop_distance, "touch.drop_distance" },
8219 static struct TokenInfo editor_setup_tokens[] =
8221 { TYPE_SWITCH, &sei.el_classic, "editor.el_classic" },
8222 { TYPE_SWITCH, &sei.el_custom, "editor.el_custom" },
8223 { TYPE_SWITCH, &sei.el_user_defined, "editor.el_user_defined" },
8224 { TYPE_SWITCH, &sei.el_dynamic, "editor.el_dynamic" },
8225 { TYPE_SWITCH, &sei.el_headlines, "editor.el_headlines" },
8226 { TYPE_SWITCH, &sei.show_element_token,"editor.show_element_token" },
8229 static struct TokenInfo editor_cascade_setup_tokens[] =
8231 { TYPE_SWITCH, &seci.el_bd, "editor.cascade.el_bd" },
8232 { TYPE_SWITCH, &seci.el_em, "editor.cascade.el_em" },
8233 { TYPE_SWITCH, &seci.el_emc, "editor.cascade.el_emc" },
8234 { TYPE_SWITCH, &seci.el_rnd, "editor.cascade.el_rnd" },
8235 { TYPE_SWITCH, &seci.el_sb, "editor.cascade.el_sb" },
8236 { TYPE_SWITCH, &seci.el_sp, "editor.cascade.el_sp" },
8237 { TYPE_SWITCH, &seci.el_dc, "editor.cascade.el_dc" },
8238 { TYPE_SWITCH, &seci.el_dx, "editor.cascade.el_dx" },
8239 { TYPE_SWITCH, &seci.el_chars, "editor.cascade.el_chars" },
8240 { TYPE_SWITCH, &seci.el_steel_chars, "editor.cascade.el_steel_chars" },
8241 { TYPE_SWITCH, &seci.el_ce, "editor.cascade.el_ce" },
8242 { TYPE_SWITCH, &seci.el_ge, "editor.cascade.el_ge" },
8243 { TYPE_SWITCH, &seci.el_ref, "editor.cascade.el_ref" },
8244 { TYPE_SWITCH, &seci.el_user, "editor.cascade.el_user" },
8245 { TYPE_SWITCH, &seci.el_dynamic, "editor.cascade.el_dynamic" },
8248 static struct TokenInfo shortcut_setup_tokens[] =
8250 { TYPE_KEY_X11, &ssi.save_game, "shortcut.save_game" },
8251 { TYPE_KEY_X11, &ssi.load_game, "shortcut.load_game" },
8252 { TYPE_KEY_X11, &ssi.toggle_pause, "shortcut.toggle_pause" },
8253 { TYPE_KEY_X11, &ssi.focus_player[0], "shortcut.focus_player_1" },
8254 { TYPE_KEY_X11, &ssi.focus_player[1], "shortcut.focus_player_2" },
8255 { TYPE_KEY_X11, &ssi.focus_player[2], "shortcut.focus_player_3" },
8256 { TYPE_KEY_X11, &ssi.focus_player[3], "shortcut.focus_player_4" },
8257 { TYPE_KEY_X11, &ssi.focus_player_all,"shortcut.focus_player_all" },
8258 { TYPE_KEY_X11, &ssi.tape_eject, "shortcut.tape_eject" },
8259 { TYPE_KEY_X11, &ssi.tape_extra, "shortcut.tape_extra" },
8260 { TYPE_KEY_X11, &ssi.tape_stop, "shortcut.tape_stop" },
8261 { TYPE_KEY_X11, &ssi.tape_pause, "shortcut.tape_pause" },
8262 { TYPE_KEY_X11, &ssi.tape_record, "shortcut.tape_record" },
8263 { TYPE_KEY_X11, &ssi.tape_play, "shortcut.tape_play" },
8264 { TYPE_KEY_X11, &ssi.sound_simple, "shortcut.sound_simple" },
8265 { TYPE_KEY_X11, &ssi.sound_loops, "shortcut.sound_loops" },
8266 { TYPE_KEY_X11, &ssi.sound_music, "shortcut.sound_music" },
8267 { TYPE_KEY_X11, &ssi.snap_left, "shortcut.snap_left" },
8268 { TYPE_KEY_X11, &ssi.snap_right, "shortcut.snap_right" },
8269 { TYPE_KEY_X11, &ssi.snap_up, "shortcut.snap_up" },
8270 { TYPE_KEY_X11, &ssi.snap_down, "shortcut.snap_down" },
8273 static struct TokenInfo player_setup_tokens[] =
8275 { TYPE_BOOLEAN, &sii.use_joystick, ".use_joystick" },
8276 { TYPE_STRING, &sii.joy.device_name, ".joy.device_name" },
8277 { TYPE_INTEGER, &sii.joy.xleft, ".joy.xleft" },
8278 { TYPE_INTEGER, &sii.joy.xmiddle, ".joy.xmiddle" },
8279 { TYPE_INTEGER, &sii.joy.xright, ".joy.xright" },
8280 { TYPE_INTEGER, &sii.joy.yupper, ".joy.yupper" },
8281 { TYPE_INTEGER, &sii.joy.ymiddle, ".joy.ymiddle" },
8282 { TYPE_INTEGER, &sii.joy.ylower, ".joy.ylower" },
8283 { TYPE_INTEGER, &sii.joy.snap, ".joy.snap_field" },
8284 { TYPE_INTEGER, &sii.joy.drop, ".joy.place_bomb" },
8285 { TYPE_KEY_X11, &sii.key.left, ".key.move_left" },
8286 { TYPE_KEY_X11, &sii.key.right, ".key.move_right" },
8287 { TYPE_KEY_X11, &sii.key.up, ".key.move_up" },
8288 { TYPE_KEY_X11, &sii.key.down, ".key.move_down" },
8289 { TYPE_KEY_X11, &sii.key.snap, ".key.snap_field" },
8290 { TYPE_KEY_X11, &sii.key.drop, ".key.place_bomb" },
8293 static struct TokenInfo system_setup_tokens[] =
8295 { TYPE_STRING, &syi.sdl_videodriver, "system.sdl_videodriver" },
8296 { TYPE_STRING, &syi.sdl_audiodriver, "system.sdl_audiodriver" },
8297 { TYPE_INTEGER, &syi.audio_fragment_size,"system.audio_fragment_size" },
8300 static struct TokenInfo internal_setup_tokens[] =
8302 { TYPE_STRING, &sxi.program_title, "program_title" },
8303 { TYPE_STRING, &sxi.program_version, "program_version" },
8304 { TYPE_STRING, &sxi.program_author, "program_author" },
8305 { TYPE_STRING, &sxi.program_email, "program_email" },
8306 { TYPE_STRING, &sxi.program_website, "program_website" },
8307 { TYPE_STRING, &sxi.program_copyright, "program_copyright" },
8308 { TYPE_STRING, &sxi.program_company, "program_company" },
8309 { TYPE_STRING, &sxi.program_icon_file, "program_icon_file" },
8310 { TYPE_STRING, &sxi.default_graphics_set, "default_graphics_set" },
8311 { TYPE_STRING, &sxi.default_sounds_set, "default_sounds_set" },
8312 { TYPE_STRING, &sxi.default_music_set, "default_music_set" },
8313 { TYPE_STRING, &sxi.fallback_graphics_file, "fallback_graphics_file"},
8314 { TYPE_STRING, &sxi.fallback_sounds_file, "fallback_sounds_file" },
8315 { TYPE_STRING, &sxi.fallback_music_file, "fallback_music_file" },
8316 { TYPE_STRING, &sxi.default_level_series, "default_level_series" },
8317 { TYPE_BOOLEAN,&sxi.choose_from_top_leveldir, "choose_from_top_leveldir" },
8318 { TYPE_BOOLEAN,&sxi.show_scaling_in_title, "show_scaling_in_title" },
8319 { TYPE_INTEGER,&sxi.default_window_width, "default_window_width" },
8320 { TYPE_INTEGER,&sxi.default_window_height, "default_window_height" },
8323 static struct TokenInfo debug_setup_tokens[] =
8325 { TYPE_INTEGER, &sdi.frame_delay[0], "debug.frame_delay_0" },
8326 { TYPE_INTEGER, &sdi.frame_delay[1], "debug.frame_delay_1" },
8327 { TYPE_INTEGER, &sdi.frame_delay[2], "debug.frame_delay_2" },
8328 { TYPE_INTEGER, &sdi.frame_delay[3], "debug.frame_delay_3" },
8329 { TYPE_INTEGER, &sdi.frame_delay[4], "debug.frame_delay_4" },
8330 { TYPE_INTEGER, &sdi.frame_delay[5], "debug.frame_delay_5" },
8331 { TYPE_INTEGER, &sdi.frame_delay[6], "debug.frame_delay_6" },
8332 { TYPE_INTEGER, &sdi.frame_delay[7], "debug.frame_delay_7" },
8333 { TYPE_INTEGER, &sdi.frame_delay[8], "debug.frame_delay_8" },
8334 { TYPE_INTEGER, &sdi.frame_delay[9], "debug.frame_delay_9" },
8335 { TYPE_KEY_X11, &sdi.frame_delay_key[0], "debug.key.frame_delay_0" },
8336 { TYPE_KEY_X11, &sdi.frame_delay_key[1], "debug.key.frame_delay_1" },
8337 { TYPE_KEY_X11, &sdi.frame_delay_key[2], "debug.key.frame_delay_2" },
8338 { TYPE_KEY_X11, &sdi.frame_delay_key[3], "debug.key.frame_delay_3" },
8339 { TYPE_KEY_X11, &sdi.frame_delay_key[4], "debug.key.frame_delay_4" },
8340 { TYPE_KEY_X11, &sdi.frame_delay_key[5], "debug.key.frame_delay_5" },
8341 { TYPE_KEY_X11, &sdi.frame_delay_key[6], "debug.key.frame_delay_6" },
8342 { TYPE_KEY_X11, &sdi.frame_delay_key[7], "debug.key.frame_delay_7" },
8343 { TYPE_KEY_X11, &sdi.frame_delay_key[8], "debug.key.frame_delay_8" },
8344 { TYPE_KEY_X11, &sdi.frame_delay_key[9], "debug.key.frame_delay_9" },
8345 { TYPE_BOOLEAN, &sdi.frame_delay_use_mod_key,"debug.frame_delay.use_mod_key"},
8346 { TYPE_BOOLEAN, &sdi.frame_delay_game_only, "debug.frame_delay.game_only" },
8347 { TYPE_BOOLEAN, &sdi.show_frames_per_second, "debug.show_frames_per_second" },
8350 static struct TokenInfo options_setup_tokens[] =
8352 { TYPE_BOOLEAN, &soi.verbose, "options.verbose" },
8355 static char *get_corrected_login_name(char *login_name)
8357 /* needed because player name must be a fixed length string */
8358 char *login_name_new = checked_malloc(MAX_PLAYER_NAME_LEN + 1);
8360 strncpy(login_name_new, login_name, MAX_PLAYER_NAME_LEN);
8361 login_name_new[MAX_PLAYER_NAME_LEN] = '\0';
8363 if (strlen(login_name) > MAX_PLAYER_NAME_LEN) /* name has been cut */
8364 if (strchr(login_name_new, ' '))
8365 *strchr(login_name_new, ' ') = '\0';
8367 return login_name_new;
8370 static void setSetupInfoToDefaults(struct SetupInfo *si)
8374 si->player_name = get_corrected_login_name(getLoginName());
8377 si->sound_loops = TRUE;
8378 si->sound_music = TRUE;
8379 si->sound_simple = TRUE;
8381 si->scroll_delay = TRUE;
8382 si->scroll_delay_value = STD_SCROLL_DELAY;
8383 si->engine_snapshot_mode = getStringCopy(STR_SNAPSHOT_MODE_DEFAULT);
8384 si->engine_snapshot_memory = SNAPSHOT_MEMORY_DEFAULT;
8385 si->fade_screens = TRUE;
8386 si->autorecord = TRUE;
8387 si->show_titlescreen = TRUE;
8388 si->quick_doors = FALSE;
8389 si->team_mode = FALSE;
8390 si->handicap = TRUE;
8391 si->skip_levels = TRUE;
8392 si->increment_levels = TRUE;
8393 si->time_limit = TRUE;
8394 si->fullscreen = FALSE;
8395 si->window_scaling_percent = STD_WINDOW_SCALING_PERCENT;
8396 si->window_scaling_quality = getStringCopy(SCALING_QUALITY_DEFAULT);
8397 si->screen_rendering_mode = getStringCopy(STR_SPECIAL_RENDERING_DEFAULT);
8398 si->ask_on_escape = TRUE;
8399 si->ask_on_escape_editor = TRUE;
8400 si->quick_switch = FALSE;
8401 si->input_on_focus = FALSE;
8402 si->prefer_aga_graphics = TRUE;
8403 si->game_frame_delay = GAME_FRAME_DELAY;
8404 si->sp_show_border_elements = FALSE;
8405 si->small_game_graphics = FALSE;
8406 si->show_snapshot_buttons = FALSE;
8408 si->graphics_set = getStringCopy(GFX_CLASSIC_SUBDIR);
8409 si->sounds_set = getStringCopy(SND_CLASSIC_SUBDIR);
8410 si->music_set = getStringCopy(MUS_CLASSIC_SUBDIR);
8412 si->override_level_graphics = FALSE;
8413 si->override_level_sounds = FALSE;
8414 si->override_level_music = FALSE;
8416 si->volume_simple = 100; /* percent */
8417 si->volume_loops = 100; /* percent */
8418 si->volume_music = 100; /* percent */
8420 si->touch.control_type = getStringCopy(TOUCH_CONTROL_DEFAULT);
8421 si->touch.move_distance = TOUCH_MOVE_DISTANCE_DEFAULT; /* percent */
8422 si->touch.drop_distance = TOUCH_DROP_DISTANCE_DEFAULT; /* percent */
8424 si->editor.el_boulderdash = TRUE;
8425 si->editor.el_emerald_mine = TRUE;
8426 si->editor.el_emerald_mine_club = TRUE;
8427 si->editor.el_more = TRUE;
8428 si->editor.el_sokoban = TRUE;
8429 si->editor.el_supaplex = TRUE;
8430 si->editor.el_diamond_caves = TRUE;
8431 si->editor.el_dx_boulderdash = TRUE;
8432 si->editor.el_chars = TRUE;
8433 si->editor.el_steel_chars = TRUE;
8435 si->editor.el_classic = TRUE;
8436 si->editor.el_custom = TRUE;
8438 si->editor.el_user_defined = FALSE;
8439 si->editor.el_dynamic = TRUE;
8441 si->editor.el_headlines = TRUE;
8443 si->editor.show_element_token = FALSE;
8445 si->editor.use_template_for_new_levels = TRUE;
8447 si->shortcut.save_game = DEFAULT_KEY_SAVE_GAME;
8448 si->shortcut.load_game = DEFAULT_KEY_LOAD_GAME;
8449 si->shortcut.toggle_pause = DEFAULT_KEY_TOGGLE_PAUSE;
8451 si->shortcut.focus_player[0] = DEFAULT_KEY_FOCUS_PLAYER_1;
8452 si->shortcut.focus_player[1] = DEFAULT_KEY_FOCUS_PLAYER_2;
8453 si->shortcut.focus_player[2] = DEFAULT_KEY_FOCUS_PLAYER_3;
8454 si->shortcut.focus_player[3] = DEFAULT_KEY_FOCUS_PLAYER_4;
8455 si->shortcut.focus_player_all = DEFAULT_KEY_FOCUS_PLAYER_ALL;
8457 si->shortcut.tape_eject = DEFAULT_KEY_TAPE_EJECT;
8458 si->shortcut.tape_extra = DEFAULT_KEY_TAPE_EXTRA;
8459 si->shortcut.tape_stop = DEFAULT_KEY_TAPE_STOP;
8460 si->shortcut.tape_pause = DEFAULT_KEY_TAPE_PAUSE;
8461 si->shortcut.tape_record = DEFAULT_KEY_TAPE_RECORD;
8462 si->shortcut.tape_play = DEFAULT_KEY_TAPE_PLAY;
8464 si->shortcut.sound_simple = DEFAULT_KEY_SOUND_SIMPLE;
8465 si->shortcut.sound_loops = DEFAULT_KEY_SOUND_LOOPS;
8466 si->shortcut.sound_music = DEFAULT_KEY_SOUND_MUSIC;
8468 si->shortcut.snap_left = DEFAULT_KEY_SNAP_LEFT;
8469 si->shortcut.snap_right = DEFAULT_KEY_SNAP_RIGHT;
8470 si->shortcut.snap_up = DEFAULT_KEY_SNAP_UP;
8471 si->shortcut.snap_down = DEFAULT_KEY_SNAP_DOWN;
8473 for (i = 0; i < MAX_PLAYERS; i++)
8475 si->input[i].use_joystick = FALSE;
8476 si->input[i].joy.device_name=getStringCopy(getDeviceNameFromJoystickNr(i));
8477 si->input[i].joy.xleft = JOYSTICK_XLEFT;
8478 si->input[i].joy.xmiddle = JOYSTICK_XMIDDLE;
8479 si->input[i].joy.xright = JOYSTICK_XRIGHT;
8480 si->input[i].joy.yupper = JOYSTICK_YUPPER;
8481 si->input[i].joy.ymiddle = JOYSTICK_YMIDDLE;
8482 si->input[i].joy.ylower = JOYSTICK_YLOWER;
8483 si->input[i].joy.snap = (i == 0 ? JOY_BUTTON_1 : 0);
8484 si->input[i].joy.drop = (i == 0 ? JOY_BUTTON_2 : 0);
8485 si->input[i].key.left = (i == 0 ? DEFAULT_KEY_LEFT : KSYM_UNDEFINED);
8486 si->input[i].key.right = (i == 0 ? DEFAULT_KEY_RIGHT : KSYM_UNDEFINED);
8487 si->input[i].key.up = (i == 0 ? DEFAULT_KEY_UP : KSYM_UNDEFINED);
8488 si->input[i].key.down = (i == 0 ? DEFAULT_KEY_DOWN : KSYM_UNDEFINED);
8489 si->input[i].key.snap = (i == 0 ? DEFAULT_KEY_SNAP : KSYM_UNDEFINED);
8490 si->input[i].key.drop = (i == 0 ? DEFAULT_KEY_DROP : KSYM_UNDEFINED);
8493 si->system.sdl_videodriver = getStringCopy(ARG_DEFAULT);
8494 si->system.sdl_audiodriver = getStringCopy(ARG_DEFAULT);
8495 si->system.audio_fragment_size = DEFAULT_AUDIO_FRAGMENT_SIZE;
8497 si->internal.program_title = getStringCopy(PROGRAM_TITLE_STRING);
8498 si->internal.program_version = getStringCopy(getProgramRealVersionString());
8499 si->internal.program_author = getStringCopy(PROGRAM_AUTHOR_STRING);
8500 si->internal.program_email = getStringCopy(PROGRAM_EMAIL_STRING);
8501 si->internal.program_website = getStringCopy(PROGRAM_WEBSITE_STRING);
8502 si->internal.program_copyright = getStringCopy(PROGRAM_COPYRIGHT_STRING);
8503 si->internal.program_company = getStringCopy(PROGRAM_COMPANY_STRING);
8505 si->internal.program_icon_file = getStringCopy(PROGRAM_ICON_FILENAME);
8507 si->internal.default_graphics_set = getStringCopy(GFX_CLASSIC_SUBDIR);
8508 si->internal.default_sounds_set = getStringCopy(SND_CLASSIC_SUBDIR);
8509 si->internal.default_music_set = getStringCopy(MUS_CLASSIC_SUBDIR);
8511 si->internal.fallback_graphics_file = getStringCopy(UNDEFINED_FILENAME);
8512 si->internal.fallback_sounds_file = getStringCopy(UNDEFINED_FILENAME);
8513 si->internal.fallback_music_file = getStringCopy(UNDEFINED_FILENAME);
8515 si->internal.default_level_series = getStringCopy(UNDEFINED_LEVELSET);
8516 si->internal.choose_from_top_leveldir = FALSE;
8517 si->internal.show_scaling_in_title = TRUE;
8519 si->internal.default_window_width = WIN_XSIZE_DEFAULT;
8520 si->internal.default_window_height = WIN_YSIZE_DEFAULT;
8522 si->debug.frame_delay[0] = DEFAULT_FRAME_DELAY_0;
8523 si->debug.frame_delay[1] = DEFAULT_FRAME_DELAY_1;
8524 si->debug.frame_delay[2] = DEFAULT_FRAME_DELAY_2;
8525 si->debug.frame_delay[3] = DEFAULT_FRAME_DELAY_3;
8526 si->debug.frame_delay[4] = DEFAULT_FRAME_DELAY_4;
8527 si->debug.frame_delay[5] = DEFAULT_FRAME_DELAY_5;
8528 si->debug.frame_delay[6] = DEFAULT_FRAME_DELAY_6;
8529 si->debug.frame_delay[7] = DEFAULT_FRAME_DELAY_7;
8530 si->debug.frame_delay[8] = DEFAULT_FRAME_DELAY_8;
8531 si->debug.frame_delay[9] = DEFAULT_FRAME_DELAY_9;
8533 si->debug.frame_delay_key[0] = DEFAULT_KEY_FRAME_DELAY_0;
8534 si->debug.frame_delay_key[1] = DEFAULT_KEY_FRAME_DELAY_1;
8535 si->debug.frame_delay_key[2] = DEFAULT_KEY_FRAME_DELAY_2;
8536 si->debug.frame_delay_key[3] = DEFAULT_KEY_FRAME_DELAY_3;
8537 si->debug.frame_delay_key[4] = DEFAULT_KEY_FRAME_DELAY_4;
8538 si->debug.frame_delay_key[5] = DEFAULT_KEY_FRAME_DELAY_5;
8539 si->debug.frame_delay_key[6] = DEFAULT_KEY_FRAME_DELAY_6;
8540 si->debug.frame_delay_key[7] = DEFAULT_KEY_FRAME_DELAY_7;
8541 si->debug.frame_delay_key[8] = DEFAULT_KEY_FRAME_DELAY_8;
8542 si->debug.frame_delay_key[9] = DEFAULT_KEY_FRAME_DELAY_9;
8544 si->debug.frame_delay_use_mod_key = DEFAULT_FRAME_DELAY_USE_MOD_KEY;
8545 si->debug.frame_delay_game_only = DEFAULT_FRAME_DELAY_GAME_ONLY;
8547 si->debug.show_frames_per_second = FALSE;
8549 si->options.verbose = FALSE;
8551 #if defined(PLATFORM_ANDROID)
8552 si->fullscreen = TRUE;
8556 static void setSetupInfoToDefaults_EditorCascade(struct SetupInfo *si)
8558 si->editor_cascade.el_bd = TRUE;
8559 si->editor_cascade.el_em = TRUE;
8560 si->editor_cascade.el_emc = TRUE;
8561 si->editor_cascade.el_rnd = TRUE;
8562 si->editor_cascade.el_sb = TRUE;
8563 si->editor_cascade.el_sp = TRUE;
8564 si->editor_cascade.el_dc = TRUE;
8565 si->editor_cascade.el_dx = TRUE;
8567 si->editor_cascade.el_chars = FALSE;
8568 si->editor_cascade.el_steel_chars = FALSE;
8569 si->editor_cascade.el_ce = FALSE;
8570 si->editor_cascade.el_ge = FALSE;
8571 si->editor_cascade.el_ref = FALSE;
8572 si->editor_cascade.el_user = FALSE;
8573 si->editor_cascade.el_dynamic = FALSE;
8576 #define MAX_HIDE_SETUP_TOKEN_SIZE 20
8578 static char *getHideSetupToken(void *setup_value)
8580 static char hide_setup_token[MAX_HIDE_SETUP_TOKEN_SIZE];
8582 if (setup_value != NULL)
8583 snprintf(hide_setup_token, MAX_HIDE_SETUP_TOKEN_SIZE, "%p", setup_value);
8585 return hide_setup_token;
8588 static void setHideSetupEntry(void *setup_value_raw)
8590 /* !!! DIRTY WORKAROUND; TO BE FIXED AFTER THE MM ENGINE RELEASE !!! */
8591 void *setup_value = setup_value_raw - (void *)&si + (void *)&setup;
8593 char *hide_setup_token = getHideSetupToken(setup_value);
8595 if (setup_value != NULL)
8596 setHashEntry(hide_setup_hash, hide_setup_token, "");
8599 boolean hideSetupEntry(void *setup_value)
8601 char *hide_setup_token = getHideSetupToken(setup_value);
8603 return (setup_value != NULL &&
8604 getHashEntry(hide_setup_hash, hide_setup_token) != NULL);
8607 static void setSetupInfoFromTokenText(SetupFileHash *setup_file_hash,
8608 struct TokenInfo *token_info,
8609 int token_nr, char *token_text)
8611 char *token_hide_text = getStringCat2(token_text, ".hide");
8612 char *token_hide_value = getHashEntry(setup_file_hash, token_hide_text);
8614 /* set the value of this setup option in the setup option structure */
8615 setSetupInfo(token_info, token_nr, getHashEntry(setup_file_hash, token_text));
8617 /* check if this setup option should be hidden in the setup menu */
8618 if (token_hide_value != NULL && get_boolean_from_string(token_hide_value))
8619 setHideSetupEntry(token_info[token_nr].value);
8622 static void setSetupInfoFromTokenInfo(SetupFileHash *setup_file_hash,
8623 struct TokenInfo *token_info,
8626 setSetupInfoFromTokenText(setup_file_hash, token_info, token_nr,
8627 token_info[token_nr].text);
8630 static void decodeSetupFileHash(SetupFileHash *setup_file_hash)
8634 if (!setup_file_hash)
8637 if (hide_setup_hash == NULL)
8638 hide_setup_hash = newSetupFileHash();
8642 for (i = 0; i < NUM_GLOBAL_SETUP_TOKENS; i++)
8643 setSetupInfoFromTokenInfo(setup_file_hash, global_setup_tokens, i);
8648 for (i = 0; i < NUM_EDITOR_SETUP_TOKENS; i++)
8649 setSetupInfoFromTokenInfo(setup_file_hash, editor_setup_tokens, i);
8652 /* shortcut setup */
8653 ssi = setup.shortcut;
8654 for (i = 0; i < NUM_SHORTCUT_SETUP_TOKENS; i++)
8655 setSetupInfoFromTokenInfo(setup_file_hash, shortcut_setup_tokens, i);
8656 setup.shortcut = ssi;
8659 for (pnr = 0; pnr < MAX_PLAYERS; pnr++)
8663 sprintf(prefix, "%s%d", TOKEN_STR_PLAYER_PREFIX, pnr + 1);
8665 sii = setup.input[pnr];
8666 for (i = 0; i < NUM_PLAYER_SETUP_TOKENS; i++)
8668 char full_token[100];
8670 sprintf(full_token, "%s%s", prefix, player_setup_tokens[i].text);
8671 setSetupInfoFromTokenText(setup_file_hash, player_setup_tokens, i,
8674 setup.input[pnr] = sii;
8679 for (i = 0; i < NUM_SYSTEM_SETUP_TOKENS; i++)
8680 setSetupInfoFromTokenInfo(setup_file_hash, system_setup_tokens, i);
8683 /* internal setup */
8684 sxi = setup.internal;
8685 for (i = 0; i < NUM_INTERNAL_SETUP_TOKENS; i++)
8686 setSetupInfoFromTokenInfo(setup_file_hash, internal_setup_tokens, i);
8687 setup.internal = sxi;
8691 for (i = 0; i < NUM_DEBUG_SETUP_TOKENS; i++)
8692 setSetupInfoFromTokenInfo(setup_file_hash, debug_setup_tokens, i);
8696 soi = setup.options;
8697 for (i = 0; i < NUM_OPTIONS_SETUP_TOKENS; i++)
8698 setSetupInfoFromTokenInfo(setup_file_hash, options_setup_tokens, i);
8699 setup.options = soi;
8702 static void decodeSetupFileHash_EditorCascade(SetupFileHash *setup_file_hash)
8706 if (!setup_file_hash)
8709 /* editor cascade setup */
8710 seci = setup.editor_cascade;
8711 for (i = 0; i < NUM_EDITOR_CASCADE_SETUP_TOKENS; i++)
8712 setSetupInfo(editor_cascade_setup_tokens, i,
8713 getHashEntry(setup_file_hash,
8714 editor_cascade_setup_tokens[i].text));
8715 setup.editor_cascade = seci;
8718 void LoadSetupFromFilename(char *filename)
8720 SetupFileHash *setup_file_hash = loadSetupFileHash(filename);
8722 if (setup_file_hash)
8724 decodeSetupFileHash(setup_file_hash);
8726 freeSetupFileHash(setup_file_hash);
8730 Error(ERR_DEBUG, "using default setup values");
8734 static void LoadSetup_SpecialPostProcessing()
8736 char *player_name_new;
8738 /* needed to work around problems with fixed length strings */
8739 player_name_new = get_corrected_login_name(setup.player_name);
8740 free(setup.player_name);
8741 setup.player_name = player_name_new;
8743 /* "scroll_delay: on(3) / off(0)" was replaced by scroll delay value */
8744 if (setup.scroll_delay == FALSE)
8746 setup.scroll_delay_value = MIN_SCROLL_DELAY;
8747 setup.scroll_delay = TRUE; /* now always "on" */
8750 /* make sure that scroll delay value stays inside valid range */
8751 setup.scroll_delay_value =
8752 MIN(MAX(MIN_SCROLL_DELAY, setup.scroll_delay_value), MAX_SCROLL_DELAY);
8759 /* always start with reliable default values */
8760 setSetupInfoToDefaults(&setup);
8762 /* try to load setup values from default setup file */
8763 filename = getDefaultSetupFilename();
8765 if (fileExists(filename))
8766 LoadSetupFromFilename(filename);
8768 /* try to load setup values from user setup file */
8769 filename = getSetupFilename();
8771 LoadSetupFromFilename(filename);
8773 LoadSetup_SpecialPostProcessing();
8776 void LoadSetup_EditorCascade()
8778 char *filename = getPath2(getSetupDir(), EDITORCASCADE_FILENAME);
8779 SetupFileHash *setup_file_hash = NULL;
8781 /* always start with reliable default values */
8782 setSetupInfoToDefaults_EditorCascade(&setup);
8784 setup_file_hash = loadSetupFileHash(filename);
8786 if (setup_file_hash)
8788 decodeSetupFileHash_EditorCascade(setup_file_hash);
8790 freeSetupFileHash(setup_file_hash);
8796 static void addGameControllerMappingToHash(SetupFileHash *mappings_hash,
8799 char mapping_guid[MAX_LINE_LEN];
8800 char *mapping_start, *mapping_end;
8802 // get GUID from game controller mapping line: copy complete line
8803 strncpy(mapping_guid, mapping_line, MAX_LINE_LEN - 1);
8804 mapping_guid[MAX_LINE_LEN - 1] = '\0';
8806 // get GUID from game controller mapping line: cut after GUID part
8807 mapping_start = strchr(mapping_guid, ',');
8808 if (mapping_start != NULL)
8809 *mapping_start = '\0';
8811 // cut newline from game controller mapping line
8812 mapping_end = strchr(mapping_line, '\n');
8813 if (mapping_end != NULL)
8814 *mapping_end = '\0';
8816 // add mapping entry to game controller mappings hash
8817 setHashEntry(mappings_hash, mapping_guid, mapping_line);
8820 static void LoadSetup_ReadGameControllerMappings(SetupFileHash *mappings_hash,
8825 if (!(file = fopen(filename, MODE_READ)))
8827 Error(ERR_WARN, "cannot read game controller mappings file '%s'", filename);
8834 char line[MAX_LINE_LEN];
8836 if (!fgets(line, MAX_LINE_LEN, file))
8839 addGameControllerMappingToHash(mappings_hash, line);
8847 char *filename = getSetupFilename();
8851 InitUserDataDirectory();
8853 if (!(file = fopen(filename, MODE_WRITE)))
8855 Error(ERR_WARN, "cannot write setup file '%s'", filename);
8859 fprintFileHeader(file, SETUP_FILENAME);
8863 for (i = 0; i < NUM_GLOBAL_SETUP_TOKENS; i++)
8865 /* just to make things nicer :) */
8866 if (i == SETUP_TOKEN_PLAYER_NAME + 1 ||
8867 i == SETUP_TOKEN_GRAPHICS_SET ||
8868 i == SETUP_TOKEN_VOLUME_SIMPLE ||
8869 i == SETUP_TOKEN_TOUCH_CONTROL_TYPE)
8870 fprintf(file, "\n");
8872 fprintf(file, "%s\n", getSetupLine(global_setup_tokens, "", i));
8877 fprintf(file, "\n");
8878 for (i = 0; i < NUM_EDITOR_SETUP_TOKENS; i++)
8879 fprintf(file, "%s\n", getSetupLine(editor_setup_tokens, "", i));
8881 /* shortcut setup */
8882 ssi = setup.shortcut;
8883 fprintf(file, "\n");
8884 for (i = 0; i < NUM_SHORTCUT_SETUP_TOKENS; i++)
8885 fprintf(file, "%s\n", getSetupLine(shortcut_setup_tokens, "", i));
8888 for (pnr = 0; pnr < MAX_PLAYERS; pnr++)
8892 sprintf(prefix, "%s%d", TOKEN_STR_PLAYER_PREFIX, pnr + 1);
8893 fprintf(file, "\n");
8895 sii = setup.input[pnr];
8896 for (i = 0; i < NUM_PLAYER_SETUP_TOKENS; i++)
8897 fprintf(file, "%s\n", getSetupLine(player_setup_tokens, prefix, i));
8902 fprintf(file, "\n");
8903 for (i = 0; i < NUM_SYSTEM_SETUP_TOKENS; i++)
8904 fprintf(file, "%s\n", getSetupLine(system_setup_tokens, "", i));
8906 /* internal setup */
8907 /* (internal setup values not saved to user setup file) */
8911 fprintf(file, "\n");
8912 for (i = 0; i < NUM_DEBUG_SETUP_TOKENS; i++)
8913 fprintf(file, "%s\n", getSetupLine(debug_setup_tokens, "", i));
8916 soi = setup.options;
8917 fprintf(file, "\n");
8918 for (i = 0; i < NUM_OPTIONS_SETUP_TOKENS; i++)
8919 fprintf(file, "%s\n", getSetupLine(options_setup_tokens, "", i));
8923 SetFilePermissions(filename, PERMS_PRIVATE);
8926 void SaveSetup_EditorCascade()
8928 char *filename = getPath2(getSetupDir(), EDITORCASCADE_FILENAME);
8932 InitUserDataDirectory();
8934 if (!(file = fopen(filename, MODE_WRITE)))
8936 Error(ERR_WARN, "cannot write editor cascade state file '%s'", filename);
8941 fprintFileHeader(file, EDITORCASCADE_FILENAME);
8943 seci = setup.editor_cascade;
8944 for (i = 0; i < NUM_EDITOR_CASCADE_SETUP_TOKENS; i++)
8945 fprintf(file, "%s\n", getSetupLine(editor_cascade_setup_tokens, "", i));
8949 SetFilePermissions(filename, PERMS_PRIVATE);
8954 static void SaveSetup_WriteGameControllerMappings(SetupFileHash *mappings_hash,
8959 if (!(file = fopen(filename, MODE_WRITE)))
8961 Error(ERR_WARN, "cannot write game controller mappings file '%s'",filename);
8966 BEGIN_HASH_ITERATION(mappings_hash, itr)
8968 fprintf(file, "%s\n", HASH_ITERATION_VALUE(itr));
8970 END_HASH_ITERATION(mappings_hash, itr)
8975 void SaveSetup_AddGameControllerMapping(char *mapping)
8977 char *filename = getPath2(getSetupDir(), GAMECONTROLLER_BASENAME);
8978 SetupFileHash *mappings_hash = newSetupFileHash();
8980 InitUserDataDirectory();
8982 // load existing personal game controller mappings
8983 LoadSetup_ReadGameControllerMappings(mappings_hash, filename);
8985 // add new mapping to personal game controller mappings
8986 addGameControllerMappingToHash(mappings_hash, mapping);
8988 // save updated personal game controller mappings
8989 SaveSetup_WriteGameControllerMappings(mappings_hash, filename);
8991 freeSetupFileHash(mappings_hash);
8995 void LoadCustomElementDescriptions()
8997 char *filename = getCustomArtworkConfigFilename(ARTWORK_TYPE_GRAPHICS);
8998 SetupFileHash *setup_file_hash;
9001 for (i = 0; i < NUM_FILE_ELEMENTS; i++)
9003 if (element_info[i].custom_description != NULL)
9005 free(element_info[i].custom_description);
9006 element_info[i].custom_description = NULL;
9010 if ((setup_file_hash = loadSetupFileHash(filename)) == NULL)
9013 for (i = 0; i < NUM_FILE_ELEMENTS; i++)
9015 char *token = getStringCat2(element_info[i].token_name, ".name");
9016 char *value = getHashEntry(setup_file_hash, token);
9019 element_info[i].custom_description = getStringCopy(value);
9024 freeSetupFileHash(setup_file_hash);
9027 static int getElementFromToken(char *token)
9029 char *value = getHashEntry(element_token_hash, token);
9034 Error(ERR_WARN, "unknown element token '%s'", token);
9036 return EL_UNDEFINED;
9039 static int get_token_parameter_value(char *token, char *value_raw)
9043 if (token == NULL || value_raw == NULL)
9044 return ARG_UNDEFINED_VALUE;
9046 suffix = strrchr(token, '.');
9050 if (strEqual(suffix, ".element"))
9051 return getElementFromToken(value_raw);
9053 /* !!! USE CORRECT VALUE TYPE (currently works also for TYPE_BOOLEAN) !!! */
9054 return get_parameter_value(value_raw, suffix, TYPE_INTEGER);
9057 void InitMenuDesignSettings_Static()
9061 /* always start with reliable default values from static default config */
9062 for (i = 0; image_config_vars[i].token != NULL; i++)
9064 char *value = getHashEntry(image_config_hash, image_config_vars[i].token);
9067 *image_config_vars[i].value =
9068 get_token_parameter_value(image_config_vars[i].token, value);
9072 static void InitMenuDesignSettings_SpecialPreProcessing()
9076 /* the following initializes hierarchical values from static configuration */
9078 /* special case: initialize "ARG_DEFAULT" values in static default config */
9079 /* (e.g., initialize "[titlemessage].fade_mode" from "[title].fade_mode") */
9080 titlescreen_initial_first_default.fade_mode =
9081 title_initial_first_default.fade_mode;
9082 titlescreen_initial_first_default.fade_delay =
9083 title_initial_first_default.fade_delay;
9084 titlescreen_initial_first_default.post_delay =
9085 title_initial_first_default.post_delay;
9086 titlescreen_initial_first_default.auto_delay =
9087 title_initial_first_default.auto_delay;
9088 titlescreen_first_default.fade_mode = title_first_default.fade_mode;
9089 titlescreen_first_default.fade_delay = title_first_default.fade_delay;
9090 titlescreen_first_default.post_delay = title_first_default.post_delay;
9091 titlescreen_first_default.auto_delay = title_first_default.auto_delay;
9092 titlemessage_initial_first_default.fade_mode =
9093 title_initial_first_default.fade_mode;
9094 titlemessage_initial_first_default.fade_delay =
9095 title_initial_first_default.fade_delay;
9096 titlemessage_initial_first_default.post_delay =
9097 title_initial_first_default.post_delay;
9098 titlemessage_initial_first_default.auto_delay =
9099 title_initial_first_default.auto_delay;
9100 titlemessage_first_default.fade_mode = title_first_default.fade_mode;
9101 titlemessage_first_default.fade_delay = title_first_default.fade_delay;
9102 titlemessage_first_default.post_delay = title_first_default.post_delay;
9103 titlemessage_first_default.auto_delay = title_first_default.auto_delay;
9105 titlescreen_initial_default.fade_mode = title_initial_default.fade_mode;
9106 titlescreen_initial_default.fade_delay = title_initial_default.fade_delay;
9107 titlescreen_initial_default.post_delay = title_initial_default.post_delay;
9108 titlescreen_initial_default.auto_delay = title_initial_default.auto_delay;
9109 titlescreen_default.fade_mode = title_default.fade_mode;
9110 titlescreen_default.fade_delay = title_default.fade_delay;
9111 titlescreen_default.post_delay = title_default.post_delay;
9112 titlescreen_default.auto_delay = title_default.auto_delay;
9113 titlemessage_initial_default.fade_mode = title_initial_default.fade_mode;
9114 titlemessage_initial_default.fade_delay = title_initial_default.fade_delay;
9115 titlemessage_initial_default.post_delay = title_initial_default.post_delay;
9116 titlemessage_initial_default.auto_delay = title_initial_default.auto_delay;
9117 titlemessage_default.fade_mode = title_default.fade_mode;
9118 titlemessage_default.fade_delay = title_default.fade_delay;
9119 titlemessage_default.post_delay = title_default.post_delay;
9120 titlemessage_default.auto_delay = title_default.auto_delay;
9122 /* special case: initialize "ARG_DEFAULT" values in static default config */
9123 /* (e.g., init "titlemessage_1.fade_mode" from "[titlemessage].fade_mode") */
9124 for (i = 0; i < MAX_NUM_TITLE_MESSAGES; i++)
9126 titlescreen_initial_first[i] = titlescreen_initial_first_default;
9127 titlescreen_first[i] = titlescreen_first_default;
9128 titlemessage_initial_first[i] = titlemessage_initial_first_default;
9129 titlemessage_first[i] = titlemessage_first_default;
9131 titlescreen_initial[i] = titlescreen_initial_default;
9132 titlescreen[i] = titlescreen_default;
9133 titlemessage_initial[i] = titlemessage_initial_default;
9134 titlemessage[i] = titlemessage_default;
9137 /* special case: initialize "ARG_DEFAULT" values in static default config */
9138 /* (eg, init "menu.enter_screen.SCORES.xyz" from "menu.enter_screen.xyz") */
9139 for (i = 0; i < NUM_SPECIAL_GFX_ARGS; i++)
9141 if (i == GFX_SPECIAL_ARG_TITLE) /* title values already initialized */
9144 menu.enter_screen[i] = menu.enter_screen[GFX_SPECIAL_ARG_DEFAULT];
9145 menu.leave_screen[i] = menu.leave_screen[GFX_SPECIAL_ARG_DEFAULT];
9146 menu.next_screen[i] = menu.next_screen[GFX_SPECIAL_ARG_DEFAULT];
9149 /* special case: initialize "ARG_DEFAULT" values in static default config */
9150 /* (eg, init "viewport.door_1.MAIN.xyz" from "viewport.door_1.xyz") */
9151 for (i = 0; i < NUM_SPECIAL_GFX_ARGS; i++)
9153 viewport.window[i] = viewport.window[GFX_SPECIAL_ARG_DEFAULT];
9154 viewport.playfield[i] = viewport.playfield[GFX_SPECIAL_ARG_DEFAULT];
9155 viewport.door_1[i] = viewport.door_1[GFX_SPECIAL_ARG_DEFAULT];
9157 if (i == GFX_SPECIAL_ARG_EDITOR) /* editor values already initialized */
9160 viewport.door_2[i] = viewport.door_2[GFX_SPECIAL_ARG_DEFAULT];
9164 static void InitMenuDesignSettings_SpecialPostProcessing()
9168 struct XY *dst, *src;
9172 { &game.button.save, &game.button.stop },
9173 { &game.button.pause2, &game.button.pause },
9174 { &game.button.load, &game.button.play },
9175 { &game.button.undo, &game.button.stop },
9176 { &game.button.redo, &game.button.play },
9182 /* special case: initialize later added SETUP list size from LEVELS value */
9183 if (menu.list_size[GAME_MODE_SETUP] == -1)
9184 menu.list_size[GAME_MODE_SETUP] = menu.list_size[GAME_MODE_LEVELS];
9186 /* set default position for snapshot buttons to stop/pause/play buttons */
9187 for (i = 0; game_buttons_xy[i].dst != NULL; i++)
9188 if ((*game_buttons_xy[i].dst).x == -1 &&
9189 (*game_buttons_xy[i].dst).y == -1)
9190 *game_buttons_xy[i].dst = *game_buttons_xy[i].src;
9193 static void InitMenuDesignSettings_SpecialPostProcessing_AfterGraphics()
9197 struct XYTileSize *dst, *src;
9200 editor_buttons_xy[] =
9203 &editor.button.element_left, &editor.palette.element_left,
9204 IMG_GFX_EDITOR_BUTTON_ELEMENT_LEFT
9207 &editor.button.element_middle, &editor.palette.element_middle,
9208 IMG_GFX_EDITOR_BUTTON_ELEMENT_MIDDLE
9211 &editor.button.element_right, &editor.palette.element_right,
9212 IMG_GFX_EDITOR_BUTTON_ELEMENT_RIGHT
9219 /* set default position for element buttons to element graphics */
9220 for (i = 0; editor_buttons_xy[i].dst != NULL; i++)
9222 if ((*editor_buttons_xy[i].dst).x == -1 &&
9223 (*editor_buttons_xy[i].dst).y == -1)
9225 struct GraphicInfo *gd = &graphic_info[editor_buttons_xy[i].graphic];
9227 gd->width = gd->height = editor_buttons_xy[i].src->tile_size;
9229 *editor_buttons_xy[i].dst = *editor_buttons_xy[i].src;
9234 static void LoadMenuDesignSettingsFromFilename(char *filename)
9236 static struct TitleFadingInfo tfi;
9237 static struct TitleMessageInfo tmi;
9238 static struct TokenInfo title_tokens[] =
9240 { TYPE_INTEGER, &tfi.fade_mode, ".fade_mode" },
9241 { TYPE_INTEGER, &tfi.fade_delay, ".fade_delay" },
9242 { TYPE_INTEGER, &tfi.post_delay, ".post_delay" },
9243 { TYPE_INTEGER, &tfi.auto_delay, ".auto_delay" },
9247 static struct TokenInfo titlemessage_tokens[] =
9249 { TYPE_INTEGER, &tmi.x, ".x" },
9250 { TYPE_INTEGER, &tmi.y, ".y" },
9251 { TYPE_INTEGER, &tmi.width, ".width" },
9252 { TYPE_INTEGER, &tmi.height, ".height" },
9253 { TYPE_INTEGER, &tmi.chars, ".chars" },
9254 { TYPE_INTEGER, &tmi.lines, ".lines" },
9255 { TYPE_INTEGER, &tmi.align, ".align" },
9256 { TYPE_INTEGER, &tmi.valign, ".valign" },
9257 { TYPE_INTEGER, &tmi.font, ".font" },
9258 { TYPE_BOOLEAN, &tmi.autowrap, ".autowrap" },
9259 { TYPE_BOOLEAN, &tmi.centered, ".centered" },
9260 { TYPE_BOOLEAN, &tmi.parse_comments, ".parse_comments" },
9261 { TYPE_INTEGER, &tmi.sort_priority, ".sort_priority" },
9262 { TYPE_INTEGER, &tmi.fade_mode, ".fade_mode" },
9263 { TYPE_INTEGER, &tmi.fade_delay, ".fade_delay" },
9264 { TYPE_INTEGER, &tmi.post_delay, ".post_delay" },
9265 { TYPE_INTEGER, &tmi.auto_delay, ".auto_delay" },
9271 struct TitleFadingInfo *info;
9276 /* initialize first titles from "enter screen" definitions, if defined */
9277 { &title_initial_first_default, "menu.enter_screen.TITLE" },
9278 { &title_first_default, "menu.enter_screen.TITLE" },
9280 /* initialize title screens from "next screen" definitions, if defined */
9281 { &title_initial_default, "menu.next_screen.TITLE" },
9282 { &title_default, "menu.next_screen.TITLE" },
9288 struct TitleMessageInfo *array;
9291 titlemessage_arrays[] =
9293 /* initialize first titles from "enter screen" definitions, if defined */
9294 { titlescreen_initial_first, "menu.enter_screen.TITLE" },
9295 { titlescreen_first, "menu.enter_screen.TITLE" },
9296 { titlemessage_initial_first, "menu.enter_screen.TITLE" },
9297 { titlemessage_first, "menu.enter_screen.TITLE" },
9299 /* initialize titles from "next screen" definitions, if defined */
9300 { titlescreen_initial, "menu.next_screen.TITLE" },
9301 { titlescreen, "menu.next_screen.TITLE" },
9302 { titlemessage_initial, "menu.next_screen.TITLE" },
9303 { titlemessage, "menu.next_screen.TITLE" },
9305 /* overwrite titles with title definitions, if defined */
9306 { titlescreen_initial_first, "[title_initial]" },
9307 { titlescreen_first, "[title]" },
9308 { titlemessage_initial_first, "[title_initial]" },
9309 { titlemessage_first, "[title]" },
9311 { titlescreen_initial, "[title_initial]" },
9312 { titlescreen, "[title]" },
9313 { titlemessage_initial, "[title_initial]" },
9314 { titlemessage, "[title]" },
9316 /* overwrite titles with title screen/message definitions, if defined */
9317 { titlescreen_initial_first, "[titlescreen_initial]" },
9318 { titlescreen_first, "[titlescreen]" },
9319 { titlemessage_initial_first, "[titlemessage_initial]" },
9320 { titlemessage_first, "[titlemessage]" },
9322 { titlescreen_initial, "[titlescreen_initial]" },
9323 { titlescreen, "[titlescreen]" },
9324 { titlemessage_initial, "[titlemessage_initial]" },
9325 { titlemessage, "[titlemessage]" },
9329 SetupFileHash *setup_file_hash;
9332 if ((setup_file_hash = loadSetupFileHash(filename)) == NULL)
9335 /* the following initializes hierarchical values from dynamic configuration */
9337 /* special case: initialize with default values that may be overwritten */
9338 /* (e.g., init "menu.draw_xoffset.INFO" from "menu.draw_xoffset") */
9339 for (i = 0; i < NUM_SPECIAL_GFX_ARGS; i++)
9341 char *value_1 = getHashEntry(setup_file_hash, "menu.draw_xoffset");
9342 char *value_2 = getHashEntry(setup_file_hash, "menu.draw_yoffset");
9343 char *value_3 = getHashEntry(setup_file_hash, "menu.list_size");
9345 if (value_1 != NULL)
9346 menu.draw_xoffset[i] = get_integer_from_string(value_1);
9347 if (value_2 != NULL)
9348 menu.draw_yoffset[i] = get_integer_from_string(value_2);
9349 if (value_3 != NULL)
9350 menu.list_size[i] = get_integer_from_string(value_3);
9353 /* special case: initialize with default values that may be overwritten */
9354 /* (eg, init "menu.draw_xoffset.INFO[XXX]" from "menu.draw_xoffset.INFO") */
9355 for (i = 0; i < NUM_SPECIAL_GFX_INFO_ARGS; i++)
9357 char *value_1 = getHashEntry(setup_file_hash, "menu.draw_xoffset.INFO");
9358 char *value_2 = getHashEntry(setup_file_hash, "menu.draw_yoffset.INFO");
9360 if (value_1 != NULL)
9361 menu.draw_xoffset_info[i] = get_integer_from_string(value_1);
9362 if (value_2 != NULL)
9363 menu.draw_yoffset_info[i] = get_integer_from_string(value_2);
9365 if (i == GFX_SPECIAL_ARG_INFO_ELEMENTS)
9367 char *value_1 = getHashEntry(setup_file_hash, "menu.list_size.INFO");
9369 if (value_1 != NULL)
9370 menu.list_size_info[i] = get_integer_from_string(value_1);
9374 /* special case: initialize with default values that may be overwritten */
9375 /* (eg, init "menu.draw_xoffset.SETUP[XXX]" from "menu.draw_xoffset.SETUP") */
9376 for (i = 0; i < NUM_SPECIAL_GFX_SETUP_ARGS; i++)
9378 char *value_1 = getHashEntry(setup_file_hash, "menu.draw_xoffset.SETUP");
9379 char *value_2 = getHashEntry(setup_file_hash, "menu.draw_yoffset.SETUP");
9381 if (value_1 != NULL)
9382 menu.draw_xoffset_setup[i] = get_integer_from_string(value_1);
9383 if (value_2 != NULL)
9384 menu.draw_yoffset_setup[i] = get_integer_from_string(value_2);
9387 /* special case: initialize with default values that may be overwritten */
9388 /* (eg, init "menu.enter_screen.SCORES.xyz" from "menu.enter_screen.xyz") */
9389 for (i = 0; i < NUM_SPECIAL_GFX_ARGS; i++)
9391 char *token_1 = "menu.enter_screen.fade_mode";
9392 char *token_2 = "menu.enter_screen.fade_delay";
9393 char *token_3 = "menu.enter_screen.post_delay";
9394 char *token_4 = "menu.leave_screen.fade_mode";
9395 char *token_5 = "menu.leave_screen.fade_delay";
9396 char *token_6 = "menu.leave_screen.post_delay";
9397 char *token_7 = "menu.next_screen.fade_mode";
9398 char *token_8 = "menu.next_screen.fade_delay";
9399 char *token_9 = "menu.next_screen.post_delay";
9400 char *value_1 = getHashEntry(setup_file_hash, token_1);
9401 char *value_2 = getHashEntry(setup_file_hash, token_2);
9402 char *value_3 = getHashEntry(setup_file_hash, token_3);
9403 char *value_4 = getHashEntry(setup_file_hash, token_4);
9404 char *value_5 = getHashEntry(setup_file_hash, token_5);
9405 char *value_6 = getHashEntry(setup_file_hash, token_6);
9406 char *value_7 = getHashEntry(setup_file_hash, token_7);
9407 char *value_8 = getHashEntry(setup_file_hash, token_8);
9408 char *value_9 = getHashEntry(setup_file_hash, token_9);
9410 if (value_1 != NULL)
9411 menu.enter_screen[i].fade_mode = get_token_parameter_value(token_1,
9413 if (value_2 != NULL)
9414 menu.enter_screen[i].fade_delay = get_token_parameter_value(token_2,
9416 if (value_3 != NULL)
9417 menu.enter_screen[i].post_delay = get_token_parameter_value(token_3,
9419 if (value_4 != NULL)
9420 menu.leave_screen[i].fade_mode = get_token_parameter_value(token_4,
9422 if (value_5 != NULL)
9423 menu.leave_screen[i].fade_delay = get_token_parameter_value(token_5,
9425 if (value_6 != NULL)
9426 menu.leave_screen[i].post_delay = get_token_parameter_value(token_6,
9428 if (value_7 != NULL)
9429 menu.next_screen[i].fade_mode = get_token_parameter_value(token_7,
9431 if (value_8 != NULL)
9432 menu.next_screen[i].fade_delay = get_token_parameter_value(token_8,
9434 if (value_9 != NULL)
9435 menu.next_screen[i].post_delay = get_token_parameter_value(token_9,
9439 /* special case: initialize with default values that may be overwritten */
9440 /* (eg, init "viewport.door_1.MAIN.xyz" from "viewport.door_1.xyz") */
9441 for (i = 0; i < NUM_SPECIAL_GFX_ARGS; i++)
9443 char *token_w1 = "viewport.window.width";
9444 char *token_w2 = "viewport.window.height";
9445 char *token_01 = "viewport.playfield.x";
9446 char *token_02 = "viewport.playfield.y";
9447 char *token_03 = "viewport.playfield.width";
9448 char *token_04 = "viewport.playfield.height";
9449 char *token_05 = "viewport.playfield.border_size";
9450 char *token_06 = "viewport.door_1.x";
9451 char *token_07 = "viewport.door_1.y";
9452 char *token_08 = "viewport.door_1.width";
9453 char *token_09 = "viewport.door_1.height";
9454 char *token_10 = "viewport.door_1.border_size";
9455 char *token_11 = "viewport.door_2.x";
9456 char *token_12 = "viewport.door_2.y";
9457 char *token_13 = "viewport.door_2.width";
9458 char *token_14 = "viewport.door_2.height";
9459 char *token_15 = "viewport.door_2.border_size";
9460 char *value_w1 = getHashEntry(setup_file_hash, token_w1);
9461 char *value_w2 = getHashEntry(setup_file_hash, token_w2);
9462 char *value_01 = getHashEntry(setup_file_hash, token_01);
9463 char *value_02 = getHashEntry(setup_file_hash, token_02);
9464 char *value_03 = getHashEntry(setup_file_hash, token_03);
9465 char *value_04 = getHashEntry(setup_file_hash, token_04);
9466 char *value_05 = getHashEntry(setup_file_hash, token_05);
9467 char *value_06 = getHashEntry(setup_file_hash, token_06);
9468 char *value_07 = getHashEntry(setup_file_hash, token_07);
9469 char *value_08 = getHashEntry(setup_file_hash, token_08);
9470 char *value_09 = getHashEntry(setup_file_hash, token_09);
9471 char *value_10 = getHashEntry(setup_file_hash, token_10);
9472 char *value_11 = getHashEntry(setup_file_hash, token_11);
9473 char *value_12 = getHashEntry(setup_file_hash, token_12);
9474 char *value_13 = getHashEntry(setup_file_hash, token_13);
9475 char *value_14 = getHashEntry(setup_file_hash, token_14);
9476 char *value_15 = getHashEntry(setup_file_hash, token_15);
9478 if (value_w1 != NULL)
9479 viewport.window[i].width = get_token_parameter_value(token_w1, value_w1);
9480 if (value_w2 != NULL)
9481 viewport.window[i].height = get_token_parameter_value(token_w2, value_w2);
9482 if (value_01 != NULL)
9483 viewport.playfield[i].x = get_token_parameter_value(token_01, value_01);
9484 if (value_02 != NULL)
9485 viewport.playfield[i].y = get_token_parameter_value(token_02, value_02);
9486 if (value_03 != NULL)
9487 viewport.playfield[i].width = get_token_parameter_value(token_03,
9489 if (value_04 != NULL)
9490 viewport.playfield[i].height = get_token_parameter_value(token_04,
9492 if (value_05 != NULL)
9493 viewport.playfield[i].border_size = get_token_parameter_value(token_05,
9495 if (value_06 != NULL)
9496 viewport.door_1[i].x = get_token_parameter_value(token_06, value_06);
9497 if (value_07 != NULL)
9498 viewport.door_1[i].y = get_token_parameter_value(token_07, value_07);
9499 if (value_08 != NULL)
9500 viewport.door_1[i].width = get_token_parameter_value(token_08, value_08);
9501 if (value_09 != NULL)
9502 viewport.door_1[i].height = get_token_parameter_value(token_09, value_09);
9503 if (value_10 != NULL)
9504 viewport.door_1[i].border_size = get_token_parameter_value(token_10,
9506 if (value_11 != NULL)
9507 viewport.door_2[i].x = get_token_parameter_value(token_11, value_11);
9508 if (value_12 != NULL)
9509 viewport.door_2[i].y = get_token_parameter_value(token_12, value_12);
9510 if (value_13 != NULL)
9511 viewport.door_2[i].width = get_token_parameter_value(token_13, value_13);
9512 if (value_14 != NULL)
9513 viewport.door_2[i].height = get_token_parameter_value(token_14, value_14);
9514 if (value_15 != NULL)
9515 viewport.door_1[i].border_size = get_token_parameter_value(token_15,
9519 /* special case: initialize with default values that may be overwritten */
9520 /* (e.g., init "[title].fade_mode" from "menu.next_screen.TITLE.fade_mode") */
9521 for (i = 0; title_info[i].info != NULL; i++)
9523 struct TitleFadingInfo *info = title_info[i].info;
9524 char *base_token = title_info[i].text;
9526 for (j = 0; title_tokens[j].type != -1; j++)
9528 char *token = getStringCat2(base_token, title_tokens[j].text);
9529 char *value = getHashEntry(setup_file_hash, token);
9533 int parameter_value = get_token_parameter_value(token, value);
9537 *(int *)title_tokens[j].value = (int)parameter_value;
9546 /* special case: initialize with default values that may be overwritten */
9547 /* (e.g., init "titlemessage_1.fade_mode" from "[titlemessage].fade_mode") */
9548 for (i = 0; titlemessage_arrays[i].array != NULL; i++)
9550 struct TitleMessageInfo *array = titlemessage_arrays[i].array;
9551 char *base_token = titlemessage_arrays[i].text;
9553 for (j = 0; titlemessage_tokens[j].type != -1; j++)
9555 char *token = getStringCat2(base_token, titlemessage_tokens[j].text);
9556 char *value = getHashEntry(setup_file_hash, token);
9560 int parameter_value = get_token_parameter_value(token, value);
9562 for (k = 0; k < MAX_NUM_TITLE_MESSAGES; k++)
9566 if (titlemessage_tokens[j].type == TYPE_INTEGER)
9567 *(int *)titlemessage_tokens[j].value = (int)parameter_value;
9569 *(boolean *)titlemessage_tokens[j].value = (boolean)parameter_value;
9579 /* read (and overwrite with) values that may be specified in config file */
9580 for (i = 0; image_config_vars[i].token != NULL; i++)
9582 char *value = getHashEntry(setup_file_hash, image_config_vars[i].token);
9584 /* (ignore definitions set to "[DEFAULT]" which are already initialized) */
9585 if (value != NULL && !strEqual(value, ARG_DEFAULT))
9586 *image_config_vars[i].value =
9587 get_token_parameter_value(image_config_vars[i].token, value);
9590 freeSetupFileHash(setup_file_hash);
9593 void LoadMenuDesignSettings()
9595 char *filename_base = UNDEFINED_FILENAME, *filename_local;
9597 InitMenuDesignSettings_Static();
9598 InitMenuDesignSettings_SpecialPreProcessing();
9600 if (!GFX_OVERRIDE_ARTWORK(ARTWORK_TYPE_GRAPHICS))
9602 /* first look for special settings configured in level series config */
9603 filename_base = getCustomArtworkLevelConfigFilename(ARTWORK_TYPE_GRAPHICS);
9605 if (fileExists(filename_base))
9606 LoadMenuDesignSettingsFromFilename(filename_base);
9609 filename_local = getCustomArtworkConfigFilename(ARTWORK_TYPE_GRAPHICS);
9611 if (filename_local != NULL && !strEqual(filename_base, filename_local))
9612 LoadMenuDesignSettingsFromFilename(filename_local);
9614 InitMenuDesignSettings_SpecialPostProcessing();
9617 void LoadMenuDesignSettings_AfterGraphics()
9619 InitMenuDesignSettings_SpecialPostProcessing_AfterGraphics();
9622 void LoadUserDefinedEditorElementList(int **elements, int *num_elements)
9624 char *filename = getEditorSetupFilename();
9625 SetupFileList *setup_file_list, *list;
9626 SetupFileHash *element_hash;
9627 int num_unknown_tokens = 0;
9630 if ((setup_file_list = loadSetupFileList(filename)) == NULL)
9633 element_hash = newSetupFileHash();
9635 for (i = 0; i < NUM_FILE_ELEMENTS; i++)
9636 setHashEntry(element_hash, element_info[i].token_name, i_to_a(i));
9638 /* determined size may be larger than needed (due to unknown elements) */
9640 for (list = setup_file_list; list != NULL; list = list->next)
9643 /* add space for up to 3 more elements for padding that may be needed */
9646 /* free memory for old list of elements, if needed */
9647 checked_free(*elements);
9649 /* allocate memory for new list of elements */
9650 *elements = checked_malloc(*num_elements * sizeof(int));
9653 for (list = setup_file_list; list != NULL; list = list->next)
9655 char *value = getHashEntry(element_hash, list->token);
9657 if (value == NULL) /* try to find obsolete token mapping */
9659 char *mapped_token = get_mapped_token(list->token);
9661 if (mapped_token != NULL)
9663 value = getHashEntry(element_hash, mapped_token);
9671 (*elements)[(*num_elements)++] = atoi(value);
9675 if (num_unknown_tokens == 0)
9677 Error(ERR_INFO_LINE, "-");
9678 Error(ERR_INFO, "warning: unknown token(s) found in config file:");
9679 Error(ERR_INFO, "- config file: '%s'", filename);
9681 num_unknown_tokens++;
9684 Error(ERR_INFO, "- token: '%s'", list->token);
9688 if (num_unknown_tokens > 0)
9689 Error(ERR_INFO_LINE, "-");
9691 while (*num_elements % 4) /* pad with empty elements, if needed */
9692 (*elements)[(*num_elements)++] = EL_EMPTY;
9694 freeSetupFileList(setup_file_list);
9695 freeSetupFileHash(element_hash);
9698 for (i = 0; i < *num_elements; i++)
9699 printf("editor: element '%s' [%d]\n",
9700 element_info[(*elements)[i]].token_name, (*elements)[i]);
9704 static struct MusicFileInfo *get_music_file_info_ext(char *basename, int music,
9707 SetupFileHash *setup_file_hash = NULL;
9708 struct MusicFileInfo tmp_music_file_info, *new_music_file_info;
9709 char *filename_music, *filename_prefix, *filename_info;
9715 token_to_value_ptr[] =
9717 { "title_header", &tmp_music_file_info.title_header },
9718 { "artist_header", &tmp_music_file_info.artist_header },
9719 { "album_header", &tmp_music_file_info.album_header },
9720 { "year_header", &tmp_music_file_info.year_header },
9722 { "title", &tmp_music_file_info.title },
9723 { "artist", &tmp_music_file_info.artist },
9724 { "album", &tmp_music_file_info.album },
9725 { "year", &tmp_music_file_info.year },
9731 filename_music = (is_sound ? getCustomSoundFilename(basename) :
9732 getCustomMusicFilename(basename));
9734 if (filename_music == NULL)
9737 /* ---------- try to replace file extension ---------- */
9739 filename_prefix = getStringCopy(filename_music);
9740 if (strrchr(filename_prefix, '.') != NULL)
9741 *strrchr(filename_prefix, '.') = '\0';
9742 filename_info = getStringCat2(filename_prefix, ".txt");
9744 if (fileExists(filename_info))
9745 setup_file_hash = loadSetupFileHash(filename_info);
9747 free(filename_prefix);
9748 free(filename_info);
9750 if (setup_file_hash == NULL)
9752 /* ---------- try to add file extension ---------- */
9754 filename_prefix = getStringCopy(filename_music);
9755 filename_info = getStringCat2(filename_prefix, ".txt");
9757 if (fileExists(filename_info))
9758 setup_file_hash = loadSetupFileHash(filename_info);
9760 free(filename_prefix);
9761 free(filename_info);
9764 if (setup_file_hash == NULL)
9767 /* ---------- music file info found ---------- */
9769 clear_mem(&tmp_music_file_info, sizeof(struct MusicFileInfo));
9771 for (i = 0; token_to_value_ptr[i].token != NULL; i++)
9773 char *value = getHashEntry(setup_file_hash, token_to_value_ptr[i].token);
9775 *token_to_value_ptr[i].value_ptr =
9776 getStringCopy(value != NULL && *value != '\0' ? value : UNKNOWN_NAME);
9779 tmp_music_file_info.basename = getStringCopy(basename);
9780 tmp_music_file_info.music = music;
9781 tmp_music_file_info.is_sound = is_sound;
9783 new_music_file_info = checked_malloc(sizeof(struct MusicFileInfo));
9784 *new_music_file_info = tmp_music_file_info;
9786 return new_music_file_info;
9789 static struct MusicFileInfo *get_music_file_info(char *basename, int music)
9791 return get_music_file_info_ext(basename, music, FALSE);
9794 static struct MusicFileInfo *get_sound_file_info(char *basename, int sound)
9796 return get_music_file_info_ext(basename, sound, TRUE);
9799 static boolean music_info_listed_ext(struct MusicFileInfo *list,
9800 char *basename, boolean is_sound)
9802 for (; list != NULL; list = list->next)
9803 if (list->is_sound == is_sound && strEqual(list->basename, basename))
9809 static boolean music_info_listed(struct MusicFileInfo *list, char *basename)
9811 return music_info_listed_ext(list, basename, FALSE);
9814 static boolean sound_info_listed(struct MusicFileInfo *list, char *basename)
9816 return music_info_listed_ext(list, basename, TRUE);
9819 void LoadMusicInfo()
9821 char *music_directory = getCustomMusicDirectory();
9822 int num_music = getMusicListSize();
9823 int num_music_noconf = 0;
9824 int num_sounds = getSoundListSize();
9826 DirectoryEntry *dir_entry;
9827 struct FileInfo *music, *sound;
9828 struct MusicFileInfo *next, **new;
9831 while (music_file_info != NULL)
9833 next = music_file_info->next;
9835 checked_free(music_file_info->basename);
9837 checked_free(music_file_info->title_header);
9838 checked_free(music_file_info->artist_header);
9839 checked_free(music_file_info->album_header);
9840 checked_free(music_file_info->year_header);
9842 checked_free(music_file_info->title);
9843 checked_free(music_file_info->artist);
9844 checked_free(music_file_info->album);
9845 checked_free(music_file_info->year);
9847 free(music_file_info);
9849 music_file_info = next;
9852 new = &music_file_info;
9854 for (i = 0; i < num_music; i++)
9856 music = getMusicListEntry(i);
9858 if (music->filename == NULL)
9861 if (strEqual(music->filename, UNDEFINED_FILENAME))
9864 /* a configured file may be not recognized as music */
9865 if (!FileIsMusic(music->filename))
9868 if (!music_info_listed(music_file_info, music->filename))
9870 *new = get_music_file_info(music->filename, i);
9873 new = &(*new)->next;
9877 if ((dir = openDirectory(music_directory)) == NULL)
9879 Error(ERR_WARN, "cannot read music directory '%s'", music_directory);
9883 while ((dir_entry = readDirectory(dir)) != NULL) /* loop all entries */
9885 char *basename = dir_entry->basename;
9886 boolean music_already_used = FALSE;
9889 /* skip all music files that are configured in music config file */
9890 for (i = 0; i < num_music; i++)
9892 music = getMusicListEntry(i);
9894 if (music->filename == NULL)
9897 if (strEqual(basename, music->filename))
9899 music_already_used = TRUE;
9904 if (music_already_used)
9907 if (!FileIsMusic(dir_entry->filename))
9910 if (!music_info_listed(music_file_info, basename))
9912 *new = get_music_file_info(basename, MAP_NOCONF_MUSIC(num_music_noconf));
9915 new = &(*new)->next;
9921 closeDirectory(dir);
9923 for (i = 0; i < num_sounds; i++)
9925 sound = getSoundListEntry(i);
9927 if (sound->filename == NULL)
9930 if (strEqual(sound->filename, UNDEFINED_FILENAME))
9933 /* a configured file may be not recognized as sound */
9934 if (!FileIsSound(sound->filename))
9937 if (!sound_info_listed(music_file_info, sound->filename))
9939 *new = get_sound_file_info(sound->filename, i);
9941 new = &(*new)->next;
9946 void add_helpanim_entry(int element, int action, int direction, int delay,
9947 int *num_list_entries)
9949 struct HelpAnimInfo *new_list_entry;
9950 (*num_list_entries)++;
9953 checked_realloc(helpanim_info,
9954 *num_list_entries * sizeof(struct HelpAnimInfo));
9955 new_list_entry = &helpanim_info[*num_list_entries - 1];
9957 new_list_entry->element = element;
9958 new_list_entry->action = action;
9959 new_list_entry->direction = direction;
9960 new_list_entry->delay = delay;
9963 void print_unknown_token(char *filename, char *token, int token_nr)
9967 Error(ERR_INFO_LINE, "-");
9968 Error(ERR_INFO, "warning: unknown token(s) found in config file:");
9969 Error(ERR_INFO, "- config file: '%s'", filename);
9972 Error(ERR_INFO, "- token: '%s'", token);
9975 void print_unknown_token_end(int token_nr)
9978 Error(ERR_INFO_LINE, "-");
9981 void LoadHelpAnimInfo()
9983 char *filename = getHelpAnimFilename();
9984 SetupFileList *setup_file_list = NULL, *list;
9985 SetupFileHash *element_hash, *action_hash, *direction_hash;
9986 int num_list_entries = 0;
9987 int num_unknown_tokens = 0;
9990 if (fileExists(filename))
9991 setup_file_list = loadSetupFileList(filename);
9993 if (setup_file_list == NULL)
9995 /* use reliable default values from static configuration */
9996 SetupFileList *insert_ptr;
9998 insert_ptr = setup_file_list =
9999 newSetupFileList(helpanim_config[0].token,
10000 helpanim_config[0].value);
10002 for (i = 1; helpanim_config[i].token; i++)
10003 insert_ptr = addListEntry(insert_ptr,
10004 helpanim_config[i].token,
10005 helpanim_config[i].value);
10008 element_hash = newSetupFileHash();
10009 action_hash = newSetupFileHash();
10010 direction_hash = newSetupFileHash();
10012 for (i = 0; i < MAX_NUM_ELEMENTS; i++)
10013 setHashEntry(element_hash, element_info[i].token_name, i_to_a(i));
10015 for (i = 0; i < NUM_ACTIONS; i++)
10016 setHashEntry(action_hash, element_action_info[i].suffix,
10017 i_to_a(element_action_info[i].value));
10019 /* do not store direction index (bit) here, but direction value! */
10020 for (i = 0; i < NUM_DIRECTIONS_FULL; i++)
10021 setHashEntry(direction_hash, element_direction_info[i].suffix,
10022 i_to_a(1 << element_direction_info[i].value));
10024 for (list = setup_file_list; list != NULL; list = list->next)
10026 char *element_token, *action_token, *direction_token;
10027 char *element_value, *action_value, *direction_value;
10028 int delay = atoi(list->value);
10030 if (strEqual(list->token, "end"))
10032 add_helpanim_entry(HELPANIM_LIST_NEXT, -1, -1, -1, &num_list_entries);
10037 /* first try to break element into element/action/direction parts;
10038 if this does not work, also accept combined "element[.act][.dir]"
10039 elements (like "dynamite.active"), which are unique elements */
10041 if (strchr(list->token, '.') == NULL) /* token contains no '.' */
10043 element_value = getHashEntry(element_hash, list->token);
10044 if (element_value != NULL) /* element found */
10045 add_helpanim_entry(atoi(element_value), -1, -1, delay,
10046 &num_list_entries);
10049 /* no further suffixes found -- this is not an element */
10050 print_unknown_token(filename, list->token, num_unknown_tokens++);
10056 /* token has format "<prefix>.<something>" */
10058 action_token = strchr(list->token, '.'); /* suffix may be action ... */
10059 direction_token = action_token; /* ... or direction */
10061 element_token = getStringCopy(list->token);
10062 *strchr(element_token, '.') = '\0';
10064 element_value = getHashEntry(element_hash, element_token);
10066 if (element_value == NULL) /* this is no element */
10068 element_value = getHashEntry(element_hash, list->token);
10069 if (element_value != NULL) /* combined element found */
10070 add_helpanim_entry(atoi(element_value), -1, -1, delay,
10071 &num_list_entries);
10073 print_unknown_token(filename, list->token, num_unknown_tokens++);
10075 free(element_token);
10080 action_value = getHashEntry(action_hash, action_token);
10082 if (action_value != NULL) /* action found */
10084 add_helpanim_entry(atoi(element_value), atoi(action_value), -1, delay,
10085 &num_list_entries);
10087 free(element_token);
10092 direction_value = getHashEntry(direction_hash, direction_token);
10094 if (direction_value != NULL) /* direction found */
10096 add_helpanim_entry(atoi(element_value), -1, atoi(direction_value), delay,
10097 &num_list_entries);
10099 free(element_token);
10104 if (strchr(action_token + 1, '.') == NULL)
10106 /* no further suffixes found -- this is not an action nor direction */
10108 element_value = getHashEntry(element_hash, list->token);
10109 if (element_value != NULL) /* combined element found */
10110 add_helpanim_entry(atoi(element_value), -1, -1, delay,
10111 &num_list_entries);
10113 print_unknown_token(filename, list->token, num_unknown_tokens++);
10115 free(element_token);
10120 /* token has format "<prefix>.<suffix>.<something>" */
10122 direction_token = strchr(action_token + 1, '.');
10124 action_token = getStringCopy(action_token);
10125 *strchr(action_token + 1, '.') = '\0';
10127 action_value = getHashEntry(action_hash, action_token);
10129 if (action_value == NULL) /* this is no action */
10131 element_value = getHashEntry(element_hash, list->token);
10132 if (element_value != NULL) /* combined element found */
10133 add_helpanim_entry(atoi(element_value), -1, -1, delay,
10134 &num_list_entries);
10136 print_unknown_token(filename, list->token, num_unknown_tokens++);
10138 free(element_token);
10139 free(action_token);
10144 direction_value = getHashEntry(direction_hash, direction_token);
10146 if (direction_value != NULL) /* direction found */
10148 add_helpanim_entry(atoi(element_value), atoi(action_value),
10149 atoi(direction_value), delay, &num_list_entries);
10151 free(element_token);
10152 free(action_token);
10157 /* this is no direction */
10159 element_value = getHashEntry(element_hash, list->token);
10160 if (element_value != NULL) /* combined element found */
10161 add_helpanim_entry(atoi(element_value), -1, -1, delay,
10162 &num_list_entries);
10164 print_unknown_token(filename, list->token, num_unknown_tokens++);
10166 free(element_token);
10167 free(action_token);
10170 print_unknown_token_end(num_unknown_tokens);
10172 add_helpanim_entry(HELPANIM_LIST_NEXT, -1, -1, -1, &num_list_entries);
10173 add_helpanim_entry(HELPANIM_LIST_END, -1, -1, -1, &num_list_entries);
10175 freeSetupFileList(setup_file_list);
10176 freeSetupFileHash(element_hash);
10177 freeSetupFileHash(action_hash);
10178 freeSetupFileHash(direction_hash);
10181 for (i = 0; i < num_list_entries; i++)
10182 printf("::: '%s': %d, %d, %d => %d\n",
10183 EL_NAME(helpanim_info[i].element),
10184 helpanim_info[i].element,
10185 helpanim_info[i].action,
10186 helpanim_info[i].direction,
10187 helpanim_info[i].delay);
10191 void LoadHelpTextInfo()
10193 char *filename = getHelpTextFilename();
10196 if (helptext_info != NULL)
10198 freeSetupFileHash(helptext_info);
10199 helptext_info = NULL;
10202 if (fileExists(filename))
10203 helptext_info = loadSetupFileHash(filename);
10205 if (helptext_info == NULL)
10207 /* use reliable default values from static configuration */
10208 helptext_info = newSetupFileHash();
10210 for (i = 0; helptext_config[i].token; i++)
10211 setHashEntry(helptext_info,
10212 helptext_config[i].token,
10213 helptext_config[i].value);
10217 BEGIN_HASH_ITERATION(helptext_info, itr)
10219 printf("::: '%s' => '%s'\n",
10220 HASH_ITERATION_TOKEN(itr), HASH_ITERATION_VALUE(itr));
10222 END_HASH_ITERATION(hash, itr)
10227 /* ------------------------------------------------------------------------- */
10228 /* convert levels */
10229 /* ------------------------------------------------------------------------- */
10231 #define MAX_NUM_CONVERT_LEVELS 1000
10233 void ConvertLevels()
10235 static LevelDirTree *convert_leveldir = NULL;
10236 static int convert_level_nr = -1;
10237 static int num_levels_handled = 0;
10238 static int num_levels_converted = 0;
10239 static boolean levels_failed[MAX_NUM_CONVERT_LEVELS];
10242 convert_leveldir = getTreeInfoFromIdentifier(leveldir_first,
10243 global.convert_leveldir);
10245 if (convert_leveldir == NULL)
10246 Error(ERR_EXIT, "no such level identifier: '%s'",
10247 global.convert_leveldir);
10249 leveldir_current = convert_leveldir;
10251 if (global.convert_level_nr != -1)
10253 convert_leveldir->first_level = global.convert_level_nr;
10254 convert_leveldir->last_level = global.convert_level_nr;
10257 convert_level_nr = convert_leveldir->first_level;
10259 PrintLine("=", 79);
10260 Print("Converting levels\n");
10261 PrintLine("-", 79);
10262 Print("Level series identifier: '%s'\n", convert_leveldir->identifier);
10263 Print("Level series name: '%s'\n", convert_leveldir->name);
10264 Print("Level series author: '%s'\n", convert_leveldir->author);
10265 Print("Number of levels: %d\n", convert_leveldir->levels);
10266 PrintLine("=", 79);
10269 for (i = 0; i < MAX_NUM_CONVERT_LEVELS; i++)
10270 levels_failed[i] = FALSE;
10272 while (convert_level_nr <= convert_leveldir->last_level)
10274 char *level_filename;
10277 level_nr = convert_level_nr++;
10279 Print("Level %03d: ", level_nr);
10281 LoadLevel(level_nr);
10282 if (level.no_level_file || level.no_valid_file)
10284 Print("(no level)\n");
10288 Print("converting level ... ");
10290 level_filename = getDefaultLevelFilename(level_nr);
10291 new_level = !fileExists(level_filename);
10295 SaveLevel(level_nr);
10297 num_levels_converted++;
10299 Print("converted.\n");
10303 if (level_nr >= 0 && level_nr < MAX_NUM_CONVERT_LEVELS)
10304 levels_failed[level_nr] = TRUE;
10306 Print("NOT CONVERTED -- LEVEL ALREADY EXISTS.\n");
10309 num_levels_handled++;
10313 PrintLine("=", 79);
10314 Print("Number of levels handled: %d\n", num_levels_handled);
10315 Print("Number of levels converted: %d (%d%%)\n", num_levels_converted,
10316 (num_levels_handled ?
10317 num_levels_converted * 100 / num_levels_handled : 0));
10318 PrintLine("-", 79);
10319 Print("Summary (for automatic parsing by scripts):\n");
10320 Print("LEVELDIR '%s', CONVERTED %d/%d (%d%%)",
10321 convert_leveldir->identifier, num_levels_converted,
10322 num_levels_handled,
10323 (num_levels_handled ?
10324 num_levels_converted * 100 / num_levels_handled : 0));
10326 if (num_levels_handled != num_levels_converted)
10328 Print(", FAILED:");
10329 for (i = 0; i < MAX_NUM_CONVERT_LEVELS; i++)
10330 if (levels_failed[i])
10335 PrintLine("=", 79);
10337 CloseAllAndExit(0);
10341 /* ------------------------------------------------------------------------- */
10342 /* create and save images for use in level sketches (raw BMP format) */
10343 /* ------------------------------------------------------------------------- */
10345 void CreateLevelSketchImages()
10347 #if defined(TARGET_SDL)
10352 InitElementPropertiesGfxElement();
10354 bitmap1 = CreateBitmap(TILEX, TILEY, DEFAULT_DEPTH);
10355 bitmap2 = CreateBitmap(MINI_TILEX, MINI_TILEY, DEFAULT_DEPTH);
10357 for (i = 0; i < NUM_FILE_ELEMENTS; i++)
10359 Bitmap *src_bitmap;
10361 int element = getMappedElement(i);
10362 int graphic = el2edimg(element);
10363 char basename1[16];
10364 char basename2[16];
10368 sprintf(basename1, "%03d.bmp", i);
10369 sprintf(basename2, "%03ds.bmp", i);
10371 filename1 = getPath2(global.create_images_dir, basename1);
10372 filename2 = getPath2(global.create_images_dir, basename2);
10374 getFixedGraphicSource(graphic, 0, &src_bitmap, &src_x, &src_y);
10375 BlitBitmap(src_bitmap, bitmap1, src_x, src_y, TILEX, TILEY,
10378 if (SDL_SaveBMP(bitmap1->surface, filename1) != 0)
10379 Error(ERR_EXIT, "cannot save level sketch image file '%s'", filename1);
10381 getMiniGraphicSource(graphic, &src_bitmap, &src_x, &src_y);
10382 BlitBitmap(src_bitmap, bitmap2, src_x, src_y, MINI_TILEX, MINI_TILEY, 0, 0);
10384 if (SDL_SaveBMP(bitmap2->surface, filename2) != 0)
10385 Error(ERR_EXIT, "cannot save level sketch image file '%s'", filename2);
10391 printf("%03d `%03d%c", i, i, (i % 10 < 9 ? ' ' : '\n'));
10394 FreeBitmap(bitmap1);
10395 FreeBitmap(bitmap2);
10400 Error(ERR_INFO, "%d normal and small images created", NUM_FILE_ELEMENTS);
10402 CloseAllAndExit(0);
10407 /* ------------------------------------------------------------------------- */
10408 /* create and save images for custom and group elements (raw BMP format) */
10409 /* ------------------------------------------------------------------------- */
10411 void CreateCustomElementImages(char *directory)
10413 #if defined(TARGET_SDL)
10414 char *src_basename = "RocksCE-template.ilbm";
10415 char *dst_basename = "RocksCE.bmp";
10416 char *src_filename = getPath2(directory, src_basename);
10417 char *dst_filename = getPath2(directory, dst_basename);
10418 Bitmap *src_bitmap;
10420 int yoffset_ce = 0;
10421 int yoffset_ge = (TILEY * NUM_CUSTOM_ELEMENTS / 16);
10424 SDLInitVideoDisplay();
10426 ReCreateBitmap(&backbuffer, video.width, video.height);
10428 src_bitmap = LoadImage(src_filename);
10430 bitmap = CreateBitmap(TILEX * 16 * 2,
10431 TILEY * (NUM_CUSTOM_ELEMENTS + NUM_GROUP_ELEMENTS) / 16,
10434 for (i = 0; i < NUM_CUSTOM_ELEMENTS; i++)
10441 BlitBitmap(src_bitmap, bitmap, 0, 0, TILEX, TILEY,
10442 TILEX * x, TILEY * y + yoffset_ce);
10444 BlitBitmap(src_bitmap, bitmap, 0, TILEY,
10446 TILEX * x + TILEX * 16,
10447 TILEY * y + yoffset_ce);
10449 for (j = 2; j >= 0; j--)
10453 BlitBitmap(src_bitmap, bitmap,
10454 TILEX + c * 7, 0, 6, 10,
10455 TILEX * x + 6 + j * 7,
10456 TILEY * y + 11 + yoffset_ce);
10458 BlitBitmap(src_bitmap, bitmap,
10459 TILEX + c * 8, TILEY, 6, 10,
10460 TILEX * 16 + TILEX * x + 6 + j * 8,
10461 TILEY * y + 10 + yoffset_ce);
10467 for (i = 0; i < NUM_GROUP_ELEMENTS; i++)
10474 BlitBitmap(src_bitmap, bitmap, 0, 0, TILEX, TILEY,
10475 TILEX * x, TILEY * y + yoffset_ge);
10477 BlitBitmap(src_bitmap, bitmap, 0, TILEY,
10479 TILEX * x + TILEX * 16,
10480 TILEY * y + yoffset_ge);
10482 for (j = 1; j >= 0; j--)
10486 BlitBitmap(src_bitmap, bitmap, TILEX + c * 10, 11, 10, 10,
10487 TILEX * x + 6 + j * 10,
10488 TILEY * y + 11 + yoffset_ge);
10490 BlitBitmap(src_bitmap, bitmap,
10491 TILEX + c * 8, TILEY + 12, 6, 10,
10492 TILEX * 16 + TILEX * x + 10 + j * 8,
10493 TILEY * y + 10 + yoffset_ge);
10499 if (SDL_SaveBMP(bitmap->surface, dst_filename) != 0)
10500 Error(ERR_EXIT, "cannot save CE graphics file '%s'", dst_filename);
10502 FreeBitmap(bitmap);
10504 CloseAllAndExit(0);