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


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

(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即可。
如果記不清全部的拼寫,可以敲比較確定的部分,不記得的用*或者-代替,然后直接在索引里找找就好啦。
媽媽再也不用擔心我的記性啦!


我還是太弱了,少了這些一點都不適應。
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")


免責聲明!

本站轉載的文章為個人學習借鑒使用,本站對版權不負任何法律責任。如果侵犯了您的隱私權益,請聯系本站郵箱yoyou2525@163.com刪除。



 
粵ICP備18138465號   © 2018-2025 CODEPRJ.COM