(setq string "10 20 30")
(setq str2list (read (strcat "(" string ")")))
strlist 變成 (10 20 30) 串列
2015年6月22日 星期一
外部命令~lisp呼叫外部 exe 執行檔，等待程式的方式！
因為lisp在開發上的限制，有時會藉由其它開發工具結合使用！
此時可應用 zwcad.pgp 或 acad.pgp
在裡面有些範例
DEL, DEL, 8,要刪除的檔: ,
DIR, DIR, 8,指定檔: ,
EDIT, START EDIT, 9,要編輯的檔: ,
此時可應用 zwcad.pgp 或 acad.pgp
在裡面有些範例
DEL, DEL, 8,要刪除的檔: ,
DIR, DIR, 8,指定檔: ,
EDIT, START EDIT, 9,要編輯的檔: ,
2014年12月14日 星期日
解除DWG教育版印記
2014年12月6日 星期六
autocad 2013~2015 取消指令
AutoCad2015版本中已廢棄的命令和系統變量
命令 |
說明
|
附加信息
|
AutoCAD
|
AutoCAD LT
|
DASHBOARD
|
打開「面板」。
|
替換為 RIBBON。
|
X
|
X
|
DASHBOARDCLOSE
|
關閉「面板」。
|
替換為 RIBBONCLOSE。
|
X
|
X
|
DDEDIT
|
編輯單行文字、標注文字、屬性定義和功能控制邊框。
|
替換為 TEXTEDIT。
|
X
|
X
|
DDPTYPE
|
指定點對象的顯示模式及大小。
|
替換為 PTYPE。
|
X
|
X
|
DDVPOINT
|
設置三維觀察方向。
|
替換為 VPOINT。
|
X
|
X
|
ONLINECOLNOW
|
使用 AutoCAD WS 啟動聯機任務，其中由您所邀請的用戶可以同時查看和編輯您的當前圖形。
|
已替換為可打開 AutoCAD 360 的 ONLINEAUTOCAD360。
|
X
|
X
|
POINTCLOUD
|
提供用於創建和附著點雲文件的選項。
|
使用 POINTCLOUDATTACH 或其他特定的點雲命令處理點雲。
|
X
|
|
POINTCLOUDCLIP
|
創建和修改剪裁邊界，這些邊界定義哪些點將顯示在選定的點雲中。
|
由 POINTCLOUDCROP 替換。
|
X
|
|
POINTCLOUDINDEX
|
根據掃瞄文件創建帶索引的點雲（PCG 或 ISD）文件。
|
索引掃瞄文件不再受支持。
|
X
|
|
POINTCLOUDINTENSITYEDIT
|
打開「點雲強度顏色映射」對話框，從中可以控制設置，這些設置可幫助用戶使用不同顏色設置分析點雲。
|
由 POINTCLOUDCOLORMAP 替換。
|
X
|
|
系統變量
|
說明
|
附加信息
|
AutoCAD
|
AutoCAD LT
|
CLASSICKEYS
|
設置 DOS 和 Windows 標準間的多個控制鍵的行為。
|
MS DOS 控制當按鍵為 Ctrl-C 時取消；當按鍵為 Ctrl-V 時循環視口。
|
X
|
X
|
DASHBOARDSTATE
|
確定「面板」窗口是否處於活動狀態。
|
已刪除。
|
X
|
X
|
PREVIEWEFFECT
|
指定用於預覽對像選擇的視覺效果。
|
已刪除。
|
X
|
X
|
PREVIEWFACEEFFECT
|
指定用於預覽面子對像選擇的視覺效果。
|
已刪除。
|
X
|
|
RIBBONCONTEXTSELECT
|
控制單擊或雙擊對像時功能區上下文選項卡的顯示方式。
|
已刪除。
|
X
|
X
|
2013年12月4日 星期三
2013年11月27日 星期三
CAD標註位置改變的兇手--標註關聯
在移動已完成尺寸標註的圖面，尺寸位置會因系統原先預設的標註關聯性，產生移位的狀況。
可先使用DDA(dimdisassociate)取消其關聯性(並非使用分解指令，炸開尺寸)，
再連同要移動的物件(圖面)，ㄧ併選取後，進行移動，即可避免上述情況。
在圖面移動後，如需重新建立尺寸與物件的關聯性，
可使用DRE(dimreassociate)重新建立其關聯性。
DDA 取消關聯性 (dimdisassociate)
DRE 建立關聯性 (dimreassociate)
※一般來說，使用物件追蹤進行標註的尺寸，會因為關聯性不明確，當移動物件(圖面)時，所標註的尺寸容易位移。
可先使用DDA(dimdisassociate)取消其關聯性(並非使用分解指令，炸開尺寸)，
再連同要移動的物件(圖面)，ㄧ併選取後，進行移動，即可避免上述情況。
在圖面移動後，如需重新建立尺寸與物件的關聯性，
可使用DRE(dimreassociate)重新建立其關聯性。
DDA 取消關聯性 (dimdisassociate)
DRE 建立關聯性 (dimreassociate)
※一般來說，使用物件追蹤進行標註的尺寸，會因為關聯性不明確，當移動物件(圖面)時，所標註的尺寸容易位移。
2013年10月16日 星期三
中望發表 機械版繪圖工具 zwcad+ 2014
|
ZWCAD+ MECH 2014 新發佈
以全新的zwcad+ 2014 為平台，並增加部份新的功能，讓機械設計人員，有了更方便的設計工具，節省繪圖的時間。
1.孔表
建立圖面上所有圓孔的尺寸、座標表；產生的圓孔圖表是有關聯性的，如果刪除，移動，改變圓孔的大小，孔表資料也將即時更新。 |
________________________________________________________________________________________________ |
2013年9月9日 星期一
鈑金展開CAD繪圖工具
ZWCAD+ 新增一開發廠商，提供了一套完整的鈑金展開繪圖程式，超過50種鈑金業界常用圖形，讓繪鈑金的工作，大量減少，讓設計師得以花更多時間，在設計創新上。
程式有提供試用展示，歡迎大家下載體驗了！
程式有提供試用展示，歡迎大家下載體驗了！
共有50多種程式, 彎管 四角轉圓 錐形管 叉管 電器箱 皮帶護蓋等等展開圖形
2013年9月5日 星期四
2013年8月16日 星期五
AUTOCAD 另一偉大的決定~陣列對話框不見了
自autocad 2012版，發現array 功能
只能用指令方式了
一連串的指令輸入，真是比考試還難
若是您懷含舊的對話誆，請更新autocad 2012 sp1 以上版本
而指令也要改用 ARRAYCLASSIC
請自行修改pgp檔裡的快捷囉！
這個決定，令人猜不透，autocad到底在想什麼？
只能用指令方式了
一連串的指令輸入，真是比考試還難
若是您懷含舊的對話誆，請更新autocad 2012 sp1 以上版本
而指令也要改用 ARRAYCLASSIC
請自行修改pgp檔裡的快捷囉！
這個決定，令人猜不透，autocad到底在想什麼？
2013年8月12日 星期一
2013年7月31日 星期三
關聯標註，移動MOVE會改變位置，解決方案！
問題:為什麼有時移動MOVE 圖面時，標註線會改變位置，只好重排；但是複製 COPY 的時侯就不會跑掉?
答案:AutoCAD
2002 版本以後增加了 關聯式標註 選項，當你圖面物件移動時標註就會跟著移動。所以你的圖面的標註都是 關連式的標註，若以後的標註不想保有 關聯式標註 ，可以將其設定取消即可。
「選項」對話方塊 →「使用者設定」標籤 →「關聯式標註」→
□使新標註與物件關聯...將打勾取消。
另外對關聯性，可用以下指令，另外設定：
DDA 取消關聯性 (dimdisassociate)
DRE 建立關聯性 (dimreassociate)
DDA 取消關聯性 (dimdisassociate)
DRE 建立關聯性 (dimreassociate)
取消後的關聯性標註，再來MOVE，就沒問題了！
2013年7月30日 星期二
想知道您的CAD軟體，對LISP程式的執行效率嗎？
CAD產品很多種，也都能跑跑LISP，但誰對LISP的支援性好，速度快~
提供一個LISP程式，運算測試誰的速度快吧！
AUTOCAD 2014 約 5.28秒
ZWCAD+ 2012版 5.44秒
發現ZWCAD+ 2012 與AUTOCAD 2014 滿接近的，效能不錯
提供一個LISP程式，運算測試誰的速度快吧！
AUTOCAD 2014 約 5.28秒
ZWCAD+ 2012版 5.44秒
發現ZWCAD+ 2012 與AUTOCAD 2014 滿接近的，效能不錯
2013年7月11日 星期四
ZWCAD+ 2014 開放測試~支援最新DWG 2013，更穩定更快速的CAD繪圖工具
ZWCAD+ 2014 主程式 (原2012不用移除，可同時存在)
ZWCAD+ 2014 新增功能說明：
˙支援AUTOCAD 2013 DWG檔案格式
˙支援CUI 自定界面
˙支援動態圖塊
˙節絜畫面
˙支援 .NET API程式開發
˙支援語音錄音註解說明
˙線上更新程式功能
˙圖層瀏灠 LAYER BROWSER
˙圖塊替代 BLOCK REPLACE
˙PLT、PDF、DWF 檔案列印及支援
2013年6月27日 星期四
常用公式大全！
將常用的數學公式，轉成LISP用的小函數，節省開發的時間喔！
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;由弧的兩點及凸出值求得交點
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
(defun ArcConner ( p1xy p2xy p1d / )
(setq ptc (CenPtByBulge p1xy p2xy p1d))
(setq p1x (polar p1xy (+ (angle ptc p1xy)(* 0.5 pi)) 1.0))
(setq p2x (polar p2xy (+ (angle ptc p2xy)(* 0.5 pi)) 1.0))
(inters p1xy p1x p2xy p2x nil)
)
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;由弧的兩點及凸出值求得交點
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
(defun ArcConner ( p1xy p2xy p1d / )
(setq ptc (CenPtByBulge p1xy p2xy p1d))
(setq p1x (polar p1xy (+ (angle ptc p1xy)(* 0.5 pi)) 1.0))
(setq p2x (polar p2xy (+ (angle ptc p2xy)(* 0.5 pi)) 1.0))
(inters p1xy p1x p2xy p2x nil)
)
將相同圖塊的z值改為絕對值
;;; 功用：將相同圖塊的z值改為絕對值
;;; 指令：RIB
(defun c:rib(/ olde edata ename ss i sslen e ent ez z)
(setq olde (car(entsel "\n請選欲重新整理的圖塊："))
edata (entget olde)
ename (cdr(assoc 2 edata))
ss (ssget "x" (list (cons 0 "INSERT")(cons 2 ename)))
i 0
)
;;; 指令：RIB
(defun c:rib(/ olde edata ename ss i sslen e ent ez z)
(setq olde (car(entsel "\n請選欲重新整理的圖塊："))
edata (entget olde)
ename (cdr(assoc 2 edata))
ss (ssget "x" (list (cons 0 "INSERT")(cons 2 ename)))
i 0
)
AUTOCAD 警告圖檔相容性提示！
AUTOCAD 為防其它非AUTOCAD產品生成的DWG檔案，特別做了這個系統設定，提示使用者DWG可能有問題~~
但其實多數的DWG檔案，都是安全可靠的，所以建議大家把這個設定關閉吧！
請下指令 DWGCHECK ，設定 0 關閉檢測功能！
AUTOCAD 2014 新函數，防CAD病毒…
因為AUTOCAD滿容易中ACAD.LSP的CAD病毒
常見的防毒軟體，還不一定能掃得到
所以AUTOCAD 2014 版本，增加了SECURELOAD and TRUSTEDPATHS ，來處理可信任的LISP程式。
使用新版AUTOCAD 2014，若載入LISP等程式，常常要提示您是否載入，可設定此變數，允許載入外掛程式。
SECURELOAD (系統變數)
0 沒有警告的情況下加載的可執行文件。此選項保持傳統的行為，但不建議使用。
1 加載在系統變量TRUSTEDPATHS指定受信任位置。文件不在受信任位置時顯示警告。
2 僅允許加載系統變量TRUSTEDPATHS指定受信任位置。
常見的防毒軟體，還不一定能掃得到
所以AUTOCAD 2014 版本，增加了SECURELOAD and TRUSTEDPATHS ，來處理可信任的LISP程式。
使用新版AUTOCAD 2014，若載入LISP等程式，常常要提示您是否載入，可設定此變數，允許載入外掛程式。
SECURELOAD (系統變數)
0 沒有警告的情況下加載的可執行文件。此選項保持傳統的行為，但不建議使用。
1 加載在系統變量TRUSTEDPATHS指定受信任位置。文件不在受信任位置時顯示警告。
2 僅允許加載系統變量TRUSTEDPATHS指定受信任位置。
acsign.arx 載入失敗的問題！
有時開啟AUTOCAD是正常的，但再打開舊的DWG圖檔時
AUTOCAD的出現 C:\Program Files\AutoCAD 2004\Acsign.arx ARX 命令中發生異常
未處理的異常 E06D7363 (E067363h).地址;7c812AFBh.....
上網找了找原因，看來只要把C:\Program Files\AutoCAD 2004\Acsign.arx ARX 這個檔案刪掉就可以恢復正常了。
2013年6月26日 星期三
塑模設計的免費工具「燕秀工具箱」 支援 ZWCAD+
燕秀工具箱 支援 ZWCAD+(Oct, 22, 2012 ) [Back]
燕秀工具箱 (ZWCAD+ 版本) 下載 20MB
購買ZWCAD+ 就能享有這個超強免費外掛
「燕秀工具箱」 2.8 版
操作說明：在安裝路徑下： D:\燕秀工具箱ZWCAD+ 2012\hlp.exe （含動畫教學）
即使不是塑模行業的客戶，也值得下載使用
內建的圖層開關工具、文字詞庫、零件圖庫、修改標註
智能標註、智能中心線、局部放大....
等於多了近百個免費實用工具
真的是用ZWCAD+ 的使用者的福音！
LISP--缺字體時，自動以 TXT+CHINESET 替換找不到字形的字體
;替換無效字型程式:
(defun C:TFIX()
; ******************************************************************************
; 下一列為使用者要保留的有效的 TrueType 字型檔
(setq valid_ttfs (list "細明體" "新細明體" "標楷體" "@細明體" "@新細明體" "@標楷體" ))
(setq def_shx "txt.shx" )
(setq def_big "chineset.shx" )
; ******************************************************************************
(defun C:TFIX()
; ******************************************************************************
; 下一列為使用者要保留的有效的 TrueType 字型檔
(setq valid_ttfs (list "細明體" "新細明體" "標楷體" "@細明體" "@新細明體" "@標楷體" ))
(setq def_shx "txt.shx" )
(setq def_big "chineset.shx" )
; ******************************************************************************
AutoCAD DWG版本區分
Autocad 已有30年的發展，近20種版本，每隔一段時間，DWG的格式就會改變。
常有客戶因為無法開啟檔案，而感到困擾，以下，提供一個判別DWG版本的方式：
1：用windows 「記事本」打開dwg檔案。
2：在最前端，會有 AC****字樣。
3：這個AC****可以幫助你識別現在這個dwg是用哪個版本autocad所存的。列出最近的幾個版本
AutoCAD 2000i -------AC1015
AutoCAD 2002 -------AC1015
AutoCAD 2002 -------AC1015
AutoCAD 2004 ------- AC1018
AutoCAD 2005 ------- AC1018
AutoCAD 2006 ------- AC1018
AutoCAD 2007 ------- AC1021
AutoCAD 2008 ------- AC1021
AutoCAD 2009 ------- AC1021
AutoCAD 2010 ------- AC1024
AutoCAD 2011 ------- AC1024
AutoCAD 2012 ------- AC1024
AutoCAD 2013 ------- AC1027
AutoCAD 2014 ------- AC1027
※高版本的AUTOCAD可以開啟低版本的所有DWG檔案
※若沒有找到 AC**** 那表示此檔案已損壞了
2013年6月25日 星期二
像AUTOCAD MECHANICAL 的中望機械版 SP2，製造業加速繪圖的新幫手~
中望機械版 SP2，製造業加速繪圖的新幫手~
~中望CAD機械版 ZWCAD+ 2012 MECH
圖框設定：
一鍵產生圖框標題欄；支援圖框尺寸和圖框範本的自定功能，可擴充不同尺寸和形狀的圖框；在圖框設定界面，可切換不同樣式標準；比例測量、自動更新比例、圖框自動居中。
圖層管理：
標準機械圖層樣式；圖形物件自動放置到相對應圖層；可設定圖層間進行轉換。
專業繪圖工具：
一整套構造線，構造圓，中心線建立方法；多種繪製直線和矩形的方法；繪製單孔或多孔；快速生成局部詳圖，且可重生成來更新修改後的結果。
圖框設定：
一鍵產生圖框標題欄；支援圖框尺寸和圖框範本的自定功能，可擴充不同尺寸和形狀的圖框；在圖框設定界面，可切換不同樣式標準；比例測量、自動更新比例、圖框自動居中。
圖層管理：
標準機械圖層樣式；圖形物件自動放置到相對應圖層；可設定圖層間進行轉換。
專業繪圖工具：
一整套構造線，構造圓，中心線建立方法；多種繪製直線和矩形的方法；繪製單孔或多孔；快速生成局部詳圖，且可重生成來更新修改後的結果。
訂閱：
文章 (Atom)