@lisp 函数库
@lisp 函数库是一个开源、共享、可云端加载的 autolisp 函数库。由像您一样热爱开源共享的爱好者所构筑并维护。可依据开放许可协议自由使用。
@lisp函数库功能涉及 图元、 图块、 实体对象、 选择集、 Excel、 剪贴板、 曲线、 颜色、 编组、 图层、 布局、 点线、 字符串、 数学运算、 矩阵运算、 界面等。更多内容持续迭代中 ...
** 社区驱动
@lisp 函数库是一个多元化的信息分享社区,它充满激情,并且每天都在成长。我们的参与者包括 lisp 程序共享爱好者、lisp开发编程人员、CAD从业人员、服务器维护工程师,以及其他很多各界人士。
** 开放代码
@lisp 函数库是开源代码,只要您表明使用了 @lisp 函数库并承认其贡献者的工作,您就可以使用 @lisp函数库。如果您改变或者使用这些代码,您必须按照相同的版权协议发布结果。@lisp函数库 遵循 MIT 开源协议。
如何使用 @lisp函数库
使用@lisp函数库非常简单。只要你在CAD中安装了 [[https://gitee.com/atlisp][*@lisp*]] ,在能访问互联网的情况下。就可以远程加载 @lisp函数库调用函数了。
当远程导入成功后,会提示 成功输入的函数 数量。生成函数列表到 lisp变量 @:*functions* 。
@:*functions* 为最后一次成功导入的函数列表。
(require 'ui:*) ;;导入 ui 相关函数库
(require 'block:*) ;;导入 block 相关函数库
(require 'entity:*) ;;导入 entity 图关 相关函数库
(require '(ui:* block:* entity:*)) ;; 一次导入多个库
(import 'ui:*) ;; import 与 require 用法相同
(import 'block:*) ;; import 为 require 别名
(import '(ui:* block:* entity:*) ;; import 与 require 用法相同
(princ @:*functions*) ;; @:*functions* 为最后一次成功导入的函数列表。
;; 导入函数后,就可以使用这些函数了
(entity:make-line '(0 0 0) '(10 10 0)) ;; 使用库函数创建一条直线
(ui:select "请选择" '("张三" "李四" "王五")) ;; 使用库函数创建一个单选对话框
* 函数库帮助系统
以下lisp表达式中的函数名,可以是符号,也可以是字符串,如果函数定义已加载到 CAD 中,也可以直接输入函数名。如下所示。
** 函数列表
(fun:list) ; 显示函数
** 函数用法查询
在CAD命令行显示函数用法
#+BEGIN_SRC lisp
(fun:usage 函数名) ; 显示函数用法
(fun:help 函数名) ; 显示函数用法
;; 示例
(fun:usage 'string:to-list)
(fun:usage string:to-list)
(fun:usage "string:to-list")
(fun:help 'string:to-list)
(fun:help string:to-list)
(fun:help "string:to-list")
** 查看函数源代码
(fun:src 函数名) ; 显示函数代码
;; 示例
(fun:src string:to-list)
(fun:src 'string:to-list)
(fun:src "string:to-list")
** 搜索函数
funmatch 可以是符号,也可以是字符串
(fun:search funmatch)
;; 示例
(fun:search 'ui)
(fun:search "ui")
(fun:search "string:")
(fun:search 'string)
* 发布函数
如果你是一个热爱开源共享的爱好者、开发者。可以将自己认为有用的函数发布到 @lisp函数库 中。
** 函数命名要求
一般情况下函数命名原则为 *函数类别* + : + *功能* 。
如 *entity:make-line* 绘直线函数 entity 为图元类,make-line 为功能名。
如 *block:insert* 插入块 block 为块操作类,insert 为功能名。
也可以以自己的人名特征命名类别 *类别* + : + *功能* 。
如 *lee-mac:make