Previous: Interactive Codes, Up: Defining Commands [Contents][Index]
interactive¤Î»ÈÍÑÎ㤳¤³¤Ç¤Ïinteractive¤ÎÎã¤ò¼¨¤·¤Þ¤¹¡£
(defun foo1 () ; foo1¤Ï°ú¿ô¤Ê¤·
(interactive) ; 2ñ¸ìʬÀè¤Ø¿Ê¤á¤ë
(forward-word 2))
⇒ foo1
(defun foo2 (n) ; foo2¤Ï1°ú¿ô
(interactive "p") ; ¿ôÃÍÁ°ÃÖ°ú¿ô
(forward-word (* 2 n)))
⇒ foo2
(defun foo3 (n) ; foo3¤Ï1°ú¿ô
(interactive "nCount:") ; ¥ß¥Ë¥Ð¥Ã¥Õ¥¡¤ÇÆÉ¤à
(forward-word (* 2 n)))
⇒ foo3
(defun three-b (b1 b2 b3) "Select three existing buffers. Put them into three windows, selecting the last one."
(interactive "bBuffer1:\nbBuffer2:\nbBuffer3:")
(delete-other-windows)
(split-window (selected-window) 8)
(switch-to-buffer b1)
(other-window 1)
(split-window (selected-window) 8)
(switch-to-buffer b2)
(other-window 1)
(switch-to-buffer b3))
⇒ three-b
(three-b "*scratch*" "declarations.texi" "*mail*")
⇒ nil