文件输入输出
跳到导航
跳到搜索
- 判断一个文件是否存在
- xidl中有一个exist程序
- if exist('input.dat') then print,'Yes' else print,'No'
- 文件打开
- openr,lun,/get_lun ;读取
- readf读取
- openw,lun,/get_lun ;写入
- printf写入
- 格式使用 format语句
- printf写入
- 将文件指针指向文件开头
- point_lun,lun,0
- 跳过文件开头n行
- skip_lun,lun,N,/lines
- 判断是否达到文件结束 EOF
WHILE ~ EOF(lun) DO BEGIN ; ~ 逻辑非运算 READF,lun, A ENDWHILE
- 文件指针关闭close之后,还需要释放free_lun