AutoCAD顧問
還沒有註冊嗎...即日起免費註冊,所有最完整的AutoCAD討論、教學及資源都在論壇裡喔~

Join the forum, it's quick and easy

AutoCAD顧問
還沒有註冊嗎...即日起免費註冊,所有最完整的AutoCAD討論、教學及資源都在論壇裡喔~
AutoCAD顧問
Would you like to react to this message? Create an account in a few clicks or log in to continue.
請教存檔降版次加清除的lisp該怎麼寫 Ioaoe110請教存檔降版次加清除的lisp該怎麼寫 2020-310請教存檔降版次加清除的lisp該怎麼寫 Oiu15010請教存檔降版次加清除的lisp該怎麼寫 2020-211請教存檔降版次加清除的lisp該怎麼寫 Ia15010請教存檔降版次加清除的lisp該怎麼寫 Aizyao10請教存檔降版次加清除的lisp該怎麼寫 Uos15010請教存檔降版次加清除的lisp該怎麼寫 BPl3tjj請教存檔降版次加清除的lisp該怎麼寫 Ziao1510
請教存檔降版次加清除的lisp該怎麼寫 Oo-2-110請教存檔降版次加清除的lisp該怎麼寫 Zuoiy_10請教存檔降版次加清除的lisp該怎麼寫 Aizyao11請教存檔降版次加清除的lisp該怎麼寫 Iyb_1510請教存檔降版次加清除的lisp該怎麼寫 Aoe1-111請教存檔降版次加清除的lisp該怎麼寫 Uos15011請教存檔降版次加清除的lisp該怎麼寫 Aoe2da10請教存檔降版次加清除的lisp該怎麼寫 Aoe2da11請教存檔降版次加清除的lisp該怎麼寫 Aoe10

請教存檔降版次加清除的lisp該怎麼寫

5 posters

向下

請教存檔降版次加清除的lisp該怎麼寫 Empty 請教存檔降版次加清除的lisp該怎麼寫

發表 由 cf1032 2020-06-29, 15:01

請教存檔降版次加清除的lisp該怎麼寫

因一部分廠商需求為2000版
另一部分廠商則為2004版
而小弟公司是2014版

造成每次給廠商圖檔時
都要執行purge清除.
及存檔類型手動選擇降版

所以才想做成按鈕
一鍵purge降版

謝謝

請問各位高手
lisp該如何寫
才能將圖檔先purge後接續存檔成2000版?

謝謝大家
附件
請教存檔降版次加清除的lisp該怎麼寫 Attachment
賊船篩選踢人表-1.xlsx 您無權下載這里的附件。(640 Kb) 下載 2 次
請教存檔降版次加清除的lisp該怎麼寫 Attachment
新增 Microsoft PowerPoint 簡報.pptx 您無權下載這里的附件。(30 Kb) 下載 1 次


cf1032 在 2021-08-02, 14:57 作了第 4 次修改
cf1032
cf1032
一般會員
一般會員

文章總數 : 42
年齡 : 32
來自 : 台北
職業 : 待業
愛好 :
個性 : 熱情
使用年資 : 10
使用版本 : 2010
經驗值 : 3722
威望值 : 6
注冊日期 : 2014-09-16
男 雙子座 羊

回頂端 向下

請教存檔降版次加清除的lisp該怎麼寫 Empty 回復: 請教存檔降版次加清除的lisp該怎麼寫

發表 由 shenhung 2020-06-29, 18:12

不用寫LISP
在選項內的開啟和儲存.直接設成 你要另存成2000 版次.
然後你以後儲存..CAD都會自動存成2000的格式.
PURGE 其他照一般正常操作就行.

