[下载]新年第一帖>值得参考的VisualLISP范例档
<p></p><p></p><p> 大家也许有看到过,但不太明白,这跟ET一样都是好的学习资料, 官方的函数用法和技巧,你能错过吗?</p><p></p><p>April 13, 2005 <br/>值得參考的VisualLISP 範例檔 值得参考的VisualLISP范例档 <br/>VisualLISP 除了線上文件豐富之外，最近看到一份範例集錦vlsample.zip，裡面有很多範例檔，詳細展示了各種VisualLISP 技巧和ActiveX 物件的使用方式，尤其是reactor 和ActiveX 物件是參考價值最高的部份。 VisualLISP除了线上文件丰富之外，最近看到一份范例集锦vlsample.zip，里面有很多范例档，详细展示了各种VisualLISP技巧和ActiveX物件的使用方式，尤其是reactor和ActiveX物件是参考价值最高的部份。 相關文章和zip 檔可以到AfraLisp網站閱讀及下載。相关文章和zip档可以到AfraLisp网站阅读及下载。 壓縮檔展開之後有一堆.lsp 程式檔還有.prj 計畫檔，各個檔案的簡要說明如下：压缩档展开之后有一堆.lsp程式档还有.prj计画档，各个档案的简要说明如下： </p><p>afact.lsp: 階乘 afact.lsp:阶乘 <br/>blackboard.lsp: 如何使用黑板(blackboard)在不同文件之間共享資料、函數和物件 blackboard.lsp:如何使用黑板(blackboard)在不同文件之间共享资料、函数和物件 <br/>color-util.lsp: 在AutoCAD 內使用全彩(true color) color-util.lsp:在AutoCAD内使用全彩(true color) <br/>doc_utils.lsp: 搭配main_mdi.lsp 使用(sample-instrs, load-vlxfile) doc_utils.lsp:搭配main_mdi.lsp使用(sample-instrs, load-vlxfile) <br/>drawline-with-errors.lsp: 錯誤示範（官方文件範例） drawline-with-errors.lsp:错误示范（官方文件范例） <br/>drawline.lsp: （官方文件範例） drawline.lsp: （官方文件范例） <br/>grafun.lsp: 分別用ActiveX 和AutoLISP 函數建立3D mesh grafun.lsp:分别用ActiveX和AutoLISP函数建立3D mesh <br/>image.lsp: 用ActiveX 函數插入一張影像 image.lsp:用ActiveX函数插入一张影像 <br/>lispdata1.lsp: 將AutoLISP 資料儲存在繪圖資料中(用ldata & dictionary) lispdata1.lsp:将AutoLISP资料储存在绘图资料中(用ldata & dictionary) <br/>lispdata2.lsp: 將AutoLISP 資料儲存在繪圖資料中(更好的方法) lispdata2.lsp:将AutoLISP资料储存在绘图资料中(更好的方法) <br/>main_mdi.lsp: 如何使用variant 和safearray 變數 main_mdi.lsp:如何使用variant和safearray变数 <br/>Mouse Reactor.lsp: 用ActiveX menu API 和mouse reactor 建立右鍵跳出式選單 Mouse Reactor.lsp:用ActiveX menu API和mouse reactor建立右键跳出式选单 <br/>Obj-Props.lsp: 如何與物件屬性管理員溝通（透過選集和反應器傳送異動訊息） Obj-Props.lsp:如何与物件属性管理员沟通（透过选集和反应器传送异动讯息） <br/>propagate.lsp: 傳送print-list 函數（依賴s::startup 的執行） propagate.lsp:传送print-list函数（依赖s::startup的执行） <br/>regdump.lsp: 如何使用registry-xxxx 函數以及使用者自訂登錄函數 regdump.lsp:如何使用registry-xxxx函数以及使用者自订登录函数 <br/>timestamp.lsp: 使用vlax-add-cmd 和vlax-reg-cmd 建立原生命令（不用c:） timestamp.lsp:使用vlax-add-cmd和vlax-reg-cmd建立原生命令（不用c:） <br/>tmatrix.lsp: 使用vla-TransformBy 和變形矩陣 tmatrix.lsp:使用vla-TransformBy和变形矩阵 <br/>typelib.lsp: 如何匯入以及使用型別庫(type library)進行跨應用程式整合 typelib.lsp:如何汇入以及使用型别库(type library)进行跨应用程式整合 <br/>vlx_app.prv: （計畫檔） vlx_app.prv: （计画档） <br/>vlx_app.vlx: (binary code) vlx_app.vlx: (binary code) <br/>vlx_file.fas: (binary code) vlx_file.fas: (binary code) <br/>vlx_file.lsp: 變數可在程式和文件名域之間、程式名域和執行期黑板之間交換 vlx_file.lsp:变数可在程式和文件名域之间、程式名域和执行期黑板之间交换 <br/>xdata_variants.lsp: 如何使用variant 和safearray 變數 xdata_variants.lsp:如何使用variant和safearray变数 <br/>xrecord.lsp: 使用xrecord 和dictionary xrecord.lsp:使用xrecord和dictionary <br/>yinyang.lsp: （官方文件範例） yinyang.lsp: （官方文件范例） </p><p>ActiveX ActiveX <br/>al-tst.lsp: （測速）用AutoLISP 畫2000 個圓 al-tst.lsp: （测速）用AutoLISP画2000个圆 <br/>vla-tst.lsp: （測速）用ActiveX 畫2000 個圓 vla-tst.lsp: （测速）用ActiveX画2000个圆 <br/>vla-tst.prj: （計畫檔） vla-tst.prj: （计画档） </p><p>RCTR-TST RCTR-TST <br/>app-reg.lsp: （起始檔） app-reg.lsp: （起始档） <br/>getparm.dcl: 對話框定義（由rctr.lsp 呼叫） getparm.dcl:对话框定义（由rctr.lsp呼叫） <br/>getparm.lsp: 對話框處理（由rctr.lsp 呼叫） getparm.lsp:对话框处理（由rctr.lsp呼叫） <br/>rctr-tst.prj: （計畫檔） rctr-tst.prj: （计画档） <br/>rctr.lsp: 將圓等距排列在一條曲線上，並跟著曲線動 rctr.lsp:将圆等距排列在一条曲线上，并跟着曲线动 <br/>rsame.lsp: 讓不同物件共享一組屬性 rsame.lsp:让不同物件共享一组属性 <br/>rtie.lsp: 定義reactor 輔助函數 rtie.lsp:定义reactor辅助函数 <br/>rtrans.lsp: 定義reactor 位移函數 rtrans.lsp:定义reactor位移函数 </p><p>REAC-TST REAC-TST <br/>a-mtext.lsp: 圓與文字物件同步更動 a-mtext.lsp:圆与文字物件同步更动 <br/>acdbex.lsp: 測試AcDbReactor 反應器 acdbex.lsp:测试AcDbReactor反应器 <br/>copyself.lsp: 定義reactor 複製函數 copyself.lsp:定义reactor复制函数 <br/>ctie.lsp: 定義reactor 輔助函數 ctie.lsp:定义reactor辅助函数 <br/>dimex.lsp: 圓與文字物件同步更動 dimex.lsp:圆与文字物件同步更动 <br/>dumbells.lsp: 兩個圓掛在一條線段的兩端，會一起連動 dumbells.lsp:两个圆挂在一条线段的两端，会一起连动 <br/>editex.lsp: 在編輯器中新增/移除reactor editex.lsp:在编辑器中新增/移除reactor <br/>linkex.lsp: 定義一些reactor 測試函數 linkex.lsp:定义一些reactor测试函数 <br/>objex.lsp: 三個圓有不同顏色，但其半徑會同步更動 objex.lsp:三个圆有不同颜色，但其半径会同步更动 <br/>pipe.lsp: 利用一條曲線和圓做一條中空管，而且會跟著曲線更動 pipe.lsp:利用一条曲线和圆做一条中空管，而且会跟着曲线更动 <br/>r-info.lsp: 用來顯示本範例函數的說明 r-info.lsp:用来显示本范例函数的说明 <br/>r-init.lsp: 初使化全域變數 r-init.lsp:初使化全域变数 <br/>reac-tst.prj: （計畫檔） reac-tst.prj: （计画档） <br/>rolls.lsp: 物件和編輯器reactor 範例 rolls.lsp:物件和编辑器reactor范例 <br/>rtransl.lsp: 定義reactor 輔助函數 rtransl.lsp:定义reactor辅助函数 <br/>rutils.lsp: （輔助）建立全域變數 rutils.lsp: （辅助）建立全域变数 <br/>same-rcl.lsp: 讓三個圓同步更動 same-rcl.lsp:让三个圆同步更动 <br/>sel-reac.lsp: 如何選取綁在一個vla 物件上的所有reactor sel-reac.lsp:如何选取绑在一个vla物件上的所有reactor <br/>toplevel.lsp: 一開始執行就顯示的求助訊息 toplevel.lsp:一开始执行就显示的求助讯息 <br/></p> <p>很不错的资料，收藏了！谢谢楼主</p> 小样的，我见了眼熟，原来是afalisp上面的。 <p>很好的资料!推~</p> 很不错的资料，收藏了！谢谢楼主 是很眼熟，AutoCAD 文档里就有。 谢谢分享！ 豆仔！~ <p>感谢楼主分享.</p>
页:
[1]
2