added optional button to restart game (door, panel and touch variants)

[rocksndiamonds.git] / build-scripts / create_element_defs.pl

diff --git a/build-scripts/create_element_defs.pl b/build-scripts/create_element_defs.pl
index 3f5693fe4de0ab304a9b38181bd8d4adae64ae78..b75d86ac79c6752c99a3068df90604f530f9a6c4 100755 (executable)
--- a/build-scripts/create_element_defs.pl
+++ b/build-scripts/create_element_defs.pl
@@ -500,6 +500,11 @@ sub print_sounds_list
            $sound =~ s/^/CLASS_/;      # add class identifier
        }
 
+       # dirty hack for making "ABC[DEF]" work as a "special" suffix
+       $sound =~ s/([^_])\[/$1_/;
+       $sound =~ s/\[//;
+       $sound =~ s/\]//;
+
        $sound = "SND_$sound";
 
        my $define_text = "#define $sound";
@@ -558,6 +563,11 @@ sub print_music_list
 
        my $music = $_;
 
+       # dirty hack for making "ABC[DEF]" work as a "special" suffix
+       $music =~ s/([^_])\[/$1_/;
+       $music =~ s/\[//;
+       $music =~ s/\]//;
+
        $music = "MUS_$music";
 
        my $define_text = "#define $music";
@@ -2509,6 +2519,7 @@ sub print_image_config_vars
 
            $var =~ s/^main\./menu.main./;
            $var =~ s/^setup\./menu.setup./;
+           $var =~ s/^scores\./menu.scores./;
            $var =~ s/^\[player\]\./game.player_/;
            $var =~ s/^\[title_initial\]/title_initial_default/;
            $var =~ s/^\[title\]/title_default/;