Hexe19

7月 01

なんとなく窓使いの憂鬱の設定ファイルを公開してみる

現在使用中の窓使いの憂鬱の設定ファイル。

窓使いの憂鬱は Windows 上のキーバインドを主に emacs ライクなキーバインドにするためのソフト。
Windows Vista では普通には動作しないらしく（Windows の昨日の一部を制限される代わりに使用することは可能らしい）、次にPCを買い換えるときは Windows 卒業な予感・・・。

設定：

HOME HHKL2 Emacs （Happy Hacking Keyboard Lite2 で使用するとき用）
-DUSE109;-DHHKBLite2
HOME Let’s note CF-Y2 Emacs （Let’s note CF-Y2 で使用するとき用）
-DUSE109;-DLetsNoteCFY2

設定ファイル：（環境変数 HOME に指定したディレクトリ直下に以下の３つのファイルを配置）

.mayu
.emacs.mayu
.emacsedit.mayu

以下、設定ファイルの内容をそのまま引用。
emacsedit.mayu はデフォルトのままかも。
※一部うまくいっていない設定もあった気がします。

普通の設定（と思うこと）以外でやってること

無変換を Ctrl に割り当て
変換を Ctrl に割り当て
半角/全角を Alt に割り当て
カタカナを Alt に割り当て
左Alt を Windowsキーに割り当て
右Alt を Applicationキーに割り当て
;（セミコロン）を Enter キーに割り当て
Ctrl-;（Ctrl + セミコロン）を ;(セミコロン) に割り当て
C-i を Tab キーに割り当て
C-g を ESC キーに割り当て
C-d を Del キーに割り当て
C-h を Backspace キーに割り当て
emacs の elscreen ライクな C-z でタブ関係の処理をする設定
などなど・・・

.mayu

#~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
# 窓使いの憂鬱 - dot.mayu
# Copyright (C) 1999-2005, TAGA Nayuta 
#

# まずキーボード定義を読み込む
if ( USE104 )
  include "104.mayu"		# 104 キーボード設定
  if ( USE109on104 )
    include "109on104.mayu"	# 104 キーボードを 109 キーボード風に
  endif
  if ( USEDVORAK )
    include "dvorak.mayu"	# DVORAK
  endif
else
  include "109.mayu"		# 109 キーボード設定
  if ( USE104on109 )
    include "104on109.mayu"	# 109 キーボードを 104 キーボード風に
  endif
  if ( USEDVORAK )
    include "contrib\DVORAKon109.mayu"	# DVORAK
  endif
endif

include ".emacs.mayu"		# Emacs ライクなさまざまな設定

keymap Global

# このファイルをホームディレクトリにコピーしてから、
# 以下に自分の好みのキーバインディングを設定するとよい。
# このファイル自体を変更しないこと。

mod control += 無変換       # 無変換 を LControl に
key *無変換 = *LControl     #       〃
mod control += 変換         # 変換を を LControl に
key *変換   = *LControl     #       〃
mod alt       += ひらがな   # ひらがな を LAlt に
key *ひらがな = *LAlt       #      〃

if ( HHKBLite2 )
  mod alt        -= RAlt       # RAlt を 右クリックメニューの出るやつに
  key *RAlt      = *APPS       #      〃
  mod alt        += 半角/全角  # 半角/全角 を LAlt に
  key *半角/全角 = *LAlt       #      〃
 #mod alt        -= LAlt       # LAlt を 半角/全角 に
 #key *LAlt      = *半角/全角  #      〃
  mod alt        -= LAlt       # LAlt を Win に
  mod win        += LAlt       #      〃
  key *LAlt      = *LWin       #      〃
  mod win        -= LWin       # LWin を Alt に
  mod alt        += LWin       #      〃
  key *LWin      = *LAlt       #      〃
  key Escape     = &Default    # Escape を元に戻す
endif

if ( LetsNoteCFY2 )
  key *半角/全角  = *Esc       # 半角/全角を Esc に
  #key *Esc       = *半角/全角 # Esc はそのまま
  key *Escape     = *Escape    # Escape を元に戻す
endif

key *IC-SemiColon      = Enter       # セミコロン を Enter に
key *IC-C-~S-SemiColon = SemiColon   # Ctrlを押しながらだとセミコロンに;
#key *IC-Colon          = Tab         # コロン を Tab に;
#key *IC-C-~S-Colon     = Colon       # Ctrlを押しながらだとコロンに
key *IC-C-~S-I          = Tab        # Ctrlを押しながらだとTabに

.emacs.mayu

#~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
# 窓使いの憂鬱 - default.mayu
# Copyright (C) 1999-2005, TAGA Nayuta 
#

if ( !KBD109 ) and ( !KBD104 )
  include "109.mayu"
endif
if ( KBD104 )
#  def alias ↑	= Up
#  def alias ↓	= Down
#  def alias ←	= Left
#  def alias →	= Right
  def alias Yen	= BackSlash
endif

#~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
# キーシーケンス
#

keyseq $WindowClose = A-F4

#~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
# Global キーマップ
#

keymap Global
 key *IC-C-Yen		= $ToggleIME		# IME ON/OFF をするキーの指定
 key C-S-M     C-A-M	= Applications		# アプリケーションキー
 key C-S-L     C-A-L	= &WindowLower		# ウィンドウを一番下へ
 key C-S-R     C-A-R	= &WindowRaise		# ウィンドウを一番上へ
