[Disney]

Описание (в скобках приведены выдержки из пояснений к условным знакам из "Условные знаки для топографических планов масштабов 1:500; 1:1000; 1:2000; 1:5000")

1. Шаг штриховки. Устанавливает расстояние между штрихами по бровки откоса (1, при большой протяжённости 1.5, 2, 3)
2. Не доводить до подошвы. Устанавливает расстояние на которое не доводятся длинные штрих до подошвы, чтобы они не сливались с подошвой.
3. Длина короткого штриха. Устанавливает величину короткого штриха (2 - 1:500,1:1000. 1.5 - 1:2000,1:5000. 1\3 (33%) от длинного при ширине откоса более 3 см на плане)
4. Объединить объекты. Можно объединить созданные штрихи в группу или в блок.
5. Тип.
   - Обычный
   - Проектный
   - Добычный
   - Укреплённый
   [] Прореживать 5 (или 7 для добычного) штрихов строится, следующих 7 (или 10 для добычного) пропускаются, и так далее
6. Слой. Можно выбрать слой для откоса, из списка существующих или создать новый. Так же можно задать цвет, в случаи нового слоя, цвеи будет назначен слою, в случаи выбора существующего слоя, цвет будет назначен непосредственно объектам откоса.
7. Редактирование. После выбора бровки и подошвы, будут построены временные сплошные штрихи, методом равномерного распределения их положения по бровке и подошве, после чего будет предложено отредактировать их положение. Если войти в режим редактирования, будет предложено сначала выбрать диапазон(сектор) редактирования штрихов, потом выбрать основной редактируемый штрих в этом диапазоне и указать его новое положение. После выхода из режима редактирования, штрихи примут заданный им вид, согласно выбранному типу.
8. Сохранение. все введённые\выбранные данные в диалоге, будут сохранены, даже между сеансами AutoCAD

Пример использования программы

Geo_Otkos

http://www.youtube.com/watch?v=hOn3uy0N5jAКак загрузить VLX, и повесить программу на кнопку

Нажмите для просмотра

http://www.youtube.com/watch?v=9v2x_cH7Dl4Статья (как использовать Лисп)
Иконка на кнопку:
Макрос на кнопку: ^C^C^P(if (not c:Geo_Otkos)(load "Geo_Otkos_v3_3.VLX" ));^PGeo_Otkos;


Тестируйте…

Жду отзывов и предложения.

[vick175]

Спасибо большое!
Но мне он не подходит по двум причинам:
1.Шаг штрихов мне нужен 0.5 м (т.к. все съёмки в М 1:500),а меньше 1 выставить не получается;
2.Только один тип построения откоса(равномерное распределение),а нужен ещё перпендикуляр от бровки.
Извините,если отнимаю у кого-то время.

[Disney]

Сообщение от vick175 1.Шаг штрихов мне нужен 0.5 м (т.к. все съёмки в М 1:500),а меньше 1 выставить не получается;

Исправил, теперь можно и вещественное.

Сообщение от vick175 2.Только один тип построения откоса(равномерное распределение),а нужен ещё перпендикуляр от бровки.

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

[vick175]

GEO_OTCOS ; error: AutoCAD variable setting rejected: "CECOLOR" "BYLAYER \n\n"

[Disney]

Исправил...

[dextron3]

Укажите бровку:
Укажите подошву:Regenerating model.
Application ERROR: Invalid type sent as command input
Deleting layer "временный_для_откосов".
1 layer deleted.
Regenerating model.
Regenerating model.
55

[Disney]

dextron3, честно не знаю...
Включил эхо в ком строку, протестируй, и выложи более подробную ругань...

[dextron3]

Теперь заработало, примите замечания:

1. Не хотелось бы чтобы создавался новый слой, а рисовалось в текущем

2. Что то все расксы идут по направлению к центру, а хотелось чтобы были перпендикулярны бровке, как обычный котлован

[Disney]

1. Не хотелось бы чтобы создавался новый слой, а рисовалось в текущем

Почему? вам ненравиться его имя, или вы из тех, кто рисует всё в одном слое?

2. Что то все расксы идут по направлению к центру, а хотелось чтобы были перпендикулярны бровке, как обычный котлован

Я уже писал об этом в #3

А вообще наверно надо как в GeoniCS-е, такой же диалог сделать, чтоб всем угодить...

[dextron3]

У каждого геодезиста есть специальный слой в котором он чертит с самого рождения, предлогать другой слой это равносильно поменять веру человека...

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

[babkakoshka]

Сообщение от vick175 Спасибо большое! Но мне он не подходит по двум причинам: 1.Шаг штрихов мне нужен 0.5 м (т.к. все съёмки в М 1:500),а меньше 1 выставить не получается; 2.Только один тип построения откоса(равномерное распределение),а нужен ещё перпендикуляр от бровки. Извините,если отнимаю у кого-то время.

По-моему, шаг штрихов выставляется любой - даже 0,1. Я несколько минут тому назад случайно нашла эту прелесть (отрисовку добычных откосов ищу уже давно и даже г-на А.Косова лично просила в его программе KAI внести отрисовку добычных откосов). Спасибо автору большое. А перпендикуляр от бровки (если не очень много) можно наладить редактированием...Гораздо ужаснее была еще несколько лет тому назад вставка всего этого блоками...
Лень таки большой двигатель прогресса!!!
Мне хотелось бы еще, чтобы короткие штрихи и длинные отрисовывались в разных слоях.

[KAI]

