Макросы в Power Mill

[scorpion1007 60]

3 часа назад, eksodus сказал:

 

PS: а вообще задумка хорошая конечно - выбрал поверхности паза, запустил макрос, и получил нужную траекторию фрезеровки

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

 

Примерный алгоритм сделал такой. Если имеется только один карман на детали. 

 

...

//***** Создание кармана для выборки ****

STRING FeatureGroup1 = "FeatureGroup\" + "Flanez" + $nomer_zakaza + " - " + $Model_name
STRING FG = "Flanez" + $nomer_zakaza + " - " + $Model_name

EDIT LEVEL "1" SELECT WIREFRAME
CREATE FEATUREGROUP ACTIVATE
ACTIVATE FEATUREGROUP "ACTIVATE" MODE FEATUREEDITOR START
MODE FEATUREEDITOR MODE CREATE FREEFORM_POCKET
MODE FEATUREEDITOR EDIT CURVEPOSITION BOTTOM
MODE FEATUREEDITOR EDIT TOP "19"
FORM APPLY FEEDIT
MODE FEATUREEDITOR FINISH ACCEPT
RENAME FeatureGroup "ACTIVATE" $FG

//***** Вычисление минимального размера кармана ****
FORM BLOCK
EDIT BLOCK LIMITTYPE FEATURESET
EDIT BLOCK RESET
BLOCK ACCEPT
int FdlinaX=round(Block.Limits.XMax-Block.Limits.XMin,0)
int  FdlinaY=round(Block.Limits.YMax-Block.Limits.YMin,0)
int minRAZM = 0
 IF $FdlinaX <= $FdlinaY {
$minRAZM = $FdlinaX
} ELSE {
$minRAZM = $FdlinaY
}

//**********  Проверка необходимости траекторий ***********
//**********  VB выборка, PrF по профилю кармана ( для для указанного диаметра фрезы) ***********
//**********  углы карманов дорабатываются фрезами меньшего диаметра траекторией по профилю ***********
int VB20 = 0
int VB6 = 0
int PrF6 = 0
int PrF4 = 0

IF  $minRAZM > 20 {
$VB20 = 1
$VB6 = 0
$PrF6 = 1
$PrF4 = 1
} ELSEIF $minRAZM > 10 {
$VB20 = 0
$VB6 = 1
$PrF6 = 0
$PrF4 = 1
} ELSEIF $minRAZM > 6 {
$VB20 = 0
$VB6 = 0
$PrF6 = 1
$PrF4 = 1
} ELSE { 
$VB20 = 0
$VB6 = 0
$PrF6 = 0
$PrF4 = 1
}

....

 

 

....

//***** Выборка кармана 20 мм ****
IF $VB20 == 1  {
STRING Vib20 = "20viborka-karmana- " + $Model_name
ACTIVATE FOLDER $Toolpathname1
IMPORT TEMPLATE ENTITY TOOLPATH TMPLTSELECTORGUI "Z:/My-Strategies/20viborka-karmana.ptf"
ACTIVATE FEATUREGROUP $FG
RENAME Toolpath "1" $Vib20
EDIT MODEL ALL DESELECT ALL
EDIT BLOCK LIMITTYPE MODEL
EDIT BLOCK RESET
EDIT TOOLPATH $Vib20 CALCULATE

....итд

 

Сейчас хочу расширить на несколько карманов.

Какой командой можно узнать количество всех карманов в группе?

Предполагается сделать перебор всех карманов в группе циклом FOR TO, вычисление необходимости той или иной стратегии для каждого кармана, создание буллевого массива из которого, для каждой стратегии будут выбираться те или иные карманы для обработки

[eksodus 270]

а почему вы используете

3 минуты назад, scorpion1007 сказал:

IMPORT TEMPLATE ENTITY TOOLPATH

вместо IMPORT TEMPLATE PROJECT FILEOPEN

 

тогда же будут сохраняться  все имена - траекторий, инструментов, границ, шаблонов , слоёв и тд

или сохранение имён не нужно в данном случае ?

[scorpion1007 60]

1 час назад, eksodus сказал:

а почему вы используете

вместо IMPORT TEMPLATE PROJECT FILEOPEN

 

тогда же будут сохраняться  все имена - траекторий, инструментов, границ, шаблонов , слоёв и тд

или сохранение имён не нужно в данном случае ?

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

[eksodus 270]

вы не поняли вопроса - почему вы используете импорт шаблона траектории вместо меню Вставить - Объекты окружения ?

так же будут сохранены все имена всех элементов внутри шаблона

или сохранение имён на важно в данном случае ?

[syncomp 18]

Всем привет. Очень нужно! Помогите! Мне нужны данные, которые выдает команда или оператор PICK.  Нажимая в нужном мне месте мышкой, хочу построить окружность с центром в этой точке.

[eksodus 270]

8 часов назад, syncomp сказал:

Мне нужны данные, которые выдает команда или оператор PICK.  Нажимая в нужном мне месте мышкой, хочу построить окружность с центром в этой точке.

не пойму - зачем нужна эта команда ?

 

и что сейчас мешает так сделать ?  (выбрать окружность, указать мышкой место и диаметр)

то есть делать всё как обычно, стандартные действия

[syncomp 18]

Я и сейчас так делаю. Но очень часто мне нужны отверстия, технологические, которых нет на модели. Например, для второй стороны, для указания мест под саморез (Крепление заготовки). Мышкой я щелкаю в любом месте, мне же надо в точках с нулями. Шелкнул по примерному месту, координаты округлились, и окружность построилась в четкой точке сетки. Вариант использовать сетку не получится, потому что сетка не работает на модели , ее приходится скрывать, чтобы курсор задерживался на ней... Команда PICK  в окне эха, выдает координаты места по которому щелкаешь мышью. Вот эти данные мне и нужны!

[eksodus 270]

4 часа назад, syncomp сказал:

Вот эти данные мне и нужны!

не факт что их можно получить

 

4 часа назад, syncomp сказал:

Мышкой я щелкаю в любом месте, мне же надо в точках с нулями. Шелкнул по примерному месту, координаты округлились, и окружность построилась в четкой точке сетки.

как всегда вы половину умалчиваете) это нужно сразу писать, а не по запросу

 

