Schöck
| Правила | Регистрация | Пользователи | Поиск | Сообщения за день | Все разделы прочитаны |  Справка по форуму | Файлообменник |

Вернуться   Форум DWG.RU > Программное обеспечение > Программирование > LISP > Как сосчитать сумму цифр из отдельных мтекстов (и лисп для подсчета спецификаций)

Как сосчитать сумму цифр из отдельных мтекстов (и лисп для подсчета спецификаций)

Ответ
Поиск в этой теме
Непрочитано 26.01.2008, 13:15
Расчет спецификаций из мтекстов
Red Nova
 
ՃԱՐՏԱՐԱԳԵՏ, Տ.Գ.Թ.
 
Торонто
Регистрация: 23.10.2007
Сообщений: 1,974

Я не пользуюсь таблицами AutoCADа, черчу ячейки, в них по мтексту. Вопрос как оперативно соcчитать сумму цифр их содержимого. Слышал есть такой калькулятор, по моему calcacad называется, но на 2008-й Cad не идет. Что делать?

Добавлено.
Постепенно форум перешел в разработку липа для расчета спецификаций из мтекстов, и расчет суммы из мтекстов стал просто полезной добавкой к расчету спецификации. Последний вариант программы находится тут

Последний раз редактировалось Red Nova, 13.03.2009 в 10:11.
Просмотров: 155592
 
Непрочитано 19.03.2008, 16:32
#201
dextron3

Фотограф
 
Регистрация: 01.01.2007
Алматы
Сообщений: 5,049


1. лисп считает почемуто вместо миллиметров метры, хотя стоит ММ
2. почему когда в графе наименование длинна дается отдельным текстом лисп не замечает
__________________
инженер проектировшик с опттом программа авто гад образование высшие
dextron3 вне форума  
 
Непрочитано 19.03.2008, 17:25
#202
VVA

Инженер LISP
 
Регистрация: 11.05.2005
Минск
Сообщений: 6,831
<phrase 1= Отправить сообщение для VVA с помощью Skype™


> dextron 200,201
1. Если после L= есть буква м (м м.п. п.м.)б то длина считается как метры и умножается на 1000. Там идет проверка на wcmatch *М*. Если длина в мм, то их писать не нужно.
2. В любой графе текст должен быть ОДИН, текст, мтекст - без разницы, но один.
__________________
Как использовать код на Лиспе читаем здесь
VVA вне форума  
 
Непрочитано 19.03.2008, 17:46
#203
dextron3

Фотограф
 
Регистрация: 01.01.2007
Алматы
Сообщений: 5,049


А почему тогда цыфры как то блокируются,
что это означает и как потом от него избавиться
смотреть скриншот
Миниатюры
Нажмите на изображение для увеличения
Название: Snap1.jpg
Просмотров: 139
Размер:	6.1 Кб
ID:	4447  
__________________
инженер проектировшик с опттом программа авто гад образование высшие
dextron3 вне форума  
 
Непрочитано 19.03.2008, 17:55
#204
dextron3

Фотограф
 
Регистрация: 01.01.2007
Алматы
Сообщений: 5,049


вот еще не могу понять почему так работает:
Изображения
Тип файла: jpg Snap2.jpg (17.7 Кб, 701 просмотров)
__________________
инженер проектировшик с опттом программа авто гад образование высшие
dextron3 вне форума  
 
Непрочитано 19.03.2008, 18:15
#205
VVA

Инженер LISP
 
Регистрация: 11.05.2005
Минск
Сообщений: 6,831
<phrase 1= Отправить сообщение для VVA с помощью Skype™


>203 Это называется гиперссылка. Туда записываются пояснения по расчету или ошибки. Для управления гиперссылкой см. команду
_HYPERLINKOPTIONS.
>204 По картинке и я не могу. Файлик приложи.
__________________
Как использовать код на Лиспе читаем здесь
VVA вне форума  
 
Непрочитано 19.03.2008, 18:32
#206
dextron3

Фотограф
 
Регистрация: 01.01.2007
Алматы
Сообщений: 5,049


Объясни алгоритм работы лиспа простыми словами, не могу понять суть...

вот файлик
__________________
инженер проектировшик с опттом программа авто гад образование высшие
dextron3 вне форума  
 
