libcanna1g 3.7p3-14 / usr / share / canna / sample.canna

;; Copyright 1992 NEC Corporation, Tokyo, Japan.
;;
;; Permission to use, copy, modify, distribute and sell this software
;; and its documentation for any purpose is hereby granted without
;; fee, provided that the above copyright notice appear in all copies
;; and that both that copyright notice and this permission notice
;; appear in supporting documentation, and that the name of NEC
;; Corporation not be used in advertising or publicity pertaining to
;; distribution of the software without specific, written prior
;; permission.  NEC Corporation makes no representations about the
;; suitability of this software for any purpose.  It is provided "as
;; is" without express or implied warranty.
;;
;; NEC CORPORATION DISCLAIMS ALL WARRANTIES WITH REGARD TO THIS SOFTWARE,
;; INCLUDING ALL IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS, IN 
;; NO EVENT SHALL NEC CORPORATION BE LIABLE FOR ANY SPECIAL, INDIRECT OR
;; CONSEQUENTIAL DAMAGES OR ANY DAMAGES WHATSOEVER RESULTING FROM LOSS OF 
;; USE, DATA OR PROFITS, WHETHER IN AN ACTION OF CONTRACT, NEGLIGENCE OR 
;; OTHER TORTUOUS ACTION, ARISING OUT OF OR IN CONNECTION WITH THE USE OR 
;; PERFORMANCE OF THIS SOFTWARE. 

;;  $Id: sample.canna,v 1.3 2003/09/25 15:24:33 aida_s Exp $

;;	sample.canna ¤Ï¥«¥¹¥¿¥Þ¥¤¥º¥Õ¥¡¥¤¥ë¤Î°ìÎã¤Ç¤¹¡£
;;	¥Ç¥Õ¥©¥ë¥È¤ò¥Ù¡¼¥¹¤Ë¥«¥¹¥¿¥Þ¥¤¥º¥Õ¥¡¥¤¥ë¤òÊѹ¹¤·¤¿¤¤Êý¤Ï
;;	   CANNALIBDIR/sample/default.canna 
;;	   (CANNALIBDIR ¤ÏÎ㤨¤Ð /usr/lib/canna ¤Ç¤¹)
;;	¤ò»ÈÍѤ·¤Æ¤¯¤À¤µ¤¤¡£


;;; ¥í¡¼¥Þ»ú¤«¤ÊÊÑ´¹¤ÎÀßÄê
;
; ¥í¡¼¥Þ»ú¤«¤ÊÊÑ´¹¥Æ¡¼¥Ö¥ë¤ò»ØÄꤷ¤Þ¤¹¡£¥í¡¼¥Þ»ú¤«¤ÊÊÑ´¹¥Æ¡¼¥Ö¥ë¤Ï
; (1) ¥«¥ì¥ó¥È¥Ç¥£¥ì¥¯¥È¥ê
; (2) ¥Û¡¼¥à¥Ç¥£¥ì¥¯¥È¥ê
; (3) CANNALIBDIR/dic  (CANNALIBDIR ¤Ï¡¢Î㤨¤Ð /usr/lib/canna ¤Ç¤¹)
; ¤Î½ç¤Ë¥µ¡¼¥Á¤µ¤ì¤Þ¤¹¡£
;

(setq romkana-table "default.cbp")

