明经CAD社区

 找回密码
 注册

QQ登录

只需一步,快速开始

搜索
查看: 77992|回复: 153

[资源] ★飞诗寻梦坐标标注1.08版 (源码放送)

  [复制链接]
发表于 2007-4-24 22:35:00 | 显示全部楼层 |阅读模式
本帖最后由 飞诗(fsxm) 于 2011-9-15 12:18 编辑

使用帮助

程序操作

1).标注调用命令爲: fsxmzbbz /zbbz(坐标标注)

指令: zbbz

点选标注位置[选项(Option)/更新(Update)]:

1.      选项(Option)调用参数设计对话框

2.      更新(Update)跳转到手动更新命令.

2).手动更新命令是: fsxm_zbbz_update / Update

与在zbbz命令选项中的Update功能相同

3).对话框参数:

1.      坐标系中各参数控制标注基准

a.       原点X0

b.      原点Y0

c.       转角A0

以上值均为WCS中的值

2.      标注控制

a.测量比例:测量比例单位长度转换功能,跟测量数值有关;

b.标注精度:控制标注值的小数码;

c.后缀消零:控制标注值后面字”补位零”是否显示;

c.自动更新:如开啓则标注后的图元在改变位置时,会启动反应器自动更新.

3.      样式设置.

a.出图比例:出图比例跟文本的高度有关,文本偏移量,等外形尺相联,与标注值没有关联.

b.坐标:有X/Y与Y/X两种,如果选Y/X则Y座标位于上方X位于下方,否则X座标位于上方Y位于下方.

c.标注样式:会控制标注綫,文本颜色,以及文本与标注綫之间的间隙等细节设置.

d. 标注图元使用的图层.

e. 标注文本使用的文本样式.

4.      文本

a.字高:此爲出图文本高度,文本在CAD中实高为:字高*出图比例

b.角度B0:爲文本与标注綫与WCS中X轴之夹角.

c.前缀:标注值的前缀文本

d.文本:文本替代如”<>”代表原定标注文本.

5.      十字标志

a.显示: 是否显示出十字标志 ON/OFF

b.大小: 十字标志出图大小,实际大小为:大小*出图比例

6.      对象

a.此选项在标注时灰现禁用,在标注更新时用来选择要更新的对象.

在双击模式下可以使用此功能如同”属性刷子”将属性复制给别的标注. 

=======================================================================

以上数据一经设置,均会自动保存,在下一次使用时会沿用保存的设置. 

在这之前曾参照了网上很多的坐标标注程序,集大成而写完成本程序,

特点有:功能强大 ,操作使用方便,具有很好的扩展性,

愿以我的努力为你打造一款完美的lisp坐标标注程序!

当然我从一开始就是向横越多个行业的通用坐标标注程序而开发的

可行与你的行业应用还是存在差别,如果本程序不适合你

真诚的希望以下坐标标注程序链结能给你带来惊喜:

1.网络蜜蜂netbee的

2.陈家平的

3.841594的

4.xyp1964

5. 以链结上均来搜索自xdcad。。。还有很多没有收集

小技巧:

1.      你可以在动态托动时用”O”键调用参数对话框,确定后即可见到修改效果.

      相比在选点时[选项(O)]更具直观性和简捷性.

2.      你可以双击一个标注来查看并修改标注属性,幷可以使用”选择对象” 按扭将属性复制给别的标注.

      (此处经highflybird建议后加上,在些致谢!)

3.      你可以打开”自动更新”,以后当你移动标注夹点时会自动更新标注值.

4.      在手动更新时,你可以用”!”(惊叹号)来拒绝这个项目数据的更新.

5.      你可以修改自定义快捷键lsp文件,打造个性化的动态标注,

      在动态托动时一触即发,实时观察参数改变的效果(强烈推荐!).

6.      在重新打开时,”自动更新”属性为”ON”的标注,在加载程序后也可以自动更新,你不必使用手动更新.

7.      你可以使用Ctrl+C(copyclip命令), Ctrl+Shift+C(copybase命令),copy,array,等方法來產生標注.

      复制而成标注之属性会依从复制原本,

      比如”自动更新”属性为”ON”的复制而成标注也会在移动夹点时自动更新.

8.      你可以使用我提供的坐标外挂工具,也可以自已定制外挂工具!

注意事项:

1.      标注对象带有扩展数据,请你务必不要用具其它程序修改扩展数据, 否则更新功能将失效或出错! 
  

希望以上资料能对你使用本程序有所帮助.如有疑问请联系作者

我的email:           fsxm.acad@qq.com 

程序更新历史:         
       

2007.04.10★

程序主体部分完成,AOTOCAD2004下调试通过.

此时无DCL对话框,所有参数均与标注样式dimstyle用临时反应器连接!

CAD编程群中测试,各位热心的网友提出了很多好的建议

比如:标注比例不应与标注样式dimstyle关联等等

于是开始想搞一个对话框让用户自定义标注参数. 

