Компас. Сборка. Чтение координат и перемещение Макросом (можно в цикле)

@Лысанов Виталий · Регистрация: 24.01.2015

Студворк — интернет-сервис помощи студентам

Получение координат деталей на сборке без Макросов по-моему проблема.

Доработанный Макрос может позволить прочитать координату любой детали и переместить на нужное расстояние, как в Solid.

В примере SDK "step3D2.a3m" , четвертым пунктом есть пример чтения координат первой детали и перемещения на новое место.
Если добавить цикл, деталь перемещается при включении макроса.

Для работы макроса, первую деталь нужно расфиксировать.
Раза три перемещений на 1000 градаций и машина зависает. Для Компаса это наверное жестоко.

Code
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
# coding: cp1251
# 3D-API|step3D2 - сборка
 
import Kompas6API5, LDefin3D, LDefin2D
Kompas, doc3d = start3d()
 
example = 4
print example
 
read(example='0.Пример')
 
 
if example == 4:        # получить и изменить место расположения детали в сборке
    iPart = Kompas6API5.ksPart(doc3d.GetPart(0))       # первая деталь в сборке
    iplac = Kompas6API5.ksPlacement(iPart.GetPlacement())            # ksPlacement
    x=y=z=0
    ok,x,y,z = iplac.GetOrigin(x, y, z)
    # выводит координаты первой детали сборки   
    #Kompas.ksMessage( ' '.join( map( unicode, ["x = " , x , " y = " , y , " z = " , z] ) ) )
    
    it = iter(range(688))
 
    for i in it:
         
         #iplac.SetOrigin(x, y, i)
         iplac.SetOrigin(110, 111, i)
         iPart.SetPlacement(iplac)
         iPart.UpdatePlacement()
         iPart.Update()

___
В тексте сообщения убираются пробелы, рабочий вариант в приложении.

@Лысанов Виталий · 24.03.2015, 12:34 **[ТС]**

Сборка. Чтение координат в таблицу и перестроение по измененным координатам

На основе примера "step3D2.a3m" пункт четыре.

Исходная информация: Сборка с компонентами.

Макрос "Zapis_Koord.a3m" считывает координаты компонент и записывает их в два файла:
"Sborka_Koord.txt" и
"Sborka_Koord_TABL1.txt".
Формат: Номер,x,y,z. Разделитель две табуляции, с одной пустой строкой.
Координаты в файле "Sborka_Koord_TABL1.txt", можно корректировать.

Информации по реальному количеству компонент пока нет, поэтому поставили 1000 и обход исключений.

Макросы:
"Chtenie_Koord.a3m"
"Chtenie_Koord_TABL1.a3m"
читают координаты компонент из файлов и перестраивают сборку.

Практически работать можно так:
На панели "Компас Макро" включаем "Макросы"
Нажимаем "Добавить" и заносим в список три макроса.
Наводим на нужный макрос м нажимаем "Изменить".
Дальше "File Run" или "Go", треугольник вверху.
Сборка перестроится по координатам таблиц, или запишутся координаты в таблицу.

Код макроса "Chtenie_Koord.a3m"

Python
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
import Kompas6API5, LDefin3D, LDefin2D
Kompas, doc3d = start3d()
 
m=[]
t=[]
f1 = open("C:\Sborka_Koord.txt", "r")
for   line in f1.readlines():
      m.append(line)
for   line in m:
      if line<>'\n':
          t=line.split("\t")
 
          nom=t[0]
          iPart = Kompas6API5.ksPart(doc3d.GetPart(nom))       # первая деталь в сборке
          iplac = Kompas6API5.ksPlacement(iPart.GetPlacement())            # ksPlacement
          x=y=z=0
          ok,x,y,z = iplac.GetOrigin(x, y, z)
 
          x=t[3]
          y=t[6]
          z=t[9]
 
          iplac.SetOrigin(x, y, z)
          iPart.SetPlacement(iplac)
          iPart.UpdatePlacement()
          iPart.Update()
 