;;; ÍøÍѤ¹¤ë¼­½ñ
;
; ¤¿¤Àñ¤Ë½ñ¤­Ê¤٤Ƥ¤¤ë¤Î¤Ïñ¸ìÅÐÏ¿¤ò¹Ô¤ï¤Ê¤¤¼­½ñ¤Ç¥·¥¹¥Æ¥à¼­½ñ¤Ê¤É¤¬
; ¤³¤ì¤ËÅö¤¿¤ê¤Þ¤¹¡£
;
; Éô¼ó¼­½ñ¤Ë´Ø¤·¤Æ¤Ï :bushu ¤òÀè¹Ô¤µ¤»¤Æµ­½Ò¤·¤Þ¤¹¡£
;
; ñ¸ìÅÐÏ¿¤ò¤·¤¿¤¤¼­½ñ¤Ë´Ø¤·¤Æ¤Ï :user ¤òÀè¹Ô¤µ¤»¤Æµ­½Ò¤·¤Þ¤¹¡£Ã±¸ìÅÐ
; Ï¿¤ò¤¹¤ë¼­½ñ¤Ï¥Æ¥­¥¹¥È·Á¼°¼­½ñ¤Ç¤Ê¤±¤ì¤Ð¤Ê¤ê¤Þ¤»¤ó¡£Ã±¸ìÅÐÏ¿¤µ¤»¤¿¤¤
; ¼­½ñ¤Ï mkdic user ¤ÎÍͤʥ³¥Þ¥ó¥É¤òÂǤĤ³¤È¤Ë¤è¤ê´Êñ¤ËºîÀ®¤¹¤ë¤³¤È¤¬
; ¤Ç¤­¤Þ¤¹¡£
;
; :katanana ¤òÀè¹Ô¤µ¤»¤Æµ­½Ò¤·¤¿¼­½ñ¤Ï¡¢¥«¥¿¥«¥Ê¸ì¤Î¼«Æ°ÅÐÏ¿¼­½ñ¤Ë
; ¤Ê¤ê¤Þ¤¹¡£»ú¼ïÊÑ´¹¤Ç¥«¥¿¥«¥Ê¤ËÊÑ´¹¤·¤Æ³ÎÄꤹ¤ë¤È¡¢¼«Æ°Åª¤Ë¥µÊÑ
; ̾»ì¤È¤·¤ÆÅÐÏ¿¤µ¤ì¤Þ¤¹¡£
;
(use-dictionary
 "iroha"
 "fuzokugo"
 "hojomwd"
 "hojoswd"
 :bushu "bushu"
 :user  "user"
; :katakana "katakana"
 )

;;; ¤µ¤Þ¤¶¤Þ¤Ê¥Ñ¥é¥á¥¿¤ÎÀßÄê
;
; ¿¿ÍýÃͤòÀßÄꤹ¤ë¤â¤Î¤Ë¤Ä¤¤¤Æ¤Ï¿¿¤Ë¤Ä¤¤¤Æ¤Ï t ¡¢µ¶¤Ë¤Ä¤¤¤Æ¤Ï nil ¤òÀß
; Äꤷ¤Þ¤¹¡£

; ¥«¡¼¥½¥ë°ÜÆ°¤ò¤¹¤ë»þ¡¢±¦Ã¼¤«¤é±¦¤Ë¹Ô¤³¤¦¤È¤¹¤ë¤Èº¸Ã¼¤Ë¹Ô¤¯¤«(t)
; nil ¤Î»þ¤Ï±¦Ã¼¤Ë¤È¤É¤Þ¤ê¤Þ¤¹¡£
(setq cursor-wrap          t)           ; default t

; °ìÍ÷ɽ¼¨»þ¡¢¿ô»ú¥­¡¼¤òÍѤ¤¤Æ¸õÊä¤òÁªÂò¤¹¤ë¤«(t)
; nil¤Î»þ¤Ï¿ô»ú¤¬É½¼¨¤Þ¤»¤ó¡£
(setq numerical-key-select t)           ; default t

; °ìÍ÷ɽ¼¨»þ¡¢¿ô»ú¥­¡¼¤òÂǤ俤Ȥ­¤Ë°ìÍ÷ɽ¼¨¤ò½ªÎ»¤¹¤ë¤«(t)
; nil ¤Î»þ¤Ï°ìÍ÷ɽ¼¨¤Î¤Þ¤Þ¤Ç¤¹¡£
(setq select-direct        t)           ; default t

; ¸õÊäɽ¼¨»þ¤ËʸÀá¤Î¶èÀÚ¤ê¤Ë¶õÇò¤ò¤¤¤ì¤ë¤«(t)
; nil ¤Î»þ¤Ï¶õÇò¤Ç¶èÀÚ¤ê¤Þ¤»¤ó¡£
(setq bunsetsu-kugiri nil)              ; default nil

; ¥«¡¼¥½¥ë°ÜÆ°¤òʸ»ú¥Ù¡¼¥¹¤Ç¹Ô¤¦¤«(t)
; nil¤Î»þ¤Ï¥í¡¼¥Þ»ú¤«¤ÊÊÑ´¹¤Îñ°Ì¤Ç¥«¡¼¥½¥ë°ÜÆ°¤¬¹Ô¤ï¤ì¤Þ¤¹¡£
(setq character-based-move t)           ; default t

; ÆþÎÏÃæ¤ÎÆɤßÁ´ÂΤò¥ê¥Ð¡¼¥¹¤¹¤ë¤«(t)
; nil ¤Î»þ¤Ïȿžɽ¼¨¤·¤Þ¤»¤ó¡£
(setq reverse-widely       nil)         ; default nil

