# @lisp 根 **Repository Path**: atlisp/atlisp ## Basic Information - **Project Name**: @lisp 根 - **Description**: @lisp 主目录,用于组织 packages lib 等子模块。 @lisp是一个运行于 AutoCAD、中望CAD、浩辰CAD及类似兼容的CAD系统中的应用管理器。用于管理 AutoLisp 程序的网络下载安装、加载、卸载、查询等。可方便地实现 autolisp 程序的云管理。 - **Primary Language**: Lisp - **License**: AGPL-3.0 - **Default Branch**: main - **Homepage**: https://atlisp.cn - **GVP Project**: No ## Statistics - **Stars**: 3 - **Forks**: 1 - **Created**: 2022-05-23 - **Last Updated**: 2025-05-30 ## Categories & Tags **Categories**: Uncategorized **Tags**: AutoLisp, cad ## README #+title: @lisp CAD应用云管理系统 * @lisp 系统架构 #+BEGIN_SRC mermaid graph TD; O(AutoCAD用户)-->|...|A((Atlisp根仓库)); P(GstarCAD用户) -->|...|A; Q(ZWCAD用户)-->|...|A; R(其它支持lisp的CAD用户)-->A; A--> B( Atlisp函数库); A--> C( Atlisp应用中心); A--> D( Atlisp文档); C-->|...| H(gitub 仓库); C-->|...| E(gitee 仓库); C-->|...| F(gitlab 私有仓库); C-->|...| G(自建git仓库); #+END_SRC * 克隆 @lisp 克隆 @lisp 及子模块 packages 和 atlisp-lib 安装到用户目录下的 atlisp/ 以下命令将下载(拉取)全部 @lisp 。 #+BEGIN_SRC sh $ cd ~/ $ git clone https://gitee.com/atlisp/atlisp.git $ cd atlisp $ git submodule update --init --recursive $ git submodule foreach git checkout main $ git submodule foreach git pull pull --rebase origin main #+END_SRC 同步更新全部仓库(包含子模块) #+BEGIN_SRC bash $ git submodule foreach git pull origin main $ git submodule sync --recursive #+END_SRC * 嵌入到 CAD 系统 将以下代码复制到 CAD 命令行内,回车即可开始安装 @lisp kernel。@lisp kernel(内核)包含 @lisp函数库 及 @lisp应用云 的基本管理功能。 (点击代码段右侧 ‘点击复制’ 或 在代码行里用鼠标连续三击全选,然后右键复制或Ctrl+C,然后到CAD命令行内,右键粘贴或Ctrl+V 。) #+BEGIN_SRC commonlisp (progn(vl-load-com)(setq s strcat h"http"o(vlax-create-object (s"win"h".win"h"request.5.1"))v vlax-invoke e eval r read)(v o'open "get" (s h"://""atlisp.""org/@"):vlax-true)(v o'send)(v o'WaitforResponse 1000)(e(r(vlax-get o'ResponseText)))) #+END_SRC * 开发 @lisp 应用包 按 @lisp 应用包 的文件及内容要求组织目录结构 包含一个 pkg.lsp 文件。 这个文件是个包定义文件。用于说明该包的名称,用途,版本等。 其它 lsp 代码文件及必要的其它格式的文件组成 @lisp 系统具有以下底层开发框架: - 界面(菜单及面板) - 配置管理 - 用户管理 - 应用管理 - i18n 国际化与本地化 - 版本管理 详见 @lisp 文档 * 将您的应用登记到 @lisp @lisp 支持去中心化的分布式包管理。 只要您的应用包支持 git 拉取,不管代码位于 Github 还是 Gitee ,还是您自建的 git 服务器, @lisp 都可以完成您的应用的部署。 只需将你开发的应用注册到 http://gitee.com/atlisp/packages 仓库。 示例:你的应用包为 https://gitee.com/yourname/yourapp 注册步骤如下: #+BEGIN_SRC bash $ git clone https://gitee.com/atlisp/packages.git $ cd packages $ git pull $ git submodule add https://gitee.com/yourname/yourapp.git $ git add . $ git commit -m "add package yourapp in @lisp" $ git push #+END_SRC 同样的支持世界各地的分布式应用,如 github.中托管的应用。 例如:你的应用包为 https://github.com/yourname/yourapp1 #+BEGIN_SRC shell $ git clone https://gitee.com/atlisp/packages.git $ cd packages $ git pull $ git submodule add https://github.com/yourname/yourapp1.git $ git add . $ git commit -m "add package yourapp1 in @lisp" $ git push #+END_SRC 唯一的要求是您帐户下的仓库名称 yourapp yourapp1 的名称须具有唯一性,不能与其它人的仓库重名。 以上操作完成后。 @lisp 的应用列表中就会显示你的包信息,并提供给需要的最终用户使用。