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

Comparing deliantra/util/gen_worldmap (file contents):
Revision 1.5 by elmex, Sun Dec 17 22:46:27 2006 UTC vs.
Revision 1.6 by elmex, Fri Jan 5 18:31:37 2007 UTC

… …
44 hills_rocky => "#aa8", 44 hills_rocky => "#aa8",
45 treed_hills => "#6a4", 45 treed_hills => "#6a4",
46 hills => "#aa4", 46 hills => "#aa4",
47 mountain => "#ccc", 47 mountain => "#ccc",
48 mountain2 => "#cdd", 48 mountain2 => "#cdd",
49 mountain3 => "#ddc", 49# mountain3 => "#ddc",
50 mountain4 => "#ddb", 50 mountain4 => "#ddb",
51 mountain5 => "#ddd", 51 mountain5 => "#ddd",
52 s_mountain => "#dff", 52 s_mountain => "#dff",
53 53
54 wasteland => "#ddf", 54 wasteland => "#ddf",
… …
89 $y += 100; 89 $y += 100;
90 print "gce $ENV{CROSSFIRE_LIBDIR}/maps/world/world_${x}_${y}\n"; 90 print "gce $ENV{CROSSFIRE_LIBDIR}/maps/world/world_${x}_${y}\n";
91 exit 91 exit
92} elsif ($ARGV[0] eq 'partial') { 92} elsif ($ARGV[0] eq 'partial') {
93 ($part_x, $part_y) = ($ARGV[1], $ARGV[2]); 93 ($part_x, $part_y) = ($ARGV[1], $ARGV[2]);
94} elsif ($ARGV[0] =~ m/-*?:he?l?p?/) { 94} elsif ($ARGV[0] =~ m/-*?he?l?p?/) {
95 print <<USAGE; 95 print <<USAGE;
96gen_worldmap [<mode>] 96gen_worldmap [<mode>]
97 possible modes are: 97 possible modes are:
98 - palette generates the palette.png for drawing world.png 98 - palette generates the palette.png for drawing world.png
99 - pixel2map takes 2 further arguments representing coordinates in 99 - pixel2map takes 2 further arguments representing coordinates in
… …
104 it will only generate that particular worldmap. 104 it will only generate that particular worldmap.
105 (no overlay png is generated in this mode) 105 (no overlay png is generated in this mode)
106without any mode the complete world is regenerated from the world.png and 106without any mode the complete world is regenerated from the world.png and
107the overlay png is written. 107the overlay png is written.
108USAGE 108USAGE
109 exit
109} 110}
110 111
111Crossfire::load_archetypes; 112Crossfire::load_archetypes;
112 113
113open my $png, "convert world.png -depth 8 rgb:- |" 114open my $png, "convert world.png -depth 8 rgb:- |"

Diff Legend

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