2007.04.11★

经过临时学习DCL终于写出了lisp生涯中第一个DCL对话框.

虽然很难看,还是觉等蛮高兴的!走出了第一个DCL才会有第二个,第三个...... 

2007.04.12★

开始写DCL的lisp调用函数~~~这的确是让我吃了不少苦头

发现DCL实在是难以控制,在这期问也曾放弃~~~

决定在VB中画了一个对话框写好类模块编绎成DLL箅了吧

vlisp调出的结果让我很失望......可能是我VB只会一点皮毛吧

运行十多次后CAD居然当了~~~

再打开重试还是在运行十多次后CAD又是离奇出错退出~~~

这让我很失望.郁闷中...... 

2007.04.13★

调整心情,按照VB画好的对话框用DCL写出来了......

DCL界面终于可以告一个段落了...... 

2007.04.14★

开始思索写配合DCL的lisp函数.

其问"Dream.Fei"发给我很多有关DCL的帮助文档

以及得到CAD编程群中众多热心人的技术+精神支持......

在这一并致至最诚执的感谢! 

2007.04.20★

泾过差不多一个星期的时间终于第一个带对话框的坐标标注程序

写出来了,这时回首一看嘿嘿!好家伙!居然调用兼控制取得DCL数据

的子程序dcl_Initialize.LSP,dcl_sub.lsp,zbbz.DCL居然加起来到了13K了

与主程序zbbz_main.LSP12.5K几乎是差不多大少了...... 晕倒中

(当然这里主要原因是我对DCL的结构不熟悉,以至于此吧!)

CAD编程群中上传了"飞诗寻梦坐标标注测试版2007.04.20"

其问特别是"小李子"网友帮忙进行是许多细致的测试工作

让我修正了潜在在dcl_Initialize.LSP中的许多bug

以至改动优化部分达dcl_Initialize程序的20%左右~~~ 

2007.04.21★

WWW.XDCAD.NET上传修正后的"飞诗寻梦坐标标注测试版2007.04.20"

因为这段时间XD不能下载文件,在XD上的测试几乎中断

但是热心的"highflybird"还是到的我的网络硬盘中下载了

并给了我非常好的建议!

"双击一个标注查看并修改标注属性"这个功能就是"highflybird"给出的建议!

这个功能成为了本程序相对于其它"lisp"版标注程序的一个亮点之一!

经过扩展后可以像"属性刷子"一样将属性传播给其它坐标标注. 

2007.04.24★

到这一天清除了所有发现的bug~

升级了反应器为"模拟永反应器"

论重启后的图档在加载程序后也可以自动更新!

新增功能copy命令后的标注图元亦可自动更新!

感谢eachy版主在反应器方面给出许多珍贵资料链结!

一路下来幸慰的是:

1.有很多热心人的支持.

2.开始接触到DCL.也学习到很多反应器方面的知识. 

2007.04.26★

除去试用版中坐标系原点保存精度为0.0001的限制.

加入错误自动恢复,完善对话框智能纠错.

加入快速标注范例程序,预留快速标注接口.

于是:飞诗寻梦坐标标注V1.0出来了. 

2007.05.03★

进行了一点小小的升级:

V1.01版开始支持多行文本特有的语法格式,如文本的分别着色,有兴趣的朋友可以试试。

这也本坐标标注程序使用多行文本MTEXT而非单行文本TEXT所独有的特色! 

2007.05.05★

V1.01(Block) 版发布,以后将停止对非Block版的升级

文本部分使用匿名块形式,防意外修改,让托动更显平滑!

功能与用法与用法与非Block版基本一样! 

2007.05.18★

V1.02(Block) 版

新增缩放后自动调节为全局比例!

新增用ma格式刷直接刷外观属性! 

2007.05.24★

V1.03(Block) 版

对组内图元使用dxf1005作索引,有效解决不支持CTRL+C的遗憾!

并通过优化再度加快了反应器程序运行效率!      

2007.05.25★

V1.04(Block) 版

完美解決copy的問題!至此所有預期功能均已實現!

希望以上资料能对你使用本程序有所帮助.如有疑问请联系作者

(飞诗寻梦坐标标注V1.01)Block版外挂中内附1.快速批量标注 2.输出坐标到excel.LSP 3.自定义热键.LSP

更新资料请关注我的网络硬盘: http://free.ys168.com/?fsxm

2009-5-12 汶川大地震一周年.

1.08版 修正3D模式下的坐标值错误!支持最新AutoCAD版本!

嗯!抱歉,这几天上明经!谢谢大家一直以为的支持!

最近要源程序的比较多,一个个发邮件有点麻烦!

我这就将源程序上传到明经来与大家一起分享哦!

1.08源程序:

说实话,这可是我写的第一个比较正式的程序了!

在这之前我只写过几个小小的程序!

从这个程序起,我才开始用到DCL与反应器!

到今天,回首一看.这个程序与算是基本上包括了Lisp的方方面面了!

