搜索结果
查询Tags标签： setq，共有 5条记录-
Emacs 配置
;;生活必需品 (setq-default cursor-type bar) ;;竖线光标 (setq c-basic-offset 4) (setq default-tab-width 4) ;;设置缩进及tab键 (global-linum-mode t) ;;显示行号 (global-hl-line-mode t) ;;高亮当前行 (global-set-key [f9] compile) ;;快捷编译 (global-set-key …
2021/10/19 23:13:15 人评论 次浏览 -
Emacs 配置
;;生活必需品 (setq-default cursor-type bar) ;;竖线光标 (setq c-basic-offset 4) (setq default-tab-width 4) ;;设置缩进及tab键 (global-linum-mode t) ;;显示行号 (global-hl-line-mode t) ;;高亮当前行 (global-set-key [f9] compile) ;;快捷编译 (global-set-key …
2021/10/19 23:13:15 人评论 次浏览 -
Autolisp：利用AuoCAD之Lisp编程案例之自动智能获取所选对象的面积并标注在指定位置
Autolisp：利用AuoCAD之Lisp编程案例之自动智能获取所选对象的面积并标注在指定位置目录 输出结果 实现代码输出结果 实现代码 ;; write area value of a close polygon to drawing (DEFUN C:EA(/ OLDOS PT STA QAREA) ;;(setq olderr *error*)(setq *error* myerr)(SETVA…
2021/6/16 1:21:11 人评论 次浏览 -
Autolisp：利用AuoCAD之Lisp编程案例之自动智能绘制枫叶玫瑰
Autolisp：利用AuoCAD之Lisp编程案例之自动智能绘制枫叶玫瑰目录 输出结果 实现代码输出结果 实现代码 ;风玫瑰程序: GXFMG.LSP 1989.1. (defun dbh(a)(* pi (/ a 180.0)) ) (defun C:FMG( )(setq pt (getpoint "风玫瑰中心点—Jason niu:"))(setq len (…
2021/6/16 1:21:07 人评论 次浏览 -
Autolisp：利用AuoCAD之Lisp编程案例之智能加工齿轮的演示程序
Autolisp：利用AuoCAD之Lisp编程案例之智能加工齿轮的演示程序目录 实现结果 实现代码实现结果 实现代码 (defun dlg1();初始化对话一 (set_tile "_m" "5");模数列表第6项 (set_tile "_z" "20");齿数20 (set_tile "_alf&qu…
2021/6/16 1:21:02 人评论 次浏览
