Previous: Interactive Codes, Up: Defining Commands   [Contents][Index]


20.2.3 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