"动态"托动+对话框+完整的反应器系统+文件读写+扩展数据+entmake各种对像.....

也许,就是这个程序让我开始对Lisp了解比以前更深入了!

因为我提供了程序接口,也希望主大家开发这个程序的外挂!

我程序包中有就三个外挂文件,1.快速批量标注,2.输出到excel 3.自定热键

本帖子中包含更多资源

您需要 登录 才可以下载或查看,没有账号?注册

x

评分

参与人数 2威望 +1 明经币 +2 金钱 +40 贡献 +5 激情 +5 收起 理由
jsj_306 + 20
mccad + 1 + 2 + 20 + 5 + 5 【精华】好程序

查看全部评分

"觉得好,就打赏"
还没有人打赏,支持一下
发表于 2022-9-9 17:24:54 | 显示全部楼层
用着很好!就是每次使用结束保存文件会出现  命令: _saveas ; 错误: 参数类型错误: lentityp nil  不知道是哪里设置的问题
发表于 2020-9-25 23:13:56 | 显示全部楼层

坐标标注能否加入引线30度45度60度75度等角度的极轴对齐开关
发表于 2020-9-8 12:34:28 | 显示全部楼层
感谢分享  好东西
发表于 2007-4-26 12:38:00 | 显示全部楼层

觉得很好用,bug呢倒是基本没有

建议呢,提一点点。

1.就是能不能自定义标注层的属性,让标注的坐标可以换颜色,换图层名称?我画图的时候,要是想把坐标标注成红色。用这个工具就不能实现!

2.希望能实现批量标注。

3.就是改一下命令,不要再用ZBBZ了,用一个你自己的命令。

 楼主| 发表于 2007-4-27 21:43:00 | 显示全部楼层
本帖最后由 作者 于 2007-4-27 22:05:15 编辑

你可以用“标注样式”里的文字颜色来改坐标标注文字颜色

这里带了反应器你修动后是会自动更新的哦!

以上我在帮助里都有说明的啊~

 楼主| 发表于 2007-5-7 22:27:00 | 显示全部楼层
本帖最后由 作者 于 2007-5-26 22:42:49 编辑

 

1.快速标注.LSP  批量标注子程序例子 可批量标注 圆心 pl线节点 直线端点 交点等~

2.输出坐标到excel.LSP 

3.自定义热键.LSP   打造你自己的全动态标注

最新的:2007-05-15

  

 

本帖子中包含更多资源

您需要 登录 才可以下载或查看,没有账号?注册

x
发表于 2007-5-8 09:22:00 | 显示全部楼层
命令: nil
命令:  QDIMTEST .group 输入编组选项
[?/排序(O)/添加(A)/删除(R)/分解(E)/重命名(REN)/可选(S)/创建(C)] <创建>: c
输入编组名或 [?]: * 输入编组的说明:fsxm.dimpointid
选择对象:   找到 4 个
选择对象:
命令: .group 输入编组选项
[?/排序(O)/添加(A)/删除(R)/分解(E)/重命名(REN)/可选(S)/创建(C)] <创建>: c
输入编组名或 [?]: * 输入编组的说明:fsxm.dimpointid
选择对象:   找到 4 个
选择对象:
命令: nil
发表于 2007-5-10 20:51:00 | 显示全部楼层
FSXM快速标注外挂用不了啊
 楼主| 发表于 2007-5-10 21:02:00 | 显示全部楼层

为什么用不了?呵呵已于 "CAD编程(24942984)" 中经过很多测试均可以用!

如果你用不了原因可能有:

1。没有加载: 飞诗寻梦坐标标注V1.01Block版 因为快速标注是一个配套子程序主程序当然要加载!

2。先要用zbbz命令标注一个!(留作标注样板) 快速标注所有参数及外形将与这个样板相同!

3。a.标注选项,b.标注对象,c.标注样板 要同时存在时 确定按扭才会起作用!(DCL程序自动控制)

呵呵~你还不能用么?

发表于 2007-5-10 21:33:00 | 显示全部楼层

谢楼主分享,试试鲜

 楼主| 发表于 2007-5-26 22:40:00 | 显示全部楼层

已更新到v1.04请大家试用一下给个意见~多谢~

发表于 2007-6-2 10:22:00 | 显示全部楼层
帮大家就是帮自己,谢谢楼主
您需要登录后才可以回帖 登录 | 注册

本版积分规则

小黑屋|手机版|CAD论坛|CAD教程|CAD下载|联系我们|关于明经|明经通道 ( 粤ICP备05003914号 )  
©2000-2023 明经通道 版权所有 本站代码,在未取得本站及作者授权的情况下,不得用于商业用途

GMT+8, 2024-12-23 22:21 , Processed in 0.229358 second(s), 29 queries , Gzip On.

Powered by Discuz! X3.4

Copyright © 2001-2021, Tencent Cloud.

快速回复 返回顶部 返回列表