#key C-S-R     C-A-R	= &WindowToggleTopMost &Wait(200) &WindowToggleTopMost
 key C-S-Z     C-A-Z	= &WindowMaximize	# ウィンドウの最大化 (IE全画面)
 key C-S-I     C-A-I	= &WindowMinimize	# ウィンドウの最小化
 key C-S-X     C-A-X	= &WindowVMaximize	# ウィンドウの縦最大化
 key C-S-C     C-A-C	= &WindowHMaximize	# ウィンドウの横最大化
 key C-S-Left  C-A-Left	= &WindowMove(-16, 0)	# ウィンドウの移動
 key C-S-Right C-A-Right= &WindowMove(16, 0)	#	〃
 key C-S-Up    C-A-Up	= &WindowMove(0, -16)	#	〃
 key C-S-Down  C-A-Down	= &WindowMove(0, 16)	#	〃
 key C-S-A-Left		= &WindowMove(-1, 0)	#	〃
 key C-S-A-Right	= &WindowMove(1, 0)	#	〃
 key C-S-A-Up		= &WindowMove(0, -1)	#	〃
 key C-S-A-Down		= &WindowMove(0, 1)	#	〃
 key W-Left		= &MouseMove(-16, 0)	# マウスの移動
 key W-Right		= &MouseMove(16, 0)	#	〃
 key W-Up		= &MouseMove(0, -16)	#	〃
 key W-Down		= &MouseMove(0, 16)	#	〃
 key W-A-C-Left		= &MouseMove(-1, 0)	#	〃
 key W-A-C-Right	= &MouseMove(1, 0)	#	〃
 key W-A-C-Up		= &MouseMove(0, -1)	#	〃
 key W-A-C-Down		= &MouseMove(0, 1)	#	〃
 key C-A-A		= &WindowClingToLeft	# ウィンドウを左に寄せる
 key C-A-E		= &WindowClingToRight	# ウィンドウを右に寄せる
 key C-A-P		= &WindowClingToTop	# ウィンドウを上に寄せる
 key C-A-N		= &WindowClingToBottom	# ウィンドウを下に寄せる
 key C-A-V		= &WindowMoveVisibly	# ウィンドウを見える位置へ移動
 key C-S-K     C-A-K	= $WindowClose		# ウィンドウを閉じる
#key C-S-T		= &WindowToggleTopMost	# 最前面トグル
 key C-S-D		= &WindowIdentify &MayuDialog(Log, SHOW)
						# ウィンドウの素性を調べる
 key C-S-H		= &WindowSetAlpha(70)	# ウィンドウの半透明化
 key C-S-A-H		= &WindowSetAlpha(-1)	# 半透明化全て解除
 key C-S-U		= &WindowRedraw		# ウィンドウの再描画
 key C-S-S		= &LoadSetting &HelpMessage(Mayu, "再読込完了") # 設定ファイルの読み込み
 key C-S-F1		= &InvestigateCommand	# WM_COMMAND の調査
 if ( ! EmacsMove/ShiftSelection )
   key C-S-A   C-S-B	= &WindowClingToLeft	# ウィンドウを左に寄せる
   key C-S-F   C-S-E	= &WindowClingToRight	# ウィンドウを右に寄せる
   key C-S-P		= &WindowClingToTop	# ウィンドウを上に寄せる
   key C-S-N		= &WindowClingToBottom	# ウィンドウを下に寄せる
   key C-S-V		= &WindowMoveVisibly	# ウィンドウを見える位置へ移動
 endif
 key W-N		= &Sync &WindowMonitorTo(current, 1) # ディスプレイを切り替える
# WinDeskWide
 key W-_1		= &Sync C-S-A-Q  # WinDeskWide の仮想デスクトップ１に移動（WinDeskWideのホットキー要設定）
 key W-_2		= &Sync C-S-A-W  # WinDeskWide の仮想デスクトップ２に移動（WinDeskWideのホットキー要設定）
 if ( HHKBLite2 )
   key W-F1		= &Sync C-S-A-Q  # WinDeskWide の仮想デスクトップ１に移動（WinDeskWideのホットキー要設定）
   key W-F2		= &Sync C-S-A-W  # WinDeskWide の仮想デスクトップ２に移動（WinDeskWideのホットキー要設定）
 endif
 key W-Q		= &Sync C-S-A-_1 # WinDeskWide の仮想デスクトップ１に送る（WinDeskWideのホットキー要設定）
 key W-W		= &Sync C-S-A-_2 # WinDeskWide の仮想デスクトップ２に送る（WinDeskWideのホットキー要設定）
 key W-Z		= &Sync C-S-A-Z  # WinDeskWide の仮想デスクトップを循環　（WinDeskWideのホットキー要設定）

#key W-E = &ShellExecute("open", "D:\\Program Files\\xf11-3\\XF.exe","/m",, ShowNormal)

 if ( KBD109 ) and ( ! KBD104on109 )
   key *半角/全角	= *Esc			# Esc と半角/全角の入れ替え
   key *Esc		= *半角/全角		#	〃
 endif

 if ( !HHKBLite2 )
   if ( KBD109 )
     mod control += 英数				# 英数を Control に
     key *英数		= *LControl		#	〃
   else
     mod control += CapsLock			# CapsLock を Control に
     key *CapsLock	= *LControl		#	〃
   endif
 endif

 key C-Yen		= 半角/全角             # 変換
 key C-ReverseSolidus	= 半角/全角             # 変換

 if ( GANA )
   if ( KBD109 )
     mod alt += !!無変換			# 無変換を Alt に
     key *無変換	= *無変換		#	〃
     key A-無変換	= 無変換		#	〃
     key IC-A-K		= 無変換		# IME で変換中の A-K は無変換
     key *IC-変換	= $ToggleIME		# IME ON/OFF をするキーの指定
   endif
   key *ScrollLock	= $CapsLock		# ScrollLock を CapsLock に
#   key C-↑		= C-A-S-↑		# for VD
   key C-Up		= C-A-S-Up		# for VD
#   key C-↓		= C-A-S-↓		#	〃
   key C-Down		= C-A-S-Down		#	〃
#   key C-←		= C-A-S-←		#	〃
   key C-Left		= C-A-S-Left		#	〃
#   key C-→		= C-A-S-→		#	〃
   key C-Right		= C-A-S-Right		#	〃
   key C-S-Y		= &WindowResizeTo(0, -64) &WindowMoveVisibly \
			  &Wait(100) &WindowClingToBottom
 endif

keymap2 GlobalEscape : Global = &KeymapParent
 event prefixed		= &HelpMessage("Global", "ESC-")
 event before-key-down	= &HelpMessage
 key M-C-G		= &Ignore

keymap Global
 if ( MAP-ESCAPE-TO-META )
   key Escape		= &Prefix(GlobalEscape) &EditNextModifier(M-)
   if ( KBD109 ) and ( ! KBD104on109 )
     key 半角/全角	= &Prefix(GlobalEscape) &EditNextModifier(M-)
   endif
 endif

 # for AntiFreeze
 key A-C-W-Home = &Default