Для нетерпеливых.
Вот ссылка на новую редакцию KAI-2001, в том числе: CLIFF с 2 короткими штрихами и перекодировка штриховок PAT [acad(iso).pat]:

http://geol-dh.ru/Zip_files/DISTRIB_..._30Jan2010.rar

К сожалению, пока у меня проблемы с провайдером (закачка по FTP), сайт geol-dh.ru будет вскоре обновлен.

[babkakoshka]

Большое спасибо!

[KAI]

К посту 12. Забыл предупредить.

В программе PAT (комплекс KAI-2001) при перекодировке в наиболее интересных режимах разрядить(сгустить) вдвое вы не всегда получите желаемый результат, это зависит от метода кодировки исходной штриховки.

Да и для откосов 4 типа, то есть с 2-мя короткими штрихами (программа CLIFF) в местах резкого перелома полилинии положение коротких штрихов следует редактировать вручную.

[Mika]

Я тоже парился пока не поставил себе GeoniCS

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

Offtop:

Сообщение от Mika Я тоже парился пока не поставил себе GeoniCS

Зато теперь "парятся" другие, вынужденные работать с твоими чертежами...

[АлексЮстасу]

В целом ну очень дельная программка! Легкая и прозрачная, без косяков. Правильный принцип - пропорционального распределения штрихов. Если бы он сочетался с разбиванием штриховки на фрагменты между экстремальными точками бровок-подошв - цены бы программе не было. Замечательно, что программка не привязана к атавизму - направлению вычерчивания линий бровок-подножий. Очень здорово, что встроена возможность редактирования штрихов с исскуйственной интеллектуевостью
Просьбы:
1. все-таки дать возможность пользователю задавать слой для штрихов - люди должны выдерживать внутренние стандарты, и обрекать их на доп. работу нежелательно.
2. сделать возможность не только 3Д, но и 2Д штрихов - даже без опции, исходя из типов бровок-подошв.
3. сделать управление редактированим штрихов не только русскими буквами, но чтобы работали и "Y", и "N", и "y", и "n".
4. сделать редактироване штрихов без подтверждения для каждого штриха - откосы бывают оч. большими, и слишком много действий получается, легко сбиться и т.п.
5. сделать выход после Esc без потери штриховки, если она уже нанесена - ну оч. обидно, особенно, если откос был здоровенным и сложным.
6. точки укрепленных откосов сделать не такими мелкими - чтобы точки читались и на экране, и на бумаге, им нужна длина не меньше 0.2 мм в масштабе.
7. штрихи не нужно доводить до подножий на 0.4 мм в масштабе - чтобы с ними не сливались точки подножий (обычно подножия отображаются точечной линией).
8. дать возможность штриховать и обрывы, т.е. без промежуточных коротких штрихов.
И оч. удобно было бы:
9. дать возможность войти в этот умный режим редактирования штрихов для уже отрисованного откоса.
10. дать возможность разом удалять штрихи между указанными бровками-подошвами.

Я рано радовался, что наконец-то "программка не привязана к атавизму - направлению вычерчивания линий бровок-подножий"?
Если зависит, то это явный недостаток.
И рано писал, что "без косяков"?
Т.к. при редактировании некоторых штрихов на замкнутых откосах (ямах-буграх) программа у меня зависает.

[Disney]

Полностью переработал программу (см 1 пост)

Сообщение от АлексЮстасу 1. все-таки дать возможность пользователю задавать слой для штрихов - люди должны выдерживать внутренние стандарты, и обрекать их на доп. работу нежелательно.

Дал

Сообщение от АлексЮстасу 2. сделать возможность не только 3Д, но и 2Д штрихов - даже без опции, исходя из типов бровок-подошв.

Если Бровка\Подошва плоские, то штрихи 3D ни как не станут, а вот если у вас Бровка\Подошва 3D, зачем вам откос 2D? тогда уж всё 2D, сплющите свои Бровки\Подошвы

Сообщение от АлексЮстасу 3. сделать управление редактированим штрихов не только русскими буквами, но чтобы работали и "Y", и "N", и "y", и "n".

Сделал

Сообщение от АлексЮстасу 4. сделать редактироване штрихов без подтверждения для каждого штриха - откосы бывают оч. большими, и слишком много действий получается, легко сбиться и т.п.

Сделал

Сообщение от АлексЮстасу 5. сделать выход после Esc без потери штриховки, если она уже нанесена - ну оч. обидно, особенно, если откос был здоровенным и сложным.

Ну вообще-то Esc подразумевает отмену, но так уж и быть сделал, при Esc просто завершение редактирования.

Сообщение от АлексЮстасу 6. точки укрепленных откосов сделать не такими мелкими - чтобы точки читались и на экране, и на бумаге, им нужна длина не меньше 0.2 мм в масштабе.

Точки сделал окружностями(кружочками)

Сообщение от АлексЮстасу 7. штрихи не нужно доводить до подножий на 0.4 мм в масштабе - чтобы с ними не сливались точки подножий (обычно подножия отображаются точечной линией).

Добавил такой параметр, величину устанавливай сам какую хочешь

Сообщение от АлексЮстасу 8. дать возможность штриховать и обрывы, т.е. без промежуточных коротких штрихов.

Добавил, называется "проектный"

Сообщение от АлексЮстасу 9. дать возможность войти в этот умный режим редактирования штрихов для уже отрисованного откоса.

Невозможно!

Сообщение от АлексЮстасу 10. дать возможность разом удалять штрихи между указанными бровками-подошвами.