а что мешает от созданной СК задавать центр отверстия там где нужно ?

ну или создать временно какую-то СК, задать отверстие от неё и потом удалить эту СК ?

 

просто задаёте координаты и всё, если через макрос  - то с запросом

например - создали СК, потом у вас появляется запрос на координаты XYZ для данной окружности,

вы вводите эти данные и нажимаете далее,  и макрос продолжается

 

такой вариант устроит ?

 

[Kinematik 162]

Уважаемые админы!

Закрепите тему. Хороший контент в этой теме опубликован.

Спасибо.

 

  @MFS

[Machinist 439]

2 часа назад, Kinematik сказал:

Уважаемые админы!

Закрепите тему. Хороший контент в этой теме опубликован.

Спасибо.

 

  @MFS

Поддерживаю! 

Много полезных макросов прикрепили коллеги в данной теме.

[syncomp 18]

В 08.07.2018 в 18:14, eksodus сказал:

а что мешает от созданной СК задавать центр отверстия там где нужно ?

Попробуйте создать таким образом 50 отверстий, задавая координаты для каждого.

Совет с временными СК вроде бы подойдет. Но опять! я не знаю заранее Координаты точек, только приблизительные! Только щелкая мышью в приблизительно в удобной мне точке, я могу зная координаты, построить окружность.

[eksodus 270]

6 часов назад, syncomp сказал:

Попробуйте создать таким образом 50 отверстий, задавая координаты для каждого.

хмм.. - мне трудно представить деталь, где нужно сделать 50 технологических отверстий

6 часов назад, syncomp сказал:

Совет с временными СК вроде бы подойдет. Но опять! я не знаю заранее Координаты точек, только приблизительные! Только щелкая мышью в приблизительно в удобной мне точке, я могу зная координаты, построить окружность.

это понятно что заранее знать нельзя - но приблизительное расположение вы же себе представляете примерно как-то ?

например - вас устроит технологическое отверстие диаметром 10 мм, и от угла заготовки центр этого отверстия должен быть смещён по 30 мм  по X и по Y

уже это можно сделать через макрос

 

но если вам нужно делать каждый раз не в примерно похожем месте, а всегда в разных местах,

или если вам нужно делать 50 технологических отверстий - то думаю тут только вручную

 

да в принципе можно и через макрос сделать все 50  технологических отверстий - через массив если делать

но это всё догадки, без подробного разъяснения с вашей стороны не поможешь - ибо непонятно

[scorpion1007 60]

Доброго времени суток коллеги)

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

Пишу несложные проги нечасто под неопытного оператора. Что-то у него туго с картами наладки. Просят в имени NC-файла указывать диаметр и вылет инструмента. Запаривает уже это все прописывать, хочу прописать макросом, не знаю с чего сначала подступится.

Самау задачу вижу такой:

1)Берем первую траекторию, присваиваем ей имя к примеру "Номер по порядку_диаметринструмента_end(концевая)_вылет инструмента (1-20end-50). Остальные траектории переименовываем точно также.

2) Так как станок не поддерживает смену инструмента, нужно создать разные  NC-шки  и набить траекториями по имени инструмента. В имя NC уже должно входить и название модели:

 NC "Номер по порядку_Деталь( имя модели)_диаметр инструмента_вылет инструмента

NC 1-Деталь1_20end-50 (содержит траектории:)

    1-20end-50

    2-20end-50

    3-20end-50

NC 2-Деталь1_10ball-45

    4-10ball-45

    5-10ball-45

NС 3-деталь1_ 4end-30

     6-4end-30

NC 4-деталь1_ 20end-50

     7-20end-50

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

Я пока ещё не совсем дружу с переменными.

Как в цикле узнать диаметр и вылет инструмента?

