Рассылка
"Новости проекта"











Лисп отводов и труб

Добавлено: 21 Дек 2017   VLobanov
   0 оценок

Хочу поделиться лиспом для создания труб (железно-сварочных) ду 6 - ду 300

Очень легко рисовать в 2д. при построении котельной очень удобно.


Так же в архиве есть лисп на отводы.

что бы они заработали - просто перенесите их в экран Автокада. для создания трубы нажимаете P (Pipe) и впишите нужный диаметр. например (P+enter+150+enter начинаем рисовать)
Для создания отвода тоже самое (DRS+enter+150 клик мыши начинаем рисовать)

Комментарии

Комментарии 1-7 из 7
hha
, 30 мая 2018 в 15:24
#7
Цитата:
Сообщение #5 от VLobanov
Цитата:Сообщение #3 от Denver-22Увы, действительно не работает.

Boru (DIN 2440) nominal capini giriniz (DN)..150
Boru merkezini giriniz...:circle Неизвестная команда "CIRCLE". Для вызова справки нажмите F1.
Команда:
Команда: d Неизвестная команда "D". Для вызова справки нажмите F1.
Команда: 168.3
Команда: ; ошибка: Функция прервана.


Странно, у меня все работает.

Command: p Boru (DIN 2440) nominal capini giriniz (DN)..150
Boru merkezini giriniz...:circle
Specify center point for circle or [3P/2P/Ttr (tan tan radius)]:
Specify radius of circle or [Diameter]: d Specify diameter of circle: 168.3
Command: circle
Specify center point for circle or [3P/2P/Ttr (tan tan radius)]:
Specify radius of circle or [Diameter] : d Specify diameter of circle : 158.75
Command: mline
Current settings: Justification = Top, Scale = 20.00, Style = STANDARD
Specify start point or [Justification/Scale/STyle]: s
Enter mline scale : 168.3
Current settings: Justification = Top, Scale = 168.30, Style = STANDARD
Specify start point or [Justification/Scale/STyle]: j
Enter justification type [Top/Zero/Bottom] : z
Current settings: Justification = Zero, Scale = 168.30, Style = STANDARD
Specify start point or [Justification/Scale/STyle]:
Specify next point:

Specify next point:
Specify next point or [Undo]: *Cancel*

НА турецком или азербайджанском
Denver-22
, 26 декабря 2017 в 09:10
#6
Теперь всё работает. Спасибо обоим!
VLobanov
, 26 декабря 2017 в 09:03
#5
Цитата:
Сообщение #3 от Denver-22
Увы, действительно не работает.

Boru (DIN 2440) nominal capini giriniz (DN)..150
Boru merkezini giriniz...:circle Неизвестная команда "CIRCLE". Для вызова справки нажмите F1.
Команда:
Команда: d Неизвестная команда "D". Для вызова справки нажмите F1.
Команда: 168.3
Команда: ; ошибка: Функция прервана.



Странно, у меня все работает.

Command: p Boru (DIN 2440) nominal capini giriniz (DN)..150
Boru merkezini giriniz...:circle
Specify center point for circle or [3P/2P/Ttr (tan tan radius)]:
Specify radius of circle or [Diameter]: d Specify diameter of circle: 168.3
Command: circle
Specify center point for circle or [3P/2P/Ttr (tan tan radius)]:
Specify radius of circle or [Diameter] : d Specify diameter of circle : 158.75
Command: mline
Current settings: Justification = Top, Scale = 20.00, Style = STANDARD
Specify start point or [Justification/Scale/STyle]: s
Enter mline scale : 168.3
Current settings: Justification = Top, Scale = 168.30, Style = STANDARD
Specify start point or [Justification/Scale/STyle]: j
Enter justification type [Top/Zero/Bottom] : z
Current settings: Justification = Zero, Scale = 168.30, Style = STANDARD
Specify start point or [Justification/Scale/STyle]:
Specify next point:

Specify next point:
Specify next point or [Undo]: *Cancel*
kserg
, 26 декабря 2017 в 08:23
#4
Здесь лежат чуть подправленные файлики:
https://www.upload.ee/files/7808996/dnl14431___2.rar.html
Пробуйте.
Denver-22
, 25 декабря 2017 в 09:34
#3
Увы, действительно не работает.

Boru (DIN 2440) nominal capini giriniz (DN)..150
Boru merkezini giriniz...:circle Неизвестная команда "CIRCLE". Для вызова справки нажмите F1.
Команда:
Команда: d Неизвестная команда "D". Для вызова справки нажмите F1.
Команда: 168.3
Команда: ; ошибка: Функция прервана.
VLobanov
, 23 декабря 2017 в 06:17
#2
Цитата:
Сообщение #1 от kserg
В лиспе команды лучше писать не, например, как "line", а как, например, "_.line", и опции их, например, не как "c", а как "_с". Тогда наверняка будут работать.


Если кто то улучшит или добавит что то новое в эти лиспы - я думаю все будут только рады...
kserg
, 22 декабря 2017 в 08:21
#1
В лиспе команды лучше писать не, например, как "line", а как, например, "_.line", и опции их, например, не как "c", а как "_с". Тогда наверняка будут работать.
Комментарии могут оставлять только зарегистрированные участники
Авторизоваться
Трубы из высокопрочного чугуна для систем водоснабжения и водоотведения2015 г.

С. В. Храменков, А. Д. Алиференков, О. Г. Примин

Трубы из высокопрочного чугуна для систем водоснабжения и водоотведения

898 руб.
Новое в VetCAD++ 3.15
Размещение рекламы