顧問教學
加入贊助
聯絡我們[分享]新增標註型式LSP
+67
gt05yzxy
millerwu91
jackiehover
jeamtseng32
ming1789
hung
沉默
anais99
MK WU
cd7025
benray
jaco4942
alexmai
C.C.CHIEN
hkjyiuop
lxg3443
dollarxx
lmt112233
lcskc
eazy0623
Janet90224
lolo0314
Joan-Yeh
kaven0922
ccxsw
厚速共
panshuru
zhangcan0516
kit92064
weiyaolieh
jgt2035
a0928311114
hugh817
minitsao
奶茶
john351486
ctest
wawhch
salad123
eric770914
ling1027
鄭淑娟
virage7676
Tsar
tjs1466
abcisabc
sabina0827
ma62266750
JYHBIN
leo133943
randytsay
et1029et
EVONNE
hueigo
DARDAR
maculon
judyyai
junbafa74
a258
djh1006
ji2342
crihy
qaz6605
archkkuo
kiko
Tiger&蘋果爸
小豬
71 posters
![[分享]新增標註型式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
年齡 : 35
來自 : 台北
職業 : 打雜
愛好 : 上網
個性 : 隨和
使用年資 : 初學者
使用版本 : 2010
積分 : 1
經驗值 : 5062
威望值 : 45
發帖精華 : 0
注冊日期 : 2009-06-12
回復： [分享]新增標註型式LSP
由 lcskc 2015-06-13, 15:26
正好在找相關資料,感謝分享
____________________________________________________________________________________
![[分享]新增標註型式LSP - 頁 3 Acad2010](https://i.servimg.com/u/f57/12/31/59/66/acad2010.png)
![[分享]新增標註型式LSP - 頁 3 Acad1810](https://i.servimg.com/u/f38/12/31/59/66/acad1810.png)
![[分享]新增標註型式LSP - 頁 3 Acad1211](https://i.servimg.com/u/f41/12/31/59/66/acad1211.png)
![[分享]新增標註型式LSP - 頁 3 Acad1311](https://i.servimg.com/u/f75/12/31/59/66/acad1311.png)
![[分享]新增標註型式LSP - 頁 3 Acad1511](https://i.servimg.com/u/f16/12/31/59/66/acad1511.png)
lcskc- 一般會員
- 文章總數 : 59
年齡 : 50
來自 : 高雄
職業 : 模具
愛好 : pc相關
個性 : 安靜
使用年資 : 10
使用版本 : R12
經驗值 : 3508
威望值 : 31
注冊日期 : 2014-05-02
回復： [分享]新增標註型式LSP
由 lmt112233 2015-06-14, 21:48
好方便，有空來試試，謝謝分享。
____________________________________________________________________________________
![[分享]新增標註型式LSP - 頁 3 Ioaoe110](https://i.servimg.com/u/f67/12/31/59/66/ioaoe110.png)
![[分享]新增標註型式LSP - 頁 3 Zuoiy_10](https://i.servimg.com/u/f67/12/31/59/66/zuoiy_10.png)
![[分享]新增標註型式LSP - 頁 3 2020-211](https://i.servimg.com/u/f67/12/31/59/66/2020-211.png)
![[分享]新增標註型式LSP - 頁 3 Aizyao11](https://i.servimg.com/u/f67/12/31/59/66/aizyao11.png)
![[分享]新增標註型式LSP - 頁 3 Iyb_1510](https://i.servimg.com/u/f67/12/31/59/66/iyb_1510.png)
![[分享]新增標註型式LSP - 頁 3 Aizyao10](https://i.servimg.com/u/f67/12/31/59/66/aizyao10.png)
![[分享]新增標註型式LSP - 頁 3 BPl3tjj.png](https://i.imgur.com/BPl3tjj.png.png)
![[分享]新增標註型式LSP - 頁 3 Ziao1510](https://i.servimg.com/u/f62/19/71/67/71/ziao1510.png)
![[分享]新增標註型式LSP - 頁 3 Oo-2-110](https://i.servimg.com/u/f67/12/31/59/66/oo-2-110.png)
![[分享]新增標註型式LSP - 頁 3 Oooa_110](https://i.servimg.com/u/f67/12/31/59/66/oooa_110.png)
lmt112233- 一般會員
- 文章總數 : 101
年齡 : 64
來自 : hk
職業 : 結構繪圖
愛好 : 旅遊
個性 : 樂觀
使用年資 : 16
使用版本 : acad2012
經驗值 : 5187
威望值 : 30
注冊日期 : 2010-02-21
dollarxx- 一般會員
- 文章總數 : 12
年齡 : 42
來自 : 桃園市桃園區
職業 : 建築
愛好 : 繪圖
個性 : 樂觀
使用年資 : 5年
使用版本 : 2007至2012
經驗值 : 2854
威望值 : 0
注冊日期 : 2015-06-01
lxg3443- 一般會員
- 文章總數 : 14
年齡 : 35
來自 : 北京
職業 : cad
愛好 : 音乐
個性 : 活泼
使用年資 : 5年
使用版本 : 2014
經驗值 : 3210
威望值 : 0
注冊日期 : 2014-06-06
回復： [分享]新增標註型式LSP
由 hkjyiuop 2015-06-24, 20:56
謝謝小豬大大提供~
小弟不客氣收下，來去研究一下!
謝謝...
小弟不客氣收下，來去研究一下!
謝謝...
____________________________________________________________________________________
![[分享]新增標註型式LSP - 頁 3 07810](https://i.servimg.com/u/f37/12/31/59/66/07810.png)
![[分享]新增標註型式LSP - 頁 3 Acad1810](https://i.servimg.com/u/f39/12/31/59/66/acad1810.png)
hkjyiuop- 初級會員
- 文章總數 : 100
年齡 : 35
來自 : 台灣新北市土城區
職業 : 機電工程師
愛好 : 學習
個性 : 開朗
使用年資 : 2年
使用版本 : 2016
積分 : 1
經驗值 : 3723
威望值 : 54
注冊日期 : 2014-04-25
C.C.CHIEN- 贊助會員
- 文章總數 : 29
年齡 : 57
來自 : 花蓮
職業 : 石材裝修設計與工地管理
愛好 : 大自然、運動、聽音樂
個性 : 沉默安靜
使用年資 : 10年
使用版本 : 2012
經驗值 : 5220
威望值 : 12
注冊日期 : 2009-02-10
回復： [分享]新增標註型式LSP
由 alexmai 2015-08-06, 18:49
看看是什么新标注
____________________________________________________________________________________
alexmai- 一般會員
- 文章總數 : 42
年齡 : 43
來自 : guangzhou china
職業 : designer
愛好 : design
個性 : happy
使用年資 : 10years
使用版本 : autocad 2010
經驗值 : 4043
威望值 : 34
注冊日期 : 2012-08-16
jaco4942- 初級會員
- 文章總數 : 65
年齡 : 30
來自 : 台中
職業 : 車銑加工業
愛好 : 機械
個性 : 隨興
使用年資 : 1年
使用版本 : 2016
積分 : 1
經驗值 : 5085
威望值 : 14
注冊日期 : 2009-12-01
benray- 專屬會員
- 文章總數 : 193
年齡 : 54
來自 : 花蓮縣
職業 : 建築、機電設計(飯店整合)、室內設計、REVIT
愛好 : GAME
個性 : 悶燒
使用年資 : 20年
使用版本 : 2021版
積分 : 6
經驗值 : 5858
威望值 : 91
發帖精華 : 1
注冊日期 : 2008-10-12
cd7025- 初級會員
- 文章總數 : 20
年齡 : 41
來自 : 台北市
職業 : 室內設計
愛好 : 興趣廣泛
個性 : 隨和
使用年資 : 1年
使用版本 : 2011
積分 : 2
經驗值 : 4422
威望值 : 19
注冊日期 : 2011-03-19
回復： [分享]新增標註型式LSP
由 MK WU 2016-03-30, 13:52
這麼好用的程式替我省下一些麻煩步驟,試用一下!感謝~~ 
____________________________________________________________________________________
![[分享]新增標註型式LSP - 頁 3 01310](https://i.servimg.com/u/f37/12/31/59/66/01310.png)
MK WU- 初級會員
- 文章總數 : 65
年齡 : 50
來自 : 台灣台北
職業 : 工
愛好 : 看電視
個性 : 隨緣
使用年資 : 1年
使用版本 : 2013
積分 : 1
經驗值 : 4193
威望值 : 57
注冊日期 : 2012-07-02
anais99- 初級會員
- 文章總數 : 105
年齡 : 44
來自 : 台北縣
職業 : 模具製圖
愛好 : 騎自行車
個性 : 開朗
使用年資 : 12
使用版本 : 2010
積分 : 4
經驗值 : 5011
威望值 : 12
注冊日期 : 2010-06-14
沉默- 初級會員
- 文章總數 : 18
年齡 : 31
來自 : 台北
職業 : 家具設計
愛好 : 電腦
個性 : 古板
使用年資 : 10
使用版本 : 2014
積分 : 1
經驗值 : 2532
威望值 : 30
注冊日期 : 2016-06-15
hung- 一般會員
- 文章總數 : 56
年齡 : 50
來自 : 台北
職業 : 電腦繪圖
愛好 : 看電影
個性 : 樂觀
使用年資 : 15
使用版本 : 2014
經驗值 : 5440
威望值 : 0
注冊日期 : 2008-10-08
ming1789- 一般會員
- 文章總數 : 26
年齡 : 47
來自 : 彰化
職業 : 機械
愛好 : 上網
個性 : 樂觀
使用年資 : 10
使用版本 : 2014
經驗值 : 2539
威望值 : 0
注冊日期 : 2016-06-18
jeamtseng32- 新手上路
- 文章總數 : 2
年齡 : 45
來自 : 台北市
職業 : 建築
愛好 : 建築
個性 : 樂觀
使用年資 : 10年
使用版本 : 2011
經驗值 : 2924
威望值 : 0
注冊日期 : 2015-02-05
回復： [分享]新增標註型式LSP
由 jackiehover 2016-10-14, 21:35
先下載下來了 感謝大大分享
____________________________________________________________________________________
jackiehover- 初級會員
- 文章總數 : 149
年齡 : 36
來自 : 桃園市八德區
職業 : 消防設備、水電設計
愛好 : 上網、遊戲、網拍
個性 : 平易近人
使用年資 : 2014/09至今
使用版本 : 2014、15、16
積分 : 1
經驗值 : 3461
威望值 : 90
注冊日期 : 2015-08-31
millerwu91- 一般會員
- 文章總數 : 35
年齡 : 36
來自 : 板橋
職業 : 土木工程
愛好 : 看電影
個性 : 友善
使用年資 : 1
使用版本 : 2012
經驗值 : 3251
威望值 : 6
注冊日期 : 2014-09-16
gt05yzxy- 一般會員
- 文章總數 : 9
年齡 : 30
來自 : 台北
職業 : 室內設計
愛好 : 設計
個性 : 要求完美
使用年資 : 3年
使用版本 : 2018
經驗值 : 1385
威望值 : 6
注冊日期 : 2019-06-03
回復： [分享]新增標註型式LSP
由 oopsyyyyy 2019-11-27, 16:15
謝謝分享!!!!!!
____________________________________________________________________________________
oopsyyyyy- 贊助會員
- 文章總數 : 47
年齡 : 29
來自 : 台北
職業 : 結構助理工程師
愛好 : 看電影
個性 : 活潑
使用年資 : 3
使用版本 : 2017
經驗值 : 1699
威望值 : 6
注冊日期 : 2019-01-19
回復： [分享]新增標註型式LSP
由 hueigo 2019-12-03, 19:23
~~這個分享好像沒有lsp可下載，只能靠自已看螢幕打字???
____________________________________________________________________________________
hueigo- 初級會員
- 文章總數 : 94
年齡 : 58
來自 : 台中
職業 : 建築設計師
愛好 : 圍棋
個性 : 平實
使用年資 : 15
使用版本 : 2013
積分 : 4
經驗值 : 4316
威望值 : 121
注冊日期 : 2012-10-01
回復： [分享]新增標註型式LSP
由 Tiger&蘋果爸 2019-12-04, 14:20
已經補上附件囉~hueigo 寫到:~~這個分享好像沒有lsp可下載，只能靠自已看螢幕打字???
____________________________________________________________________________________
👉[好康]加入專屬B取得大補帖及看2D+3D課程(點我)👈
![[分享]新增標註型式LSP - 頁 3 Sesa2011](https://i.servimg.com/u/f67/12/31/59/66/sesa2011.png)
![[分享]新增標註型式LSP - 頁 3 Youtub11](https://i.servimg.com/u/f67/12/31/59/66/youtub11.png)
![[分享]新增標註型式LSP - 頁 3 Oiea2011](https://i.servimg.com/u/f67/12/31/59/66/oiea2011.png)
![[分享]新增標註型式LSP - 頁 3 Oe20011](https://i.servimg.com/u/f67/12/31/59/66/oe20011.png)
![[分享]新增標註型式LSP - 頁 3 Fbi20011](https://i.servimg.com/u/f67/12/31/59/66/fbi20011.png)
![[分享]新增標註型式LSP - 頁 3 Line2011](https://i.servimg.com/u/f67/12/31/59/66/line2011.png)
👉[2022優惠活動]AutoCAD 2D進化論教學包(點我)👈
Tiger&蘋果爸- 系統管理員
- 文章總數 : 20490
年齡 : 47
來自 : 台北市文山區
職業 : AutoCAD顧問
愛好 : 蹓狗/戶外活動/拍照
個性 : 幽默/樂觀/善良
使用年資 : 20↑
使用版本 : AutoCAD 2022
經驗值 : 84364
威望值 : 16298
注冊日期 : 2008-04-23
-
回復： [分享]新增標註型式LSP
由 greatmuta 2019-12-19, 10:54
指令: ddd
尺寸比例:1
圖面比例:2
; 錯誤: 已拒絕 AutoCAD 變數設定值: "DIMFXL" 0.625
我沒辦法用ㄝ
尺寸比例:1
圖面比例:2
; 錯誤: 已拒絕 AutoCAD 變數設定值: "DIMFXL" 0.625
我沒辦法用ㄝ
____________________________________________________________________________________
greatmuta- 初級會員
- 文章總數 : 52
年齡 : 40
來自 : 桃園
職業 : 模具
愛好 : 上班以外時間放空睡覺
個性 : 討厭麻煩事
使用年資 : 10
使用版本 : 2004
積分 : 1
經驗值 : 3685
威望值 : 15
注冊日期 : 2013-08-12
wuwubaibai- 一般會員
- 文章總數 : 65
年齡 : 40
來自 : 彰化市
職業 : 板金
愛好 : 電腦
個性 : 外向
使用年資 : 4
使用版本 : 2010
經驗值 : 3553
威望值 : 0
注冊日期 : 2014-04-18
章富傑- 一般會員
- 文章總數 : 23
年齡 : 45
來自 : 基隆市
職業 : 機、水、電工程
愛好 : 騎重車
個性 : 開朗
使用年資 : 5年以上
使用版本 : 2014
經驗值 : 2156
威望值 : 12
注冊日期 : 2017-06-17
AutoCAD顧問 :: 技術(發言等級:一般會員) :: :: 進階討論
第3頁(共3頁)
這個論壇的權限：
您 無法 在這個版面回復文章
![[分享]新增標註型式LSP - 頁 3 2020-310](https://i.servimg.com/u/f67/12/31/59/66/2020-310.png)
![[分享]新增標註型式LSP - 頁 3 Oiu15010](https://i.servimg.com/u/f67/12/31/59/66/oiu15010.png)
![[分享]新增標註型式LSP - 頁 3 Ia15010](https://i.servimg.com/u/f62/19/71/67/71/ia15010.png)
![[分享]新增標註型式LSP - 頁 3 Uos15010](https://i.servimg.com/u/f67/12/31/59/66/uos15010.png)
![[分享]新增標註型式LSP - 頁 3 BPl3tjj](https://i.imgur.com/BPl3tjj.png)
![[分享]新增標註型式LSP - 頁 3 Aoe1-111](https://i.servimg.com/u/f67/12/31/59/66/aoe1-111.png)
![[分享]新增標註型式LSP - 頁 3 Uos15011](https://i.servimg.com/u/f67/12/31/59/66/uos15011.png)
![[分享]新增標註型式LSP - 頁 3 RQvAhqF](https://i.imgur.com/RQvAhqF.png)
![[分享]新增標註型式LSP - 頁 3 YdKelqY](https://i.imgur.com/ydKelqY.png)
![[分享]新增標註型式LSP - 頁 3 K410yWG](https://i.imgur.com/k410yWG.png)