dwg.ru forum rss xml
| Правила | Регистрация | Пользователи | Поиск | Сообщения за день | Все разделы прочитаны |  Справка по форуму |

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

Программа работает только при определенном зуме модели.

Версия для печати
 
Ответ
Опции темы Поиск в этой теме
Непрочитано 01.05.2017, 23:42 #1
Программа работает только при определенном зуме модели.
MegaMost
 
Регистрация: 03.09.2015
Сообщений: 6

MegaMost вне форума Вставить имя

Здравствуйте, коллеги! Только осваиваю AutoLISP. Написал несколько строк по прорисовке 4-х линий, однако все четыре прорисовываются только при определенном удалении (т.е. зуммировании) (зуме) не знаю как еще написать. В противном случае рисуются только две линии. Хелп плиз.
Просмотров: 380
 
Непрочитано 01.05.2017, 23:59
#2
Кулик Алексей aka kpblc
Moderator

LISP, C# (ACAD 200[9,12,13,14])
 
Регистрация: 25.08.2003
С.-Петербург
Сообщений: 34,352


1. Где код?
2. http://forum.dwg.ru/showpost.php?p=271151&postcount=167
__________________

---
Обращение ко мне - на "ты".
Все, что сказано - личное мнение.
Кулик Алексей aka kpblc вне форума вставить имя Обратить внимание модератора на это сообщение  
 
Автор темы   Непрочитано 02.05.2017, 00:12
#3
MegaMost


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


Код:
[Выделить все]
 (defun c:asd(/ L R alfag alfa beta gamma p1 p2 p3 p4 p5 p6 p7)

  "(setq L (getreal "\n Длина блока"))"
  "(setq R (getreal "\n Радиус криво"))"

  (setq L 10500)
  (setq R 221000)
  
  (setq alfaG (* 180 (- 1 (/ L (* pi R))))) "Угол пересечения"
  (setq alfa (/ (* pi alfaG) 180))
  (princ "Угол пересечения = ")
  (princ alfaG)

  (setq beta (/ (- 180 alfaG) 2))
  (setq p1 (getpoint "\n Укажите точку на оси стыка"))
  (setq gamma (/ (* pi beta) 180))
(setq p2 (polar p1 gamma L))
(setq p3 (polar p1 (+ alfa gamma) L))
(setq p4 (polar p1 (+ alfa gamma) 200))
(setq p5 (polar p4 (- (/ pi 2) gamma) 300))
(setq p6 (polar p5 (+ alfa gamma) 10300))
(setq p7 (polar p1 gamma 200))
  
(command "отрезок" p1 p2 "" p1 p3 "" p4 p5 "" p5 p6 "" p4 p7 "")

  (princ))

----- добавлено через ~37 мин. -----
разобрался. спасибо
MegaMost вне форума вставить имя Обратить внимание модератора на это сообщение  
 
Непрочитано 02.05.2017, 08:56
#4
Кулик Алексей aka kpblc
Moderator

LISP, C# (ACAD 200[9,12,13,14])
 
Регистрация: 25.08.2003
С.-Петербург
Сообщений: 34,352


п.2 из #2.
__________________

---
Обращение ко мне - на "ты".
Все, что сказано - личное мнение.
Кулик Алексей aka kpblc вне форума вставить имя Обратить внимание модератора на это сообщение  
Ответ
Вернуться   Форум DWG.RU > Программное обеспечение > Программирование > LISP > Программа работает только при определенном зуме модели.

Опции темы Поиск в этой теме
Поиск в этой теме:

Расширенный поиск

Быстрый переход

Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
SCAD Определение расчётной длины колонн в пространственной модели Tyhig SCAD 225 25.04.2016 08:49
Кривая работа аннотативных объектов, созданных в пространстве модели. hwd AutoCAD 16 23.08.2013 18:16
Работает привязка к объектам модели, находящимся за пределами видового экрана, не удаляется внешняя ссылка cancercat AutoCAD 8 20.07.2012 09:11
Почему программа работает неправильно? FSergio Программирование 24 26.08.2011 16:42
Проблемы с AutoCAD. Пропал курсор в пространстве модели. Не работает командная строка. tigercron AutoCAD 11 29.09.2009 23:35

|| Главная || Каталог САПР || Тендеры || Публикации || Объявления || Биржа труда || Download || Галерея ||
|| Библиотека || Кунсткамера || Каталог предприятий || Контакты || Файлообменник || Блоги ||


Размещение рекламы