HGCAD3   admin 发表于 2020-04-04 3821次点击

功能名称: 初始化
内置命令: Init
快捷命令: cs
功能介绍: 完成AutoCAD初始化工作, 包括创建图层、创建文字样式、创建标注样式,设置绘图比例及环境变量等
相关文件: 用户可以在 用户目录\HGConfig.lsp 文件中自定义各种初始化工作

此功能随AutoCAD启动自动加载,在绘图过程中可以执行命令改变, 由于HGCAD版本的升级迭代,其中比例因子已经实现自动切换了,具体请访问网址 https://www.hgcad.com/cad-help-224.html

admin 2021-10-13 1#

以下为默认设置



;  说明:  
;  1、分号及分号后面的一行内容为注释内容,系统不加载  
;  2、用户目录中HGConfig.lsp优先加载, 如无则加载系统目录中HGConfig.lsp  
;  3、HGConfig.lsp 文件通过 HGCONFIG 命令完成配置  
;  4、不要改变各项顺序  
;=====================================================================  

        (setvar "cmdecho" 0)  

        ;●●● HGCAD ●●●  
        (PurgeAll 1)                            ;自动垃圾清理, [0=否、1=自动、2=强制]  
        (cmdenv "autoime"   1)                  ;命令栏始终英文输入状态, 0:关闭, 1:Shift, 2:Ctrl  
        (cmdenv "imecmd"  "DDEDIT,MTEXT,TEXT,MTEDIT,TEXTEDIT")        
                                                ;执行命令中自动切换为中文状态,逗号间隔, wcmatch匹配  
        (cmdenv "startmenu" 1)                  ;窗口左上角logo是否启用弹出HGCAD菜单  
        (cmdenv "dropatt"   1)                  ;在块属性定义的提示内容后面可以设置下拉列表.以@开始  
                                                ;分号分割,如:  @选项1;选项2;选项2;选项2  
        (setvar "proxynotice" 0)                ;打开文档时显示"代理信息"对话框  
        (setvar "HPSCALE" (getvar "dimscale"))  ;设定填充图案比例因子  

        ;●●● 字体替换 ●●●  
        ;(HGCAD_UpdateStyleFont 模式[NO/LOST/ALL] "英文字体.SHX" "中文字体.SHX")  
        (HGCAD_UpdateStyleFont "NO" "HGCAD.SHX" "HGCADHZ.SHX")  

        ;●●● 创建文本样式 ●●●  
        ;(HGCAD_MakeTextStyle "名称" "SHX字体" "大字体" "高度" "宽度比例" "倾斜角(-85~85)" "强制更新(Y/N)")  
        ;字体文件设置规定:   
        ;  第一个字体(SHX字体,字体设置对话框左侧选框中字体名称): 为"windows系统字体"或"shx字体",   
        ;  比如:宋体、HGCAD.SHX(英文)  
        ;  第二个字体(大字体, 字体设置对话框右侧选框中字体名称): 为"shx大字体",比如 HGCADHZ.SHX(中文)  
        ;  当SHX字体的扩展名为shx时候,大字体也必须设置,两者扩展名都为shx  
        ;  当shx字体为windows字体即无shx扩展名时,大字体不用设置  
        (HGCAD_MakeTextStyle "HGCAD" "HGCAD.SHX" "HGCADHZ.SHX" "5" "0.75" "0" "Y")  

        ;●●● 创建图层 ●●●  
        ;(HGCAD_MakeLayer "图层名称" "线型名称" "线型文件" "颜色" "线宽" "强制更新(Y/N)"),   
        ;Continuous不需要指定线型文件  
        (HGCAD_MakeLayer "粗实线"     "Continuous"  ""             "2"  "0.70" "N")  
        (HGCAD_MakeLayer "中粗线"     "Continuous"  ""             "4"  "0.35" "N")  
        (HGCAD_MakeLayer "细实线"     "Continuous"  ""             "7"  "0.18" "N")  
        (HGCAD_MakeLayer "中心线"     "CENTER"      "HGCAD.lin"    "1"  "0.18" "N")  
        (HGCAD_MakeLayer "虚线"       "DASHED"      "HGCAD.lin"   "6"  "0.18" "N")  
        (HGCAD_MakeLayer "双点划线"   "DIVIDE"      "HGCAD.lin" "3"  "0.18" "N")  
        (HGCAD_MakeLayer "文本"       "Continuous"  "HGCAD.lin"   "7"  "0.18" "N")  
        (HGCAD_MakeLayer "标注"       "Continuous"  "HGCAD.lin"   "7"  "0.18" "N")  

        ;●●● 系统变量 ●●●  
        ;环境  
        (setvar "angdir"   1)           ;正角度的方向(0=逆时针, 1=顺时针)  
        (cmdvar "angbase"  0)           ;基准角度方向  
        (setvar "osmode"   16383)       ;对象捕捉  
        (setvar "luprec"   1)           ;设置线性单位和坐标的显示精度, 插件中数值转为文本保留小数位数  

        ;极轴  
        (setvar "autosnap"  63)         ;自动捕捉/磁吸及其工具栏提示。  
        (setvar "polarmode"  0)         ;正交追踪0,全部角度极轴追踪2,附加角极轴追踪4  
        (cmdvar "polarang"   5)         ;设置极轴角增量为 5   
        (setvar "polaraddang" "")       ;设置极轴附加角增量  

        ;标注  
        (cmdenv "dimlayer"  "标注")       ;标注图层  
        (setvar "dimdec"    1)          ;标注长度尺寸的小数位数  
        (setvar "dimadec"   1)          ;标注角度尺寸的小数位(-1表示依据 dimdec)  
        (setvar "dimtxt"  3.5)          ;标注值文字高度  
        (setvar "dimtsz"    0)          ;标注箭头样式:(0绘制箭头;>0绘制小斜线替代箭头)  
        (setvar "dimasz"  2.5)          ;标注箭头大小  
        (setvar "dimexe"    1)          ;尺寸界线超出尺寸线的距离  
        (setvar "dimexo"    1)          ;尺寸界线偏移原点的距离  
        (setvar "dimgap"    1)          ;文字偏移尺寸线的距离  
        (setvar "dimtfill"  1)          ;标注文字背景(1=有, 0=无)  
        (setvar "dimupt"    0)          ;手动放置标注文字  

        ;●●● 创建标注样式 ●●●  
        ;(MakeDimStyle "标注样式名称", "文本样式名称")  
        (HGCAD_MakeDimStyle "HGCAD" "HGCAD" "N")  

        ;●●● 图层切换命令 ●●●  
        ;线型: 例如: ByBlock、ByLayer、Continuous、Center、Dashed、Divide、Dot  
        ;颜色: ByLayer、ByBlock、整数(1~255)  
        ;线宽: 固定数值: ByLayer、ByBlock、Default、0、0.05、0.09、0.13、0.15、0.18、0.20、0.25、0.30、  
        ;                0.35、0.40、0.50、0.53、0.60、0.70、0.80、0.90、1.00、1.06、1.20、1.40、1.58、  
        ;                2.00、2.11  
        ;执行命令:  图层切换后要执行的命令, 如果为星号(*)则更改选取对象, 为空则切换后不执行"执行命令"  
        ;(defun C:命令()(OnekeyCMD "图层" "线型" "颜色" "线宽" "执行命令"))  
        (defun C:0()(HGCAD_OnekeyCMD "0"        "ByLayer" "ByLayer" "ByLayer" "#"))  
        (defun C:1()(HGCAD_OnekeyCMD "中心线"   "ByLayer" "ByLayer" "ByLayer" "#"))  
        (defun C:2()(HGCAD_OnekeyCMD "粗实线"   "ByLayer" "ByLayer" "ByLayer" "#"))  
        (defun C:3()(HGCAD_OnekeyCMD "双点划线" "ByLayer" "ByLayer" "ByLayer" "#"))  
        (defun C:4()(HGCAD_OnekeyCMD "中粗线"   "ByLayer" "ByLayer" "ByLayer" "#"))  
        (defun C:5()(HGCAD_OnekeyCMD "细实线"   "ByLayer" "ByLayer" "ByLayer" "#"))  
        (defun C:6()(HGCAD_OnekeyCMD "虚线"       "ByLayer" "ByLayer" "ByLayer" "#"))  
        (defun C:7()(HGCAD_OnekeyCMD "文本"       "ByLayer" "ByLayer" "ByLayer" "#"))  
admin 2021-10-13 2#

字体设置中只设置宋体:

(HGCAD_MakeTextStyle "HGCAD" "宋体" "" "5" "0.75" "0" "Y")