[求助]：求助2002CAD图形的应用技巧

xiaotang

有什么好的方法，在打开一个新的2002CAD图形时，显示的都是自己定义的线形、标注型式、文字样式等等，而不是如ISO-25这类的

ffq1980

在cad2002下，请使用“工具”－－－“cad标准”－－－“配置”就可以按自己的定义设置了，还可以把人家的不符合你标准的图纸转化成你的标准

zhywin

好呀。..又知道一个好动东.那我问一下..其它的不合自己的标准的图纸,都转换我自己的标准,那会不会有问题呢.比如我的标注尺寸是按.1:100标的.而它的图是按1:1画的.

papayaa

; Default setup for phototype drawing
(defun C:DEF (/ scale)
  (setvar "CMDECHO" 0)
  (initget (+ 1 2 4))
  (setq SCALE (getreal "\nScale  =  1 to "))

  (Command "LAYER"
  "M" "0AXES" "C" "1" "" "L" "CENTER" "" "lw" "0.13" ""
  "M" "0DIM" "C" "8" "" "lw" "0.13" ""
  "M" "0DIVIDE" "C" "4" "" "L" "DIVIDE" "" "lw" "0.13" ""
  "M" "0TEXT" "C" "2" "" "lw" "0.18" ""
  "M" "1STRUCTURE" "C" "5" "" "lw" "0.5" ""
  "M" "1GRID-H" "C" "122" "" "lw" "0.13" ""
  "M" "1GRID-V" "C" "142" "" "lw" "0.13" ""
  "M" "1BORDER" "C" "5" "" "lw" "0.5" ""
  "M" "1CURTAINWALL" "C" "6" "" "lw" "0.13" ""
  "M" "1E.FILL"  "C" "9" "" "lw" "0.13" ""
  "M" "2Al.EXTRUSION0"  "C" "3" "" "lw" "0.3" ""
  "M" "2Al.EXTRUSION1" "C" "2" "" "lw" "0.18" ""
  "M" "2STEEL" "C" "21" "" "lw" "0.3" ""
  "M" "2Al.PANEL" "C" "140" "" "lw" "0.18" ""
  "M" "2GLASS" "C" "61" "" "lw" "0.18" ""
  "M" "2GASK" "C" "8" "" "lw" "0.13" ""
  "M" "2STONE" "C" "42" "" "lw" "0.18" ""
  "M" "2S.S." "C" "25" "" "lw" "0.13" ""
  "M" "2SEAL" "C" "9" "" "lw" "0.13" ""
  "M" "2HARDWARE" "C" "241" "" "lw" "0.13" ""
  "M" "2ACCESSORY" "C" "201" "" "lw" "0.13" ""
  "M" "3THICK" "C" "3" "" "lw" "0.3" ""
  "M" "3THIN" "C" "6" "" "lw" "0.13" ""
  "M" "3DASH" "C" "4" "" "L" "dashed" "" "lw" "0.13" ""
  "S" "0" ""

  "STYLE" "TK" "SIMPLEX.SHX,HZTXT.SHX" "" "0.75" "0" "N" "N" "N"
  "STYLE" "HZ" "romans.SHX,HZTXT.SHX" (* 3.5 SCALE) "0.7" "0" "N" "N" "N")
  
  (setvar "AUNITS" 0)
  (setvar "AUPREC" 2)
  (setvar "GRIDUNIT" (list (* 10.0 SCALE) (* 10.0 SCALE)))
  (setvar "LTSCALE" (* 10.0 SCALE))
  (setvar "LUNITS" 2)
  (setvar "LUPREC" 2)
  (setvar "SNAPUNIT" (list SCALE SCALE))
  (setvar "TEXTSIZE" (* 3.5 SCALE))


  (SETVAR "DIMTOL" 0)       ;;公差的标注方式
  (SETVAR "DIMLIM" 0)       ;;生成极限尺寸
  (SETVAR "DIMTIH" 0)       ;;水平放置尺寸界线内的标注文字
  (SETVAR "DIMTOH" 0)       ;;水平放置尺寸界线外的标注文字
  (SETVAR "DIMSE1" 0)       ;;隐藏第一条尺寸界线
  (SETVAR "DIMSE2" 0)       ;;隐藏第二条尺寸界线
  (SETVAR "DIMALT" 0)       ;;选定的换算单位
  (SETVAR "DIMTOFL" 1)      ;;强制尺寸线置于尺寸界线之间
  (SETVAR "DIMSAH" 0)       ;;分离箭头块
  (SETVAR "DIMTIX" 1)       ;;将标注文字置于尺寸界线内
  (SETVAR "DIMSOXD" 0)      ;;隐藏尺寸界线之外的尺寸线
  (SETVAR "DIMSD1" 0)       ;;隐藏第一条尺寸线
  (SETVAR "DIMSD2" 0)       ;;隐藏第二条尺寸线
  (SETVAR "DIMUPT" 0)       ;;控制用户定位文字
  (SETVAR "DIMTOLJ" 0)      ;;公差的垂直对正方式
  (SETVAR "DIMDSEP" ".")    ;;小数分隔符
  (SETVAR "DIMALTD" 2)      ;;换算单位小数位
  (SETVAR "DIMZIN" 8)       ;;控制消零处理
  (SETVAR "DIMJUST" 0)      ;;控制尺寸线上标注文字的水平对齐
  (SETVAR "DIMFIT" 3)       ;;已失效
  (SETVAR "DIMTZIN" 8)      ;;控制公差的消零处理
  (SETVAR "DIMALTZ" 0)      ;;控制换算单位的消零处理
  (SETVAR "DIMALTTZ" 0)     ;;控制换算公差的消零处理
  (SETVAR "DIMTAD" 1)       ;;将标注文字置于尺寸线上方
  (SETVAR "DIMUNIT" 2)      ;;已失效
  (SETVAR "DIMAUNIT" 0)     ;;角度单位格式
  (SETVAR "DIMDEC" 2)       ;;标注的小数位
  (SETVAR "DIMTDEC" 2)      ;;公差的小数位
  (SETVAR "DIMALTU" 2)      ;;换算单位
  (SETVAR "DIMALTTD" 2)     ;;换算公差的小数位
  (SETVAR "DIMADEC" 0)      ;;角度标注的小数位
  (SETVAR "DIMAZIN" 0)      ;;控制角度标注的消零处理
  (SETVAR "DIMATFIT" 3)     ;;箭头及文字自适应调整
  (SETVAR "DIMFRAC" 0)      ;;分数格式
  (SETVAR "DIMLUNIT" 2)     ;;线性单位的格式
  (SETVAR "DIMTMOVE" 0)     ;;标注文字的移动规则
  (SETVAR "DIMTXSTY" "hz")    ;;文字样式
  (SETVAR "DIMZIN" "8")     ;;消零后续
  
  (SETVAR "DIMSCALE" SCALE)  ;;全局比例
  (SETVAR "DIMASZ" 1.5)     ;;箭头大小
  (SETVAR "DIMEXO" 1.5)     ;;尺寸界线偏离原点的距离
  (SETVAR "DIMDLI" 10)      ;;尺寸线间距
  (SETVAR "DIMEXE" 1)       ;;尺寸界线上超尺寸线的距离
  (SETVAR "DIMRND" 0)       ;;标注距离的舍入值
  (SETVAR "DIMDLE" 0)       ;;尺寸线超出尺寸界线的距离
  (SETVAR "DIMTP" 0)        ;;上偏差
  (SETVAR "DIMTM" 0)        ;;下偏差
  (SETVAR "DIMTXT" 2.5)     ;;文字高度
  (SETVAR "DIMCEN" 2)       ;;圆心标记的尺寸
  (SETVAR "DIMTSZ" 0)       ;;替代箭头的小斜线尺寸
  (SETVAR "DIMALTF" 0.0394) ;;换算单位比例因子
  (SETVAR "DIMLFAC" 1)      ;;测量值的比例因子
  (SETVAR "DIMTVP" 0)       ;;标注文字的垂直位置
  (SETVAR "DIMTFAC" 0.8)    ;;公差对象的文字高度
  (SETVAR "DIMGAP" 1)       ;;尺寸线与标注文字的间距
  (SETVAR "DIMALTRND" 0)    ;;换算单位的舍入值
  (SETVAR "DIMPOST" "")     ;;设置标注的文字前缀和后缀
  (SETVAR "DIMAPOST" "")    ;;表示换算单位的文字前缀和后缀
  (SETVAR "DIMBLK" "ArchTick");;箭头块名称
  (SETVAR "DIMBLK1" "")     ;;第一箭头块名称
  (SETVAR "DIMBLK2" "")     ;;第二箭头块名称
  (SETVAR "DIMLDRBLK" "ARCHTICK");;引线箭头
  (SETVAR "DIMCLRD" 8)      ;;尺寸线和引线颜色
  (SETVAR "DIMCLRE" 8)      ;;尺寸界线颜色
  (SETVAR "DIMCLRT" 2)      ;;标注文字的颜色
  (SETVAR "DIMLWD" -1)      ;;尺寸线和引线线宽
  (SETVAR "DIMLWE" -1)      ;;尺寸界线线宽
  (setvar "EXPERT" 5)

  (command "dim" "SAVE" "ARROW" "exit")  ;;定义标注样式ARROW

  (SETVAR "DIMEXO" 0.5)     ;;尺寸界线偏离原点的距离
  (SETVAR "DIMDLE" 1)       ;;尺寸线超出尺寸界线的距离
  (SETVAR "DIMDLI" 1)       ;;尺寸线间距
  (SETVAR "DIMBLK" ".")      ;;箭头块名称
  (SETVAR "DIMLDRBLK" ".")   ;;引线箭头
  (SETVAR "DIMADEC" 1)      ;;角度标注的小数位
  (SETVAR "DIMAZIN" 2)      ;;控制角度标注的消零处理
  (SETVAR "DIMTXT" 3)       ;;文字高度
  (SETVAR "DIMGAP" 0.5)     ;;尺寸线与标注文字的间距


  (command "dim" "SAVE" "JG1" "exit")    ;;定义标注样式JG1

  (SETVAR "DIMBLK" "ARCHTICK");;箭头块名称
  (SETVAR "DIMASZ" 1)       ;;箭头大小

  (command "dim" "SAVE" "SG1" "exit")    ;;定义标注样式SG1
  (command "dimstyle" "r" "SG1")
  (princ)
  
)
       

我得一个小程序，加载后用DEF，直接调出自己得标准。

lfgcd

楼主应该说得是新建文件的样式.如果是这样得话.可以通过修改图形样板文件,可以达到你得要求.图象样板文件得制作你看001斑竹得教学文章就是了