由买买提看人间百态

boards

本页内容为未名空间相应帖子的节选和存档,一周内的贴子最多显示50字,超过一周显示500字 访问原贴
Windows版 - 在windows系统上安装emacs24 (转载)
相关主题
Re: Convet Visio file to .epsmicrosoft so sucky???
Re: wireless on xpWord问题: 使用Track Changes时,如何避免弹出框
Re: [转载] 怎么在word2000里插入eps文件 ?大侠请帮忙
SQLdebugger用户?在windows系统上安装emacs24
gif动画在ppt里比正常显示要动得慢,怎么解决?如何才能让emacs用更新的bib文件?
How to insert US map in EXCEL?给我感觉只有linux/emacs/latex才是黄金组合
Help with adding text to a figureHow to jump to next 'undefined' reference using reftex-auctex-emacs?
usb drive doesn't show up in drive list.再表扬一下 Emacs + AucTex
相关话题的讨论汇总
话题: insert话题: reftex话题: excursion话题: mode话题: save
进入Windows版参与讨论
1 (共1页)
j***o
发帖数: 2842
1
【 以下文字转载自 Linux 讨论区 】
发信人: jigao (左季高), 信区: Linux
标 题: 在windows系统上安装emacs24
发信站: BBS 未名空间站 (Sun Apr 21 13:20:33 2013, 美东)
我用linux的主要原因是要用latex写文章和slides,emacs具有很多很多软件不具备的
优势,主要是lisp语言的支持,能做很多的智能选择,定义快捷键等,这里就不多说了
linux的主要问题是驱动和一些乱七八糟的问题,还有不能用office系列。如果能安装
emacs在windows上,可以说是一个完美的解决计划。
用下面的方法来安装,就能实现,不建议任何从源码编译的安装方法,太麻烦了。
第一步,安装miktex系统,这个就是latex所需要的所有软件包,很简单,只要等就可
以了,不过,建议你安装完整版本。
第二步,下载emacs系统的binary for windows,地址是
http://ftp.gnu.org/gnu/emacs/windows/
最好安装最新版本:emacs-24.3-bin-i386.zip 是最新版本。解压到c:\program files
\下面,创建一个文件夹emacs-24.3
然后到产生的bin文件夹下运行addpm.exe会在启动文件夹下面安装icon等
第三步,安装gsview和ghostscript,到相应的网站下载安装即可,默认安装就能搞定。
第四步,安装auctex插件,下载地址是
http://ftp.gnu.org/pub/gnu/auctex/auctex-11.87-e24.2-msw.zip
解压到一个临时目录下,然后把产生的文件拷贝到c:\program files\emacs-24.3\下面
,可以覆盖原有的文件
第五步,安装拼写检查,需要安装两个东西
1。安装Aspell-0-50-3-3-Setup.exe到c:\program files\emacs-24.3\下面,会自动产
生一个Aspell的文件夹
2。安装英文字典,Aspell-en-0.50-2-3.exe到c:\program files\emacs-24.3\下面
第六步,配置.emacs和.emacsmap.el文件
windows一般不支持.开始的文件,需要设定HOME这个环境变量
右键我的电脑-〉属性->advanced-〉environment variable
增加一个HOME变量,值为c:\documents and settings\XXXXXX
这里的XXXXXX是你的用户名
第七步,启动emacs,ctrl+x ctrl+f以后输入~/.emacs文件
输入下面的东西,拷贝两个******行中间的内容。当然可以作相应的修改
******************************************************************
(server-start)
(load "auctex.el" nil t t)
(load "preview-latex.el" nil t t)
(set-default-font "-adobe-courier-medium-r-normal--14-140-75-75-m-90-iso8859
-1")
;;; We test if AucTeX is available
(if (locate-library "tex-site")
(progn
(load "tex-site")
(add-hook 'LaTeX-mode-hook 'turn-on-reftex)
;;; Replace AUCTeX functions
(setq reftex-plug-into-AUCTeX t)
)
(add-hook 'latex-mode-hook 'turn-on-reftex)
)
;; reftex
(add-hook 'LaTeX-mode-hook 'turn-on-reftex) ; with AUCTeX LaTeX mode
(add-hook 'latex-mode-hook 'turn-on-reftex) ; with Emacs latex mode
(setq reftex-label-alist '(AMSTeX))
(setq reftex-plug-into-auctex t)
(autoload 'reftex-mode "reftex" "RefTeX Minor Mode" t)
(autoload 'turn-on-reftex "reftex" "RefTeX Minor Mode" nil)
(autoload 'reftex-add-to-label-alist "reftex" "RefTeX Minor Mode" nil)
;; map my latex shortcut
(add-hook 'LaTex-mode-hook
(load (expand-file-name "~/.emacsmap.el"))
)
;; Support Wheel Mouse Scrolling
(mouse-wheel-mode t)
;; make all "yes or no" prompts show "y or n" instead
(fset 'yes-or-no-p 'y-or-n-p)
;; Compare windows
(global-set-key "\C-cw" 'compare-windows)
(add-to-list 'exec-path "C:/Program Files/emacs-24.2/Aspell/bin/")
(setq-default ispell-program-name "aspell")
;; (setq text-mode-hook (lambda() (flyspell-mode t) ))
;; word wrap and flyspell
(add-hook 'text-mode-hook
(lambda ()
(text-mode-hook-identify)
(turn-on-auto-fill)
(flyspell-mode)
)
)
;;load path
(add-to-list 'load-path' "~/.emacs.d/site-lisp")
;; Set the geometric size of initial window.
(setq initial-frame-alist '((width . 81) (height . 50)))
;; Set background color to black
;(require 'color-theme)
;(color-theme-classic)
(set-background-color "black")
(set-foreground-color "white")
;; when there is a selection, delete key deletes the region instead of just
a char.
(delete-selection-mode t)
******************************************************************
最后一步,安装lisp的配置文件.emacsmap.el
启动emacs,ctrl+x ctrl+f以后输入~/.emacsmap.el文件
输入下面的东西,拷贝两个******行中间的内容。当然可以作相应的修改
******************************************************************
(define-key global-map "\C-cm"
(lambda () (interactive)
(insert "$")
(save-excursion (insert "$"))))
(define-key global-map "\C-ce"
(lambda () (interactive)
(insert "\\begin{equation}\n")
(save-excursion (insert "\n\\end{equation}\n"))))
(define-key global-map "\C-ci"
(lambda () (interactive)
(insert "\\begin{alignat}{2}\n")
(save-excursion (insert "\n\\end{alignat}\n"))))
(define-key global-map "\C-cn"
(lambda () (interactive)
(insert "\\begin{align}\n")
(save-excursion (insert "\n\\end{align}\n"))))
(define-key global-map "\C-cu"
(lambda () (interactive)
(insert "\\begin{enumerate}\n\\item ")
(save-excursion (insert "\n\\item\n\\end{enumerate}\n"))))
(define-key global-map "\C-co"
(lambda () (interactive)
(insert "\\left(") ;()
(save-excursion (insert "\\right)"))))
(define-key global-map "\C-cb" ;{}
(lambda () (interactive)
(insert "\\left\\{")
(save-excursion (insert "\\right\\}"))))
(define-key global-map "\C-ct"
(lambda () (interactive) ;\textrm{}
(insert "\\textrm{")
(save-excursion (insert "}"))))
(define-key global-map "\C-cp" 'reftex-parse-all)
(define-key global-map "\C-cr"
(lambda () (interactive)
(insert "\\redtext{")
(save-excursion (insert "}"))))
(defun insert-math-braces (num)
"Move point to first visible character on line."
(interactive "p")
(cond ( (<= num 1) (insert "\\left\\{ ") (save-excursion (insert " \\
right\\}")))
( (eq num 2) (insert "\\bigl\\{ ") (save-excursion (insert " \\bigr\\}"
)))
( (eq num 3) (insert "\\Bigl\\{ ") (save-excursion (insert " \\Bigr\\}"
)))
( (eq num 4) (insert "\\biggl\\{ ") (save-excursion (insert " \\biggr\\
}")))
( (eq num 5) (insert "\\Biggl\\{ ") (save-excursion (insert " \\Biggr\\
}")))
( (>= num 6) (insert "\\left\\{ ") (save-excursion (insert " \\right\\}
")))
)
)
(defun insert-math-parens (num)
"Move point to first visible character on line."
(interactive "p")
(cond ( (<= num 1) (insert "\\left(") (save-excursion (insert " \\
right )")))
( (eq num 2) (insert "\\bigl( ") (save-excursion (insert " \\bigr )")))
( (eq num 3) (insert "\\Bigl( ") (save-excursion (insert " \\Bigr )")))
( (eq num 4) (insert "\\biggl( ") (save-excursion (insert " \\biggr )")
))
( (eq num 5) (insert "\\Biggl( ") (save-excursion (insert " \\Biggr )")
))
( (>= num 5) (insert "\\left( ") (save-excursion (insert " \\right )")))
)
)
*******************************************************************
这两个文件救灾c:\documents and settings\XXXXXX下面,想做修改日后可以直接上了。
Enjoy!
1 (共1页)
进入Windows版参与讨论
相关主题
再表扬一下 Emacs + AucTexgif动画在ppt里比正常显示要动得慢,怎么解决?
哪家的编辑器快捷键最好用?How to insert US map in EXCEL?
问个题?求质数Help with adding text to a figure
[出售]priceline SHORE EXCURSION $70 credit for $45usb drive doesn't show up in drive list.
Re: Convet Visio file to .epsmicrosoft so sucky???
Re: wireless on xpWord问题: 使用Track Changes时,如何避免弹出框
Re: [转载] 怎么在word2000里插入eps文件 ?大侠请帮忙
SQLdebugger用户?在windows系统上安装emacs24
相关话题的讨论汇总
话题: insert话题: reftex话题: excursion话题: mode话题: save