求一个CNC钻孔的程序。谢谢。

st788796 · 发表于 2014-4-2 18:20:40

又看了看程序，两个应用就是输入参数和输出格式不同，其它部分可以共用

ysq101 · 发表于 2014-4-2 18:37:42

ghoust 发表于 2014-4-2 18:11
这个自己用用还是可以的。前两天去深圳会展中心，看了下机械展，连这个视频里的机器都仿出来了。http://v ...

这个在模具行业里应该是有市场的啊。。。
价格不贵。。。实用。。。操作简单。。
记得收成的时候分一些给版主就好了{:soso_e100:}

看好你哦。。。。加油。。。。。。

ghoust · 发表于 2014-4-2 19:46:40

st788796 发表于 2014-4-2 18:20
又看了看程序，两个应用就是输入参数和输出格式不同，其它部分可以共用

是的，两个程序，应该是大同小异吧。可惜对LISP一窍不通，看了些基础，连门都不知道在哪里，，，，{:soso_e109:}

ghoust · 发表于 2014-4-2 19:49:53

ysq101 发表于 2014-4-2 18:37
这个在模具行业里应该是有市场的啊。。。
价格不贵。。。实用。。。操作简单。。
记得收成的时候分一些 ...

呵呵，要是真能成的话，那是必须为坛里做贡献的。如果真要这样做的话，顶多也就是朋友圈子里有的人，刚好用得上才需要。但这个只能打点，钻孔。干不了重活的。局限性太大了。

st788796 · 发表于 2014-4-2 21:01:56

先贴个用于输入的子函数，输入多了不如用 ODCL 写个界面

(defun _getinput (msg low up mmax sym / i)
(while
(and
(setq
i (getint
(if (eval sym)
(strcat "\n" msg "<" (vl-princ-to-string (eval sym)) ">: ")
(strcat "\n" msg ": ")
)
)
)
(progn (if mmax
(if (> i mmax)
(progn
(princ "\n超出最大值 ")
(princ mmax)
(princ " , 重新输入!")
t
)
)
)
(not (<= low i up))
)
)
)
(if (vl-symbolp sym)
(set sym i)
)
i
)

ghoust · 发表于 2014-4-2 22:08:57

st788796 发表于 2014-4-2 21:01
先贴个用于输入的子函数，输入多了不如用 ODCL 写个界面

对于程序不太懂了，在我想象中，有个界面应该方便些吧，但是不知道做个界面会不会增加很多难度，所以不敢要求太多。有您的LISP达到效果我都非常满意了。谢谢！

st788796 · 发表于 2014-4-3 10:11:26

ghoust 发表于 2014-4-2 22:08
对于程序不太懂了，在我想象中，有个界面应该方便些吧，但是不知道做个界面会不会增加很多难度，所以不敢 ...

写个这样的 OpenDCL 界面吧

XDSoft · 发表于 2014-4-3 10:15:09

st788796 发表于 2014-4-3 10:11
写个这样的 OpenDCL 界面吧

对于数据交互很多的，还是有个对话框界面用户体验更好。

ysq101 · 发表于 2014-4-3 14:30:55

ghoust 发表于 2014-4-2 22:08
对于程序不太懂了，在我想象中，有个界面应该方便些吧，但是不知道做个界面会不会增加很多难度，所以不敢 ...

哈哈。。。对话框写得这么专业ST大大应该跟你私下交流过吧。。。

支持。。。加油。。。
模具行业需要你这样的人才

ghoust · 发表于 2014-4-3 15:06:43

st788796 发表于 2014-4-3 10:11
写个这样的 OpenDCL 界面吧

这个看上去太高端大气上档次了。可以说是我梦寐以求的吧。。看着真亲切啊。想象中的东西一步一步在实现，这Fell倍儿爽！
另：ST大师，能不能在每个参数类型下面或者后面加上参数的输入范围，这样方便使用和参考。谢谢。

ghoust · 发表于 2014-4-3 15:10:27

ysq101 发表于 2014-4-3 14:30
哈哈。。。对话框写得这么专业ST大大应该跟你私下交流过吧。。。

支持。。。加油。。。

呵呵，我们还真没有交流过呢。ST大师能做出这样标准的界面呢，应该是经验太丰富了。写的东西多了，有的就自然水到渠成。我都不知道怎么表达，我需要一个什么样的对话框呢。VERY GOOD！

st788796 · 发表于 2014-4-3 15:12:07

对模具一窍不通，写了不少 Lsp，那些程序像楼主这样直接用在加工上还是第一次，兴趣而已:)

st788796 · 发表于 2014-4-3 15:15:43

本帖最后由 st788796 于 2014-4-3 15:22 编辑

ghoust 发表于 2014-4-3 15:06
这个看上去太高端大气上档次了。可以说是我梦寐以求的吧。。看着真亲切啊。想象中的东西一步一步在实现， ...

鼠标放在输入框时会弹出一个提示，范围和最大值，超出或者非法数据不会接受的

方式一方式二不知道叫什么更专业？

ghoust · 发表于 2014-4-3 15:24:24

st788796 发表于 2014-4-3 15:12
对模具一窍不通，写了不少 Lsp，那些程序像楼主这样直接用在加工上还是第一次，兴趣而已

你的兴趣确实帮了我很大的忙。用CAD外挂直接制做刀路，也是一时的灵感。记得以前刚开始用CAD，都不会用外挂，连键盘简化命令都不会。
现在基本上不需要点任何图标了。然后对外挂也就产生兴趣了，试着去打开各种简单的LISP来看，很简单的那种，数字控制的地方能看出来而已，不过大部份是完全看不懂的。以前我会一点CNC编程，也能看懂G代码的大概意思，但是制做刀路的软件相对还是比较专业的。操作也比较麻烦。起码现在没有任何编程软件，能像现在这种操作方式那么简单讯速。虽然只能钻孔，但是我的需要也就是只需要钻孔。真的是太合适了。
我都在设想，如果能开发出基于CAD的CNC编程软件的话，应该有不少用户的。虽然不能编3D的，但是适合2D的也是有用户群的。能够简单的锣一槽和外形，在速度上比专业软件有优势。在学习上有优势，我觉得这样的软件或者外挂可以有。我第一个支持。

ghoust · 发表于 2014-4-3 15:30:08

st788796 发表于 2014-4-3 15:15
鼠标放在输入框时会弹出一个提示，范围和最大值，超出或者非法数据不会接受的

方式一方式二不知道叫 ...

我数了一下，需要用户控制的参数共六个。方式1和方式2可以直接改为：孔内排屑和孔外排屑。下面的孔内和孔外，可以取消了。悬浮参数提醒那个非常好。

账号		自动登录	找回密码
密码			立即注册

[编程申请] 求一个CNC钻孔的程序。谢谢。

点评

点评

点评

点评

点评

点评

点评

点评