/[opencvs]/eyes/enl_4800_to_x.pl
ViewVC logotype

Contents of /eyes/enl_4800_to_x.pl

Parent Directory Parent Directory | Revision Log Revision Log


Revision 1.1 - (show annotations)
Mon Oct 6 06:46:38 2014 UTC (4 years ago) by hib
Branch: MAIN
CVS Tags: HEAD
File MIME type: text/plain
Added more stuff - just in case, the old_eyes is in /b/archive/2014
1 #
2 # convert hologram points (for the build_grey series) from 4800x4800 pixels to ?by? pixels
3 #
4
5 $new = $ARGV[0];
6
7 while (<STDIN>) {
8 @r = split(/\|/);
9 ($x,$y,$z,$i,$w,$p) = @r;
10 $x = $x * $new / 4800.;
11 $y = $y * $new / 4800.;
12 print "$x|$y|$z|$i|$w|$p";
13 }

  ViewVC Help
Powered by ViewVC 1.1.5