ENVI二次开发综述与代码分享.docVIP

ENVI二次开发综述与代码分享 ? ENVI具备了丰富的二次开发功能函数接口，基本涵盖了ENVI下所有的功能，且通过IDL语言有输出助手（导出为COM或JAVA类）、Callable、IDLDrawWidget和COM_IDL_CONNECT等多种方式与其他语言进行集成。 遥感与GIS一体化的应用模式如下： ? 下表对ENVI二次开发中常用的功能代码进行汇总。 功?能 源码名称 初始化ENVI startENVI.pro 定标 cal_ 大气校正 cal_ 融合 cal_ 镶嵌 cal_ 裁剪 cal_ 分类(监督+非监督) cal_ 面向对象特征提取 cal_ 结束ENVI endENVI.pro 二次开发的基本流程框架图如下： 附各个模块的源代码 初始化ENVI ;+;ENVI二次开发功能代码;;Author: DYQ;问题讨论：; /dyqwrp; /ESRI/?fromuid=9806;描述：; 初始化ENVI;;调用方法：;(1) ENVI的处理过程中不显示进度条; startEnvi;(2) ENVI的处理过程中显示进度条; startEnvi,/ShowProcess;-PRO startENVI, showProcess = showProcess??compile_opt idl2???ENVI, /restore_base_save_files??ENVI_BATCH_INIT, NO_STATUS_WINDOW = 1- keyWord_set(showProcess)END定标;+;ENVI二次开发功能代码;;Author: DYQ;问题讨论：; /ESRI/?fromuid=9806; /dyqwrp;描述：; 定标;;调用方法：; cal_Calibration, c:\temp\can_tmr.img,c:\temp\result.img,[[2,2,2,2,2,2],[1,1,1,1,1,1]];注意事项：; gainoffset参数与波段个数一一对应;;-Pro cal_calibration, infile, outFile, gainOffset,wl = wv;(可选关键字，wv是定标后单位)??COMPILE_OPT idl2??CATCH, Error_status??errorshow = Sorry to see the error,+ $???? please send the error Information to dongyq@??IF Error_status NE 0 THEN BEGIN????tmp = DIALOG_MESSAGE(errorshow+STRING(13b)+$??????!ERROR_STATE.MSG,/error,title = 错误提示!)????return??ENDIF???;获取ENVI的配置参数??cfg = envi_get_configuration_values()??tmppath = cfg.DEFAULT_TMP_DIRECTORY??;是否设置了输出文件名??IF N_ELEMENTS(outFile) EQ 0 THEN out_name=tmppath+PATH_SEP()+void.tmp???ENVI_OPEN_FILE,infile,R_fid= fid??;获取信息??ENVI_FILE_QUERY, FID, $????dims = dims, $????BNAMES = BNAMEs, $????NB = NB?????;定标功能??ENVI_DOIT,gainoff_doit, fid=fid, pos=LINDGEN(nb), dims=dims, out_name=outFile, $????gain=1./gainOffset[*,0], offset=gainOffset[*,1], r_fid=r_fid, in_memory=0,$????OUT_DT = 4?????ENVI_FILE_QUERY, r_fid, $????dims = dims, $????DATA_TYPE = 4, $????INTERLEAVE = INTERLEAVE, $????NB = NB, $????NL = NL, $????NS=NS ,$????OFFSET = OFFSET?????map_info = ENVI_GET_MAP_INFO(fid=r_fid)???;先关掉文件??ENVI_FILE_MNG, i