ViewVC Help
View File | Revision Log | Show Annotations | Download File
/cvs/deliantra/util/world2png
(Generate patch)

Comparing deliantra/util/world2png (file contents):
Revision 1.1 by root, Sat Sep 2 15:48:27 2006 UTC vs.
Revision 1.2 by root, Fri Oct 6 16:58:16 2006 UTC

… …
41 41
42 jungle_1 => "#084", 42 jungle_1 => "#084",
43 jungle_2 => "#084", 43 jungle_2 => "#084",
44 jungle_3 => "#084", 44 jungle_3 => "#084",
45 45
46 wasteland => "#000", 46 flagstone => "#bbb",
47 istone => "#bbc",
47 48
48 hills_rocky => "#aa8", 49 hills_rocky => "#aa8",
49 hills => "#aa4", 50 hills => "#aa4",
50 treed_hills => "#aa4", 51 treed_hills => "#aa4",
51 mountain => "#ddd", 52 mountain => "#ccc",
52 mountain_2 => "#ddd", 53 mountain_2 => "#ccd",
53 mountain2 => "#ddd", 54 mountain2 => "#ccd",
54 mountain3 => "#ddd",
55 mountain4 => "#ddd", 55 mountain4 => "#ddb",
56 mountain5 => "#ddd", 56 mountain5 => "#ddd",
57 s_mountain => "#ddd", 57 s_mountain => "#dff",
58
59 wasteland => "#ddf",
60 drifts => "#eef",
61 snow => "#eff",
58); 62);
59 63
60for my $k (keys %type) { 64for my $k (keys %type) {
61 my $v = join "", map chr, (map $_*255/15, map hex, split //, substr $type{$k}, 1), 255; 65 my $v = join "", map chr, (map $_*255/15, map hex, split //, substr $type{$k}, 1), 255;
62 $color{$k} = $v; 66 $color{$k} = $v;

Diff Legend

– Removed lines
+ Added lines
< Changed lines
> Changed lines