G68.2UG后處理

linlilun.love

謝謝，正需要！

czflitrocs2020

你好我好大家好

老郭工作室

向老大學(xué)習(xí)，看看自己能搞到點(diǎn)什么東西出來(lái)

SPDXCNFCNF

· UG精品后處理· UG精品后處理

lin林

見(jiàn)識(shí)見(jiàn)識(shí)。。。

meklonull

global mom_kin_machine_type
6 I$ Z6 h8 A% f* Z  global mom_kin_4th_axis_type mom_kin_4th_axis_plane
  global mom_kin_5th_axis_type
; F+ b9 [- ^9 k' N* F# E$ n  global mom_tool_axis mom_sys_spindle_axis mom_kin_spindle_axis
: O4 }, s; q! c5 [) d) `4 \/ g9 {, u  global mom_pos
* h# N3 V5 l. ^! z  global mom_cycle_spindle_axis mom_cutcom_plane mom_pos_arc_plane
/ g1 z! c& w  \+ O/ L9 Q7 t3 C' s2 U1 x
  Y, ?7 T+ N$ L9 o
# Default cycle spindle axis to Z
5 V* H+ i4 L$ L  }( e8 t& d' A: N  set mom_cycle_spindle_axis 2
- x: I$ S6 u: @9 @8 x( j" i
1 Y! ?) H$ G0 a6 F0 O" D: X3 M
% m, h8 g5 Y7 O3 L+ k0 Y  if { ![string match "*3_axis_mill*" $mom_kin_machine_type] } {
  q9 F8 r% E8 ]: R
- [$ _! N6 H5 q$ j0 O3 R* U    if { $mom_kin_4th_axis_type == "Head" } {

      if [EQ_is_equal [expr abs($mom_tool_axis(0))] 1.0] {
0 R, E1 l, V0 D; u- u7 Z        set mom_cycle_spindle_axis 0
      }

) g6 d/ V6 k- g+ j$ D1 m; \2 Q/ g# ^      if [EQ_is_equal [expr abs($mom_tool_axis(1))] 1.0] {
        set mom_cycle_spindle_axis 1
      }

( z: n) j+ c* l      if { $mom_kin_5th_axis_type == "Table" } {
( N* B0 n# C& V. c
+ ~9 `4 g& c$ Z        if { [EQ_is_equal [expr abs($mom_pos(3))] 90.0] || [EQ_is_equal [expr abs($mom_pos(3))] 270.0] } {

          switch $mom_kin_4th_axis_plane {
( ~/ v6 m" z& S* x/ [* ]9 B. g            "YZ" {
' b: ]2 e8 J1 }  n# d              set mom_cycle_spindle_axis 1
            }
% _% o* d: h/ G6 M' |            "ZX" {
              set mom_cycle_spindle_axis 0
  {7 [" c! J  f+ X3 b, |! b$ ]" F            }
5 t# y8 f. l; y) E          }
        }
      }
    }
  }


7 S6 s  B. I! t( d" z3 K' K  switch $mom_cycle_spindle_axis {
0 g4 W) |2 ^1 E* S7 F    0 {
      set mom_cutcom_plane  YZ
      set mom_pos_arc_plane YZ
      set principal_axis X
9 Z" [0 X0 X1 u% R& h5 A- S- @& g    }
9 R. Y5 I3 p+ O: f7 Q! t    1 {
      set mom_cutcom_plane  ZX
' D& A, ~) y) F. @0 r4 t      set mom_pos_arc_plane ZX
9 t/ z7 W: @8 i: h      set principal_axis Y
    }
    2 {
      set mom_cutcom_plane  XY
      set mom_pos_arc_plane XY
; ^4 y  {9 _; Z) D" f      set principal_axis Z
    }
1 y( ~4 R8 g* s* P' r# R+ q    default {
      set mom_cutcom_plane  UNDEFINED
  V: F6 N  S" L) f+ n" E  v      set mom_pos_arc_plane UNDEFINED
$ C+ O$ o3 }/ n5 y      set principal_axis ""
    }
  }

; d+ r8 |1 t1 n: l4 o
* l- a4 k* r$ t- [- W  if { $suppress_principal_axis && [string length $principal_axis] > 0 } {
    MOM_suppress once $principal_axis
  }

$ h3 B6 Z1 C5 ~
% _( g2 |* E' D, f9 L$ z6 S  v$ u, p  if { $force_plane_code } {
0 B8 E7 G8 r% N6 G: Y    global cycle_init_flag
9 _7 J" D8 Q! d- M9 |; f; k
, m' c2 `8 z* c  h" F! F  f    if { [info exists cycle_init_flag] && [string match "TRUE" $cycle_init_flag] } {
      MOM_force once G_plane
' \+ @0 m9 q! e, Z# P1 {2 k5 C    }
  }

廖小皮

謝謝分享...........

286867264

多謝大佬分享試試看

dushiyu

支持版主 謝謝

jimmylin5521

謝謝大大分享