Как набить NCшку траекториями с одинаковым именем инструмента? Причем бывает и такое, что один и тот же инструмент может использоваться и в начале и в конце. Например в начале инструмент делает черновую выборку, а потом после всех чистовых и сверлений, делает окончательную обрезку детали, и при этом должны быть две разные NCшки с разным порядковым номером. Очередность определяется деревом в папке траекторий( траектория №7 в примере). Нужно в цикле, если встречается траектория с новым инструментом, создавался новый NC файл с новым порядковым номером и набивался траекториями, пока не появится траектория с другим инструментом

 

[eksodus 270]

11 час назад, scorpion1007 сказал:

не знаю с чего сначала подступится

почитайте предыдущую страницу - я там выкладывал макрос для переименования траекторий

11 час назад, scorpion1007 сказал:

Как в цикле узнать диаметр и вылет инструмента?

в каком ещё цикле ? можно просто узнать диаметр и вылет

но что за цикл вы имеете в виду ?

 

ну а в общем - то что вы хотите можно сделать легко для варианта - 1 траектория = 1 NC файл

все эти параметры (диаметр, вылет и тд) - указаны в руководстве по макросам

 

а вот поделить по диаметру инструмента на разные NC файлы, посчитать и сравнить вылет для нескольких разных траекторий -

это очень сложно сделать будет

[Konstantin_VP 49]

Есть макрос:

Показать содержимое  

ENTITY ST = entity('StockModel','')
INT StateNB = size($ST.States)-1

int $Id = 1

string $ST_Type = ''
string $ST_NAme = ''
string List $list = {}

  OBJECT LIST $STK_States = $ST.States
  IF $StateNB > 1 {
     WHILE ID <= $StateNB {
      $ST_Type = $STK_States[$Id].type
      $ST_NAme = $STK_States[$Id].name
      
     $list = list + {$ST_NAme}
      
      $Id=$Id+1
     }
  }
  
int $Selection = INPUT CHOICE $list ''

 

Hide  

Данный макрос получает список траекторий из модели материала. Макрос довольно медленный и нет возможности мультивыбора, а хотелось бы. Вроде как это можно реализовать через фильтры в "INPUT ENTITY MULTIPLE TOOLPATH", но я не знаю как именно это можно сделать.Буду рад помощи.

[eksodus 270]

4 часа назад, Konstantin_VP сказал:

Макрос довольно медленный и нет возможности мультивыбора, а хотелось бы.

как-то так:

ENTITY LIST $Selection = INPUT ENTITY MULTIPLE TOOLPATH "Выбор Траекторий" $list

при этом будут автоматически выделены все траектории, входящие в активную модель материала, благодаря переменной $list

без неё - просто выбор траекторий в корне Toolpath вручную

 

если вначале вместо ENTITY LIST использовать  int - выдаёт ошибку

 

 

PS: а для чего такой макрос с мультивыбором?

ведь если просто нужно провести какие-то операции с траекториями из модели материала,

то можно ж пустить в ход переменную $list

 

Изменено 16 июля 2018 пользователем eksodus

[Konstantin_VP 49]

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

int - целочисленное

string - строчка

Если вместо ENTITY LIST вписать string , то работать будет, но результат не изменится

Изменено 16 июля 2018 пользователем Konstantin_VP

[eksodus 270]

2 часа назад, Konstantin_VP сказал:

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

достаточно простой команды -

ENTITY LIST $Selection = INPUT ENTITY MULTIPLE TOOLPATH "Выбор Траекторий"

сделать выбор вручную и потом сделать с ними всё что угодно

 

а если по вашему макросу - то галочки уже будут проставлены на всех траекториях содержащихся в макросе

и можно снять галочки с ненужных

2 часа назад, Konstantin_VP сказал:

я хочу удалять сразу пачкой нужные мне траектории из модели материала.

а таких команд я не знаю (

[Konstantin_VP 49]

В целом получилось:

Показать содержимое  

ENTITY ST = entity('StockModel','')
INT StateNB = size($ST.States)-1

int $Id = 0

string $ST_Type = ''
string $ST_NAme = ''
string List $list = {}

  OBJECT LIST $STK_States = $ST.States
  IF $StateNB > 1 {
     WHILE ID <= $StateNB {
	 IF STK_States[$Id].type == 'Toolpath' {
      $ST_NAme = $STK_States[$Id].name
     $list = list + {$ST_NAme}
      }
      $Id=$Id+1
     }
  }

ENTITY LIST $Selection = INPUT ENTITY MULTIPLE toolpath "Удаление траекторий из модели материала" " " $list

FOREACH $item IN $Selection {

EDIT STOCKMODEL ; ACTIVATE TOOLPATH $item

EDIT STOCKMODEL ; REMOVE_INPUT INDEXED_STATE ;

}

 

Hide  

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

 

Изменено 17 июля 2018 пользователем Konstantin_VP

[eksodus 270]

43 минуты назад, Konstantin_VP сказал:

Макрос для удаления выбранных траекторий из активной модели материала.

Спасибо, полезный макрос !

 

Хотя я редко удаляю траектории из ММ - я чаще использую разные состояния.