Переменные
+code-length+
Описание: переменная +code-length+ задает
минримальую ширину поля для вывода dxf кода в текстовом режиме.
Функции
dxf-code
(code &optional (overal-length +code-length+))
Описание: функция dxf-code возвращает строку,
представляющую code dxf. Code печатается смещенным вправо с
пробельными заполнителяи. Параметр overal-length задает
минимальную ширину поля вывода.
Пример использования:
(dxf-code 4) -> " 4"
(dxf-code 123456) -> "123456"
pair
(code value stream)
Описание: функция pair выводит в поток stream пару
code и value в формате текстовом формате dxf.
sections
(sections stream)
Описание: функция sections выводит в текстовый поток
stream посекционное представление dxf-файла, заданное списком
sections.
Пример использования:
(let ((data
(dxf/in/txt:read-file
(concatenate 'string dxf::*dxf-path* "txt/2018.dxf"))))
(with-open-file (dxf "txt-sections.dxf" :direction :output :if-exists :supersede)
(sections data dxf)))