X-Git-Url: http://git.shiar.net/sheet.git/blobdiff_plain/681c73d50a05475fe165a51c8251ab32b0f7cefa..9f1aad6e442dbb3a88210a379d645db842d00def:/sc.plp?ds=sidebyside diff --git a/sc.plp b/sc.plp index f0824bf..0a41018 100644 --- a/sc.plp +++ b/sc.plp @@ -103,12 +103,12 @@ sub coltoggle { :>
<:= coltoggle(exists $get{order} ? 'race' : 'source' => '') :> | -<:= coltoggle(name => 'name') :> | +<:= coltoggle(name => 'name') :> | <:= coltoggle(cost => 'cost') :> | gas | <:= coltoggle(build => 'build') :> | <:= coltoggle(qw'size size') :> | -attr | +attr | <:= coltoggle(HP => 'hp') :> | shield | ⨠| @@ -280,7 +280,8 @@ sub showrangeint { sprintf('%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} ], @@ -289,7 +290,7 @@ sub showrangeint { ), defined $_->{size} && sprintf('â%.1f ', $_->{size}), ), - sprintf(' | %s', + sprintf(' | %s', defined $_->{pop} && $_->{pop} < 0 && ' unit-supply', defined $_->{pop} && $_->{pop} == .5 ? '½' : $_->{pop}, ), @@ -348,10 +349,10 @@ sub showrangeint { && qq'â', ' | ' . showmagic($_), !$_->{attack}->[1] ? () : ( - ' | |||
---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|
', showattack($_, 1), ' | ' + ' | |||||||||||||||||
', showattack($_, 1), ' | ' ), !$_->{attack}->[2] ? () : ( - ' | |||||||||||||||||
', showattack($_, 2), ' | ' + ' | |||||||||||||||||
', showattack($_, 2), ' | ' ), "\n" ); |