comparison planner.pl @ 343:85d60a0569bf

fixed travel time for 0.3.0
author "Rex Tsai <chihchun@kalug.linux.org.tw>"
date Thu, 12 Feb 2009 21:14:47 +0800
parents 65f45552060e
children 72df6f5bd05d
comparison
equal deleted inserted replaced
342:f3bdbc706a37 343:85d60a0569bf
43 } else { 43 } else {
44 return int( (sqrt((abs($x1 - $x2) * abs($x1 - $x2)) + (abs($y1 - $y2) * abs($y1 - $y2)))) * (1200/$speed)); 44 return int( (sqrt((abs($x1 - $x2) * abs($x1 - $x2)) + (abs($y1 - $y2) * abs($y1 - $y2)))) * (1200/$speed));
45 } 45 }
46 } 46 }
47 47
48 # 48
49 package main; 49 package main;
50 getopts('w'); 50 getopts('w');
51 if($#ARGV < 2) { 51 if($#ARGV < 2) {
52 die("Usage: %s targetCity navyCity armyCity wingman1.. wingman2..\n"); 52 die("Usage: %s targetCity navyCity armyCity wingman1.. wingman2..\n");
53 } 53 }