Непрочитано 19.03.2008, 19:12
#207
VVA

Инженер LISP
 
Регистрация: 11.05.2005
Минск
Сообщений: 6,831
<phrase 1= Отправить сообщение для VVA с помощью Skype™


Файлика не вижу
__________________
Как использовать код на Лиспе читаем здесь
VVA вне форума  
 
Непрочитано 19.03.2008, 19:50
#208
dextron3

Фотограф
 
Регистрация: 01.01.2007
Алматы
Сообщений: 5,049


форум тормозит я на почту сбросил
__________________
инженер проектировшик с опттом программа авто гад образование высшие
dextron3 вне форума  
 
Непрочитано 19.03.2008, 20:09
#209
dextron3

Фотограф
 
Регистрация: 01.01.2007
Алматы
Сообщений: 5,049


вот загрузился наконец
Вложения
Тип файла: dwg
DWG 2004
Спецификация КЖ.dwg (58.5 Кб, 1938 просмотров)
__________________
инженер проектировшик с опттом программа авто гад образование высшие
dextron3 вне форума  
 
Автор темы   Непрочитано 19.03.2008, 21:55
#210
Red Nova

ՃԱՐՏԱՐԱԳԵՏ, Տ.Գ.Թ.
 
Регистрация: 23.10.2007
Торонто
Сообщений: 1,974
Отправить сообщение для Red Nova с помощью Skype™


Ну начнемс. Ух какие тут дебаты предстоят.

1. Во первых большое спасибо . Хочу отметить что с гиперссылками ты хорошо придумал, думаю будит интересно если и масса одной детали будит иметь гиперссылку, в ней можно записать пояснение про формулу расчета, если профиль, то про массу одного килограмма и длину. Было бы интересно.


SPECKM

2. Честно говоря вариант с выбором столбцов масс реализован не совсем удобно. Было бы легче просто указать точкой координату Х вставки масс. То есть вместо выбора рамкой двух углов указываем одну центральную точку столбца. А еще было бы хорошо добавить в команду вариант с оверрайт существующих мтекстов, как в SPEC, лично мне так больше нравится (я в основном работаю с аналогичными спецификациями, по этому создаю одну на основе другой). Причем отдельную команду для этого можно и не создавать, вместо этого можно добавить следующую возможность. Если выбираем три столбца, то далее задаем координаты ввода масс, а если выбрали пять столбцов, то будет оверрайт масс.

3. Можно ли вместо текста вставлять мтекст middle centre justified? (если это возможно то может есть смысл создать отдельную переменную для этого)

4. В выложенном примере по только по одному варианту от каждого профиля. Как различить разные швеллеры (с уклонными, параллельными полками и т.п.) Было бы хорошо иметь пример со всеми возможными комбинациями, так любому будет понятно, и если лисп попадет к кому то не имеющему отношения к нашему форуму то и он разберется.

5. Когда получается синий текст с ссылкой то при нажатии на текст+ctr пишется что система не может найти путь.

6. Не считает трубы (круглые)

7. При наличие профиля “Двутавр 20Б1” масса становится синей, пишется что найдено больше 1 в базе.


SPECKG

8. Считаются только лист, арматура и швеллер, причем швеллер только двустрочный.

9. Масса листа записанная в одну строчку сосчиталась в 1000 раз больше чем надо.

Последний раз редактировалось Red Nova, 19.03.2008 в 22:00.
Red Nova вне форума  
 
Непрочитано 20.03.2008, 06:43
#211
dextron3

Фотограф
 
Регистрация: 01.01.2007
Алматы
Сообщений: 5,049


Red Nova,
Код:
[Выделить все]
 9. Масса листа записанная в одну строчку сосчиталась в 1000 раз больше чем надо.
читай выше у меня был этот вопрос
__________________
инженер проектировшик с опттом программа авто гад образование высшие
dextron3 вне форума  
 
Непрочитано 20.03.2008, 08:01
#212
dextron3

Фотограф
 
Регистрация: 01.01.2007
Алматы
Сообщений: 5,049


Примечание:

1. Почему не удобно текст одной строкой, а не из двух: размеры и длина,
в спецификации легче потом быстро удалить размеры длинна, не подревожив габариты и заменить на метры погонные,
(из практики металлисты сначало выдают грубый вариант для строителей где все дается в П,М,)

