;; ATOK ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; (setq load-path (append '("/usr/share/emacs/site-lisp/IIIMECF") load-path)) (setq iiimcf-server-control-hostlist (list "tcp:192.168.70.150:9010")) (setq iiimcf-server-control-default-language "ja") (setq iiimcf-server-control-default-input-method "atokx2") (setq default-input-method 'iiim-server-control) (require 'iiimcf-sc) (setq default-input-method "iiim-server-control") (setq iiimcf-UI-preedit-use-face-p "window-system") ;; key-bindings (setq iiimcf-keycode-spec-alist `((13 10 0) (11 37 65535) ; C-k -> left (12 39 65535) ; C-l -> right ;(9 37 65535) ; C-i -> left (15 39 65535) ; C-o -> right (7 27 65535) ; C-g -> escape (16 38 65535) ; C-p -> up (14 32 65535) ; C-n -> space (2 37 65535 1) ; C-b -> shift+left (6 39 65535 1) ; C-f -> shift+right (20 121 65535) ; C-t -> F10 ”¼Šp‰p” (9 118 65535); C-i -> F7 ƒJƒ^ƒJƒi•ÏŠ· (32 32) ,@(mapcar #'(lambda (x) (list x x 0)) (iiimcf-numseq 1 31)) (return 10) (backspace 8) (tab 9) (cancel 3 65535) (clear 12 65535) (pause 19) (capslock 20) (escape 27) (prior 33 65535) (next 34 65535) (end 35 65535) (home 36 65535) (left 37 65535) (up 38 65535) (right 39 65535) (down 40 65535) (f1 112 65535) (f2 113 65535) (f3 114 65535) (f4 115 65535) (f5 116 65535) (f6 117 65535) (f7 118 65535) ; ƒJƒ^ƒJƒi•ÏŠ· (f8 119 65535) (f9 120 65535) (f10 121 65535) ; ”¼Šp‰p” (f11 122 65535) (f12 123 65535) (print 154) (delete 127) (numlock 144 65535) (scroll 145 65535) (insert 155 65535) (help 156 65535) (convert 28 65535) (nonconvert 29 65535) (accept 30 65535) (modechange 31 65535) (kana 21 65535) (kanji 25 65535) (zenkaku-hankaku 25 65535) (undefined 0) (char-undefined 0))) (global-set-key [muhenkan] 'insert-one-space) (global-set-key [muhenkan] '(lambda () (interactive) (insert " "))) (global-set-key [f6] '(lambda () (interactive) (insert " "))) ; write code below to teraterm/KEYBOARD.CFG ; ;[User keys] ; ; User1=123,0,$1B[17~ ; h–³•ÏŠ·hƒL[‚ðhF6h‚Æ‚µ‚Ä‘—M‚·‚é ;