<div dir="ltr"><div><div>Dear Jennifer<br><br></div>By the way COLA/IGES images from <a href="http://wxmaps.org">http://wxmaps.org</a> , is there any chance to get some or all scripts to generate those images?, where can I get them?. <br>
<br></div>Regards<br>Matias <br><br></div><div class="gmail_extra"><br><br><div class="gmail_quote">2014-06-12 6:30 GMT+09:00 Jennifer Adams <span dir="ltr"><<a href="mailto:jma@cola.iges.org" target="_blank">jma@cola.iges.org</a>></span>:<br>
<blockquote class="gmail_quote" style="margin:0 0 0 .8ex;border-left:1px #ccc solid;padding-left:1ex"><div style="word-wrap:break-word"><div>Hi, Kevin -- </div><div>I'm glad you are happy with version 2.1 and it didn't take too much work to incorporate gxprint. It is faster than writing out the metafile and running gxyat separately. </div>
<div><br></div><div>I have a set of background images with the topography that are a fixed size, that I am unable to re-create because of deprecated features in the imagemagik routine 'combine'. There probably is a way to do it with cairo, but I haven't had time to figure it out. So I am stuck with that image size and aspect ratio, unless I want to abandon the topography background, which I am not willing to do. I use mpvals to get the plot to fill the page and 'set parea 0 10.98 0 8.5'. </div>
<div><br></div><div>It can be tricky to get the mpvals just right to fill the page, but I am stuck with that technique because of the background image. There is a better way to do this -- draw the plot in the domain you want, use 'q gxinfo' to get the aspect ratio of the plot, then restart grads with -a using that ratio… But I digress. </div>
<div><br></div><div>The title bar is drawn on top of the finished graphic with 'draw recf', and the font is LiberationSans-Regular. The color fan has a big white mark (style 3) drawn underneath it to mask out the plot in the corner. </div>
<div><br></div><div>I create each panel using gxprint with -b and -t options, and then I use pngquant to shrink the filesize. ImageMagik is not a part of the operational scripts. The subroutine to draw the fan-shaped color bar is below. Note there are some global variables in there that will not work right if you run it as is. </div>
<div>--Jennifer</div><div><br></div><div><div><font face="Courier"><span style="font-size:13px">* * * * * * * * * * * * * * * * * * * * * * * * * * * * *</span></font></div><div><font face="Courier"><span style="font-size:13px">* Draws a fan-shaped color bar in the upper right corner </span></font></div>
<div><font face="Courier"><span style="font-size:13px"><br></span></font></div><div><font face="Courier"><span style="font-size:13px">function carc(panel)</span></font></div><div><font face="Courier"><span style="font-size:13px">ro = 1.04 ;* outer radius for colors</span></font></div>
<div><font face="Courier"><span style="font-size:13px">ri = 0.50 ;* inner radius for colors</span></font></div><div><font face="Courier"><span style="font-size:13px">rt = 1.10 ;* radius for text</span></font></div>
<div><font face="Courier"><span style="font-size:13px">rti = 1.0 ;* radius for inner text</span></font></div><div><font face="Courier"><span style="font-size:13px">* xc,yc = coordinates of center of circle (a.k.a. the upper right hand corner of plot)</span></font></div>
<div><font face="Courier"><span style="font-size:13px">if (_regn='hemi' | _regn='shemi')</span></font></div><div><font face="Courier"><span style="font-size:13px"> xc = 8.5</span></font></div><div><font face="Courier"><span style="font-size:13px">else</span></font></div>
<div><font face="Courier"><span style="font-size:13px"> xc = 10.98</span></font></div><div><font face="Courier"><span style="font-size:13px">endif</span></font></div><div><font face="Courier"><span style="font-size:13px">yc = 8.5</span></font></div>
<div><font face="Courier"><span style="font-size:13px"><br></span></font></div><div><font face="Courier"><span style="font-size:13px">* read the shading and contour info from _shades</span></font></div><div><font face="Courier"><span style="font-size:13px">ll = 1</span></font></div>
<div><font face="Courier"><span style="font-size:13px">data = sublin(_shades,1)</span></font></div><div><font face="Courier"><span style="font-size:13px">ll = subwrd(data,5)</span></font></div><div><font face="Courier"><span style="font-size:13px">mm = 1</span></font></div>
<div><font face="Courier"><span style="font-size:13px">while (mm <= ll)</span></font></div><div><font face="Courier"><span style="font-size:13px"> mmp1 = mm + 1</span></font></div><div><font face="Courier"><span style="font-size:13px"> data = sublin(_shades,mmp1)</span></font></div>
<div><font face="Courier"><span style="font-size:13px"> <a href="http://col.mm" target="_blank">col.mm</a> = subwrd(data,1)</span></font></div><div><font face="Courier"><span style="font-size:13px"> if (<a href="http://col.mm" target="_blank">col.mm</a> < 0)</span></font></div>
<div><font face="Courier"><span style="font-size:13px"> <a href="http://col.mm" target="_blank">col.mm</a> = 999</span></font></div><div><font face="Courier"><span style="font-size:13px"> endif</span></font></div><div>
<font face="Courier"><span style="font-size:13px"> <a href="http://lim.mm" target="_blank">lim.mm</a> = subwrd(data,3)</span></font></div><div><font face="Courier"><span style="font-size:13px"> if (<a href="http://lim.mm" target="_blank">lim.mm</a> = '>')</span></font></div>
<div><font face="Courier"><span style="font-size:13px"> <a href="http://lim.mm" target="_blank">lim.mm</a> = ' '</span></font></div><div><font face="Courier"><span style="font-size:13px"> break</span></font></div>
<div><font face="Courier"><span style="font-size:13px"> endif</span></font></div><div><font face="Courier"><span style="font-size:13px"> mm = mm + 1</span></font></div><div><font face="Courier"><span style="font-size:13px">endwhile</span></font></div>
<div><font face="Courier"><span style="font-size:13px"><br></span></font></div><div><font face="Courier"><span style="font-size:13px">* Cover up the corner of the plot </span></font></div><div><font face="Courier"><span style="font-size:13px">if (_regn!='hemi' & _regn!='shemi')</span></font></div>
<div><font face="Courier"><span style="font-size:13px"> 'set line 561' ; 'draw mark 3 'xc' 'yc' 2.8' ;* filled circle </span></font></div><div><font face="Courier"><span style="font-size:13px"> 'set line 1 1 3'; 'draw mark 2 'xc' 'yc' 2.8' ;* open circle outline</span></font></div>
<div><font face="Courier"><span style="font-size:13px">endif</span></font></div><div><font face="Courier"><span style="font-size:13px"><br></span></font></div><div><font face="Courier"><span style="font-size:13px">* dd = amount of arc for colors to subtend (90deg)</span></font></div>
<div><font face="Courier"><span style="font-size:13px">* id = position on unit circle at which to start (270deg or bottom)</span></font></div><div><font face="Courier"><span style="font-size:13px">dd = 3.1415926*0.5/ll</span></font></div>
<div><font face="Courier"><span style="font-size:13px">id = 3.1415926*1.50</span></font></div><div><div><font face="Courier"><span style="font-size:13px">* calculate starting points</span></font></div><div><font face="Courier"><span style="font-size:13px">'d 'ro'*cos('id')' ; xfo = subwrd(result,4) + xc</span></font></div>
<div><font face="Courier"><span style="font-size:13px">'d 'ro'*sin('id')' ; yfo = subwrd(result,4) + yc</span></font></div><div><font face="Courier"><span style="font-size:13px">'d 'ri'*cos('id')' ; xfi = subwrd(result,4) + xc</span></font></div>
<div><font face="Courier"><span style="font-size:13px">'d 'ri'*sin('id')' ; yfi = subwrd(result,4) + yc</span></font></div><div><font face="Courier"><span style="font-size:13px"><br></span></font></div>
<div><font face="Courier"><span style="font-size:13px">* For each color, calculate new points for color fills and text</span></font></div><div><font face="Courier"><span style="font-size:13px">mm = 1 </span></font></div><div>
<font face="Courier"><span style="font-size:13px">while(mm<=ll) </span></font></div><div><font face="Courier"><span style="font-size:13px"> id = id - dd</span></font></div><div><font face="Courier"><span style="font-size:13px"> 'd 'ro'*cos('id')' ; xlo = subwrd(result,4) + xc</span></font></div>
<div><font face="Courier"><span style="font-size:13px"> 'd 'ro'*sin('id')' ; ylo = subwrd(result,4) + yc</span></font></div><div><font face="Courier"><span style="font-size:13px"> 'd 'ri'*cos('id')' ; xli = subwrd(result,4) + xc</span></font></div>
<div><font face="Courier"><span style="font-size:13px"> 'd 'ri'*sin('id')' ; yli = subwrd(result,4) + yc</span></font></div><div><font face="Courier"><span style="font-size:13px"> 'd 'rt'*cos('id')' ; xft = subwrd(result,4) + xc</span></font></div>
<div><font face="Courier"><span style="font-size:13px"> 'd 'rt'*sin('id')' ; yft = subwrd(result,4) + yc</span></font></div><div><font face="Courier"><span style="font-size:13px"> if (panel=7)</span></font></div>
<div><font face="Courier"><span style="font-size:13px"> 'd 'rti'*cos('id')'; xfti = subwrd(result,4) + xc</span></font></div><div><font face="Courier"><span style="font-size:13px"> 'd 'rti'*sin('id')'; yfti = subwrd(result,4) + yc</span></font></div>
<div><font face="Courier"><span style="font-size:13px"> endif</span></font></div><div><font face="Courier"><span style="font-size:13px"> did = id*180/3.1415926 - 180 ;* rotation angle for text</span></font></div><div>
<font face="Courier"><span style="font-size:13px"><br></span></font></div><div><font face="Courier"><span style="font-size:13px">* Draw the color wedge</span></font></div><div><font face="Courier"><span style="font-size:13px"> 'set line '<a href="http://col.mm" target="_blank">col.mm</a></span></font></div>
<div><font face="Courier"><span style="font-size:13px"> 'draw polyf 'xfi' 'yfi' 'xfo' 'yfo' 'xlo' 'ylo' 'xli' 'yli</span></font></div><div><font face="Courier"><span style="font-size:13px"><br>
</span></font></div><div><font face="Courier"><span style="font-size:13px">* Draw the contour values</span></font></div><div><font face="Courier"><span style="font-size:13px"> ck = subwrd(<a href="http://lim.mm" target="_blank">lim.mm</a>,1) </span></font></div>
<div><font face="Courier"><span style="font-size:13px"> if (ck != '')</span></font></div><div><font face="Courier"><span style="font-size:13px"> 'set string 1 r 4 'did</span></font></div><div><font face="Courier"><span style="font-size:13px"> 'set strsiz 0.08 0.11'</span></font></div>
<div><font face="Courier"><span style="font-size:13px"><br></span></font></div><div><font face="Courier"><span style="font-size:13px"> if (panel=1 | (panel=3 & _tindx=1) | panel=4 | panel=5 )</span></font></div><div>
<font face="Courier"><span style="font-size:13px">* draw a label for every color wedge</span></font></div><div><font face="Courier"><span style="font-size:13px"> 'draw string 'xft' 'yft' '<a href="http://lim.mm" target="_blank">lim.mm</a></span></font></div>
<div><font face="Courier"><span style="font-size:13px"> endif</span></font></div><div><font face="Courier"><span style="font-size:13px"> if (panel=2)</span></font></div><div><font face="Courier"><span style="font-size:13px">* draw label if it is divisible by 4 </span></font></div>
<div><font face="Courier"><span style="font-size:13px"> fmod = math_fmod(<a href="http://lim.mm" target="_blank">lim.mm</a>,4)</span></font></div><div><font face="Courier"><span style="font-size:13px"> if (fmod=0)</span></font></div>
<div><font face="Courier"><span style="font-size:13px"> 'draw string 'xft' 'yft' '<a href="http://lim.mm" target="_blank">lim.mm</a></span></font></div><div><font face="Courier"><span style="font-size:13px"> endif</span></font></div>
<div><font face="Courier"><span style="font-size:13px">* draw a thick black 540 line on the thickness plot</span></font></div><div><font face="Courier"><span style="font-size:13px"> if (<a href="http://lim.mm" target="_blank">lim.mm</a>=546)</span></font></div>
<div><font face="Courier"><span style="font-size:13px"> 'set line 1 1 4'</span></font></div><div><font face="Courier"><span style="font-size:13px"> 'draw line 'xfi' 'yfi' 'xfo' 'yfo</span></font></div>
<div><font face="Courier"><span style="font-size:13px"> endif</span></font></div><div><font face="Courier"><span style="font-size:13px"> endif</span></font></div><div><font face="Courier"><span style="font-size:13px"> if (panel=3 & _tindx>1)</span></font></div>
<div><font face="Courier"><span style="font-size:13px">* draw selected precip contour levels </span></font></div><div><font face="Courier"><span style="font-size:13px"> if (<a href="http://lim.mm" target="_blank">lim.mm</a>=0.2 | <a href="http://lim.mm" target="_blank">lim.mm</a>=1 | <a href="http://lim.mm" target="_blank">lim.mm</a>=4 | <a href="http://lim.mm" target="_blank">lim.mm</a>=8 | <a href="http://lim.mm" target="_blank">lim.mm</a>=12 | <a href="http://lim.mm" target="_blank">lim.mm</a>=18 | <a href="http://lim.mm" target="_blank">lim.mm</a>=24 | <a href="http://lim.mm" target="_blank">lim.mm</a>=30 | <a href="http://lim.mm" target="_blank">lim.mm</a>=40 | <a href="http://lim.mm" target="_blank">lim.mm</a>=50 | <a href="http://lim.mm" target="_blank">lim.mm</a>=70 | <a href="http://lim.mm" target="_blank">lim.mm</a>=90)</span></font></div>
<div><font face="Courier"><span style="font-size:13px"> 'set strsiz 0.08 0.10'</span></font></div><div><font face="Courier"><span style="font-size:13px"> 'draw string 'xft' 'yft' '<a href="http://lim.mm" target="_blank">lim.mm</a></span></font></div>
<div><font face="Courier"><span style="font-size:13px"> endif</span></font></div><div><font face="Courier"><span style="font-size:13px"> endif</span></font></div><div><div><font face="Courier"><span style="font-size:13px"> if (panel=6)</span></font></div>
<div><font face="Courier"><span style="font-size:13px">* draw selected pwat contour levels </span></font></div><div><font face="Courier"><span style="font-size:13px"> if (<a href="http://lim.mm" target="_blank">lim.mm</a>=6 | <a href="http://lim.mm" target="_blank">lim.mm</a>=12 | <a href="http://lim.mm" target="_blank">lim.mm</a>=18 | <a href="http://lim.mm" target="_blank">lim.mm</a>=24 | <a href="http://lim.mm" target="_blank">lim.mm</a>=30 | <a href="http://lim.mm" target="_blank">lim.mm</a>=36 | <a href="http://lim.mm" target="_blank">lim.mm</a>=42| <a href="http://lim.mm" target="_blank">lim.mm</a>=48 | <a href="http://lim.mm" target="_blank">lim.mm</a>=54 | <a href="http://lim.mm" target="_blank">lim.mm</a>=60)</span></font></div>
<div><font face="Courier"><span style="font-size:13px"> 'draw string 'xft' 'yft' '<a href="http://lim.mm" target="_blank">lim.mm</a></span></font></div><div><font face="Courier"><span style="font-size:13px"> endif</span></font></div>
<div><font face="Courier"><span style="font-size:13px"> endif</span></font></div><div><font face="Courier"><span style="font-size:13px"><br></span></font></div><div><font face="Courier"><span style="font-size:13px"> if (panel=7) </span></font></div>
<div><font face="Courier"><span style="font-size:13px">* draw interior text labels</span></font></div><div><font face="Courier"><span style="font-size:13px"> if (<a href="http://lim.mm" target="_blank">lim.mm</a>=3)</span></font></div>
<div><font face="Courier"><span style="font-size:13px"> 'set string 1 l 4 'did</span></font></div><div><font face="Courier"><span style="font-size:13px"> if (_tindx=1)</span></font></div><div><font face="Courier"><span style="font-size:13px"> 'draw string 'xfti' 'yfti' 800mb'</span></font></div>
<div><font face="Courier"><span style="font-size:13px"> else</span></font></div><div><font face="Courier"><span style="font-size:13px"> 'draw string 'xfti' 'yfti' LOW'</span></font></div>
<div><font face="Courier"><span style="font-size:13px"> endif</span></font></div><div><font face="Courier"><span style="font-size:13px"> endif</span></font></div><div><font face="Courier"><span style="font-size:13px"> if (<a href="http://lim.mm" target="_blank">lim.mm</a>=9)</span></font></div>
<div><font face="Courier"><span style="font-size:13px"> 'set string 1 l 4 'did</span></font></div><div><font face="Courier"><span style="font-size:13px"> if (_tindx=1)</span></font></div><div><font face="Courier"><span style="font-size:13px"> 'draw string 'xfti' 'yfti' 500mb'</span></font></div>
<div><font face="Courier"><span style="font-size:13px"> else</span></font></div><div><font face="Courier"><span style="font-size:13px"> 'draw string 'xfti' 'yfti' MID'</span></font></div>
<div><font face="Courier"><span style="font-size:13px"> endif</span></font></div><div><font face="Courier"><span style="font-size:13px"> endif</span></font></div><div><font face="Courier"><span style="font-size:13px"> if (<a href="http://lim.mm" target="_blank">lim.mm</a>=15)</span></font></div>
<div><font face="Courier"><span style="font-size:13px"> 'set string 1 l 4 'did</span></font></div><div><font face="Courier"><span style="font-size:13px"> if (_tindx=1)</span></font></div><div><font face="Courier"><span style="font-size:13px"> 'draw string 'xfti' 'yfti' 300mb'</span></font></div>
<div><font face="Courier"><span style="font-size:13px"> else</span></font></div><div><font face="Courier"><span style="font-size:13px"> 'draw string 'xfti' 'yfti' HIGH'</span></font></div>
<div><font face="Courier"><span style="font-size:13px"> endif</span></font></div><div><font face="Courier"><span style="font-size:13px"> endif</span></font></div><div><font face="Courier"><span style="font-size:13px">* draw low contour label</span></font></div>
<div><font face="Courier"><span style="font-size:13px"> if (<a href="http://lim.mm" target="_blank">lim.mm</a>=1 | <a href="http://lim.mm" target="_blank">lim.mm</a>=7 | <a href="http://lim.mm" target="_blank">lim.mm</a>=13)</span></font></div>
<div><font face="Courier"><span style="font-size:13px"> 'set string 1 r 4 'did</span></font></div><div><font face="Courier"><span style="font-size:13px"> if (_tindx=1)</span></font></div><div><font face="Courier"><span style="font-size:13px"> 'draw string 'xft' 'yft' 70'</span></font></div>
<div><font face="Courier"><span style="font-size:13px"> else</span></font></div><div><font face="Courier"><span style="font-size:13px"> 'draw string 'xft' 'yft' 50'</span></font></div>
<div><font face="Courier"><span style="font-size:13px"> endif</span></font></div><div><font face="Courier"><span style="font-size:13px"> endif</span></font></div><div><font face="Courier"><span style="font-size:13px">* draw high contour label</span></font></div>
<div><font face="Courier"><span style="font-size:13px"> if (<a href="http://lim.mm" target="_blank">lim.mm</a>=5 | <a href="http://lim.mm" target="_blank">lim.mm</a>=11 | <a href="http://lim.mm" target="_blank">lim.mm</a>=17) </span></font></div>
<div><font face="Courier"><span style="font-size:13px"> 'set string 1 r 4 'did</span></font></div><div><font face="Courier"><span style="font-size:13px"> 'draw string 'xft' 'yft' 90'</span></font></div>
<div><font face="Courier"><span style="font-size:13px"> endif</span></font></div><div><font face="Courier"><span style="font-size:13px"> endif</span></font></div><div><font face="Courier"><span style="font-size:13px"> endif</span></font></div>
<div><font face="Courier"><span style="font-size:13px"><br></span></font></div><div><font face="Courier"><span style="font-size:13px"> xfo = xlo</span></font></div><div><font face="Courier"><span style="font-size:13px"> yfo = ylo</span></font></div>
<div><font face="Courier"><span style="font-size:13px"> xfi = xli</span></font></div><div><font face="Courier"><span style="font-size:13px"> yfi = yli</span></font></div><div><font face="Courier"><span style="font-size:13px"> mm = mm + 1</span></font></div>
<div><font face="Courier"><span style="font-size:13px">endwhile</span></font></div><div><font face="Courier"><span style="font-size:13px">'set string 1 l 1 0'</span></font></div></div><div><font face="Courier"><span style="font-size:13px"><br>
</span></font></div></div></div><div><br></div><div><div class=""><div>On Jun 11, 2014, at 4:29 PM, Kevin M Levey wrote:</div><br></div><blockquote type="cite"><div style="word-wrap:break-word"><div class="">WED 11JUN14: 1320PDT<div>
<br></div><div>This question is essentially for Jennifer Adams: </div><div><br></div><div>I was wondering about a few items regarding your COLA/IGES images. Example: </div><div><br></div></div><div><span><avnmr1.00hr.png></span></div>
<div class=""><div><br></div><div>Firstly, I am quite familiar with imagemagik to manipulate images etc, but was wondering </div><div><br></div><div>1] Are you cropping out everything outside the plot area to end up with your plot above and then adding (#2) the title bar below using imagemagik or is this new functionally in Grads 2.1 using gxprint -f, I’m thinking the latter ?</div>
<div>The reason I ask, is that it appears the font in the lower title area is from GRADS and was wondering if you are adding this as shaded box in the plot area and then adding the text and then doing gxprint -f ? </div></div>
</div></blockquote><blockquote type="cite"><div class=""><div style="word-wrap:break-word"><div><br></div><div>2] Is the legend bar that you use (#1) COLA/IGES propriety code or freely available? </div><div><br></div><div>
One of the BEST new features of GRDs 2.1 is transparency and the ability to now plot different *shaded* layers.</div><div><br></div><div>Thanks for the great upgrades! </div><div><br><div>
<div><div style="font-family:Calibri;font-size:14px">Regards,</div><div style="font-family:Calibri;font-size:14px"><br></div><div style="font-family:Calibri;font-size:14px">Kevin M Levey, MSc in Oceans and Atmospheric Sciences (University of Cape Town)</div>
<div style="font-family:Calibri;font-size:14px">Vice President of Operations</div><div style="font-family:Calibri;font-size:14px">CustomWeather, Inc.</div><div style="font-family:Calibri;font-size:14px">San Francisco, California, USA</div>
<div style="font-family:Calibri;font-size:14px"><br></div><div style="font-family:Calibri;font-size:14px">"Taking the World by Storm!"</div><div style="font-family:Calibri;font-size:14px"><br></div><div style="font-family:Calibri;font-size:14px">
<a href="http://www.customweather.com/" target="_blank">http://www.customweather.com</a></div><div style="font-family:Calibri;font-size:14px"><a href="http://www.myforecast.com/" target="_blank">http://www.myforecast.com</a></div>
<div style="font-family:Calibri;font-size:14px"><a href="http://www.1stweather.com/" target="_blank">http://www.1stweather.com</a></div><div style="font-family:Calibri;font-size:14px"><br></div><div style="font-family:Calibri;font-size:14px">
cell: 415-794-0411</div><div style="font-family:Calibri;font-size:14px">work: 415-777-3566</div><div style="font-family:Calibri;font-size:14px">email: <a href="mailto:klevey@customweather.com" target="_blank">klevey@customweather.com</a></div>
</div>
</div>
<br></div></div></div>_______________________________________________<br>gradsusr mailing list<br><a href="mailto:gradsusr@gradsusr.org" target="_blank">gradsusr@gradsusr.org</a><br><a href="http://gradsusr.org/mailman/listinfo/gradsusr" target="_blank">http://gradsusr.org/mailman/listinfo/gradsusr</a><br>
</blockquote></div><br><div>
<div style="word-wrap:break-word;font-size:12px"><div>--</div><div>Jennifer M. Adams<br>Center for Ocean-Land-Atmosphere Studies (COLA)<br>111 Research Hall, Mail Stop 2B3<br>George Mason University<br>4400 University Drive<br>
Fairfax, VA 22030 <br><br></div><div><br></div><br></div><br>
</div>
<br></div><br>_______________________________________________<br>
gradsusr mailing list<br>
<a href="mailto:gradsusr@gradsusr.org">gradsusr@gradsusr.org</a><br>
<a href="http://gradsusr.org/mailman/listinfo/gradsusr" target="_blank">http://gradsusr.org/mailman/listinfo/gradsusr</a><br>
<br></blockquote></div><br></div>