____________________________________________________________________________________
請教存檔降版次加清除的lisp該怎麼寫 Ioaoe110 請教存檔降版次加清除的lisp該怎麼寫 Zuoiy_10 請教存檔降版次加清除的lisp該怎麼寫 2020-211 請教存檔降版次加清除的lisp該怎麼寫 Aizyao11 請教存檔降版次加清除的lisp該怎麼寫 Iyb_1510
請教存檔降版次加清除的lisp該怎麼寫 Aizyao10 請教存檔降版次加清除的lisp該怎麼寫 BPl3tjj.png 請教存檔降版次加清除的lisp該怎麼寫 Ziao1510 請教存檔降版次加清除的lisp該怎麼寫 Oo-2-110 請教存檔降版次加清除的lisp該怎麼寫 Oooa_110
shenhung
shenhung
高級會員
高級會員

文章總數 : 272
年齡 : 57
來自 : 新北市
職業 : 塑膠模具設計.AUTOLISP
愛好 : 音樂
個性 : 隨和
使用年資 : 18年
使用版本 : 2010
積分 : 15
經驗值 : 7729
威望值 : 1157
注冊日期 : 2009-06-03
男 摩羯座 馬

回頂端 向下

請教存檔降版次加清除的lisp該怎麼寫 Empty 回復: 請教存檔降版次加清除的lisp該怎麼寫

發表 由 Tiger&蘋果爸 2020-06-30, 09:36

shenhung 寫到:不用寫LISP
在選項內的開啟和儲存.直接設成 你要另存成2000 版次.
然後你以後儲存..CAD都會自動存成2000的格式.
PURGE 其他照一般正常操作就行.
沒錯,可以更改設定即可,請參考以下文章:
[說明]AutoCAD版本(點我)
認同

____________________________________________________________________________________
👉[好康]🎁加入專屬B取得大補帖及看2D+3D影片(點我)👈
請教存檔降版次加清除的lisp該怎麼寫 Sesa2011 請教存檔降版次加清除的lisp該怎麼寫 Youtub11 請教存檔降版次加清除的lisp該怎麼寫 Oiea2011 請教存檔降版次加清除的lisp該怎麼寫 Oe20011 請教存檔降版次加清除的lisp該怎麼寫 Fbi20011 請教存檔降版次加清除的lisp該怎麼寫 Line2011
Tiger&蘋果爸
Tiger&蘋果爸
系統管理員
系統管理員

文章總數 : 21027
年齡 : 48
來自 : 台北市文山區
職業 : AutoCAD顧問
愛好 : 蹓狗/戶外活動/拍照/吸貓
個性 : 幽默/樂觀/善良
使用年資 : 20↑
使用版本 : AutoCAD 2022
經驗值 : 88088
威望值 : 16855
注冊日期 : 2008-04-23
2D基礎函授 2D進階函授 3D基礎函授 https://i.servimg.com/u/f11/19/71/67/71/2d3d10.png2D+3D線上 顧問外掛程式 經典問與答讀者 藍鵲1號
2009聚會勳章 2010聚會勳章 2011聚會勳章 2012聚會勳章 2013勳章-2D基礎 2014聚會勳章 2015聚會勳章 2016聚會勳章 串連貼紙成功 男 水瓶座 兔

http://mypaper.pchome.com.tw/kv1012tiger

回頂端 向下

請教存檔降版次加清除的lisp該怎麼寫 Empty 回復: 請教存檔降版次加清除的lisp該怎麼寫

發表 由 cf1032 2020-07-09, 13:54

因一部分廠商需求為2000版
另一部分則為2004版

所以才想做成按鈕
一鍵purge降版

謝謝
cf1032
cf1032
一般會員
一般會員

文章總數 : 42
年齡 : 32
來自 : 台北
職業 : 待業
愛好 :
個性 : 熱情
使用年資 : 10
使用版本 : 2010
經驗值 : 3722
威望值 : 6
注冊日期 : 2014-09-16
男 雙子座 羊

回頂端 向下

請教存檔降版次加清除的lisp該怎麼寫 Empty 回復: 請教存檔降版次加清除的lisp該怎麼寫

發表 由 jackiehover 2020-11-03, 10:07

你可以先PU完後,用另存新檔>再選擇版本就好。

____________________________________________________________________________________

jackiehover
jackiehover
初級會員
初級會員

