很久没上来了，发个Multi-line

alexsum · 发表于 2008-7-26 11:53:08

马上注册，结识高手，享用更多资源，轻松玩转三维网社区。

您需要登录才可以下载或查看，没有帐号？注册

x

在OSD中用指令画线，不知道有没有用
大家看看，提提意见撒
应该直到怎么载入LISP吧？

提示：目前只有5种指令：
@x,y   相对直角坐标输入画线
<a,l     相对极坐标输入a角度l长度
#x,y     绝对直角坐标
c         封闭
b         返回上一步

测试测试……
另外附带了一个小功能，自己试试看咯

kting · 发表于 2008-7-27 12:35:48

alex的原创作品当然要测试一下啦，下啊.........

alexsum · 发表于 2008-8-1 17:25:27

居然没有人顶呀
果然没用么？
亏我还改进了一下，打算加入新功能。。。

kting · 发表于 2008-8-2 23:47:55

我想测试一下，就是没搞懂而已。
如加载后toolbox有两个命令为tran_c、cadline，这两个命令怎么使用，详细说明一下

alexsum · 发表于 2008-8-4 08:13:30

其实很简答了，不过最近发现后退指令有点问题已经修正。。
CADLINE就是在对话框中输入相对坐标画线的指令，有点类似AUTOCAD的方式吧，比如你输入@x，y就在相对的X,Y坐标画线，<A,L就是相对于当前点以一定角度和长度（极坐标）来画线，总之就是相对坐标啦。

kting · 发表于 2008-8-4 22:17:52

起点定义呢？另外一个指令trans-c是干什么的？

alexsum · 发表于 2008-8-5 08:47:03

你下新的这个程序就直到怎么定义起点了，当时没考虑到。。。
另外一个是用来补充OSD画过以点和直线相切的圆不能定义切左边还是右边的问题。

kting · 发表于 2008-8-5 11:42:12

ok，再试一下，感谢alex的分享！~赞一个

kting · 发表于 2008-8-5 20:29:56

alex,测试了一下，还是不太ok哦，看下图示意!~

alexsum · 发表于 2008-8-6 10:05:06

这个……我这边是OK的说。。。
你的OSD版本是多少？
如果是2006的话，你可以试一下附件里面的修改版。
另外附加一个LISP，可以在激活后，在OSD里面激活某个零件后在浏览栏中可以提示出来（不知道你的版本能不能用，测试下咯）

[ 本帖最后由 alexsum 于 2008-8-6 11:21 编辑 ]

kting · 发表于 2008-8-6 11:50:12

我用的是05版本v13.0.2，对lisp研究不深，也不知道什么原因

alexsum · 发表于 2008-8-6 13:50:24

很遗憾，05版貌似有几个函数不支持，我一般做lisp都是基于07版的，06也能用，05就难了。
那么后来的这个LISP能用不？帮忙看看05能不能用。

kting · 发表于 2008-8-6 20:54:34

同样测试过，在05版本上用不了，而pickpart指令可以执行，就是点part的时候没任何反映

wenqian135 · 发表于 2008-9-17 09:10:48

沒看懂到底在說什麼。。。呵呵

bigmicro · 发表于 2008-9-17 10:24:30

大大
請問一下
如果用錄製巨集的方式
一樣可以達到這個方式吧
我比較笨
都用錄製巨集的方式來做

[ 本帖最后由 bigmicro 于 2008-9-17 10:31 编辑 ]

3dmad · 发表于 2008-9-17 16:56:23

查过了,2005版本时还没有SD-READ-FROM-STRING LISP指令.所以2006版本或之后,才能用这WPS.LSP.

[ 本帖最后由 3dmad 于 2008-9-17 16:59 编辑 ]

3dmad · 发表于 2008-9-17 19:42:39

在08版试了,
-是咯,pickpart指令可以执行，点part没有反应.
-cadline指令的确不错. good

alexsum · 发表于 2008-9-22 13:33:04

原帖由 3dmad 于 2008-9-17 16:56 发表 http://www.3dportal.cn/discuz/images/common/back.gif9 B0 A- }; @# ^. T+ r& {6 \* I: ?
查过了,2005版本时还没有SD-READ-FROM-STRING LISP指令.所以2006版本或之后,才能用这WPS.LSP.

如此的话倒是好办，用记事本搜索sd-read-from-string改成read-from-string就可以了，基本上这些关于string的指令在common lisp中都有对应。

3dmad · 发表于 2008-9-22 13:56:52

也是一个办法.不过,sd-read-from-string应该是read-from-string的改良版.

(sd-read-from-string string)
Description: Same as the standard Lisp function read-from-string except that this function can handle empty strings or strings with just space characters.

遇到空键时,是有分别的.
(display (read-from-string " "))
(display (oli::sd-read-from-string " "))

[ 本帖最后由 3dmad 于 2008-9-22 13:58 编辑 ]

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

通知

[原创] 很久没上来了，发个Multi-line

马上注册，结识高手，享用更多资源，轻松玩转三维网社区。

评分

回复 9# kting 的帖子

回复 13# kting 的帖子

回复 18# alexsum 的帖子

浏览过的版块