#~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
# 全て(ではないがだいたい)デフォルトのキーマップの定義
#

keymap	KeymapDefault = &Default
 if ( KBD109 )
   mod control += 英数				# 英数を Control に
   key *英数		= *LControl		#	〃
 else
   mod control += CapsLock			# CapsLock を Control に
   key *CapsLock	= *LControl		#	〃
 endif
 if ( GANA )
   if ( KBD109 )
     mod alt += !!無変換			# 無変換を Alt に
     key *無変換	= *無変換		#	〃
     key A-無変換	= 無変換		#	〃
     key IC-A-K		= 無変換		# IME で変換中の A-K は無変換
   endif
 endif

#~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
# コントロールの設定
#

include	".emacsedit.mayu"

#window	EditControl	/:(Edit|TEdit|RichEdit(20[AW])?)$/ : EmacsEdit
window	EditControl	/:(Edit|TEdit|RichEdit(20[AW])?|Scintilla)$/ : EmacsEdit
window	SysListView32	/:SysListView32$/ : EmacsMove
window	SysTreeView32	/:SysTreeView32$/ : EmacsMove
window	ComboBox	/:ComboBox(:Edit)?$/ : EmacsEdit
 key M-N M-P		= A-Down		# ドロップダウンメニューを開く

#~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
# Windows の一般的設定
#

 keyseq $WM_VSCROLL/SB_PAGEUP		= &PostMessage(ToItself, 277, 2, 0)
 keyseq $WM_VSCROLL/SB_PAGEDOWN		= &PostMessage(ToItself, 277, 3, 0)

keymap2	GeneralC-X : EmacsC-X
 key C-S		= C-S			# 上書き保存(S)
 key C-W		= LAlt F A		# 名前を付けて保存(A)...
 key C-F		= C-O			# 開く(O)...
 key C			= C-N			# 新規作成(N)
 key K			= C-W			# 閉じる
 key C-C		= LAlt F X		# 終了(X)
# key C-C		= A-Q			# 終了(X)
# key C-C		= $WindowClose		# 終了(X)

## ダイアログボックス .........................................................

window	DialogBox	/:#32770:/ : Global
 key C-G		= Escape

#~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
# MDI 上のウィンドウの設定
#

keymap2 MDI-WindowOperation : Global
 key C-S-L     C-A-L	= &WindowLower(MDI)		# ウィンドウを一番下へ
 key C-S-R     C-A-R	= &WindowRaise(MDI)		# ウィンドウを一番上へ
 key C-S-Z     C-A-Z	= &WindowMaximize(MDI)		# ウィンドウの最大化
 key C-S-I     C-A-I	= &WindowMinimize(MDI)		# ウィンドウの最小化
 key C-S-X     C-A-X	= &WindowVMaximize(MDI)		# ウィンドウの縦最大化
 key C-S-C     C-A-C	= &WindowHMaximize(MDI)		# ウィンドウの横最大化
 key C-S-Left  C-A-Left	= &WindowMove(-16, 0, MDI)	# ウィンドウの移動
 key C-S-Right C-A-Right= &WindowMove(16, 0, MDI)	#	〃
 key C-S-Up    C-A-Up	= &WindowMove(0, -16, MDI)	#	〃
 key C-S-Down  C-A-Down	= &WindowMove(0, 16, MDI)	#	〃
 key C-S-A-Left		= &WindowMove(-1, 0, MDI)	#	〃
 key C-S-A-Right	= &WindowMove(1, 0, MDI)	#	〃
 key C-S-A-Up		= &WindowMove(0, -1, MDI)	#	〃
 key C-S-A-Down		= &WindowMove(0, 1, MDI)	#	〃
 key C-S-A C-S-B C-A-A	= &WindowClingToLeft(MDI)	# ウィンドウ左に寄せる
 key C-S-E C-S-F C-A-E	= &WindowClingToRight(MDI)	# ウィンドウ右に寄せる
 key C-S-P     C-A-P	= &WindowClingToTop(MDI)	# ウィンドウ上に寄せる
 key C-S-N     C-A-N	= &WindowClingToBottom(MDI)	# ウィンドウ下に寄せる
 key C-S-V     C-A-V	= &WindowMoveVisibly(MDI)	# ウィンドウ見える位置
 key C-S-K     C-A-K	= C-F4				# ウィンドウを閉じる

window	MDI	/:MDIClient:/ : Global
 key C-S-Q	C-A-Q	= &Prefix(MDI-WindowOperation)

#~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
# 各アプリケーションの設定
#

## 窓使いの憂鬱 ...............................................................
## http://mayu.sourceforge.net

# 仮想キー調査ウィンドウでは全てデフォルト
window	MayuInvestigate /mayu\.exe:#32770:mayuFocus$/ : KeymapDefault

# ログウィンドウ Esc で閉じられるように
window	MayuLog ( /mayu\.exe:#32770:Button/ \
		&& /ログ - 窓使いの憂鬱/ ) : Global
 key C-G		= $WindowClose
 key Esc		= $WindowClose

## Console ....................................................................

 keyseq $ConsoleWindowClass/copy	= &PostMessage(ToItself, 274, 65520, 0)
 keyseq $ConsoleWindowClass/paste	= &PostMessage(ToItself, 274, 65521, 0)
 keyseq $ConsoleWindowClass/region	= &PostMessage(ToItself, 274, 65522, 0)
 keyseq $ConsoleWindowClass/scroll	= &PostMessage(ToItself, 274, 65523, 0)
 keyseq $ConsoleWindowClass/search	= &PostMessage(ToItself, 274, 65524, 0)
 keyseq $ConsoleWindowClass/select-all	= &PostMessage(ToItself, 274, 65525, 0)

#window  ConsoleWindowClass /^ConsoleWindowClass$/ : Global
window  ConsoleWindowClass /^ConsoleWindowClass$/ : EmacsEdit
 key C-S-K     C-A-K	= A-Space C		# ウィンドウを閉じる
 key S-Insert		= $ConsoleWindowClass/paste
 key S-Prior		= $WM_VSCROLL/SB_PAGEUP
 key S-Next		= $WM_VSCROLL/SB_PAGEDOWN
 key S-~NL-Num9		= $WM_VSCROLL/SB_PAGEUP
 key S-~NL-Num3		= $WM_VSCROLL/SB_PAGEDOWN

