Аналог автокадовской команды _PLINE средствами autolispa.
| Правила | Регистрация | Пользователи | Сообщения за день |  Справка по форуму | Файлообменник |

Вернуться   Форум DWG.RU > Программное обеспечение > Программирование > LISP > Аналог автокадовской команды _PLINE средствами autolispa.

Аналог автокадовской команды _PLINE средствами autolispa.

Ответ
Поиск в этой теме
Непрочитано 21.11.2010, 20:58 #1
Аналог автокадовской команды _PLINE средствами autolispa.
молодой человек
 
Регистрация: 14.11.2007
Сообщений: 159

Здравствуйте! Так и не смог найти.
Наперёд неизвестно количество вершин полилинии (2d) и на каком этапе надо рисовать дугу. Как это реализовать с помощью autolispa?
Заранее спасибо.
Просмотров: 1691
 
Непрочитано 21.11.2010, 21:25
#2
TararykovDG

Программист-энтузиаст
 
Регистрация: 17.07.2009
Воронеж
Сообщений: 575


Цитата:
Сообщение от молодой человек Посмотреть сообщение
Наперёд неизвестно количество вершин полилинии (2d) и на каком этапе надо рисовать дугу. Как это реализовать с помощью autolispa?
Может тогда как раз лучше использовать командные методы, например так
(vl-cmdf "_.pline" pause)

В общем виде так
Код:
[Выделить все]
(defun c:test( / )
      (vl-cmdf "_.pline")
      (while (= (getvar "CMDACTIVE") 1)
    (vl-cmdf pause)
    )
  )
__________________
cadtools

Последний раз редактировалось TararykovDG, 21.11.2010 в 21:32.
TararykovDG вне форума  
 
Автор темы   Непрочитано 21.11.2010, 21:33
#3
молодой человек


 
Регистрация: 14.11.2007
Сообщений: 159


Цитата:
Сообщение от TararykovDG Посмотреть сообщение
(vl-cmdf "_.pline" pause)
эта команда позволяет добавить только первую точку полилинии, а мне надо, чтобы я смог ввести любое количество точек полилинии и в любом месте мог переключиться на рисование дугой и линией.
Цитата:
Сообщение от TararykovDG Посмотреть сообщение
В общем виде так
Спасибо, осталось теперь научится переключаться на дугу и обратно.

Последний раз редактировалось молодой человек, 21.11.2010 в 21:44.
молодой человек вне форума  
 
Непрочитано 22.11.2010, 08:29
#4
TararykovDG

Программист-энтузиаст
 
Регистрация: 17.07.2009
Воронеж
Сообщений: 575


Цитата:
Сообщение от молодой человек Посмотреть сообщение
осталось теперь научится переключаться на дугу и обратно.
Так а что мешает? В ответ на запрос очередной точки ввести "_A" и рисую дуговой элемент, потом "_L" и снова рисуешь линейные элементы
__________________
cadtools
TararykovDG вне форума  
 
Непрочитано 22.11.2010, 08:42
#5
Profan


 
Регистрация: 25.12.2005
Москва
Сообщений: 13,627


Можно вот так:
Код:
[Выделить все]
(defun c:test( / echo )
(setq echo (getvar "CMDECHO"))
(setvar "CMDECHO" 1)
      (vl-cmdf "_.pline")
      (while (= (getvar "CMDACTIVE") 1)
    (vl-cmdf pause)
    )
(setvar "CMDECHO" echo)
(princ)
)
Тогда появятся запросы в командной строке.
Про OSMODE умалчиваю. Есть клавиша F3.
Profan вне форума  
 
Автор темы   Непрочитано 22.11.2010, 12:11
#6
молодой человек


 
Регистрация: 14.11.2007
Сообщений: 159


Спасибо вам огромное!
молодой человек вне форума  
Ответ
Вернуться   Форум DWG.RU > Программное обеспечение > Программирование > LISP > Аналог автокадовской команды _PLINE средствами autolispa.



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Аналог lisp команды command в .net xsakabsx LISP 3 18.11.2010 23:31
Аналог команды Slice в Solid Taracka SolidWorks 12 24.09.2010 23:50
Аналог команды "_Fillet" Mazai Программирование 5 15.04.2008 21:36
Прозрачные команды Vova AutoCAD 17 21.06.2006 05:33