createbatfile.pro

来自「形成批处理文件 将JAVAD接收机数据转为Rinex格式」· PRO 代码 · 共 14 行

pro CreateBatFile

phasefile=file_search('f:\data\0826\*.jps',count=number)
;获取需要转化的文件路径

openw,1,'f:\data\0826\convert.bat'
for i=0,number-1 do begin
   filetemp=strmid(phasefile(i),strpos(phasefile(i),'\',/reverse_search)+1)

   printf,1,'jps2rin '+filetemp
endfor
close,1

end