_SelSimSel тебе в помощь.

Ну и все параметры сохраняются между сеансами AutoCAD

[АлексЮстасу]

Вот что нетерпение делает с людьми! А ведь до 09.12.2012 осталось всего полторы недели

Изучаю! Вроде бы пока отлично. Работает и на 2006, и на 2012.
На первых порах не въехал в новый способ редактирования штрихов, но потом поднатужился...

1. Почему-то исчез обычный топографический неукрепленный откос.
2. Может быть написать "Проектный/Обрыв"?
3. Мы у себя делали точки обозначения укрепленных откосов полилиниями в форме окружностей - чтобы выдерживать стандарт не использования окружностей.
4. пп. 10 и 11, т.е. возможность редактирования штрихов постфактум и удаление штрихов как-то осуществима? Типа: найти все элементы из указанного слоя типа Line и Circle между указанной бровкой и подножием. Далее - как в задаче...
Неплохо было бы задать возможность сразу образовывать из обозначений откосов группы. Чтобы сразу удобно было менять свойства, удалять и т.п.

Я бы все-таки ввел параметр масштаба - тогда все числовые параметры выставлялись бы исходя из него. См. вывод из "нюансов" из http://forum.dwg.ru/showpost.php?p=687103&postcount=14
И идея разделить откосы на секторы в процессе работы программы не прокатывает? См. первую часть из http://forum.dwg.ru/showpost.php?p=687103&postcount=14.


А так - просто пирдуха какой-то

[Disney]

Сообщение от АлексЮстасу 1. Почему-то исчез обычный топографический неукрепленный откос.

Ты видео смотрел? Убираешь выбор со всех предложенных типов и получаешь самый обычный откос.

Сообщение от АлексЮстасу 2. Может быть написать "Проектный/Обрыв"?

Слишком длинная надпись, поломает всё оформление окна диалога.

Сообщение от АлексЮстасу 4. пп. 10 и 11, т.е. возможность редактирования штрихов постфактум и удаление штрихов как-то осуществима? ...

Ты мои прошлые ответы читал?
Ни какой постфактум в принципе не возможен, или только за очень большие деньги
Для группового выбора, а потом последующего удаления\редактирования, есть отличный, замечательный, просто офигительный инструмент, SelSim, а особенно SelSimSel, за что огромнейшее спасибо, Александру Ривилису

Сообщение от АлексЮстасу Я бы все-таки ввел параметр масштаба - тогда все числовые параметры выставлялись бы исходя из него.

Ты же сам писал

Сообщение от АлексЮстасу "При больших площадях откосов целесообразно разрежать штриховку в 1.5-2 или 3 раза". Вот это уже неопределенность.

Я специально добавил кнопочку [?], в которой привёл пояснения к условному знаку откоса из книги "Условные знаки для топографических планов масштабов 1:500; 1:1000; 1:2000; 1:5000", чтоб неопытные топографы читали, и сами выбирали нужные им параметры. Всем не угодишь, и за всех не продумаешь, ведь есть те кто чертит всегда в М1:1 000, а вот уже оформляет для печати в нужном масштабе, скажем М 1:500 или 1:2 000 и это правильно!, а есть такие которые и чертят изначально в масштабах 1:500 или 1:5 000, и в этом случаи, казалось бы при равных масштабах, будут абсолютно разные значения параметров.

Сообщение от АлексЮстасу А так - просто пирдуха какой-то

Тут вообще не понятно, про кого или про что это ты? Да и слово "пирдуха" наверно обидное какое-то?

[АлексЮстасу]

Сообщение от Disney Ты видео смотрел? Убираешь выбор со всех предложенных типов и получаешь самый обычный откос. Слишком длинная надпись, поломает всё оформление окна диалога.Ты мои прошлые ответы читал? Ни какой постфактум в принципе не возможен, или только за очень большие деньги Для группового выбора, а потом последующего удаления\редактирования, есть отличный, замечательный, просто офигительный инструмент, SelSim, а особенно SelSimSel, за что огромнейшее спасибо, Александру Ривилису Ты же сам писал Я специально добавил кнопочку [?], в которой привёл пояснения к условному знаку откоса из книги "Условные знаки для топографических планов масштабов 1:500; 1:1000; 1:2000; 1:5000", чтоб неопытные топографы читали, и сами выбирали нужные им параметры. Всем не угодишь, и за всех не продумаешь, ведь есть те кто чертит всегда в М1:1 000, а вот уже оформляет для печати в нужном масштабе, скажем М 1:500 или 1:2 000 и это правильно!, а есть такие которые и чертят изначально в масштабах 1:500 или 1:5 000, и в этом случаи, казалось бы при равных масштабах, будут абсолютно разные значения параметров.Тут вообще не понятно, про кого или про что это ты? Да и слово "пирдуха" наверно обидное какое-то?

* историческая справка:
"Это пирдуха какой-то" - в широких общественных массах в период перестройки являлось, а у некоторых долгожителей и до сих пор является шуточным выражением восторга. Обидно почти только для двух человек - для изрекшей это Р.М.Горбачевой и ее супруга. Еще могло задевать представителей советской партхозноменклатуры и 5-го управления.
Просто у меня вчера от приятной неожиданности настроение резко поднялось!

