[编程申请]：求高手编制一个绘制公路竖曲线的Lisp

cdhua001 · 发表于 2004-6-15 13:47:48

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

×

　　本人在家里手工绘制公路竖曲线，想请编程高手帮个忙，编制一个绘制公路竖曲线的Lisp。
　　公路竖曲线是一条圆弧线，但是由于标准图要求Y方向放大10倍，因此就成了一个Y：X＝10：1的椭圆的一部分。

我的要求和示意图如下：

cdhua001 · 发表于 2004-6-15 14:20:22

DWG文件（2000格式）：

lhj743 · 发表于 2004-6-15 14:28:49

斑竹！
结合excel坐标绘制曲线已经很方便、快捷了，
我实在想不出有什么LSP程序能更好的替代！

cdhua001 · 发表于 2004-6-15 14:34:24

用EXCEL画还不如我现在用的笨办法准确哦：）
我现在是复制，粘贴为块（Y方向取0.1倍），圆角之后再次复制，粘贴为块（Y方向取10倍），炸开就完成了。

zuicai · 发表于 2004-6-15 14:41:32

我发一个，版主试试。

cdhua001 · 发表于 2004-6-15 15:04:02

谢谢zuicai长老，但你的程序太复杂了，我不是搞设计的，用不了那么复杂的程序。我一般就是画点竣工图什么的，本来可以用圆弧代替的，但我这个人有点吹毛求疵，我喜欢精确。所以才请编程高手帮忙。

我只想要一个简单的倒椭圆角的Lisp就行了。

再次感谢zuicai 长老！

maplesu · 发表于 2004-6-17 14:10:33

椭圆倒圆角！椭圆是任意方向吗？？
我先写了一个，长短轴的比例是y/x
且长短轴分别为x、y轴，还没有写完，现在可以画椭圆了
但是剪切还没有完成，你先看看怎么样！
需要输入的是，你道路需要的圆弧半径，和你y与x的比例就可以了！

cdhua001 · 发表于 2004-6-17 15:48:21

最初由 maplesu 发布
[B]椭圆倒圆角！椭圆是任意方向吗？？
我先写了一个，长短轴的比例是y/x
且长短轴分别为x、y轴，还没有写完，现在可以画椭圆了
但是剪切还没有完成，你先看看怎么样！
需要输入的是，你道路需要的圆弧半径，和你y与... [/B]

刚刚测试了，很不错啊。
昨天试了一下，不能用近似椭圆，差别太大，也就是说不能改为多段线。
我的要求降低了，只要能倒椭圆角就行了。

椭圆方向为长轴——Y方向，短轴——X方向
长轴：短轴＝10：1
期待着你早日完成。谢谢！！

maplesu · 发表于 2004-6-17 16:03:19

现在这个试试看吧，我已经完成了，大家试试看有没有什么问题！我再完善！

增加选择第一条线的时候亮显！

cdhua001 · 发表于 2004-6-18 12:01:46

　　万分感谢maplesu版主的辛勤劳动，几易其稿，终于在昨天晚上帮我编制出了这个好东东。
　　也许还有别的搞公路的需要这个程序，在这里将使用这个程序的结果进行一个演示。

账号		自动登录	找回密码
密码			立即注册