{{category プログラミング}} !!regionの入力を使ってみるテスト (defun my-10-to-16 (start end) (interactive "r") ; 引数に現在のregionのstart endをとる (setq major-mode '10-to-16 mode-name "10-to-16") (let ((x (string-to-number (prin1-to-string (read (set-marker (make-marker) start)))))) (message (format "0x%x" x)))) !!リンク [リファレンス|http://www.math.s.chiba-u.ac.jp/~matsu/lisp/emacs-lisp-intro-jp_toc.html] http://www.bookshelf.jp/texi/emacs-lisp-intro-jp/emacs-lisp-intro-jp.html