Jump to content

Как писать измерительные циклы


Recommended Posts

Zelder

Читал руководства не могу понять как правильно писать измерительные циклы.  Я так понимаю это программа для измерения внешнего диаметра, подскажите как читать и писать циклы. Заранее спасибо 

 

DEF REAL _A1, _A2, _MR, _MR1, _X0, _Y0, _Z0, _RDIAM
_MR=R1-10
_MR1=R1+10
 ROT Y=$AA_IW[B1] 

_X0=$AA_IW[X] , 
_Y0=$AA_IW[Y] 
_Z0=$AA_IW[Z] 

M120 

G1 F1000 X=_X0+_MR1 

G1 F1000 Z=_Z0-15. 

L770("X” ,$AA_IW[X],_X0-_MR,0) 

_A1=R50

G1 F1000 Z= Z0

G1 F1988 X=_X0-_MR1

G1 F1000 Z0=_Z0-15.

L770("X" ,$AA_IW[X],_X0+_MR,0)
 _A2=R50
XO=(_A1+_A2)/2
G1 F1000 Z=_Z0 
G1 F1000 X=_X0
G1 F1000 Y=_Y0+_MR1
G1 F1000 Z=_Z0-15.

L770("Y",$AA_IW[Y],_Y0-_MR,0)
_A1=R50

G1 F1000 Z=_Z0
G1 F1000 Y=_Y0-_MR1
G1 F1000 Z=_Z0-15.

L770("Y",$AA_IW[Y],_Y0+_MR,0)
_A2=R50
_Y0=(_A1+A2) /2

G1 F1000 Z=_Z0
G1 F1000 Y=_Y0

G1 F1000 X=_X0+_MR1
G1 F1000 Z=_Z0-_15.

L770("X",$AA_IW[X],_X0-_MR, 0)
_A1=R50
G1 F1000 Z=_Z0
G1 F1000 X=_X0-_MR1
G1 F1000 Z=_Z0-_15.
L770("X"), $AA_IW[X], _X0+_MR, 0)

