ВУЗ:
Составители:
149
8.23. Обмен данными между Бейсиком и AutoLISPом
Для получения параметризованных чертежей в AutoCADе необходимо
знать результаты конструктивного и механического расчетов аппарата. Т.к.
основная масса расчетных программ написана на Бейсике, возникает необхо-
димость передачи данных из Бейсика в AutoLISP. Эта операция осуществля-
ется путем записи данных из Бейсика в файл на магнитном носителе и после-
дующего считывания их
оттуда программой на AutoLISPе. В AutoLISPе пре-
дусмотрена работа только с одним типом файлов – текстовыми файлами по-
следовательного доступа. Такие файлы можно создавать, просматривать и
редактировать в любом текстовом редакторе.
Файл состоит из записей. Запись – это единица обмена данными между
оперативной памятью ЭВМ и файлом, т.е. при одном обращении к
файлу пе-
редается одна запись. В файле последовательного доступа записи размеща-
ются на диске последовательно друг за другом без номеров. Чтобы получить
(считать с диска) какую-то запись последовательного файла, надо прочитать
все предыдущие записи с начала файла.
Рассмотрим обмен данными между файлами "flag.bas" и "flag.lsp".
Текст файла flag.bas:
A$ = "AutoCAD"
B = 2
C = SQR(b)
OPEN "rat.dat" FOR OUTPUT AS #1
PRINT #1, A$, B, C
CLOSE #1
Текст
файла flag.lsp:
(defun c: s()
(textscr)
setq f (open"e:/qb45/work/rat.dat" "r")
a (read-line f)
b (read-line f)
c (read-line f))
(princ a)
(princ b)
(princ c)
(close f)
)
Программа "flag.bas" создает файл "rat.dat" и помещает в него три запи-
си – текстовую строку "AutoCAD", число "2" и квадратный корень из него.
Программа на AutoLISPе считывает данные из этого файла и выводит
на экран AutoCAD 2 1.414214.
Страницы
- « первая
- ‹ предыдущая
- …
- 147
- 148
- 149
- 150
- 151
- …
- следующая ›
- последняя »
