南方CASS快捷键

附 南方 CASS 快捷键 A 画弧 ARC AA 给实体加地物名 B 自由连接 C 画圆 CIRCLE COPYCLIP 从不同窗口复制局部 CP 拷贝 COPY D 绘制电力线 DD 通用绘图命令 DDPTYPE 改变点形状 E 删除 ERASE F 图形复制 FF 绘制多点房屋 G 绘制高程点 H 线型换向 I 绘制道路 J 复合线连接 K 绘制陡坎 KK 查询坎高 L 画直线 LINE LA 设置图层 LAYER LT 设置线型 LINETYPE M 移动 MOVE N 批量拟合复合线 O 批量修改复合线高 P 屏幕移动 PAN PASTEORIG 在不同窗口粘贴 PE 复合线编辑 PEDIT PL 画复合线 PLINE PLOT 打印设置 PURGE 清理层 Q 直角纠正 R 屏幕重画 REDRAW REGEN 重新生成 RR 符号重新生成 S 加入实体属性 SS 绘制四点房屋 T 注记文字 TR 打断 V 查看实体属性 W 绘制围墙 WW 批量改变复合线宽 X 多功能复合线 XP 绘制自然斜坡 Y 复合线上加点 Z 屏幕缩放 ZOOM 附 常见的快捷命令 一 字母类 1 对象特性 ADC ADCENTER 设计中心 Ctrl 2 CH MO PROPERTIES 修改特性 Ctrl 1 MA MATCHPROP 属性匹配 ST STYLE 文字样式 BR COL COLOR 设置颜色 LA LAYER 图层操作 LT LINETYPE 线形 LTS LTSCALE 线形比例 LW LWEIGHT 线宽 UN UNITS 图形单位 ATT ATTDEF 属性定义 ATE ATTEDIT 编辑属性 BO BOUNDARY 边界创建 包括创建闭合多段线和面域 AL ALIGN 对齐 EXIT QUIT 退出 EXP EXPORT 输出其它格式文件 IMP IMPORT 输入文件 OP PR OPTIONS 自定义 CAD 设置 PRINT PLOT 打印 PU PURGE 清除垃圾 R REDRAW 重新生成 REN RENAME 重命名 SN SNAP 捕捉栅格 DS DSETTINGS 设置极轴追踪 OS OSNAP 设置捕捉模式 PRE PREVIEW 打印预览 TO TOOLBAR 工具栏 V VIEW 命名视图 AA AREA 面积 DI DIST 距离 LI LIST 显示图形数据信息 2 绘图命令 PO POINT 点 L LINE 直线 XL XLINE 射线 PL PLINE 多段线 ML MLINE 多线 SPL SPLINE 样条曲线 POL POLYGON 正多边形 REC RECTANGLE 矩形 C CIRCLE 圆 A ARC 圆弧 DO DONUT 圆环 EL ELLIPSE 椭圆 REG REGION 面域 MT MTEXT 多行文本 T MTEXT 多行文本 B BLOCK 块定义 I INSERT 插入块 W WBLOCK 定义块文件 DIV DIVIDE 等分 H BHATCH 填充 3 修改命令 CO COPY 复制 MI MIRROR 镜像 AR ARRAY 阵列 O OFFSET 偏移 RO ROTATE 旋转 M MOVE 移动 E DEL 键 ERASE 删除 X EXPLODE 分解 TR TRIM 修剪 EX EXTEND 延伸 S STRETCH 拉伸 LEN LENGTHEN 直线拉长 SC SCALE 比例缩放 BR BREAK 打断 CHA CHAMFER 倒角 F FILLET 倒圆角 BR AutoCAD 2000 快捷命令的使用 PE PEDIT 多段线编辑 ED DDEDIT 修改文本 4 视窗缩放 P PAN 平移 Z 空格 空格 实时缩放 Z 局部放大 Z P 返回上一视图 Z E 显示全图 5 尺寸标注 DLI DIMLINEAR 直线标注 DAL DIMALIGNED 对齐标注 DRA DIMRADIUS 半径标注 DDI DIMDIAMETER 直径标注 DAN DIMANGULAR 角度标注 DCE DIMCENTER 中心标注 DOR DIMORDINATE 点标注 TOL TOLERANCE 标注形位公差 LE QLEADER 快速引出标注 DBA DIMBASELINE 基线标注 DCO DIMCONTINUE 连续标注 D DIMSTYLE 标注样式 DED DIMEDIT 编辑标注 DOV DIMOVERRIDE 替换标注系统变量 二 常用 CTRL 快捷键 CTRL 1 PROPERTIES 修改特性 CTRL 2 ADCENTER 设计中心 CTRL O OPEN 打开文件 CTRL N M NEW 新建文件 CTRL P PRINT 打印文件 CTRL S SAVE 保存文件 CTRL Z UNDO 放弃 CTRL X CUTCLIP 剪切 CTRL C COPYCLIP 复制 CTRL V PASTECLIP 粘贴 CTRL B SNAP 栅格捕捉 CTRL F OSNAP 对象捕捉 CTRL G GRID 栅格 CTRL L ORTHO 正交 CTRL W 对象追踪 CTRL U 极轴 三 常用功能键 F1 HELP 帮助 F2 文本窗口 F3 OSNAP 对象捕捉 F7 GRIP 栅格 F8 ORTHO 正交 注 修改完 ACAD PGP 文件后 不必重新启动 AUTOCAD 立刻加 载刚刚修改过的 ACAD PGP 文件的方法 方法 键入 REINIT 命令 钩选 PGP 再确定 1 简码引导文件中平行体 P 线上点号 通过点号 因 CASS6 中可能存在 BUG 因此可能要重复执行两次简码引导才能画出平行实体 2 添加自定义野外操作码方法 先在操作手册中查出相应地貌地物的 CASS 内码 再在 jcode def 中新添加一行 并输入相 应的野外操作码与对应的内码 如 添加了水涯线的野外操作码为 Q10 其中 Q10 是自定义的野外操作码 是水涯线的 CASS 内码 砖房的野外操作码 F7 野外操作码由一个字母加两位数字组成 无效的 0 可以省略 如 F07 与 F7 等价 如果要带参数而野外操作码又不足三位 则操作码与参数间需加 如 F2 2 表示房屋参数的 2 层 因 F2 不足三位因此野外操作码的 F2 与参数层数的 2 间要加 但如果野外操作码是三位则参数可直接紧跟野外操作码如 F022 两种方法效果相同 自定义野外操作码时请遵循 CASS 的约定 即表示线型的用 X 拟合线型用 Q 坎类 用 K 拟合坎类则用 U 如 表 D 1 线面状地物符号代码表 坎类 曲 K U 数 0 陡坎 1 加固陡坎 2 斜坡 3 加固斜坡 4 垄 5 陡崖 6 干沟 线类 曲 X Q 数 0 实线 1 内部道路 2 小路 3 大车路 4 建筑公路 5 地类界 6 乡 镇界 7 县 县级市界 8 地区 地级市界 9 省界线 垣栅类 W 数 0 1 宽为 0 5 米的围墙 2 栅栏 3 铁丝网 4 篱笆 5 活树篱笆 6 不 依比例围墙 不拟合 7 不依比例围墙 拟合 铁路类 T 数 0 标准铁路 大比例尺 1 标 小 2 窄轨铁路 大 3 窄 小 4 轻轨铁路 大 5 轻 小 6 缆车道 大 7 缆车道 小 8 架空索道 9 过河电缆 电力线类 D 数 0 电线塔 1 高压线 2 低压线 3 通讯线 房屋类 F 数 0 坚固房 1 普通房 2 一般房屋 3 建筑中房 4 破坏房 5 棚房 6 简 单房 管线类 G 数 0 架空 大 1 架空 小 2 地面上的 3 地下的 4 有管堤的 植被土质 拟合边界 B 数 0 旱地 1 水稻 2 菜地 3 天然草地 4 有林地 5 行树 6 狭长灌木林 7 盐碱地 8 沙地 9 花圃 不拟合边界 H 数 0 旱地 1 水稻 2 菜地 3 天然草地 4 有林地 5 行树 6 狭长灌 木林 7 盐碱地 8 沙地 9 花圃 平行体 P X 0 9 Q 0 9 K 0 6 U 0 6 控制点 C 数 0 图根点 1 埋石图根点 2 导线点 3 小三角点 4 三角点 5 土堆上 的三角点 6 土堆上的小三角点 7 天文点 8 水准点 9 界址点 点状地物符号代码均以 A 开头 详情请参阅 用户手册 附录 A CASS 野外操作码 部分 3 坎类带有坡毛的图示坡毛均画在前进方向的左铡 因此在编号时请按此确定方向 但对 于已编好编号的可用线型换向命令 H 随时换向 4 成图时最好用无简码坐标数据文件 简码坐标数据文件 引导码一起使用 最方便的是 使用无简码坐标数据文件 简码引导文件方法 a 无简码坐标数据文件就是只含有点号 X Y H 的简单坐标高程数据文件 文件结构如 下 点号 Y E X N H 在点号与 Y 值间必须予留简码位置 但可不输入简码 b 简码引导文件就是通过点号来定义地物地貌的代码文件 每一行表示一个地物 每一行的第一项为地物的 地物代码 即野外操作码 在 jcode def 中定义后即与 CASS 内码对应了 也可理解为 CASS 内码的助记码 以后各数据为构成该地物的各测点 的点号 依连接顺序的排列 同行的数据之间用逗号分隔 表示地物代码的字母要大写 用户可根据自己的需要定制野外操作简码 如 以下以 开头的为下一行的解释内容 非引导文件内容 去掉以 开头的注释 内容后为一完整的简码引导文件 D1 定义高压电线 后续点依次相连 各点上画有电杆与表示电力线的双箭头 D1 H293 H009 HY033 HY001 HY014 D3 定义通讯线 后续点依次相连 D3 HY013 HY011 HY004 HY021 HY023 HY031 H003 H008 C0 定义不埋石图根点 不同控制点用 C0 C1 等表示 具体请查用户手册 C0 之后紧接 写入图中的点名 逗号之后是该控制点在坐标文件中的点号 C0 H6 H6 U0 定义加固陡坎 后续点依次相连 陡坎线拟合 如用 K0 则不拟合陡坎线 U0 H3152 H3149 H3155 H3156 H291 H010 H007 H006 H005 H004 H002 HY034 HY032 HY03 0 HY029 HY028 HY027 HY026 HY025 HY024 HY042 HY022 HY095 HY098 HY002 HY003 HY004 HY005 HY006 HY007 HY008 HY009 HY076 HY010 HY012 HY015 Q10 是本人在 jcode def 中自定义的水涯线的野外操作码 系统默认中无此代码 对应内码 为 在 jcode def 中新加一行 Q10 保存后重启 CASS 即可生效 Q10 HY075 HY073 HY072 HY071 HY070 HY068 HY067 HY066 HY065 HY064 HY063 HY0 62 HY061 HY060 HY059 H139 H140 H141 H142 H143 H144 H145 H146 H147 H148 H170 H1 49 HY056 HY057 H151 H152 H089 H090 H091 H093 H094 H095 H096 H097 H212 H213 H214 H 232 H233 H289 K5 定义陡崖 K5 H3162 H3160 K5 H3003 H3002 同前 Q10 1161 1162 1163 1164 1165 1166 1167 A87 以 A 开头的是点状地物 此表示纪念碑 系统中有此代码 A87 1153 A87 1043 A42 表示独立电线杆 A42 1148 拟合曲线 此表示公路 Q0 1085 1086 1087 1088 1089 1090 1157 1158 1159 1160 C3 Q0 1147 1149 1150 1151 F7 表示砖房 后接依序三点或多点 系统中无此代码 本人自定义 jcode def 中加一行 F7 F7 9001 1055 1057 同 C0 H6 H6 C0 C3 C3 C0 C4 C4 C0 C4 1 C4 1 拟合封闭边线旱地 B0 1154 1155 1156 1157 1090 1089 1088 非拟合封闭边线旱地 H0 1046 1048 1045 1051 1053 1049 1036 1034 1032 1030 1029 1023 1022 1021 1020 1025 1026 1 035 1042 1044 非加固坎 K0 1025 1024 1023 K0 1026 1028 1029 K0 1035 1033 1031 1030 K0 1042 1037 1039 1041 1032 K0 1044 1040 1038 1034 K0 1045 1047 1049 B10 表示沙滩区域 后续点依次相连并封闭 系统中无此代码 本人自定义 B 表示区域 性地物 边线封闭并拟合 jcode def 中加一行 B10 B10 3327 3323 3322 3321 3320 3319 3226 3318 3317 3316 3227 3315 3334 3333 3331 3330 332 9 3328 5 不同比例出图对高程注记的密度有不同要求 如果是针对 1 500 制作的图需要在 1 2000 比例尺下出图时 需要抽稀高程注记 此时可利用展高程点的过滤功能即在展高程点时提示 注记高程点的距离 米 时输 入规范要求的高程注记的间距 如在 1 2000 比例尺下要求 3 5cm 注记一个高程点 对应的距离是 60 100 米 此时只要输入 这之间的任一个数值即可过滤掉小于此 距离的高程注记 这只是针对出图进行的展点 要生成 DTM 和等高线则可不过滤 在出 图之前 关闭其它层只打开 GCD 层并 删除该层上的所有对象 重新按出图要求展一次高程点并进行过滤即可 6 生成引导文件后通过 CASS 菜单 简码引导 先选择引导文件再选择坐标数据文件即可 生成所有地物地貌符号 在 CASS6 中 因平行地特符号可能要连续执行两次简码引导 因 此可以将平行地物单独生成引导文件 这可能是 CASS6 的 BUG 也可能是 D 版 CASS 才 有的现象 AutoCAD 大比例尺数字化制图系统中植被填充程序的开发 韦廖军 兰度 南宁市勘测院 广西南宁 摘 要 在利用 AutoCAD 开发大比例尺数字化制图系统时 会涉及到如何开发植被 填充程序的问题 本文介绍了两种开发植被填充程序的方法 关键词 AutoCAD Vb AutoLisp 植被填充 CreatepolygonRgn PtInRegionh 0 引言 在利用 AutoCAD 开发大比例尺数字化制图系统时 植被填充程序的开发是一个必不 可少的步骤 植被填充程序开发的难点在于植被填充范围的不规则 如何根据植被填充的 不规则范围确定各个植被符号的插入位置坐标 笔者在开发实践中总结出两种行之有效的 解决方法 一 利用 Vb 和 AutoLisp 相结合的方法来实现植被填充程序的开发 AutoLisp 对 AutoCAD 图元的操作和数据的提取简单而直接 而 Vb 的 Api 函数非常丰富 其中有两个 函数 CreatePolygonRgn 生成一个区域 和 PtInRegionh 判断点是否在区域内 非常有用 利用它们来编制植被填充程序 可以起到事半功倍的效果 因此可以考虑利用 AutoLisp 提 取植被填充范围坐标和实现植被符号的插入 而利用 Vb 的 Api 函数根据植被填充范围坐 标计算各个植被填充的插入位置坐标 二 利用 AutoLisp 编写实现判断点是否在区域内的功能 类似 VB 的 PtInRegionh 函数功能 所有数据在 AutoLisp 程序里面用表来处理 免去生成临时文件 本文主要讲述第一种方法 第二种方法只给出判断点是否在区域内的子函数 其余程 序实现方法与第一种方法类似 1 第一种方法 一 实现的方法及步骤 1 利用 AutoLisp 编程实现 在 AutoCAD 中绘制或者选取植被填充范围线 然后提取 范围线坐标 并存入一个临时文本文件 2 利用 Vb 编程实现 1 打开上一步骤所生成的文本文件 读取植被填充边界坐标 并存入一个数组 2 从边界坐标提取植被填充范围的坐标最大最小值 即确定包含植被填充不规则范 围的矩形范围 根据规范要求的间距在矩形范围内内插规则方格网点 植被符号插入点 并存入另外一个数组 B 3 利用 CreatePolygonRgn 函数 根据边界坐标生成一个区域 PHRGN 4 利用 PtInRegionh 函数 剔除不在区域 PHRGN 内的方格网点 剩余的点即为所 求的植被符号插入点 3 利用 AutoLisp 编程实现 根据在上一步骤中求得的植被插入点在 AutoCAD 中批量 插入植被符号 二 具体的编程代码及注释 以下就是根据上面的编程思路写出的的源程序代码和具体注释 1 获取植被填充边界坐标子程序 用 AutoLisp 编写 DEFUN ZBZB COMMAND CMDECHO 0 SETVAR PLINETYPE 1 PLINE 创建优化的多线 输入边界坐标 SETQ P NIL 存贮边界范围坐标的表 PROMPT n 植被填充 n t 输入点 SETQ P1 GETPOINT COMMAND PLINE COMMAND P1 SETQ P APPEND LIST P1 P WHILE SETQ P2 GETPOINT P1 n 输入点 SETQ P APPEND LIST P2 P COMMAND P2 SETQ P1 P2 COMMAND C 边界坐标写入文件 SETQ FIL OPEN C ZBHZ TMP W 边界坐标写入文件 C ZBHZ TMP SETQ N LENGTH P SETQ I 0 REPEAT N SETQ Y RTOS CAR NTH I P 2 3 SETQ X RTOS CADR NTH I P 2 3 PRINC X FIL PRINC n FIL PRINC Y FIL PRINC n FIL SETQ I 1 I CLOSE FIL PRINC 2 计算植被符号插入点坐标子程序 用 Vb 编写 Private PP As POINTAPI Private Xmin0 Xmax0 Ymin0 Ymax0 As Double Private L As Double 方格边长 Private p As POINTAPI 方格网点坐标 Private ZBJJ As Variant Private Declare Function PtInRegion Lib gdi32 ByVal hRgn As Long ByVal x As Long ByVal y As Long As Long Private Declare Function CreatePolygonRgn Lib gdi32 lpPoint As POINTAPI ByVal nCount As Long ByVal PolyFillMode As Long As Long Private Declare Function DeleteObject Lib gdi32 ByVal hObject As Long As Long Private PHRGN As Long Private PtInRgn As Long Private Type POINTAPI x As Long y As Long End Type Private ltscale As Variant Sub Main Dim nwith As Integer nheight As Integer Dim n As Integer I As Integer 打开 C ZBHZ TMP 读取边界坐标 Open C ZBHZ TMP For Input As 1 n 0 Do While Not EOF 1 Input 1 x Input 1 y n n 1 Loop Close 1 ReDim PP 0 To n 1 As POINTAPI Open C ZBHZ TMP For Input As 1 n 0 Do While Not EOF 1 Input 1 PP n x Input 1 PP n y n n 1 Loop Close 1 On Error Resume Next 求包含植被边界范围的最小矩形 x y 坐标 Xmin0 PP 0 x Ymin0 PP 0 y Xmax0 Xmin0 Ymax0 Ymin0 For I 0 To n 1 If PP I x Xmax0 Then Xmax0 PP I x End If If PP I y Ymax0 Then Ymax0 PP I y End If Next I 生成区域 PHRGN PHRGN CreatePolygonRgn PP 0 n 1 Call FGW 调用内插方格网点子程序 End Sub 内插方格网点子程序 Sub FGW Dim PPP 2 As Double Dim I J As Integer Dim Xmin Xmax Ymin Ymax As Double Dim FIL As String 清除 C ZBHZ TMP 文件数据 Open C ZBHZ TMP For Append As 1 CLOSE 1 Open C ZBHZ TMP For Append As 1 L 10 设置植被填充间距 剔除植被填充区域外的方格网点 nheight Int Ymax0 Ymin0 L 3 nwith Int Xmax0 Xmin0 L 3 ReDim p 0 To nwith 1 0 To nheight 1 As POINTAPI For I 0 To nwith 2 Step 2 For J 0 To nheight 2 Step 2 p I J x Int Xmin0 L L I L p I J y Int Ymin0 L L J L PtInRgn PtInRegion PHRGN p I J x p I J y If PtInRgn 0 Then Print 1 p I J x Print 1 p I J y End If p I 1 J x Int Xmin0 L L I 1 L p I 1 J y Int Ymin0 L L J 1 L PtInRgn PtInRegion PHRGN p I 1 J x p I 1 J y If PtInRgn 0 Then 把植被填充范围内的方格网点 X Y 坐标数据写入 C ZBHZ TMP Print 1 p I 1 J x Print 1 p I 1 J y End If Next J Next I DeleteObject PHRGN 删除区域 Close 1 End Sub 注 该子程序修改调试完毕之后需编译成可执行文件 ZBHZ EXE 放在 C 盘根目录下 3 插入植被符号子程序 用 AutoLisp 编写 DEFUN ZBCR SETQ OLDOSMODE GETVAR OSMODE COMMAND OSMODE 0 COMMAND LINETYPE S CONTINUOUS 读入植被符号插入位置坐标数据 SETQ FIL OPEN C ZBHZ TMP R WHILE SETQ X READ LINE FIL IF X NIL SETQ X ATOF X SETQ Y READ LINE FIL IF Y NIL SETQ Y ATOF Y SETQ P LIST Y X IF P NIL 插入植被符号 其中 GS9410 是已经定义的植被形符号名称 实际工作根据所需填 充 符号不同更改其名称即可 缩放比例也是根据实际绘图比例设定 COMMAND SHAPE GS9410 P0 50 CLOSE FIL vl file delete C ZBHZ TMP 删除临时文件 C ZBHZ TMP COMMAND OSMODE OLDOSMODE PRINC 4 主程序 用 AutoLisp 编写 DEFUN C ZBHZ ZBZB 调用获取植被边界坐标子程序 STARTAPP C ZBHZ EXE ZBHZ 调用计算植被符号插入点坐标子程序 ZBCR 调用插入植被符号子程序 2 第二种方法 判断点是否在多边形区域内子函数如下 PTREGION 子函数 需要参数 点 PT X Y H 或者 X Y 多边形顶点坐标 PL X0 Y0 X1 Y1 返回值数据格式 区域内 IN 区域外 OUT defun PTINREGION PT PL setq PT list nth 0 PT nth 1 PT SETQ PL NUM LENGTH PL SETQ PL PT NIL SETQ III 0 REPEAT PL NUM SETQ PL PT JD angle PT NTH III PL if PL PT nil setq PL PT LIST PL PT JD SETQ PL PT APPEND LIST PL PT JD PL PT SETQ III 1 III SETQ JDHE 0 SETQ INSIDE OUT SETQ III 0 REPEAT PL NUM IF III PL NUM 1 PROGN SETQ