## Explorer, Internet Explorer ................................................

 keyseq $Explorer/show-folder-bar = &PostMessage(ToMainWindow, 273, 41525, 0)

window	ExplorerList /EXPLORER.*:SHELLDLL_DefView:.*SysListView32$/ : SysListView32
 key S-R		= F2			# 名前の変更
 key C-S-Z		= &Sync&WindowMaximize	# ウィンドウの最大化
 key C-A-Z		= C-&WindowMaximize	# ウィンドウの全画面化
 key M-E		= $Explorer/show-folder-bar # フォルダを表示

window	ExplorerTree /EXPLORER.*:BaseBar:.*SysTreeView32$/ : SysTreeView32
 key S-R		= F2			# 名前の変更
 key C-S-Z		= &Sync&WindowMaximize	# ウィンドウの最大化
 key C-A-Z		= C-&WindowMaximize	# ウィンドウの全画面化
 key M-E		= $Explorer/show-folder-bar # フォルダを表示

window	ExplorerRightClickMenu /Explorer.*:MENU$/ : EmacsMove

window	InternetExplorer /:Internet Explorer_Server$/ : EmacsEdit
 key C-S-Z		= &Sync&WindowMaximize	# ウィンドウの最大化
 key C-A-Z		= C-&WindowMaximize	# ウィンドウの全画面化

window	MicrosoftJava	/:Microsoft VM For Java\(TM\) Host Window Class:/ \
	: EmacsEdit

## Emacs ......................................................................
## http://www.gnu.org/software/emacs/windows/ntemacs.html

keymap Emacsen : Global
 key C-Yen		= &Default
 if ( MAP-ESCAPE-TO-META )			# ESC が M- になるのを阻止する
   if ( KBD109 ) and ( ! KBD104on109 )
     key *半角/全角	= *Esc
     key *Esc		= *半角/全角
   else
     key Escape		= &Default
   endif
 endif

window	Meadow	/:Meadow$/ : Emacsen
 key IC-M-X		= $ToggleIME M-X
window	MULE	/:MULE$/ : Emacsen
window	Emacs	/:Emacs$/ : Emacsen

## Notepad ....................................................................

 keyseq $Notepad/new		= &PostMessage(ToParentWindow, 273, 9, 0)
 keyseq $Notepad/open		= &PostMessage(ToParentWindow, 273, 10, 0)
 keyseq $Notepad/save-as	= &PostMessage(ToParentWindow, 273, 1, 0)

keymap2	NotepadC-X : GeneralC-X
 event prefixed		= &HelpMessage("メモ帳 C-x-", \
	"C-x C-s\t上書き保存\r\n"	\
	"C-x C-f\t開く\t\r\n"		\
	"C-x k\t\t新規作成\r\n"		\
	"C-x C-c\t終了")
 event before-key-down	= &HelpMessage
 key C-S		= C-S	#$Notepad/save-as	# 上書き保存(S)
 key C-F		= C-O	#$Notepad/open		# 開く(O)...
 key C			= C-N	#$Notepad/new		# 新規作成(N)
 key K			= $WindowClose	#C-W		# 閉じる
 key C-C		= $WindowClose	# メモ帳の終了(X)

window	Notepad /:Notepad:Edit$/ : EmacsEdit
 if ( !ZXCV ) key C-X	= &Prefix(NotepadC-X)
 key C-S		= F3			# 検索(F)...
 key M-J		= C-G			# 行へ移動

## ASTEC-X ....................................................................
## http://www.astec.co.jp/

 keyseq $ASTEC-X/copy-to-x	= &PostMessage(ToItself, 274, 16, 0)

window	ASTEC-X /:ASTEC-X$/ : Global
 key C-Yen		= &Default
 key *IC-IL-C-Yen	= $ToggleIME		# IMEがオンならばIMEをオフ

## Becky! Internet Mail .......................................................
## http://www.rimarts.co.jp/index-j.html

window BeckyInternetMail /Rebecca\.exe:BeckyComposeFrameClass:/ : EmacsEdit
 if ( !ZXCV ) key C-X	= &Prefix(GeneralC-X)

window BeckyInternetMail2 /B2\.exe:Becky2ComposeFrame:/ : EmacsEdit
 if ( !ZXCV ) key C-X	= &Prefix(GeneralC-X)

## Microsoft Power Point ......................................................

keymap2	PowerPointC-X : GeneralC-X
 key C-C		= $WindowClose		# 終了(X)

window	PowerPoint /POWERPNT\.EXE:.*:(paneClassDC|REComboBox20W|RichEdit20W)$/\
			: EmacsEdit
 if ( !ZXCV ) key C-X	= &Prefix(PowerPointC-X)

window	PowerPoint2 /POWERPNT\.EXE:PP9FrameClass.*/ : EmacsEdit
 if ( !ZXCV ) key C-X	= &Prefix(PowerPointC-X)

## Microsoft Visual Basic 6.0 .................................................

window	VisualBasic /vb6\.exe:.*:VbaWindow$/ : EmacsEdit
 if ( !ZXCV ) key C-X	= &Prefix(GeneralC-X)

## Microsoft Word .............................................................

window	Word /WINWORD\.EXE:.*:_WwG$/ : EmacsEdit
 if ( !ZXCV ) key C-X	= &Prefix(GeneralC-X)

## Microsoft Excel ............................................................

keymap2	ExcelC-X : GeneralC-X
 key C-C		= $WindowClose		# 終了(X)
 key C-S		= C-S                   # 保存(S)
 key C-W		= A-F A                 # 名前を付けて保存(A)

keymap2	ExcelC-C : Global
 key C-C		= F9                    # 再計算

window	Excel /EXCEL\.EXE:XLMAIN:/ : EmacsEdit
 if ( !ZXCV ) key C-X	= &Prefix(ExcelC-X)
 if ( !ZXCV ) key C-C	= &Prefix(ExcelC-C)
 key C-S-Up             = &Default
 key C-S-Down           = &Default
 key C-S-Left           = &Default
 key C-S-Right          = &Default
 key C-S-S              = C-F
 key M-S-*_5            = C-H

## Microsoft Excel VBA ........................................................

