现有凸轮外形，要把数据采集，有没有好的方法

股海一客 · 发表于 2014-10-29 13:40:04

xhq1954425 发表于 2014-10-26 09:14 static/image/common/back.gif! V. I7 C) ?1 M, y- B1 j' H
我不厉害，二次开发只是业余爱好，本人是从事制图教学工作

哦！看你离教授不远了啊

xhq1954425 · 发表于 2014-10-29 13:50:28

股海一客发表于 2014-10-29 13:40 static/image/common/back.gif
) |: @' W8 x. \) G. w; E& H) A哦！看你离教授不远了啊

什么叫离教授不远了？是0距离……

xhq1954425 · 发表于 2014-10-29 13:55:08

txh007 发表于 2014-10-27 12:33 static/image/common/back.gif- j. `# H) b5 _
就是这样的
1 u0 a7 }0 X4 L- p- V7 [: A% j就是把精度为小数点后的第4位如100.6666
) Z, U9 o# D4 k% C谢谢，高手啊

发上来了，如果复制数据还有不便之处，可以再改动……

计算凸轮曲线上点数据存入记事本.zip (1.12 KB, 下载次数: 15)

股海一客 · 发表于 2014-10-29 14:12:49

xhq1954425 发表于 2014-10-29 13:50 static/image/common/back.gif
: ~7 ?1 w9 m6 U4 M什么叫离教授不远了？是0距离……

教授

txh007 · 发表于 2014-10-29 21:42:04

xhq1954425 发表于 2014-10-29 13:55 static/image/common/back.gif5 `) f- _* w9 G/ G
发上来了，如果复制数据还有不便之处，可以再改动……

已经下了，但我不知道怎么弄

xhq1954425 · 发表于 2014-10-30 01:29:12

txh007 发表于 2014-10-29 21:42 static/image/common/back.gif) X4 Y1 x5 j/ p/ d
已经下了，但我不知道怎么弄

尽管我编写这样的程序是举手之劳，可是你只少也得说点什么吧……？比如：

你要学的东西多着呢……

daji · 发表于 2014-10-30 07:15:47

Autocad 中加载教授的程序然后，输入tt,执行就行了。

xhq1954425 · 发表于 2014-10-30 08:40:06

daji 发表于 2014-10-30 07:15 static/image/common/back.gif
6 Q2 W8 U" ^0 F5 D7 I0 ~4 BAutocad 中加载教授的程序然后，输入tt,执行就行了。

估计这样告诉他他还是不明白，我教他个容易的拖拽加载法吧：
先把CAD界面最小化……
lisp拖拽加载法.gif

daji · 发表于 2014-10-30 09:43:56

这个凸轮看外形，估计可能是个控制用的如联控手柄或者类似自动车床上的，可能精度没有必要这样高

xhq1954425 · 发表于 2014-10-30 10:12:19

daji 发表于 2014-10-30 09:43 static/image/common/back.gif
6 t+ v9 P! _$ M* K, L3 A* U这个凸轮看外形，估计可能是个控制用的如联控手柄或者类似自动车床上的，可能精度没有必要这样高

他根本就没发图……

txh007 · 发表于 2014-10-30 12:43:39

xhq1954425 发表于 2014-10-30 01:29 static/image/common/back.gif
' `: V& W# v D D尽管我编写这样的程序是举手之劳，可是你只少也得说点什么吧……？比如： ...

高手我失礼了，补上我的谢意

:kiss::kiss:

:rose::rose:

txh007 · 发表于 2014-10-30 12:55:16

daji 发表于 2014-10-30 09:43 static/image/common/back.gif
" r' T$ y# w! O这个凸轮看外形，估计可能是个控制用的如联控手柄或者类似自动车床上的，可能精度没有必要这样高

这是高手自己画示意图

txh007 · 发表于 2014-10-30 14:54:07

xhq1954425 发表于 2014-10-30 10:12 static/image/common/back.gif
* h2 B1 d/ T- c6 N4 i+ J他根本就没发图……

帅哥，我试了怎么是个错误呢
命令:
命令: TT
选择凸轮曲线:
选择极轴直线:
选择凸轮中心点:; 错误: no function definition: VLAX-ENAME->VLA-OBJECT

xhq1954425 · 发表于 2014-10-30 15:28:05

本帖最后由 xhq1954425 于 2014-10-30 15:29 编辑

txh007 发表于 2014-10-30 14:54 static/image/common/back.gif
. q* X& @' ?7 D帅哥，我试了怎么是个错误呢
4 x5 L8 [/ w4 d. g7 F8 y命令:3 Z5 e: T1 u: c/ m7 ~
命令: TT

把(vl-load-com)加在程序第四行中后重加载一下！（注意不要自己打字，要复制使用）

;;;首先建立记事本文档，所采集的数据将存放于此
(defun c:tt()
  (setvar "cmdecho" 0)
  (vl-load-com)
  (setq nm (if (= (type nm) 'STR) nm ""))

xhq1954425 · 发表于 2014-10-30 15:33:23

本帖最后由 xhq1954425 于 2014-10-30 15:35 编辑

你还可以先带括号复制 (vl-load-com) ，然后粘贴到命令行中，再回一下车，然后再输入TT运行程序看看……

txh007 · 发表于 2014-10-30 20:41:52

xhq1954425 发表于 2014-10-30 15:33 static/image/common/back.gif' K7 D7 l( k8 x8 h
你还可以先带括号复制 (vl-load-com) ，然后粘贴到命令行中，再回一下车，然后再输入TT运行程序看看……

我成功了，现在可以出数据。那个激动啊，就像是做新郎一样。
我想问一下，出来的数据精度怎么到小数点后4位。
太谢谢你了。你来我绍兴新昌这边，在论坛里发个信息给我

txh007 · 发表于 2014-10-30 22:11:29

xhq1954425 发表于 2014-10-30 15:33 static/image/common/back.gif2 M4 F u4 w" C' x
你还可以先带括号复制 (vl-load-com) ，然后粘贴到命令行中，再回一下车，然后再输入TT运行程序看看……

你能帮我把这个凸轮数据能出来嘛，我们选择凸轮时不能框选，线条不能更改线条的性质，因为我们一改成多线段，他的实际轮廓线有变化了，我们组成块后，用你的小程序得到的数据比实际的大。这就是我们要用的修整后的凸轮，不能改变实际轮廓线的情况怎么得到凸轮数据?

xhq1954425 · 发表于 2014-10-31 09:27:46

本帖最后由 xhq1954425 于 2014-10-31 09:39 编辑

1.(print (list "角度=" m "极轴长度=" (atof (rtos(distance o Point) 2 4))) fp)的4就是要保留的4位数，接来的是3，自己改一下,把(vl-load-com) 也加到程序中（我的CAC是自动加载的，所以我忽略了这个问题）

2.你那个不会弄的凸轮曲线有一个断点没连上（有空隙的意思），先把它处理一下，然后合并成一条多段线后再用程序算就行了，这样简单的事应该自己做，看来你的功夫尚浅，应该系统地学一下。

		自动登录	找回密码
密码			注册

通知

[已解决] 现有凸轮外形，要把数据采集，有没有好的方法

浏览过的版块