G68.2UG后處理

18292556657

支持網站，支持版主，謝謝分享

18292556657

支持版主，謝謝分享，研究學習

謝寒送

感謝擼主感謝擼主感謝擼主

初學者JJ

支持版主大人

linlilun.love

謝謝，正需要！

czflitrocs2020

你好我好大家好

老郭工作室

向老大學習，看看自己能搞到點什么東西出來

SPDXCNFCNF

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

lin林

見識見識。。。

meklonull

global mom_kin_machine_type
  global mom_kin_4th_axis_type mom_kin_4th_axis_plane
  global mom_kin_5th_axis_type
- I7 U( p0 |: _% b  [9 r. _8 i6 [  global mom_tool_axis mom_sys_spindle_axis mom_kin_spindle_axis
4 |7 m0 _  C! G# D/ _8 R7 v+ c; P  global mom_pos
3 b- e- Z# H& \+ \2 P, ?/ N2 a. R  global mom_cycle_spindle_axis mom_cutcom_plane mom_pos_arc_plane
4 Z6 J1 P4 H1 E# S

# Default cycle spindle axis to Z
  set mom_cycle_spindle_axis 2


# y  R# M) b# A" _: [) d  if { ![string match "*3_axis_mill*" $mom_kin_machine_type] } {
: s6 y/ ?9 `6 S9 s" g( U3 b1 S
) E" p! v. U* M9 ^4 K+ r8 W6 z0 a    if { $mom_kin_4th_axis_type == "Head" } {

      if [EQ_is_equal [expr abs($mom_tool_axis(0))] 1.0] {
        set mom_cycle_spindle_axis 0
      }

' ^) Z, G% K, Y- Z0 M3 m& I      if [EQ_is_equal [expr abs($mom_tool_axis(1))] 1.0] {
        set mom_cycle_spindle_axis 1
. S' P0 u2 s" d" b5 N0 _8 U      }

: J: L) O/ B4 y3 H8 B' R" q0 o8 g      if { $mom_kin_5th_axis_type == "Table" } {

! G/ t8 m9 r# x- Z" x        if { [EQ_is_equal [expr abs($mom_pos(3))] 90.0] || [EQ_is_equal [expr abs($mom_pos(3))] 270.0] } {
2 J8 S! g, n+ z; k9 H2 v
          switch $mom_kin_4th_axis_plane {
            "YZ" {
6 [! x  o& K8 E( E              set mom_cycle_spindle_axis 1
% I: G' t7 A' ?+ F: B8 z3 @# b+ {            }
            "ZX" {
              set mom_cycle_spindle_axis 0
            }
          }
        }
7 j: D, H, u5 r, O2 A3 N, Q1 H      }
    }
3 L$ h4 l' t; s" a, J  }


  switch $mom_cycle_spindle_axis {
" V# R# @- Z7 B    0 {
      set mom_cutcom_plane  YZ
) M, I! W, v6 a+ |2 Q      set mom_pos_arc_plane YZ
      set principal_axis X
3 \8 Y# P; L" D7 u: x' b    }
    1 {
3 T" U9 S/ k3 C6 s      set mom_cutcom_plane  ZX
      set mom_pos_arc_plane ZX
. V( I& k: Y: E# i0 W      set principal_axis Y
    }
6 j3 |0 |$ Z- J& C6 g9 k5 n    2 {
8 p& ]8 s* v6 i/ Y) ~; r      set mom_cutcom_plane  XY
      set mom_pos_arc_plane XY
      set principal_axis Z
    }
    default {
      set mom_cutcom_plane  UNDEFINED
: w0 w$ O* ^. r" Y' ^7 B      set mom_pos_arc_plane UNDEFINED
      set principal_axis ""
7 @% v6 B: Y6 m! u2 W: l7 z    }
/ A' C1 e4 k9 g8 \* k  }
9 Y' s* \; m% Q- e2 y9 V1 z
$ p) J/ Z& {% v& l* S
  if { $suppress_principal_axis && [string length $principal_axis] > 0 } {
: U  \' o/ q' ~% n9 V    MOM_suppress once $principal_axis
  }

! A: x3 l0 C) d. y1 J# q$ t' o
# n* k+ N; j$ i+ R3 G  if { $force_plane_code } {
    global cycle_init_flag

3 h1 v; j( M' |$ a    if { [info exists cycle_init_flag] && [string match "TRUE" $cycle_init_flag] } {
; b' N  m& ^( d3 A% j, P      MOM_force once G_plane
! G) F* ^/ M0 N+ _: a  |    }
  }