_RDIAM=_A1-_A2
M121
ROT
R41=_X0
R42=_Y0
R43=_RDIAM
MSG("SPIGOT DIAMETER:" <<_RDIAM<<"X0=" <<"X0="Y0" <<_Y0) 
RET

Link to post
Share on other sites
  • 1 month later...


UnPinned posts
s_liam

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

Edited by s_liam
Link to post
Share on other sites
28.06.2022 в 11:53, Zelder сказал:

Читал руководства не могу понять как правильно писать измерительные циклы.  Я так понимаю это программа для измерения внешнего диаметра, подскажите как читать и писать циклы. Заранее спасибо 

 

DEF REAL _A1, _A2, _MR, _MR1, _X0, _Y0, _Z0, _RDIAM
_MR=R1-10
_MR1=R1+10
 ROT Y=$AA_IW[B1] 

_X0=$AA_IW[X] , 
_Y0=$AA_IW[Y] 
_Z0=$AA_IW[Z] 

M120 

G1 F1000 X=_X0+_MR1 

G1 F1000 Z=_Z0-15. 

L770("X” ,$AA_IW[X],_X0-_MR,0) 

_A1=R50

G1 F1000 Z= Z0

G1 F1988 X=_X0-_MR1

G1 F1000 Z0=_Z0-15.

L770("X" ,$AA_IW[X],_X0+_MR,0)
 _A2=R50
XO=(_A1+_A2)/2
G1 F1000 Z=_Z0 
G1 F1000 X=_X0
G1 F1000 Y=_Y0+_MR1
G1 F1000 Z=_Z0-15.

L770("Y",$AA_IW[Y],_Y0-_MR,0)
_A1=R50

G1 F1000 Z=_Z0
G1 F1000 Y=_Y0-_MR1
G1 F1000 Z=_Z0-15.

L770("Y",$AA_IW[Y],_Y0+_MR,0)
_A2=R50
_Y0=(_A1+A2) /2

G1 F1000 Z=_Z0
G1 F1000 Y=_Y0

G1 F1000 X=_X0+_MR1
G1 F1000 Z=_Z0-_15.

L770("X",$AA_IW[X],_X0-_MR, 0)
_A1=R50
G1 F1000 Z=_Z0
G1 F1000 X=_X0-_MR1
G1 F1000 Z=_Z0-_15.
L770("X"), $AA_IW[X], _X0+_MR, 0)

_RDIAM=_A1-_A2
M121
ROT
R41=_X0
R42=_Y0
R43=_RDIAM
MSG("SPIGOT DIAMETER:" <<_RDIAM<<"X0=" <<"X0="Y0" <<_Y0) 
RET

 

Link to post
Share on other sites

Если я правильно понял, это пользовательская программа используется для измерения некоторых точек в пространстве с кинематикой станка 4D. Если быть точным, данный алгоритм измерения напоминает алгоритм измерения и определения габаритных размеров геоэлемента (круг/цилиндр/сфера, цапфа/прямоугольник) и координат его середины/центра по осям X, Y. Думаю, в данном случае речь идёт о детали/геоэлементе с цилиндрической/сферической формой. 

 

А логика измерения вроде бы такая:

 

1. Выравниванием плоскость СКД относительно актуальной позиции изм.инструмента/щупа/тестера по оси Y;

 

2. Определяем положение кромок геоэлемента (кромка/плоскость/грань/ребро) на детали по оси X относительно актуальной позиции изм.инструмента/щупа/тестера в режиме двунаправленного измерения с последующими определением половинного расстояния между этими точками, то бишь середины полученного отрезка, и корректировкой актуального положения щупа относительно измеряемой оси (ось X); 

 

3. Делаем то же самое, что и в шаге  N2, но по оси Y.

 

4. Перепроверяем полученные значения измерения на этапе 2 повторным его прогоном;

 

5. Получаем некое значение некоего диаметра с координатами его центра в плоскости  X/Y.

Edited by ShadoWofXaoS
Link to post
Share on other sites

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

1. Строка 6 ( счёт идёт от строки с объявлением переменных - Def): в конце кода стоит ", " (запятая), хотя в рамках логики и синтаксиса она там не нужна;

2. Строка 19: вместо "X0" используется "XO".

Кстати, а для чего нужна подпрограмма  L770? Это она отвечает за сам процесс измерения или в её теле есть обращение к стандартному циклу измерения Sinumerik?

Link to post
Share on other sites

Join the conversation

You can post now and register later. If you have an account, sign in now to post with your account.
Note: Your post will require moderator approval before it will be visible.

Guest
Reply to this topic...

×   Pasted as rich text.   Paste as plain text instead

  Only 75 emoji are allowed.

×   Your link has been automatically embedded.   Display as a link instead

×   Your previous content has been restored.   Clear editor

×   You cannot paste images directly. Upload or insert images from URL.

  • Recently Browsing   0 members

    No registered users viewing this page.




  • Сообщения

    • Golem
      Виктор, там не программа, на f, может и раньше, есть возможность погружаться файл параметров по умолчанию. Можно поменять через чпу, можно подкорректировать файл. Больше сказать не могу, потому что рукожоп и комп в ремонте, как сделают, напишу =]
    • Maik812
      Он бесплатный :) А можно подумать ты Солид купил и офис :) Ага , это только ты вырисовываешь каждый по фотки :) А я качю библиотеку их и делаю. Я на ваших куцаных фотках не видел что пропустили i или ошибку сделали в слове! Я Вам не школьный учитель. Я предложил сразу вам пакетно внести значение. Есть решения ? как сделать 1920 профилям значения внести это? Нет !??? Заткнись тогда рыбка!
    • Sykes
      Пакетно работать с профилями вряд ли кому нужно, так что Ваш совет купить и установить Тотал Коммандер ради свойства профилей был очень уместен, ага) Я разбираюсь по мере надобности и не задавая вопросов, а самолично, при этом еще и делясь полученными знаниями с обществом, так что тут очень большой вопрос кто из нас лузер - тот, кто допустил ошибку в слове и по невнимательности не заметил этого, при этом точно зная, что этот слово должно работать или тот, кто вообще не знал об этом коде и принципе его работы, но при этом рассказывал об уровнях
    • poputchik21
      Можно ли своими силами устранить проблему с осью и что для этого надо сделать?    Провода прозвонили ОК.    Для проверки перекинули управление с оси Z1 на Z2 , упор пришел в движение. На блоке управления оси горит цифра 0, на всех остальный 1.
    • Nastyrnuy
      Понятно, сразу видно чистый электроник привыкший чинить только электронику и только по схемам....Могу сказать что если повезет то Вам удастся получить схему электрическую принципиальную именно на ту плату которую Вы чините! Еще раз повторяю, я имею ввиду повезет и именно на эту плату а станок будет стоять долго и упорно!! А универ ремонтник которому надо запустить, станок запустит за 2-3 дня...! Если хотите чинить платы с Agie  то не ленитесь(хотя ленность и является двигателем прогресса и технологий..) читайте внимательно форумы очень внимательно и вдумчиво и не блокируйте серое вещество тем что для ремонта нужны только ЭПС и только на эту плату и будет Вам счастье!
    • Maik812
      НЕ ПИЗДИ РЫБКА С РУКАМИ! ТЕБЕ СКАЗАЛИ ЧТО ЭТО МОЖНО СДЕЛАТЬ В 2014 ВЕРСИИ , ЕСЛИ ХОЧЕШЬ ПЕРЕХОДИ! Так как с 2015 смене формат файла и не работает так теперь. Тоже бздишь, тебе сказали как сделать это для всех профилей автоматом , пакетно! Вот по тому что мало понимаешь , а споришь и думаешь что все понятно и ты разбираешься... а на самом деле лузер..
    • Sykes
      К Вам у меня вопросов не было по поводу старой версии - каждый работает как привык и как ему удобно. Вопрос был к товарищу с лампочками на голове, потому как он предлагал мне перейти с версии 2021 на версию 2012 в моей теме, где вопрос был по проблеме переноса свойств профиля в сварную конструкцию, а после высказанного сомнения в целесообразности данного действа - его рассказы о моем уровне. И это при том, что проблема решилась исправлением опечатки в слове "description".   Тема ведь про экспорт, а таск решает эту задачу максимально эффективно, а поскольку известно про него давно - не совсем понятно почему эта тема поднималась много лет с предложениями костылей в виде виртуального принтера или отдельных программ. Так что тему можно закрывать))  
    • Shura762
      Встретились два одиночества  вообще-то тема не о ваших "чуйств" к ТФ, почему каждая тема выливается в "кризис среднего возраста" или в "срач по теме Ветерка, надо бы пожаловаться на вас админу. Последнее китайское предупреждение, да завязывайте уже.  
    • IgorT
      Понятно. Аргументов у тебя больше нету. Агрессия началась.   А вот не свалю.  Дальше что?
    • Tapoky
      Доброго дня,   Требуется смоделировать совместно два процесса: кавитацию и дегазацию (выход растворенного газа из жидкости при понижении давления). Если с кавитацией всё плюс/минус понятно, то как смоделировать дегазацию, и особенно одновременно с процессом кавитации - это вызывает вопросы. На данный момент всё это кажется каким-то нереальным для моделирования. Получается, что имеем кавитацию, как фазовый переход жидкости, и соответственно образование пузырьков с газообразным состоянием данной жидкости, плюс выделяется растворенный газ - имеем пузырьки растворенного газа, и получается, что эти два вида пузырьков также могут взаимодействовать друг с другом.   Поделитесь, пожалуйста, опытом, если кто-то имел практику моделирования дегазации, и особенно совместно с процессом кавитации.
×
×
  • Create New...