ref $row eq 'HASH' or next;
for ($row, @{ $row->{special} }, @{ $row->{upgrade} }) {
$_ *= $RT for $_->{speed} // ();
- $_ /= $RT for $_->{build} // (), $_->{warp} // (), $_->{cooldown} // ();
+ $_ /= $RT for $_->{build} // (), $_->{transform} // (), $_->{warp} // (), $_->{cooldown} // ();
$_->{cooldown} and $_->{cooldown} /= $RT for @{ $_->{attack} // [] };
}
$unit{ lc $row->{name} =~ tr/ /_/r } = $row;
build => 0,
size => 0,
cargo => 0,
- attr => {
- trans => 1,
- },
+ hp => -1,
attack => [], #TODO: indicate diff from parent
speed => 5, #XXX: faster than 3.5
range => 7, #XXX: calculate from speed
{
name => 'Defender Mode',
abbr => 'dm',
- build => 2.88, # transformation time, 1.46s to revert
+ transform => 2.88, # 1.46s to revert
alt => 'Defender Liberator',
attack => [
{
{
%{ $unit{swarm_host}->{special}->[0] }, # locust
hp => 50,
+ upgrade => [], # no flying
},
],
upgrade => [],