PRO Band_math_different
  ENVI, /restore_base_save_files
  ENVI_BATCH_INIT,log_file='batch.txt'
  ;////////////////////////////////////////以下是做波段运算
  subimg_file='E:\test\11\NDVI1.img'
  ENVI_OPEN_FILE,subimg_file,r_fid=sub_fid
  IF (sub_fid EQ -1) THEN BEGIN
    ENVI_BATCH_EXIT
    RETURN
  ENDIF
  ENVI_FILE_QUERY, sub_fid, dims=dims
  t_fid = [sub_fid,sub_fid]
  pos  = 0
  exp='(b1 gt 0.7)*1+(b1 lt 0.0)*0+(b1 ge 0 and b1 le 0.7)*((b1-0.0)/(0.7-0.0))'
  out_name = 'E:\test\11\植被覆盖度.img'
  ;///////////////////////////////////////进行波段运算
  ENVI_DOIT, 'math_doit', $
    fid=t_fid, pos=pos, dims=dims, $
    exp=exp,out_name=out_name,r_fid=sub_fid
  ; Exit Envi
  ENVI_BATCH_EXIT
END