چرا زبان برنامه نویسی IDL

2 دیدگاه. ارسال دیدگاه جدید

• 

  بیات

  1399-11-28 2:51 ب.ظ

  سلام جناب احراری ببخشید ممنون میشم بفرمایید چه جوری در محیط idl در کد زیر لینک تصاویر مو میتونم فراخوانی کنم؟باید۵تصویر برای ران شدن مدل فراخوانی کنم ولی هر راهی را تست کردم ممکن نشد.
  ;function for open the file

  Pro GetData,ImgData = ImgData,ns = ns,nl = nl,nb = nb,Data_Type = Data_Type,$
  FileName = FileName,Map_info = map_Info, Fid = Fid
  Filter = [‘all file;*.*’]
  Envi_Open_File,FileName,R_Fid = Fid
  Envi_File_Query,Fid,ns = ns,nl = nl,nb = nb,Data_Type = Data_Type
  map_info = envi_get_map_info(fid=Fid)
  dims = [-1,0,ns – 1 ,0,nl – 1]
  case Data_Type Of
  ۱:ImgData = BytArr(ns,nl,nb) ; BYTE Byte
  ۲:ImgData = IntArr(ns,nl,nb) ; INT Integer
  ۳:ImgData = LonArr(ns,nl,nb) ; LONG Longword integer
  ۴:ImgData = FltArr(ns,nl,nb) ; FLOAT Floating point
  ۵:ImgData = DblArr(ns,nl,nb) ; DOUBLE Double-precision floating
  ۶:ImgData = COMPLEXARR(ns,nl,nb); complex, single-precision, floating-point
  ۹:ImgData = DCOMPLEXARR(ns,nl,nb);complex, double-precision, floating-point
  ۱۲:ImgData = UINTARR(ns,nl,nb) ; unsigned integer vector or array
  ۱۳:ImgData = ULONARR(ns,nl,nb) ; unsigned longword integer vector or array
  ۱۴:ImgData = LON64ARR(ns,nl,nb) ;a 64-bit integer vector or array
  ۱۵:ImgData = ULON64ARR(ns,nl,nb) ;an unsigned 64-bit integer vector or array
  EndCase
  For i = 0,nb-1 Do Begin
  Dt = Envi_Get_Data(Fid = Fid,dims = dims,pos=i)
  ImgData[*,*,i] = Dt[*,*]
  EndFor
  End

  پاسخ
  • 

    امیرحسین احراری

    1399-11-29 7:30 ق.ظ

    با سلام و احترام

    متاسفانه چند سالی هست که دیگر روی کدهای IDL کار نمیکنیم. فروش محصولات آن نیز متوقف شده است.
    با عرض پوزش از خدمت شما با ساختار این کد آشنایی ندارم.

    موفق باشید

    پاسخ