indir = '/umbradata3/optest'
infil = indir + '/940222_190446'
;
rdtfr, infil, img, hdr, nimg=1, first=0
for i=0,25 do begin & print,i & rdtfr, infil, img, hdr, nimg=1, first=i & tvscl,img & end
;
end