1. Лучше все-таки делать явное определение параметров, т.е. явно определить, что вот обычный откос, а вот - проектный и т.п.
2. Создать сразу программно из построенных элементов группу ведь не проблемно? Так понимаю, что в программке FlashTalus так и делается. http://www.delicad.com/anglais/flashtalus.php
Указываешь любой штрих, и можно редактировать.
Т.е. редактирование откоса с готовой штриховкой можно разделить на три вида:
2.1. Редактировать положение, форму бровки-подножия.
2.2. Редактировать положение штрихов.
2.3. Редактировать тип штрихования. - как во FlashTalus, допустим.
Так понимаю, что 2.3. - гораздо проще реализовать.
Но как они смогли сделать редактирование бровки-подножия, что и штриховка меняется вместе с ними?

[VVA]

Вот более конкретное происхождения данного словосочетания

[АлексЮстасу]

Сообщение от VVA Вот более конкретное происхождения данного словосочетания

Мне мнится, что я сам слышал эту фразу в новостях из уст Р.М., когда чету Горбачевых интервьюировали на улице после театра. Почему-то мнится, что Малого.
Это не суть. Суть, что Disney написал и улучшил программу для откосов, единственную, в которой можно редактировать положение штрихов. Т.е. даже для сложных форм бровок-подножий без большого ручного труда получать качественно заштрихованные откосы.
Поэтому я так и "нападаю" именно на эту программу, что основа у нее правильная, и возможности самые большие.

[Disney]

Сообщение от АлексЮстасу Лучше все-таки делать явное определение параметров, т.е. явно определить, что вот обычный откос, а вот - проектный и т.п.

Да там изначально было 3 типа откоса, включая "Обычный", но когда добавил "Проектный", группа "Тип" стало не красиво больше соседней группы "Слой", вот и пришлось хитрить.

Сообщение от АлексЮстасу Создать сразу программно из построенных элементов группу ведь не проблемно?

Нет, не проблемно, но я в принципе не понимаю смысла "группы" в AutoCAD, тогда уж лучше в блок

Сообщение от АлексЮстасу 2.1. Редактировать положение, форму бровки-подножия. 2.2. Редактировать положение штрихов. 2.3. Редактировать тип штрихования.

Редактирование Бровки\Подошвы, вообще не понятно зачем? разве можно было её как-то изначально не правильно нарисовать, не по отснятым в поле точкам? или проектному положению? Да и их редактирование, отменит всё предыдущее ручное-полуавтоматическое редактирование штрихов, потому что количество и положение штрихов измениться, и их опять придётся тупо равномерно распределять по бровке\подошве.
А, тип штрихования, что тоже невозможно заранее определиться какой нужен, даже если захотел переделать, в 2-3 клика удаляем старый откос, и опять в 3-5 клика строим новый.

Сообщение от АлексЮстасу Но как они смогли сделать редактирование бровки-подножия, что и штриховка меняется вместе с ними?

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

Посмотрел я этот FlashTalus,

[АлексЮстасу]

Сообщение от Disney Да там изначально было 3 типа откоса, включая "Обычный", но когда добавил "Проектный", группа "Тип" стало не красиво больше соседней группы "Слой", вот и пришлось хитрить.

Все-таки обрывы и неукрепленные откосы даже у проектировщиков бывают
Может быть назвать программу: "Построение откосов, обрывов"? Добавить "Неукрепленный" и "Обрыв/Проектный"? По-моему, так окошко будет гораздо красивее!

Сообщение от Disney Нет, не проблемно, но я в принципе не понимаю смысла "группы" в AutoCAD, тогда уж лучше в блок

Группы в Автокаде сделаны, прямо скажем, не слишком. Тем не менее, это просто больше возможностей с меньшими усилиями пользователя. Да, блок, да еще и динамический - вот была бы красота! Я ведь пытался даже начать такой ваять - честно. Но группы позволяют менять положение отдельных элементов, а обычные блоки - нет. Можно ведь добавить галочку: объединять или не объединять в группы.

Сообщение от Disney Редактирование Бровки\Подошвы, вообще не понятно зачем? разве можно было её как-то изначально не правильно нарисовать, не по отснятым в поле точкам? или проектному положению? Да и их редактирование, отменит всё предыдущее ручное-полуавтоматическое редактирование штрихов, потому что количество и положение штрихов измениться, и их опять придётся тупо равномерно распределять по бровке\подошве.

Полно неправильно нарисованных откосов, их бровок и подножий. Метод наземной съемки не единственный и не самый используемый. И далеко не всегда при вычерчивании все по полевым данным ясно. Существенно же больше откосов чертится по данным дистанционного зондирования, где все много неоднозначнее.
Но дело не в этом. Если бы была возможность сделать такое редактирование бровок-подножий, то это было бы очень удобно. В принципе, ведь это задача из того же разряда, что и редактирование штрихов.

Сообщение от Disney А, тип штрихования, что тоже невозможно заранее определиться какой нужен, даже если захотел переделать, в 2-3 клика удаляем старый откос, и опять в 3-5 клика строим новый.

Неправильно интерпретированных типов откосов, конечно, меньше чем неправильно начерченных. Хотя, неграмотность в нашей сфере очень велика. Да и чаще всего неправильности выясняются в самый неподходящий момент, и тут скорость имеет значение.
Я понимаю, что в большинстве случаев после наземной съемки откосов и бывает всего парочка или пяток. А если делается карьерище? Или целый ГОК? Там в 2-3 клика нужный откос не вычленишь даже с помощью SelSimSel.

Сообщение от Disney Повесили реактор на штриховку откоса, который следит за изменением бровки\подошвы, и в случаи их изменения по новой перестраивает все штрихи.

