Creo Elements/Direct软件lisp汇总（不断更新中）
本帖最后由 Superman 于 2021-11-2 17:52 编辑本贴汇总CreoElements/Direct（CoCreate）软件各类lisp，说明如下：
1.按照用途分类为：3D lisp（建模、草绘增强、测量等Modeling环境下使用）和2D lisp（工程图）2.简单功能描述和实用性指数推荐，方便了解lisp的功能3.复杂一些的提供使用教程（简单的就不提供教程）4.此帖会不定时更新新的lisp5.如没有你想要的lisp可以留言，或有好的lisp，也可以分享给大家
人人为我，我为人人，希望看到更多的OSD用户分享自己的经验和资源，协助其他人解决技术问题
（ps：吐槽一下，从社区的活跃度看，大部分OSD兄弟们只喜欢做一个看客，保持沉默，无人发帖提问，也无意帮助其他人解决问题）
一：3D lisp
1.3D建模增强
（1）3D文字功能描述：输入英文字母或数字，自动创建高度为10mm的3D字母或数字实体。不支持汉字。这个功能就是将“文本转轮廓”和“拉伸”命令整合一起了。如需要创建3D汉字，也可通过“文本转轮廓”命令创建2D汉字轮廓，再通过拉伸创建3D汉字。使用教程：https://www.addskills.cn/thread-216-1-1.html下载lisp：实用指数：⭐
（2）沉槽功能描述：圆柱体交接处创建沉槽，有E、F、G、H四种类型可选。使用教程：https://www.addskills.cn/thread-217-1-1.html下载Lisp：实用指数：⭐⭐
（3）齿轮功能描述：输入相应的尺寸参数，可自动生成齿轮，可生成直齿轮、斜齿轮、锥齿轮、行星齿轮。使用教程：https://www.addskills.cn/thread-220-1-1.html下载Lisp：实用指数：⭐⭐⭐⭐⭐
（4）弹簧功能描述：可创建三类弹簧，压缩弹簧、拉伸弹簧、矩形压缩弹簧使用教程：https://www.addskills.cn/thread-222-1-1.html下载Lisp：
实用指数：⭐⭐⭐⭐⭐
（5）管件piping功能描述：可以创建圆形和矩形管件，可创建直线型和弯曲型样式。使用教程：https://www.addskills.cn/thread-230-1-1.html下载lisp: 实用指数：⭐
（6）L型材功能描述：创建标准的L型材，整合“草绘”和“拉伸”命令，一个命令创建标准L型材。使用教程：使用简单，已翻译为中文界面，不做教程说明。下载lisp：实用指数：⭐
（7）螺丝孔功能描述：快速创建标准的螺丝孔，M3-M16，沉头、盲孔、通孔三种类型。
特别说明：如临时导入，必须通过打开命令导入，不能通过拖入的方式，否则无法显示。与新版本的Machining相同。下载lisp：实用指数：⭐⭐⭐⭐⭐
（8）特征阵列功能描述：对结构特征做阵列，可圆形、直线、自由阵列。CoCreate没有直接特征阵列的命令，非常推荐的一个命令。使用教程：https://www.addskills.cn/thread-232-1-1.html下载lisp：实用指数：⭐⭐⭐⭐⭐
（9）创建圆柱/锥体功能描述：创建圆柱体和圆锥体使用教程：使用简单，不做说明下载lisp：实用指数：⭐
（10）旋转复制叠加功能描述：对零件或组件进行旋转复制，有共享和复制两种模式。虽然是对零件/组件进行旋转复制的，但配合布尔运算命令，也可用于设计一些特征造型。所以，不仅仅只用于零件/组件。使用教程：https://www.addskills.cn/thread-235-1-1.html下载lisp：实用指数：⭐⭐⭐
2.工作平面
（1）重心处创建工作平面功能描述：在零件重心（质心）处创建工作平面，多了一个创建工作平面的方法。使用教程：下载lisp：实用指数：⭐⭐⭐⭐
3.2D草绘
（1）2D CAD(dwg/dxf)导入功能描述：导入2D dwg/dxf档至工作平面，18版开始可以直接通过“打开”命令实现，但对于17版及更早的版本，这个功能特别实用。使用教程：https://www.addskills.cn/thread-71-1-1.html下载lisp： 实用指数：⭐⭐⭐⭐
（2）2D等分线功能描述：创建等分线，直接输入需要等分的份数即可。一次创建所有的等分线，很直观。默认的等分线工具一次只能创建一条线。使用教程：Segments:等分数量，接着点击需等分的直线两个端点，1.Point和2.Point即可。下载lisp：实用指数：⭐⭐⭐
（3）FlateRotate扁平旋转
功能描述：指定中心点、基准点、角度、数量，沿着中心点和基准点旋转指定的角度，复制相应数量的2D图形。使用教程：https://www.addskills.cn/thread-241-1-1.html下载lisp：实用指数：⭐⭐⭐
（4）弧形文字功能描述：沿着指定的圆弧，创建沿圆弧的文字。使用教程：https://www.addskills.cn/thread-254-1-1.html下载lisp：实用指数：⭐⭐⭐
（5）正多边形功能描述：创建正多边形，此功能在新版本中已增加，适合17版等老版本用户使用。使用教程：https://www.addskills.cn/thread-254-1-1.html下载lisp：实用指数：⭐⭐⭐
4.保存
（1）20.1/20.0/19.0/18.1高级版保存17及以下低版本功能描述：高版本保存低版本，软件默认可以向下保存1个版本，此lisp可以保存v13-v19，几乎所有的版本都可以保存
使用教程：https://www.addskills.cn/thread-342-1-1.html下载lisp：实用指数：⭐⭐⭐⭐⭐
（2）保存PKG+JPG缩略图功能描述：同时保存pkg+jpg缩略图，通过jpg缩略图，快速分辨是什么零件使用教程：https://www.addskills.cn/thread-342-1-1.html下载lisp： 实用指数： ⭐⭐⭐
5.测量
（1）标记边长小于或等于特定长度的边功能描述：输入的数值，标记边长小于或等于该数值的边使用教程：https://www.addskills.cn/thread-350-1-1.html下载lisp：实用指数：⭐⭐
（2）测量3D边缘角度功能描述：选择参考边，点击任意一条边，即可测量两条边之间的夹角使用教程：https://www.addskills.cn/thread-350-1-1.html下载lisp：实用指数：⭐⭐
（3）测量零件外形尺寸功能描述：选择零件，自动显示零件的长宽高外形尺寸使用教程：https://www.addskills.cn/thread-350-1-1.html下载lisp：实用指数：⭐⭐⭐⭐⭐
6.系统属性
(1)3D随机颜色功能描述：零件或装配体，自动随机改变颜色使用教程：下载lisp： 实用指数：⭐⭐⭐⭐⭐
(2)等级透明度功能描述：零件或装配体，按照选择的透明度显示。使用教程：下载lisp：实用指数：⭐⭐⭐
(3)分配密度颜色重量功能描述：设置零件的材料、密度、颜色、透明度，在一个命令里完成。使用教程：下载lisp：实用指数：⭐⭐⭐
(4)加锁和解锁功能描述：零件或组件，加锁和解锁，加锁可以防止被修改。使用教程：下载lisp：使用指数：⭐⭐⭐⭐⭐
(5)快速改名功能描述：零件或组件，快速改名。使用教程：下载lisp：实用指数：⭐⭐⭐⭐⭐
(6)零件名称英文大小写切换功能描述：零件或组件，名称大小写修改，三种方式可选。使用教程：下载lisp：实用指数：⭐⭐⭐
(7)搜寻几何分辨率功能描述：零件或组件，快速找出几何分辨率不一致的零件。使用教程：下载lisp：实用指数：⭐⭐⭐
8）搜索零件功能描述：快速查找零件，支持精确查找和模糊查找，一键查找曲面零件（破面零件)和3D曲线，非常实用的一个插件使用教程：https://www.addskills.cn/thread-291-1-1.html下载lisp:实用指数：⭐⭐⭐⭐⭐
7.其他3D Lisp
（1）零件或组件移动到0位置功能描述：零件或组件，移动到系统坐标系0点位置。实用教程：下载lisp：实用指数：⭐ 谢谢楼主分享 倪1833 发表于 2020-12-9 16:01
谢谢楼主分享
多多分享OSD软件的技术经验，有问题，可以在社区发帖提问 Superman 发表于 2020-12-9 16:23
多多分享OSD软件的技术经验，有问题，可以在社区发帖提问
我们公司有些lsp文件，怎么把他们移植到家里，还有些是2d的
倪1833 发表于 2020-12-9 16:51
我们公司有些lsp文件，怎么把他们移植到家里，还有些是2d的
这个看起来不像是独立的lisp，这种我也不确定能否移植。或者是有加密保护的，这种就无法移植了。帖子里的这种独立lisp可以随意导入任何CoCreate软件 有个在osd.de上下载的lsp文件（anslist_invert.lsp）， 是转换反向隐藏/显示 零件的，为什么在17版本里可以加载，在19版本不能加载呢？
这个对应我之前上传的图片的按钮是 "invert structurelist".
请指点一下，谢谢！
//////////////////////////////////////////////////////
(in-package :custom)
(use-package :OLI)
;;--------------------------------------------------------------------------*
(sd-defdialog 'dc4-ansichtsliste-invertieren-dialog
:dialog-title "Invertiere Ansichtsliste"
:toolbox-button t
;;:dialog-control :sequential
:variables
'(
)
:local-functions
'(
(invert-action ()
(let (sichtblist sichtb)
(setf sichtblist (sd-inq-vp-drawlist-objects (oli::sd-inq-current-vp)))
(uic_draw_all (oli::sd-inq-current-vp))
(dolist (sichtb sichtblist)
(sd-call-cmds (remove_from_vp_drawlist (oli::sd-inq-current-vp) :with-wp sichtb))
);;dolist
);;let
)
)
:ok-action
'(sd-call-cmds (invert-action))
:help-action '()
)
/////////////////////////////////////////// 本帖最后由 Superman 于 2020-12-11 13:50 编辑
倪1833 发表于 2020-12-11 12:43
有个在osd.de上下载的lsp文件（anslist_invert.lsp）， 是转换反向隐藏/显示 零件的，为什么在17版本里可以 ...
将17版lisp原档上传一下，我测试一下。另外这个lisp的功能是显示和隐藏零件吗？ 是的，是反向显示隐藏，把显示的隐藏，把隐藏的显示吧。
我公司的的那个是直接按那个钮就行了，它这个加了个对话框。 倪1833 发表于 2020-12-11 13:53
是的，是反向显示隐藏，把显示的隐藏，把隐藏的显示吧。
我公司的的那个是直接按那个钮就行了，它这个加了 ...
我这边20.1版测试没有问题，正常19.0版本也是可以的
好的，我回家试试