国产精品乱码一区-性开放网站-少妇又紧又爽视频-西西大胆午夜人体视频-国产极品一区-欧美成人tv-四虎av在线-国产无遮挡无码视频免费软件-中文字幕亚洲乱码熟女一区二区-日产精品一区二区三区在线观看-亚洲国产亚综合在线区-五月婷婷综合色-亚洲日本视频在线观看-97精品人人妻人人-久久久久久一区二区三区四区别墅-www.免费av-波多野结衣绝顶大高潮-日本在线a一区视频高清视频-强美女免费网站在线视频-亚洲永久免费

機械社區

標題: [AutoLisp] 快速填充 + 自動匹配圖層 [打印本頁]

作者: 逍遙處士 時間: 2013-8-9 11:58
標題: [AutoLisp] 快速填充 + 自動匹配圖層
將下面一段復制到 AutoCAD 目錄下的 acad.lsp 文件末尾，然后重新啟動 AutoCAD。畫一個圓，輸入 ha ，在圓里面點一下就行了。

根據您的情況，將 "5剖面線層" 改成您想放的圖層名。ha 也可以改成你喜歡的縮寫，只要不與現有命令沖突即可。

若是天河，圖層名就不用改了。

(defun c:ha()
(command "hpname" "ansi31" "bhatch" (getpoint) "")
(command "change" (entlast) "" "p" "LA" "5剖面線層" "")
)

作者: zerowing 時間: 2013-8-9 12:01
感謝分享啊。逍兄。俺收下了。

作者: Michael0576 時間: 2013-8-9 12:44
不錯試試看，挺方面的

作者: 苦菩提 時間: 2013-8-9 13:32
lsp文件在哪個文件夾下？

作者: arfa1424 時間: 2013-8-9 14:12
快捷鍵嗎

作者: ミ百分│汗水 時間: 2013-8-10 10:26
收藏，需要用到的時候在搞上

作者: 逍遙處士 時間: 2013-8-10 10:38
如果用原來的 h 命令，我模擬了一下，要想完成一個剖面線，需要點 8 次鍵鼠，而用了快捷命令，只需要 4 次（ha倆字母+空格+單擊）。

作者: 苦菩提 時間: 2013-8-10 11:12
有沒有畫腰型孔的小插件啊

作者: 逍遙處士 時間: 2013-8-10 13:47

苦菩提發表于 2013-8-10 11:12 . }* E, k6 {+ e- X
有沒有畫腰型孔的小插件啊

;;;畫腰孔程序
(defun c:yk()
(setvar "cmdecho" 0)
(prompt "\n*****畫橫腰孔程序*****")
(setq var (getvar "osmode"))
(setvar "osmode" 0)
(setq lenth(getreal "\n請輸入腰孔長度："))
(setq width(getreal "\n請輸入腰孔寬度："))
(if (<= lenth width)
(progn
(princ "\n腰孔寬度小于長度，請重新輸入！")
(setvar "osmode" var)
(exit)
)
)
(setq p0 (getpoint "\n請指定中心點："))
(setq LL (/ (- lenth width) 2))
(setq WW (/ width 2))
(setq pz0 (polar p0 pi LL))
(setq py0 (polar p0 0 LL))
(setq pz1 (polar pz0 (/ pi 2) WW))
(setq pz2 (polar pz0 (* 3 (/ pi 2)) WW))
(setq py1 (polar py0 (/ pi 2) WW))
(setq py2 (polar py0 (* 3 (/ pi 2)) WW))
(command "line" pz1 py1 "")
(command "line" pz2 py2 "")
(command "arc" "c" pz0 pz1 pz2)
(command "arc" "c" py0 py2 py1)
(setvar "osmode" var)
(princ)
)

作者: 苦菩提 時間: 2013-8-10 13:53
好棒哦。可我依舊找不到lsp文件在哪。搜也沒搜到

作者: 苦菩提 時間: 2013-8-10 14:09
試了滴親。搜不到這個acad.lsp文件或者文件夾

作者: yichuxi 時間: 2013-8-15 16:28
看了樓主的帖子，我也找不到我的acad.lisp文件，然后上網搜了一下，是下面的解釋，是不是我的acad.lisp文件被360當成病毒刪除了？
簡介

　　acad.lsp是AutoCAD軟件的Lisp腳本文件，當打開AutoCAD圖形dwg文件時會自動運行相同文件夾中的名為acad.lsp的腳本文件，這使得acad.lsp文件成為計算機病毒在裝有AutoCAD軟件的電腦之間傳播的一種方式。

　　通過acad.lsp文件傳播的病毒稱為CAD病毒。

編輯本段中毒癥狀

　　中毒特征：AutoCAD圖紙文件所在文件夾中會自動生成acad.lsp文件。

　　病毒危害：通過acad.lsp文件傳播的CAD病毒種類很多，因此癥狀各異，但經常體現為AutoCAD軟件中部分功能的異常。主要現象有：填空不顯示、尺寸箭頭空心，鼠標中鍵不能平移視圖，移動命令成為復制，分解命令無效等等。

編輯本段預防方法

　　用WinHEX軟件打開AutoCAD的主程序exe文件，查找字符串acad.lsp，然后把acad.lsp改寫成任意別的字母，保存。

　　這樣就不會自動運行acad.lsp文件了，徹底切斷acad.lsp傳播途徑。

　　直接刪除圖形文件夾下的acad.lsp、acad.fas，之后再打開文件就安全了

作者: 開葆手 時間: 2013-8-22 20:22
收藏了

歡迎光臨機械社區 (http://www.whclglass.com.cn/)