А что это за "реактор" такой? Чем грозит его присутствие? Кроме удобства?
Вообще-то такое установление зависимости между разными элементами много где могло бы пригодиться. Первое, что в голову пришло - так можно было бы вычерчивать, а потом редактировать ЛЭП со всеми блоками столбов и стрелок. Блоки отметок или подписи высот привязывать к тем же откосам-обрывам. Или урезы привязывать к береговым линиям и т.д., и т.п.

Еще штрих: при UNDO сначала появляется промежуточный вариант штрихования одними длинными отрезками, потом прыганье по экрану как просматривалась штриховка. Может быть сделать UNDO сразу к состоянию до вызова GEO_OTKOS?

[Disney]

Обновил версия 3.0:

1. Группировка на выбор: либо в Блок, либо в Группу, либо оставить как есть
2. При выборе типа, отображается пример прямо в диалоге, так же с учётом выбранного цвета.
3. Отмена(UNDO) теперь отменяет действия всей программы разом.

[kacugu]

Кажется забыли приложить файл

[Disney]

Сообщение от kacugu Кажется забыли приложить файл

Вроде всё прикладывал, картинка диалога то отображалась, а она во вложении, а вложения нет
Переприложил ещё раз

[kacugu]

Всё появилось. Спасибо

[АлексЮстасу]

Что-то ни группы, ни блоки не создаются. В 2006 название группы есть, а самой группы вроде бы нет.

Пардон. Иногда блоки создаются. Но не всегда. Закономерности пока не вижу.

И еще. Что если для полилиний с высотами или 3Д полилиний поставить защиту от дурака - самой программе определять где верх, где низ? Я, вот, уже попался
Например, подсчитать суммы Z указанных линий или по уровням (высотам) полилиний.

[Disney]

Сообщение от АлексЮстасу Что-то ни группы, ни блоки не создаются. В 2006 название группы есть, а самой группы вроде бы нет. Пардон. Иногда блоки создаются. Но не всегда. Закономерности пока не вижу.

Ни знаю, как можно работать аж в 2006 AutoCAD?
Проверял на 2008, всё создаётся. Если группа или блок не создались, должно в ком строке появиться какое-нибудь ругательство(скопируй сюда пожалуйста), или хотя бы пример выложи где блок есть, а откоса в нём нет.

[АлексЮстасу]

Сообщение от Disney Ни знаю, как можно работать аж в 2006 AutoCAD? Проверял на 2008, всё создаётся. Если группа или блок не создались, должно в ком строке появиться какое-нибудь ругательство(скопируй сюда пожалуйста), или хотя бы пример выложи где блок есть, а откоса в нём нет.

Первая моя фраза и про 2012.
И это группа в 2006 создалась, а элементов в ней нет.
Блоки же, если создаются, то нормально.
Просто не всегда создаются и блоки, и группы. И понять, после чего создаются, а после чего нет - не получается.
Никакой ругани в комстроке вообще нет.

[Disney]

Сообщение от АлексЮстасу Просто не всегда создаются и блоки, и группы.

Ну не знаю, покажи(выложи) пример
Сколько не проверял всё хорошо создаётся

[АлексЮстасу]

Сообщение от Disney Ну не знаю, покажи(выложи) пример Сколько не проверял всё хорошо создаётся

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

[Disney]

Сообщение от АлексЮстасу Похоже, что дело в форме бровок-подножий.

Дело было в том, что подошва касалась бровки, и в этом мести штрих имел нулевую длину, соответственно я его удалял из чертежа, а из списка штрихов нет(ну раньше это и не нужно было), а потом пытался не существующий штрих, засунуть в Блок или Группу, на что AutoCAD всё таки ругался:
; ошибка: неверный тип аргумента: VLA-OBJECT nil
или
; ошибка: lisp-значение не может быть приведено к данному типу ВАРИАНТА: nil

Исправил, качай версию 3.1, и спасибо за тщательное тестирование.

[АлексЮстасу]

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

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

И насчет "защиты от дурака" - не позволять штриховать не в ту сторону, реально?
По-простому - либо предупреждать, что перепутали бровку с подножием, либо просто строить всегда в нужном направлении. Предупреждать, наверное, корректнее, особенно для полилиний с заданными уровнями - вдруг перепутали?

Покруче - анализировать высоты поворотных точек бровки и соответствующих точек подножия, и в случае изменения направления уклона выдавать SOS.

[Disney]

Сообщение от АлексЮстасу 1. О блоках: когда их разбиваешь, то штриховка оказывается в 0 слое, цвет по блоку, вес линий по блоку. Наверное, логичнее было бы вес задавать по слою, а цвет и слой тот, который задан для штриховки. По умолчанию - цвет по слою.

Да, и это правильно, так и должно быть и я это специально делаю. За редким исключением, объекты внутри блока могут не лежать на 0 слое и иметь прочие параметры не "По блоку", а то потом, начинаешь блоку какие-нибудь свойства применять, или слой его отключать, а он ни как не реагирует, и в данном случаи, я не думаю, что стоит делать исключение. Зачем тогда создавать блок, чтоб его потом разбить?

Сообщение от АлексЮстасу 2. О редактировании штрихов: на замкнутых формах при выборе редактируемого участка со штрихами, программа как бы не может перешагнуть точку начала-конца замкнутой линиии подножия. Т.е. всегда выбирает штрихи в диапазоне вне этой точки

Да, есть такое ограничение, и теоретически можно его обойти, но как я иногда люблю цитировать Елпанова Евгения, немного перефразировав "Это уже выходит за рамки бесплатного энтузиазма".

