FIL редактор

[kopatych 6]

Сделал я постпроцессор для пяти осевого станка. Осталось только чтобы смена инструмента и обороты выводились функцией WECHSEL(1,180,3,23)  где 1- номер вызываемого инструмента, 180 обороты, 3 вращение по часовой стрелке, 23 номер подготавливаемого инструмента как написать функцию обработки

CIMFIL/ON,LOADTL 

CIMFIL/OFF 

[kopatych 6]

эх на удачу..

. 

 

кто нибудь сталкивался с подобной кинематикой? Ось С вращается вокруг оси Z ось  B вокруг оси X и в добавок под углом 45 градусов.  Как подобное описать в редакторе постпроцессоов? 

[Onizuka 28]

Честно говоря не понял где тут какая ось и как влияет угол 45. 

Возможно, поможет чем-то  информация из справки CreoHelp -> Производство -> Производство на станка с ЧПУ -> Инструменты -> Присоединения инструментов

 

Можно смоделировать приспособления для крепления инструмента под различными углами к базовой оси Z ©. Новое положение инструмента должно учитываться при постпроцессированиии.

[dutiful 4]

Держи, вроде получилось. Использовал разные примеры программ, так вероятно есть что-то лишнее. Главное у меня все работает.

Единственное, значение 3 он берет не из cl файла, это просто символ. Но думаю это не принципиально.

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

Строки CIMFIL/ON,SPINDL, CIMFIL/OFF обязательно вставить именно в таком виде.

 

T1=TEXT/', '

T2=TEXT/','

REPLAC/T1,T2

$$*****************************************************

MULT=0 

 

$$ ****************************************************

$$ *           M a c r o   S e c t i o n              *

$$ ****************************************************

 

NTOOL = MACRO

     $$ Macro to load the Next Tool variable : NEXTL

     $$ Current CL position

     CLPOS=POSTF(7,1)+1

     OKFIND=0

     DO/ENDO1,ILOOP=1,100000

       DMY=POSTF(14)     $$ Get next CL (TAPERD)

       CLC=POSTF(7,2)    $$ Class of CL record

       SCL=POSTF(7,3)    $$ sub-class of CL record

       ILOOP=1           $$ Stay in loop

       IF(CLC.EQ.14000)THEN

       $$ THis is FINI

         OKFIND=0        $$ CL not found

         NEXTL=0

         ILOOP=100001    $$ Exit the loop

       ENDIF

       IF(CLC.EQ.2000.AND.SCL.EQ.(ICODEF(LOADTL))) THEN

       $$ This is a LOADTL

         NEXTL=POSTF(7,4)  $$ 1th parameter

         OKFIND=1

         ILOOP=100001

       ENDIF

     ENDO1) CONTIN  $$ End of DO loop

          $$ return initial position in CL

     RSLT=POSTF(15,CLPOS)

     TERMAC

 

 

$$ *******************************************************

$$ *          L O A D T L      S E C T I O N             *

$$ *******************************************************

 

CIMFIL/ON,LOADTL $$---------------- LOADTL --------------------

 

 TL=POSTF(7,4)

   COORD=POSTF(1,1,1510)

 

   SET80=1 $$НУЖНО СДЕЛАТЬ ЦИКЛ PLANE НА ПЕРВЫЙ GOTO

   SETR0=1 $$НУЖНО СДЕЛАТЬ КОРРЕКЦИЮ ИНСТРУМЕНТА

   

   DMY=POSTF(2,1,1867,1)

   DMY=POSTF(13)

   OFVAL = POSTF(1,1,1942) $$ GET THE VALUE FROM INTCOM 1942 (OFFSET LOCATION)

   CALL/NTOOL $$ Find next tool

   DMY=POSTF(2,1,1867,0)

   DMY=POSTF(30,2,(ICODEF(SPINDL)),0)

   SP=POSTF(7,5)

   SPT=TEXT/OMIT,(TEXT/SP),3

 

   INSERT/'WECHSEL(',TL,',',SPT,',3,',NEXTL,')$'

   RAPID $$КОМАНДА FROM ИДЕТ БЕЗ ПОДАЧИ!!!

CIMFIL/OFF

 

CIMFIL/ON,SPINDL

CIMFIL/OFF

[kopatych 6]

Да это то что нужно.

[dutiful 4]

Добрый день. Решил не создавать новую тему, а задать вопрос в этой, т.к. вопрос касательно FIL редактора.

 

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

В конечном варианте программа должна иметь примерно такой вид:

 

N5 T="FREZA_D50S"

N6 L6

N7 FK(0,-90)       ; -90 координата С

N8 FRAESEN

N9 G0 Z0. D0 SUPA

N10 D1

N11 M0

N12 POS=0

N13 G0 G90 X297.744 Y206.691 S750 M3

N14 G0Z175.5

N15 G1 Z168.065 F1000

 

Соответственно я отменяю вывод координаты С в программе (через Gpost) и далее необходимо задать вывод С в кадре с FK.

Для этого я использовал макрос _OUTPT

 

 

_OUTPT = MACRO

    C_CUR=POSTF(31,1,C)

IF (C_CUR.NE.999999) CANGL=C_CUR

DMY=POSTF(31,19)

  TERMAC

 

Таким образом я ловлю необходимые значения по С.

Проблема в следующем: т.к. вывод FK, я вписал в CIMFIL/ON,LOADTL то на момент вывода координаты С, она равна нулю (изначально присваиваем переменной CANGL=0)

 

26>GOTO  /-125,260,445.28081,0,0,1 

    26  CALLING MACRO=_OUTPT

  -128  C_CUR         SCALAR       90.00000

  -129  CANGL         SCALAR       90.00000

     26     26 N100 G0 POS=90.$                

Исходя из lst файла видно, что в определенный момент переменная CANGL принимает необходимое мне значение C=90. Но это значение принимается уже после начала перемещений. А мне необходимо получить это значение раньше. Как возможно это сделать?

[dutiful 4]

эх на удачу..

. 

 

кто нибудь сталкивался с подобной кинематикой? Ось С вращается вокруг оси Z ось  B вокруг оси X и в добавок под углом 45 градусов.  Как подобное описать в редакторе постпроцессоов? 

 

Недавно наткнулся на тему, где описывалась подобная кинематика. Думаю будет полезно.

 

http://cccp3d.ru/topic/56922-sinumerik-840d/?hl=%2B%D0%BF%D0%BE%D0%B2%D0%BE%D1%80%D0%BE%D1%82+%2B%D1%81%D1%82%D0%BE%D0%BB%D0%B0#entry536642

[Schumacher 1]

Помогите написать постпроцессор в Пре

http://cccp3d.ru/topic/69638-ermaksan-fibermak-20003x15-postprotcessor/