CoCreate沉頭孔設置不出來

Hi 這個是我收集來的lisp程式，然後進行修改，目前遇到的問題為沉頭孔的部分無法使用，想請教版上的高手協助我程式上的修正。

目前我是使用這一段作測試:
(creat_SDP3 ()
            (sd-call-cmds (mach_adv_library_counterbored_throughhole :action :create :SEL_FACE set_Face :hole_dia 3.5 :sink_dia 6.5 :sink_depth 3.5 :YES :cen_pnt SNT_POINT1) :FAILURE (setq Set_Face nil))
            (setq SNT_POINT1 nil)
      )

rapid_screw.lsp (42.98 KB, 下载次数: 3)