; °ìÍ÷¤ÎºÇ¸å¤Þ¤Ç¤¤¤Ã¤¿¤é°ìö°ìÍ÷ɽ¼¨¤ò¤ä¤á¤ë¤«(t)
; nil ¤Î»þ¤Ï½ªÎ»¤·¤Þ¤»¤ó¡£
(setq quit-if-end-of-ichiran nil)       ; default nil

; ÆɤߤòÆþÎÏÃæ¤Ë¥Ð¥Ã¥¯¥¹¥Ú¡¼¥¹¤òÂÇ¤Ä¤È¥í¡¼¥Þ»ú¤Þ¤Ç¥Ð¥é¥Ð¥é¤Ë¤¹¤ë¤«(t)
; nil ¤Î»þ¤Ïʸ»ú¥Ù¡¼¥¹¤Çºï½ü¤·¤Þ¤¹¡£
(setq break-into-roman     t)           ; default nil

; ÉÑÅٳؽ¬¤ò¤¹¤ë¤«(t)
; nil ¤Î»þ¤ÏÉÑÅٳؽ¬¤ò¹Ô¤¤¤Þ¤»¤ó¡£
(setq gakushu              t)           ; default t

; °ìÍ÷ÁªÂò¸åƱ¤¸Ê¸Àá¤Ë¤È¤É¤Þ¤ë¤«(t)¡£
; nil¤Î»þ¤Ï°ìÍ÷ÁªÂò¤ò¹Ô¤¦¤È¤Ò¤È¤ÄÀè¤ÎʸÀá¤Ë°ÜÆ°¤·¤Þ¤¹¡£
(setq stay-after-validate  t)           ; default t

; ʸÀá¤Î±¦Ã¼¤Ç±¦°ÜÆ°¤ò¤¹¤ë¤ÈÁ´ÂΤ¬³ÎÄꤷ¤Æ¤·¤Þ¤¦¤«(t)
; nil ¤Î»þ¤Ï¡¢cursor-wrap ¤¬ t ¤Ç¤¢¤ë¤Èº¸Ã¼¤ÎʸÀá¤Ë°ÜÆ°¤·¤Þ¤¹¡£
; cursor-wrap ¤¬ nil ¤Ç¤¢¤ë¤È±¦Ã¼¤ÎʸÀá¤Ë¤È¤É¤Þ¤ê¤Þ¤¹¡£
(setq kakutei-if-end-of-bunsetsu nil)   ; default nil

; ñ¸ìÅÐÏ¿»þ¤Ëʸˡ´ØÏ¢¤Î¼ÁÌä¤ò¤¹¤ë¤«(t)
; nil¤Î»þ¤Ï¾ÜºÙ¤ÊÉÊ»ìʬÎà¤ò¹Ô¤ï¤º¡¢Å¬Åö¤ÊÉÊ»ì¤ÇÅÐÏ¿¤ò¹Ô¤¤¤Þ¤¹¡£
(setq grammatical-question  t)          ; default t

; ²¿²ó¤ÎÊÑ´¹¥­¡¼¤Ç°ìÍ÷ɽ¼¨¤ò¹Ô¤¦¤«¡££°¤òÆþ¤ì¤ë¤ÈÊÑ´¹¥­¡¼¤À¤±¤Ç¤Ï
; °ìÍ÷ɽ¼¨¤Ë¤Ï°Ü¤ê¤Þ¤»¤ó¡£¤½¤Î¾ì¹ç¤Ë¤Ï C-w ¤òÆþÎϤ·¤Æ°ìÍ÷ɽ¼¨¤·¤Æ
; ²¼¤µ¤¤¡£
(setq n-henkan-for-ichiran 2)           ; default 2

; ¸õÊ䤬Á´ÂΤβ¿ÈÖÌܤ«¤òɽ¼¨¤¹¤ë¤«(t)
; nil ¤Î»þ¤Ïɽ¼¨¤·¤Þ¤»¤ó¡£
(setq kouho-count t)                    ; default t

; Ã༡¼«Æ°ÊÑ´¹¤ò¤¹¤ë¤«(t)
; nil ¤Î»þ¤ÏÃ༡¼«Æ°ÊÑ´¹¤ò¹Ô¤¤¤Þ¤»¤ó¡£
(setq auto nil)                         ; default nil

; Ã༡ÊÑ´¹¤ò¤¹¤ë»þ¤Ë²¿¸Ä¤ÎʸÀá¤Þ¤Ç¤ò̤³ÎÄê¤ÇÊÝ»ý¤¹¤ë¤«
(setq n-kouho-bunsetsu 16)              ; default 16

