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"
24 #define ENABLE_UNUSED_CODE 0 /* currently unused functions */
25 #define ENABLE_HISTORIC_CHUNKS 0 /* only for historic reference */
26 #define ENABLE_RESERVED_CODE 0 /* reserved for later use */
28 #define CHUNK_ID_LEN 4 /* IFF style chunk id length */
29 #define CHUNK_SIZE_UNDEFINED 0 /* undefined chunk size == 0 */
30 #define CHUNK_SIZE_NONE -1 /* do not write chunk size */
32 #define LEVEL_CHUNK_NAME_SIZE MAX_LEVEL_NAME_LEN
33 #define LEVEL_CHUNK_AUTH_SIZE MAX_LEVEL_AUTHOR_LEN
35 #define LEVEL_CHUNK_VERS_SIZE 8 /* size of file version chunk */
36 #define LEVEL_CHUNK_DATE_SIZE 4 /* size of file date chunk */
37 #define LEVEL_CHUNK_HEAD_SIZE 80 /* size of level file header */
38 #define LEVEL_CHUNK_HEAD_UNUSED 0 /* unused level header bytes */
39 #define LEVEL_CHUNK_CNT2_SIZE 160 /* size of level CNT2 chunk */
40 #define LEVEL_CHUNK_CNT2_UNUSED 11 /* unused CNT2 chunk bytes */
41 #define LEVEL_CHUNK_CNT3_HEADER 16 /* size of level CNT3 header */
42 #define LEVEL_CHUNK_CNT3_UNUSED 10 /* unused CNT3 chunk bytes */
43 #define LEVEL_CPART_CUS3_SIZE 134 /* size of CUS3 chunk part */
44 #define LEVEL_CPART_CUS3_UNUSED 15 /* unused CUS3 bytes / part */
45 #define LEVEL_CHUNK_GRP1_SIZE 74 /* size of level GRP1 chunk */
47 /* (element number, number of change pages, change page number) */
48 #define LEVEL_CHUNK_CUSX_UNCHANGED (2 + (1 + 1) + (1 + 1))
50 /* (element number only) */
51 #define LEVEL_CHUNK_GRPX_UNCHANGED 2
52 #define LEVEL_CHUNK_NOTE_UNCHANGED 2
54 /* (nothing at all if unchanged) */
55 #define LEVEL_CHUNK_ELEM_UNCHANGED 0
57 #define TAPE_CHUNK_VERS_SIZE 8 /* size of file version chunk */
58 #define TAPE_CHUNK_HEAD_SIZE 20 /* size of tape file header */
59 #define TAPE_CHUNK_HEAD_UNUSED 3 /* unused tape header bytes */
61 #define LEVEL_CHUNK_CNT3_SIZE(x) (LEVEL_CHUNK_CNT3_HEADER + (x))
62 #define LEVEL_CHUNK_CUS3_SIZE(x) (2 + (x) * LEVEL_CPART_CUS3_SIZE)
63 #define LEVEL_CHUNK_CUS4_SIZE(x) (96 + (x) * 48)
65 /* file identifier strings */
66 #define LEVEL_COOKIE_TMPL "ROCKSNDIAMONDS_LEVEL_FILE_VERSION_x.x"
67 #define TAPE_COOKIE_TMPL "ROCKSNDIAMONDS_TAPE_FILE_VERSION_x.x"
68 #define SCORE_COOKIE "ROCKSNDIAMONDS_SCORE_FILE_VERSION_1.2"
70 /* values for deciding when (not) to save configuration data */
71 #define SAVE_CONF_NEVER 0
72 #define SAVE_CONF_ALWAYS 1
73 #define SAVE_CONF_WHEN_CHANGED -1
75 /* values for chunks using micro chunks */
76 #define CONF_MASK_1_BYTE 0x00
77 #define CONF_MASK_2_BYTE 0x40
78 #define CONF_MASK_4_BYTE 0x80
79 #define CONF_MASK_MULTI_BYTES 0xc0
81 #define CONF_MASK_BYTES 0xc0
82 #define CONF_MASK_TOKEN 0x3f
84 #define CONF_VALUE_1_BYTE(x) (CONF_MASK_1_BYTE | (x))
85 #define CONF_VALUE_2_BYTE(x) (CONF_MASK_2_BYTE | (x))
86 #define CONF_VALUE_4_BYTE(x) (CONF_MASK_4_BYTE | (x))
87 #define CONF_VALUE_MULTI_BYTES(x) (CONF_MASK_MULTI_BYTES | (x))
89 /* these definitions are just for convenience of use and readability */
90 #define CONF_VALUE_8_BIT(x) CONF_VALUE_1_BYTE(x)
91 #define CONF_VALUE_16_BIT(x) CONF_VALUE_2_BYTE(x)
92 #define CONF_VALUE_32_BIT(x) CONF_VALUE_4_BYTE(x)
93 #define CONF_VALUE_BYTES(x) CONF_VALUE_MULTI_BYTES(x)
95 #define CONF_VALUE_NUM_BYTES(x) ((x) == CONF_MASK_1_BYTE ? 1 : \
96 (x) == CONF_MASK_2_BYTE ? 2 : \
97 (x) == CONF_MASK_4_BYTE ? 4 : 0)
99 #define CONF_CONTENT_NUM_ELEMENTS (3 * 3)
100 #define CONF_CONTENT_NUM_BYTES (CONF_CONTENT_NUM_ELEMENTS * 2)
101 #define CONF_ELEMENT_NUM_BYTES (2)
103 #define CONF_ENTITY_NUM_BYTES(t) ((t) == TYPE_ELEMENT || \
104 (t) == TYPE_ELEMENT_LIST ? \
105 CONF_ELEMENT_NUM_BYTES : \
106 (t) == TYPE_CONTENT || \
107 (t) == TYPE_CONTENT_LIST ? \
108 CONF_CONTENT_NUM_BYTES : 1)
110 #define CONF_ELEMENT_BYTE_POS(i) ((i) * CONF_ELEMENT_NUM_BYTES)
111 #define CONF_ELEMENTS_ELEMENT(b,i) ((b[CONF_ELEMENT_BYTE_POS(i)] << 8) | \
112 (b[CONF_ELEMENT_BYTE_POS(i) + 1]))
114 #define CONF_CONTENT_ELEMENT_POS(c,x,y) ((c) * CONF_CONTENT_NUM_ELEMENTS + \
116 #define CONF_CONTENT_BYTE_POS(c,x,y) (CONF_CONTENT_ELEMENT_POS(c,x,y) * \
117 CONF_ELEMENT_NUM_BYTES)
118 #define CONF_CONTENTS_ELEMENT(b,c,x,y) ((b[CONF_CONTENT_BYTE_POS(c,x,y)]<< 8)|\
119 (b[CONF_CONTENT_BYTE_POS(c,x,y) + 1]))
121 /* temporary variables used to store pointers to structure members */
122 static struct LevelInfo li;
123 static struct ElementInfo xx_ei, yy_ei;
124 static struct ElementChangeInfo xx_change;
125 static struct ElementGroupInfo xx_group;
126 static struct EnvelopeInfo xx_envelope;
127 static unsigned int xx_event_bits[NUM_CE_BITFIELDS];
128 static char xx_default_description[MAX_ELEMENT_NAME_LEN + 1];
129 static int xx_num_contents;
130 static int xx_current_change_page;
131 static char xx_default_string_empty[1] = "";
132 static int xx_string_length_unused;
134 struct LevelFileConfigInfo
136 int element; /* element for which data is to be stored */
137 int save_type; /* save data always, never or when changed */
138 int data_type; /* data type (used internally, not stored) */
139 int conf_type; /* micro chunk identifier (stored in file) */
142 void *value; /* variable that holds the data to be stored */
143 int default_value; /* initial default value for this variable */
146 void *value_copy; /* variable that holds the data to be copied */
147 void *num_entities; /* number of entities for multi-byte data */
148 int default_num_entities; /* default number of entities for this data */
149 int max_num_entities; /* maximal number of entities for this data */
150 char *default_string; /* optional default string for string data */
153 static struct LevelFileConfigInfo chunk_config_INFO[] =
155 /* ---------- values not related to single elements ----------------------- */
158 -1, SAVE_CONF_ALWAYS,
159 TYPE_INTEGER, CONF_VALUE_8_BIT(1),
160 &li.game_engine_type, GAME_ENGINE_TYPE_RND
164 -1, SAVE_CONF_ALWAYS,
165 TYPE_INTEGER, CONF_VALUE_16_BIT(1),
166 &li.fieldx, STD_LEV_FIELDX
169 -1, SAVE_CONF_ALWAYS,
170 TYPE_INTEGER, CONF_VALUE_16_BIT(2),
171 &li.fieldy, STD_LEV_FIELDY
175 -1, SAVE_CONF_ALWAYS,
176 TYPE_INTEGER, CONF_VALUE_16_BIT(3),
181 -1, SAVE_CONF_ALWAYS,
182 TYPE_INTEGER, CONF_VALUE_16_BIT(4),
188 TYPE_INTEGER, CONF_VALUE_32_BIT(2),
194 TYPE_BOOLEAN, CONF_VALUE_8_BIT(2),
195 &li.use_step_counter, FALSE
200 TYPE_BITFIELD, CONF_VALUE_8_BIT(4),
201 &li.wind_direction_initial, MV_NONE
206 TYPE_BOOLEAN, CONF_VALUE_8_BIT(5),
207 &li.em_slippery_gems, FALSE
212 TYPE_BOOLEAN, CONF_VALUE_8_BIT(6),
213 &li.use_custom_template, FALSE
218 TYPE_BITFIELD, CONF_VALUE_32_BIT(1),
219 &li.can_move_into_acid_bits, ~0 /* default: everything can */
224 TYPE_BITFIELD, CONF_VALUE_8_BIT(7),
225 &li.dont_collide_with_bits, ~0 /* default: always deadly */
230 TYPE_BOOLEAN, CONF_VALUE_8_BIT(8),
231 &li.em_explodes_by_fire, FALSE
236 TYPE_INTEGER, CONF_VALUE_16_BIT(5),
237 &li.score[SC_TIME_BONUS], 1
242 TYPE_BOOLEAN, CONF_VALUE_8_BIT(9),
243 &li.auto_exit_sokoban, FALSE
253 static struct LevelFileConfigInfo chunk_config_ELEM[] =
255 /* (these values are the same for each player) */
258 TYPE_BOOLEAN, CONF_VALUE_8_BIT(1),
259 &li.block_last_field, FALSE /* default case for EM levels */
263 TYPE_BOOLEAN, CONF_VALUE_8_BIT(2),
264 &li.sp_block_last_field, TRUE /* default case for SP levels */
268 TYPE_BOOLEAN, CONF_VALUE_8_BIT(3),
269 &li.instant_relocation, FALSE
273 TYPE_BOOLEAN, CONF_VALUE_8_BIT(4),
274 &li.can_pass_to_walkable, FALSE
278 TYPE_BOOLEAN, CONF_VALUE_8_BIT(5),
279 &li.block_snap_field, TRUE
283 TYPE_BOOLEAN, CONF_VALUE_8_BIT(6),
284 &li.continuous_snapping, TRUE
288 TYPE_BOOLEAN, CONF_VALUE_8_BIT(12),
289 &li.shifted_relocation, FALSE
293 TYPE_BOOLEAN, CONF_VALUE_8_BIT(15),
294 &li.lazy_relocation, FALSE
297 /* (these values are different for each player) */
300 TYPE_INTEGER, CONF_VALUE_8_BIT(7),
301 &li.initial_player_stepsize[0], STEPSIZE_NORMAL
305 TYPE_BOOLEAN, CONF_VALUE_8_BIT(8),
306 &li.initial_player_gravity[0], FALSE
310 TYPE_BOOLEAN, CONF_VALUE_8_BIT(9),
311 &li.use_start_element[0], FALSE
315 TYPE_ELEMENT, CONF_VALUE_16_BIT(1),
316 &li.start_element[0], EL_PLAYER_1
320 TYPE_BOOLEAN, CONF_VALUE_8_BIT(10),
321 &li.use_artwork_element[0], FALSE
325 TYPE_ELEMENT, CONF_VALUE_16_BIT(2),
326 &li.artwork_element[0], EL_PLAYER_1
330 TYPE_BOOLEAN, CONF_VALUE_8_BIT(11),
331 &li.use_explosion_element[0], FALSE
335 TYPE_ELEMENT, CONF_VALUE_16_BIT(3),
336 &li.explosion_element[0], EL_PLAYER_1
340 TYPE_BOOLEAN, CONF_VALUE_8_BIT(13),
341 &li.use_initial_inventory[0], FALSE
345 TYPE_BOOLEAN, CONF_VALUE_8_BIT(14),
346 &li.initial_inventory_size[0], 1
350 TYPE_ELEMENT_LIST, CONF_VALUE_BYTES(1),
351 &li.initial_inventory_content[0][0],EL_EMPTY, NULL,
352 &li.initial_inventory_size[0], 1, MAX_INITIAL_INVENTORY_SIZE
357 TYPE_INTEGER, CONF_VALUE_8_BIT(7),
358 &li.initial_player_stepsize[1], STEPSIZE_NORMAL
362 TYPE_BOOLEAN, CONF_VALUE_8_BIT(8),
363 &li.initial_player_gravity[1], FALSE
367 TYPE_BOOLEAN, CONF_VALUE_8_BIT(9),
368 &li.use_start_element[1], FALSE
372 TYPE_ELEMENT, CONF_VALUE_16_BIT(1),
373 &li.start_element[1], EL_PLAYER_2
377 TYPE_BOOLEAN, CONF_VALUE_8_BIT(10),
378 &li.use_artwork_element[1], FALSE
382 TYPE_ELEMENT, CONF_VALUE_16_BIT(2),
383 &li.artwork_element[1], EL_PLAYER_2
387 TYPE_BOOLEAN, CONF_VALUE_8_BIT(11),
388 &li.use_explosion_element[1], FALSE
392 TYPE_ELEMENT, CONF_VALUE_16_BIT(3),
393 &li.explosion_element[1], EL_PLAYER_2
397 TYPE_BOOLEAN, CONF_VALUE_8_BIT(13),
398 &li.use_initial_inventory[1], FALSE
402 TYPE_BOOLEAN, CONF_VALUE_8_BIT(14),
403 &li.initial_inventory_size[1], 1
407 TYPE_ELEMENT_LIST, CONF_VALUE_BYTES(1),
408 &li.initial_inventory_content[1][0],EL_EMPTY, NULL,
409 &li.initial_inventory_size[1], 1, MAX_INITIAL_INVENTORY_SIZE
414 TYPE_INTEGER, CONF_VALUE_8_BIT(7),
415 &li.initial_player_stepsize[2], STEPSIZE_NORMAL
419 TYPE_BOOLEAN, CONF_VALUE_8_BIT(8),
420 &li.initial_player_gravity[2], FALSE
424 TYPE_BOOLEAN, CONF_VALUE_8_BIT(9),
425 &li.use_start_element[2], FALSE
429 TYPE_ELEMENT, CONF_VALUE_16_BIT(1),
430 &li.start_element[2], EL_PLAYER_3
434 TYPE_BOOLEAN, CONF_VALUE_8_BIT(10),
435 &li.use_artwork_element[2], FALSE
439 TYPE_ELEMENT, CONF_VALUE_16_BIT(2),
440 &li.artwork_element[2], EL_PLAYER_3
444 TYPE_BOOLEAN, CONF_VALUE_8_BIT(11),
445 &li.use_explosion_element[2], FALSE
449 TYPE_ELEMENT, CONF_VALUE_16_BIT(3),
450 &li.explosion_element[2], EL_PLAYER_3
454 TYPE_BOOLEAN, CONF_VALUE_8_BIT(13),
455 &li.use_initial_inventory[2], FALSE
459 TYPE_BOOLEAN, CONF_VALUE_8_BIT(14),
460 &li.initial_inventory_size[2], 1
464 TYPE_ELEMENT_LIST, CONF_VALUE_BYTES(1),
465 &li.initial_inventory_content[2][0],EL_EMPTY, NULL,
466 &li.initial_inventory_size[2], 1, MAX_INITIAL_INVENTORY_SIZE
471 TYPE_INTEGER, CONF_VALUE_8_BIT(7),
472 &li.initial_player_stepsize[3], STEPSIZE_NORMAL
476 TYPE_BOOLEAN, CONF_VALUE_8_BIT(8),
477 &li.initial_player_gravity[3], FALSE
481 TYPE_BOOLEAN, CONF_VALUE_8_BIT(9),
482 &li.use_start_element[3], FALSE
486 TYPE_ELEMENT, CONF_VALUE_16_BIT(1),
487 &li.start_element[3], EL_PLAYER_4
491 TYPE_BOOLEAN, CONF_VALUE_8_BIT(10),
492 &li.use_artwork_element[3], FALSE
496 TYPE_ELEMENT, CONF_VALUE_16_BIT(2),
497 &li.artwork_element[3], EL_PLAYER_4
501 TYPE_BOOLEAN, CONF_VALUE_8_BIT(11),
502 &li.use_explosion_element[3], FALSE
506 TYPE_ELEMENT, CONF_VALUE_16_BIT(3),
507 &li.explosion_element[3], EL_PLAYER_4
511 TYPE_BOOLEAN, CONF_VALUE_8_BIT(13),
512 &li.use_initial_inventory[3], FALSE
516 TYPE_BOOLEAN, CONF_VALUE_8_BIT(14),
517 &li.initial_inventory_size[3], 1
521 TYPE_ELEMENT_LIST, CONF_VALUE_BYTES(1),
522 &li.initial_inventory_content[3][0],EL_EMPTY, NULL,
523 &li.initial_inventory_size[3], 1, MAX_INITIAL_INVENTORY_SIZE
528 TYPE_INTEGER, CONF_VALUE_16_BIT(1),
529 &li.score[SC_EMERALD], 10
534 TYPE_INTEGER, CONF_VALUE_16_BIT(1),
535 &li.score[SC_DIAMOND], 10
540 TYPE_INTEGER, CONF_VALUE_16_BIT(1),
541 &li.score[SC_BUG], 10
546 TYPE_INTEGER, CONF_VALUE_16_BIT(1),
547 &li.score[SC_SPACESHIP], 10
552 TYPE_INTEGER, CONF_VALUE_16_BIT(1),
553 &li.score[SC_PACMAN], 10
558 TYPE_INTEGER, CONF_VALUE_16_BIT(1),
559 &li.score[SC_NUT], 10
564 TYPE_INTEGER, CONF_VALUE_16_BIT(1),
565 &li.score[SC_DYNAMITE], 10
570 TYPE_INTEGER, CONF_VALUE_16_BIT(1),
571 &li.score[SC_KEY], 10
576 TYPE_INTEGER, CONF_VALUE_16_BIT(1),
577 &li.score[SC_PEARL], 10
582 TYPE_INTEGER, CONF_VALUE_16_BIT(1),
583 &li.score[SC_CRYSTAL], 10
588 TYPE_ELEMENT, CONF_VALUE_16_BIT(1),
589 &li.amoeba_content, EL_DIAMOND
593 TYPE_INTEGER, CONF_VALUE_16_BIT(2),
598 TYPE_BOOLEAN, CONF_VALUE_8_BIT(1),
599 &li.grow_into_diggable, TRUE
604 TYPE_CONTENT_LIST, CONF_VALUE_BYTES(1),
605 &li.yamyam_content, EL_ROCK, NULL,
606 &li.num_yamyam_contents, 4, MAX_ELEMENT_CONTENTS
610 TYPE_INTEGER, CONF_VALUE_16_BIT(1),
611 &li.score[SC_YAMYAM], 10
616 TYPE_INTEGER, CONF_VALUE_16_BIT(1),
617 &li.score[SC_ROBOT], 10
621 TYPE_INTEGER, CONF_VALUE_16_BIT(2),
627 TYPE_INTEGER, CONF_VALUE_16_BIT(1),
633 TYPE_INTEGER, CONF_VALUE_16_BIT(1),
634 &li.time_magic_wall, 10
639 TYPE_INTEGER, CONF_VALUE_8_BIT(1),
640 &li.game_of_life[0], 2
644 TYPE_INTEGER, CONF_VALUE_8_BIT(2),
645 &li.game_of_life[1], 3
649 TYPE_INTEGER, CONF_VALUE_8_BIT(3),
650 &li.game_of_life[2], 3
654 TYPE_INTEGER, CONF_VALUE_8_BIT(4),
655 &li.game_of_life[3], 3
660 TYPE_INTEGER, CONF_VALUE_8_BIT(1),
665 TYPE_INTEGER, CONF_VALUE_8_BIT(2),
670 TYPE_INTEGER, CONF_VALUE_8_BIT(3),
675 TYPE_INTEGER, CONF_VALUE_8_BIT(4),
680 EL_TIMEGATE_SWITCH, -1,
681 TYPE_INTEGER, CONF_VALUE_16_BIT(1),
682 &li.time_timegate, 10
686 EL_LIGHT_SWITCH_ACTIVE, -1,
687 TYPE_INTEGER, CONF_VALUE_16_BIT(1),
692 EL_SHIELD_NORMAL, -1,
693 TYPE_INTEGER, CONF_VALUE_16_BIT(1),
694 &li.shield_normal_time, 10
697 EL_SHIELD_NORMAL, -1,
698 TYPE_INTEGER, CONF_VALUE_16_BIT(2),
699 &li.score[SC_SHIELD], 10
703 EL_SHIELD_DEADLY, -1,
704 TYPE_INTEGER, CONF_VALUE_16_BIT(1),
705 &li.shield_deadly_time, 10
708 EL_SHIELD_DEADLY, -1,
709 TYPE_INTEGER, CONF_VALUE_16_BIT(2),
710 &li.score[SC_SHIELD], 10
715 TYPE_INTEGER, CONF_VALUE_16_BIT(1),
720 TYPE_INTEGER, CONF_VALUE_16_BIT(2),
721 &li.extra_time_score, 10
725 EL_TIME_ORB_FULL, -1,
726 TYPE_INTEGER, CONF_VALUE_16_BIT(1),
727 &li.time_orb_time, 10
730 EL_TIME_ORB_FULL, -1,
731 TYPE_BOOLEAN, CONF_VALUE_8_BIT(1),
732 &li.use_time_orb_bug, FALSE
737 TYPE_BOOLEAN, CONF_VALUE_8_BIT(1),
738 &li.use_spring_bug, FALSE
743 TYPE_INTEGER, CONF_VALUE_16_BIT(1),
744 &li.android_move_time, 10
748 TYPE_INTEGER, CONF_VALUE_16_BIT(2),
749 &li.android_clone_time, 10
753 TYPE_ELEMENT_LIST, CONF_VALUE_BYTES(1),
754 &li.android_clone_element[0], EL_EMPTY, NULL,
755 &li.num_android_clone_elements, 1, MAX_ANDROID_ELEMENTS
760 TYPE_INTEGER, CONF_VALUE_16_BIT(1),
765 TYPE_INTEGER, CONF_VALUE_16_BIT(2),
770 EL_EMC_MAGNIFIER, -1,
771 TYPE_INTEGER, CONF_VALUE_16_BIT(1),
772 &li.magnify_score, 10
775 EL_EMC_MAGNIFIER, -1,
776 TYPE_INTEGER, CONF_VALUE_16_BIT(2),
781 EL_EMC_MAGIC_BALL, -1,
782 TYPE_INTEGER, CONF_VALUE_16_BIT(1),
786 EL_EMC_MAGIC_BALL, -1,
787 TYPE_BOOLEAN, CONF_VALUE_8_BIT(1),
788 &li.ball_random, FALSE
791 EL_EMC_MAGIC_BALL, -1,
792 TYPE_BOOLEAN, CONF_VALUE_8_BIT(2),
793 &li.ball_state_initial, FALSE
796 EL_EMC_MAGIC_BALL, -1,
797 TYPE_CONTENT_LIST, CONF_VALUE_BYTES(1),
798 &li.ball_content, EL_EMPTY, NULL,
799 &li.num_ball_contents, 4, MAX_ELEMENT_CONTENTS
802 /* ---------- unused values ----------------------------------------------- */
805 EL_UNKNOWN, SAVE_CONF_NEVER,
806 TYPE_INTEGER, CONF_VALUE_16_BIT(1),
807 &li.score[SC_UNKNOWN_14], 10
810 EL_UNKNOWN, SAVE_CONF_NEVER,
811 TYPE_INTEGER, CONF_VALUE_16_BIT(2),
812 &li.score[SC_UNKNOWN_15], 10
822 static struct LevelFileConfigInfo chunk_config_NOTE[] =
826 TYPE_INTEGER, CONF_VALUE_8_BIT(1),
827 &xx_envelope.xsize, MAX_ENVELOPE_XSIZE,
831 TYPE_INTEGER, CONF_VALUE_8_BIT(2),
832 &xx_envelope.ysize, MAX_ENVELOPE_YSIZE,
837 TYPE_BOOLEAN, CONF_VALUE_8_BIT(3),
838 &xx_envelope.autowrap, FALSE
842 TYPE_BOOLEAN, CONF_VALUE_8_BIT(4),
843 &xx_envelope.centered, FALSE
848 TYPE_STRING, CONF_VALUE_BYTES(1),
849 &xx_envelope.text, -1, NULL,
850 &xx_string_length_unused, -1, MAX_ENVELOPE_TEXT_LEN,
851 &xx_default_string_empty[0]
861 static struct LevelFileConfigInfo chunk_config_CUSX_base[] =
865 TYPE_STRING, CONF_VALUE_BYTES(1),
866 &xx_ei.description[0], -1,
867 &yy_ei.description[0],
868 &xx_string_length_unused, -1, MAX_ELEMENT_NAME_LEN,
869 &xx_default_description[0]
874 TYPE_BITFIELD, CONF_VALUE_32_BIT(1),
875 &xx_ei.properties[EP_BITFIELD_BASE_NR], EP_BITMASK_BASE_DEFAULT,
876 &yy_ei.properties[EP_BITFIELD_BASE_NR]
878 #if ENABLE_RESERVED_CODE
879 /* (reserved for later use) */
882 TYPE_BITFIELD, CONF_VALUE_32_BIT(2),
883 &xx_ei.properties[EP_BITFIELD_BASE_NR + 1], EP_BITMASK_DEFAULT,
884 &yy_ei.properties[EP_BITFIELD_BASE_NR + 1]
890 TYPE_BOOLEAN, CONF_VALUE_8_BIT(1),
891 &xx_ei.use_gfx_element, FALSE,
892 &yy_ei.use_gfx_element
896 TYPE_ELEMENT, CONF_VALUE_16_BIT(1),
897 &xx_ei.gfx_element_initial, EL_EMPTY_SPACE,
898 &yy_ei.gfx_element_initial
903 TYPE_BITFIELD, CONF_VALUE_8_BIT(2),
904 &xx_ei.access_direction, MV_ALL_DIRECTIONS,
905 &yy_ei.access_direction
910 TYPE_INTEGER, CONF_VALUE_16_BIT(2),
911 &xx_ei.collect_score_initial, 10,
912 &yy_ei.collect_score_initial
916 TYPE_INTEGER, CONF_VALUE_16_BIT(3),
917 &xx_ei.collect_count_initial, 1,
918 &yy_ei.collect_count_initial
923 TYPE_INTEGER, CONF_VALUE_16_BIT(4),
924 &xx_ei.ce_value_fixed_initial, 0,
925 &yy_ei.ce_value_fixed_initial
929 TYPE_INTEGER, CONF_VALUE_16_BIT(5),
930 &xx_ei.ce_value_random_initial, 0,
931 &yy_ei.ce_value_random_initial
935 TYPE_BOOLEAN, CONF_VALUE_8_BIT(3),
936 &xx_ei.use_last_ce_value, FALSE,
937 &yy_ei.use_last_ce_value
942 TYPE_INTEGER, CONF_VALUE_16_BIT(6),
943 &xx_ei.push_delay_fixed, 8,
944 &yy_ei.push_delay_fixed
948 TYPE_INTEGER, CONF_VALUE_16_BIT(7),
949 &xx_ei.push_delay_random, 8,
950 &yy_ei.push_delay_random
954 TYPE_INTEGER, CONF_VALUE_16_BIT(8),
955 &xx_ei.drop_delay_fixed, 0,
956 &yy_ei.drop_delay_fixed
960 TYPE_INTEGER, CONF_VALUE_16_BIT(9),
961 &xx_ei.drop_delay_random, 0,
962 &yy_ei.drop_delay_random
966 TYPE_INTEGER, CONF_VALUE_16_BIT(10),
967 &xx_ei.move_delay_fixed, 0,
968 &yy_ei.move_delay_fixed
972 TYPE_INTEGER, CONF_VALUE_16_BIT(11),
973 &xx_ei.move_delay_random, 0,
974 &yy_ei.move_delay_random
979 TYPE_BITFIELD, CONF_VALUE_32_BIT(3),
980 &xx_ei.move_pattern, MV_ALL_DIRECTIONS,
985 TYPE_BITFIELD, CONF_VALUE_8_BIT(4),
986 &xx_ei.move_direction_initial, MV_START_AUTOMATIC,
987 &yy_ei.move_direction_initial
991 TYPE_INTEGER, CONF_VALUE_8_BIT(5),
992 &xx_ei.move_stepsize, TILEX / 8,
998 TYPE_ELEMENT, CONF_VALUE_16_BIT(12),
999 &xx_ei.move_enter_element, EL_EMPTY_SPACE,
1000 &yy_ei.move_enter_element
1004 TYPE_ELEMENT, CONF_VALUE_16_BIT(13),
1005 &xx_ei.move_leave_element, EL_EMPTY_SPACE,
1006 &yy_ei.move_leave_element
1010 TYPE_INTEGER, CONF_VALUE_8_BIT(6),
1011 &xx_ei.move_leave_type, LEAVE_TYPE_UNLIMITED,
1012 &yy_ei.move_leave_type
1017 TYPE_INTEGER, CONF_VALUE_8_BIT(7),
1018 &xx_ei.slippery_type, SLIPPERY_ANY_RANDOM,
1019 &yy_ei.slippery_type
1024 TYPE_INTEGER, CONF_VALUE_8_BIT(8),
1025 &xx_ei.explosion_type, EXPLODES_3X3,
1026 &yy_ei.explosion_type
1030 TYPE_INTEGER, CONF_VALUE_16_BIT(14),
1031 &xx_ei.explosion_delay, 16,
1032 &yy_ei.explosion_delay
1036 TYPE_INTEGER, CONF_VALUE_16_BIT(15),
1037 &xx_ei.ignition_delay, 8,
1038 &yy_ei.ignition_delay
1043 TYPE_CONTENT_LIST, CONF_VALUE_BYTES(2),
1044 &xx_ei.content, EL_EMPTY_SPACE,
1046 &xx_num_contents, 1, 1
1049 /* ---------- "num_change_pages" must be the last entry ------------------- */
1052 -1, SAVE_CONF_ALWAYS,
1053 TYPE_INTEGER, CONF_VALUE_8_BIT(9),
1054 &xx_ei.num_change_pages, 1,
1055 &yy_ei.num_change_pages
1066 static struct LevelFileConfigInfo chunk_config_CUSX_change[] =
1068 /* ---------- "current_change_page" must be the first entry --------------- */
1071 -1, SAVE_CONF_ALWAYS,
1072 TYPE_INTEGER, CONF_VALUE_8_BIT(1),
1073 &xx_current_change_page, -1
1076 /* ---------- (the remaining entries can be in any order) ----------------- */
1080 TYPE_BOOLEAN, CONF_VALUE_8_BIT(2),
1081 &xx_change.can_change, FALSE
1086 TYPE_BITFIELD, CONF_VALUE_32_BIT(1),
1087 &xx_event_bits[0], 0
1091 TYPE_BITFIELD, CONF_VALUE_32_BIT(2),
1092 &xx_event_bits[1], 0
1097 TYPE_BITFIELD, CONF_VALUE_8_BIT(3),
1098 &xx_change.trigger_player, CH_PLAYER_ANY
1102 TYPE_BITFIELD, CONF_VALUE_8_BIT(4),
1103 &xx_change.trigger_side, CH_SIDE_ANY
1107 TYPE_BITFIELD, CONF_VALUE_32_BIT(3),
1108 &xx_change.trigger_page, CH_PAGE_ANY
1113 TYPE_ELEMENT, CONF_VALUE_16_BIT(1),
1114 &xx_change.target_element, EL_EMPTY_SPACE
1119 TYPE_INTEGER, CONF_VALUE_16_BIT(2),
1120 &xx_change.delay_fixed, 0
1124 TYPE_INTEGER, CONF_VALUE_16_BIT(3),
1125 &xx_change.delay_random, 0
1129 TYPE_INTEGER, CONF_VALUE_16_BIT(4),
1130 &xx_change.delay_frames, FRAMES_PER_SECOND
1135 TYPE_ELEMENT, CONF_VALUE_16_BIT(5),
1136 &xx_change.initial_trigger_element, EL_EMPTY_SPACE
1141 TYPE_BOOLEAN, CONF_VALUE_8_BIT(6),
1142 &xx_change.explode, FALSE
1146 TYPE_BOOLEAN, CONF_VALUE_8_BIT(7),
1147 &xx_change.use_target_content, FALSE
1151 TYPE_BOOLEAN, CONF_VALUE_8_BIT(8),
1152 &xx_change.only_if_complete, FALSE
1156 TYPE_BOOLEAN, CONF_VALUE_8_BIT(9),
1157 &xx_change.use_random_replace, FALSE
1161 TYPE_INTEGER, CONF_VALUE_8_BIT(10),
1162 &xx_change.random_percentage, 100
1166 TYPE_INTEGER, CONF_VALUE_8_BIT(11),
1167 &xx_change.replace_when, CP_WHEN_EMPTY
1172 TYPE_BOOLEAN, CONF_VALUE_8_BIT(12),
1173 &xx_change.has_action, FALSE
1177 TYPE_INTEGER, CONF_VALUE_8_BIT(13),
1178 &xx_change.action_type, CA_NO_ACTION
1182 TYPE_INTEGER, CONF_VALUE_8_BIT(14),
1183 &xx_change.action_mode, CA_MODE_UNDEFINED
1187 TYPE_INTEGER, CONF_VALUE_16_BIT(6),
1188 &xx_change.action_arg, CA_ARG_UNDEFINED
1193 TYPE_ELEMENT, CONF_VALUE_16_BIT(7),
1194 &xx_change.action_element, EL_EMPTY_SPACE
1199 TYPE_CONTENT_LIST, CONF_VALUE_BYTES(1),
1200 &xx_change.target_content, EL_EMPTY_SPACE, NULL,
1201 &xx_num_contents, 1, 1
1211 static struct LevelFileConfigInfo chunk_config_GRPX[] =
1215 TYPE_STRING, CONF_VALUE_BYTES(1),
1216 &xx_ei.description[0], -1, NULL,
1217 &xx_string_length_unused, -1, MAX_ELEMENT_NAME_LEN,
1218 &xx_default_description[0]
1223 TYPE_BOOLEAN, CONF_VALUE_8_BIT(1),
1224 &xx_ei.use_gfx_element, FALSE
1228 TYPE_ELEMENT, CONF_VALUE_16_BIT(1),
1229 &xx_ei.gfx_element_initial, EL_EMPTY_SPACE
1234 TYPE_INTEGER, CONF_VALUE_8_BIT(2),
1235 &xx_group.choice_mode, ANIM_RANDOM
1240 TYPE_ELEMENT_LIST, CONF_VALUE_BYTES(2),
1241 &xx_group.element[0], EL_EMPTY_SPACE, NULL,
1242 &xx_group.num_elements, 1, MAX_ELEMENTS_IN_GROUP
1252 static struct LevelFileConfigInfo chunk_config_CONF[] = /* (OBSOLETE) */
1256 TYPE_BOOLEAN, CONF_VALUE_8_BIT(9),
1257 &li.block_snap_field, TRUE
1261 TYPE_BOOLEAN, CONF_VALUE_8_BIT(13),
1262 &li.continuous_snapping, TRUE
1266 TYPE_INTEGER, CONF_VALUE_8_BIT(1),
1267 &li.initial_player_stepsize[0], STEPSIZE_NORMAL
1271 TYPE_BOOLEAN, CONF_VALUE_8_BIT(10),
1272 &li.use_start_element[0], FALSE
1276 TYPE_ELEMENT, CONF_VALUE_16_BIT(1),
1277 &li.start_element[0], EL_PLAYER_1
1281 TYPE_BOOLEAN, CONF_VALUE_8_BIT(11),
1282 &li.use_artwork_element[0], FALSE
1286 TYPE_ELEMENT, CONF_VALUE_16_BIT(2),
1287 &li.artwork_element[0], EL_PLAYER_1
1291 TYPE_BOOLEAN, CONF_VALUE_8_BIT(12),
1292 &li.use_explosion_element[0], FALSE
1296 TYPE_ELEMENT, CONF_VALUE_16_BIT(3),
1297 &li.explosion_element[0], EL_PLAYER_1
1312 filetype_id_list[] =
1314 { LEVEL_FILE_TYPE_RND, "RND" },
1315 { LEVEL_FILE_TYPE_BD, "BD" },
1316 { LEVEL_FILE_TYPE_EM, "EM" },
1317 { LEVEL_FILE_TYPE_SP, "SP" },
1318 { LEVEL_FILE_TYPE_DX, "DX" },
1319 { LEVEL_FILE_TYPE_SB, "SB" },
1320 { LEVEL_FILE_TYPE_DC, "DC" },
1325 /* ========================================================================= */
1326 /* level file functions */
1327 /* ========================================================================= */
1329 static boolean check_special_flags(char *flag)
1331 if (strEqual(options.special_flags, flag) ||
1332 strEqual(leveldir_current->special_flags, flag))
1338 static struct DateInfo getCurrentDate()
1340 time_t epoch_seconds = time(NULL);
1341 struct tm *now = localtime(&epoch_seconds);
1342 struct DateInfo date;
1344 date.year = now->tm_year + 1900;
1345 date.month = now->tm_mon + 1;
1346 date.day = now->tm_mday;
1348 date.src = DATE_SRC_CLOCK;
1353 static void resetEventFlags(struct ElementChangeInfo *change)
1357 for (i = 0; i < NUM_CHANGE_EVENTS; i++)
1358 change->has_event[i] = FALSE;
1361 static void resetEventBits()
1365 for (i = 0; i < NUM_CE_BITFIELDS; i++)
1366 xx_event_bits[i] = 0;
1369 static void setEventFlagsFromEventBits(struct ElementChangeInfo *change)
1373 /* important: only change event flag if corresponding event bit is set
1374 (this is because all xx_event_bits[] values are loaded separately,
1375 and all xx_event_bits[] values are set back to zero before loading
1376 another value xx_event_bits[x] (each value representing 32 flags)) */
1378 for (i = 0; i < NUM_CHANGE_EVENTS; i++)
1379 if (xx_event_bits[CH_EVENT_BITFIELD_NR(i)] & CH_EVENT_BIT(i))
1380 change->has_event[i] = TRUE;
1383 static void setEventBitsFromEventFlags(struct ElementChangeInfo *change)
1387 /* in contrast to the above function setEventFlagsFromEventBits(), it
1388 would also be possible to set all bits in xx_event_bits[] to 0 or 1
1389 depending on the corresponding change->has_event[i] values here, as
1390 all xx_event_bits[] values are reset in resetEventBits() before */
1392 for (i = 0; i < NUM_CHANGE_EVENTS; i++)
1393 if (change->has_event[i])
1394 xx_event_bits[CH_EVENT_BITFIELD_NR(i)] |= CH_EVENT_BIT(i);
1397 static char *getDefaultElementDescription(struct ElementInfo *ei)
1399 static char description[MAX_ELEMENT_NAME_LEN + 1];
1400 char *default_description = (ei->custom_description != NULL ?
1401 ei->custom_description :
1402 ei->editor_description);
1405 /* always start with reliable default values */
1406 for (i = 0; i < MAX_ELEMENT_NAME_LEN + 1; i++)
1407 description[i] = '\0';
1409 /* truncate element description to MAX_ELEMENT_NAME_LEN bytes */
1410 strncpy(description, default_description, MAX_ELEMENT_NAME_LEN);
1412 return &description[0];
1415 static void setElementDescriptionToDefault(struct ElementInfo *ei)
1417 char *default_description = getDefaultElementDescription(ei);
1420 for (i = 0; i < MAX_ELEMENT_NAME_LEN + 1; i++)
1421 ei->description[i] = default_description[i];
1424 static void setConfigToDefaultsFromConfigList(struct LevelFileConfigInfo *conf)
1428 for (i = 0; conf[i].data_type != -1; i++)
1430 int default_value = conf[i].default_value;
1431 int data_type = conf[i].data_type;
1432 int conf_type = conf[i].conf_type;
1433 int byte_mask = conf_type & CONF_MASK_BYTES;
1435 if (byte_mask == CONF_MASK_MULTI_BYTES)
1437 int default_num_entities = conf[i].default_num_entities;
1438 int max_num_entities = conf[i].max_num_entities;
1440 *(int *)(conf[i].num_entities) = default_num_entities;
1442 if (data_type == TYPE_STRING)
1444 char *default_string = conf[i].default_string;
1445 char *string = (char *)(conf[i].value);
1447 strncpy(string, default_string, max_num_entities);
1449 else if (data_type == TYPE_ELEMENT_LIST)
1451 int *element_array = (int *)(conf[i].value);
1454 for (j = 0; j < max_num_entities; j++)
1455 element_array[j] = default_value;
1457 else if (data_type == TYPE_CONTENT_LIST)
1459 struct Content *content = (struct Content *)(conf[i].value);
1462 for (c = 0; c < max_num_entities; c++)
1463 for (y = 0; y < 3; y++)
1464 for (x = 0; x < 3; x++)
1465 content[c].e[x][y] = default_value;
1468 else /* constant size configuration data (1, 2 or 4 bytes) */
1470 if (data_type == TYPE_BOOLEAN)
1471 *(boolean *)(conf[i].value) = default_value;
1473 *(int *) (conf[i].value) = default_value;
1478 static void copyConfigFromConfigList(struct LevelFileConfigInfo *conf)
1482 for (i = 0; conf[i].data_type != -1; i++)
1484 int data_type = conf[i].data_type;
1485 int conf_type = conf[i].conf_type;
1486 int byte_mask = conf_type & CONF_MASK_BYTES;
1488 if (byte_mask == CONF_MASK_MULTI_BYTES)
1490 int max_num_entities = conf[i].max_num_entities;
1492 if (data_type == TYPE_STRING)
1494 char *string = (char *)(conf[i].value);
1495 char *string_copy = (char *)(conf[i].value_copy);
1497 strncpy(string_copy, string, max_num_entities);
1499 else if (data_type == TYPE_ELEMENT_LIST)
1501 int *element_array = (int *)(conf[i].value);
1502 int *element_array_copy = (int *)(conf[i].value_copy);
1505 for (j = 0; j < max_num_entities; j++)
1506 element_array_copy[j] = element_array[j];
1508 else if (data_type == TYPE_CONTENT_LIST)
1510 struct Content *content = (struct Content *)(conf[i].value);
1511 struct Content *content_copy = (struct Content *)(conf[i].value_copy);
1514 for (c = 0; c < max_num_entities; c++)
1515 for (y = 0; y < 3; y++)
1516 for (x = 0; x < 3; x++)
1517 content_copy[c].e[x][y] = content[c].e[x][y];
1520 else /* constant size configuration data (1, 2 or 4 bytes) */
1522 if (data_type == TYPE_BOOLEAN)
1523 *(boolean *)(conf[i].value_copy) = *(boolean *)(conf[i].value);
1525 *(int *) (conf[i].value_copy) = *(int *) (conf[i].value);
1530 void copyElementInfo(struct ElementInfo *ei_from, struct ElementInfo *ei_to)
1534 xx_ei = *ei_from; /* copy element data into temporary buffer */
1535 yy_ei = *ei_to; /* copy element data into temporary buffer */
1537 copyConfigFromConfigList(chunk_config_CUSX_base);
1542 /* ---------- reinitialize and copy change pages ---------- */
1544 ei_to->num_change_pages = ei_from->num_change_pages;
1545 ei_to->current_change_page = ei_from->current_change_page;
1547 setElementChangePages(ei_to, ei_to->num_change_pages);
1549 for (i = 0; i < ei_to->num_change_pages; i++)
1550 ei_to->change_page[i] = ei_from->change_page[i];
1552 /* ---------- copy group element info ---------- */
1553 if (ei_from->group != NULL && ei_to->group != NULL) /* group or internal */
1554 *ei_to->group = *ei_from->group;
1556 /* mark this custom element as modified */
1557 ei_to->modified_settings = TRUE;
1560 void setElementChangePages(struct ElementInfo *ei, int change_pages)
1562 int change_page_size = sizeof(struct ElementChangeInfo);
1564 ei->num_change_pages = MAX(1, change_pages);
1567 checked_realloc(ei->change_page, ei->num_change_pages * change_page_size);
1569 if (ei->current_change_page >= ei->num_change_pages)
1570 ei->current_change_page = ei->num_change_pages - 1;
1572 ei->change = &ei->change_page[ei->current_change_page];
1575 void setElementChangeInfoToDefaults(struct ElementChangeInfo *change)
1577 xx_change = *change; /* copy change data into temporary buffer */
1579 setConfigToDefaultsFromConfigList(chunk_config_CUSX_change);
1581 *change = xx_change;
1583 resetEventFlags(change);
1585 change->direct_action = 0;
1586 change->other_action = 0;
1588 change->pre_change_function = NULL;
1589 change->change_function = NULL;
1590 change->post_change_function = NULL;
1593 static void setLevelInfoToDefaults_Level(struct LevelInfo *level)
1597 li = *level; /* copy level data into temporary buffer */
1598 setConfigToDefaultsFromConfigList(chunk_config_INFO);
1599 *level = li; /* copy temporary buffer back to level data */
1601 setLevelInfoToDefaults_EM();
1602 setLevelInfoToDefaults_SP();
1604 level->native_em_level = &native_em_level;
1605 level->native_sp_level = &native_sp_level;
1607 level->file_version = FILE_VERSION_ACTUAL;
1608 level->game_version = GAME_VERSION_ACTUAL;
1610 level->creation_date = getCurrentDate();
1612 level->encoding_16bit_field = TRUE;
1613 level->encoding_16bit_yamyam = TRUE;
1614 level->encoding_16bit_amoeba = TRUE;
1616 /* clear level name and level author string buffers */
1617 for (i = 0; i < MAX_LEVEL_NAME_LEN; i++)
1618 level->name[i] = '\0';
1619 for (i = 0; i < MAX_LEVEL_AUTHOR_LEN; i++)
1620 level->author[i] = '\0';
1622 /* set level name and level author to default values */
1623 strcpy(level->name, NAMELESS_LEVEL_NAME);
1624 strcpy(level->author, ANONYMOUS_NAME);
1626 /* set level playfield to playable default level with player and exit */
1627 for (x = 0; x < MAX_LEV_FIELDX; x++)
1628 for (y = 0; y < MAX_LEV_FIELDY; y++)
1629 level->field[x][y] = EL_SAND;
1631 level->field[0][0] = EL_PLAYER_1;
1632 level->field[STD_LEV_FIELDX - 1][STD_LEV_FIELDY - 1] = EL_EXIT_CLOSED;
1634 BorderElement = EL_STEELWALL;
1636 /* set all bug compatibility flags to "false" => do not emulate this bug */
1637 level->use_action_after_change_bug = FALSE;
1639 if (leveldir_current)
1641 /* try to determine better author name than 'anonymous' */
1642 if (!strEqual(leveldir_current->author, ANONYMOUS_NAME))
1644 strncpy(level->author, leveldir_current->author, MAX_LEVEL_AUTHOR_LEN);
1645 level->author[MAX_LEVEL_AUTHOR_LEN] = '\0';
1649 switch (LEVELCLASS(leveldir_current))
1651 case LEVELCLASS_TUTORIAL:
1652 strcpy(level->author, PROGRAM_AUTHOR_STRING);
1655 case LEVELCLASS_CONTRIB:
1656 strncpy(level->author, leveldir_current->name, MAX_LEVEL_AUTHOR_LEN);
1657 level->author[MAX_LEVEL_AUTHOR_LEN] = '\0';
1660 case LEVELCLASS_PRIVATE:
1661 strncpy(level->author, getRealName(), MAX_LEVEL_AUTHOR_LEN);
1662 level->author[MAX_LEVEL_AUTHOR_LEN] = '\0';
1666 /* keep default value */
1673 static void setLevelInfoToDefaults_Elements(struct LevelInfo *level)
1675 static boolean clipboard_elements_initialized = FALSE;
1678 InitElementPropertiesStatic();
1680 li = *level; /* copy level data into temporary buffer */
1681 setConfigToDefaultsFromConfigList(chunk_config_ELEM);
1682 *level = li; /* copy temporary buffer back to level data */
1684 for (i = 0; i < MAX_NUM_ELEMENTS; i++)
1687 struct ElementInfo *ei = &element_info[element];
1689 /* never initialize clipboard elements after the very first time */
1690 /* (to be able to use clipboard elements between several levels) */
1691 if (IS_CLIPBOARD_ELEMENT(element) && clipboard_elements_initialized)
1694 if (IS_ENVELOPE(element))
1696 int envelope_nr = element - EL_ENVELOPE_1;
1698 setConfigToDefaultsFromConfigList(chunk_config_NOTE);
1700 level->envelope[envelope_nr] = xx_envelope;
1703 if (IS_CUSTOM_ELEMENT(element) ||
1704 IS_GROUP_ELEMENT(element) ||
1705 IS_INTERNAL_ELEMENT(element))
1707 xx_ei = *ei; /* copy element data into temporary buffer */
1709 setConfigToDefaultsFromConfigList(chunk_config_CUSX_base);
1714 setElementChangePages(ei, 1);
1715 setElementChangeInfoToDefaults(ei->change);
1717 if (IS_CUSTOM_ELEMENT(element) ||
1718 IS_GROUP_ELEMENT(element) ||
1719 IS_INTERNAL_ELEMENT(element))
1721 setElementDescriptionToDefault(ei);
1723 ei->modified_settings = FALSE;
1726 if (IS_CUSTOM_ELEMENT(element) ||
1727 IS_INTERNAL_ELEMENT(element))
1729 /* internal values used in level editor */
1731 ei->access_type = 0;
1732 ei->access_layer = 0;
1733 ei->access_protected = 0;
1734 ei->walk_to_action = 0;
1735 ei->smash_targets = 0;
1738 ei->can_explode_by_fire = FALSE;
1739 ei->can_explode_smashed = FALSE;
1740 ei->can_explode_impact = FALSE;
1742 ei->current_change_page = 0;
1745 if (IS_GROUP_ELEMENT(element) ||
1746 IS_INTERNAL_ELEMENT(element))
1748 struct ElementGroupInfo *group;
1750 /* initialize memory for list of elements in group */
1751 if (ei->group == NULL)
1752 ei->group = checked_malloc(sizeof(struct ElementGroupInfo));
1756 xx_group = *group; /* copy group data into temporary buffer */
1758 setConfigToDefaultsFromConfigList(chunk_config_GRPX);
1764 clipboard_elements_initialized = TRUE;
1767 static void setLevelInfoToDefaults(struct LevelInfo *level,
1768 boolean level_info_only)
1770 setLevelInfoToDefaults_Level(level);
1772 if (!level_info_only)
1773 setLevelInfoToDefaults_Elements(level);
1775 level->no_valid_file = FALSE;
1777 level->changed = FALSE;
1780 static void setFileInfoToDefaults(struct LevelFileInfo *level_file_info)
1782 level_file_info->nr = 0;
1783 level_file_info->type = LEVEL_FILE_TYPE_UNKNOWN;
1784 level_file_info->packed = FALSE;
1785 level_file_info->basename = NULL;
1786 level_file_info->filename = NULL;
1789 int getMappedElement_SB(int, boolean);
1791 static void ActivateLevelTemplate()
1795 if (check_special_flags("load_xsb_to_ces"))
1797 /* fill smaller playfields with padding "beyond border wall" elements */
1798 if (level.fieldx < level_template.fieldx ||
1799 level.fieldy < level_template.fieldy)
1801 short field[level.fieldx][level.fieldy];
1802 int new_fieldx = MAX(level.fieldx, level_template.fieldx);
1803 int new_fieldy = MAX(level.fieldy, level_template.fieldy);
1804 int pos_fieldx = (new_fieldx - level.fieldx) / 2;
1805 int pos_fieldy = (new_fieldy - level.fieldy) / 2;
1807 /* copy old playfield (which is smaller than the visible area) */
1808 for (y = 0; y < level.fieldy; y++) for (x = 0; x < level.fieldx; x++)
1809 field[x][y] = level.field[x][y];
1811 /* fill new, larger playfield with "beyond border wall" elements */
1812 for (y = 0; y < new_fieldy; y++) for (x = 0; x < new_fieldx; x++)
1813 level.field[x][y] = getMappedElement_SB('_', TRUE);
1815 /* copy the old playfield to the middle of the new playfield */
1816 for (y = 0; y < level.fieldy; y++) for (x = 0; x < level.fieldx; x++)
1817 level.field[pos_fieldx + x][pos_fieldy + y] = field[x][y];
1819 level.fieldx = new_fieldx;
1820 level.fieldy = new_fieldy;
1824 /* Currently there is no special action needed to activate the template
1825 data, because 'element_info' property settings overwrite the original
1826 level data, while all other variables do not change. */
1828 /* Exception: 'from_level_template' elements in the original level playfield
1829 are overwritten with the corresponding elements at the same position in
1830 playfield from the level template. */
1832 for (x = 0; x < level.fieldx; x++)
1833 for (y = 0; y < level.fieldy; y++)
1834 if (level.field[x][y] == EL_FROM_LEVEL_TEMPLATE)
1835 level.field[x][y] = level_template.field[x][y];
1837 if (check_special_flags("load_xsb_to_ces"))
1839 struct LevelInfo level_backup = level;
1841 /* overwrite all individual level settings from template level settings */
1842 level = level_template;
1844 /* restore playfield size */
1845 level.fieldx = level_backup.fieldx;
1846 level.fieldy = level_backup.fieldy;
1848 /* restore playfield content */
1849 for (x = 0; x < level.fieldx; x++)
1850 for (y = 0; y < level.fieldy; y++)
1851 level.field[x][y] = level_backup.field[x][y];
1853 /* restore name and author from individual level */
1854 strcpy(level.name, level_backup.name);
1855 strcpy(level.author, level_backup.author);
1857 /* restore flag "use_custom_template" */
1858 level.use_custom_template = level_backup.use_custom_template;
1862 static char *getLevelFilenameFromBasename(char *basename)
1864 static char *filename = NULL;
1866 checked_free(filename);
1868 filename = getPath2(getCurrentLevelDir(), basename);
1873 static int getFileTypeFromBasename(char *basename)
1875 /* !!! ALSO SEE COMMENT IN checkForPackageFromBasename() !!! */
1877 static char *filename = NULL;
1878 struct stat file_status;
1880 /* ---------- try to determine file type from filename ---------- */
1882 /* check for typical filename of a Supaplex level package file */
1883 if (strlen(basename) == 10 && strPrefixLower(basename, "levels.d"))
1884 return LEVEL_FILE_TYPE_SP;
1886 /* check for typical filename of a Diamond Caves II level package file */
1887 if (strSuffixLower(basename, ".dc") ||
1888 strSuffixLower(basename, ".dc2"))
1889 return LEVEL_FILE_TYPE_DC;
1891 /* check for typical filename of a Sokoban level package file */
1892 if (strSuffixLower(basename, ".xsb") &&
1893 strchr(basename, '%') == NULL)
1894 return LEVEL_FILE_TYPE_SB;
1896 /* ---------- try to determine file type from filesize ---------- */
1898 checked_free(filename);
1899 filename = getPath2(getCurrentLevelDir(), basename);
1901 if (stat(filename, &file_status) == 0)
1903 /* check for typical filesize of a Supaplex level package file */
1904 if (file_status.st_size == 170496)
1905 return LEVEL_FILE_TYPE_SP;
1908 return LEVEL_FILE_TYPE_UNKNOWN;
1911 static boolean checkForPackageFromBasename(char *basename)
1913 /* !!! WON'T WORK ANYMORE IF getFileTypeFromBasename() ALSO DETECTS !!!
1914 !!! SINGLE LEVELS (CURRENTLY ONLY DETECTS LEVEL PACKAGES !!! */
1916 return (getFileTypeFromBasename(basename) != LEVEL_FILE_TYPE_UNKNOWN);
1919 static char *getSingleLevelBasenameExt(int nr, char *extension)
1921 static char basename[MAX_FILENAME_LEN];
1924 sprintf(basename, "template.%s", extension);
1926 sprintf(basename, "%03d.%s", nr, extension);
1931 static char *getSingleLevelBasename(int nr)
1933 return getSingleLevelBasenameExt(nr, LEVELFILE_EXTENSION);
1936 static char *getPackedLevelBasename(int type)
1938 static char basename[MAX_FILENAME_LEN];
1939 char *directory = getCurrentLevelDir();
1941 DirectoryEntry *dir_entry;
1943 strcpy(basename, UNDEFINED_FILENAME); /* default: undefined file */
1945 if ((dir = openDirectory(directory)) == NULL)
1947 Error(ERR_WARN, "cannot read current level directory '%s'", directory);
1952 while ((dir_entry = readDirectory(dir)) != NULL) /* loop all entries */
1954 char *entry_basename = dir_entry->basename;
1955 int entry_type = getFileTypeFromBasename(entry_basename);
1957 if (entry_type != LEVEL_FILE_TYPE_UNKNOWN) /* found valid level package */
1959 if (type == LEVEL_FILE_TYPE_UNKNOWN ||
1962 strcpy(basename, entry_basename);
1969 closeDirectory(dir);
1974 static char *getSingleLevelFilename(int nr)
1976 return getLevelFilenameFromBasename(getSingleLevelBasename(nr));
1979 #if ENABLE_UNUSED_CODE
1980 static char *getPackedLevelFilename(int type)
1982 return getLevelFilenameFromBasename(getPackedLevelBasename(type));
1986 char *getDefaultLevelFilename(int nr)
1988 return getSingleLevelFilename(nr);
1991 #if ENABLE_UNUSED_CODE
1992 static void setLevelFileInfo_SingleLevelFilename(struct LevelFileInfo *lfi,
1996 lfi->packed = FALSE;
1997 lfi->basename = getSingleLevelBasename(lfi->nr, lfi->type);
1998 lfi->filename = getLevelFilenameFromBasename(lfi->basename);
2002 static void setLevelFileInfo_FormatLevelFilename(struct LevelFileInfo *lfi,
2003 int type, char *format, ...)
2005 static char basename[MAX_FILENAME_LEN];
2008 va_start(ap, format);
2009 vsprintf(basename, format, ap);
2013 lfi->packed = FALSE;
2014 lfi->basename = basename;
2015 lfi->filename = getLevelFilenameFromBasename(lfi->basename);
2018 static void setLevelFileInfo_PackedLevelFilename(struct LevelFileInfo *lfi,
2023 lfi->basename = getPackedLevelBasename(lfi->type);
2024 lfi->filename = getLevelFilenameFromBasename(lfi->basename);
2027 static int getFiletypeFromID(char *filetype_id)
2029 char *filetype_id_lower;
2030 int filetype = LEVEL_FILE_TYPE_UNKNOWN;
2033 if (filetype_id == NULL)
2034 return LEVEL_FILE_TYPE_UNKNOWN;
2036 filetype_id_lower = getStringToLower(filetype_id);
2038 for (i = 0; filetype_id_list[i].id != NULL; i++)
2040 char *id_lower = getStringToLower(filetype_id_list[i].id);
2042 if (strEqual(filetype_id_lower, id_lower))
2043 filetype = filetype_id_list[i].filetype;
2047 if (filetype != LEVEL_FILE_TYPE_UNKNOWN)
2051 free(filetype_id_lower);
2056 static void determineLevelFileInfo_Filename(struct LevelFileInfo *lfi)
2060 /* special case: level number is negative => check for level template file */
2063 /* global variable "leveldir_current" must be modified in the loop below */
2064 LevelDirTree *leveldir_current_last = leveldir_current;
2066 /* check for template level in path from current to topmost tree node */
2068 while (leveldir_current != NULL)
2070 setLevelFileInfo_FormatLevelFilename(lfi, LEVEL_FILE_TYPE_RND,
2071 "template.%s", LEVELFILE_EXTENSION);
2073 if (fileExists(lfi->filename))
2076 leveldir_current = leveldir_current->node_parent;
2079 /* restore global variable "leveldir_current" modified in above loop */
2080 leveldir_current = leveldir_current_last;
2082 /* no fallback if template file not existing */
2086 /* special case: check for file name/pattern specified in "levelinfo.conf" */
2087 if (leveldir_current->level_filename != NULL)
2089 int filetype = getFiletypeFromID(leveldir_current->level_filetype);
2091 setLevelFileInfo_FormatLevelFilename(lfi, filetype,
2092 leveldir_current->level_filename, nr);
2094 lfi->packed = checkForPackageFromBasename(leveldir_current->level_filename);
2096 if (fileExists(lfi->filename))
2100 /* check for native Rocks'n'Diamonds level file */
2101 setLevelFileInfo_FormatLevelFilename(lfi, LEVEL_FILE_TYPE_RND,
2102 "%03d.%s", nr, LEVELFILE_EXTENSION);
2103 if (fileExists(lfi->filename))
2106 /* check for Emerald Mine level file (V1) */
2107 setLevelFileInfo_FormatLevelFilename(lfi, LEVEL_FILE_TYPE_EM, "a%c%c",
2108 'a' + (nr / 10) % 26, '0' + nr % 10);
2109 if (fileExists(lfi->filename))
2111 setLevelFileInfo_FormatLevelFilename(lfi, LEVEL_FILE_TYPE_EM, "A%c%c",
2112 'A' + (nr / 10) % 26, '0' + nr % 10);
2113 if (fileExists(lfi->filename))
2116 /* check for Emerald Mine level file (V2 to V5) */
2117 setLevelFileInfo_FormatLevelFilename(lfi, LEVEL_FILE_TYPE_EM, "%d", nr);
2118 if (fileExists(lfi->filename))
2121 /* check for Emerald Mine level file (V6 / single mode) */
2122 setLevelFileInfo_FormatLevelFilename(lfi, LEVEL_FILE_TYPE_EM, "%02ds", nr);
2123 if (fileExists(lfi->filename))
2125 setLevelFileInfo_FormatLevelFilename(lfi, LEVEL_FILE_TYPE_EM, "%02dS", nr);
2126 if (fileExists(lfi->filename))
2129 /* check for Emerald Mine level file (V6 / teamwork mode) */
2130 setLevelFileInfo_FormatLevelFilename(lfi, LEVEL_FILE_TYPE_EM, "%02dt", nr);
2131 if (fileExists(lfi->filename))
2133 setLevelFileInfo_FormatLevelFilename(lfi, LEVEL_FILE_TYPE_EM, "%02dT", nr);
2134 if (fileExists(lfi->filename))
2137 /* check for various packed level file formats */
2138 setLevelFileInfo_PackedLevelFilename(lfi, LEVEL_FILE_TYPE_UNKNOWN);
2139 if (fileExists(lfi->filename))
2142 /* no known level file found -- use default values (and fail later) */
2143 setLevelFileInfo_FormatLevelFilename(lfi, LEVEL_FILE_TYPE_RND,
2144 "%03d.%s", nr, LEVELFILE_EXTENSION);
2147 static void determineLevelFileInfo_Filetype(struct LevelFileInfo *lfi)
2149 if (lfi->type == LEVEL_FILE_TYPE_UNKNOWN)
2150 lfi->type = getFileTypeFromBasename(lfi->basename);
2153 static void setLevelFileInfo(struct LevelFileInfo *level_file_info, int nr)
2155 /* always start with reliable default values */
2156 setFileInfoToDefaults(level_file_info);
2158 level_file_info->nr = nr; /* set requested level number */
2160 determineLevelFileInfo_Filename(level_file_info);
2161 determineLevelFileInfo_Filetype(level_file_info);
2164 /* ------------------------------------------------------------------------- */
2165 /* functions for loading R'n'D level */
2166 /* ------------------------------------------------------------------------- */
2168 int getMappedElement(int element)
2170 /* remap some (historic, now obsolete) elements */
2174 case EL_PLAYER_OBSOLETE:
2175 element = EL_PLAYER_1;
2178 case EL_KEY_OBSOLETE:
2182 case EL_EM_KEY_1_FILE_OBSOLETE:
2183 element = EL_EM_KEY_1;
2186 case EL_EM_KEY_2_FILE_OBSOLETE:
2187 element = EL_EM_KEY_2;
2190 case EL_EM_KEY_3_FILE_OBSOLETE:
2191 element = EL_EM_KEY_3;
2194 case EL_EM_KEY_4_FILE_OBSOLETE:
2195 element = EL_EM_KEY_4;
2198 case EL_ENVELOPE_OBSOLETE:
2199 element = EL_ENVELOPE_1;
2207 if (element >= NUM_FILE_ELEMENTS)
2209 Error(ERR_WARN, "invalid level element %d", element);
2211 element = EL_UNKNOWN;
2219 int getMappedElementByVersion(int element, int game_version)
2221 /* remap some elements due to certain game version */
2223 if (game_version <= VERSION_IDENT(2,2,0,0))
2225 /* map game font elements */
2226 element = (element == EL_CHAR('[') ? EL_CHAR_AUMLAUT :
2227 element == EL_CHAR('\\') ? EL_CHAR_OUMLAUT :
2228 element == EL_CHAR(']') ? EL_CHAR_UUMLAUT :
2229 element == EL_CHAR('^') ? EL_CHAR_COPYRIGHT : element);
2232 if (game_version < VERSION_IDENT(3,0,0,0))
2234 /* map Supaplex gravity tube elements */
2235 element = (element == EL_SP_GRAVITY_PORT_LEFT ? EL_SP_PORT_LEFT :
2236 element == EL_SP_GRAVITY_PORT_RIGHT ? EL_SP_PORT_RIGHT :
2237 element == EL_SP_GRAVITY_PORT_UP ? EL_SP_PORT_UP :
2238 element == EL_SP_GRAVITY_PORT_DOWN ? EL_SP_PORT_DOWN :
2245 static int LoadLevel_VERS(File *file, int chunk_size, struct LevelInfo *level)
2247 level->file_version = getFileVersion(file);
2248 level->game_version = getFileVersion(file);
2253 static int LoadLevel_DATE(File *file, int chunk_size, struct LevelInfo *level)
2255 level->creation_date.year = getFile16BitBE(file);
2256 level->creation_date.month = getFile8Bit(file);
2257 level->creation_date.day = getFile8Bit(file);
2259 level->creation_date.src = DATE_SRC_LEVELFILE;
2264 static int LoadLevel_HEAD(File *file, int chunk_size, struct LevelInfo *level)
2266 int initial_player_stepsize;
2267 int initial_player_gravity;
2270 level->fieldx = getFile8Bit(file);
2271 level->fieldy = getFile8Bit(file);
2273 level->time = getFile16BitBE(file);
2274 level->gems_needed = getFile16BitBE(file);
2276 for (i = 0; i < MAX_LEVEL_NAME_LEN; i++)
2277 level->name[i] = getFile8Bit(file);
2278 level->name[MAX_LEVEL_NAME_LEN] = 0;
2280 for (i = 0; i < LEVEL_SCORE_ELEMENTS; i++)
2281 level->score[i] = getFile8Bit(file);
2283 level->num_yamyam_contents = STD_ELEMENT_CONTENTS;
2284 for (i = 0; i < STD_ELEMENT_CONTENTS; i++)
2285 for (y = 0; y < 3; y++)
2286 for (x = 0; x < 3; x++)
2287 level->yamyam_content[i].e[x][y] = getMappedElement(getFile8Bit(file));
2289 level->amoeba_speed = getFile8Bit(file);
2290 level->time_magic_wall = getFile8Bit(file);
2291 level->time_wheel = getFile8Bit(file);
2292 level->amoeba_content = getMappedElement(getFile8Bit(file));
2294 initial_player_stepsize = (getFile8Bit(file) == 1 ? STEPSIZE_FAST :
2297 for (i = 0; i < MAX_PLAYERS; i++)
2298 level->initial_player_stepsize[i] = initial_player_stepsize;
2300 initial_player_gravity = (getFile8Bit(file) == 1 ? TRUE : FALSE);
2302 for (i = 0; i < MAX_PLAYERS; i++)
2303 level->initial_player_gravity[i] = initial_player_gravity;
2305 level->encoding_16bit_field = (getFile8Bit(file) == 1 ? TRUE : FALSE);
2306 level->em_slippery_gems = (getFile8Bit(file) == 1 ? TRUE : FALSE);
2308 level->use_custom_template = (getFile8Bit(file) == 1 ? TRUE : FALSE);
2310 level->block_last_field = (getFile8Bit(file) == 1 ? TRUE : FALSE);
2311 level->sp_block_last_field = (getFile8Bit(file) == 1 ? TRUE : FALSE);
2312 level->can_move_into_acid_bits = getFile32BitBE(file);
2313 level->dont_collide_with_bits = getFile8Bit(file);
2315 level->use_spring_bug = (getFile8Bit(file) == 1 ? TRUE : FALSE);
2316 level->use_step_counter = (getFile8Bit(file) == 1 ? TRUE : FALSE);
2318 level->instant_relocation = (getFile8Bit(file) == 1 ? TRUE : FALSE);
2319 level->can_pass_to_walkable = (getFile8Bit(file) == 1 ? TRUE : FALSE);
2320 level->grow_into_diggable = (getFile8Bit(file) == 1 ? TRUE : FALSE);
2322 level->game_engine_type = getFile8Bit(file);
2324 ReadUnusedBytesFromFile(file, LEVEL_CHUNK_HEAD_UNUSED);
2329 static int LoadLevel_NAME(File *file, int chunk_size, struct LevelInfo *level)
2333 for (i = 0; i < MAX_LEVEL_NAME_LEN; i++)
2334 level->name[i] = getFile8Bit(file);
2335 level->name[MAX_LEVEL_NAME_LEN] = 0;
2340 static int LoadLevel_AUTH(File *file, int chunk_size, struct LevelInfo *level)
2344 for (i = 0; i < MAX_LEVEL_AUTHOR_LEN; i++)
2345 level->author[i] = getFile8Bit(file);
2346 level->author[MAX_LEVEL_AUTHOR_LEN] = 0;
2351 static int LoadLevel_BODY(File *file, int chunk_size, struct LevelInfo *level)
2354 int chunk_size_expected = level->fieldx * level->fieldy;
2356 /* Note: "chunk_size" was wrong before version 2.0 when elements are
2357 stored with 16-bit encoding (and should be twice as big then).
2358 Even worse, playfield data was stored 16-bit when only yamyam content
2359 contained 16-bit elements and vice versa. */
2361 if (level->encoding_16bit_field && level->file_version >= FILE_VERSION_2_0)
2362 chunk_size_expected *= 2;
2364 if (chunk_size_expected != chunk_size)
2366 ReadUnusedBytesFromFile(file, chunk_size);
2367 return chunk_size_expected;
2370 for (y = 0; y < level->fieldy; y++)
2371 for (x = 0; x < level->fieldx; x++)
2372 level->field[x][y] =
2373 getMappedElement(level->encoding_16bit_field ? getFile16BitBE(file) :
2378 static int LoadLevel_CONT(File *file, int chunk_size, struct LevelInfo *level)
2381 int header_size = 4;
2382 int content_size = MAX_ELEMENT_CONTENTS * 3 * 3;
2383 int chunk_size_expected = header_size + content_size;
2385 /* Note: "chunk_size" was wrong before version 2.0 when elements are
2386 stored with 16-bit encoding (and should be twice as big then).
2387 Even worse, playfield data was stored 16-bit when only yamyam content
2388 contained 16-bit elements and vice versa. */
2390 if (level->encoding_16bit_field && level->file_version >= FILE_VERSION_2_0)
2391 chunk_size_expected += content_size;
2393 if (chunk_size_expected != chunk_size)
2395 ReadUnusedBytesFromFile(file, chunk_size);
2396 return chunk_size_expected;
2400 level->num_yamyam_contents = getFile8Bit(file);
2404 /* correct invalid number of content fields -- should never happen */
2405 if (level->num_yamyam_contents < 1 ||
2406 level->num_yamyam_contents > MAX_ELEMENT_CONTENTS)
2407 level->num_yamyam_contents = STD_ELEMENT_CONTENTS;
2409 for (i = 0; i < MAX_ELEMENT_CONTENTS; i++)
2410 for (y = 0; y < 3; y++)
2411 for (x = 0; x < 3; x++)
2412 level->yamyam_content[i].e[x][y] =
2413 getMappedElement(level->encoding_16bit_field ?
2414 getFile16BitBE(file) : getFile8Bit(file));
2418 static int LoadLevel_CNT2(File *file, int chunk_size, struct LevelInfo *level)
2423 int content_array[MAX_ELEMENT_CONTENTS][3][3];
2425 element = getMappedElement(getFile16BitBE(file));
2426 num_contents = getFile8Bit(file);
2428 getFile8Bit(file); /* content x size (unused) */
2429 getFile8Bit(file); /* content y size (unused) */
2431 ReadUnusedBytesFromFile(file, LEVEL_CHUNK_CNT2_UNUSED);
2433 for (i = 0; i < MAX_ELEMENT_CONTENTS; i++)
2434 for (y = 0; y < 3; y++)
2435 for (x = 0; x < 3; x++)
2436 content_array[i][x][y] = getMappedElement(getFile16BitBE(file));
2438 /* correct invalid number of content fields -- should never happen */
2439 if (num_contents < 1 || num_contents > MAX_ELEMENT_CONTENTS)
2440 num_contents = STD_ELEMENT_CONTENTS;
2442 if (element == EL_YAMYAM)
2444 level->num_yamyam_contents = num_contents;
2446 for (i = 0; i < num_contents; i++)
2447 for (y = 0; y < 3; y++)
2448 for (x = 0; x < 3; x++)
2449 level->yamyam_content[i].e[x][y] = content_array[i][x][y];
2451 else if (element == EL_BD_AMOEBA)
2453 level->amoeba_content = content_array[0][0][0];
2457 Error(ERR_WARN, "cannot load content for element '%d'", element);
2463 static int LoadLevel_CNT3(File *file, int chunk_size, struct LevelInfo *level)
2469 int chunk_size_expected;
2471 element = getMappedElement(getFile16BitBE(file));
2472 if (!IS_ENVELOPE(element))
2473 element = EL_ENVELOPE_1;
2475 envelope_nr = element - EL_ENVELOPE_1;
2477 envelope_len = getFile16BitBE(file);
2479 level->envelope[envelope_nr].xsize = getFile8Bit(file);
2480 level->envelope[envelope_nr].ysize = getFile8Bit(file);
2482 ReadUnusedBytesFromFile(file, LEVEL_CHUNK_CNT3_UNUSED);
2484 chunk_size_expected = LEVEL_CHUNK_CNT3_SIZE(envelope_len);
2485 if (chunk_size_expected != chunk_size)
2487 ReadUnusedBytesFromFile(file, chunk_size - LEVEL_CHUNK_CNT3_HEADER);
2488 return chunk_size_expected;
2491 for (i = 0; i < envelope_len; i++)
2492 level->envelope[envelope_nr].text[i] = getFile8Bit(file);
2497 static int LoadLevel_CUS1(File *file, int chunk_size, struct LevelInfo *level)
2499 int num_changed_custom_elements = getFile16BitBE(file);
2500 int chunk_size_expected = 2 + num_changed_custom_elements * 6;
2503 if (chunk_size_expected != chunk_size)
2505 ReadUnusedBytesFromFile(file, chunk_size - 2);
2506 return chunk_size_expected;
2509 for (i = 0; i < num_changed_custom_elements; i++)
2511 int element = getMappedElement(getFile16BitBE(file));
2512 int properties = getFile32BitBE(file);
2514 if (IS_CUSTOM_ELEMENT(element))
2515 element_info[element].properties[EP_BITFIELD_BASE_NR] = properties;
2517 Error(ERR_WARN, "invalid custom element number %d", element);
2519 /* older game versions that wrote level files with CUS1 chunks used
2520 different default push delay values (not yet stored in level file) */
2521 element_info[element].push_delay_fixed = 2;
2522 element_info[element].push_delay_random = 8;
2528 static int LoadLevel_CUS2(File *file, int chunk_size, struct LevelInfo *level)
2530 int num_changed_custom_elements = getFile16BitBE(file);
2531 int chunk_size_expected = 2 + num_changed_custom_elements * 4;
2534 if (chunk_size_expected != chunk_size)
2536 ReadUnusedBytesFromFile(file, chunk_size - 2);
2537 return chunk_size_expected;
2540 for (i = 0; i < num_changed_custom_elements; i++)
2542 int element = getMappedElement(getFile16BitBE(file));
2543 int custom_target_element = getMappedElement(getFile16BitBE(file));
2545 if (IS_CUSTOM_ELEMENT(element))
2546 element_info[element].change->target_element = custom_target_element;
2548 Error(ERR_WARN, "invalid custom element number %d", element);
2554 static int LoadLevel_CUS3(File *file, int chunk_size, struct LevelInfo *level)
2556 int num_changed_custom_elements = getFile16BitBE(file);
2557 int chunk_size_expected = LEVEL_CHUNK_CUS3_SIZE(num_changed_custom_elements);
2560 if (chunk_size_expected != chunk_size)
2562 ReadUnusedBytesFromFile(file, chunk_size - 2);
2563 return chunk_size_expected;
2566 for (i = 0; i < num_changed_custom_elements; i++)
2568 int element = getMappedElement(getFile16BitBE(file));
2569 struct ElementInfo *ei = &element_info[element];
2570 unsigned int event_bits;
2572 if (!IS_CUSTOM_ELEMENT(element))
2574 Error(ERR_WARN, "invalid custom element number %d", element);
2576 element = EL_INTERNAL_DUMMY;
2579 for (j = 0; j < MAX_ELEMENT_NAME_LEN; j++)
2580 ei->description[j] = getFile8Bit(file);
2581 ei->description[MAX_ELEMENT_NAME_LEN] = 0;
2583 ei->properties[EP_BITFIELD_BASE_NR] = getFile32BitBE(file);
2585 /* some free bytes for future properties and padding */
2586 ReadUnusedBytesFromFile(file, 7);
2588 ei->use_gfx_element = getFile8Bit(file);
2589 ei->gfx_element_initial = getMappedElement(getFile16BitBE(file));
2591 ei->collect_score_initial = getFile8Bit(file);
2592 ei->collect_count_initial = getFile8Bit(file);
2594 ei->push_delay_fixed = getFile16BitBE(file);
2595 ei->push_delay_random = getFile16BitBE(file);
2596 ei->move_delay_fixed = getFile16BitBE(file);
2597 ei->move_delay_random = getFile16BitBE(file);
2599 ei->move_pattern = getFile16BitBE(file);
2600 ei->move_direction_initial = getFile8Bit(file);
2601 ei->move_stepsize = getFile8Bit(file);
2603 for (y = 0; y < 3; y++)
2604 for (x = 0; x < 3; x++)
2605 ei->content.e[x][y] = getMappedElement(getFile16BitBE(file));
2607 event_bits = getFile32BitBE(file);
2608 for (j = 0; j < NUM_CHANGE_EVENTS; j++)
2609 if (event_bits & (1 << j))
2610 ei->change->has_event[j] = TRUE;
2612 ei->change->target_element = getMappedElement(getFile16BitBE(file));
2614 ei->change->delay_fixed = getFile16BitBE(file);
2615 ei->change->delay_random = getFile16BitBE(file);
2616 ei->change->delay_frames = getFile16BitBE(file);
2618 ei->change->initial_trigger_element= getMappedElement(getFile16BitBE(file));
2620 ei->change->explode = getFile8Bit(file);
2621 ei->change->use_target_content = getFile8Bit(file);
2622 ei->change->only_if_complete = getFile8Bit(file);
2623 ei->change->use_random_replace = getFile8Bit(file);
2625 ei->change->random_percentage = getFile8Bit(file);
2626 ei->change->replace_when = getFile8Bit(file);
2628 for (y = 0; y < 3; y++)
2629 for (x = 0; x < 3; x++)
2630 ei->change->target_content.e[x][y] =
2631 getMappedElement(getFile16BitBE(file));
2633 ei->slippery_type = getFile8Bit(file);
2635 /* some free bytes for future properties and padding */
2636 ReadUnusedBytesFromFile(file, LEVEL_CPART_CUS3_UNUSED);
2638 /* mark that this custom element has been modified */
2639 ei->modified_settings = TRUE;
2645 static int LoadLevel_CUS4(File *file, int chunk_size, struct LevelInfo *level)
2647 struct ElementInfo *ei;
2648 int chunk_size_expected;
2652 /* ---------- custom element base property values (96 bytes) ------------- */
2654 element = getMappedElement(getFile16BitBE(file));
2656 if (!IS_CUSTOM_ELEMENT(element))
2658 Error(ERR_WARN, "invalid custom element number %d", element);
2660 ReadUnusedBytesFromFile(file, chunk_size - 2);
2664 ei = &element_info[element];
2666 for (i = 0; i < MAX_ELEMENT_NAME_LEN; i++)
2667 ei->description[i] = getFile8Bit(file);
2668 ei->description[MAX_ELEMENT_NAME_LEN] = 0;
2670 ei->properties[EP_BITFIELD_BASE_NR] = getFile32BitBE(file);
2672 ReadUnusedBytesFromFile(file, 4); /* reserved for more base properties */
2674 ei->num_change_pages = getFile8Bit(file);
2676 chunk_size_expected = LEVEL_CHUNK_CUS4_SIZE(ei->num_change_pages);
2677 if (chunk_size_expected != chunk_size)
2679 ReadUnusedBytesFromFile(file, chunk_size - 43);
2680 return chunk_size_expected;
2683 ei->ce_value_fixed_initial = getFile16BitBE(file);
2684 ei->ce_value_random_initial = getFile16BitBE(file);
2685 ei->use_last_ce_value = getFile8Bit(file);
2687 ei->use_gfx_element = getFile8Bit(file);
2688 ei->gfx_element_initial = getMappedElement(getFile16BitBE(file));
2690 ei->collect_score_initial = getFile8Bit(file);
2691 ei->collect_count_initial = getFile8Bit(file);
2693 ei->drop_delay_fixed = getFile8Bit(file);
2694 ei->push_delay_fixed = getFile8Bit(file);
2695 ei->drop_delay_random = getFile8Bit(file);
2696 ei->push_delay_random = getFile8Bit(file);
2697 ei->move_delay_fixed = getFile16BitBE(file);
2698 ei->move_delay_random = getFile16BitBE(file);
2700 /* bits 0 - 15 of "move_pattern" ... */
2701 ei->move_pattern = getFile16BitBE(file);
2702 ei->move_direction_initial = getFile8Bit(file);
2703 ei->move_stepsize = getFile8Bit(file);
2705 ei->slippery_type = getFile8Bit(file);
2707 for (y = 0; y < 3; y++)
2708 for (x = 0; x < 3; x++)
2709 ei->content.e[x][y] = getMappedElement(getFile16BitBE(file));
2711 ei->move_enter_element = getMappedElement(getFile16BitBE(file));
2712 ei->move_leave_element = getMappedElement(getFile16BitBE(file));
2713 ei->move_leave_type = getFile8Bit(file);
2715 /* ... bits 16 - 31 of "move_pattern" (not nice, but downward compatible) */
2716 ei->move_pattern |= (getFile16BitBE(file) << 16);
2718 ei->access_direction = getFile8Bit(file);
2720 ei->explosion_delay = getFile8Bit(file);
2721 ei->ignition_delay = getFile8Bit(file);
2722 ei->explosion_type = getFile8Bit(file);
2724 /* some free bytes for future custom property values and padding */
2725 ReadUnusedBytesFromFile(file, 1);
2727 /* ---------- change page property values (48 bytes) --------------------- */
2729 setElementChangePages(ei, ei->num_change_pages);
2731 for (i = 0; i < ei->num_change_pages; i++)
2733 struct ElementChangeInfo *change = &ei->change_page[i];
2734 unsigned int event_bits;
2736 /* always start with reliable default values */
2737 setElementChangeInfoToDefaults(change);
2739 /* bits 0 - 31 of "has_event[]" ... */
2740 event_bits = getFile32BitBE(file);
2741 for (j = 0; j < MIN(NUM_CHANGE_EVENTS, 32); j++)
2742 if (event_bits & (1 << j))
2743 change->has_event[j] = TRUE;
2745 change->target_element = getMappedElement(getFile16BitBE(file));
2747 change->delay_fixed = getFile16BitBE(file);
2748 change->delay_random = getFile16BitBE(file);
2749 change->delay_frames = getFile16BitBE(file);
2751 change->initial_trigger_element = getMappedElement(getFile16BitBE(file));
2753 change->explode = getFile8Bit(file);
2754 change->use_target_content = getFile8Bit(file);
2755 change->only_if_complete = getFile8Bit(file);
2756 change->use_random_replace = getFile8Bit(file);
2758 change->random_percentage = getFile8Bit(file);
2759 change->replace_when = getFile8Bit(file);
2761 for (y = 0; y < 3; y++)
2762 for (x = 0; x < 3; x++)
2763 change->target_content.e[x][y]= getMappedElement(getFile16BitBE(file));
2765 change->can_change = getFile8Bit(file);
2767 change->trigger_side = getFile8Bit(file);
2769 change->trigger_player = getFile8Bit(file);
2770 change->trigger_page = getFile8Bit(file);
2772 change->trigger_page = (change->trigger_page == CH_PAGE_ANY_FILE ?
2773 CH_PAGE_ANY : (1 << change->trigger_page));
2775 change->has_action = getFile8Bit(file);
2776 change->action_type = getFile8Bit(file);
2777 change->action_mode = getFile8Bit(file);
2778 change->action_arg = getFile16BitBE(file);
2780 /* ... bits 32 - 39 of "has_event[]" (not nice, but downward compatible) */
2781 event_bits = getFile8Bit(file);
2782 for (j = 32; j < NUM_CHANGE_EVENTS; j++)
2783 if (event_bits & (1 << (j - 32)))
2784 change->has_event[j] = TRUE;
2787 /* mark this custom element as modified */
2788 ei->modified_settings = TRUE;
2793 static int LoadLevel_GRP1(File *file, int chunk_size, struct LevelInfo *level)
2795 struct ElementInfo *ei;
2796 struct ElementGroupInfo *group;
2800 element = getMappedElement(getFile16BitBE(file));
2802 if (!IS_GROUP_ELEMENT(element))
2804 Error(ERR_WARN, "invalid group element number %d", element);
2806 ReadUnusedBytesFromFile(file, chunk_size - 2);
2810 ei = &element_info[element];
2812 for (i = 0; i < MAX_ELEMENT_NAME_LEN; i++)
2813 ei->description[i] = getFile8Bit(file);
2814 ei->description[MAX_ELEMENT_NAME_LEN] = 0;
2816 group = element_info[element].group;
2818 group->num_elements = getFile8Bit(file);
2820 ei->use_gfx_element = getFile8Bit(file);
2821 ei->gfx_element_initial = getMappedElement(getFile16BitBE(file));
2823 group->choice_mode = getFile8Bit(file);
2825 /* some free bytes for future values and padding */
2826 ReadUnusedBytesFromFile(file, 3);
2828 for (i = 0; i < MAX_ELEMENTS_IN_GROUP; i++)
2829 group->element[i] = getMappedElement(getFile16BitBE(file));
2831 /* mark this group element as modified */
2832 element_info[element].modified_settings = TRUE;
2837 static int LoadLevel_MicroChunk(File *file, struct LevelFileConfigInfo *conf,
2838 int element, int real_element)
2840 int micro_chunk_size = 0;
2841 int conf_type = getFile8Bit(file);
2842 int byte_mask = conf_type & CONF_MASK_BYTES;
2843 boolean element_found = FALSE;
2846 micro_chunk_size += 1;
2848 if (byte_mask == CONF_MASK_MULTI_BYTES)
2850 int num_bytes = getFile16BitBE(file);
2851 byte *buffer = checked_malloc(num_bytes);
2853 ReadBytesFromFile(file, buffer, num_bytes);
2855 for (i = 0; conf[i].data_type != -1; i++)
2857 if (conf[i].element == element &&
2858 conf[i].conf_type == conf_type)
2860 int data_type = conf[i].data_type;
2861 int num_entities = num_bytes / CONF_ENTITY_NUM_BYTES(data_type);
2862 int max_num_entities = conf[i].max_num_entities;
2864 if (num_entities > max_num_entities)
2867 "truncating number of entities for element %d from %d to %d",
2868 element, num_entities, max_num_entities);
2870 num_entities = max_num_entities;
2873 if (num_entities == 0 && (data_type == TYPE_ELEMENT_LIST ||
2874 data_type == TYPE_CONTENT_LIST))
2876 /* for element and content lists, zero entities are not allowed */
2877 Error(ERR_WARN, "found empty list of entities for element %d",
2880 /* do not set "num_entities" here to prevent reading behind buffer */
2882 *(int *)(conf[i].num_entities) = 1; /* at least one is required */
2886 *(int *)(conf[i].num_entities) = num_entities;
2889 element_found = TRUE;
2891 if (data_type == TYPE_STRING)
2893 char *string = (char *)(conf[i].value);
2896 for (j = 0; j < max_num_entities; j++)
2897 string[j] = (j < num_entities ? buffer[j] : '\0');
2899 else if (data_type == TYPE_ELEMENT_LIST)
2901 int *element_array = (int *)(conf[i].value);
2904 for (j = 0; j < num_entities; j++)
2906 getMappedElement(CONF_ELEMENTS_ELEMENT(buffer, j));
2908 else if (data_type == TYPE_CONTENT_LIST)
2910 struct Content *content= (struct Content *)(conf[i].value);
2913 for (c = 0; c < num_entities; c++)
2914 for (y = 0; y < 3; y++)
2915 for (x = 0; x < 3; x++)
2916 content[c].e[x][y] =
2917 getMappedElement(CONF_CONTENTS_ELEMENT(buffer, c, x, y));
2920 element_found = FALSE;
2926 checked_free(buffer);
2928 micro_chunk_size += 2 + num_bytes;
2930 else /* constant size configuration data (1, 2 or 4 bytes) */
2932 int value = (byte_mask == CONF_MASK_1_BYTE ? getFile8Bit (file) :
2933 byte_mask == CONF_MASK_2_BYTE ? getFile16BitBE(file) :
2934 byte_mask == CONF_MASK_4_BYTE ? getFile32BitBE(file) : 0);
2936 for (i = 0; conf[i].data_type != -1; i++)
2938 if (conf[i].element == element &&
2939 conf[i].conf_type == conf_type)
2941 int data_type = conf[i].data_type;
2943 if (data_type == TYPE_ELEMENT)
2944 value = getMappedElement(value);
2946 if (data_type == TYPE_BOOLEAN)
2947 *(boolean *)(conf[i].value) = value;
2949 *(int *) (conf[i].value) = value;
2951 element_found = TRUE;
2957 micro_chunk_size += CONF_VALUE_NUM_BYTES(byte_mask);
2962 char *error_conf_chunk_bytes =
2963 (byte_mask == CONF_MASK_1_BYTE ? "CONF_VALUE_8_BIT" :
2964 byte_mask == CONF_MASK_2_BYTE ? "CONF_VALUE_16_BIT" :
2965 byte_mask == CONF_MASK_4_BYTE ? "CONF_VALUE_32_BIT" :"CONF_VALUE_BYTES");
2966 int error_conf_chunk_token = conf_type & CONF_MASK_TOKEN;
2967 int error_element = real_element;
2969 Error(ERR_WARN, "cannot load micro chunk '%s(%d)' value for element %d ['%s']",
2970 error_conf_chunk_bytes, error_conf_chunk_token,
2971 error_element, EL_NAME(error_element));
2974 return micro_chunk_size;
2977 static int LoadLevel_INFO(File *file, int chunk_size, struct LevelInfo *level)
2979 int real_chunk_size = 0;
2981 li = *level; /* copy level data into temporary buffer */
2983 while (!checkEndOfFile(file))
2985 real_chunk_size += LoadLevel_MicroChunk(file, chunk_config_INFO, -1, -1);
2987 if (real_chunk_size >= chunk_size)
2991 *level = li; /* copy temporary buffer back to level data */
2993 return real_chunk_size;
2996 static int LoadLevel_CONF(File *file, int chunk_size, struct LevelInfo *level)
2998 int real_chunk_size = 0;
3000 li = *level; /* copy level data into temporary buffer */
3002 while (!checkEndOfFile(file))
3004 int element = getMappedElement(getFile16BitBE(file));
3006 real_chunk_size += 2;
3007 real_chunk_size += LoadLevel_MicroChunk(file, chunk_config_CONF,
3009 if (real_chunk_size >= chunk_size)
3013 *level = li; /* copy temporary buffer back to level data */
3015 return real_chunk_size;
3018 static int LoadLevel_ELEM(File *file, int chunk_size, struct LevelInfo *level)
3020 int real_chunk_size = 0;
3022 li = *level; /* copy level data into temporary buffer */
3024 while (!checkEndOfFile(file))
3026 int element = getMappedElement(getFile16BitBE(file));
3028 real_chunk_size += 2;
3029 real_chunk_size += LoadLevel_MicroChunk(file, chunk_config_ELEM,
3031 if (real_chunk_size >= chunk_size)
3035 *level = li; /* copy temporary buffer back to level data */
3037 return real_chunk_size;
3040 static int LoadLevel_NOTE(File *file, int chunk_size, struct LevelInfo *level)
3042 int element = getMappedElement(getFile16BitBE(file));
3043 int envelope_nr = element - EL_ENVELOPE_1;
3044 int real_chunk_size = 2;
3046 xx_envelope = level->envelope[envelope_nr]; /* copy into temporary buffer */
3048 while (!checkEndOfFile(file))
3050 real_chunk_size += LoadLevel_MicroChunk(file, chunk_config_NOTE,
3053 if (real_chunk_size >= chunk_size)
3057 level->envelope[envelope_nr] = xx_envelope; /* copy from temporary buffer */
3059 return real_chunk_size;
3062 static int LoadLevel_CUSX(File *file, int chunk_size, struct LevelInfo *level)
3064 int element = getMappedElement(getFile16BitBE(file));
3065 int real_chunk_size = 2;
3066 struct ElementInfo *ei = &element_info[element];
3069 xx_ei = *ei; /* copy element data into temporary buffer */
3071 xx_ei.num_change_pages = -1;
3073 while (!checkEndOfFile(file))
3075 real_chunk_size += LoadLevel_MicroChunk(file, chunk_config_CUSX_base,
3077 if (xx_ei.num_change_pages != -1)
3080 if (real_chunk_size >= chunk_size)
3086 if (ei->num_change_pages == -1)
3088 Error(ERR_WARN, "LoadLevel_CUSX(): missing 'num_change_pages' for '%s'",
3091 ei->num_change_pages = 1;
3093 setElementChangePages(ei, 1);
3094 setElementChangeInfoToDefaults(ei->change);
3096 return real_chunk_size;
3099 /* initialize number of change pages stored for this custom element */
3100 setElementChangePages(ei, ei->num_change_pages);
3101 for (i = 0; i < ei->num_change_pages; i++)
3102 setElementChangeInfoToDefaults(&ei->change_page[i]);
3104 /* start with reading properties for the first change page */
3105 xx_current_change_page = 0;
3107 while (!checkEndOfFile(file))
3109 struct ElementChangeInfo *change = &ei->change_page[xx_current_change_page];
3111 xx_change = *change; /* copy change data into temporary buffer */
3113 resetEventBits(); /* reset bits; change page might have changed */
3115 real_chunk_size += LoadLevel_MicroChunk(file, chunk_config_CUSX_change,
3118 *change = xx_change;
3120 setEventFlagsFromEventBits(change);
3122 if (real_chunk_size >= chunk_size)
3126 return real_chunk_size;
3129 static int LoadLevel_GRPX(File *file, int chunk_size, struct LevelInfo *level)
3131 int element = getMappedElement(getFile16BitBE(file));
3132 int real_chunk_size = 2;
3133 struct ElementInfo *ei = &element_info[element];
3134 struct ElementGroupInfo *group = ei->group;
3136 xx_ei = *ei; /* copy element data into temporary buffer */
3137 xx_group = *group; /* copy group data into temporary buffer */
3139 while (!checkEndOfFile(file))
3141 real_chunk_size += LoadLevel_MicroChunk(file, chunk_config_GRPX,
3144 if (real_chunk_size >= chunk_size)
3151 return real_chunk_size;
3154 static void LoadLevelFromFileInfo_RND(struct LevelInfo *level,
3155 struct LevelFileInfo *level_file_info,
3156 boolean level_info_only)
3158 char *filename = level_file_info->filename;
3159 char cookie[MAX_LINE_LEN];
3160 char chunk_name[CHUNK_ID_LEN + 1];
3164 if (!(file = openFile(filename, MODE_READ)))
3166 level->no_valid_file = TRUE;
3168 if (!level_info_only)
3169 Error(ERR_WARN, "cannot read level '%s' -- using empty level", filename);
3174 getFileChunkBE(file, chunk_name, NULL);
3175 if (strEqual(chunk_name, "RND1"))
3177 getFile32BitBE(file); /* not used */
3179 getFileChunkBE(file, chunk_name, NULL);
3180 if (!strEqual(chunk_name, "CAVE"))
3182 level->no_valid_file = TRUE;
3184 Error(ERR_WARN, "unknown format of level file '%s'", filename);
3191 else /* check for pre-2.0 file format with cookie string */
3193 strcpy(cookie, chunk_name);
3194 if (getStringFromFile(file, &cookie[4], MAX_LINE_LEN - 4) == NULL)
3196 if (strlen(cookie) > 0 && cookie[strlen(cookie) - 1] == '\n')
3197 cookie[strlen(cookie) - 1] = '\0';
3199 if (!checkCookieString(cookie, LEVEL_COOKIE_TMPL))
3201 level->no_valid_file = TRUE;
3203 Error(ERR_WARN, "unknown format of level file '%s'", filename);
3210 if ((level->file_version = getFileVersionFromCookieString(cookie)) == -1)
3212 level->no_valid_file = TRUE;
3214 Error(ERR_WARN, "unsupported version of level file '%s'", filename);
3221 /* pre-2.0 level files have no game version, so use file version here */
3222 level->game_version = level->file_version;
3225 if (level->file_version < FILE_VERSION_1_2)
3227 /* level files from versions before 1.2.0 without chunk structure */
3228 LoadLevel_HEAD(file, LEVEL_CHUNK_HEAD_SIZE, level);
3229 LoadLevel_BODY(file, level->fieldx * level->fieldy, level);
3237 int (*loader)(File *, int, struct LevelInfo *);
3241 { "VERS", LEVEL_CHUNK_VERS_SIZE, LoadLevel_VERS },
3242 { "DATE", LEVEL_CHUNK_DATE_SIZE, LoadLevel_DATE },
3243 { "HEAD", LEVEL_CHUNK_HEAD_SIZE, LoadLevel_HEAD },
3244 { "NAME", LEVEL_CHUNK_NAME_SIZE, LoadLevel_NAME },
3245 { "AUTH", LEVEL_CHUNK_AUTH_SIZE, LoadLevel_AUTH },
3246 { "INFO", -1, LoadLevel_INFO },
3247 { "BODY", -1, LoadLevel_BODY },
3248 { "CONT", -1, LoadLevel_CONT },
3249 { "CNT2", LEVEL_CHUNK_CNT2_SIZE, LoadLevel_CNT2 },
3250 { "CNT3", -1, LoadLevel_CNT3 },
3251 { "CUS1", -1, LoadLevel_CUS1 },
3252 { "CUS2", -1, LoadLevel_CUS2 },
3253 { "CUS3", -1, LoadLevel_CUS3 },
3254 { "CUS4", -1, LoadLevel_CUS4 },
3255 { "GRP1", -1, LoadLevel_GRP1 },
3256 { "CONF", -1, LoadLevel_CONF },
3257 { "ELEM", -1, LoadLevel_ELEM },
3258 { "NOTE", -1, LoadLevel_NOTE },
3259 { "CUSX", -1, LoadLevel_CUSX },
3260 { "GRPX", -1, LoadLevel_GRPX },
3265 while (getFileChunkBE(file, chunk_name, &chunk_size))
3269 while (chunk_info[i].name != NULL &&
3270 !strEqual(chunk_name, chunk_info[i].name))
3273 if (chunk_info[i].name == NULL)
3275 Error(ERR_WARN, "unknown chunk '%s' in level file '%s'",
3276 chunk_name, filename);
3277 ReadUnusedBytesFromFile(file, chunk_size);
3279 else if (chunk_info[i].size != -1 &&
3280 chunk_info[i].size != chunk_size)
3282 Error(ERR_WARN, "wrong size (%d) of chunk '%s' in level file '%s'",
3283 chunk_size, chunk_name, filename);
3284 ReadUnusedBytesFromFile(file, chunk_size);
3288 /* call function to load this level chunk */
3289 int chunk_size_expected =
3290 (chunk_info[i].loader)(file, chunk_size, level);
3292 /* the size of some chunks cannot be checked before reading other
3293 chunks first (like "HEAD" and "BODY") that contain some header
3294 information, so check them here */
3295 if (chunk_size_expected != chunk_size)
3297 Error(ERR_WARN, "wrong size (%d) of chunk '%s' in level file '%s'",
3298 chunk_size, chunk_name, filename);
3308 /* ------------------------------------------------------------------------- */
3309 /* functions for loading EM level */
3310 /* ------------------------------------------------------------------------- */
3312 void CopyNativeLevel_RND_to_EM(struct LevelInfo *level)
3314 static int ball_xy[8][2] =
3325 struct LevelInfo_EM *level_em = level->native_em_level;
3326 struct LEVEL *lev = level_em->lev;
3327 struct PLAYER **ply = level_em->ply;
3330 lev->width = MIN(level->fieldx, EM_MAX_CAVE_WIDTH);
3331 lev->height = MIN(level->fieldy, EM_MAX_CAVE_HEIGHT);
3333 lev->time_seconds = level->time;
3334 lev->required_initial = level->gems_needed;
3336 lev->emerald_score = level->score[SC_EMERALD];
3337 lev->diamond_score = level->score[SC_DIAMOND];
3338 lev->alien_score = level->score[SC_ROBOT];
3339 lev->tank_score = level->score[SC_SPACESHIP];
3340 lev->bug_score = level->score[SC_BUG];
3341 lev->eater_score = level->score[SC_YAMYAM];
3342 lev->nut_score = level->score[SC_NUT];
3343 lev->dynamite_score = level->score[SC_DYNAMITE];
3344 lev->key_score = level->score[SC_KEY];
3345 lev->exit_score = level->score[SC_TIME_BONUS];
3347 for (i = 0; i < MAX_ELEMENT_CONTENTS; i++)
3348 for (y = 0; y < 3; y++)
3349 for (x = 0; x < 3; x++)
3350 lev->eater_array[i][y * 3 + x] =
3351 map_element_RND_to_EM(level->yamyam_content[i].e[x][y]);
3353 lev->amoeba_time = level->amoeba_speed;
3354 lev->wonderwall_time_initial = level->time_magic_wall;
3355 lev->wheel_time = level->time_wheel;
3357 lev->android_move_time = level->android_move_time;
3358 lev->android_clone_time = level->android_clone_time;
3359 lev->ball_random = level->ball_random;
3360 lev->ball_state_initial = level->ball_state_initial;
3361 lev->ball_time = level->ball_time;
3362 lev->num_ball_arrays = level->num_ball_contents;
3364 lev->lenses_score = level->lenses_score;
3365 lev->magnify_score = level->magnify_score;
3366 lev->slurp_score = level->slurp_score;
3368 lev->lenses_time = level->lenses_time;
3369 lev->magnify_time = level->magnify_time;
3371 lev->wind_direction_initial =
3372 map_direction_RND_to_EM(level->wind_direction_initial);
3373 lev->wind_cnt_initial = (level->wind_direction_initial != MV_NONE ?
3374 lev->wind_time : 0);
3376 for (i = 0; i < MAX_ELEMENT_CONTENTS; i++)
3377 for (j = 0; j < 8; j++)
3378 lev->ball_array[i][j] =
3379 map_element_RND_to_EM(level->
3380 ball_content[i].e[ball_xy[j][0]][ball_xy[j][1]]);
3382 map_android_clone_elements_RND_to_EM(level);
3384 /* first fill the complete playfield with the default border element */
3385 for (y = 0; y < EM_MAX_CAVE_HEIGHT; y++)
3386 for (x = 0; x < EM_MAX_CAVE_WIDTH; x++)
3387 level_em->cave[x][y] = ZBORDER;
3389 if (BorderElement == EL_STEELWALL)
3391 for (y = 0; y < lev->height + 2; y++)
3392 for (x = 0; x < lev->width + 2; x++)
3393 level_em->cave[x + 1][y + 1] = map_element_RND_to_EM(EL_STEELWALL);
3396 /* then copy the real level contents from level file into the playfield */
3397 for (y = 0; y < lev->height; y++) for (x = 0; x < lev->width; x++)
3399 int new_element = map_element_RND_to_EM(level->field[x][y]);
3400 int offset = (BorderElement == EL_STEELWALL ? 1 : 0);
3401 int xx = x + 1 + offset;
3402 int yy = y + 1 + offset;
3404 if (level->field[x][y] == EL_AMOEBA_DEAD)
3405 new_element = map_element_RND_to_EM(EL_AMOEBA_WET);
3407 level_em->cave[xx][yy] = new_element;
3410 for (i = 0; i < MAX_PLAYERS; i++)
3412 ply[i]->x_initial = 0;
3413 ply[i]->y_initial = 0;
3416 /* initialize player positions and delete players from the playfield */
3417 for (y = 0; y < lev->height; y++) for (x = 0; x < lev->width; x++)
3419 if (ELEM_IS_PLAYER(level->field[x][y]))
3421 int player_nr = GET_PLAYER_NR(level->field[x][y]);
3422 int offset = (BorderElement == EL_STEELWALL ? 1 : 0);
3423 int xx = x + 1 + offset;
3424 int yy = y + 1 + offset;
3426 ply[player_nr]->x_initial = xx;
3427 ply[player_nr]->y_initial = yy;
3429 level_em->cave[xx][yy] = map_element_RND_to_EM(EL_EMPTY);
3433 if (BorderElement == EL_STEELWALL)
3440 void CopyNativeLevel_EM_to_RND(struct LevelInfo *level)
3442 static int ball_xy[8][2] =
3453 struct LevelInfo_EM *level_em = level->native_em_level;
3454 struct LEVEL *lev = level_em->lev;
3455 struct PLAYER **ply = level_em->ply;
3458 level->fieldx = MIN(lev->width, MAX_LEV_FIELDX);
3459 level->fieldy = MIN(lev->height, MAX_LEV_FIELDY);
3461 level->time = lev->time_seconds;
3462 level->gems_needed = lev->required_initial;
3464 sprintf(level->name, "Level %d", level->file_info.nr);
3466 level->score[SC_EMERALD] = lev->emerald_score;
3467 level->score[SC_DIAMOND] = lev->diamond_score;
3468 level->score[SC_ROBOT] = lev->alien_score;
3469 level->score[SC_SPACESHIP] = lev->tank_score;
3470 level->score[SC_BUG] = lev->bug_score;
3471 level->score[SC_YAMYAM] = lev->eater_score;
3472 level->score[SC_NUT] = lev->nut_score;
3473 level->score[SC_DYNAMITE] = lev->dynamite_score;
3474 level->score[SC_KEY] = lev->key_score;
3475 level->score[SC_TIME_BONUS] = lev->exit_score;
3477 level->num_yamyam_contents = MAX_ELEMENT_CONTENTS;
3479 for (i = 0; i < level->num_yamyam_contents; i++)
3480 for (y = 0; y < 3; y++)
3481 for (x = 0; x < 3; x++)
3482 level->yamyam_content[i].e[x][y] =
3483 map_element_EM_to_RND(lev->eater_array[i][y * 3 + x]);
3485 level->amoeba_speed = lev->amoeba_time;
3486 level->time_magic_wall = lev->wonderwall_time_initial;
3487 level->time_wheel = lev->wheel_time;
3489 level->android_move_time = lev->android_move_time;
3490 level->android_clone_time = lev->android_clone_time;
3491 level->ball_random = lev->ball_random;
3492 level->ball_state_initial = lev->ball_state_initial;
3493 level->ball_time = lev->ball_time;
3494 level->num_ball_contents = lev->num_ball_arrays;
3496 level->lenses_score = lev->lenses_score;
3497 level->magnify_score = lev->magnify_score;
3498 level->slurp_score = lev->slurp_score;
3500 level->lenses_time = lev->lenses_time;
3501 level->magnify_time = lev->magnify_time;
3503 level->wind_direction_initial =
3504 map_direction_EM_to_RND(lev->wind_direction_initial);
3506 for (i = 0; i < MAX_ELEMENT_CONTENTS; i++)
3507 for (j = 0; j < 8; j++)
3508 level->ball_content[i].e[ball_xy[j][0]][ball_xy[j][1]] =
3509 map_element_EM_to_RND(lev->ball_array[i][j]);
3511 map_android_clone_elements_EM_to_RND(level);
3513 /* convert the playfield (some elements need special treatment) */
3514 for (y = 0; y < level->fieldy; y++) for (x = 0; x < level->fieldx; x++)
3516 int new_element = map_element_EM_to_RND(level_em->cave[x + 1][y + 1]);
3518 if (new_element == EL_AMOEBA_WET && level->amoeba_speed == 0)
3519 new_element = EL_AMOEBA_DEAD;
3521 level->field[x][y] = new_element;
3524 for (i = 0; i < MAX_PLAYERS; i++)
3526 /* in case of all players set to the same field, use the first player */
3527 int nr = MAX_PLAYERS - i - 1;
3528 int jx = ply[nr]->x_initial - 1;
3529 int jy = ply[nr]->y_initial - 1;
3531 if (jx != -1 && jy != -1)
3532 level->field[jx][jy] = EL_PLAYER_1 + nr;
3537 /* ------------------------------------------------------------------------- */
3538 /* functions for loading SP level */
3539 /* ------------------------------------------------------------------------- */
3541 void CopyNativeLevel_RND_to_SP(struct LevelInfo *level)
3543 struct LevelInfo_SP *level_sp = level->native_sp_level;
3544 LevelInfoType *header = &level_sp->header;
3547 level_sp->width = level->fieldx;
3548 level_sp->height = level->fieldy;
3550 for (x = 0; x < level->fieldx; x++)
3551 for (y = 0; y < level->fieldy; y++)
3552 level_sp->playfield[x][y] = map_element_RND_to_SP(level->field[x][y]);
3554 header->InitialGravity = (level->initial_player_gravity[0] ? 1 : 0);
3556 for (i = 0; i < SP_LEVEL_NAME_LEN; i++)
3557 header->LevelTitle[i] = level->name[i];
3558 /* !!! NO STRING TERMINATION IN SUPAPLEX VB CODE YET -- FIX THIS !!! */
3560 header->InfotronsNeeded = level->gems_needed;
3562 header->SpecialPortCount = 0;
3564 for (x = 0; x < level->fieldx; x++) for (y = 0; y < level->fieldy; y++)
3566 boolean gravity_port_found = FALSE;
3567 boolean gravity_port_valid = FALSE;
3568 int gravity_port_flag;
3569 int gravity_port_base_element;
3570 int element = level->field[x][y];
3572 if (element >= EL_SP_GRAVITY_ON_PORT_RIGHT &&
3573 element <= EL_SP_GRAVITY_ON_PORT_UP)
3575 gravity_port_found = TRUE;
3576 gravity_port_valid = TRUE;
3577 gravity_port_flag = 1;
3578 gravity_port_base_element = EL_SP_GRAVITY_ON_PORT_RIGHT;
3580 else if (element >= EL_SP_GRAVITY_OFF_PORT_RIGHT &&
3581 element <= EL_SP_GRAVITY_OFF_PORT_UP)
3583 gravity_port_found = TRUE;
3584 gravity_port_valid = TRUE;
3585 gravity_port_flag = 0;
3586 gravity_port_base_element = EL_SP_GRAVITY_OFF_PORT_RIGHT;
3588 else if (element >= EL_SP_GRAVITY_PORT_RIGHT &&
3589 element <= EL_SP_GRAVITY_PORT_UP)
3591 /* change R'n'D style gravity inverting special port to normal port
3592 (there are no gravity inverting ports in native Supaplex engine) */
3594 gravity_port_found = TRUE;
3595 gravity_port_valid = FALSE;
3596 gravity_port_base_element = EL_SP_GRAVITY_PORT_RIGHT;
3599 if (gravity_port_found)
3601 if (gravity_port_valid &&
3602 header->SpecialPortCount < SP_MAX_SPECIAL_PORTS)
3604 SpecialPortType *port = &header->SpecialPort[header->SpecialPortCount];
3606 port->PortLocation = (y * level->fieldx + x) * 2;
3607 port->Gravity = gravity_port_flag;
3609 element += EL_SP_GRAVITY_PORT_RIGHT - gravity_port_base_element;
3611 header->SpecialPortCount++;
3615 /* change special gravity port to normal port */
3617 element += EL_SP_PORT_RIGHT - gravity_port_base_element;
3620 level_sp->playfield[x][y] = element - EL_SP_START;
3625 void CopyNativeLevel_SP_to_RND(struct LevelInfo *level)
3627 struct LevelInfo_SP *level_sp = level->native_sp_level;
3628 LevelInfoType *header = &level_sp->header;
3631 level->fieldx = level_sp->width;
3632 level->fieldy = level_sp->height;
3634 for (x = 0; x < level->fieldx; x++)
3636 for (y = 0; y < level->fieldy; y++)
3638 int element_old = level_sp->playfield[x][y];
3639 int element_new = getMappedElement(map_element_SP_to_RND(element_old));
3641 if (element_new == EL_UNKNOWN)
3642 Error(ERR_WARN, "invalid element %d at position %d, %d",
3645 level->field[x][y] = element_new;
3649 for (i = 0; i < MAX_PLAYERS; i++)
3650 level->initial_player_gravity[i] =
3651 (header->InitialGravity == 1 ? TRUE : FALSE);
3653 for (i = 0; i < SP_LEVEL_NAME_LEN; i++)
3654 level->name[i] = header->LevelTitle[i];
3655 level->name[SP_LEVEL_NAME_LEN] = '\0';
3657 level->gems_needed = header->InfotronsNeeded;
3659 for (i = 0; i < header->SpecialPortCount; i++)
3661 SpecialPortType *port = &header->SpecialPort[i];
3662 int port_location = port->PortLocation;
3663 int gravity = port->Gravity;
3664 int port_x, port_y, port_element;
3666 port_x = (port_location / 2) % level->fieldx;
3667 port_y = (port_location / 2) / level->fieldx;
3669 if (port_x < 0 || port_x >= level->fieldx ||
3670 port_y < 0 || port_y >= level->fieldy)
3672 Error(ERR_WARN, "special port position (%d, %d) out of bounds",
3678 port_element = level->field[port_x][port_y];
3680 if (port_element < EL_SP_GRAVITY_PORT_RIGHT ||
3681 port_element > EL_SP_GRAVITY_PORT_UP)
3683 Error(ERR_WARN, "no special port at position (%d, %d)", port_x, port_y);
3688 /* change previous (wrong) gravity inverting special port to either
3689 gravity enabling special port or gravity disabling special port */
3690 level->field[port_x][port_y] +=
3691 (gravity == 1 ? EL_SP_GRAVITY_ON_PORT_RIGHT :
3692 EL_SP_GRAVITY_OFF_PORT_RIGHT) - EL_SP_GRAVITY_PORT_RIGHT;
3695 /* change special gravity ports without database entries to normal ports */
3696 for (x = 0; x < level->fieldx; x++)
3697 for (y = 0; y < level->fieldy; y++)
3698 if (level->field[x][y] >= EL_SP_GRAVITY_PORT_RIGHT &&
3699 level->field[x][y] <= EL_SP_GRAVITY_PORT_UP)
3700 level->field[x][y] += EL_SP_PORT_RIGHT - EL_SP_GRAVITY_PORT_RIGHT;
3702 level->time = 0; /* no time limit */
3703 level->amoeba_speed = 0;
3704 level->time_magic_wall = 0;
3705 level->time_wheel = 0;
3706 level->amoeba_content = EL_EMPTY;
3709 /* original Supaplex does not use score values -- use default values */
3711 for (i = 0; i < LEVEL_SCORE_ELEMENTS; i++)
3712 level->score[i] = 0;
3715 /* there are no yamyams in supaplex levels */
3716 for (i = 0; i < level->num_yamyam_contents; i++)
3717 for (x = 0; x < 3; x++)
3718 for (y = 0; y < 3; y++)
3719 level->yamyam_content[i].e[x][y] = EL_EMPTY;
3722 static void CopyNativeTape_RND_to_SP(struct LevelInfo *level)
3724 struct LevelInfo_SP *level_sp = level->native_sp_level;
3725 struct DemoInfo_SP *demo = &level_sp->demo;
3728 /* always start with reliable default values */
3729 demo->is_available = FALSE;
3732 if (TAPE_IS_EMPTY(tape))
3735 demo->level_nr = tape.level_nr; /* (currently not used) */
3737 level_sp->header.DemoRandomSeed = tape.random_seed;
3740 for (i = 0; i < tape.length; i++)
3742 int demo_action = map_key_RND_to_SP(tape.pos[i].action[0]);
3743 int demo_repeat = tape.pos[i].delay;
3745 for (j = 0; j < demo_repeat / 16; j++)
3746 demo->data[demo->length++] = 0xf0 | demo_action;
3748 if (demo_repeat % 16)
3749 demo->data[demo->length++] = ((demo_repeat % 16 - 1) << 4) | demo_action;
3752 demo->data[demo->length++] = 0xff;
3754 demo->is_available = TRUE;
3757 static void setTapeInfoToDefaults();
3759 static void CopyNativeTape_SP_to_RND(struct LevelInfo *level)
3761 struct LevelInfo_SP *level_sp = level->native_sp_level;
3762 struct DemoInfo_SP *demo = &level_sp->demo;
3763 char *filename = level->file_info.filename;
3766 /* always start with reliable default values */
3767 setTapeInfoToDefaults();
3769 if (!demo->is_available)
3772 tape.level_nr = demo->level_nr; /* (currently not used) */
3773 tape.length = demo->length - 1; /* without "end of demo" byte */
3774 tape.random_seed = level_sp->header.DemoRandomSeed;
3776 TapeSetDateFromEpochSeconds(getFileTimestampEpochSeconds(filename));
3778 for (i = 0; i < demo->length - 1; i++)
3780 int demo_action = demo->data[i] & 0x0f;
3781 int demo_repeat = (demo->data[i] & 0xf0) >> 4;
3783 tape.pos[i].action[0] = map_key_SP_to_RND(demo_action);
3784 tape.pos[i].delay = demo_repeat + 1;
3787 tape.length_frames = GetTapeLengthFrames();
3788 tape.length_seconds = GetTapeLengthSeconds();
3792 /* ------------------------------------------------------------------------- */
3793 /* functions for loading DC level */
3794 /* ------------------------------------------------------------------------- */
3796 #define DC_LEVEL_HEADER_SIZE 344
3798 unsigned short getDecodedWord_DC(unsigned short data_encoded, boolean init)
3800 static int last_data_encoded;
3804 int diff_hi, diff_lo;
3805 int data_hi, data_lo;
3806 unsigned short data_decoded;
3810 last_data_encoded = 0;
3817 diff = data_encoded - last_data_encoded;
3818 diff_hi = diff & ~0xff;
3819 diff_lo = diff & 0xff;
3823 data_hi = diff_hi - (offset1 << 8) + (offset2 & 0xff00);
3824 data_lo = (diff_lo + (data_hi >> 16)) & 0x00ff;
3825 data_hi = data_hi & 0xff00;
3827 data_decoded = data_hi | data_lo;
3829 last_data_encoded = data_encoded;
3831 offset1 = (offset1 + 1) % 31;
3832 offset2 = offset2 & 0xff;
3834 return data_decoded;
3837 int getMappedElement_DC(int element)
3845 /* 0x0117 - 0x036e: (?) */
3848 /* 0x042d - 0x0684: (?) */
3864 element = EL_CRYSTAL;
3867 case 0x0e77: /* quicksand (boulder) */
3868 element = EL_QUICKSAND_FAST_FULL;
3871 case 0x0e99: /* slow quicksand (boulder) */
3872 element = EL_QUICKSAND_FULL;
3876 element = EL_EM_EXIT_OPEN;
3880 element = EL_EM_EXIT_CLOSED;
3884 element = EL_EM_STEEL_EXIT_OPEN;
3888 element = EL_EM_STEEL_EXIT_CLOSED;
3891 case 0x0f4f: /* dynamite (lit 1) */
3892 element = EL_EM_DYNAMITE_ACTIVE;
3895 case 0x0f57: /* dynamite (lit 2) */
3896 element = EL_EM_DYNAMITE_ACTIVE;
3899 case 0x0f5f: /* dynamite (lit 3) */
3900 element = EL_EM_DYNAMITE_ACTIVE;
3903 case 0x0f67: /* dynamite (lit 4) */
3904 element = EL_EM_DYNAMITE_ACTIVE;
3911 element = EL_AMOEBA_WET;
3915 element = EL_AMOEBA_DROP;
3919 element = EL_DC_MAGIC_WALL;
3923 element = EL_SPACESHIP_UP;
3927 element = EL_SPACESHIP_DOWN;
3931 element = EL_SPACESHIP_LEFT;
3935 element = EL_SPACESHIP_RIGHT;
3939 element = EL_BUG_UP;
3943 element = EL_BUG_DOWN;
3947 element = EL_BUG_LEFT;
3951 element = EL_BUG_RIGHT;
3955 element = EL_MOLE_UP;
3959 element = EL_MOLE_DOWN;
3963 element = EL_MOLE_LEFT;
3967 element = EL_MOLE_RIGHT;
3975 element = EL_YAMYAM;
3979 element = EL_SWITCHGATE_OPEN;
3983 element = EL_SWITCHGATE_CLOSED;
3987 element = EL_DC_SWITCHGATE_SWITCH_UP;
3991 element = EL_TIMEGATE_CLOSED;
3994 case 0x144c: /* conveyor belt switch (green) */
3995 element = EL_CONVEYOR_BELT_3_SWITCH_MIDDLE;
3998 case 0x144f: /* conveyor belt switch (red) */
3999 element = EL_CONVEYOR_BELT_1_SWITCH_MIDDLE;
4002 case 0x1452: /* conveyor belt switch (blue) */
4003 element = EL_CONVEYOR_BELT_4_SWITCH_MIDDLE;
4007 element = EL_CONVEYOR_BELT_3_MIDDLE;
4011 element = EL_CONVEYOR_BELT_3_LEFT;
4015 element = EL_CONVEYOR_BELT_3_RIGHT;
4019 element = EL_CONVEYOR_BELT_1_MIDDLE;
4023 element = EL_CONVEYOR_BELT_1_LEFT;
4027 element = EL_CONVEYOR_BELT_1_RIGHT;
4031 element = EL_CONVEYOR_BELT_4_MIDDLE;
4035 element = EL_CONVEYOR_BELT_4_LEFT;
4039 element = EL_CONVEYOR_BELT_4_RIGHT;
4043 element = EL_EXPANDABLE_WALL_HORIZONTAL;
4047 element = EL_EXPANDABLE_WALL_VERTICAL;
4051 element = EL_EXPANDABLE_WALL_ANY;
4054 case 0x14ce: /* growing steel wall (left/right) */
4055 element = EL_EXPANDABLE_STEELWALL_HORIZONTAL;
4058 case 0x14df: /* growing steel wall (up/down) */
4059 element = EL_EXPANDABLE_STEELWALL_VERTICAL;
4062 case 0x14e8: /* growing steel wall (up/down/left/right) */
4063 element = EL_EXPANDABLE_STEELWALL_ANY;
4067 element = EL_SHIELD_DEADLY;
4071 element = EL_EXTRA_TIME;
4079 element = EL_EMPTY_SPACE;
4082 case 0x1578: /* quicksand (empty) */
4083 element = EL_QUICKSAND_FAST_EMPTY;
4086 case 0x1579: /* slow quicksand (empty) */
4087 element = EL_QUICKSAND_EMPTY;
4090 /* 0x157c - 0x158b: */
4093 /* 0x1590 - 0x159f: */
4094 /* EL_DC_LANDMINE */
4097 element = EL_EM_DYNAMITE;
4100 case 0x15a1: /* key (red) */
4101 element = EL_EM_KEY_1;
4104 case 0x15a2: /* key (yellow) */
4105 element = EL_EM_KEY_2;
4108 case 0x15a3: /* key (blue) */
4109 element = EL_EM_KEY_4;
4112 case 0x15a4: /* key (green) */
4113 element = EL_EM_KEY_3;
4116 case 0x15a5: /* key (white) */
4117 element = EL_DC_KEY_WHITE;
4121 element = EL_WALL_SLIPPERY;
4128 case 0x15a8: /* wall (not round) */
4132 case 0x15a9: /* (blue) */
4133 element = EL_CHAR_A;
4136 case 0x15aa: /* (blue) */
4137 element = EL_CHAR_B;
4140 case 0x15ab: /* (blue) */
4141 element = EL_CHAR_C;
4144 case 0x15ac: /* (blue) */
4145 element = EL_CHAR_D;
4148 case 0x15ad: /* (blue) */
4149 element = EL_CHAR_E;
4152 case 0x15ae: /* (blue) */
4153 element = EL_CHAR_F;
4156 case 0x15af: /* (blue) */
4157 element = EL_CHAR_G;
4160 case 0x15b0: /* (blue) */
4161 element = EL_CHAR_H;
4164 case 0x15b1: /* (blue) */
4165 element = EL_CHAR_I;
4168 case 0x15b2: /* (blue) */
4169 element = EL_CHAR_J;
4172 case 0x15b3: /* (blue) */
4173 element = EL_CHAR_K;
4176 case 0x15b4: /* (blue) */
4177 element = EL_CHAR_L;
4180 case 0x15b5: /* (blue) */
4181 element = EL_CHAR_M;
4184 case 0x15b6: /* (blue) */
4185 element = EL_CHAR_N;
4188 case 0x15b7: /* (blue) */
4189 element = EL_CHAR_O;
4192 case 0x15b8: /* (blue) */
4193 element = EL_CHAR_P;
4196 case 0x15b9: /* (blue) */
4197 element = EL_CHAR_Q;
4200 case 0x15ba: /* (blue) */
4201 element = EL_CHAR_R;
4204 case 0x15bb: /* (blue) */
4205 element = EL_CHAR_S;
4208 case 0x15bc: /* (blue) */
4209 element = EL_CHAR_T;
4212 case 0x15bd: /* (blue) */
4213 element = EL_CHAR_U;
4216 case 0x15be: /* (blue) */
4217 element = EL_CHAR_V;
4220 case 0x15bf: /* (blue) */
4221 element = EL_CHAR_W;
4224 case 0x15c0: /* (blue) */
4225 element = EL_CHAR_X;
4228 case 0x15c1: /* (blue) */
4229 element = EL_CHAR_Y;
4232 case 0x15c2: /* (blue) */
4233 element = EL_CHAR_Z;
4236 case 0x15c3: /* (blue) */
4237 element = EL_CHAR_AUMLAUT;
4240 case 0x15c4: /* (blue) */
4241 element = EL_CHAR_OUMLAUT;
4244 case 0x15c5: /* (blue) */
4245 element = EL_CHAR_UUMLAUT;
4248 case 0x15c6: /* (blue) */
4249 element = EL_CHAR_0;
4252 case 0x15c7: /* (blue) */
4253 element = EL_CHAR_1;
4256 case 0x15c8: /* (blue) */
4257 element = EL_CHAR_2;
4260 case 0x15c9: /* (blue) */
4261 element = EL_CHAR_3;
4264 case 0x15ca: /* (blue) */
4265 element = EL_CHAR_4;
4268 case 0x15cb: /* (blue) */
4269 element = EL_CHAR_5;
4272 case 0x15cc: /* (blue) */
4273 element = EL_CHAR_6;
4276 case 0x15cd: /* (blue) */
4277 element = EL_CHAR_7;
4280 case 0x15ce: /* (blue) */
4281 element = EL_CHAR_8;
4284 case 0x15cf: /* (blue) */
4285 element = EL_CHAR_9;
4288 case 0x15d0: /* (blue) */
4289 element = EL_CHAR_PERIOD;
4292 case 0x15d1: /* (blue) */
4293 element = EL_CHAR_EXCLAM;
4296 case 0x15d2: /* (blue) */
4297 element = EL_CHAR_COLON;
4300 case 0x15d3: /* (blue) */
4301 element = EL_CHAR_LESS;
4304 case 0x15d4: /* (blue) */
4305 element = EL_CHAR_GREATER;
4308 case 0x15d5: /* (blue) */
4309 element = EL_CHAR_QUESTION;
4312 case 0x15d6: /* (blue) */
4313 element = EL_CHAR_COPYRIGHT;
4316 case 0x15d7: /* (blue) */
4317 element = EL_CHAR_UP;
4320 case 0x15d8: /* (blue) */
4321 element = EL_CHAR_DOWN;
4324 case 0x15d9: /* (blue) */
4325 element = EL_CHAR_BUTTON;
4328 case 0x15da: /* (blue) */
4329 element = EL_CHAR_PLUS;
4332 case 0x15db: /* (blue) */
4333 element = EL_CHAR_MINUS;
4336 case 0x15dc: /* (blue) */
4337 element = EL_CHAR_APOSTROPHE;
4340 case 0x15dd: /* (blue) */
4341 element = EL_CHAR_PARENLEFT;
4344 case 0x15de: /* (blue) */
4345 element = EL_CHAR_PARENRIGHT;
4348 case 0x15df: /* (green) */
4349 element = EL_CHAR_A;
4352 case 0x15e0: /* (green) */
4353 element = EL_CHAR_B;
4356 case 0x15e1: /* (green) */
4357 element = EL_CHAR_C;
4360 case 0x15e2: /* (green) */
4361 element = EL_CHAR_D;
4364 case 0x15e3: /* (green) */
4365 element = EL_CHAR_E;
4368 case 0x15e4: /* (green) */
4369 element = EL_CHAR_F;
4372 case 0x15e5: /* (green) */
4373 element = EL_CHAR_G;
4376 case 0x15e6: /* (green) */
4377 element = EL_CHAR_H;
4380 case 0x15e7: /* (green) */
4381 element = EL_CHAR_I;
4384 case 0x15e8: /* (green) */
4385 element = EL_CHAR_J;
4388 case 0x15e9: /* (green) */
4389 element = EL_CHAR_K;
4392 case 0x15ea: /* (green) */
4393 element = EL_CHAR_L;
4396 case 0x15eb: /* (green) */
4397 element = EL_CHAR_M;
4400 case 0x15ec: /* (green) */
4401 element = EL_CHAR_N;
4404 case 0x15ed: /* (green) */
4405 element = EL_CHAR_O;
4408 case 0x15ee: /* (green) */
4409 element = EL_CHAR_P;
4412 case 0x15ef: /* (green) */
4413 element = EL_CHAR_Q;
4416 case 0x15f0: /* (green) */
4417 element = EL_CHAR_R;
4420 case 0x15f1: /* (green) */
4421 element = EL_CHAR_S;
4424 case 0x15f2: /* (green) */
4425 element = EL_CHAR_T;
4428 case 0x15f3: /* (green) */
4429 element = EL_CHAR_U;
4432 case 0x15f4: /* (green) */
4433 element = EL_CHAR_V;
4436 case 0x15f5: /* (green) */
4437 element = EL_CHAR_W;
4440 case 0x15f6: /* (green) */
4441 element = EL_CHAR_X;
4444 case 0x15f7: /* (green) */
4445 element = EL_CHAR_Y;
4448 case 0x15f8: /* (green) */
4449 element = EL_CHAR_Z;
4452 case 0x15f9: /* (green) */
4453 element = EL_CHAR_AUMLAUT;
4456 case 0x15fa: /* (green) */
4457 element = EL_CHAR_OUMLAUT;
4460 case 0x15fb: /* (green) */
4461 element = EL_CHAR_UUMLAUT;
4464 case 0x15fc: /* (green) */
4465 element = EL_CHAR_0;
4468 case 0x15fd: /* (green) */
4469 element = EL_CHAR_1;
4472 case 0x15fe: /* (green) */
4473 element = EL_CHAR_2;
4476 case 0x15ff: /* (green) */
4477 element = EL_CHAR_3;
4480 case 0x1600: /* (green) */
4481 element = EL_CHAR_4;
4484 case 0x1601: /* (green) */
4485 element = EL_CHAR_5;
4488 case 0x1602: /* (green) */
4489 element = EL_CHAR_6;
4492 case 0x1603: /* (green) */
4493 element = EL_CHAR_7;
4496 case 0x1604: /* (green) */
4497 element = EL_CHAR_8;
4500 case 0x1605: /* (green) */
4501 element = EL_CHAR_9;
4504 case 0x1606: /* (green) */
4505 element = EL_CHAR_PERIOD;
4508 case 0x1607: /* (green) */
4509 element = EL_CHAR_EXCLAM;
4512 case 0x1608: /* (green) */
4513 element = EL_CHAR_COLON;
4516 case 0x1609: /* (green) */
4517 element = EL_CHAR_LESS;
4520 case 0x160a: /* (green) */
4521 element = EL_CHAR_GREATER;
4524 case 0x160b: /* (green) */
4525 element = EL_CHAR_QUESTION;
4528 case 0x160c: /* (green) */
4529 element = EL_CHAR_COPYRIGHT;
4532 case 0x160d: /* (green) */
4533 element = EL_CHAR_UP;
4536 case 0x160e: /* (green) */
4537 element = EL_CHAR_DOWN;
4540 case 0x160f: /* (green) */
4541 element = EL_CHAR_BUTTON;
4544 case 0x1610: /* (green) */
4545 element = EL_CHAR_PLUS;
4548 case 0x1611: /* (green) */
4549 element = EL_CHAR_MINUS;
4552 case 0x1612: /* (green) */
4553 element = EL_CHAR_APOSTROPHE;
4556 case 0x1613: /* (green) */
4557 element = EL_CHAR_PARENLEFT;
4560 case 0x1614: /* (green) */
4561 element = EL_CHAR_PARENRIGHT;
4564 case 0x1615: /* (blue steel) */
4565 element = EL_STEEL_CHAR_A;
4568 case 0x1616: /* (blue steel) */
4569 element = EL_STEEL_CHAR_B;
4572 case 0x1617: /* (blue steel) */
4573 element = EL_STEEL_CHAR_C;
4576 case 0x1618: /* (blue steel) */
4577 element = EL_STEEL_CHAR_D;
4580 case 0x1619: /* (blue steel) */
4581 element = EL_STEEL_CHAR_E;
4584 case 0x161a: /* (blue steel) */
4585 element = EL_STEEL_CHAR_F;
4588 case 0x161b: /* (blue steel) */
4589 element = EL_STEEL_CHAR_G;
4592 case 0x161c: /* (blue steel) */
4593 element = EL_STEEL_CHAR_H;
4596 case 0x161d: /* (blue steel) */
4597 element = EL_STEEL_CHAR_I;
4600 case 0x161e: /* (blue steel) */
4601 element = EL_STEEL_CHAR_J;
4604 case 0x161f: /* (blue steel) */
4605 element = EL_STEEL_CHAR_K;
4608 case 0x1620: /* (blue steel) */
4609 element = EL_STEEL_CHAR_L;
4612 case 0x1621: /* (blue steel) */
4613 element = EL_STEEL_CHAR_M;
4616 case 0x1622: /* (blue steel) */
4617 element = EL_STEEL_CHAR_N;
4620 case 0x1623: /* (blue steel) */
4621 element = EL_STEEL_CHAR_O;
4624 case 0x1624: /* (blue steel) */
4625 element = EL_STEEL_CHAR_P;
4628 case 0x1625: /* (blue steel) */
4629 element = EL_STEEL_CHAR_Q;
4632 case 0x1626: /* (blue steel) */
4633 element = EL_STEEL_CHAR_R;
4636 case 0x1627: /* (blue steel) */
4637 element = EL_STEEL_CHAR_S;
4640 case 0x1628: /* (blue steel) */
4641 element = EL_STEEL_CHAR_T;
4644 case 0x1629: /* (blue steel) */
4645 element = EL_STEEL_CHAR_U;
4648 case 0x162a: /* (blue steel) */
4649 element = EL_STEEL_CHAR_V;
4652 case 0x162b: /* (blue steel) */
4653 element = EL_STEEL_CHAR_W;
4656 case 0x162c: /* (blue steel) */
4657 element = EL_STEEL_CHAR_X;
4660 case 0x162d: /* (blue steel) */
4661 element = EL_STEEL_CHAR_Y;
4664 case 0x162e: /* (blue steel) */
4665 element = EL_STEEL_CHAR_Z;
4668 case 0x162f: /* (blue steel) */
4669 element = EL_STEEL_CHAR_AUMLAUT;
4672 case 0x1630: /* (blue steel) */
4673 element = EL_STEEL_CHAR_OUMLAUT;
4676 case 0x1631: /* (blue steel) */
4677 element = EL_STEEL_CHAR_UUMLAUT;
4680 case 0x1632: /* (blue steel) */
4681 element = EL_STEEL_CHAR_0;
4684 case 0x1633: /* (blue steel) */
4685 element = EL_STEEL_CHAR_1;
4688 case 0x1634: /* (blue steel) */
4689 element = EL_STEEL_CHAR_2;
4692 case 0x1635: /* (blue steel) */
4693 element = EL_STEEL_CHAR_3;
4696 case 0x1636: /* (blue steel) */
4697 element = EL_STEEL_CHAR_4;
4700 case 0x1637: /* (blue steel) */
4701 element = EL_STEEL_CHAR_5;
4704 case 0x1638: /* (blue steel) */
4705 element = EL_STEEL_CHAR_6;
4708 case 0x1639: /* (blue steel) */
4709 element = EL_STEEL_CHAR_7;
4712 case 0x163a: /* (blue steel) */
4713 element = EL_STEEL_CHAR_8;
4716 case 0x163b: /* (blue steel) */
4717 element = EL_STEEL_CHAR_9;
4720 case 0x163c: /* (blue steel) */
4721 element = EL_STEEL_CHAR_PERIOD;
4724 case 0x163d: /* (blue steel) */
4725 element = EL_STEEL_CHAR_EXCLAM;
4728 case 0x163e: /* (blue steel) */
4729 element = EL_STEEL_CHAR_COLON;
4732 case 0x163f: /* (blue steel) */
4733 element = EL_STEEL_CHAR_LESS;
4736 case 0x1640: /* (blue steel) */
4737 element = EL_STEEL_CHAR_GREATER;
4740 case 0x1641: /* (blue steel) */
4741 element = EL_STEEL_CHAR_QUESTION;
4744 case 0x1642: /* (blue steel) */
4745 element = EL_STEEL_CHAR_COPYRIGHT;
4748 case 0x1643: /* (blue steel) */
4749 element = EL_STEEL_CHAR_UP;
4752 case 0x1644: /* (blue steel) */
4753 element = EL_STEEL_CHAR_DOWN;
4756 case 0x1645: /* (blue steel) */
4757 element = EL_STEEL_CHAR_BUTTON;
4760 case 0x1646: /* (blue steel) */
4761 element = EL_STEEL_CHAR_PLUS;
4764 case 0x1647: /* (blue steel) */
4765 element = EL_STEEL_CHAR_MINUS;
4768 case 0x1648: /* (blue steel) */
4769 element = EL_STEEL_CHAR_APOSTROPHE;
4772 case 0x1649: /* (blue steel) */
4773 element = EL_STEEL_CHAR_PARENLEFT;
4776 case 0x164a: /* (blue steel) */
4777 element = EL_STEEL_CHAR_PARENRIGHT;
4780 case 0x164b: /* (green steel) */
4781 element = EL_STEEL_CHAR_A;
4784 case 0x164c: /* (green steel) */
4785 element = EL_STEEL_CHAR_B;
4788 case 0x164d: /* (green steel) */
4789 element = EL_STEEL_CHAR_C;
4792 case 0x164e: /* (green steel) */
4793 element = EL_STEEL_CHAR_D;
4796 case 0x164f: /* (green steel) */
4797 element = EL_STEEL_CHAR_E;
4800 case 0x1650: /* (green steel) */
4801 element = EL_STEEL_CHAR_F;
4804 case 0x1651: /* (green steel) */
4805 element = EL_STEEL_CHAR_G;
4808 case 0x1652: /* (green steel) */
4809 element = EL_STEEL_CHAR_H;
4812 case 0x1653: /* (green steel) */
4813 element = EL_STEEL_CHAR_I;
4816 case 0x1654: /* (green steel) */
4817 element = EL_STEEL_CHAR_J;
4820 case 0x1655: /* (green steel) */
4821 element = EL_STEEL_CHAR_K;
4824 case 0x1656: /* (green steel) */
4825 element = EL_STEEL_CHAR_L;
4828 case 0x1657: /* (green steel) */
4829 element = EL_STEEL_CHAR_M;
4832 case 0x1658: /* (green steel) */
4833 element = EL_STEEL_CHAR_N;
4836 case 0x1659: /* (green steel) */
4837 element = EL_STEEL_CHAR_O;
4840 case 0x165a: /* (green steel) */
4841 element = EL_STEEL_CHAR_P;
4844 case 0x165b: /* (green steel) */
4845 element = EL_STEEL_CHAR_Q;
4848 case 0x165c: /* (green steel) */
4849 element = EL_STEEL_CHAR_R;
4852 case 0x165d: /* (green steel) */
4853 element = EL_STEEL_CHAR_S;
4856 case 0x165e: /* (green steel) */
4857 element = EL_STEEL_CHAR_T;
4860 case 0x165f: /* (green steel) */
4861 element = EL_STEEL_CHAR_U;
4864 case 0x1660: /* (green steel) */
4865 element = EL_STEEL_CHAR_V;
4868 case 0x1661: /* (green steel) */
4869 element = EL_STEEL_CHAR_W;
4872 case 0x1662: /* (green steel) */
4873 element = EL_STEEL_CHAR_X;
4876 case 0x1663: /* (green steel) */
4877 element = EL_STEEL_CHAR_Y;
4880 case 0x1664: /* (green steel) */
4881 element = EL_STEEL_CHAR_Z;
4884 case 0x1665: /* (green steel) */
4885 element = EL_STEEL_CHAR_AUMLAUT;
4888 case 0x1666: /* (green steel) */
4889 element = EL_STEEL_CHAR_OUMLAUT;
4892 case 0x1667: /* (green steel) */
4893 element = EL_STEEL_CHAR_UUMLAUT;
4896 case 0x1668: /* (green steel) */
4897 element = EL_STEEL_CHAR_0;
4900 case 0x1669: /* (green steel) */
4901 element = EL_STEEL_CHAR_1;
4904 case 0x166a: /* (green steel) */
4905 element = EL_STEEL_CHAR_2;
4908 case 0x166b: /* (green steel) */
4909 element = EL_STEEL_CHAR_3;
4912 case 0x166c: /* (green steel) */
4913 element = EL_STEEL_CHAR_4;
4916 case 0x166d: /* (green steel) */
4917 element = EL_STEEL_CHAR_5;
4920 case 0x166e: /* (green steel) */
4921 element = EL_STEEL_CHAR_6;
4924 case 0x166f: /* (green steel) */
4925 element = EL_STEEL_CHAR_7;
4928 case 0x1670: /* (green steel) */
4929 element = EL_STEEL_CHAR_8;
4932 case 0x1671: /* (green steel) */
4933 element = EL_STEEL_CHAR_9;
4936 case 0x1672: /* (green steel) */
4937 element = EL_STEEL_CHAR_PERIOD;
4940 case 0x1673: /* (green steel) */
4941 element = EL_STEEL_CHAR_EXCLAM;
4944 case 0x1674: /* (green steel) */
4945 element = EL_STEEL_CHAR_COLON;
4948 case 0x1675: /* (green steel) */
4949 element = EL_STEEL_CHAR_LESS;
4952 case 0x1676: /* (green steel) */
4953 element = EL_STEEL_CHAR_GREATER;
4956 case 0x1677: /* (green steel) */
4957 element = EL_STEEL_CHAR_QUESTION;
4960 case 0x1678: /* (green steel) */
4961 element = EL_STEEL_CHAR_COPYRIGHT;
4964 case 0x1679: /* (green steel) */
4965 element = EL_STEEL_CHAR_UP;
4968 case 0x167a: /* (green steel) */
4969 element = EL_STEEL_CHAR_DOWN;
4972 case 0x167b: /* (green steel) */
4973 element = EL_STEEL_CHAR_BUTTON;
4976 case 0x167c: /* (green steel) */
4977 element = EL_STEEL_CHAR_PLUS;
4980 case 0x167d: /* (green steel) */
4981 element = EL_STEEL_CHAR_MINUS;
4984 case 0x167e: /* (green steel) */
4985 element = EL_STEEL_CHAR_APOSTROPHE;
4988 case 0x167f: /* (green steel) */
4989 element = EL_STEEL_CHAR_PARENLEFT;
4992 case 0x1680: /* (green steel) */
4993 element = EL_STEEL_CHAR_PARENRIGHT;
4996 case 0x1681: /* gate (red) */
4997 element = EL_EM_GATE_1;
5000 case 0x1682: /* secret gate (red) */
5001 element = EL_GATE_1_GRAY;
5004 case 0x1683: /* gate (yellow) */
5005 element = EL_EM_GATE_2;
5008 case 0x1684: /* secret gate (yellow) */
5009 element = EL_GATE_2_GRAY;
5012 case 0x1685: /* gate (blue) */
5013 element = EL_EM_GATE_4;
5016 case 0x1686: /* secret gate (blue) */
5017 element = EL_GATE_4_GRAY;
5020 case 0x1687: /* gate (green) */
5021 element = EL_EM_GATE_3;
5024 case 0x1688: /* secret gate (green) */
5025 element = EL_GATE_3_GRAY;
5028 case 0x1689: /* gate (white) */
5029 element = EL_DC_GATE_WHITE;
5032 case 0x168a: /* secret gate (white) */
5033 element = EL_DC_GATE_WHITE_GRAY;
5036 case 0x168b: /* secret gate (no key) */
5037 element = EL_DC_GATE_FAKE_GRAY;
5041 element = EL_ROBOT_WHEEL;
5045 element = EL_DC_TIMEGATE_SWITCH;
5049 element = EL_ACID_POOL_BOTTOM;
5053 element = EL_ACID_POOL_TOPLEFT;
5057 element = EL_ACID_POOL_TOPRIGHT;
5061 element = EL_ACID_POOL_BOTTOMLEFT;
5065 element = EL_ACID_POOL_BOTTOMRIGHT;
5069 element = EL_STEELWALL;
5073 element = EL_STEELWALL_SLIPPERY;
5076 case 0x1695: /* steel wall (not round) */
5077 element = EL_STEELWALL;
5080 case 0x1696: /* steel wall (left) */
5081 element = EL_DC_STEELWALL_1_LEFT;
5084 case 0x1697: /* steel wall (bottom) */
5085 element = EL_DC_STEELWALL_1_BOTTOM;
5088 case 0x1698: /* steel wall (right) */
5089 element = EL_DC_STEELWALL_1_RIGHT;
5092 case 0x1699: /* steel wall (top) */
5093 element = EL_DC_STEELWALL_1_TOP;
5096 case 0x169a: /* steel wall (left/bottom) */
5097 element = EL_DC_STEELWALL_1_BOTTOMLEFT;
5100 case 0x169b: /* steel wall (right/bottom) */
5101 element = EL_DC_STEELWALL_1_BOTTOMRIGHT;
5104 case 0x169c: /* steel wall (right/top) */
5105 element = EL_DC_STEELWALL_1_TOPRIGHT;
5108 case 0x169d: /* steel wall (left/top) */
5109 element = EL_DC_STEELWALL_1_TOPLEFT;
5112 case 0x169e: /* steel wall (right/bottom small) */
5113 element = EL_DC_STEELWALL_1_BOTTOMRIGHT_2;
5116 case 0x169f: /* steel wall (left/bottom small) */
5117 element = EL_DC_STEELWALL_1_BOTTOMLEFT_2;
5120 case 0x16a0: /* steel wall (right/top small) */
5121 element = EL_DC_STEELWALL_1_TOPRIGHT_2;
5124 case 0x16a1: /* steel wall (left/top small) */
5125 element = EL_DC_STEELWALL_1_TOPLEFT_2;
5128 case 0x16a2: /* steel wall (left/right) */
5129 element = EL_DC_STEELWALL_1_VERTICAL;
5132 case 0x16a3: /* steel wall (top/bottom) */
5133 element = EL_DC_STEELWALL_1_HORIZONTAL;
5136 case 0x16a4: /* steel wall 2 (left end) */
5137 element = EL_DC_STEELWALL_2_LEFT;
5140 case 0x16a5: /* steel wall 2 (right end) */
5141 element = EL_DC_STEELWALL_2_RIGHT;
5144 case 0x16a6: /* steel wall 2 (top end) */
5145 element = EL_DC_STEELWALL_2_TOP;
5148 case 0x16a7: /* steel wall 2 (bottom end) */
5149 element = EL_DC_STEELWALL_2_BOTTOM;
5152 case 0x16a8: /* steel wall 2 (left/right) */
5153 element = EL_DC_STEELWALL_2_HORIZONTAL;
5156 case 0x16a9: /* steel wall 2 (up/down) */
5157 element = EL_DC_STEELWALL_2_VERTICAL;
5160 case 0x16aa: /* steel wall 2 (mid) */
5161 element = EL_DC_STEELWALL_2_MIDDLE;
5165 element = EL_SIGN_EXCLAMATION;
5169 element = EL_SIGN_RADIOACTIVITY;
5173 element = EL_SIGN_STOP;
5177 element = EL_SIGN_WHEELCHAIR;
5181 element = EL_SIGN_PARKING;
5185 element = EL_SIGN_NO_ENTRY;
5189 element = EL_SIGN_HEART;
5193 element = EL_SIGN_GIVE_WAY;
5197 element = EL_SIGN_ENTRY_FORBIDDEN;
5201 element = EL_SIGN_EMERGENCY_EXIT;
5205 element = EL_SIGN_YIN_YANG;
5209 element = EL_WALL_EMERALD;
5213 element = EL_WALL_DIAMOND;
5217 element = EL_WALL_PEARL;
5221 element = EL_WALL_CRYSTAL;
5225 element = EL_INVISIBLE_WALL;
5229 element = EL_INVISIBLE_STEELWALL;
5232 /* 0x16bc - 0x16cb: */
5233 /* EL_INVISIBLE_SAND */
5236 element = EL_LIGHT_SWITCH;
5240 element = EL_ENVELOPE_1;
5244 if (element >= 0x0117 && element <= 0x036e) /* (?) */
5245 element = EL_DIAMOND;
5246 else if (element >= 0x042d && element <= 0x0684) /* (?) */
5247 element = EL_EMERALD;
5248 else if (element >= 0x157c && element <= 0x158b)
5250 else if (element >= 0x1590 && element <= 0x159f)
5251 element = EL_DC_LANDMINE;
5252 else if (element >= 0x16bc && element <= 0x16cb)
5253 element = EL_INVISIBLE_SAND;
5256 Error(ERR_WARN, "unknown Diamond Caves element 0x%04x", element);
5257 element = EL_UNKNOWN;
5262 return getMappedElement(element);
5265 static void LoadLevelFromFileStream_DC(File *file, struct LevelInfo *level,
5268 byte header[DC_LEVEL_HEADER_SIZE];
5270 int envelope_header_pos = 62;
5271 int envelope_content_pos = 94;
5272 int level_name_pos = 251;
5273 int level_author_pos = 292;
5274 int envelope_header_len;
5275 int envelope_content_len;
5277 int level_author_len;
5279 int num_yamyam_contents;
5282 getDecodedWord_DC(0, TRUE); /* initialize DC2 decoding engine */
5284 for (i = 0; i < DC_LEVEL_HEADER_SIZE / 2; i++)
5286 unsigned short header_word = getDecodedWord_DC(getFile16BitBE(file), FALSE);
5288 header[i * 2 + 0] = header_word >> 8;
5289 header[i * 2 + 1] = header_word & 0xff;
5292 /* read some values from level header to check level decoding integrity */
5293 fieldx = header[6] | (header[7] << 8);
5294 fieldy = header[8] | (header[9] << 8);
5295 num_yamyam_contents = header[60] | (header[61] << 8);
5297 /* do some simple sanity checks to ensure that level was correctly decoded */
5298 if (fieldx < 1 || fieldx > 256 ||
5299 fieldy < 1 || fieldy > 256 ||
5300 num_yamyam_contents < 1 || num_yamyam_contents > 8)
5302 level->no_valid_file = TRUE;
5304 Error(ERR_WARN, "cannot decode level from stream -- using empty level");
5309 /* maximum envelope header size is 31 bytes */
5310 envelope_header_len = header[envelope_header_pos];
5311 /* maximum envelope content size is 110 (156?) bytes */
5312 envelope_content_len = header[envelope_content_pos];
5314 /* maximum level title size is 40 bytes */
5315 level_name_len = MIN(header[level_name_pos], MAX_LEVEL_NAME_LEN);
5316 /* maximum level author size is 30 (51?) bytes */
5317 level_author_len = MIN(header[level_author_pos], MAX_LEVEL_AUTHOR_LEN);
5321 for (i = 0; i < envelope_header_len; i++)
5322 if (envelope_size < MAX_ENVELOPE_TEXT_LEN)
5323 level->envelope[0].text[envelope_size++] =
5324 header[envelope_header_pos + 1 + i];
5326 if (envelope_header_len > 0 && envelope_content_len > 0)
5328 if (envelope_size < MAX_ENVELOPE_TEXT_LEN)
5329 level->envelope[0].text[envelope_size++] = '\n';
5330 if (envelope_size < MAX_ENVELOPE_TEXT_LEN)
5331 level->envelope[0].text[envelope_size++] = '\n';
5334 for (i = 0; i < envelope_content_len; i++)
5335 if (envelope_size < MAX_ENVELOPE_TEXT_LEN)
5336 level->envelope[0].text[envelope_size++] =
5337 header[envelope_content_pos + 1 + i];
5339 level->envelope[0].text[envelope_size] = '\0';
5341 level->envelope[0].xsize = MAX_ENVELOPE_XSIZE;
5342 level->envelope[0].ysize = 10;
5343 level->envelope[0].autowrap = TRUE;
5344 level->envelope[0].centered = TRUE;
5346 for (i = 0; i < level_name_len; i++)
5347 level->name[i] = header[level_name_pos + 1 + i];
5348 level->name[level_name_len] = '\0';
5350 for (i = 0; i < level_author_len; i++)
5351 level->author[i] = header[level_author_pos + 1 + i];
5352 level->author[level_author_len] = '\0';
5354 num_yamyam_contents = header[60] | (header[61] << 8);
5355 level->num_yamyam_contents =
5356 MIN(MAX(MIN_ELEMENT_CONTENTS, num_yamyam_contents), MAX_ELEMENT_CONTENTS);
5358 for (i = 0; i < num_yamyam_contents; i++)
5360 for (y = 0; y < 3; y++) for (x = 0; x < 3; x++)
5362 unsigned short word = getDecodedWord_DC(getFile16BitBE(file), FALSE);
5363 int element_dc = ((word & 0xff) << 8) | ((word >> 8) & 0xff);
5365 if (i < MAX_ELEMENT_CONTENTS)
5366 level->yamyam_content[i].e[x][y] = getMappedElement_DC(element_dc);
5370 fieldx = header[6] | (header[7] << 8);
5371 fieldy = header[8] | (header[9] << 8);
5372 level->fieldx = MIN(MAX(MIN_LEV_FIELDX, fieldx), MAX_LEV_FIELDX);
5373 level->fieldy = MIN(MAX(MIN_LEV_FIELDY, fieldy), MAX_LEV_FIELDY);
5375 for (y = 0; y < fieldy; y++) for (x = 0; x < fieldx; x++)
5377 unsigned short word = getDecodedWord_DC(getFile16BitBE(file), FALSE);
5378 int element_dc = ((word & 0xff) << 8) | ((word >> 8) & 0xff);
5380 if (x < MAX_LEV_FIELDX && y < MAX_LEV_FIELDY)
5381 level->field[x][y] = getMappedElement_DC(element_dc);
5384 x = MIN(MAX(0, (header[10] | (header[11] << 8)) - 1), MAX_LEV_FIELDX - 1);
5385 y = MIN(MAX(0, (header[12] | (header[13] << 8)) - 1), MAX_LEV_FIELDY - 1);
5386 level->field[x][y] = EL_PLAYER_1;
5388 x = MIN(MAX(0, (header[14] | (header[15] << 8)) - 1), MAX_LEV_FIELDX - 1);
5389 y = MIN(MAX(0, (header[16] | (header[17] << 8)) - 1), MAX_LEV_FIELDY - 1);
5390 level->field[x][y] = EL_PLAYER_2;
5392 level->gems_needed = header[18] | (header[19] << 8);
5394 level->score[SC_EMERALD] = header[20] | (header[21] << 8);
5395 level->score[SC_DIAMOND] = header[22] | (header[23] << 8);
5396 level->score[SC_PEARL] = header[24] | (header[25] << 8);
5397 level->score[SC_CRYSTAL] = header[26] | (header[27] << 8);
5398 level->score[SC_NUT] = header[28] | (header[29] << 8);
5399 level->score[SC_ROBOT] = header[30] | (header[31] << 8);
5400 level->score[SC_SPACESHIP] = header[32] | (header[33] << 8);
5401 level->score[SC_BUG] = header[34] | (header[35] << 8);
5402 level->score[SC_YAMYAM] = header[36] | (header[37] << 8);
5403 level->score[SC_DYNAMITE] = header[38] | (header[39] << 8);
5404 level->score[SC_KEY] = header[40] | (header[41] << 8);
5405 level->score[SC_TIME_BONUS] = header[42] | (header[43] << 8);
5407 level->time = header[44] | (header[45] << 8);
5409 level->amoeba_speed = header[46] | (header[47] << 8);
5410 level->time_light = header[48] | (header[49] << 8);
5411 level->time_timegate = header[50] | (header[51] << 8);
5412 level->time_wheel = header[52] | (header[53] << 8);
5413 level->time_magic_wall = header[54] | (header[55] << 8);
5414 level->extra_time = header[56] | (header[57] << 8);
5415 level->shield_normal_time = header[58] | (header[59] << 8);
5417 /* Diamond Caves has the same (strange) behaviour as Emerald Mine that gems
5418 can slip down from flat walls, like normal walls and steel walls */
5419 level->em_slippery_gems = TRUE;
5422 static void LoadLevelFromFileInfo_DC(struct LevelInfo *level,
5423 struct LevelFileInfo *level_file_info,
5424 boolean level_info_only)
5426 char *filename = level_file_info->filename;
5428 int num_magic_bytes = 8;
5429 char magic_bytes[num_magic_bytes + 1];
5430 int num_levels_to_skip = level_file_info->nr - leveldir_current->first_level;
5432 if (!(file = openFile(filename, MODE_READ)))
5434 level->no_valid_file = TRUE;
5436 if (!level_info_only)
5437 Error(ERR_WARN, "cannot read level '%s' -- using empty level", filename);
5442 // fseek(file, 0x0000, SEEK_SET);
5444 if (level_file_info->packed)
5446 /* read "magic bytes" from start of file */
5447 if (getStringFromFile(file, magic_bytes, num_magic_bytes + 1) == NULL)
5448 magic_bytes[0] = '\0';
5450 /* check "magic bytes" for correct file format */
5451 if (!strPrefix(magic_bytes, "DC2"))
5453 level->no_valid_file = TRUE;
5455 Error(ERR_WARN, "unknown DC level file '%s' -- using empty level",
5461 if (strPrefix(magic_bytes, "DC2Win95") ||
5462 strPrefix(magic_bytes, "DC2Win98"))
5464 int position_first_level = 0x00fa;
5465 int extra_bytes = 4;
5468 /* advance file stream to first level inside the level package */
5469 skip_bytes = position_first_level - num_magic_bytes - extra_bytes;
5471 /* each block of level data is followed by block of non-level data */
5472 num_levels_to_skip *= 2;
5474 /* at least skip header bytes, therefore use ">= 0" instead of "> 0" */
5475 while (num_levels_to_skip >= 0)
5477 /* advance file stream to next level inside the level package */
5478 if (seekFile(file, skip_bytes, SEEK_CUR) != 0)
5480 level->no_valid_file = TRUE;
5482 Error(ERR_WARN, "cannot fseek in file '%s' -- using empty level",
5488 /* skip apparently unused extra bytes following each level */
5489 ReadUnusedBytesFromFile(file, extra_bytes);
5491 /* read size of next level in level package */
5492 skip_bytes = getFile32BitLE(file);
5494 num_levels_to_skip--;
5499 level->no_valid_file = TRUE;
5501 Error(ERR_WARN, "unknown DC2 level file '%s' -- using empty level",
5508 LoadLevelFromFileStream_DC(file, level, level_file_info->nr);
5514 /* ------------------------------------------------------------------------- */
5515 /* functions for loading SB level */
5516 /* ------------------------------------------------------------------------- */
5518 int getMappedElement_SB(int element_ascii, boolean use_ces)
5526 sb_element_mapping[] =
5528 { ' ', EL_EMPTY, EL_CUSTOM_1 }, /* floor (space) */
5529 { '#', EL_STEELWALL, EL_CUSTOM_2 }, /* wall */
5530 { '@', EL_PLAYER_1, EL_CUSTOM_3 }, /* player */
5531 { '$', EL_SOKOBAN_OBJECT, EL_CUSTOM_4 }, /* box */
5532 { '.', EL_SOKOBAN_FIELD_EMPTY, EL_CUSTOM_5 }, /* goal square */
5533 { '*', EL_SOKOBAN_FIELD_FULL, EL_CUSTOM_6 }, /* box on goal square */
5534 { '+', EL_SOKOBAN_FIELD_PLAYER, EL_CUSTOM_7 }, /* player on goal square */
5535 { '_', EL_INVISIBLE_STEELWALL, EL_FROM_LEVEL_TEMPLATE }, /* floor beyond border */
5542 for (i = 0; sb_element_mapping[i].ascii != 0; i++)
5543 if (element_ascii == sb_element_mapping[i].ascii)
5544 return (use_ces ? sb_element_mapping[i].ce : sb_element_mapping[i].sb);
5546 return EL_UNDEFINED;
5549 static void LoadLevelFromFileInfo_SB(struct LevelInfo *level,
5550 struct LevelFileInfo *level_file_info,
5551 boolean level_info_only)
5553 char *filename = level_file_info->filename;
5554 char line[MAX_LINE_LEN], line_raw[MAX_LINE_LEN], previous_line[MAX_LINE_LEN];
5555 char last_comment[MAX_LINE_LEN];
5556 char level_name[MAX_LINE_LEN];
5559 int num_levels_to_skip = level_file_info->nr - leveldir_current->first_level;
5560 boolean read_continued_line = FALSE;
5561 boolean reading_playfield = FALSE;
5562 boolean got_valid_playfield_line = FALSE;
5563 boolean invalid_playfield_char = FALSE;
5564 boolean load_xsb_to_ces = check_special_flags("load_xsb_to_ces");
5565 int file_level_nr = 0;
5567 int x = 0, y = 0; /* initialized to make compilers happy */
5569 last_comment[0] = '\0';
5570 level_name[0] = '\0';
5572 if (!(file = openFile(filename, MODE_READ)))
5574 level->no_valid_file = TRUE;
5576 if (!level_info_only)
5577 Error(ERR_WARN, "cannot read level '%s' -- using empty level", filename);
5582 while (!checkEndOfFile(file))
5584 /* level successfully read, but next level may follow here */
5585 if (!got_valid_playfield_line && reading_playfield)
5587 /* read playfield from single level file -- skip remaining file */
5588 if (!level_file_info->packed)
5591 if (file_level_nr >= num_levels_to_skip)
5596 last_comment[0] = '\0';
5597 level_name[0] = '\0';
5599 reading_playfield = FALSE;
5602 got_valid_playfield_line = FALSE;
5604 /* read next line of input file */
5605 if (!getStringFromFile(file, line, MAX_LINE_LEN))
5608 /* check if line was completely read and is terminated by line break */
5609 if (strlen(line) > 0 && line[strlen(line) - 1] == '\n')
5612 /* cut trailing line break (this can be newline and/or carriage return) */
5613 for (line_ptr = &line[strlen(line)]; line_ptr >= line; line_ptr--)
5614 if ((*line_ptr == '\n' || *line_ptr == '\r') && *(line_ptr + 1) == '\0')
5617 /* copy raw input line for later use (mainly debugging output) */
5618 strcpy(line_raw, line);
5620 if (read_continued_line)
5622 /* append new line to existing line, if there is enough space */
5623 if (strlen(previous_line) + strlen(line_ptr) < MAX_LINE_LEN)
5624 strcat(previous_line, line_ptr);
5626 strcpy(line, previous_line); /* copy storage buffer to line */
5628 read_continued_line = FALSE;
5631 /* if the last character is '\', continue at next line */
5632 if (strlen(line) > 0 && line[strlen(line) - 1] == '\\')
5634 line[strlen(line) - 1] = '\0'; /* cut off trailing backslash */
5635 strcpy(previous_line, line); /* copy line to storage buffer */
5637 read_continued_line = TRUE;
5642 /* skip empty lines */
5643 if (line[0] == '\0')
5646 /* extract comment text from comment line */
5649 for (line_ptr = line; *line_ptr; line_ptr++)
5650 if (*line_ptr != ' ' && *line_ptr != '\t' && *line_ptr != ';')
5653 strcpy(last_comment, line_ptr);
5658 /* extract level title text from line containing level title */
5659 if (line[0] == '\'')
5661 strcpy(level_name, &line[1]);
5663 if (strlen(level_name) > 0 && level_name[strlen(level_name) - 1] == '\'')
5664 level_name[strlen(level_name) - 1] = '\0';
5669 /* skip lines containing only spaces (or empty lines) */
5670 for (line_ptr = line; *line_ptr; line_ptr++)
5671 if (*line_ptr != ' ')
5673 if (*line_ptr == '\0')
5676 /* at this point, we have found a line containing part of a playfield */
5678 got_valid_playfield_line = TRUE;
5680 if (!reading_playfield)
5682 reading_playfield = TRUE;
5683 invalid_playfield_char = FALSE;
5685 for (x = 0; x < MAX_LEV_FIELDX; x++)
5686 for (y = 0; y < MAX_LEV_FIELDY; y++)
5687 level->field[x][y] = getMappedElement_SB(' ', load_xsb_to_ces);
5692 /* start with topmost tile row */
5696 /* skip playfield line if larger row than allowed */
5697 if (y >= MAX_LEV_FIELDY)
5700 /* start with leftmost tile column */
5703 /* read playfield elements from line */
5704 for (line_ptr = line; *line_ptr; line_ptr++)
5706 int mapped_sb_element = getMappedElement_SB(*line_ptr, load_xsb_to_ces);
5708 /* stop parsing playfield line if larger column than allowed */
5709 if (x >= MAX_LEV_FIELDX)
5712 if (mapped_sb_element == EL_UNDEFINED)
5714 invalid_playfield_char = TRUE;
5719 level->field[x][y] = mapped_sb_element;
5721 /* continue with next tile column */
5724 level->fieldx = MAX(x, level->fieldx);
5727 if (invalid_playfield_char)
5729 /* if first playfield line, treat invalid lines as comment lines */
5731 reading_playfield = FALSE;
5736 /* continue with next tile row */
5744 level->fieldx = MIN(MAX(MIN_LEV_FIELDX, level->fieldx), MAX_LEV_FIELDX);
5745 level->fieldy = MIN(MAX(MIN_LEV_FIELDY, level->fieldy), MAX_LEV_FIELDY);
5747 if (!reading_playfield)
5749 level->no_valid_file = TRUE;
5751 Error(ERR_WARN, "cannot read level '%s' -- using empty level", filename);
5756 if (*level_name != '\0')
5758 strncpy(level->name, level_name, MAX_LEVEL_NAME_LEN);
5759 level->name[MAX_LEVEL_NAME_LEN] = '\0';
5761 else if (*last_comment != '\0')
5763 strncpy(level->name, last_comment, MAX_LEVEL_NAME_LEN);
5764 level->name[MAX_LEVEL_NAME_LEN] = '\0';
5768 sprintf(level->name, "--> Level %d <--", level_file_info->nr);
5771 /* set all empty fields beyond the border walls to invisible steel wall */
5772 for (y = 0; y < level->fieldy; y++) for (x = 0; x < level->fieldx; x++)
5774 if ((x == 0 || x == level->fieldx - 1 ||
5775 y == 0 || y == level->fieldy - 1) &&
5776 level->field[x][y] == getMappedElement_SB(' ', load_xsb_to_ces))
5777 FloodFillLevel(x, y, getMappedElement_SB('_', load_xsb_to_ces),
5778 level->field, level->fieldx, level->fieldy);
5781 /* set special level settings for Sokoban levels */
5784 level->use_step_counter = TRUE;
5786 if (load_xsb_to_ces)
5788 /* special global settings can now be set in level template */
5790 level->use_custom_template = TRUE;
5795 /* ------------------------------------------------------------------------- */
5796 /* functions for handling native levels */
5797 /* ------------------------------------------------------------------------- */
5799 static void LoadLevelFromFileInfo_EM(struct LevelInfo *level,
5800 struct LevelFileInfo *level_file_info,
5801 boolean level_info_only)
5803 if (!LoadNativeLevel_EM(level_file_info->filename, level_info_only))
5804 level->no_valid_file = TRUE;
5807 static void LoadLevelFromFileInfo_SP(struct LevelInfo *level,
5808 struct LevelFileInfo *level_file_info,
5809 boolean level_info_only)
5813 /* determine position of requested level inside level package */
5814 if (level_file_info->packed)
5815 pos = level_file_info->nr - leveldir_current->first_level;
5817 if (!LoadNativeLevel_SP(level_file_info->filename, pos, level_info_only))
5818 level->no_valid_file = TRUE;
5821 void CopyNativeLevel_RND_to_Native(struct LevelInfo *level)
5823 if (level->game_engine_type == GAME_ENGINE_TYPE_EM)
5824 CopyNativeLevel_RND_to_EM(level);
5825 else if (level->game_engine_type == GAME_ENGINE_TYPE_SP)
5826 CopyNativeLevel_RND_to_SP(level);
5829 void CopyNativeLevel_Native_to_RND(struct LevelInfo *level)
5831 if (level->game_engine_type == GAME_ENGINE_TYPE_EM)
5832 CopyNativeLevel_EM_to_RND(level);
5833 else if (level->game_engine_type == GAME_ENGINE_TYPE_SP)
5834 CopyNativeLevel_SP_to_RND(level);
5837 void SaveNativeLevel(struct LevelInfo *level)
5839 if (level->game_engine_type == GAME_ENGINE_TYPE_SP)
5841 char *basename = getSingleLevelBasenameExt(level->file_info.nr, "sp");
5842 char *filename = getLevelFilenameFromBasename(basename);
5844 CopyNativeLevel_RND_to_SP(level);
5845 CopyNativeTape_RND_to_SP(level);
5847 SaveNativeLevel_SP(filename);
5852 /* ------------------------------------------------------------------------- */
5853 /* functions for loading generic level */
5854 /* ------------------------------------------------------------------------- */
5856 static void LoadLevelFromFileInfo(struct LevelInfo *level,
5857 struct LevelFileInfo *level_file_info,
5858 boolean level_info_only)
5860 /* always start with reliable default values */
5861 setLevelInfoToDefaults(level, level_info_only);
5863 switch (level_file_info->type)
5865 case LEVEL_FILE_TYPE_RND:
5866 LoadLevelFromFileInfo_RND(level, level_file_info, level_info_only);
5869 case LEVEL_FILE_TYPE_EM:
5870 LoadLevelFromFileInfo_EM(level, level_file_info, level_info_only);
5871 level->game_engine_type = GAME_ENGINE_TYPE_EM;
5874 case LEVEL_FILE_TYPE_SP:
5875 LoadLevelFromFileInfo_SP(level, level_file_info, level_info_only);
5876 level->game_engine_type = GAME_ENGINE_TYPE_SP;
5879 case LEVEL_FILE_TYPE_DC:
5880 LoadLevelFromFileInfo_DC(level, level_file_info, level_info_only);
5883 case LEVEL_FILE_TYPE_SB:
5884 LoadLevelFromFileInfo_SB(level, level_file_info, level_info_only);
5888 LoadLevelFromFileInfo_RND(level, level_file_info, level_info_only);
5892 /* if level file is invalid, restore level structure to default values */
5893 if (level->no_valid_file)
5895 setLevelInfoToDefaults(level, level_info_only);
5897 level->no_valid_file = TRUE; /* but keep "no valid file" flag */
5900 if (level->game_engine_type == GAME_ENGINE_TYPE_UNKNOWN)
5901 level->game_engine_type = GAME_ENGINE_TYPE_RND;
5903 if (level_file_info->type != LEVEL_FILE_TYPE_RND)
5904 CopyNativeLevel_Native_to_RND(level);
5907 void LoadLevelFromFilename(struct LevelInfo *level, char *filename)
5909 static struct LevelFileInfo level_file_info;
5911 /* always start with reliable default values */
5912 setFileInfoToDefaults(&level_file_info);
5914 level_file_info.nr = 0; /* unknown level number */
5915 level_file_info.type = LEVEL_FILE_TYPE_RND; /* no others supported yet */
5916 level_file_info.filename = filename;
5918 LoadLevelFromFileInfo(level, &level_file_info, FALSE);
5921 static void LoadLevel_InitVersion(struct LevelInfo *level, char *filename)
5925 if (leveldir_current == NULL) /* only when dumping level */
5928 /* all engine modifications also valid for levels which use latest engine */
5929 if (level->game_version < VERSION_IDENT(3,2,0,5))
5931 /* time bonus score was given for 10 s instead of 1 s before 3.2.0-5 */
5932 level->score[SC_TIME_BONUS] /= 10;
5935 if (leveldir_current->latest_engine)
5937 /* ---------- use latest game engine ----------------------------------- */
5939 /* For all levels which are forced to use the latest game engine version
5940 (normally all but user contributed, private and undefined levels), set
5941 the game engine version to the actual version; this allows for actual
5942 corrections in the game engine to take effect for existing, converted
5943 levels (from "classic" or other existing games) to make the emulation
5944 of the corresponding game more accurate, while (hopefully) not breaking
5945 existing levels created from other players. */
5947 level->game_version = GAME_VERSION_ACTUAL;
5949 /* Set special EM style gems behaviour: EM style gems slip down from
5950 normal, steel and growing wall. As this is a more fundamental change,
5951 it seems better to set the default behaviour to "off" (as it is more
5952 natural) and make it configurable in the level editor (as a property
5953 of gem style elements). Already existing converted levels (neither
5954 private nor contributed levels) are changed to the new behaviour. */
5956 if (level->file_version < FILE_VERSION_2_0)
5957 level->em_slippery_gems = TRUE;
5962 /* ---------- use game engine the level was created with ----------------- */
5964 /* For all levels which are not forced to use the latest game engine
5965 version (normally user contributed, private and undefined levels),
5966 use the version of the game engine the levels were created for.
5968 Since 2.0.1, the game engine version is now directly stored
5969 in the level file (chunk "VERS"), so there is no need anymore
5970 to set the game version from the file version (except for old,
5971 pre-2.0 levels, where the game version is still taken from the
5972 file format version used to store the level -- see above). */
5974 /* player was faster than enemies in 1.0.0 and before */
5975 if (level->file_version == FILE_VERSION_1_0)
5976 for (i = 0; i < MAX_PLAYERS; i++)
5977 level->initial_player_stepsize[i] = STEPSIZE_FAST;
5979 /* default behaviour for EM style gems was "slippery" only in 2.0.1 */
5980 if (level->game_version == VERSION_IDENT(2,0,1,0))
5981 level->em_slippery_gems = TRUE;
5983 /* springs could be pushed over pits before (pre-release version) 2.2.0 */
5984 if (level->game_version < VERSION_IDENT(2,2,0,0))
5985 level->use_spring_bug = TRUE;
5987 if (level->game_version < VERSION_IDENT(3,2,0,5))
5989 /* time orb caused limited time in endless time levels before 3.2.0-5 */
5990 level->use_time_orb_bug = TRUE;
5992 /* default behaviour for snapping was "no snap delay" before 3.2.0-5 */
5993 level->block_snap_field = FALSE;
5995 /* extra time score was same value as time left score before 3.2.0-5 */
5996 level->extra_time_score = level->score[SC_TIME_BONUS];
5999 if (level->game_version < VERSION_IDENT(3,2,0,7))
6001 /* default behaviour for snapping was "not continuous" before 3.2.0-7 */
6002 level->continuous_snapping = FALSE;
6005 /* only few elements were able to actively move into acid before 3.1.0 */
6006 /* trigger settings did not exist before 3.1.0; set to default "any" */
6007 if (level->game_version < VERSION_IDENT(3,1,0,0))
6009 /* correct "can move into acid" settings (all zero in old levels) */
6011 level->can_move_into_acid_bits = 0; /* nothing can move into acid */
6012 level->dont_collide_with_bits = 0; /* nothing is deadly when colliding */
6014 setMoveIntoAcidProperty(level, EL_ROBOT, TRUE);
6015 setMoveIntoAcidProperty(level, EL_SATELLITE, TRUE);
6016 setMoveIntoAcidProperty(level, EL_PENGUIN, TRUE);
6017 setMoveIntoAcidProperty(level, EL_BALLOON, TRUE);
6019 for (i = 0; i < NUM_CUSTOM_ELEMENTS; i++)
6020 SET_PROPERTY(EL_CUSTOM_START + i, EP_CAN_MOVE_INTO_ACID, TRUE);
6022 /* correct trigger settings (stored as zero == "none" in old levels) */
6024 for (i = 0; i < NUM_CUSTOM_ELEMENTS; i++)
6026 int element = EL_CUSTOM_START + i;
6027 struct ElementInfo *ei = &element_info[element];
6029 for (j = 0; j < ei->num_change_pages; j++)
6031 struct ElementChangeInfo *change = &ei->change_page[j];
6033 change->trigger_player = CH_PLAYER_ANY;
6034 change->trigger_page = CH_PAGE_ANY;
6039 /* try to detect and fix "Snake Bite" levels, which are broken with 3.2.0 */
6041 int element = EL_CUSTOM_256;
6042 struct ElementInfo *ei = &element_info[element];
6043 struct ElementChangeInfo *change = &ei->change_page[0];
6045 /* This is needed to fix a problem that was caused by a bugfix in function
6046 game.c/CreateFieldExt() introduced with 3.2.0 that corrects the behaviour
6047 when a custom element changes to EL_SOKOBAN_FIELD_PLAYER (before, it did
6048 not replace walkable elements, but instead just placed the player on it,
6049 without placing the Sokoban field under the player). Unfortunately, this
6050 breaks "Snake Bite" style levels when the snake is halfway through a door
6051 that just closes (the snake head is still alive and can be moved in this
6052 case). This can be fixed by replacing the EL_SOKOBAN_FIELD_PLAYER by the
6053 player (without Sokoban element) which then gets killed as designed). */
6055 if ((strncmp(leveldir_current->identifier, "snake_bite", 10) == 0 ||
6056 strncmp(ei->description, "pause b4 death", 14) == 0) &&
6057 change->target_element == EL_SOKOBAN_FIELD_PLAYER)
6058 change->target_element = EL_PLAYER_1;
6061 /* try to detect and fix "Zelda" style levels, which are broken with 3.2.5 */
6062 if (level->game_version < VERSION_IDENT(3,2,5,0))
6064 /* This is needed to fix a problem that was caused by a bugfix in function
6065 game.c/CheckTriggeredElementChangeExt() introduced with 3.2.5 that
6066 corrects the behaviour when a custom element changes to another custom
6067 element with a higher element number that has change actions defined.
6068 Normally, only one change per frame is allowed for custom elements.
6069 Therefore, it is checked if a custom element already changed in the
6070 current frame; if it did, subsequent changes are suppressed.
6071 Unfortunately, this is only checked for element changes, but not for
6072 change actions, which are still executed. As the function above loops
6073 through all custom elements from lower to higher, an element change
6074 resulting in a lower CE number won't be checked again, while a target
6075 element with a higher number will also be checked, and potential change
6076 actions will get executed for this CE, too (which is wrong), while
6077 further changes are ignored (which is correct). As this bugfix breaks
6078 Zelda II (and introduces graphical bugs to Zelda I, and also breaks a
6079 few other levels like Alan Bond's "FMV"), allow the previous, incorrect
6080 behaviour for existing levels and tapes that make use of this bug */
6082 level->use_action_after_change_bug = TRUE;
6085 /* not centering level after relocating player was default only in 3.2.3 */
6086 if (level->game_version == VERSION_IDENT(3,2,3,0)) /* (no pre-releases) */
6087 level->shifted_relocation = TRUE;
6089 /* EM style elements always chain-exploded in R'n'D engine before 3.2.6 */
6090 if (level->game_version < VERSION_IDENT(3,2,6,0))
6091 level->em_explodes_by_fire = TRUE;
6094 static void LoadLevel_InitElements(struct LevelInfo *level, char *filename)
6098 /* map custom element change events that have changed in newer versions
6099 (these following values were accidentally changed in version 3.0.1)
6100 (this seems to be needed only for 'ab_levelset3' and 'ab_levelset4') */
6101 if (level->game_version <= VERSION_IDENT(3,0,0,0))
6103 for (i = 0; i < NUM_CUSTOM_ELEMENTS; i++)
6105 int element = EL_CUSTOM_START + i;
6107 /* order of checking and copying events to be mapped is important */
6108 /* (do not change the start and end value -- they are constant) */
6109 for (j = CE_BY_OTHER_ACTION; j >= CE_VALUE_GETS_ZERO; j--)
6111 if (HAS_CHANGE_EVENT(element, j - 2))
6113 SET_CHANGE_EVENT(element, j - 2, FALSE);
6114 SET_CHANGE_EVENT(element, j, TRUE);
6118 /* order of checking and copying events to be mapped is important */
6119 /* (do not change the start and end value -- they are constant) */
6120 for (j = CE_PLAYER_COLLECTS_X; j >= CE_HITTING_SOMETHING; j--)
6122 if (HAS_CHANGE_EVENT(element, j - 1))
6124 SET_CHANGE_EVENT(element, j - 1, FALSE);
6125 SET_CHANGE_EVENT(element, j, TRUE);
6131 /* initialize "can_change" field for old levels with only one change page */
6132 if (level->game_version <= VERSION_IDENT(3,0,2,0))
6134 for (i = 0; i < NUM_CUSTOM_ELEMENTS; i++)
6136 int element = EL_CUSTOM_START + i;
6138 if (CAN_CHANGE(element))
6139 element_info[element].change->can_change = TRUE;
6143 /* correct custom element values (for old levels without these options) */
6144 if (level->game_version < VERSION_IDENT(3,1,1,0))
6146 for (i = 0; i < NUM_CUSTOM_ELEMENTS; i++)
6148 int element = EL_CUSTOM_START + i;
6149 struct ElementInfo *ei = &element_info[element];
6151 if (ei->access_direction == MV_NO_DIRECTION)
6152 ei->access_direction = MV_ALL_DIRECTIONS;
6156 /* correct custom element values (fix invalid values for all versions) */
6159 for (i = 0; i < NUM_CUSTOM_ELEMENTS; i++)
6161 int element = EL_CUSTOM_START + i;
6162 struct ElementInfo *ei = &element_info[element];
6164 for (j = 0; j < ei->num_change_pages; j++)
6166 struct ElementChangeInfo *change = &ei->change_page[j];
6168 if (change->trigger_player == CH_PLAYER_NONE)
6169 change->trigger_player = CH_PLAYER_ANY;
6171 if (change->trigger_side == CH_SIDE_NONE)
6172 change->trigger_side = CH_SIDE_ANY;
6177 /* initialize "can_explode" field for old levels which did not store this */
6178 /* !!! CHECK THIS -- "<= 3,1,0,0" IS PROBABLY WRONG !!! */
6179 if (level->game_version <= VERSION_IDENT(3,1,0,0))
6181 for (i = 0; i < NUM_CUSTOM_ELEMENTS; i++)
6183 int element = EL_CUSTOM_START + i;
6185 if (EXPLODES_1X1_OLD(element))
6186 element_info[element].explosion_type = EXPLODES_1X1;
6188 SET_PROPERTY(element, EP_CAN_EXPLODE, (EXPLODES_BY_FIRE(element) ||
6189 EXPLODES_SMASHED(element) ||
6190 EXPLODES_IMPACT(element)));
6194 /* correct previously hard-coded move delay values for maze runner style */
6195 if (level->game_version < VERSION_IDENT(3,1,1,0))
6197 for (i = 0; i < NUM_CUSTOM_ELEMENTS; i++)
6199 int element = EL_CUSTOM_START + i;
6201 if (element_info[element].move_pattern & MV_MAZE_RUNNER_STYLE)
6203 /* previously hard-coded and therefore ignored */
6204 element_info[element].move_delay_fixed = 9;
6205 element_info[element].move_delay_random = 0;
6210 /* map elements that have changed in newer versions */
6211 level->amoeba_content = getMappedElementByVersion(level->amoeba_content,
6212 level->game_version);
6213 for (i = 0; i < MAX_ELEMENT_CONTENTS; i++)
6214 for (x = 0; x < 3; x++)
6215 for (y = 0; y < 3; y++)
6216 level->yamyam_content[i].e[x][y] =
6217 getMappedElementByVersion(level->yamyam_content[i].e[x][y],
6218 level->game_version);
6220 /* initialize element properties for level editor etc. */
6221 InitElementPropertiesEngine(level->game_version);
6222 InitElementPropertiesAfterLoading(level->game_version);
6223 InitElementPropertiesGfxElement();
6226 static void LoadLevel_InitPlayfield(struct LevelInfo *level, char *filename)
6230 /* map elements that have changed in newer versions */
6231 for (y = 0; y < level->fieldy; y++)
6232 for (x = 0; x < level->fieldx; x++)
6233 level->field[x][y] = getMappedElementByVersion(level->field[x][y],
6234 level->game_version);
6236 /* clear unused playfield data (nicer if level gets resized in editor) */
6237 for (x = 0; x < MAX_LEV_FIELDX; x++)
6238 for (y = 0; y < MAX_LEV_FIELDY; y++)
6239 if (x >= level->fieldx || y >= level->fieldy)
6240 level->field[x][y] = EL_EMPTY;
6242 /* copy elements to runtime playfield array */
6243 for (x = 0; x < MAX_LEV_FIELDX; x++)
6244 for (y = 0; y < MAX_LEV_FIELDY; y++)
6245 Feld[x][y] = level->field[x][y];
6247 /* initialize level size variables for faster access */
6248 lev_fieldx = level->fieldx;
6249 lev_fieldy = level->fieldy;
6251 /* determine border element for this level */
6252 if (level->file_info.type == LEVEL_FILE_TYPE_DC)
6253 BorderElement = EL_EMPTY; /* (in editor, SetBorderElement() is used) */
6258 static void LoadLevel_InitNativeEngines(struct LevelInfo *level,char *filename)
6260 struct LevelFileInfo *level_file_info = &level->file_info;
6262 if (level_file_info->type == LEVEL_FILE_TYPE_RND)
6263 CopyNativeLevel_RND_to_Native(level);
6266 void LoadLevelTemplate(int nr)
6270 setLevelFileInfo(&level_template.file_info, nr);
6271 filename = level_template.file_info.filename;
6273 LoadLevelFromFileInfo(&level_template, &level_template.file_info, FALSE);
6275 LoadLevel_InitVersion(&level_template, filename);
6276 LoadLevel_InitElements(&level_template, filename);
6278 ActivateLevelTemplate();
6281 void LoadLevel(int nr)
6285 setLevelFileInfo(&level.file_info, nr);
6286 filename = level.file_info.filename;
6288 LoadLevelFromFileInfo(&level, &level.file_info, FALSE);
6290 if (level.use_custom_template)
6291 LoadLevelTemplate(-1);
6293 LoadLevel_InitVersion(&level, filename);
6294 LoadLevel_InitElements(&level, filename);
6295 LoadLevel_InitPlayfield(&level, filename);
6297 LoadLevel_InitNativeEngines(&level, filename);
6300 void LoadLevelInfoOnly(int nr)
6302 setLevelFileInfo(&level.file_info, nr);
6304 LoadLevelFromFileInfo(&level, &level.file_info, TRUE);
6307 static int SaveLevel_VERS(FILE *file, struct LevelInfo *level)
6311 chunk_size += putFileVersion(file, level->file_version);
6312 chunk_size += putFileVersion(file, level->game_version);
6317 static int SaveLevel_DATE(FILE *file, struct LevelInfo *level)
6321 chunk_size += putFile16BitBE(file, level->creation_date.year);
6322 chunk_size += putFile8Bit(file, level->creation_date.month);
6323 chunk_size += putFile8Bit(file, level->creation_date.day);
6328 #if ENABLE_HISTORIC_CHUNKS
6329 static void SaveLevel_HEAD(FILE *file, struct LevelInfo *level)
6333 putFile8Bit(file, level->fieldx);
6334 putFile8Bit(file, level->fieldy);
6336 putFile16BitBE(file, level->time);
6337 putFile16BitBE(file, level->gems_needed);
6339 for (i = 0; i < MAX_LEVEL_NAME_LEN; i++)
6340 putFile8Bit(file, level->name[i]);
6342 for (i = 0; i < LEVEL_SCORE_ELEMENTS; i++)
6343 putFile8Bit(file, level->score[i]);
6345 for (i = 0; i < STD_ELEMENT_CONTENTS; i++)
6346 for (y = 0; y < 3; y++)
6347 for (x = 0; x < 3; x++)
6348 putFile8Bit(file, (level->encoding_16bit_yamyam ? EL_EMPTY :
6349 level->yamyam_content[i].e[x][y]));
6350 putFile8Bit(file, level->amoeba_speed);
6351 putFile8Bit(file, level->time_magic_wall);
6352 putFile8Bit(file, level->time_wheel);
6353 putFile8Bit(file, (level->encoding_16bit_amoeba ? EL_EMPTY :
6354 level->amoeba_content));
6355 putFile8Bit(file, (level->initial_player_stepsize == STEPSIZE_FAST ? 1 : 0));
6356 putFile8Bit(file, (level->initial_gravity ? 1 : 0));
6357 putFile8Bit(file, (level->encoding_16bit_field ? 1 : 0));
6358 putFile8Bit(file, (level->em_slippery_gems ? 1 : 0));
6360 putFile8Bit(file, (level->use_custom_template ? 1 : 0));
6362 putFile8Bit(file, (level->block_last_field ? 1 : 0));
6363 putFile8Bit(file, (level->sp_block_last_field ? 1 : 0));
6364 putFile32BitBE(file, level->can_move_into_acid_bits);
6365 putFile8Bit(file, level->dont_collide_with_bits);
6367 putFile8Bit(file, (level->use_spring_bug ? 1 : 0));
6368 putFile8Bit(file, (level->use_step_counter ? 1 : 0));
6370 putFile8Bit(file, (level->instant_relocation ? 1 : 0));
6371 putFile8Bit(file, (level->can_pass_to_walkable ? 1 : 0));
6372 putFile8Bit(file, (level->grow_into_diggable ? 1 : 0));
6374 putFile8Bit(file, level->game_engine_type);
6376 WriteUnusedBytesToFile(file, LEVEL_CHUNK_HEAD_UNUSED);
6380 static int SaveLevel_NAME(FILE *file, struct LevelInfo *level)
6385 for (i = 0; i < MAX_LEVEL_NAME_LEN; i++)
6386 chunk_size += putFile8Bit(file, level->name[i]);
6391 static int SaveLevel_AUTH(FILE *file, struct LevelInfo *level)
6396 for (i = 0; i < MAX_LEVEL_AUTHOR_LEN; i++)
6397 chunk_size += putFile8Bit(file, level->author[i]);
6402 #if ENABLE_HISTORIC_CHUNKS
6403 static int SaveLevel_BODY(FILE *file, struct LevelInfo *level)
6408 for (y = 0; y < level->fieldy; y++)
6409 for (x = 0; x < level->fieldx; x++)
6410 if (level->encoding_16bit_field)
6411 chunk_size += putFile16BitBE(file, level->field[x][y]);
6413 chunk_size += putFile8Bit(file, level->field[x][y]);
6419 static int SaveLevel_BODY(FILE *file, struct LevelInfo *level)
6424 for (y = 0; y < level->fieldy; y++)
6425 for (x = 0; x < level->fieldx; x++)
6426 chunk_size += putFile16BitBE(file, level->field[x][y]);
6431 #if ENABLE_HISTORIC_CHUNKS
6432 static void SaveLevel_CONT(FILE *file, struct LevelInfo *level)
6436 putFile8Bit(file, EL_YAMYAM);
6437 putFile8Bit(file, level->num_yamyam_contents);
6438 putFile8Bit(file, 0);
6439 putFile8Bit(file, 0);
6441 for (i = 0; i < MAX_ELEMENT_CONTENTS; i++)
6442 for (y = 0; y < 3; y++)
6443 for (x = 0; x < 3; x++)
6444 if (level->encoding_16bit_field)
6445 putFile16BitBE(file, level->yamyam_content[i].e[x][y]);
6447 putFile8Bit(file, level->yamyam_content[i].e[x][y]);
6451 #if ENABLE_HISTORIC_CHUNKS
6452 static void SaveLevel_CNT2(FILE *file, struct LevelInfo *level, int element)
6455 int num_contents, content_xsize, content_ysize;
6456 int content_array[MAX_ELEMENT_CONTENTS][3][3];
6458 if (element == EL_YAMYAM)
6460 num_contents = level->num_yamyam_contents;
6464 for (i = 0; i < MAX_ELEMENT_CONTENTS; i++)
6465 for (y = 0; y < 3; y++)
6466 for (x = 0; x < 3; x++)
6467 content_array[i][x][y] = level->yamyam_content[i].e[x][y];
6469 else if (element == EL_BD_AMOEBA)
6475 for (i = 0; i < MAX_ELEMENT_CONTENTS; i++)
6476 for (y = 0; y < 3; y++)
6477 for (x = 0; x < 3; x++)
6478 content_array[i][x][y] = EL_EMPTY;
6479 content_array[0][0][0] = level->amoeba_content;
6483 /* chunk header already written -- write empty chunk data */
6484 WriteUnusedBytesToFile(file, LEVEL_CHUNK_CNT2_SIZE);
6486 Error(ERR_WARN, "cannot save content for element '%d'", element);
6490 putFile16BitBE(file, element);
6491 putFile8Bit(file, num_contents);
6492 putFile8Bit(file, content_xsize);
6493 putFile8Bit(file, content_ysize);
6495 WriteUnusedBytesToFile(file, LEVEL_CHUNK_CNT2_UNUSED);
6497 for (i = 0; i < MAX_ELEMENT_CONTENTS; i++)
6498 for (y = 0; y < 3; y++)
6499 for (x = 0; x < 3; x++)
6500 putFile16BitBE(file, content_array[i][x][y]);
6504 #if ENABLE_HISTORIC_CHUNKS
6505 static int SaveLevel_CNT3(FILE *file, struct LevelInfo *level, int element)
6507 int envelope_nr = element - EL_ENVELOPE_1;
6508 int envelope_len = strlen(level->envelope_text[envelope_nr]) + 1;
6512 chunk_size += putFile16BitBE(file, element);
6513 chunk_size += putFile16BitBE(file, envelope_len);
6514 chunk_size += putFile8Bit(file, level->envelope_xsize[envelope_nr]);
6515 chunk_size += putFile8Bit(file, level->envelope_ysize[envelope_nr]);
6517 WriteUnusedBytesToFile(file, LEVEL_CHUNK_CNT3_UNUSED);
6518 chunk_size += LEVEL_CHUNK_CNT3_UNUSED;
6520 for (i = 0; i < envelope_len; i++)
6521 chunk_size += putFile8Bit(file, level->envelope_text[envelope_nr][i]);
6527 #if ENABLE_HISTORIC_CHUNKS
6528 static void SaveLevel_CUS1(FILE *file, struct LevelInfo *level,
6529 int num_changed_custom_elements)
6533 putFile16BitBE(file, num_changed_custom_elements);
6535 for (i = 0; i < NUM_CUSTOM_ELEMENTS; i++)
6537 int element = EL_CUSTOM_START + i;
6539 struct ElementInfo *ei = &element_info[element];
6541 if (ei->properties[EP_BITFIELD_BASE_NR] != EP_BITMASK_DEFAULT)
6543 if (check < num_changed_custom_elements)
6545 putFile16BitBE(file, element);
6546 putFile32BitBE(file, ei->properties[EP_BITFIELD_BASE_NR]);
6553 if (check != num_changed_custom_elements) /* should not happen */
6554 Error(ERR_WARN, "inconsistent number of custom element properties");
6558 #if ENABLE_HISTORIC_CHUNKS
6559 static void SaveLevel_CUS2(FILE *file, struct LevelInfo *level,
6560 int num_changed_custom_elements)
6564 putFile16BitBE(file, num_changed_custom_elements);
6566 for (i = 0; i < NUM_CUSTOM_ELEMENTS; i++)
6568 int element = EL_CUSTOM_START + i;
6570 if (element_info[element].change->target_element != EL_EMPTY_SPACE)
6572 if (check < num_changed_custom_elements)
6574 putFile16BitBE(file, element);
6575 putFile16BitBE(file, element_info[element].change->target_element);
6582 if (check != num_changed_custom_elements) /* should not happen */
6583 Error(ERR_WARN, "inconsistent number of custom target elements");
6587 #if ENABLE_HISTORIC_CHUNKS
6588 static void SaveLevel_CUS3(FILE *file, struct LevelInfo *level,
6589 int num_changed_custom_elements)
6591 int i, j, x, y, check = 0;
6593 putFile16BitBE(file, num_changed_custom_elements);
6595 for (i = 0; i < NUM_CUSTOM_ELEMENTS; i++)
6597 int element = EL_CUSTOM_START + i;
6598 struct ElementInfo *ei = &element_info[element];
6600 if (ei->modified_settings)
6602 if (check < num_changed_custom_elements)
6604 putFile16BitBE(file, element);
6606 for (j = 0; j < MAX_ELEMENT_NAME_LEN; j++)
6607 putFile8Bit(file, ei->description[j]);
6609 putFile32BitBE(file, ei->properties[EP_BITFIELD_BASE_NR]);
6611 /* some free bytes for future properties and padding */
6612 WriteUnusedBytesToFile(file, 7);
6614 putFile8Bit(file, ei->use_gfx_element);
6615 putFile16BitBE(file, ei->gfx_element_initial);
6617 putFile8Bit(file, ei->collect_score_initial);
6618 putFile8Bit(file, ei->collect_count_initial);
6620 putFile16BitBE(file, ei->push_delay_fixed);
6621 putFile16BitBE(file, ei->push_delay_random);
6622 putFile16BitBE(file, ei->move_delay_fixed);
6623 putFile16BitBE(file, ei->move_delay_random);
6625 putFile16BitBE(file, ei->move_pattern);
6626 putFile8Bit(file, ei->move_direction_initial);
6627 putFile8Bit(file, ei->move_stepsize);
6629 for (y = 0; y < 3; y++)
6630 for (x = 0; x < 3; x++)
6631 putFile16BitBE(file, ei->content.e[x][y]);
6633 putFile32BitBE(file, ei->change->events);
6635 putFile16BitBE(file, ei->change->target_element);
6637 putFile16BitBE(file, ei->change->delay_fixed);
6638 putFile16BitBE(file, ei->change->delay_random);
6639 putFile16BitBE(file, ei->change->delay_frames);
6641 putFile16BitBE(file, ei->change->initial_trigger_element);
6643 putFile8Bit(file, ei->change->explode);
6644 putFile8Bit(file, ei->change->use_target_content);
6645 putFile8Bit(file, ei->change->only_if_complete);
6646 putFile8Bit(file, ei->change->use_random_replace);
6648 putFile8Bit(file, ei->change->random_percentage);
6649 putFile8Bit(file, ei->change->replace_when);
6651 for (y = 0; y < 3; y++)
6652 for (x = 0; x < 3; x++)
6653 putFile16BitBE(file, ei->change->content.e[x][y]);
6655 putFile8Bit(file, ei->slippery_type);
6657 /* some free bytes for future properties and padding */
6658 WriteUnusedBytesToFile(file, LEVEL_CPART_CUS3_UNUSED);
6665 if (check != num_changed_custom_elements) /* should not happen */
6666 Error(ERR_WARN, "inconsistent number of custom element properties");
6670 #if ENABLE_HISTORIC_CHUNKS
6671 static void SaveLevel_CUS4(FILE *file, struct LevelInfo *level, int element)
6673 struct ElementInfo *ei = &element_info[element];
6676 /* ---------- custom element base property values (96 bytes) ------------- */
6678 putFile16BitBE(file, element);
6680 for (i = 0; i < MAX_ELEMENT_NAME_LEN; i++)
6681 putFile8Bit(file, ei->description[i]);
6683 putFile32BitBE(file, ei->properties[EP_BITFIELD_BASE_NR]);
6685 WriteUnusedBytesToFile(file, 4); /* reserved for more base properties */
6687 putFile8Bit(file, ei->num_change_pages);
6689 putFile16BitBE(file, ei->ce_value_fixed_initial);
6690 putFile16BitBE(file, ei->ce_value_random_initial);
6691 putFile8Bit(file, ei->use_last_ce_value);
6693 putFile8Bit(file, ei->use_gfx_element);
6694 putFile16BitBE(file, ei->gfx_element_initial);
6696 putFile8Bit(file, ei->collect_score_initial);
6697 putFile8Bit(file, ei->collect_count_initial);
6699 putFile8Bit(file, ei->drop_delay_fixed);
6700 putFile8Bit(file, ei->push_delay_fixed);
6701 putFile8Bit(file, ei->drop_delay_random);
6702 putFile8Bit(file, ei->push_delay_random);
6703 putFile16BitBE(file, ei->move_delay_fixed);
6704 putFile16BitBE(file, ei->move_delay_random);
6706 /* bits 0 - 15 of "move_pattern" ... */
6707 putFile16BitBE(file, ei->move_pattern & 0xffff);
6708 putFile8Bit(file, ei->move_direction_initial);
6709 putFile8Bit(file, ei->move_stepsize);
6711 putFile8Bit(file, ei->slippery_type);
6713 for (y = 0; y < 3; y++)
6714 for (x = 0; x < 3; x++)
6715 putFile16BitBE(file, ei->content.e[x][y]);
6717 putFile16BitBE(file, ei->move_enter_element);
6718 putFile16BitBE(file, ei->move_leave_element);
6719 putFile8Bit(file, ei->move_leave_type);
6721 /* ... bits 16 - 31 of "move_pattern" (not nice, but downward compatible) */
6722 putFile16BitBE(file, (ei->move_pattern >> 16) & 0xffff);
6724 putFile8Bit(file, ei->access_direction);
6726 putFile8Bit(file, ei->explosion_delay);
6727 putFile8Bit(file, ei->ignition_delay);
6728 putFile8Bit(file, ei->explosion_type);
6730 /* some free bytes for future custom property values and padding */
6731 WriteUnusedBytesToFile(file, 1);
6733 /* ---------- change page property values (48 bytes) --------------------- */
6735 for (i = 0; i < ei->num_change_pages; i++)
6737 struct ElementChangeInfo *change = &ei->change_page[i];
6738 unsigned int event_bits;
6740 /* bits 0 - 31 of "has_event[]" ... */
6742 for (j = 0; j < MIN(NUM_CHANGE_EVENTS, 32); j++)
6743 if (change->has_event[j])
6744 event_bits |= (1 << j);
6745 putFile32BitBE(file, event_bits);
6747 putFile16BitBE(file, change->target_element);
6749 putFile16BitBE(file, change->delay_fixed);
6750 putFile16BitBE(file, change->delay_random);
6751 putFile16BitBE(file, change->delay_frames);
6753 putFile16BitBE(file, change->initial_trigger_element);
6755 putFile8Bit(file, change->explode);
6756 putFile8Bit(file, change->use_target_content);
6757 putFile8Bit(file, change->only_if_complete);
6758 putFile8Bit(file, change->use_random_replace);
6760 putFile8Bit(file, change->random_percentage);
6761 putFile8Bit(file, change->replace_when);
6763 for (y = 0; y < 3; y++)
6764 for (x = 0; x < 3; x++)
6765 putFile16BitBE(file, change->target_content.e[x][y]);
6767 putFile8Bit(file, change->can_change);
6769 putFile8Bit(file, change->trigger_side);
6771 putFile8Bit(file, change->trigger_player);
6772 putFile8Bit(file, (change->trigger_page == CH_PAGE_ANY ? CH_PAGE_ANY_FILE :
6773 log_2(change->trigger_page)));
6775 putFile8Bit(file, change->has_action);
6776 putFile8Bit(file, change->action_type);
6777 putFile8Bit(file, change->action_mode);
6778 putFile16BitBE(file, change->action_arg);
6780 /* ... bits 32 - 39 of "has_event[]" (not nice, but downward compatible) */
6782 for (j = 32; j < NUM_CHANGE_EVENTS; j++)
6783 if (change->has_event[j])
6784 event_bits |= (1 << (j - 32));
6785 putFile8Bit(file, event_bits);
6790 #if ENABLE_HISTORIC_CHUNKS
6791 static void SaveLevel_GRP1(FILE *file, struct LevelInfo *level, int element)
6793 struct ElementInfo *ei = &element_info[element];
6794 struct ElementGroupInfo *group = ei->group;
6797 putFile16BitBE(file, element);
6799 for (i = 0; i < MAX_ELEMENT_NAME_LEN; i++)
6800 putFile8Bit(file, ei->description[i]);
6802 putFile8Bit(file, group->num_elements);
6804 putFile8Bit(file, ei->use_gfx_element);
6805 putFile16BitBE(file, ei->gfx_element_initial);
6807 putFile8Bit(file, group->choice_mode);
6809 /* some free bytes for future values and padding */
6810 WriteUnusedBytesToFile(file, 3);
6812 for (i = 0; i < MAX_ELEMENTS_IN_GROUP; i++)
6813 putFile16BitBE(file, group->element[i]);
6817 static int SaveLevel_MicroChunk(FILE *file, struct LevelFileConfigInfo *entry,
6818 boolean write_element)
6820 int save_type = entry->save_type;
6821 int data_type = entry->data_type;
6822 int conf_type = entry->conf_type;
6823 int byte_mask = conf_type & CONF_MASK_BYTES;
6824 int element = entry->element;
6825 int default_value = entry->default_value;
6827 boolean modified = FALSE;
6829 if (byte_mask != CONF_MASK_MULTI_BYTES)
6831 void *value_ptr = entry->value;
6832 int value = (data_type == TYPE_BOOLEAN ? *(boolean *)value_ptr :
6835 /* check if any settings have been modified before saving them */
6836 if (value != default_value)
6839 /* do not save if explicitly told or if unmodified default settings */
6840 if ((save_type == SAVE_CONF_NEVER) ||
6841 (save_type == SAVE_CONF_WHEN_CHANGED && !modified))
6845 num_bytes += putFile16BitBE(file, element);
6847 num_bytes += putFile8Bit(file, conf_type);
6848 num_bytes += (byte_mask == CONF_MASK_1_BYTE ? putFile8Bit (file, value) :
6849 byte_mask == CONF_MASK_2_BYTE ? putFile16BitBE(file, value) :
6850 byte_mask == CONF_MASK_4_BYTE ? putFile32BitBE(file, value) :
6853 else if (data_type == TYPE_STRING)
6855 char *default_string = entry->default_string;
6856 char *string = (char *)(entry->value);
6857 int string_length = strlen(string);
6860 /* check if any settings have been modified before saving them */
6861 if (!strEqual(string, default_string))
6864 /* do not save if explicitly told or if unmodified default settings */
6865 if ((save_type == SAVE_CONF_NEVER) ||
6866 (save_type == SAVE_CONF_WHEN_CHANGED && !modified))
6870 num_bytes += putFile16BitBE(file, element);
6872 num_bytes += putFile8Bit(file, conf_type);
6873 num_bytes += putFile16BitBE(file, string_length);
6875 for (i = 0; i < string_length; i++)
6876 num_bytes += putFile8Bit(file, string[i]);
6878 else if (data_type == TYPE_ELEMENT_LIST)
6880 int *element_array = (int *)(entry->value);
6881 int num_elements = *(int *)(entry->num_entities);
6884 /* check if any settings have been modified before saving them */
6885 for (i = 0; i < num_elements; i++)
6886 if (element_array[i] != default_value)
6889 /* do not save if explicitly told or if unmodified default settings */
6890 if ((save_type == SAVE_CONF_NEVER) ||
6891 (save_type == SAVE_CONF_WHEN_CHANGED && !modified))
6895 num_bytes += putFile16BitBE(file, element);
6897 num_bytes += putFile8Bit(file, conf_type);
6898 num_bytes += putFile16BitBE(file, num_elements * CONF_ELEMENT_NUM_BYTES);
6900 for (i = 0; i < num_elements; i++)
6901 num_bytes += putFile16BitBE(file, element_array[i]);
6903 else if (data_type == TYPE_CONTENT_LIST)
6905 struct Content *content = (struct Content *)(entry->value);
6906 int num_contents = *(int *)(entry->num_entities);
6909 /* check if any settings have been modified before saving them */
6910 for (i = 0; i < num_contents; i++)
6911 for (y = 0; y < 3; y++)
6912 for (x = 0; x < 3; x++)
6913 if (content[i].e[x][y] != default_value)
6916 /* do not save if explicitly told or if unmodified default settings */
6917 if ((save_type == SAVE_CONF_NEVER) ||
6918 (save_type == SAVE_CONF_WHEN_CHANGED && !modified))
6922 num_bytes += putFile16BitBE(file, element);
6924 num_bytes += putFile8Bit(file, conf_type);
6925 num_bytes += putFile16BitBE(file, num_contents * CONF_CONTENT_NUM_BYTES);
6927 for (i = 0; i < num_contents; i++)
6928 for (y = 0; y < 3; y++)
6929 for (x = 0; x < 3; x++)
6930 num_bytes += putFile16BitBE(file, content[i].e[x][y]);
6936 static int SaveLevel_INFO(FILE *file, struct LevelInfo *level)
6941 li = *level; /* copy level data into temporary buffer */
6943 for (i = 0; chunk_config_INFO[i].data_type != -1; i++)
6944 chunk_size += SaveLevel_MicroChunk(file, &chunk_config_INFO[i], FALSE);
6949 static int SaveLevel_ELEM(FILE *file, struct LevelInfo *level)
6954 li = *level; /* copy level data into temporary buffer */
6956 for (i = 0; chunk_config_ELEM[i].data_type != -1; i++)
6957 chunk_size += SaveLevel_MicroChunk(file, &chunk_config_ELEM[i], TRUE);
6962 static int SaveLevel_NOTE(FILE *file, struct LevelInfo *level, int element)
6964 int envelope_nr = element - EL_ENVELOPE_1;
6968 chunk_size += putFile16BitBE(file, element);
6970 /* copy envelope data into temporary buffer */
6971 xx_envelope = level->envelope[envelope_nr];
6973 for (i = 0; chunk_config_NOTE[i].data_type != -1; i++)
6974 chunk_size += SaveLevel_MicroChunk(file, &chunk_config_NOTE[i], FALSE);
6979 static int SaveLevel_CUSX(FILE *file, struct LevelInfo *level, int element)
6981 struct ElementInfo *ei = &element_info[element];
6985 chunk_size += putFile16BitBE(file, element);
6987 xx_ei = *ei; /* copy element data into temporary buffer */
6989 /* set default description string for this specific element */
6990 strcpy(xx_default_description, getDefaultElementDescription(ei));
6992 for (i = 0; chunk_config_CUSX_base[i].data_type != -1; i++)
6993 chunk_size += SaveLevel_MicroChunk(file, &chunk_config_CUSX_base[i], FALSE);
6995 for (i = 0; i < ei->num_change_pages; i++)
6997 struct ElementChangeInfo *change = &ei->change_page[i];
6999 xx_current_change_page = i;
7001 xx_change = *change; /* copy change data into temporary buffer */
7004 setEventBitsFromEventFlags(change);
7006 for (j = 0; chunk_config_CUSX_change[j].data_type != -1; j++)
7007 chunk_size += SaveLevel_MicroChunk(file, &chunk_config_CUSX_change[j],
7014 static int SaveLevel_GRPX(FILE *file, struct LevelInfo *level, int element)
7016 struct ElementInfo *ei = &element_info[element];
7017 struct ElementGroupInfo *group = ei->group;
7021 chunk_size += putFile16BitBE(file, element);
7023 xx_ei = *ei; /* copy element data into temporary buffer */
7024 xx_group = *group; /* copy group data into temporary buffer */
7026 /* set default description string for this specific element */
7027 strcpy(xx_default_description, getDefaultElementDescription(ei));
7029 for (i = 0; chunk_config_GRPX[i].data_type != -1; i++)
7030 chunk_size += SaveLevel_MicroChunk(file, &chunk_config_GRPX[i], FALSE);
7035 static void SaveLevelFromFilename(struct LevelInfo *level, char *filename)
7041 if (!(file = fopen(filename, MODE_WRITE)))
7043 Error(ERR_WARN, "cannot save level file '%s'", filename);
7047 level->file_version = FILE_VERSION_ACTUAL;
7048 level->game_version = GAME_VERSION_ACTUAL;
7050 level->creation_date = getCurrentDate();
7052 putFileChunkBE(file, "RND1", CHUNK_SIZE_UNDEFINED);
7053 putFileChunkBE(file, "CAVE", CHUNK_SIZE_NONE);
7055 chunk_size = SaveLevel_VERS(NULL, level);
7056 putFileChunkBE(file, "VERS", chunk_size);
7057 SaveLevel_VERS(file, level);
7059 chunk_size = SaveLevel_DATE(NULL, level);
7060 putFileChunkBE(file, "DATE", chunk_size);
7061 SaveLevel_DATE(file, level);
7063 chunk_size = SaveLevel_NAME(NULL, level);
7064 putFileChunkBE(file, "NAME", chunk_size);
7065 SaveLevel_NAME(file, level);
7067 chunk_size = SaveLevel_AUTH(NULL, level);
7068 putFileChunkBE(file, "AUTH", chunk_size);
7069 SaveLevel_AUTH(file, level);
7071 chunk_size = SaveLevel_INFO(NULL, level);
7072 putFileChunkBE(file, "INFO", chunk_size);
7073 SaveLevel_INFO(file, level);
7075 chunk_size = SaveLevel_BODY(NULL, level);
7076 putFileChunkBE(file, "BODY", chunk_size);
7077 SaveLevel_BODY(file, level);
7079 chunk_size = SaveLevel_ELEM(NULL, level);
7080 if (chunk_size > LEVEL_CHUNK_ELEM_UNCHANGED) /* save if changed */
7082 putFileChunkBE(file, "ELEM", chunk_size);
7083 SaveLevel_ELEM(file, level);
7086 for (i = 0; i < NUM_ENVELOPES; i++)
7088 int element = EL_ENVELOPE_1 + i;
7090 chunk_size = SaveLevel_NOTE(NULL, level, element);
7091 if (chunk_size > LEVEL_CHUNK_NOTE_UNCHANGED) /* save if changed */
7093 putFileChunkBE(file, "NOTE", chunk_size);
7094 SaveLevel_NOTE(file, level, element);
7098 /* if not using template level, check for non-default custom/group elements */
7099 if (!level->use_custom_template)
7101 for (i = 0; i < NUM_CUSTOM_ELEMENTS; i++)
7103 int element = EL_CUSTOM_START + i;
7105 chunk_size = SaveLevel_CUSX(NULL, level, element);
7106 if (chunk_size > LEVEL_CHUNK_CUSX_UNCHANGED) /* save if changed */
7108 putFileChunkBE(file, "CUSX", chunk_size);
7109 SaveLevel_CUSX(file, level, element);
7113 for (i = 0; i < NUM_GROUP_ELEMENTS; i++)
7115 int element = EL_GROUP_START + i;
7117 chunk_size = SaveLevel_GRPX(NULL, level, element);
7118 if (chunk_size > LEVEL_CHUNK_GRPX_UNCHANGED) /* save if changed */
7120 putFileChunkBE(file, "GRPX", chunk_size);
7121 SaveLevel_GRPX(file, level, element);
7128 SetFilePermissions(filename, PERMS_PRIVATE);
7131 void SaveLevel(int nr)
7133 char *filename = getDefaultLevelFilename(nr);
7135 SaveLevelFromFilename(&level, filename);
7138 void SaveLevelTemplate()
7140 char *filename = getDefaultLevelFilename(-1);
7142 SaveLevelFromFilename(&level, filename);
7145 boolean SaveLevelChecked(int nr)
7147 char *filename = getDefaultLevelFilename(nr);
7148 boolean new_level = !fileExists(filename);
7149 boolean level_saved = FALSE;
7151 if (new_level || Request("Save this level and kill the old?", REQ_ASK))
7156 Request("Level saved!", REQ_CONFIRM);
7164 void DumpLevel(struct LevelInfo *level)
7166 if (level->no_valid_file)
7168 Error(ERR_WARN, "cannot dump -- no valid level file found");
7174 Print("Level xxx (file version %08d, game version %08d)\n",
7175 level->file_version, level->game_version);
7178 Print("Level author: '%s'\n", level->author);
7179 Print("Level title: '%s'\n", level->name);
7181 Print("Playfield size: %d x %d\n", level->fieldx, level->fieldy);
7183 Print("Level time: %d seconds\n", level->time);
7184 Print("Gems needed: %d\n", level->gems_needed);
7186 Print("Time for magic wall: %d seconds\n", level->time_magic_wall);
7187 Print("Time for wheel: %d seconds\n", level->time_wheel);
7188 Print("Time for light: %d seconds\n", level->time_light);
7189 Print("Time for timegate: %d seconds\n", level->time_timegate);
7191 Print("Amoeba speed: %d\n", level->amoeba_speed);
7194 Print("EM style slippery gems: %s\n", (level->em_slippery_gems ? "yes" : "no"));
7195 Print("Player blocks last field: %s\n", (level->block_last_field ? "yes" : "no"));
7196 Print("SP player blocks last field: %s\n", (level->sp_block_last_field ? "yes" : "no"));
7197 Print("use spring bug: %s\n", (level->use_spring_bug ? "yes" : "no"));
7198 Print("use step counter: %s\n", (level->use_step_counter ? "yes" : "no"));
7204 /* ========================================================================= */
7205 /* tape file functions */
7206 /* ========================================================================= */
7208 static void setTapeInfoToDefaults()
7212 /* always start with reliable default values (empty tape) */
7215 /* default values (also for pre-1.2 tapes) with only the first player */
7216 tape.player_participates[0] = TRUE;
7217 for (i = 1; i < MAX_PLAYERS; i++)
7218 tape.player_participates[i] = FALSE;
7220 /* at least one (default: the first) player participates in every tape */
7221 tape.num_participating_players = 1;
7223 tape.level_nr = level_nr;
7225 tape.changed = FALSE;
7227 tape.recording = FALSE;
7228 tape.playing = FALSE;
7229 tape.pausing = FALSE;
7231 tape.no_valid_file = FALSE;
7234 static int LoadTape_VERS(File *file, int chunk_size, struct TapeInfo *tape)
7236 tape->file_version = getFileVersion(file);
7237 tape->game_version = getFileVersion(file);
7242 static int LoadTape_HEAD(File *file, int chunk_size, struct TapeInfo *tape)
7246 tape->random_seed = getFile32BitBE(file);
7247 tape->date = getFile32BitBE(file);
7248 tape->length = getFile32BitBE(file);
7250 /* read header fields that are new since version 1.2 */
7251 if (tape->file_version >= FILE_VERSION_1_2)
7253 byte store_participating_players = getFile8Bit(file);
7256 /* since version 1.2, tapes store which players participate in the tape */
7257 tape->num_participating_players = 0;
7258 for (i = 0; i < MAX_PLAYERS; i++)
7260 tape->player_participates[i] = FALSE;
7262 if (store_participating_players & (1 << i))
7264 tape->player_participates[i] = TRUE;
7265 tape->num_participating_players++;
7269 ReadUnusedBytesFromFile(file, TAPE_CHUNK_HEAD_UNUSED);
7271 engine_version = getFileVersion(file);
7272 if (engine_version > 0)
7273 tape->engine_version = engine_version;
7275 tape->engine_version = tape->game_version;
7281 static int LoadTape_INFO(File *file, int chunk_size, struct TapeInfo *tape)
7283 int level_identifier_size;
7286 level_identifier_size = getFile16BitBE(file);
7288 tape->level_identifier =
7289 checked_realloc(tape->level_identifier, level_identifier_size);
7291 for (i = 0; i < level_identifier_size; i++)
7292 tape->level_identifier[i] = getFile8Bit(file);
7294 tape->level_nr = getFile16BitBE(file);
7296 chunk_size = 2 + level_identifier_size + 2;
7301 static int LoadTape_BODY(File *file, int chunk_size, struct TapeInfo *tape)
7304 int chunk_size_expected =
7305 (tape->num_participating_players + 1) * tape->length;
7307 if (chunk_size_expected != chunk_size)
7309 ReadUnusedBytesFromFile(file, chunk_size);
7310 return chunk_size_expected;
7313 for (i = 0; i < tape->length; i++)
7315 if (i >= MAX_TAPE_LEN)
7318 for (j = 0; j < MAX_PLAYERS; j++)
7320 tape->pos[i].action[j] = MV_NONE;
7322 if (tape->player_participates[j])
7323 tape->pos[i].action[j] = getFile8Bit(file);
7326 tape->pos[i].delay = getFile8Bit(file);
7328 if (tape->file_version == FILE_VERSION_1_0)
7330 /* eliminate possible diagonal moves in old tapes */
7331 /* this is only for backward compatibility */
7333 byte joy_dir[4] = { JOY_LEFT, JOY_RIGHT, JOY_UP, JOY_DOWN };
7334 byte action = tape->pos[i].action[0];
7335 int k, num_moves = 0;
7337 for (k = 0; k<4; k++)
7339 if (action & joy_dir[k])
7341 tape->pos[i + num_moves].action[0] = joy_dir[k];
7343 tape->pos[i + num_moves].delay = 0;
7352 tape->length += num_moves;
7355 else if (tape->file_version < FILE_VERSION_2_0)
7357 /* convert pre-2.0 tapes to new tape format */
7359 if (tape->pos[i].delay > 1)
7362 tape->pos[i + 1] = tape->pos[i];
7363 tape->pos[i + 1].delay = 1;
7366 for (j = 0; j < MAX_PLAYERS; j++)
7367 tape->pos[i].action[j] = MV_NONE;
7368 tape->pos[i].delay--;
7375 if (checkEndOfFile(file))
7379 if (i != tape->length)
7380 chunk_size = (tape->num_participating_players + 1) * i;
7385 void LoadTape_SokobanSolution(char *filename)
7388 int move_delay = TILESIZE / level.initial_player_stepsize[0];
7390 if (!(file = openFile(filename, MODE_READ)))
7392 tape.no_valid_file = TRUE;
7397 while (!checkEndOfFile(file))
7399 unsigned char c = getByteFromFile(file);
7401 if (checkEndOfFile(file))
7408 tape.pos[tape.length].action[0] = MV_UP;
7409 tape.pos[tape.length].delay = move_delay + (c < 'a' ? 2 : 0);
7415 tape.pos[tape.length].action[0] = MV_DOWN;
7416 tape.pos[tape.length].delay = move_delay + (c < 'a' ? 2 : 0);
7422 tape.pos[tape.length].action[0] = MV_LEFT;
7423 tape.pos[tape.length].delay = move_delay + (c < 'a' ? 2 : 0);
7429 tape.pos[tape.length].action[0] = MV_RIGHT;
7430 tape.pos[tape.length].delay = move_delay + (c < 'a' ? 2 : 0);
7438 /* ignore white-space characters */
7442 tape.no_valid_file = TRUE;
7444 Error(ERR_WARN, "unsupported Sokoban solution file '%s' ['%d']", filename, c);
7452 if (tape.no_valid_file)
7455 tape.length_frames = GetTapeLengthFrames();
7456 tape.length_seconds = GetTapeLengthSeconds();
7459 void LoadTapeFromFilename(char *filename)
7461 char cookie[MAX_LINE_LEN];
7462 char chunk_name[CHUNK_ID_LEN + 1];
7466 /* always start with reliable default values */
7467 setTapeInfoToDefaults();
7469 if (strSuffix(filename, ".sln"))
7471 LoadTape_SokobanSolution(filename);
7476 if (!(file = openFile(filename, MODE_READ)))
7478 tape.no_valid_file = TRUE;
7483 getFileChunkBE(file, chunk_name, NULL);
7484 if (strEqual(chunk_name, "RND1"))
7486 getFile32BitBE(file); /* not used */
7488 getFileChunkBE(file, chunk_name, NULL);
7489 if (!strEqual(chunk_name, "TAPE"))
7491 tape.no_valid_file = TRUE;
7493 Error(ERR_WARN, "unknown format of tape file '%s'", filename);
7500 else /* check for pre-2.0 file format with cookie string */
7502 strcpy(cookie, chunk_name);
7503 if (getStringFromFile(file, &cookie[4], MAX_LINE_LEN - 4) == NULL)
7505 if (strlen(cookie) > 0 && cookie[strlen(cookie) - 1] == '\n')
7506 cookie[strlen(cookie) - 1] = '\0';
7508 if (!checkCookieString(cookie, TAPE_COOKIE_TMPL))
7510 tape.no_valid_file = TRUE;
7512 Error(ERR_WARN, "unknown format of tape file '%s'", filename);
7519 if ((tape.file_version = getFileVersionFromCookieString(cookie)) == -1)
7521 tape.no_valid_file = TRUE;
7523 Error(ERR_WARN, "unsupported version of tape file '%s'", filename);
7530 /* pre-2.0 tape files have no game version, so use file version here */
7531 tape.game_version = tape.file_version;
7534 if (tape.file_version < FILE_VERSION_1_2)
7536 /* tape files from versions before 1.2.0 without chunk structure */
7537 LoadTape_HEAD(file, TAPE_CHUNK_HEAD_SIZE, &tape);
7538 LoadTape_BODY(file, 2 * tape.length, &tape);
7546 int (*loader)(File *, int, struct TapeInfo *);
7550 { "VERS", TAPE_CHUNK_VERS_SIZE, LoadTape_VERS },
7551 { "HEAD", TAPE_CHUNK_HEAD_SIZE, LoadTape_HEAD },
7552 { "INFO", -1, LoadTape_INFO },
7553 { "BODY", -1, LoadTape_BODY },
7557 while (getFileChunkBE(file, chunk_name, &chunk_size))
7561 while (chunk_info[i].name != NULL &&
7562 !strEqual(chunk_name, chunk_info[i].name))
7565 if (chunk_info[i].name == NULL)
7567 Error(ERR_WARN, "unknown chunk '%s' in tape file '%s'",
7568 chunk_name, filename);
7569 ReadUnusedBytesFromFile(file, chunk_size);
7571 else if (chunk_info[i].size != -1 &&
7572 chunk_info[i].size != chunk_size)
7574 Error(ERR_WARN, "wrong size (%d) of chunk '%s' in tape file '%s'",
7575 chunk_size, chunk_name, filename);
7576 ReadUnusedBytesFromFile(file, chunk_size);
7580 /* call function to load this tape chunk */
7581 int chunk_size_expected =
7582 (chunk_info[i].loader)(file, chunk_size, &tape);
7584 /* the size of some chunks cannot be checked before reading other
7585 chunks first (like "HEAD" and "BODY") that contain some header
7586 information, so check them here */
7587 if (chunk_size_expected != chunk_size)
7589 Error(ERR_WARN, "wrong size (%d) of chunk '%s' in tape file '%s'",
7590 chunk_size, chunk_name, filename);
7598 tape.length_frames = GetTapeLengthFrames();
7599 tape.length_seconds = GetTapeLengthSeconds();
7602 printf("::: tape file version: %d\n", tape.file_version);
7603 printf("::: tape game version: %d\n", tape.game_version);
7604 printf("::: tape engine version: %d\n", tape.engine_version);
7608 void LoadTape(int nr)
7610 char *filename = getTapeFilename(nr);
7612 LoadTapeFromFilename(filename);
7615 void LoadSolutionTape(int nr)
7617 char *filename = getSolutionTapeFilename(nr);
7619 LoadTapeFromFilename(filename);
7621 if (TAPE_IS_EMPTY(tape) &&
7622 level.game_engine_type == GAME_ENGINE_TYPE_SP &&
7623 level.native_sp_level->demo.is_available)
7624 CopyNativeTape_SP_to_RND(&level);
7627 static void SaveTape_VERS(FILE *file, struct TapeInfo *tape)
7629 putFileVersion(file, tape->file_version);
7630 putFileVersion(file, tape->game_version);
7633 static void SaveTape_HEAD(FILE *file, struct TapeInfo *tape)
7636 byte store_participating_players = 0;
7638 /* set bits for participating players for compact storage */
7639 for (i = 0; i < MAX_PLAYERS; i++)
7640 if (tape->player_participates[i])
7641 store_participating_players |= (1 << i);
7643 putFile32BitBE(file, tape->random_seed);
7644 putFile32BitBE(file, tape->date);
7645 putFile32BitBE(file, tape->length);
7647 putFile8Bit(file, store_participating_players);
7649 /* unused bytes not at the end here for 4-byte alignment of engine_version */
7650 WriteUnusedBytesToFile(file, TAPE_CHUNK_HEAD_UNUSED);
7652 putFileVersion(file, tape->engine_version);
7655 static void SaveTape_INFO(FILE *file, struct TapeInfo *tape)
7657 int level_identifier_size = strlen(tape->level_identifier) + 1;
7660 putFile16BitBE(file, level_identifier_size);
7662 for (i = 0; i < level_identifier_size; i++)
7663 putFile8Bit(file, tape->level_identifier[i]);
7665 putFile16BitBE(file, tape->level_nr);
7668 static void SaveTape_BODY(FILE *file, struct TapeInfo *tape)
7672 for (i = 0; i < tape->length; i++)
7674 for (j = 0; j < MAX_PLAYERS; j++)
7675 if (tape->player_participates[j])
7676 putFile8Bit(file, tape->pos[i].action[j]);
7678 putFile8Bit(file, tape->pos[i].delay);
7682 void SaveTape(int nr)
7684 char *filename = getTapeFilename(nr);
7686 int num_participating_players = 0;
7687 int info_chunk_size;
7688 int body_chunk_size;
7691 InitTapeDirectory(leveldir_current->subdir);
7693 if (!(file = fopen(filename, MODE_WRITE)))
7695 Error(ERR_WARN, "cannot save level recording file '%s'", filename);
7699 tape.file_version = FILE_VERSION_ACTUAL;
7700 tape.game_version = GAME_VERSION_ACTUAL;
7702 /* count number of participating players */
7703 for (i = 0; i < MAX_PLAYERS; i++)
7704 if (tape.player_participates[i])
7705 num_participating_players++;
7707 info_chunk_size = 2 + (strlen(tape.level_identifier) + 1) + 2;
7708 body_chunk_size = (num_participating_players + 1) * tape.length;
7710 putFileChunkBE(file, "RND1", CHUNK_SIZE_UNDEFINED);
7711 putFileChunkBE(file, "TAPE", CHUNK_SIZE_NONE);
7713 putFileChunkBE(file, "VERS", TAPE_CHUNK_VERS_SIZE);
7714 SaveTape_VERS(file, &tape);
7716 putFileChunkBE(file, "HEAD", TAPE_CHUNK_HEAD_SIZE);
7717 SaveTape_HEAD(file, &tape);
7719 putFileChunkBE(file, "INFO", info_chunk_size);
7720 SaveTape_INFO(file, &tape);
7722 putFileChunkBE(file, "BODY", body_chunk_size);
7723 SaveTape_BODY(file, &tape);
7727 SetFilePermissions(filename, PERMS_PRIVATE);
7729 tape.changed = FALSE;
7732 boolean SaveTapeChecked(int nr)
7734 char *filename = getTapeFilename(nr);
7735 boolean new_tape = !fileExists(filename);
7736 boolean tape_saved = FALSE;
7738 if (new_tape || Request("Replace old tape?", REQ_ASK))
7743 Request("Tape saved!", REQ_CONFIRM);
7751 void DumpTape(struct TapeInfo *tape)
7753 int tape_frame_counter;
7756 if (tape->no_valid_file)
7758 Error(ERR_WARN, "cannot dump -- no valid tape file found");
7764 Print("Tape of Level %03d (file version %08d, game version %08d)\n",
7765 tape->level_nr, tape->file_version, tape->game_version);
7766 Print(" (effective engine version %08d)\n",
7767 tape->engine_version);
7768 Print("Level series identifier: '%s'\n", tape->level_identifier);
7771 tape_frame_counter = 0;
7773 for (i = 0; i < tape->length; i++)
7775 if (i >= MAX_TAPE_LEN)
7780 for (j = 0; j < MAX_PLAYERS; j++)
7782 if (tape->player_participates[j])
7784 int action = tape->pos[i].action[j];
7786 Print("%d:%02x ", j, action);
7787 Print("[%c%c%c%c|%c%c] - ",
7788 (action & JOY_LEFT ? '<' : ' '),
7789 (action & JOY_RIGHT ? '>' : ' '),
7790 (action & JOY_UP ? '^' : ' '),
7791 (action & JOY_DOWN ? 'v' : ' '),
7792 (action & JOY_BUTTON_1 ? '1' : ' '),
7793 (action & JOY_BUTTON_2 ? '2' : ' '));
7797 Print("(%03d) ", tape->pos[i].delay);
7798 Print("[%05d]\n", tape_frame_counter);
7800 tape_frame_counter += tape->pos[i].delay;
7807 /* ========================================================================= */
7808 /* score file functions */
7809 /* ========================================================================= */
7811 void LoadScore(int nr)
7814 char *filename = getScoreFilename(nr);
7815 char cookie[MAX_LINE_LEN];
7816 char line[MAX_LINE_LEN];
7820 /* always start with reliable default values */
7821 for (i = 0; i < MAX_SCORE_ENTRIES; i++)
7823 strcpy(highscore[i].Name, EMPTY_PLAYER_NAME);
7824 highscore[i].Score = 0;
7827 if (!(file = fopen(filename, MODE_READ)))
7830 /* check file identifier */
7831 if (fgets(cookie, MAX_LINE_LEN, file) == NULL)
7833 if (strlen(cookie) > 0 && cookie[strlen(cookie) - 1] == '\n')
7834 cookie[strlen(cookie) - 1] = '\0';
7836 if (!checkCookieString(cookie, SCORE_COOKIE))
7838 Error(ERR_WARN, "unknown format of score file '%s'", filename);
7843 for (i = 0; i < MAX_SCORE_ENTRIES; i++)
7845 if (fscanf(file, "%d", &highscore[i].Score) == EOF)
7846 Error(ERR_WARN, "fscanf() failed; %s", strerror(errno));
7847 if (fgets(line, MAX_LINE_LEN, file) == NULL)
7850 if (strlen(line) > 0 && line[strlen(line) - 1] == '\n')
7851 line[strlen(line) - 1] = '\0';
7853 for (line_ptr = line; *line_ptr; line_ptr++)
7855 if (*line_ptr != ' ' && *line_ptr != '\t' && *line_ptr != '\0')
7857 strncpy(highscore[i].Name, line_ptr, MAX_PLAYER_NAME_LEN);
7858 highscore[i].Name[MAX_PLAYER_NAME_LEN] = '\0';
7867 void SaveScore(int nr)
7870 int permissions = (program.global_scores ? PERMS_PUBLIC : PERMS_PRIVATE);
7871 char *filename = getScoreFilename(nr);
7874 InitScoreDirectory(leveldir_current->subdir);
7876 if (!(file = fopen(filename, MODE_WRITE)))
7878 Error(ERR_WARN, "cannot save score for level %d", nr);
7882 fprintf(file, "%s\n\n", SCORE_COOKIE);
7884 for (i = 0; i < MAX_SCORE_ENTRIES; i++)
7885 fprintf(file, "%d %s\n", highscore[i].Score, highscore[i].Name);
7889 SetFilePermissions(filename, permissions);
7893 /* ========================================================================= */
7894 /* setup file functions */
7895 /* ========================================================================= */
7897 #define TOKEN_STR_PLAYER_PREFIX "player_"
7900 #define SETUP_TOKEN_PLAYER_NAME 0
7901 #define SETUP_TOKEN_SOUND 1
7902 #define SETUP_TOKEN_SOUND_LOOPS 2
7903 #define SETUP_TOKEN_SOUND_MUSIC 3
7904 #define SETUP_TOKEN_SOUND_SIMPLE 4
7905 #define SETUP_TOKEN_TOONS 5
7906 #define SETUP_TOKEN_SCROLL_DELAY 6
7907 #define SETUP_TOKEN_SCROLL_DELAY_VALUE 7
7908 #define SETUP_TOKEN_ENGINE_SNAPSHOT_MODE 8
7909 #define SETUP_TOKEN_ENGINE_SNAPSHOT_MEMORY 9
7910 #define SETUP_TOKEN_FADE_SCREENS 10
7911 #define SETUP_TOKEN_AUTORECORD 11
7912 #define SETUP_TOKEN_SHOW_TITLESCREEN 12
7913 #define SETUP_TOKEN_QUICK_DOORS 13
7914 #define SETUP_TOKEN_TEAM_MODE 14
7915 #define SETUP_TOKEN_HANDICAP 15
7916 #define SETUP_TOKEN_SKIP_LEVELS 16
7917 #define SETUP_TOKEN_TIME_LIMIT 17
7918 #define SETUP_TOKEN_FULLSCREEN 18
7919 #define SETUP_TOKEN_WINDOW_SCALING_PERCENT 19
7920 #define SETUP_TOKEN_WINDOW_SCALING_QUALITY 20
7921 #define SETUP_TOKEN_SCREEN_RENDERING_MODE 21
7922 #define SETUP_TOKEN_ASK_ON_ESCAPE 22
7923 #define SETUP_TOKEN_ASK_ON_ESCAPE_EDITOR 23
7924 #define SETUP_TOKEN_QUICK_SWITCH 24
7925 #define SETUP_TOKEN_INPUT_ON_FOCUS 25
7926 #define SETUP_TOKEN_PREFER_AGA_GRAPHICS 26
7927 #define SETUP_TOKEN_GAME_FRAME_DELAY 27
7928 #define SETUP_TOKEN_SP_SHOW_BORDER_ELEMENTS 28
7929 #define SETUP_TOKEN_SMALL_GAME_GRAPHICS 29
7930 #define SETUP_TOKEN_SHOW_SNAPSHOT_BUTTONS 30
7931 #define SETUP_TOKEN_GRAPHICS_SET 31
7932 #define SETUP_TOKEN_SOUNDS_SET 32
7933 #define SETUP_TOKEN_MUSIC_SET 33
7934 #define SETUP_TOKEN_OVERRIDE_LEVEL_GRAPHICS 34
7935 #define SETUP_TOKEN_OVERRIDE_LEVEL_SOUNDS 35
7936 #define SETUP_TOKEN_OVERRIDE_LEVEL_MUSIC 36
7937 #define SETUP_TOKEN_VOLUME_SIMPLE 37
7938 #define SETUP_TOKEN_VOLUME_LOOPS 38
7939 #define SETUP_TOKEN_VOLUME_MUSIC 39
7940 #define SETUP_TOKEN_TOUCH_CONTROL_TYPE 40
7941 #define SETUP_TOKEN_TOUCH_MOVE_DISTANCE 41
7942 #define SETUP_TOKEN_TOUCH_DROP_DISTANCE 42
7944 #define NUM_GLOBAL_SETUP_TOKENS 43
7947 #define SETUP_TOKEN_EDITOR_EL_CHARS 0
7948 #define SETUP_TOKEN_EDITOR_EL_STEEL_CHARS 1
7949 #define SETUP_TOKEN_EDITOR_EL_CUSTOM 2
7950 #define SETUP_TOKEN_EDITOR_EL_USER_DEFINED 3
7951 #define SETUP_TOKEN_EDITOR_EL_DYNAMIC 4
7952 #define SETUP_TOKEN_EDITOR_SHOW_ELEMENT_TOKEN 5
7954 #define NUM_EDITOR_SETUP_TOKENS 6
7956 /* editor cascade setup */
7957 #define SETUP_TOKEN_EDITOR_CASCADE_BD 0
7958 #define SETUP_TOKEN_EDITOR_CASCADE_EM 1
7959 #define SETUP_TOKEN_EDITOR_CASCADE_EMC 2
7960 #define SETUP_TOKEN_EDITOR_CASCADE_RND 3
7961 #define SETUP_TOKEN_EDITOR_CASCADE_SB 4
7962 #define SETUP_TOKEN_EDITOR_CASCADE_SP 5
7963 #define SETUP_TOKEN_EDITOR_CASCADE_DC 6
7964 #define SETUP_TOKEN_EDITOR_CASCADE_DX 7
7965 #define SETUP_TOKEN_EDITOR_CASCADE_TEXT 8
7966 #define SETUP_TOKEN_EDITOR_CASCADE_STEELTEXT 9
7967 #define SETUP_TOKEN_EDITOR_CASCADE_CE 10
7968 #define SETUP_TOKEN_EDITOR_CASCADE_GE 11
7969 #define SETUP_TOKEN_EDITOR_CASCADE_REF 12
7970 #define SETUP_TOKEN_EDITOR_CASCADE_USER 13
7971 #define SETUP_TOKEN_EDITOR_CASCADE_DYNAMIC 14
7973 #define NUM_EDITOR_CASCADE_SETUP_TOKENS 15
7975 /* shortcut setup */
7976 #define SETUP_TOKEN_SHORTCUT_SAVE_GAME 0
7977 #define SETUP_TOKEN_SHORTCUT_LOAD_GAME 1
7978 #define SETUP_TOKEN_SHORTCUT_TOGGLE_PAUSE 2
7979 #define SETUP_TOKEN_SHORTCUT_FOCUS_PLAYER_1 3
7980 #define SETUP_TOKEN_SHORTCUT_FOCUS_PLAYER_2 4
7981 #define SETUP_TOKEN_SHORTCUT_FOCUS_PLAYER_3 5
7982 #define SETUP_TOKEN_SHORTCUT_FOCUS_PLAYER_4 6
7983 #define SETUP_TOKEN_SHORTCUT_FOCUS_PLAYER_ALL 7
7984 #define SETUP_TOKEN_SHORTCUT_TAPE_EJECT 8
7985 #define SETUP_TOKEN_SHORTCUT_TAPE_EXTRA 9
7986 #define SETUP_TOKEN_SHORTCUT_TAPE_STOP 10
7987 #define SETUP_TOKEN_SHORTCUT_TAPE_PAUSE 11
7988 #define SETUP_TOKEN_SHORTCUT_TAPE_RECORD 12
7989 #define SETUP_TOKEN_SHORTCUT_TAPE_PLAY 13
7990 #define SETUP_TOKEN_SHORTCUT_SOUND_SIMPLE 14
7991 #define SETUP_TOKEN_SHORTCUT_SOUND_LOOPS 15
7992 #define SETUP_TOKEN_SHORTCUT_SOUND_MUSIC 16
7993 #define SETUP_TOKEN_SHORTCUT_SNAP_LEFT 17
7994 #define SETUP_TOKEN_SHORTCUT_SNAP_RIGHT 18
7995 #define SETUP_TOKEN_SHORTCUT_SNAP_UP 19
7996 #define SETUP_TOKEN_SHORTCUT_SNAP_DOWN 20
7998 #define NUM_SHORTCUT_SETUP_TOKENS 21
8001 #define SETUP_TOKEN_PLAYER_USE_JOYSTICK 0
8002 #define SETUP_TOKEN_PLAYER_JOY_DEVICE_NAME 1
8003 #define SETUP_TOKEN_PLAYER_JOY_XLEFT 2
8004 #define SETUP_TOKEN_PLAYER_JOY_XMIDDLE 3
8005 #define SETUP_TOKEN_PLAYER_JOY_XRIGHT 4
8006 #define SETUP_TOKEN_PLAYER_JOY_YUPPER 5
8007 #define SETUP_TOKEN_PLAYER_JOY_YMIDDLE 6
8008 #define SETUP_TOKEN_PLAYER_JOY_YLOWER 7
8009 #define SETUP_TOKEN_PLAYER_JOY_SNAP 8
8010 #define SETUP_TOKEN_PLAYER_JOY_DROP 9
8011 #define SETUP_TOKEN_PLAYER_KEY_LEFT 10
8012 #define SETUP_TOKEN_PLAYER_KEY_RIGHT 11
8013 #define SETUP_TOKEN_PLAYER_KEY_UP 12
8014 #define SETUP_TOKEN_PLAYER_KEY_DOWN 13
8015 #define SETUP_TOKEN_PLAYER_KEY_SNAP 14
8016 #define SETUP_TOKEN_PLAYER_KEY_DROP 15
8018 #define NUM_PLAYER_SETUP_TOKENS 16
8021 #define SETUP_TOKEN_SYSTEM_SDL_VIDEODRIVER 0
8022 #define SETUP_TOKEN_SYSTEM_SDL_AUDIODRIVER 1
8023 #define SETUP_TOKEN_SYSTEM_AUDIO_FRAGMENT_SIZE 2
8025 #define NUM_SYSTEM_SETUP_TOKENS 3
8027 /* internal setup */
8028 #define SETUP_TOKEN_INT_PROGRAM_TITLE 0
8029 #define SETUP_TOKEN_INT_PROGRAM_AUTHOR 1
8030 #define SETUP_TOKEN_INT_PROGRAM_EMAIL 2
8031 #define SETUP_TOKEN_INT_PROGRAM_WEBSITE 3
8032 #define SETUP_TOKEN_INT_PROGRAM_COPYRIGHT 4
8033 #define SETUP_TOKEN_INT_PROGRAM_COMPANY 5
8034 #define SETUP_TOKEN_INT_PROGRAM_ICON_FILE 6
8035 #define SETUP_TOKEN_INT_DEFAULT_GRAPHICS_SET 7
8036 #define SETUP_TOKEN_INT_DEFAULT_SOUNDS_SET 8
8037 #define SETUP_TOKEN_INT_DEFAULT_MUSIC_SET 9
8038 #define SETUP_TOKEN_INT_FALLBACK_GRAPHICS_FILE 10
8039 #define SETUP_TOKEN_INT_FALLBACK_SOUNDS_FILE 11
8040 #define SETUP_TOKEN_INT_FALLBACK_MUSIC_FILE 12
8041 #define SETUP_TOKEN_INT_DEFAULT_LEVEL_SERIES 13
8042 #define SETUP_TOKEN_INT_CHOOSE_FROM_TOP_LEVELDIR 14
8043 #define SETUP_TOKEN_INT_DEFAULT_WINDOW_WIDTH 15
8044 #define SETUP_TOKEN_INT_DEFAULT_WINDOW_HEIGHT 16
8046 #define NUM_INTERNAL_SETUP_TOKENS 17
8049 #define SETUP_TOKEN_DEBUG_FRAME_DELAY_0 0
8050 #define SETUP_TOKEN_DEBUG_FRAME_DELAY_1 1
8051 #define SETUP_TOKEN_DEBUG_FRAME_DELAY_2 2
8052 #define SETUP_TOKEN_DEBUG_FRAME_DELAY_3 3
8053 #define SETUP_TOKEN_DEBUG_FRAME_DELAY_4 4
8054 #define SETUP_TOKEN_DEBUG_FRAME_DELAY_5 5
8055 #define SETUP_TOKEN_DEBUG_FRAME_DELAY_6 6
8056 #define SETUP_TOKEN_DEBUG_FRAME_DELAY_7 7
8057 #define SETUP_TOKEN_DEBUG_FRAME_DELAY_8 8
8058 #define SETUP_TOKEN_DEBUG_FRAME_DELAY_9 9
8059 #define SETUP_TOKEN_DEBUG_FRAME_DELAY_KEY_0 10
8060 #define SETUP_TOKEN_DEBUG_FRAME_DELAY_KEY_1 11
8061 #define SETUP_TOKEN_DEBUG_FRAME_DELAY_KEY_2 12
8062 #define SETUP_TOKEN_DEBUG_FRAME_DELAY_KEY_3 13
8063 #define SETUP_TOKEN_DEBUG_FRAME_DELAY_KEY_4 14
8064 #define SETUP_TOKEN_DEBUG_FRAME_DELAY_KEY_5 15
8065 #define SETUP_TOKEN_DEBUG_FRAME_DELAY_KEY_6 16
8066 #define SETUP_TOKEN_DEBUG_FRAME_DELAY_KEY_7 17
8067 #define SETUP_TOKEN_DEBUG_FRAME_DELAY_KEY_8 18
8068 #define SETUP_TOKEN_DEBUG_FRAME_DELAY_KEY_9 19
8069 #define SETUP_TOKEN_DEBUG_FRAME_DELAY_USE_MOD_KEY 20
8070 #define SETUP_TOKEN_DEBUG_FRAME_DELAY_GAME_ONLY 21
8072 #define NUM_DEBUG_SETUP_TOKENS 22
8075 #define SETUP_TOKEN_OPTIONS_VERBOSE 0
8077 #define NUM_OPTIONS_SETUP_TOKENS 1
8080 static struct SetupInfo si;
8081 static struct SetupEditorInfo sei;
8082 static struct SetupEditorCascadeInfo seci;
8083 static struct SetupShortcutInfo ssi;
8084 static struct SetupInputInfo sii;
8085 static struct SetupSystemInfo syi;
8086 static struct SetupInternalInfo sxi;
8087 static struct SetupDebugInfo sdi;
8088 static struct OptionInfo soi;
8090 static struct TokenInfo global_setup_tokens[] =
8092 { TYPE_STRING, &si.player_name, "player_name" },
8093 { TYPE_SWITCH, &si.sound, "sound" },
8094 { TYPE_SWITCH, &si.sound_loops, "repeating_sound_loops" },
8095 { TYPE_SWITCH, &si.sound_music, "background_music" },
8096 { TYPE_SWITCH, &si.sound_simple, "simple_sound_effects" },
8097 { TYPE_SWITCH, &si.toons, "toons" },
8098 { TYPE_SWITCH, &si.scroll_delay, "scroll_delay" },
8099 { TYPE_INTEGER,&si.scroll_delay_value, "scroll_delay_value" },
8100 { TYPE_STRING, &si.engine_snapshot_mode, "engine_snapshot_mode" },
8101 { TYPE_INTEGER,&si.engine_snapshot_memory, "engine_snapshot_memory" },
8102 { TYPE_SWITCH, &si.fade_screens, "fade_screens" },
8103 { TYPE_SWITCH, &si.autorecord, "automatic_tape_recording"},
8104 { TYPE_SWITCH, &si.show_titlescreen, "show_titlescreen" },
8105 { TYPE_SWITCH, &si.quick_doors, "quick_doors" },
8106 { TYPE_SWITCH, &si.team_mode, "team_mode" },
8107 { TYPE_SWITCH, &si.handicap, "handicap" },
8108 { TYPE_SWITCH, &si.skip_levels, "skip_levels" },
8109 { TYPE_SWITCH, &si.time_limit, "time_limit" },
8110 { TYPE_SWITCH, &si.fullscreen, "fullscreen" },
8111 { TYPE_INTEGER,&si.window_scaling_percent, "window_scaling_percent" },
8112 { TYPE_STRING, &si.window_scaling_quality, "window_scaling_quality" },
8113 { TYPE_STRING, &si.screen_rendering_mode, "screen_rendering_mode" },
8114 { TYPE_SWITCH, &si.ask_on_escape, "ask_on_escape" },
8115 { TYPE_SWITCH, &si.ask_on_escape_editor, "ask_on_escape_editor" },
8116 { TYPE_SWITCH, &si.quick_switch, "quick_player_switch" },
8117 { TYPE_SWITCH, &si.input_on_focus, "input_on_focus" },
8118 { TYPE_SWITCH, &si.prefer_aga_graphics, "prefer_aga_graphics" },
8119 { TYPE_INTEGER,&si.game_frame_delay, "game_frame_delay" },
8120 { TYPE_SWITCH, &si.sp_show_border_elements, "sp_show_border_elements" },
8121 { TYPE_SWITCH, &si.small_game_graphics, "small_game_graphics" },
8122 { TYPE_SWITCH, &si.show_snapshot_buttons, "show_snapshot_buttons" },
8123 { TYPE_STRING, &si.graphics_set, "graphics_set" },
8124 { TYPE_STRING, &si.sounds_set, "sounds_set" },
8125 { TYPE_STRING, &si.music_set, "music_set" },
8126 { TYPE_SWITCH3,&si.override_level_graphics, "override_level_graphics" },
8127 { TYPE_SWITCH3,&si.override_level_sounds, "override_level_sounds" },
8128 { TYPE_SWITCH3,&si.override_level_music, "override_level_music" },
8129 { TYPE_INTEGER,&si.volume_simple, "volume_simple" },
8130 { TYPE_INTEGER,&si.volume_loops, "volume_loops" },
8131 { TYPE_INTEGER,&si.volume_music, "volume_music" },
8132 { TYPE_STRING, &si.touch.control_type, "touch.control_type" },
8133 { TYPE_INTEGER,&si.touch.move_distance, "touch.move_distance" },
8134 { TYPE_INTEGER,&si.touch.drop_distance, "touch.drop_distance" },
8137 static struct TokenInfo editor_setup_tokens[] =
8139 { TYPE_SWITCH, &sei.el_chars, "editor.el_chars" },
8140 { TYPE_SWITCH, &sei.el_steel_chars, "editor.el_steel_chars" },
8141 { TYPE_SWITCH, &sei.el_custom, "editor.el_custom" },
8142 { TYPE_SWITCH, &sei.el_user_defined, "editor.el_user_defined" },
8143 { TYPE_SWITCH, &sei.el_dynamic, "editor.el_dynamic" },
8144 { TYPE_SWITCH, &sei.show_element_token,"editor.show_element_token" },
8147 static struct TokenInfo editor_cascade_setup_tokens[] =
8149 { TYPE_SWITCH, &seci.el_bd, "editor.cascade.el_bd" },
8150 { TYPE_SWITCH, &seci.el_em, "editor.cascade.el_em" },
8151 { TYPE_SWITCH, &seci.el_emc, "editor.cascade.el_emc" },
8152 { TYPE_SWITCH, &seci.el_rnd, "editor.cascade.el_rnd" },
8153 { TYPE_SWITCH, &seci.el_sb, "editor.cascade.el_sb" },
8154 { TYPE_SWITCH, &seci.el_sp, "editor.cascade.el_sp" },
8155 { TYPE_SWITCH, &seci.el_dc, "editor.cascade.el_dc" },
8156 { TYPE_SWITCH, &seci.el_dx, "editor.cascade.el_dx" },
8157 { TYPE_SWITCH, &seci.el_chars, "editor.cascade.el_chars" },
8158 { TYPE_SWITCH, &seci.el_steel_chars, "editor.cascade.el_steel_chars" },
8159 { TYPE_SWITCH, &seci.el_ce, "editor.cascade.el_ce" },
8160 { TYPE_SWITCH, &seci.el_ge, "editor.cascade.el_ge" },
8161 { TYPE_SWITCH, &seci.el_ref, "editor.cascade.el_ref" },
8162 { TYPE_SWITCH, &seci.el_user, "editor.cascade.el_user" },
8163 { TYPE_SWITCH, &seci.el_dynamic, "editor.cascade.el_dynamic" },
8166 static struct TokenInfo shortcut_setup_tokens[] =
8168 { TYPE_KEY_X11, &ssi.save_game, "shortcut.save_game" },
8169 { TYPE_KEY_X11, &ssi.load_game, "shortcut.load_game" },
8170 { TYPE_KEY_X11, &ssi.toggle_pause, "shortcut.toggle_pause" },
8171 { TYPE_KEY_X11, &ssi.focus_player[0], "shortcut.focus_player_1" },
8172 { TYPE_KEY_X11, &ssi.focus_player[1], "shortcut.focus_player_2" },
8173 { TYPE_KEY_X11, &ssi.focus_player[2], "shortcut.focus_player_3" },
8174 { TYPE_KEY_X11, &ssi.focus_player[3], "shortcut.focus_player_4" },
8175 { TYPE_KEY_X11, &ssi.focus_player_all,"shortcut.focus_player_all" },
8176 { TYPE_KEY_X11, &ssi.tape_eject, "shortcut.tape_eject" },
8177 { TYPE_KEY_X11, &ssi.tape_extra, "shortcut.tape_extra" },
8178 { TYPE_KEY_X11, &ssi.tape_stop, "shortcut.tape_stop" },
8179 { TYPE_KEY_X11, &ssi.tape_pause, "shortcut.tape_pause" },
8180 { TYPE_KEY_X11, &ssi.tape_record, "shortcut.tape_record" },
8181 { TYPE_KEY_X11, &ssi.tape_play, "shortcut.tape_play" },
8182 { TYPE_KEY_X11, &ssi.sound_simple, "shortcut.sound_simple" },
8183 { TYPE_KEY_X11, &ssi.sound_loops, "shortcut.sound_loops" },
8184 { TYPE_KEY_X11, &ssi.sound_music, "shortcut.sound_music" },
8185 { TYPE_KEY_X11, &ssi.snap_left, "shortcut.snap_left" },
8186 { TYPE_KEY_X11, &ssi.snap_right, "shortcut.snap_right" },
8187 { TYPE_KEY_X11, &ssi.snap_up, "shortcut.snap_up" },
8188 { TYPE_KEY_X11, &ssi.snap_down, "shortcut.snap_down" },
8191 static struct TokenInfo player_setup_tokens[] =
8193 { TYPE_BOOLEAN, &sii.use_joystick, ".use_joystick" },
8194 { TYPE_STRING, &sii.joy.device_name, ".joy.device_name" },
8195 { TYPE_INTEGER, &sii.joy.xleft, ".joy.xleft" },
8196 { TYPE_INTEGER, &sii.joy.xmiddle, ".joy.xmiddle" },
8197 { TYPE_INTEGER, &sii.joy.xright, ".joy.xright" },
8198 { TYPE_INTEGER, &sii.joy.yupper, ".joy.yupper" },
8199 { TYPE_INTEGER, &sii.joy.ymiddle, ".joy.ymiddle" },
8200 { TYPE_INTEGER, &sii.joy.ylower, ".joy.ylower" },
8201 { TYPE_INTEGER, &sii.joy.snap, ".joy.snap_field" },
8202 { TYPE_INTEGER, &sii.joy.drop, ".joy.place_bomb" },
8203 { TYPE_KEY_X11, &sii.key.left, ".key.move_left" },
8204 { TYPE_KEY_X11, &sii.key.right, ".key.move_right" },
8205 { TYPE_KEY_X11, &sii.key.up, ".key.move_up" },
8206 { TYPE_KEY_X11, &sii.key.down, ".key.move_down" },
8207 { TYPE_KEY_X11, &sii.key.snap, ".key.snap_field" },
8208 { TYPE_KEY_X11, &sii.key.drop, ".key.place_bomb" },
8211 static struct TokenInfo system_setup_tokens[] =
8213 { TYPE_STRING, &syi.sdl_videodriver, "system.sdl_videodriver" },
8214 { TYPE_STRING, &syi.sdl_audiodriver, "system.sdl_audiodriver" },
8215 { TYPE_INTEGER, &syi.audio_fragment_size,"system.audio_fragment_size" },
8218 static struct TokenInfo internal_setup_tokens[] =
8220 { TYPE_STRING, &sxi.program_title, "program_title" },
8221 { TYPE_STRING, &sxi.program_author, "program_author" },
8222 { TYPE_STRING, &sxi.program_email, "program_email" },
8223 { TYPE_STRING, &sxi.program_website, "program_website" },
8224 { TYPE_STRING, &sxi.program_copyright, "program_copyright" },
8225 { TYPE_STRING, &sxi.program_company, "program_company" },
8226 { TYPE_STRING, &sxi.program_icon_file, "program_icon_file" },
8227 { TYPE_STRING, &sxi.default_graphics_set, "default_graphics_set" },
8228 { TYPE_STRING, &sxi.default_sounds_set, "default_sounds_set" },
8229 { TYPE_STRING, &sxi.default_music_set, "default_music_set" },
8230 { TYPE_STRING, &sxi.fallback_graphics_file, "fallback_graphics_file"},
8231 { TYPE_STRING, &sxi.fallback_sounds_file, "fallback_sounds_file" },
8232 { TYPE_STRING, &sxi.fallback_music_file, "fallback_music_file" },
8233 { TYPE_STRING, &sxi.default_level_series, "default_level_series" },
8234 { TYPE_BOOLEAN,&sxi.choose_from_top_leveldir, "choose_from_top_leveldir" },
8235 { TYPE_INTEGER,&sxi.default_window_width, "default_window_width" },
8236 { TYPE_INTEGER,&sxi.default_window_height, "default_window_height" },
8239 static struct TokenInfo debug_setup_tokens[] =
8241 { TYPE_INTEGER, &sdi.frame_delay[0], "debug.frame_delay_0" },
8242 { TYPE_INTEGER, &sdi.frame_delay[1], "debug.frame_delay_1" },
8243 { TYPE_INTEGER, &sdi.frame_delay[2], "debug.frame_delay_2" },
8244 { TYPE_INTEGER, &sdi.frame_delay[3], "debug.frame_delay_3" },
8245 { TYPE_INTEGER, &sdi.frame_delay[4], "debug.frame_delay_4" },
8246 { TYPE_INTEGER, &sdi.frame_delay[5], "debug.frame_delay_5" },
8247 { TYPE_INTEGER, &sdi.frame_delay[6], "debug.frame_delay_6" },
8248 { TYPE_INTEGER, &sdi.frame_delay[7], "debug.frame_delay_7" },
8249 { TYPE_INTEGER, &sdi.frame_delay[8], "debug.frame_delay_8" },
8250 { TYPE_INTEGER, &sdi.frame_delay[9], "debug.frame_delay_9" },
8251 { TYPE_KEY_X11, &sdi.frame_delay_key[0], "debug.key.frame_delay_0" },
8252 { TYPE_KEY_X11, &sdi.frame_delay_key[1], "debug.key.frame_delay_1" },
8253 { TYPE_KEY_X11, &sdi.frame_delay_key[2], "debug.key.frame_delay_2" },
8254 { TYPE_KEY_X11, &sdi.frame_delay_key[3], "debug.key.frame_delay_3" },
8255 { TYPE_KEY_X11, &sdi.frame_delay_key[4], "debug.key.frame_delay_4" },
8256 { TYPE_KEY_X11, &sdi.frame_delay_key[5], "debug.key.frame_delay_5" },
8257 { TYPE_KEY_X11, &sdi.frame_delay_key[6], "debug.key.frame_delay_6" },
8258 { TYPE_KEY_X11, &sdi.frame_delay_key[7], "debug.key.frame_delay_7" },
8259 { TYPE_KEY_X11, &sdi.frame_delay_key[8], "debug.key.frame_delay_8" },
8260 { TYPE_KEY_X11, &sdi.frame_delay_key[9], "debug.key.frame_delay_9" },
8261 { TYPE_BOOLEAN, &sdi.frame_delay_use_mod_key,"debug.frame_delay.use_mod_key"},
8262 { TYPE_BOOLEAN, &sdi.frame_delay_game_only, "debug.frame_delay.game_only" },
8265 static struct TokenInfo options_setup_tokens[] =
8267 { TYPE_BOOLEAN, &soi.verbose, "options.verbose" },
8270 static char *get_corrected_login_name(char *login_name)
8272 /* needed because player name must be a fixed length string */
8273 char *login_name_new = checked_malloc(MAX_PLAYER_NAME_LEN + 1);
8275 strncpy(login_name_new, login_name, MAX_PLAYER_NAME_LEN);
8276 login_name_new[MAX_PLAYER_NAME_LEN] = '\0';
8278 if (strlen(login_name) > MAX_PLAYER_NAME_LEN) /* name has been cut */
8279 if (strchr(login_name_new, ' '))
8280 *strchr(login_name_new, ' ') = '\0';
8282 return login_name_new;
8285 static void setSetupInfoToDefaults(struct SetupInfo *si)
8289 si->player_name = get_corrected_login_name(getLoginName());
8292 si->sound_loops = TRUE;
8293 si->sound_music = TRUE;
8294 si->sound_simple = TRUE;
8296 si->scroll_delay = TRUE;
8297 si->scroll_delay_value = STD_SCROLL_DELAY;
8298 si->engine_snapshot_mode = getStringCopy(STR_SNAPSHOT_MODE_DEFAULT);
8299 si->engine_snapshot_memory = SNAPSHOT_MEMORY_DEFAULT;
8300 si->fade_screens = TRUE;
8301 si->autorecord = TRUE;
8302 si->show_titlescreen = TRUE;
8303 si->quick_doors = FALSE;
8304 si->team_mode = FALSE;
8305 si->handicap = TRUE;
8306 si->skip_levels = TRUE;
8307 si->time_limit = TRUE;
8308 si->fullscreen = FALSE;
8309 si->window_scaling_percent = STD_WINDOW_SCALING_PERCENT;
8310 si->window_scaling_quality = getStringCopy(SCALING_QUALITY_DEFAULT);
8311 si->screen_rendering_mode = getStringCopy(STR_SPECIAL_RENDERING_DEFAULT);
8312 si->ask_on_escape = TRUE;
8313 si->ask_on_escape_editor = TRUE;
8314 si->quick_switch = FALSE;
8315 si->input_on_focus = FALSE;
8316 si->prefer_aga_graphics = TRUE;
8317 si->game_frame_delay = GAME_FRAME_DELAY;
8318 si->sp_show_border_elements = FALSE;
8319 si->small_game_graphics = FALSE;
8320 si->show_snapshot_buttons = FALSE;
8322 si->graphics_set = getStringCopy(GFX_CLASSIC_SUBDIR);
8323 si->sounds_set = getStringCopy(SND_CLASSIC_SUBDIR);
8324 si->music_set = getStringCopy(MUS_CLASSIC_SUBDIR);
8326 si->override_level_graphics = FALSE;
8327 si->override_level_sounds = FALSE;
8328 si->override_level_music = FALSE;
8330 si->volume_simple = 100; /* percent */
8331 si->volume_loops = 100; /* percent */
8332 si->volume_music = 100; /* percent */
8334 si->touch.control_type = getStringCopy(TOUCH_CONTROL_DEFAULT);
8335 si->touch.move_distance = TOUCH_MOVE_DISTANCE_DEFAULT; /* percent */
8336 si->touch.drop_distance = TOUCH_DROP_DISTANCE_DEFAULT; /* percent */
8338 si->editor.el_boulderdash = TRUE;
8339 si->editor.el_emerald_mine = TRUE;
8340 si->editor.el_emerald_mine_club = TRUE;
8341 si->editor.el_more = TRUE;
8342 si->editor.el_sokoban = TRUE;
8343 si->editor.el_supaplex = TRUE;
8344 si->editor.el_diamond_caves = TRUE;
8345 si->editor.el_dx_boulderdash = TRUE;
8346 si->editor.el_chars = TRUE;
8347 si->editor.el_steel_chars = TRUE;
8348 si->editor.el_custom = TRUE;
8350 si->editor.el_headlines = TRUE;
8351 si->editor.el_user_defined = FALSE;
8352 si->editor.el_dynamic = TRUE;
8354 si->editor.show_element_token = FALSE;
8356 si->shortcut.save_game = DEFAULT_KEY_SAVE_GAME;
8357 si->shortcut.load_game = DEFAULT_KEY_LOAD_GAME;
8358 si->shortcut.toggle_pause = DEFAULT_KEY_TOGGLE_PAUSE;
8360 si->shortcut.focus_player[0] = DEFAULT_KEY_FOCUS_PLAYER_1;
8361 si->shortcut.focus_player[1] = DEFAULT_KEY_FOCUS_PLAYER_2;
8362 si->shortcut.focus_player[2] = DEFAULT_KEY_FOCUS_PLAYER_3;
8363 si->shortcut.focus_player[3] = DEFAULT_KEY_FOCUS_PLAYER_4;
8364 si->shortcut.focus_player_all = DEFAULT_KEY_FOCUS_PLAYER_ALL;
8366 si->shortcut.tape_eject = DEFAULT_KEY_TAPE_EJECT;
8367 si->shortcut.tape_extra = DEFAULT_KEY_TAPE_EXTRA;
8368 si->shortcut.tape_stop = DEFAULT_KEY_TAPE_STOP;
8369 si->shortcut.tape_pause = DEFAULT_KEY_TAPE_PAUSE;
8370 si->shortcut.tape_record = DEFAULT_KEY_TAPE_RECORD;
8371 si->shortcut.tape_play = DEFAULT_KEY_TAPE_PLAY;
8373 si->shortcut.sound_simple = DEFAULT_KEY_SOUND_SIMPLE;
8374 si->shortcut.sound_loops = DEFAULT_KEY_SOUND_LOOPS;
8375 si->shortcut.sound_music = DEFAULT_KEY_SOUND_MUSIC;
8377 si->shortcut.snap_left = DEFAULT_KEY_SNAP_LEFT;
8378 si->shortcut.snap_right = DEFAULT_KEY_SNAP_RIGHT;
8379 si->shortcut.snap_up = DEFAULT_KEY_SNAP_UP;
8380 si->shortcut.snap_down = DEFAULT_KEY_SNAP_DOWN;
8382 for (i = 0; i < MAX_PLAYERS; i++)
8384 si->input[i].use_joystick = FALSE;
8385 si->input[i].joy.device_name=getStringCopy(getDeviceNameFromJoystickNr(i));
8386 si->input[i].joy.xleft = JOYSTICK_XLEFT;
8387 si->input[i].joy.xmiddle = JOYSTICK_XMIDDLE;
8388 si->input[i].joy.xright = JOYSTICK_XRIGHT;
8389 si->input[i].joy.yupper = JOYSTICK_YUPPER;
8390 si->input[i].joy.ymiddle = JOYSTICK_YMIDDLE;
8391 si->input[i].joy.ylower = JOYSTICK_YLOWER;
8392 si->input[i].joy.snap = (i == 0 ? JOY_BUTTON_1 : 0);
8393 si->input[i].joy.drop = (i == 0 ? JOY_BUTTON_2 : 0);
8394 si->input[i].key.left = (i == 0 ? DEFAULT_KEY_LEFT : KSYM_UNDEFINED);
8395 si->input[i].key.right = (i == 0 ? DEFAULT_KEY_RIGHT : KSYM_UNDEFINED);
8396 si->input[i].key.up = (i == 0 ? DEFAULT_KEY_UP : KSYM_UNDEFINED);
8397 si->input[i].key.down = (i == 0 ? DEFAULT_KEY_DOWN : KSYM_UNDEFINED);
8398 si->input[i].key.snap = (i == 0 ? DEFAULT_KEY_SNAP : KSYM_UNDEFINED);
8399 si->input[i].key.drop = (i == 0 ? DEFAULT_KEY_DROP : KSYM_UNDEFINED);
8402 si->system.sdl_videodriver = getStringCopy(ARG_DEFAULT);
8403 si->system.sdl_audiodriver = getStringCopy(ARG_DEFAULT);
8404 si->system.audio_fragment_size = DEFAULT_AUDIO_FRAGMENT_SIZE;
8406 si->internal.program_title = getStringCopy(PROGRAM_TITLE_STRING);
8407 si->internal.program_author = getStringCopy(PROGRAM_AUTHOR_STRING);
8408 si->internal.program_email = getStringCopy(PROGRAM_EMAIL_STRING);
8409 si->internal.program_website = getStringCopy(PROGRAM_WEBSITE_STRING);
8410 si->internal.program_copyright = getStringCopy(PROGRAM_COPYRIGHT_STRING);
8411 si->internal.program_company = getStringCopy(PROGRAM_COMPANY_STRING);
8413 si->internal.program_icon_file = getStringCopy(PROGRAM_ICON_FILENAME);
8415 si->internal.default_graphics_set = getStringCopy(GFX_CLASSIC_SUBDIR);
8416 si->internal.default_sounds_set = getStringCopy(SND_CLASSIC_SUBDIR);
8417 si->internal.default_music_set = getStringCopy(MUS_CLASSIC_SUBDIR);
8419 si->internal.fallback_graphics_file = getStringCopy(UNDEFINED_FILENAME);
8420 si->internal.fallback_sounds_file = getStringCopy(UNDEFINED_FILENAME);
8421 si->internal.fallback_music_file = getStringCopy(UNDEFINED_FILENAME);
8423 si->internal.default_level_series = getStringCopy(UNDEFINED_LEVELSET);
8424 si->internal.choose_from_top_leveldir = FALSE;
8426 si->internal.default_window_width = WIN_XSIZE_DEFAULT;
8427 si->internal.default_window_height = WIN_YSIZE_DEFAULT;
8429 si->debug.frame_delay[0] = DEFAULT_FRAME_DELAY_0;
8430 si->debug.frame_delay[1] = DEFAULT_FRAME_DELAY_1;
8431 si->debug.frame_delay[2] = DEFAULT_FRAME_DELAY_2;
8432 si->debug.frame_delay[3] = DEFAULT_FRAME_DELAY_3;
8433 si->debug.frame_delay[4] = DEFAULT_FRAME_DELAY_4;
8434 si->debug.frame_delay[5] = DEFAULT_FRAME_DELAY_5;
8435 si->debug.frame_delay[6] = DEFAULT_FRAME_DELAY_6;
8436 si->debug.frame_delay[7] = DEFAULT_FRAME_DELAY_7;
8437 si->debug.frame_delay[8] = DEFAULT_FRAME_DELAY_8;
8438 si->debug.frame_delay[9] = DEFAULT_FRAME_DELAY_9;
8440 si->debug.frame_delay_key[0] = DEFAULT_KEY_FRAME_DELAY_0;
8441 si->debug.frame_delay_key[1] = DEFAULT_KEY_FRAME_DELAY_1;
8442 si->debug.frame_delay_key[2] = DEFAULT_KEY_FRAME_DELAY_2;
8443 si->debug.frame_delay_key[3] = DEFAULT_KEY_FRAME_DELAY_3;
8444 si->debug.frame_delay_key[4] = DEFAULT_KEY_FRAME_DELAY_4;
8445 si->debug.frame_delay_key[5] = DEFAULT_KEY_FRAME_DELAY_5;
8446 si->debug.frame_delay_key[6] = DEFAULT_KEY_FRAME_DELAY_6;
8447 si->debug.frame_delay_key[7] = DEFAULT_KEY_FRAME_DELAY_7;
8448 si->debug.frame_delay_key[8] = DEFAULT_KEY_FRAME_DELAY_8;
8449 si->debug.frame_delay_key[9] = DEFAULT_KEY_FRAME_DELAY_9;
8451 si->debug.frame_delay_use_mod_key = DEFAULT_FRAME_DELAY_USE_MOD_KEY;
8452 si->debug.frame_delay_game_only = DEFAULT_FRAME_DELAY_GAME_ONLY;
8454 si->options.verbose = FALSE;
8456 #if defined(PLATFORM_ANDROID)
8457 si->fullscreen = TRUE;
8461 static void setSetupInfoToDefaults_EditorCascade(struct SetupInfo *si)
8463 si->editor_cascade.el_bd = TRUE;
8464 si->editor_cascade.el_em = TRUE;
8465 si->editor_cascade.el_emc = TRUE;
8466 si->editor_cascade.el_rnd = TRUE;
8467 si->editor_cascade.el_sb = TRUE;
8468 si->editor_cascade.el_sp = TRUE;
8469 si->editor_cascade.el_dc = TRUE;
8470 si->editor_cascade.el_dx = TRUE;
8472 si->editor_cascade.el_chars = FALSE;
8473 si->editor_cascade.el_steel_chars = FALSE;
8474 si->editor_cascade.el_ce = FALSE;
8475 si->editor_cascade.el_ge = FALSE;
8476 si->editor_cascade.el_ref = FALSE;
8477 si->editor_cascade.el_user = FALSE;
8478 si->editor_cascade.el_dynamic = FALSE;
8481 static void decodeSetupFileHash(SetupFileHash *setup_file_hash)
8485 if (!setup_file_hash)
8490 for (i = 0; i < NUM_GLOBAL_SETUP_TOKENS; i++)
8491 setSetupInfo(global_setup_tokens, i,
8492 getHashEntry(setup_file_hash, global_setup_tokens[i].text));
8497 for (i = 0; i < NUM_EDITOR_SETUP_TOKENS; i++)
8498 setSetupInfo(editor_setup_tokens, i,
8499 getHashEntry(setup_file_hash,editor_setup_tokens[i].text));
8502 /* shortcut setup */
8503 ssi = setup.shortcut;
8504 for (i = 0; i < NUM_SHORTCUT_SETUP_TOKENS; i++)
8505 setSetupInfo(shortcut_setup_tokens, i,
8506 getHashEntry(setup_file_hash,shortcut_setup_tokens[i].text));
8507 setup.shortcut = ssi;
8510 for (pnr = 0; pnr < MAX_PLAYERS; pnr++)
8514 sprintf(prefix, "%s%d", TOKEN_STR_PLAYER_PREFIX, pnr + 1);
8516 sii = setup.input[pnr];
8517 for (i = 0; i < NUM_PLAYER_SETUP_TOKENS; i++)
8519 char full_token[100];
8521 sprintf(full_token, "%s%s", prefix, player_setup_tokens[i].text);
8522 setSetupInfo(player_setup_tokens, i,
8523 getHashEntry(setup_file_hash, full_token));
8525 setup.input[pnr] = sii;
8530 for (i = 0; i < NUM_SYSTEM_SETUP_TOKENS; i++)
8531 setSetupInfo(system_setup_tokens, i,
8532 getHashEntry(setup_file_hash, system_setup_tokens[i].text));
8535 /* internal setup */
8536 sxi = setup.internal;
8537 for (i = 0; i < NUM_INTERNAL_SETUP_TOKENS; i++)
8538 setSetupInfo(internal_setup_tokens, i,
8539 getHashEntry(setup_file_hash, internal_setup_tokens[i].text));
8540 setup.internal = sxi;
8544 for (i = 0; i < NUM_DEBUG_SETUP_TOKENS; i++)
8545 setSetupInfo(debug_setup_tokens, i,
8546 getHashEntry(setup_file_hash, debug_setup_tokens[i].text));
8550 soi = setup.options;
8551 for (i = 0; i < NUM_OPTIONS_SETUP_TOKENS; i++)
8552 setSetupInfo(options_setup_tokens, i,
8553 getHashEntry(setup_file_hash, options_setup_tokens[i].text));
8554 setup.options = soi;
8557 static void decodeSetupFileHash_EditorCascade(SetupFileHash *setup_file_hash)
8561 if (!setup_file_hash)
8564 /* editor cascade setup */
8565 seci = setup.editor_cascade;
8566 for (i = 0; i < NUM_EDITOR_CASCADE_SETUP_TOKENS; i++)
8567 setSetupInfo(editor_cascade_setup_tokens, i,
8568 getHashEntry(setup_file_hash,
8569 editor_cascade_setup_tokens[i].text));
8570 setup.editor_cascade = seci;
8573 void LoadSetupFromFilename(char *filename)
8575 SetupFileHash *setup_file_hash = loadSetupFileHash(filename);
8577 if (setup_file_hash)
8579 decodeSetupFileHash(setup_file_hash);
8581 freeSetupFileHash(setup_file_hash);
8585 Error(ERR_WARN, "using default setup values");
8589 static void LoadSetup_SpecialPostProcessing()
8591 char *player_name_new;
8593 /* needed to work around problems with fixed length strings */
8594 player_name_new = get_corrected_login_name(setup.player_name);
8595 free(setup.player_name);
8596 setup.player_name = player_name_new;
8598 /* "scroll_delay: on(3) / off(0)" was replaced by scroll delay value */
8599 if (setup.scroll_delay == FALSE)
8601 setup.scroll_delay_value = MIN_SCROLL_DELAY;
8602 setup.scroll_delay = TRUE; /* now always "on" */
8605 /* make sure that scroll delay value stays inside valid range */
8606 setup.scroll_delay_value =
8607 MIN(MAX(MIN_SCROLL_DELAY, setup.scroll_delay_value), MAX_SCROLL_DELAY);
8614 /* always start with reliable default values */
8615 setSetupInfoToDefaults(&setup);
8617 /* try to load setup values from default setup file */
8618 filename = getDefaultSetupFilename();
8620 if (fileExists(filename))
8621 LoadSetupFromFilename(filename);
8623 /* try to load setup values from user setup file */
8624 filename = getSetupFilename();
8626 LoadSetupFromFilename(filename);
8628 LoadSetup_SpecialPostProcessing();
8631 void LoadSetup_EditorCascade()
8633 char *filename = getPath2(getSetupDir(), EDITORCASCADE_FILENAME);
8634 SetupFileHash *setup_file_hash = NULL;
8636 /* always start with reliable default values */
8637 setSetupInfoToDefaults_EditorCascade(&setup);
8639 setup_file_hash = loadSetupFileHash(filename);
8641 if (setup_file_hash)
8643 decodeSetupFileHash_EditorCascade(setup_file_hash);
8645 freeSetupFileHash(setup_file_hash);
8653 char *filename = getSetupFilename();
8657 InitUserDataDirectory();
8659 if (!(file = fopen(filename, MODE_WRITE)))
8661 Error(ERR_WARN, "cannot write setup file '%s'", filename);
8665 fprintFileHeader(file, SETUP_FILENAME);
8669 for (i = 0; i < NUM_GLOBAL_SETUP_TOKENS; i++)
8671 /* just to make things nicer :) */
8672 if (i == SETUP_TOKEN_PLAYER_NAME + 1 ||
8673 i == SETUP_TOKEN_GRAPHICS_SET ||
8674 i == SETUP_TOKEN_VOLUME_SIMPLE ||
8675 i == SETUP_TOKEN_TOUCH_CONTROL_TYPE)
8676 fprintf(file, "\n");
8678 fprintf(file, "%s\n", getSetupLine(global_setup_tokens, "", i));
8683 fprintf(file, "\n");
8684 for (i = 0; i < NUM_EDITOR_SETUP_TOKENS; i++)
8685 fprintf(file, "%s\n", getSetupLine(editor_setup_tokens, "", i));
8687 /* shortcut setup */
8688 ssi = setup.shortcut;
8689 fprintf(file, "\n");
8690 for (i = 0; i < NUM_SHORTCUT_SETUP_TOKENS; i++)
8691 fprintf(file, "%s\n", getSetupLine(shortcut_setup_tokens, "", i));
8694 for (pnr = 0; pnr < MAX_PLAYERS; pnr++)
8698 sprintf(prefix, "%s%d", TOKEN_STR_PLAYER_PREFIX, pnr + 1);
8699 fprintf(file, "\n");
8701 sii = setup.input[pnr];
8702 for (i = 0; i < NUM_PLAYER_SETUP_TOKENS; i++)
8703 fprintf(file, "%s\n", getSetupLine(player_setup_tokens, prefix, i));
8708 fprintf(file, "\n");
8709 for (i = 0; i < NUM_SYSTEM_SETUP_TOKENS; i++)
8710 fprintf(file, "%s\n", getSetupLine(system_setup_tokens, "", i));
8712 /* internal setup */
8713 /* (internal setup values not saved to user setup file) */
8717 fprintf(file, "\n");
8718 for (i = 0; i < NUM_DEBUG_SETUP_TOKENS; i++)
8719 fprintf(file, "%s\n", getSetupLine(debug_setup_tokens, "", i));
8722 soi = setup.options;
8723 fprintf(file, "\n");
8724 for (i = 0; i < NUM_OPTIONS_SETUP_TOKENS; i++)
8725 fprintf(file, "%s\n", getSetupLine(options_setup_tokens, "", i));
8729 SetFilePermissions(filename, PERMS_PRIVATE);
8732 void SaveSetup_EditorCascade()
8734 char *filename = getPath2(getSetupDir(), EDITORCASCADE_FILENAME);
8738 InitUserDataDirectory();
8740 if (!(file = fopen(filename, MODE_WRITE)))
8742 Error(ERR_WARN, "cannot write editor cascade state file '%s'", filename);
8747 fprintFileHeader(file, EDITORCASCADE_FILENAME);
8749 seci = setup.editor_cascade;
8750 for (i = 0; i < NUM_EDITOR_CASCADE_SETUP_TOKENS; i++)
8751 fprintf(file, "%s\n", getSetupLine(editor_cascade_setup_tokens, "", i));
8755 SetFilePermissions(filename, PERMS_PRIVATE);
8760 void LoadCustomElementDescriptions()
8762 char *filename = getCustomArtworkConfigFilename(ARTWORK_TYPE_GRAPHICS);
8763 SetupFileHash *setup_file_hash;
8766 for (i = 0; i < NUM_FILE_ELEMENTS; i++)
8768 if (element_info[i].custom_description != NULL)
8770 free(element_info[i].custom_description);
8771 element_info[i].custom_description = NULL;
8775 if ((setup_file_hash = loadSetupFileHash(filename)) == NULL)
8778 for (i = 0; i < NUM_FILE_ELEMENTS; i++)
8780 char *token = getStringCat2(element_info[i].token_name, ".name");
8781 char *value = getHashEntry(setup_file_hash, token);
8784 element_info[i].custom_description = getStringCopy(value);
8789 freeSetupFileHash(setup_file_hash);
8792 static int getElementFromToken(char *token)
8794 char *value = getHashEntry(element_token_hash, token);
8799 Error(ERR_WARN, "unknown element token '%s'", token);
8801 return EL_UNDEFINED;
8804 static int get_token_parameter_value(char *token, char *value_raw)
8808 if (token == NULL || value_raw == NULL)
8809 return ARG_UNDEFINED_VALUE;
8811 suffix = strrchr(token, '.');
8815 if (strEqual(suffix, ".element"))
8816 return getElementFromToken(value_raw);
8818 /* !!! USE CORRECT VALUE TYPE (currently works also for TYPE_BOOLEAN) !!! */
8819 return get_parameter_value(value_raw, suffix, TYPE_INTEGER);
8822 void InitMenuDesignSettings_Static()
8826 /* always start with reliable default values from static default config */
8827 for (i = 0; image_config_vars[i].token != NULL; i++)
8829 char *value = getHashEntry(image_config_hash, image_config_vars[i].token);
8832 *image_config_vars[i].value =
8833 get_token_parameter_value(image_config_vars[i].token, value);
8837 static void InitMenuDesignSettings_SpecialPreProcessing()
8841 /* the following initializes hierarchical values from static configuration */
8843 /* special case: initialize "ARG_DEFAULT" values in static default config */
8844 /* (e.g., initialize "[titlemessage].fade_mode" from "[title].fade_mode") */
8845 titlescreen_initial_first_default.fade_mode =
8846 title_initial_first_default.fade_mode;
8847 titlescreen_initial_first_default.fade_delay =
8848 title_initial_first_default.fade_delay;
8849 titlescreen_initial_first_default.post_delay =
8850 title_initial_first_default.post_delay;
8851 titlescreen_initial_first_default.auto_delay =
8852 title_initial_first_default.auto_delay;
8853 titlescreen_first_default.fade_mode = title_first_default.fade_mode;
8854 titlescreen_first_default.fade_delay = title_first_default.fade_delay;
8855 titlescreen_first_default.post_delay = title_first_default.post_delay;
8856 titlescreen_first_default.auto_delay = title_first_default.auto_delay;
8857 titlemessage_initial_first_default.fade_mode =
8858 title_initial_first_default.fade_mode;
8859 titlemessage_initial_first_default.fade_delay =
8860 title_initial_first_default.fade_delay;
8861 titlemessage_initial_first_default.post_delay =
8862 title_initial_first_default.post_delay;
8863 titlemessage_initial_first_default.auto_delay =
8864 title_initial_first_default.auto_delay;
8865 titlemessage_first_default.fade_mode = title_first_default.fade_mode;
8866 titlemessage_first_default.fade_delay = title_first_default.fade_delay;
8867 titlemessage_first_default.post_delay = title_first_default.post_delay;
8868 titlemessage_first_default.auto_delay = title_first_default.auto_delay;
8870 titlescreen_initial_default.fade_mode = title_initial_default.fade_mode;
8871 titlescreen_initial_default.fade_delay = title_initial_default.fade_delay;
8872 titlescreen_initial_default.post_delay = title_initial_default.post_delay;
8873 titlescreen_initial_default.auto_delay = title_initial_default.auto_delay;
8874 titlescreen_default.fade_mode = title_default.fade_mode;
8875 titlescreen_default.fade_delay = title_default.fade_delay;
8876 titlescreen_default.post_delay = title_default.post_delay;
8877 titlescreen_default.auto_delay = title_default.auto_delay;
8878 titlemessage_initial_default.fade_mode = title_initial_default.fade_mode;
8879 titlemessage_initial_default.fade_delay = title_initial_default.fade_delay;
8880 titlemessage_initial_default.post_delay = title_initial_default.post_delay;
8881 titlemessage_initial_default.auto_delay = title_initial_default.auto_delay;
8882 titlemessage_default.fade_mode = title_default.fade_mode;
8883 titlemessage_default.fade_delay = title_default.fade_delay;
8884 titlemessage_default.post_delay = title_default.post_delay;
8885 titlemessage_default.auto_delay = title_default.auto_delay;
8887 /* special case: initialize "ARG_DEFAULT" values in static default config */
8888 /* (e.g., init "titlemessage_1.fade_mode" from "[titlemessage].fade_mode") */
8889 for (i = 0; i < MAX_NUM_TITLE_MESSAGES; i++)
8891 titlescreen_initial_first[i] = titlescreen_initial_first_default;
8892 titlescreen_first[i] = titlescreen_first_default;
8893 titlemessage_initial_first[i] = titlemessage_initial_first_default;
8894 titlemessage_first[i] = titlemessage_first_default;
8896 titlescreen_initial[i] = titlescreen_initial_default;
8897 titlescreen[i] = titlescreen_default;
8898 titlemessage_initial[i] = titlemessage_initial_default;
8899 titlemessage[i] = titlemessage_default;
8902 /* special case: initialize "ARG_DEFAULT" values in static default config */
8903 /* (eg, init "menu.enter_screen.SCORES.xyz" from "menu.enter_screen.xyz") */
8904 for (i = 0; i < NUM_SPECIAL_GFX_ARGS; i++)
8906 if (i == GFX_SPECIAL_ARG_TITLE) /* title values already initialized */
8909 menu.enter_screen[i] = menu.enter_screen[GFX_SPECIAL_ARG_DEFAULT];
8910 menu.leave_screen[i] = menu.leave_screen[GFX_SPECIAL_ARG_DEFAULT];
8911 menu.next_screen[i] = menu.next_screen[GFX_SPECIAL_ARG_DEFAULT];
8914 /* special case: initialize "ARG_DEFAULT" values in static default config */
8915 /* (eg, init "viewport.door_1.MAIN.xyz" from "viewport.door_1.xyz") */
8916 for (i = 0; i < NUM_SPECIAL_GFX_ARGS; i++)
8918 viewport.window[i] = viewport.window[GFX_SPECIAL_ARG_DEFAULT];
8919 viewport.playfield[i] = viewport.playfield[GFX_SPECIAL_ARG_DEFAULT];
8920 viewport.door_1[i] = viewport.door_1[GFX_SPECIAL_ARG_DEFAULT];
8922 if (i == GFX_SPECIAL_ARG_EDITOR) /* editor values already initialized */
8925 viewport.door_2[i] = viewport.door_2[GFX_SPECIAL_ARG_DEFAULT];
8929 static void InitMenuDesignSettings_SpecialPostProcessing()
8933 struct XY *dst, *src;
8937 { &game.button.save, &game.button.stop },
8938 { &game.button.pause2, &game.button.pause },
8939 { &game.button.load, &game.button.play },
8940 { &game.button.undo, &game.button.stop },
8941 { &game.button.redo, &game.button.play },
8947 /* special case: initialize later added SETUP list size from LEVELS value */
8948 if (menu.list_size[GAME_MODE_SETUP] == -1)
8949 menu.list_size[GAME_MODE_SETUP] = menu.list_size[GAME_MODE_LEVELS];
8951 /* set default position for snapshot buttons to stop/pause/play buttons */
8952 for (i = 0; game_buttons_xy[i].dst != NULL; i++)
8953 if ((*game_buttons_xy[i].dst).x == -1 &&
8954 (*game_buttons_xy[i].dst).y == -1)
8955 *game_buttons_xy[i].dst = *game_buttons_xy[i].src;
8958 static void InitMenuDesignSettings_SpecialPostProcessing_AfterGraphics()
8962 struct XYTileSize *dst, *src;
8965 editor_buttons_xy[] =
8968 &editor.button.element_left, &editor.palette.element_left,
8969 IMG_GFX_EDITOR_BUTTON_ELEMENT_LEFT
8972 &editor.button.element_middle, &editor.palette.element_middle,
8973 IMG_GFX_EDITOR_BUTTON_ELEMENT_MIDDLE
8976 &editor.button.element_right, &editor.palette.element_right,
8977 IMG_GFX_EDITOR_BUTTON_ELEMENT_RIGHT
8984 /* set default position for element buttons to element graphics */
8985 for (i = 0; editor_buttons_xy[i].dst != NULL; i++)
8987 if ((*editor_buttons_xy[i].dst).x == -1 &&
8988 (*editor_buttons_xy[i].dst).y == -1)
8990 struct GraphicInfo *gd = &graphic_info[editor_buttons_xy[i].graphic];
8992 gd->width = gd->height = editor_buttons_xy[i].src->tile_size;
8994 *editor_buttons_xy[i].dst = *editor_buttons_xy[i].src;
8999 static void LoadMenuDesignSettingsFromFilename(char *filename)
9001 static struct TitleFadingInfo tfi;
9002 static struct TitleMessageInfo tmi;
9003 static struct TokenInfo title_tokens[] =
9005 { TYPE_INTEGER, &tfi.fade_mode, ".fade_mode" },
9006 { TYPE_INTEGER, &tfi.fade_delay, ".fade_delay" },
9007 { TYPE_INTEGER, &tfi.post_delay, ".post_delay" },
9008 { TYPE_INTEGER, &tfi.auto_delay, ".auto_delay" },
9012 static struct TokenInfo titlemessage_tokens[] =
9014 { TYPE_INTEGER, &tmi.x, ".x" },
9015 { TYPE_INTEGER, &tmi.y, ".y" },
9016 { TYPE_INTEGER, &tmi.width, ".width" },
9017 { TYPE_INTEGER, &tmi.height, ".height" },
9018 { TYPE_INTEGER, &tmi.chars, ".chars" },
9019 { TYPE_INTEGER, &tmi.lines, ".lines" },
9020 { TYPE_INTEGER, &tmi.align, ".align" },
9021 { TYPE_INTEGER, &tmi.valign, ".valign" },
9022 { TYPE_INTEGER, &tmi.font, ".font" },
9023 { TYPE_BOOLEAN, &tmi.autowrap, ".autowrap" },
9024 { TYPE_BOOLEAN, &tmi.centered, ".centered" },
9025 { TYPE_BOOLEAN, &tmi.parse_comments, ".parse_comments" },
9026 { TYPE_INTEGER, &tmi.sort_priority, ".sort_priority" },
9027 { TYPE_INTEGER, &tmi.fade_mode, ".fade_mode" },
9028 { TYPE_INTEGER, &tmi.fade_delay, ".fade_delay" },
9029 { TYPE_INTEGER, &tmi.post_delay, ".post_delay" },
9030 { TYPE_INTEGER, &tmi.auto_delay, ".auto_delay" },
9036 struct TitleFadingInfo *info;
9041 /* initialize first titles from "enter screen" definitions, if defined */
9042 { &title_initial_first_default, "menu.enter_screen.TITLE" },
9043 { &title_first_default, "menu.enter_screen.TITLE" },
9045 /* initialize title screens from "next screen" definitions, if defined */
9046 { &title_initial_default, "menu.next_screen.TITLE" },
9047 { &title_default, "menu.next_screen.TITLE" },
9053 struct TitleMessageInfo *array;
9056 titlemessage_arrays[] =
9058 /* initialize first titles from "enter screen" definitions, if defined */
9059 { titlescreen_initial_first, "menu.enter_screen.TITLE" },
9060 { titlescreen_first, "menu.enter_screen.TITLE" },
9061 { titlemessage_initial_first, "menu.enter_screen.TITLE" },
9062 { titlemessage_first, "menu.enter_screen.TITLE" },
9064 /* initialize titles from "next screen" definitions, if defined */
9065 { titlescreen_initial, "menu.next_screen.TITLE" },
9066 { titlescreen, "menu.next_screen.TITLE" },
9067 { titlemessage_initial, "menu.next_screen.TITLE" },
9068 { titlemessage, "menu.next_screen.TITLE" },
9070 /* overwrite titles with title definitions, if defined */
9071 { titlescreen_initial_first, "[title_initial]" },
9072 { titlescreen_first, "[title]" },
9073 { titlemessage_initial_first, "[title_initial]" },
9074 { titlemessage_first, "[title]" },
9076 { titlescreen_initial, "[title_initial]" },
9077 { titlescreen, "[title]" },
9078 { titlemessage_initial, "[title_initial]" },
9079 { titlemessage, "[title]" },
9081 /* overwrite titles with title screen/message definitions, if defined */
9082 { titlescreen_initial_first, "[titlescreen_initial]" },
9083 { titlescreen_first, "[titlescreen]" },
9084 { titlemessage_initial_first, "[titlemessage_initial]" },
9085 { titlemessage_first, "[titlemessage]" },
9087 { titlescreen_initial, "[titlescreen_initial]" },
9088 { titlescreen, "[titlescreen]" },
9089 { titlemessage_initial, "[titlemessage_initial]" },
9090 { titlemessage, "[titlemessage]" },
9094 SetupFileHash *setup_file_hash;
9097 if ((setup_file_hash = loadSetupFileHash(filename)) == NULL)
9100 /* the following initializes hierarchical values from dynamic configuration */
9102 /* special case: initialize with default values that may be overwritten */
9103 /* (e.g., init "menu.draw_xoffset.INFO" from "menu.draw_xoffset") */
9104 for (i = 0; i < NUM_SPECIAL_GFX_ARGS; i++)
9106 char *value_1 = getHashEntry(setup_file_hash, "menu.draw_xoffset");
9107 char *value_2 = getHashEntry(setup_file_hash, "menu.draw_yoffset");
9108 char *value_3 = getHashEntry(setup_file_hash, "menu.list_size");
9110 if (value_1 != NULL)
9111 menu.draw_xoffset[i] = get_integer_from_string(value_1);
9112 if (value_2 != NULL)
9113 menu.draw_yoffset[i] = get_integer_from_string(value_2);
9114 if (value_3 != NULL)
9115 menu.list_size[i] = get_integer_from_string(value_3);
9118 /* special case: initialize with default values that may be overwritten */
9119 /* (eg, init "menu.draw_xoffset.INFO[XXX]" from "menu.draw_xoffset.INFO") */
9120 for (i = 0; i < NUM_SPECIAL_GFX_INFO_ARGS; i++)
9122 char *value_1 = getHashEntry(setup_file_hash, "menu.draw_xoffset.INFO");
9123 char *value_2 = getHashEntry(setup_file_hash, "menu.draw_yoffset.INFO");
9125 if (value_1 != NULL)
9126 menu.draw_xoffset_info[i] = get_integer_from_string(value_1);
9127 if (value_2 != NULL)
9128 menu.draw_yoffset_info[i] = get_integer_from_string(value_2);
9130 if (i == GFX_SPECIAL_ARG_INFO_ELEMENTS)
9132 char *value_1 = getHashEntry(setup_file_hash, "menu.list_size.INFO");
9134 if (value_1 != NULL)
9135 menu.list_size_info[i] = get_integer_from_string(value_1);
9139 /* special case: initialize with default values that may be overwritten */
9140 /* (eg, init "menu.draw_xoffset.SETUP[XXX]" from "menu.draw_xoffset.SETUP") */
9141 for (i = 0; i < NUM_SPECIAL_GFX_SETUP_ARGS; i++)
9143 char *value_1 = getHashEntry(setup_file_hash, "menu.draw_xoffset.SETUP");
9144 char *value_2 = getHashEntry(setup_file_hash, "menu.draw_yoffset.SETUP");
9146 if (value_1 != NULL)
9147 menu.draw_xoffset_setup[i] = get_integer_from_string(value_1);
9148 if (value_2 != NULL)
9149 menu.draw_yoffset_setup[i] = get_integer_from_string(value_2);
9152 /* special case: initialize with default values that may be overwritten */
9153 /* (eg, init "menu.enter_screen.SCORES.xyz" from "menu.enter_screen.xyz") */
9154 for (i = 0; i < NUM_SPECIAL_GFX_ARGS; i++)
9156 char *token_1 = "menu.enter_screen.fade_mode";
9157 char *token_2 = "menu.enter_screen.fade_delay";
9158 char *token_3 = "menu.enter_screen.post_delay";
9159 char *token_4 = "menu.leave_screen.fade_mode";
9160 char *token_5 = "menu.leave_screen.fade_delay";
9161 char *token_6 = "menu.leave_screen.post_delay";
9162 char *token_7 = "menu.next_screen.fade_mode";
9163 char *token_8 = "menu.next_screen.fade_delay";
9164 char *token_9 = "menu.next_screen.post_delay";
9165 char *value_1 = getHashEntry(setup_file_hash, token_1);
9166 char *value_2 = getHashEntry(setup_file_hash, token_2);
9167 char *value_3 = getHashEntry(setup_file_hash, token_3);
9168 char *value_4 = getHashEntry(setup_file_hash, token_4);
9169 char *value_5 = getHashEntry(setup_file_hash, token_5);
9170 char *value_6 = getHashEntry(setup_file_hash, token_6);
9171 char *value_7 = getHashEntry(setup_file_hash, token_7);
9172 char *value_8 = getHashEntry(setup_file_hash, token_8);
9173 char *value_9 = getHashEntry(setup_file_hash, token_9);
9175 if (value_1 != NULL)
9176 menu.enter_screen[i].fade_mode = get_token_parameter_value(token_1,
9178 if (value_2 != NULL)
9179 menu.enter_screen[i].fade_delay = get_token_parameter_value(token_2,
9181 if (value_3 != NULL)
9182 menu.enter_screen[i].post_delay = get_token_parameter_value(token_3,
9184 if (value_4 != NULL)
9185 menu.leave_screen[i].fade_mode = get_token_parameter_value(token_4,
9187 if (value_5 != NULL)
9188 menu.leave_screen[i].fade_delay = get_token_parameter_value(token_5,
9190 if (value_6 != NULL)
9191 menu.leave_screen[i].post_delay = get_token_parameter_value(token_6,
9193 if (value_7 != NULL)
9194 menu.next_screen[i].fade_mode = get_token_parameter_value(token_7,
9196 if (value_8 != NULL)
9197 menu.next_screen[i].fade_delay = get_token_parameter_value(token_8,
9199 if (value_9 != NULL)
9200 menu.next_screen[i].post_delay = get_token_parameter_value(token_9,
9204 /* special case: initialize with default values that may be overwritten */
9205 /* (eg, init "viewport.door_1.MAIN.xyz" from "viewport.door_1.xyz") */
9206 for (i = 0; i < NUM_SPECIAL_GFX_ARGS; i++)
9208 char *token_w1 = "viewport.window.width";
9209 char *token_w2 = "viewport.window.height";
9210 char *token_01 = "viewport.playfield.x";
9211 char *token_02 = "viewport.playfield.y";
9212 char *token_03 = "viewport.playfield.width";
9213 char *token_04 = "viewport.playfield.height";
9214 char *token_05 = "viewport.playfield.border_size";
9215 char *token_06 = "viewport.door_1.x";
9216 char *token_07 = "viewport.door_1.y";
9217 char *token_08 = "viewport.door_1.width";
9218 char *token_09 = "viewport.door_1.height";
9219 char *token_10 = "viewport.door_1.border_size";
9220 char *token_11 = "viewport.door_2.x";
9221 char *token_12 = "viewport.door_2.y";
9222 char *token_13 = "viewport.door_2.width";
9223 char *token_14 = "viewport.door_2.height";
9224 char *token_15 = "viewport.door_2.border_size";
9225 char *value_w1 = getHashEntry(setup_file_hash, token_w1);
9226 char *value_w2 = getHashEntry(setup_file_hash, token_w2);
9227 char *value_01 = getHashEntry(setup_file_hash, token_01);
9228 char *value_02 = getHashEntry(setup_file_hash, token_02);
9229 char *value_03 = getHashEntry(setup_file_hash, token_03);
9230 char *value_04 = getHashEntry(setup_file_hash, token_04);
9231 char *value_05 = getHashEntry(setup_file_hash, token_05);
9232 char *value_06 = getHashEntry(setup_file_hash, token_06);
9233 char *value_07 = getHashEntry(setup_file_hash, token_07);
9234 char *value_08 = getHashEntry(setup_file_hash, token_08);
9235 char *value_09 = getHashEntry(setup_file_hash, token_09);
9236 char *value_10 = getHashEntry(setup_file_hash, token_10);
9237 char *value_11 = getHashEntry(setup_file_hash, token_11);
9238 char *value_12 = getHashEntry(setup_file_hash, token_12);
9239 char *value_13 = getHashEntry(setup_file_hash, token_13);
9240 char *value_14 = getHashEntry(setup_file_hash, token_14);
9241 char *value_15 = getHashEntry(setup_file_hash, token_15);
9243 if (value_w1 != NULL)
9244 viewport.window[i].width = get_token_parameter_value(token_w1, value_w1);
9245 if (value_w2 != NULL)
9246 viewport.window[i].height = get_token_parameter_value(token_w2, value_w2);
9247 if (value_01 != NULL)
9248 viewport.playfield[i].x = get_token_parameter_value(token_01, value_01);
9249 if (value_02 != NULL)
9250 viewport.playfield[i].y = get_token_parameter_value(token_02, value_02);
9251 if (value_03 != NULL)
9252 viewport.playfield[i].width = get_token_parameter_value(token_03,
9254 if (value_04 != NULL)
9255 viewport.playfield[i].height = get_token_parameter_value(token_04,
9257 if (value_05 != NULL)
9258 viewport.playfield[i].border_size = get_token_parameter_value(token_05,
9260 if (value_06 != NULL)
9261 viewport.door_1[i].x = get_token_parameter_value(token_06, value_06);
9262 if (value_07 != NULL)
9263 viewport.door_1[i].y = get_token_parameter_value(token_07, value_07);
9264 if (value_08 != NULL)
9265 viewport.door_1[i].width = get_token_parameter_value(token_08, value_08);
9266 if (value_09 != NULL)
9267 viewport.door_1[i].height = get_token_parameter_value(token_09, value_09);
9268 if (value_10 != NULL)
9269 viewport.door_1[i].border_size = get_token_parameter_value(token_10,
9271 if (value_11 != NULL)
9272 viewport.door_2[i].x = get_token_parameter_value(token_11, value_11);
9273 if (value_12 != NULL)
9274 viewport.door_2[i].y = get_token_parameter_value(token_12, value_12);
9275 if (value_13 != NULL)
9276 viewport.door_2[i].width = get_token_parameter_value(token_13, value_13);
9277 if (value_14 != NULL)
9278 viewport.door_2[i].height = get_token_parameter_value(token_14, value_14);
9279 if (value_15 != NULL)
9280 viewport.door_1[i].border_size = get_token_parameter_value(token_15,
9284 /* special case: initialize with default values that may be overwritten */
9285 /* (e.g., init "[title].fade_mode" from "menu.next_screen.TITLE.fade_mode") */
9286 for (i = 0; title_info[i].info != NULL; i++)
9288 struct TitleFadingInfo *info = title_info[i].info;
9289 char *base_token = title_info[i].text;
9291 for (j = 0; title_tokens[j].type != -1; j++)
9293 char *token = getStringCat2(base_token, title_tokens[j].text);
9294 char *value = getHashEntry(setup_file_hash, token);
9298 int parameter_value = get_token_parameter_value(token, value);
9302 *(int *)title_tokens[j].value = (int)parameter_value;
9311 /* special case: initialize with default values that may be overwritten */
9312 /* (e.g., init "titlemessage_1.fade_mode" from "[titlemessage].fade_mode") */
9313 for (i = 0; titlemessage_arrays[i].array != NULL; i++)
9315 struct TitleMessageInfo *array = titlemessage_arrays[i].array;
9316 char *base_token = titlemessage_arrays[i].text;
9318 for (j = 0; titlemessage_tokens[j].type != -1; j++)
9320 char *token = getStringCat2(base_token, titlemessage_tokens[j].text);
9321 char *value = getHashEntry(setup_file_hash, token);
9325 int parameter_value = get_token_parameter_value(token, value);
9327 for (k = 0; k < MAX_NUM_TITLE_MESSAGES; k++)
9331 if (titlemessage_tokens[j].type == TYPE_INTEGER)
9332 *(int *)titlemessage_tokens[j].value = (int)parameter_value;
9334 *(boolean *)titlemessage_tokens[j].value = (boolean)parameter_value;
9344 /* read (and overwrite with) values that may be specified in config file */
9345 for (i = 0; image_config_vars[i].token != NULL; i++)
9347 char *value = getHashEntry(setup_file_hash, image_config_vars[i].token);
9349 /* (ignore definitions set to "[DEFAULT]" which are already initialized) */
9350 if (value != NULL && !strEqual(value, ARG_DEFAULT))
9351 *image_config_vars[i].value =
9352 get_token_parameter_value(image_config_vars[i].token, value);
9355 freeSetupFileHash(setup_file_hash);
9358 void LoadMenuDesignSettings()
9360 char *filename_base = UNDEFINED_FILENAME, *filename_local;
9362 InitMenuDesignSettings_Static();
9363 InitMenuDesignSettings_SpecialPreProcessing();
9365 if (!GFX_OVERRIDE_ARTWORK(ARTWORK_TYPE_GRAPHICS))
9367 /* first look for special settings configured in level series config */
9368 filename_base = getCustomArtworkLevelConfigFilename(ARTWORK_TYPE_GRAPHICS);
9370 if (fileExists(filename_base))
9371 LoadMenuDesignSettingsFromFilename(filename_base);
9374 filename_local = getCustomArtworkConfigFilename(ARTWORK_TYPE_GRAPHICS);
9376 if (filename_local != NULL && !strEqual(filename_base, filename_local))
9377 LoadMenuDesignSettingsFromFilename(filename_local);
9379 InitMenuDesignSettings_SpecialPostProcessing();
9382 void LoadMenuDesignSettings_AfterGraphics()
9384 InitMenuDesignSettings_SpecialPostProcessing_AfterGraphics();
9387 void LoadUserDefinedEditorElementList(int **elements, int *num_elements)
9389 char *filename = getEditorSetupFilename();
9390 SetupFileList *setup_file_list, *list;
9391 SetupFileHash *element_hash;
9392 int num_unknown_tokens = 0;
9395 if ((setup_file_list = loadSetupFileList(filename)) == NULL)
9398 element_hash = newSetupFileHash();
9400 for (i = 0; i < NUM_FILE_ELEMENTS; i++)
9401 setHashEntry(element_hash, element_info[i].token_name, i_to_a(i));
9403 /* determined size may be larger than needed (due to unknown elements) */
9405 for (list = setup_file_list; list != NULL; list = list->next)
9408 /* add space for up to 3 more elements for padding that may be needed */
9411 /* free memory for old list of elements, if needed */
9412 checked_free(*elements);
9414 /* allocate memory for new list of elements */
9415 *elements = checked_malloc(*num_elements * sizeof(int));
9418 for (list = setup_file_list; list != NULL; list = list->next)
9420 char *value = getHashEntry(element_hash, list->token);
9422 if (value == NULL) /* try to find obsolete token mapping */
9424 char *mapped_token = get_mapped_token(list->token);
9426 if (mapped_token != NULL)
9428 value = getHashEntry(element_hash, mapped_token);
9436 (*elements)[(*num_elements)++] = atoi(value);
9440 if (num_unknown_tokens == 0)
9442 Error(ERR_INFO_LINE, "-");
9443 Error(ERR_INFO, "warning: unknown token(s) found in config file:");
9444 Error(ERR_INFO, "- config file: '%s'", filename);
9446 num_unknown_tokens++;
9449 Error(ERR_INFO, "- token: '%s'", list->token);
9453 if (num_unknown_tokens > 0)
9454 Error(ERR_INFO_LINE, "-");
9456 while (*num_elements % 4) /* pad with empty elements, if needed */
9457 (*elements)[(*num_elements)++] = EL_EMPTY;
9459 freeSetupFileList(setup_file_list);
9460 freeSetupFileHash(element_hash);
9463 for (i = 0; i < *num_elements; i++)
9464 printf("editor: element '%s' [%d]\n",
9465 element_info[(*elements)[i]].token_name, (*elements)[i]);
9469 static struct MusicFileInfo *get_music_file_info_ext(char *basename, int music,
9472 SetupFileHash *setup_file_hash = NULL;
9473 struct MusicFileInfo tmp_music_file_info, *new_music_file_info;
9474 char *filename_music, *filename_prefix, *filename_info;
9480 token_to_value_ptr[] =
9482 { "title_header", &tmp_music_file_info.title_header },
9483 { "artist_header", &tmp_music_file_info.artist_header },
9484 { "album_header", &tmp_music_file_info.album_header },
9485 { "year_header", &tmp_music_file_info.year_header },
9487 { "title", &tmp_music_file_info.title },
9488 { "artist", &tmp_music_file_info.artist },
9489 { "album", &tmp_music_file_info.album },
9490 { "year", &tmp_music_file_info.year },
9496 filename_music = (is_sound ? getCustomSoundFilename(basename) :
9497 getCustomMusicFilename(basename));
9499 if (filename_music == NULL)
9502 /* ---------- try to replace file extension ---------- */
9504 filename_prefix = getStringCopy(filename_music);
9505 if (strrchr(filename_prefix, '.') != NULL)
9506 *strrchr(filename_prefix, '.') = '\0';
9507 filename_info = getStringCat2(filename_prefix, ".txt");
9509 if (fileExists(filename_info))
9510 setup_file_hash = loadSetupFileHash(filename_info);
9512 free(filename_prefix);
9513 free(filename_info);
9515 if (setup_file_hash == NULL)
9517 /* ---------- try to add file extension ---------- */
9519 filename_prefix = getStringCopy(filename_music);
9520 filename_info = getStringCat2(filename_prefix, ".txt");
9522 if (fileExists(filename_info))
9523 setup_file_hash = loadSetupFileHash(filename_info);
9525 free(filename_prefix);
9526 free(filename_info);
9529 if (setup_file_hash == NULL)
9532 /* ---------- music file info found ---------- */
9534 clear_mem(&tmp_music_file_info, sizeof(struct MusicFileInfo));
9536 for (i = 0; token_to_value_ptr[i].token != NULL; i++)
9538 char *value = getHashEntry(setup_file_hash, token_to_value_ptr[i].token);
9540 *token_to_value_ptr[i].value_ptr =
9541 getStringCopy(value != NULL && *value != '\0' ? value : UNKNOWN_NAME);
9544 tmp_music_file_info.basename = getStringCopy(basename);
9545 tmp_music_file_info.music = music;
9546 tmp_music_file_info.is_sound = is_sound;
9548 new_music_file_info = checked_malloc(sizeof(struct MusicFileInfo));
9549 *new_music_file_info = tmp_music_file_info;
9551 return new_music_file_info;
9554 static struct MusicFileInfo *get_music_file_info(char *basename, int music)
9556 return get_music_file_info_ext(basename, music, FALSE);
9559 static struct MusicFileInfo *get_sound_file_info(char *basename, int sound)
9561 return get_music_file_info_ext(basename, sound, TRUE);
9564 static boolean music_info_listed_ext(struct MusicFileInfo *list,
9565 char *basename, boolean is_sound)
9567 for (; list != NULL; list = list->next)
9568 if (list->is_sound == is_sound && strEqual(list->basename, basename))
9574 static boolean music_info_listed(struct MusicFileInfo *list, char *basename)
9576 return music_info_listed_ext(list, basename, FALSE);
9579 static boolean sound_info_listed(struct MusicFileInfo *list, char *basename)
9581 return music_info_listed_ext(list, basename, TRUE);
9584 void LoadMusicInfo()
9586 char *music_directory = getCustomMusicDirectory();
9587 int num_music = getMusicListSize();
9588 int num_music_noconf = 0;
9589 int num_sounds = getSoundListSize();
9591 DirectoryEntry *dir_entry;
9592 struct FileInfo *music, *sound;
9593 struct MusicFileInfo *next, **new;
9596 while (music_file_info != NULL)
9598 next = music_file_info->next;
9600 checked_free(music_file_info->basename);
9602 checked_free(music_file_info->title_header);
9603 checked_free(music_file_info->artist_header);
9604 checked_free(music_file_info->album_header);
9605 checked_free(music_file_info->year_header);
9607 checked_free(music_file_info->title);
9608 checked_free(music_file_info->artist);
9609 checked_free(music_file_info->album);
9610 checked_free(music_file_info->year);
9612 free(music_file_info);
9614 music_file_info = next;
9617 new = &music_file_info;
9619 for (i = 0; i < num_music; i++)
9621 music = getMusicListEntry(i);
9623 if (music->filename == NULL)
9626 if (strEqual(music->filename, UNDEFINED_FILENAME))
9629 /* a configured file may be not recognized as music */
9630 if (!FileIsMusic(music->filename))
9633 if (!music_info_listed(music_file_info, music->filename))
9635 *new = get_music_file_info(music->filename, i);
9638 new = &(*new)->next;
9642 if ((dir = openDirectory(music_directory)) == NULL)
9644 Error(ERR_WARN, "cannot read music directory '%s'", music_directory);
9648 while ((dir_entry = readDirectory(dir)) != NULL) /* loop all entries */
9650 char *basename = dir_entry->basename;
9651 boolean music_already_used = FALSE;
9654 /* skip all music files that are configured in music config file */
9655 for (i = 0; i < num_music; i++)
9657 music = getMusicListEntry(i);
9659 if (music->filename == NULL)
9662 if (strEqual(basename, music->filename))
9664 music_already_used = TRUE;
9669 if (music_already_used)
9672 if (!FileIsMusic(dir_entry->filename))
9675 if (!music_info_listed(music_file_info, basename))
9677 *new = get_music_file_info(basename, MAP_NOCONF_MUSIC(num_music_noconf));
9680 new = &(*new)->next;
9686 closeDirectory(dir);
9688 for (i = 0; i < num_sounds; i++)
9690 sound = getSoundListEntry(i);
9692 if (sound->filename == NULL)
9695 if (strEqual(sound->filename, UNDEFINED_FILENAME))
9698 /* a configured file may be not recognized as sound */
9699 if (!FileIsSound(sound->filename))
9702 if (!sound_info_listed(music_file_info, sound->filename))
9704 *new = get_sound_file_info(sound->filename, i);
9706 new = &(*new)->next;
9711 void add_helpanim_entry(int element, int action, int direction, int delay,
9712 int *num_list_entries)
9714 struct HelpAnimInfo *new_list_entry;
9715 (*num_list_entries)++;
9718 checked_realloc(helpanim_info,
9719 *num_list_entries * sizeof(struct HelpAnimInfo));
9720 new_list_entry = &helpanim_info[*num_list_entries - 1];
9722 new_list_entry->element = element;
9723 new_list_entry->action = action;
9724 new_list_entry->direction = direction;
9725 new_list_entry->delay = delay;
9728 void print_unknown_token(char *filename, char *token, int token_nr)
9732 Error(ERR_INFO_LINE, "-");
9733 Error(ERR_INFO, "warning: unknown token(s) found in config file:");
9734 Error(ERR_INFO, "- config file: '%s'", filename);
9737 Error(ERR_INFO, "- token: '%s'", token);
9740 void print_unknown_token_end(int token_nr)
9743 Error(ERR_INFO_LINE, "-");
9746 void LoadHelpAnimInfo()
9748 char *filename = getHelpAnimFilename();
9749 SetupFileList *setup_file_list = NULL, *list;
9750 SetupFileHash *element_hash, *action_hash, *direction_hash;
9751 int num_list_entries = 0;
9752 int num_unknown_tokens = 0;
9755 if (fileExists(filename))
9756 setup_file_list = loadSetupFileList(filename);
9758 if (setup_file_list == NULL)
9760 /* use reliable default values from static configuration */
9761 SetupFileList *insert_ptr;
9763 insert_ptr = setup_file_list =
9764 newSetupFileList(helpanim_config[0].token,
9765 helpanim_config[0].value);
9767 for (i = 1; helpanim_config[i].token; i++)
9768 insert_ptr = addListEntry(insert_ptr,
9769 helpanim_config[i].token,
9770 helpanim_config[i].value);
9773 element_hash = newSetupFileHash();
9774 action_hash = newSetupFileHash();
9775 direction_hash = newSetupFileHash();
9777 for (i = 0; i < MAX_NUM_ELEMENTS; i++)
9778 setHashEntry(element_hash, element_info[i].token_name, i_to_a(i));
9780 for (i = 0; i < NUM_ACTIONS; i++)
9781 setHashEntry(action_hash, element_action_info[i].suffix,
9782 i_to_a(element_action_info[i].value));
9784 /* do not store direction index (bit) here, but direction value! */
9785 for (i = 0; i < NUM_DIRECTIONS_FULL; i++)
9786 setHashEntry(direction_hash, element_direction_info[i].suffix,
9787 i_to_a(1 << element_direction_info[i].value));
9789 for (list = setup_file_list; list != NULL; list = list->next)
9791 char *element_token, *action_token, *direction_token;
9792 char *element_value, *action_value, *direction_value;
9793 int delay = atoi(list->value);
9795 if (strEqual(list->token, "end"))
9797 add_helpanim_entry(HELPANIM_LIST_NEXT, -1, -1, -1, &num_list_entries);
9802 /* first try to break element into element/action/direction parts;
9803 if this does not work, also accept combined "element[.act][.dir]"
9804 elements (like "dynamite.active"), which are unique elements */
9806 if (strchr(list->token, '.') == NULL) /* token contains no '.' */
9808 element_value = getHashEntry(element_hash, list->token);
9809 if (element_value != NULL) /* element found */
9810 add_helpanim_entry(atoi(element_value), -1, -1, delay,
9814 /* no further suffixes found -- this is not an element */
9815 print_unknown_token(filename, list->token, num_unknown_tokens++);
9821 /* token has format "<prefix>.<something>" */
9823 action_token = strchr(list->token, '.'); /* suffix may be action ... */
9824 direction_token = action_token; /* ... or direction */
9826 element_token = getStringCopy(list->token);
9827 *strchr(element_token, '.') = '\0';
9829 element_value = getHashEntry(element_hash, element_token);
9831 if (element_value == NULL) /* this is no element */
9833 element_value = getHashEntry(element_hash, list->token);
9834 if (element_value != NULL) /* combined element found */
9835 add_helpanim_entry(atoi(element_value), -1, -1, delay,
9838 print_unknown_token(filename, list->token, num_unknown_tokens++);
9840 free(element_token);
9845 action_value = getHashEntry(action_hash, action_token);
9847 if (action_value != NULL) /* action found */
9849 add_helpanim_entry(atoi(element_value), atoi(action_value), -1, delay,
9852 free(element_token);
9857 direction_value = getHashEntry(direction_hash, direction_token);
9859 if (direction_value != NULL) /* direction found */
9861 add_helpanim_entry(atoi(element_value), -1, atoi(direction_value), delay,
9864 free(element_token);
9869 if (strchr(action_token + 1, '.') == NULL)
9871 /* no further suffixes found -- this is not an action nor direction */
9873 element_value = getHashEntry(element_hash, list->token);
9874 if (element_value != NULL) /* combined element found */
9875 add_helpanim_entry(atoi(element_value), -1, -1, delay,
9878 print_unknown_token(filename, list->token, num_unknown_tokens++);
9880 free(element_token);
9885 /* token has format "<prefix>.<suffix>.<something>" */
9887 direction_token = strchr(action_token + 1, '.');
9889 action_token = getStringCopy(action_token);
9890 *strchr(action_token + 1, '.') = '\0';
9892 action_value = getHashEntry(action_hash, action_token);
9894 if (action_value == NULL) /* this is no action */
9896 element_value = getHashEntry(element_hash, list->token);
9897 if (element_value != NULL) /* combined element found */
9898 add_helpanim_entry(atoi(element_value), -1, -1, delay,
9901 print_unknown_token(filename, list->token, num_unknown_tokens++);
9903 free(element_token);
9909 direction_value = getHashEntry(direction_hash, direction_token);
9911 if (direction_value != NULL) /* direction found */
9913 add_helpanim_entry(atoi(element_value), atoi(action_value),
9914 atoi(direction_value), delay, &num_list_entries);
9916 free(element_token);
9922 /* this is no direction */
9924 element_value = getHashEntry(element_hash, list->token);
9925 if (element_value != NULL) /* combined element found */
9926 add_helpanim_entry(atoi(element_value), -1, -1, delay,
9929 print_unknown_token(filename, list->token, num_unknown_tokens++);
9931 free(element_token);
9935 print_unknown_token_end(num_unknown_tokens);
9937 add_helpanim_entry(HELPANIM_LIST_NEXT, -1, -1, -1, &num_list_entries);
9938 add_helpanim_entry(HELPANIM_LIST_END, -1, -1, -1, &num_list_entries);
9940 freeSetupFileList(setup_file_list);
9941 freeSetupFileHash(element_hash);
9942 freeSetupFileHash(action_hash);
9943 freeSetupFileHash(direction_hash);
9946 for (i = 0; i < num_list_entries; i++)
9947 printf("::: '%s': %d, %d, %d => %d\n",
9948 EL_NAME(helpanim_info[i].element),
9949 helpanim_info[i].element,
9950 helpanim_info[i].action,
9951 helpanim_info[i].direction,
9952 helpanim_info[i].delay);
9956 void LoadHelpTextInfo()
9958 char *filename = getHelpTextFilename();
9961 if (helptext_info != NULL)
9963 freeSetupFileHash(helptext_info);
9964 helptext_info = NULL;
9967 if (fileExists(filename))
9968 helptext_info = loadSetupFileHash(filename);
9970 if (helptext_info == NULL)
9972 /* use reliable default values from static configuration */
9973 helptext_info = newSetupFileHash();
9975 for (i = 0; helptext_config[i].token; i++)
9976 setHashEntry(helptext_info,
9977 helptext_config[i].token,
9978 helptext_config[i].value);
9982 BEGIN_HASH_ITERATION(helptext_info, itr)
9984 printf("::: '%s' => '%s'\n",
9985 HASH_ITERATION_TOKEN(itr), HASH_ITERATION_VALUE(itr));
9987 END_HASH_ITERATION(hash, itr)
9992 /* ------------------------------------------------------------------------- */
9993 /* convert levels */
9994 /* ------------------------------------------------------------------------- */
9996 #define MAX_NUM_CONVERT_LEVELS 1000
9998 void ConvertLevels()
10000 static LevelDirTree *convert_leveldir = NULL;
10001 static int convert_level_nr = -1;
10002 static int num_levels_handled = 0;
10003 static int num_levels_converted = 0;
10004 static boolean levels_failed[MAX_NUM_CONVERT_LEVELS];
10007 convert_leveldir = getTreeInfoFromIdentifier(leveldir_first,
10008 global.convert_leveldir);
10010 if (convert_leveldir == NULL)
10011 Error(ERR_EXIT, "no such level identifier: '%s'",
10012 global.convert_leveldir);
10014 leveldir_current = convert_leveldir;
10016 if (global.convert_level_nr != -1)
10018 convert_leveldir->first_level = global.convert_level_nr;
10019 convert_leveldir->last_level = global.convert_level_nr;
10022 convert_level_nr = convert_leveldir->first_level;
10024 PrintLine("=", 79);
10025 Print("Converting levels\n");
10026 PrintLine("-", 79);
10027 Print("Level series identifier: '%s'\n", convert_leveldir->identifier);
10028 Print("Level series name: '%s'\n", convert_leveldir->name);
10029 Print("Level series author: '%s'\n", convert_leveldir->author);
10030 Print("Number of levels: %d\n", convert_leveldir->levels);
10031 PrintLine("=", 79);
10034 for (i = 0; i < MAX_NUM_CONVERT_LEVELS; i++)
10035 levels_failed[i] = FALSE;
10037 while (convert_level_nr <= convert_leveldir->last_level)
10039 char *level_filename;
10042 level_nr = convert_level_nr++;
10044 Print("Level %03d: ", level_nr);
10046 LoadLevel(level_nr);
10047 if (level.no_valid_file)
10049 Print("(no level)\n");
10053 Print("converting level ... ");
10055 level_filename = getDefaultLevelFilename(level_nr);
10056 new_level = !fileExists(level_filename);
10060 SaveLevel(level_nr);
10062 num_levels_converted++;
10064 Print("converted.\n");
10068 if (level_nr >= 0 && level_nr < MAX_NUM_CONVERT_LEVELS)
10069 levels_failed[level_nr] = TRUE;
10071 Print("NOT CONVERTED -- LEVEL ALREADY EXISTS.\n");
10074 num_levels_handled++;
10078 PrintLine("=", 79);
10079 Print("Number of levels handled: %d\n", num_levels_handled);
10080 Print("Number of levels converted: %d (%d%%)\n", num_levels_converted,
10081 (num_levels_handled ?
10082 num_levels_converted * 100 / num_levels_handled : 0));
10083 PrintLine("-", 79);
10084 Print("Summary (for automatic parsing by scripts):\n");
10085 Print("LEVELDIR '%s', CONVERTED %d/%d (%d%%)",
10086 convert_leveldir->identifier, num_levels_converted,
10087 num_levels_handled,
10088 (num_levels_handled ?
10089 num_levels_converted * 100 / num_levels_handled : 0));
10091 if (num_levels_handled != num_levels_converted)
10093 Print(", FAILED:");
10094 for (i = 0; i < MAX_NUM_CONVERT_LEVELS; i++)
10095 if (levels_failed[i])
10100 PrintLine("=", 79);
10102 CloseAllAndExit(0);
10106 /* ------------------------------------------------------------------------- */
10107 /* create and save images for use in level sketches (raw BMP format) */
10108 /* ------------------------------------------------------------------------- */
10110 void CreateLevelSketchImages()
10112 #if defined(TARGET_SDL)
10117 InitElementPropertiesGfxElement();
10119 bitmap1 = CreateBitmap(TILEX, TILEY, DEFAULT_DEPTH);
10120 bitmap2 = CreateBitmap(MINI_TILEX, MINI_TILEY, DEFAULT_DEPTH);
10122 for (i = 0; i < NUM_FILE_ELEMENTS; i++)
10124 Bitmap *src_bitmap;
10126 int element = getMappedElement(i);
10127 int graphic = el2edimg(element);
10128 char basename1[16];
10129 char basename2[16];
10133 sprintf(basename1, "%03d.bmp", i);
10134 sprintf(basename2, "%03ds.bmp", i);
10136 filename1 = getPath2(global.create_images_dir, basename1);
10137 filename2 = getPath2(global.create_images_dir, basename2);
10139 getFixedGraphicSource(graphic, 0, &src_bitmap, &src_x, &src_y);
10140 BlitBitmap(src_bitmap, bitmap1, src_x, src_y, TILEX, TILEY,
10143 if (SDL_SaveBMP(bitmap1->surface, filename1) != 0)
10144 Error(ERR_EXIT, "cannot save level sketch image file '%s'", filename1);
10146 getMiniGraphicSource(graphic, &src_bitmap, &src_x, &src_y);
10147 BlitBitmap(src_bitmap, bitmap2, src_x, src_y, MINI_TILEX, MINI_TILEY, 0, 0);
10149 if (SDL_SaveBMP(bitmap2->surface, filename2) != 0)
10150 Error(ERR_EXIT, "cannot save level sketch image file '%s'", filename2);
10156 printf("%03d `%03d%c", i, i, (i % 10 < 9 ? ' ' : '\n'));
10159 FreeBitmap(bitmap1);
10160 FreeBitmap(bitmap2);
10165 Error(ERR_INFO, "%d normal and small images created", NUM_FILE_ELEMENTS);
10167 CloseAllAndExit(0);
10172 /* ------------------------------------------------------------------------- */
10173 /* create and save images for custom and group elements (raw BMP format) */
10174 /* ------------------------------------------------------------------------- */
10176 void CreateCustomElementImages(char *directory)
10178 #if defined(TARGET_SDL)
10179 char *src_basename = "RocksCE-template.ilbm";
10180 char *dst_basename = "RocksCE.bmp";
10181 char *src_filename = getPath2(directory, src_basename);
10182 char *dst_filename = getPath2(directory, dst_basename);
10183 Bitmap *src_bitmap;
10185 int yoffset_ce = 0;
10186 int yoffset_ge = (TILEY * NUM_CUSTOM_ELEMENTS / 16);
10189 SDLInitVideoDisplay();
10191 ReCreateBitmap(&backbuffer, video.width, video.height);
10193 src_bitmap = LoadImage(src_filename);
10195 bitmap = CreateBitmap(TILEX * 16 * 2,
10196 TILEY * (NUM_CUSTOM_ELEMENTS + NUM_GROUP_ELEMENTS) / 16,
10199 for (i = 0; i < NUM_CUSTOM_ELEMENTS; i++)
10206 BlitBitmap(src_bitmap, bitmap, 0, 0, TILEX, TILEY,
10207 TILEX * x, TILEY * y + yoffset_ce);
10209 BlitBitmap(src_bitmap, bitmap, 0, TILEY,
10211 TILEX * x + TILEX * 16,
10212 TILEY * y + yoffset_ce);
10214 for (j = 2; j >= 0; j--)
10218 BlitBitmap(src_bitmap, bitmap,
10219 TILEX + c * 7, 0, 6, 10,
10220 TILEX * x + 6 + j * 7,
10221 TILEY * y + 11 + yoffset_ce);
10223 BlitBitmap(src_bitmap, bitmap,
10224 TILEX + c * 8, TILEY, 6, 10,
10225 TILEX * 16 + TILEX * x + 6 + j * 8,
10226 TILEY * y + 10 + yoffset_ce);
10232 for (i = 0; i < NUM_GROUP_ELEMENTS; i++)
10239 BlitBitmap(src_bitmap, bitmap, 0, 0, TILEX, TILEY,
10240 TILEX * x, TILEY * y + yoffset_ge);
10242 BlitBitmap(src_bitmap, bitmap, 0, TILEY,
10244 TILEX * x + TILEX * 16,
10245 TILEY * y + yoffset_ge);
10247 for (j = 1; j >= 0; j--)
10251 BlitBitmap(src_bitmap, bitmap, TILEX + c * 10, 11, 10, 10,
10252 TILEX * x + 6 + j * 10,
10253 TILEY * y + 11 + yoffset_ge);
10255 BlitBitmap(src_bitmap, bitmap,
10256 TILEX + c * 8, TILEY + 12, 6, 10,
10257 TILEX * 16 + TILEX * x + 10 + j * 8,
10258 TILEY * y + 10 + yoffset_ge);
10264 if (SDL_SaveBMP(bitmap->surface, dst_filename) != 0)
10265 Error(ERR_EXIT, "cannot save CE graphics file '%s'", dst_filename);
10267 FreeBitmap(bitmap);
10269 CloseAllAndExit(0);