<html>
<head>
<title>example6color.gri</title>
</head>
<body bgcolor="#FFFFFF">
<pre>
<font color=#B22222># Example 6color -- Plot IR image of Gulf of Maine</font>
<font color=#B22222># define characteristics of norda images</font>
<font color=#0000EE>\0val =</font> <font color=#2F4F4F>"5"</font> <font color=#B22222># 0 in image</font>
<font color=#0000EE>\255val =</font> <font color=#2F4F4F>"30.5"</font> <font color=#B22222># 255 in image</font>
<font color=#0000EE>.rows. =</font> 128
<font color=#0000EE>.cols. =</font> 128
<font color=#0000EE>.pixel_width. =</font> 2
<font color=#0000EE>.km. =</font> {<font color=#9400D3>rpn</font><font color=#CDAD00> .cols.</font><font color=#CDAD00> .pixel_width.</font> *}
<font color=#B22222># get filenames</font>
query<font color=#0000EE> \filename</font> <font color=#2F4F4F>"Name image file" ("example6image.dat"</font>)
query<font color=#0000EE> \maskname</font> <font color=#2F4F4F>"Name mask file" ("example6mask.dat"</font>)
<font color=#B22222># get data</font>
open<font color=#0000EE> \filename</font> binary uchar
set image range<font color=#0000EE> \0val</font><font color=#0000EE> \255val
</font>read image<font color=#CDAD00> .rows.</font><font color=#CDAD00> .cols.</font> box 0 0<font color=#CDAD00> .km.</font><font color=#CDAD00> .km.</font>
close
open<font color=#0000EE> \maskname</font> binary uchar
read image mask<font color=#CDAD00> .rows.</font><font color=#CDAD00> .cols.</font>
close
<font color=#B22222># find out what grayscale method to use</font>
query<font color=#0000EE> \minT</font> <font color=#2F4F4F>"T/deg for white on page? " ("11"</font>)
query<font color=#0000EE> \maxT</font> <font color=#2F4F4F>"T/deg for black on page? " ("14"</font>)
<font color=#0000EE>\incT =</font> <font color=#2F4F4F>"1"</font>
<font color=#B22222># set up scales. </font>
set x size 12.8
set y size 12.8
set x name <font color=#2F4F4F>"km"</font>
set y name <font color=#2F4F4F>"km"</font>
set x axis 0<font color=#CDAD00> .km.</font> 32
set y axis 0<font color=#CDAD00> .km.</font> 32
<font color=#B22222># plot image, grayscale, and histogram</font>
set image colorscale hsb 0 1 1<font color=#0000EE> \maxT</font> hsb .6666666 1 1<font color=#0000EE> \minT
</font>draw image
draw image palette left<font color=#0000EE> \minT</font> right<font color=#0000EE> \maxT</font> increment<font color=#0000EE> \incT
</font>draw image histogram
draw title <font color=#2F4F4F>"Example 6: colorscale"</font>
</pre>
</body>
</html>
distrib
>
Mandriva
>
8.2
>
i586
>
media
>
contrib
>
by-pkgid
>
8b2b1fb157760a0d31e072e140388824
>
files
>
218