文章總數 : 151
年齡 : 38
來自 : 桃園市八德區
職業 : 消防設備、水電設計
愛好 : 上網、遊戲、網拍
個性 : 平易近人
使用年資 : 2014/09至今
使用版本 : 2014、15、16
積分 : 1
經驗值 : 3876
威望值 : 96
注冊日期 : 2015-08-31
藍鵲699號
男 水瓶座 虎

回頂端 向下

請教存檔降版次加清除的lisp該怎麼寫 Empty 回復: 請教存檔降版次加清除的lisp該怎麼寫

發表 由 shenhung 2020-11-03, 12:19

;簡單寫了一下.

(defun c:save2000()
(setq cur_savever (getenv "DefaultFormatForSave"))
(setenv "DefaultFormatForSave" "12")
(command "._purge" "all" "*" "n")
(command "qsave")
(setenv "DefaultFormatForSave" cur_savever)
(prompt "\n***已儲存到2000版本***")
(princ)

)
;=====================================================
(defun c:save2004()
(setq cur_savever (getenv "DefaultFormatForSave"))
(setenv "DefaultFormatForSave" "24")
(command "._purge" "all" "*" "n")
(command "qsave")
(setenv "DefaultFormatForSave" cur_savever)
(prompt "\n***已儲存到2004版本***")
(princ)
)

;用到的系統變數設定.
;(setenv "DefaultFormatForSave" "< value >")

;各儲存版本 Value 值 代表的版本.
;;;
;;;1   -AutoCAD R12 DXF
;;;
;;;12 -AutoCAD 2000 DWG
;;;13 -AutoCAD 2000 DXF
;;;
;;;24 -AutoCAD 2004 DWG
;;;25 -AutoCAD 2004 DXF
;;;
;;;36 -AutoCAD 2007 DWG
;;;37 -AutoCAD 2007 DXF
;;;
;;;48 -AutoCAD 2010 DWG
;;;49 -AutoCAD 2010 DXF
;;;50 -AutoCAD 2010 DWT
;;;
;;;60 -AutoCAD 2013 DWG
;;;61 -AutoCAD 2013 DXF
;;;62 -AutoCAD 2013 DWT

____________________________________________________________________________________
請教存檔降版次加清除的lisp該怎麼寫 Ioaoe110 請教存檔降版次加清除的lisp該怎麼寫 Zuoiy_10 請教存檔降版次加清除的lisp該怎麼寫 2020-211 請教存檔降版次加清除的lisp該怎麼寫 Aizyao11 請教存檔降版次加清除的lisp該怎麼寫 Iyb_1510
請教存檔降版次加清除的lisp該怎麼寫 Aizyao10 請教存檔降版次加清除的lisp該怎麼寫 BPl3tjj.png 請教存檔降版次加清除的lisp該怎麼寫 Ziao1510 請教存檔降版次加清除的lisp該怎麼寫 Oo-2-110 請教存檔降版次加清除的lisp該怎麼寫 Oooa_110
shenhung
shenhung
高級會員
高級會員

文章總數 : 272
年齡 : 57
來自 : 新北市
職業 : 塑膠模具設計.AUTOLISP
愛好 : 音樂
個性 : 隨和
使用年資 : 18年
使用版本 : 2010
積分 : 15
經驗值 : 7729
威望值 : 1157
注冊日期 : 2009-06-03
男 摩羯座 馬

Tiger&蘋果爸 and masao_8 like this post

回頂端 向下

請教存檔降版次加清除的lisp該怎麼寫 Empty 回復: 請教存檔降版次加清除的lisp該怎麼寫

發表 由 djh1006 2020-11-16, 10:23

謝謝,我又學了一招

____________________________________________________________________________________
微笑
djh1006
djh1006
中級會員
中級會員

