git.shiar.nl
/
perl
/
schtarr.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
Data::StarCraft::Tileset->tileavg optimization
[perl/schtarr.git]
/
scmap
diff --git
a/scmap
b/scmap
index 3e7cee029284064e03abd8195d74a5c6a98f4896..5167e01484b48202cf1178361035c8b4657d7d5e 100755
(executable)
--- a/
scmap
+++ b/
scmap
@@
-47,8
+47,8
@@
if ($SHOWMAP eq "head") {
sub world {
my $self = shift;
sub world {
my $self = shift;
- # ERA: 0 1
2 3 4 5 6
7
- my @worlds = qw(badlands
space 0 0 jungle 0 0
twilight);
+ # ERA: 0 1
2 3 4 5 6
7
+ my @worlds = qw(badlands
platform install ashworld jungle desert ice
twilight);
return $worlds[$self->era] || "?";
}
return $worlds[$self->era] || "?";
}
@@
-101,3
+101,15
@@
if (defined $mapsep{$SHOWMAP}) {
}
}
}
}
+=head1 scmap
+
+From replay:
+
+ old/screptomap somereplay.rep | ./scmap -m=ppm > map.ppm
+
+From map:
+
+ ./scmtomap starcraft/maps/ladder/'(4)Lost Temple.scm'
+ ./scmap -m=ppm < file000001.xxx > map.ppm
+
+=cut