| … | … | ||
|---|---|---|---|
| 33 | 33 | ||
| 34 | hills_rocky => "#aa8", | 34 | hills_rocky => "#aa8", |
| 35 | hills => "#aa4", | 35 | hills => "#aa4", |
| 36 | mountain => "#ccc", | 36 | mountain => "#ccc", |
| 37 | mountain5 => "#ddd", | 37 | mountain5 => "#ddd", |
| 38 | |||
| 39 | cobblestones => "#ea2", | ||
| 38 | ); | 40 | ); |
| 39 | 41 | ||
| 40 | for my $k (keys %type) { | 42 | for my $k (keys %type) { |
| 41 | my $v = join "", map chr, (map $_*255/15, map hex, split //, substr $type{$k}, 1), 255; | 43 | my $v = join "", map chr, (map $_*255/15, map hex, split //, substr $type{$k}, 1), 255; |
| 42 | $color{$v} = $k; | 44 | $color{$v} = $k; |
| – | Removed lines |
| + | Added lines |
| < | Changed lines |
| > | Changed lines |