Сообщение от АлексЮстасу И насчет "защиты от дурака"

Это уже лишнее, от всех "дураков" не защитишься.
А если "дурак" шаг задаст в 10 раз больше требуемого? Или "дурак" длину кроткого введёт в метрах, а галочку поставит в процентах? Или "дурак" при редактирование уже нормального откоса, завернёт нафиг все штрихи не в ту сторону? ...?

[АлексЮстасу]

Сообщение от Disney Да, и это правильно, так и должно быть и я это специально делаю. За редким исключением, объекты внутри блока могут не лежать на 0 слое и иметь прочие параметры не "По блоку", а то потом, начинаешь блоку какие-нибудь свойства применять, или слой его отключать, а он ни как не реагирует, и в данном случаи, я не думаю, что стоит делать исключение. Зачем тогда создавать блок, чтоб его потом разбить?

Подобные блоки придется разбивать, чтобы что-то подправлять вручную.

Сообщение от Disney Да, есть такое ограничение, и теоретически можно его обойти, но как я иногда люблю цитировать Елпанова Евгения, немного перефразировав "Это уже выходит за рамки бесплатного энтузиазма".

Замечу только, что, во-первых, пользователь не сразу сообразит, в чем подстава в принципе, во-вторых, ему не видно, где эта точка начала/конца.

Сообщение от Disney Это уже лишнее, от всех "дураков" не защитишься. А если "дурак" шаг задаст в 10 раз больше требуемого? Или "дурак" длину кроткого введёт в метрах, а галочку поставит в процентах? Или "дурак" при редактирование уже нормального откоса, завернёт нафиг все штрихи не в ту сторону? ...?

"Дурак" - это совсем не только дурак. Это последствия необходимой скорости, сложности разобраться где бровка, где подножие и т.п. А информация о том, где бровка, а где подножие в полилиниях с уровнем или в 3Д полилиниях же есть.

[АлексЮстасу]

Пробовал опять воспользоваться этой программой:
Если замкнутый откос (бугор, котлован, террикон и т.п.), то очень мешает то, что в общем случае неизвестно, где находится точка начала штрихования.
1. Можно ли эту точку начала штрихования как-то временно обозначить? Каким-нибудь кружком или т.п., который пропадал бы после завершения редактирования штрихов?
2. Точка начала штрихования почему-то не совпадает в общем случае с точкой начала-конца указанной бровки. Почему так? (Начало-конец линии бровки - окружность маджента, начало штрихования - зеленая окружность).
3. Поскольку эта точка начала штрихования критична для редактирования, то было бы правильно ближайшие к ней штрихи сделать перпендикулярными бровке. Точнее - близкими к биссектрисе в этой вершине. Иначе эти штрихи заметно портят всю картину.

Рабочая гипотеза: если сразу в вершинах бровки построить ближайшие к ним штрихи по биссектрисам, а штрихи между вершинами построить пропорционально, то получится штриховка, очень близкая к искомой.

[Disney]

Сообщение от АлексЮстасу Точка начала штрихования почему-то не совпадает в общем случае с точкой начала-конца указанной бровки. Почему так?

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

Сообщение от АлексЮстасу Рабочая гипотеза: если сразу в вершинах бровки построить ближайшие к ним штрихи по биссектрисам, а штрихи между вершинами построить пропорционально, то получится штриховка, очень близкая к искомой.

Не совсем понятно, нарисуй пример, а я опровергну

[АлексЮстасу]

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

Тогда хорошо бы эту начальную точку или этот начальный штрих временно в режиме редактирования выделить, обозначить, чтобы пользователь не тратил время на вычисления этой точки.
На картинке начальная точка штрихования - окружность маджента. Она же начало-конец подножия. Зеленая окружность - начало-конец бровки. Зеленая линия - начальная линия штриховки. Не перпендикулярна ни бровке, ни подножию почему-то.
И все-таки первые штрихи хотя бы сделать перпендикулярно бровке или вдоль биссектрисы из начальной точки бровки.

Начертил пример, который сразу дал злостные пересечения биссектрис, когда углы поворота полилинии < 180 градусов.
Биссектрисы - красные и желтые, чертил на глаз. Желтые - пересекающиеся до подножия
И таких пересечений штрихов будет явно больше, чем при чисто пропорциональном методе.

Отсюда возможные модификации исходной гипотезы:
1-й вариант. Строить сначала пропорциональным методом штрихи от вершин бровки. Потом остальные штрихи пропорциональным методом между этими. (А это не тот же черт, что и сразу пропорциональным методом? ).
2-й вариант. Строить штрихи вдоль ближайших биссектрис от вершин бровки. Если биссектрисы пересекаются до подножия (в площади откоса), то такие биссектрисы выбрасывать. И между оставшимися штрихами строить остальные штрихи пропорциональным методом.
Возможно, что при 2-м варианте, если удалить все желтые (пересекающиеся) биссектрисы, то откос получится практически правильным, и требующим минимального редактирования.

[alexgeomark]

Уважаемый Disney.
Долгое время использую вашу программу. Очень нравиться.
А можно ли добавить в программу отрисовку откосов горных типов? Имею в виду чтоб оставался пустой промежуток между штрихами и штрихи были только парными, т.е. Длинный-короткий-длинный-короткий-длинный-промежуток и т.д.
И также для добычного откоса.
Очень нужная вещь при черчении маркшейдерских планов уступов.

[АлексЮстасу]

