[Малявка]

Здравствуйте, уважаемые мастера ЛИСПа!

У нас в конторе зашел разговор о процентном заполнении краской чертежа. Как считать? Имеется ввиду совсем не это: (http://forum.dwg.ru/showthread.php?t=3544).
Нужно посчитать площадь, залитую краской, к площади всего листа (или, если в модели - к площади, ограниченной рамкой).

Обращаюсь к вам с просьбой: сочините макрос, пожалуйста, чтобы он запросил у пользователя указать ограничительную рамку (любой формы, не обязательно прямоугольник, возможно круг, эллипс, замкнутая полилиния и даже "облачко"), а затем внутри этой рамки перебрал бы все линии, штриховки, вставленные изображения, тексты, размерные линии, то есть всё, изображенное внутри выделенной рамки, у каждого высчитал бы его площадь и выдал бы результат в форме, о которой - в конце поста.

Я думаю, что возможно высчитать ЛИСПом, например, площадь отрезка, зная его длину и вес линии. Так же можно высчитать и площадь любой линии, даже площадь каждой линии в штриховке, зная стиль и масштаб штриховки.

Теперь о выдаче результата: хотелось бы, чтобы макрос выдавал результат в такой примерно форме:

Процент заполнения общий: 12,6
Процент заполнения цветом black: 10,4
Процент заполнения цветом magenta: 5,3
Процент заполнения цветом yellow: 1,4
Процент заполнения цветом blue: 6,8

Если, например, чертеж монохромный, то результат будет такой:

Процент заполнения общий: 12,6
Процент заполнения цветом black: 12,6
Процент заполнения цветом magenta: 0,0
Процент заполнения цветом yellow: 0,0
Процент заполнения цветом blue: 0,0

(Вижу трудность в подсчете площади составных цветов, где основные цвета представлены частично, например разные градации серого цвета, да любые градации любых цветов! Хотя здесь можно ориентироваться на числовые значения RGB.)

Спросите: зачем все это надо?
Для расчета стоимости конкретного чертежа при печати. Возникает много споров между заказчиком и исполнителем при определении стоимости за распечатку чертежей.

Спасибо.

p.s. работаю в основном в AutoCAD 2008, иногда в 2011

[Малявка]

Кулик Алексей aka kpblc, А в такой градиентной заливке теоретически только одна тоню-ю-сенькая линия белая, а соседние - уже не белые, а бледно-цветные, да-с! Вывод: во внимание не принимаем, считаем полностью. Что там у нас дальше? Фоновая заливка текста? Ой, а это что такое (извините)? А, поняла, это когда текст в стиле "arial" или подобных стилях. Мда, тупик. Но с другой стороны, таких текстов не так уж и много на чертеже. Хотя, чертеж чертежу рознь. Буду думать. А если придумаю, возьметесь за макрос?

p.s. Придумала! Офисный текст с плотностью 5 процентов - это шрифт "Times new roman"! Так что этот шрифт и "arial" можно считать пятипроцентными, а гостовские - трехпроцентными, вот!

[Кулик Алексей aka kpblc]

Наш ответ Чемберлену - во вложении

[Малявка]

Кулик Алексей aka kpblc, ой, а как это делается? Первый раз вижу такое... Я про голубенькое. Ну так помогите, подумайте, как это обыграть! Я знаю, вы мастера вопросики подкидывать.

А градиентную заливку считать полностью! Ну, которое розовенькое.

[Кулик Алексей aka kpblc]

Да очень просто - делается BackgroundMask на многострочник - и всех делов
Да, кстати, расширение предыдущего варианта Как считать будем?
P.S. Я ж не просто так шуткую, я сурьезно говорю (c). Когда народ "доходит" до принудительного форматирования многострочников, можно и не такое встретить!

[Малявка]

Кулик Алексей aka kpblc, Бог ты мой! Неужели попадаются дауны, делающие подобные извращения на серьезных чертежах! Честно - не встречала. А можно подобные извращения игнорировать в макросе? Или, наоборот, считать весь голубой прямоугольник закрашенным. (А чтоб заказчику впредь неповадно было такое вытворять!)

[Кулик Алексей aka kpblc]

Попадаются, попадаются... А если туда же еще добавить аннотативность, становится совсем некисло

[Малявка]

Кулик Алексей aka kpblc, Я вижу, что, несмотря на массу других макросов, написанных по моей просьбе, Мастера ЛИСПа на этот раз упираются руками и ногами, как та устрица во вранцузском ресторане. Значит, действительно серьезная задача. Ладно. Спокойной ночи. Всем - снов разноцветных.

[Vov.Ka]

http://avpsoft.com/products/apfill/

[Vova]

Сообщение от Елпанов Евгений А что по вашему получится, после расчленения .... и текстов c гостовскими шрифтами?

Обращаю Малявкино и всей общественности внимание на эту ключевую фразу. Вы знаете меня как ярого борца с буквами по гост. Так вот, вам в конторе придется забыть о существовании государственного стандарта на буквы. И всем другим конторам, которые встанут перед трудным выбором между подсчетом краски и буквами по госту.
Напоминаю, несколько лет назад я предлагал типа конкурса по заполняемости чертежей. Поскольку надеялся победить, даже методику подсчета предлагал. Но увы, сейчас напрочь ее забыл.
Поскольку у нас еще 1 апреля смайлик не ставлю, и вообще не шучу

[forMA]

Сообщение от Vova Вы знаете меня как ярого борца с буквами по гост

Кстати, а в чем причина твоей ярости?

[Малявка]

Vov.Ka, Программа интересная, жаль, не считает dwg. А при переводе dwg в pdf говорит, типа, библиотека "GPL..." не найдена. А выделение экрана считает по-разному, в зависимости от увеличения изображения на мониторе.

[Vov.Ka]

Сообщение от Малявка Vov.Kaбиблиотека "GPL..." не найдена.

http://sourceforge.net/projects/ghos...0/gs900w32.exe

[Малявка]

Vov.Ka, спасибо! Работает!