keymap2	ExcelVBAC-X : GeneralC-X
 key C-C		= $WindowClose		# 終了(X)
 key C-S		= C-S                   # 保存(S)
 key C-W		= A-F A                 # 名前を付けて保存(A)

keymap2	ExcelVBAC-C : Global
 key C-C		= A-D L			# コンパイル

window  ExcelVBA /EXCEL\.EXE:wndclass/ : EmacsEdit
 if ( !ZXCV ) key C-X	= &Prefix(ExcelVBAC-X)
 if ( !ZXCV ) key C-C	= &Prefix(ExcelVBAC-C)
 key C-S-S              = C-F
 key M-S-*_5            = C-H
 #key M-J		= C-G			# 行へ移動
 key M-Slash		= C-Space		# Parameter Info

## Microsoft Pinball ..........................................................

window MSPinball /PINBALL\.EXE:1c7c22a0-9576-11ce-bf80-444553540000$/ : Global
 key A-Enter		= F4

## Netscape Navigator .........................................................
## http://www.netscape.com/

window	NetscapeNavigator /Netscape\.exe:/ : Global
 key C-H		= BackSpace		# BackSpace
 key C-S		= C-F			# 検索

## Mozilla ....................................................................
## http://www.mozilla.org/

window	Mozilla /:MozillaWindowClass$/ : EmacsEdit

## Personal Dictionary ........................................................
## http://member.nifty.ne.jp/TaN/

window	PersonalDictionary /PDICW32\.EXE:PDICW:ComboBox:Edit/ : EmacsEdit
 key C-K		= S-End S-Delete	# 行末まで削除
 key C-Y		= S-Insert		# PASTE

## Real Player ................................................................
## http://www.real.com/

window RealPlayer /realplay.exe:PNGUIClass/ : Global
 key A-Enter		= LAlt V Z F
 key C-R		= C-P

## TeraTerm ...................................................................
## http://hp.vector.co.jp/authors/VA002416/

window	TeraTerm /TTermPRO\.exe:VTWin32$/ : Global
 key C-Slash		= C-S-HyphenMinus	# C-_ を入力
 key S-Prior		= C-Prior		# スクロール
 key S-Next		= C-Next		# スクロール
 key IC-M-X    IL-M-X	= $ToggleIME M-X	# for emacs
 if ( KBD109 )
   key C-S-ReverseSolidus = C-S-HyphenMinus	# C-_ を入力
 endif

## Xyzzy ......................................................................
## http://www.jsdlab.co.jp/~kamei/

window Xyzzy /xyzzy\.exe:/ : Global
 key C-S-K     C-A-K	= C-X C-C		# ウィンドウを閉じる

## Windows Media Player .......................................................

window WindowsMediaPlayer /mplayer2.*:(Media Player 2|VideoRenderer)/ : Global
 key C-A		= Space		# Play
 key C-R		= Space		# Play
 key C-P		= Space		# Pause
 key C-S		= Period	# Stop

## Windows Mine Sweeper .......................................................

window WindowsMineSweeper /winmine.exe:マインスイーパ$/ : Global
 key D-Z		= &VK(RButton)
 key U-Z		= &Ignore
 key D-X		= &VK(MButton)
 key U-X		= &Ignore
 key D-C		= &VK(LButton)
 key U-C		= &Ignore
 key Q			= F2
 key Num1		= &MouseMove(-16,  16)
 key Num2		= &MouseMove(  0,  16)
 key Num3		= &MouseMove( 16,  16)
 key Num4		= &MouseMove(-16,   0)
 key Num6		= &MouseMove( 16,   0)
 key Num7		= &MouseMove(-16, -16)
 key Num8		= &MouseMove(  0, -16)
 key Num9		= &MouseMove( 16, -16)

## Acrobat Reader .............................................................
## http://www.adobe.co.jp/support/custsupport/library/acrwin.html

window AcrobatReader /AcroRd32.exe:.*:MDIClient:/ : EmacsMove
 key Space		= PageDown
 key BS			= PageUp

## Edmax ......................................................................
## http://www.bekkoame.ne.jp/~t.mzaki/

window EdMax-edit /edmax\.exe:.*Afx:400000:b:0:1900010:0$/ : EmacsEdit

## VisualBasic ................................................................

window VBTextBox /:ThunderRT6FormDC:(ThunderRT6TextBox|RichTextWndClass)$/ \
	: EmacsEdit

## StarOffice/StarSuite/OpenOffice ............................................

window StarOffice /soffice\.exe:SALFRAME$/ : EmacsEdit

## Opera ......................................................................

window	Opera /Opera\.exe:/ : EmacsEdit

## MetaEditor .................................................................

keymap2	MetaEditorC-X : GeneralC-X
 #event prefixed		= &HelpMessage("MetaEditor C-x-", \
 #	"C-x C-s\t上書き保存\r\n"	\
 #	"C-x C-f\t開く\t\r\n"		\
 #	"C-x k\t\t新規作成\r\n"		\
 #	"C-x C-c\t終了")
 #event before-key-down	= &HelpMessage
 key C-S		= C-S			# 上書き保存(S)
 key C-W		= A-F A			# Save As
 key C-F		= C-O			# 開く(O)...
 key C			= C-N			# 新規作成(N)
 key K			= C-W			# 閉じる
 key C-C		= $WindowClose		# MetaEditorの終了(X)
 key H			= C-A			# 全て選択
 key T			= C-T			# Toolbox
 key N			= C-D			# Navigator

keymap2	MetaEditorC-C : Global
 key C-C		= F5			# コンパイル

window	MetaEditor /:MetaQuotes::MetaEditor/ : EmacsEdit
 key C-X		= &Prefix(MetaEditorC-X)
 key C-C		= &Prefix(MetaEditorC-C)
 key C-S		= C-F			# 検索(F)...
 key M-S-*_5		= C-H			# 置換
 key M-J		= C-G			# 行へ移動
 key M-Slash		= C-S-Space		# Parameter Info

## Firefox ....................................................................

keymap2	FirefoxC-X-5
 key B			= C-N			# 新しいWindowを開く

keymap2	FirefoxC-X : GeneralC-X
 key C-S		= C-S			# 上書き保存(S)
 key C-F		= C-O			# 開く(O)...
 key C			= C-T			# タブを開く
 key K			= C-W			# タブを閉じる
 key C-C		= $WindowClose		# 終了(X)