Так вроде бы это все есть - см. первый пост? Может быть у Вас старая версия, а не та, которая там приложена?

[Disney]

Сообщение от alexgeomark А можно ли добавить в программу отрисовку откосов горных типов? Имею в виду чтоб оставался пустой промежуток между штрихами и штрихи были только парными, т.е. Длинный-короткий-длинный-короткий-длинный-промежуток и т.д.

Не понятно, нарисуй пример.

[alexgeomark]

Я имел ввиду так:

[АлексЮстасу]

Вы хоть размеры промежутков скажите - иначе как программировать?

Это такой упрощенный (для ручного черчения) способ оформления откосов?
Что значит "горных типов"? Какой-то ГОСТ? Промежутки обязательны или на усмотрение или как красота и мера подскажут?
У проектировщиков я нечто похожее раньше видел.

[alexgeomark]

Извините что сразу не указал.
Да, это упрощенный способ оформления откосов. Изначально основывался на ГОСТ 2.855-75 (Условные обозначения горных выработок. Раздел 3). Но сейчас их обозначают парами.
Если возможно, расстояние промежутка задавать пользователем, как в программе задаются расстояния между штрихами (в разных масштабах маркшейдерских планах откосы должны выглядеть по разному). Так они на планах будут выглядеть нагляднее.
Заранее благодарен!

[gomer]

Offtop: Disney, а что за музычка у тебя в подгонометрии?

[Disney]

Сообщение от alexgeomark А можно ли добавить в программу отрисовку откосов горных типов?

Добавил, версия 3.3 качай в первом посте

Сообщение от gomer Offtop: Disney, а что за музычка у тебя в подгонометрии?

Ernesto Cortazar — Autumn Rose

[alexgeomark]

Огромное спасибо!!!!!
Очень выручили!!!!!!!!!!!!!

[aeffim]

Объясните чайку какой командой запускать и как прикрутить иконку на панель для запуска?

[Disney]

Сообщение от aeffim Объясните чайку какой командой запускать и как прикрутить иконку на панель для запуска?

в первом посте под надписью "Как загрузить VLX, и повесить программу на кнопку", есть видео отвечающее на этот вопрос.

[aeffim]