文章總數 : 176
年齡 : 52
來自 : 彰化縣員林鎮中山路二段369巷二弄15-14號
職業 : 連續沖壓模具設計工程師
愛好 : UG,SOLIDWORKS,AUTOCAD 2D,autolisp
個性 : 內向偏外
使用年資 : 23年以上
使用版本 : 2014
積分 : 7
經驗值 : 5861
威望值 : 358
注冊日期 : 2011-06-16
男 獅子座 豬

回頂端 向下

請教存檔降版次加清除的lisp該怎麼寫 Empty 回復: 請教存檔降版次加清除的lisp該怎麼寫

發表 由 cf1032 2021-04-20, 14:05

謝謝shenhung大
超好用
cf1032
cf1032
一般會員
一般會員

文章總數 : 42
年齡 : 32
來自 : 台北
職業 : 待業
愛好 :
個性 : 熱情
使用年資 : 10
使用版本 : 2010
經驗值 : 3722
威望值 : 6
注冊日期 : 2014-09-16
男 雙子座 羊

回頂端 向下

請教存檔降版次加清除的lisp該怎麼寫 Empty 回復: 請教存檔降版次加清除的lisp該怎麼寫

發表 由 cf1032 2021-07-26, 15:10

謝謝shenhung大
非常感謝
cf1032
cf1032
一般會員
一般會員

文章總數 : 42
年齡 : 32
來自 : 台北
職業 : 待業
愛好 :
個性 : 熱情
使用年資 : 10
使用版本 : 2010
經驗值 : 3722
威望值 : 6
注冊日期 : 2014-09-16
男 雙子座 羊

回頂端 向下

請教存檔降版次加清除的lisp該怎麼寫 Empty 回復: 請教存檔降版次加清除的lisp該怎麼寫

發表 由 cf1032 2023-11-22, 11:53

cf1032 寫到:請教存檔降版次加清除的lisp該怎麼寫

因一部分廠商需求為2000版
另一部分廠商則為2004版
而小弟公司是2014版

造成每次給廠商圖檔時
都要執行purge清除.
及存檔類型手動選擇降版

所以才想做成按鈕
一鍵purge降版

謝謝

請問各位高手
lisp該如何寫
才能將圖檔先purge後接續存檔成2000版?

謝謝大家
附件
請教存檔降版次加清除的lisp該怎麼寫 Attachment
stock2.zip 您無權下載這里的附件。(40 Kb) 下載 3 次
cf1032
cf1032
一般會員
一般會員

文章總數 : 42
年齡 : 32
來自 : 台北
職業 : 待業
愛好 :
個性 : 熱情
使用年資 : 10
使用版本 : 2010
經驗值 : 3722
威望值 : 6
注冊日期 : 2014-09-16
男 雙子座 羊

回頂端 向下

回頂端


 
這個論壇的權限:
無法 在這個版面回復文章
請教存檔降版次加清除的lisp該怎麼寫 Ioaoe110請教存檔降版次加清除的lisp該怎麼寫 2020-310請教存檔降版次加清除的lisp該怎麼寫 Oiu15010請教存檔降版次加清除的lisp該怎麼寫 2020-211請教存檔降版次加清除的lisp該怎麼寫 Ia15010請教存檔降版次加清除的lisp該怎麼寫 Aizyao10請教存檔降版次加清除的lisp該怎麼寫 Uos15010請教存檔降版次加清除的lisp該怎麼寫 BPl3tjj請教存檔降版次加清除的lisp該怎麼寫 Ziao1510
請教存檔降版次加清除的lisp該怎麼寫 Oo-2-110請教存檔降版次加清除的lisp該怎麼寫 Zuoiy_10請教存檔降版次加清除的lisp該怎麼寫 Aizyao11請教存檔降版次加清除的lisp該怎麼寫 Iyb_1510請教存檔降版次加清除的lisp該怎麼寫 Aoe1-111請教存檔降版次加清除的lisp該怎麼寫 Uos15011請教存檔降版次加清除的lisp該怎麼寫 Aoe2da10請教存檔降版次加清除的lisp該怎麼寫 Aoe2da11請教存檔降版次加清除的lisp該怎麼寫 Aoe10