#key G			= C-K			# Web 検索バーを選択
 key G			= C-L			# ロケーションバーを選択
 key C-V		= F5			# 再読込
 key D			= C-J			# ダウンロード
 key _5			= &Prefix(FirefoxC-X-5)

keymap2	FirefoxC-Z
 key C			= C-T			# 新しいタブを開く
 key K			= C-W			# タブを閉じる
 key N			= C-PageDown		# 右のタブへ
 key P			= C-PageUp		# 左のタブへ
 key _0			= C-_1
 key _1			= C-_2
 key _2			= C-_3
 key _3			= C-_4
 key _4			= C-_5
 key _5			= C-_6
 key _6			= C-_7
 key _7			= C-_8

keymap2 FirefoxM-X
 key G			= C-L			# ロケーションバーを選択

window	Firefox /:MozillaUIWindowClass:/ : EmacsEdit
 key C-X		= &Prefix(FirefoxC-X)
 key C-Z		= &Prefix(FirefoxC-Z)
#key M-X		= &Prefix(FirefoxM-X)
 key M-X		= F9						# iswitchb-tabs
 key C-S		= &Toggle(Lock0, on) C-F			# 検索(F)...
 key C-R		= &Toggle(Lock0, on) C-F			# 検索(F)...
#key L0-Space		= M-N		     				# 次を検索
 key L0-C-S		= M-N		     				# 次を検索
 key L0-C-R		= M-P		     				# 前を検索
 key L0-C-G		= &Toggle(Lock0, off) &KeymapParent
 key L0-Enter		= &Toggle(Lock0, off) &KeymapParent
 key M-N		= C-Down					# 次の検索エンジンを選択
 key M-P		= C-Up						# 前の検索エンジンを選択

## eclipse ....................................................................

keymap2	EclipseC-X : GeneralC-X
 key C-S		= C-S			# 上書き保存(S)
 key C-F		= C-O			# 開く(O)...
 key K			= C-W			# タブを閉じる
 key C-C		= $WindowClose		# 終了(X)

 key H			= C-A			# 全て選択

keymap2	EclipseC-C
 key C-C		= C-M-X			# 実行
 key C-D		= C-M-D			# デバッグ

keymap2	EclipseC-Z
 key K			= C-W			# タブを閉じる

window	Eclipse /eclipse\.exe:SWT_Window0:/ : EmacsEdit
 key C-X		= &Prefix(EclipseC-X)
 key C-Z		= &Prefix(EclipseC-Z)
 key C-S		= C-J			# Incremental Find Next
 key C-R		= C-S-J			# Incremental Find Previous
 key C-S-F		= C-F6			# 次のViewへ
 key C-S-B		= C-S-F6		# 前のViewへ
 key C-S-N		= C-F7			# 右のエディタへ
 key C-S-P		= C-S-F7		# 左のエディタへ

## Skype ......................................................................

keymap2	SkypeC-X : GeneralC-X
 key K			= C-W			# タブを閉じる
 key C-C		= $WindowClose		# 終了(X)
 key H			= C-A			# 全て選択

window	Skype /\\Skype\.exe:/ : EmacsEdit
 key C-X		= &Prefix(SkypeC-X)

## Paint ......................................................................

keymap2	PaintC-X : GeneralC-X
 key C-S		= C-S			# 上書き保存(S)
 key C-F		= C-O			# 開く(O)...
 key K			= C-W			# タブを閉じる
 key C-C		= $WindowClose		# 終了(X)
 key H			= C-A			# 全て選択
#key U			= C-Z			# Undo

window	Paint /mspaint\.exe:MSPaintApp:/ : EmacsEdit
 key C-X      		= &Prefix(SkypeC-X)
 key M-W		= C-C			# コピー
 key C-W		= C-X			# 切り取り
 key C-Y		= C-V			# 貼り付け

## ePSXe ......................................................................

window	ePSXe /ePSXe.exe:EPSXj/
 key j      		= Down
 key k			= Up
 key h			= Left
 key l			= Right
 key F1			= F1
 key F3			= F3

## Launchy ....................................................................

#window Launchy /Launchy.exe:QWidget/ : EmacsEdit
window Launchy /Launchy.exe:Q/ : EmacsEdit

## Poderosa ...................................................................
# オプション設定を変更
# 操作
#    左Altキーの用途 [メニューとショートカット] → [Metaキー]
#    右Altキーの用途 [メニューとショートカット] → [Metaキー]
#    BackSpaceキーで0x7Fを送信 [未チェック] → [チェック]
# コマンド
#    接続 Telnet/SSH接続 [Alt+N] → [Ctrl+Shift+T]
#    ウィンドウ 閉じる   [Alt-W] → [Ctrl+Shift+W]
#    タブのリネーム      []      → [Ctrl+Shift+R]

keymap2	PoderosaC-Z
 #event prefixed		= &HelpMessage("Poderosa C-Z", \
 #	"C-z c\t新規Telnet/SSH接続\r\n"	\
 #	"")
 #event before-key-down	= &HelpMessage
 key C			= C-S-T			# 新規Telnet/SSH接続
 key K			= C-S-W			# タブを閉じる
 key R			= C-S-R			# タブをリネーム

window	Poderosa /Poderosa\.exe:/ : Global
 key C-Z		= &Prefix(PoderosaC-Z)
 key C-H		= BackSpace

## CravingExplorer ............................................................

keymap2	CravingExplorerC-X : GeneralC-X
 key C-S		= C-S			# 上書き保存(S)
 key C-F		= C-O			# 開く(O)...
 key C-C		= $WindowClose		# 終了(X)
 key G			= C-L			# ロケーションバーを選択
 key C-V		= F5			# 再読込
 key D			= C-J			# ダウンロード

window	CravingExplorer /CravingExplorer.exe:/ : EmacsEdit
 key C-X		= &Prefix(CravingExplorerC-X)
 key C-J		= &Default		# コメントの改行

## WinMerge ...................................................................

keymap2	WinMergeC-X : GeneralC-X
 key C-S		= C-S			# 上書き保存(S)
 key C-F		= C-O			# 開く(O)...
 key C-C		= $WindowClose		# 終了(X)
 key C-V		= F5			# 再読込

