计算代码运行时间:
代码语言:javascript复制count_seconds(t1)
//中间代码
count_seconds(t2)
Time := t2 -t1
文本操作:
open_file()
用以打开文件,包含三个参数:
open_file( : : FileName, FileType : FileHandle)
第一个参数是文件的路径和名称,第三个是文件的句柄,这两个参数很好理解。 第二个参数为文件类型,官方给出的名字叫 FileType (感觉这个名字并不直观,还不如叫OpenType),其实就是决定以怎样的方式去打开文件。有下面几种选择:
’input’: An already existing input file is opened for reading in ASCII format. 打开已经存在的文件,以ASCII格式读取。也就是说这个文件需要在路径下存在,而且使用该类型是不能写入,只能读取。 ’output’: A new output file is opened for writing in ASCII format. 打开一个新的文件,以ASCII格式写入。不存在文件时将创建一个。 ’append’: An already existing output file is opened at the end of the file for writing in ASCII format. 已经存在的输出文件在文件末尾打开,以ASCII格式写入。在一个已经存在的文件末尾写入,不会新建文件。 ’input_binary’: An already existing input file is opened for reading in binary format. ’output_binary’: A new output file is opened for writing in binary format. ’append_binary’: An already existing output file is opened at the end of the file for writing in binary format. 后面三个与前面只有写入格式上的不同,前三为ASCII格式,后三为二进制。
fwrite_string()
用以写入文件,包含2个参数:
fwrite_string( : : FileHandle, String : )
第一个参数就是open_file()
的输出,第二个参数为要写入的字符串,
我们可以看下官方给出的例子;
fwrite_string(FileHandle,['text with numbers:',5,' and ',1.0])
输出为: text with numbers:5 and 1.00000
当要输出的内容不是单个的字符串、数字或变量的时候,要用[]括起来,剩下的和C 的输出流有相似的地方,字符串加’’,字符串与变量或数字区分用“,”只是在C 中我们使用流运算符<<。
fnew_line(FileHandle)
用以换行
举个例子:
代码语言:javascript复制open_file ('F:/统计.txt', 'output', FileHandle)
fwrite_string(FileHandle,'变量1:')
fwrite_string(FileHandle,angle)
fnew_line(FileHandle)