訂購產品
贊助專區
聯絡我們![[分享]新增標註型式LSP - 頁 3 2020-211](https://i.servimg.com/u/f67/12/31/59/66/2020-211.png)
![[分享]新增標註型式LSP - 頁 3 Oooo-110](https://i.servimg.com/u/f67/12/31/59/66/oooo-110.png)
![[分享]新增標註型式LSP - 頁 3 Oo-2-110](https://i.servimg.com/u/f67/12/31/59/66/oo-2-110.png)
![[分享]新增標註型式LSP - 頁 3 Ziao1510](https://i.servimg.com/u/f62/19/71/67/71/ziao1510.png)
![[分享]新增標註型式LSP - 頁 3 BPl3tjj](https://i.imgur.com/BPl3tjj.png)
![[分享]新增標註型式LSP - 頁 3 Uos15010](https://i.servimg.com/u/f67/12/31/59/66/uos15010.png)
[分享]新增標註型式LSP
![[分享]新增標註型式LSP - 頁 3 Empty](https://2img.net/i/empty.gif)
[分享]新增標註型式LSP
由 小豬 于 2014-12-28, 00:41
主題回顧 :
https://youtu.be/zveWnCRRsn4
(defun c:ddd ()
(vl-load-com)
(setvar "cmdecho" 0)
(SETQ A (GETREAL "\n尺寸比例:"))
(SETQ B (GETREAL "\n圖面比例:"))
(COMMAND "-STYLE" "尺" "isocp.shx,chineset.shx" "0" "0.8" "" "" "")
(setvar "DIMALTF" 2.5)
(setvar "DIMTOLJ" 0)
(setvar "DIMTFAC" 0.8000)
(setvar "DIMTDEC" 3)
(setvar "DIMTZIN" 8)
(setvar "DIMFXL" (/ 1.25 B))
(setvar "DIMATFIT" 3)
(setvar "DIMALTTD" 3)
(setvar "DIMLTEX1" "BYLAYER")
(setvar "DIMLTEX2" "BYLAYER")
(setvar "DIMEXO" (/ 0.6250 B))
(setvar "DIMEXE" (/ 1.250 B))
(setvar "DIMLWE" 13)
(setvar "DIMCLRE" 3)
(setvar "DIMTOFL" 1)
(setvar "DIMTAD" 1)
(setvar "DIMGAP" (/ 0.6250 B))
(setvar "DIMTIH" 0)
(setvar "DIMTXSTY" "尺")
(setvar "DIMTOH" 0)
(setvar "DIMCLRT" 1)
(setvar "DIMTXT" (/ 3.0 B))
(setvar "DIMLTYPE" "BYLAYER")
(setvar "DIMLWD" 13)
(setvar "DIMDLI" (/ 3.750 B))
(setvar "DIMCLRD" 3)
(setvar "DIMASZ" (/ 3.0 B))
(setvar "DIMDEC" 3)
(setvar "DIMLFAC" (/ 1 A))
(setvar "DIMZIN" 8)
(setvar "DIMAZIN" 2)
(setvar "DIMADEC" 3)
(if (= A B 1)
(SETQ TT "ISO-25")
(PROGN
(SETQ TT (STRCAT (setq A (rtos A 2 1))
'"-ISO-25-"
(setq B (rtos B 2 1))
)
)
)
)
;-------------------------------------------------------------
(setq ad (vla-get-ActiveDocument (vlax-get-acad-object)))
(setq obj (vla-add (vla-get-dimstyles ad) TT))
(vla-copyfrom Obj ad)
(vla-put-activedimstyle ad Obj)
(princ)
)
https://youtu.be/zveWnCRRsn4
(defun c:ddd ()
(vl-load-com)
(setvar "cmdecho" 0)
(SETQ A (GETREAL "\n尺寸比例:"))
(SETQ B (GETREAL "\n圖面比例:"))
(COMMAND "-STYLE" "尺" "isocp.shx,chineset.shx" "0" "0.8" "" "" "")
(setvar "DIMALTF" 2.5)
(setvar "DIMTOLJ" 0)
(setvar "DIMTFAC" 0.8000)
(setvar "DIMTDEC" 3)
(setvar "DIMTZIN" 8)
(setvar "DIMFXL" (/ 1.25 B))
(setvar "DIMATFIT" 3)
(setvar "DIMALTTD" 3)
(setvar "DIMLTEX1" "BYLAYER")
(setvar "DIMLTEX2" "BYLAYER")
(setvar "DIMEXO" (/ 0.6250 B))
(setvar "DIMEXE" (/ 1.250 B))
(setvar "DIMLWE" 13)
(setvar "DIMCLRE" 3)
(setvar "DIMTOFL" 1)
(setvar "DIMTAD" 1)
(setvar "DIMGAP" (/ 0.6250 B))
(setvar "DIMTIH" 0)
(setvar "DIMTXSTY" "尺")
(setvar "DIMTOH" 0)
(setvar "DIMCLRT" 1)
(setvar "DIMTXT" (/ 3.0 B))
(setvar "DIMLTYPE" "BYLAYER")
(setvar "DIMLWD" 13)
(setvar "DIMDLI" (/ 3.750 B))
(setvar "DIMCLRD" 3)
(setvar "DIMASZ" (/ 3.0 B))
(setvar "DIMDEC" 3)
(setvar "DIMLFAC" (/ 1 A))
(setvar "DIMZIN" 8)
(setvar "DIMAZIN" 2)
(setvar "DIMADEC" 3)
(if (= A B 1)
(SETQ TT "ISO-25")
(PROGN
(SETQ TT (STRCAT (setq A (rtos A 2 1))
'"-ISO-25-"
(setq B (rtos B 2 1))
)
)
)
)
;-------------------------------------------------------------
(setq ad (vla-get-ActiveDocument (vlax-get-acad-object)))
(setq obj (vla-add (vla-get-dimstyles ad) TT))
(vla-copyfrom Obj ad)
(vla-put-activedimstyle ad Obj)
(princ)
)
小豬- 初級會員
- 文章總數 : 17
年齡 : 32
來自 : 台北
職業 : 打雜
愛好 : 上網
個性 : 隨和
使用年資 : 初學者
使用版本 : 2010
積分 : 1
經驗值 : 4089
威望值 : 45
發帖精華 : 0
注冊日期 : 2009-06-12
lcskc- 一般會員
- 文章總數 : 59
年齡 : 47
來自 : 高雄
職業 : 模具
愛好 : pc相關
個性 : 安靜
使用年資 : 10
使用版本 : R12
經驗值 : 2535
威望值 : 31
注冊日期 : 2014-05-02
lmt112233- 一般會員
- 文章總數 : 82
年齡 : 61
來自 : hk
職業 : 結構繪圖
愛好 : 旅遊
個性 : 樂觀
使用年資 : 16
使用版本 : acad2012
經驗值 : 4121
威望值 : 30
注冊日期 : 2010-02-21
dollarxx- 一般會員
- 文章總數 : 12
年齡 : 39
來自 : 桃園市桃園區
職業 : 建築
愛好 : 繪圖
個性 : 樂觀
使用年資 : 5年
使用版本 : 2007至2012
經驗值 : 1881
威望值 : 0
注冊日期 : 2015-06-01
lxg3443- 一般會員
- 文章總數 : 14
年齡 : 32
來自 : 北京
職業 : cad
愛好 : 音乐
個性 : 活泼
使用年資 : 5年
使用版本 : 2014
經驗值 : 2237
威望值 : 0
注冊日期 : 2014-06-06
hkjyiuop- 初級會員
- 文章總數 : 100
年齡 : 32
來自 : 台灣新北市土城區
職業 : 機電工程師
愛好 : 學習
個性 : 開朗
使用年資 : 2年
使用版本 : 2016
積分 : 1
經驗值 : 2750
威望值 : 54
注冊日期 : 2014-04-25
C.C.CHIEN- 贊助會員
- 文章總數 : 29
年齡 : 55
來自 : 花蓮
職業 : 石材裝修設計與工地管理
愛好 : 大自然、運動、聽音樂
個性 : 沉默安靜
使用年資 : 10年
使用版本 : 2012
經驗值 : 4247
威望值 : 12
注冊日期 : 2009-02-10
alexmai- 一般會員
- 文章總數 : 42
年齡 : 40
來自 : guangzhou china
職業 : designer
愛好 : design
個性 : happy
使用年資 : 10years
使用版本 : autocad 2010
經驗值 : 3070
威望值 : 34
注冊日期 : 2012-08-16
jaco4942- 初級會員
- 文章總數 : 65
年齡 : 27
來自 : 台中
職業 : 車銑加工業
愛好 : 機械
個性 : 隨興
使用年資 : 1年
使用版本 : 2016
積分 : 1
經驗值 : 4112
威望值 : 14
注冊日期 : 2009-12-01
benray- 初級會員
- 文章總數 : 188
年齡 : 51
來自 : 花蓮縣
職業 : 建築、機電設計(飯店整合)、室內設計、REVIT
愛好 : GAME
個性 : 悶燒
使用年資 : 15年
使用版本 : 2016、2018版
積分 : 6
經驗值 : 4862
威望值 : 85
發帖精華 : 1
注冊日期 : 2008-10-12
cd7025- 初級會員
- 文章總數 : 20
年齡 : 38
來自 : 台北市
職業 : 室內設計
愛好 : 興趣廣泛
個性 : 隨和
使用年資 : 1年
使用版本 : 2011
積分 : 2
經驗值 : 3449
威望值 : 19
注冊日期 : 2011-03-19
MK WU- 初級會員
- 文章總數 : 63
年齡 : 47
來自 : 台灣台北
職業 : 工
愛好 : 看電視
個性 : 隨緣
使用年資 : 1年
使用版本 : 2013
積分 : 1
經驗值 : 3210
威望值 : 57
注冊日期 : 2012-07-02
anais99- 初級會員
- 文章總數 : 87
年齡 : 41
來自 : 台北縣
職業 : 模具製圖
愛好 : 騎自行車
個性 : 開朗
使用年資 : 12
使用版本 : 2010
積分 : 4
經驗值 : 3950
威望值 : 12
注冊日期 : 2010-06-14
沉默- 初級會員
- 文章總數 : 18
年齡 : 28
來自 : 台北
職業 : 家具設計
愛好 : 電腦
個性 : 古板
使用年資 : 10
使用版本 : 2014
積分 : 1
經驗值 : 1559
威望值 : 30
注冊日期 : 2016-06-15
hung- 一般會員
- 文章總數 : 51
年齡 : 47
來自 : 台北
職業 : 電腦繪圖
愛好 : 看電影
個性 : 樂觀
使用年資 : 15
使用版本 : 2014
經驗值 : 4442
威望值 : 0
注冊日期 : 2008-10-08
ming1789- 一般會員
- 文章總數 : 26
年齡 : 44
來自 : 彰化
職業 : 機械
愛好 : 上網
個性 : 樂觀
使用年資 : 10
使用版本 : 2014
經驗值 : 1566
威望值 : 0
注冊日期 : 2016-06-18
jeamtseng32- 新手上路
- 文章總數 : 2
年齡 : 42
來自 : 台北市
職業 : 建築
愛好 : 建築
個性 : 樂觀
使用年資 : 10年
使用版本 : 2011
經驗值 : 1951
威望值 : 0
注冊日期 : 2015-02-05
jackiehover- 初級會員
- 文章總數 : 141
年齡 : 34
來自 : 桃園市八德區
職業 : 消防設備、水電設計
愛好 : 上網、遊戲、網拍
個性 : 平易近人
使用年資 : 2014/09至今
使用版本 : 2014、15、16
積分 : 1
經驗值 : 2450
威望值 : 90
注冊日期 : 2015-08-31
millerwu91- 一般會員
- 文章總數 : 34
年齡 : 33
來自 : 板橋
職業 : 土木工程
愛好 : 看電影
個性 : 友善
使用年資 : 1
使用版本 : 2012
經驗值 : 2273
威望值 : 6
注冊日期 : 2014-09-16
gt05yzxy- 一般會員
- 文章總數 : 8
年齡 : 27
來自 : 台北
職業 : 室內設計
愛好 : 設計
個性 : 要求完美
使用年資 : 3年
使用版本 : 2018
經驗值 : 407
威望值 : 6
注冊日期 : 2019-06-03
oopsyyyyy- 贊助會員
- 文章總數 : 34
年齡 : 26
來自 : 台北
職業 : 結構助理工程師
愛好 : 看電影
個性 : 活潑
使用年資 : 3
使用版本 : 2017
經驗值 : 661
威望值 : 6
注冊日期 : 2019-01-19
hueigo- 初級會員
- 文章總數 : 88
年齡 : 55
來自 : 台中
職業 : 建築設計師
愛好 : 圍棋
個性 : 平實
使用年資 : 15
使用版本 : 2013
積分 : 4
經驗值 : 3312
威望值 : 121
注冊日期 : 2012-10-01
回復： [分享]新增標註型式LSP
由 Tiger&蘋果爸 于 2019-12-04, 14:20
已經補上附件囉~hueigo 寫到:~~這個分享好像沒有lsp可下載，只能靠自已看螢幕打字???
____________________________________________________________________________________
![[分享]新增標註型式LSP - 頁 3 Ia15010](https://i.servimg.com/u/f62/19/71/67/71/ia15010.png)
Tiger&蘋果爸- 系統管理員
- 文章總數 : 19120
年齡 : 44
來自 : 台北市文山區
職業 : AutoCAD顧問
愛好 : 蹓狗/戶外活動/拍照
個性 : 幽默/樂觀/善良
使用年資 : 15↑
使用版本 : AutoCAD 2016
經驗值 : 75234
威望值 : 14343
注冊日期 : 2008-04-23
-
回復： [分享]新增標註型式LSP
由 greatmuta 于 2019-12-19, 10:54
指令: ddd
尺寸比例:1
圖面比例:2
; 錯誤: 已拒絕 AutoCAD 變數設定值: "DIMFXL" 0.625
我沒辦法用ㄝ
尺寸比例:1
圖面比例:2
; 錯誤: 已拒絕 AutoCAD 變數設定值: "DIMFXL" 0.625
我沒辦法用ㄝ
greatmuta- 初級會員
- 文章總數 : 50
年齡 : 37
來自 : 桃園
職業 : 模具
愛好 : 上班以外時間放空睡覺
個性 : 討厭麻煩事
使用年資 : 10
使用版本 : 2004
積分 : 1
經驗值 : 2704
威望值 : 15
注冊日期 : 2013-08-12
wuwubaibai- 頻道會員
- 文章總數 : 30
年齡 : 37
來自 : 彰化市
職業 : 板金
愛好 : 電腦
個性 : 外向
使用年資 : 4
使用版本 : 2010
經驗值 : 2375
威望值 : 0
注冊日期 : 2014-04-18
AutoCAD顧問 :: 技術(發言等級:一般會員) :: :: 進階討論
第3頁(共3頁)
這個論壇的權限：
您 無法 在這個版面回復文章