window	WinMerge /WinMergeU.exe:/ : EmacsEdit
 key C-X		= &Prefix(WinMergeC-X)
 key M-P                = M-Up
 key M-N                = M-Down
 key M-F                = M-Right
 key M-B                = M-Left

## Meadow .....................................................................

window	Meadow /Meadow.exe:MEADOW/
 key IC-C-P             = Up
 key IC-C-N             = Down
 key IC-C-F             = Right
 key IC-C-B             = Left
 key IC-C-A             = Home
 key IC-C-E             = End   # Dictionary
 key IC-C-G             = Esc

## FFFTP ......................................................................

window	FFFTP /FFTP.exe:FFFTPWin:/ : EmacsEdit
 key M-P                = C-U     # Upload
 key M-N                = C-D     # Download
 key C-M-P              = C-S-U   # Mirroring Upload
 key C-M-N              = C-S-D   # Mirroring Download

## TaskClip....................................................................

window	TaskClip-tsclpstg /tsclpstg.exe:/ : EmacsEdit
window	TaskClip-tsclp    /tsclp.exe:/    : EmacsEdit

## Adobe Reader ...............................................................

window	AdobeReader /AcroRd32\.exe:/ : EmacsEdit
 key P              = Up
 key N              = Down
 key B              = Up
 key F              = Down
 key Q              = $WindowClose

## TortoiseSVN ................................................................

window	TortoiseSVN /TortoiseProc.exe:/ : EmacsEdit

## CraftDrop ..................................................................

window	CraftDrop /cdrop\.exe:/ : EmacsEdit

## Launchy ....................................................................

# AutoHotkey でする
#
# keymap control- : Global
# mod ctrl -= LCtrl
# key D-LCtrl  = W-Space  # Win-Space で Launchy が起動するようにしておく
#
# keymap Global
# #mod ctrl -= LCtrl
# #mod ctrl += !!LCtrl
# mod !!ctrl
# key C-LCtrl  = &Prefix(control-,false)

## Inkscape ...................................................................

window Inkscape /inkscape.exe:gdkWindowToplevel/ : Global

window Inkscape-Layer (/inkscape.exe:gdkWindowToplevel/ && /\(Shift\+Ctrl\+L\)/) : EmacsEdit

window Inkscape-XMLEditor (/inkscape.exe:gdkWindowToplevel/ && /\(Shift\+Ctrl\+X\)/) : EmacsEdit

## MFA ........................................................................

window MFA /MFA.exe:MCIWndClass/ : EmacsEdit

## しゃべるんです .............................................................

window Shaberundesu /Shaberundesu.exe:WindowsForms10/ : EmacsEdit

## 電子かたりべプレーヤー .....................................................

window E-kataribe /E-kataribe\\Player.*SunAwtFrame/ : EmacsEdit

.emacsedit.mayu

#~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
# 窓使いの憂鬱 - emacsedit.mayu
# Copyright (C) 1999-2005, TAGA Nayuta 
#

#~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
# Emacs 風移動コマンド
#

keymap	EmacsMove : Global
 key *IC-Home		= C-Home		# 文頭
 key *IC-End		= C-End			# 文末
 key *IC-C-Space	= &Undefined		# Mark
 key *IC-C-A		= Home			# 行頭
 key *IC-C-B		= Left			# ←
 key *IC-M-B		= C-Left		# ←(単語)
 key *IC-C-E		= End			# 行末
 key *IC-C-F		= Right			# →
 key *IC-M-F		= C-Right		# →(単語)
 key *IC-C-G		= Escape		# CANCEL
 key *IC-C-L		= &WindowRedraw &Recenter # 再描画
 key *IC-C-N		= Down			# ↓
 key *IC-C-P		= Up			# ↑
 key *IC-C-Q		= &Prefix(KeymapDefault) # mayu に左右されないキー入力
 key *IC-C-S		= C-F			# 検索
 if ( !ZXCV ) key C-V	= Next			# 次頁
 key *IC-M-V		= Prior			# 前頁
 key *IC-S-Home		= S-C-Home		# 文頭(選択)
 key *IC-S-End		= S-C-End		# 文末(選択)
 key *IC-S-M-Comma	= C-Home		# 文頭
 key *IC-S-M-Period	= C-End			# 文末

 if ( EmacsMove/ShiftSelection )
   key S-C-A		= S-Home		# 行頭(選択)
   key S-C-B		= S-Left		# ←(選択)
   key S-C-E		= S-End			# 行末(選択)
   key S-C-F		= S-Right		# →(選択)
   key S-C-N		= S-Down		# ↓(選択)
   key S-C-P		= S-Up			# ↑(選択)
   key S-C-V		= S-Next		# 次頁(選択)
   key S-M-V		= S-Prior		# 前頁(選択)
 endif

#~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
# Emacs 風編集コマンド
#

 keyseq	$EmacsEdit/kill-word		= S-C-Right C-X
 keyseq	$EmacsEdit/backward-kill-word	= S-C-Left C-X
 keyseq	$EmacsEdit/transpose-chars	= S-Right C-X Left C-V Right
 keyseq	$EmacsEdit/upcase-word		= S-C-Right C-C *&Sync \
					  &ClipboardUpcaseWord C-V
 keyseq	$EmacsEdit/downcase-word	= S-C-Right C-C *&Sync \
					  &ClipboardDowncaseWord C-V
 keyseq	$EmacsEdit/kill-line		= &EmacsEditKillLineFunc S-End C-X \
			&Sync &EmacsEditKillLinePred((Delete), (Return Left))
 keyseq	$EmacsMark/cancel		= Left Right

keymap	EmacsEdit : EmacsMove
keymap2	EmacsMark : EmacsEdit = $EmacsMark/cancel &KeymapWindow
keymap2 EmacsMarkEscape : EmacsMark = &KeymapParent

keymap2	EmacsC-X : EmacsEdit
 event prefixed		= &HelpMessage("EmacsEdit C-x-", "C-x u\tundo")
 event before-key-down	= &HelpMessage
 key *U			= C-Z					# UNDO

keymap2 EmacsC-U0_9C-U : Global \
		= &Repeat((&KeymapWindow), 100) &HelpMessage &Variable(0, 0)
 key C-G	= &HelpMessage &Variable(0, 0) &Ignore