Выхожу с рабочего места, доступ на ютуб закрыт ((

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

http://dwg.ru/pub/9 - только вместо lsp грузить vlx

[Сергей160484]

Здравствуйте!!! А можно ли сделать так, чтоб задавать толщины короткого и длинного штрихов???

[ceiba]

Очень здорово, спасибо большое!
Один вопрос - можно, чтоб программа строила полилинии, а не отрезки? Понятно, что можно потом всё выбрать и преобразовать, но было бы отлично иметь полилинии сразу.

[Disney]

Сообщение от ceiba Один вопрос - можно, чтоб программа строила полилинии, а не отрезки?

Не можно,
Программа строит 3D откос, а как известно полилиния -двухмерная, конечно есть и 3D полииния, но речь ведь именно об Lwpolyline.
Я сам очень не люблю "отрезки", особенно когда получаю чертежи от проектировщиков, где всё нарисовано отрезками , но в данном случаи это как раз уместное их использование.

[Disney]

Сообщение от Петров Евгений Спасибо.Получается отличный 3D откос. Но за ним видны горизонтали. Кто-нибудь знает как их можно скрыть. В программе AlxdDike эта проблема решается с помощью маски, но она рисует только плоский откос. И еще приходится структурные линии взрывать, в общем делать много лишних действий.

Вот именно, что откос 3D, значит нужна 3D маскировка, чтоб перекрыть 3D горизонтали, по-моему в таком случаи спрятать не получится, гораздо проще удалить связи между точек поверхности в месте откоса, и горизонтали сами пропадут. Так же не понятно зачем взрывать структурные линии? Я сам в Civil 3D не работаю, но для ребят делал(начиная с версии 3.2), чтоб в качестве бровка\подошва понимал и "структурные" и "фигуры"

[Петров Евгений]

В AlxdDike откос рисуется между полилиниями. Поэтому приходится копировать отдельно, а потом взрывать структурные линии. Строить откос, делать маску и переносить это на чертеж. это давольно-таки много времени отнимает. Хотелось-бы сразу на чертеже все строить в 3D. А если я удалю связи между точками поверхности в месте откоса, то и поверхности там не будет. А как быть если уклон откоса меняется и изыскатели берут точку перелома, а в 3D модели это никак не отобразится? И как тогда строить поперечники?

[adu]

Уважаемый Disney. На мой взгляд, не мешало бы снять подавление хвостовых нулей в полях ввода значений. Это мешает задавать длины отрезков если используются целые числа, а не дробные. Заранее благодарю

[autocader]

Disney, подскажите что может быть: при попытке построить очередной откос ничего не происходит, а в командной строке пишет "ошибка: ActiveX Server возвратил ошибку: Несовпадение типов" ?

[Disney]

Сообщение от autocader Disney, подскажите что может быть: при попытке построить очередной откос ничего не происходит, а в командной строке пишет "ошибка: ActiveX Server возвратил ошибку: Несовпадение типов" ?

Представления не имею.
Выложи файл в котором это происходит, ну и версию AutoCAD озвучь.

[autocader]

Сообщение от Disney Представления не имею. Выложи файл в котором это происходит, ну и версию AutoCAD озвучь.

в чем проблема была я так и не понял, но помогло отрисовывание контура по новой...

[gomer]

Сообщение от Disney Сообщение от autocader Disney, подскажите что может быть: при попытке построить очередной откос ничего не происходит, а в командной строке пишет "ошибка: ActiveX Server возвратил ошибку: Несовпадение типов" ? Представления не имею.

Скорей всего ткнул не туда или недоткнул и передал в х-функцию nil. вот и получил ошибку. по идее программа должна обрабатывать такие вещи...

[Disney]

Сообщение от gomer Скорей всего ткнул не туда или недоткнул и передал в х-функцию nil. вот и получил ошибку. по идее программа должна обрабатывать такие вещи...

звучит как упрёк в мой адрес
В этой программе выбор объектов происходит через функцию

Код:

[Выделить все]

 (defun geo_vibor
		   (zap tip sloy exit_ / flag name ru)
    (setq Flag t
	  ru   (= (getvar "SysCodePage") "ANSI_1251")
    ) ;_ _end_ofsetq
    (setvar "ERRNO" 0)
    (while Flag
      (setq name
	     (car (entsel zap))
      ) ;_ _end_ofsetq
      (cond				;
	((and (= (getvar "ERRNO") 52) exit_)
	 (setq Flag nil)
	)
	((not name)
	 (princ	(if ru
		  "\nМимо :( "
		  "\nMiss :( "
		) ;_ _end_ofif
	 ) ;_ _end_ofprinc
	)				;
	((not
	   (wcmatch (cdr (assoc 0 (entget name)))
		    tip
	   ) ;_ _end_ofwcmatch
	 ) ;_ _end_ofnot
	 (princ
	   (strcat
	     (if ru
	       "\n Не верный объект, должен быть "
	       "\n Bad object that must be"
	     ) ;_ _end_ofif
	     tip
	   ) ;_ _end_ofstrcat
	 ) ;_ _end_ofprinc
	)				;
	((not
	   (wcmatch (cdr (assoc 8 (entget name)))
		    sloy
	   ) ;_ _end_ofwcmatch
	 ) ;_ _end_ofnot
	 (princ
	   (strcat
	     (if ru
	       "\nВыбран не штрих откоса"
	       "\nSelected object not dash slope"
	     ) ;_ _end_ofif
	     sloy
	   ) ;_ _end_ofstrcat
	 ) ;_ _end_ofprinc
	)				;
	(t
	 (setq Flag nil
	       name name
	 ) ;_ _end_ofsetq
	)
					;
      ) ;_ _end_ofcond
    ) ;_ _end_ofwhile
  )

Что я там ещё не предусмотрел?

[gomer]

Сообщение от Disney Что я там ещё не предусмотрел?

Нужно смотреть глобальнее, еще лучше - дебажить на проблемном чертеже. Возможно программа не может найти точки пересечения и выдает nil, что соответственно приводит к ошибке в другой функции
ps Я могу и ошибаться, все зависит от того какая функция возвращает ошибку

[Offrider]

Спасибо огромное за труд.
Есть одна маленькая просьба/пожелание: нельзя ли сделать так, чтоб короткие и длинные штрихи распределялись в разные слои?
Тогда проще редактировать их толщину. Раньше был shatch, где такая фишка была реализована. Сейчас нигде нет...

[Disney]

Сообщение от Offrider чтоб короткие и длинные штрихи распределялись в разные слои? Тогда проще редактировать их толщину.

А какой в этом смысл? Разная толщина штрихов?
Как бы это совсем не сложно, но охота понять зачем? Сделать такое изменение для всех, или специально для тебя версию...

[YVR]

Сообщение от Offrider Спасибо огромное за труд. Есть одна маленькая просьба/пожелание: нельзя ли сделать так, чтоб короткие и длинные штрихи распределялись в разные слои? Тогда проще редактировать их толщину. Раньше был shatch, где такая фишка была реализована. Сейчас нигде нет...

Присоединяюсь к благодарности и просьбе! Было бы очень хорошо короткие штрихи сделать толщиной как верхняя бровка (горняки поймут), да и по ГОСТу разные толщины требуется делать.

[Kirill_Ja]

Disney, приветствую. Большое спасибо за проделанную работу.
Внезапно стала появляться ошибка

"Укажите бровку: <Выход>
Укажите подошву: <Выход>
Мимо
Укажите подошву: <Выход>
Редактировать штрихи? [Да/Нет] <Нет>:Н
; ошибка: деление на нуль
Команда:"

AutoCad Civil 3D 2014.
Ошибка возникает в самом конце работы программы,

[Disney]

Сообщение от Kirill_Ja ; ошибка: деление на нуль

Странно, просмотрел весь код, все места где возможно деление на 0, проверяется чтоб не было ноля.

На любых откосах так, или каком-то конкретно? Выложи пример чертежа с таким откосом, посмотрю.

[Дмитррр]

Перпендикуляра не хватает, конечно... А то было бы совсем шикарно.

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

Если ещё есть кому заниматься этим благородным делом, то возможен такой алгоритм:
0. В настройках нужен выбор "строить перпендикулярно бровке" и "строить перпендикулярно подошве"
1. Везде где можно построить перпендикуляр (то есть перпендикуляр от бровки упирается в подошву или наоборот), надо его построить.
2. Где нельзя - ничего не надо строить.
Уже этих правил в 95% случаев хватит. То что в углах не будет пары штрихов не критично.
3. Для оставшихся 5% случаев можно добавить возможность выбора в качестве бровки и подошвы нескольких объектов.
Например, для классического прямоугольного котлована 1 отрезок бровки, а подошва из трёх отрезков (собственно подошва и 2 кромки).