Re: Annotating a 3-d Image Array? [message #4070] |
Wed, 26 April 1995 00:00 |
Greening C M
Messages: 5 Registered: April 1995
|
Junior Member |
|
|
Hi,
You could write a procedure using the DT_ADD functions to change
the date.
e.g
PRO annotate, images, date, new_images
; go through each image
for i=0, (size(images))(3)-1 do begin
tv, image
; get a string of the date
dt_to_str, date, date_string
; put the date at position x,y
xyouts,x,y, date_string, /device
new_images(*,*,i)=tvrd()
; increment the date
date=dt_add(date, /Day)
endfor
end
Chris.
greec@essex.ac.uk
|
|
|
Re: Annotating a 3-d Image Array? [message #4091 is a reply to message #4070] |
Mon, 24 April 1995 00:00  |
rivers
Messages: 228 Registered: March 1991
|
Senior Member |
|
|
In article <3ngj12$3ra@news.mtu.edu>, "Andrew A. Pilant" <anpilant@mtu.edu> writes:
> Hello-
>
> This is probably ultraultra easy, but I am stuck.
>
> Scenario:
> I have a time series of SSM/I images in a single array, e.g.,
> ssmi=intarr(100,100,20) (20 days of 100x100 images).
>
> I would like to write the date (e.g., "Sep 21") on each image so that
> when I animate them (via movie or xinteranimate) I know the date
> of the image. I'll concatenate a 20x100 box at the bottom to hold the
> text, so the whole array would be 120x100x20. Ultimately, I'll export
> the annotated images/array in some form amenable to mpeg play or
> similar generic animation software.
>
> In reality, there are hundreds of images, so doing the following in
> command line mode won't be feasible:
> tv,image
> xyouts,x,y,'sep 12',/device
> new_i=tvrd()
The method you reject as unfeasible might work fine if you:
- Use the Z buffer device. TVRD() is much faster than with X
- Set the Z device size to be 20x100, so you only use it to buffer the
box used for the string.
- Use IDL's normal array operators to put the new box at the bottom of your
images.
Remember to set the Z device to not do Z buffering (DEVICE, /NOZ) which also
speeds it up.
____________________________________________________________
Mark Rivers (312) 702-2279 (office)
CARS (312) 702-9951 (secretary)
Univ. of Chicago (312) 702-5454 (FAX)
5640 S. Ellis Ave. (708) 922-0499 (home)
Chicago, IL 60637 rivers@cars3.uchicago.edu (Internet)
|
|
|