[线型]：一种"示坡线“的线型

XDSoft

最初由 dxh 发布
[B]我不知道怎么编译成ltypeshp.shx,可能这就是问题的关键。请指教！ [/B]

修改SHP文件会吧，把上面EFAN的内容贴过去，保存。

进入ACAD后，用命令：compile 按照提示做就可以了，你试试先。

如果成功了，你把编译好的SHX压缩下，传到论坛来吧，最好在截个制作的线型的样子图，贴论坛来。

dxh

我上午编译过，可没有成功。出现一下提示：
错误的形定义，第 25 行，C:\Program Files\AutoCAD 2002\Support\ltypeshp.shp 中:
  无效的形元素，或语法错误
ltypeshp.shp文件如下：
  
;;;
; (C) Copyright 1997 by Autodesk, Inc.
;;;  ltypeshp.SHP - shapes for complex linetypes
;;;

*130,6,TRACK1
014,002,01C,001,01C,0

*131,3,ZIG
012,01E,0

*132,6,BOX
014,020,02C,028,014,0

*133,4,CIRC1
10,1,-040,0

*134,6,BAT
025,10,2,-044,02B,0

*135,3,SHIPOX
001,01C,0

*136,3,SHIPOS
001,014,0

XDSoft

最初由 dxh 发布
[B]我上午编译过，可没有成功。出现一下提示：
错误的形定义，第 25 行，C:\Program Files\AutoCAD 2002\Support\ltypeshp.shp 中:
  无效的形元素，或语法错误 [/B]

这个帖子提供的型编号是135，136，你的SHP里面是否已经有了？

如果是，把这个新的线型需要的型编号，改你那个文件里面最大值加1，开始，比如：137，138，再试试。

dxh

我以前的编号末尾是134，正好和提供的帖子编号一样。我真不知道是怎么回事。

XDSoft

最初由 dxh 发布
[B]我以前的编号末尾是134，正好和提供的帖子编号一样。我真不知道是怎么回事。 [/B]

刚才我试验了，我硬盘的LTYPESHP.SHP可以编译，你下载附件，自己添加到里面去，试试，不过我的最后是135，你要改136，137才行。

dxh

我编译成功了，可加载线形时还是提示定义错误。不会是我的LIN文件也有问题吧，谢谢了，我有点事要走了，thanks a million!

daziran

您已经接近成功了。：）
先用我的文件试试，然后耐心调整。
我再全面说明一下（不要嫌烦）：
1. 编辑好ltypeshp.shp  （注意最后一定要有一个空行），编译（compile）通过。
       好，你可以先确认一下：
       a ）命令：load   （然后装入ltypeshp.shx）
       b）命令：shape  （插入形shipos  ，结果是一条竖线。重复 shape ，插入形shipox  ，也是竖线）
2.  在acad.lin文件中加入 线性定义（在我附件中提供的是acadgb.lin）
3.   命令：linetype 加载acad.lin 中的线形（注意，必须选中shipos 和shipox）
      如果提示错误，也许是其他线型定义的问题。
4.   然后，我别罗嗦了吧.......
至于┴┴┴┴  ，在软键盘的制表符里找吧。

无忧

最初由 dxh 发布
[B]我编译成功了，可加载线形时还是提示定义错误。不会是我的LIN文件也有问题吧，谢谢了，我有点事要走了，thanks a million! [/B]

你的线形已经已经成功做出来了,很漂亮的.可能你加载线形时操作错误.
实际上这个示坡线不需要自己做型的，直接用ltypeshp.shx里的TRACK1就可以了，关键是定义线形时要加X、Y偏量。
下面是用TRACK1的:

*S示坡线下,示坡线下 ┬┬┬┬┬┬┬┬┬┬┬┬┬┬┬┬┬
A,.3,[TRACK1,ltypeshp.shx,x=.1,y=-.25,s=.25],.00001,[TRACK1,ltypeshp.shx,X=.35,Y=-0.125,s=.125],.3

线形制作在定制AUTOCAD中算比较简单的内容，但用运的好一样也有事半功倍的效果，希望大家一起来做有用的线形 :)

dxh

在这里确实学到了很多的东西，我由衷的感谢各位，希望能把更多的实用线形贴出来大家共享。
下面两种不同颜色的线分别是由daziran的shiipox和无忧做的S示坡线下线形画出的，对于后者好像只适用于画规则的线。不知我的观点对否？另外能不能再改进一下，做成红色线所示的，有粗有细的线形。期望你的回复！

daziran

令 PLINEWID =1   然后用PLINE画线。但是不能进行曲线拟合。
用SPLINE也不行

XDSoft

最初由 daziran 发布
[B]红色的线形可以这样实现：
令 PLINEWID =1   然后用PLINE画线。但是不能进行曲线拟合。
用SPLINE也不行 [/B]

DAZIRAN,给大家写一个吧。

dxh

没有更好的办法吗，其实我经常遇到不规则的这种线形，如果一点点的描也太麻烦了，不过我仍然非常感谢你！

XDSoft

最初由 dxh 发布
[B]没有更好的办法吗，其实我经常遇到不规则的这种线形，如果一点点的描也太麻烦了，不过我仍然非常感谢你！ [/B]

有啊，可以把SPLINE转换成POLYLINE，晓东工具箱有这个工具。

你就可以使用线型了。

daziran

晓东高看大自然了，也许无忧可以写一个 。
如果一定要用，可以用一个笨办法：
在A层画完SPLINE线后，同位置复制到B层，将B层的线改为continous 线形，并设层宽。
这可以编一段LISP程序实现。


晓东先生
我下载了晓东工具箱，也执行了晓东工具箱2000+连接程序
怎么只有XDTB:UCS 菜单可用，其他均不执行？

dxh

那就请无忧先生给写一个吧，这也许是最直接简单的办法了。