; ¥í¡¼¥Þ»ú¤«¤ÊÊÑ´¹¤Ç¥¤¥ê¡¼¥¬¥ë¤Ê¥í¡¼¥Þ»ú¤ò¼Î¤Æ¤ë¤«(t)
; nil ¤Î»þ¤ÏÉÔÀµ¤Ê¥í¡¼¥Þ»ú¤Ç¤¢¤Ã¤Æ¤âÆþÎϤȤ·¤Æ»Ä¤ê¤Þ¤¹¡£
(setq abandon-illegal-phonogram nil)    ; default nil

; °ìÍ÷¤Î»þ¤Ë¿ô»ú°Ê³°¤Î¥­¡¼¤òÂǤĤȼ¡¤ÎÆþÎϤ˿ʤफ(t)
; nil ¤Î»þ¤Ï¡Ö¥Ô¥Ã¡×¤È¤¤¤¦²»¤¬¤Ê¤ê¡¢¼¡¤ÎÆþÎϤˤϿʤߤޤ»¤ó¡£
(setq allow-next-input 		 t)     ; default t

; Âçʸ»ú¤ÇÆþÎϤ·¤Æ¤â¥í¡¼¥Þ»ú¤«¤ÊÊÑ´¹¤Ç¤Ï¾®Ê¸»ú¤È¤·¤Æ°·¤¦¤«(t)
; nil ¤Î»þ¤ÏÂçʸ»ú¤È¾®Ê¸»ú¤ò¶èÊ̤·¤Þ¤¹¡£ default.cbp »ÈÍÑ»þ¤Ï
; Âçʸ»ú¤ÇÆþÎϤ¹¤ë¤È¥¢¥ë¥Õ¥¡¥Ù¥Ã¥È¤Î¤Þ¤ÞÆþÎϤµ¤ì¤Þ¤¹¡£
(setq ignore-case 		nil)    ; default nil

; µ­¹æÆþÎϥ⡼¥É¤Çµ­¹æ¤òÆþÎϤ·¤¿¤È¤­µ­¹æÆþÎϥ⡼¥É¤ò½ªÎ»¤¹¤ë¤«(t)
; nil ¤Î¤È¤­¤Ïµ­¹æ¤òϢ³¤·¤ÆÆþÎϤǤ­¤Þ¤¹¡£
(setq quickly-escape-from-kigo-input nil) ; default nil

; ¥í¡¼¥Þ»ú¤«¤ÊÊÑ´¹¤òÍ¥À褹¤ë¤«(t)
; nil ¤Î»þ¤Ï¥­¡¼¤Ë³ä¤êÅö¤Æ¤é¤ì¤¿µ¡Ç½¤¬Í¥À褵¤ì¤Þ¤¹¡£
;   Î㤨¤Ð¡¢"x" + " "(¥¹¥Ú¡¼¥¹) ¤ËÂФ·¤Æ¡¢¥í¡¼¥Þ»ú¤«¤ÊÊÑ´¹¥Æ¡¼¥Ö¥ë¤Ç
;   "¡¡"(Á´³Ñ¤Î¥¹¥Ú¡¼¥¹)¤ò³ä¤êÅö¤Æ¤Æ¤¤¤ë¾ì¹ç¡¢romaji-yuusen ¤¬ t ¤Î»þ¤Ï
;   Á´³Ñ¤Î¥¹¥Ú¡¼¥¹¤¬É½¼¨¤µ¤ì¤Þ¤¹¤¬¡¢romaji-yuusen ¤¬ nil ¤Î»þ¤Ï¡¢¥¹¤Ú¡¼
;   ¥¹¤¬¡ØÊÑ´¹¡Ù¤Î°ÕÌ£¤È¤·¤ÆÍѤ¤¤é¤ì¤Þ¤¹¡£
(setq romaji-yuusen nil)                ; default nil

; ñ¸ìÅÐÏ¿/ºï½ü¤Îľ¸å¤Ë¼­½ñ¤Î½ñ¤­½Ð¤·½èÍý¤ò¹Ô¤¦¤«(t)
; nil ¤Î»þ¤Ï½ñ¤­½Ð¤·½èÍý¤ò¹Ô¤¤¤Þ¤»¤ó¡£
(setq auto-sync t)                      ; dafault t


; °ìʸ»ú¥ì¥Ù¥ë¤Î¥í¡¼¥Þ»ú¤«¤ÊÊÑ´¹¤ÎÊä½õ¥Æ¡¼¥Ö¥ë
(defsymbol ?- "¡¼" "-" "¡¾" "¡Ý" )
(defsymbol ?/  "/"  "¡¿"  "¡¦" )
(defsymbol ?\\ "\\" "¡À"  "¡ï" )

