重新hack 一遍网上的教程，学习一下elisp的编程语言，了解下常用的功能。
如何安装 Emacs
Deb体系: apt-get install emacs
启动、缓冲和工作模式
terminal下键入
emacs
后面可以键入 -nw，表示在Linux的terminal下。
如何切换Emacs的工作模式
Emacs有各种各样功能各异的模式，工作模式的含义其实就是Emacs对当前的文本编辑工作。
更加的敏感，比如高亮和缩进，并且支持一些特殊的命令。
为了实验本教程中的lisp命令，我们要让Emacs工作在lisp-interaction-mode工作模式下工作。
这个模式可以让我们在缓冲区中和Emacs进行互动，并且直接执行Lisp命令,得到结果。
进入lisp-interaction-mode的方法： 把光标移动到辅助输入区，键入M-x lisp-interaction-mode，然后回车。
表达式，变量和函数
冒号在Lisp中表示注释
在Elisp中做运算，调用函数的最简单的方式是
(function arg1 arg2)
这相当于通常的function(arg1,arg2)，下面的表达式，对两个数字进行加法运算
(+ 2 2)
Elisp中表达式可以通过括号来嵌套
(+ 2 (+ 1 1))
在lisp-interaction-mode模式中，我们可以直接计算一个表达式,计算的方法是
(+ 3 (+ 1 2))
^ 把光标放在这里，并且键入Ctrl-j (之后将简写成C-j)
C-j是一个快捷命令，在后台，该快捷键将调用求值命令，并且把计算的结果
插入到当前的缓冲区中
如果不希望Emacs在缓冲区中插入计算结果，我们还可以在表达式的末尾使用C-x C-e组合键
C-x C-e的意思是: 先按下Ctrl-x 再按下Ctrl-e
这个命令会让Emacs在辅助缓冲区，也就是Emacs窗口的最底部那行显示计算结果
ELisp中的赋值函数是是setq，下面的表达式给变量my-name赋值”Bastien”
(setq my-name “Bastien”)
执行上边的程式
下面insert函数的作用是在光标所在出插入字符Hello
(insert “Hello!”)
执行上边的程式
insert函数还可以两个常量字符，比如
(insert “Hello” “ world!”)
insert函数还可以接受变量作为参数，我们之前已经给my-name变量赋过值了
所以下面命令的输出结果是 “Hello, I am Bastien”
(insert “Hello, I am “ my-name)
defun命令用来定义一个函数,语法是
(defun 函数名 (参数列表) (函数体))
(defun hello () (insert “Hello, I am “ my-name))
执行上边的程式
执行defun命令来定义函数
通过defun命令，你已经在Emacs中安装了这个hello函数，这个函数就成为了Emacs的一部分，知道你退出Emacs或者改变hello的定义
从下面开始，我们将不再提醒读者使用C-x C-e来定义函数和执行ELisp指令
在Elisp中直接输入函数的名称就是调用该函数。
下面的命令的输入结果是: Hello, I am Bastien
(hello)
前面定义的hello函数不接受任何参数,过于简单，
现在我们重新定义hello函数，让它接受一个参数name。
(defun hello (name) (insert “Hello “ name))
然后调用新的hello函数，并且提供一个参数。
下面命令的输出结果是”Hello you”
(hello “you”)
progn,let和交互式函数
执行switch-to-buffer-other-window命令，将在在一个新的窗口中打开一个buffer
该buffer命名叫做 test, 并且把光标移到新的buffer的窗口中。
(switch-to-buffer-other-window “test”)
要回到原来的buffer中，可以使用鼠标点击原来的buffer
或者使用组合键 C-x o
C-x o的意思是: 先按下Ctrl-x 再按下o
如果要执行一系列的指令，可以使用流程函数progn，把函数命令连接起来.
下面的命令,先打开一个新的buffer,再执行hello函数，该hello函数的参数是”you”
(progn
(switch-to-buffer-other-window “test”)
(hello “you”))
如果要清空一个buffer,可以调用erase-buffer函数。下面的命令先清空test buffer,再调用hello函数做打印
(progn
(switch-to-buffer-other-window “test”)
(erase-buffer)
(hello “there”))
在这一系列的质量后面再添加调用一个other-window函数，这样在hello函数被调用完毕之后 光标自动回到之前的buffer窗口中
(progn
(switch-to-buffer-other-window “test”)
(erase-buffer)
(hello “you”)
(other-window 1))
let函数用来做局部变量的定义 下面的一系列命令中 let函数首先定义local-name变量的值为“you” 然后接着执行括号中其它的语句块部分，这个功能和progn类似
(let ((local-name “you”))
(switch-to-buffer-other-window “test”)
(erase-buffer)
(hello local-name)
(other-window 1))
format函数可以用做格式化的输出 其中%s表示该s的地方将被之后提供的一个字符串,即visitor替换
\n表示换行
(format “Hello %s!\n” “visitor”)
现在我们利用format函数来改进之前定义的hello函数
(defun hello (name)
(insert (format “Hello %s!\n” name)))
执行这个函数结果是”Hello you”，并且光标换到下一行
(hello “you”)
下面我们再设计一个greeting函数，该函数接受一个参数name, 在函数体的内部又使用了let函数，给一个局部变量your-name赋值 最后把参数和局部变量格式化的打印出来
(defun greeting (name)
(let ((your-name “Bastien”))
(insert (format “Hello %s!\n\nI am %s.”
name
your-name ; 局部变量
))))
执行greeting函数，并提供”you”字符串作为参数
(greeting “you”)
read-from-minibuffer函数提供和用户交互的功能，这个函数可以帮助Elisp程序从用户处得到输入
(read-from-minibuffer “Enter your name: “)
比如如果我们希望greeting函数能够从用户处得到姓名，并且做打印格式化的欢迎信息。
可以先调用read-from-minibuffer在minibuffer中提示用户输入姓名，
然后把得到的结果赋给局部变量your-name，
最后insert函数在当前buffer中插入格式化的输出
(defun greeting (from-name)
(let ((your-name (read-from-minibuffer “Enter your name: “)))
(insert (format “Hello!\n\nI am %s and you are %s.”
from-name ; 格式化输出参数1
your-name ; 格式化输出参数2
))))
执行这个函数
(greeting “Bastien”)
再稍加改进greeting 把结果打印在新的buffer中
(defun greeting (from-name)
(let ((your-name (read-from-minibuffer “Enter your name: “)))
(switch-to-buffer-other-window “test”)
(erase-buffer)
(insert (format “Hello %s!\n\nI am %s.” your-name from-name))
(other-window 1)))
执行这个函数
(greeting “Bastien”)
列表和综合实例
Lisp中使用括号构造列表，使用setq给变量赋值。
下面的命令先构造一个列表，再把这个列表赋给list-of-names变量
(setq list-of-names ‘(“Sarah” “Chloe” “Mathilde”))
^这里的单引号表示这是一个列表
如果想要得到列表中的第一个元素，可以使用car函数
(car list-of-names)
如果想要得到列表中的除第一个元素以外的其它元素，可以使用cdr函数
(cdr list-of-names)
以后push函数可以在列表的头部插入新的元素，所以下面的命令将改变list-of-name中元素的个数
(push “Stephanie” list-of-names)
mapcar函数对列表中的把列表中的每一个元素分别取出来，赋给hello函数
(mapcar ‘hello list-of-names)
重新定义greeting函数，在一个新的，清空的buffer中，对list-of-names列表中的每一个元素，调用hello函数
调用完毕之后，再让光标回到原的buffer中
(defun greeting ()
(switch-to-buffer-other-window “test”)
(erase-buffer)
(mapcar ‘hello list-of-names)
(other-window 1))
执行这个函数，我们将得到一个名叫test的buffer，其中的内容是
Hello Stephanie!
Hello Sarah!
Hello Chloe!
Hello Mathilde!
暂时先不要关闭这个buffer!后面还有用！
(greeting)
下面我们对buffer做一些更有意思的事情！
定义一个replace-hello-by-bonjour函数，顾名思义，就是把hello替换成bonjour
该函数首先把光标移到一个叫做test的buffer中
再把光标移到该buffer的开头
从头开始搜索字符串Hello,并且替换成Bonjour
结束之后在把光标移会到一开始的buffer中。
(defun replace-hello-by-bonjour ()
(switch-to-buffer-other-window “test”)
(goto-char (point-min)) ;该函数把光标移到buffer的开头
(while (search-forward “Hello”)
(replace-match “Bonjour”))
(other-window 1))
其中 (search-forward “Hello”) 在当前的buffer中做前向搜索
(while x y) 当x 的条件满足时执行y指令 ，当x返回nil时，while循环结束
执行这个函数 替换test buffer中的hello
(replace-hello-by-bonjour)
test buffer中的结果如下
Bonjour Stephanie!
Bonjour Sarah!
Bonjour Chloe!
Bonjour Mathilde!
在minibuff中，还会有一条错误信息 “Search failed: Hello”.
把(search-forward “Hello”)一句换成如下就不会有错误信息了
(search-forward “Hello” nil t)
其中 nil参数表示 搜索的区域不加限制，直到buffer结束
其中t参数指示search-foward函数 跳过错误信息 直接退出
新hello-to-bonjour如下：
(defun hello-to-bonjour ()
(switch-to-buffer-other-window “test”)
(erase-buffer)
对list-of-names列表中的每个元素 使用hello函数
(mapcar ‘hello list-of-names)
(goto-char (point-min))
搜索Hello替换成Bonjour
(while (search-forward “Hello” nil t)
(replace-match “Bonjour”))
(other-window 1))
执行这个函数
(hello-to-bonjour)
下面的cuti-names 函数 ，
首先把光标挪到名叫test的buffer的开头，
然后使用regular expression 搜索 “Bonjour + 其它任何内容” 的pattern，
然后对找到的字符加粗。
(defun cuti-names ()
(switch-to-buffer-other-window “test”)
(goto-char (point-min))
(while (re-search-forward “Bonjour \(.+\)!” nil t)
(add-text-properties (match-beginning 1) ;返回匹配模式中，最先匹配的位置
(match-end 1) ;返回最后匹配的位置
(list ‘face ‘bold)))
(other-window 1))
执行这个函数
(cuti-names)