• 第一步,安装emacs+slime+sbcl/ccl/...

1. 安装windows下的emacs ,
2. 安装windows 下的sbcl(注意下载win下的文件),(点击相应配置对应表格中的方块即可下载).

          2.1安装完成后重启系统，否则会提示：fatal error encountered in SBCL pid 10236(tid 9971200): can't find core file at XXXXX。检测环境变量是否生效的方法是：打开windows控制台，输入sbcl，回车，看是否能正确执行.

          2.2如果路径中有空格，则配置文件中就会有空格，安装时不会出错，但是在emacs中运行M-x slime时会出现问题：apply: Spawning child process: invalid argument.

     3.下载slime,,解压缩到合适的路径即可.

 具体问题可以参考下列博客

• 第二步,emacs的配置

    打开系统路径:C:\Users\你的用户名\AppData\Roaming,找到.emacs文件,打开方式选择记事本即可(以后可以使用emacs),在其中添加如下语句:

(load-file "自己的emacs安装目录/emacs-24.3/.emacs");注意斜杠不要搞错,如果目录下没有.emacs,就把原来的.emacs复制过去,之后改写内容(setenv "HOME" "同上那个目录/emacs-24.3/")(setenv "PATH" "同上那个目录/emacs-24.3/");;set the default file path(setq default-directory "~/")

    改写了emacs配置文件的路径后,找到emacs文件夹内,复制过去的.emacs文件,打开它,改写如下:

(custom-set-variables ;; custom-set-variables was added by Custom. ;; If you edit it by hand, you could mess it up, so be careful. ;; Your init file should contain only one such instance. ;; If there is more than one, they won't work right.	 '(case-fold-search nil)	 '(current-language-environment "utf-8");这句不需要gb18030	 '(column-number-mode t);下面这几句没有什么实际效果,有追求的同学可以再研究下	 '(cua-mode t nil (cua-base))	 '(show-paren-mode t)	 '(text-mode-hook (quote (text-mode-hook-identify)))	 '(uniquify-buffer-name-style (quote forward) nil (uniquify)))(custom-set-faces ;; custom-set-faces was added by Custom. ;; If you edit it by hand, you could mess it up, so be careful. ;; Your init file should contain only one such instance. ;; If there is more than one, they won't work right. );=============================(setq inferior-lisp-program "E:/ProgramData/SBCL/sbcl.exe -K utf-8");按照自己的sbcl路径配置正确,注意斜杠,不要弄错(add-to-list 'load-path "E:/ProgramData/SBCL/slime/");slime路径,我放到sbcl下了(require 'slime-autoloads);自动加载slime全部,如果是'slime,会导致很多快捷键用不了(slime-setup '(slime-fancy	      ; slime-asdf slime-banner	       ));舒服的slime风格'(slime-fancy)，比如把sbcl的*变成CL-USER>;=============================;注意,下面这句使用gb18030等编码会导致utf-8设置下的编译失败,所以用utf-8(set-language-environment "utf-8");注意,下面这句不能utf-8,否则打开汉语名文件不显示内容(setq file-name-coding-system 'gb18030);下面这句用于解决个别机器的乱码问题(set-fontset-font "fontset-default" 'cp936 '("SimSun" . "unicode-bmp"))(set-buffer-file-coding-system 'utf-8)(set-terminal-coding-system 'utf-8)(set-keyboard-coding-system 'utf-8)(set-selection-coding-system 'utf-8)(set-next-selection-coding-system 'utf-8)(set-default-coding-systems 'utf-8)(set-clipboard-coding-system 'utf-8)  (setq ansi-color-for-comint-mode t)(modify-coding-system-alist 'process "*" 'utf-8)  (setq-default pathname-coding-system 'utf-8)  (prefer-coding-system 'utf-8)(setq default-process-coding-system '(utf-8 . utf-8))  (setq locale-coding-system 'utf-8)(setq default-buffer-file-coding-system 'utf-8)  (setq slime-net-coding-system 'utf-8-unix);;============================美化设置(set-cursor-color "white") (set-mouse-color "blue") (set-foreground-color "green") (set-background-color "black") (set-border-color "lightgreen") (set-face-foreground 'highlight "red") (set-face-background 'highlight "lightblue") (set-face-foreground 'region "darkcyan") (set-face-background 'region "lightblue") (set-face-foreground 'secondary-selection "skyblue") (set-face-background 'secondary-selection "darkblue") ;;=============================键绑定(global-set-key [f1]   'help-command);将帮助命令绑定到 F1键(global-set-key "\C-c\M-q" 'slime-reindent-defun);这句也没效果....

这样就可以支持中文编辑了,还可以参考Free lues的博客

这样设置之后就可以使用汉语写lisp文件了,如图:

这样就解决了中文乱码问题.

要写这样一个程序,首先可以新建一个空文本文档,将格式改为.lisp再用emacs打开,或者打开emacs,C-x,C-f(C表示Ctrl键,M表示Alt键,意思就是先按Ctrl+x再按Ctrl+f),下边栏出现Find file,输入"文件名.lisp",(如果原路径没有,就会新建文件),enter后会打开相应文件,并建立对应缓冲区(buffer).

按下M-x 输入slime,(M-x slime),enter启动slime.

接着在文件中写代码,然后按C-c,C-c编译函数或C-x,C-e求值S表达式,之后可以在写好的函数区块按C-c,C-y,将函数发送到slime的缓冲区来调试函数.

• 关于含有汉字的流写入文件的问题

    只需在with-open-file宏或相关函数中添加如下代码:

    :external-format :utf-8或:external-format :gbk

    即可.

• 中文函数的编译与加载

     1. 在lisp文件中写入如下代码:

(compile-file "编辑的lisp文件.lisp" :external-format utf-8)

     然后C-c,C-l加载编译后生成的.fasl文件即可加载文件中的全部函数.

     切记不要在文件中写下(load "编译后的.fasl")语句,否则在编译(compile-file.....)时会导致无限循环从而出错!

    2. 或者在slime的缓冲区写入

(load "目标文件.lisp" :external-format :utf-8)

      接着enter即可.

      使用lispbox的朋友也可以参考FreeBlues大神的博客 

       非常感谢大神们对于小生曾经提出问题的悉心帮助!