2. Не понравилось то что лисп прописывает новые цыфры вместо замены
старых, как RedNova сказал обычно править приходится готовую спецификацию, а то потом приходится чистить цыфры друг под дружкой

3. Вчера сравнивал 1 вариант Spec, с последним первый гораздо понятнее считает и меньше выделять приходится тоесть за 1 раз

4. Про гиперссылки особо не понял не сипользую вовсе

5. Может я не прав, но почему алгоритм не такой:

1. Выделите 6 столбцов
2. (каждый текс является отдельной ячейкой)
3. Первый текст ГОСТ направляет в нужную сортамента область
4. Второй текст габариты (формулы или ссылка на сортамент выборку,
которую можно в ручную обновлять)
4.1 Если фигурирует буква Б1, Б2 и тп. идем в подсортамент в каталоге
5. Если если в третьем тексте МП или М но не мм, то количество равно =1, а в строку количество вводит прочерк "-"
6. Если L=x то считаем по формуле массу, взяв данные из сотрамента

вот скриншот:
Миниатюры
Нажмите на изображение для увеличения
Название: Snap1.jpg
Просмотров: 152
Размер:	62.4 Кб
ID:	4465  
__________________
инженер проектировшик с опттом программа авто гад образование высшие
dextron3 вне форума  
 
Непрочитано 20.03.2008, 08:09
#213
dextron3

Фотограф
 
Регистрация: 01.01.2007
Алматы
Сообщений: 5,049


Вот какие 6 отдельных текстов являются основными, а то я там говрил а забыл добавить это про пост #212
Изображения
Тип файла: jpg Снимок1.jpg (15.7 Кб, 675 просмотров)
__________________
инженер проектировшик с опттом программа авто гад образование высшие
dextron3 вне форума  
 
Автор темы   Непрочитано 20.03.2008, 17:03
#214
Red Nova

ՃԱՐՏԱՐԱԳԵՏ, Տ.Գ.Թ.
 
Регистрация: 23.10.2007
Торонто
Сообщений: 1,974
Отправить сообщение для Red Nova с помощью Skype™


dextron3,
Цитата:
3. Первый текст ГОСТ направляет в нужную сортамента область
Зачем гост, в нужную область можно направить при помощи содержания текста наименования, к примеру "двутавр 20 Б1"
Red Nova вне форума  
 
Непрочитано 20.03.2008, 18:37
#215
VVA

Инженер LISP
 
Регистрация: 11.05.2005
Минск
Сообщений: 6,831
<phrase 1= Отправить сообщение для VVA с помощью Skype™


Пояснения
SpecKM ищет в базе только тип профиля (например двутавр) и марку (20Б1) Там таких 2 (по ГОСТ 26020-83 и СТО АСЧМ 20-93) поэтому текст синий. Т.к. по ТЗ Red Nova вообще нет графы обозначения. Это не по ГОСТу, поэтому поддержку SpecKM в таком виде пока прекращаю, до полной отладки основного модуля. Тяжело одновременно править в нескольких версиях. Пока остается SpecKG. Все замеченные баги считает/не считает/считает не так или сюда вместе с файликом или мне на почту. После отладки выборки из базы будем думать о вариантах.
__________________
Как использовать код на Лиспе читаем здесь
VVA вне форума  
 
Непрочитано 20.03.2008, 18:46
#216
dextron3

Фотограф
 
Регистрация: 01.01.2007
Алматы
Сообщений: 5,049


Red Nova, нет давай гостом чтобы лишнюю инфу не писать,

я расписал текстом что написано в рамке
это наверно универсальный

Вот шести столбцовый вариант

Двутавр!

ГОСТ;20Б1;L=1919мм;18;0;0

или

ГОСТ;20Б1;(п.м.);18;0;0


Уголок

ГОСТ;40x40x5;L=1919мм;18;0;0

или

ГОСТ;80x40x5;L=1919мм;18;0;0

ГОСТ;40x40x5;(п.м.);18;0;0

Арматура
по пятистолбчатому выделению С%% является точкой
определения С%%- это всеми известный знак диаметра Ф
если даже есть гост то его лисп просто не замечает

