Данные инструмента в коментариях

[elmar_fsapr2000 1]

Здравствуйте форумчане!

 

Сейчас в УП в начале выводятся такие данные

( T4 | | H4 )

( T8 | | H8 )

 

Как изменить постпроцессор чтобы выводилась более полная информация об используемом инструменте.

Примерно так

 

( T4 | | H4  end mill d20)

( T8 | | H8 ball end emill d20r10)

Изменено 31 января 2014 пользователем elmar_fsapr2000

[elmar_fsapr2000 1]

 

 

Здравствуйте форумчане!

 

Сейчас в УП в начале выводятся такие данные

( T4 | | H4 )

( T8 | | H8 )

 

Как изменить постпроцессор чтобы выводилась более полная информация об используемом инструменте.

Примерно так

 

( T4 | | H4  end mill d20)

( T8 | | H8 ball end emill d20r10)

 

 

Попробовал все 4 варианта, но тип инструмента в коментарии не выводится, то есть не ясно концевая, радиусная или коническая эта фреза. Или же это сверло :-)

Изменено 1 февраля 2014 пользователем elmar_fsapr2000

[Ander 122]

Не знаю как там думает процессор, но у меня выводится то, что записано в описании инструмента (там где по дефолту скорости, подачи, название .........)

[elmar_fsapr2000 1]

И куда все это вписать в постпроцессоре?

[MadCombat 1]

 

Все комментарии инструментов в постпроцессоре!

 

 

# --------------------------------------------------------------------------

# Tool Comment / Manual Entry Section

# --------------------------------------------------------------------------

ptoolcomment    #Comment for tool

      tnote = t$, toffnote = tloffno$, tlngnote = tlngno$

      if tool_info = 1 | tool_info = 3,

        sopen_prn, pstrtool, sdelimiter, *tnote, sdelimiter, *toffnote, sdelimiter, *tlngnote, sdelimiter, *tldia$, sclose_prn, e$

 

ptooltable      #Tooltable output

      sopen_prn, *t$, sdelimiter, pstrtool, sdelimiter, *tlngno$, sdelimiter, *tloffno$,

        #[if comp_type > 0 & comp_type < 4, sdelimiter, *tloffno$, sdelimiter, *scomp_type, sdelimiter, *tldia$],

        #[if xy_stock <> 0 | z_stock <> 0, sdelimiter, *xy_stock, sdelimiter, *z_stock],

        sclose_prn, e$

      xy_stock = 0  #Reset stock to leave values

      z_stock = 0   #Reset stock to leave values

 

pstrtool        #Comment for tool

      if strtool$ <> sblank,

        [

        strtool$ = ucase(strtool$)

        *strtool$

        ]

 

pcomment$       #Comment from manual entry (must call pcomment2)

      pcomment2 #Required if doing boolean 'if' logic testing!

 

pcomment2       #Output Comment from manual entry

      scomm$ = ucase (scomm$)

      if gcode$ = 1005, sopen_prn, scomm$, sclose_prn, e$  #Manual entry - as comment

      if gcode$ = 1006, scomm$, e$                         #Manual entry - as code

      if gcode$ = 1007, sopen_prn, scomm$, sclose_prn      #Manual entry - as comment with move NO e$

      if gcode$ = 1026, scomm$                             #Manual entry - as code with move NO e$

      if gcode$ = 1008, sopen_prn, scomm$, sclose_prn, e$  #Operation comment

      if gcode$ = 1051, sopen_prn, scomm$, sclose_prn, e$  #Machine name

      if gcode$ = 1052, sopen_prn, scomm$, sclose_prn, e$  #Group comment

      if gcode$ = 1053, sopen_prn, scomm$, sclose_prn, e$  #Group name

      if gcode$ = 1054, sopen_prn, scomm$, sclose_prn, e$  #File Descriptor