Leser: 21
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31
my $matrix_zoom = 15; my $counter = 0; my $output_gpx_filename = "osm-matrix-haiti.gpx"; # http://a.tile.openstreetmap.org/15/9801/14670.png my $lat_start = 9607; my $lon_start = 14719; # hier +1 berücksichtigen my $lat_end = 9879; my $lon_end = 14509; my ($lat1, $lon1, $lat2, $lon2) = Project(9801,14670,$matrix_zoom); print "lat1: ".$lat1."\n"; print "lon1: ".$lon1."\n"; print "lat2: ".$lat2."\n"; print "lon2: ".$lon2."\n"; for (my $x=$lat_start;$x=$lat_end;$x++) { for (my $y=$lon_start;$y=$lat_end;$y++) { $counter++; print $y." / ".$x." - ".$counter."\n"; } }
for (my $x=$lat_start;$x=$lat_end;$x++)
for (my $x = $lat_start; $x <= $lat_end; $x++)
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19
use strict; use warnings; my $counter = 0; my $lat_start = 9607; my $lon_start = 14719; # hier +1 berühtigen my $lat_end = 9879; my $lon_end = 14809; for (my $x=$lat_start;$x<=$lat_end;$x++) { for (my $y=$lon_start;$y<=$lon_end;$y++) { $counter++; print $y." / ".$x." - ".$counter."\n"; } }