文件输入输出
159.226.169.140(讨论)2012年4月7日 (六) 13:16的版本
- 判断一个文件是否存在
- 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