CAD过梁自动标注程序
CAD中的智能尺寸和自动标注功能
CAD中的智能尺寸和自动标注功能CAD（计算机辅助设计）软件是设计师和工程师们常用的工具，可以轻松创建精确的图纸和模型。
在CAD软件中，智能尺寸和自动标注功能是为了提高工作效率和准确性而开发的特性。
本文将介绍CAD软件中的智能尺寸和自动标注功能的使用技巧。
智能尺寸是一种方便快捷的尺寸标注方式，在CAD软件中可大大简化标注的过程。
通过智能尺寸功能，我们可以快速地在图纸中添加尺寸标注，并与设计元素进行自动关联。
例如，我们可以在绘制一个矩形时，使用智能尺寸工具来标注其边长。
这样，当矩形的边长发生改变时，标注自动更新，省去了手动调整标注的繁琐过程。
在CAD软件中使用智能尺寸功能的步骤如下：1. 选中需要标注的尺寸对象，例如线段、圆弧或多边形等；2. 在菜单栏或工具栏中找到智能尺寸工具，点击选择；3. 将鼠标悬停在需要标注的地方，软件会智能识别出相关的尺寸，并显示在图纸上；4. 点击鼠标确认标注位置。
除了智能尺寸功能，CAD软件还提供了自动标注功能，可以自动在图纸中添加标注和文字描述。
自动标注功能可以帮助我们快速准确地标记设计图中的相关信息，例如尺寸、角度、符号等。
使用自动标注功能可以大大节省时间和精力。
在CAD软件中使用自动标注功能的步骤如下：1. 在菜单栏或工具栏中找到自动标注工具，点击选择；2. 在弹出的对话框中设置标注的属性和选项，例如字体、尺寸精度等；3. 选择需要标注的对象，例如线段、圆弧、多边形等；4. 确认选择后，软件会自动在图纸中添加标注。
在使用CAD软件中的智能尺寸和自动标注功能时，我们还需要注意一些使用技巧，以确保标注的准确性和可读性。
首先，我们需要设置标注的字体和文字大小，以适应图纸的比例和精度要求。
其次，对于复杂的图形和模型，我们可以使用分层标注的方式，将不同的尺寸标注分开，使图纸更加清晰易读。
另外，我们还可以为标注设置颜色和线型，以便与图纸中的其他元素进行区分。
总之，CAD软件中的智能尺寸和自动标注功能为设计师和工程师们提供了便捷高效的工作方式。
天正CAD常用的快捷命令天正cad标注设置
天正CAD常用的快捷命令天正cad标注设置天正CAD常用的快捷命令2010-11-25 17：01本人对天正CAD常用命令做了个整理！天正建筑7.0命令索引轴网菜单重排轴号CPZH改变图中一组轴线编号，该组编号自动进行重新排序倒排轴号DPZH倒排轴线编号，适用于特定方向的立剖面轴线绘制两点轴标LDZB选择起始轴与结束轴标注其中各轴号与尺寸墙生轴网QSZW在已有墙中按墙基线生成定位轴线删除轴号SQZH在已有轴网上删除轴号，其余轴号自动重排添补轴号TBZH在已有轴号基础上，关联增加新轴号添加轴线TJZX在已有轴网基础上增加轴线，并插入轴号绘制轴网HZZW合并了6.X旧版本的直线轴网和弧线轴网两个命令功能逐点轴标ZDZB逐个选择轴线，标注不相关的多个轴号轴线裁剪ZXCJ用矩形或多边形裁剪轴网的一部分轴改线型ZGXX切换轴线的线型柱子菜单标准柱BZZ在轴线的交点处插入方柱，圆柱或多边形柱构造柱GZZ在墙角处插入给定宽度和长度的构造柱图例角柱JZ在墙角插入形状与墙一致的角柱，可设各段长度异形柱YXZ把闭合Pline定义的柱断面转为非标准的异形柱柱齐墙边ZQQB把柱子对齐到指定的墙边墙体菜单边线对齐BXDQ墙基线不变，墙线偏移到过给定点单线变墙DXBQ将已绘制好的单线或者轴网转换为双线表示的墙对象倒墙角DQJ将转角墙按给定半径倒圆角生成弧墙或将墙角交接好等分加墙DFJQ将一段墙按轴线间距等分，垂直方向加墙延伸到给定边界改高度GGD修改已定义的墙和柱的高度与底标高改墙厚GQH批量改墙厚：墙基线不变，墙线一律改为居中改外墙高GWQG修改已定义的外墙高度与底标高，自动将内墙忽略改外墙厚GWQH注意修改外墙墙厚前，应先进行外墙识别，否则命令不会执行绘制墙体HZQT连续绘制双线直墙、弧墙，包括幕墙、弧墙、矮墙、虚墙等墙类型墙保温层QBWC在墙线一侧添加保温层或撤销保温层加亮外墙JLWQ亮显已经识别过的外墙矩形立面JXLM在立面显示状态，将非矩形的立面部分删除，墙面恢复矩形净距偏移JJPY按墙体净距离偏移平行生成新墙体基线对齐JXDQ保持墙边线不变，墙基线对齐经过给定点平行生线PXSX在墙任意一侧，按指定偏移距离生成平行的线或弧墙面UCS QMUCS临时定义一个基于所选墙面(分侧)的UCS，在指定视口转为立面显示墙端封口QDFK打开和闭合墙端出头的封口线墙体造型QTZX构造平面形状局部凸出或凹进的墙体，附加在墙上形成一体墙齐屋顶QQWD把墙体延伸到人字屋顶底部，根据墙高调整屋顶标高识别内外SBNW自动识别内外墙，适用于一般情况修墙角XQJ清理互相交叠的两道墙或者更新融合同材质的墙与墙体造型异型立面YXLM在立面显示状态，将墙按给定的轮廓线切割生成非矩形的立面指定内墙ZDNQ人工识别内墙，用于内天井、局部平面等无法自动识别的情况指定外墙ZDWQ人工识别外墙，用于内天井、局部平面等无法自动识别的情况门窗菜单编号复位BHFW把用户移动过的门窗编号恢复到默认位置编号后缀BHHZ选择一批门窗编号自动添加给定的后缀带形窗DXC在一段或连续墙段上插入等高窗窗棂展开CLZK把窗立面展开到WCS，以便进行窗棂划分窗棂映射CLYS把WCS上的窗棂划分映射回立面窗门窗套MCT在门窗四周添加或删除门窗套加装饰套JZST给门窗添加三维装饰门窗套线门口线MKX给门添加或删除属于门对象的门口线门窗MC在墙上插入由可定制形状的门窗(弧窗、门连窗、子母门、凸窗、门洞等)门窗表MCB统计本图中使用的门窗参数，检查后生成门窗表门窗编号MCBH选择门窗，可自动生成或修改已有门窗的编号门窗检查MCJC显示电子表格检查当前图中已插入的门窗数据门窗原型MCYX选择已有门窗作为新门窗改绘的原型，并构造门窗制作的环境门窗入库MCRK把用户定义的门窗块加入二维门窗库门窗总表MCZB统计本工程中多个平面图使用的门窗参数，检查后生成门窗总表内外翻转NWFZ批量内外翻转已画在图中的门窗异形洞YXD在立面显示状态，按给定的闭合pline轮廓线生成任意深度的洞口转角窗ZJC在图中沿墙插入转角窗或者转角凸窗组合门窗ZHC选取多个门窗生成统一编号的组合门窗左右翻转ZYFZ批量左右翻转已画在图中的门窗房间屋顶布置隔板BZGB选择已经插入的洁具，布置小便池隔板布置隔断BZGD选择已经插入的洁具，布置卫生间隔断布置洁具BZJJ在厨房或厕所中布置厨具或卫生洁具查询面积CXMJ查询房间面积，并可以以单行文字的方式标注在图上房间轮廓FJLK沿着房间内侧创建房间轮廓线，用于踢脚等构件加老虎窗JLHC在三维屋顶生成多种老虎窗形式加雨水管JYSG在屋顶平面图中绘制雨水管加踢脚线JTJX对房间添加或删除三维踢脚线面积累加MJLJ对选取的一组数值型文字进行求和奇数分格JSFG用于绘制按奇数分格的地面或吊顶平面偶数分格OSFG用于绘制按偶数分格的地面或吊顶平面任意坡顶RYPD由封闭的多段线生成指定坡度的屋顶，对象编辑可分别修改各坡度人字坡顶RZPD创建双坡与单坡屋顶搜索房间SSFJ创建或更新已有的房间与建筑面积对象，然后对象编辑标注房间搜屋顶线SWDX自动跨越门窗洞口搜索墙线的封闭区域，生成屋顶平面轮廓线套内面积TNMJ计算住宅单元的套内建筑面积攒尖屋顶CJWD生成对称的正多边锥形攒尖屋顶，考虑出挑长度楼梯其他电梯DT在电梯间井道内插入电梯门，绘制多种电梯简图多跑楼梯DPLT输入关键点建立多跑(直线或转折)楼梯连接扶手LJFS把两个梯段的扶手连接成连续的扶手坡道PD通过参数构造室外直坡道任意梯段RYTD以图中的直线与圆弧作为梯段边线输入踏步参数绘制楼梯散水SS搜索外墙线，绘制散水对象，创建室内外高差平台和勒脚双跑楼梯SPLT在对话框中输入梯间参数，直接绘制两跑楼梯台阶TJ直接绘制台阶或把预先绘制好的PLINE转成台阶添加扶手TJFS以沿上楼方向的Pline路径为基线，添加楼梯扶手阳台YT直接绘制阳台或把预先绘制好的PLINE转成阳台圆弧梯段YHTD在对话框中输入梯段参数，绘制弧形梯段直线梯段ZXTD在对话框中输入梯段参数绘制直线梯段，用来组合复杂楼梯自动扶梯ZDFT在对话框中输入梯段参数，绘制单双排自动扶梯立面菜单构件立面GJLM对选定的一个或多个建筑对象生成立面，取代单层立面命令立面窗套LMCC生成全包的窗套或者窗的上檐线和下檐线建筑立面JZLM生成建筑物立面，事先确定当前图为首层平面，各层已识别内外墙立面轮廓LMLK对立面图搜索轮廓生成立面轮廓线立面门窗LMMC插入、替换立面门窗以及立面门窗库的维护立面屋顶LMWD可完成多种形式的屋顶立面图设计立面阳台LMYT插入、替换立面阳台已经立面阳台库的维护门窗参数MCCS修改立面门窗的参数和位置图形裁剪TXCJ对立面门窗阳台等二维图块对象进行局部裁剪，解决立面图构件之间的遮挡雨水管线YSGX按给定的位置生成竖直向下的雨水管柱立面线ZLMX绘制圆柱的立面过渡线剖面菜单参数栏杆CSLG按参数交互方式生成楼梯栏杆，且楼梯栏杆库可由用户自行扩充参数楼梯CSLT按参数交互方式生成剖面的或可见的楼梯扶手接头FSJT对楼梯扶手或栏板的接头位置作细部处理构件剖面GJPM对一个或多个建筑对象剖切生成二维剖面，取代单层剖面命令画剖面墙HPMQ直接绘制剖面双线墙加剖断梁JPDL输入参数绘制楼板、休息平台板下的梁截面建筑剖面JZPM生成建筑物剖面，事先确定当前图为首层平面居中加粗JZJC将剖面图中的剖面墙线与楼板线向两侧加粗楼梯拦板LTLB自动识别剖面楼梯与可见楼梯，绘制实心楼梯栏板楼梯栏杆LTLG自动识别剖面楼梯与可见楼梯，绘制楼梯栏杆及扶手门窗过梁MCGL在剖面门窗上添加过梁剖面门窗PMMC直接在图中的剖面墙上插入剖面门窗剖面填充PMTC以图案填充剖面墙线梁板或者剖面楼梯剖面檐口PMYK在剖面图中绘制剖面檐口取消加粗QXJC将已加粗的剖面墙线梁板线恢复原状双线楼板SXLB绘制剖面双线楼板向内加粗XNJC将剖面图中的剖面墙线与楼板线向内加粗预制楼板YZLB绘制剖面预制楼板文字表格表列编辑BLBJ编辑表格的一列或多列表行编辑BHBJ编辑表格的一行或多行查找替换CZTH查找和替换图中的文字单行文字DHWZ创建符合中国建筑制图标注的天正单行文字单元编辑DYBJ编辑表格单元格，修改属性或文字单元合并DYHB合并表格的单元格单元递增DYDZ复制表格单元内容，并对单元内的序列号按规律递增或递减单元复制DYFZ复制表格内或者图形中的文字与图块进入目标表格单元单元累加DYLJ累加表行或表列的数值内容，结果放在指定单元格内撤销合并CXHB撤销已经合并的表格单元，恢复为标准的表格多行文字-创建符合中国建筑制图标准的天正整段文字读入Excel-根据Excel选中的区域，创建相应的天正表格繁简转换FJZH将内码为台湾的BIG5码与中国大陆的国标码的文字对象之间双向转换曲线文字QXWZ沿着曲线排列文字全屏编辑QPBJ对表格内容进行全屏编辑文字合并WZHB把T Arch 3.x的分开的中英文文字合成一行或单行文字合成多行文字文字样式WZYS创建或修改命名天正扩展文字样式并设置图形中文字的当前样式文字转化WZZH把AutoCAD单行文字转化为天正单行文字新建表格XJBG绘制新的表格并输入表格文字拆分表格CFBG按行或列把一个表格拆分为多个子表格，可带标题与自定义表头行数。
CAD中的自动标注和尺寸调整的快捷键命令
CAD中的自动标注和尺寸调整的快捷键命令在计算机辅助设计（CAD）软件中，自动标注和快速调整尺寸对于准确绘制和修改图纸非常重要。
为了提高效率和便捷性，CAD软件通常提供了一系列快捷键命令，使用户能够快速地执行自动标注和尺寸调整操作。
下文将介绍CAD中常用的自动标注和尺寸调整的快捷键命令。
1. 自动标注在CAD中，自动标注可以根据已绘制的几何形状和尺寸信息，自动生成标注文本。
以下是一些常用的自动标注快捷键命令：· DIM：创建线性尺寸。
选中两个需要标注尺寸的实体，并按下DIM键，即可自动生成尺寸标注。
·DIMALI：创建带注释的线性尺寸。
选中两个需要标注尺寸的实体，并按下DIMALI键，即可生成带有额外注释的尺寸标注。
· DIMRADIUS：创建半径标注。
选中圆弧、圆或孤立的圆心，并按下DIMRADIUS键，即可生成半径标注。
· DIMDIAMETER：创建直径标注。
选中圆弧、圆或孤立的圆心，并按下DIMDIAMETER键，即可生成直径标注。
2. 尺寸调整在CAD中，尺寸调整是指修改图形的尺寸以满足特定的要求。
下面是一些常用的尺寸调整快捷键命令：· STRETCH：调整图形的大小和形状。
选中需要调整的对象并按下STRETCH键，然后按照提示进行操作，即可改变对象的尺寸和形状。
· SCALE：按比例缩放对象。
选中需要缩放的对象并按下SCALE键，然后按照提示进行操作，即可按比例缩放对象。
· STRETCHDIM：调整标注的位置和大小。
选中需要调整的标注并按下STRETCHDIM键，然后按照提示进行操作，即可改变标注的位置和大小。
·DIMEDIT：编辑标注。
选中需要编辑的标注并按下DIMEDIT键，然后按照提示进行操作，即可修改标注的文本、箭头样式等属性。
总结CAD中的自动标注和尺寸调整的快捷键命令极大地简化了设计和修改过程，提高了工作效率。
用CAD设计精确的尺寸标注
用CAD设计精确的尺寸标注在CAD设计中，尺寸标注是十分关键的一步。
准确的尺寸标注不仅能够确保设计的准确性，还能够方便制造和检查。
下面将介绍一些使用CAD软件进行精确尺寸标注的技巧。
1. 选择正确的标注工具：在CAD软件中，通常有多种标注工具可供选择，如线性尺寸、径向尺寸、角度尺寸等。
根据设计的需要，选择相应的标注工具进行标注。
比如，在设计一个零件的尺寸时，可以使用线性尺寸工具进行标注。
2. 确定标注的起点和终点：在进行尺寸标注之前，需要先确定标注的起点和终点。
起点是标注线的起始位置，通常与被标注的对象的特征点对齐。
终点是标注线的结束位置，通常与被标注的对象的另一个特征点对齐。
在选择起点和终点时，要将其位置放置在合适的位置，以便于观察和读取。
3. 设置标注的尺寸文字风格：在进行尺寸标注之前，可以设置标注的尺寸文字风格。
可以选择不同的字体、字号、颜色等进行设置。
一般情况下，选择清晰易读的字体和适当的字号，以确保标注的准确性和可读性。
4. 使用对齐功能：CAD软件通常提供对齐功能，可以帮助我们快速准确地将标注线与被标注对象对齐。
比如，在进行线性尺寸标注时，可以使用对齐功能将标注线与被标注对象的两个特征点对齐，以确保标注的准确性。
5. 避免标注重叠：在进行尺寸标注时，要注意避免标注文字之间的重叠。
如果标注文字重叠在一起，会导致标注的不清晰，难以读取。
可以通过调整文字的位置或字号大小来避免标注重叠。
6. 标注注意事项：在进行尺寸标注时，还需要注意一些细节。
首先，要确保标注的尺寸是准确的，可以通过测量或计算来得到。
其次，要注意标注的一致性，即相同特征的尺寸标注应该使用相同的标注方式和风格。
最后，要将标注放置在合适的位置，以便于观察和读取。
总而言之，CAD设计中的精确尺寸标注是确保设计准确性和方便制造和检查的关键步骤。
通过选择正确的标注工具、确定标注的起点和终点、设置标注的尺寸文字风格、使用对齐功能、避免标注重叠以及注意一些细节，我们可以高效准确地进行尺寸标注。
CAD中的尺寸标注样式和设置
CAD中的尺寸标注样式和设置在CAD软件中，尺寸标注是一项非常重要的功能，它能够帮助我们准确地测量和标注图形的尺寸。
在进行CAD图纸设计时，我们需要掌握各种尺寸标注样式和设置方法，以便能够灵活应用它们来满足设计的需求。
首先，CAD提供了多种不同的尺寸标注样式供我们选择。
常见的尺寸标注样式包括：水平尺寸标注、垂直尺寸标注、直径标注、角度标注等等。
我们可以根据实际需求选择相应的尺寸标注样式进行标注。
在选择尺寸标注样式时，我们需要考虑到标注的可读性和美观性，以便更好地传达设计意图。
其次，CAD软件还提供了一些尺寸标注的设置方法，以便我们对尺寸标注进行个性化的设置。
其中最常见的设置有：箭头样式、文字样式、尺寸线样式和尺寸线位置等。
我们可以根据设计要求，选择合适的箭头样式，例如箭头的大小和形状。
文字样式的设置可以包括文字的字体、字号、颜色等。
尺寸线样式则可以选择实线、虚线或者其他线型。
此外，还可以通过设置尺寸线位置，调整尺寸标注的位置和布局，使其更好地适应绘图要求。
除了以上的样式和设置，一些CAD软件还支持自定义尺寸标注样式和设置。
通过自定义，我们可以根据自己的需求，创建符合设计要求的尺寸标注样式。
自定义尺寸标注样式可以包括但不限于：文字内容、文字对齐方式、尺寸线样式、箭头样式、标注单位等。
通过自定义，我们可以更加灵活地进行尺寸标注，提高标注的准确性和效率。
在使用CAD软件的过程中，我们还需要注意一些尺寸标注的技巧。
首先，尽量避免尺寸标注的重叠和混乱，使尺寸标注更加清晰可读。
其次，在进行尺寸标注时，要特别关注单位的选择和转换，确保尺寸的一致性和准确性。
此外，还要注意标注的位置和布局，使其与图形相互协调，提高图纸的整体美观度。
总结来说，CAD中的尺寸标注样式和设置对于设计师来说是非常重要的。
通过选择合适的尺寸标注样式和个性化的设置，我们可以更好地传达设计意图，提高标注的准确性和美观度。
同时，我们还需要掌握一些尺寸标注的技巧，保证标注的清晰可读和整体布局的美观。
建筑用CAD标注设置方法
建筑用CAD标注设置方法在建筑CAD软件中，标注是非常重要的环节。
准确和规范的标注可以有效地传达设计意图，方便施工操作，提高工作效率。
以下是建筑用CAD 标注的设置方法的详细说明：1.准备工作：在开始标注之前，需要打开建筑CAD软件，并打开要标注的图纸。
确保图纸的比例正确，并在需要标注的位置留出足够的空白。
2.设置标注样式：3.尺寸标注设置：尺寸标注是最常见的标注类型之一、选择尺寸标注工具，并点击图纸上需要标注的两个点，可以生成一段尺寸线。
根据标注样式的设置，显示尺寸的数值。
可以通过调整标注样式，改变尺寸线的样式、显示方式和位置等。
还可以通过修改标注样式，定义尺寸线的方向、对齐方式和文本格式等。
4.注释标注设置：注释标注用于显示并标注图纸上的一些特殊要素，如房间名称、材料说明等。
选择注释标注工具，并在图纸上点击需要标注的位置，输入对应的文字即可。
通过设置标注样式，可以调整文字的字体、大小、颜色等属性，以及文字与标注线之间的间距和对齐方式等。
5.箭头标注设置：箭头标注一般用于标注一些特殊要点或示意图。
选择箭头标注工具，并在图纸上点击需要标注的位置，可以生成一个箭头标注。
可以通过标注样式进行调整，修改箭头的样式、大小和颜色等。
也可以通过改变标注样式，定义箭头的对齐方式、箭头与标注文字之间的间距和位置等。
6.不同标注之间的关系：7.公制与英制单位的切换：在进行CAD标注时，需要注意切换不同的单位制。
可以通过修改绘图设置，选择合适的单位制，以适应当前的标注需求。
在进行标注设置之前，最好先确认当前单位制设置正确，并进行必要的修改和调整。
总结起来，建筑用CAD标注不仅仅是一个简单的操作过程，更是需要设计师有深入的理解和规范的标注要求。
通过合理的标注设置，可以提高设计图纸的可读性和可理解性，减少施工误差，提高工作效率。
2020cad标注坐标的命令
2020cad标注坐标的命令
（原创版）
目录
1.2020CAD 简介
2.标注坐标的命令
3.坐标标注的应用
4.常见问题与解决方法
正文
【2020CAD 简介】
2020CAD 是一款计算机辅助设计软件，广泛应用于建筑、机械、电子等工程领域。
用户可以通过该软件进行绘图、修改、标注等操作，以实现工程设计的快速和高效。
【标注坐标的命令】
在 2020CAD 中，标注坐标的命令属于测量工具栏中的一项功能。
用户可以通过以下步骤进行坐标标注：
1.打开 2020CAD 软件，点击菜单栏的“格式”选项，选择“单位”。
2.在弹出的对话框中，设置坐标单位和精度。
3.点击工具栏上的“测量”按钮，选择“坐标”。
4.在图纸上点击一点，输入坐标值，点击“确定”按钮。
5.按照上述步骤，标注其他坐标点，并调整标注样式。
【坐标标注的应用】
坐标标注在工程设计中有着重要的作用，主要体现在以下几个方面：
1.便于工程师快速了解设计元素的相对位置关系。
2.有助于提高图纸的可读性和准确性。
3.可以作为后续加工和安装的依据。
【常见问题与解决方法】
在使用 2020CAD 进行坐标标注时，可能会遇到以下问题：
1.坐标值输入不正确。
解决方法：仔细核对标注点和坐标单位设置，确保输入准确无误。
2.标注样式不符合要求。
解决方法：调整标注样式，如字体、颜色、线宽等。
3.坐标标注与其他标注冲突。
解决方法：调整标注位置，避免重叠，保证图纸清晰。
cad尺寸标注的基本步骤
cad尺寸标注的基本步骤CAD尺寸标注是将产品的尺寸、几何特征等信息以文字或符号的方式标注在CAD绘图上，用于指导产品的制造和检验。
下面是CAD尺寸标注的基本步骤：1.确定标注对象：首先确定要进行尺寸标注的对象，可以是整个组件、零件或其特定特征，例如直径、间距、角度等。
2.创建标注线：使用CAD软件的标注工具，在相应的对象上创建标注线。
通常，在绘图上选择两个或多个有连接线的点，将其连接起来形成一条虚实线，即为标注线。
3.选择标注尺寸：根据绘图的要求，在标注线相应的位置选择适当的尺寸。
可以使用CAD软件的标注工具，选择尺寸或直接输入数值标注。
4.添加箭头和符号：在标注线的末端添加箭头，以显示尺寸的起止位置。
此外，还可以添加符号，如圆圈、直线、横线等，以表示特定的几何特征。
5.调整标注位置：根据绘图的需要，调整标注线和箭头的位置，使其清晰可见且不与其他标注重叠。
可以通过移动、旋转、缩放等CAD操作来完成。
7.检查标注准确性：标注完成后，仔细检查标注的准确性和一致性。
确保标注的尺寸与实际物体的尺寸一致，并与其他标注之间没有矛盾。
8.更新标注：如果在设计过程中对物体进行了修改、更新或者调整，需要及时更新相应的尺寸标注。
可以使用CAD软件的更新标注工具，自动更新或手动修改标注。
9.导出或打印：完成标注后，将CAD绘图导出为相应的文件格式，以便于分享、打印或制造。
通常可以导出为PDF、DWG等格式，确保标注的清晰可见。
CAD尺寸标注的基本步骤可以帮助工程师和制造人员准确理解产品的尺寸和几何特征，促进设计和生产的顺利进行。
同时，标注也是一种图纸的标准化方式，有助于减少误差和沟通问题，提高工作效率。
CAD标注设置方法
CAD标注设置方法一、标注文字样式设置在CAD软件中，可以通过设置文字样式来调整标注文字的字体、大小、颜色等属性。
具体步骤如下：1.打开CAD软件并新建一个绘图文件。
2.在绘图界面的上方工具栏中找到“样式”图标，并点击打开“样式管理器”对话框。
3.在“样式管理器”对话框中选择“标注”选项卡，并点击“新建...”按钮创建一个新的文字样式，然后设置字体、大小、颜色等属性。
4.点击“确定”按钮保存设置，并将该文字样式应用到需要标注的文字上。
二、标注尺寸样式设置在CAD软件中，可以通过设置尺寸样式来调整标注尺寸的外观、单位、精度等属性。
具体步骤如下：1.打开CAD软件并新建一个绘图文件。
2.在绘图界面的上方工具栏中找到“样式”图标，并点击打开“样式管理器”对话框。
3.在“样式管理器”对话框中选择“尺寸”选项卡，并点击“新建...”按钮创建一个新的尺寸样式，然后设置标注线类型、箭头样式、单位、精度等属性。
4.点击“确定”按钮保存设置，并将该尺寸样式应用到需要标注的尺寸上。
三、标注尺寸设置在CAD软件中，可以通过直接标注和自动标注两种方法来设置标注尺寸。
具体步骤如下：1.直接标注：选择“标注”工具栏中的“尺寸”或“注释”命令，然后选择需要标注的两个点，CAD软件会自动计算并在图纸上显示尺寸标注。
2.自动标注：选择“标注”工具栏中的“自动标注”命令，然后在图纸上选择需要标注的对象，CAD软件会根据对象的属性和设置的尺寸样式自动添加标注。
四、标注层设置在CAD软件中，可以通过设置标注对象的图层来控制标注的显示和隐藏。
具体步骤如下：1.打开CAD软件并新建一个绘图文件。
2.在绘图界面的右下角找到“图层”工具栏，并点击打开“图层管理器”对话框。
3.在“图层管理器”对话框中创建一个新的标注图层，并设置其颜色、线型等属性。
4.选择需要标注的对象，然后将其移动到标注图层上。
5.根据需要调整图层的显示和隐藏状态，以控制标注的显示效果。
CAD中的自动尺寸标注技巧
CAD中的自动尺寸标注技巧在CAD软件中，尺寸标注是非常重要的一项功能。
它可以帮助我们更准确地测量和标记绘图中不同部分的尺寸。
而自动尺寸标注则能够进一步提高效率，省去手动标注的繁琐过程。
本文将介绍一些在CAD中使用自动尺寸标注的技巧，帮助您更加高效地完成绘图工作。
首先，打开您的CAD软件，并进入绘图界面。
选择适合的图层，并绘制您的图形。
在完成绘图后，您可以进行自动尺寸标注。
一种自动尺寸标注的方法是使用“Dimlinear”命令。
该命令可以在绘制后的图形上添加直线段的尺寸标注。
首先，在命令行输入“Dimlinear”，然后按下“Enter”键。
接下来，选择需要添加尺寸标注的直线段，按下鼠标左键进行选择。
完成选择后，按下“Enter”键即可自动添加尺寸标注。
另一种自动尺寸标注的方法是使用“Dimradius”命令。
该命令可以在绘制后的图形上添加圆弧或圆的半径标注。
在命令行输入“Dimradius”，然后按下“Enter”键。
接着，选择需要添加半径标注的圆弧或圆，按下鼠标左键进行选择。
完成选择后，按下“Enter”键即可自动添加半径标注。
除了直线段和圆弧的尺寸标注之外，我们还可以使用“Dimaligned”命令进行自动尺寸标注。
该命令可以在绘制后的图形上添加斜线段的尺寸标注。
在命令行输入“Dimaligned”，然后按下“Enter”键。
接下来，选择需要添加标注的斜线段，按下鼠标左键进行选择。
完成选择后，按下“Enter”键即可自动添加尺寸标注。
此外，CAD软件还提供了更多高级的自动尺寸标注功能。
例如，您可以使用“Dimstyle”命令创建自定义的尺寸样式，以满足不同绘图需求。
您可以调整标注字体的大小、颜色和样式，使其更加符合您的设计要求。
通过调整标注的样式，您可以使绘图更加美观和清晰易读。
除了自动尺寸标注命令外，CAD软件还提供了一些辅助工具，以帮助您更加准确地进行尺寸标注。
例如，您可以使用“Snap”功能来吸附到绘图中的关键点，确保标注的准确性。
使用CAD进行图纸注释和标记的技巧
使用CAD进行图纸注释和标记的技巧CAD（Computer-Aided Design，计算机辅助设计）软件是现代工程设计和制图中必不可少的工具。
它可以帮助工程师和设计师以更高效、准确的方式创建和编辑图纸。
在CAD软件中，图纸注释和标记是非常重要的步骤。
本文将分享一些使用CAD进行图纸注释和标记的技巧，以帮助您提高工作效率。
1. 使用文字工具：在CAD软件中，通常会有一个文字工具，用于在图纸上添加注释和标记。
选择适当的字体、大小和样式，确保注释清晰可读。
可以使用文本框来容纳较长的注释，或者通过添加单行文本来添加简短的标记。
2. 使用标注工具：标注工具是CAD软件中的一个强大功能，它可以帮助您自动添加尺寸标记和注释。
通过选择合适的标注类型（例如尺寸标注、文本标注等），然后点击图纸上的相应位置，标注工具会自动添加所需的注释和标记。
这可以大大减少手动绘制标记的工作量，并确保准确性。
3. 按比例缩放：在对图纸进行注释和标记之前，确保将其按比例缩放。
这样一来，注释和标记才会与图纸的其他元素正确对应。
使用CAD软件中的缩放工具，按照比例调整图纸的大小。
4. 使用图层管理：图层管理是CAD软件中一个非常有用的功能。
通过将注释和标记放置在单独的图层中，可以更加清晰地控制和管理它们。
您可以为注释和标记创建一个新的图层，并将其设置为显示或隐藏。
这在编辑和修改时非常方便。
5. 添加标识和代码：为了方便使用和跟踪，可以为注释和标记添加标识和代码。
例如，在电气图纸上，可以为电线和元器件添加唯一的代码，以便在施工和维护过程中更好地识别它们。
这可以通过CAD软件中的图形绘制和图层管理工具实现。
6. 使用注释符号库：为了提高效率，可以在CAD软件中创建和使用注释符号库。
注释符号库是一组预定义的图形符号和标记，用于快速添加常用的注释和标记。
这可以节省大量时间，同时确保注释的一致性和规范性。
7. 使用CAD插件：CAD软件通常有许多插件和扩展，可以进一步增强其功能。
利用AutoCAD VBA编写自动标高标注程序
39ZHIHUAI 2019.10雷达的监测范围为水库中南部库湾集中水域。
两处雷达点由巡查执法人员24h 轮流值守，收到雷达报警信号后，立即向水库视频监控中心报告目标位置及移动轨迹，监控中心根据目标所在位置向最有利值班点下达指令，前往目标区域开展执法行动。
2.取得的成效该模式将传统人员巡查同现代电子探测监控技术有机结合，在实现违法行为及时发现、执法队伍快速反应、违法现场抓捕等方面展现了巨大优势。
雷达技术的应用还为组织开展精准定向巡查和远程调度指挥提供了重要技术支撑，在近年的水库渔业资源开发利用、“清四乱”和清违清障等工作中，发挥了举足轻重的作用。
加强水域的管理也产生了可观的经济和生态效益。
目前，库域水事案件的破获率升至90%以上。
2017年和2018年，渔业生产经营利润分别实现同比增长13%、7.6% 。
水库水环境持续改善，水质稳定保持在地表Ⅲ类以上标准，有力保障了城市居民生活用水安全。
四、结语对雷达探测系统作为水域管理方式的创新之举，该应用模式对构建“无违河湖”，维护好水库洁净面貌均具有重要意义。
尽管在雷达技术应用方面进行了初步探索，积累了一定经验，尤其是将雷达结合视频监控系统用于水域管理，达到了增强水域监管工作机动性、灵活性的目标。
但雷达站点之间、雷达站与视频监控中心之间，仍依赖对讲机、电话等传统通讯手段，未能实现电子信号的互联和信息实时共享。
在利用视频监控进行证据搜集时，仅限于枢纽工程管护区及南部中心库面范围，对于库湾河岔区域，因有较多监控盲区，更多还是依靠巡查执法人员利用摄像机进行现场取证，易被违法人员发现而逃逸，破解取证难问题还需要作进一步研究，有待改进和提高■（作者单位：山东省滕州市马河水库管理服务中心 277533 山东省枣庄市鸿禹工程监理有限公司 277000 山东省滕州市水利建筑安装公司 277500）利用AutoCAD VBA 编写自动标高标注程序易 宁1 昌志敏1 陈晓峰2AutoCAD 作为工程设计人员必不可少的设计工具之一，在工程制图中发挥了重要的作用。
2023cad的标注样式
2023cad的标注样式
在2023版本的CAD中，标注样式设置的方法与之前版本的基本相同。
以下是一些建议的步骤来设置标注样式：
1. 打开CAD软件，找到“格式”菜单或使用快捷键“dimsty”打开标注样式管理器。
2. 在标注样式管理器中，选择当前使用的标注样式，然后点击“修改”以进行修改。
3. 进入“修改标注”对话框，主要调整以下几个参数：
-箭头大小：根据图形的大小来调整，可以点击“符号和箭头”这一栏，将箭头修改为适当的大小。
-文字大小：根据图形的大小来调整，可以点击“文字”这一栏，将文字修改为适当的大小。
建议让文字大小大于箭头大小。
-主单位：点击“主单位”这一栏，根据需要调整精度。
例如，将精度调整为0。
4. 调整完毕后，点击右下角的“确定”按钮，返回标注样式管理器。
5. 在标注样式管理器中，将修改后的样式设置为当前样式。
点击“置为当前”按钮，然后关闭标注样式管理器。
6. 此时，图纸上的尺寸标注应该已经更新为新的样式。
如果仍然不显示，可以尝试重启CAD软件。
需要注意的是，不同版本的CAD软件可能存在一些差异，请根据实际情况进行调整。
以上方法适用于大部分情况，但如果问题仍然存在，建议查阅相关教程或联系CAD技术支持寻求帮助。
CAD标注命令的使用技巧
CAD标注命令的使用技巧在使用CAD软件进行设计和绘制时，标注是非常重要的一环。
标注命令能够给图纸中的对象增加注释，包括线段的长度、角度、半径等等信息。
正确使用标注命令能够提高工作的效率和准确性。
下面将介绍几个常用的CAD标注命令的使用技巧。
一、线性标注（Dimlinear）线性标注是最常用的标注命令之一，用于标注直线的长度。
使用该命令的步骤如下：1. 在CAD软件中打开需要标注的图纸。
2. 在绘图区域选择Dimlinear命令，或者在命令行输入Dimlinear。
3. 选择需要标注的直线，点击鼠标左键确定起点和终点。
4. 在弹出的标注设置对话框中，可以选择标注的样式、文字尺寸、箭头类型等。
5. 在需要标注的位置点击鼠标左键，完成直线的长度标注。
二、角度标注（Dimangular）角度标注用于标注两直线之间的夹角。
使用该命令的步骤如下：1. 打开图纸，进入绘图界面。
2. 在命令行输入Dimangular，或者在绘图区域选择Dimangular命令。
3. 选择需要标注的两条直线，点击鼠标左键分别选择起点和终点。
类型等。
5. 在需要标注的位置点击鼠标左键，完成夹角的标注。
三、半径标注（Dimradius）半径标注用于标注圆或圆弧的半径。
使用该命令的步骤如下：1. 打开图纸，进入绘图界面。
2. 在命令行输入Dimradius，或者在绘图区域选择Dimradius命令。
3. 选择需要标注的圆或圆弧，点击鼠标左键确定选择。
4. 在弹出的标注设置对话框中，设置标注的样式、文字大小、箭头类型等。
5. 在需要标注的位置点击鼠标左键，完成半径的标注。
四、直径标注（Dimdiameter）直径标注用于标注圆或圆弧的直径。
使用该命令的步骤如下：1. 打开图纸，进入绘图界面。
2. 在命令行输入Dimdiameter，或者在绘图区域选择Dimdiameter命令。
3. 选择需要标注的圆或圆弧，点击鼠标左键确定选择。
类型等。
使用CAD进行工程图纸的标注与注释
使用CAD进行工程图纸的标注与注释CAD（Computer-Aided Design）是一种广泛应用于制图和设计领域的计算机软件。
它提供了强大的工具和功能，可以帮助工程师和设计师快速准确地创建和编辑图纸。
在进行工程图纸的标注与注释时，CAD软件更是发挥了巨大的作用。
本文将介绍一些使用CAD进行工程图纸标注与注释的技巧。
首先，打开CAD软件并导入需要标注与注释的图纸。
点击菜单栏上的“打开”按钮，选择需要使用的图纸文件，然后点击“打开”。
在图纸上选择需要进行标注与注释的部分。
在CAD软件中，可以使用各种选择工具来选择需要标注与注释的对象。
例如，可以使用鼠标进行窗口选择，也可以使用“选择”命令进行选择。
完成选择后，点击菜单栏上的“标注”或“注释”按钮。
根据具体的CAD软件版本和界面设计，这些按钮的名称和位置可能会有所不同。
在弹出的标注或注释工具栏中，可以选择合适的标注对象，如尺寸标注、文字标注、箭头标注等。
针对不同的标注对象，CAD软件提供了各种不同的标注工具。
例如，在进行尺寸标注时，可以选择“线性尺寸”工具，并点击需要标注尺寸的起始点和终止点。
CAD软件会自动计算并绘制出正确的尺寸标注线。
在进行文字标注时，可以使用“文本”或“多行文本”工具。
点击需要添加文字标注的位置，弹出文字输入框后，输入相应的文字内容。
还可以通过调整文字的字体、大小和对齐方式等属性来使标注内容更加清晰易读。
除了基本的标注工具，CAD软件还提供了一些高级的标注功能。
例如，可以使用“属性”工具来添加对象的属性信息，如名称、编号、材料等。
还可以使用“图例”工具来创建标注图例，使图纸更加整洁和易于理解。
在进行注释时，可以使用各种注释工具来给图纸添加说明和说明符号。
例如，可以使用“注释箭头”工具来添加带有注释文字的箭头，指示出特定的需要注意的区域或细节。
还可以使用“注释框”工具来添加文本框，并在其中输入相应的注释内容。
在进行标注与注释时，还可以使用CAD软件中的一些辅助工具来提高工作效率和准确性。
CAD2024中的尺寸标注设置详解教程文件
CAD2024中的尺寸标注设置详解教程文件一、概述尺寸标注是CAD中非常重要的一个功能，它能够准确地描述绘图的尺寸和大小，方便设计师和使用者进行测量和计算。
本教程将详细介绍CAD2024中尺寸标注的设置方法，帮助大家更好地使用这个功能。
二、插入尺寸标注在CAD2024中插入尺寸标注有多种方法，下面以直线尺寸标注为例进行说明：2.在绘图区域内选择两条直线，点击确定。
3.在弹出的对话框中选择尺寸样式和单位，并设置其他相关参数，点击确定。
三、修改尺寸标注属性在CAD2024中，可以对插入的尺寸标注进行属性修改，以满足不同的需求。
具体步骤如下：1.选中需要修改属性的尺寸标注，右键点击选择"属性"。
2.在弹出的对话框中可以修改尺寸线、箭头、尺寸文字、标注线等属性，例如颜色、线型、文字高度等。
3.修改完成后点击确定即可应用修改。
四、设置尺寸标注样式2.在弹出的对话框中可以选择不同的尺寸样式，预览效果，并可以进行修改。
3.选择合适的样式后点击确定即可应用。
五、设置尺寸标注单位2.在弹出的对话框中选择所需的尺寸样式。
4.在弹出的对话框中可以修改单位的名称、精度等参数。
5.修改完成后点击确定即可应用。
六、设置尺寸标注的标注线位置1.选中需要设置标注线位置的尺寸标注，右键点击选择"属性"。
2.在尺寸标注的属性对话框中选择"标注线位置"。
3.在弹出的下拉选项中可以选择不同的标注线位置，例如"中心"、"上侧"、"下侧"等。
4.选择合适的标注线位置后点击确定即可应用。
七、总结通过本教程的学习，我们了解了CAD2024中尺寸标注设置的方法和技巧。
尺寸标注是绘图过程中重要的一步，准确和清晰的尺寸标注能够为设计和使用者提供便利。
希望大家能够运用好这个功能，在绘图中更加高效和精确。
cad梁标注的表示方法
cad梁标注的表示方法
CAD图纸中，梁的标注方法一般包含以下几种信息：
1. 梁的编号：通常由类型代号、序号和跨数及是否带悬挑组成。
类型代号如“KL”（框架梁）、“WKL”（屋面框架梁）、“L”（非框架梁）、“KZL”（框支梁）、“XL”（悬挑梁）和“JZL”（井字梁）。
序号是数字的顺序编号。
跨数及是否带悬挑写在括号内，数字表示跨数（悬挑不计入跨数），A表示一端悬挑，B表示两端悬挑。
2. 截面尺寸：等截面矩形梁标注为梁宽b×梁高h，如250×700。
不等高悬挑梁标注为梁宽b×梁根部高度h1/梁端部高度h2，如250×700/400。
3. 梁箍筋：标注内容包括钢筋的级别、钢筋直径、间距（加密区/非加密区），肢数（写在括号内）。
4. 通长筋或架立筋：既有通长筋又有架立筋时，标注为脚部通长纵筋+（架立筋）。
例如上部两根通长筋，直径20mm，下部2根架立筋，直径
14mm。
5. 梁侧构造钢筋或受扭钢筋：标注为G、两侧总配筋值、钢筋级别、直径。
以上信息仅供参考，具体标注方式可能会根据不同的CAD软件和地区习惯有所差异。
在实际操作中，建议参考具体的CAD软件使用手册或相关的设计规范进行操作。
CAD制图中的尺寸标注方法
CAD制图中的尺寸标注方法在CAD制图中，尺寸标注是非常重要的一部分，它能够表达图纸上物体的准确尺寸，方便工程师或设计师进行后续的测量和制作。
下面将介绍几种常用的CAD制图中的尺寸标注方法。
1. 直接尺寸标注法直接尺寸标注法是最常用的一种方法，并且也是最基础的一种。
在绘制物体时，可以通过选择两个端点或其他特定的图形实体来进行尺寸标注。
以直线为例，通过选择直线的两个端点，然后输入尺寸数值，就可以在直线上标注出准确的尺寸。
这种方法简单易行，适用于大部分情况。
2. 基础线标注法基础线标注法是一种更加灵活的尺寸标注方法，它使用了基础线来标注物体的尺寸。
基础线可以是直线、半径、直径等。
在绘制物体时，可以通过选择两个基础线端点，然后输入尺寸数值，即可标注出准确的尺寸。
与直接尺寸标注法相比，基础线标注法可以更好地适应各种复杂的图形。
3. 连续标注法连续标注法是一种快速且高效的尺寸标注方法。
在使用这种方法时，只需选择一个起始点，然后依次选择需要标注的物体的端点，CAD软件会自动计算并标注出相应的尺寸。
这种方法适用于标注一系列相同间距或相同尺寸的物体，如零件的孔距、螺纹的节距等。
4. 余量标注法余量标注法是指在标注尺寸时，考虑到工艺等因素，对尺寸进行适当的增加或减小。
通过余量标注，能够确保物体在制造和装配过程中具有合适的尺寸，以避免因尺寸过大或过小而引起的问题。
在CAD制图中，可以通过选择相应的尺寸标注命令，并输入正负余量数值来实现余量标注。
需要注意的是，在进行尺寸标注时，应尽量使用清晰且易读的字体和适当的尺寸大小，以确保标注在图纸上清晰可见，并且不会与其他标注混淆。
此外，在标注尺寸时应遵守一定的规范，如使用横线表示尺寸线、通过箭头指示尺寸方向等。
总结起来，CAD制图中的尺寸标注方法主要包括直接尺寸标注法、基础线标注法、连续标注法和余量标注法。
根据具体的绘图需求和要标注的物体形状，可以选择合适的标注方法。
通过准确标注尺寸，能够提高绘图的精确度，为后续的制作和测量工作提供准确的参考。
cad尺寸连续标注的基本步骤
cad尺寸连续标注的基本步骤CAD尺寸连续标注的基本步骤一、引言在CAD设计中，尺寸连续标注是一项非常重要的工作，它可以确保设计图纸的可读性和准确性。
本文将介绍CAD尺寸连续标注的基本步骤，以帮助读者更好地理解和应用此技术。
二、准备工作在进行尺寸连续标注之前，首先需要准备好相关的CAD设计图纸。
确保图纸中的尺寸已经正确绘制，并且需要标注的尺寸已经完全确定。
三、选择标注工具CAD软件提供了多种标注工具，如线性尺寸、径向尺寸、角度尺寸等。
根据需要选择合适的标注工具，并在CAD软件中打开标注工具栏。
四、选择标注位置标注位置应该清晰、易读，并且不与其他标注产生混淆。
根据设计要求和实际情况，选择合适的位置进行标注。
五、开始标注1. 选择标注工具后，点击图纸上的第一个需要标注的尺寸线段。
标注线段时要注意线段的起点和终点，确保标注的尺寸准确。
2. 根据需要，设置标注的精度和显示形式。
CAD软件提供了设置标注精度的选项，可以根据实际需求设置合适的精度。
同时，还可以选择标注的显示形式，如带箭头的直线、圆弧等。
3. 标注完成后，根据需要移动和调整标注文字的位置，以确保标注的清晰可读。
六、连续标注在完成第一个标注后，可以使用CAD软件提供的连续标注功能，快速地进行其他尺寸的标注。
具体步骤如下：1. 选择连续标注工具，点击第一个标注的尺寸，然后按住鼠标左键不放，拖动鼠标到下一个需要标注的尺寸线段上，松开鼠标左键即可完成标注。
2. 连续标注时要注意标注的方向和顺序，确保标注的逻辑和准确性。
可以根据需要选择标注的方向，如水平方向、垂直方向或者任意方向。
3. 标注完成后，可以根据需要移动和调整标注文字的位置，以确保标注的清晰可读。
七、检查和修正完成尺寸连续标注后，需要对标注进行检查和修正，以确保标注的准确性和一致性。
具体步骤如下：1. 仔细检查每个标注的尺寸是否正确，并与设计要求进行对比。
2. 检查标注的位置是否清晰可读，并与其他标注进行比较，确保没有重叠或混淆的情况。
- 1、下载文档前请自行甄别文档内容的完整性，平台不提供额外的编辑、内容补充、找答案等附加服务。
- 2、"仅部分预览"的文档,不可在线预览部分如存在完整性等问题,可反馈申请退款(可完整预览的文档不适用该条件!)。
- 3、如文档侵犯您的权益，请联系客服反馈,我们会尽快为您处理(人工客服工作时间：9:00-18:30)。
(defun C:gl1(/ dx dy dx1 dx2 dx3 dx4 dx5 dx6 dx7 dx8 dy1 dy2 pt dxt dyt qt c scale txt high lay pt1 pt2 pt3 pt4 pt5 pt6 pt7 pt8 pt8 pt10 ptt dis with dyz tt) (setvar "CMDECHO" 0)
(setq lay (getvar "clayer"))
(command "color" "bylayer")
(command "layer" "m" "gl" "c" "m" "gl" "")
(if (or (= nil (tblsearch "style" "xw"))
(/= (cdr (assoc 40 (tblsearch "style" "xw"))) 0)
)
(command "STYLE" "xw" "txt" "0" ".8" "0" "n" "n" "n")
)
(command "osnap" "int")
(setq pt (getpoint "\nInsert point <int mode>: "))
(command "osnap" "non")
(if (= scab nil) (setq scab 1.0))
(princ "\nScale is 1 or 100 !")
(setq scale (getreal (strcat "\nScale <" (rtos scab 2 0) ">:")))
(if (= scale nil) (setq scale scab))
(setq scab scale)
(if (= nil d) (setq d 240.0))
(setq dis (getreal (strcat "\nDistance form insert point <" (rtos d 2 0) ">:")))
(if (= nil dis) (setq dis d))
(setq d dis dis (* (/ dis 100.0) scale))
(if (= nil w) (setq w 900.0))
(setq with (getreal (strcat "\nWidth of door or window <" (rtos w 2 0) ">:")))
(if (= nil with) (setq with w))
(setq w with with (* (/ with 100.0) scale))
(if (= nil q) (setq q 240.0))
(setq qt (getreal (strcat "\nThickness of wall <" (rtos q 2 0) ">:")))
(if (= nil qt) (setq qt q))
(setq q qt qt (* (/ qt 100.0) scale))
(setq dy (cadr pt))
(setq dx (car pt))
(setq dx1 (+ dx dis))
(setq dx2 (+ dx1 with))
(setq dy1 (- dy (* 0.6 scale)))
(setq dy2 (+ (+ dy1 qt) (* 1.2 scale)))
(setq pt1 (list dx1 dy1))
(setq pt2 (list dx1 dy2))
(command "line" pt1 pt2 "")
(setq pt3 (list dx2 dy1))
(setq pt4 (list dx2 dy2))
(command "line" pt3 pt4 "")
(setq dx3 (- dx1 (* 2.4 scale)))
(setq dyz (+ dy (/ qt 2.0)))
(setq pt5 (list dx3 dyz))
(setq tmp (/ (- with (* 3 scale)) 2.0))
(setq dx4 (+ dx1 tmp))
(setq pt6 (list dx4 dyz))
(command "pline" pt5 "w" (* 0.6 scale) (* 0.6 scale) pt6 "")
(setq dx5 (+ dx4 (* 1 scale)))
(setq dx6 (+ dx5 (* 1 scale)))
(setq pt7 (list dx5 dyz))
(setq pt8 (list dx6 dyz))
(command "pline" pt7 "w" (* 0.6 scale) (* 0.6 scale) pt8 "")
(setq dx7 (+ dx6 (* 1 scale)))
(setq dx8 (+ dx2 (* 2.4 scale)))
(setq pt9 (list dx7 dyz))
(setq pt10 (list dx8 dyz))
(command "pline" pt9 "w" (* 0.6 scale) (* 0.6 scale) pt10 "")
(setq dyt (+ dy2 (* 0.9 scale)))
(setq dxt (+ dx5 (* 0.5 scale)))
(setq txt "0")
(setq high (* 4 scale))
(setq tt (strcat (rtos (/ qt 1.2 scale) 2 0) "GL" (rtos (/ with scale) 2 0) ".4")) (setq c 1)
(while (/= txt "")
(setq txt (getstring (strcat "\nGL text <" tt ">:")))
(if (and (= txt "") (= c 1)) (setq txt tt))
(setq c nil tt "None")
(if (/= txt "")
(progn
(setq ptt (list dxt dyt))
(command "text" "s" "xw" "c" ptt high "0" txt)
(setq dyt (+ dyt (* 5.15 scale)))
)
)
)
(command "layer" "s" lay "")
(princ)(princ)
)。