Комплект полезных утилит из BricsCad в AutoCAD (Страница 5 из 5)

> CB
Только что специально проверил на Brics'e  - при использовании колеса (хоть pan, хоть zoom - все едино) выполнение (grread) прекращается. Похоже на особенности ядра...

> CB
Ххе, я хоть и с похмела, но на кое-что меня еще хватило:

(defun arc-radius (/ lst pt)
                                        ; Change of radius of an arc
                                        ; by ElpanovEvgeniy
                                        ; (2005-03-22 11:21:30)
                                        ;(arc-radius)
  (setq lst (entget
              (car (entsel "\n Select an arc  "))
              ) ;_  entget
        pt  (cdr (assoc 10 lst))
        ) ;_  setq
  (princ "\n Select new radius  ")
  (princ)
  (while (and (setq gr (grread t 5)) (= (car gr) 5))
    (princ (strcat "\r : (car gr) = "
                   (rtos (car gr) 2 0)
                   "\ncmdname : "
                   (getvar "cmdnames")
                   "\ncmdactive : "
                   (rtos (getvar "cmdactive") 2 0)
                   ) ;_ end of strcat
           ) ;_ end of princ
    (entmod (subst
              (cons 40 (distance pt (cadr gr)))
              (assoc 40 lst)
              lst
              ) ;_  subst
            ) ;_  entmod
    (entupd (cdr (assoc -1 lst)))
    ) ;_  while
  (princ (strcat "\n (car gr) = " (rtos (car gr) 2 0)))
  (princ)
  ) ;_ end of defun

При использовании колеса выполнение просто прекращается. Без комментариев. cmdactive = 0, cmdnames = "", gr = 5.
Я понимаю, что я чего-то не понимаю, но что конкретно я не понимаю, я не понимаю :)

ЗЫ: Корявый, в смысле, завершающий функцию с ошибкой...

> Евгений
Чтобы выйти из "останова" нужно обязательно щелкнуть левой кнопкой или можно клавишей клавиатуры или правой кнопкой мыши?

ПОЗДРАВЛЯЮ ВСЕХ ФОРУМЧАН С НОВЫМГОДОМРОЖДЕСТВОМСТАРЫМНОВЫМГОДОМ!
А для пользователей BricsCAD (как я понял, на этом форуме я не одинок :) ) дополнительно сообщаю о выходе новой версии BricsCAD BonusTools 1.2.0001
Скачать ее можно по старому адресу http://sabit.com.ua/apps.php
по прежнему бесплатно.

> VH
Уважаемый VH!
Я уже в который раз повторяю, что никаким образом не связан с продажами BricsCAD, поскольку, как и Вы, очевидно, работаю в самой обыкновенной проектной организации, являющейся пользователем этого продукта. И всякой ерундой типа предоставления адресов электронной почты, тем более Вашего (которого я даже не знаю, как не знаю и Вас), поверьте мне, я не занимаюсь. Единственное, что меня связывает с фирмой-продавцом, это тот самый пакет приложений, о котором идет речь в этой теме. Они согласились разместить его у себя на сайте, что дает мне возможность постепенно дорабатывать его с учетом мнения более широкого круга лиц и специалистов (что для меня особенно важно).
В частности, обсуждение отдельных моментов в данной теме дало реальный результат в плане улучшения работы некоторых функций.
Но я несколько отвлекся, сорри. Так вот - я не занимаюсь рассылками и не могу выполнять всякие там прописки и отписки. Если будут вопросы по предмету данной темы или по BricsCAD (в смысле работы)- пожалуйста.
А если надоедают рассылки - есть верные методы борьбы со спамом, но это на другом форуме :)
К сему остаюсь, просто Евгений (извините за плагиат:))
ЗЫ: Кстати, на мой адрес за 3-4 года еще не приходило ни одной аналогичной рассылки от BricsCAD. Что-то они меня обижают и не сообщают о своих новостях:)