大家有兴趣一起来制作一个自动寻边和寻中心器吗？

倦乐叟

jerrylong 发表于 2017-5-21 13:37
8 J4 N+ U# N. e2 b9 i" _8 V不是简单的改代码，因为寻边需要考虑刀具半径和对刀块的厚度两个因素，一两句话说不清楚，晚上我写好代码 ...

辛苦了
8 Y# ^6 \' {+ Z& z6 ^# e0 G3 y

yjlchnzz

学习一下，要是成功，就能双面雕刻了，妥妥的。。。
; V! |# d6 i) q0 Z0 x( E' n5 s3 b

倦乐叟

jerrylong 发表于 2017-5-21 13:07
还有，你主要是用在金属的工件，还是非金属的工件上？

非金属工件

jerrylong

倦乐叟 发表于 2017-5-21 14:28
* a8 C1 T# s. |# ~$ ^& F; B非金属工件

; l* L$ @( J+ x. P' k好的，那程序运行后会弹出两个对话框：1，要求填入刀具直径；2，要求填入对刀块厚度

倦乐叟

jerrylong 发表于 2017-5-21 14:33
好的，那程序运行后会弹出两个对话框：1，要求填入刀具直径；2，要求填入对刀块厚度

能不能把这两个数据固化在脚本里，尤其是“对刀块厚度”，
0 h" a0 z5 X7 H0 e6 L这个一般不会轻易更换的。
' a' P+ r* a, P) g3 h) z  `

jerrylong

倦乐叟 发表于 2017-5-21 16:29
% s; W# a6 Z- C  r8 }4 y能不能把这两个数据固化在脚本里，尤其是“对刀块厚度”，
& C; k+ f1 K. e" J7 g& ^7 Q: ~; h这个一般不会轻易更换的。

这个可以，但通用性就不强，别人用时没有点VB基础的不知道如何改

倦乐叟

jerrylong 发表于 2017-5-21 17:34
7 z" s! U' J2 ~0 _6 H- U这个可以，但通用性就不强，别人用时没有点VB基础的不知道如何改

标注一下就行，对话框太多也麻烦
( V, P  I- o5 f

倦乐叟

jerrylong 发表于 2017-5-21 17:34
这个可以，但通用性就不强，别人用时没有点VB基础的不知道如何改

5 ~, [6 n% P$ c3 U- f- q另外，你看，
在你发布VB脚本以前，大概所有人的Z轴对刀数据都是固化在脚本里的。

only5784

不知为嘛，下了那个xy对刀程序，不是按照录像上面走的，按下y以后，x方向走到对刀块，就停止了，稍微等一下，方向不变继续走，把对刀块都推老远了，正常的应该急速后退，然后y方向25.4mm再x方向25.4mm后再对y轴。不明白了

倦乐叟

only5784 发表于 2017-5-21 18:15
  Q$ ?; A6 d7 a# a5 p/ a' w不知为嘛，下了那个xy对刀程序，不是按照录像上面走的，按下y以后，x方向走到对刀块，就停止了，稍微等一下 ...

. {0 n7 E+ G% J9 m; P在哪里下的？
2 G; ~) d. r( j  P/ ~! e

lzqwq

很敬佩力主老师，技术这么高，主要是无私分享解答，我没用MACH3，但对这个很想学，谢谢楼主老师

jerrylong

今天写了四段代码，分别对应X+、X-、Y+、Y-，由于机器没在手边，所以没有测试，大家帮忙测试一下，有问题贴上来，我再修改
X 探测.rar (1.07 KB, 下载次数: 19)

2017-5-21 21:05 上传

点击文件名下载附件

X-探测.rar (1.07 KB, 下载次数: 15)

2017-5-21 21:05 上传

点击文件名下载附件

8 Z4 X( c8 f! i) m/ ? Y 探测.rar (1.08 KB, 下载次数: 15)

2017-5-21 21:06 上传

点击文件名下载附件

" C, a9 v& j" G( R9 T Y-探测.rar (1.09 KB, 下载次数: 15)

2017-5-21 21:06 上传

点击文件名下载附件

1 x1 K5 r* d) w: A, |4 Z

jerrylong

为了通用性，我还是采用对话框，如果觉得麻烦，就把具体的数值替换对话框那行的代码，我都做了详细的注释，应该很容易找到。

倦乐叟

先下载了，这几天不在家，恐怕要过几天试了。
谢谢

倦乐叟

jerrylong 发表于 2017-5-21 21:06
今天写了四段代码，分别对应X+、X-、Y+、Y-，由于机器没在手边，所以没有测试，大家帮忙测试一下，有问题贴 ...

/ q/ k. f3 O$ z老兄啊，这个格式打不开啊
. u. ^1 T; v3 k, N1 j