1.envi读取文件

  file='D:\IDLPROJ\\ttttt' ;文件路径及文件名

  envi_open_file, file, r_fid=fid , /NO_INTERACTIVE_QUERY, /NO_REALIZE

  ENVI_FILE_QUERY, fid, dims=dims ,NB=NB, NL=NL, NS=NS, DATA_TYPE=DATA_TYPE, FILE_TYPE=FILE_TYPE $

    , INTERLEAVE=INTERLEAVE,WAVELENGTH_UNITS=WAVELENGTH_UNITS, SENSOR_TYPE=SENSOR_TYPE, FWHM=FWHM,WL =WL

  map_info = ENVI_GET_MAP_INFO(fid=fid)

 temp = envi_get_slice(fid=fid, line=k) ;返回的数组的维度为：该行像元数*波段数

\02.输出文件

主文件

  file_out=file+"_ref"

  openw,lun,file_out,/get_lun

  WRITEU,lun,data

头文件

  fname=file+"_ref.hdr"

  ;输出反射率头文件

  ENVI_SETUP_HEAD, fname=fname, $

    NS=NS, NL=NL, NB=NB, $

    INTERLEAVE=1, data_type=4, $

    WAVELENGTH_UNITS=WAVELENGTH_UNITS, map_info=map_info, WL=WL, $

    /write