keymap2 EmacsC-U0_9 : EmacsC-U0_9C-U
 event prefixed		= &HelpVariable("繰り返し")
 key _0 Num0		= &Variable(10, 0) &Prefix(EmacsC-U0_9)
 key _1 Num1		= &Variable(10, 1) &Prefix(EmacsC-U0_9)
 key _2 Num2		= &Variable(10, 2) &Prefix(EmacsC-U0_9)
 key _3 Num3		= &Variable(10, 3) &Prefix(EmacsC-U0_9)
 key _4 Num4		= &Variable(10, 4) &Prefix(EmacsC-U0_9)
 key _5 Num5		= &Variable(10, 5) &Prefix(EmacsC-U0_9)
 key _6 Num6		= &Variable(10, 6) &Prefix(EmacsC-U0_9)
 key _7 Num7		= &Variable(10, 7) &Prefix(EmacsC-U0_9)
 key _8 Num8		= &Variable(10, 8) &Prefix(EmacsC-U0_9)
 key _9 Num9		= &Variable(10, 9) &Prefix(EmacsC-U0_9)
 key C-U		= &Prefix(EmacsC-U0_9C-U)

keymap2 EmacsC-U : EmacsC-U0_9C-U
 event prefixed		= &HelpVariable("繰り返し")
 key _0 Num0		= &Variable(0, 0) &Prefix(EmacsC-U0_9)
 key _1 Num1		= &Variable(0, 1) &Prefix(EmacsC-U0_9)
 key _2 Num2		= &Variable(0, 2) &Prefix(EmacsC-U0_9)
 key _3 Num3		= &Variable(0, 3) &Prefix(EmacsC-U0_9)
 key _4 Num4		= &Variable(0, 4) &Prefix(EmacsC-U0_9)
 key _5 Num5		= &Variable(0, 5) &Prefix(EmacsC-U0_9)
 key _6 Num6		= &Variable(0, 6) &Prefix(EmacsC-U0_9)
 key _7 Num7		= &Variable(0, 7) &Prefix(EmacsC-U0_9)
 key _8 Num8		= &Variable(0, 8) &Prefix(EmacsC-U0_9)
 key _9 Num9		= &Variable(0, 9) &Prefix(EmacsC-U0_9)
 key C-U		= &Variable(4, 0) &Prefix(EmacsC-U)

keymap	EmacsEdit
 key C-Space		= &Prefix(EmacsMark)			# Mark
 key M-BackSpace	= $EmacsEdit/backward-kill-word		# BS(単語)
 key C-D		= Delete				# 削除
 key M-D		= $EmacsEdit/kill-word			# 削除(単語)
 key C-H		= BackSpace				# BS
 key C-J		= Return				# RETURN
 key C-K		= $EmacsEdit/kill-line			# 行末まで削除
 key C-M		= Return				# RETURN
 key C-O		= Return Left				# 一行増やす
 if ( !GANA ) key C-T	= $EmacsEdit/transpose-chars		# 文字入れ替え
 key C-W		= C-X					# CUT
 key M-W		= C-C					# COPY
 key C-U		= &Variable(0, 4) &Prefix(EmacsC-U)
 if ( !ZXCV ) key C-X	= &Prefix(EmacsC-X)
 key C-Y		= C-V					# PASTE
 key C-Slash		= C-Z					# UNDO
 key M-U		= $EmacsEdit/upcase-word		# 大文字
 key M-L		= $EmacsEdit/downcase-word		# 小文字

keymap2	EmacsMark
 key M-S-IL-Comma	= S-C-Home	&Prefix(EmacsMark)	# 文頭
 key M-S-IL-FullStop	= S-C-End	&Prefix(EmacsMark)	# 文末
 key Home		= S-C-Home	&Prefix(EmacsMark)	# 文頭
 key End		= S-C-End	&Prefix(EmacsMark)	# 文末
 key C-A		= S-Home	&Prefix(EmacsMark)	# 行頭
 key C-B		= S-Left	&Prefix(EmacsMark)	# ←
 key M-B		= S-C-Left	&Prefix(EmacsMark)	# ←(単語)
 key C-E		= S-End		&Prefix(EmacsMark)	# 行末
 key C-F		= S-Right	&Prefix(EmacsMark)	# →
 key M-F		= S-C-Right	&Prefix(EmacsMark)	# →(単語)
 key C-G		= $EmacsMark/cancel &Undefined		# キャンセル
 key C-N		= S-Down	&Prefix(EmacsMark)	# ↓
 key C-P		= S-Up		&Prefix(EmacsMark)	# ↑
 if ( !ZXCV ) key C-V	= S-Next	&Prefix(EmacsMark)	# 次頁
 key M-V		= S-Prior	&Prefix(EmacsMark)	# 前頁
 key C-W		= C-X Left Right			# CUT
 key M-W		= C-C Left Right			# COPY
 key S-M-Comma		= S-C-Home	&Prefix(EmacsMark)	# 文頭
 key S-M-Period		= S-C-End	&Prefix(EmacsMark)	# 文末
 key Left		= S-Left	&Prefix(EmacsMark)	# ←
 key Up			= S-Up		&Prefix(EmacsMark)	# ↑
 key Right		= S-Right	&Prefix(EmacsMark)	# →
 key Down		= S-Down	&Prefix(EmacsMark)	# ↓
 if ( MAP-ESCAPE-TO-META )
   key Escape		= &Prefix(EmacsMarkEscape) &EditNextModifier(M-)
   if ( KBD109 ) and ( ! KBD104on109 )
     key 半角/全角	= &Prefix(EmacsMarkEscape) &EditNextModifier(M-)
   endif
 endif

keymap2 EmacsMarkEscape
 event prefixed		= &HelpMessage("EmacsMark ESC-", " ")
 event before-key-down	= &HelpMessage
 key M-C-G		= &Ignore

なんとなく窓使いの憂鬱の設定ファイルを公開してみる

Trackback URL

Leave a Reply

アーカイブ

カテゴリー

最近の投稿

RSS

Hexe19

なんとなく窓使いの憂鬱の設定ファイルを公開してみる

Trackback URL

Leave a Reply

アーカイブ

カテゴリー

タグ

最近の投稿

RSS