С%%12A-III;L=1919мм;18;0;0


Пластины уже реализованы спасибо

или по четырехстрочному выделению гост выделять не нужно
если есть гост тоже не замечает если длинна не указана
считает как платину по формуле

80x40x5;18;0;0

Швеллер
ГОСТ основа Б1 направление на под основу

ГОСТ;20Б1;L=1919мм;18;0;0

или

ГОСТ;20Б1;(п.м.);18;0;0

Гнутый профиль
ГОСТ основа

ГОСТ;80x40x5;L=1919мм;18;0;0



Red Nova если я не прав брось в меня камень

VVA, будем ждать... спасибо


Для спаренных профилей я придумал идентификатор в графе примечания: 2шт. (если лисп обнаруживает буквы шт. , то
массу еденицы элемента умножает на 2, легко и просто)
__________________
инженер проектировшик с опттом программа авто гад образование высшие

Последний раз редактировалось dextron3, 20.03.2008 в 18:53.
dextron3 вне форума  
 
Непрочитано 20.03.2008, 18:51
#217
dextron3

Фотограф
 
Регистрация: 01.01.2007
Алматы
Сообщений: 5,049


VVA, если не получиться все в один лисп загнать
то можно панельку с кнопками сделать чтобы каждый профиль
по отдельности считала как бы построчно, а это тоже хорошо

я вот сейчас пластины считаю с помощью первого лиспа и доволен
__________________
инженер проектировшик с опттом программа авто гад образование высшие
dextron3 вне форума  
 
Автор темы   Непрочитано 20.03.2008, 19:41
#218
Red Nova

ՃԱՐՏԱՐԱԳԵՏ, Տ.Գ.Թ.
 
Регистрация: 23.10.2007
Торонто
Сообщений: 1,974
Отправить сообщение для Red Nova с помощью Skype™


VVA
Цитата:
поддержку SpecKM в таком виде пока прекращаю, до полной отладки основного модуля
Готов подождать. Вот только у меня просьба, прежде чем прекратить доработку сделать смешанный вариант SPEC и SPECKM. Нововведений не надо, надо в уже существующий SPEC в таком виде как он есть добавить возможность SPECKM считать профили. После обещаю не тревожить до закрытия вопроса по госту. Надеюсь это не очень трудно.
Red Nova вне форума  
 
Автор темы   Непрочитано 20.03.2008, 19:52
#219
Red Nova

ՃԱՐՏԱՐԱԳԵՏ, Տ.Գ.Թ.
 
Регистрация: 23.10.2007
Торонто
Сообщений: 1,974
Отправить сообщение для Red Nova с помощью Skype™


dextron3, Ты не прав. По госту к примеру для двутавра Б1 пишется
двутавр 20 Б1
на правда в две строки.
Так что это никак не лишняя инфа. Но камень бросать в тебя я не буду, не долетит по-моему, ему же лететь несколько тысяч километров.
Red Nova вне форума  
 
Непрочитано 20.03.2008, 21:24
#220
dextron3

Фотограф
 
Регистрация: 01.01.2007
Алматы
Сообщений: 5,049


Red Nova, ну если ты нарисуешь значок и напишешь Б1 ты не нарушишь гост по любому
см скриншот
Миниатюры
Нажмите на изображение для увеличения
Название: Snap2.jpg
Просмотров: 148
Размер:	30.2 Кб
ID:	4510  
__________________
инженер проектировшик с опттом программа авто гад образование высшие
dextron3 вне форума  
Ответ
Вернуться   Форум DWG.RU > Программное обеспечение > Программирование > LISP > Как сосчитать сумму цифр из отдельных мтекстов (и лисп для подсчета спецификаций)

Размещение рекламы
Опции темы Поиск в этой теме
Поиск в этой теме:

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


Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Сейсмозащита и сейсмоизоляция существующих, построенных зд. IANationalInformAgentstvo Прочее. Архитектура и строительство 216 20.01.2015 16:51
Предложения по расчетным моделям сооружений aldt Расчетные программы 8 06.07.2009 17:53
Мониторы LCD CRT Разное 94 17.06.2008 10:51
ЮМОР 2006 =) Perezz!! Разное 1122 04.01.2007 00:46