Envi lee el código fuente tiff
Mi código es el siguiente:
pro GF2_CALIBRATION
COMPILE_OPT idl2
ENVI,/RESTORE_BASE_SAVE_FILES
ENVI_Batch_Initialization
ENVI_OPEN_FILE, fname, r_fid=fid
ENVI_FILE_QUERY, fid, dims=dims, ns=ns, nl=nl, nb=nb, data_type=dt
fid=intarr(nb)+fid
pos=INDGEN(nb)
Ganancia=[0.1585, 0.1883, 0.1740, 0.1897]
Compensación =[-0.8765, -0.9742, -0.7652, -0.7233]
nombre_salida 1 = 'd:\12.tiff'
nombre_salida2='d:\1234.tiff '
out_name3='d:\1235.tiff '
out_name4='d:\1236.tiff '
Nombre de salida = [Nombre de salida 1, Nombre de salida 2, Nombre de salida 3, Nombre de salida 4]
Para i = 0L, (nb-1) comienza
fid=fid[ i]
pos= pos[i]
exp=strtrim(string(offset[i]), 2)+'+'+strtrim(string(GAIN[i]) , 2)+' * B '+str trim (cadena(I+1), 2)
ENVI_DOIT, ' math_doit ', dims=dims, $
pos=pos, fid=fid, exp=exp, $ p>
r_fid=r_fid, out_name=out_names[i]
Fin
Fin