Пример 1

Создайте новый файл во временной папке системы. Имя временной папки варьируется для других платформ. fopen команда с TempFile опция создает файл во временной папке любой системы (если такая папка существует):

a := 3:
b := 5:
fid := fopen(TempFile, Write, Text):

Используйте write команда, чтобы сохранить значения a и b во временном файле:

write(fid, a, b):

Используйте fname чтобы возвратить имя временного файла, вы создали:

file := fname(fid):

После чтения файла, значений a и b восстанавливаются:

delete a, b:
read(file):
a, b

В качестве альтернативы используйте fopen открыть файл и считать его содержимое:

delete a, b:
n := fopen(file):
read(n):
fclose(n):
a, b

delete a, b, READPATH, n:

Пример 2

Можно явным образом задать папку и имена файлов. Следующий пример только работает над системами как UNIX. Чтобы заставить его работать над другими операционными системами, измените пути соответственно. Во-первых, используйте write сохранить значения в файле “testfile.mb” в “/tmp” папка:

a := 3:
b := 5:
write("/tmp/testfile.mb", a, b):

Теперь задайте “/tmp” как поисковая папка и обеспечивают путь относительно него. Обратите внимание на то, что диафрагма пути “/” вставляется read:

delete a, b:
READPATH := "/tmp":
read("testfile.mb"):
a, b

Пример 3

read команда оценивает все операторы в файле, который она читает с максимальной глубиной замены, заданной LEVEL. Например, создайте и считайте файл, который задает значение переменной a при помощи другой переменной b. Используйте fopen команда с TempFile опция, чтобы создать новый файл во временной папке системы:

fid := fopen(TempFile, Write, Text):

Запишите следующие операторы в файл:

fprint(Unquoted, fid, "a := b^2:  b := 5: c := a/3: delete a, b:"):

Используйте fname чтобы возвратить имя временного файла, вы создали. Используйте fclose закрыть файл:

file := fname(fid):
fclose(fid)

Считайте файл. read команда оценивает операторы в файле рекурсивно:

read(file):
c

Чтобы подавить рекурсивные оценки, измените максимальную глубину замены в 1:

delete c:
LEVEL := 1:
read(file):
c

Восстановите значение по умолчанию LEVEL для дальнейших расчетов:

delete LEVEL

Пример 4

Чтобы задать кодирование, чтобы считать данные, используйте Encoding. Encoding опция применяется только к текстовым файлам, которые открыты с помощью имени файла и не дескриптора файла. Откройте файл и запишите оператор "str = abcäöü" в кодировании "UTF-8":

fprint(Unquoted, Text, Encoding="UTF-8",
                       "read_test",
                       "str := \"abcäöü\"")

Задайте кодирование, чтобы считать файл. read возвращает правильный выходной параметр:

read("read_test",Encoding="UTF-8"):

"abcäöü"

Если вы не задаете кодирование, системное кодирование по умолчанию используется. Таким образом ваш выход может варьироваться от показанного затем. Символы, нераспознанные системным кодированием по умолчанию, заменяются символом замены по умолчанию для того кодирования:

read("read_test"):

"abc������"

Возвращаемые значения

Возвращаемое значение последнего оператора файла.