![]() |
||
![]() |
![]() |
| Правила | Регистрация | Пользователи | Поиск | Сообщения за день | Все разделы прочитаны | Справка по форуму | Файлообменник | |
|
![]() |
Поиск в этой теме |
![]() |
#1 | |
Обновление программы «Прокат» Василия Кондрата
-
Ухта
Регистрация: 31.07.2005
Сообщений: 380
|
||
Просмотров: 362129
|
|
||||
CAD Регистрация: 28.08.2003
Киев
Сообщений: 1,834
![]() |
Цитата:
Собственно у PG последний текст кажется с моей корректировкой.
__________________
По теории майский жук летать не может. Но он этого не знает. И летает... |
|||
![]() |
|
||||
CAD Регистрация: 28.08.2003
Киев
Сообщений: 1,834
![]() |
Цитата:
__________________
По теории майский жук летать не может. Но он этого не знает. И летает... |
|||
![]() |
|
||||
CAD Operator Регистрация: 01.11.2005
Samara-Gorodok
Сообщений: 389
|
ОФФ ТОПИК
А расскажите чего такого хорошего в программном создании профилей проката - не проше ли закатать все это в блоки и вставлять с тул палетс! :? :? :? :? :?
__________________
АвтоКАД это не только электронный кульман, Но и великий ГЕМОР |
|||
![]() |
|
||||
CAD Регистрация: 28.08.2003
Киев
Сообщений: 1,834
![]() |
Цитата:
Вы (ты?) хоть и земляк, но истина дороже! Прикидывали сколько блоков нужно сделать для этой библиотеки, как её организовать по параметрам сечений, как оттуда их выбирать? Или у Вас есть готовое решение? В студию! Програмное создание (тем более вставленные элементы собираются программно же в блоки), проще, чище, оперативнее и т.д. и т.п. ЯТД
__________________
По теории майский жук летать не может. Но он этого не знает. И летает... |
|||
![]() |
|
||||
- Регистрация: 31.07.2005
Ухта
Сообщений: 380
![]() |
Тем более, хочу добавить, программным путем все это будет меньше весить - ведь это простой код, а не чертежи! А также можно задавать различные виды и вложенная информация весьма кстати!
Тем более быстрый поиск и удобный интерфейс :!:
__________________
Я не волшебник, я только учусь… |
|||
![]() |
|
||||
- Регистрация: 31.07.2005
Ухта
Сообщений: 380
![]() |
Последне пока обновление Проката и Проката_3D
Макрос кнопки Проката: ^C^C^P(progn(if(= C ![]() Макрос кнопки Проката_3D: ^C^C(if (eq c ![]() [ATTACH]1165773926.rar[/ATTACH]
__________________
Я не волшебник, я только учусь… |
|||
![]() |
|
||||
- Регистрация: 31.07.2005
Ухта
Сообщений: 380
![]() |
Обновил procat_ru, были проблемы со вставкой видов швеллеров по ГОСТ 8240-97 с уклоном.
А что здесь выложено, проблем ни каких не заметил. Прошу писать о замечаниях, что не так! Итого здесь выложено: "Двутавры по ГОСТ 26020-83 с параллельными гранями полок" "Двутавры по СТО АСЧМ 20-93 с параллельными гранями полок" "Двутавры по ГОСТ 8239-89 с уклоном внутренних граней полок" "Швеллеры по ГОСТ 8240-97 с уклоном внутренних граней полок" "Швеллеры по ГОСТ 8240-97 с параллельными гранями полок." "Швеллеры гнутые по ГОСТ 8278-83 обыч. сталь" "Швеллеры гнутые по ГОСТ 8278-83 кач. сталь" "Уголок по ГОСТ 8509-93 равнополочный" "Уголок по ГОСТ 8510-86 неравнополочный" "Уголок гнутый по ГОСТ 19771-93 равнополочный обыч. сталь" "Уголок гнутый по ГОСТ 19771-93 равнополочный кач. сталь" "Уголок гнутый по ГОСТ 19772-93 неравнополочный обыч. сталь" "Уголок гнутый по ГОСТ 19772-93 неравнополочный кач. сталь"
__________________
Я не волшебник, я только учусь… |
|||
![]() |
|
||||
Регистрация: 22.02.2006
Минск
Сообщений: 80
|
Цитата:
|
|||
![]() |
|
||||
- Регистрация: 31.07.2005
Ухта
Сообщений: 380
![]() |
Profan, программа не моя, и вообще я работаю чисто на английских версиях и русскую не признаю! Просто я ее заметил по ссылке http://www.kulichki.com/cadhlp/pgmake.htm переделанная Alanом и внедрил свои обновления в код. Я не стал ее руссифицировать полностью, но необходимость такая есть, так как многие английского совсем не знают! Вот Alan этим сейчас и занимается и скоро выложит подправленную, да еще и с линиями разберется...
:wink: Хочется чтобы никому обидно не было!
__________________
Я не волшебник, я только учусь… |
|||
![]() |
|
||||
CAD Регистрация: 28.08.2003
Киев
Сообщений: 1,834
![]() |
Цитата:
Сервис-Настройка-Файлы-Путь доступа к вспомогательным файлам" В procat_ru есть одна маленькая ошибка, Владимир М нашел - спасибо. Могу выслать исправленный текст.
__________________
По теории майский жук летать не может. Но он этого не знает. И летает... |
|||
![]() |
|
||||
Машиностроение, Проектирование Регистрация: 15.09.2003
Москва
Сообщений: 1,112
![]() |
Цитата:
посмотри тут |
|||
![]() |
|
||||
CAD Регистрация: 28.08.2003
Киев
Сообщений: 1,834
![]() |
Цитата:
Напиши мне адрес, если не хочешь светить на форуме.
__________________
По теории майский жук летать не может. Но он этого не знает. И летает... |
|||
![]() |
|
||||
CAD Регистрация: 28.08.2003
Киев
Сообщений: 1,834
![]() |
Цитата:
Исправляю сообщение. Поместите папку prokat куда-то в папку, описанную в путях Автокада. Например в "D:\Program Files\AutoCAD 2006\support"
__________________
По теории майский жук летать не может. Но он этого не знает. И летает... |
|||
![]() |
|
||||
CAD Регистрация: 28.08.2003
Киев
Сообщений: 1,834
![]() |
>All пользователям программы ПРОКАТ
Сейчас подделываю программу чтобы работала под любым (рус или анг) Автокадом с добавленным Владимир"ом М сортаментом. Вопрос 1) Нужно ли масштабирование блоков, т.е. предусматривать ли вычерчивание элементов в мм чертежа? Вопрос 2) Можно ли для этого использовать сист.переменную USERI1? P.S. Вопросы заданы только для использования бесплатной программы ПРОКАТ. Просьба на дискуссии не отправлять. P.S.S. Автор программы ПРОКАТ Василий Кондрат нашелся, передаёт всем привет и желает всяческих успехов. Переделывать в разумных пределах разрешил.
__________________
По теории майский жук летать не может. Но он этого не знает. И летает... |
|||
![]() |
|
||||
- Регистрация: 31.07.2005
Ухта
Сообщений: 380
![]() |
Цитата:
__________________
Я не волшебник, я только учусь… |
|||
![]() |
|
||||
- Регистрация: 31.07.2005
Ухта
Сообщений: 380
![]() |
Цитата:
Привет передавай ему Alan, и спасибо ему за основу! Будем двигаться дальше
__________________
Я не волшебник, я только учусь… |
|||
![]() |
|
||||
- Регистрация: 31.07.2005
Ухта
Сообщений: 380
![]() |
Скоро выйдет еще одно обновление – квадратные трубы!
Исходный код получился, осталось создать базу данных для квадратных труб. ![]() И тут такой вопрос – под какими ГОСТами сейчас выпускают трубы квадратного профиля. На сколько я помню Технические Условия (ТУ) уже отменены и уже не действуют. Для квадратных труб думаю можно применить ГОСТ 8639-82 и ГОСТ 25577-83. Если не так поправьте.
__________________
Я не волшебник, я только учусь… |
|||
![]() |
|
||||
Машиностроение, Проектирование Регистрация: 15.09.2003
Москва
Сообщений: 1,112
![]() |
[quote="AlanВопрос 1) Нужно ли масштабирование блоков, т.е. предусматривать ли вычерчивание элементов в мм чертежа?
Вопрос 2) Можно ли для этого использовать сист.переменную USERI1? [/quote] 1- НЕТ 2- НЕТ соответственно Василий Кондрат большей частю работает в Инвенторе, потребность в прикладных программах отпала, поэтому и не пишет. > Владимир М В свое время я испотльзовал ГОСТ 8639 для сортамента квадратных труб при записи в графу материал программы записи материала в графу штампа, dat-файл прилагаю может пригодится. [ATTACH]1166423406.zip[/ATTACH] |
|||
![]() |
|
||||
Цитата:
ГОСТ30245-94.Профили для стрoительных конструкций ГОСТ 3262-75 Трубы стальные водогазопроводные Трубы стальные прямоугольные по ГОСТ 8645-68 / 13663-86 Трубы стальные квадратные (ГОСТ 8639-82, DIN 2395, ТУ 14-105-566-93) |
||||
![]() |
|
||||
Конструктор Регистрация: 06.04.2005
Из тех ворот-откуда весь народ.
Сообщений: 355
![]() |
Когда-то выкладывалась в download программа "Профиль металлопроката"(ModSection) Алексея Дворака (aleksejdvorak@yandex.ru),там много всего ,-в том числе и трубы:квадратные,прямоугольные,круглые.Неплохо было-бы совместить эту программу с программой Василия,или использовать данные.Еще лучше-если бы сам А.Дворак подключился.
__________________
"Мнение не бывает ни истинным, ни ложным, а лишь полезным в жизни или бесполезным. ",- Ауробиндо И не надо делать удивленных движений руками. |
|||
![]() |
|
||||
- Регистрация: 31.07.2005
Ухта
Сообщений: 380
![]() |
Спасибо за помощь, Геннадий aka PG, посмотрю.
Спасибо Lamer Inc.., спасибо за новый ГОСТ - его я тоже применю. T-Yoke, вот насчет DIN - это не наш стандарт, а немецкий - вот пусть немцы и делают! Хотя хорошая идея использовать и зарубежный металл, только подумай как тебе обойдется доставка этого металла из-за граници А круглые трубы это вообще другой разговор. DEM тут предлагает двойной выбор сделать - по диаметру и толщине стенки. getr, спасибо за помощь, только дай ссылку на ModSection и что-то похожее, тоже можно взглянуть. Тут можно и целую команду программистов набрать - спасибо огромное :wink:
__________________
Я не волшебник, я только учусь… |
|||
![]() |
|
||||
Конструктор Регистрация: 06.04.2005
Из тех ворот-откуда весь народ.
Сообщений: 355
![]() |
->Владимиру М
http://dwg.ru/dnl/213
__________________
"Мнение не бывает ни истинным, ни ложным, а лишь полезным в жизни или бесполезным. ",- Ауробиндо И не надо делать удивленных движений руками. |
|||
![]() |
|
||||
Машиностроение, Проектирование Регистрация: 15.09.2003
Москва
Сообщений: 1,112
![]() |
Цитата:
Если разговор не о прокате Василия, то kpЫс прав. |
|||
![]() |
|
||||
- Регистрация: 24.07.2005
Москва
Сообщений: 1,458
|
Цитата:
|
|||
![]() |
|
||||
- Регистрация: 31.07.2005
Ухта
Сообщений: 380
![]() |
Добавил для английских версий:
"Профиль гнутый замкнутый сварной квадратный по ГОСТ 30245-03" "Профиль гнутый замкнутый сварной прямоугольный по ГОСТ 30245-03". Для обновления скопируйте данные файлы и вложите их в папку prokat с заменой старых. Рисует Прокат и Прокат3D Пользуйтесь! [ATTACH]1166956283.rar[/ATTACH]
__________________
Я не волшебник, я только учусь… |
|||
![]() |
|
||||
инженер Регистрация: 05.08.2006
Самара
Сообщений: 258
|
Ну что сказать - молодец.
Теперь для русской версии. Нужно (если уж пошло...): - разбить сечения по главам (плохо скакать скролом по 20-30 значениям) - добавить тавры гнутосварные трубы по всем ТУ и ГОСТам профнастил Ну это уж так... Все равно спасибо... |
|||
![]() |
|
||||
Машиностроение, Проектирование Регистрация: 15.09.2003
Москва
Сообщений: 1,112
![]() |
Цитата:
Прокат он и есть прокат, а для остального может сделать другую и назвать "гнукат" ? ![]() |
|||
![]() |
|
||||
- Регистрация: 31.07.2005
Ухта
Сообщений: 380
![]() |
Цитата:
А ТУ уже отменен! Ладно, квдратные по гОСТу можно и закончить, а круглые трубы нужны? Какие пишите...
__________________
Я не волшебник, я только учусь… |
|||
![]() |
|
||||
Машиностроение, Проектирование Регистрация: 15.09.2003
Москва
Сообщений: 1,112
![]() |
Ну, уж 2 окружности нарисовать-то, я думаю, можно и без программы!
А то так докатимся, что и на обычную линию будем программы писать! |
|||
![]() |
|
||||
Engineer Регистрация: 05.09.2003
New-York
Сообщений: 10,369
|
Цитата:
|
|||
![]() |
|
||||
- Регистрация: 31.07.2005
Ухта
Сообщений: 380
![]() |
Вот и русская версия последних обновлений.
Если нужна полная загляните на http://dwg.ru/dnl/1825 Желаю удачи! [ATTACH]1167167540.rar[/ATTACH]
__________________
Я не волшебник, я только учусь… |
|||
![]() |
|
||||
конструктор Лего Регистрация: 21.10.2005
Краснодар
Сообщений: 203
|
2 Владимир М
Например использовать для хранения ini файл. Такая функция есть в DOSlib, но лучше использовать чистый лисп. Например так: ;;; INI-EDIT.LSP contains functions to create and edit ;;; Windows-Style INI files, and to retrieve data from ;;; this files. ;;; ;;; INI-EDIT is freeware by ;;; Thomas Berger ;;; imago mundi CAD Systemhaus GmbH ;;; ;;; You may use and misuse this file ;;; and the included functions as you like. ;;; You may copy and distribute this file ;;; in whole or in parts freely. ;;; No warranties of course! ;;; ;;; If you like you may send me an email and tell me where ;;; you included this functions. ;;; ;;; CIS: Thomas Berger, 100326,2312 ;;; Internet: imago@compuserve.com ;;; http://ourworld.compuserve.com/homepages/imago ;;; ;;; ;;; FUNCTIONS ;;; ;;; (INI_WRITEENTRY inifile section variable value) ;;; inifile - string, a valid filename ;;; section - string, a section name ("[" and "]" brackets will be added automatically!) ;;; variable - string, a name of a variable in a INI file section ;;; value - string, the value for the variable ;;; ;;; This function creates a new or modifies an existing section entry. If the INI ;;; file does not exist it will be craeted automatically. ;;; [section] ;;; variable=value ;;; ;;; Example: ;;; (ini_writeentry "c:/test.ini" "NEWSECTION" "NEWVALUE" "100") ;;; creates a new ini file with content: ;;; [NEWSECTION] ;;; NEWVALUE=100 ;;; ;;; ;;; (INI_READENTRY inifile section variable) ;;; inifile - string, a valid filename ;;; section - string, a section name ("[" and "]" brackets will be added automatically!) ;;; variable - string, a name of an variable in a INI file section ;;; ;;; This function returns the value of an existing section entry as a string: ;;; ;;; Example: ;;; (ini_readentry "c:/test.ini" "NEWSECTION" "NEWVALUE") ;;; returns "100" ;;; ;;; ;;; (INI_READSECTION inifile section) ;;; inifile - string, a valid filename ;;; section - string, a section name ("[" and "]" brackets will be added automatically!) ;;; ;;; This function returns an assoc list with all variables and values of a complete ;;; ini file section ;;; ;;; Example: ;;; (ini_readsection "c:/test.ini" "NEWSECTION") ;;; returns (("NEWVALUE" "100") ("NEXTVALUE" "SAMPLE")) ;;; ;;; ;;; (INI_READINI inifile) ;;; inifile - string, a valid filename ;;; ;;; This function returns an assoc list of the complete ini file. ;;; ;;; Example: ;;; (ini_readini "c:/test.ini") ;;; returns (("[NEWSECTION]" ("NEWVALUE" "100") ("NEXTVALUE" "SAMPLE")) ("[NEXTSECTION]" ("INIPATH" "C:\\TEST.INI"))) ;;; ;;; ;;; (INI_INILINE line separator) ;;; line - a string as delivered by (read-line ..) ;;; separator - a string of a single char ;;; ;;; Example: ;;; (ini_iniline "NEWVALUE=100" "=") ;;; returns ("NEWVALUE" "100") (defun ini_readentry (inifile section entry ) (if (and (= 'STR (type section)) (/= "[" (substr section 1 1))) (setq section (strcat "[" section "]"))) (setq section (ini_readsection inifile section)) (cadr (assoc entry section)) ) (defun ini_writeentry (inifile section entry val / ofile ini sec) (if (not (findfile inifile)) (progn (setq ofile (open inifile "w")) (close ofile))) (if (and (= 'STR (type section)) (/= "[" (substr section 1 1))) (setq section (strcat "[" section "]"))) (if (setq ofile (findfile inifile)) (progn (setq ini (ini_readini inifile)) (cond ((setq sec (assoc section ini)) (if (assoc entry (cdr sec)) (setq sec (cons section (subst (list entry val) (assoc entry (cdr sec)) (cdr sec)))) (setq sec (cons section (reverse (cons (list entry val) (reverse (cdr sec)))))) ) (setq ini (subst sec (assoc section ini) ini)) (setq ofile (open ofile "w")) (if ofile (progn (mapcar '(lambda (x) (write-line (car x) ofile) (mapcar '(lambda (x) (write-line (strcat (car x) "=" (cadr x)) ofile) ) (cdr x) ) (write-line "" ofile) ) ini ) (close ofile) )) ) (T (setq ofile (open ofile "a")) (if ofile (progn (write-line section ofile) (write-line (strcat entry "=" val) ofile) (close ofile) ) ) ) ) ) ) ) (defun ini_readsection (inifile section / ofile line result ) (if (and (= 'STR (type section)) (/= "[" (substr section 1 1))) (setq section (strcat "[" section "]"))) (if (findfile inifile) (cdr (assoc section (ini_readini (findfile inifile)))) (alert (STRCAT inifile "\nnicht gefunden!")) ) ) (defun ini_readini (inifile / ofile line section result) (if (findfile inifile) (progn (setq ofile (open (findfile inifile) "r")) (if ofile (progn (while (and (setq line (read-line ofile)) (/= "[" (substr line 1 1)))) (while (and line (= "[" (substr line 1 1))) (setq section (list line)) (while (and (setq line (read-line ofile)) (/= "[" (substr line 1 1))) (if (and (/= ";" (substr line 1 1)) (/= "" line)) (setq section (cons (ini_iniline line "=") section)) ) ) (setq result (cons (reverse section) result)) ) (close ofile) )) ) (alert (STRCAT inifile "\nnicht gefunden!")) ) (reverse result) ) (defun ini_iniline (line sep / line str1 str2 ) (if (= 'STR (type line)) (progn (setq str1 "" str2 "") (while (and (/= "" line) (/= sep (substr line 1 1))) (setq str1 (strcat str1 (substr line 1 1)) line (substr line 2)) ) (if (= sep (substr line 1 1)) (setq str2 (substr line 2)) ) ) ) (list str1 str2) ) |
|||
![]() |
|
||||
конструктор Лего Регистрация: 21.10.2005
Краснодар
Сообщений: 203
|
По-моему лучше файлы с данными прокатов хранить в стиле ini файлов. Пример баз данных см. VetCAD. Сейчас работаю над программой по составлению спецификаций и выборки стали по ней.На чистом лиспе для использования в IntelliCAD.Как допишу выложу. Но не знаю когда.Если хватит сил.Программы должны быть бесплатными.Нужно сделать народный сапр.Пора кончать со спекулянтами и ростовщиками всех мастей.
|
|||
![]() |
|
||||
Армспорт Регистрация: 18.07.2006
Ейск
Сообщений: 355
|
Цитата:
Если бы программы были бесплатными, то не было бы и Автокада. Была бы бумага и карандаши (и те не бесплатные!). |
|||
![]() |
|
||||
конструктор Лего Регистрация: 21.10.2005
Краснодар
Сообщений: 203
|
to Евгений А.
Недавно ехал в трамвае с одним программистиком. Его мечта написать программу однажды, и потом всю жизнь жить на процент от её продажи. Т.е. он , возможно, потом хотел перестать быть производителем благ, а являться только потребителем. Т.е. по установившейся практике такой возможный паразит сядет мне на шею. Это рабовладельческий строй в цивилизованной форме. Считаю, что должен оплачиваться только труд по факту, а не какие-то прежние “заслуги” и “права”. Если бы капиталисты достойно оплачивали труд пролетариата (проектировщиков в частности), то не нужны были бы ни льготы, ни их показушная благотворительность. А если не будет ACADa, то буду работать на безплатном ProgeCAD LT. А так , если критически посмотреть на ситуацию с авторскими правами, то тогда не нужно наказывать и мошенников – риэлтеров за продажу десятков ордеров на одну и ту же квартиру. А что касается Ильича то таких людей я уважаю. Но все же мне хочется стать таким как отец-основатель СССР И.В.Сталин. |
|||
![]() |
|
||||
конструктор Лего Регистрация: 21.10.2005
Краснодар
Сообщений: 203
|
2 Profan
Интересно, кому надо меня замочить, да не просто пулей а каким-то древним "кошерным" способом? Хватит проливать кровь честных трудящихся! Хватит раскручивать известный маховик "Зуб за зуб". Лучше бы помог нам - честным труженикам Русской многонациональной цивилизации написать бесплатный модуль к будущему Народному САПРу. Знай что Бог на нашей стороне. Наше дело правое. Победа будет за нами. |
|||
![]() |
|
||||
- Регистрация: 31.07.2005
Ухта
Сообщений: 380
![]() |
nikе, спасибо конечно за труд, но столько много всего, а особенно скобок на отдельных строках. Мне бы принцип логический, как это сделать какие параметры нужно сохранять и как это лучше сделать.
Спасибо и за предложения с *.ini но с LISPом практичнее я с вами согласен... А на счет бесплатного САПРа есть мнение у каждого. А когда человек учится этому, делать это нужно бесплатно, так как нужна помощь, в процессе которого ты получаешь знания, а так же мнения со стороны и варианты решения различных вопросов.
__________________
Я не волшебник, я только учусь… |
|||
![]() |
|
||||
конструктор Лего Регистрация: 21.10.2005
Краснодар
Сообщений: 203
|
Привет, Владимир М. Выложенный мной лисп сохрани в файл INI-EDIT.LSP. Он содержит библиотечные функции для работы с ini файлами. Добавляешь в свою программу строку
(load "INI-EDIT.LSP" ) и эти функции доступны из твоей программы. В комментариях даны примеры использования этих функций. Положим, что имеем файл sp.ini со следующим содержанием: [poz_sec] poz_vol=4e6613 [dl_sec] dl_vol=4560 [kol_sec] kol_vol=81 [nfas_sec] nfas_vol=0 [rfas_sec] rfas_vol=0 [fas_sec] fas_vol=0 [armature_sec] armature_vol=1 Например так можно записать в sp.ini новое значение nfas_vol, считывая его из текстового окошка диалогового окна. (ini_writeentry "sp.ini" "nfas_sec" "nfas_vol" (get_tile "nfas")) А так прочитать значение этой переменной (setq nfas (ini_readentry "sp.ini" "nfas_sec" "nfas_vol")) и установить это значение в в edit box диалогового окна (set_tile "nfas" nfas) |
|||
![]() |
|
||||
конструктор Лего Регистрация: 21.10.2005
Краснодар
Сообщений: 203
|
2 Владимир М
Еще хотелось бы тебя попросить чтоб ты по возможности переделал библиотеку слайдов на отдельные файлы слайдов, т.к. IntelliCAD не поддерживает работу с библиотеками слайдов. Т.е. программа прокат работает но в диалоговом окне не отображаются картинки с профилями. В АСADе естественно все нормально, но для тех, кто работает в ACAD эта программа не нужна, тк могут работать например с ProjectStudio CS. А твоя программа больше нужна тем, кто работает с бесплатными или платными, но с разумной ценой в пределах 100-200 у.е. программами типа ProgeCAD ( a ProgeCAD LT вообще бесплатна, но поддерживает урезанный лисп без vl- функций и компилирующей функции function) |
|||
![]() |
|
||||
Армспорт Регистрация: 18.07.2006
Ейск
Сообщений: 355
|
Цитата:
Код:
|
|||
![]() |
|
||||
- Регистрация: 31.07.2005
Ухта
Сообщений: 380
![]() |
Евгений А. не стоит обижать друг друга мы же не для этого здесь собираемся тем более высшее общество должно вести себя достойно и в рамках приличия, зачем судить каждого лучше следить за собой. А вот Бог пусть нас рассудит. А ту какая-то свинья получается... ну и новый год будет....
__________________
Я не волшебник, я только учусь… |
|||
![]() |
|
||||
CAD Регистрация: 28.08.2003
Киев
Сообщений: 1,834
![]() |
>Евгений А.
Я бы ОЧЕНЬ не советовал Вам (и другим тоже) хранить в реестре какие-то локальные переменные. Архинеправильно, батенка! Не для этого реестр предназначен! Локальное значение прекрасно храниться самим Лиспом. В одном варианте В.Кондрата, который он мне присылал, так было и сделано.
__________________
По теории майский жук летать не может. Но он этого не знает. И летает... |
|||
![]() |
|
||||
Армспорт Регистрация: 18.07.2006
Ейск
Сообщений: 355
|
Цитата:
|
|||
![]() |
|
||||
CAD Регистрация: 28.08.2003
Киев
Сообщений: 1,834
![]() |
Цитата:
О использовании реестра для прикладных программ можно прочитать в книге "САПР на базе..." стр.98-105 В моём (я писал выше) варианте ПРОКАТ работает сохранение состояния в Лиспе и без реестра, что есть значительно проще и чище. ЯТД
__________________
По теории майский жук летать не может. Но он этого не знает. И летает... |
|||
![]() |
|
||||
CAD Регистрация: 28.08.2003
Киев
Сообщений: 1,834
![]() |
>Евгений А.
Цитата:
перевести из локальной в глобальную и она будет храниться во время сеанса. ![]()
__________________
По теории майский жук летать не может. Но он этого не знает. И летает... |
|||
![]() |
|
||||
Армспорт Регистрация: 18.07.2006
Ейск
Сообщений: 355
|
Дружище, любой программист тебе скажет, что использовать глобальные переменные - это ОЧЕНЬ-ОЧЕНЬ плохо, не профессионально и неоправданно!!! Нет никакой гарантии, что другая программа написанная каким-нибудь юзером :shock: не будет использовать и изменять значение глобальной переменную под именем (к примеру) RR!
![]() А попробуй теперь представить, что в программе несколько окон и в каждом окне хотя бы с десяток пунктов которые надо сохранять!!! И что??? Под сотню глобальных переменных? Очень удобно! А в моём примере, достаточно только вбить в SPISOK_TILE только все сохраняемые ключи (key), и значения таким же макаром можно скидывать в локальный список и потом его использовать вместо переменных. Помоему проще уже некуда! |
|||
![]() |
|
||||
CAD Регистрация: 28.08.2003
Киев
Сообщений: 1,834
![]() |
>Евгений А.
Цитата:
Дружище, любой программист тебе скажет, что бо'льшая свалка мусора чем Интернет, это только реестр Widows. И использовать его надо очень аккуратно, без излишеств, т.е. без ненужных записей. Вот, например, прописать туда путь к какой-то большой программе, к которому можно пристёгивать все остальные пути, это ИМХО самый раз! Сохранение же локальных переменных, имеющих смысл только в этом чертеже и этом сеансе, в реестре - это ОЧЕНЬ-ОЧЕНЬ плохо, не профессионально и неоправданно!!! Для этого можно (и нужно в достаточно больших программах) использовать другие средства, например, INI-файлы, словари, расширенные данные и т.д..
__________________
По теории майский жук летать не может. Но он этого не знает. И летает... |
|||
![]() |
|
||||
Армспорт Регистрация: 18.07.2006
Ейск
Сообщений: 355
|
Цитата:
Цитата:
А на счёт "свалки" лучше сами рассудите: если записей много и все серьёзные программы (соответственно программисты) используют реестр, то наверно не потому, что там приятно мусорить, а потому, что ОЧЕНЬ легко и удобно!!! |
|||
![]() |
|
||||
- Регистрация: 31.07.2005
Ухта
Сообщений: 380
![]() |
Думаю по этому спорить особо не надо. Я думаю, реестр нужен не только для этих целей. Можно контролировать на наличие использование программы в целях авторских прав. Даже при наличии удалении программы необходимо оставить инфо о пользовании программы. Но наша программа бесплатная, так что не чего туда и лесть в этот реестр.
Если программа серьезная и написанная, например на C++, то это другой разговор. Так что лезть туда пока не собираюсь. А вот с Лиспом пока не получается, вроде логику понял, но что-то не выходит, может кто-то поможет ... или выложить код?
__________________
Я не волшебник, я только учусь… |
|||
![]() |
|
||||
CAD Регистрация: 28.08.2003
Киев
Сообщений: 1,834
![]() |
Цитата:
Не все значения нужно сохранять, а только номера: списка профилей и профиля. Всё это можно записать в строку ИНИ-файла в папке Procat (а лучше и чище в рабочей папке). Здесь я могу помочь, если тебе не понятно как. Но для меня гораздо интереснее добавить радио-кнопки для стали. Я почти это сделал. Поэтому, я тебя прошу. Проверь/протестируй те тексты, которые я прислал 1.01.2007. Дай сигнал ПГ на опубликование объединительной (единой для рус/анг Акада) версии.
__________________
По теории майский жук летать не может. Но он этого не знает. И летает... |
|||
![]() |
|
||||
- Регистрация: 31.07.2005
Ухта
Сообщений: 380
![]() |
Все хорошо Alan, можно выкладывать, но думаю надо погонять ее на руском Akade
Хочу сказать что скоро выложу обновления для спец профиля БАЛКИ ДВУТАВРОВЫЕ И ШВЕЛЛЕРЫ СТАЛЬНЫЕ СПЕЦИАЛЬНЫЕ ГОСТ 19425-74
__________________
Я не волшебник, я только учусь… |
|||
![]() |
|
||||
- Регистрация: 31.07.2005
Ухта
Сообщений: 380
![]() |
Х...м, сижу спокойно программирую и как раз разбираюсь с внутренними уклонами двутавров по ГОСТ 19425-74
и вижу примечание в ГОСТе: Цитата:
И тут вспомнил присылали мне С.-Петербурга чертежи с этими балками Люди работают там в СПДС-график, ни хочу конечно обижать, но в этой программе программисты вместо 12% (7 градусов) залепили 12 градусов, а вместо 16% (9 градусов) - соответственно 16 градусов. Какая-то безграмотность творится! Ладно у меня по ГОСТ 8239-89 Написано: Цитата:
А тут как мне быть принимать по максимум значение уклона для ГОСТ 19425-74, если интервала такового не имею?
__________________
Я не волшебник, я только учусь… |
|||
![]() |
|
||||
Инженер-технолог Регистрация: 18.11.2003
Мурманск
Сообщений: 180
|
Может немного не в тему, но есть вопрос по программе.Давно использую программу Василия Кондрата, все работало без проблем.
После установки обновленной версии перестали рисоваться профили с использованием пунктирной линии, создание слоев и загрузка дополнительных линий не помогают. Подскажите пожалуйста причину? |
|||
![]() |
|
||||
CAD Регистрация: 28.08.2003
Киев
Сообщений: 1,834
![]() |
Цитата:
Какой у Вас Автокад: версия; локализация (рус/анг)? Всего два вопроса, которые можно было не задавать!
__________________
По теории майский жук летать не может. Но он этого не знает. И летает... |
|||
![]() |
|
||||
Инженер-технолог Регистрация: 18.11.2003
Мурманск
Сообщений: 180
|
Обновление со страницы http://dwg.ru/dnl/1825
prokat_ru от 27.12.06 ACAD2006eng, руссифицирован интерфейс. Первоначальная версия проката работала начиная с ACAD2000. |
|||
![]() |
|
||||
CAD Регистрация: 28.08.2003
Киев
Сообщений: 1,834
![]() |
Цитата:
См. моё сообщение №26 Цитата:
__________________
По теории майский жук летать не может. Но он этого не знает. И летает... |
|||
![]() |
|
||||
Инженер-технолог Регистрация: 18.11.2003
Мурманск
Сообщений: 180
|
Вообще-то в ACADе не новичок и немного сам пишу в lispе, но все же:
1. Папка prokat2007 установлена в C:\Program Files\AutoCAD 2006\Support\prokat2007; 2. В опциях ACAD указан путь доступа к файлам поддержки C:\Program Files\AutoCAD 2006\Support\prokat2007; 3. Загрузить приложение (appload) prokat.lsp (а для пробы и все сразу) 4. Command: prokat ; error: bad argument type: stringp nil |
|||
![]() |
|
||||
CAD Регистрация: 28.08.2003
Киев
Сообщений: 1,834
![]() |
Цитата:
Цитата:
Код:
Или меняйте тексты, что пока делать не надо. Вот Владимир превратит эту прогу в программу, тогда и решим с правильным расположением.
__________________
По теории майский жук летать не может. Но он этого не знает. И летает... |
|||
![]() |
|
||||
Инженер-технолог Регистрация: 18.11.2003
Мурманск
Сообщений: 180
|
Спасибо Alan! Именно это я и подозревал, только было лень разбираться в *.lsp. Хочу еще заметить что в текстах нашел отрисовку линий в слое "Штриховая2", надеюсь Владимир учтет и этот момент, лишние слои только мешают при проектировании.
Будем ждать выхода финального релиза. |
|||
![]() |
|
||||
CAD Регистрация: 28.08.2003
Киев
Сообщений: 1,834
![]() |
Цитата:
Где это было, в варианте от 26.12.2006 или в моих последних текстах?
__________________
По теории майский жук летать не может. Но он этого не знает. И летает... |
|||
![]() |
|
||||
- Регистрация: 31.07.2005
Ухта
Сообщений: 380
![]() |
Alan, есть проблемы нужен acadiso.lin русской версии для проверки с типом линии, а то у меня ее нет. Выложи пожалуйста, что -то с типом линии не получается. Вместо "DASHED" не выводит "штриховая".
Специально удалял "DASHED" для проверки на выдачу типа линии "штриховая".
__________________
Я не волшебник, я только учусь… |
|||
![]() |
|
||||
- Регистрация: 31.07.2005
Ухта
Сообщений: 380
![]() |
Цитата:
Постараемся сделать Вот сейчас поправил для двутавров и швеллеров с уклоном - отрисовка на виду сбоку будет осуществлятся по средней линии. Хочу заметить полоки идут под скосом 5 градусов в AutoCAD. У Асконцев уклон на всех 7 градусов. Цитата:
Цитата:
__________________
Я не волшебник, я только учусь… |
|||
![]() |
|
||||
- Регистрация: 31.07.2005
Ухта
Сообщений: 380
![]() |
Тема макроса уже проезжена, но еще повторюсь. Когда устанавливаете прогу или обновляете - проверяйте все куда устанавливаете (под какую папку с именем) и сверяйте макрос кнопки
А на счет прописанного пути - это самое главное, а то программа свои собственные файлы не найдет!
__________________
Я не волшебник, я только учусь… |
|||
![]() |
|
||||
Инженер-технолог Регистрация: 18.11.2003
Мурманск
Сообщений: 180
|
[quote] ;;; (command "_linetype" "_s" "Штриховая2" "" "" "") [/quote
но ели читаешь код то внимательно посмотри перед ней знак такой стоит ";" - это чтобы команда на данной строке не работала, а следы надо оставлять...quote] Владимир, прошу прощения, не заметил впопыхах точку с запятой, так как открывал в блокноте. Для полного счастья хотелось бы, чтобы еще и толщина линий присутствовала для пунктирных линий. (ГОСТ 2.303-68, Линии невидимого контура от S/3 до S/2). |
|||
![]() |
|
||||
- Регистрация: 31.07.2005
Ухта
Сообщений: 380
![]() |
Цитата:
Вообще-то я то же раньше пользовался слоями для вывода на печать на старой работе. А на новой пришлось все изменить. Теперь рисую в цветах и вывожу на печать по настройке на каждый цвет определенной толщины – мне даже такой вариант более нравится. И не забочусь, какая толщина у каждой линии, - главное цвет какой! Удобнее работать с блоками. А если хотите слоями работать, кто знает AutoLISP, сами поправят – как говорится «хозяин барин», а девиз мы трогать не будем!
__________________
Я не волшебник, я только учусь… |
|||
![]() |
|
||||
- Регистрация: 31.07.2005
Ухта
Сообщений: 380
![]() |
Кто ни будь, использует швеллеры серии Э, Л, С по ГОСТ 8240-97.
Если используете, то откликнитесь. Интересно где их применяют. Сам нигде их не применял. Но хочу добавить ГОСТ все-таки должен быть полным…
__________________
Я не волшебник, я только учусь… |
|||
![]() |
|
||||
Moderator
LISP, C# (ACAD 200[9,12,13,14]) Регистрация: 25.08.2003
С.-Петербург
Сообщений: 38,697
|
Может, тема уже ушла, но хотелось бы вставить свои 3 грошика (честно скажу, тему читал "по диагонали").
Грошик нумер раз. ИМХО: сделать локальную БД (на том же Access'e), и читать данные оттуда. Плюсы: все в одном файле; возможна сетевая работа; достаточно простое редактирование; для работы из-под acad'a установленный Access на машине не требуется. Минусы: для редактирования надо именно его; доступ к такой БД требует отдельный лисп (можно взять хоть с сайта Флемингов, хоть отсюда - я его как-то выкладывал). Грошик нумер два. Хранить временные значения переменных нужно где угодно, но только не в реестре. Доступ туда, конечно, быстр, но... Есть одно ограничение, которое "кое-где у нас порой встречается": максимальный объем реестра. Если оно установлено в 32 метра, и осталось свободным только 2 байта, чего должен сделать пользователь, не обладающий админскими правами? ИМХО метод хранения определяется длительностью хранения: если только в текущей сессии acad'a, то делать black-board переменные, именованные "похитрее". Если я делаю глобальную переменную, например, с именем *dwg-ru-project-prokat-dcl-settings-saved*, какой больной фантазией надо обладать, чтоб все это повторить? И хранить в ней список ассоциативных пар типа '(("key" . "value") ("key" . "value")) ну или наподобие. И читать с него все данные и настраивать dcl-файл соответственно. Если данные в каждом файле свои, то можно поступить двояко: либо глобальные переменные, либо пользовательские словари. Если же данные надо хранить "между сессиями", то ini-файл самое то (ИМХО). вариантов доступа - как у дурака фантиков. Начиная от doslib и заканчивая собственными сочинениями. Грошик нумер три. ИМХО: должон быть инсталлер, который при установке запрашивает путь установки, пишет необходимые данные в реестр, прописывает меню в указанные версии ACAD'a, делает (при необходимости) отдельный профиль, а также отслеживает предыдущие версии. Более чем полезно, учитывая, что далеко не все слету смогут разобраться; а утилит фриварных для подобных задач полно. --- Я пытался сделать нечто наподобие, но терпения и возможности попросту не хватило - прямой работы накидали ![]()
__________________
|
|||
![]() |
|
||||
Армспорт Регистрация: 18.07.2006
Ейск
Сообщений: 355
|
->kpblc
Сказано красиво и достойно... вот только совершенно неуместно (даже не диагонально а параллельно ![]() Про то что в реестре не стоит хранить большие объёмы данных - и ежу понятно (хотя я не думаю, что лишние 5 - 10 метров как-то повлияют на реестр? А тут только состояние диалогового окна - небось и килобайта в жизни не понадобится). Цитата:
---- Я для себя написал программу-рисовалку трёхмерного проката - всё в одном VLX-файле не привязанного ни к каким папкам, а потом, когда увидел эту тему, попытался установить ПРОКАТ для сравнения и ... хрена с два - error !!! После третьей попытки пропало желание (и до сих пор не появилось). |
|||
![]() |
|
||||
Машиностроение, Проектирование Регистрация: 15.09.2003
Москва
Сообщений: 1,112
![]() |
Цитата:
![]() Ничего лично, извини если обидел чем! |
|||
![]() |
|
||||
- Регистрация: 24.07.2005
Москва
Сообщений: 1,458
|
Цитата:
Дело в том что не все так чертят как вы, например я и небезызвестный Vova для всех объектов назначают linetype scale =1 а при помощи viewports добиваются нужных результатов отображения в зависимости от масштаба. Вы же все равно назначаете тип линий потом, я боюсь предположить что у вас есть написаные реакторы чтобы чертя _line она сразу считывала dimscale и была в нужном масштабе. Уважаемый автор программы просьба сохранить направление развития, в том плане чтобы программа не затрагивала тот самый пресловутый СТП. |
|||
![]() |
|
||||
- Регистрация: 31.07.2005
Ухта
Сообщений: 380
![]() |
Да, Sleekka, по идеи ты прав, "каждый камень точат по своему"
Нужно делать основу - "для всех", а если хочет под себя подстраивать - пусть сам это делает - я ведь стараюсь не только для себя но и для всего общества-инженеров! Еще хочется сказать пишите все высказывание по прокату, - чего нет? или что-то не хватает или что добавить нужно? Вот соберем большой сборник и буду сортировать по категориям (добавим маленькое падающее окошко сбоку)
__________________
Я не волшебник, я только учусь… |
|||
![]() |
|
||||
Машиностроение, Проектирование Регистрация: 15.09.2003
Москва
Сообщений: 1,112
![]() |
Владимир М
Давай только брать уже локализованную версию для дальнейших модификаций и учитывать также локализацию в новых подпрограммах ! Alan мне прислал "локализованную" версию работает и в англ и русском акаде. http://www.cadhlp.kulichki.com/pgmake.htm#prokat2007 |
|||
![]() |
|
||||
промышл проектант Регистрация: 26.05.2005
Изовсехщелей
Сообщений: 313
|
Хотелось бы внести ряд предложений.
1. отрисовка проката полилинией а не блоком (блоку сменить цвет и тип линии сложнее) Если не хотите убрать отрисовку блоком - то брать текуйщий цвет и внести в блок атирубы - гост типа проката и вес погонного метра. 2. запрашивать пользователя о масштабе отрисовываемого элемента а не рисовать 1-1 (типа потом пользователь сам решит что ему надо ). ИМХО проще вбить цифру 5 10 20 25 50 100 или кому что надо - как масштаб чем потом совершать шаманство над блоком. |
|||
![]() |
|
||||
Moderator
LISP, C# (ACAD 200[9,12,13,14]) Регистрация: 25.08.2003
С.-Петербург
Сообщений: 38,697
|
Ххе, похоже, понадобится делать нормальное окно настроек, в которое и вносить последовательно все предложения
![]() Нечто типа такого, я думаю: [ATTACH]1168499342.jpg[/ATTACH]
__________________
|
|||
![]() |
|
||||
Машиностроение, Проектирование Регистрация: 15.09.2003
Москва
Сообщений: 1,112
![]() |
Лично я против масштаба изображения, а цвет... Всё отрисовывается в текущем слое!
У меня все работает, цвет меняется с изменением цвета слоя, все корректно (конечно подробно все позиции сортаментов не проверял) |
|||
![]() |
|
||||
CAD Регистрация: 28.08.2003
Киев
Сообщений: 1,834
![]() |
Цитата:
Посмотрите внимательно моё сообщение №91 и всё заработает! Новая версия благодаря Владимиру М богаче по возможностям. А благодаря kpblc"у может работать с линиями из любого (рус/анг) Автокада.
__________________
По теории майский жук летать не может. Но он этого не знает. И летает... |
|||
![]() |
|
||||
промышл проектант Регистрация: 26.05.2005
Изовсехщелей
Сообщений: 313
|
kpblc
Все так - только не разбитым блоком вставка (при кторой я получаю кучу отрезков) а именно единой полилинией. сие сделать не сложно а жить станет легче Геннадий aka PG Боюсь вы тем самым сделаете не универсальную программу а прогу чисто под себя - Крыс правильно расставил галки - хочешь меняй масштаб - хочешь нет. цвет слоя одно а текущий цвет другое. нашим СТП запрещено плодить свои слои а цвета меняй как хочешь - вот и вывод - надо брать текущий цвет а не цвет слоя. Хотя тоже можно регулировать сей момент - выставив галку в настройках |
|||
![]() |
|
||||
Машиностроение, Проектирование Регистрация: 15.09.2003
Москва
Сообщений: 1,112
![]() |
Цитата:
Поубывал бы тех кто в слое еще и разными цветами рисует, зачем? Елку новогоднюю не напоминает. А рисовать в АКАДе в масштабе - наивреднейшее дело! |
|||
![]() |
|
||||
Moderator
LISP, C# (ACAD 200[9,12,13,14]) Регистрация: 25.08.2003
С.-Петербург
Сообщений: 38,697
|
Ххе, щщас, "сделать полилинией проще"
![]() Для полилинии будет более грустно - надо будет уже делать (entmake) либо (vla-addlightweight), то есть программно вычислять точки и закругления, на их основе строить полилинию, которую потом и вставлять в блок. Поскольку мне по ходу работы не приходилось сталкиваться со скругленными полилиниями, я и функцию на это не делал ![]() ![]()
__________________
|
|||
![]() |
|
||||
Машиностроение, Проектирование Регистрация: 15.09.2003
Москва
Сообщений: 1,112
![]() |
Просто блок взрывать не надо - и проблем не будет.
|
|||
![]() |
|
||||
промышл проектант Регистрация: 26.05.2005
Изовсехщелей
Сообщений: 313
|
Геннадий aka PG
Если не ошибаюсь тут уже много веток по правилам ПРАВИЛЬНОГО черчения. мне казалось эта ветка конкретно о программе - я внес лишь предложения которые прошу реализовать - не более чем. Крыс насчет полилинии - тут был набор лиспов по работе с полилиниями - в частности был лиспик по объединению линий в полилинию - так вот пологаю им можно воспользоваться дабы велосипед не изобретать и вставить тот код. Хотя - не мне Вас учить. |
|||
![]() |
|
||||
Moderator
LISP, C# (ACAD 200[9,12,13,14]) Регистрация: 25.08.2003
С.-Петербург
Сообщений: 38,697
|
Иногда надо экструдировать полученные сечения. Там без взрывания блока не обойтись
![]() Вот функции, вроде как работают - создают полилинию по указанным параметрам. Выдирал с мясом из имеющейся библиотеки, поэтому мог чего-то упустить. Если что, сообщите [ATTACH]1168512834.rar[/ATTACH]
__________________
|
|||
![]() |
|
||||
Машиностроение, Проектирование Регистрация: 15.09.2003
Москва
Сообщений: 1,112
![]() |
Цитата:
|
|||
![]() |
|
||||
Машиностроение, Проектирование Регистрация: 15.09.2003
Москва
Сообщений: 1,112
![]() |
Цитата:
Ну, что вы в самом деле..... |
|||
![]() |
|
||||
Машиностроение, Проектирование Регистрация: 15.09.2003
Москва
Сообщений: 1,112
![]() |
Цитата:
![]() |
|||
![]() |
|
||||
промышл проектант Регистрация: 26.05.2005
Изовсехщелей
Сообщений: 313
|
Цитата:
постараюсь объяснить: 1. во первых есть цветозависимая печать - следовательно линии имеет смысл делить не по цветам а логически по слоям. и на каждом слое я могу по своему усмотрению для наглядности выделить толщиной (т.е. цветом) нужный мне момент 2. в больших конторах многие вещи оговариваются заранее - либо нормативами, либо контрактом и т.п. - т.е. плодить слои я не имею права. это приводит к необходимости брать цвет текущим а не по слою. 3. Вставив 1-1 я вынужден использовать модель и просторанство листа. НО - по требованиям - по 1 чертежу в 1 файле - следовательно: в модели нарисвоать 3 узла а потом их отмасштабировать в лайоутах - это умно (???) но долго. - проще сразу как мне надо отисовать в модели и все. либо я вынужден хранить 1 огромную модель и использовать лишь по 2 изображения для каждого листа - т.е. чертежа. Следовательно мне надо масштабировать вставляемый блок. 4. блок не позволяет одним щелчком поменять цвет и тип линии - следовательно блок ненужен - нужна линия. 5. имея 10 линий на 1 сечение сложно скопировать это сечение и т.п. редактирование. - следовательно необходима 1 линия. если программа пишется не под себя - то почему бы просто не учесть пожелания других людей. зачем споры о методах проектирования - мне кажется это немного неуместно - тем более мои требования не мешают вам работать как прежде - ПРАВИЛЬНО. |
|||
![]() |
|
||||
Moderator
LISP, C# (ACAD 200[9,12,13,14]) Регистрация: 25.08.2003
С.-Петербург
Сообщений: 38,697
|
Да дело не в том, как работать правильно, а как - нет. Дело в том, что только сейчас начинается то, что должно было произойти в самом начале - сбор пожеланий к проге (точнее, ее "унутренностям", а не к внешнему виду и поддерживаемым профилям).
Я чем дальше, тем больше склоняюсь к отдельному окну настроек, где и должно быть прописано все (или почти все). И хранению необходимых данных вне AutoCAD'a.
__________________
|
|||
![]() |
|
||||
Машиностроение, Проектирование Регистрация: 15.09.2003
Москва
Сообщений: 1,112
![]() |
Полностью согласен с kрыс'ом !
![]() Модернизация то и затевалась добавления сортамента, а кому какие пуговоицы, да еще и под стандарт предприятия..... Ребяты, давайте и совестью пользоваться будем! Розовые пуговицы может кто и сделает, но не задаром же, не на рынке все таки находимся. >Diman111 Я не хочу спорить о стандартах черчения, но в ваших словах мне многое не понятно, а главное принцип деления по слоям. При цветозависимой печати например толстая- красная, так она и везде должна быть красной, а контур проката - толстая линия.. и в какой цвет красить? Непонятно мне. С блоками тоже непонятка, зачем их членить, когда есть проги по модификации блока с сохранением под новым или старом именем. |
|||
![]() |
|
||||
CAD Регистрация: 28.08.2003
Киев
Сообщений: 1,834
![]() |
Цитата:
с наполнением чертежа хранить внутри чертежа (словари, расш.данные, блоки, переменные - на вкус..); общие, например, путь к программе (НЕмаленькой) в реестре; общие несущественные (например, оформление окна, штамп чертежа...) в ини-файле. Где-то так! Навскидку! ЗЫ Я уже отправлял кого-то на стр. с этим материалом в книгу "САПР на базе..." Там немного правда не так. Но классическое размещение описано! Пища для размышления присутствует.
__________________
По теории майский жук летать не может. Но он этого не знает. И летает... |
|||
![]() |
|
||||
- Регистрация: 31.07.2005
Ухта
Сообщений: 380
![]() |
программа
_kpblc-linetype-load_.LSP от Лоскутова Петра Витальевича (крыса) работает на подгрузку типа линии из acadiso.lin находящий в папке C:\Program Files\AutoCAD 2002\Support или C:\Documents and Settings\Имя пользователя\Application Data\Autodesk\AutoCAD 2005\R16.1\enu\Support и выше версией. НО НИ КАКОЙ СВЯЗИ С ЛИНИИ "dashed" НИ ЧЕГО НЕТ. Когда удалил тип линии "штриховая" (которой там не должно быть) с англ. версии то я все понял "dashed" так и не появилась. и это подтвердилось моему ожиданию. Это прога только для погрузки типа лисии с указыного выше пити загрузки. (setvar "celtype" (_kpblc-linetype-load_ "штриховая" nil) Но думаю это можно решить спомощью оператора if но как лучше сделать надо подумать...
__________________
Я не волшебник, я только учусь… |
|||
![]() |
|
||||
Moderator
LISP, C# (ACAD 200[9,12,13,14]) Регистрация: 25.08.2003
С.-Петербург
Сообщений: 38,697
|
Оффтоп.
Интересно меня обозвали ![]() ![]()
__________________
|
|||
![]() |
|
||||
Машиностроение, Проектирование Регистрация: 15.09.2003
Москва
Сообщений: 1,112
![]() |
Цитата:
![]() Ты, просто, шпиён ! |
|||
![]() |
|
||||
CAD Регистрация: 28.08.2003
Киев
Сообщений: 1,834
![]() |
Цитата:
программа _kpblc-linetype-load_.LSP - Автор Кулик Алексей aka kpblc Лоскутов П.В. (Alaspher) написал много очень хороших, но других программ. См. http://www.uniip.ru/#content=http://.../lib/menu.html
__________________
По теории майский жук летать не может. Но он этого не знает. И летает... |
|||
![]() |
|
||||
Регистрация: 23.06.2005
Сообщений: 79
|
Цитата:
Страна должна знать своих ГЕРОЕВ! http://my.opera.com/kpblc/blog/ PS: любой Кулик свою программу хвалит ![]() |
|||
![]() |
|
||||
Машиностроение, Проектирование Регистрация: 15.09.2003
Москва
Сообщений: 1,112
![]() |
Цитата:
Пусть все фото в сети наших героев будут без очков! Мы должны знать их лицо , а не очки! А то скоро в масках карнавальных фотки появятся, вот и найди где Алексей, а где Петр ! ![]() ВСЕХ с НАСТУПИВШИМ СТАРЫМ НОВЫМ ГОДОМ! |
|||
![]() |
|
||||
- Регистрация: 31.07.2005
Ухта
Сообщений: 380
![]() |
Ну если на то пошло, то я тоже откроюсь. Я Мадюшкин Владимир (Владимир М). Кстати Геннадий aka PG, на своем сайте рядом с Александром Назаровом (Alan) допиши пожалуйста мою фамилию - пусть знают наших героев! Будем продвигать САПР!
__________________
Я не волшебник, я только учусь… |
|||
![]() |
|
||||
Машиностроение, Проектирование Регистрация: 15.09.2003
Москва
Сообщений: 1,112
![]() |
Хорошо, сделаю, а как насчет фото?
|
|||
![]() |
|
||||
Moderator
LISP, C# (ACAD 200[9,12,13,14]) Регистрация: 25.08.2003
С.-Петербург
Сообщений: 38,697
|
Цитата:
![]() ![]()
__________________
|
|||
![]() |
|
||||
Машиностроение, Проектирование Регистрация: 15.09.2003
Москва
Сообщений: 1,112
![]() |
Может не надо?
|
|||
![]() |
|
||||
CAD Регистрация: 28.08.2003
Киев
Сообщений: 1,834
![]() |
Цитата:
Я против такого диалогового окна. Я Вам писал, повторяю еще раз. Такое диалоговое окно ни сколько не упрощает интерфейс и не ускоряет работу с программой. Появляется дополнительное нажатие для выбора типа сортамента (уголок, двутавр...). ИМХО Введение кнопки стали (обычная/качественная) гораздо более полезно, т.к. это сократит длину падающего списка.
__________________
По теории майский жук летать не может. Но он этого не знает. И летает... |
|||
![]() |
|
||||
Машиностроение, Проектирование Регистрация: 15.09.2003
Москва
Сообщений: 1,112
![]() |
Цитата:
ИМХО и ЯТД. ![]() |
|||
![]() |
|
||||
- Регистрация: 31.07.2005
Ухта
Сообщений: 380
![]() |
Цитата:
Цитата:
__________________
Я не волшебник, я только учусь… |
|||
![]() |
|
||||
- Регистрация: 31.07.2005
Ухта
Сообщений: 380
![]() |
Евгений А. Будет и 3D. Но VLX файлами я не занимался.
Если хочешь кинь инфу или ссылку по этому - разберусь и почитаю. Хотя я хочу придерживаться стиля Василия Кондрата. Его всетаки программа и это надо признать я лишь только обновляю и добавляю.
__________________
Я не волшебник, я только учусь… |
|||
![]() |
|
||||
CAD Регистрация: 28.08.2003
Киев
Сообщений: 1,834
![]() |
Цитата:
Тогда можно подкорректировать пути расположения и сделать ещё кое-какие изменения. Но Василий Кондрат разместил открытые тексты, работа я думаю должна продолжаться в таком же виде. Цитата:
![]()
__________________
По теории майский жук летать не может. Но он этого не знает. И летает... |
|||
![]() |
|
||||
Армспорт Регистрация: 18.07.2006
Ейск
Сообщений: 355
|
Alan:
Цитата:
![]() Вы им сильно льстите! Многие не могут запустить даже один лисп. И вообще моё мнение, что прописывать пути к файлам программы в Автокаде только для того, чтобы посмотреть на программу - ананизм, когда можно просто закинуть один VLX-файл мышкой в модель и всё!!! - пробуй на здоровье - подходит она или нет, про пути к файлам можно забыть вообще и программа будет работать в разы быстрее!!! А исходники прятать никто не просит. |
|||
![]() |
|
||||
CAD Регистрация: 28.08.2003
Киев
Сообщений: 1,834
![]() |
Цитата:
Не хочется вступать с Вами в теоретическую дискуссию, но если бы всё было так просто, в Windows вообще папок не было. Так бы мышкой всё и тягали! Свои разработки я лично компилирую в один VLX-файл. Например, для того чтобы не видно было старые тексты, сохранившиеся ещё от версии 10 ![]() Цитата:
У меня VLX-файл имеет размер примерно 800Кб, а вся папка с инфой, блоками и т.п. - 15Мб.
__________________
По теории майский жук летать не может. Но он этого не знает. И летает... |
|||
![]() |
|
||||
Moderator
LISP, C# (ACAD 200[9,12,13,14]) Регистрация: 25.08.2003
С.-Петербург
Сообщений: 38,697
|
В некоторых случаях компилированные файлы могут вообще не работать. Если Евгений Елпанов появится, может, он и скажет более предметно. Из общения с ним я понял, что невозможно откомпилировать vlx и fas с отдельным именным пространством, если внутри кода идет использование рекурсивных функций. Может быть, и не все так грустно (просто мне использование компилированных файлов заказано
![]()
__________________
|
|||
![]() |
|
||||
Цитата:
На самом деле, раньше я сталкивался с этими проблемами, но не разбирался - ошибки были в передаче, через глобальные переменные. Недавно, я общался с Пастухом, разговор натолкнул меня на более детальное изучение отдельного именного пространства. В итоге, я ответственно заявляю, что в отдельном именном пространстве, отлично работают рекурсии, связки взаимно вызываемых рекурсий, самоизменяемые программы, в том числе рекурсивные. |
||||
![]() |
|
||||
Moderator
LISP, C# (ACAD 200[9,12,13,14]) Регистрация: 25.08.2003
С.-Петербург
Сообщений: 38,697
|
Тем не менее (ИМХО) компилированные файлы в данном конкретном случае вряд ли дадут существенный прирост производительности - основная проблема-то в том, что, как и когда будет выбирать человек, а не обрабатывать лисп. Ну сработает он не за 0.0001 сек, а за 0.001 секунды - что от этого изменится, если человек будет выбирать нужные параметры минут 10?
__________________
|
|||
![]() |
|
||||
Машиностроение, Проектирование Регистрация: 15.09.2003
Москва
Сообщений: 1,112
![]() |
Я так понимаю, что к работоспособности программы вопрос уже нет!
Это просто радует!!!!!!!!! А про один файл.. Так можно все ЛИСПы в один воткнуть ![]() |
|||
![]() |
|
||||
Армспорт Регистрация: 18.07.2006
Ейск
Сообщений: 355
|
Отдельное именное пространство, кроме всего прочего, прописывает в программу не имена функций, а лишь их оносительный адрес (кроме тех, что экспортированны и начинающихся с "С:"), что естественно ускоряет обращение к функции, а если при компиляции использовать оптимизацию и связывание, то адресация может местами заменяться на короткий переход (кто знает ассемблер, тот поймёт), а это опять выигрыш в скорости (возможно в конкретной программе это не важно), но кроме того у вас не будет проблем с другими программами, в которых случайно окажется такое же имя функции как у вашей - что уже очень важно!!!
Цитата:
|
|||
![]() |
|
||||
Машиностроение, Проектирование Регистрация: 15.09.2003
Москва
Сообщений: 1,112
![]() |
Цитата:
А потом, действительно, ну будет она запускаться за 0,00000000000001 сек или за 5 сек, какая мне разница, если я в носу 20 сек ковыряюсь прежде чем выбрать элемент ![]() |
|||
![]() |
|
||||
- Регистрация: 31.07.2005
Ухта
Сообщений: 380
![]() |
Да, вам проще обсуждать один файл - один файл. Вот каково разрабочику в одном файле рыскать ошибку или искать функцию.
Проще знать где что лежит, а там и руки можно приделать. И блоками файлов легче работать.
__________________
Я не волшебник, я только учусь… |
|||
![]() |
|
||||
Армспорт Регистрация: 18.07.2006
Ейск
Сообщений: 355
|
Цитата:
:shock: Да я ничего против не имею, просто предложил вариант, как сделать прогу проще для простого юзера. Ну не будет простой пользователь что-то менять в программе, а по хорошему - и не должен, только загубит программу! а вот запутается в файлах и папках - 100% если никто не поможет... Кстати попробовал всё-таки программу - всё работает нормально (2008)! Поздравляю. Но лично меня в корне не устроил подход про "со своим уставом" в чужие чертежи не лезет (всем как говорится не угодишь) У меня всё как раз наоборот http://ad-cad.narod.ru/AD-Profil.htm |
|||
![]() |
|
||||
- Регистрация: 31.07.2005
Ухта
Сообщений: 380
![]() |
Внимание! Обновления!
Вставте эти файлы в корневую папку данной программы с заменой старых Где-то была ошибка в одной позиции по отрисовке Гнутых профилей trkv.dat или trpu.dat непомню поэтому еще раз посылаю И замена ugnp.dat Уголков неравнополочных ГОСТ 8510-86 (Старая не совсем соответствовала ГОСТ). [ATTACH]1181761600.rar[/ATTACH]
__________________
Я не волшебник, я только учусь… |
|||
![]() |
|
||||
Moderator
LISP, C# (ACAD 200[9,12,13,14]) Регистрация: 25.08.2003
С.-Петербург
Сообщений: 38,697
|
Влезу-ка повторно (уже по самим лиспам, остальное, как я понял, уже проехали). Позволительна ли критика (ну и решения проблем)?
__________________
|
|||
![]() |
|
||||
проектировшик Регистрация: 01.01.2007
СССР
Сообщений: 5,138
|
[quote="Владимир М"]Внимание! Обновления!
Вставте эти файлы в корневую папку данной программы с заменой старых Где-то была ошибка в одной позиции по отрисовке Гнутых профилей trkv.dat или trpu.dat непомню поэтому еще раз посылаю И замена ugnp.dat Уголков неравнополочных ГОСТ 8510-86 (Старая не совсем соответствовала ГОСТ). а что новенького
__________________
инженер проектировшик с опттом программа авто гад образование высшие |
|||
![]() |
|
||||
- Регистрация: 31.07.2005
Ухта
Сообщений: 380
![]() |
Цитата:
т.е. Если линии русские а работаешь на ANG то все равно ACAD спрашивает пути загрузки этих линий и наоборот соответственно. Незнаю что и делать.
__________________
Я не волшебник, я только учусь… |
|||
![]() |
|
||||
- Регистрация: 31.07.2005
Ухта
Сообщений: 380
![]() |
Цитата:
Тут еще думаю как создать калькулятор для подсчета проката при значении длины, но видать не скоро это произойдет. Программу придется дополнять. Меня заинтересовали динамические блоки, но в этом я еще ноль. Хотелось найти по динамическим блокам разжеванную книгу.
__________________
Я не волшебник, я только учусь… |
|||
![]() |
|
||||
CAD Регистрация: 28.08.2003
Киев
Сообщений: 1,834
![]() |
Цитата:
Так вот она сказала, что эти два файла индентичные. Цитата:
__________________
По теории майский жук летать не может. Но он этого не знает. И летает... |
|||
![]() |
|
||||
- Регистрация: 31.07.2005
Ухта
Сообщений: 380
![]() |
Цитата:
Вот это я в обнавлении и исправил. И с уголками неравнополочными поменял несоответствие. А что с линиями вот проблема. Опросил бы других как у них все встает?
__________________
Я не волшебник, я только учусь… |
|||
![]() |
|
||||
работник по монтажу, то посижу, то полежу!!! Регистрация: 24.01.2007
г.Владимир
Сообщений: 347
![]() |
Цитата:
![]()
__________________
Положительные эмоции - это эмоции, которые возникают, если на все положить!!! |
|||
![]() |
|
||||
CAD Регистрация: 28.08.2003
Киев
Сообщений: 1,834
![]() |
Цитата:
Цитата:
__________________
По теории майский жук летать не может. Но он этого не знает. И летает... |
|||
![]() |
|
||||
работник по монтажу, то посижу, то полежу!!! Регистрация: 24.01.2007
г.Владимир
Сообщений: 347
![]() |
Цитата:
Адрес если что в привате оставлю ![]()
__________________
Положительные эмоции - это эмоции, которые возникают, если на все положить!!! |
|||
![]() |
|
||||
работник по монтажу, то посижу, то полежу!!! Регистрация: 24.01.2007
г.Владимир
Сообщений: 347
![]() |
Цитата:
Alan мож все же вспомнишь и посмотришь! А-А-А!
__________________
Положительные эмоции - это эмоции, которые возникают, если на все положить!!! |
|||
![]() |
|
||||
Армспорт Регистрация: 18.07.2006
Ейск
Сообщений: 355
|
->Alan и Владимир М
Вот видите, господа, исходники никому (99%) особо не нужны - всем подавай готовую программу, да побыстрее, а то работа стоит, все страдают... и ждут..., а если предложите им скинуться по 500 рублей с лица в фонд помощи разработчика(-ков), чтобы было время и желание поддерживать и развивать продукт, так тухлыми помидорами зашвыряют, мол и программа плохая, и ненужна она нам вовсе, и сами вы такие-сякие ... . А потом удивляются: а что же это такое, нет в стране хороших программ и "мозги утекают за границу" к буржуям за погаными $. |
|||
![]() |
|
||||
работник по монтажу, то посижу, то полежу!!! Регистрация: 24.01.2007
г.Владимир
Сообщений: 347
![]() |
Цитата:
Про таких анекдот придумали: (!!!!!!!! - БОЯН!) -Доктор мне все не нравится! -Всмысле? -Вообще все? -Даже е????ся? -А это как? -Ну давайте покажу ..... -Ну как? -Да ну на х...! Ты определись - либо туда, либо сюда, а то туда-сюда, туда-сюда. Не НРАВИТЦА!
__________________
Положительные эмоции - это эмоции, которые возникают, если на все положить!!! |
|||
![]() |
|
||||
Армспорт Регистрация: 18.07.2006
Ейск
Сообщений: 355
|
Посмешил! Но не о том думаешь!
Тебе бесплатно дали программу вместе с исходниками - делай с ними что хочешь, переписавай как тебе надо! Цитата:
А вот если сам не можешь - проси помощи, но имей ТЕРПЕНИЕ и помни, что за бесплатно тебе никто ничего не должен. Люди как минимум могут быть заняты своими проблемами. Я бы после твоих подгоняев на месте Alana специально не спешил бы, не мальчик уже. |
|||
![]() |
|
||||
- Регистрация: 31.07.2005
Ухта
Сообщений: 380
![]() |
На вопрос G.A.W., найдена ошибка
Цитата:
[ATTACH]1184336646.rar[/ATTACH]
__________________
Я не волшебник, я только учусь… |
|||
![]() |
|
||||
- Регистрация: 31.07.2005
Ухта
Сообщений: 380
![]() |
Исправляю свои ошибки - ошибка в справочных данных на швеллеры с параллельными полками, было взято по умолчанию со справочных данных для швеллеров с уклоном
Замените данный файл в корневом каталоге на этот [ATTACH]1184366888.rar[/ATTACH]
__________________
Я не волшебник, я только учусь… |
|||
![]() |
|
||||
- Регистрация: 24.07.2005
Москва
Сообщений: 1,458
|
2Владимир М
1) я швеллеры как пример привел, возможно нужно посмотреть тоже и для двутавров. 2) откуда изначально взялись эти данные для сортамента? 3) обратите пожалуйста внимание на вот этот пост |
|||
![]() |
|
||||
- Регистрация: 31.07.2005
Ухта
Сообщений: 380
![]() |
Ты конечно прав, Sleekka, надо проверять, конечно я это пока забросил, честно сказать, но не совсем.
Самое интерестное я сам встречаю ошибки в ГОСТ и очень много, вот как раз в этих самых сортаментах и понял тогда когда начал делать прогу в EXCEL по прокату чисто свои расчеты сверял с ГОСТами и что я увидел ошибки и не значительные, но встречаются очень грубые. Ну например ГОСТ 19425-74 балка 36С в ГОСТ 71,3кг/п.м. а у меня по расчету 62,8кг/п.м. Это только пример на самом деле их много и тут начинаешь задумываться как работает наш ГОСТ и куда они смотрят? Хотя в справочной инфе по отрисовке стараюсь придерживаться ГОСТ даже если есть там баки - думаю это временно - но зато есть куда и на кого сослаться!
__________________
Я не волшебник, я только учусь… |
|||
![]() |
|
||||
Армспорт Регистрация: 18.07.2006
Ейск
Сообщений: 355
|
Владимир М у меня в программе на такие случаи реализована проверка плошади поперечного сечения забитого в базу и реально рисуемого в модели профиля. Когда они сильно отличаются, то выдаётся сообщение об ошибке, тогда проще отлавливать описки в базе.
Если необходимо, зная площадь сечения можно вычислять и проверять другие параметры. |
|||
![]() |
|
||||
CAD Регистрация: 28.08.2003
Киев
Сообщений: 1,834
![]() |
>G.A.W.&All
Нашел место, где запоминается ГОСТ и № профиля. Не совсем красиво, через глобальную переменную, но работает... Кто может потестить Прокат, пишите вышлю текст prokat.lsp P.S. Теоретически. ![]()
__________________
По теории майский жук летать не может. Но он этого не знает. И летает... |
|||
![]() |
|
||||
CAD Регистрация: 28.08.2003
Киев
Сообщений: 1,834
![]() |
Цитата:
через 2 глобальные переменные: pr_fl rr Просьба проверить Прокат и сообщить замечания. P.S. Сделал вариант через 2-х строчный ИНИ-файл, но думаю что для программы с открытым кодом достаточно представленного варианта. Полную сборку я думаю разместим через денёк у Поспелова Геннадия, заменив предыдущую. [ATTACH]1185175382.rar[/ATTACH]
__________________
По теории майский жук летать не может. Но он этого не знает. И летает... |
|||
![]() |
|
||||
- Регистрация: 31.07.2005
Ухта
Сообщений: 380
![]() |
Alan, работает, но есть некоторые пожелания хотя в целом все хорошо.
Еще немного подредактировал prokat.lsp добавил спец. швеллер и двутавр (монорельс)по ГОСТ 19425-74. Файлы подкорректированные целиком Выслал вам по почте, Alan. Доделаем и выложим. Еще нужно доделать Prcat3d.lsp ввести ГОСТ 19425-74 сделаю, сообщу. А и еще Спасибо Alanу и Кулику Алексею aka kpblc за _kpblc-linetype-load_.LSP файл все работает большое вам спасибо за проделанную работу!
__________________
Я не волшебник, я только учусь… |
|||
![]() |
|
||||
- Регистрация: 31.07.2005
Ухта
Сообщений: 380
![]() |
Вот и все! Вроде получилось. Выкладываю пока сюда тестируйте.
Добавил и в 3D ГОСТ 19425-74. Установка та же, макросы те же. Если кто не вьежает - можете задавать вопросы... Пользуйтесь на халяву! [ATTACH]1185312091.rar[/ATTACH] И не забывайте меня и Alana [sm206]
__________________
Я не волшебник, я только учусь… |
|||
![]() |
|
||||
webcad.pro Регистрация: 06.01.2005
Московская обл.
Сообщений: 501
|
Возомжно, то что я хочу сказать уже обсуждалось, я не читал всей ветки, но тем не менее.
Владимир, если уж вы решили отказаться от создания объектов с жестко заданными слоем и цветом (что конечно правильно), в отличии от первоначальной версии, то будте последовательны до конца - задавайте объектам блока цвет "поблоку". |
|||
![]() |
|
||||
- Регистрация: 31.07.2005
Ухта
Сообщений: 380
![]() |
Цитата:
__________________
Я не волшебник, я только учусь… |
|||
![]() |
|
||||
- Регистрация: 31.07.2005
Ухта
Сообщений: 380
![]() |
Надо по слою, проектировщик выбирает слой потом прокат иначе он будет по умолчанию белый или черный в зависимости на каком ты фоне чертишь. А так как хочешь любой слой можешь свой по умолчанию подобрать... Попробуй,AY!
__________________
Я не волшебник, я только учусь… |
|||
![]() |
|
||||
- Регистрация: 24.07.2005
Москва
Сообщений: 1,458
|
Цитата:
Цитата:
хотя то что это отсутствует - разве кого-то напрягает программа ведь в открытом коде. |
|||
![]() |
|
||||
webcad.pro Регистрация: 06.01.2005
Московская обл.
Сообщений: 501
|
Цвет "По слою" - должна иметь вставка блока ("INSERT"), а примитивы из описания блока должны иметь цвет "по блоку".
Это более универсальный подход имеющий своим недостатком (для "неопытных" пользователей) только то, что когда блоки "вырывают" командой _explode результат будет на слое "0" и с цветом "ByBlock". Поэтому если такое положение не желательно следует для разчленения блоков использовать либо _Xplode либо _Burst из экспрессов. Впрочем, наверное, вам это и без меня известно. |
|||
![]() |
|
||||
webcad.pro Регистрация: 06.01.2005
Московская обл.
Сообщений: 501
|
>Владимир М
То о чем я говорю вовсе не "мои настройки", а универсальный подход к такого рода вещам диктуемый здравым смыслом и возможностями Autocad. Нутро блока с цветом "ByLayer" и есть настройка под себя не многим лучше того, что было раньше и от чего хотели уйти - как мне кажется. Что касается "сами делайте" - я-то сделаю и делал уже раньше, попросту раз уж вы взяли на себя труд поддерживать программу, тем более развивать, то, по моему, следует заложить в нее наиболее универсальные принципы, что-бы при каждом обновлении не приходилось ее кому-то менять "под себя". |
|||
![]() |
|
||||
- Регистрация: 31.07.2005
Ухта
Сообщений: 380
![]() |
AY, так если по блоку цвет надо задавать в программе а цвет должен быть по слою. Иначе по блоку один на всех будет цвет, а другим пользователям не понравиться. У Каждого пользователя цвет свой. Тогда надо LISP программу по настройкам разрабатывать, а я думаю нет такой необходимости.
__________________
Я не волшебник, я только учусь… |
|||
![]() |
|
||||
CAD Регистрация: 28.08.2003
Киев
Сообщений: 1,834
![]() |
Цитата:
Пишите, постараемся учесть и в ближайший уикенд подделать. :shock: Это, если будет дождь. Ну а если не будет, поедем кататься на вело и т.д. и т.п. ![]()
__________________
По теории майский жук летать не может. Но он этого не знает. И летает... |
|||
![]() |
|
||||
Машиностроение, Проектирование Регистрация: 15.09.2003
Москва
Сообщений: 1,112
![]() |
Цитата:
![]() |
|||
![]() |
|
||||
Moderator
LISP, C# (ACAD 200[9,12,13,14]) Регистрация: 25.08.2003
С.-Петербург
Сообщений: 38,697
|
"Ну, Федот, теперь держись..." (с) Филатов. Сами напросились
![]() 1. Перевести хранение данных по прокатам в ini-образные файлы для спокойного ручного исправления и дополнения прокатов. Примерно так: Код:
Код:
2. Сделать отдельное окно настроек: - рисовать профили отрезками или полилиниями - рисовать или нет оси - изменение точки привязки для блоков (например, для сечения двутавра вариант: левая нижняя / нижняя середина / правая нижняя ну и так далее) - наименование и настройки слоя для осей - наименование и настройки слоя для помещения профилей с возможностью использовать текущий. - сохранять или нет последний выбор. Данные хранить в отдельном ini-файле или реестре. 3. Отказаться от глобального переопределения обработчика ошибок (вроде где-то было). 4. Отказаться от глобальных переменных, кроме данных о наименовании и выборе последнего профиля. --- Лично у меня баальшие проблемы с dcl, так что с обычными кодами еще могу помочь, но вот с окном... Оно меня убивает.
__________________
|
|||
![]() |
|
||||
Может об этом уже писали, но, на мой взгляд, есть некая недосказанность в описании установки.
Описание установки из Read-me.txt Цитата:
Код:
Если все скопировано в папку Support Автокада, то все будет работать, т.к. она уже прописана в путях поиска. Если мы создаем свою папку, то в путях поиска нужно указывать путь на один уровень выше. Например Прописанный путь d:\MyLisp\ А файлы лежат по этому пути d:\MyLisp\Prokat Короче я думаю, что оптимальным будет вариант замены кода поиска Код:
[ATTACH]1185449480.rar[/ATTACH] |
||||
![]() |
|
||||
CAD Регистрация: 28.08.2003
Киев
Сообщений: 1,834
![]() |
Цитата:
Мне самому невнятна фраза в Read-me.txt, хоть я её и писал. А м.б. сделаем проще всего? Бог мне свидетель, я это предлагал давно уже и Владимиру М и PG Помещаем тексты в любую папку, например, d:\MyLisp\ . Именно эту папку и прописываем в "Путях доступа к вспомогательным файлам" Автокада. Собственно я у себя так и делаю, т.к. параллельно делаю несколько вариантов Проката. ![]() Тогда вариант вызова упрощается до безобразия: Код:
__________________
По теории майский жук летать не может. Но он этого не знает. И летает... |
|||
![]() |
|
||||
CAD Регистрация: 28.08.2003
Киев
Сообщений: 1,834
![]() |
Цитата:
![]() Будет пример начинающим и продвинутым программистам, как организовывать за один вызов много решений. Или вызов п/программы с переменным количеством параметров. (ЯТД) Но! Давайте оставим в тексте Прокат как есть, так как большинство всё равно откомпилирует текст и тогда все LOAD просто не нужны.
__________________
По теории майский жук летать не может. Но он этого не знает. И летает... |
|||
![]() |
|
||||
CAD Регистрация: 28.08.2003
Киев
Сообщений: 1,834
![]() |
Цитата:
Я считаю квалификацию большинства посетителей данного форума достаточно высокой, чтобы сделать такую нехитрую операцию. Вы же смогли её сделать. ![]()
__________________
По теории майский жук летать не может. Но он этого не знает. И летает... |
|||
![]() |
|
||||
Машиностроение, Проектирование Регистрация: 15.09.2003
Москва
Сообщений: 1,112
![]() |
Чем меньше "юэверь" имеет возможность залезть в прогу - тем лучше. А то потом такие вопли начнуться, что -то не работает.
|
|||
![]() |
|
||||
Армспорт Регистрация: 18.07.2006
Ейск
Сообщений: 355
|
->Alan А я и не спорю про квалификацию, просто я предлагал это сделать ещё в 149 посте, но понял так, что это никому не нужно, вот и
![]() ![]() ![]() ![]() Программа растёт, но не развивается... (Возможно это и правильно - у программы должен быть конкретный автор, а то она просто развалится, если все её будут править под себя.) |
|||
![]() |
|
||||
CAD Регистрация: 28.08.2003
Киев
Сообщений: 1,834
![]() |
>All
Любимое выражение всех программистов: "Программа практически готова!" ![]() Кое что изменил, учел некоторые мнения некоторых коллег (Кулик Алексей aka kpblc, AY, VVA и др.). По принципу: "Мы тут посовещались и я решил!" ![]() Исправил в текстах, что уж очень бросалось в глаза. Но есть у всех программистов еще один закон: "Контрольный пример всегда идёт!" Выкладываю тексты (читай Read-Me.txt) Требуются тестировщики. ![]() Вот брёвнышко. Поработайте товарисчи! [ATTACH]1185964807.rar[/ATTACH] P.S. Изменения внесены пока только в 2D. Осталась неясность с толщиной/цветом пунктирной линии. Перевел в тот же слой/цвет. Владимир М тоже смотрит. Жду предложений. Как только придут результаты от тестеров, внесу в Prcat3d.lsp
__________________
По теории майский жук летать не может. Но он этого не знает. И летает... |
|||
![]() |
|
||||
- Регистрация: 31.07.2005
Ухта
Сообщений: 380
![]() |
И еще незабудьте поменять макросы:
изменены файл поиска загрузки файла ALANом (if (= PROKAT nil) ( Load (findfile "prokat.lsp"))) PROKAT (if (= PRKT3D nil) ( Load (findfile "prcat3d.lsp"))) PRKT3D Тестил команду PROKAT все работает Вот только зря поменял цвет пунктирной линии красная ведь - есть хорошо - многие люди выводят на печать используя настройки цвета Одно это меня сильно раздражает Может добавить выбор цвета невидимой линии, как для выбора слоя?
__________________
Я не волшебник, я только учусь… |
|||
![]() |
|
||||
работник по монтажу, то посижу, то полежу!!! Регистрация: 24.01.2007
г.Владимир
Сообщений: 347
![]() |
Вроде все работает.
Кстати согласен с Владимир М. насчет выбора цвета в диалоговом окне. Хотя после этого захочется и чтоб был выбор типа линий.
__________________
Положительные эмоции - это эмоции, которые возникают, если на все положить!!! |
|||
![]() |
|
||||
CAD Регистрация: 28.08.2003
Киев
Сообщений: 1,834
![]() |
Цитата:
"И что-нибудь еще и что-нибудь иное, о чём ни говорят, чему не учат в школе!" ![]()
__________________
По теории майский жук летать не может. Но он этого не знает. И летает... |
|||
![]() |
|
||||
CAD Регистрация: 28.08.2003
Киев
Сообщений: 1,834
![]() |
Цитата:
![]() Задание начальных установок: слои, стили и т.д. и т.п., не входят в прикладную программу вставки блока проката. ЯТД Давайте сделаем слой PUNKTIR, предположим красного цвета?
__________________
По теории майский жук летать не может. Но он этого не знает. И летает... |
|||
![]() |
|
||||
Moderator
LISP, C# (ACAD 200[9,12,13,14]) Регистрация: 25.08.2003
С.-Петербург
Сообщений: 38,697
|
Ага, а потом появится еще один товарищ, которому слово "PUNKTIR" как кость в горле. Или тип линии ему нужен для осей не center, а my_cool_linetype_for_axes. И что, по новой все перелопачивать?
__________________
|
|||
![]() |
|
||||
работник по монтажу, то посижу, то полежу!!! Регистрация: 24.01.2007
г.Владимир
Сообщений: 347
![]() |
И снова просьба.
Я уже обращался и к Alanу и к Алексею, и сам Алексей об этом упоминал в посте № 211, с просьбой о том, чтобы профили рисовались полилиниями, и не отдельными сегментами, а чтобы полилиния была замкнута. И если можно, то сделать вариант, в котором отказатся от блоков (раскатал губенки-то!!!!!!)
__________________
Положительные эмоции - это эмоции, которые возникают, если на все положить!!! |
|||
![]() |
|
||||
Moderator
LISP, C# (ACAD 200[9,12,13,14]) Регистрация: 25.08.2003
С.-Петербург
Сообщений: 38,697
|
Так я делал, но проблемы с dcl и полилиниями (вот уж чего-чего, а этого не ожидал совершенно!) нарисовались "не сотрешь"
![]()
__________________
|
|||
![]() |
|
||||
CAD Регистрация: 28.08.2003
Киев
Сообщений: 1,834
![]() |
Цитата:
Появляется новый слой в блоке, где все сделано в слое "0" и вставляется в выбранный слой. Правильно ли это? Хотелось бы услышать мнение ShaggyDoc'a и др.коллег (список прилагается ![]() ИМХО В принципе, в билиотеках прикладных блоков (по специальностям) я так делаю. >kpblc Что касается того товарисча со слоем my_cool_linetype_for_axes. Нормально, у него такой СТП! Тексты открытые, красный флаг в руки...
__________________
По теории майский жук летать не может. Но он этого не знает. И летает... |
|||
![]() |
|
||||
Машиностроение, Проектирование Регистрация: 15.09.2003
Москва
Сообщений: 1,112
![]() |
Может я не в списке
![]() Чем можно оправдать необходимость создания отдельного слоя для осей (например)? Только типа все осевые в своих слоях, а смысл? зато при необходимости отключить слой "проката" придется отключать еще какие то слои. |
|||
![]() |
|
||||
CAD Регистрация: 28.08.2003
Киев
Сообщений: 1,834
![]() |
Цитата:
Сам потихоньку замени _LINE на _PLINE. В письме, на которое Вы мне кажется не ответили, :wink: я вроде подробно всё описал.
__________________
По теории майский жук летать не может. Но он этого не знает. И летает... |
|||
![]() |
|
||||
CAD Регистрация: 28.08.2003
Киев
Сообщений: 1,834
![]() |
Цитата:
Цитата:
![]()
__________________
По теории майский жук летать не может. Но он этого не знает. И летает... |
|||
![]() |
|
||||
работник по монтажу, то посижу, то полежу!!! Регистрация: 24.01.2007
г.Владимир
Сообщений: 347
![]() |
Цитата:
Цитата:
__________________
Положительные эмоции - это эмоции, которые возникают, если на все положить!!! |
|||
![]() |
|
||||
>Alan В сборке с поста №223 отсутствует procat.slb. Пол обеда потратил, пока разобрался, почему вылетает
> ALL По поводу полилинией в 2d. Чобы не разбираться в отрисовке, внес изменения в файл prokat.lsp в ф-цию clip_bl, которая отрисованный набор запихивает в блок. Перед этим этот набор peditm'ом преобразовываю в полилинию. Соответствующие ф-ции добавлены Сделал 2 варианта prokat.lsp - вставка блоком prokat1.lsp - вставка с последующим расчлененим Отличия в двух файлах в ф-ции clip_bl в 2-х строчках (command "._insert" edat3 pause 1 1 pause) ;_prokat.lsp и prokat1.lsp (command "_explode" (entlast)) ;_ prokat1.lsp *** Обновлен архив [ATTACH]1185964295.rar[/ATTACH] |
||||
![]() |