乐筑天下

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

[编程交流] 旧lisp文件有问题

[复制链接]

1

主题

2

帖子

1

银币

初来乍到

Rank: 1

铜币
5
发表于 2022-7-6 07:51:21 | 显示全部楼层 |阅读模式
这是几年前写的,从那以后就没有太多的Lisp程序了。不确定问题是什么,但如果我记得R14的话,这是写的。不确定2010年发生了什么变化,但最近一次奏效是在2006年。
 
它所做的是将相交线3分别用于路缘后部、路缘面和路面边缘。您将开始输入半径,拾取路缘线的2条背面,以使用提供的半径进行圆角,将进行圆角,然后要求进行接下来的2次拾取,圆角半径由索引向上。5,创建圆角,然后拾取接下来的2条线,圆角半径向上索引1,创建圆角。
 
现在在2010年,我选择了两条线,第二条线高亮显示,没有圆角,它要求下一个选择。下面是代码
 
最终产品见图
 
085123xbb5zpjqb2zc4zp6.jpg
 
谢谢您的关注
 
肯特
回复

使用道具 举报

106

主题

1万

帖子

101

银币

顶梁支柱

Rank: 50Rank: 50

铜币
1299
发表于 2022-7-6 08:10:49 | 显示全部楼层
在不回答代码问题的情况下,更好的方法是,在第一个路缘上拖动一条线,然后穿过第二个路缘,输入半径宾果。使用该功能可以从INTERS lisp calc now VLCLOSESTSPOINTTO测量路缘线的间距,交点是供选择的圆角点。很多年前,我写了一个套路,你想写多少行就写多少行。这个想法是在一个选项中,通过拖动现有的墙线来简单地更改墙的大小。
 
我将寻找代码。
回复

使用道具 举报

106

主题

1万

帖子

101

银币

顶梁支柱

Rank: 50Rank: 50

铜币
1299
发表于 2022-7-6 08:31:15 | 显示全部楼层
尝试此代码未清理
 
  1. 1
回复

使用道具 举报

4

主题

2143

帖子

2197

银币

限制会员

铜币
-24
发表于 2022-7-6 08:44:30 | 显示全部楼层
请阅读代码发布指南并编辑您的帖子。
回复

使用道具 举报

1

主题

2

帖子

1

银币

初来乍到

Rank: 1

铜币
5
发表于 2022-7-6 08:55:34 | 显示全部楼层
谢谢你的代码,我会试试的。我想知道为什么我的不再有效。
 
肯特
回复

使用道具 举报

发表回复

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

本版积分规则

  • 微信公众平台

  • 扫描访问手机版

  • 点击图片下载手机App

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

GMT+8, 2025-3-9 21:44 , Processed in 0.581511 second(s), 65 queries .

© 2020-2025 乐筑天下

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