乐筑天下

搜索
欢迎各位开发者和用户入驻本平台 尊重版权,从我做起,拒绝盗版,拒绝倒卖 签到、发布资源、邀请好友注册,可以获得银币 请注意保管好自己的密码,避免账户资金被盗
楼主: drafting_man

[编程交流] 样条lisp

[复制链接]

3

主题

11

帖子

8

银币

初来乍到

Rank: 1

铜币
15
发表于 2022-7-5 18:18:03 | 显示全部楼层
哇,你做到了,这就是我想要的
比;'你是天才
回复

使用道具 举报

51

主题

481

帖子

457

银币

后起之秀

Rank: 20Rank: 20Rank: 20Rank: 20

铜币
262
发表于 2022-7-5 18:23:45 | 显示全部楼层
alanjt公司
感谢更新
在这种情况下,需要保留原始版本并在新帖子中发布更新。这是给初学者(和我一样)学习如何避免逗号。
 
再次感谢
回复

使用道具 举报

54

主题

3755

帖子

3583

银币

后起之秀

Rank: 20Rank: 20Rank: 20Rank: 20

铜币
438
发表于 2022-7-5 18:26:39 | 显示全部楼层
欢迎你,祝你愉快。
 
说得好。我用红色标记了更新的部分。
 
Trans信息:
 
回复

使用道具 举报

51

主题

481

帖子

457

银币

后起之秀

Rank: 20Rank: 20Rank: 20Rank: 20

铜币
262
发表于 2022-7-5 18:30:20 | 显示全部楼层
是更新吗
  1. (vl-cmdf "_non"(trans p 0 1))

代替
  1. (vl-cmdf "_non" p)

不是吗
 
我想的是?
 
  1. ;(vl-cmdf "_non" p) for non UCS
  2. (vl-cmdf "_non" (trans p 0 1)) ;update

 
这两个版本之间的差异很明显。
回复

使用道具 举报

54

主题

3755

帖子

3583

银币

后起之秀

Rank: 20Rank: 20Rank: 20Rank: 20

铜币
438
发表于 2022-7-5 18:32:02 | 显示全部楼层
正确,唯一的改变。由于我对样条曲线使用命令,我必须将vlax曲线返回的点从wcs转换为ucs。
回复

使用道具 举报

51

主题

481

帖子

457

银币

后起之秀

Rank: 20Rank: 20Rank: 20Rank: 20

铜币
262
发表于 2022-7-5 18:34:16 | 显示全部楼层
alanjt公司
不仅仅是变化
但再次张贴整个代码,并用不同的颜色备注更改或复制同一行并添加;线路旁边
 
例如,这是第一篇文章的一部分
  1.                       )
  2.                    )
  3.                     -1
  4.                   )
  5.                   (function (lambda (a b) (< (car a) (car b))))
  6.                 )
  7.        (vl-cmdf "_non" p)
  8.      )
  9.      (vl-cmdf "" "" "")
  10.    )

 
第二次发布(或更新)
  1.                       )
  2.                    )
  3.                     -1
  4.                   )
  5.                   (function (lambda (a b) (< (car a) (car b))))
  6.                 )
  7.        (vl-cmdf "_non" [color=red](trans p 0 1)[/color])
  8.      )
  9.      (vl-cmdf "" "" "")
  10.    )
回复

使用道具 举报

51

主题

481

帖子

457

银币

后起之秀

Rank: 20Rank: 20Rank: 20Rank: 20

铜币
262
发表于 2022-7-5 18:37:05 | 显示全部楼层

  1.                       )
  2.                    )
  3.                     -1
  4.                   )
  5.                   (function (lambda (a b) (< (car a) (car b))))
  6.                 )
  7.        ;(vl-cmdf "_non" p)
  8.        (vl-cmdf "_non" [color=red](trans p 0 1)[/color]) ; updated to avoid UCS
  9.      )
  10.      (vl-cmdf "" "" "")
  11.    )
回复

使用道具 举报

24

主题

1265

帖子

1028

银币

后起之秀

Rank: 20Rank: 20Rank: 20Rank: 20

铜币
362
发表于 2022-7-5 18:39:58 | 显示全部楼层
 
...偷来的,我的意思是复制到这里。
回复

使用道具 举报

54

主题

3755

帖子

3583

银币

后起之秀

Rank: 20Rank: 20Rank: 20Rank: 20

铜币
438
发表于 2022-7-5 18:44:01 | 显示全部楼层
lol.酷。
.
回复

使用道具 举报

16

主题

69

帖子

54

银币

初露锋芒

Rank: 3Rank: 3Rank: 3

铜币
80
发表于 2022-7-5 18:46:32 | 显示全部楼层
 
我假设“Greate”是我不熟悉的一种外语。但是,如果这是英文的,您可能需要更新帖子标题。
 
 
**编辑**
谢谢你的发帖,顺便说一句。这些博客帖子正是最初帮助我编写LISP代码的类型。
回复

使用道具 举报

发表回复

您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

  • 微信公众平台

  • 扫描访问手机版

  • 点击图片下载手机App

QQ|关于我们|小黑屋|乐筑天下 繁体中文

GMT+8, 2025-3-12 23:26 , Processed in 0.389205 second(s), 70 queries .

© 2020-2025 乐筑天下

联系客服 关注微信 帮助中心 下载APP 返回顶部 返回列表