(defsymbol
  ?( "(" "¡Ê" "¡Ú"
  ?) ")" "¡Ë" "¡Û" )

(defsymbol 
  ?[ "¡Ö" "¡Ø" "[" "¡Î" "¡Ì"
  ?] "¡×" "¡Ù" "]" "¡Ï" "¡Í" )

(defsymbol
  ?{ "{" "¡Ð" "¡Ø"
  ?} "}" "¡Ñ" "¡Ù")

(defsymbol
  ?< "<" "¡ã" "¡Ò" "¡Ô"
  ?> ">" "¡ä" "¡Ó" "¡Õ" )

(defsymbol 
  ?. "¡£" "." "¡¥"
  ?, "¡¢" "," "¡¤" )

(defsymbol
  ?? "¡©" "?"
  ?! "¡ª" "!" )

(defsymbol 
  ?'  "¡Ç" "'"
  ?`  "¡Æ" "`" )

(defsymbol
  ?\"	 "¡É"
	 "\""
	 "¡È")

(defsymbol
  ?; "¡¨" ";"
  ?: "¡§" ":" )

(defsymbol ?# "¡ô" "#")
(defsymbol ?$ "¡ð" "$")
(defsymbol ?% "¡ó" "%")
(defsymbol ?& "¡õ" "&")
(defsymbol ?= "¡á" "=")
(defsymbol ?| "¡Ã" "|")
(defsymbol ?+ "¡Ü" "+")
(defsymbol ?~ "¡±" "~" "¡Á")
(defsymbol ?* "¡ö" "*" "¡ß")
(defsymbol ?_ "¡²" "_")


(defsymbol
  ?0 "£°" "0" "¡»" "Îí"
  ?1 "£±" "1" "°ì" "°í"
  ?2 "£²" "2" "Æó" "Æõ"
  ?3 "£³" "3" "»°" "»²"
  ?4 "£´" "4" "»Í" "»Í"
  ?5 "£µ" "5" "¸Þ" "¸à"
  ?6 "£¶" "6" "Ï»" "Ï»"
  ?7 "£·" "7" "¼·" "¼·"
  ?8 "£¸" "8" "Ȭ" "Ȭ"
  ?9 "£¹" "9" "¶å" "¶å" )


;; delete ¥­¡¼¤â¥Ð¥Ã¥¯¥¹¥Ú¡¼¥¹¤ÈƱ¤¸½èÍý¤ò¤µ¤»¤ë
(global-set-key "\Delete" 'delete-previous) 

;; Help ¤¬¤Ê¤¤¿Í¤â¤¤¤ë¤Î¤Ç F10 ¤Ç¤âƱ¤¸Æ°ºî¤ò¤µ¤»¤ë¡£
(global-set-key "\F10" 'extend-mode)


;; F7 ¤Ò¤é¤¬¤ÊÆþÎÏ¡¦¥«¥¿¥«¥ÊÆþÎϤòÀڤ괹¤¨¤ë¡£
(global-set-key	"\F7"	    'base-hiragana-katakana-toggle)

;; F8 Á´³Ñ¡¦È¾³ÑÆþÎϤòÀڤ괹¤¨¤ë¡£
(global-set-key	"\F8"	    'base-zenkaku-hankaku-toggle)

;; F9 ¤«¤Ê¡¦±Ñ¿ô¤òÀڤ괹¤¨¤ë¡£ 
(global-set-key	"\F9"	    'base-kana-eisu-toggle)


;; F1 ¤Ò¤é¤¬¤ÊÊÑ´¹
;; F2 ¥«¥¿¥«¥ÊÊÑ´¹
;; F3 Ⱦ³ÑÊÑ´¹
;; F4 ±Ñ¿ôÊÑ´¹

(let ((mode 'yomi-mode))
  (set-key mode "\F1"  		'hiragana)
  (set-key mode "\F2"  		'katakana)
  (set-key mode "\F3"  		'hankaku)
  (set-key mode "\F4"  		'romaji)
)

(let ((mode 'tankouho-mode))
  (set-key mode "\F1"  		'hiragana)
  (set-key mode "\F2"  		'katakana)
  (set-key mode "\F3"  		'hankaku)
  (set-key mode "\F4"  		'romaji)
)

(let ((mode 'mojishu-mode))
  (set-key mode "\F1"  		'hiragana)
  (set-key mode "\F2"  		'katakana)
  (set-key mode "\F3"  		'hankaku)
  (set-key mode "\F4"  		'romaji)
)