f1.close()

@Лысанов Виталий · 16.04.2015, 13:43 **[ТС]**

Компас 14. Сборка. Вращение. Перемещение.
На примере шагающего робота.

Функция вращения в сборке есть в 15 версии, но и в 14 версии есть все для Макро.
В примере робот скатывается назад и шагает на исходную.

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

Для макроса таблица координат деталей берется с диска "С:"
Макрос работает с режима редактирования макросов.

@Лысанов Виталий · 18.04.2015, 01:16 **[ТС]**

Компас 14. Ускорение работы под управлением Макро.

Исходное:
Робот из предыдущего примера.
За 1.25 минуты возвращается на исходные координаты.

Если после начала движения нажать крестик закрывающий окно Компаса, появляется окно с предложением сохранить изменения.
Но самое интересное. время возврата на исходные координаты 0,25 минуты и соответствующая плавность движения.

Затем можно нажать отмена и продолжать работу, но машина все равно тормозит и нужно снимать Компас Диспетчером.

Новые блоги и статьи Все статьи Все блоги /
Модель заражения группы наркоманов alhaos 17.04.2026 Условия задачи сформулированы тут Суть: - Группа наркоманов из 10 человек. - Только один инфицирован ВИЧ. - Колются одной иглой. - Колются раз в день. - Колются последовательно через. . .	Мысли в слух. Про "навсегда". kumehtar 16.04.2026 Подумалось тут, что наверное очень глупо использовать во всяких своих установках понятие "навсегда". Это очень сильное понятие, и я только начинаю понимать край его смысла, не смотря на то что давно. . .	My Business CRM MaGz GoLd 16.04.2026 Всем привет, недавно возникла потребность создать CRM, для личных нужд. Собственно программа предоставляет из себя базу данных клиентов, в которой можно фиксировать звонки, стадии сделки, а также. . .	Знаешь почему 90% людей редко бывают счастливыми? kumehtar 14.04.2026 Потому что они ждут. Ждут выходных, ждут отпуска, ждут удачного момента. . . а удачный момент так и не приходит.
Фиксация колонок в отчете СКД Maks 14.04.2026 Фиксация колонок в СКД отчета типа Таблица. Задача: зафиксировать три левых колонки в отчете. Процедура ПриКомпоновкеРезультата(ДокументРезультат, ДанныеРасшифровки, СтандартнаяОбработка) / / . . .	Настройки VS Code Loafer 13.04.2026 { "cmake. configureOnOpen": false, "diffEditor. ignoreTrimWhitespace": true, "editor. guides. bracketPairs": "active", "extensions. ignoreRecommendations": true, . . .	Оптимизация кода на разграничение прав доступа к элементам формы Maks 13.04.2026 Алгоритм из решения ниже реализован на нетиповом документе, разработанного в конфигурации КА2. Задачи, как таковой, поставлено не было, проделанное ниже исключительно моя инициатива. Было так:. . .	Контроль заполнения и очистка дат в зависимости от значения перечислений Maks 12.04.2026 Алгоритм из решения ниже реализован на примере нетипового документа "ПланированиеПерсонала", разработанного в конфигурации КА2. Задача: реализовать контроль корректности заполнения дат назначения. . .

@Лысанов Виталий 9 / 9 / 3 Регистрация: 24.01.2015 Сообщений: 79 Записей в блоге: 6
	18.04.2015, 01:16 [ТС]
	Компас 14. Ускорение работы под управлением Макро. Исходное: Робот из предыдущего примера. За 1.25 минуты возвращается на исходные координаты. Если после начала движения нажать крестик закрывающий окно Компаса, появляется окно с предложением сохранить изменения. Но самое интересное. время возврата на исходные координаты 0,25 минуты и соответствующая плавность движения. Затем можно нажать отмена и продолжать работу, но машина все равно тормозит и нужно снимать Компас Диспетчером. 0