sc: indicate flying upgrade for locusts

diff --git a/sc-units-hots.inc.pl b/sc-units-hots.inc.pl
index e69bb81dbfd9386966be2d008b05dee1d814eb76..9faaea840a874aae5b92b1cb83f3fed4481d9128 100644 (file)
--- a/sc-units-hots.inc.pl
+++ b/sc-units-hots.inc.pl
@@ -2733,6 +2733,14 @@ use strict;
                        duration => 25,
                        cooldown => 60,
                        count => 2,
+                       upgrade => [
+                               {
+                                       # Flying Locusts
+                                       attr => {
+                                               flying => 1,
+                                       },
+                               },
+                       ],
                },
        ],
        upgrade => [
@@ -2741,9 +2749,6 @@ use strict;
                        min => 200,
                        gas => 200,
                        build => 160,
-                       attr => {
-                               flying => 1,
-                       },
                },
        ],
 },

diff --git a/sc-units-lotv.inc.pl b/sc-units-lotv.inc.pl
index dfa9748c7867104f6165b0814b4bde8d47b0fd76..e7608c5fed76e90446bfec106612674774758733 100644 (file)
--- a/sc-units-lotv.inc.pl
+++ b/sc-units-lotv.inc.pl
@@ -783,6 +783,7 @@ $unit{nydus_worm},
                {
                        %{ $unit{swarm_host}->{special}->[0] }, # locust
                        hp => 50,
+                       upgrade => [], # no flying
                },
        ],
        upgrade => [],

diff --git a/sc.plp b/sc.plp
index f0824bf917d45b07cb9a75e0781f2e1d2468dfee..c7aec309352f933ba9c2348fd7fe56aac4e320a9 100644 (file)
--- a/sc.plp
+++ b/sc.plp
@@ -280,7 +280,8 @@ sub showrangeint {
                        sprintf('<td class="unit unit-%s" title="%4$s%3$s">%s',
                                $_->            {cargo} < 0 ? ('supply',           T => 'transport') :
                                $_->{upgraded}->{cargo} < 0 ? ('supply magic-opt', T => 'optional transport') :
-                               $_->{attr}->{flying}    ? ('air', F => 'flying') :
+                               $_->            {attr}->{flying} ? ('air',           F => 'flying') :
+                               $_->{upgraded}->{attr}->{flying} ? ('air magic-opt', F => 'potentially flying') :
                                $_->{attr}->{structure} ? ('x',   B => 'building') :
                                (
                                        [qw( x s m l l h h h h )]->[ $_->{cargo} ],