Emacs配置(考場必備)(Emacs)

最近有幾回離開本身一直坐着的座位,去別的機房考試了。
因而猛然想起來要記一記Emacs的簡潔配置了。
算是把NOIP殘存的記憶再拾一點起來。。。。。。
update:
1:實測NOILinux不資磁透明度設定,已刪去。
2.撤銷鍵包含在cua-mode裏,已刪去。
3.編譯指令裏的%s應加上單引號,否則編譯文件名帶空格的cpp時會出問題。(NOIP有帶空格的文件名嗎?)
4.編譯函數加了個save-buffer指令。考場配置加入自動運行。
附上一些解釋c++

(global-set-key [f9] 'compile-file)
;;一鍵編譯(弄Devcpp留下來的習慣)
(global-set-key (kbd "C-a") 'mark-whole-buffer)
;;全選(Like Windows)
(global-set-key (kbd "RET") 'newline-and-indent)
;;換行時自動縮進
(defun compile-file()(interactive)
(save-buffer)
(compile(format "g++ -o '%s' '%s' -lm -Wall"
(file-name-sans-extension(buffer-name))(buffer-name))))
;;編譯指令(真TM難記)
(cua-mode t)
;;Windows的剪切複製粘貼鍵
(show-paren-mode t)
(global-linum-mode t)
;;括號匹配,顯示行號
(setq kill-ring-max 200)
;;撤銷的緩存開大點
(setq default-cursor-type 'bar)
;;把光標變成條,一塊真的看不爽(用VIM的Dalao請無視)
(setq default-tab-width 4)
;;默認tab寬度
(setq c-default-style "awk")
;;縮進風格
(set-background-color "gray15")
(set-foreground-color "gray")
;;背景顏色(白的太亮了)前景顏色也要跟着改

Update:
蒟蒻忽然發現,全部的指令,好像均可以在Emacs內部完成編輯,按M-x(Alt+x)而後輸入便可(不用加最外層的括號了)。改完之後記得點擊Options->Save Options保存配置,否則叉掉之後再打開就沒了。
(一個例外:把setq改爲set-variable
這樣輸入有一個好處,會有一個模糊查找的索引,按一下Tab便可。
若是記不清所有的拼寫,能夠敲比較肯定的部分,不記得的用*或者-代替,而後直接在索引裏找找就好啦。
媽媽不再用擔憂個人記性啦!shell


我仍是太弱了,少了這些一點都不適應。
Dalao們的都沒十行吧。。。。。。緩存

無聊版(F10一鍵運行,F8文本比較,F7一鍵測樣例)
想玩一玩Lisp的大佬們能夠本身隨便百度一下qaq函數

(global-set-key[f9]'compile-file)
(global-set-key[f10]'autorun)
(global-set-key[f8]'differ)
(global-set-key[f7]'yeah)
(global-set-key(kbd"C-a")'mark-whole-buffer)
(global-set-key(kbd"C-q")'kill-this-buffer)
(global-set-key(kbd"RET")'newline-and-indent)
(defun compile-file()(interactive)
	(save-buffer)
	(compile (format "g++ -o '%s' '%s' -lm -Wall -O2 -std=c++11"
	(file-name-sans-extension(buffer-name))(buffer-name))))
(defun autorun()(interactive)
	(shell-command(format "time timeout 5 ./'%s'"
	(file-name-sans-extension(buffer-name)))))
(defun differ(name)(interactive "sStandard Output Name:")
	(shell-command(format "diff -b -B '%s.out' '%s'"
	(file-name-sans-extension(buffer-name)) name)))
(defun yeah(name)(interactive "sSample Name:")
	(shell-command(format "cp '%s.in' '%s.in'"
	(file-name-sans-extension name )
	(file-name-sans-extension(buffer-name))))
	(autorun)
	(shell-command(format "diff -b -B '%s.out' '%s'"
	(file-name-sans-extension(buffer-name)) name)))
(cua-mode t)
(show-paren-mode t)
(global-linum-mode t)
(setq kill-ring-max 200)
(setq default-cursor-type 'bar)
(setq default-tab-width 4)
(setq c-default-style "awk")
(set-background-color "gray15")
(set-foreground-color "gray")
相關文章
相關標籤/搜索