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 static void ActivateLevelTemplate()
1793 /* Currently there is no special action needed to activate the template
1794 data, because 'element_info' property settings overwrite the original
1795 level data, while all other variables do not change. */
1797 /* Exception: 'from_level_template' elements in the original level playfield
1798 are overwritten with the corresponding elements at the same position in
1799 playfield from the level template. */
1801 for (x = 0; x < level.fieldx; x++)
1802 for (y = 0; y < level.fieldy; y++)
1803 if (level.field[x][y] == EL_FROM_LEVEL_TEMPLATE)
1804 level.field[x][y] = level_template.field[x][y];
1806 if (check_special_flags("load_xsb_to_ces"))
1808 struct LevelInfo level_backup = level;
1810 /* overwrite all individual level settings from template level settings */
1811 level = level_template;
1813 /* restore playfield size */
1814 level.fieldx = level_backup.fieldx;
1815 level.fieldy = level_backup.fieldy;
1817 /* restore playfield content */
1818 for (x = 0; x < level.fieldx; x++)
1819 for (y = 0; y < level.fieldy; y++)
1820 level.field[x][y] = level_backup.field[x][y];
1822 /* restore name and author from individual level */
1823 strcpy(level.name, level_backup.name);
1824 strcpy(level.author, level_backup.author);
1826 /* restore flag "use_custom_template" */
1827 level.use_custom_template = level_backup.use_custom_template;
1831 static char *getLevelFilenameFromBasename(char *basename)
1833 static char *filename = NULL;
1835 checked_free(filename);
1837 filename = getPath2(getCurrentLevelDir(), basename);
1842 static int getFileTypeFromBasename(char *basename)
1844 /* !!! ALSO SEE COMMENT IN checkForPackageFromBasename() !!! */
1846 static char *filename = NULL;
1847 struct stat file_status;
1849 /* ---------- try to determine file type from filename ---------- */
1851 /* check for typical filename of a Supaplex level package file */
1852 if (strlen(basename) == 10 && strPrefixLower(basename, "levels.d"))
1853 return LEVEL_FILE_TYPE_SP;
1855 /* check for typical filename of a Diamond Caves II level package file */
1856 if (strSuffixLower(basename, ".dc") ||
1857 strSuffixLower(basename, ".dc2"))
1858 return LEVEL_FILE_TYPE_DC;
1860 /* check for typical filename of a Sokoban level package file */
1861 if (strSuffixLower(basename, ".xsb") &&
1862 strchr(basename, '%') == NULL)
1863 return LEVEL_FILE_TYPE_SB;
1865 /* ---------- try to determine file type from filesize ---------- */
1867 checked_free(filename);
1868 filename = getPath2(getCurrentLevelDir(), basename);
1870 if (stat(filename, &file_status) == 0)
1872 /* check for typical filesize of a Supaplex level package file */
1873 if (file_status.st_size == 170496)
1874 return LEVEL_FILE_TYPE_SP;
1877 return LEVEL_FILE_TYPE_UNKNOWN;
1880 static boolean checkForPackageFromBasename(char *basename)
1882 /* !!! WON'T WORK ANYMORE IF getFileTypeFromBasename() ALSO DETECTS !!!
1883 !!! SINGLE LEVELS (CURRENTLY ONLY DETECTS LEVEL PACKAGES !!! */
1885 return (getFileTypeFromBasename(basename) != LEVEL_FILE_TYPE_UNKNOWN);
1888 static char *getSingleLevelBasenameExt(int nr, char *extension)
1890 static char basename[MAX_FILENAME_LEN];
1893 sprintf(basename, "template.%s", extension);
1895 sprintf(basename, "%03d.%s", nr, extension);
1900 static char *getSingleLevelBasename(int nr)
1902 return getSingleLevelBasenameExt(nr, LEVELFILE_EXTENSION);
1905 static char *getPackedLevelBasename(int type)
1907 static char basename[MAX_FILENAME_LEN];
1908 char *directory = getCurrentLevelDir();
1910 DirectoryEntry *dir_entry;
1912 strcpy(basename, UNDEFINED_FILENAME); /* default: undefined file */
1914 if ((dir = openDirectory(directory)) == NULL)
1916 Error(ERR_WARN, "cannot read current level directory '%s'", directory);
1921 while ((dir_entry = readDirectory(dir)) != NULL) /* loop all entries */
1923 char *entry_basename = dir_entry->basename;
1924 int entry_type = getFileTypeFromBasename(entry_basename);
1926 if (entry_type != LEVEL_FILE_TYPE_UNKNOWN) /* found valid level package */
1928 if (type == LEVEL_FILE_TYPE_UNKNOWN ||
1931 strcpy(basename, entry_basename);
1938 closeDirectory(dir);
1943 static char *getSingleLevelFilename(int nr)
1945 return getLevelFilenameFromBasename(getSingleLevelBasename(nr));
1948 #if ENABLE_UNUSED_CODE
1949 static char *getPackedLevelFilename(int type)
1951 return getLevelFilenameFromBasename(getPackedLevelBasename(type));
1955 char *getDefaultLevelFilename(int nr)
1957 return getSingleLevelFilename(nr);
1960 #if ENABLE_UNUSED_CODE
1961 static void setLevelFileInfo_SingleLevelFilename(struct LevelFileInfo *lfi,
1965 lfi->packed = FALSE;
1966 lfi->basename = getSingleLevelBasename(lfi->nr, lfi->type);
1967 lfi->filename = getLevelFilenameFromBasename(lfi->basename);
1971 static void setLevelFileInfo_FormatLevelFilename(struct LevelFileInfo *lfi,
1972 int type, char *format, ...)
1974 static char basename[MAX_FILENAME_LEN];
1977 va_start(ap, format);
1978 vsprintf(basename, format, ap);
1982 lfi->packed = FALSE;
1983 lfi->basename = basename;
1984 lfi->filename = getLevelFilenameFromBasename(lfi->basename);
1987 static void setLevelFileInfo_PackedLevelFilename(struct LevelFileInfo *lfi,
1992 lfi->basename = getPackedLevelBasename(lfi->type);
1993 lfi->filename = getLevelFilenameFromBasename(lfi->basename);
1996 static int getFiletypeFromID(char *filetype_id)
1998 char *filetype_id_lower;
1999 int filetype = LEVEL_FILE_TYPE_UNKNOWN;
2002 if (filetype_id == NULL)
2003 return LEVEL_FILE_TYPE_UNKNOWN;
2005 filetype_id_lower = getStringToLower(filetype_id);
2007 for (i = 0; filetype_id_list[i].id != NULL; i++)
2009 char *id_lower = getStringToLower(filetype_id_list[i].id);
2011 if (strEqual(filetype_id_lower, id_lower))
2012 filetype = filetype_id_list[i].filetype;
2016 if (filetype != LEVEL_FILE_TYPE_UNKNOWN)
2020 free(filetype_id_lower);
2025 static void determineLevelFileInfo_Filename(struct LevelFileInfo *lfi)
2029 /* special case: level number is negative => check for level template file */
2032 /* global variable "leveldir_current" must be modified in the loop below */
2033 LevelDirTree *leveldir_current_last = leveldir_current;
2035 /* check for template level in path from current to topmost tree node */
2037 while (leveldir_current != NULL)
2039 setLevelFileInfo_FormatLevelFilename(lfi, LEVEL_FILE_TYPE_RND,
2040 "template.%s", LEVELFILE_EXTENSION);
2042 if (fileExists(lfi->filename))
2045 leveldir_current = leveldir_current->node_parent;
2048 /* restore global variable "leveldir_current" modified in above loop */
2049 leveldir_current = leveldir_current_last;
2051 /* no fallback if template file not existing */
2055 /* special case: check for file name/pattern specified in "levelinfo.conf" */
2056 if (leveldir_current->level_filename != NULL)
2058 int filetype = getFiletypeFromID(leveldir_current->level_filetype);
2060 setLevelFileInfo_FormatLevelFilename(lfi, filetype,
2061 leveldir_current->level_filename, nr);
2063 lfi->packed = checkForPackageFromBasename(leveldir_current->level_filename);
2065 if (fileExists(lfi->filename))
2069 /* check for native Rocks'n'Diamonds level file */
2070 setLevelFileInfo_FormatLevelFilename(lfi, LEVEL_FILE_TYPE_RND,
2071 "%03d.%s", nr, LEVELFILE_EXTENSION);
2072 if (fileExists(lfi->filename))
2075 /* check for Emerald Mine level file (V1) */
2076 setLevelFileInfo_FormatLevelFilename(lfi, LEVEL_FILE_TYPE_EM, "a%c%c",
2077 'a' + (nr / 10) % 26, '0' + nr % 10);
2078 if (fileExists(lfi->filename))
2080 setLevelFileInfo_FormatLevelFilename(lfi, LEVEL_FILE_TYPE_EM, "A%c%c",
2081 'A' + (nr / 10) % 26, '0' + nr % 10);
2082 if (fileExists(lfi->filename))
2085 /* check for Emerald Mine level file (V2 to V5) */
2086 setLevelFileInfo_FormatLevelFilename(lfi, LEVEL_FILE_TYPE_EM, "%d", nr);
2087 if (fileExists(lfi->filename))
2090 /* check for Emerald Mine level file (V6 / single mode) */
2091 setLevelFileInfo_FormatLevelFilename(lfi, LEVEL_FILE_TYPE_EM, "%02ds", nr);
2092 if (fileExists(lfi->filename))
2094 setLevelFileInfo_FormatLevelFilename(lfi, LEVEL_FILE_TYPE_EM, "%02dS", nr);
2095 if (fileExists(lfi->filename))
2098 /* check for Emerald Mine level file (V6 / teamwork mode) */
2099 setLevelFileInfo_FormatLevelFilename(lfi, LEVEL_FILE_TYPE_EM, "%02dt", nr);
2100 if (fileExists(lfi->filename))
2102 setLevelFileInfo_FormatLevelFilename(lfi, LEVEL_FILE_TYPE_EM, "%02dT", nr);
2103 if (fileExists(lfi->filename))
2106 /* check for various packed level file formats */
2107 setLevelFileInfo_PackedLevelFilename(lfi, LEVEL_FILE_TYPE_UNKNOWN);
2108 if (fileExists(lfi->filename))
2111 /* no known level file found -- use default values (and fail later) */
2112 setLevelFileInfo_FormatLevelFilename(lfi, LEVEL_FILE_TYPE_RND,
2113 "%03d.%s", nr, LEVELFILE_EXTENSION);
2116 static void determineLevelFileInfo_Filetype(struct LevelFileInfo *lfi)
2118 if (lfi->type == LEVEL_FILE_TYPE_UNKNOWN)
2119 lfi->type = getFileTypeFromBasename(lfi->basename);
2122 static void setLevelFileInfo(struct LevelFileInfo *level_file_info, int nr)
2124 /* always start with reliable default values */
2125 setFileInfoToDefaults(level_file_info);
2127 level_file_info->nr = nr; /* set requested level number */
2129 determineLevelFileInfo_Filename(level_file_info);
2130 determineLevelFileInfo_Filetype(level_file_info);
2133 /* ------------------------------------------------------------------------- */
2134 /* functions for loading R'n'D level */
2135 /* ------------------------------------------------------------------------- */
2137 int getMappedElement(int element)
2139 /* remap some (historic, now obsolete) elements */
2143 case EL_PLAYER_OBSOLETE:
2144 element = EL_PLAYER_1;
2147 case EL_KEY_OBSOLETE:
2151 case EL_EM_KEY_1_FILE_OBSOLETE:
2152 element = EL_EM_KEY_1;
2155 case EL_EM_KEY_2_FILE_OBSOLETE:
2156 element = EL_EM_KEY_2;
2159 case EL_EM_KEY_3_FILE_OBSOLETE:
2160 element = EL_EM_KEY_3;
2163 case EL_EM_KEY_4_FILE_OBSOLETE:
2164 element = EL_EM_KEY_4;
2167 case EL_ENVELOPE_OBSOLETE:
2168 element = EL_ENVELOPE_1;
2176 if (element >= NUM_FILE_ELEMENTS)
2178 Error(ERR_WARN, "invalid level element %d", element);
2180 element = EL_UNKNOWN;
2188 int getMappedElementByVersion(int element, int game_version)
2190 /* remap some elements due to certain game version */
2192 if (game_version <= VERSION_IDENT(2,2,0,0))
2194 /* map game font elements */
2195 element = (element == EL_CHAR('[') ? EL_CHAR_AUMLAUT :
2196 element == EL_CHAR('\\') ? EL_CHAR_OUMLAUT :
2197 element == EL_CHAR(']') ? EL_CHAR_UUMLAUT :
2198 element == EL_CHAR('^') ? EL_CHAR_COPYRIGHT : element);
2201 if (game_version < VERSION_IDENT(3,0,0,0))
2203 /* map Supaplex gravity tube elements */
2204 element = (element == EL_SP_GRAVITY_PORT_LEFT ? EL_SP_PORT_LEFT :
2205 element == EL_SP_GRAVITY_PORT_RIGHT ? EL_SP_PORT_RIGHT :
2206 element == EL_SP_GRAVITY_PORT_UP ? EL_SP_PORT_UP :
2207 element == EL_SP_GRAVITY_PORT_DOWN ? EL_SP_PORT_DOWN :
2214 static int LoadLevel_VERS(File *file, int chunk_size, struct LevelInfo *level)
2216 level->file_version = getFileVersion(file);
2217 level->game_version = getFileVersion(file);
2222 static int LoadLevel_DATE(File *file, int chunk_size, struct LevelInfo *level)
2224 level->creation_date.year = getFile16BitBE(file);
2225 level->creation_date.month = getFile8Bit(file);
2226 level->creation_date.day = getFile8Bit(file);
2228 level->creation_date.src = DATE_SRC_LEVELFILE;
2233 static int LoadLevel_HEAD(File *file, int chunk_size, struct LevelInfo *level)
2235 int initial_player_stepsize;
2236 int initial_player_gravity;
2239 level->fieldx = getFile8Bit(file);
2240 level->fieldy = getFile8Bit(file);
2242 level->time = getFile16BitBE(file);
2243 level->gems_needed = getFile16BitBE(file);
2245 for (i = 0; i < MAX_LEVEL_NAME_LEN; i++)
2246 level->name[i] = getFile8Bit(file);
2247 level->name[MAX_LEVEL_NAME_LEN] = 0;
2249 for (i = 0; i < LEVEL_SCORE_ELEMENTS; i++)
2250 level->score[i] = getFile8Bit(file);
2252 level->num_yamyam_contents = STD_ELEMENT_CONTENTS;
2253 for (i = 0; i < STD_ELEMENT_CONTENTS; i++)
2254 for (y = 0; y < 3; y++)
2255 for (x = 0; x < 3; x++)
2256 level->yamyam_content[i].e[x][y] = getMappedElement(getFile8Bit(file));
2258 level->amoeba_speed = getFile8Bit(file);
2259 level->time_magic_wall = getFile8Bit(file);
2260 level->time_wheel = getFile8Bit(file);
2261 level->amoeba_content = getMappedElement(getFile8Bit(file));
2263 initial_player_stepsize = (getFile8Bit(file) == 1 ? STEPSIZE_FAST :
2266 for (i = 0; i < MAX_PLAYERS; i++)
2267 level->initial_player_stepsize[i] = initial_player_stepsize;
2269 initial_player_gravity = (getFile8Bit(file) == 1 ? TRUE : FALSE);
2271 for (i = 0; i < MAX_PLAYERS; i++)
2272 level->initial_player_gravity[i] = initial_player_gravity;
2274 level->encoding_16bit_field = (getFile8Bit(file) == 1 ? TRUE : FALSE);
2275 level->em_slippery_gems = (getFile8Bit(file) == 1 ? TRUE : FALSE);
2277 level->use_custom_template = (getFile8Bit(file) == 1 ? TRUE : FALSE);
2279 level->block_last_field = (getFile8Bit(file) == 1 ? TRUE : FALSE);
2280 level->sp_block_last_field = (getFile8Bit(file) == 1 ? TRUE : FALSE);
2281 level->can_move_into_acid_bits = getFile32BitBE(file);
2282 level->dont_collide_with_bits = getFile8Bit(file);
2284 level->use_spring_bug = (getFile8Bit(file) == 1 ? TRUE : FALSE);
2285 level->use_step_counter = (getFile8Bit(file) == 1 ? TRUE : FALSE);
2287 level->instant_relocation = (getFile8Bit(file) == 1 ? TRUE : FALSE);
2288 level->can_pass_to_walkable = (getFile8Bit(file) == 1 ? TRUE : FALSE);
2289 level->grow_into_diggable = (getFile8Bit(file) == 1 ? TRUE : FALSE);
2291 level->game_engine_type = getFile8Bit(file);
2293 ReadUnusedBytesFromFile(file, LEVEL_CHUNK_HEAD_UNUSED);
2298 static int LoadLevel_NAME(File *file, int chunk_size, struct LevelInfo *level)
2302 for (i = 0; i < MAX_LEVEL_NAME_LEN; i++)
2303 level->name[i] = getFile8Bit(file);
2304 level->name[MAX_LEVEL_NAME_LEN] = 0;
2309 static int LoadLevel_AUTH(File *file, int chunk_size, struct LevelInfo *level)
2313 for (i = 0; i < MAX_LEVEL_AUTHOR_LEN; i++)
2314 level->author[i] = getFile8Bit(file);
2315 level->author[MAX_LEVEL_AUTHOR_LEN] = 0;
2320 static int LoadLevel_BODY(File *file, int chunk_size, struct LevelInfo *level)
2323 int chunk_size_expected = level->fieldx * level->fieldy;
2325 /* Note: "chunk_size" was wrong before version 2.0 when elements are
2326 stored with 16-bit encoding (and should be twice as big then).
2327 Even worse, playfield data was stored 16-bit when only yamyam content
2328 contained 16-bit elements and vice versa. */
2330 if (level->encoding_16bit_field && level->file_version >= FILE_VERSION_2_0)
2331 chunk_size_expected *= 2;
2333 if (chunk_size_expected != chunk_size)
2335 ReadUnusedBytesFromFile(file, chunk_size);
2336 return chunk_size_expected;
2339 for (y = 0; y < level->fieldy; y++)
2340 for (x = 0; x < level->fieldx; x++)
2341 level->field[x][y] =
2342 getMappedElement(level->encoding_16bit_field ? getFile16BitBE(file) :
2347 static int LoadLevel_CONT(File *file, int chunk_size, struct LevelInfo *level)
2350 int header_size = 4;
2351 int content_size = MAX_ELEMENT_CONTENTS * 3 * 3;
2352 int chunk_size_expected = header_size + content_size;
2354 /* Note: "chunk_size" was wrong before version 2.0 when elements are
2355 stored with 16-bit encoding (and should be twice as big then).
2356 Even worse, playfield data was stored 16-bit when only yamyam content
2357 contained 16-bit elements and vice versa. */
2359 if (level->encoding_16bit_field && level->file_version >= FILE_VERSION_2_0)
2360 chunk_size_expected += content_size;
2362 if (chunk_size_expected != chunk_size)
2364 ReadUnusedBytesFromFile(file, chunk_size);
2365 return chunk_size_expected;
2369 level->num_yamyam_contents = getFile8Bit(file);
2373 /* correct invalid number of content fields -- should never happen */
2374 if (level->num_yamyam_contents < 1 ||
2375 level->num_yamyam_contents > MAX_ELEMENT_CONTENTS)
2376 level->num_yamyam_contents = STD_ELEMENT_CONTENTS;
2378 for (i = 0; i < MAX_ELEMENT_CONTENTS; i++)
2379 for (y = 0; y < 3; y++)
2380 for (x = 0; x < 3; x++)
2381 level->yamyam_content[i].e[x][y] =
2382 getMappedElement(level->encoding_16bit_field ?
2383 getFile16BitBE(file) : getFile8Bit(file));
2387 static int LoadLevel_CNT2(File *file, int chunk_size, struct LevelInfo *level)
2392 int content_array[MAX_ELEMENT_CONTENTS][3][3];
2394 element = getMappedElement(getFile16BitBE(file));
2395 num_contents = getFile8Bit(file);
2397 getFile8Bit(file); /* content x size (unused) */
2398 getFile8Bit(file); /* content y size (unused) */
2400 ReadUnusedBytesFromFile(file, LEVEL_CHUNK_CNT2_UNUSED);
2402 for (i = 0; i < MAX_ELEMENT_CONTENTS; i++)
2403 for (y = 0; y < 3; y++)
2404 for (x = 0; x < 3; x++)
2405 content_array[i][x][y] = getMappedElement(getFile16BitBE(file));
2407 /* correct invalid number of content fields -- should never happen */
2408 if (num_contents < 1 || num_contents > MAX_ELEMENT_CONTENTS)
2409 num_contents = STD_ELEMENT_CONTENTS;
2411 if (element == EL_YAMYAM)
2413 level->num_yamyam_contents = num_contents;
2415 for (i = 0; i < num_contents; i++)
2416 for (y = 0; y < 3; y++)
2417 for (x = 0; x < 3; x++)
2418 level->yamyam_content[i].e[x][y] = content_array[i][x][y];
2420 else if (element == EL_BD_AMOEBA)
2422 level->amoeba_content = content_array[0][0][0];
2426 Error(ERR_WARN, "cannot load content for element '%d'", element);
2432 static int LoadLevel_CNT3(File *file, int chunk_size, struct LevelInfo *level)
2438 int chunk_size_expected;
2440 element = getMappedElement(getFile16BitBE(file));
2441 if (!IS_ENVELOPE(element))
2442 element = EL_ENVELOPE_1;
2444 envelope_nr = element - EL_ENVELOPE_1;
2446 envelope_len = getFile16BitBE(file);
2448 level->envelope[envelope_nr].xsize = getFile8Bit(file);
2449 level->envelope[envelope_nr].ysize = getFile8Bit(file);
2451 ReadUnusedBytesFromFile(file, LEVEL_CHUNK_CNT3_UNUSED);
2453 chunk_size_expected = LEVEL_CHUNK_CNT3_SIZE(envelope_len);
2454 if (chunk_size_expected != chunk_size)
2456 ReadUnusedBytesFromFile(file, chunk_size - LEVEL_CHUNK_CNT3_HEADER);
2457 return chunk_size_expected;
2460 for (i = 0; i < envelope_len; i++)
2461 level->envelope[envelope_nr].text[i] = getFile8Bit(file);
2466 static int LoadLevel_CUS1(File *file, int chunk_size, struct LevelInfo *level)
2468 int num_changed_custom_elements = getFile16BitBE(file);
2469 int chunk_size_expected = 2 + num_changed_custom_elements * 6;
2472 if (chunk_size_expected != chunk_size)
2474 ReadUnusedBytesFromFile(file, chunk_size - 2);
2475 return chunk_size_expected;
2478 for (i = 0; i < num_changed_custom_elements; i++)
2480 int element = getMappedElement(getFile16BitBE(file));
2481 int properties = getFile32BitBE(file);
2483 if (IS_CUSTOM_ELEMENT(element))
2484 element_info[element].properties[EP_BITFIELD_BASE_NR] = properties;
2486 Error(ERR_WARN, "invalid custom element number %d", element);
2488 /* older game versions that wrote level files with CUS1 chunks used
2489 different default push delay values (not yet stored in level file) */
2490 element_info[element].push_delay_fixed = 2;
2491 element_info[element].push_delay_random = 8;
2497 static int LoadLevel_CUS2(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 * 4;
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 custom_target_element = getMappedElement(getFile16BitBE(file));
2514 if (IS_CUSTOM_ELEMENT(element))
2515 element_info[element].change->target_element = custom_target_element;
2517 Error(ERR_WARN, "invalid custom element number %d", element);
2523 static int LoadLevel_CUS3(File *file, int chunk_size, struct LevelInfo *level)
2525 int num_changed_custom_elements = getFile16BitBE(file);
2526 int chunk_size_expected = LEVEL_CHUNK_CUS3_SIZE(num_changed_custom_elements);
2529 if (chunk_size_expected != chunk_size)
2531 ReadUnusedBytesFromFile(file, chunk_size - 2);
2532 return chunk_size_expected;
2535 for (i = 0; i < num_changed_custom_elements; i++)
2537 int element = getMappedElement(getFile16BitBE(file));
2538 struct ElementInfo *ei = &element_info[element];
2539 unsigned int event_bits;
2541 if (!IS_CUSTOM_ELEMENT(element))
2543 Error(ERR_WARN, "invalid custom element number %d", element);
2545 element = EL_INTERNAL_DUMMY;
2548 for (j = 0; j < MAX_ELEMENT_NAME_LEN; j++)
2549 ei->description[j] = getFile8Bit(file);
2550 ei->description[MAX_ELEMENT_NAME_LEN] = 0;
2552 ei->properties[EP_BITFIELD_BASE_NR] = getFile32BitBE(file);
2554 /* some free bytes for future properties and padding */
2555 ReadUnusedBytesFromFile(file, 7);
2557 ei->use_gfx_element = getFile8Bit(file);
2558 ei->gfx_element_initial = getMappedElement(getFile16BitBE(file));
2560 ei->collect_score_initial = getFile8Bit(file);
2561 ei->collect_count_initial = getFile8Bit(file);
2563 ei->push_delay_fixed = getFile16BitBE(file);
2564 ei->push_delay_random = getFile16BitBE(file);
2565 ei->move_delay_fixed = getFile16BitBE(file);
2566 ei->move_delay_random = getFile16BitBE(file);
2568 ei->move_pattern = getFile16BitBE(file);
2569 ei->move_direction_initial = getFile8Bit(file);
2570 ei->move_stepsize = getFile8Bit(file);
2572 for (y = 0; y < 3; y++)
2573 for (x = 0; x < 3; x++)
2574 ei->content.e[x][y] = getMappedElement(getFile16BitBE(file));
2576 event_bits = getFile32BitBE(file);
2577 for (j = 0; j < NUM_CHANGE_EVENTS; j++)
2578 if (event_bits & (1 << j))
2579 ei->change->has_event[j] = TRUE;
2581 ei->change->target_element = getMappedElement(getFile16BitBE(file));
2583 ei->change->delay_fixed = getFile16BitBE(file);
2584 ei->change->delay_random = getFile16BitBE(file);
2585 ei->change->delay_frames = getFile16BitBE(file);
2587 ei->change->initial_trigger_element= getMappedElement(getFile16BitBE(file));
2589 ei->change->explode = getFile8Bit(file);
2590 ei->change->use_target_content = getFile8Bit(file);
2591 ei->change->only_if_complete = getFile8Bit(file);
2592 ei->change->use_random_replace = getFile8Bit(file);
2594 ei->change->random_percentage = getFile8Bit(file);
2595 ei->change->replace_when = getFile8Bit(file);
2597 for (y = 0; y < 3; y++)
2598 for (x = 0; x < 3; x++)
2599 ei->change->target_content.e[x][y] =
2600 getMappedElement(getFile16BitBE(file));
2602 ei->slippery_type = getFile8Bit(file);
2604 /* some free bytes for future properties and padding */
2605 ReadUnusedBytesFromFile(file, LEVEL_CPART_CUS3_UNUSED);
2607 /* mark that this custom element has been modified */
2608 ei->modified_settings = TRUE;
2614 static int LoadLevel_CUS4(File *file, int chunk_size, struct LevelInfo *level)
2616 struct ElementInfo *ei;
2617 int chunk_size_expected;
2621 /* ---------- custom element base property values (96 bytes) ------------- */
2623 element = getMappedElement(getFile16BitBE(file));
2625 if (!IS_CUSTOM_ELEMENT(element))
2627 Error(ERR_WARN, "invalid custom element number %d", element);
2629 ReadUnusedBytesFromFile(file, chunk_size - 2);
2633 ei = &element_info[element];
2635 for (i = 0; i < MAX_ELEMENT_NAME_LEN; i++)
2636 ei->description[i] = getFile8Bit(file);
2637 ei->description[MAX_ELEMENT_NAME_LEN] = 0;
2639 ei->properties[EP_BITFIELD_BASE_NR] = getFile32BitBE(file);
2641 ReadUnusedBytesFromFile(file, 4); /* reserved for more base properties */
2643 ei->num_change_pages = getFile8Bit(file);
2645 chunk_size_expected = LEVEL_CHUNK_CUS4_SIZE(ei->num_change_pages);
2646 if (chunk_size_expected != chunk_size)
2648 ReadUnusedBytesFromFile(file, chunk_size - 43);
2649 return chunk_size_expected;
2652 ei->ce_value_fixed_initial = getFile16BitBE(file);
2653 ei->ce_value_random_initial = getFile16BitBE(file);
2654 ei->use_last_ce_value = getFile8Bit(file);
2656 ei->use_gfx_element = getFile8Bit(file);
2657 ei->gfx_element_initial = getMappedElement(getFile16BitBE(file));
2659 ei->collect_score_initial = getFile8Bit(file);
2660 ei->collect_count_initial = getFile8Bit(file);
2662 ei->drop_delay_fixed = getFile8Bit(file);
2663 ei->push_delay_fixed = getFile8Bit(file);
2664 ei->drop_delay_random = getFile8Bit(file);
2665 ei->push_delay_random = getFile8Bit(file);
2666 ei->move_delay_fixed = getFile16BitBE(file);
2667 ei->move_delay_random = getFile16BitBE(file);
2669 /* bits 0 - 15 of "move_pattern" ... */
2670 ei->move_pattern = getFile16BitBE(file);
2671 ei->move_direction_initial = getFile8Bit(file);
2672 ei->move_stepsize = getFile8Bit(file);
2674 ei->slippery_type = getFile8Bit(file);
2676 for (y = 0; y < 3; y++)
2677 for (x = 0; x < 3; x++)
2678 ei->content.e[x][y] = getMappedElement(getFile16BitBE(file));
2680 ei->move_enter_element = getMappedElement(getFile16BitBE(file));
2681 ei->move_leave_element = getMappedElement(getFile16BitBE(file));
2682 ei->move_leave_type = getFile8Bit(file);
2684 /* ... bits 16 - 31 of "move_pattern" (not nice, but downward compatible) */
2685 ei->move_pattern |= (getFile16BitBE(file) << 16);
2687 ei->access_direction = getFile8Bit(file);
2689 ei->explosion_delay = getFile8Bit(file);
2690 ei->ignition_delay = getFile8Bit(file);
2691 ei->explosion_type = getFile8Bit(file);
2693 /* some free bytes for future custom property values and padding */
2694 ReadUnusedBytesFromFile(file, 1);
2696 /* ---------- change page property values (48 bytes) --------------------- */
2698 setElementChangePages(ei, ei->num_change_pages);
2700 for (i = 0; i < ei->num_change_pages; i++)
2702 struct ElementChangeInfo *change = &ei->change_page[i];
2703 unsigned int event_bits;
2705 /* always start with reliable default values */
2706 setElementChangeInfoToDefaults(change);
2708 /* bits 0 - 31 of "has_event[]" ... */
2709 event_bits = getFile32BitBE(file);
2710 for (j = 0; j < MIN(NUM_CHANGE_EVENTS, 32); j++)
2711 if (event_bits & (1 << j))
2712 change->has_event[j] = TRUE;
2714 change->target_element = getMappedElement(getFile16BitBE(file));
2716 change->delay_fixed = getFile16BitBE(file);
2717 change->delay_random = getFile16BitBE(file);
2718 change->delay_frames = getFile16BitBE(file);
2720 change->initial_trigger_element = getMappedElement(getFile16BitBE(file));
2722 change->explode = getFile8Bit(file);
2723 change->use_target_content = getFile8Bit(file);
2724 change->only_if_complete = getFile8Bit(file);
2725 change->use_random_replace = getFile8Bit(file);
2727 change->random_percentage = getFile8Bit(file);
2728 change->replace_when = getFile8Bit(file);
2730 for (y = 0; y < 3; y++)
2731 for (x = 0; x < 3; x++)
2732 change->target_content.e[x][y]= getMappedElement(getFile16BitBE(file));
2734 change->can_change = getFile8Bit(file);
2736 change->trigger_side = getFile8Bit(file);
2738 change->trigger_player = getFile8Bit(file);
2739 change->trigger_page = getFile8Bit(file);
2741 change->trigger_page = (change->trigger_page == CH_PAGE_ANY_FILE ?
2742 CH_PAGE_ANY : (1 << change->trigger_page));
2744 change->has_action = getFile8Bit(file);
2745 change->action_type = getFile8Bit(file);
2746 change->action_mode = getFile8Bit(file);
2747 change->action_arg = getFile16BitBE(file);
2749 /* ... bits 32 - 39 of "has_event[]" (not nice, but downward compatible) */
2750 event_bits = getFile8Bit(file);
2751 for (j = 32; j < NUM_CHANGE_EVENTS; j++)
2752 if (event_bits & (1 << (j - 32)))
2753 change->has_event[j] = TRUE;
2756 /* mark this custom element as modified */
2757 ei->modified_settings = TRUE;
2762 static int LoadLevel_GRP1(File *file, int chunk_size, struct LevelInfo *level)
2764 struct ElementInfo *ei;
2765 struct ElementGroupInfo *group;
2769 element = getMappedElement(getFile16BitBE(file));
2771 if (!IS_GROUP_ELEMENT(element))
2773 Error(ERR_WARN, "invalid group element number %d", element);
2775 ReadUnusedBytesFromFile(file, chunk_size - 2);
2779 ei = &element_info[element];
2781 for (i = 0; i < MAX_ELEMENT_NAME_LEN; i++)
2782 ei->description[i] = getFile8Bit(file);
2783 ei->description[MAX_ELEMENT_NAME_LEN] = 0;
2785 group = element_info[element].group;
2787 group->num_elements = getFile8Bit(file);
2789 ei->use_gfx_element = getFile8Bit(file);
2790 ei->gfx_element_initial = getMappedElement(getFile16BitBE(file));
2792 group->choice_mode = getFile8Bit(file);
2794 /* some free bytes for future values and padding */
2795 ReadUnusedBytesFromFile(file, 3);
2797 for (i = 0; i < MAX_ELEMENTS_IN_GROUP; i++)
2798 group->element[i] = getMappedElement(getFile16BitBE(file));
2800 /* mark this group element as modified */
2801 element_info[element].modified_settings = TRUE;
2806 static int LoadLevel_MicroChunk(File *file, struct LevelFileConfigInfo *conf,
2807 int element, int real_element)
2809 int micro_chunk_size = 0;
2810 int conf_type = getFile8Bit(file);
2811 int byte_mask = conf_type & CONF_MASK_BYTES;
2812 boolean element_found = FALSE;
2815 micro_chunk_size += 1;
2817 if (byte_mask == CONF_MASK_MULTI_BYTES)
2819 int num_bytes = getFile16BitBE(file);
2820 byte *buffer = checked_malloc(num_bytes);
2822 ReadBytesFromFile(file, buffer, num_bytes);
2824 for (i = 0; conf[i].data_type != -1; i++)
2826 if (conf[i].element == element &&
2827 conf[i].conf_type == conf_type)
2829 int data_type = conf[i].data_type;
2830 int num_entities = num_bytes / CONF_ENTITY_NUM_BYTES(data_type);
2831 int max_num_entities = conf[i].max_num_entities;
2833 if (num_entities > max_num_entities)
2836 "truncating number of entities for element %d from %d to %d",
2837 element, num_entities, max_num_entities);
2839 num_entities = max_num_entities;
2842 if (num_entities == 0 && (data_type == TYPE_ELEMENT_LIST ||
2843 data_type == TYPE_CONTENT_LIST))
2845 /* for element and content lists, zero entities are not allowed */
2846 Error(ERR_WARN, "found empty list of entities for element %d",
2849 /* do not set "num_entities" here to prevent reading behind buffer */
2851 *(int *)(conf[i].num_entities) = 1; /* at least one is required */
2855 *(int *)(conf[i].num_entities) = num_entities;
2858 element_found = TRUE;
2860 if (data_type == TYPE_STRING)
2862 char *string = (char *)(conf[i].value);
2865 for (j = 0; j < max_num_entities; j++)
2866 string[j] = (j < num_entities ? buffer[j] : '\0');
2868 else if (data_type == TYPE_ELEMENT_LIST)
2870 int *element_array = (int *)(conf[i].value);
2873 for (j = 0; j < num_entities; j++)
2875 getMappedElement(CONF_ELEMENTS_ELEMENT(buffer, j));
2877 else if (data_type == TYPE_CONTENT_LIST)
2879 struct Content *content= (struct Content *)(conf[i].value);
2882 for (c = 0; c < num_entities; c++)
2883 for (y = 0; y < 3; y++)
2884 for (x = 0; x < 3; x++)
2885 content[c].e[x][y] =
2886 getMappedElement(CONF_CONTENTS_ELEMENT(buffer, c, x, y));
2889 element_found = FALSE;
2895 checked_free(buffer);
2897 micro_chunk_size += 2 + num_bytes;
2899 else /* constant size configuration data (1, 2 or 4 bytes) */
2901 int value = (byte_mask == CONF_MASK_1_BYTE ? getFile8Bit (file) :
2902 byte_mask == CONF_MASK_2_BYTE ? getFile16BitBE(file) :
2903 byte_mask == CONF_MASK_4_BYTE ? getFile32BitBE(file) : 0);
2905 for (i = 0; conf[i].data_type != -1; i++)
2907 if (conf[i].element == element &&
2908 conf[i].conf_type == conf_type)
2910 int data_type = conf[i].data_type;
2912 if (data_type == TYPE_ELEMENT)
2913 value = getMappedElement(value);
2915 if (data_type == TYPE_BOOLEAN)
2916 *(boolean *)(conf[i].value) = value;
2918 *(int *) (conf[i].value) = value;
2920 element_found = TRUE;
2926 micro_chunk_size += CONF_VALUE_NUM_BYTES(byte_mask);
2931 char *error_conf_chunk_bytes =
2932 (byte_mask == CONF_MASK_1_BYTE ? "CONF_VALUE_8_BIT" :
2933 byte_mask == CONF_MASK_2_BYTE ? "CONF_VALUE_16_BIT" :
2934 byte_mask == CONF_MASK_4_BYTE ? "CONF_VALUE_32_BIT" :"CONF_VALUE_BYTES");
2935 int error_conf_chunk_token = conf_type & CONF_MASK_TOKEN;
2936 int error_element = real_element;
2938 Error(ERR_WARN, "cannot load micro chunk '%s(%d)' value for element %d ['%s']",
2939 error_conf_chunk_bytes, error_conf_chunk_token,
2940 error_element, EL_NAME(error_element));
2943 return micro_chunk_size;
2946 static int LoadLevel_INFO(File *file, int chunk_size, struct LevelInfo *level)
2948 int real_chunk_size = 0;
2950 li = *level; /* copy level data into temporary buffer */
2952 while (!checkEndOfFile(file))
2954 real_chunk_size += LoadLevel_MicroChunk(file, chunk_config_INFO, -1, -1);
2956 if (real_chunk_size >= chunk_size)
2960 *level = li; /* copy temporary buffer back to level data */
2962 return real_chunk_size;
2965 static int LoadLevel_CONF(File *file, int chunk_size, struct LevelInfo *level)
2967 int real_chunk_size = 0;
2969 li = *level; /* copy level data into temporary buffer */
2971 while (!checkEndOfFile(file))
2973 int element = getMappedElement(getFile16BitBE(file));
2975 real_chunk_size += 2;
2976 real_chunk_size += LoadLevel_MicroChunk(file, chunk_config_CONF,
2978 if (real_chunk_size >= chunk_size)
2982 *level = li; /* copy temporary buffer back to level data */
2984 return real_chunk_size;
2987 static int LoadLevel_ELEM(File *file, int chunk_size, struct LevelInfo *level)
2989 int real_chunk_size = 0;
2991 li = *level; /* copy level data into temporary buffer */
2993 while (!checkEndOfFile(file))
2995 int element = getMappedElement(getFile16BitBE(file));
2997 real_chunk_size += 2;
2998 real_chunk_size += LoadLevel_MicroChunk(file, chunk_config_ELEM,
3000 if (real_chunk_size >= chunk_size)
3004 *level = li; /* copy temporary buffer back to level data */
3006 return real_chunk_size;
3009 static int LoadLevel_NOTE(File *file, int chunk_size, struct LevelInfo *level)
3011 int element = getMappedElement(getFile16BitBE(file));
3012 int envelope_nr = element - EL_ENVELOPE_1;
3013 int real_chunk_size = 2;
3015 xx_envelope = level->envelope[envelope_nr]; /* copy into temporary buffer */
3017 while (!checkEndOfFile(file))
3019 real_chunk_size += LoadLevel_MicroChunk(file, chunk_config_NOTE,
3022 if (real_chunk_size >= chunk_size)
3026 level->envelope[envelope_nr] = xx_envelope; /* copy from temporary buffer */
3028 return real_chunk_size;
3031 static int LoadLevel_CUSX(File *file, int chunk_size, struct LevelInfo *level)
3033 int element = getMappedElement(getFile16BitBE(file));
3034 int real_chunk_size = 2;
3035 struct ElementInfo *ei = &element_info[element];
3038 xx_ei = *ei; /* copy element data into temporary buffer */
3040 xx_ei.num_change_pages = -1;
3042 while (!checkEndOfFile(file))
3044 real_chunk_size += LoadLevel_MicroChunk(file, chunk_config_CUSX_base,
3046 if (xx_ei.num_change_pages != -1)
3049 if (real_chunk_size >= chunk_size)
3055 if (ei->num_change_pages == -1)
3057 Error(ERR_WARN, "LoadLevel_CUSX(): missing 'num_change_pages' for '%s'",
3060 ei->num_change_pages = 1;
3062 setElementChangePages(ei, 1);
3063 setElementChangeInfoToDefaults(ei->change);
3065 return real_chunk_size;
3068 /* initialize number of change pages stored for this custom element */
3069 setElementChangePages(ei, ei->num_change_pages);
3070 for (i = 0; i < ei->num_change_pages; i++)
3071 setElementChangeInfoToDefaults(&ei->change_page[i]);
3073 /* start with reading properties for the first change page */
3074 xx_current_change_page = 0;
3076 while (!checkEndOfFile(file))
3078 struct ElementChangeInfo *change = &ei->change_page[xx_current_change_page];
3080 xx_change = *change; /* copy change data into temporary buffer */
3082 resetEventBits(); /* reset bits; change page might have changed */
3084 real_chunk_size += LoadLevel_MicroChunk(file, chunk_config_CUSX_change,
3087 *change = xx_change;
3089 setEventFlagsFromEventBits(change);
3091 if (real_chunk_size >= chunk_size)
3095 return real_chunk_size;
3098 static int LoadLevel_GRPX(File *file, int chunk_size, struct LevelInfo *level)
3100 int element = getMappedElement(getFile16BitBE(file));
3101 int real_chunk_size = 2;
3102 struct ElementInfo *ei = &element_info[element];
3103 struct ElementGroupInfo *group = ei->group;
3105 xx_ei = *ei; /* copy element data into temporary buffer */
3106 xx_group = *group; /* copy group data into temporary buffer */
3108 while (!checkEndOfFile(file))
3110 real_chunk_size += LoadLevel_MicroChunk(file, chunk_config_GRPX,
3113 if (real_chunk_size >= chunk_size)
3120 return real_chunk_size;
3123 static void LoadLevelFromFileInfo_RND(struct LevelInfo *level,
3124 struct LevelFileInfo *level_file_info,
3125 boolean level_info_only)
3127 char *filename = level_file_info->filename;
3128 char cookie[MAX_LINE_LEN];
3129 char chunk_name[CHUNK_ID_LEN + 1];
3133 if (!(file = openFile(filename, MODE_READ)))
3135 level->no_valid_file = TRUE;
3137 if (!level_info_only)
3138 Error(ERR_WARN, "cannot read level '%s' -- using empty level", filename);
3143 getFileChunkBE(file, chunk_name, NULL);
3144 if (strEqual(chunk_name, "RND1"))
3146 getFile32BitBE(file); /* not used */
3148 getFileChunkBE(file, chunk_name, NULL);
3149 if (!strEqual(chunk_name, "CAVE"))
3151 level->no_valid_file = TRUE;
3153 Error(ERR_WARN, "unknown format of level file '%s'", filename);
3160 else /* check for pre-2.0 file format with cookie string */
3162 strcpy(cookie, chunk_name);
3163 if (getStringFromFile(file, &cookie[4], MAX_LINE_LEN - 4) == NULL)
3165 if (strlen(cookie) > 0 && cookie[strlen(cookie) - 1] == '\n')
3166 cookie[strlen(cookie) - 1] = '\0';
3168 if (!checkCookieString(cookie, LEVEL_COOKIE_TMPL))
3170 level->no_valid_file = TRUE;
3172 Error(ERR_WARN, "unknown format of level file '%s'", filename);
3179 if ((level->file_version = getFileVersionFromCookieString(cookie)) == -1)
3181 level->no_valid_file = TRUE;
3183 Error(ERR_WARN, "unsupported version of level file '%s'", filename);
3190 /* pre-2.0 level files have no game version, so use file version here */
3191 level->game_version = level->file_version;
3194 if (level->file_version < FILE_VERSION_1_2)
3196 /* level files from versions before 1.2.0 without chunk structure */
3197 LoadLevel_HEAD(file, LEVEL_CHUNK_HEAD_SIZE, level);
3198 LoadLevel_BODY(file, level->fieldx * level->fieldy, level);
3206 int (*loader)(File *, int, struct LevelInfo *);
3210 { "VERS", LEVEL_CHUNK_VERS_SIZE, LoadLevel_VERS },
3211 { "DATE", LEVEL_CHUNK_DATE_SIZE, LoadLevel_DATE },
3212 { "HEAD", LEVEL_CHUNK_HEAD_SIZE, LoadLevel_HEAD },
3213 { "NAME", LEVEL_CHUNK_NAME_SIZE, LoadLevel_NAME },
3214 { "AUTH", LEVEL_CHUNK_AUTH_SIZE, LoadLevel_AUTH },
3215 { "INFO", -1, LoadLevel_INFO },
3216 { "BODY", -1, LoadLevel_BODY },
3217 { "CONT", -1, LoadLevel_CONT },
3218 { "CNT2", LEVEL_CHUNK_CNT2_SIZE, LoadLevel_CNT2 },
3219 { "CNT3", -1, LoadLevel_CNT3 },
3220 { "CUS1", -1, LoadLevel_CUS1 },
3221 { "CUS2", -1, LoadLevel_CUS2 },
3222 { "CUS3", -1, LoadLevel_CUS3 },
3223 { "CUS4", -1, LoadLevel_CUS4 },
3224 { "GRP1", -1, LoadLevel_GRP1 },
3225 { "CONF", -1, LoadLevel_CONF },
3226 { "ELEM", -1, LoadLevel_ELEM },
3227 { "NOTE", -1, LoadLevel_NOTE },
3228 { "CUSX", -1, LoadLevel_CUSX },
3229 { "GRPX", -1, LoadLevel_GRPX },
3234 while (getFileChunkBE(file, chunk_name, &chunk_size))
3238 while (chunk_info[i].name != NULL &&
3239 !strEqual(chunk_name, chunk_info[i].name))
3242 if (chunk_info[i].name == NULL)
3244 Error(ERR_WARN, "unknown chunk '%s' in level file '%s'",
3245 chunk_name, filename);
3246 ReadUnusedBytesFromFile(file, chunk_size);
3248 else if (chunk_info[i].size != -1 &&
3249 chunk_info[i].size != chunk_size)
3251 Error(ERR_WARN, "wrong size (%d) of chunk '%s' in level file '%s'",
3252 chunk_size, chunk_name, filename);
3253 ReadUnusedBytesFromFile(file, chunk_size);
3257 /* call function to load this level chunk */
3258 int chunk_size_expected =
3259 (chunk_info[i].loader)(file, chunk_size, level);
3261 /* the size of some chunks cannot be checked before reading other
3262 chunks first (like "HEAD" and "BODY") that contain some header
3263 information, so check them here */
3264 if (chunk_size_expected != chunk_size)
3266 Error(ERR_WARN, "wrong size (%d) of chunk '%s' in level file '%s'",
3267 chunk_size, chunk_name, filename);
3277 /* ------------------------------------------------------------------------- */
3278 /* functions for loading EM level */
3279 /* ------------------------------------------------------------------------- */
3281 void CopyNativeLevel_RND_to_EM(struct LevelInfo *level)
3283 static int ball_xy[8][2] =
3294 struct LevelInfo_EM *level_em = level->native_em_level;
3295 struct LEVEL *lev = level_em->lev;
3296 struct PLAYER **ply = level_em->ply;
3299 lev->width = MIN(level->fieldx, EM_MAX_CAVE_WIDTH);
3300 lev->height = MIN(level->fieldy, EM_MAX_CAVE_HEIGHT);
3302 lev->time_seconds = level->time;
3303 lev->required_initial = level->gems_needed;
3305 lev->emerald_score = level->score[SC_EMERALD];
3306 lev->diamond_score = level->score[SC_DIAMOND];
3307 lev->alien_score = level->score[SC_ROBOT];
3308 lev->tank_score = level->score[SC_SPACESHIP];
3309 lev->bug_score = level->score[SC_BUG];
3310 lev->eater_score = level->score[SC_YAMYAM];
3311 lev->nut_score = level->score[SC_NUT];
3312 lev->dynamite_score = level->score[SC_DYNAMITE];
3313 lev->key_score = level->score[SC_KEY];
3314 lev->exit_score = level->score[SC_TIME_BONUS];
3316 for (i = 0; i < MAX_ELEMENT_CONTENTS; i++)
3317 for (y = 0; y < 3; y++)
3318 for (x = 0; x < 3; x++)
3319 lev->eater_array[i][y * 3 + x] =
3320 map_element_RND_to_EM(level->yamyam_content[i].e[x][y]);
3322 lev->amoeba_time = level->amoeba_speed;
3323 lev->wonderwall_time_initial = level->time_magic_wall;
3324 lev->wheel_time = level->time_wheel;
3326 lev->android_move_time = level->android_move_time;
3327 lev->android_clone_time = level->android_clone_time;
3328 lev->ball_random = level->ball_random;
3329 lev->ball_state_initial = level->ball_state_initial;
3330 lev->ball_time = level->ball_time;
3331 lev->num_ball_arrays = level->num_ball_contents;
3333 lev->lenses_score = level->lenses_score;
3334 lev->magnify_score = level->magnify_score;
3335 lev->slurp_score = level->slurp_score;
3337 lev->lenses_time = level->lenses_time;
3338 lev->magnify_time = level->magnify_time;
3340 lev->wind_direction_initial =
3341 map_direction_RND_to_EM(level->wind_direction_initial);
3342 lev->wind_cnt_initial = (level->wind_direction_initial != MV_NONE ?
3343 lev->wind_time : 0);
3345 for (i = 0; i < MAX_ELEMENT_CONTENTS; i++)
3346 for (j = 0; j < 8; j++)
3347 lev->ball_array[i][j] =
3348 map_element_RND_to_EM(level->
3349 ball_content[i].e[ball_xy[j][0]][ball_xy[j][1]]);
3351 map_android_clone_elements_RND_to_EM(level);
3353 /* first fill the complete playfield with the default border element */
3354 for (y = 0; y < EM_MAX_CAVE_HEIGHT; y++)
3355 for (x = 0; x < EM_MAX_CAVE_WIDTH; x++)
3356 level_em->cave[x][y] = ZBORDER;
3358 if (BorderElement == EL_STEELWALL)
3360 for (y = 0; y < lev->height + 2; y++)
3361 for (x = 0; x < lev->width + 2; x++)
3362 level_em->cave[x + 1][y + 1] = map_element_RND_to_EM(EL_STEELWALL);
3365 /* then copy the real level contents from level file into the playfield */
3366 for (y = 0; y < lev->height; y++) for (x = 0; x < lev->width; x++)
3368 int new_element = map_element_RND_to_EM(level->field[x][y]);
3369 int offset = (BorderElement == EL_STEELWALL ? 1 : 0);
3370 int xx = x + 1 + offset;
3371 int yy = y + 1 + offset;
3373 if (level->field[x][y] == EL_AMOEBA_DEAD)
3374 new_element = map_element_RND_to_EM(EL_AMOEBA_WET);
3376 level_em->cave[xx][yy] = new_element;
3379 for (i = 0; i < MAX_PLAYERS; i++)
3381 ply[i]->x_initial = 0;
3382 ply[i]->y_initial = 0;
3385 /* initialize player positions and delete players from the playfield */
3386 for (y = 0; y < lev->height; y++) for (x = 0; x < lev->width; x++)
3388 if (ELEM_IS_PLAYER(level->field[x][y]))
3390 int player_nr = GET_PLAYER_NR(level->field[x][y]);
3391 int offset = (BorderElement == EL_STEELWALL ? 1 : 0);
3392 int xx = x + 1 + offset;
3393 int yy = y + 1 + offset;
3395 ply[player_nr]->x_initial = xx;
3396 ply[player_nr]->y_initial = yy;
3398 level_em->cave[xx][yy] = map_element_RND_to_EM(EL_EMPTY);
3402 if (BorderElement == EL_STEELWALL)
3409 void CopyNativeLevel_EM_to_RND(struct LevelInfo *level)
3411 static int ball_xy[8][2] =
3422 struct LevelInfo_EM *level_em = level->native_em_level;
3423 struct LEVEL *lev = level_em->lev;
3424 struct PLAYER **ply = level_em->ply;
3427 level->fieldx = MIN(lev->width, MAX_LEV_FIELDX);
3428 level->fieldy = MIN(lev->height, MAX_LEV_FIELDY);
3430 level->time = lev->time_seconds;
3431 level->gems_needed = lev->required_initial;
3433 sprintf(level->name, "Level %d", level->file_info.nr);
3435 level->score[SC_EMERALD] = lev->emerald_score;
3436 level->score[SC_DIAMOND] = lev->diamond_score;
3437 level->score[SC_ROBOT] = lev->alien_score;
3438 level->score[SC_SPACESHIP] = lev->tank_score;
3439 level->score[SC_BUG] = lev->bug_score;
3440 level->score[SC_YAMYAM] = lev->eater_score;
3441 level->score[SC_NUT] = lev->nut_score;
3442 level->score[SC_DYNAMITE] = lev->dynamite_score;
3443 level->score[SC_KEY] = lev->key_score;
3444 level->score[SC_TIME_BONUS] = lev->exit_score;
3446 level->num_yamyam_contents = MAX_ELEMENT_CONTENTS;
3448 for (i = 0; i < level->num_yamyam_contents; i++)
3449 for (y = 0; y < 3; y++)
3450 for (x = 0; x < 3; x++)
3451 level->yamyam_content[i].e[x][y] =
3452 map_element_EM_to_RND(lev->eater_array[i][y * 3 + x]);
3454 level->amoeba_speed = lev->amoeba_time;
3455 level->time_magic_wall = lev->wonderwall_time_initial;
3456 level->time_wheel = lev->wheel_time;
3458 level->android_move_time = lev->android_move_time;
3459 level->android_clone_time = lev->android_clone_time;
3460 level->ball_random = lev->ball_random;
3461 level->ball_state_initial = lev->ball_state_initial;
3462 level->ball_time = lev->ball_time;
3463 level->num_ball_contents = lev->num_ball_arrays;
3465 level->lenses_score = lev->lenses_score;
3466 level->magnify_score = lev->magnify_score;
3467 level->slurp_score = lev->slurp_score;
3469 level->lenses_time = lev->lenses_time;
3470 level->magnify_time = lev->magnify_time;
3472 level->wind_direction_initial =
3473 map_direction_EM_to_RND(lev->wind_direction_initial);
3475 for (i = 0; i < MAX_ELEMENT_CONTENTS; i++)
3476 for (j = 0; j < 8; j++)
3477 level->ball_content[i].e[ball_xy[j][0]][ball_xy[j][1]] =
3478 map_element_EM_to_RND(lev->ball_array[i][j]);
3480 map_android_clone_elements_EM_to_RND(level);
3482 /* convert the playfield (some elements need special treatment) */
3483 for (y = 0; y < level->fieldy; y++) for (x = 0; x < level->fieldx; x++)
3485 int new_element = map_element_EM_to_RND(level_em->cave[x + 1][y + 1]);
3487 if (new_element == EL_AMOEBA_WET && level->amoeba_speed == 0)
3488 new_element = EL_AMOEBA_DEAD;
3490 level->field[x][y] = new_element;
3493 for (i = 0; i < MAX_PLAYERS; i++)
3495 /* in case of all players set to the same field, use the first player */
3496 int nr = MAX_PLAYERS - i - 1;
3497 int jx = ply[nr]->x_initial - 1;
3498 int jy = ply[nr]->y_initial - 1;
3500 if (jx != -1 && jy != -1)
3501 level->field[jx][jy] = EL_PLAYER_1 + nr;
3506 /* ------------------------------------------------------------------------- */
3507 /* functions for loading SP level */
3508 /* ------------------------------------------------------------------------- */
3510 void CopyNativeLevel_RND_to_SP(struct LevelInfo *level)
3512 struct LevelInfo_SP *level_sp = level->native_sp_level;
3513 LevelInfoType *header = &level_sp->header;
3516 level_sp->width = level->fieldx;
3517 level_sp->height = level->fieldy;
3519 for (x = 0; x < level->fieldx; x++)
3520 for (y = 0; y < level->fieldy; y++)
3521 level_sp->playfield[x][y] = map_element_RND_to_SP(level->field[x][y]);
3523 header->InitialGravity = (level->initial_player_gravity[0] ? 1 : 0);
3525 for (i = 0; i < SP_LEVEL_NAME_LEN; i++)
3526 header->LevelTitle[i] = level->name[i];
3527 /* !!! NO STRING TERMINATION IN SUPAPLEX VB CODE YET -- FIX THIS !!! */
3529 header->InfotronsNeeded = level->gems_needed;
3531 header->SpecialPortCount = 0;
3533 for (x = 0; x < level->fieldx; x++) for (y = 0; y < level->fieldy; y++)
3535 boolean gravity_port_found = FALSE;
3536 boolean gravity_port_valid = FALSE;
3537 int gravity_port_flag;
3538 int gravity_port_base_element;
3539 int element = level->field[x][y];
3541 if (element >= EL_SP_GRAVITY_ON_PORT_RIGHT &&
3542 element <= EL_SP_GRAVITY_ON_PORT_UP)
3544 gravity_port_found = TRUE;
3545 gravity_port_valid = TRUE;
3546 gravity_port_flag = 1;
3547 gravity_port_base_element = EL_SP_GRAVITY_ON_PORT_RIGHT;
3549 else if (element >= EL_SP_GRAVITY_OFF_PORT_RIGHT &&
3550 element <= EL_SP_GRAVITY_OFF_PORT_UP)
3552 gravity_port_found = TRUE;
3553 gravity_port_valid = TRUE;
3554 gravity_port_flag = 0;
3555 gravity_port_base_element = EL_SP_GRAVITY_OFF_PORT_RIGHT;
3557 else if (element >= EL_SP_GRAVITY_PORT_RIGHT &&
3558 element <= EL_SP_GRAVITY_PORT_UP)
3560 /* change R'n'D style gravity inverting special port to normal port
3561 (there are no gravity inverting ports in native Supaplex engine) */
3563 gravity_port_found = TRUE;
3564 gravity_port_valid = FALSE;
3565 gravity_port_base_element = EL_SP_GRAVITY_PORT_RIGHT;
3568 if (gravity_port_found)
3570 if (gravity_port_valid &&
3571 header->SpecialPortCount < SP_MAX_SPECIAL_PORTS)
3573 SpecialPortType *port = &header->SpecialPort[header->SpecialPortCount];
3575 port->PortLocation = (y * level->fieldx + x) * 2;
3576 port->Gravity = gravity_port_flag;
3578 element += EL_SP_GRAVITY_PORT_RIGHT - gravity_port_base_element;
3580 header->SpecialPortCount++;
3584 /* change special gravity port to normal port */
3586 element += EL_SP_PORT_RIGHT - gravity_port_base_element;
3589 level_sp->playfield[x][y] = element - EL_SP_START;
3594 void CopyNativeLevel_SP_to_RND(struct LevelInfo *level)
3596 struct LevelInfo_SP *level_sp = level->native_sp_level;
3597 LevelInfoType *header = &level_sp->header;
3600 level->fieldx = level_sp->width;
3601 level->fieldy = level_sp->height;
3603 for (x = 0; x < level->fieldx; x++)
3605 for (y = 0; y < level->fieldy; y++)
3607 int element_old = level_sp->playfield[x][y];
3608 int element_new = getMappedElement(map_element_SP_to_RND(element_old));
3610 if (element_new == EL_UNKNOWN)
3611 Error(ERR_WARN, "invalid element %d at position %d, %d",
3614 level->field[x][y] = element_new;
3618 for (i = 0; i < MAX_PLAYERS; i++)
3619 level->initial_player_gravity[i] =
3620 (header->InitialGravity == 1 ? TRUE : FALSE);
3622 for (i = 0; i < SP_LEVEL_NAME_LEN; i++)
3623 level->name[i] = header->LevelTitle[i];
3624 level->name[SP_LEVEL_NAME_LEN] = '\0';
3626 level->gems_needed = header->InfotronsNeeded;
3628 for (i = 0; i < header->SpecialPortCount; i++)
3630 SpecialPortType *port = &header->SpecialPort[i];
3631 int port_location = port->PortLocation;
3632 int gravity = port->Gravity;
3633 int port_x, port_y, port_element;
3635 port_x = (port_location / 2) % level->fieldx;
3636 port_y = (port_location / 2) / level->fieldx;
3638 if (port_x < 0 || port_x >= level->fieldx ||
3639 port_y < 0 || port_y >= level->fieldy)
3641 Error(ERR_WARN, "special port position (%d, %d) out of bounds",
3647 port_element = level->field[port_x][port_y];
3649 if (port_element < EL_SP_GRAVITY_PORT_RIGHT ||
3650 port_element > EL_SP_GRAVITY_PORT_UP)
3652 Error(ERR_WARN, "no special port at position (%d, %d)", port_x, port_y);
3657 /* change previous (wrong) gravity inverting special port to either
3658 gravity enabling special port or gravity disabling special port */
3659 level->field[port_x][port_y] +=
3660 (gravity == 1 ? EL_SP_GRAVITY_ON_PORT_RIGHT :
3661 EL_SP_GRAVITY_OFF_PORT_RIGHT) - EL_SP_GRAVITY_PORT_RIGHT;
3664 /* change special gravity ports without database entries to normal ports */
3665 for (x = 0; x < level->fieldx; x++)
3666 for (y = 0; y < level->fieldy; y++)
3667 if (level->field[x][y] >= EL_SP_GRAVITY_PORT_RIGHT &&
3668 level->field[x][y] <= EL_SP_GRAVITY_PORT_UP)
3669 level->field[x][y] += EL_SP_PORT_RIGHT - EL_SP_GRAVITY_PORT_RIGHT;
3671 level->time = 0; /* no time limit */
3672 level->amoeba_speed = 0;
3673 level->time_magic_wall = 0;
3674 level->time_wheel = 0;
3675 level->amoeba_content = EL_EMPTY;
3678 /* original Supaplex does not use score values -- use default values */
3680 for (i = 0; i < LEVEL_SCORE_ELEMENTS; i++)
3681 level->score[i] = 0;
3684 /* there are no yamyams in supaplex levels */
3685 for (i = 0; i < level->num_yamyam_contents; i++)
3686 for (x = 0; x < 3; x++)
3687 for (y = 0; y < 3; y++)
3688 level->yamyam_content[i].e[x][y] = EL_EMPTY;
3691 static void CopyNativeTape_RND_to_SP(struct LevelInfo *level)
3693 struct LevelInfo_SP *level_sp = level->native_sp_level;
3694 struct DemoInfo_SP *demo = &level_sp->demo;
3697 /* always start with reliable default values */
3698 demo->is_available = FALSE;
3701 if (TAPE_IS_EMPTY(tape))
3704 demo->level_nr = tape.level_nr; /* (currently not used) */
3706 level_sp->header.DemoRandomSeed = tape.random_seed;
3709 for (i = 0; i < tape.length; i++)
3711 int demo_action = map_key_RND_to_SP(tape.pos[i].action[0]);
3712 int demo_repeat = tape.pos[i].delay;
3714 for (j = 0; j < demo_repeat / 16; j++)
3715 demo->data[demo->length++] = 0xf0 | demo_action;
3717 if (demo_repeat % 16)
3718 demo->data[demo->length++] = ((demo_repeat % 16 - 1) << 4) | demo_action;
3721 demo->data[demo->length++] = 0xff;
3723 demo->is_available = TRUE;
3726 static void setTapeInfoToDefaults();
3728 static void CopyNativeTape_SP_to_RND(struct LevelInfo *level)
3730 struct LevelInfo_SP *level_sp = level->native_sp_level;
3731 struct DemoInfo_SP *demo = &level_sp->demo;
3732 char *filename = level->file_info.filename;
3735 /* always start with reliable default values */
3736 setTapeInfoToDefaults();
3738 if (!demo->is_available)
3741 tape.level_nr = demo->level_nr; /* (currently not used) */
3742 tape.length = demo->length - 1; /* without "end of demo" byte */
3743 tape.random_seed = level_sp->header.DemoRandomSeed;
3745 TapeSetDateFromEpochSeconds(getFileTimestampEpochSeconds(filename));
3747 for (i = 0; i < demo->length - 1; i++)
3749 int demo_action = demo->data[i] & 0x0f;
3750 int demo_repeat = (demo->data[i] & 0xf0) >> 4;
3752 tape.pos[i].action[0] = map_key_SP_to_RND(demo_action);
3753 tape.pos[i].delay = demo_repeat + 1;
3756 tape.length_frames = GetTapeLengthFrames();
3757 tape.length_seconds = GetTapeLengthSeconds();
3761 /* ------------------------------------------------------------------------- */
3762 /* functions for loading DC level */
3763 /* ------------------------------------------------------------------------- */
3765 #define DC_LEVEL_HEADER_SIZE 344
3767 unsigned short getDecodedWord_DC(unsigned short data_encoded, boolean init)
3769 static int last_data_encoded;
3773 int diff_hi, diff_lo;
3774 int data_hi, data_lo;
3775 unsigned short data_decoded;
3779 last_data_encoded = 0;
3786 diff = data_encoded - last_data_encoded;
3787 diff_hi = diff & ~0xff;
3788 diff_lo = diff & 0xff;
3792 data_hi = diff_hi - (offset1 << 8) + (offset2 & 0xff00);
3793 data_lo = (diff_lo + (data_hi >> 16)) & 0x00ff;
3794 data_hi = data_hi & 0xff00;
3796 data_decoded = data_hi | data_lo;
3798 last_data_encoded = data_encoded;
3800 offset1 = (offset1 + 1) % 31;
3801 offset2 = offset2 & 0xff;
3803 return data_decoded;
3806 int getMappedElement_DC(int element)
3814 /* 0x0117 - 0x036e: (?) */
3817 /* 0x042d - 0x0684: (?) */
3833 element = EL_CRYSTAL;
3836 case 0x0e77: /* quicksand (boulder) */
3837 element = EL_QUICKSAND_FAST_FULL;
3840 case 0x0e99: /* slow quicksand (boulder) */
3841 element = EL_QUICKSAND_FULL;
3845 element = EL_EM_EXIT_OPEN;
3849 element = EL_EM_EXIT_CLOSED;
3853 element = EL_EM_STEEL_EXIT_OPEN;
3857 element = EL_EM_STEEL_EXIT_CLOSED;
3860 case 0x0f4f: /* dynamite (lit 1) */
3861 element = EL_EM_DYNAMITE_ACTIVE;
3864 case 0x0f57: /* dynamite (lit 2) */
3865 element = EL_EM_DYNAMITE_ACTIVE;
3868 case 0x0f5f: /* dynamite (lit 3) */
3869 element = EL_EM_DYNAMITE_ACTIVE;
3872 case 0x0f67: /* dynamite (lit 4) */
3873 element = EL_EM_DYNAMITE_ACTIVE;
3880 element = EL_AMOEBA_WET;
3884 element = EL_AMOEBA_DROP;
3888 element = EL_DC_MAGIC_WALL;
3892 element = EL_SPACESHIP_UP;
3896 element = EL_SPACESHIP_DOWN;
3900 element = EL_SPACESHIP_LEFT;
3904 element = EL_SPACESHIP_RIGHT;
3908 element = EL_BUG_UP;
3912 element = EL_BUG_DOWN;
3916 element = EL_BUG_LEFT;
3920 element = EL_BUG_RIGHT;
3924 element = EL_MOLE_UP;
3928 element = EL_MOLE_DOWN;
3932 element = EL_MOLE_LEFT;
3936 element = EL_MOLE_RIGHT;
3944 element = EL_YAMYAM;
3948 element = EL_SWITCHGATE_OPEN;
3952 element = EL_SWITCHGATE_CLOSED;
3956 element = EL_DC_SWITCHGATE_SWITCH_UP;
3960 element = EL_TIMEGATE_CLOSED;
3963 case 0x144c: /* conveyor belt switch (green) */
3964 element = EL_CONVEYOR_BELT_3_SWITCH_MIDDLE;
3967 case 0x144f: /* conveyor belt switch (red) */
3968 element = EL_CONVEYOR_BELT_1_SWITCH_MIDDLE;
3971 case 0x1452: /* conveyor belt switch (blue) */
3972 element = EL_CONVEYOR_BELT_4_SWITCH_MIDDLE;
3976 element = EL_CONVEYOR_BELT_3_MIDDLE;
3980 element = EL_CONVEYOR_BELT_3_LEFT;
3984 element = EL_CONVEYOR_BELT_3_RIGHT;
3988 element = EL_CONVEYOR_BELT_1_MIDDLE;
3992 element = EL_CONVEYOR_BELT_1_LEFT;
3996 element = EL_CONVEYOR_BELT_1_RIGHT;
4000 element = EL_CONVEYOR_BELT_4_MIDDLE;
4004 element = EL_CONVEYOR_BELT_4_LEFT;
4008 element = EL_CONVEYOR_BELT_4_RIGHT;
4012 element = EL_EXPANDABLE_WALL_HORIZONTAL;
4016 element = EL_EXPANDABLE_WALL_VERTICAL;
4020 element = EL_EXPANDABLE_WALL_ANY;
4023 case 0x14ce: /* growing steel wall (left/right) */
4024 element = EL_EXPANDABLE_STEELWALL_HORIZONTAL;
4027 case 0x14df: /* growing steel wall (up/down) */
4028 element = EL_EXPANDABLE_STEELWALL_VERTICAL;
4031 case 0x14e8: /* growing steel wall (up/down/left/right) */
4032 element = EL_EXPANDABLE_STEELWALL_ANY;
4036 element = EL_SHIELD_DEADLY;
4040 element = EL_EXTRA_TIME;
4048 element = EL_EMPTY_SPACE;
4051 case 0x1578: /* quicksand (empty) */
4052 element = EL_QUICKSAND_FAST_EMPTY;
4055 case 0x1579: /* slow quicksand (empty) */
4056 element = EL_QUICKSAND_EMPTY;
4059 /* 0x157c - 0x158b: */
4062 /* 0x1590 - 0x159f: */
4063 /* EL_DC_LANDMINE */
4066 element = EL_EM_DYNAMITE;
4069 case 0x15a1: /* key (red) */
4070 element = EL_EM_KEY_1;
4073 case 0x15a2: /* key (yellow) */
4074 element = EL_EM_KEY_2;
4077 case 0x15a3: /* key (blue) */
4078 element = EL_EM_KEY_4;
4081 case 0x15a4: /* key (green) */
4082 element = EL_EM_KEY_3;
4085 case 0x15a5: /* key (white) */
4086 element = EL_DC_KEY_WHITE;
4090 element = EL_WALL_SLIPPERY;
4097 case 0x15a8: /* wall (not round) */
4101 case 0x15a9: /* (blue) */
4102 element = EL_CHAR_A;
4105 case 0x15aa: /* (blue) */
4106 element = EL_CHAR_B;
4109 case 0x15ab: /* (blue) */
4110 element = EL_CHAR_C;
4113 case 0x15ac: /* (blue) */
4114 element = EL_CHAR_D;
4117 case 0x15ad: /* (blue) */
4118 element = EL_CHAR_E;
4121 case 0x15ae: /* (blue) */
4122 element = EL_CHAR_F;
4125 case 0x15af: /* (blue) */
4126 element = EL_CHAR_G;
4129 case 0x15b0: /* (blue) */
4130 element = EL_CHAR_H;
4133 case 0x15b1: /* (blue) */
4134 element = EL_CHAR_I;
4137 case 0x15b2: /* (blue) */
4138 element = EL_CHAR_J;
4141 case 0x15b3: /* (blue) */
4142 element = EL_CHAR_K;
4145 case 0x15b4: /* (blue) */
4146 element = EL_CHAR_L;
4149 case 0x15b5: /* (blue) */
4150 element = EL_CHAR_M;
4153 case 0x15b6: /* (blue) */
4154 element = EL_CHAR_N;
4157 case 0x15b7: /* (blue) */
4158 element = EL_CHAR_O;
4161 case 0x15b8: /* (blue) */
4162 element = EL_CHAR_P;
4165 case 0x15b9: /* (blue) */
4166 element = EL_CHAR_Q;
4169 case 0x15ba: /* (blue) */
4170 element = EL_CHAR_R;
4173 case 0x15bb: /* (blue) */
4174 element = EL_CHAR_S;
4177 case 0x15bc: /* (blue) */
4178 element = EL_CHAR_T;
4181 case 0x15bd: /* (blue) */
4182 element = EL_CHAR_U;
4185 case 0x15be: /* (blue) */
4186 element = EL_CHAR_V;
4189 case 0x15bf: /* (blue) */
4190 element = EL_CHAR_W;
4193 case 0x15c0: /* (blue) */
4194 element = EL_CHAR_X;
4197 case 0x15c1: /* (blue) */
4198 element = EL_CHAR_Y;
4201 case 0x15c2: /* (blue) */
4202 element = EL_CHAR_Z;
4205 case 0x15c3: /* (blue) */
4206 element = EL_CHAR_AUMLAUT;
4209 case 0x15c4: /* (blue) */
4210 element = EL_CHAR_OUMLAUT;
4213 case 0x15c5: /* (blue) */
4214 element = EL_CHAR_UUMLAUT;
4217 case 0x15c6: /* (blue) */
4218 element = EL_CHAR_0;
4221 case 0x15c7: /* (blue) */
4222 element = EL_CHAR_1;
4225 case 0x15c8: /* (blue) */
4226 element = EL_CHAR_2;
4229 case 0x15c9: /* (blue) */
4230 element = EL_CHAR_3;
4233 case 0x15ca: /* (blue) */
4234 element = EL_CHAR_4;
4237 case 0x15cb: /* (blue) */
4238 element = EL_CHAR_5;
4241 case 0x15cc: /* (blue) */
4242 element = EL_CHAR_6;
4245 case 0x15cd: /* (blue) */
4246 element = EL_CHAR_7;
4249 case 0x15ce: /* (blue) */
4250 element = EL_CHAR_8;
4253 case 0x15cf: /* (blue) */
4254 element = EL_CHAR_9;
4257 case 0x15d0: /* (blue) */
4258 element = EL_CHAR_PERIOD;
4261 case 0x15d1: /* (blue) */
4262 element = EL_CHAR_EXCLAM;
4265 case 0x15d2: /* (blue) */
4266 element = EL_CHAR_COLON;
4269 case 0x15d3: /* (blue) */
4270 element = EL_CHAR_LESS;
4273 case 0x15d4: /* (blue) */
4274 element = EL_CHAR_GREATER;
4277 case 0x15d5: /* (blue) */
4278 element = EL_CHAR_QUESTION;
4281 case 0x15d6: /* (blue) */
4282 element = EL_CHAR_COPYRIGHT;
4285 case 0x15d7: /* (blue) */
4286 element = EL_CHAR_UP;
4289 case 0x15d8: /* (blue) */
4290 element = EL_CHAR_DOWN;
4293 case 0x15d9: /* (blue) */
4294 element = EL_CHAR_BUTTON;
4297 case 0x15da: /* (blue) */
4298 element = EL_CHAR_PLUS;
4301 case 0x15db: /* (blue) */
4302 element = EL_CHAR_MINUS;
4305 case 0x15dc: /* (blue) */
4306 element = EL_CHAR_APOSTROPHE;
4309 case 0x15dd: /* (blue) */
4310 element = EL_CHAR_PARENLEFT;
4313 case 0x15de: /* (blue) */
4314 element = EL_CHAR_PARENRIGHT;
4317 case 0x15df: /* (green) */
4318 element = EL_CHAR_A;
4321 case 0x15e0: /* (green) */
4322 element = EL_CHAR_B;
4325 case 0x15e1: /* (green) */
4326 element = EL_CHAR_C;
4329 case 0x15e2: /* (green) */
4330 element = EL_CHAR_D;
4333 case 0x15e3: /* (green) */
4334 element = EL_CHAR_E;
4337 case 0x15e4: /* (green) */
4338 element = EL_CHAR_F;
4341 case 0x15e5: /* (green) */
4342 element = EL_CHAR_G;
4345 case 0x15e6: /* (green) */
4346 element = EL_CHAR_H;
4349 case 0x15e7: /* (green) */
4350 element = EL_CHAR_I;
4353 case 0x15e8: /* (green) */
4354 element = EL_CHAR_J;
4357 case 0x15e9: /* (green) */
4358 element = EL_CHAR_K;
4361 case 0x15ea: /* (green) */
4362 element = EL_CHAR_L;
4365 case 0x15eb: /* (green) */
4366 element = EL_CHAR_M;
4369 case 0x15ec: /* (green) */
4370 element = EL_CHAR_N;
4373 case 0x15ed: /* (green) */
4374 element = EL_CHAR_O;
4377 case 0x15ee: /* (green) */
4378 element = EL_CHAR_P;
4381 case 0x15ef: /* (green) */
4382 element = EL_CHAR_Q;
4385 case 0x15f0: /* (green) */
4386 element = EL_CHAR_R;
4389 case 0x15f1: /* (green) */
4390 element = EL_CHAR_S;
4393 case 0x15f2: /* (green) */
4394 element = EL_CHAR_T;
4397 case 0x15f3: /* (green) */
4398 element = EL_CHAR_U;
4401 case 0x15f4: /* (green) */
4402 element = EL_CHAR_V;
4405 case 0x15f5: /* (green) */
4406 element = EL_CHAR_W;
4409 case 0x15f6: /* (green) */
4410 element = EL_CHAR_X;
4413 case 0x15f7: /* (green) */
4414 element = EL_CHAR_Y;
4417 case 0x15f8: /* (green) */
4418 element = EL_CHAR_Z;
4421 case 0x15f9: /* (green) */
4422 element = EL_CHAR_AUMLAUT;
4425 case 0x15fa: /* (green) */
4426 element = EL_CHAR_OUMLAUT;
4429 case 0x15fb: /* (green) */
4430 element = EL_CHAR_UUMLAUT;
4433 case 0x15fc: /* (green) */
4434 element = EL_CHAR_0;
4437 case 0x15fd: /* (green) */
4438 element = EL_CHAR_1;
4441 case 0x15fe: /* (green) */
4442 element = EL_CHAR_2;
4445 case 0x15ff: /* (green) */
4446 element = EL_CHAR_3;
4449 case 0x1600: /* (green) */
4450 element = EL_CHAR_4;
4453 case 0x1601: /* (green) */
4454 element = EL_CHAR_5;
4457 case 0x1602: /* (green) */
4458 element = EL_CHAR_6;
4461 case 0x1603: /* (green) */
4462 element = EL_CHAR_7;
4465 case 0x1604: /* (green) */
4466 element = EL_CHAR_8;
4469 case 0x1605: /* (green) */
4470 element = EL_CHAR_9;
4473 case 0x1606: /* (green) */
4474 element = EL_CHAR_PERIOD;
4477 case 0x1607: /* (green) */
4478 element = EL_CHAR_EXCLAM;
4481 case 0x1608: /* (green) */
4482 element = EL_CHAR_COLON;
4485 case 0x1609: /* (green) */
4486 element = EL_CHAR_LESS;
4489 case 0x160a: /* (green) */
4490 element = EL_CHAR_GREATER;
4493 case 0x160b: /* (green) */
4494 element = EL_CHAR_QUESTION;
4497 case 0x160c: /* (green) */
4498 element = EL_CHAR_COPYRIGHT;
4501 case 0x160d: /* (green) */
4502 element = EL_CHAR_UP;
4505 case 0x160e: /* (green) */
4506 element = EL_CHAR_DOWN;
4509 case 0x160f: /* (green) */
4510 element = EL_CHAR_BUTTON;
4513 case 0x1610: /* (green) */
4514 element = EL_CHAR_PLUS;
4517 case 0x1611: /* (green) */
4518 element = EL_CHAR_MINUS;
4521 case 0x1612: /* (green) */
4522 element = EL_CHAR_APOSTROPHE;
4525 case 0x1613: /* (green) */
4526 element = EL_CHAR_PARENLEFT;
4529 case 0x1614: /* (green) */
4530 element = EL_CHAR_PARENRIGHT;
4533 case 0x1615: /* (blue steel) */
4534 element = EL_STEEL_CHAR_A;
4537 case 0x1616: /* (blue steel) */
4538 element = EL_STEEL_CHAR_B;
4541 case 0x1617: /* (blue steel) */
4542 element = EL_STEEL_CHAR_C;
4545 case 0x1618: /* (blue steel) */
4546 element = EL_STEEL_CHAR_D;
4549 case 0x1619: /* (blue steel) */
4550 element = EL_STEEL_CHAR_E;
4553 case 0x161a: /* (blue steel) */
4554 element = EL_STEEL_CHAR_F;
4557 case 0x161b: /* (blue steel) */
4558 element = EL_STEEL_CHAR_G;
4561 case 0x161c: /* (blue steel) */
4562 element = EL_STEEL_CHAR_H;
4565 case 0x161d: /* (blue steel) */
4566 element = EL_STEEL_CHAR_I;
4569 case 0x161e: /* (blue steel) */
4570 element = EL_STEEL_CHAR_J;
4573 case 0x161f: /* (blue steel) */
4574 element = EL_STEEL_CHAR_K;
4577 case 0x1620: /* (blue steel) */
4578 element = EL_STEEL_CHAR_L;
4581 case 0x1621: /* (blue steel) */
4582 element = EL_STEEL_CHAR_M;
4585 case 0x1622: /* (blue steel) */
4586 element = EL_STEEL_CHAR_N;
4589 case 0x1623: /* (blue steel) */
4590 element = EL_STEEL_CHAR_O;
4593 case 0x1624: /* (blue steel) */
4594 element = EL_STEEL_CHAR_P;
4597 case 0x1625: /* (blue steel) */
4598 element = EL_STEEL_CHAR_Q;
4601 case 0x1626: /* (blue steel) */
4602 element = EL_STEEL_CHAR_R;
4605 case 0x1627: /* (blue steel) */
4606 element = EL_STEEL_CHAR_S;
4609 case 0x1628: /* (blue steel) */
4610 element = EL_STEEL_CHAR_T;
4613 case 0x1629: /* (blue steel) */
4614 element = EL_STEEL_CHAR_U;
4617 case 0x162a: /* (blue steel) */
4618 element = EL_STEEL_CHAR_V;
4621 case 0x162b: /* (blue steel) */
4622 element = EL_STEEL_CHAR_W;
4625 case 0x162c: /* (blue steel) */
4626 element = EL_STEEL_CHAR_X;
4629 case 0x162d: /* (blue steel) */
4630 element = EL_STEEL_CHAR_Y;
4633 case 0x162e: /* (blue steel) */
4634 element = EL_STEEL_CHAR_Z;
4637 case 0x162f: /* (blue steel) */
4638 element = EL_STEEL_CHAR_AUMLAUT;
4641 case 0x1630: /* (blue steel) */
4642 element = EL_STEEL_CHAR_OUMLAUT;
4645 case 0x1631: /* (blue steel) */
4646 element = EL_STEEL_CHAR_UUMLAUT;
4649 case 0x1632: /* (blue steel) */
4650 element = EL_STEEL_CHAR_0;
4653 case 0x1633: /* (blue steel) */
4654 element = EL_STEEL_CHAR_1;
4657 case 0x1634: /* (blue steel) */
4658 element = EL_STEEL_CHAR_2;
4661 case 0x1635: /* (blue steel) */
4662 element = EL_STEEL_CHAR_3;
4665 case 0x1636: /* (blue steel) */
4666 element = EL_STEEL_CHAR_4;
4669 case 0x1637: /* (blue steel) */
4670 element = EL_STEEL_CHAR_5;
4673 case 0x1638: /* (blue steel) */
4674 element = EL_STEEL_CHAR_6;
4677 case 0x1639: /* (blue steel) */
4678 element = EL_STEEL_CHAR_7;
4681 case 0x163a: /* (blue steel) */
4682 element = EL_STEEL_CHAR_8;
4685 case 0x163b: /* (blue steel) */
4686 element = EL_STEEL_CHAR_9;
4689 case 0x163c: /* (blue steel) */
4690 element = EL_STEEL_CHAR_PERIOD;
4693 case 0x163d: /* (blue steel) */
4694 element = EL_STEEL_CHAR_EXCLAM;
4697 case 0x163e: /* (blue steel) */
4698 element = EL_STEEL_CHAR_COLON;
4701 case 0x163f: /* (blue steel) */
4702 element = EL_STEEL_CHAR_LESS;
4705 case 0x1640: /* (blue steel) */
4706 element = EL_STEEL_CHAR_GREATER;
4709 case 0x1641: /* (blue steel) */
4710 element = EL_STEEL_CHAR_QUESTION;
4713 case 0x1642: /* (blue steel) */
4714 element = EL_STEEL_CHAR_COPYRIGHT;
4717 case 0x1643: /* (blue steel) */
4718 element = EL_STEEL_CHAR_UP;
4721 case 0x1644: /* (blue steel) */
4722 element = EL_STEEL_CHAR_DOWN;
4725 case 0x1645: /* (blue steel) */
4726 element = EL_STEEL_CHAR_BUTTON;
4729 case 0x1646: /* (blue steel) */
4730 element = EL_STEEL_CHAR_PLUS;
4733 case 0x1647: /* (blue steel) */
4734 element = EL_STEEL_CHAR_MINUS;
4737 case 0x1648: /* (blue steel) */
4738 element = EL_STEEL_CHAR_APOSTROPHE;
4741 case 0x1649: /* (blue steel) */
4742 element = EL_STEEL_CHAR_PARENLEFT;
4745 case 0x164a: /* (blue steel) */
4746 element = EL_STEEL_CHAR_PARENRIGHT;
4749 case 0x164b: /* (green steel) */
4750 element = EL_STEEL_CHAR_A;
4753 case 0x164c: /* (green steel) */
4754 element = EL_STEEL_CHAR_B;
4757 case 0x164d: /* (green steel) */
4758 element = EL_STEEL_CHAR_C;
4761 case 0x164e: /* (green steel) */
4762 element = EL_STEEL_CHAR_D;
4765 case 0x164f: /* (green steel) */
4766 element = EL_STEEL_CHAR_E;
4769 case 0x1650: /* (green steel) */
4770 element = EL_STEEL_CHAR_F;
4773 case 0x1651: /* (green steel) */
4774 element = EL_STEEL_CHAR_G;
4777 case 0x1652: /* (green steel) */
4778 element = EL_STEEL_CHAR_H;
4781 case 0x1653: /* (green steel) */
4782 element = EL_STEEL_CHAR_I;
4785 case 0x1654: /* (green steel) */
4786 element = EL_STEEL_CHAR_J;
4789 case 0x1655: /* (green steel) */
4790 element = EL_STEEL_CHAR_K;
4793 case 0x1656: /* (green steel) */
4794 element = EL_STEEL_CHAR_L;
4797 case 0x1657: /* (green steel) */
4798 element = EL_STEEL_CHAR_M;
4801 case 0x1658: /* (green steel) */
4802 element = EL_STEEL_CHAR_N;
4805 case 0x1659: /* (green steel) */
4806 element = EL_STEEL_CHAR_O;
4809 case 0x165a: /* (green steel) */
4810 element = EL_STEEL_CHAR_P;
4813 case 0x165b: /* (green steel) */
4814 element = EL_STEEL_CHAR_Q;
4817 case 0x165c: /* (green steel) */
4818 element = EL_STEEL_CHAR_R;
4821 case 0x165d: /* (green steel) */
4822 element = EL_STEEL_CHAR_S;
4825 case 0x165e: /* (green steel) */
4826 element = EL_STEEL_CHAR_T;
4829 case 0x165f: /* (green steel) */
4830 element = EL_STEEL_CHAR_U;
4833 case 0x1660: /* (green steel) */
4834 element = EL_STEEL_CHAR_V;
4837 case 0x1661: /* (green steel) */
4838 element = EL_STEEL_CHAR_W;
4841 case 0x1662: /* (green steel) */
4842 element = EL_STEEL_CHAR_X;
4845 case 0x1663: /* (green steel) */
4846 element = EL_STEEL_CHAR_Y;
4849 case 0x1664: /* (green steel) */
4850 element = EL_STEEL_CHAR_Z;
4853 case 0x1665: /* (green steel) */
4854 element = EL_STEEL_CHAR_AUMLAUT;
4857 case 0x1666: /* (green steel) */
4858 element = EL_STEEL_CHAR_OUMLAUT;
4861 case 0x1667: /* (green steel) */
4862 element = EL_STEEL_CHAR_UUMLAUT;
4865 case 0x1668: /* (green steel) */
4866 element = EL_STEEL_CHAR_0;
4869 case 0x1669: /* (green steel) */
4870 element = EL_STEEL_CHAR_1;
4873 case 0x166a: /* (green steel) */
4874 element = EL_STEEL_CHAR_2;
4877 case 0x166b: /* (green steel) */
4878 element = EL_STEEL_CHAR_3;
4881 case 0x166c: /* (green steel) */
4882 element = EL_STEEL_CHAR_4;
4885 case 0x166d: /* (green steel) */
4886 element = EL_STEEL_CHAR_5;
4889 case 0x166e: /* (green steel) */
4890 element = EL_STEEL_CHAR_6;
4893 case 0x166f: /* (green steel) */
4894 element = EL_STEEL_CHAR_7;
4897 case 0x1670: /* (green steel) */
4898 element = EL_STEEL_CHAR_8;
4901 case 0x1671: /* (green steel) */
4902 element = EL_STEEL_CHAR_9;
4905 case 0x1672: /* (green steel) */
4906 element = EL_STEEL_CHAR_PERIOD;
4909 case 0x1673: /* (green steel) */
4910 element = EL_STEEL_CHAR_EXCLAM;
4913 case 0x1674: /* (green steel) */
4914 element = EL_STEEL_CHAR_COLON;
4917 case 0x1675: /* (green steel) */
4918 element = EL_STEEL_CHAR_LESS;
4921 case 0x1676: /* (green steel) */
4922 element = EL_STEEL_CHAR_GREATER;
4925 case 0x1677: /* (green steel) */
4926 element = EL_STEEL_CHAR_QUESTION;
4929 case 0x1678: /* (green steel) */
4930 element = EL_STEEL_CHAR_COPYRIGHT;
4933 case 0x1679: /* (green steel) */
4934 element = EL_STEEL_CHAR_UP;
4937 case 0x167a: /* (green steel) */
4938 element = EL_STEEL_CHAR_DOWN;
4941 case 0x167b: /* (green steel) */
4942 element = EL_STEEL_CHAR_BUTTON;
4945 case 0x167c: /* (green steel) */
4946 element = EL_STEEL_CHAR_PLUS;
4949 case 0x167d: /* (green steel) */
4950 element = EL_STEEL_CHAR_MINUS;
4953 case 0x167e: /* (green steel) */
4954 element = EL_STEEL_CHAR_APOSTROPHE;
4957 case 0x167f: /* (green steel) */
4958 element = EL_STEEL_CHAR_PARENLEFT;
4961 case 0x1680: /* (green steel) */
4962 element = EL_STEEL_CHAR_PARENRIGHT;
4965 case 0x1681: /* gate (red) */
4966 element = EL_EM_GATE_1;
4969 case 0x1682: /* secret gate (red) */
4970 element = EL_GATE_1_GRAY;
4973 case 0x1683: /* gate (yellow) */
4974 element = EL_EM_GATE_2;
4977 case 0x1684: /* secret gate (yellow) */
4978 element = EL_GATE_2_GRAY;
4981 case 0x1685: /* gate (blue) */
4982 element = EL_EM_GATE_4;
4985 case 0x1686: /* secret gate (blue) */
4986 element = EL_GATE_4_GRAY;
4989 case 0x1687: /* gate (green) */
4990 element = EL_EM_GATE_3;
4993 case 0x1688: /* secret gate (green) */
4994 element = EL_GATE_3_GRAY;
4997 case 0x1689: /* gate (white) */
4998 element = EL_DC_GATE_WHITE;
5001 case 0x168a: /* secret gate (white) */
5002 element = EL_DC_GATE_WHITE_GRAY;
5005 case 0x168b: /* secret gate (no key) */
5006 element = EL_DC_GATE_FAKE_GRAY;
5010 element = EL_ROBOT_WHEEL;
5014 element = EL_DC_TIMEGATE_SWITCH;
5018 element = EL_ACID_POOL_BOTTOM;
5022 element = EL_ACID_POOL_TOPLEFT;
5026 element = EL_ACID_POOL_TOPRIGHT;
5030 element = EL_ACID_POOL_BOTTOMLEFT;
5034 element = EL_ACID_POOL_BOTTOMRIGHT;
5038 element = EL_STEELWALL;
5042 element = EL_STEELWALL_SLIPPERY;
5045 case 0x1695: /* steel wall (not round) */
5046 element = EL_STEELWALL;
5049 case 0x1696: /* steel wall (left) */
5050 element = EL_DC_STEELWALL_1_LEFT;
5053 case 0x1697: /* steel wall (bottom) */
5054 element = EL_DC_STEELWALL_1_BOTTOM;
5057 case 0x1698: /* steel wall (right) */
5058 element = EL_DC_STEELWALL_1_RIGHT;
5061 case 0x1699: /* steel wall (top) */
5062 element = EL_DC_STEELWALL_1_TOP;
5065 case 0x169a: /* steel wall (left/bottom) */
5066 element = EL_DC_STEELWALL_1_BOTTOMLEFT;
5069 case 0x169b: /* steel wall (right/bottom) */
5070 element = EL_DC_STEELWALL_1_BOTTOMRIGHT;
5073 case 0x169c: /* steel wall (right/top) */
5074 element = EL_DC_STEELWALL_1_TOPRIGHT;
5077 case 0x169d: /* steel wall (left/top) */
5078 element = EL_DC_STEELWALL_1_TOPLEFT;
5081 case 0x169e: /* steel wall (right/bottom small) */
5082 element = EL_DC_STEELWALL_1_BOTTOMRIGHT_2;
5085 case 0x169f: /* steel wall (left/bottom small) */
5086 element = EL_DC_STEELWALL_1_BOTTOMLEFT_2;
5089 case 0x16a0: /* steel wall (right/top small) */
5090 element = EL_DC_STEELWALL_1_TOPRIGHT_2;
5093 case 0x16a1: /* steel wall (left/top small) */
5094 element = EL_DC_STEELWALL_1_TOPLEFT_2;
5097 case 0x16a2: /* steel wall (left/right) */
5098 element = EL_DC_STEELWALL_1_VERTICAL;
5101 case 0x16a3: /* steel wall (top/bottom) */
5102 element = EL_DC_STEELWALL_1_HORIZONTAL;
5105 case 0x16a4: /* steel wall 2 (left end) */
5106 element = EL_DC_STEELWALL_2_LEFT;
5109 case 0x16a5: /* steel wall 2 (right end) */
5110 element = EL_DC_STEELWALL_2_RIGHT;
5113 case 0x16a6: /* steel wall 2 (top end) */
5114 element = EL_DC_STEELWALL_2_TOP;
5117 case 0x16a7: /* steel wall 2 (bottom end) */
5118 element = EL_DC_STEELWALL_2_BOTTOM;
5121 case 0x16a8: /* steel wall 2 (left/right) */
5122 element = EL_DC_STEELWALL_2_HORIZONTAL;
5125 case 0x16a9: /* steel wall 2 (up/down) */
5126 element = EL_DC_STEELWALL_2_VERTICAL;
5129 case 0x16aa: /* steel wall 2 (mid) */
5130 element = EL_DC_STEELWALL_2_MIDDLE;
5134 element = EL_SIGN_EXCLAMATION;
5138 element = EL_SIGN_RADIOACTIVITY;
5142 element = EL_SIGN_STOP;
5146 element = EL_SIGN_WHEELCHAIR;
5150 element = EL_SIGN_PARKING;
5154 element = EL_SIGN_NO_ENTRY;
5158 element = EL_SIGN_HEART;
5162 element = EL_SIGN_GIVE_WAY;
5166 element = EL_SIGN_ENTRY_FORBIDDEN;
5170 element = EL_SIGN_EMERGENCY_EXIT;
5174 element = EL_SIGN_YIN_YANG;
5178 element = EL_WALL_EMERALD;
5182 element = EL_WALL_DIAMOND;
5186 element = EL_WALL_PEARL;
5190 element = EL_WALL_CRYSTAL;
5194 element = EL_INVISIBLE_WALL;
5198 element = EL_INVISIBLE_STEELWALL;
5201 /* 0x16bc - 0x16cb: */
5202 /* EL_INVISIBLE_SAND */
5205 element = EL_LIGHT_SWITCH;
5209 element = EL_ENVELOPE_1;
5213 if (element >= 0x0117 && element <= 0x036e) /* (?) */
5214 element = EL_DIAMOND;
5215 else if (element >= 0x042d && element <= 0x0684) /* (?) */
5216 element = EL_EMERALD;
5217 else if (element >= 0x157c && element <= 0x158b)
5219 else if (element >= 0x1590 && element <= 0x159f)
5220 element = EL_DC_LANDMINE;
5221 else if (element >= 0x16bc && element <= 0x16cb)
5222 element = EL_INVISIBLE_SAND;
5225 Error(ERR_WARN, "unknown Diamond Caves element 0x%04x", element);
5226 element = EL_UNKNOWN;
5231 return getMappedElement(element);
5234 static void LoadLevelFromFileStream_DC(File *file, struct LevelInfo *level,
5237 byte header[DC_LEVEL_HEADER_SIZE];
5239 int envelope_header_pos = 62;
5240 int envelope_content_pos = 94;
5241 int level_name_pos = 251;
5242 int level_author_pos = 292;
5243 int envelope_header_len;
5244 int envelope_content_len;
5246 int level_author_len;
5248 int num_yamyam_contents;
5251 getDecodedWord_DC(0, TRUE); /* initialize DC2 decoding engine */
5253 for (i = 0; i < DC_LEVEL_HEADER_SIZE / 2; i++)
5255 unsigned short header_word = getDecodedWord_DC(getFile16BitBE(file), FALSE);
5257 header[i * 2 + 0] = header_word >> 8;
5258 header[i * 2 + 1] = header_word & 0xff;
5261 /* read some values from level header to check level decoding integrity */
5262 fieldx = header[6] | (header[7] << 8);
5263 fieldy = header[8] | (header[9] << 8);
5264 num_yamyam_contents = header[60] | (header[61] << 8);
5266 /* do some simple sanity checks to ensure that level was correctly decoded */
5267 if (fieldx < 1 || fieldx > 256 ||
5268 fieldy < 1 || fieldy > 256 ||
5269 num_yamyam_contents < 1 || num_yamyam_contents > 8)
5271 level->no_valid_file = TRUE;
5273 Error(ERR_WARN, "cannot decode level from stream -- using empty level");
5278 /* maximum envelope header size is 31 bytes */
5279 envelope_header_len = header[envelope_header_pos];
5280 /* maximum envelope content size is 110 (156?) bytes */
5281 envelope_content_len = header[envelope_content_pos];
5283 /* maximum level title size is 40 bytes */
5284 level_name_len = MIN(header[level_name_pos], MAX_LEVEL_NAME_LEN);
5285 /* maximum level author size is 30 (51?) bytes */
5286 level_author_len = MIN(header[level_author_pos], MAX_LEVEL_AUTHOR_LEN);
5290 for (i = 0; i < envelope_header_len; i++)
5291 if (envelope_size < MAX_ENVELOPE_TEXT_LEN)
5292 level->envelope[0].text[envelope_size++] =
5293 header[envelope_header_pos + 1 + i];
5295 if (envelope_header_len > 0 && envelope_content_len > 0)
5297 if (envelope_size < MAX_ENVELOPE_TEXT_LEN)
5298 level->envelope[0].text[envelope_size++] = '\n';
5299 if (envelope_size < MAX_ENVELOPE_TEXT_LEN)
5300 level->envelope[0].text[envelope_size++] = '\n';
5303 for (i = 0; i < envelope_content_len; i++)
5304 if (envelope_size < MAX_ENVELOPE_TEXT_LEN)
5305 level->envelope[0].text[envelope_size++] =
5306 header[envelope_content_pos + 1 + i];
5308 level->envelope[0].text[envelope_size] = '\0';
5310 level->envelope[0].xsize = MAX_ENVELOPE_XSIZE;
5311 level->envelope[0].ysize = 10;
5312 level->envelope[0].autowrap = TRUE;
5313 level->envelope[0].centered = TRUE;
5315 for (i = 0; i < level_name_len; i++)
5316 level->name[i] = header[level_name_pos + 1 + i];
5317 level->name[level_name_len] = '\0';
5319 for (i = 0; i < level_author_len; i++)
5320 level->author[i] = header[level_author_pos + 1 + i];
5321 level->author[level_author_len] = '\0';
5323 num_yamyam_contents = header[60] | (header[61] << 8);
5324 level->num_yamyam_contents =
5325 MIN(MAX(MIN_ELEMENT_CONTENTS, num_yamyam_contents), MAX_ELEMENT_CONTENTS);
5327 for (i = 0; i < num_yamyam_contents; i++)
5329 for (y = 0; y < 3; y++) for (x = 0; x < 3; x++)
5331 unsigned short word = getDecodedWord_DC(getFile16BitBE(file), FALSE);
5332 int element_dc = ((word & 0xff) << 8) | ((word >> 8) & 0xff);
5334 if (i < MAX_ELEMENT_CONTENTS)
5335 level->yamyam_content[i].e[x][y] = getMappedElement_DC(element_dc);
5339 fieldx = header[6] | (header[7] << 8);
5340 fieldy = header[8] | (header[9] << 8);
5341 level->fieldx = MIN(MAX(MIN_LEV_FIELDX, fieldx), MAX_LEV_FIELDX);
5342 level->fieldy = MIN(MAX(MIN_LEV_FIELDY, fieldy), MAX_LEV_FIELDY);
5344 for (y = 0; y < fieldy; y++) for (x = 0; x < fieldx; x++)
5346 unsigned short word = getDecodedWord_DC(getFile16BitBE(file), FALSE);
5347 int element_dc = ((word & 0xff) << 8) | ((word >> 8) & 0xff);
5349 if (x < MAX_LEV_FIELDX && y < MAX_LEV_FIELDY)
5350 level->field[x][y] = getMappedElement_DC(element_dc);
5353 x = MIN(MAX(0, (header[10] | (header[11] << 8)) - 1), MAX_LEV_FIELDX - 1);
5354 y = MIN(MAX(0, (header[12] | (header[13] << 8)) - 1), MAX_LEV_FIELDY - 1);
5355 level->field[x][y] = EL_PLAYER_1;
5357 x = MIN(MAX(0, (header[14] | (header[15] << 8)) - 1), MAX_LEV_FIELDX - 1);
5358 y = MIN(MAX(0, (header[16] | (header[17] << 8)) - 1), MAX_LEV_FIELDY - 1);
5359 level->field[x][y] = EL_PLAYER_2;
5361 level->gems_needed = header[18] | (header[19] << 8);
5363 level->score[SC_EMERALD] = header[20] | (header[21] << 8);
5364 level->score[SC_DIAMOND] = header[22] | (header[23] << 8);
5365 level->score[SC_PEARL] = header[24] | (header[25] << 8);
5366 level->score[SC_CRYSTAL] = header[26] | (header[27] << 8);
5367 level->score[SC_NUT] = header[28] | (header[29] << 8);
5368 level->score[SC_ROBOT] = header[30] | (header[31] << 8);
5369 level->score[SC_SPACESHIP] = header[32] | (header[33] << 8);
5370 level->score[SC_BUG] = header[34] | (header[35] << 8);
5371 level->score[SC_YAMYAM] = header[36] | (header[37] << 8);
5372 level->score[SC_DYNAMITE] = header[38] | (header[39] << 8);
5373 level->score[SC_KEY] = header[40] | (header[41] << 8);
5374 level->score[SC_TIME_BONUS] = header[42] | (header[43] << 8);
5376 level->time = header[44] | (header[45] << 8);
5378 level->amoeba_speed = header[46] | (header[47] << 8);
5379 level->time_light = header[48] | (header[49] << 8);
5380 level->time_timegate = header[50] | (header[51] << 8);
5381 level->time_wheel = header[52] | (header[53] << 8);
5382 level->time_magic_wall = header[54] | (header[55] << 8);
5383 level->extra_time = header[56] | (header[57] << 8);
5384 level->shield_normal_time = header[58] | (header[59] << 8);
5386 /* Diamond Caves has the same (strange) behaviour as Emerald Mine that gems
5387 can slip down from flat walls, like normal walls and steel walls */
5388 level->em_slippery_gems = TRUE;
5391 static void LoadLevelFromFileInfo_DC(struct LevelInfo *level,
5392 struct LevelFileInfo *level_file_info,
5393 boolean level_info_only)
5395 char *filename = level_file_info->filename;
5397 int num_magic_bytes = 8;
5398 char magic_bytes[num_magic_bytes + 1];
5399 int num_levels_to_skip = level_file_info->nr - leveldir_current->first_level;
5401 if (!(file = openFile(filename, MODE_READ)))
5403 level->no_valid_file = TRUE;
5405 if (!level_info_only)
5406 Error(ERR_WARN, "cannot read level '%s' -- using empty level", filename);
5411 // fseek(file, 0x0000, SEEK_SET);
5413 if (level_file_info->packed)
5415 /* read "magic bytes" from start of file */
5416 if (getStringFromFile(file, magic_bytes, num_magic_bytes + 1) == NULL)
5417 magic_bytes[0] = '\0';
5419 /* check "magic bytes" for correct file format */
5420 if (!strPrefix(magic_bytes, "DC2"))
5422 level->no_valid_file = TRUE;
5424 Error(ERR_WARN, "unknown DC level file '%s' -- using empty level",
5430 if (strPrefix(magic_bytes, "DC2Win95") ||
5431 strPrefix(magic_bytes, "DC2Win98"))
5433 int position_first_level = 0x00fa;
5434 int extra_bytes = 4;
5437 /* advance file stream to first level inside the level package */
5438 skip_bytes = position_first_level - num_magic_bytes - extra_bytes;
5440 /* each block of level data is followed by block of non-level data */
5441 num_levels_to_skip *= 2;
5443 /* at least skip header bytes, therefore use ">= 0" instead of "> 0" */
5444 while (num_levels_to_skip >= 0)
5446 /* advance file stream to next level inside the level package */
5447 if (seekFile(file, skip_bytes, SEEK_CUR) != 0)
5449 level->no_valid_file = TRUE;
5451 Error(ERR_WARN, "cannot fseek in file '%s' -- using empty level",
5457 /* skip apparently unused extra bytes following each level */
5458 ReadUnusedBytesFromFile(file, extra_bytes);
5460 /* read size of next level in level package */
5461 skip_bytes = getFile32BitLE(file);
5463 num_levels_to_skip--;
5468 level->no_valid_file = TRUE;
5470 Error(ERR_WARN, "unknown DC2 level file '%s' -- using empty level",
5477 LoadLevelFromFileStream_DC(file, level, level_file_info->nr);
5483 /* ------------------------------------------------------------------------- */
5484 /* functions for loading SB level */
5485 /* ------------------------------------------------------------------------- */
5487 int getMappedElement_SB(int element_ascii, boolean use_ces)
5495 sb_element_mapping[] =
5497 { ' ', EL_EMPTY, EL_CUSTOM_1 }, /* floor (space) */
5498 { '#', EL_STEELWALL, EL_CUSTOM_2 }, /* wall */
5499 { '@', EL_PLAYER_1, EL_CUSTOM_3 }, /* player */
5500 { '$', EL_SOKOBAN_OBJECT, EL_CUSTOM_4 }, /* box */
5501 { '.', EL_SOKOBAN_FIELD_EMPTY, EL_CUSTOM_5 }, /* goal square */
5502 { '*', EL_SOKOBAN_FIELD_FULL, EL_CUSTOM_6 }, /* box on goal square */
5503 { '+', EL_SOKOBAN_FIELD_PLAYER, EL_CUSTOM_7 }, /* player on goal square */
5504 { '_', EL_INVISIBLE_STEELWALL, EL_FROM_LEVEL_TEMPLATE }, /* floor beyond border */
5511 for (i = 0; sb_element_mapping[i].ascii != 0; i++)
5512 if (element_ascii == sb_element_mapping[i].ascii)
5513 return (use_ces ? sb_element_mapping[i].ce : sb_element_mapping[i].sb);
5515 return EL_UNDEFINED;
5518 static void LoadLevelFromFileInfo_SB(struct LevelInfo *level,
5519 struct LevelFileInfo *level_file_info,
5520 boolean level_info_only)
5522 char *filename = level_file_info->filename;
5523 char line[MAX_LINE_LEN], line_raw[MAX_LINE_LEN], previous_line[MAX_LINE_LEN];
5524 char last_comment[MAX_LINE_LEN];
5525 char level_name[MAX_LINE_LEN];
5528 int num_levels_to_skip = level_file_info->nr - leveldir_current->first_level;
5529 boolean read_continued_line = FALSE;
5530 boolean reading_playfield = FALSE;
5531 boolean got_valid_playfield_line = FALSE;
5532 boolean invalid_playfield_char = FALSE;
5533 boolean load_xsb_to_ces = check_special_flags("load_xsb_to_ces");
5534 int file_level_nr = 0;
5536 int x = 0, y = 0; /* initialized to make compilers happy */
5538 last_comment[0] = '\0';
5539 level_name[0] = '\0';
5541 if (!(file = openFile(filename, MODE_READ)))
5543 level->no_valid_file = TRUE;
5545 if (!level_info_only)
5546 Error(ERR_WARN, "cannot read level '%s' -- using empty level", filename);
5551 while (!checkEndOfFile(file))
5553 /* level successfully read, but next level may follow here */
5554 if (!got_valid_playfield_line && reading_playfield)
5556 /* read playfield from single level file -- skip remaining file */
5557 if (!level_file_info->packed)
5560 if (file_level_nr >= num_levels_to_skip)
5565 last_comment[0] = '\0';
5566 level_name[0] = '\0';
5568 reading_playfield = FALSE;
5571 got_valid_playfield_line = FALSE;
5573 /* read next line of input file */
5574 if (!getStringFromFile(file, line, MAX_LINE_LEN))
5577 /* check if line was completely read and is terminated by line break */
5578 if (strlen(line) > 0 && line[strlen(line) - 1] == '\n')
5581 /* cut trailing line break (this can be newline and/or carriage return) */
5582 for (line_ptr = &line[strlen(line)]; line_ptr >= line; line_ptr--)
5583 if ((*line_ptr == '\n' || *line_ptr == '\r') && *(line_ptr + 1) == '\0')
5586 /* copy raw input line for later use (mainly debugging output) */
5587 strcpy(line_raw, line);
5589 if (read_continued_line)
5591 /* append new line to existing line, if there is enough space */
5592 if (strlen(previous_line) + strlen(line_ptr) < MAX_LINE_LEN)
5593 strcat(previous_line, line_ptr);
5595 strcpy(line, previous_line); /* copy storage buffer to line */
5597 read_continued_line = FALSE;
5600 /* if the last character is '\', continue at next line */
5601 if (strlen(line) > 0 && line[strlen(line) - 1] == '\\')
5603 line[strlen(line) - 1] = '\0'; /* cut off trailing backslash */
5604 strcpy(previous_line, line); /* copy line to storage buffer */
5606 read_continued_line = TRUE;
5611 /* skip empty lines */
5612 if (line[0] == '\0')
5615 /* extract comment text from comment line */
5618 for (line_ptr = line; *line_ptr; line_ptr++)
5619 if (*line_ptr != ' ' && *line_ptr != '\t' && *line_ptr != ';')
5622 strcpy(last_comment, line_ptr);
5627 /* extract level title text from line containing level title */
5628 if (line[0] == '\'')
5630 strcpy(level_name, &line[1]);
5632 if (strlen(level_name) > 0 && level_name[strlen(level_name) - 1] == '\'')
5633 level_name[strlen(level_name) - 1] = '\0';
5638 /* skip lines containing only spaces (or empty lines) */
5639 for (line_ptr = line; *line_ptr; line_ptr++)
5640 if (*line_ptr != ' ')
5642 if (*line_ptr == '\0')
5645 /* at this point, we have found a line containing part of a playfield */
5647 got_valid_playfield_line = TRUE;
5649 if (!reading_playfield)
5651 reading_playfield = TRUE;
5652 invalid_playfield_char = FALSE;
5654 for (x = 0; x < MAX_LEV_FIELDX; x++)
5655 for (y = 0; y < MAX_LEV_FIELDY; y++)
5656 level->field[x][y] = getMappedElement_SB(' ', load_xsb_to_ces);
5661 /* start with topmost tile row */
5665 /* skip playfield line if larger row than allowed */
5666 if (y >= MAX_LEV_FIELDY)
5669 /* start with leftmost tile column */
5672 /* read playfield elements from line */
5673 for (line_ptr = line; *line_ptr; line_ptr++)
5675 int mapped_sb_element = getMappedElement_SB(*line_ptr, load_xsb_to_ces);
5677 /* stop parsing playfield line if larger column than allowed */
5678 if (x >= MAX_LEV_FIELDX)
5681 if (mapped_sb_element == EL_UNDEFINED)
5683 invalid_playfield_char = TRUE;
5688 level->field[x][y] = mapped_sb_element;
5690 /* continue with next tile column */
5693 level->fieldx = MAX(x, level->fieldx);
5696 if (invalid_playfield_char)
5698 /* if first playfield line, treat invalid lines as comment lines */
5700 reading_playfield = FALSE;
5705 /* continue with next tile row */
5713 level->fieldx = MIN(MAX(MIN_LEV_FIELDX, level->fieldx), MAX_LEV_FIELDX);
5714 level->fieldy = MIN(MAX(MIN_LEV_FIELDY, level->fieldy), MAX_LEV_FIELDY);
5716 if (!reading_playfield)
5718 level->no_valid_file = TRUE;
5720 Error(ERR_WARN, "cannot read level '%s' -- using empty level", filename);
5725 if (*level_name != '\0')
5727 strncpy(level->name, level_name, MAX_LEVEL_NAME_LEN);
5728 level->name[MAX_LEVEL_NAME_LEN] = '\0';
5730 else if (*last_comment != '\0')
5732 strncpy(level->name, last_comment, MAX_LEVEL_NAME_LEN);
5733 level->name[MAX_LEVEL_NAME_LEN] = '\0';
5737 sprintf(level->name, "--> Level %d <--", level_file_info->nr);
5740 /* set all empty fields beyond the border walls to invisible steel wall */
5741 for (y = 0; y < level->fieldy; y++) for (x = 0; x < level->fieldx; x++)
5743 if ((x == 0 || x == level->fieldx - 1 ||
5744 y == 0 || y == level->fieldy - 1) &&
5745 level->field[x][y] == getMappedElement_SB(' ', load_xsb_to_ces))
5746 FloodFillLevel(x, y, getMappedElement_SB('_', load_xsb_to_ces),
5747 level->field, level->fieldx, level->fieldy);
5750 /* set special level settings for Sokoban levels */
5753 level->use_step_counter = TRUE;
5755 if (load_xsb_to_ces)
5757 /* special global settings can now be set in level template */
5759 /* fill smaller playfields with padding "beyond border wall" elements */
5760 if (level->fieldx < SCR_FIELDX ||
5761 level->fieldy < SCR_FIELDY)
5763 short field[level->fieldx][level->fieldy];
5764 int new_fieldx = MAX(level->fieldx, SCR_FIELDX);
5765 int new_fieldy = MAX(level->fieldy, SCR_FIELDY);
5766 int pos_fieldx = (new_fieldx - level->fieldx) / 2;
5767 int pos_fieldy = (new_fieldy - level->fieldy) / 2;
5769 /* copy old playfield (which is smaller than the visible area) */
5770 for (y = 0; y < level->fieldy; y++) for (x = 0; x < level->fieldx; x++)
5771 field[x][y] = level->field[x][y];
5773 /* fill new, larger playfield with "beyond border wall" elements */
5774 for (y = 0; y < new_fieldy; y++) for (x = 0; x < new_fieldx; x++)
5775 level->field[x][y] = getMappedElement_SB('_', load_xsb_to_ces);
5777 /* copy the old playfield to the middle of the new playfield */
5778 for (y = 0; y < level->fieldy; y++) for (x = 0; x < level->fieldx; x++)
5779 level->field[pos_fieldx + x][pos_fieldy + y] = field[x][y];
5781 level->fieldx = new_fieldx;
5782 level->fieldy = new_fieldy;
5785 level->use_custom_template = TRUE;
5790 /* ------------------------------------------------------------------------- */
5791 /* functions for handling native levels */
5792 /* ------------------------------------------------------------------------- */
5794 static void LoadLevelFromFileInfo_EM(struct LevelInfo *level,
5795 struct LevelFileInfo *level_file_info,
5796 boolean level_info_only)
5798 if (!LoadNativeLevel_EM(level_file_info->filename, level_info_only))
5799 level->no_valid_file = TRUE;
5802 static void LoadLevelFromFileInfo_SP(struct LevelInfo *level,
5803 struct LevelFileInfo *level_file_info,
5804 boolean level_info_only)
5808 /* determine position of requested level inside level package */
5809 if (level_file_info->packed)
5810 pos = level_file_info->nr - leveldir_current->first_level;
5812 if (!LoadNativeLevel_SP(level_file_info->filename, pos, level_info_only))
5813 level->no_valid_file = TRUE;
5816 void CopyNativeLevel_RND_to_Native(struct LevelInfo *level)
5818 if (level->game_engine_type == GAME_ENGINE_TYPE_EM)
5819 CopyNativeLevel_RND_to_EM(level);
5820 else if (level->game_engine_type == GAME_ENGINE_TYPE_SP)
5821 CopyNativeLevel_RND_to_SP(level);
5824 void CopyNativeLevel_Native_to_RND(struct LevelInfo *level)
5826 if (level->game_engine_type == GAME_ENGINE_TYPE_EM)
5827 CopyNativeLevel_EM_to_RND(level);
5828 else if (level->game_engine_type == GAME_ENGINE_TYPE_SP)
5829 CopyNativeLevel_SP_to_RND(level);
5832 void SaveNativeLevel(struct LevelInfo *level)
5834 if (level->game_engine_type == GAME_ENGINE_TYPE_SP)
5836 char *basename = getSingleLevelBasenameExt(level->file_info.nr, "sp");
5837 char *filename = getLevelFilenameFromBasename(basename);
5839 CopyNativeLevel_RND_to_SP(level);
5840 CopyNativeTape_RND_to_SP(level);
5842 SaveNativeLevel_SP(filename);
5847 /* ------------------------------------------------------------------------- */
5848 /* functions for loading generic level */
5849 /* ------------------------------------------------------------------------- */
5851 static void LoadLevelFromFileInfo(struct LevelInfo *level,
5852 struct LevelFileInfo *level_file_info,
5853 boolean level_info_only)
5855 /* always start with reliable default values */
5856 setLevelInfoToDefaults(level, level_info_only);
5858 switch (level_file_info->type)
5860 case LEVEL_FILE_TYPE_RND:
5861 LoadLevelFromFileInfo_RND(level, level_file_info, level_info_only);
5864 case LEVEL_FILE_TYPE_EM:
5865 LoadLevelFromFileInfo_EM(level, level_file_info, level_info_only);
5866 level->game_engine_type = GAME_ENGINE_TYPE_EM;
5869 case LEVEL_FILE_TYPE_SP:
5870 LoadLevelFromFileInfo_SP(level, level_file_info, level_info_only);
5871 level->game_engine_type = GAME_ENGINE_TYPE_SP;
5874 case LEVEL_FILE_TYPE_DC:
5875 LoadLevelFromFileInfo_DC(level, level_file_info, level_info_only);
5878 case LEVEL_FILE_TYPE_SB:
5879 LoadLevelFromFileInfo_SB(level, level_file_info, level_info_only);
5883 LoadLevelFromFileInfo_RND(level, level_file_info, level_info_only);
5887 /* if level file is invalid, restore level structure to default values */
5888 if (level->no_valid_file)
5890 setLevelInfoToDefaults(level, level_info_only);
5892 level->no_valid_file = TRUE; /* but keep "no valid file" flag */
5895 if (level->game_engine_type == GAME_ENGINE_TYPE_UNKNOWN)
5896 level->game_engine_type = GAME_ENGINE_TYPE_RND;
5898 if (level_file_info->type != LEVEL_FILE_TYPE_RND)
5899 CopyNativeLevel_Native_to_RND(level);
5902 void LoadLevelFromFilename(struct LevelInfo *level, char *filename)
5904 static struct LevelFileInfo level_file_info;
5906 /* always start with reliable default values */
5907 setFileInfoToDefaults(&level_file_info);
5909 level_file_info.nr = 0; /* unknown level number */
5910 level_file_info.type = LEVEL_FILE_TYPE_RND; /* no others supported yet */
5911 level_file_info.filename = filename;
5913 LoadLevelFromFileInfo(level, &level_file_info, FALSE);
5916 static void LoadLevel_InitVersion(struct LevelInfo *level, char *filename)
5920 if (leveldir_current == NULL) /* only when dumping level */
5923 /* all engine modifications also valid for levels which use latest engine */
5924 if (level->game_version < VERSION_IDENT(3,2,0,5))
5926 /* time bonus score was given for 10 s instead of 1 s before 3.2.0-5 */
5927 level->score[SC_TIME_BONUS] /= 10;
5930 if (leveldir_current->latest_engine)
5932 /* ---------- use latest game engine ----------------------------------- */
5934 /* For all levels which are forced to use the latest game engine version
5935 (normally all but user contributed, private and undefined levels), set
5936 the game engine version to the actual version; this allows for actual
5937 corrections in the game engine to take effect for existing, converted
5938 levels (from "classic" or other existing games) to make the emulation
5939 of the corresponding game more accurate, while (hopefully) not breaking
5940 existing levels created from other players. */
5942 level->game_version = GAME_VERSION_ACTUAL;
5944 /* Set special EM style gems behaviour: EM style gems slip down from
5945 normal, steel and growing wall. As this is a more fundamental change,
5946 it seems better to set the default behaviour to "off" (as it is more
5947 natural) and make it configurable in the level editor (as a property
5948 of gem style elements). Already existing converted levels (neither
5949 private nor contributed levels) are changed to the new behaviour. */
5951 if (level->file_version < FILE_VERSION_2_0)
5952 level->em_slippery_gems = TRUE;
5957 /* ---------- use game engine the level was created with ----------------- */
5959 /* For all levels which are not forced to use the latest game engine
5960 version (normally user contributed, private and undefined levels),
5961 use the version of the game engine the levels were created for.
5963 Since 2.0.1, the game engine version is now directly stored
5964 in the level file (chunk "VERS"), so there is no need anymore
5965 to set the game version from the file version (except for old,
5966 pre-2.0 levels, where the game version is still taken from the
5967 file format version used to store the level -- see above). */
5969 /* player was faster than enemies in 1.0.0 and before */
5970 if (level->file_version == FILE_VERSION_1_0)
5971 for (i = 0; i < MAX_PLAYERS; i++)
5972 level->initial_player_stepsize[i] = STEPSIZE_FAST;
5974 /* default behaviour for EM style gems was "slippery" only in 2.0.1 */
5975 if (level->game_version == VERSION_IDENT(2,0,1,0))
5976 level->em_slippery_gems = TRUE;
5978 /* springs could be pushed over pits before (pre-release version) 2.2.0 */
5979 if (level->game_version < VERSION_IDENT(2,2,0,0))
5980 level->use_spring_bug = TRUE;
5982 if (level->game_version < VERSION_IDENT(3,2,0,5))
5984 /* time orb caused limited time in endless time levels before 3.2.0-5 */
5985 level->use_time_orb_bug = TRUE;
5987 /* default behaviour for snapping was "no snap delay" before 3.2.0-5 */
5988 level->block_snap_field = FALSE;
5990 /* extra time score was same value as time left score before 3.2.0-5 */
5991 level->extra_time_score = level->score[SC_TIME_BONUS];
5994 if (level->game_version < VERSION_IDENT(3,2,0,7))
5996 /* default behaviour for snapping was "not continuous" before 3.2.0-7 */
5997 level->continuous_snapping = FALSE;
6000 /* only few elements were able to actively move into acid before 3.1.0 */
6001 /* trigger settings did not exist before 3.1.0; set to default "any" */
6002 if (level->game_version < VERSION_IDENT(3,1,0,0))
6004 /* correct "can move into acid" settings (all zero in old levels) */
6006 level->can_move_into_acid_bits = 0; /* nothing can move into acid */
6007 level->dont_collide_with_bits = 0; /* nothing is deadly when colliding */
6009 setMoveIntoAcidProperty(level, EL_ROBOT, TRUE);
6010 setMoveIntoAcidProperty(level, EL_SATELLITE, TRUE);
6011 setMoveIntoAcidProperty(level, EL_PENGUIN, TRUE);
6012 setMoveIntoAcidProperty(level, EL_BALLOON, TRUE);
6014 for (i = 0; i < NUM_CUSTOM_ELEMENTS; i++)
6015 SET_PROPERTY(EL_CUSTOM_START + i, EP_CAN_MOVE_INTO_ACID, TRUE);
6017 /* correct trigger settings (stored as zero == "none" in old levels) */
6019 for (i = 0; i < NUM_CUSTOM_ELEMENTS; i++)
6021 int element = EL_CUSTOM_START + i;
6022 struct ElementInfo *ei = &element_info[element];
6024 for (j = 0; j < ei->num_change_pages; j++)
6026 struct ElementChangeInfo *change = &ei->change_page[j];
6028 change->trigger_player = CH_PLAYER_ANY;
6029 change->trigger_page = CH_PAGE_ANY;
6034 /* try to detect and fix "Snake Bite" levels, which are broken with 3.2.0 */
6036 int element = EL_CUSTOM_256;
6037 struct ElementInfo *ei = &element_info[element];
6038 struct ElementChangeInfo *change = &ei->change_page[0];
6040 /* This is needed to fix a problem that was caused by a bugfix in function
6041 game.c/CreateFieldExt() introduced with 3.2.0 that corrects the behaviour
6042 when a custom element changes to EL_SOKOBAN_FIELD_PLAYER (before, it did
6043 not replace walkable elements, but instead just placed the player on it,
6044 without placing the Sokoban field under the player). Unfortunately, this
6045 breaks "Snake Bite" style levels when the snake is halfway through a door
6046 that just closes (the snake head is still alive and can be moved in this
6047 case). This can be fixed by replacing the EL_SOKOBAN_FIELD_PLAYER by the
6048 player (without Sokoban element) which then gets killed as designed). */
6050 if ((strncmp(leveldir_current->identifier, "snake_bite", 10) == 0 ||
6051 strncmp(ei->description, "pause b4 death", 14) == 0) &&
6052 change->target_element == EL_SOKOBAN_FIELD_PLAYER)
6053 change->target_element = EL_PLAYER_1;
6056 /* try to detect and fix "Zelda" style levels, which are broken with 3.2.5 */
6057 if (level->game_version < VERSION_IDENT(3,2,5,0))
6059 /* This is needed to fix a problem that was caused by a bugfix in function
6060 game.c/CheckTriggeredElementChangeExt() introduced with 3.2.5 that
6061 corrects the behaviour when a custom element changes to another custom
6062 element with a higher element number that has change actions defined.
6063 Normally, only one change per frame is allowed for custom elements.
6064 Therefore, it is checked if a custom element already changed in the
6065 current frame; if it did, subsequent changes are suppressed.
6066 Unfortunately, this is only checked for element changes, but not for
6067 change actions, which are still executed. As the function above loops
6068 through all custom elements from lower to higher, an element change
6069 resulting in a lower CE number won't be checked again, while a target
6070 element with a higher number will also be checked, and potential change
6071 actions will get executed for this CE, too (which is wrong), while
6072 further changes are ignored (which is correct). As this bugfix breaks
6073 Zelda II (and introduces graphical bugs to Zelda I, and also breaks a
6074 few other levels like Alan Bond's "FMV"), allow the previous, incorrect
6075 behaviour for existing levels and tapes that make use of this bug */
6077 level->use_action_after_change_bug = TRUE;
6080 /* not centering level after relocating player was default only in 3.2.3 */
6081 if (level->game_version == VERSION_IDENT(3,2,3,0)) /* (no pre-releases) */
6082 level->shifted_relocation = TRUE;
6084 /* EM style elements always chain-exploded in R'n'D engine before 3.2.6 */
6085 if (level->game_version < VERSION_IDENT(3,2,6,0))
6086 level->em_explodes_by_fire = TRUE;
6089 static void LoadLevel_InitElements(struct LevelInfo *level, char *filename)
6093 /* map custom element change events that have changed in newer versions
6094 (these following values were accidentally changed in version 3.0.1)
6095 (this seems to be needed only for 'ab_levelset3' and 'ab_levelset4') */
6096 if (level->game_version <= VERSION_IDENT(3,0,0,0))
6098 for (i = 0; i < NUM_CUSTOM_ELEMENTS; i++)
6100 int element = EL_CUSTOM_START + i;
6102 /* order of checking and copying events to be mapped is important */
6103 /* (do not change the start and end value -- they are constant) */
6104 for (j = CE_BY_OTHER_ACTION; j >= CE_VALUE_GETS_ZERO; j--)
6106 if (HAS_CHANGE_EVENT(element, j - 2))
6108 SET_CHANGE_EVENT(element, j - 2, FALSE);
6109 SET_CHANGE_EVENT(element, j, TRUE);
6113 /* order of checking and copying events to be mapped is important */
6114 /* (do not change the start and end value -- they are constant) */
6115 for (j = CE_PLAYER_COLLECTS_X; j >= CE_HITTING_SOMETHING; j--)
6117 if (HAS_CHANGE_EVENT(element, j - 1))
6119 SET_CHANGE_EVENT(element, j - 1, FALSE);
6120 SET_CHANGE_EVENT(element, j, TRUE);
6126 /* initialize "can_change" field for old levels with only one change page */
6127 if (level->game_version <= VERSION_IDENT(3,0,2,0))
6129 for (i = 0; i < NUM_CUSTOM_ELEMENTS; i++)
6131 int element = EL_CUSTOM_START + i;
6133 if (CAN_CHANGE(element))
6134 element_info[element].change->can_change = TRUE;
6138 /* correct custom element values (for old levels without these options) */
6139 if (level->game_version < VERSION_IDENT(3,1,1,0))
6141 for (i = 0; i < NUM_CUSTOM_ELEMENTS; i++)
6143 int element = EL_CUSTOM_START + i;
6144 struct ElementInfo *ei = &element_info[element];
6146 if (ei->access_direction == MV_NO_DIRECTION)
6147 ei->access_direction = MV_ALL_DIRECTIONS;
6151 /* correct custom element values (fix invalid values for all versions) */
6154 for (i = 0; i < NUM_CUSTOM_ELEMENTS; i++)
6156 int element = EL_CUSTOM_START + i;
6157 struct ElementInfo *ei = &element_info[element];
6159 for (j = 0; j < ei->num_change_pages; j++)
6161 struct ElementChangeInfo *change = &ei->change_page[j];
6163 if (change->trigger_player == CH_PLAYER_NONE)
6164 change->trigger_player = CH_PLAYER_ANY;
6166 if (change->trigger_side == CH_SIDE_NONE)
6167 change->trigger_side = CH_SIDE_ANY;
6172 /* initialize "can_explode" field for old levels which did not store this */
6173 /* !!! CHECK THIS -- "<= 3,1,0,0" IS PROBABLY WRONG !!! */
6174 if (level->game_version <= VERSION_IDENT(3,1,0,0))
6176 for (i = 0; i < NUM_CUSTOM_ELEMENTS; i++)
6178 int element = EL_CUSTOM_START + i;
6180 if (EXPLODES_1X1_OLD(element))
6181 element_info[element].explosion_type = EXPLODES_1X1;
6183 SET_PROPERTY(element, EP_CAN_EXPLODE, (EXPLODES_BY_FIRE(element) ||
6184 EXPLODES_SMASHED(element) ||
6185 EXPLODES_IMPACT(element)));
6189 /* correct previously hard-coded move delay values for maze runner style */
6190 if (level->game_version < VERSION_IDENT(3,1,1,0))
6192 for (i = 0; i < NUM_CUSTOM_ELEMENTS; i++)
6194 int element = EL_CUSTOM_START + i;
6196 if (element_info[element].move_pattern & MV_MAZE_RUNNER_STYLE)
6198 /* previously hard-coded and therefore ignored */
6199 element_info[element].move_delay_fixed = 9;
6200 element_info[element].move_delay_random = 0;
6205 /* map elements that have changed in newer versions */
6206 level->amoeba_content = getMappedElementByVersion(level->amoeba_content,
6207 level->game_version);
6208 for (i = 0; i < MAX_ELEMENT_CONTENTS; i++)
6209 for (x = 0; x < 3; x++)
6210 for (y = 0; y < 3; y++)
6211 level->yamyam_content[i].e[x][y] =
6212 getMappedElementByVersion(level->yamyam_content[i].e[x][y],
6213 level->game_version);
6215 /* initialize element properties for level editor etc. */
6216 InitElementPropertiesEngine(level->game_version);
6217 InitElementPropertiesAfterLoading(level->game_version);
6218 InitElementPropertiesGfxElement();
6221 static void LoadLevel_InitPlayfield(struct LevelInfo *level, char *filename)
6225 /* map elements that have changed in newer versions */
6226 for (y = 0; y < level->fieldy; y++)
6227 for (x = 0; x < level->fieldx; x++)
6228 level->field[x][y] = getMappedElementByVersion(level->field[x][y],
6229 level->game_version);
6231 /* clear unused playfield data (nicer if level gets resized in editor) */
6232 for (x = 0; x < MAX_LEV_FIELDX; x++)
6233 for (y = 0; y < MAX_LEV_FIELDY; y++)
6234 if (x >= level->fieldx || y >= level->fieldy)
6235 level->field[x][y] = EL_EMPTY;
6237 /* copy elements to runtime playfield array */
6238 for (x = 0; x < MAX_LEV_FIELDX; x++)
6239 for (y = 0; y < MAX_LEV_FIELDY; y++)
6240 Feld[x][y] = level->field[x][y];
6242 /* initialize level size variables for faster access */
6243 lev_fieldx = level->fieldx;
6244 lev_fieldy = level->fieldy;
6246 /* determine border element for this level */
6247 if (level->file_info.type == LEVEL_FILE_TYPE_DC)
6248 BorderElement = EL_EMPTY; /* (in editor, SetBorderElement() is used) */
6253 static void LoadLevel_InitNativeEngines(struct LevelInfo *level,char *filename)
6255 struct LevelFileInfo *level_file_info = &level->file_info;
6257 if (level_file_info->type == LEVEL_FILE_TYPE_RND)
6258 CopyNativeLevel_RND_to_Native(level);
6261 void LoadLevelTemplate(int nr)
6265 setLevelFileInfo(&level_template.file_info, nr);
6266 filename = level_template.file_info.filename;
6268 LoadLevelFromFileInfo(&level_template, &level_template.file_info, FALSE);
6270 LoadLevel_InitVersion(&level_template, filename);
6271 LoadLevel_InitElements(&level_template, filename);
6273 ActivateLevelTemplate();
6276 void LoadLevel(int nr)
6280 setLevelFileInfo(&level.file_info, nr);
6281 filename = level.file_info.filename;
6283 LoadLevelFromFileInfo(&level, &level.file_info, FALSE);
6285 if (level.use_custom_template)
6286 LoadLevelTemplate(-1);
6288 LoadLevel_InitVersion(&level, filename);
6289 LoadLevel_InitElements(&level, filename);
6290 LoadLevel_InitPlayfield(&level, filename);
6292 LoadLevel_InitNativeEngines(&level, filename);
6295 void LoadLevelInfoOnly(int nr)
6297 setLevelFileInfo(&level.file_info, nr);
6299 LoadLevelFromFileInfo(&level, &level.file_info, TRUE);
6302 static int SaveLevel_VERS(FILE *file, struct LevelInfo *level)
6306 chunk_size += putFileVersion(file, level->file_version);
6307 chunk_size += putFileVersion(file, level->game_version);
6312 static int SaveLevel_DATE(FILE *file, struct LevelInfo *level)
6316 chunk_size += putFile16BitBE(file, level->creation_date.year);
6317 chunk_size += putFile8Bit(file, level->creation_date.month);
6318 chunk_size += putFile8Bit(file, level->creation_date.day);
6323 #if ENABLE_HISTORIC_CHUNKS
6324 static void SaveLevel_HEAD(FILE *file, struct LevelInfo *level)
6328 putFile8Bit(file, level->fieldx);
6329 putFile8Bit(file, level->fieldy);
6331 putFile16BitBE(file, level->time);
6332 putFile16BitBE(file, level->gems_needed);
6334 for (i = 0; i < MAX_LEVEL_NAME_LEN; i++)
6335 putFile8Bit(file, level->name[i]);
6337 for (i = 0; i < LEVEL_SCORE_ELEMENTS; i++)
6338 putFile8Bit(file, level->score[i]);
6340 for (i = 0; i < STD_ELEMENT_CONTENTS; i++)
6341 for (y = 0; y < 3; y++)
6342 for (x = 0; x < 3; x++)
6343 putFile8Bit(file, (level->encoding_16bit_yamyam ? EL_EMPTY :
6344 level->yamyam_content[i].e[x][y]));
6345 putFile8Bit(file, level->amoeba_speed);
6346 putFile8Bit(file, level->time_magic_wall);
6347 putFile8Bit(file, level->time_wheel);
6348 putFile8Bit(file, (level->encoding_16bit_amoeba ? EL_EMPTY :
6349 level->amoeba_content));
6350 putFile8Bit(file, (level->initial_player_stepsize == STEPSIZE_FAST ? 1 : 0));
6351 putFile8Bit(file, (level->initial_gravity ? 1 : 0));
6352 putFile8Bit(file, (level->encoding_16bit_field ? 1 : 0));
6353 putFile8Bit(file, (level->em_slippery_gems ? 1 : 0));
6355 putFile8Bit(file, (level->use_custom_template ? 1 : 0));
6357 putFile8Bit(file, (level->block_last_field ? 1 : 0));
6358 putFile8Bit(file, (level->sp_block_last_field ? 1 : 0));
6359 putFile32BitBE(file, level->can_move_into_acid_bits);
6360 putFile8Bit(file, level->dont_collide_with_bits);
6362 putFile8Bit(file, (level->use_spring_bug ? 1 : 0));
6363 putFile8Bit(file, (level->use_step_counter ? 1 : 0));
6365 putFile8Bit(file, (level->instant_relocation ? 1 : 0));
6366 putFile8Bit(file, (level->can_pass_to_walkable ? 1 : 0));
6367 putFile8Bit(file, (level->grow_into_diggable ? 1 : 0));
6369 putFile8Bit(file, level->game_engine_type);
6371 WriteUnusedBytesToFile(file, LEVEL_CHUNK_HEAD_UNUSED);
6375 static int SaveLevel_NAME(FILE *file, struct LevelInfo *level)
6380 for (i = 0; i < MAX_LEVEL_NAME_LEN; i++)
6381 chunk_size += putFile8Bit(file, level->name[i]);
6386 static int SaveLevel_AUTH(FILE *file, struct LevelInfo *level)
6391 for (i = 0; i < MAX_LEVEL_AUTHOR_LEN; i++)
6392 chunk_size += putFile8Bit(file, level->author[i]);
6397 #if ENABLE_HISTORIC_CHUNKS
6398 static int SaveLevel_BODY(FILE *file, struct LevelInfo *level)
6403 for (y = 0; y < level->fieldy; y++)
6404 for (x = 0; x < level->fieldx; x++)
6405 if (level->encoding_16bit_field)
6406 chunk_size += putFile16BitBE(file, level->field[x][y]);
6408 chunk_size += putFile8Bit(file, level->field[x][y]);
6414 static int SaveLevel_BODY(FILE *file, struct LevelInfo *level)
6419 for (y = 0; y < level->fieldy; y++)
6420 for (x = 0; x < level->fieldx; x++)
6421 chunk_size += putFile16BitBE(file, level->field[x][y]);
6426 #if ENABLE_HISTORIC_CHUNKS
6427 static void SaveLevel_CONT(FILE *file, struct LevelInfo *level)
6431 putFile8Bit(file, EL_YAMYAM);
6432 putFile8Bit(file, level->num_yamyam_contents);
6433 putFile8Bit(file, 0);
6434 putFile8Bit(file, 0);
6436 for (i = 0; i < MAX_ELEMENT_CONTENTS; i++)
6437 for (y = 0; y < 3; y++)
6438 for (x = 0; x < 3; x++)
6439 if (level->encoding_16bit_field)
6440 putFile16BitBE(file, level->yamyam_content[i].e[x][y]);
6442 putFile8Bit(file, level->yamyam_content[i].e[x][y]);
6446 #if ENABLE_HISTORIC_CHUNKS
6447 static void SaveLevel_CNT2(FILE *file, struct LevelInfo *level, int element)
6450 int num_contents, content_xsize, content_ysize;
6451 int content_array[MAX_ELEMENT_CONTENTS][3][3];
6453 if (element == EL_YAMYAM)
6455 num_contents = level->num_yamyam_contents;
6459 for (i = 0; i < MAX_ELEMENT_CONTENTS; i++)
6460 for (y = 0; y < 3; y++)
6461 for (x = 0; x < 3; x++)
6462 content_array[i][x][y] = level->yamyam_content[i].e[x][y];
6464 else if (element == EL_BD_AMOEBA)
6470 for (i = 0; i < MAX_ELEMENT_CONTENTS; i++)
6471 for (y = 0; y < 3; y++)
6472 for (x = 0; x < 3; x++)
6473 content_array[i][x][y] = EL_EMPTY;
6474 content_array[0][0][0] = level->amoeba_content;
6478 /* chunk header already written -- write empty chunk data */
6479 WriteUnusedBytesToFile(file, LEVEL_CHUNK_CNT2_SIZE);
6481 Error(ERR_WARN, "cannot save content for element '%d'", element);
6485 putFile16BitBE(file, element);
6486 putFile8Bit(file, num_contents);
6487 putFile8Bit(file, content_xsize);
6488 putFile8Bit(file, content_ysize);
6490 WriteUnusedBytesToFile(file, LEVEL_CHUNK_CNT2_UNUSED);
6492 for (i = 0; i < MAX_ELEMENT_CONTENTS; i++)
6493 for (y = 0; y < 3; y++)
6494 for (x = 0; x < 3; x++)
6495 putFile16BitBE(file, content_array[i][x][y]);
6499 #if ENABLE_HISTORIC_CHUNKS
6500 static int SaveLevel_CNT3(FILE *file, struct LevelInfo *level, int element)
6502 int envelope_nr = element - EL_ENVELOPE_1;
6503 int envelope_len = strlen(level->envelope_text[envelope_nr]) + 1;
6507 chunk_size += putFile16BitBE(file, element);
6508 chunk_size += putFile16BitBE(file, envelope_len);
6509 chunk_size += putFile8Bit(file, level->envelope_xsize[envelope_nr]);
6510 chunk_size += putFile8Bit(file, level->envelope_ysize[envelope_nr]);
6512 WriteUnusedBytesToFile(file, LEVEL_CHUNK_CNT3_UNUSED);
6513 chunk_size += LEVEL_CHUNK_CNT3_UNUSED;
6515 for (i = 0; i < envelope_len; i++)
6516 chunk_size += putFile8Bit(file, level->envelope_text[envelope_nr][i]);
6522 #if ENABLE_HISTORIC_CHUNKS
6523 static void SaveLevel_CUS1(FILE *file, struct LevelInfo *level,
6524 int num_changed_custom_elements)
6528 putFile16BitBE(file, num_changed_custom_elements);
6530 for (i = 0; i < NUM_CUSTOM_ELEMENTS; i++)
6532 int element = EL_CUSTOM_START + i;
6534 struct ElementInfo *ei = &element_info[element];
6536 if (ei->properties[EP_BITFIELD_BASE_NR] != EP_BITMASK_DEFAULT)
6538 if (check < num_changed_custom_elements)
6540 putFile16BitBE(file, element);
6541 putFile32BitBE(file, ei->properties[EP_BITFIELD_BASE_NR]);
6548 if (check != num_changed_custom_elements) /* should not happen */
6549 Error(ERR_WARN, "inconsistent number of custom element properties");
6553 #if ENABLE_HISTORIC_CHUNKS
6554 static void SaveLevel_CUS2(FILE *file, struct LevelInfo *level,
6555 int num_changed_custom_elements)
6559 putFile16BitBE(file, num_changed_custom_elements);
6561 for (i = 0; i < NUM_CUSTOM_ELEMENTS; i++)
6563 int element = EL_CUSTOM_START + i;
6565 if (element_info[element].change->target_element != EL_EMPTY_SPACE)
6567 if (check < num_changed_custom_elements)
6569 putFile16BitBE(file, element);
6570 putFile16BitBE(file, element_info[element].change->target_element);
6577 if (check != num_changed_custom_elements) /* should not happen */
6578 Error(ERR_WARN, "inconsistent number of custom target elements");
6582 #if ENABLE_HISTORIC_CHUNKS
6583 static void SaveLevel_CUS3(FILE *file, struct LevelInfo *level,
6584 int num_changed_custom_elements)
6586 int i, j, x, y, check = 0;
6588 putFile16BitBE(file, num_changed_custom_elements);
6590 for (i = 0; i < NUM_CUSTOM_ELEMENTS; i++)
6592 int element = EL_CUSTOM_START + i;
6593 struct ElementInfo *ei = &element_info[element];
6595 if (ei->modified_settings)
6597 if (check < num_changed_custom_elements)
6599 putFile16BitBE(file, element);
6601 for (j = 0; j < MAX_ELEMENT_NAME_LEN; j++)
6602 putFile8Bit(file, ei->description[j]);
6604 putFile32BitBE(file, ei->properties[EP_BITFIELD_BASE_NR]);
6606 /* some free bytes for future properties and padding */
6607 WriteUnusedBytesToFile(file, 7);
6609 putFile8Bit(file, ei->use_gfx_element);
6610 putFile16BitBE(file, ei->gfx_element_initial);
6612 putFile8Bit(file, ei->collect_score_initial);
6613 putFile8Bit(file, ei->collect_count_initial);
6615 putFile16BitBE(file, ei->push_delay_fixed);
6616 putFile16BitBE(file, ei->push_delay_random);
6617 putFile16BitBE(file, ei->move_delay_fixed);
6618 putFile16BitBE(file, ei->move_delay_random);
6620 putFile16BitBE(file, ei->move_pattern);
6621 putFile8Bit(file, ei->move_direction_initial);
6622 putFile8Bit(file, ei->move_stepsize);
6624 for (y = 0; y < 3; y++)
6625 for (x = 0; x < 3; x++)
6626 putFile16BitBE(file, ei->content.e[x][y]);
6628 putFile32BitBE(file, ei->change->events);
6630 putFile16BitBE(file, ei->change->target_element);
6632 putFile16BitBE(file, ei->change->delay_fixed);
6633 putFile16BitBE(file, ei->change->delay_random);
6634 putFile16BitBE(file, ei->change->delay_frames);
6636 putFile16BitBE(file, ei->change->initial_trigger_element);
6638 putFile8Bit(file, ei->change->explode);
6639 putFile8Bit(file, ei->change->use_target_content);
6640 putFile8Bit(file, ei->change->only_if_complete);
6641 putFile8Bit(file, ei->change->use_random_replace);
6643 putFile8Bit(file, ei->change->random_percentage);
6644 putFile8Bit(file, ei->change->replace_when);
6646 for (y = 0; y < 3; y++)
6647 for (x = 0; x < 3; x++)
6648 putFile16BitBE(file, ei->change->content.e[x][y]);
6650 putFile8Bit(file, ei->slippery_type);
6652 /* some free bytes for future properties and padding */
6653 WriteUnusedBytesToFile(file, LEVEL_CPART_CUS3_UNUSED);
6660 if (check != num_changed_custom_elements) /* should not happen */
6661 Error(ERR_WARN, "inconsistent number of custom element properties");
6665 #if ENABLE_HISTORIC_CHUNKS
6666 static void SaveLevel_CUS4(FILE *file, struct LevelInfo *level, int element)
6668 struct ElementInfo *ei = &element_info[element];
6671 /* ---------- custom element base property values (96 bytes) ------------- */
6673 putFile16BitBE(file, element);
6675 for (i = 0; i < MAX_ELEMENT_NAME_LEN; i++)
6676 putFile8Bit(file, ei->description[i]);
6678 putFile32BitBE(file, ei->properties[EP_BITFIELD_BASE_NR]);
6680 WriteUnusedBytesToFile(file, 4); /* reserved for more base properties */
6682 putFile8Bit(file, ei->num_change_pages);
6684 putFile16BitBE(file, ei->ce_value_fixed_initial);
6685 putFile16BitBE(file, ei->ce_value_random_initial);
6686 putFile8Bit(file, ei->use_last_ce_value);
6688 putFile8Bit(file, ei->use_gfx_element);
6689 putFile16BitBE(file, ei->gfx_element_initial);
6691 putFile8Bit(file, ei->collect_score_initial);
6692 putFile8Bit(file, ei->collect_count_initial);
6694 putFile8Bit(file, ei->drop_delay_fixed);
6695 putFile8Bit(file, ei->push_delay_fixed);
6696 putFile8Bit(file, ei->drop_delay_random);
6697 putFile8Bit(file, ei->push_delay_random);
6698 putFile16BitBE(file, ei->move_delay_fixed);
6699 putFile16BitBE(file, ei->move_delay_random);
6701 /* bits 0 - 15 of "move_pattern" ... */
6702 putFile16BitBE(file, ei->move_pattern & 0xffff);
6703 putFile8Bit(file, ei->move_direction_initial);
6704 putFile8Bit(file, ei->move_stepsize);
6706 putFile8Bit(file, ei->slippery_type);
6708 for (y = 0; y < 3; y++)
6709 for (x = 0; x < 3; x++)
6710 putFile16BitBE(file, ei->content.e[x][y]);
6712 putFile16BitBE(file, ei->move_enter_element);
6713 putFile16BitBE(file, ei->move_leave_element);
6714 putFile8Bit(file, ei->move_leave_type);
6716 /* ... bits 16 - 31 of "move_pattern" (not nice, but downward compatible) */
6717 putFile16BitBE(file, (ei->move_pattern >> 16) & 0xffff);
6719 putFile8Bit(file, ei->access_direction);
6721 putFile8Bit(file, ei->explosion_delay);
6722 putFile8Bit(file, ei->ignition_delay);
6723 putFile8Bit(file, ei->explosion_type);
6725 /* some free bytes for future custom property values and padding */
6726 WriteUnusedBytesToFile(file, 1);
6728 /* ---------- change page property values (48 bytes) --------------------- */
6730 for (i = 0; i < ei->num_change_pages; i++)
6732 struct ElementChangeInfo *change = &ei->change_page[i];
6733 unsigned int event_bits;
6735 /* bits 0 - 31 of "has_event[]" ... */
6737 for (j = 0; j < MIN(NUM_CHANGE_EVENTS, 32); j++)
6738 if (change->has_event[j])
6739 event_bits |= (1 << j);
6740 putFile32BitBE(file, event_bits);
6742 putFile16BitBE(file, change->target_element);
6744 putFile16BitBE(file, change->delay_fixed);
6745 putFile16BitBE(file, change->delay_random);
6746 putFile16BitBE(file, change->delay_frames);
6748 putFile16BitBE(file, change->initial_trigger_element);
6750 putFile8Bit(file, change->explode);
6751 putFile8Bit(file, change->use_target_content);
6752 putFile8Bit(file, change->only_if_complete);
6753 putFile8Bit(file, change->use_random_replace);
6755 putFile8Bit(file, change->random_percentage);
6756 putFile8Bit(file, change->replace_when);
6758 for (y = 0; y < 3; y++)
6759 for (x = 0; x < 3; x++)
6760 putFile16BitBE(file, change->target_content.e[x][y]);
6762 putFile8Bit(file, change->can_change);
6764 putFile8Bit(file, change->trigger_side);
6766 putFile8Bit(file, change->trigger_player);
6767 putFile8Bit(file, (change->trigger_page == CH_PAGE_ANY ? CH_PAGE_ANY_FILE :
6768 log_2(change->trigger_page)));
6770 putFile8Bit(file, change->has_action);
6771 putFile8Bit(file, change->action_type);
6772 putFile8Bit(file, change->action_mode);
6773 putFile16BitBE(file, change->action_arg);
6775 /* ... bits 32 - 39 of "has_event[]" (not nice, but downward compatible) */
6777 for (j = 32; j < NUM_CHANGE_EVENTS; j++)
6778 if (change->has_event[j])
6779 event_bits |= (1 << (j - 32));
6780 putFile8Bit(file, event_bits);
6785 #if ENABLE_HISTORIC_CHUNKS
6786 static void SaveLevel_GRP1(FILE *file, struct LevelInfo *level, int element)
6788 struct ElementInfo *ei = &element_info[element];
6789 struct ElementGroupInfo *group = ei->group;
6792 putFile16BitBE(file, element);
6794 for (i = 0; i < MAX_ELEMENT_NAME_LEN; i++)
6795 putFile8Bit(file, ei->description[i]);
6797 putFile8Bit(file, group->num_elements);
6799 putFile8Bit(file, ei->use_gfx_element);
6800 putFile16BitBE(file, ei->gfx_element_initial);
6802 putFile8Bit(file, group->choice_mode);
6804 /* some free bytes for future values and padding */
6805 WriteUnusedBytesToFile(file, 3);
6807 for (i = 0; i < MAX_ELEMENTS_IN_GROUP; i++)
6808 putFile16BitBE(file, group->element[i]);
6812 static int SaveLevel_MicroChunk(FILE *file, struct LevelFileConfigInfo *entry,
6813 boolean write_element)
6815 int save_type = entry->save_type;
6816 int data_type = entry->data_type;
6817 int conf_type = entry->conf_type;
6818 int byte_mask = conf_type & CONF_MASK_BYTES;
6819 int element = entry->element;
6820 int default_value = entry->default_value;
6822 boolean modified = FALSE;
6824 if (byte_mask != CONF_MASK_MULTI_BYTES)
6826 void *value_ptr = entry->value;
6827 int value = (data_type == TYPE_BOOLEAN ? *(boolean *)value_ptr :
6830 /* check if any settings have been modified before saving them */
6831 if (value != default_value)
6834 /* do not save if explicitly told or if unmodified default settings */
6835 if ((save_type == SAVE_CONF_NEVER) ||
6836 (save_type == SAVE_CONF_WHEN_CHANGED && !modified))
6840 num_bytes += putFile16BitBE(file, element);
6842 num_bytes += putFile8Bit(file, conf_type);
6843 num_bytes += (byte_mask == CONF_MASK_1_BYTE ? putFile8Bit (file, value) :
6844 byte_mask == CONF_MASK_2_BYTE ? putFile16BitBE(file, value) :
6845 byte_mask == CONF_MASK_4_BYTE ? putFile32BitBE(file, value) :
6848 else if (data_type == TYPE_STRING)
6850 char *default_string = entry->default_string;
6851 char *string = (char *)(entry->value);
6852 int string_length = strlen(string);
6855 /* check if any settings have been modified before saving them */
6856 if (!strEqual(string, default_string))
6859 /* do not save if explicitly told or if unmodified default settings */
6860 if ((save_type == SAVE_CONF_NEVER) ||
6861 (save_type == SAVE_CONF_WHEN_CHANGED && !modified))
6865 num_bytes += putFile16BitBE(file, element);
6867 num_bytes += putFile8Bit(file, conf_type);
6868 num_bytes += putFile16BitBE(file, string_length);
6870 for (i = 0; i < string_length; i++)
6871 num_bytes += putFile8Bit(file, string[i]);
6873 else if (data_type == TYPE_ELEMENT_LIST)
6875 int *element_array = (int *)(entry->value);
6876 int num_elements = *(int *)(entry->num_entities);
6879 /* check if any settings have been modified before saving them */
6880 for (i = 0; i < num_elements; i++)
6881 if (element_array[i] != default_value)
6884 /* do not save if explicitly told or if unmodified default settings */
6885 if ((save_type == SAVE_CONF_NEVER) ||
6886 (save_type == SAVE_CONF_WHEN_CHANGED && !modified))
6890 num_bytes += putFile16BitBE(file, element);
6892 num_bytes += putFile8Bit(file, conf_type);
6893 num_bytes += putFile16BitBE(file, num_elements * CONF_ELEMENT_NUM_BYTES);
6895 for (i = 0; i < num_elements; i++)
6896 num_bytes += putFile16BitBE(file, element_array[i]);
6898 else if (data_type == TYPE_CONTENT_LIST)
6900 struct Content *content = (struct Content *)(entry->value);
6901 int num_contents = *(int *)(entry->num_entities);
6904 /* check if any settings have been modified before saving them */
6905 for (i = 0; i < num_contents; i++)
6906 for (y = 0; y < 3; y++)
6907 for (x = 0; x < 3; x++)
6908 if (content[i].e[x][y] != default_value)
6911 /* do not save if explicitly told or if unmodified default settings */
6912 if ((save_type == SAVE_CONF_NEVER) ||
6913 (save_type == SAVE_CONF_WHEN_CHANGED && !modified))
6917 num_bytes += putFile16BitBE(file, element);
6919 num_bytes += putFile8Bit(file, conf_type);
6920 num_bytes += putFile16BitBE(file, num_contents * CONF_CONTENT_NUM_BYTES);
6922 for (i = 0; i < num_contents; i++)
6923 for (y = 0; y < 3; y++)
6924 for (x = 0; x < 3; x++)
6925 num_bytes += putFile16BitBE(file, content[i].e[x][y]);
6931 static int SaveLevel_INFO(FILE *file, struct LevelInfo *level)
6936 li = *level; /* copy level data into temporary buffer */
6938 for (i = 0; chunk_config_INFO[i].data_type != -1; i++)
6939 chunk_size += SaveLevel_MicroChunk(file, &chunk_config_INFO[i], FALSE);
6944 static int SaveLevel_ELEM(FILE *file, struct LevelInfo *level)
6949 li = *level; /* copy level data into temporary buffer */
6951 for (i = 0; chunk_config_ELEM[i].data_type != -1; i++)
6952 chunk_size += SaveLevel_MicroChunk(file, &chunk_config_ELEM[i], TRUE);
6957 static int SaveLevel_NOTE(FILE *file, struct LevelInfo *level, int element)
6959 int envelope_nr = element - EL_ENVELOPE_1;
6963 chunk_size += putFile16BitBE(file, element);
6965 /* copy envelope data into temporary buffer */
6966 xx_envelope = level->envelope[envelope_nr];
6968 for (i = 0; chunk_config_NOTE[i].data_type != -1; i++)
6969 chunk_size += SaveLevel_MicroChunk(file, &chunk_config_NOTE[i], FALSE);
6974 static int SaveLevel_CUSX(FILE *file, struct LevelInfo *level, int element)
6976 struct ElementInfo *ei = &element_info[element];
6980 chunk_size += putFile16BitBE(file, element);
6982 xx_ei = *ei; /* copy element data into temporary buffer */
6984 /* set default description string for this specific element */
6985 strcpy(xx_default_description, getDefaultElementDescription(ei));
6987 for (i = 0; chunk_config_CUSX_base[i].data_type != -1; i++)
6988 chunk_size += SaveLevel_MicroChunk(file, &chunk_config_CUSX_base[i], FALSE);
6990 for (i = 0; i < ei->num_change_pages; i++)
6992 struct ElementChangeInfo *change = &ei->change_page[i];
6994 xx_current_change_page = i;
6996 xx_change = *change; /* copy change data into temporary buffer */
6999 setEventBitsFromEventFlags(change);
7001 for (j = 0; chunk_config_CUSX_change[j].data_type != -1; j++)
7002 chunk_size += SaveLevel_MicroChunk(file, &chunk_config_CUSX_change[j],
7009 static int SaveLevel_GRPX(FILE *file, struct LevelInfo *level, int element)
7011 struct ElementInfo *ei = &element_info[element];
7012 struct ElementGroupInfo *group = ei->group;
7016 chunk_size += putFile16BitBE(file, element);
7018 xx_ei = *ei; /* copy element data into temporary buffer */
7019 xx_group = *group; /* copy group data into temporary buffer */
7021 /* set default description string for this specific element */
7022 strcpy(xx_default_description, getDefaultElementDescription(ei));
7024 for (i = 0; chunk_config_GRPX[i].data_type != -1; i++)
7025 chunk_size += SaveLevel_MicroChunk(file, &chunk_config_GRPX[i], FALSE);
7030 static void SaveLevelFromFilename(struct LevelInfo *level, char *filename)
7036 if (!(file = fopen(filename, MODE_WRITE)))
7038 Error(ERR_WARN, "cannot save level file '%s'", filename);
7042 level->file_version = FILE_VERSION_ACTUAL;
7043 level->game_version = GAME_VERSION_ACTUAL;
7045 level->creation_date = getCurrentDate();
7047 putFileChunkBE(file, "RND1", CHUNK_SIZE_UNDEFINED);
7048 putFileChunkBE(file, "CAVE", CHUNK_SIZE_NONE);
7050 chunk_size = SaveLevel_VERS(NULL, level);
7051 putFileChunkBE(file, "VERS", chunk_size);
7052 SaveLevel_VERS(file, level);
7054 chunk_size = SaveLevel_DATE(NULL, level);
7055 putFileChunkBE(file, "DATE", chunk_size);
7056 SaveLevel_DATE(file, level);
7058 chunk_size = SaveLevel_NAME(NULL, level);
7059 putFileChunkBE(file, "NAME", chunk_size);
7060 SaveLevel_NAME(file, level);
7062 chunk_size = SaveLevel_AUTH(NULL, level);
7063 putFileChunkBE(file, "AUTH", chunk_size);
7064 SaveLevel_AUTH(file, level);
7066 chunk_size = SaveLevel_INFO(NULL, level);
7067 putFileChunkBE(file, "INFO", chunk_size);
7068 SaveLevel_INFO(file, level);
7070 chunk_size = SaveLevel_BODY(NULL, level);
7071 putFileChunkBE(file, "BODY", chunk_size);
7072 SaveLevel_BODY(file, level);
7074 chunk_size = SaveLevel_ELEM(NULL, level);
7075 if (chunk_size > LEVEL_CHUNK_ELEM_UNCHANGED) /* save if changed */
7077 putFileChunkBE(file, "ELEM", chunk_size);
7078 SaveLevel_ELEM(file, level);
7081 for (i = 0; i < NUM_ENVELOPES; i++)
7083 int element = EL_ENVELOPE_1 + i;
7085 chunk_size = SaveLevel_NOTE(NULL, level, element);
7086 if (chunk_size > LEVEL_CHUNK_NOTE_UNCHANGED) /* save if changed */
7088 putFileChunkBE(file, "NOTE", chunk_size);
7089 SaveLevel_NOTE(file, level, element);
7093 /* if not using template level, check for non-default custom/group elements */
7094 if (!level->use_custom_template)
7096 for (i = 0; i < NUM_CUSTOM_ELEMENTS; i++)
7098 int element = EL_CUSTOM_START + i;
7100 chunk_size = SaveLevel_CUSX(NULL, level, element);
7101 if (chunk_size > LEVEL_CHUNK_CUSX_UNCHANGED) /* save if changed */
7103 putFileChunkBE(file, "CUSX", chunk_size);
7104 SaveLevel_CUSX(file, level, element);
7108 for (i = 0; i < NUM_GROUP_ELEMENTS; i++)
7110 int element = EL_GROUP_START + i;
7112 chunk_size = SaveLevel_GRPX(NULL, level, element);
7113 if (chunk_size > LEVEL_CHUNK_GRPX_UNCHANGED) /* save if changed */
7115 putFileChunkBE(file, "GRPX", chunk_size);
7116 SaveLevel_GRPX(file, level, element);
7123 SetFilePermissions(filename, PERMS_PRIVATE);
7126 void SaveLevel(int nr)
7128 char *filename = getDefaultLevelFilename(nr);
7130 SaveLevelFromFilename(&level, filename);
7133 void SaveLevelTemplate()
7135 char *filename = getDefaultLevelFilename(-1);
7137 SaveLevelFromFilename(&level, filename);
7140 boolean SaveLevelChecked(int nr)
7142 char *filename = getDefaultLevelFilename(nr);
7143 boolean new_level = !fileExists(filename);
7144 boolean level_saved = FALSE;
7146 if (new_level || Request("Save this level and kill the old?", REQ_ASK))
7151 Request("Level saved!", REQ_CONFIRM);
7159 void DumpLevel(struct LevelInfo *level)
7161 if (level->no_valid_file)
7163 Error(ERR_WARN, "cannot dump -- no valid level file found");
7169 Print("Level xxx (file version %08d, game version %08d)\n",
7170 level->file_version, level->game_version);
7173 Print("Level author: '%s'\n", level->author);
7174 Print("Level title: '%s'\n", level->name);
7176 Print("Playfield size: %d x %d\n", level->fieldx, level->fieldy);
7178 Print("Level time: %d seconds\n", level->time);
7179 Print("Gems needed: %d\n", level->gems_needed);
7181 Print("Time for magic wall: %d seconds\n", level->time_magic_wall);
7182 Print("Time for wheel: %d seconds\n", level->time_wheel);
7183 Print("Time for light: %d seconds\n", level->time_light);
7184 Print("Time for timegate: %d seconds\n", level->time_timegate);
7186 Print("Amoeba speed: %d\n", level->amoeba_speed);
7189 Print("EM style slippery gems: %s\n", (level->em_slippery_gems ? "yes" : "no"));
7190 Print("Player blocks last field: %s\n", (level->block_last_field ? "yes" : "no"));
7191 Print("SP player blocks last field: %s\n", (level->sp_block_last_field ? "yes" : "no"));
7192 Print("use spring bug: %s\n", (level->use_spring_bug ? "yes" : "no"));
7193 Print("use step counter: %s\n", (level->use_step_counter ? "yes" : "no"));
7199 /* ========================================================================= */
7200 /* tape file functions */
7201 /* ========================================================================= */
7203 static void setTapeInfoToDefaults()
7207 /* always start with reliable default values (empty tape) */
7210 /* default values (also for pre-1.2 tapes) with only the first player */
7211 tape.player_participates[0] = TRUE;
7212 for (i = 1; i < MAX_PLAYERS; i++)
7213 tape.player_participates[i] = FALSE;
7215 /* at least one (default: the first) player participates in every tape */
7216 tape.num_participating_players = 1;
7218 tape.level_nr = level_nr;
7220 tape.changed = FALSE;
7222 tape.recording = FALSE;
7223 tape.playing = FALSE;
7224 tape.pausing = FALSE;
7226 tape.no_valid_file = FALSE;
7229 static int LoadTape_VERS(File *file, int chunk_size, struct TapeInfo *tape)
7231 tape->file_version = getFileVersion(file);
7232 tape->game_version = getFileVersion(file);
7237 static int LoadTape_HEAD(File *file, int chunk_size, struct TapeInfo *tape)
7241 tape->random_seed = getFile32BitBE(file);
7242 tape->date = getFile32BitBE(file);
7243 tape->length = getFile32BitBE(file);
7245 /* read header fields that are new since version 1.2 */
7246 if (tape->file_version >= FILE_VERSION_1_2)
7248 byte store_participating_players = getFile8Bit(file);
7251 /* since version 1.2, tapes store which players participate in the tape */
7252 tape->num_participating_players = 0;
7253 for (i = 0; i < MAX_PLAYERS; i++)
7255 tape->player_participates[i] = FALSE;
7257 if (store_participating_players & (1 << i))
7259 tape->player_participates[i] = TRUE;
7260 tape->num_participating_players++;
7264 ReadUnusedBytesFromFile(file, TAPE_CHUNK_HEAD_UNUSED);
7266 engine_version = getFileVersion(file);
7267 if (engine_version > 0)
7268 tape->engine_version = engine_version;
7270 tape->engine_version = tape->game_version;
7276 static int LoadTape_INFO(File *file, int chunk_size, struct TapeInfo *tape)
7278 int level_identifier_size;
7281 level_identifier_size = getFile16BitBE(file);
7283 tape->level_identifier =
7284 checked_realloc(tape->level_identifier, level_identifier_size);
7286 for (i = 0; i < level_identifier_size; i++)
7287 tape->level_identifier[i] = getFile8Bit(file);
7289 tape->level_nr = getFile16BitBE(file);
7291 chunk_size = 2 + level_identifier_size + 2;
7296 static int LoadTape_BODY(File *file, int chunk_size, struct TapeInfo *tape)
7299 int chunk_size_expected =
7300 (tape->num_participating_players + 1) * tape->length;
7302 if (chunk_size_expected != chunk_size)
7304 ReadUnusedBytesFromFile(file, chunk_size);
7305 return chunk_size_expected;
7308 for (i = 0; i < tape->length; i++)
7310 if (i >= MAX_TAPE_LEN)
7313 for (j = 0; j < MAX_PLAYERS; j++)
7315 tape->pos[i].action[j] = MV_NONE;
7317 if (tape->player_participates[j])
7318 tape->pos[i].action[j] = getFile8Bit(file);
7321 tape->pos[i].delay = getFile8Bit(file);
7323 if (tape->file_version == FILE_VERSION_1_0)
7325 /* eliminate possible diagonal moves in old tapes */
7326 /* this is only for backward compatibility */
7328 byte joy_dir[4] = { JOY_LEFT, JOY_RIGHT, JOY_UP, JOY_DOWN };
7329 byte action = tape->pos[i].action[0];
7330 int k, num_moves = 0;
7332 for (k = 0; k<4; k++)
7334 if (action & joy_dir[k])
7336 tape->pos[i + num_moves].action[0] = joy_dir[k];
7338 tape->pos[i + num_moves].delay = 0;
7347 tape->length += num_moves;
7350 else if (tape->file_version < FILE_VERSION_2_0)
7352 /* convert pre-2.0 tapes to new tape format */
7354 if (tape->pos[i].delay > 1)
7357 tape->pos[i + 1] = tape->pos[i];
7358 tape->pos[i + 1].delay = 1;
7361 for (j = 0; j < MAX_PLAYERS; j++)
7362 tape->pos[i].action[j] = MV_NONE;
7363 tape->pos[i].delay--;
7370 if (checkEndOfFile(file))
7374 if (i != tape->length)
7375 chunk_size = (tape->num_participating_players + 1) * i;
7380 void LoadTape_SokobanSolution(char *filename)
7383 int move_delay = TILESIZE / level.initial_player_stepsize[0];
7385 if (!(file = openFile(filename, MODE_READ)))
7387 tape.no_valid_file = TRUE;
7392 while (!checkEndOfFile(file))
7394 unsigned char c = getByteFromFile(file);
7396 if (checkEndOfFile(file))
7403 tape.pos[tape.length].action[0] = MV_UP;
7404 tape.pos[tape.length].delay = move_delay + (c < 'a' ? 2 : 0);
7410 tape.pos[tape.length].action[0] = MV_DOWN;
7411 tape.pos[tape.length].delay = move_delay + (c < 'a' ? 2 : 0);
7417 tape.pos[tape.length].action[0] = MV_LEFT;
7418 tape.pos[tape.length].delay = move_delay + (c < 'a' ? 2 : 0);
7424 tape.pos[tape.length].action[0] = MV_RIGHT;
7425 tape.pos[tape.length].delay = move_delay + (c < 'a' ? 2 : 0);
7433 /* ignore white-space characters */
7437 tape.no_valid_file = TRUE;
7439 Error(ERR_WARN, "unsupported Sokoban solution file '%s' ['%d']", filename, c);
7447 if (tape.no_valid_file)
7450 tape.length_frames = GetTapeLengthFrames();
7451 tape.length_seconds = GetTapeLengthSeconds();
7454 void LoadTapeFromFilename(char *filename)
7456 char cookie[MAX_LINE_LEN];
7457 char chunk_name[CHUNK_ID_LEN + 1];
7461 /* always start with reliable default values */
7462 setTapeInfoToDefaults();
7464 if (strSuffix(filename, ".sln"))
7466 LoadTape_SokobanSolution(filename);
7471 if (!(file = openFile(filename, MODE_READ)))
7473 tape.no_valid_file = TRUE;
7478 getFileChunkBE(file, chunk_name, NULL);
7479 if (strEqual(chunk_name, "RND1"))
7481 getFile32BitBE(file); /* not used */
7483 getFileChunkBE(file, chunk_name, NULL);
7484 if (!strEqual(chunk_name, "TAPE"))
7486 tape.no_valid_file = TRUE;
7488 Error(ERR_WARN, "unknown format of tape file '%s'", filename);
7495 else /* check for pre-2.0 file format with cookie string */
7497 strcpy(cookie, chunk_name);
7498 if (getStringFromFile(file, &cookie[4], MAX_LINE_LEN - 4) == NULL)
7500 if (strlen(cookie) > 0 && cookie[strlen(cookie) - 1] == '\n')
7501 cookie[strlen(cookie) - 1] = '\0';
7503 if (!checkCookieString(cookie, TAPE_COOKIE_TMPL))
7505 tape.no_valid_file = TRUE;
7507 Error(ERR_WARN, "unknown format of tape file '%s'", filename);
7514 if ((tape.file_version = getFileVersionFromCookieString(cookie)) == -1)
7516 tape.no_valid_file = TRUE;
7518 Error(ERR_WARN, "unsupported version of tape file '%s'", filename);
7525 /* pre-2.0 tape files have no game version, so use file version here */
7526 tape.game_version = tape.file_version;
7529 if (tape.file_version < FILE_VERSION_1_2)
7531 /* tape files from versions before 1.2.0 without chunk structure */
7532 LoadTape_HEAD(file, TAPE_CHUNK_HEAD_SIZE, &tape);
7533 LoadTape_BODY(file, 2 * tape.length, &tape);
7541 int (*loader)(File *, int, struct TapeInfo *);
7545 { "VERS", TAPE_CHUNK_VERS_SIZE, LoadTape_VERS },
7546 { "HEAD", TAPE_CHUNK_HEAD_SIZE, LoadTape_HEAD },
7547 { "INFO", -1, LoadTape_INFO },
7548 { "BODY", -1, LoadTape_BODY },
7552 while (getFileChunkBE(file, chunk_name, &chunk_size))
7556 while (chunk_info[i].name != NULL &&
7557 !strEqual(chunk_name, chunk_info[i].name))
7560 if (chunk_info[i].name == NULL)
7562 Error(ERR_WARN, "unknown chunk '%s' in tape file '%s'",
7563 chunk_name, filename);
7564 ReadUnusedBytesFromFile(file, chunk_size);
7566 else if (chunk_info[i].size != -1 &&
7567 chunk_info[i].size != chunk_size)
7569 Error(ERR_WARN, "wrong size (%d) of chunk '%s' in tape file '%s'",
7570 chunk_size, chunk_name, filename);
7571 ReadUnusedBytesFromFile(file, chunk_size);
7575 /* call function to load this tape chunk */
7576 int chunk_size_expected =
7577 (chunk_info[i].loader)(file, chunk_size, &tape);
7579 /* the size of some chunks cannot be checked before reading other
7580 chunks first (like "HEAD" and "BODY") that contain some header
7581 information, so check them here */
7582 if (chunk_size_expected != chunk_size)
7584 Error(ERR_WARN, "wrong size (%d) of chunk '%s' in tape file '%s'",
7585 chunk_size, chunk_name, filename);
7593 tape.length_frames = GetTapeLengthFrames();
7594 tape.length_seconds = GetTapeLengthSeconds();
7597 printf("::: tape file version: %d\n", tape.file_version);
7598 printf("::: tape game version: %d\n", tape.game_version);
7599 printf("::: tape engine version: %d\n", tape.engine_version);
7603 void LoadTape(int nr)
7605 char *filename = getTapeFilename(nr);
7607 LoadTapeFromFilename(filename);
7610 void LoadSolutionTape(int nr)
7612 char *filename = getSolutionTapeFilename(nr);
7614 LoadTapeFromFilename(filename);
7616 if (TAPE_IS_EMPTY(tape) &&
7617 level.game_engine_type == GAME_ENGINE_TYPE_SP &&
7618 level.native_sp_level->demo.is_available)
7619 CopyNativeTape_SP_to_RND(&level);
7622 static void SaveTape_VERS(FILE *file, struct TapeInfo *tape)
7624 putFileVersion(file, tape->file_version);
7625 putFileVersion(file, tape->game_version);
7628 static void SaveTape_HEAD(FILE *file, struct TapeInfo *tape)
7631 byte store_participating_players = 0;
7633 /* set bits for participating players for compact storage */
7634 for (i = 0; i < MAX_PLAYERS; i++)
7635 if (tape->player_participates[i])
7636 store_participating_players |= (1 << i);
7638 putFile32BitBE(file, tape->random_seed);
7639 putFile32BitBE(file, tape->date);
7640 putFile32BitBE(file, tape->length);
7642 putFile8Bit(file, store_participating_players);
7644 /* unused bytes not at the end here for 4-byte alignment of engine_version */
7645 WriteUnusedBytesToFile(file, TAPE_CHUNK_HEAD_UNUSED);
7647 putFileVersion(file, tape->engine_version);
7650 static void SaveTape_INFO(FILE *file, struct TapeInfo *tape)
7652 int level_identifier_size = strlen(tape->level_identifier) + 1;
7655 putFile16BitBE(file, level_identifier_size);
7657 for (i = 0; i < level_identifier_size; i++)
7658 putFile8Bit(file, tape->level_identifier[i]);
7660 putFile16BitBE(file, tape->level_nr);
7663 static void SaveTape_BODY(FILE *file, struct TapeInfo *tape)
7667 for (i = 0; i < tape->length; i++)
7669 for (j = 0; j < MAX_PLAYERS; j++)
7670 if (tape->player_participates[j])
7671 putFile8Bit(file, tape->pos[i].action[j]);
7673 putFile8Bit(file, tape->pos[i].delay);
7677 void SaveTape(int nr)
7679 char *filename = getTapeFilename(nr);
7681 int num_participating_players = 0;
7682 int info_chunk_size;
7683 int body_chunk_size;
7686 InitTapeDirectory(leveldir_current->subdir);
7688 if (!(file = fopen(filename, MODE_WRITE)))
7690 Error(ERR_WARN, "cannot save level recording file '%s'", filename);
7694 tape.file_version = FILE_VERSION_ACTUAL;
7695 tape.game_version = GAME_VERSION_ACTUAL;
7697 /* count number of participating players */
7698 for (i = 0; i < MAX_PLAYERS; i++)
7699 if (tape.player_participates[i])
7700 num_participating_players++;
7702 info_chunk_size = 2 + (strlen(tape.level_identifier) + 1) + 2;
7703 body_chunk_size = (num_participating_players + 1) * tape.length;
7705 putFileChunkBE(file, "RND1", CHUNK_SIZE_UNDEFINED);
7706 putFileChunkBE(file, "TAPE", CHUNK_SIZE_NONE);
7708 putFileChunkBE(file, "VERS", TAPE_CHUNK_VERS_SIZE);
7709 SaveTape_VERS(file, &tape);
7711 putFileChunkBE(file, "HEAD", TAPE_CHUNK_HEAD_SIZE);
7712 SaveTape_HEAD(file, &tape);
7714 putFileChunkBE(file, "INFO", info_chunk_size);
7715 SaveTape_INFO(file, &tape);
7717 putFileChunkBE(file, "BODY", body_chunk_size);
7718 SaveTape_BODY(file, &tape);
7722 SetFilePermissions(filename, PERMS_PRIVATE);
7724 tape.changed = FALSE;
7727 boolean SaveTapeChecked(int nr)
7729 char *filename = getTapeFilename(nr);
7730 boolean new_tape = !fileExists(filename);
7731 boolean tape_saved = FALSE;
7733 if (new_tape || Request("Replace old tape?", REQ_ASK))
7738 Request("Tape saved!", REQ_CONFIRM);
7746 void DumpTape(struct TapeInfo *tape)
7748 int tape_frame_counter;
7751 if (tape->no_valid_file)
7753 Error(ERR_WARN, "cannot dump -- no valid tape file found");
7759 Print("Tape of Level %03d (file version %08d, game version %08d)\n",
7760 tape->level_nr, tape->file_version, tape->game_version);
7761 Print(" (effective engine version %08d)\n",
7762 tape->engine_version);
7763 Print("Level series identifier: '%s'\n", tape->level_identifier);
7766 tape_frame_counter = 0;
7768 for (i = 0; i < tape->length; i++)
7770 if (i >= MAX_TAPE_LEN)
7775 for (j = 0; j < MAX_PLAYERS; j++)
7777 if (tape->player_participates[j])
7779 int action = tape->pos[i].action[j];
7781 Print("%d:%02x ", j, action);
7782 Print("[%c%c%c%c|%c%c] - ",
7783 (action & JOY_LEFT ? '<' : ' '),
7784 (action & JOY_RIGHT ? '>' : ' '),
7785 (action & JOY_UP ? '^' : ' '),
7786 (action & JOY_DOWN ? 'v' : ' '),
7787 (action & JOY_BUTTON_1 ? '1' : ' '),
7788 (action & JOY_BUTTON_2 ? '2' : ' '));
7792 Print("(%03d) ", tape->pos[i].delay);
7793 Print("[%05d]\n", tape_frame_counter);
7795 tape_frame_counter += tape->pos[i].delay;
7802 /* ========================================================================= */
7803 /* score file functions */
7804 /* ========================================================================= */
7806 void LoadScore(int nr)
7809 char *filename = getScoreFilename(nr);
7810 char cookie[MAX_LINE_LEN];
7811 char line[MAX_LINE_LEN];
7815 /* always start with reliable default values */
7816 for (i = 0; i < MAX_SCORE_ENTRIES; i++)
7818 strcpy(highscore[i].Name, EMPTY_PLAYER_NAME);
7819 highscore[i].Score = 0;
7822 if (!(file = fopen(filename, MODE_READ)))
7825 /* check file identifier */
7826 if (fgets(cookie, MAX_LINE_LEN, file) == NULL)
7828 if (strlen(cookie) > 0 && cookie[strlen(cookie) - 1] == '\n')
7829 cookie[strlen(cookie) - 1] = '\0';
7831 if (!checkCookieString(cookie, SCORE_COOKIE))
7833 Error(ERR_WARN, "unknown format of score file '%s'", filename);
7838 for (i = 0; i < MAX_SCORE_ENTRIES; i++)
7840 if (fscanf(file, "%d", &highscore[i].Score) == EOF)
7841 Error(ERR_WARN, "fscanf() failed; %s", strerror(errno));
7842 if (fgets(line, MAX_LINE_LEN, file) == NULL)
7845 if (strlen(line) > 0 && line[strlen(line) - 1] == '\n')
7846 line[strlen(line) - 1] = '\0';
7848 for (line_ptr = line; *line_ptr; line_ptr++)
7850 if (*line_ptr != ' ' && *line_ptr != '\t' && *line_ptr != '\0')
7852 strncpy(highscore[i].Name, line_ptr, MAX_PLAYER_NAME_LEN);
7853 highscore[i].Name[MAX_PLAYER_NAME_LEN] = '\0';
7862 void SaveScore(int nr)
7865 char *filename = getScoreFilename(nr);
7868 InitScoreDirectory(leveldir_current->subdir);
7870 if (!(file = fopen(filename, MODE_WRITE)))
7872 Error(ERR_WARN, "cannot save score for level %d", nr);
7876 fprintf(file, "%s\n\n", SCORE_COOKIE);
7878 for (i = 0; i < MAX_SCORE_ENTRIES; i++)
7879 fprintf(file, "%d %s\n", highscore[i].Score, highscore[i].Name);
7883 SetFilePermissions(filename, PERMS_PUBLIC);
7887 /* ========================================================================= */
7888 /* setup file functions */
7889 /* ========================================================================= */
7891 #define TOKEN_STR_PLAYER_PREFIX "player_"
7894 #define SETUP_TOKEN_PLAYER_NAME 0
7895 #define SETUP_TOKEN_SOUND 1
7896 #define SETUP_TOKEN_SOUND_LOOPS 2
7897 #define SETUP_TOKEN_SOUND_MUSIC 3
7898 #define SETUP_TOKEN_SOUND_SIMPLE 4
7899 #define SETUP_TOKEN_TOONS 5
7900 #define SETUP_TOKEN_SCROLL_DELAY 6
7901 #define SETUP_TOKEN_SCROLL_DELAY_VALUE 7
7902 #define SETUP_TOKEN_ENGINE_SNAPSHOT_MODE 8
7903 #define SETUP_TOKEN_ENGINE_SNAPSHOT_MEMORY 9
7904 #define SETUP_TOKEN_FADE_SCREENS 10
7905 #define SETUP_TOKEN_AUTORECORD 11
7906 #define SETUP_TOKEN_SHOW_TITLESCREEN 12
7907 #define SETUP_TOKEN_QUICK_DOORS 13
7908 #define SETUP_TOKEN_TEAM_MODE 14
7909 #define SETUP_TOKEN_HANDICAP 15
7910 #define SETUP_TOKEN_SKIP_LEVELS 16
7911 #define SETUP_TOKEN_TIME_LIMIT 17
7912 #define SETUP_TOKEN_FULLSCREEN 18
7913 #define SETUP_TOKEN_WINDOW_SCALING_PERCENT 19
7914 #define SETUP_TOKEN_WINDOW_SCALING_QUALITY 20
7915 #define SETUP_TOKEN_SCREEN_RENDERING_MODE 21
7916 #define SETUP_TOKEN_ASK_ON_ESCAPE 22
7917 #define SETUP_TOKEN_ASK_ON_ESCAPE_EDITOR 23
7918 #define SETUP_TOKEN_QUICK_SWITCH 24
7919 #define SETUP_TOKEN_INPUT_ON_FOCUS 25
7920 #define SETUP_TOKEN_PREFER_AGA_GRAPHICS 26
7921 #define SETUP_TOKEN_GAME_FRAME_DELAY 27
7922 #define SETUP_TOKEN_SP_SHOW_BORDER_ELEMENTS 28
7923 #define SETUP_TOKEN_SMALL_GAME_GRAPHICS 29
7924 #define SETUP_TOKEN_SHOW_SNAPSHOT_BUTTONS 30
7925 #define SETUP_TOKEN_GRAPHICS_SET 31
7926 #define SETUP_TOKEN_SOUNDS_SET 32
7927 #define SETUP_TOKEN_MUSIC_SET 33
7928 #define SETUP_TOKEN_OVERRIDE_LEVEL_GRAPHICS 34
7929 #define SETUP_TOKEN_OVERRIDE_LEVEL_SOUNDS 35
7930 #define SETUP_TOKEN_OVERRIDE_LEVEL_MUSIC 36
7931 #define SETUP_TOKEN_VOLUME_SIMPLE 37
7932 #define SETUP_TOKEN_VOLUME_LOOPS 38
7933 #define SETUP_TOKEN_VOLUME_MUSIC 39
7934 #define SETUP_TOKEN_TOUCH_CONTROL_TYPE 40
7935 #define SETUP_TOKEN_TOUCH_MOVE_DISTANCE 41
7936 #define SETUP_TOKEN_TOUCH_DROP_DISTANCE 42
7938 #define NUM_GLOBAL_SETUP_TOKENS 43
7941 #define SETUP_TOKEN_EDITOR_EL_BOULDERDASH 0
7942 #define SETUP_TOKEN_EDITOR_EL_EMERALD_MINE 1
7943 #define SETUP_TOKEN_EDITOR_EL_EMERALD_MINE_CLUB 2
7944 #define SETUP_TOKEN_EDITOR_EL_MORE 3
7945 #define SETUP_TOKEN_EDITOR_EL_SOKOBAN 4
7946 #define SETUP_TOKEN_EDITOR_EL_SUPAPLEX 5
7947 #define SETUP_TOKEN_EDITOR_EL_DIAMOND_CAVES 6
7948 #define SETUP_TOKEN_EDITOR_EL_DX_BOULDERDASH 7
7949 #define SETUP_TOKEN_EDITOR_EL_CHARS 8
7950 #define SETUP_TOKEN_EDITOR_EL_STEEL_CHARS 9
7951 #define SETUP_TOKEN_EDITOR_EL_CUSTOM 10
7952 #define SETUP_TOKEN_EDITOR_EL_HEADLINES 11
7953 #define SETUP_TOKEN_EDITOR_EL_USER_DEFINED 12
7954 #define SETUP_TOKEN_EDITOR_EL_DYNAMIC 13
7955 #define SETUP_TOKEN_EDITOR_EL_BY_GAME 14
7956 #define SETUP_TOKEN_EDITOR_EL_BY_TYPE 15
7957 #define SETUP_TOKEN_EDITOR_SHOW_ELEMENT_TOKEN 16
7959 #define NUM_EDITOR_SETUP_TOKENS 17
7961 /* editor cascade setup */
7962 #define SETUP_TOKEN_EDITOR_CASCADE_BD 0
7963 #define SETUP_TOKEN_EDITOR_CASCADE_EM 1
7964 #define SETUP_TOKEN_EDITOR_CASCADE_EMC 2
7965 #define SETUP_TOKEN_EDITOR_CASCADE_RND 3
7966 #define SETUP_TOKEN_EDITOR_CASCADE_SB 4
7967 #define SETUP_TOKEN_EDITOR_CASCADE_SP 5
7968 #define SETUP_TOKEN_EDITOR_CASCADE_DC 6
7969 #define SETUP_TOKEN_EDITOR_CASCADE_DX 7
7970 #define SETUP_TOKEN_EDITOR_CASCADE_TEXT 8
7971 #define SETUP_TOKEN_EDITOR_CASCADE_STEELTEXT 9
7972 #define SETUP_TOKEN_EDITOR_CASCADE_CE 10
7973 #define SETUP_TOKEN_EDITOR_CASCADE_GE 11
7974 #define SETUP_TOKEN_EDITOR_CASCADE_REF 12
7975 #define SETUP_TOKEN_EDITOR_CASCADE_USER 13
7976 #define SETUP_TOKEN_EDITOR_CASCADE_DYNAMIC 14
7978 #define NUM_EDITOR_CASCADE_SETUP_TOKENS 15
7980 /* shortcut setup */
7981 #define SETUP_TOKEN_SHORTCUT_SAVE_GAME 0
7982 #define SETUP_TOKEN_SHORTCUT_LOAD_GAME 1
7983 #define SETUP_TOKEN_SHORTCUT_TOGGLE_PAUSE 2
7984 #define SETUP_TOKEN_SHORTCUT_FOCUS_PLAYER_1 3
7985 #define SETUP_TOKEN_SHORTCUT_FOCUS_PLAYER_2 4
7986 #define SETUP_TOKEN_SHORTCUT_FOCUS_PLAYER_3 5
7987 #define SETUP_TOKEN_SHORTCUT_FOCUS_PLAYER_4 6
7988 #define SETUP_TOKEN_SHORTCUT_FOCUS_PLAYER_ALL 7
7989 #define SETUP_TOKEN_SHORTCUT_TAPE_EJECT 8
7990 #define SETUP_TOKEN_SHORTCUT_TAPE_EXTRA 9
7991 #define SETUP_TOKEN_SHORTCUT_TAPE_STOP 10
7992 #define SETUP_TOKEN_SHORTCUT_TAPE_PAUSE 11
7993 #define SETUP_TOKEN_SHORTCUT_TAPE_RECORD 12
7994 #define SETUP_TOKEN_SHORTCUT_TAPE_PLAY 13
7995 #define SETUP_TOKEN_SHORTCUT_SOUND_SIMPLE 14
7996 #define SETUP_TOKEN_SHORTCUT_SOUND_LOOPS 15
7997 #define SETUP_TOKEN_SHORTCUT_SOUND_MUSIC 16
7998 #define SETUP_TOKEN_SHORTCUT_SNAP_LEFT 17
7999 #define SETUP_TOKEN_SHORTCUT_SNAP_RIGHT 18
8000 #define SETUP_TOKEN_SHORTCUT_SNAP_UP 19
8001 #define SETUP_TOKEN_SHORTCUT_SNAP_DOWN 20
8003 #define NUM_SHORTCUT_SETUP_TOKENS 21
8006 #define SETUP_TOKEN_PLAYER_USE_JOYSTICK 0
8007 #define SETUP_TOKEN_PLAYER_JOY_DEVICE_NAME 1
8008 #define SETUP_TOKEN_PLAYER_JOY_XLEFT 2
8009 #define SETUP_TOKEN_PLAYER_JOY_XMIDDLE 3
8010 #define SETUP_TOKEN_PLAYER_JOY_XRIGHT 4
8011 #define SETUP_TOKEN_PLAYER_JOY_YUPPER 5
8012 #define SETUP_TOKEN_PLAYER_JOY_YMIDDLE 6
8013 #define SETUP_TOKEN_PLAYER_JOY_YLOWER 7
8014 #define SETUP_TOKEN_PLAYER_JOY_SNAP 8
8015 #define SETUP_TOKEN_PLAYER_JOY_DROP 9
8016 #define SETUP_TOKEN_PLAYER_KEY_LEFT 10
8017 #define SETUP_TOKEN_PLAYER_KEY_RIGHT 11
8018 #define SETUP_TOKEN_PLAYER_KEY_UP 12
8019 #define SETUP_TOKEN_PLAYER_KEY_DOWN 13
8020 #define SETUP_TOKEN_PLAYER_KEY_SNAP 14
8021 #define SETUP_TOKEN_PLAYER_KEY_DROP 15
8023 #define NUM_PLAYER_SETUP_TOKENS 16
8026 #define SETUP_TOKEN_SYSTEM_SDL_VIDEODRIVER 0
8027 #define SETUP_TOKEN_SYSTEM_SDL_AUDIODRIVER 1
8028 #define SETUP_TOKEN_SYSTEM_AUDIO_FRAGMENT_SIZE 2
8030 #define NUM_SYSTEM_SETUP_TOKENS 3
8032 /* internal setup */
8033 #define SETUP_TOKEN_INT_PROGRAM_TITLE 0
8034 #define SETUP_TOKEN_INT_PROGRAM_AUTHOR 1
8035 #define SETUP_TOKEN_INT_PROGRAM_EMAIL 2
8036 #define SETUP_TOKEN_INT_PROGRAM_WEBSITE 3
8037 #define SETUP_TOKEN_INT_PROGRAM_COPYRIGHT 4
8038 #define SETUP_TOKEN_INT_PROGRAM_COMPANY 5
8039 #define SETUP_TOKEN_INT_PROGRAM_ICON_FILE 6
8040 #define SETUP_TOKEN_INT_DEFAULT_GRAPHICS_SET 7
8041 #define SETUP_TOKEN_INT_DEFAULT_SOUNDS_SET 8
8042 #define SETUP_TOKEN_INT_DEFAULT_MUSIC_SET 9
8043 #define SETUP_TOKEN_INT_FALLBACK_GRAPHICS_FILE 10
8044 #define SETUP_TOKEN_INT_FALLBACK_SOUNDS_FILE 11
8045 #define SETUP_TOKEN_INT_FALLBACK_MUSIC_FILE 12
8046 #define SETUP_TOKEN_INT_DEFAULT_LEVEL_SERIES 13
8047 #define SETUP_TOKEN_INT_CHOOSE_FROM_TOP_LEVELDIR 14
8048 #define SETUP_TOKEN_INT_DEFAULT_WINDOW_WIDTH 15
8049 #define SETUP_TOKEN_INT_DEFAULT_WINDOW_HEIGHT 16
8051 #define NUM_INTERNAL_SETUP_TOKENS 17
8054 #define SETUP_TOKEN_DEBUG_FRAME_DELAY_0 0
8055 #define SETUP_TOKEN_DEBUG_FRAME_DELAY_1 1
8056 #define SETUP_TOKEN_DEBUG_FRAME_DELAY_2 2
8057 #define SETUP_TOKEN_DEBUG_FRAME_DELAY_3 3
8058 #define SETUP_TOKEN_DEBUG_FRAME_DELAY_4 4
8059 #define SETUP_TOKEN_DEBUG_FRAME_DELAY_5 5
8060 #define SETUP_TOKEN_DEBUG_FRAME_DELAY_6 6
8061 #define SETUP_TOKEN_DEBUG_FRAME_DELAY_7 7
8062 #define SETUP_TOKEN_DEBUG_FRAME_DELAY_8 8
8063 #define SETUP_TOKEN_DEBUG_FRAME_DELAY_9 9
8064 #define SETUP_TOKEN_DEBUG_FRAME_DELAY_KEY_0 10
8065 #define SETUP_TOKEN_DEBUG_FRAME_DELAY_KEY_1 11
8066 #define SETUP_TOKEN_DEBUG_FRAME_DELAY_KEY_2 12
8067 #define SETUP_TOKEN_DEBUG_FRAME_DELAY_KEY_3 13
8068 #define SETUP_TOKEN_DEBUG_FRAME_DELAY_KEY_4 14
8069 #define SETUP_TOKEN_DEBUG_FRAME_DELAY_KEY_5 15
8070 #define SETUP_TOKEN_DEBUG_FRAME_DELAY_KEY_6 16
8071 #define SETUP_TOKEN_DEBUG_FRAME_DELAY_KEY_7 17
8072 #define SETUP_TOKEN_DEBUG_FRAME_DELAY_KEY_8 18
8073 #define SETUP_TOKEN_DEBUG_FRAME_DELAY_KEY_9 19
8074 #define SETUP_TOKEN_DEBUG_FRAME_DELAY_USE_MOD_KEY 20
8075 #define SETUP_TOKEN_DEBUG_FRAME_DELAY_GAME_ONLY 21
8077 #define NUM_DEBUG_SETUP_TOKENS 22
8080 #define SETUP_TOKEN_OPTIONS_VERBOSE 0
8082 #define NUM_OPTIONS_SETUP_TOKENS 1
8085 static struct SetupInfo si;
8086 static struct SetupEditorInfo sei;
8087 static struct SetupEditorCascadeInfo seci;
8088 static struct SetupShortcutInfo ssi;
8089 static struct SetupInputInfo sii;
8090 static struct SetupSystemInfo syi;
8091 static struct SetupInternalInfo sxi;
8092 static struct SetupDebugInfo sdi;
8093 static struct OptionInfo soi;
8095 static struct TokenInfo global_setup_tokens[] =
8097 { TYPE_STRING, &si.player_name, "player_name" },
8098 { TYPE_SWITCH, &si.sound, "sound" },
8099 { TYPE_SWITCH, &si.sound_loops, "repeating_sound_loops" },
8100 { TYPE_SWITCH, &si.sound_music, "background_music" },
8101 { TYPE_SWITCH, &si.sound_simple, "simple_sound_effects" },
8102 { TYPE_SWITCH, &si.toons, "toons" },
8103 { TYPE_SWITCH, &si.scroll_delay, "scroll_delay" },
8104 { TYPE_INTEGER,&si.scroll_delay_value, "scroll_delay_value" },
8105 { TYPE_STRING, &si.engine_snapshot_mode, "engine_snapshot_mode" },
8106 { TYPE_INTEGER,&si.engine_snapshot_memory, "engine_snapshot_memory" },
8107 { TYPE_SWITCH, &si.fade_screens, "fade_screens" },
8108 { TYPE_SWITCH, &si.autorecord, "automatic_tape_recording"},
8109 { TYPE_SWITCH, &si.show_titlescreen, "show_titlescreen" },
8110 { TYPE_SWITCH, &si.quick_doors, "quick_doors" },
8111 { TYPE_SWITCH, &si.team_mode, "team_mode" },
8112 { TYPE_SWITCH, &si.handicap, "handicap" },
8113 { TYPE_SWITCH, &si.skip_levels, "skip_levels" },
8114 { TYPE_SWITCH, &si.time_limit, "time_limit" },
8115 { TYPE_SWITCH, &si.fullscreen, "fullscreen" },
8116 { TYPE_INTEGER,&si.window_scaling_percent, "window_scaling_percent" },
8117 { TYPE_STRING, &si.window_scaling_quality, "window_scaling_quality" },
8118 { TYPE_STRING, &si.screen_rendering_mode, "screen_rendering_mode" },
8119 { TYPE_SWITCH, &si.ask_on_escape, "ask_on_escape" },
8120 { TYPE_SWITCH, &si.ask_on_escape_editor, "ask_on_escape_editor" },
8121 { TYPE_SWITCH, &si.quick_switch, "quick_player_switch" },
8122 { TYPE_SWITCH, &si.input_on_focus, "input_on_focus" },
8123 { TYPE_SWITCH, &si.prefer_aga_graphics, "prefer_aga_graphics" },
8124 { TYPE_INTEGER,&si.game_frame_delay, "game_frame_delay" },
8125 { TYPE_SWITCH, &si.sp_show_border_elements, "sp_show_border_elements" },
8126 { TYPE_SWITCH, &si.small_game_graphics, "small_game_graphics" },
8127 { TYPE_SWITCH, &si.show_snapshot_buttons, "show_snapshot_buttons" },
8128 { TYPE_STRING, &si.graphics_set, "graphics_set" },
8129 { TYPE_STRING, &si.sounds_set, "sounds_set" },
8130 { TYPE_STRING, &si.music_set, "music_set" },
8131 { TYPE_SWITCH3,&si.override_level_graphics, "override_level_graphics" },
8132 { TYPE_SWITCH3,&si.override_level_sounds, "override_level_sounds" },
8133 { TYPE_SWITCH3,&si.override_level_music, "override_level_music" },
8134 { TYPE_INTEGER,&si.volume_simple, "volume_simple" },
8135 { TYPE_INTEGER,&si.volume_loops, "volume_loops" },
8136 { TYPE_INTEGER,&si.volume_music, "volume_music" },
8137 { TYPE_STRING, &si.touch.control_type, "touch.control_type" },
8138 { TYPE_INTEGER,&si.touch.move_distance, "touch.move_distance" },
8139 { TYPE_INTEGER,&si.touch.drop_distance, "touch.drop_distance" },
8142 static struct TokenInfo editor_setup_tokens[] =
8144 { TYPE_SWITCH, &sei.el_boulderdash, "editor.el_boulderdash" },
8145 { TYPE_SWITCH, &sei.el_emerald_mine, "editor.el_emerald_mine" },
8146 { TYPE_SWITCH, &sei.el_emerald_mine_club,"editor.el_emerald_mine_club"},
8147 { TYPE_SWITCH, &sei.el_more, "editor.el_more" },
8148 { TYPE_SWITCH, &sei.el_sokoban, "editor.el_sokoban" },
8149 { TYPE_SWITCH, &sei.el_supaplex, "editor.el_supaplex" },
8150 { TYPE_SWITCH, &sei.el_diamond_caves, "editor.el_diamond_caves" },
8151 { TYPE_SWITCH, &sei.el_dx_boulderdash,"editor.el_dx_boulderdash" },
8152 { TYPE_SWITCH, &sei.el_chars, "editor.el_chars" },
8153 { TYPE_SWITCH, &sei.el_steel_chars, "editor.el_steel_chars" },
8154 { TYPE_SWITCH, &sei.el_custom, "editor.el_custom" },
8155 { TYPE_SWITCH, &sei.el_headlines, "editor.el_headlines" },
8156 { TYPE_SWITCH, &sei.el_user_defined, "editor.el_user_defined" },
8157 { TYPE_SWITCH, &sei.el_dynamic, "editor.el_dynamic" },
8158 { TYPE_SWITCH, &sei.el_by_game, "editor.el_by_game" },
8159 { TYPE_SWITCH, &sei.el_by_type, "editor.el_by_type" },
8160 { TYPE_SWITCH, &sei.show_element_token,"editor.show_element_token" },
8163 static struct TokenInfo editor_cascade_setup_tokens[] =
8165 { TYPE_SWITCH, &seci.el_bd, "editor.cascade.el_bd" },
8166 { TYPE_SWITCH, &seci.el_em, "editor.cascade.el_em" },
8167 { TYPE_SWITCH, &seci.el_emc, "editor.cascade.el_emc" },
8168 { TYPE_SWITCH, &seci.el_rnd, "editor.cascade.el_rnd" },
8169 { TYPE_SWITCH, &seci.el_sb, "editor.cascade.el_sb" },
8170 { TYPE_SWITCH, &seci.el_sp, "editor.cascade.el_sp" },
8171 { TYPE_SWITCH, &seci.el_dc, "editor.cascade.el_dc" },
8172 { TYPE_SWITCH, &seci.el_dx, "editor.cascade.el_dx" },
8173 { TYPE_SWITCH, &seci.el_chars, "editor.cascade.el_chars" },
8174 { TYPE_SWITCH, &seci.el_steel_chars, "editor.cascade.el_steel_chars" },
8175 { TYPE_SWITCH, &seci.el_ce, "editor.cascade.el_ce" },
8176 { TYPE_SWITCH, &seci.el_ge, "editor.cascade.el_ge" },
8177 { TYPE_SWITCH, &seci.el_ref, "editor.cascade.el_ref" },
8178 { TYPE_SWITCH, &seci.el_user, "editor.cascade.el_user" },
8179 { TYPE_SWITCH, &seci.el_dynamic, "editor.cascade.el_dynamic" },
8182 static struct TokenInfo shortcut_setup_tokens[] =
8184 { TYPE_KEY_X11, &ssi.save_game, "shortcut.save_game" },
8185 { TYPE_KEY_X11, &ssi.load_game, "shortcut.load_game" },
8186 { TYPE_KEY_X11, &ssi.toggle_pause, "shortcut.toggle_pause" },
8187 { TYPE_KEY_X11, &ssi.focus_player[0], "shortcut.focus_player_1" },
8188 { TYPE_KEY_X11, &ssi.focus_player[1], "shortcut.focus_player_2" },
8189 { TYPE_KEY_X11, &ssi.focus_player[2], "shortcut.focus_player_3" },
8190 { TYPE_KEY_X11, &ssi.focus_player[3], "shortcut.focus_player_4" },
8191 { TYPE_KEY_X11, &ssi.focus_player_all,"shortcut.focus_player_all" },
8192 { TYPE_KEY_X11, &ssi.tape_eject, "shortcut.tape_eject" },
8193 { TYPE_KEY_X11, &ssi.tape_extra, "shortcut.tape_extra" },
8194 { TYPE_KEY_X11, &ssi.tape_stop, "shortcut.tape_stop" },
8195 { TYPE_KEY_X11, &ssi.tape_pause, "shortcut.tape_pause" },
8196 { TYPE_KEY_X11, &ssi.tape_record, "shortcut.tape_record" },
8197 { TYPE_KEY_X11, &ssi.tape_play, "shortcut.tape_play" },
8198 { TYPE_KEY_X11, &ssi.sound_simple, "shortcut.sound_simple" },
8199 { TYPE_KEY_X11, &ssi.sound_loops, "shortcut.sound_loops" },
8200 { TYPE_KEY_X11, &ssi.sound_music, "shortcut.sound_music" },
8201 { TYPE_KEY_X11, &ssi.snap_left, "shortcut.snap_left" },
8202 { TYPE_KEY_X11, &ssi.snap_right, "shortcut.snap_right" },
8203 { TYPE_KEY_X11, &ssi.snap_up, "shortcut.snap_up" },
8204 { TYPE_KEY_X11, &ssi.snap_down, "shortcut.snap_down" },
8207 static struct TokenInfo player_setup_tokens[] =
8209 { TYPE_BOOLEAN, &sii.use_joystick, ".use_joystick" },
8210 { TYPE_STRING, &sii.joy.device_name, ".joy.device_name" },
8211 { TYPE_INTEGER, &sii.joy.xleft, ".joy.xleft" },
8212 { TYPE_INTEGER, &sii.joy.xmiddle, ".joy.xmiddle" },
8213 { TYPE_INTEGER, &sii.joy.xright, ".joy.xright" },
8214 { TYPE_INTEGER, &sii.joy.yupper, ".joy.yupper" },
8215 { TYPE_INTEGER, &sii.joy.ymiddle, ".joy.ymiddle" },
8216 { TYPE_INTEGER, &sii.joy.ylower, ".joy.ylower" },
8217 { TYPE_INTEGER, &sii.joy.snap, ".joy.snap_field" },
8218 { TYPE_INTEGER, &sii.joy.drop, ".joy.place_bomb" },
8219 { TYPE_KEY_X11, &sii.key.left, ".key.move_left" },
8220 { TYPE_KEY_X11, &sii.key.right, ".key.move_right" },
8221 { TYPE_KEY_X11, &sii.key.up, ".key.move_up" },
8222 { TYPE_KEY_X11, &sii.key.down, ".key.move_down" },
8223 { TYPE_KEY_X11, &sii.key.snap, ".key.snap_field" },
8224 { TYPE_KEY_X11, &sii.key.drop, ".key.place_bomb" },
8227 static struct TokenInfo system_setup_tokens[] =
8229 { TYPE_STRING, &syi.sdl_videodriver, "system.sdl_videodriver" },
8230 { TYPE_STRING, &syi.sdl_audiodriver, "system.sdl_audiodriver" },
8231 { TYPE_INTEGER, &syi.audio_fragment_size,"system.audio_fragment_size" },
8234 static struct TokenInfo internal_setup_tokens[] =
8236 { TYPE_STRING, &sxi.program_title, "program_title" },
8237 { TYPE_STRING, &sxi.program_author, "program_author" },
8238 { TYPE_STRING, &sxi.program_email, "program_email" },
8239 { TYPE_STRING, &sxi.program_website, "program_website" },
8240 { TYPE_STRING, &sxi.program_copyright, "program_copyright" },
8241 { TYPE_STRING, &sxi.program_company, "program_company" },
8242 { TYPE_STRING, &sxi.program_icon_file, "program_icon_file" },
8243 { TYPE_STRING, &sxi.default_graphics_set, "default_graphics_set" },
8244 { TYPE_STRING, &sxi.default_sounds_set, "default_sounds_set" },
8245 { TYPE_STRING, &sxi.default_music_set, "default_music_set" },
8246 { TYPE_STRING, &sxi.fallback_graphics_file, "fallback_graphics_file"},
8247 { TYPE_STRING, &sxi.fallback_sounds_file, "fallback_sounds_file" },
8248 { TYPE_STRING, &sxi.fallback_music_file, "fallback_music_file" },
8249 { TYPE_STRING, &sxi.default_level_series, "default_level_series" },
8250 { TYPE_BOOLEAN,&sxi.choose_from_top_leveldir, "choose_from_top_leveldir" },
8251 { TYPE_INTEGER,&sxi.default_window_width, "default_window_width" },
8252 { TYPE_INTEGER,&sxi.default_window_height, "default_window_height" },
8255 static struct TokenInfo debug_setup_tokens[] =
8257 { TYPE_INTEGER, &sdi.frame_delay[0], "debug.frame_delay_0" },
8258 { TYPE_INTEGER, &sdi.frame_delay[1], "debug.frame_delay_1" },
8259 { TYPE_INTEGER, &sdi.frame_delay[2], "debug.frame_delay_2" },
8260 { TYPE_INTEGER, &sdi.frame_delay[3], "debug.frame_delay_3" },
8261 { TYPE_INTEGER, &sdi.frame_delay[4], "debug.frame_delay_4" },
8262 { TYPE_INTEGER, &sdi.frame_delay[5], "debug.frame_delay_5" },
8263 { TYPE_INTEGER, &sdi.frame_delay[6], "debug.frame_delay_6" },
8264 { TYPE_INTEGER, &sdi.frame_delay[7], "debug.frame_delay_7" },
8265 { TYPE_INTEGER, &sdi.frame_delay[8], "debug.frame_delay_8" },
8266 { TYPE_INTEGER, &sdi.frame_delay[9], "debug.frame_delay_9" },
8267 { TYPE_KEY_X11, &sdi.frame_delay_key[0], "debug.key.frame_delay_0" },
8268 { TYPE_KEY_X11, &sdi.frame_delay_key[1], "debug.key.frame_delay_1" },
8269 { TYPE_KEY_X11, &sdi.frame_delay_key[2], "debug.key.frame_delay_2" },
8270 { TYPE_KEY_X11, &sdi.frame_delay_key[3], "debug.key.frame_delay_3" },
8271 { TYPE_KEY_X11, &sdi.frame_delay_key[4], "debug.key.frame_delay_4" },
8272 { TYPE_KEY_X11, &sdi.frame_delay_key[5], "debug.key.frame_delay_5" },
8273 { TYPE_KEY_X11, &sdi.frame_delay_key[6], "debug.key.frame_delay_6" },
8274 { TYPE_KEY_X11, &sdi.frame_delay_key[7], "debug.key.frame_delay_7" },
8275 { TYPE_KEY_X11, &sdi.frame_delay_key[8], "debug.key.frame_delay_8" },
8276 { TYPE_KEY_X11, &sdi.frame_delay_key[9], "debug.key.frame_delay_9" },
8277 { TYPE_BOOLEAN, &sdi.frame_delay_use_mod_key,"debug.frame_delay.use_mod_key"},
8278 { TYPE_BOOLEAN, &sdi.frame_delay_game_only, "debug.frame_delay.game_only" },
8281 static struct TokenInfo options_setup_tokens[] =
8283 { TYPE_BOOLEAN, &soi.verbose, "options.verbose" },
8286 static char *get_corrected_login_name(char *login_name)
8288 /* needed because player name must be a fixed length string */
8289 char *login_name_new = checked_malloc(MAX_PLAYER_NAME_LEN + 1);
8291 strncpy(login_name_new, login_name, MAX_PLAYER_NAME_LEN);
8292 login_name_new[MAX_PLAYER_NAME_LEN] = '\0';
8294 if (strlen(login_name) > MAX_PLAYER_NAME_LEN) /* name has been cut */
8295 if (strchr(login_name_new, ' '))
8296 *strchr(login_name_new, ' ') = '\0';
8298 return login_name_new;
8301 static void setSetupInfoToDefaults(struct SetupInfo *si)
8305 si->player_name = get_corrected_login_name(getLoginName());
8308 si->sound_loops = TRUE;
8309 si->sound_music = TRUE;
8310 si->sound_simple = TRUE;
8312 si->scroll_delay = TRUE;
8313 si->scroll_delay_value = STD_SCROLL_DELAY;
8314 si->engine_snapshot_mode = getStringCopy(STR_SNAPSHOT_MODE_DEFAULT);
8315 si->engine_snapshot_memory = SNAPSHOT_MEMORY_DEFAULT;
8316 si->fade_screens = TRUE;
8317 si->autorecord = TRUE;
8318 si->show_titlescreen = TRUE;
8319 si->quick_doors = FALSE;
8320 si->team_mode = FALSE;
8321 si->handicap = TRUE;
8322 si->skip_levels = TRUE;
8323 si->time_limit = TRUE;
8324 si->fullscreen = FALSE;
8325 si->window_scaling_percent = STD_WINDOW_SCALING_PERCENT;
8326 si->window_scaling_quality = getStringCopy(SCALING_QUALITY_DEFAULT);
8327 si->screen_rendering_mode = getStringCopy(STR_SPECIAL_RENDERING_DEFAULT);
8328 si->ask_on_escape = TRUE;
8329 si->ask_on_escape_editor = TRUE;
8330 si->quick_switch = FALSE;
8331 si->input_on_focus = FALSE;
8332 si->prefer_aga_graphics = TRUE;
8333 si->game_frame_delay = GAME_FRAME_DELAY;
8334 si->sp_show_border_elements = FALSE;
8335 si->small_game_graphics = FALSE;
8336 si->show_snapshot_buttons = FALSE;
8338 si->graphics_set = getStringCopy(GFX_CLASSIC_SUBDIR);
8339 si->sounds_set = getStringCopy(SND_CLASSIC_SUBDIR);
8340 si->music_set = getStringCopy(MUS_CLASSIC_SUBDIR);
8342 si->override_level_graphics = FALSE;
8343 si->override_level_sounds = FALSE;
8344 si->override_level_music = FALSE;
8346 si->volume_simple = 100; /* percent */
8347 si->volume_loops = 100; /* percent */
8348 si->volume_music = 100; /* percent */
8350 si->touch.control_type = getStringCopy(TOUCH_CONTROL_DEFAULT);
8351 si->touch.move_distance = TOUCH_MOVE_DISTANCE_DEFAULT; /* percent */
8352 si->touch.drop_distance = TOUCH_DROP_DISTANCE_DEFAULT; /* percent */
8354 si->editor.el_boulderdash = TRUE;
8355 si->editor.el_emerald_mine = TRUE;
8356 si->editor.el_emerald_mine_club = TRUE;
8357 si->editor.el_more = TRUE;
8358 si->editor.el_sokoban = TRUE;
8359 si->editor.el_supaplex = TRUE;
8360 si->editor.el_diamond_caves = TRUE;
8361 si->editor.el_dx_boulderdash = TRUE;
8362 si->editor.el_chars = TRUE;
8363 si->editor.el_steel_chars = TRUE;
8364 si->editor.el_custom = TRUE;
8366 si->editor.el_headlines = TRUE;
8367 si->editor.el_user_defined = FALSE;
8368 si->editor.el_dynamic = TRUE;
8370 si->editor.show_element_token = FALSE;
8372 si->shortcut.save_game = DEFAULT_KEY_SAVE_GAME;
8373 si->shortcut.load_game = DEFAULT_KEY_LOAD_GAME;
8374 si->shortcut.toggle_pause = DEFAULT_KEY_TOGGLE_PAUSE;
8376 si->shortcut.focus_player[0] = DEFAULT_KEY_FOCUS_PLAYER_1;
8377 si->shortcut.focus_player[1] = DEFAULT_KEY_FOCUS_PLAYER_2;
8378 si->shortcut.focus_player[2] = DEFAULT_KEY_FOCUS_PLAYER_3;
8379 si->shortcut.focus_player[3] = DEFAULT_KEY_FOCUS_PLAYER_4;
8380 si->shortcut.focus_player_all = DEFAULT_KEY_FOCUS_PLAYER_ALL;
8382 si->shortcut.tape_eject = DEFAULT_KEY_TAPE_EJECT;
8383 si->shortcut.tape_extra = DEFAULT_KEY_TAPE_EXTRA;
8384 si->shortcut.tape_stop = DEFAULT_KEY_TAPE_STOP;
8385 si->shortcut.tape_pause = DEFAULT_KEY_TAPE_PAUSE;
8386 si->shortcut.tape_record = DEFAULT_KEY_TAPE_RECORD;
8387 si->shortcut.tape_play = DEFAULT_KEY_TAPE_PLAY;
8389 si->shortcut.sound_simple = DEFAULT_KEY_SOUND_SIMPLE;
8390 si->shortcut.sound_loops = DEFAULT_KEY_SOUND_LOOPS;
8391 si->shortcut.sound_music = DEFAULT_KEY_SOUND_MUSIC;
8393 si->shortcut.snap_left = DEFAULT_KEY_SNAP_LEFT;
8394 si->shortcut.snap_right = DEFAULT_KEY_SNAP_RIGHT;
8395 si->shortcut.snap_up = DEFAULT_KEY_SNAP_UP;
8396 si->shortcut.snap_down = DEFAULT_KEY_SNAP_DOWN;
8398 for (i = 0; i < MAX_PLAYERS; i++)
8400 si->input[i].use_joystick = FALSE;
8401 si->input[i].joy.device_name=getStringCopy(getDeviceNameFromJoystickNr(i));
8402 si->input[i].joy.xleft = JOYSTICK_XLEFT;
8403 si->input[i].joy.xmiddle = JOYSTICK_XMIDDLE;
8404 si->input[i].joy.xright = JOYSTICK_XRIGHT;
8405 si->input[i].joy.yupper = JOYSTICK_YUPPER;
8406 si->input[i].joy.ymiddle = JOYSTICK_YMIDDLE;
8407 si->input[i].joy.ylower = JOYSTICK_YLOWER;
8408 si->input[i].joy.snap = (i == 0 ? JOY_BUTTON_1 : 0);
8409 si->input[i].joy.drop = (i == 0 ? JOY_BUTTON_2 : 0);
8410 si->input[i].key.left = (i == 0 ? DEFAULT_KEY_LEFT : KSYM_UNDEFINED);
8411 si->input[i].key.right = (i == 0 ? DEFAULT_KEY_RIGHT : KSYM_UNDEFINED);
8412 si->input[i].key.up = (i == 0 ? DEFAULT_KEY_UP : KSYM_UNDEFINED);
8413 si->input[i].key.down = (i == 0 ? DEFAULT_KEY_DOWN : KSYM_UNDEFINED);
8414 si->input[i].key.snap = (i == 0 ? DEFAULT_KEY_SNAP : KSYM_UNDEFINED);
8415 si->input[i].key.drop = (i == 0 ? DEFAULT_KEY_DROP : KSYM_UNDEFINED);
8418 si->system.sdl_videodriver = getStringCopy(ARG_DEFAULT);
8419 si->system.sdl_audiodriver = getStringCopy(ARG_DEFAULT);
8420 si->system.audio_fragment_size = DEFAULT_AUDIO_FRAGMENT_SIZE;
8422 si->internal.program_title = getStringCopy(PROGRAM_TITLE_STRING);
8423 si->internal.program_author = getStringCopy(PROGRAM_AUTHOR_STRING);
8424 si->internal.program_email = getStringCopy(PROGRAM_EMAIL_STRING);
8425 si->internal.program_website = getStringCopy(PROGRAM_WEBSITE_STRING);
8426 si->internal.program_copyright = getStringCopy(PROGRAM_COPYRIGHT_STRING);
8427 si->internal.program_company = getStringCopy(PROGRAM_COMPANY_STRING);
8429 si->internal.program_icon_file = getStringCopy(PROGRAM_ICON_FILENAME);
8431 si->internal.default_graphics_set = getStringCopy(GFX_CLASSIC_SUBDIR);
8432 si->internal.default_sounds_set = getStringCopy(SND_CLASSIC_SUBDIR);
8433 si->internal.default_music_set = getStringCopy(MUS_CLASSIC_SUBDIR);
8435 si->internal.fallback_graphics_file = getStringCopy(UNDEFINED_FILENAME);
8436 si->internal.fallback_sounds_file = getStringCopy(UNDEFINED_FILENAME);
8437 si->internal.fallback_music_file = getStringCopy(UNDEFINED_FILENAME);
8439 si->internal.default_level_series = getStringCopy(UNDEFINED_LEVELSET);
8440 si->internal.choose_from_top_leveldir = FALSE;
8442 si->internal.default_window_width = WIN_XSIZE_DEFAULT;
8443 si->internal.default_window_height = WIN_YSIZE_DEFAULT;
8445 si->debug.frame_delay[0] = DEFAULT_FRAME_DELAY_0;
8446 si->debug.frame_delay[1] = DEFAULT_FRAME_DELAY_1;
8447 si->debug.frame_delay[2] = DEFAULT_FRAME_DELAY_2;
8448 si->debug.frame_delay[3] = DEFAULT_FRAME_DELAY_3;
8449 si->debug.frame_delay[4] = DEFAULT_FRAME_DELAY_4;
8450 si->debug.frame_delay[5] = DEFAULT_FRAME_DELAY_5;
8451 si->debug.frame_delay[6] = DEFAULT_FRAME_DELAY_6;
8452 si->debug.frame_delay[7] = DEFAULT_FRAME_DELAY_7;
8453 si->debug.frame_delay[8] = DEFAULT_FRAME_DELAY_8;
8454 si->debug.frame_delay[9] = DEFAULT_FRAME_DELAY_9;
8456 si->debug.frame_delay_key[0] = DEFAULT_KEY_FRAME_DELAY_0;
8457 si->debug.frame_delay_key[1] = DEFAULT_KEY_FRAME_DELAY_1;
8458 si->debug.frame_delay_key[2] = DEFAULT_KEY_FRAME_DELAY_2;
8459 si->debug.frame_delay_key[3] = DEFAULT_KEY_FRAME_DELAY_3;
8460 si->debug.frame_delay_key[4] = DEFAULT_KEY_FRAME_DELAY_4;
8461 si->debug.frame_delay_key[5] = DEFAULT_KEY_FRAME_DELAY_5;
8462 si->debug.frame_delay_key[6] = DEFAULT_KEY_FRAME_DELAY_6;
8463 si->debug.frame_delay_key[7] = DEFAULT_KEY_FRAME_DELAY_7;
8464 si->debug.frame_delay_key[8] = DEFAULT_KEY_FRAME_DELAY_8;
8465 si->debug.frame_delay_key[9] = DEFAULT_KEY_FRAME_DELAY_9;
8467 si->debug.frame_delay_use_mod_key = DEFAULT_FRAME_DELAY_USE_MOD_KEY;
8468 si->debug.frame_delay_game_only = DEFAULT_FRAME_DELAY_GAME_ONLY;
8470 si->options.verbose = FALSE;
8472 #if defined(PLATFORM_ANDROID)
8473 si->fullscreen = TRUE;
8477 static void setSetupInfoToDefaults_EditorCascade(struct SetupInfo *si)
8479 si->editor_cascade.el_bd = TRUE;
8480 si->editor_cascade.el_em = TRUE;
8481 si->editor_cascade.el_emc = TRUE;
8482 si->editor_cascade.el_rnd = TRUE;
8483 si->editor_cascade.el_sb = TRUE;
8484 si->editor_cascade.el_sp = TRUE;
8485 si->editor_cascade.el_dc = TRUE;
8486 si->editor_cascade.el_dx = TRUE;
8488 si->editor_cascade.el_chars = FALSE;
8489 si->editor_cascade.el_steel_chars = FALSE;
8490 si->editor_cascade.el_ce = FALSE;
8491 si->editor_cascade.el_ge = FALSE;
8492 si->editor_cascade.el_ref = FALSE;
8493 si->editor_cascade.el_user = FALSE;
8494 si->editor_cascade.el_dynamic = FALSE;
8497 static void decodeSetupFileHash(SetupFileHash *setup_file_hash)
8501 if (!setup_file_hash)
8506 for (i = 0; i < NUM_GLOBAL_SETUP_TOKENS; i++)
8507 setSetupInfo(global_setup_tokens, i,
8508 getHashEntry(setup_file_hash, global_setup_tokens[i].text));
8513 for (i = 0; i < NUM_EDITOR_SETUP_TOKENS; i++)
8514 setSetupInfo(editor_setup_tokens, i,
8515 getHashEntry(setup_file_hash,editor_setup_tokens[i].text));
8518 /* shortcut setup */
8519 ssi = setup.shortcut;
8520 for (i = 0; i < NUM_SHORTCUT_SETUP_TOKENS; i++)
8521 setSetupInfo(shortcut_setup_tokens, i,
8522 getHashEntry(setup_file_hash,shortcut_setup_tokens[i].text));
8523 setup.shortcut = ssi;
8526 for (pnr = 0; pnr < MAX_PLAYERS; pnr++)
8530 sprintf(prefix, "%s%d", TOKEN_STR_PLAYER_PREFIX, pnr + 1);
8532 sii = setup.input[pnr];
8533 for (i = 0; i < NUM_PLAYER_SETUP_TOKENS; i++)
8535 char full_token[100];
8537 sprintf(full_token, "%s%s", prefix, player_setup_tokens[i].text);
8538 setSetupInfo(player_setup_tokens, i,
8539 getHashEntry(setup_file_hash, full_token));
8541 setup.input[pnr] = sii;
8546 for (i = 0; i < NUM_SYSTEM_SETUP_TOKENS; i++)
8547 setSetupInfo(system_setup_tokens, i,
8548 getHashEntry(setup_file_hash, system_setup_tokens[i].text));
8551 /* internal setup */
8552 sxi = setup.internal;
8553 for (i = 0; i < NUM_INTERNAL_SETUP_TOKENS; i++)
8554 setSetupInfo(internal_setup_tokens, i,
8555 getHashEntry(setup_file_hash, internal_setup_tokens[i].text));
8556 setup.internal = sxi;
8560 for (i = 0; i < NUM_DEBUG_SETUP_TOKENS; i++)
8561 setSetupInfo(debug_setup_tokens, i,
8562 getHashEntry(setup_file_hash, debug_setup_tokens[i].text));
8566 soi = setup.options;
8567 for (i = 0; i < NUM_OPTIONS_SETUP_TOKENS; i++)
8568 setSetupInfo(options_setup_tokens, i,
8569 getHashEntry(setup_file_hash, options_setup_tokens[i].text));
8570 setup.options = soi;
8573 static void decodeSetupFileHash_EditorCascade(SetupFileHash *setup_file_hash)
8577 if (!setup_file_hash)
8580 /* editor cascade setup */
8581 seci = setup.editor_cascade;
8582 for (i = 0; i < NUM_EDITOR_CASCADE_SETUP_TOKENS; i++)
8583 setSetupInfo(editor_cascade_setup_tokens, i,
8584 getHashEntry(setup_file_hash,
8585 editor_cascade_setup_tokens[i].text));
8586 setup.editor_cascade = seci;
8589 void LoadSetupFromFilename(char *filename)
8591 SetupFileHash *setup_file_hash = loadSetupFileHash(filename);
8593 if (setup_file_hash)
8595 decodeSetupFileHash(setup_file_hash);
8597 freeSetupFileHash(setup_file_hash);
8601 Error(ERR_WARN, "using default setup values");
8605 static void LoadSetup_SpecialPostProcessing()
8607 char *player_name_new;
8609 /* needed to work around problems with fixed length strings */
8610 player_name_new = get_corrected_login_name(setup.player_name);
8611 free(setup.player_name);
8612 setup.player_name = player_name_new;
8614 /* "scroll_delay: on(3) / off(0)" was replaced by scroll delay value */
8615 if (setup.scroll_delay == FALSE)
8617 setup.scroll_delay_value = MIN_SCROLL_DELAY;
8618 setup.scroll_delay = TRUE; /* now always "on" */
8621 /* make sure that scroll delay value stays inside valid range */
8622 setup.scroll_delay_value =
8623 MIN(MAX(MIN_SCROLL_DELAY, setup.scroll_delay_value), MAX_SCROLL_DELAY);
8630 /* always start with reliable default values */
8631 setSetupInfoToDefaults(&setup);
8633 /* try to load setup values from default setup file */
8634 filename = getDefaultSetupFilename();
8636 if (fileExists(filename))
8637 LoadSetupFromFilename(filename);
8639 /* try to load setup values from user setup file */
8640 filename = getSetupFilename();
8642 LoadSetupFromFilename(filename);
8644 LoadSetup_SpecialPostProcessing();
8647 void LoadSetup_EditorCascade()
8649 char *filename = getPath2(getSetupDir(), EDITORCASCADE_FILENAME);
8650 SetupFileHash *setup_file_hash = NULL;
8652 /* always start with reliable default values */
8653 setSetupInfoToDefaults_EditorCascade(&setup);
8655 setup_file_hash = loadSetupFileHash(filename);
8657 if (setup_file_hash)
8659 decodeSetupFileHash_EditorCascade(setup_file_hash);
8661 freeSetupFileHash(setup_file_hash);
8669 char *filename = getSetupFilename();
8673 InitUserDataDirectory();
8675 if (!(file = fopen(filename, MODE_WRITE)))
8677 Error(ERR_WARN, "cannot write setup file '%s'", filename);
8681 fprintFileHeader(file, SETUP_FILENAME);
8685 for (i = 0; i < NUM_GLOBAL_SETUP_TOKENS; i++)
8687 /* just to make things nicer :) */
8688 if (i == SETUP_TOKEN_PLAYER_NAME + 1 ||
8689 i == SETUP_TOKEN_GRAPHICS_SET ||
8690 i == SETUP_TOKEN_VOLUME_SIMPLE ||
8691 i == SETUP_TOKEN_TOUCH_CONTROL_TYPE)
8692 fprintf(file, "\n");
8694 fprintf(file, "%s\n", getSetupLine(global_setup_tokens, "", i));
8699 fprintf(file, "\n");
8700 for (i = 0; i < NUM_EDITOR_SETUP_TOKENS; i++)
8701 fprintf(file, "%s\n", getSetupLine(editor_setup_tokens, "", i));
8703 /* shortcut setup */
8704 ssi = setup.shortcut;
8705 fprintf(file, "\n");
8706 for (i = 0; i < NUM_SHORTCUT_SETUP_TOKENS; i++)
8707 fprintf(file, "%s\n", getSetupLine(shortcut_setup_tokens, "", i));
8710 for (pnr = 0; pnr < MAX_PLAYERS; pnr++)
8714 sprintf(prefix, "%s%d", TOKEN_STR_PLAYER_PREFIX, pnr + 1);
8715 fprintf(file, "\n");
8717 sii = setup.input[pnr];
8718 for (i = 0; i < NUM_PLAYER_SETUP_TOKENS; i++)
8719 fprintf(file, "%s\n", getSetupLine(player_setup_tokens, prefix, i));
8724 fprintf(file, "\n");
8725 for (i = 0; i < NUM_SYSTEM_SETUP_TOKENS; i++)
8726 fprintf(file, "%s\n", getSetupLine(system_setup_tokens, "", i));
8728 /* internal setup */
8729 /* (internal setup values not saved to user setup file) */
8733 fprintf(file, "\n");
8734 for (i = 0; i < NUM_DEBUG_SETUP_TOKENS; i++)
8735 fprintf(file, "%s\n", getSetupLine(debug_setup_tokens, "", i));
8738 soi = setup.options;
8739 fprintf(file, "\n");
8740 for (i = 0; i < NUM_OPTIONS_SETUP_TOKENS; i++)
8741 fprintf(file, "%s\n", getSetupLine(options_setup_tokens, "", i));
8745 SetFilePermissions(filename, PERMS_PRIVATE);
8748 void SaveSetup_EditorCascade()
8750 char *filename = getPath2(getSetupDir(), EDITORCASCADE_FILENAME);
8754 InitUserDataDirectory();
8756 if (!(file = fopen(filename, MODE_WRITE)))
8758 Error(ERR_WARN, "cannot write editor cascade state file '%s'", filename);
8763 fprintFileHeader(file, EDITORCASCADE_FILENAME);
8765 seci = setup.editor_cascade;
8766 for (i = 0; i < NUM_EDITOR_CASCADE_SETUP_TOKENS; i++)
8767 fprintf(file, "%s\n", getSetupLine(editor_cascade_setup_tokens, "", i));
8771 SetFilePermissions(filename, PERMS_PRIVATE);
8776 void LoadCustomElementDescriptions()
8778 char *filename = getCustomArtworkConfigFilename(ARTWORK_TYPE_GRAPHICS);
8779 SetupFileHash *setup_file_hash;
8782 for (i = 0; i < NUM_FILE_ELEMENTS; i++)
8784 if (element_info[i].custom_description != NULL)
8786 free(element_info[i].custom_description);
8787 element_info[i].custom_description = NULL;
8791 if ((setup_file_hash = loadSetupFileHash(filename)) == NULL)
8794 for (i = 0; i < NUM_FILE_ELEMENTS; i++)
8796 char *token = getStringCat2(element_info[i].token_name, ".name");
8797 char *value = getHashEntry(setup_file_hash, token);
8800 element_info[i].custom_description = getStringCopy(value);
8805 freeSetupFileHash(setup_file_hash);
8808 static int getElementFromToken(char *token)
8810 char *value = getHashEntry(element_token_hash, token);
8815 Error(ERR_WARN, "unknown element token '%s'", token);
8817 return EL_UNDEFINED;
8820 static int get_token_parameter_value(char *token, char *value_raw)
8824 if (token == NULL || value_raw == NULL)
8825 return ARG_UNDEFINED_VALUE;
8827 suffix = strrchr(token, '.');
8831 if (strEqual(suffix, ".element"))
8832 return getElementFromToken(value_raw);
8834 /* !!! USE CORRECT VALUE TYPE (currently works also for TYPE_BOOLEAN) !!! */
8835 return get_parameter_value(value_raw, suffix, TYPE_INTEGER);
8838 void InitMenuDesignSettings_Static()
8842 /* always start with reliable default values from static default config */
8843 for (i = 0; image_config_vars[i].token != NULL; i++)
8845 char *value = getHashEntry(image_config_hash, image_config_vars[i].token);
8848 *image_config_vars[i].value =
8849 get_token_parameter_value(image_config_vars[i].token, value);
8853 static void InitMenuDesignSettings_SpecialPreProcessing()
8857 /* the following initializes hierarchical values from static configuration */
8859 /* special case: initialize "ARG_DEFAULT" values in static default config */
8860 /* (e.g., initialize "[titlemessage].fade_mode" from "[title].fade_mode") */
8861 titlescreen_initial_first_default.fade_mode =
8862 title_initial_first_default.fade_mode;
8863 titlescreen_initial_first_default.fade_delay =
8864 title_initial_first_default.fade_delay;
8865 titlescreen_initial_first_default.post_delay =
8866 title_initial_first_default.post_delay;
8867 titlescreen_initial_first_default.auto_delay =
8868 title_initial_first_default.auto_delay;
8869 titlescreen_first_default.fade_mode = title_first_default.fade_mode;
8870 titlescreen_first_default.fade_delay = title_first_default.fade_delay;
8871 titlescreen_first_default.post_delay = title_first_default.post_delay;
8872 titlescreen_first_default.auto_delay = title_first_default.auto_delay;
8873 titlemessage_initial_first_default.fade_mode =
8874 title_initial_first_default.fade_mode;
8875 titlemessage_initial_first_default.fade_delay =
8876 title_initial_first_default.fade_delay;
8877 titlemessage_initial_first_default.post_delay =
8878 title_initial_first_default.post_delay;
8879 titlemessage_initial_first_default.auto_delay =
8880 title_initial_first_default.auto_delay;
8881 titlemessage_first_default.fade_mode = title_first_default.fade_mode;
8882 titlemessage_first_default.fade_delay = title_first_default.fade_delay;
8883 titlemessage_first_default.post_delay = title_first_default.post_delay;
8884 titlemessage_first_default.auto_delay = title_first_default.auto_delay;
8886 titlescreen_initial_default.fade_mode = title_initial_default.fade_mode;
8887 titlescreen_initial_default.fade_delay = title_initial_default.fade_delay;
8888 titlescreen_initial_default.post_delay = title_initial_default.post_delay;
8889 titlescreen_initial_default.auto_delay = title_initial_default.auto_delay;
8890 titlescreen_default.fade_mode = title_default.fade_mode;
8891 titlescreen_default.fade_delay = title_default.fade_delay;
8892 titlescreen_default.post_delay = title_default.post_delay;
8893 titlescreen_default.auto_delay = title_default.auto_delay;
8894 titlemessage_initial_default.fade_mode = title_initial_default.fade_mode;
8895 titlemessage_initial_default.fade_delay = title_initial_default.fade_delay;
8896 titlemessage_initial_default.post_delay = title_initial_default.post_delay;
8897 titlemessage_initial_default.auto_delay = title_initial_default.auto_delay;
8898 titlemessage_default.fade_mode = title_default.fade_mode;
8899 titlemessage_default.fade_delay = title_default.fade_delay;
8900 titlemessage_default.post_delay = title_default.post_delay;
8901 titlemessage_default.auto_delay = title_default.auto_delay;
8903 /* special case: initialize "ARG_DEFAULT" values in static default config */
8904 /* (e.g., init "titlemessage_1.fade_mode" from "[titlemessage].fade_mode") */
8905 for (i = 0; i < MAX_NUM_TITLE_MESSAGES; i++)
8907 titlescreen_initial_first[i] = titlescreen_initial_first_default;
8908 titlescreen_first[i] = titlescreen_first_default;
8909 titlemessage_initial_first[i] = titlemessage_initial_first_default;
8910 titlemessage_first[i] = titlemessage_first_default;
8912 titlescreen_initial[i] = titlescreen_initial_default;
8913 titlescreen[i] = titlescreen_default;
8914 titlemessage_initial[i] = titlemessage_initial_default;
8915 titlemessage[i] = titlemessage_default;
8918 /* special case: initialize "ARG_DEFAULT" values in static default config */
8919 /* (eg, init "menu.enter_screen.SCORES.xyz" from "menu.enter_screen.xyz") */
8920 for (i = 0; i < NUM_SPECIAL_GFX_ARGS; i++)
8922 if (i == GFX_SPECIAL_ARG_TITLE) /* title values already initialized */
8925 menu.enter_screen[i] = menu.enter_screen[GFX_SPECIAL_ARG_DEFAULT];
8926 menu.leave_screen[i] = menu.leave_screen[GFX_SPECIAL_ARG_DEFAULT];
8927 menu.next_screen[i] = menu.next_screen[GFX_SPECIAL_ARG_DEFAULT];
8930 /* special case: initialize "ARG_DEFAULT" values in static default config */
8931 /* (eg, init "viewport.door_1.MAIN.xyz" from "viewport.door_1.xyz") */
8932 for (i = 0; i < NUM_SPECIAL_GFX_ARGS; i++)
8934 viewport.window[i] = viewport.window[GFX_SPECIAL_ARG_DEFAULT];
8935 viewport.playfield[i] = viewport.playfield[GFX_SPECIAL_ARG_DEFAULT];
8936 viewport.door_1[i] = viewport.door_1[GFX_SPECIAL_ARG_DEFAULT];
8938 if (i == GFX_SPECIAL_ARG_EDITOR) /* editor values already initialized */
8941 viewport.door_2[i] = viewport.door_2[GFX_SPECIAL_ARG_DEFAULT];
8945 static void InitMenuDesignSettings_SpecialPostProcessing()
8949 struct XY *dst, *src;
8953 { &game.button.save, &game.button.stop },
8954 { &game.button.pause2, &game.button.pause },
8955 { &game.button.load, &game.button.play },
8956 { &game.button.undo, &game.button.stop },
8957 { &game.button.redo, &game.button.play },
8963 /* special case: initialize later added SETUP list size from LEVELS value */
8964 if (menu.list_size[GAME_MODE_SETUP] == -1)
8965 menu.list_size[GAME_MODE_SETUP] = menu.list_size[GAME_MODE_LEVELS];
8967 /* set default position for snapshot buttons to stop/pause/play buttons */
8968 for (i = 0; game_buttons_xy[i].dst != NULL; i++)
8970 if ((*game_buttons_xy[i].dst).x == -1 &&
8971 (*game_buttons_xy[i].dst).y == -1)
8973 (*game_buttons_xy[i].dst).x = (*game_buttons_xy[i].src).x;
8974 (*game_buttons_xy[i].dst).y = (*game_buttons_xy[i].src).y;
8979 static void LoadMenuDesignSettingsFromFilename(char *filename)
8981 static struct TitleFadingInfo tfi;
8982 static struct TitleMessageInfo tmi;
8983 static struct TokenInfo title_tokens[] =
8985 { TYPE_INTEGER, &tfi.fade_mode, ".fade_mode" },
8986 { TYPE_INTEGER, &tfi.fade_delay, ".fade_delay" },
8987 { TYPE_INTEGER, &tfi.post_delay, ".post_delay" },
8988 { TYPE_INTEGER, &tfi.auto_delay, ".auto_delay" },
8992 static struct TokenInfo titlemessage_tokens[] =
8994 { TYPE_INTEGER, &tmi.x, ".x" },
8995 { TYPE_INTEGER, &tmi.y, ".y" },
8996 { TYPE_INTEGER, &tmi.width, ".width" },
8997 { TYPE_INTEGER, &tmi.height, ".height" },
8998 { TYPE_INTEGER, &tmi.chars, ".chars" },
8999 { TYPE_INTEGER, &tmi.lines, ".lines" },
9000 { TYPE_INTEGER, &tmi.align, ".align" },
9001 { TYPE_INTEGER, &tmi.valign, ".valign" },
9002 { TYPE_INTEGER, &tmi.font, ".font" },
9003 { TYPE_BOOLEAN, &tmi.autowrap, ".autowrap" },
9004 { TYPE_BOOLEAN, &tmi.centered, ".centered" },
9005 { TYPE_BOOLEAN, &tmi.parse_comments, ".parse_comments" },
9006 { TYPE_INTEGER, &tmi.sort_priority, ".sort_priority" },
9007 { TYPE_INTEGER, &tmi.fade_mode, ".fade_mode" },
9008 { TYPE_INTEGER, &tmi.fade_delay, ".fade_delay" },
9009 { TYPE_INTEGER, &tmi.post_delay, ".post_delay" },
9010 { TYPE_INTEGER, &tmi.auto_delay, ".auto_delay" },
9016 struct TitleFadingInfo *info;
9021 /* initialize first titles from "enter screen" definitions, if defined */
9022 { &title_initial_first_default, "menu.enter_screen.TITLE" },
9023 { &title_first_default, "menu.enter_screen.TITLE" },
9025 /* initialize title screens from "next screen" definitions, if defined */
9026 { &title_initial_default, "menu.next_screen.TITLE" },
9027 { &title_default, "menu.next_screen.TITLE" },
9033 struct TitleMessageInfo *array;
9036 titlemessage_arrays[] =
9038 /* initialize first titles from "enter screen" definitions, if defined */
9039 { titlescreen_initial_first, "menu.enter_screen.TITLE" },
9040 { titlescreen_first, "menu.enter_screen.TITLE" },
9041 { titlemessage_initial_first, "menu.enter_screen.TITLE" },
9042 { titlemessage_first, "menu.enter_screen.TITLE" },
9044 /* initialize titles from "next screen" definitions, if defined */
9045 { titlescreen_initial, "menu.next_screen.TITLE" },
9046 { titlescreen, "menu.next_screen.TITLE" },
9047 { titlemessage_initial, "menu.next_screen.TITLE" },
9048 { titlemessage, "menu.next_screen.TITLE" },
9050 /* overwrite titles with title definitions, if defined */
9051 { titlescreen_initial_first, "[title_initial]" },
9052 { titlescreen_first, "[title]" },
9053 { titlemessage_initial_first, "[title_initial]" },
9054 { titlemessage_first, "[title]" },
9056 { titlescreen_initial, "[title_initial]" },
9057 { titlescreen, "[title]" },
9058 { titlemessage_initial, "[title_initial]" },
9059 { titlemessage, "[title]" },
9061 /* overwrite titles with title screen/message definitions, if defined */
9062 { titlescreen_initial_first, "[titlescreen_initial]" },
9063 { titlescreen_first, "[titlescreen]" },
9064 { titlemessage_initial_first, "[titlemessage_initial]" },
9065 { titlemessage_first, "[titlemessage]" },
9067 { titlescreen_initial, "[titlescreen_initial]" },
9068 { titlescreen, "[titlescreen]" },
9069 { titlemessage_initial, "[titlemessage_initial]" },
9070 { titlemessage, "[titlemessage]" },
9074 SetupFileHash *setup_file_hash;
9077 if ((setup_file_hash = loadSetupFileHash(filename)) == NULL)
9080 /* the following initializes hierarchical values from dynamic configuration */
9082 /* special case: initialize with default values that may be overwritten */
9083 /* (e.g., init "menu.draw_xoffset.INFO" from "menu.draw_xoffset") */
9084 for (i = 0; i < NUM_SPECIAL_GFX_ARGS; i++)
9086 char *value_1 = getHashEntry(setup_file_hash, "menu.draw_xoffset");
9087 char *value_2 = getHashEntry(setup_file_hash, "menu.draw_yoffset");
9088 char *value_3 = getHashEntry(setup_file_hash, "menu.list_size");
9090 if (value_1 != NULL)
9091 menu.draw_xoffset[i] = get_integer_from_string(value_1);
9092 if (value_2 != NULL)
9093 menu.draw_yoffset[i] = get_integer_from_string(value_2);
9094 if (value_3 != NULL)
9095 menu.list_size[i] = get_integer_from_string(value_3);
9098 /* special case: initialize with default values that may be overwritten */
9099 /* (eg, init "menu.draw_xoffset.INFO[XXX]" from "menu.draw_xoffset.INFO") */
9100 for (i = 0; i < NUM_SPECIAL_GFX_INFO_ARGS; i++)
9102 char *value_1 = getHashEntry(setup_file_hash, "menu.draw_xoffset.INFO");
9103 char *value_2 = getHashEntry(setup_file_hash, "menu.draw_yoffset.INFO");
9105 if (value_1 != NULL)
9106 menu.draw_xoffset_info[i] = get_integer_from_string(value_1);
9107 if (value_2 != NULL)
9108 menu.draw_yoffset_info[i] = get_integer_from_string(value_2);
9110 if (i == GFX_SPECIAL_ARG_INFO_ELEMENTS)
9112 char *value_1 = getHashEntry(setup_file_hash, "menu.list_size.INFO");
9114 if (value_1 != NULL)
9115 menu.list_size_info[i] = get_integer_from_string(value_1);
9119 /* special case: initialize with default values that may be overwritten */
9120 /* (eg, init "menu.draw_xoffset.SETUP[XXX]" from "menu.draw_xoffset.SETUP") */
9121 for (i = 0; i < NUM_SPECIAL_GFX_SETUP_ARGS; i++)
9123 char *value_1 = getHashEntry(setup_file_hash, "menu.draw_xoffset.SETUP");
9124 char *value_2 = getHashEntry(setup_file_hash, "menu.draw_yoffset.SETUP");
9126 if (value_1 != NULL)
9127 menu.draw_xoffset_setup[i] = get_integer_from_string(value_1);
9128 if (value_2 != NULL)
9129 menu.draw_yoffset_setup[i] = get_integer_from_string(value_2);
9132 /* special case: initialize with default values that may be overwritten */
9133 /* (eg, init "menu.enter_screen.SCORES.xyz" from "menu.enter_screen.xyz") */
9134 for (i = 0; i < NUM_SPECIAL_GFX_ARGS; i++)
9136 char *token_1 = "menu.enter_screen.fade_mode";
9137 char *token_2 = "menu.enter_screen.fade_delay";
9138 char *token_3 = "menu.enter_screen.post_delay";
9139 char *token_4 = "menu.leave_screen.fade_mode";
9140 char *token_5 = "menu.leave_screen.fade_delay";
9141 char *token_6 = "menu.leave_screen.post_delay";
9142 char *token_7 = "menu.next_screen.fade_mode";
9143 char *token_8 = "menu.next_screen.fade_delay";
9144 char *token_9 = "menu.next_screen.post_delay";
9145 char *value_1 = getHashEntry(setup_file_hash, token_1);
9146 char *value_2 = getHashEntry(setup_file_hash, token_2);
9147 char *value_3 = getHashEntry(setup_file_hash, token_3);
9148 char *value_4 = getHashEntry(setup_file_hash, token_4);
9149 char *value_5 = getHashEntry(setup_file_hash, token_5);
9150 char *value_6 = getHashEntry(setup_file_hash, token_6);
9151 char *value_7 = getHashEntry(setup_file_hash, token_7);
9152 char *value_8 = getHashEntry(setup_file_hash, token_8);
9153 char *value_9 = getHashEntry(setup_file_hash, token_9);
9155 if (value_1 != NULL)
9156 menu.enter_screen[i].fade_mode = get_token_parameter_value(token_1,
9158 if (value_2 != NULL)
9159 menu.enter_screen[i].fade_delay = get_token_parameter_value(token_2,
9161 if (value_3 != NULL)
9162 menu.enter_screen[i].post_delay = get_token_parameter_value(token_3,
9164 if (value_4 != NULL)
9165 menu.leave_screen[i].fade_mode = get_token_parameter_value(token_4,
9167 if (value_5 != NULL)
9168 menu.leave_screen[i].fade_delay = get_token_parameter_value(token_5,
9170 if (value_6 != NULL)
9171 menu.leave_screen[i].post_delay = get_token_parameter_value(token_6,
9173 if (value_7 != NULL)
9174 menu.next_screen[i].fade_mode = get_token_parameter_value(token_7,
9176 if (value_8 != NULL)
9177 menu.next_screen[i].fade_delay = get_token_parameter_value(token_8,
9179 if (value_9 != NULL)
9180 menu.next_screen[i].post_delay = get_token_parameter_value(token_9,
9184 /* special case: initialize with default values that may be overwritten */
9185 /* (eg, init "viewport.door_1.MAIN.xyz" from "viewport.door_1.xyz") */
9186 for (i = 0; i < NUM_SPECIAL_GFX_ARGS; i++)
9188 char *token_w1 = "viewport.window.width";
9189 char *token_w2 = "viewport.window.height";
9190 char *token_01 = "viewport.playfield.x";
9191 char *token_02 = "viewport.playfield.y";
9192 char *token_03 = "viewport.playfield.width";
9193 char *token_04 = "viewport.playfield.height";
9194 char *token_05 = "viewport.playfield.border_size";
9195 char *token_06 = "viewport.door_1.x";
9196 char *token_07 = "viewport.door_1.y";
9197 char *token_08 = "viewport.door_1.width";
9198 char *token_09 = "viewport.door_1.height";
9199 char *token_10 = "viewport.door_1.border_size";
9200 char *token_11 = "viewport.door_2.x";
9201 char *token_12 = "viewport.door_2.y";
9202 char *token_13 = "viewport.door_2.width";
9203 char *token_14 = "viewport.door_2.height";
9204 char *token_15 = "viewport.door_2.border_size";
9205 char *value_w1 = getHashEntry(setup_file_hash, token_w1);
9206 char *value_w2 = getHashEntry(setup_file_hash, token_w2);
9207 char *value_01 = getHashEntry(setup_file_hash, token_01);
9208 char *value_02 = getHashEntry(setup_file_hash, token_02);
9209 char *value_03 = getHashEntry(setup_file_hash, token_03);
9210 char *value_04 = getHashEntry(setup_file_hash, token_04);
9211 char *value_05 = getHashEntry(setup_file_hash, token_05);
9212 char *value_06 = getHashEntry(setup_file_hash, token_06);
9213 char *value_07 = getHashEntry(setup_file_hash, token_07);
9214 char *value_08 = getHashEntry(setup_file_hash, token_08);
9215 char *value_09 = getHashEntry(setup_file_hash, token_09);
9216 char *value_10 = getHashEntry(setup_file_hash, token_10);
9217 char *value_11 = getHashEntry(setup_file_hash, token_11);
9218 char *value_12 = getHashEntry(setup_file_hash, token_12);
9219 char *value_13 = getHashEntry(setup_file_hash, token_13);
9220 char *value_14 = getHashEntry(setup_file_hash, token_14);
9221 char *value_15 = getHashEntry(setup_file_hash, token_15);
9223 if (value_w1 != NULL)
9224 viewport.window[i].width = get_token_parameter_value(token_w1, value_w1);
9225 if (value_w2 != NULL)
9226 viewport.window[i].height = get_token_parameter_value(token_w2, value_w2);
9227 if (value_01 != NULL)
9228 viewport.playfield[i].x = get_token_parameter_value(token_01, value_01);
9229 if (value_02 != NULL)
9230 viewport.playfield[i].y = get_token_parameter_value(token_02, value_02);
9231 if (value_03 != NULL)
9232 viewport.playfield[i].width = get_token_parameter_value(token_03,
9234 if (value_04 != NULL)
9235 viewport.playfield[i].height = get_token_parameter_value(token_04,
9237 if (value_05 != NULL)
9238 viewport.playfield[i].border_size = get_token_parameter_value(token_05,
9240 if (value_06 != NULL)
9241 viewport.door_1[i].x = get_token_parameter_value(token_06, value_06);
9242 if (value_07 != NULL)
9243 viewport.door_1[i].y = get_token_parameter_value(token_07, value_07);
9244 if (value_08 != NULL)
9245 viewport.door_1[i].width = get_token_parameter_value(token_08, value_08);
9246 if (value_09 != NULL)
9247 viewport.door_1[i].height = get_token_parameter_value(token_09, value_09);
9248 if (value_10 != NULL)
9249 viewport.door_1[i].border_size = get_token_parameter_value(token_10,
9251 if (value_11 != NULL)
9252 viewport.door_2[i].x = get_token_parameter_value(token_11, value_11);
9253 if (value_12 != NULL)
9254 viewport.door_2[i].y = get_token_parameter_value(token_12, value_12);
9255 if (value_13 != NULL)
9256 viewport.door_2[i].width = get_token_parameter_value(token_13, value_13);
9257 if (value_14 != NULL)
9258 viewport.door_2[i].height = get_token_parameter_value(token_14, value_14);
9259 if (value_15 != NULL)
9260 viewport.door_1[i].border_size = get_token_parameter_value(token_15,
9264 /* special case: initialize with default values that may be overwritten */
9265 /* (e.g., init "[title].fade_mode" from "menu.next_screen.TITLE.fade_mode") */
9266 for (i = 0; title_info[i].info != NULL; i++)
9268 struct TitleFadingInfo *info = title_info[i].info;
9269 char *base_token = title_info[i].text;
9271 for (j = 0; title_tokens[j].type != -1; j++)
9273 char *token = getStringCat2(base_token, title_tokens[j].text);
9274 char *value = getHashEntry(setup_file_hash, token);
9278 int parameter_value = get_token_parameter_value(token, value);
9282 *(int *)title_tokens[j].value = (int)parameter_value;
9291 /* special case: initialize with default values that may be overwritten */
9292 /* (e.g., init "titlemessage_1.fade_mode" from "[titlemessage].fade_mode") */
9293 for (i = 0; titlemessage_arrays[i].array != NULL; i++)
9295 struct TitleMessageInfo *array = titlemessage_arrays[i].array;
9296 char *base_token = titlemessage_arrays[i].text;
9298 for (j = 0; titlemessage_tokens[j].type != -1; j++)
9300 char *token = getStringCat2(base_token, titlemessage_tokens[j].text);
9301 char *value = getHashEntry(setup_file_hash, token);
9305 int parameter_value = get_token_parameter_value(token, value);
9307 for (k = 0; k < MAX_NUM_TITLE_MESSAGES; k++)
9311 if (titlemessage_tokens[j].type == TYPE_INTEGER)
9312 *(int *)titlemessage_tokens[j].value = (int)parameter_value;
9314 *(boolean *)titlemessage_tokens[j].value = (boolean)parameter_value;
9324 /* read (and overwrite with) values that may be specified in config file */
9325 for (i = 0; image_config_vars[i].token != NULL; i++)
9327 char *value = getHashEntry(setup_file_hash, image_config_vars[i].token);
9329 /* (ignore definitions set to "[DEFAULT]" which are already initialized) */
9330 if (value != NULL && !strEqual(value, ARG_DEFAULT))
9331 *image_config_vars[i].value =
9332 get_token_parameter_value(image_config_vars[i].token, value);
9335 freeSetupFileHash(setup_file_hash);
9338 void LoadMenuDesignSettings()
9340 char *filename_base = UNDEFINED_FILENAME, *filename_local;
9342 InitMenuDesignSettings_Static();
9343 InitMenuDesignSettings_SpecialPreProcessing();
9345 if (!GFX_OVERRIDE_ARTWORK(ARTWORK_TYPE_GRAPHICS))
9347 /* first look for special settings configured in level series config */
9348 filename_base = getCustomArtworkLevelConfigFilename(ARTWORK_TYPE_GRAPHICS);
9350 if (fileExists(filename_base))
9351 LoadMenuDesignSettingsFromFilename(filename_base);
9354 filename_local = getCustomArtworkConfigFilename(ARTWORK_TYPE_GRAPHICS);
9356 if (filename_local != NULL && !strEqual(filename_base, filename_local))
9357 LoadMenuDesignSettingsFromFilename(filename_local);
9359 InitMenuDesignSettings_SpecialPostProcessing();
9362 void LoadUserDefinedEditorElementList(int **elements, int *num_elements)
9364 char *filename = getEditorSetupFilename();
9365 SetupFileList *setup_file_list, *list;
9366 SetupFileHash *element_hash;
9367 int num_unknown_tokens = 0;
9370 if ((setup_file_list = loadSetupFileList(filename)) == NULL)
9373 element_hash = newSetupFileHash();
9375 for (i = 0; i < NUM_FILE_ELEMENTS; i++)
9376 setHashEntry(element_hash, element_info[i].token_name, i_to_a(i));
9378 /* determined size may be larger than needed (due to unknown elements) */
9380 for (list = setup_file_list; list != NULL; list = list->next)
9383 /* add space for up to 3 more elements for padding that may be needed */
9386 /* free memory for old list of elements, if needed */
9387 checked_free(*elements);
9389 /* allocate memory for new list of elements */
9390 *elements = checked_malloc(*num_elements * sizeof(int));
9393 for (list = setup_file_list; list != NULL; list = list->next)
9395 char *value = getHashEntry(element_hash, list->token);
9397 if (value == NULL) /* try to find obsolete token mapping */
9399 char *mapped_token = get_mapped_token(list->token);
9401 if (mapped_token != NULL)
9403 value = getHashEntry(element_hash, mapped_token);
9411 (*elements)[(*num_elements)++] = atoi(value);
9415 if (num_unknown_tokens == 0)
9417 Error(ERR_INFO_LINE, "-");
9418 Error(ERR_INFO, "warning: unknown token(s) found in config file:");
9419 Error(ERR_INFO, "- config file: '%s'", filename);
9421 num_unknown_tokens++;
9424 Error(ERR_INFO, "- token: '%s'", list->token);
9428 if (num_unknown_tokens > 0)
9429 Error(ERR_INFO_LINE, "-");
9431 while (*num_elements % 4) /* pad with empty elements, if needed */
9432 (*elements)[(*num_elements)++] = EL_EMPTY;
9434 freeSetupFileList(setup_file_list);
9435 freeSetupFileHash(element_hash);
9438 for (i = 0; i < *num_elements; i++)
9439 printf("editor: element '%s' [%d]\n",
9440 element_info[(*elements)[i]].token_name, (*elements)[i]);
9444 static struct MusicFileInfo *get_music_file_info_ext(char *basename, int music,
9447 SetupFileHash *setup_file_hash = NULL;
9448 struct MusicFileInfo tmp_music_file_info, *new_music_file_info;
9449 char *filename_music, *filename_prefix, *filename_info;
9455 token_to_value_ptr[] =
9457 { "title_header", &tmp_music_file_info.title_header },
9458 { "artist_header", &tmp_music_file_info.artist_header },
9459 { "album_header", &tmp_music_file_info.album_header },
9460 { "year_header", &tmp_music_file_info.year_header },
9462 { "title", &tmp_music_file_info.title },
9463 { "artist", &tmp_music_file_info.artist },
9464 { "album", &tmp_music_file_info.album },
9465 { "year", &tmp_music_file_info.year },
9471 filename_music = (is_sound ? getCustomSoundFilename(basename) :
9472 getCustomMusicFilename(basename));
9474 if (filename_music == NULL)
9477 /* ---------- try to replace file extension ---------- */
9479 filename_prefix = getStringCopy(filename_music);
9480 if (strrchr(filename_prefix, '.') != NULL)
9481 *strrchr(filename_prefix, '.') = '\0';
9482 filename_info = getStringCat2(filename_prefix, ".txt");
9484 if (fileExists(filename_info))
9485 setup_file_hash = loadSetupFileHash(filename_info);
9487 free(filename_prefix);
9488 free(filename_info);
9490 if (setup_file_hash == NULL)
9492 /* ---------- try to add file extension ---------- */
9494 filename_prefix = getStringCopy(filename_music);
9495 filename_info = getStringCat2(filename_prefix, ".txt");
9497 if (fileExists(filename_info))
9498 setup_file_hash = loadSetupFileHash(filename_info);
9500 free(filename_prefix);
9501 free(filename_info);
9504 if (setup_file_hash == NULL)
9507 /* ---------- music file info found ---------- */
9509 clear_mem(&tmp_music_file_info, sizeof(struct MusicFileInfo));
9511 for (i = 0; token_to_value_ptr[i].token != NULL; i++)
9513 char *value = getHashEntry(setup_file_hash, token_to_value_ptr[i].token);
9515 *token_to_value_ptr[i].value_ptr =
9516 getStringCopy(value != NULL && *value != '\0' ? value : UNKNOWN_NAME);
9519 tmp_music_file_info.basename = getStringCopy(basename);
9520 tmp_music_file_info.music = music;
9521 tmp_music_file_info.is_sound = is_sound;
9523 new_music_file_info = checked_malloc(sizeof(struct MusicFileInfo));
9524 *new_music_file_info = tmp_music_file_info;
9526 return new_music_file_info;
9529 static struct MusicFileInfo *get_music_file_info(char *basename, int music)
9531 return get_music_file_info_ext(basename, music, FALSE);
9534 static struct MusicFileInfo *get_sound_file_info(char *basename, int sound)
9536 return get_music_file_info_ext(basename, sound, TRUE);
9539 static boolean music_info_listed_ext(struct MusicFileInfo *list,
9540 char *basename, boolean is_sound)
9542 for (; list != NULL; list = list->next)
9543 if (list->is_sound == is_sound && strEqual(list->basename, basename))
9549 static boolean music_info_listed(struct MusicFileInfo *list, char *basename)
9551 return music_info_listed_ext(list, basename, FALSE);
9554 static boolean sound_info_listed(struct MusicFileInfo *list, char *basename)
9556 return music_info_listed_ext(list, basename, TRUE);
9559 void LoadMusicInfo()
9561 char *music_directory = getCustomMusicDirectory();
9562 int num_music = getMusicListSize();
9563 int num_music_noconf = 0;
9564 int num_sounds = getSoundListSize();
9566 DirectoryEntry *dir_entry;
9567 struct FileInfo *music, *sound;
9568 struct MusicFileInfo *next, **new;
9571 while (music_file_info != NULL)
9573 next = music_file_info->next;
9575 checked_free(music_file_info->basename);
9577 checked_free(music_file_info->title_header);
9578 checked_free(music_file_info->artist_header);
9579 checked_free(music_file_info->album_header);
9580 checked_free(music_file_info->year_header);
9582 checked_free(music_file_info->title);
9583 checked_free(music_file_info->artist);
9584 checked_free(music_file_info->album);
9585 checked_free(music_file_info->year);
9587 free(music_file_info);
9589 music_file_info = next;
9592 new = &music_file_info;
9594 for (i = 0; i < num_music; i++)
9596 music = getMusicListEntry(i);
9598 if (music->filename == NULL)
9601 if (strEqual(music->filename, UNDEFINED_FILENAME))
9604 /* a configured file may be not recognized as music */
9605 if (!FileIsMusic(music->filename))
9608 if (!music_info_listed(music_file_info, music->filename))
9610 *new = get_music_file_info(music->filename, i);
9613 new = &(*new)->next;
9617 if ((dir = openDirectory(music_directory)) == NULL)
9619 Error(ERR_WARN, "cannot read music directory '%s'", music_directory);
9623 while ((dir_entry = readDirectory(dir)) != NULL) /* loop all entries */
9625 char *basename = dir_entry->basename;
9626 boolean music_already_used = FALSE;
9629 /* skip all music files that are configured in music config file */
9630 for (i = 0; i < num_music; i++)
9632 music = getMusicListEntry(i);
9634 if (music->filename == NULL)
9637 if (strEqual(basename, music->filename))
9639 music_already_used = TRUE;
9644 if (music_already_used)
9647 if (!FileIsMusic(dir_entry->filename))
9650 if (!music_info_listed(music_file_info, basename))
9652 *new = get_music_file_info(basename, MAP_NOCONF_MUSIC(num_music_noconf));
9655 new = &(*new)->next;
9661 closeDirectory(dir);
9663 for (i = 0; i < num_sounds; i++)
9665 sound = getSoundListEntry(i);
9667 if (sound->filename == NULL)
9670 if (strEqual(sound->filename, UNDEFINED_FILENAME))
9673 /* a configured file may be not recognized as sound */
9674 if (!FileIsSound(sound->filename))
9677 if (!sound_info_listed(music_file_info, sound->filename))
9679 *new = get_sound_file_info(sound->filename, i);
9681 new = &(*new)->next;
9686 void add_helpanim_entry(int element, int action, int direction, int delay,
9687 int *num_list_entries)
9689 struct HelpAnimInfo *new_list_entry;
9690 (*num_list_entries)++;
9693 checked_realloc(helpanim_info,
9694 *num_list_entries * sizeof(struct HelpAnimInfo));
9695 new_list_entry = &helpanim_info[*num_list_entries - 1];
9697 new_list_entry->element = element;
9698 new_list_entry->action = action;
9699 new_list_entry->direction = direction;
9700 new_list_entry->delay = delay;
9703 void print_unknown_token(char *filename, char *token, int token_nr)
9707 Error(ERR_INFO_LINE, "-");
9708 Error(ERR_INFO, "warning: unknown token(s) found in config file:");
9709 Error(ERR_INFO, "- config file: '%s'", filename);
9712 Error(ERR_INFO, "- token: '%s'", token);
9715 void print_unknown_token_end(int token_nr)
9718 Error(ERR_INFO_LINE, "-");
9721 void LoadHelpAnimInfo()
9723 char *filename = getHelpAnimFilename();
9724 SetupFileList *setup_file_list = NULL, *list;
9725 SetupFileHash *element_hash, *action_hash, *direction_hash;
9726 int num_list_entries = 0;
9727 int num_unknown_tokens = 0;
9730 if (fileExists(filename))
9731 setup_file_list = loadSetupFileList(filename);
9733 if (setup_file_list == NULL)
9735 /* use reliable default values from static configuration */
9736 SetupFileList *insert_ptr;
9738 insert_ptr = setup_file_list =
9739 newSetupFileList(helpanim_config[0].token,
9740 helpanim_config[0].value);
9742 for (i = 1; helpanim_config[i].token; i++)
9743 insert_ptr = addListEntry(insert_ptr,
9744 helpanim_config[i].token,
9745 helpanim_config[i].value);
9748 element_hash = newSetupFileHash();
9749 action_hash = newSetupFileHash();
9750 direction_hash = newSetupFileHash();
9752 for (i = 0; i < MAX_NUM_ELEMENTS; i++)
9753 setHashEntry(element_hash, element_info[i].token_name, i_to_a(i));
9755 for (i = 0; i < NUM_ACTIONS; i++)
9756 setHashEntry(action_hash, element_action_info[i].suffix,
9757 i_to_a(element_action_info[i].value));
9759 /* do not store direction index (bit) here, but direction value! */
9760 for (i = 0; i < NUM_DIRECTIONS_FULL; i++)
9761 setHashEntry(direction_hash, element_direction_info[i].suffix,
9762 i_to_a(1 << element_direction_info[i].value));
9764 for (list = setup_file_list; list != NULL; list = list->next)
9766 char *element_token, *action_token, *direction_token;
9767 char *element_value, *action_value, *direction_value;
9768 int delay = atoi(list->value);
9770 if (strEqual(list->token, "end"))
9772 add_helpanim_entry(HELPANIM_LIST_NEXT, -1, -1, -1, &num_list_entries);
9777 /* first try to break element into element/action/direction parts;
9778 if this does not work, also accept combined "element[.act][.dir]"
9779 elements (like "dynamite.active"), which are unique elements */
9781 if (strchr(list->token, '.') == NULL) /* token contains no '.' */
9783 element_value = getHashEntry(element_hash, list->token);
9784 if (element_value != NULL) /* element found */
9785 add_helpanim_entry(atoi(element_value), -1, -1, delay,
9789 /* no further suffixes found -- this is not an element */
9790 print_unknown_token(filename, list->token, num_unknown_tokens++);
9796 /* token has format "<prefix>.<something>" */
9798 action_token = strchr(list->token, '.'); /* suffix may be action ... */
9799 direction_token = action_token; /* ... or direction */
9801 element_token = getStringCopy(list->token);
9802 *strchr(element_token, '.') = '\0';
9804 element_value = getHashEntry(element_hash, element_token);
9806 if (element_value == NULL) /* this is no element */
9808 element_value = getHashEntry(element_hash, list->token);
9809 if (element_value != NULL) /* combined element found */
9810 add_helpanim_entry(atoi(element_value), -1, -1, delay,
9813 print_unknown_token(filename, list->token, num_unknown_tokens++);
9815 free(element_token);
9820 action_value = getHashEntry(action_hash, action_token);
9822 if (action_value != NULL) /* action found */
9824 add_helpanim_entry(atoi(element_value), atoi(action_value), -1, delay,
9827 free(element_token);
9832 direction_value = getHashEntry(direction_hash, direction_token);
9834 if (direction_value != NULL) /* direction found */
9836 add_helpanim_entry(atoi(element_value), -1, atoi(direction_value), delay,
9839 free(element_token);
9844 if (strchr(action_token + 1, '.') == NULL)
9846 /* no further suffixes found -- this is not an action nor direction */
9848 element_value = getHashEntry(element_hash, list->token);
9849 if (element_value != NULL) /* combined element found */
9850 add_helpanim_entry(atoi(element_value), -1, -1, delay,
9853 print_unknown_token(filename, list->token, num_unknown_tokens++);
9855 free(element_token);
9860 /* token has format "<prefix>.<suffix>.<something>" */
9862 direction_token = strchr(action_token + 1, '.');
9864 action_token = getStringCopy(action_token);
9865 *strchr(action_token + 1, '.') = '\0';
9867 action_value = getHashEntry(action_hash, action_token);
9869 if (action_value == NULL) /* this is no action */
9871 element_value = getHashEntry(element_hash, list->token);
9872 if (element_value != NULL) /* combined element found */
9873 add_helpanim_entry(atoi(element_value), -1, -1, delay,
9876 print_unknown_token(filename, list->token, num_unknown_tokens++);
9878 free(element_token);
9884 direction_value = getHashEntry(direction_hash, direction_token);
9886 if (direction_value != NULL) /* direction found */
9888 add_helpanim_entry(atoi(element_value), atoi(action_value),
9889 atoi(direction_value), delay, &num_list_entries);
9891 free(element_token);
9897 /* this is no direction */
9899 element_value = getHashEntry(element_hash, list->token);
9900 if (element_value != NULL) /* combined element found */
9901 add_helpanim_entry(atoi(element_value), -1, -1, delay,
9904 print_unknown_token(filename, list->token, num_unknown_tokens++);
9906 free(element_token);
9910 print_unknown_token_end(num_unknown_tokens);
9912 add_helpanim_entry(HELPANIM_LIST_NEXT, -1, -1, -1, &num_list_entries);
9913 add_helpanim_entry(HELPANIM_LIST_END, -1, -1, -1, &num_list_entries);
9915 freeSetupFileList(setup_file_list);
9916 freeSetupFileHash(element_hash);
9917 freeSetupFileHash(action_hash);
9918 freeSetupFileHash(direction_hash);
9921 for (i = 0; i < num_list_entries; i++)
9922 printf("::: '%s': %d, %d, %d => %d\n",
9923 EL_NAME(helpanim_info[i].element),
9924 helpanim_info[i].element,
9925 helpanim_info[i].action,
9926 helpanim_info[i].direction,
9927 helpanim_info[i].delay);
9931 void LoadHelpTextInfo()
9933 char *filename = getHelpTextFilename();
9936 if (helptext_info != NULL)
9938 freeSetupFileHash(helptext_info);
9939 helptext_info = NULL;
9942 if (fileExists(filename))
9943 helptext_info = loadSetupFileHash(filename);
9945 if (helptext_info == NULL)
9947 /* use reliable default values from static configuration */
9948 helptext_info = newSetupFileHash();
9950 for (i = 0; helptext_config[i].token; i++)
9951 setHashEntry(helptext_info,
9952 helptext_config[i].token,
9953 helptext_config[i].value);
9957 BEGIN_HASH_ITERATION(helptext_info, itr)
9959 printf("::: '%s' => '%s'\n",
9960 HASH_ITERATION_TOKEN(itr), HASH_ITERATION_VALUE(itr));
9962 END_HASH_ITERATION(hash, itr)
9967 /* ------------------------------------------------------------------------- */
9968 /* convert levels */
9969 /* ------------------------------------------------------------------------- */
9971 #define MAX_NUM_CONVERT_LEVELS 1000
9973 void ConvertLevels()
9975 static LevelDirTree *convert_leveldir = NULL;
9976 static int convert_level_nr = -1;
9977 static int num_levels_handled = 0;
9978 static int num_levels_converted = 0;
9979 static boolean levels_failed[MAX_NUM_CONVERT_LEVELS];
9982 convert_leveldir = getTreeInfoFromIdentifier(leveldir_first,
9983 global.convert_leveldir);
9985 if (convert_leveldir == NULL)
9986 Error(ERR_EXIT, "no such level identifier: '%s'",
9987 global.convert_leveldir);
9989 leveldir_current = convert_leveldir;
9991 if (global.convert_level_nr != -1)
9993 convert_leveldir->first_level = global.convert_level_nr;
9994 convert_leveldir->last_level = global.convert_level_nr;
9997 convert_level_nr = convert_leveldir->first_level;
10000 Print("Converting levels\n");
10001 PrintLine("-", 79);
10002 Print("Level series identifier: '%s'\n", convert_leveldir->identifier);
10003 Print("Level series name: '%s'\n", convert_leveldir->name);
10004 Print("Level series author: '%s'\n", convert_leveldir->author);
10005 Print("Number of levels: %d\n", convert_leveldir->levels);
10006 PrintLine("=", 79);
10009 for (i = 0; i < MAX_NUM_CONVERT_LEVELS; i++)
10010 levels_failed[i] = FALSE;
10012 while (convert_level_nr <= convert_leveldir->last_level)
10014 char *level_filename;
10017 level_nr = convert_level_nr++;
10019 Print("Level %03d: ", level_nr);
10021 LoadLevel(level_nr);
10022 if (level.no_valid_file)
10024 Print("(no level)\n");
10028 Print("converting level ... ");
10030 level_filename = getDefaultLevelFilename(level_nr);
10031 new_level = !fileExists(level_filename);
10035 SaveLevel(level_nr);
10037 num_levels_converted++;
10039 Print("converted.\n");
10043 if (level_nr >= 0 && level_nr < MAX_NUM_CONVERT_LEVELS)
10044 levels_failed[level_nr] = TRUE;
10046 Print("NOT CONVERTED -- LEVEL ALREADY EXISTS.\n");
10049 num_levels_handled++;
10053 PrintLine("=", 79);
10054 Print("Number of levels handled: %d\n", num_levels_handled);
10055 Print("Number of levels converted: %d (%d%%)\n", num_levels_converted,
10056 (num_levels_handled ?
10057 num_levels_converted * 100 / num_levels_handled : 0));
10058 PrintLine("-", 79);
10059 Print("Summary (for automatic parsing by scripts):\n");
10060 Print("LEVELDIR '%s', CONVERTED %d/%d (%d%%)",
10061 convert_leveldir->identifier, num_levels_converted,
10062 num_levels_handled,
10063 (num_levels_handled ?
10064 num_levels_converted * 100 / num_levels_handled : 0));
10066 if (num_levels_handled != num_levels_converted)
10068 Print(", FAILED:");
10069 for (i = 0; i < MAX_NUM_CONVERT_LEVELS; i++)
10070 if (levels_failed[i])
10075 PrintLine("=", 79);
10077 CloseAllAndExit(0);
10081 /* ------------------------------------------------------------------------- */
10082 /* create and save images for use in level sketches (raw BMP format) */
10083 /* ------------------------------------------------------------------------- */
10085 void CreateLevelSketchImages()
10087 #if defined(TARGET_SDL)
10092 InitElementPropertiesGfxElement();
10094 bitmap1 = CreateBitmap(TILEX, TILEY, DEFAULT_DEPTH);
10095 bitmap2 = CreateBitmap(MINI_TILEX, MINI_TILEY, DEFAULT_DEPTH);
10097 for (i = 0; i < NUM_FILE_ELEMENTS; i++)
10099 Bitmap *src_bitmap;
10101 int element = getMappedElement(i);
10102 int graphic = el2edimg(element);
10103 char basename1[16];
10104 char basename2[16];
10108 sprintf(basename1, "%03d.bmp", i);
10109 sprintf(basename2, "%03ds.bmp", i);
10111 filename1 = getPath2(global.create_images_dir, basename1);
10112 filename2 = getPath2(global.create_images_dir, basename2);
10114 getFixedGraphicSource(graphic, 0, &src_bitmap, &src_x, &src_y);
10115 BlitBitmap(src_bitmap, bitmap1, src_x, src_y, TILEX, TILEY,
10118 if (SDL_SaveBMP(bitmap1->surface, filename1) != 0)
10119 Error(ERR_EXIT, "cannot save level sketch image file '%s'", filename1);
10121 getMiniGraphicSource(graphic, &src_bitmap, &src_x, &src_y);
10122 BlitBitmap(src_bitmap, bitmap2, src_x, src_y, MINI_TILEX, MINI_TILEY, 0, 0);
10124 if (SDL_SaveBMP(bitmap2->surface, filename2) != 0)
10125 Error(ERR_EXIT, "cannot save level sketch image file '%s'", filename2);
10131 printf("%03d `%03d%c", i, i, (i % 10 < 9 ? ' ' : '\n'));
10134 FreeBitmap(bitmap1);
10135 FreeBitmap(bitmap2);
10140 Error(ERR_INFO, "%d normal and small images created", NUM_FILE_ELEMENTS);
10142 CloseAllAndExit(0);
10147 /* ------------------------------------------------------------------------- */
10148 /* create and save images for custom and group elements (raw BMP format) */
10149 /* ------------------------------------------------------------------------- */
10151 void CreateCustomElementImages(char *directory)
10153 #if defined(TARGET_SDL)
10154 char *src_basename = "RocksCE-template.ilbm";
10155 char *dst_basename = "RocksCE.bmp";
10156 char *src_filename = getPath2(directory, src_basename);
10157 char *dst_filename = getPath2(directory, dst_basename);
10158 Bitmap *src_bitmap;
10160 int yoffset_ce = 0;
10161 int yoffset_ge = (TILEY * NUM_CUSTOM_ELEMENTS / 16);
10164 SDLInitVideoDisplay();
10166 src_bitmap = LoadImage(src_filename);
10168 bitmap = CreateBitmap(TILEX * 16 * 2,
10169 TILEY * (NUM_CUSTOM_ELEMENTS + NUM_GROUP_ELEMENTS) / 16,
10172 for (i = 0; i < NUM_CUSTOM_ELEMENTS; i++)
10179 BlitBitmap(src_bitmap, bitmap, 0, 0, TILEX, TILEY,
10180 TILEX * x, TILEY * y + yoffset_ce);
10182 BlitBitmap(src_bitmap, bitmap, 0, TILEY,
10184 TILEX * x + TILEX * 16,
10185 TILEY * y + yoffset_ce);
10187 for (j = 2; j >= 0; j--)
10191 BlitBitmap(src_bitmap, bitmap,
10192 TILEX + c * 7, 0, 6, 10,
10193 TILEX * x + 6 + j * 7,
10194 TILEY * y + 11 + yoffset_ce);
10196 BlitBitmap(src_bitmap, bitmap,
10197 TILEX + c * 8, TILEY, 6, 10,
10198 TILEX * 16 + TILEX * x + 6 + j * 8,
10199 TILEY * y + 10 + yoffset_ce);
10205 for (i = 0; i < NUM_GROUP_ELEMENTS; i++)
10212 BlitBitmap(src_bitmap, bitmap, 0, 0, TILEX, TILEY,
10213 TILEX * x, TILEY * y + yoffset_ge);
10215 BlitBitmap(src_bitmap, bitmap, 0, TILEY,
10217 TILEX * x + TILEX * 16,
10218 TILEY * y + yoffset_ge);
10220 for (j = 1; j >= 0; j--)
10224 BlitBitmap(src_bitmap, bitmap, TILEX + c * 10, 11, 10, 10,
10225 TILEX * x + 6 + j * 10,
10226 TILEY * y + 11 + yoffset_ge);
10228 BlitBitmap(src_bitmap, bitmap,
10229 TILEX + c * 8, TILEY + 12, 6, 10,
10230 TILEX * 16 + TILEX * x + 10 + j * 8,
10231 TILEY * y + 10 + yoffset_ge);
10237 if (SDL_SaveBMP(bitmap->surface, dst_filename) != 0)
10238 Error(ERR_EXIT, "cannot save CE graphics file '%s'", dst_filename);
10240 FreeBitmap(bitmap);
10242 CloseAllAndExit(0);