1 // Commands.cpp: implementation of the CCommands class
\r
3 //////////////////////////////////////////////////////////////////////
\r
6 #include "Commands.h"
\r
7 #include "xkeymacsdll.h"
\r
12 AFX_EXT_DATA const Command Commands[] = {
\r
13 {_T("[unassigned]"), 0, 0, 0, NULL, {'\0'}},
\r
14 {_T("C-x"), 0, IDS_CONTROL_X_PREFIX_D, IDS_CONTROL_X_PREFIX_T, CCommands::C_x, {'\0'}},
\r
15 {_T("C-"), IDS_OTHER, IDS_CONTROL_D, IDS_CONTROL_T, CCommands::C_, {{NONE, VK_CONTROL, 0},
\r
16 {NONE, VK_LCONTROL, 0},
\r
17 {NONE, VK_RCONTROL, 0},
\r
19 {_T("C- for Eisu"), 0, IDS_CONTROL_PREFIX_D, IDS_CONTROL_PREFIX_T, CCommands::C_Eisu, {'\0'}},
\r
20 {_T("Caps Lock"), IDS_OTHER, IDS_CAPS_LOCK_D, IDS_CAPS_LOCK_T, CCommands::CapsLock, {'\0'}},
\r
21 {_T("Close Input Method"), IDS_IME, IDS_CLOSE_INPUT_METHOD_D, IDS_CLOSE_INPUT_METHOD_T, CCommands::CloseInputMethod, {'\0'}},
\r
22 {_T("Complete & Close Input Method"), IDS_IME, IDS_COMPLETE_CLOSE_INPUT_METHOD_D, IDS_COMPLETE_CLOSE_INPUT_METHOD_T, CCommands::CompleteCloseInputMethod,{'\0'}},
\r
23 {_T("Complete & Toggle Input Method"), IDS_IME, IDS_COMPLETE_TOGGLE_INPUT_METHOD_D, IDS_COMPLETE_TOGGLE_INPUT_METHOD_T, CCommands::CompleteToggleInputMethod, {'\0'}},
\r
24 {_T("Copy"), IDS_OTHER, IDS_COPY_D, IDS_COPY_T, CCommands::Copy, {'\0'}},
\r
25 {_T("Cut"), IDS_OTHER, IDS_CUT_D, IDS_CUT_T, CCommands::Cut, {'\0'}},
\r
26 {_T("Cycle items"), IDS_OTHER, IDS_CYCLE_ITEMS_D, IDS_CYCLE_ITEMS_T, CCommands::CycleItems, {'\0'}},
\r
27 {_T("Cycle items inversely"), IDS_OTHER, IDS_CYCLE_ITEMS_INVERSELY_D, IDS_CYCLE_ITEMS_INVERSELY_T, CCommands::CycleItemsInversely, {'\0'}},
\r
28 {_T("Disable XKeymacs"), IDS_OTHER, IDS_DISABLE_XKEYMACS_D, IDS_DISABLE_XKEYMACS_T, CCommands::DisableXKeymacs, {'\0'}},
\r
29 {_T("Enable or Disable XKeymacs"), IDS_OTHER, IDS_ENABLE_OR_DISABLE_XKEYMACS_D, IDS_ENABLE_OR_DISABLE_XKEYMACS_T, CCommands::EnableOrDisableXKeymacs, {{CONTROL, 'Q', IDC_CQ},
\r
30 {CONTROL+SHIFT, 'Q', IDC_CQ},
\r
32 {_T("Enable XKeymacs"), IDS_OTHER, IDS_ENABLE_XKEYMACS_D, IDS_ENABLE_XKEYMACS_T, CCommands::EnableXKeymacs, {'\0'}},
\r
33 {_T("newline"), IDS_OTHER, IDS_NEWLINE_D, IDS_NEWLINE_T, CCommands::Newline, {{CONTROL, 'M', IDC_CM},
\r
34 {CONTROL+SHIFT, 'M', IDC_CM},
\r
36 {_T("Esc"), IDS_OTHER, IDS_ESCAPE_D, IDS_ESCAPE_T, CCommands::Escape, {'\0'}},
\r
37 {_T("Find"), IDS_OTHER, IDS_FIND_D, IDS_FIND_T, CCommands::Find, {'\0'}},
\r
38 {_T("Find Next"), IDS_OTHER, IDS_FIND_NEXT_D, IDS_FIND_NEXT_T, CCommands::FindNext, {'\0'}},
\r
39 {_T("Ignore"), IDS_OTHER, IDS_IGNORE_D, IDS_IGNORE_T, CCommands::Ignore, {'\0'}},
\r
40 {_T("Kill Line for All Format"), IDS_OTHER, IDS_KILL_LINE_FOR_ALL_FORMAT_D, IDS_KILL_LINE_FOR_ALL_FORMAT_T, CCommands::KillLineForAllFormat, {'\0'}},
\r
41 {_T("Maximize"), IDS_OTHER, IDS_MAXIMIZE_D, IDS_MAXIMIZE_T, CCommands::Maximize, {'\0'}},
\r
42 {_T("Maximize Horizontally"), IDS_OTHER, IDS_MAXIMIZE_HORIZONTALLY_D, IDS_MAXIMIZE_HORIZONTALLY_T, CCommands::MaximizeHorizontally, {'\0'}},
\r
43 {_T("Maximize Vertically"), IDS_OTHER, IDS_MAXIMIZE_VERTICALLY_D, IDS_MAXIMIZE_VERTICALLY_T, CCommands::MaximizeVertically, {'\0'}},
\r
44 {_T("Meta"), IDS_OTHER, IDS_META_PREFIX_D, IDS_META_PREFIX_T, CCommands::Meta, {{CONTROL, 0xDB, IDC_SQUARE_BRA},
\r
45 {'\0'}}}, // VK_OEM_4
\r
46 {_T("Meta for Alt"), IDS_OTHER, IDS_META_D, IDS_META_T, CCommands::MetaAlt, {{NONE, VK_MENU, IDC_ALT},
\r
47 {NONE, VK_LMENU, IDC_LEFT_ALT},
\r
48 {NONE, VK_RMENU, IDC_RIGHT_ALT},
\r
50 {_T("Meta for Escape"), IDS_OTHER, IDS_META_PREFIX_AND_ORIGINAL_D, IDS_META_PREFIX_AND_ORIGINAL_T, CCommands::MetaEscape, {{NONE, VK_ESCAPE, IDC_ESCAPE},
\r
51 {NONE+SHIFT, VK_ESCAPE, IDC_ESCAPE},
\r
52 {'\0'}}}, // add SHIFT
\r
53 {_T("Minimize"), IDS_OTHER, IDS_MINIMIZE_D, IDS_MINIMIZE_T, CCommands::Minimize, {'\0'}},
\r
54 {_T("Move"), IDS_OTHER, IDS_MOVE_D, IDS_MOVE_T, CCommands::Move, {'\0'}},
\r
55 {_T("New"), IDS_OTHER, IDS_NEW_D, IDS_NEW_T, CCommands::New, {'\0'}},
\r
56 {_T("One Shot Modifier Alt"), IDS_MODIFIER, IDS_OSMODIFIER_ALT_D, IDS_OSMODIFIER_ALT_T, CCommands::OneShotModifierAlt, {'\0'}},
\r
57 {_T("One Shot Modifier Alt with Repeat"), IDS_MODIFIER, IDS_OSMODIFIER_ALT_REPEAT_D, IDS_OSMODIFIER_ALT_REPEAT_T, CCommands::OneShotModifierAltRepeat, {'\0'}},
\r
58 {_T("One Shot Modifier Ctrl"), IDS_MODIFIER, IDS_OSMODIFIER_CTRL_D, IDS_OSMODIFIER_CTRL_T, CCommands::OneShotModifierCtrl, {'\0'}},
\r
59 {_T("One Shot Modifier Ctrl with Repeat"), IDS_MODIFIER, IDS_OSMODIFIER_CTRL_REPEAT_D, IDS_OSMODIFIER_CTRL_REPEAT_T, CCommands::OneShotModifierCtrlRepeat, {'\0'}},
\r
60 {_T("One Shot Modifier Shift"), IDS_MODIFIER, IDS_OSMODIFIER_SHIFT_D, IDS_OSMODIFIER_SHIFT_T, CCommands::OneShotModifierShift, {'\0'}},
\r
61 {_T("One Shot Modifier Shift with Repeat"), IDS_MODIFIER, IDS_OSMODIFIER_SHIFT_REPEAT_D, IDS_OSMODIFIER_SHIFT_REPEAT_T, CCommands::OneShotModifierShiftRepeat, {'\0'}},
\r
62 {_T("Open Input Method"), IDS_IME, IDS_OPEN_INPUT_METHOD_D, IDS_OPEN_INPUT_METHOD_T, CCommands::OpenInputMethod, {'\0'}},
\r
63 {_T("Pass Through"), IDS_OTHER, IDS_PASS_THROUGH_D, IDS_PASS_THROUGH_T, CCommands::PassThrough, {'\0'}},
\r
64 {_T("Paste"), IDS_OTHER, IDS_PASTE_D, IDS_PASTE_T, CCommands::Paste, {'\0'}},
\r
65 {_T("Print"), IDS_OTHER, IDS_PRINT_D, IDS_PRINT_T, CCommands::Print, {'\0'}},
\r
66 {_T("Redo"), IDS_OTHER, IDS_REDO_D, IDS_REDO_T, CCommands::Redo, {'\0'}},
\r
67 {_T("Restore"), IDS_OTHER, IDS_RESTORE_D, IDS_RESTORE_T, CCommands::Restore, {'\0'}},
\r
68 {_T("Retop"), IDS_OTHER, IDS_RETOP_D, IDS_RETOP_T, CCommands::Retop, {'\0'}},
\r
69 {_T("Roll-up/Unroll"), IDS_WINDOW, IDS_ROLL_UP_UNROLL_D, IDS_ROLL_UP_UNROLL_T, CCommands::RollUpUnroll, {{META, VK_F12, IDC_MF12},
\r
71 {_T("Select All"), IDS_OTHER, IDS_SELECT_ALL_D, IDS_SELECT_ALL_T, CCommands::SelectAll, {'\0'}},
\r
72 {_T("Size"), IDS_OTHER, IDS_SIZE_D, IDS_SIZE_T, CCommands::Size, {'\0'}},
\r
73 {_T("Switch Between Input Locales"),IDS_IME, IDS_SWITCH_BETWEEN_INPUT_LOCALES_D, IDS_SWITCH_BETWEEN_INPUT_LOCALES_T, CCommands::SwitchBetweenInputLocales, {'\0'}},
\r
74 {_T("Temporarily Disable XKeymacs"),IDS_OTHER, IDS_TEMPORARILY_DISABLE_XKEYMACS_D, IDS_TEMPORARILY_DISABLE_XKEYMACS_T, CCommands::TemporarilyDisableXKeymacs, {'\0'}},
\r
75 {_T("~"), IDS_OTHER, IDS_TILDE_D, IDS_TILDE_T, CCommands::Tilde, {'\0'}},
\r
76 {_T("`"), IDS_OTHER, IDS_BACK_QUOTE_D, IDS_BACK_QUOTE_T, CCommands::BackQuote, {'\0'}},
\r
77 {_T("_"), IDS_OTHER, IDS_UNDERSCORE_D, IDS_UNDERSCORE_T, CCommands::Underscore, {'\0'}},
\r
78 {_T("backward-char"), IDS_MOTION, IDS_BACKWARD_CHAR_D, IDS_BACKWARD_CHAR_T, CCommands::BackwardChar, {{CONTROL, 'B', IDC_CB},
\r
79 {CONTROL+SHIFT, 'B', IDC_CB},
\r
81 {_T("backward-kill-word"), IDS_KILL, IDS_BACKWARD_KILL_WORD_D, IDS_BACKWARD_KILL_WORD_T, CCommands::BackwardKillWord, {{META, VK_BACK, IDC_MDEL},
\r
82 {META+SHIFT, VK_BACK, IDC_MDEL},
\r
84 {_T("backward-word"), IDS_MOTION, IDS_BACKWARD_WORD_D, IDS_BACKWARD_WORD_T, CCommands::BackwardWord, {{META, 'B', IDC_MB},
\r
85 {META+SHIFT, 'B', IDC_MB},
\r
87 {_T("beginning-of-buffer"), IDS_MOTION, IDS_BEGINNING_OF_BUFFER_D, IDS_BEGINNING_OF_BUFFER_T, CCommands::BeginningOfBuffer, {{META+SHIFT, 0xBC, IDC_MSCOMMA},
\r
88 {'\0'}}}, // VK_OEM_COMMA
\r
89 {_T("beginning-of-line"), IDS_MOTION, IDS_BEGINNING_OF_LINE_D, IDS_BEGINNING_OF_LINE_T, CCommands::BeginningOfLine, {{CONTROL, 'A', IDC_CA},
\r
90 {CONTROL+SHIFT, 'A', IDC_CA},
\r
92 {_T("call-last-kbd-macro"), IDS_OTHER, IDS_CALL_LAST_KBD_MACRO_D, IDS_CALL_LAST_KBD_MACRO_T, CCommands::CallLastKbdMacro, {{CONTROLX, 'E', IDC_CXE},
\r
93 {CONTROLX+SHIFT, 'E', IDC_CXE},
\r
95 {_T("capitalize-word"), IDS_OTHER, IDS_CAPITALIZE_WORD_D, IDS_CAPITALIZE_WORD_T, CCommands::CapitalizeWord, {{META, 'C', IDC_MC},
\r
96 {META+SHIFT, 'C', IDC_MC},
\r
98 {_T("delete-backward-char"), IDS_KILL, IDS_DELETE_BACKWARD_CHAR_D, IDS_DELETE_BACKWARD_CHAR_T, CCommands::DeleteBackwardChar, {{CONTROL, 'H', IDC_CH},
\r
99 {CONTROL+SHIFT, 'H', IDC_CH},
\r
101 {_T("delete-char"), IDS_KILL, IDS_DELETE_CHAR_D, IDS_DELETE_CHAR_T, CCommands::DeleteChar, {{CONTROL, 'D', IDC_CD},
\r
102 {CONTROL+SHIFT, 'D', IDC_CD},
\r
104 {_T("downcase-word"), IDS_OTHER, IDS_DOWNCASE_WORD_D, IDS_DOWNCASE_WORD_T, CCommands::DowncaseWord, {{META, 'L', IDC_ML},
\r
105 {META+SHIFT, 'L', IDC_ML},
\r
107 {_T("end-kbd-macro"), IDS_OTHER, IDS_END_KBD_MACRO_D, IDS_END_KBD_MACRO_T, CCommands::EndKbdMacro, {{CONTROLX+SHIFT, '0', IDC_CXS0},
\r
109 {_T("end-of-buffer"), IDS_MOTION, IDS_END_OF_BUFFER_D, IDS_END_OF_BUFFER_T, CCommands::EndOfBuffer, {{META+SHIFT, 0xBE, IDC_MSPERIOD},
\r
110 {'\0'}}}, // VK_OEM_PERIOD
\r
111 {_T("end-of-line"), IDS_MOTION, IDS_END_OF_LINE_D, IDS_END_OF_LINE_T, CCommands::EndOfLine, {{CONTROL, 'E', IDC_CE},
\r
112 {CONTROL+SHIFT, 'E', IDC_CE},
\r
114 {_T("execute-extended-command"), IDS_OTHER, IDS_EXECUTE_EXTENDED_COMMAND_D, IDS_EXECUTE_EXTENDED_COMMAND_T, CCommands::ExecuteExtendedCommand, {{META, 'X', IDC_MX},
\r
115 {META+SHIFT, 'X', IDC_MX},
\r
117 // {_T("fill-paragraph"), IDS_OTHER, IDS_FILL_PARAGRAPH_D, IDS_FILL_PARAGRAPH_T, CCommands::FillParagraph, {'\0'}},
\r
118 {_T("find-file"), IDS_FILES, IDS_FIND_FILE_D, IDS_FIND_FILE_T, CCommands::FindFile, {{CONTROL+CONTROLX, 'F', IDC_CXCF},
\r
119 {CONTROL+SHIFT+CONTROLX, 'F', IDC_CXCF},
\r
121 {_T("forward-char"), IDS_MOTION, IDS_FORWARD_CHAR_D, IDS_FORWARD_CHAR_T, CCommands::ForwardChar, {{CONTROL, 'F', IDC_CF},
\r
122 {CONTROL+SHIFT, 'F', IDC_CF},
\r
124 {_T("forward-word"), IDS_MOTION, IDS_FORWARD_WORD_D, IDS_FORWARD_WORD_T, CCommands::ForwardWord, {{META, 'F', IDC_MF},
\r
125 {META+SHIFT, 'F', IDC_MF},
\r
127 {_T("iconify-or-deiconify-frame"), IDS_WINDOW, IDS_ICONIFY_OR_DEICONIFY_FRAME_D, IDS_ICONIFY_OR_DEICONIFY_FRAME_T, CCommands::IconifyOrDeiconifyFrame, {{CONTROL, 'Z', IDC_CZ},
\r
128 {CONTROL+SHIFT, 'Z', IDC_CZ},
\r
130 {_T("isearch-backward"), IDS_SEARCH, IDS_ISEARCH_BACKWARD_D, IDS_ISEARCH_BACKWARD_T, CCommands::IsearchBackward, {{CONTROL, 'R', IDC_CR},
\r
131 {CONTROL+SHIFT, 'R', IDC_CR},
\r
133 {_T("isearch-forward"), IDS_SEARCH, IDS_ISEARCH_FORWARD_D, IDS_ISEARCH_FORWARD_T, CCommands::IsearchForward, {{CONTROL, 'S', IDC_CS},
\r
134 {CONTROL+SHIFT, 'S', IDC_CS},
\r
136 {_T("keyboard-quit"), IDS_RECOVERY, IDS_KEYBOARD_QUIT_D, IDS_KEYBOARD_QUIT_T, CCommands::KeyboardQuit, {{CONTROL, 'G', IDC_CG},
\r
137 {CONTROL+SHIFT, 'G', IDC_CG},
\r
139 {_T("kill-buffer"), IDS_FILES, IDS_KILL_BUFFER_D, IDS_KILL_BUFFER_T, CCommands::KillBuffer, {{CONTROLX, 'K', IDC_CXK},
\r
140 {SHIFT+CONTROLX, 'K', IDC_CXK},
\r
142 {_T("kill-line"), IDS_KILL, IDS_KILL_LINE_D, IDS_KILL_LINE_T, CCommands::KillLine, {{CONTROL, 'K', IDC_CK},
\r
143 {CONTROL+SHIFT, 'K', IDC_CK},
\r
145 {_T("kill-region"), IDS_KILL, IDS_KILL_REGION_D, IDS_KILL_REGION_T, CCommands::KillRegion, {{CONTROL, 'W', IDC_CW},
\r
146 {CONTROL+SHIFT, 'W', IDC_CW},
\r
148 {_T("kill-ring-save"), IDS_KILL, IDS_KILL_RING_SAVE_D, IDS_KILL_RING_SAVE_T, CCommands::KillRingSave, {{META, 'W', IDC_MW},
\r
149 {META+SHIFT, 'W', IDC_MW},
\r
151 {_T("kill-word"), IDS_KILL, IDS_KILL_WORD_D, IDS_KILL_WORD_T, CCommands::KillWord, {{META, 'D', IDC_MD},
\r
152 {META+SHIFT, 'D', IDC_MD},
\r
154 {_T("mark-page"), IDS_OTHER, IDS_MARK_PAGE_D, IDS_MARK_PAGE_T, CCommands::MarkPage, {{CONTROL+CONTROLX, 'P', IDC_CXCP},
\r
155 {CONTROL+SHIFT+CONTROLX, 'P', IDC_CXCP},
\r
157 {_T("mark-whole-buffer"), IDS_OTHER, IDS_MARK_WHOLE_BUFFER_D, IDS_MARK_WHOLE_BUFFER_T, CCommands::MarkWholeBuffer, {{CONTROLX, 'H', IDC_CXH},
\r
158 {CONTROLX+SHIFT, 'H', IDC_CXH},
\r
160 {_T("next-line"), IDS_MOTION, IDS_NEXT_LINE_D, IDS_NEXT_LINE_T, CCommands::NextLine, {{CONTROL, 'N', IDC_CN},
\r
161 {CONTROL+SHIFT, 'N', IDC_CN},
\r
163 {_T("numeric argument 0"), IDS_OTHER, IDS_DIGIT_ARGUMENT0_D, IDS_DIGIT_ARGUMENT0_T, CCommands::NumericArgument0, {{CONTROL, '0', IDC_CDIGIT},
\r
164 {META, '0', IDC_CDIGIT},
\r
166 {_T("numeric argument 1"), IDS_OTHER, IDS_DIGIT_ARGUMENT1_D, IDS_DIGIT_ARGUMENT1_T, CCommands::NumericArgument1, {{CONTROL, '1', IDC_CDIGIT},
\r
167 {META, '1', IDC_CDIGIT},
\r
169 {_T("numeric argument 2"), IDS_OTHER, IDS_DIGIT_ARGUMENT2_D, IDS_DIGIT_ARGUMENT2_T, CCommands::NumericArgument2, {{CONTROL, '2', IDC_CDIGIT},
\r
170 {META, '2', IDC_CDIGIT},
\r
172 {_T("numeric argument 3"), IDS_OTHER, IDS_DIGIT_ARGUMENT3_D, IDS_DIGIT_ARGUMENT3_T, CCommands::NumericArgument3, {{CONTROL, '3', IDC_CDIGIT},
\r
173 {META, '3', IDC_CDIGIT},
\r
175 {_T("numeric argument 4"), IDS_OTHER, IDS_DIGIT_ARGUMENT4_D, IDS_DIGIT_ARGUMENT4_T, CCommands::NumericArgument4, {{CONTROL, '4', IDC_CDIGIT},
\r
176 {META, '4', IDC_CDIGIT},
\r
178 {_T("numeric argument 5"), IDS_OTHER, IDS_DIGIT_ARGUMENT5_D, IDS_DIGIT_ARGUMENT5_T, CCommands::NumericArgument5, {{CONTROL, '5', IDC_CDIGIT},
\r
179 {META, '5', IDC_CDIGIT},
\r
181 {_T("numeric argument 6"), IDS_OTHER, IDS_DIGIT_ARGUMENT6_D, IDS_DIGIT_ARGUMENT6_T, CCommands::NumericArgument6, {{CONTROL, '6', IDC_CDIGIT},
\r
182 {META, '6', IDC_CDIGIT},
\r
184 {_T("numeric argument 7"), IDS_OTHER, IDS_DIGIT_ARGUMENT7_D, IDS_DIGIT_ARGUMENT7_T, CCommands::NumericArgument7, {{CONTROL, '7', IDC_CDIGIT},
\r
185 {META, '7', IDC_CDIGIT},
\r
187 {_T("numeric argument 8"), IDS_OTHER, IDS_DIGIT_ARGUMENT8_D, IDS_DIGIT_ARGUMENT8_T, CCommands::NumericArgument8, {{CONTROL, '8', IDC_CDIGIT},
\r
188 {META, '8', IDC_CDIGIT},
\r
190 {_T("numeric argument 9"), IDS_OTHER, IDS_DIGIT_ARGUMENT9_D, IDS_DIGIT_ARGUMENT9_T, CCommands::NumericArgument9, {{CONTROL, '9', IDC_CDIGIT},
\r
191 {META, '9', IDC_CDIGIT},
\r
193 {_T("numeric argument -"), IDS_OTHER, IDS_NEGATIVE_ARGUMENT_D, IDS_NEGATIVE_ARGUMENT_T, CCommands::NumericArgumentMinus, {{CONTROL, 0xBD, IDC_CDIGIT},
\r
194 {META, 0xBD, IDC_CDIGIT},
\r
196 {_T("open-line"), IDS_OTHER, IDS_OPEN_LINE_D, IDS_OPEN_LINE_T, CCommands::OpenLine, {{CONTROL, 'O', IDC_CO},
\r
197 {CONTROL+SHIFT, 'O', IDC_CO},
\r
199 {_T("previous-line"), IDS_MOTION, IDS_PREVIOUS_LINE_D, IDS_PREVIOUS_LINE_T, CCommands::PreviousLine, {{CONTROL, 'P', IDC_CP},
\r
200 {CONTROL+SHIFT, 'P', IDC_CP},
\r
202 {_T("query-replace"), IDS_SEARCH, IDS_QUERY_REPLACE_D, IDS_QUERY_REPLACE_T, CCommands::QueryReplace, {{META+SHIFT, '5', IDC_MS5},
\r
204 {_T("query-replace-regexp"), IDS_SEARCH, IDS_QUERY_REPLACE_REGEXP_D, IDS_QUERY_REPLACE_REGEXP_T, CCommands::QueryReplaceRegexp, {{CONTROL+META+SHIFT, '5', IDC_CMS5},
\r
206 {_T("recenter"), IDS_MOTION, IDS_RECENTER_D, IDS_RECENTER_T, CCommands::Recenter, {{CONTROL, 'L', IDC_CL},
\r
207 {CONTROL+SHIFT, 'L', IDC_CL},
\r
209 {_T("save-buffer"), IDS_FILES, IDS_SAVE_BUFFER_D, IDS_SAVE_BUFFER_T, CCommands::SaveBuffer, {{CONTROL+CONTROLX, 'S', IDC_CXCS},
\r
210 {CONTROL+SHIFT+CONTROLX, 'S', IDC_CXCS},
\r
212 {_T("save-buffers-kill-emacs"), IDS_WINDOW, IDS_SAVE_BUFFERS_KILL_EMACS_D, IDS_SAVE_BUFFERS_KILL_EMACS_T, CCommands::SaveBuffersKillEmacs, {{CONTROL+CONTROLX, 'C', IDC_CXCC},
\r
213 {CONTROL+SHIFT+CONTROLX, 'C', IDC_CXCC},
\r
215 {_T("scroll-down"), IDS_MOTION, IDS_SCROLL_DOWN_D, IDS_SCROLL_DOWN_T, CCommands::ScrollDown, {{META, 'V', IDC_MV},
\r
216 {META+SHIFT, 'V', IDC_MV},
\r
218 {_T("scroll-up"), IDS_MOTION, IDS_SCROLL_UP_D, IDS_SCROLL_UP_T, CCommands::ScrollUp, {{CONTROL, 'V', IDC_CV},
\r
219 {CONTROL+SHIFT, 'V', IDC_CV},
\r
221 {_T("set-mark-command"), IDS_OTHER, IDS_SET_MARK_COMMAND_D, IDS_SET_MARK_COMMAND_T, CCommands::SetMarkCommand, {{CONTROL, VK_SPACE, IDC_CSPACE},
\r
222 {CONTROL+SHIFT, VK_SPACE, IDC_CSPACE},
\r
224 {_T("shell-command"), IDS_OTHER, IDS_SHELL_COMMAND_D, IDS_SHELL_COMMAND_T, CCommands::ShellCommand, {{META+SHIFT, '1', IDC_MS1},
\r
226 {_T("start-kbd-macro"), IDS_OTHER, IDS_START_KBD_MACRO_D, IDS_START_KBD_MACRO_T, CCommands::StartKbdMacro, {{CONTROLX+SHIFT, '9', IDC_CXS9},
\r
228 {_T("switch-to-buffer"), IDS_OTHER, IDS_SWITCH_TO_BUFFER_D, IDS_SWITCH_TO_BUFFER_T, CCommands::SwitchToBuffer, {{CONTROLX, 'B', IDC_CXB},
\r
229 {CONTROLX+SHIFT, 'B', IDC_CXB},
\r
231 {_T("tab-to-tab-stop"), IDS_OTHER, IDS_TAB_D, IDS_TAB_T, CCommands::TabToTabStop, {{CONTROL, 'I', IDC_CI},
\r
232 {CONTROL+SHIFT, 'I', IDC_CI},
\r
233 {META, 'I', IDC_MI},
\r
234 {META+SHIFT, 'I', IDC_MI},
\r
236 {_T("toggle-input-method"), IDS_IME, IDS_TOGGLE_WIN32IME_MODE_D, IDS_TOGGLE_WIN32IME_MODE_T, CCommands::ToggleInputMethod, {{CONTROL+CONTROLX, 'J', IDC_CXCJ},
\r
237 {CONTROL+SHIFT+CONTROLX, 'J', IDC_CXCJ},
\r
238 {CONTROL, 'O', IDC_CO2},
\r
239 {CONTROL+SHIFT, 'O', IDC_CO2},
\r
240 {CONTROL, 0xDC, IDC_CBACKSLASH},
\r
241 {CONTROL, 0xE2, IDC_CBACKSLASH_106},
\r
243 {_T("transpose-chars"), IDS_KILL, IDS_TRANSPOSE_CHARS_D, IDS_TRANSPOSE_CHARS_T, CCommands::TransposeChars, {{CONTROL, 'T', IDC_CT},
\r
244 {CONTROL+SHIFT, 'T', IDC_CT},
\r
246 {_T("transpose-lines"), IDS_KILL, IDS_TRANSPOSE_LINES_D, IDS_TRANSPOSE_LINES_T, CCommands::TransposeLines, {{CONTROL+CONTROLX, 'T', IDC_CXCT},
\r
247 {CONTROL+SHIFT+CONTROLX, 'T', IDC_CXCT},
\r
249 {_T("transpose-words"), IDS_KILL, IDS_TRANSPOSE_WORDS_D, IDS_TRANSPOSE_WORDS_T, CCommands::TransposeWords, {{META, 'T', IDC_MT},
\r
250 {META+SHIFT, 'T', IDC_MT},
\r
252 {_T("undo"), IDS_RECOVERY, IDS_UNDO_D, IDS_UNDO_T, CCommands::Undo, {{CONTROLX, 'U', IDC_CXU},
\r
253 {CONTROL+SHIFT, 0xBD, IDC_C_},
\r
254 {CONTROL, 0xBF, IDC_CSLASH},
\r
256 {_T("universal-argument"), IDS_OTHER, IDS_UNIVERSAL_ARGUMENT_D, IDS_UNIVERSAL_ARGUMENT_T, CCommands::UniversalArgument, {{CONTROL, 'U', IDC_CU},
\r
257 {CONTROL+SHIFT, 'U', IDC_CU},
\r
259 {_T("upcase-word"), IDS_OTHER, IDS_UPCASE_WORD_D, IDS_UPCASE_WORD_T, CCommands::UpcaseWord, {{META, 'U', IDC_MU},
\r
260 {META+SHIFT, 'U', IDC_MU},
\r
262 {_T("write-file"), IDS_FILES, IDS_WRITE_FILE_D, IDS_WRITE_FILE_T, CCommands::WriteFile, {{CONTROL+CONTROLX, 'W', IDC_CXCW},
\r
263 {CONTROL+SHIFT+CONTROLX, 'W', IDC_CXCW},
\r
265 {_T("yank"), IDS_KILL, IDS_YANK_D, IDS_YANK_T, CCommands::Yank, {{CONTROL, 'Y', IDC_CY},
\r
266 {CONTROL+SHIFT, 'Y', IDC_CY},
\r
268 {_T("yank-pop"), IDS_KILL, IDS_YANK_POP_D, IDS_YANK_POP_T, CCommands::YankPop, {{META, 'Y', IDC_MY},
\r
269 {META+SHIFT, 'Y', IDC_MY},
\r
273 #pragma data_seg(".xkmcs")
\r
274 DWORD CCommands::m_nNumericArgument = 1;
\r
275 BOOL CCommands::m_bSetMark = FALSE;
\r
276 BOOL CCommands::m_bC_ = FALSE;
\r
277 BOOL CCommands::m_bC_x = FALSE;
\r
278 BOOL CCommands::m_bM_ = FALSE;
\r
279 BOOL CCommands::m_bM_x = FALSE;
\r
280 BOOL CCommands::m_bDefaultNumericArgument = TRUE;
\r
281 BOOL CCommands::m_bNegativeNumericArgument = FALSE;
\r
282 BOOL CCommands::m_bC_u = FALSE;
\r
283 SEARCH_DIRECTION CCommands::m_SearchDirection = NA;
\r
284 int (*CCommands::m_LastKillCommand)() = NULL;
\r
285 int (*CCommands::m_LastCommand)() = NULL;
\r
286 BOOL CCommands::m_bFirstFindDialog = FALSE;
\r
287 BOOL CCommands::m_bTemporarilyDisableXKeymacs = FALSE;
\r
288 CArray<CClipboardSnap *, CClipboardSnap *> CCommands::m_oClipboardData;
\r
289 OriginalWindowPosition CCommands::m_OriginalWindowPosition[MAX_WINDOW] = {'\0'};
\r
290 BOOL CCommands::m_bIsSu = FALSE;
\r
294 //////////////////////////////////////////////////////////////////////
\r
295 // Construction/Destruction
\r
296 //////////////////////////////////////////////////////////////////////
\r
298 CCommands::CCommands()
\r
303 CCommands::~CCommands()
\r
308 void CCommands::DepressKey(BYTE bVk)
\r
310 CXkeymacsDll::DepressKey(bVk);
\r
313 void CCommands::ReleaseKey(BYTE bVk)
\r
315 CXkeymacsDll::ReleaseKey(bVk);
\r
318 void CCommands::Kdu(BYTE bVk1, BYTE bVk2, BYTE bVk3, BYTE bVk4)
\r
320 BOOL bIsCtrlDown = CXkeymacsDll::IsDown(VK_CONTROL, FALSE);
\r
321 BOOL bIsAltDown = CXkeymacsDll::IsDown(VK_MENU, FALSE);
\r
322 BOOL bIsShiftDown = CXkeymacsDll::IsDown(VK_SHIFT, FALSE);
\r
324 if (CXkeymacsDll::Get326Compatible() || CUtils::IsAtok()) {
\r
325 bIsShiftDown = FALSE;
\r
329 CUtils::UpdateKeyboardState(VK_CONTROL, 0);
\r
330 ReleaseKey(VK_CONTROL);
\r
333 ReleaseKey(VK_MENU);
\r
335 if (bIsShiftDown) {
\r
336 ReleaseKey(VK_SHIFT);
\r
340 CXkeymacsDll::Kdu(bVk1, m_nNumericArgument);
\r
343 CXkeymacsDll::Kdu(bVk2, m_nNumericArgument);
\r
346 CXkeymacsDll::Kdu(bVk3, m_nNumericArgument);
\r
349 CXkeymacsDll::Kdu(bVk4, m_nNumericArgument);
\r
352 if (bIsShiftDown) {
\r
353 DepressKey(VK_SHIFT);
\r
356 DepressKey(VK_MENU);
\r
359 DepressKey(VK_CONTROL);
\r
360 CUtils::UpdateKeyboardState(VK_CONTROL, 1);
\r
364 void CCommands::SdKduSu(BYTE bVk1, BYTE bVk2, BYTE bVk3, BYTE bVk4)
\r
366 BOOL bIsCtrlDown = CXkeymacsDll::IsDown(VK_CONTROL, FALSE);
\r
367 BOOL bIsAltDown = CXkeymacsDll::IsDown(VK_MENU, FALSE);
\r
368 BOOL bIsShiftDown = CXkeymacsDll::IsDown(VK_SHIFT, FALSE);
\r
371 ReleaseKey(VK_CONTROL);
\r
374 ReleaseKey(VK_MENU);
\r
376 if (!bIsShiftDown) {
\r
377 DepressKey(VK_SHIFT);
\r
380 CXkeymacsDll::Kdu(bVk1, m_nNumericArgument);
\r
382 CXkeymacsDll::Kdu(bVk2, m_nNumericArgument);
\r
385 CXkeymacsDll::Kdu(bVk3, m_nNumericArgument);
\r
388 CXkeymacsDll::Kdu(bVk4, m_nNumericArgument);
\r
391 if (!bIsShiftDown) {
\r
392 if (CUtils::IsShuriken()) {
\r
395 ReleaseKey(VK_SHIFT);
\r
399 DepressKey(VK_MENU);
\r
402 DepressKey(VK_CONTROL);
\r
406 void CCommands::Su()
\r
409 ReleaseKey(VK_SHIFT);
\r
414 void CCommands::CdKduCu(BYTE bVk1, BYTE bVk2)
\r
416 BOOL bIsCtrlDown = CXkeymacsDll::IsDown(VK_CONTROL, FALSE);
\r
417 BOOL bIsAltDown = CXkeymacsDll::IsDown(VK_MENU, FALSE);
\r
418 BOOL bIsShiftDown = CXkeymacsDll::IsDown(VK_SHIFT, FALSE);
\r
420 // CUtils::Log("%d, %d, %d", CXkeymacsDll::IsDown(VK_MENU, FALSE), CXkeymacsDll::IsDown(VK_LMENU, FALSE), CXkeymacsDll::IsDown(VK_RMENU, FALSE));
\r
422 if (!bIsCtrlDown) {
\r
423 DepressKey(VK_CONTROL);
\r
424 CUtils::UpdateKeyboardState(VK_CONTROL, 1);
\r
427 ReleaseKey(VK_MENU);
\r
429 if (bIsShiftDown && !m_bSetMark) {
\r
430 ReleaseKey(VK_SHIFT);
\r
434 CXkeymacsDll::Kdu(bVk1, m_nNumericArgument);
\r
437 CXkeymacsDll::Kdu(bVk2, m_nNumericArgument);
\r
440 if (bIsShiftDown && !m_bSetMark) {
\r
441 if (!CUtils::IsXPorLater()) { // FIXME Windows XP said VK_SHIFT was pressed physically after a user press VK_RSHIFT, so...
\r
442 DepressKey(VK_SHIFT);
\r
446 DepressKey(VK_MENU);
\r
448 if (!bIsCtrlDown) {
\r
449 CUtils::UpdateKeyboardState(VK_CONTROL, 0);
\r
450 ReleaseKey(VK_CONTROL);
\r
454 void CCommands::CdSdKduSuCu(BYTE bVk)
\r
456 BOOL bIsCtrlDown = CXkeymacsDll::IsDown(VK_CONTROL, FALSE);
\r
457 BOOL bIsAltDown = CXkeymacsDll::IsDown(VK_MENU, FALSE);
\r
458 BOOL bIsShiftDown = CXkeymacsDll::IsDown(VK_SHIFT, FALSE);
\r
460 if (!bIsCtrlDown) {
\r
461 DepressKey(VK_CONTROL);
\r
462 CUtils::UpdateKeyboardState(VK_CONTROL, 1);
\r
465 ReleaseKey(VK_MENU);
\r
467 if (!bIsShiftDown) {
\r
468 DepressKey(VK_SHIFT);
\r
471 CXkeymacsDll::Kdu(bVk, m_nNumericArgument);
\r
473 if (!bIsShiftDown) {
\r
474 ReleaseKey(VK_SHIFT);
\r
477 DepressKey(VK_MENU);
\r
479 if (!bIsCtrlDown) {
\r
480 CUtils::UpdateKeyboardState(VK_CONTROL, 0);
\r
481 ReleaseKey(VK_CONTROL);
\r
485 void CCommands::AdKduAu(BYTE bVk1, BYTE bVk2, BYTE bVk3)
\r
487 BOOL bIsCtrlDown = CXkeymacsDll::IsDown(VK_CONTROL, FALSE);
\r
488 BOOL bIsAltDown = CXkeymacsDll::IsDown(VK_MENU, FALSE);
\r
489 BOOL bIsShiftDown = CXkeymacsDll::IsDown(VK_SHIFT, FALSE);
\r
492 ReleaseKey(VK_CONTROL);
\r
496 DepressKey(VK_MENU);
\r
499 if (bIsShiftDown) {
\r
500 ReleaseKey(VK_SHIFT);
\r
503 CXkeymacsDll::Kdu(bVk1, m_nNumericArgument);
\r
505 CXkeymacsDll::Kdu(bVk2, m_nNumericArgument);
\r
508 CXkeymacsDll::Kdu(bVk3, m_nNumericArgument);
\r
511 if (bIsShiftDown) {
\r
512 if (!CUtils::IsXPorLater()) { // FIXME Windows XP said VK_SHIFT was pressed physically after a user press VK_RSHIFT, so...
\r
513 DepressKey(VK_SHIFT);
\r
518 ReleaseKey(VK_MENU);
\r
522 DepressKey(VK_CONTROL);
\r
526 void CCommands::AdSdKduSuAu(BYTE bVk1)
\r
528 BOOL bIsCtrlDown = CXkeymacsDll::IsDown(VK_CONTROL, FALSE);
\r
529 BOOL bIsAltDown = CXkeymacsDll::IsDown(VK_MENU, FALSE);
\r
530 BOOL bIsShiftDown = CXkeymacsDll::IsDown(VK_SHIFT, FALSE);
\r
533 ReleaseKey(VK_CONTROL);
\r
537 DepressKey(VK_MENU);
\r
540 if (!bIsShiftDown) {
\r
541 DepressKey(VK_SHIFT);
\r
544 CXkeymacsDll::Kdu(bVk1, m_nNumericArgument);
\r
546 if (!bIsShiftDown) {
\r
547 ReleaseKey(VK_SHIFT);
\r
551 ReleaseKey(VK_MENU);
\r
555 DepressKey(VK_CONTROL);
\r
560 int CCommands::BeginningOfLine()
\r
562 int nNumericArgument = 1;
\r
563 if (!m_bDefaultNumericArgument || m_bNegativeNumericArgument) {
\r
564 nNumericArgument = m_nNumericArgument;
\r
565 if (m_bNegativeNumericArgument) {
\r
566 if (nNumericArgument) {
\r
567 nNumericArgument *= -1;
\r
569 nNumericArgument = -1;
\r
573 ClearNumericArgument();
\r
575 if (nNumericArgument <= 0) {
\r
576 nNumericArgument = -1 * nNumericArgument + 1;
\r
577 while (nNumericArgument--) {
\r
578 ReleaseKey(VK_CONTROL); // why?
\r
579 while (MoveCaret(VK_UP) != GOTO_HOOK);
\r
581 ReleaseKey(VK_CONTROL); // why?
\r
582 while (MoveCaret(VK_HOME) != GOTO_HOOK);
\r
583 DepressKey(VK_CONTROL); // why?
\r
584 } else if (nNumericArgument == 1) {
\r
585 return Reset(MoveCaret(VK_HOME));
\r
586 } else if (2 <= nNumericArgument) {
\r
587 nNumericArgument -= 2;
\r
588 while (nNumericArgument--) {
\r
589 ReleaseKey(VK_CONTROL); // why?
\r
590 while (MoveCaret(VK_DOWN) != GOTO_HOOK);
\r
592 ReleaseKey(VK_CONTROL); // why?
\r
593 while (MoveCaret(VK_END) != GOTO_HOOK);
\r
594 while (MoveCaret(VK_RIGHT) != GOTO_HOOK);
\r
595 DepressKey(VK_CONTROL); // why?
\r
599 return Reset(GOTO_HOOK);
\r
603 int CCommands::BackwardChar()
\r
605 if (m_bNegativeNumericArgument) {
\r
606 m_bNegativeNumericArgument = FALSE;
\r
607 return ForwardChar();
\r
610 return Reset(MoveCaret(VK_LEFT));
\r
613 // M-b: backward-word
\r
614 int CCommands::BackwardWord()
\r
616 if (m_bNegativeNumericArgument) {
\r
617 m_bNegativeNumericArgument = FALSE;
\r
618 return ForwardWord();
\r
621 return Reset(MoveCaret(VK_LEFT, TRUE));
\r
625 int CCommands::EndOfLine()
\r
627 int nNumericArgument = 1;
\r
628 if (!m_bDefaultNumericArgument || m_bNegativeNumericArgument) {
\r
629 nNumericArgument = m_nNumericArgument;
\r
630 if (m_bNegativeNumericArgument) {
\r
631 if (nNumericArgument) {
\r
632 nNumericArgument *= -1;
\r
634 nNumericArgument = -1;
\r
638 ClearNumericArgument();
\r
639 if (nNumericArgument <= 0) {
\r
640 nNumericArgument *= -1;
\r
641 while (nNumericArgument--) {
\r
642 ReleaseKey(VK_CONTROL); // why?
\r
643 while (MoveCaret(VK_UP) != GOTO_HOOK);
\r
645 ReleaseKey(VK_CONTROL); // why?
\r
646 while (MoveCaret(VK_HOME) != GOTO_HOOK);
\r
647 while (MoveCaret(VK_LEFT) != GOTO_HOOK);
\r
648 DepressKey(VK_CONTROL); // why?
\r
649 } else if (nNumericArgument == 1) {
\r
650 return (MoveCaret(VK_END));
\r
651 } else if (2 <= nNumericArgument) {
\r
652 --nNumericArgument;
\r
653 while (nNumericArgument--) {
\r
654 ReleaseKey(VK_CONTROL); // why?
\r
655 while (MoveCaret(VK_DOWN) != GOTO_HOOK);
\r
657 ReleaseKey(VK_CONTROL); // why?
\r
658 while (MoveCaret(VK_END) != GOTO_HOOK);
\r
659 DepressKey(VK_CONTROL); // why?
\r
663 return Reset(GOTO_HOOK);
\r
667 int CCommands::ForwardChar()
\r
669 // TCHAR szWindowText[0x100] = {'\0'};
\r
670 // GetWindowText(GetForegroundWindow(), szWindowText, sizeof(szWindowText));
\r
671 // CUtils::Log("C-f: %s", szWindowText);
\r
673 if (m_bNegativeNumericArgument) {
\r
674 m_bNegativeNumericArgument = FALSE;
\r
675 return BackwardChar();
\r
678 return Reset(MoveCaret(VK_RIGHT));
\r
681 // M-f: forward-word
\r
682 int CCommands::ForwardWord()
\r
684 if (m_bNegativeNumericArgument) {
\r
685 m_bNegativeNumericArgument = FALSE;
\r
686 return BackwardWord();
\r
689 return Reset(MoveCaret(VK_RIGHT, TRUE));
\r
693 int CCommands::NextLine()
\r
695 // CUtils::Log(_T("C-n"));
\r
697 if (m_bNegativeNumericArgument) {
\r
698 m_bNegativeNumericArgument = FALSE;
\r
699 return PreviousLine();
\r
702 return Reset(MoveCaret(VK_DOWN));
\r
706 int CCommands::OpenLine()
\r
708 static const int DEFAULT_NUMERIC_ARGUMENT = -1;
\r
709 static int nNumericArgument = DEFAULT_NUMERIC_ARGUMENT;
\r
711 if (nNumericArgument == DEFAULT_NUMERIC_ARGUMENT) {
\r
712 nNumericArgument = m_nNumericArgument;
\r
713 ClearNumericArgument();
\r
716 if (CUtils::IsHidemaru()
\r
717 || CUtils::IsTuruKameMail()) {
\r
718 static int nStep = 0;
\r
724 return Reset(GOTO_RECURSIVE);
\r
727 Kdu(VK_UP, VK_END);
\r
728 if (--nNumericArgument) {
\r
729 return Reset(GOTO_RECURSIVE);
\r
734 while (nNumericArgument--) {
\r
735 Kdu(VK_RETURN, VK_UP, VK_END);
\r
739 nNumericArgument = DEFAULT_NUMERIC_ARGUMENT;
\r
740 return Reset(GOTO_HOOK);
\r
744 int CCommands::PreviousLine()
\r
746 if (m_bNegativeNumericArgument) {
\r
747 m_bNegativeNumericArgument = FALSE;
\r
751 return Reset(MoveCaret(VK_UP));
\r
755 int CCommands::QueryReplace()
\r
757 ClearNumericArgument();
\r
758 if (CUtils::IsBecky()) {
\r
760 } else if (CUtils::IsEclipse()
\r
761 || CUtils::IsInternetExplorer()
\r
762 || CUtils::IsLotusNotes()
\r
763 || CUtils::IsSleipnir()) {
\r
765 } else if (CUtils::IsAutla()
\r
766 || CUtils::IsBorlandCppBuilder()
\r
767 || CUtils::IseMemoPad()
\r
768 || CUtils::IsNami2000()
\r
769 || CUtils::IsStoryEditor()) {
\r
771 } else if (CUtils::IsEdLeaf()) {
\r
773 } else if (CUtils::IsPHPEditor()) {
\r
778 return Reset(GOTO_HOOK);
\r
782 int CCommands::QueryReplaceRegexp()
\r
784 return QueryReplace();
\r
788 int CCommands::BeginningOfBuffer()
\r
790 ClearNumericArgument();
\r
791 return Reset(MoveCaret(VK_HOME, TRUE));
\r
795 int CCommands::EndOfBuffer()
\r
797 ClearNumericArgument();
\r
798 return Reset(MoveCaret(VK_END, TRUE));
\r
802 int CCommands::DeleteBackwardChar()
\r
804 if (m_bNegativeNumericArgument) {
\r
805 m_bNegativeNumericArgument = FALSE;
\r
806 return DeleteChar();
\r
810 m_bSetMark = FALSE;
\r
811 return Reset(GOTO_HOOK);
\r
815 int CCommands::DeleteChar()
\r
817 if (m_bNegativeNumericArgument) {
\r
818 m_bNegativeNumericArgument = FALSE;
\r
819 return DeleteBackwardChar();
\r
822 m_bSetMark = FALSE;
\r
824 return Reset(GOTO_HOOK);
\r
827 int CCommands::KillLineForAllFormat()
\r
829 return KillLine(TRUE, KillLineForAllFormat);
\r
832 // C-k: Shift-End, Shift-Delete, if the cursor is not at EOL (is End Of Line)
\r
833 // Shift-Right, Cut, if the cursor is at EOL
\r
834 int CCommands::KillLine()
\r
836 return KillLine(FALSE);
\r
839 int CCommands::KillLine(BOOL bAllFormat, int (*pCommand)())
\r
841 static BOOL bKeepAllFormat = FALSE;
\r
843 // Do not try to do these command at once.
\r
844 // Clipboard has old data till you go out this function.
\r
845 static int nStep = 0;
\r
846 static int nPrevStep = 0;
\r
847 static int nRepeat = 0;
\r
848 static CString szClipboardText;
\r
849 static BOOL bContinuous = FALSE;
\r
850 static BOOL bTopOfFile = FALSE;
\r
852 if (nStep == nPrevStep) {
\r
860 case 0: // Clear Selection and get next character to confirm the cursor is at the EOF or not.
\r
861 // CUtils::Log(_T("C-k: 0"));
\r
862 bTopOfFile = FALSE;
\r
864 if (!m_bDefaultNumericArgument || m_bNegativeNumericArgument) {
\r
865 if (m_bNegativeNumericArgument || m_nNumericArgument == 0) {
\r
866 // Shift+Up x -n Shift+Home Ctrl+X
\r
868 ClearNumericArgument();
\r
871 // Shift+Down x (n - 1) Shift+End Shift+Right Ctrl+X
\r
872 --m_nNumericArgument;
\r
874 ClearNumericArgument();
\r
875 SdKduSu(VK_END, VK_RIGHT);
\r
879 return Reset(GOTO_RECURSIVE);
\r
882 if (m_LastCommand == pCommand) {
\r
883 bContinuous = TRUE;
\r
885 bContinuous = FALSE;
\r
887 m_bSetMark = FALSE;
\r
892 if (CUtils::IsDirector()
\r
893 || CUtils::IsEudora()) {
\r
895 return Reset(GOTO_RECURSIVE);
\r
898 if (CUtils::IsLotus123()) {
\r
899 // C-k: Shift-End, Control-x
\r
902 return Reset(GOTO_HOOK);
\r
905 CaptureClipboardData(0, CUtils::IsLotusNotes());
\r
907 if (!CopyNextCharacter()) {
\r
908 // CUtils::Log(_T("Error: CopyNextCharacter"));
\r
909 return Reset(GOTO_DO_NOTHING);
\r
913 return Reset(GOTO_RECURSIVE);
\r
914 case 1: // Get back character to confirm the cursor is at the TOF or not only for Macromedia Director.
\r
915 // CUtils::Log(_T("C-k: 1"));
\r
917 CaptureClipboardData();
\r
919 if (!CopyBackCharacter()) {
\r
920 return Reset(GOTO_DO_NOTHING);
\r
924 return Reset(GOTO_RECURSIVE);
\r
925 case 2: // Confirm the cursor is at the TOF or not only for Macromedia Director.
\r
927 // CUtils::Log(_T("C-k: 2"));
\r
931 if (CUtils::IsTOF()) {
\r
935 // CopyBackCharacter move cursor right
\r
937 RestoreClipboardData();
\r
940 return Reset(GOTO_RECURSIVE);
\r
942 case 3: // Get next character to confirm the cursor is at the EOF or not.
\r
943 // CUtils::Log(_T("C-k: 3"));
\r
946 if (CUtils::IsLotus123()) {
\r
947 // C-k: Shift-End, Control-x
\r
950 return Reset(GOTO_HOOK);
\r
953 CaptureClipboardData();
\r
955 if (!CopyNextCharacter()) {
\r
956 // CUtils::Log(_T("Error: CopyNextCharacter"));
\r
957 return Reset(GOTO_DO_NOTHING);
\r
961 return Reset(GOTO_RECURSIVE);
\r
962 case 4: // Cut line
\r
963 // CUtils::Log(_T("C-k: 4"));
\r
967 if ((CUtils::IsDirector()
\r
968 || CUtils::IsEudora())
\r
970 // CopyNextCharacter move cursor left
\r
974 CUtils::GetClipboardText(&szClipboardText);
\r
975 // CUtils::Log(_T("%x, %s"), szClipboardText.GetAt(0), szClipboardText);
\r
977 if (szClipboardText.IsEmpty()) { // EOF
\r
978 // CUtils::Log(_T("C-k: EOF"));
\r
979 if (CUtils::IsLotusWordPro()
\r
980 || CUtils::IsMicrosoftFrontPage()
\r
981 || CUtils::IsMicrosoftWord()) {
\r
985 return Reset(GOTO_RECURSIVE);
\r
986 } else if (CUtils::IsLotusNotes()) {
\r
988 ReleaseKey(VK_CONTROL); // Why is it needed?
\r
989 SdKduSu(VK_DOWN, VK_HOME);
\r
991 DepressKey(VK_CONTROL); // Why is it needed?
\r
993 return Reset(GOTO_RECURSIVE);
\r
997 RestoreClipboardData();
\r
998 // CUtils::Log(_T("C-k: 4-1"));
\r
999 return Reset(GOTO_HOOK);
\r
1003 if (szClipboardText.GetAt(0) != VK_RETURN) {
\r
1004 // CUtils::Log(_T("C-k: szClipboardText.GetAt(0) != VK_RETURN"));
\r
1005 if (CUtils::IsDirector()) {
\r
1006 ReleaseKey(VK_CONTROL);
\r
1009 DepressKey(VK_CONTROL);
\r
1010 } else if (CUtils::IseMemoPad()
\r
1011 || CUtils::IsHidemaru() // Hidemaru clears mark after copy.
\r
1012 || CUtils::IsOpenOffice()
\r
1013 || CUtils::IsTuruKameMail()) {
\r
1016 } else if (CUtils::IsLotusWordPro()
\r
1017 || CUtils::IsMicrosoftWord()) {
\r
1018 SdKduSu(VK_END, VK_LEFT);
\r
1025 // CUtils::Log(_T("C-k: EOL"));
\r
1026 if (CUtils::IsDirector()) {
\r
1027 ReleaseKey(VK_CONTROL);
\r
1028 SdKduSu(VK_RIGHT);
\r
1030 DepressKey(VK_CONTROL);
\r
1031 } else if (CUtils::IsEclipse()
\r
1032 || CUtils::IsStoryEditor()) {
\r
1033 SdKduSu(VK_RIGHT);
\r
1035 } else if (CUtils::IseMemoPad()
\r
1036 || CUtils::IsHidemaru() // Hidemaru clears mark after copy.
\r
1037 || CUtils::IsOpenOffice()
\r
1038 || CUtils::IsTuruKameMail()) {
\r
1039 SdKduSu(VK_RIGHT);
\r
1042 SdKduSu(VK_RIGHT);
\r
1048 return Reset(GOTO_RECURSIVE);
\r
1049 case 5: // input return if XKeymacs not only line but also line feed code and set the kill-line data on the clipboard.
\r
1050 // CUtils::Log(_T("C-k: 5"));
\r
1053 if (1000 < nRepeat) {
\r
1054 // CUtils::Log(_T("C-k: 5-1"));
\r
1056 return Reset(GOTO_RECURSIVE);
\r
1059 // CUtils::Log(_T("C-k: 5-1-1"));
\r
1061 // CUtils::Log(_T("C-k: 5-1-2"));
\r
1062 CaptureClipboardData(1, CUtils::IsLotusNotes());
\r
1063 // CUtils::Log(_T("C-k: 5-1-3"));
\r
1065 // if (m_oClipboardData.GetSize() < 1 || m_oClipboardData[0] == NULL) {
\r
1066 //// CUtils::Log(_T("C-k: 5-2"));
\r
1068 // return Reset(GOTO_RECURSIVE);
\r
1069 // } else if (m_oClipboardData.GetSize() < 2 || m_oClipboardData[1] == NULL) {
\r
1070 //// CUtils::Log(_T("C-k: 5-3"));
\r
1072 // return Reset(GOTO_RECURSIVE);
\r
1075 if (CUtils::IseMemoPad()
\r
1076 || CUtils::IsHidemaru() // Hidemaru clears mark after copy.
\r
1077 || CUtils::IsLotusWordPro()
\r
1078 || CUtils::IsMicrosoftWord ()
\r
1079 || CUtils::IsOpenOffice()
\r
1080 || CUtils::IsTuruKameMail()) {
\r
1082 // CUtils::Log(_T("C-k: 5-4"));
\r
1084 // This changed will be required to avoid Thunderbird bug.
\r
1085 // if (0 < FindReturnFromClipboardData(1) && !CUtils::IsExcel() && !CUtils::IsThunderbird()) {
\r
1086 if (0 < FindReturnFromClipboardData(1) && !CUtils::IsExcel()) {
\r
1087 // CUtils::Log(_T("C-k: 5-5"));
\r
1091 return Reset(GOTO_RECURSIVE);
\r
1094 // CUtils::Log(_T("C-k: 5-6"));
\r
1098 bKeepAllFormat = bAllFormat;
\r
1099 if (!bKeepAllFormat
\r
1100 && !m_oClipboardData[1]->IsAllMergeableFormat()) {
\r
1101 // CUtils::Log(_T("C-k: 5-7"));
\r
1102 bKeepAllFormat = TRUE;
\r
1105 if (bContinuous && !bKeepAllFormat) {
\r
1106 // CUtils::Log(_T("C-k: 5-8"));
\r
1107 *m_oClipboardData[0] += *m_oClipboardData[1];
\r
1109 // CUtils::Log(_T("C-k: 5-9"));
\r
1110 *m_oClipboardData[0] = *m_oClipboardData[1];
\r
1112 RestoreClipboardData(0);
\r
1114 // CUtils::Log(_T("C-k: 5-10"));
\r
1116 return Reset(GOTO_RECURSIVE);
\r
1117 case 6: // add data into kill-ring
\r
1118 // CUtils::Log(_T("C-k: 6"));
\r
1122 if (bContinuous && bKeepAllFormat) {
\r
1123 CXkeymacsDll::AddKillRing(FALSE);
\r
1125 CXkeymacsDll::AddKillRing();
\r
1127 return Reset(GOTO_HOOK);
\r
1131 return Reset(GOTO_HOOK);
\r
1134 // C-x u: C-/: C-_: Ctrl-Z
\r
1135 int CCommands::Undo()
\r
1137 if (CUtils::IsMicrosoftWord()) {
\r
1138 static BOOL bIsCtrlDown;
\r
1139 static BOOL bIsAltDown;
\r
1140 static BOOL bIsShiftDown;
\r
1142 bIsCtrlDown = CXkeymacsDll::IsDown(VK_CONTROL, FALSE);
\r
1143 bIsAltDown = CXkeymacsDll::IsDown(VK_MENU, FALSE);
\r
1144 bIsShiftDown = CXkeymacsDll::IsDown(VK_SHIFT, FALSE);
\r
1146 if (!bIsCtrlDown) {
\r
1147 DepressKey(VK_CONTROL);
\r
1150 ReleaseKey(VK_MENU);
\r
1152 if (bIsShiftDown) {
\r
1153 ReleaseKey(VK_SHIFT);
\r
1156 PostMessage(GetFocus(), WM_KEYDOWN, 'Z', 0);
\r
1158 if (bIsShiftDown) {
\r
1159 DepressKey(VK_SHIFT);
\r
1162 DepressKey(VK_MENU);
\r
1164 if (!bIsCtrlDown) {
\r
1165 ReleaseKey(VK_CONTROL);
\r
1171 return Reset(GOTO_HOOK);
\r
1174 // C-x C-c: Alt-Space, Alt-C
\r
1175 int CCommands::SaveBuffersKillEmacs()
\r
1177 ClearNumericArgument();
\r
1179 HWND hWnd = GetForegroundWindow();
\r
1181 OriginalWindowPosition *pPos = GetOriginalWindowPosition(hWnd);
\r
1182 if (pPos && pPos->bMax[ROLL_UP_UNROLL]) {
\r
1187 if (CUtils::IsConsole()) {
\r
1188 SystemMenu(CMD_CLOSE);
\r
1189 } else if (CUtils::IsExplorer()) {
\r
1190 if (!CUtils::IsXPorLater()) {
\r
1191 ReleaseKey(VK_CONTROL);
\r
1194 } else if (CUtils::IsInternetExplorer()
\r
1195 || CUtils::IsJavaW()) {
\r
1198 AdKduAu(VK_SPACE, 'C');
\r
1200 return Reset(GOTO_HOOK);
\r
1203 // C-z: Alt-Space, Alt-N
\r
1204 int CCommands::IconifyOrDeiconifyFrame()
\r
1206 ClearNumericArgument();
\r
1207 if (CUtils::IsConsole()) {
\r
1208 SystemMenu(CMD_MINIMIZE);
\r
1210 AdKduAu(VK_SPACE, 'N');
\r
1212 return Reset(GOTO_HOOK);
\r
1215 int CCommands::Restore()
\r
1217 ClearNumericArgument();
\r
1218 if (CUtils::IsConsole()) {
\r
1219 SystemMenu(CMD_RESTORE);
\r
1221 AdKduAu(VK_SPACE, 'R');
\r
1223 return Reset(GOTO_HOOK);
\r
1226 int CCommands::Move()
\r
1228 ClearNumericArgument();
\r
1229 if (CUtils::IsConsole()) {
\r
1230 SystemMenu(CMD_MOVE);
\r
1232 AdKduAu(VK_SPACE, 'M');
\r
1234 return Reset(GOTO_HOOK);
\r
1237 int CCommands::Size()
\r
1239 ClearNumericArgument();
\r
1240 if (CUtils::IsConsole()) {
\r
1241 SystemMenu(CMD_SIZE);
\r
1243 AdKduAu(VK_SPACE, 'S');
\r
1245 return Reset(GOTO_HOOK);
\r
1248 int CCommands::Minimize()
\r
1250 return IconifyOrDeiconifyFrame();
\r
1253 int CCommands::Maximize()
\r
1255 ClearNumericArgument();
\r
1257 HWND hWnd = GetForegroundWindow();
\r
1259 return Reset(GOTO_HOOK);
\r
1262 WINDOWPLACEMENT wndpl = {sizeof(WINDOWPLACEMENT)};
\r
1263 if (!GetWindowPlacement(hWnd, &wndpl)) {
\r
1264 return Reset(GOTO_HOOK);
\r
1267 if (wndpl.showCmd == SW_SHOWMAXIMIZED) {
\r
1268 wndpl.showCmd = SW_RESTORE;
\r
1270 wndpl.showCmd = SW_SHOWMAXIMIZED;
\r
1273 SetWindowPlacement(hWnd, &wndpl);
\r
1274 return Reset(GOTO_HOOK);
\r
1277 OriginalWindowPosition* CCommands::GetOriginalWindowPosition(HWND hWnd)
\r
1279 for (int i = 0; i < MAX_WINDOW; i++) {
\r
1280 if (m_OriginalWindowPosition[i].hWnd == hWnd) {
\r
1281 return &m_OriginalWindowPosition[i];
\r
1285 for (int j = 0; j < MAX_WINDOW; j++) {
\r
1286 if (m_OriginalWindowPosition[j].hWnd == 0) {
\r
1287 m_OriginalWindowPosition[j].hWnd = hWnd;
\r
1288 memset(&m_OriginalWindowPosition[(j + 1) % MAX_WINDOW], 0, sizeof(OriginalWindowPosition));
\r
1289 return &m_OriginalWindowPosition[j];
\r
1297 int CCommands::Maximize(MAXIMIZE_DIRECTION direction)
\r
1299 ClearNumericArgument();
\r
1301 HWND hWnd = GetForegroundWindow();
\r
1303 return Reset(GOTO_HOOK);
\r
1306 RECT workarea = {'\0'};
\r
1307 if (!SystemParametersInfo(SPI_GETWORKAREA, 0, &workarea, 0)) {
\r
1308 return Reset(GOTO_HOOK);
\r
1311 RECT window = {'\0'};
\r
1312 if (!GetWindowRect(hWnd, &window)) {
\r
1313 return Reset(GOTO_HOOK);
\r
1316 OriginalWindowPosition *pPos = GetOriginalWindowPosition(hWnd);
\r
1318 return Reset(GOTO_HOOK);
\r
1321 int X = window.left;
\r
1322 int Y = window.top;
\r
1323 int nWidth = window.right - window.left;
\r
1324 int nHeight = window.bottom - window.top;
\r
1326 switch (direction) {
\r
1328 if (pPos->bMax[direction]) {
\r
1329 Y = pPos->nOriginalY;
\r
1330 nHeight = pPos->nOriginalHeight;
\r
1332 pPos->nOriginalY = Y;
\r
1333 pPos->nOriginalHeight = nHeight;
\r
1336 nHeight = workarea.bottom - workarea.top;
\r
1340 if (pPos->bMax[direction]) {
\r
1341 X = pPos->nOriginalX;
\r
1342 nWidth = pPos->nOriginalWidth;
\r
1344 pPos->nOriginalX = X;
\r
1345 pPos->nOriginalWidth = nWidth;
\r
1347 X = workarea.left;
\r
1348 nWidth = workarea.right - workarea.left;
\r
1351 case ROLL_UP_UNROLL:
\r
1352 if (pPos->bMax[direction]) {
\r
1353 nHeight = pPos->nOriginalHeight;
\r
1355 pPos->nOriginalHeight = nHeight;
\r
1365 MoveWindow(hWnd, X, Y, nWidth, nHeight, TRUE);
\r
1366 pPos->bMax[direction] = !pPos->bMax[direction];
\r
1367 return Reset(GOTO_HOOK);
\r
1370 int CCommands::MaximizeVertically()
\r
1372 return Maximize(VERTICAL);
\r
1375 int CCommands::MaximizeHorizontally()
\r
1377 return Maximize(HORIZONTAL);
\r
1381 int CCommands::SetMarkCommand()
\r
1383 ClearNumericArgument();
\r
1387 m_bSetMark = TRUE;
\r
1389 if (CUtils::IsConsole()) {
\r
1390 SystemMenuEdit(CMD_MARK);
\r
1393 return Reset(GOTO_HOOK);
\r
1396 // C-g: Keyboard quit
\r
1397 int CCommands::KeyboardQuit()
\r
1399 ClearNumericArgument();
\r
1400 if (CUtils::IsFindDialog()) {
\r
1404 m_bSetMark = FALSE;
\r
1407 SetTemporarilyDisableXKeymacs(FALSE);
\r
1408 return Reset(GOTO_HOOK);
\r
1411 DWORD CCommands::ClickCaret()
\r
1413 HWND hWnd = GetFocus();
\r
1415 POINT CaretPos = {'\0'};
\r
1416 if (!GetCaretPos(&CaretPos)) {
\r
1417 return GetLastError();
\r
1419 // CUtils::Log(_T("client: x = %d, y = %d"), CaretPos.x, CaretPos.y);
\r
1421 if (!ClientToScreen(hWnd, &CaretPos)) {
\r
1422 return GetLastError();
\r
1424 // CUtils::Log(_T("screen: x = %d, y = %d"), CaretPos.x, CaretPos.y);
\r
1426 POINT Delta = {0, 1};
\r
1427 if (CUtils::IsSakuraEditor()) {
\r
1429 Delta.y = 29; // OK: 29-42 NG: 28, 43
\r
1432 const POINT clickPoint = {CaretPos.x + Delta.x, CaretPos.y + Delta.y};
\r
1433 return Click(&clickPoint);
\r
1436 DWORD CCommands::DeactivateMark()
\r
1438 if (CUtils::IsOpenOffice()
\r
1439 || CUtils::IsVisualBasicEditor()) {
\r
1440 // GetCaretPos always returen (x,y) = (0,0) on OpenOffice, so ...
\r
1441 // GetCaretPos always returen (x,y) = (-2199,*) on M$ Excel VBE, so ...
\r
1443 return ERROR_SUCCESS; // i.e. return 0;
\r
1445 if (CUtils::IsFlash()
\r
1446 || CUtils::IsInternetExplorer()
\r
1447 || CUtils::IsMicrosoftPowerPoint()
\r
1448 || CUtils::IsMicrosoftWord()
\r
1449 || CUtils::IsSleipnir()
\r
1450 || CUtils::IsThunderbird()) {
\r
1451 // GetCaretPos always returen (x,y) = (0,0) on M$ Word and Thunderbird, so ...
\r
1452 // GetCaretPos always returen start point on IE (and Sleipnir that uses IE), so ...
\r
1454 return ERROR_SUCCESS; // i.e. return 0;
\r
1456 if (CUtils::IsDirector()) {
\r
1457 // GetCaretPos always returen (x,y) = (0,0) on Macromedia Director, so ...
\r
1458 Kdu(VK_RIGHT, VK_LEFT);
\r
1459 return ERROR_SUCCESS; // i.e. return 0;
\r
1461 if (CUtils::IsExplorer()) {
\r
1462 AdKduAu('E', 'A');
\r
1463 AdKduAu('E', 'I');
\r
1464 return ERROR_SUCCESS; // i.e. return 0;
\r
1466 if (CUtils::IsVisualStudioDotNet()) { // Ctrl + Click select a word on Visual Studio .NET
\r
1467 ReleaseKey(VK_CONTROL);
\r
1468 return ClickCaret();
\r
1471 return ClickCaret();
\r
1474 // C-x C-f: Alt-F, Alt-O
\r
1475 int CCommands::FindFile()
\r
1477 ClearNumericArgument();
\r
1478 if (CUtils::IsFlash()
\r
1479 || CUtils::IsSleipnir()) {
\r
1481 } else if (CUtils::IsVisualStudioDotNet()) {
\r
1482 AdKduAu('F', 'O', 'F');
\r
1484 AdKduAu('F', 'O');
\r
1486 return Reset(GOTO_HOOK);
\r
1490 int CCommands::TabToTabStop()
\r
1492 ClearNumericArgument();
\r
1494 m_bSetMark = FALSE;
\r
1497 return Reset(GOTO_HOOK);
\r
1501 int CCommands::Newline()
\r
1504 return Reset(GOTO_HOOK);
\r
1507 // C-x h: Ctrl-End, Ctrl-Shift-Home
\r
1508 int CCommands::MarkWholeBuffer()
\r
1510 ClearNumericArgument();
\r
1511 if (CUtils::IsConsole()) {
\r
1512 SystemMenuEdit(CMD_SELECT_ALL);
\r
1513 } else if (CUtils::IsDreamweaver()
\r
1514 || CUtils::IsFireworks()
\r
1515 || CUtils::IsFlash()
\r
1516 || CUtils::IsIllustrator()
\r
1517 || CUtils::IsPaint()
\r
1518 || CUtils::IsPhotoshop()) {
\r
1520 } else if (CUtils::IsExplorer()
\r
1521 || CUtils::IsReget()) {
\r
1523 m_bSetMark = TRUE;
\r
1524 return Reset(MoveCaret(VK_HOME));
\r
1527 m_bSetMark = TRUE;
\r
1528 return Reset(MoveCaret(VK_HOME, TRUE));
\r
1530 return Reset(GOTO_HOOK);
\r
1534 int CCommands::MarkPage()
\r
1536 return MarkWholeBuffer();
\r
1539 // C-x C-s: Alt-F, Alt-S
\r
1540 int CCommands::SaveBuffer()
\r
1542 ClearNumericArgument();
\r
1543 if (CUtils::IsFlash()
\r
1544 || CUtils::IsSleipnir()
\r
1545 || CUtils::IsThunderbird()) {
\r
1547 return Reset(GOTO_HOOK);
\r
1550 AdKduAu('F', 'S');
\r
1551 return Reset(GOTO_HOOK);
\r
1556 int CCommands::ScrollUp()
\r
1558 if (m_bNegativeNumericArgument) {
\r
1559 m_bNegativeNumericArgument = FALSE;
\r
1560 return ScrollDown();
\r
1563 if (m_bDefaultNumericArgument) {
\r
1564 return Reset(MoveCaret(VK_NEXT));
\r
1566 while (m_nNumericArgument--) {
\r
1567 SendMessage(GetFocus(), WM_VSCROLL, SB_LINEDOWN, NULL);
\r
1570 return Reset(GOTO_HOOK);
\r
1574 int CCommands::ScrollDown()
\r
1576 if (m_bNegativeNumericArgument) {
\r
1577 m_bNegativeNumericArgument = FALSE;
\r
1578 return ScrollUp();
\r
1581 if (m_bDefaultNumericArgument) {
\r
1582 if (CUtils::IsFirefox()
\r
1583 || CUtils::IsVisualCpp()) {
\r
1584 CdKduCu(0); // dummy to clear Alt effect.
\r
1586 return Reset(MoveCaret(VK_PRIOR));
\r
1588 while (m_nNumericArgument--) {
\r
1589 SendMessage(GetFocus(), WM_VSCROLL, SB_LINEUP, NULL);
\r
1592 return Reset(GOTO_HOOK);
\r
1595 BOOL CCommands::bC_()
\r
1600 void CCommands::bC_(BOOL b)
\r
1603 CXkeymacsDll::ModifyShell_NotifyIcon(CTRL_ICON, m_bC_);
\r
1606 BOOL CCommands::bC_x()
\r
1611 void CCommands::bC_x(BOOL b)
\r
1614 CXkeymacsDll::ModifyShell_NotifyIcon(CX_ICON, m_bC_x);
\r
1617 BOOL CCommands::bM_x()
\r
1622 void CCommands::bM_x(const BOOL b)
\r
1627 CXkeymacsDll::ModifyM_xTip("");
\r
1629 CXkeymacsDll::ModifyM_xTip(NULL);
\r
1633 // C-x: only set flag
\r
1634 int CCommands::C_x()
\r
1636 if (CXkeymacsDll::GetEnableCUA() && m_bSetMark) {
\r
1641 return Reset(GOTO_HOOKX);
\r
1644 // C-x C-w: Alt-F, Alt-A
\r
1645 int CCommands::WriteFile()
\r
1647 ClearNumericArgument();
\r
1648 if (CUtils::IsSleipnir()) {
\r
1650 } else if (CUtils::IsFlash()) {
\r
1653 AdKduAu('F', 'A');
\r
1655 return Reset(GOTO_HOOK);
\r
1658 int CCommands::Paste()
\r
1660 ClearNumericArgument();
\r
1661 m_bSetMark = FALSE;
\r
1662 if (CUtils::IsConsole()) {
\r
1663 SystemMenuEdit(CMD_PASTE);
\r
1667 return Reset(GOTO_HOOK);
\r
1671 int CCommands::KillRegion()
\r
1673 static int nStep = 0;
\r
1676 m_bSetMark = FALSE;
\r
1677 ClearNumericArgument();
\r
1679 if (CUtils::IsExplorer()) {
\r
1680 return Reset(GOTO_HOOK);
\r
1683 return Reset(GOTO_RECURSIVE);
\r
1686 CXkeymacsDll::AddKillRing();
\r
1687 return Reset(GOTO_HOOK);
\r
1690 return Reset(GOTO_HOOK);
\r
1694 int CCommands::KillRingSave()
\r
1696 static int nStep = 0;
\r
1699 ClearNumericArgument();
\r
1700 m_bSetMark = FALSE;
\r
1701 if (CUtils::IsConsole()) {
\r
1702 SystemMenuEdit(CMD_COPY);
\r
1703 return Reset(GOTO_HOOK);
\r
1704 } else if (CUtils::IsMicrosoftPowerPoint()) { // PowerPoint did not want to deactivate-mark. Temporary code?
\r
1709 if (CUtils::IsExplorer()) {
\r
1710 return Reset(GOTO_HOOK);
\r
1713 return Reset(GOTO_RECURSIVE);
\r
1716 CXkeymacsDll::AddKillRing();
\r
1717 if (CUtils::IsMicrosoftPowerPoint()) { // Because DeactivateMark move object like graph.
\r
1722 return Reset(GOTO_HOOK);
\r
1725 return Reset(GOTO_HOOK);
\r
1729 int CCommands::Yank()
\r
1731 m_bSetMark = FALSE;
\r
1732 if (CUtils::IsConsole()) {
\r
1733 SystemMenuEdit(CMD_PASTE);
\r
1735 static CClipboardSnap* pSnap = NULL;
\r
1736 if (!m_bDefaultNumericArgument) {
\r
1737 DecreaseNumericArgument();
\r
1738 CXkeymacsDll::IncreaseKillRingIndex(m_nNumericArgument);
\r
1739 pSnap = CXkeymacsDll::GetKillRing(pSnap);
\r
1740 } else if (pSnap) {
\r
1741 pSnap = CXkeymacsDll::GetKillRing(pSnap);
\r
1743 if (CUtils::IsExcel() && m_LastKillCommand == KillRegion) {
\r
1744 // do nothing to work C-w not Copy but Cut
\r
1745 } else if (CUtils::IsLotusNotes() && (m_LastKillCommand == KillRegion || m_LastKillCommand == KillRingSave)) {
\r
1748 pSnap = CXkeymacsDll::GetKillRing(pSnap, FALSE);
\r
1753 return Reset(GOTO_RECURSIVE);
\r
1756 return Reset(GOTO_HOOK);
\r
1760 int CCommands::YankPop()
\r
1762 ClearNumericArgument();
\r
1764 if (m_LastCommand == YankPop
\r
1765 || m_LastCommand == Yank) {
\r
1766 static CClipboardSnap* pSnap = NULL;
\r
1768 CClipboardSnap* pOldSnap = NULL;
\r
1769 pOldSnap = CXkeymacsDll::GetKillRing(pOldSnap);
\r
1771 for (int i = 0; i < pOldSnap->GetCount(); ++i) {
\r
1777 CXkeymacsDll::IncreaseKillRingIndex();
\r
1779 pSnap = CXkeymacsDll::GetKillRing(pSnap);
\r
1782 return Reset(GOTO_RECURSIVE);
\r
1786 return Reset(GOTO_HOOK);
\r
1789 // M-!: cmd.exe/command.com
\r
1790 int CCommands::ShellCommand()
\r
1792 if (!CUtils::Run(_tgetenv(_T("XKEYMACS_SHELL")))) {
\r
1793 CUtils::Run(_tgetenv(_T("COMSPEC")));
\r
1795 return Reset(GOTO_HOOK);
\r
1798 int CCommands::Ignore()
\r
1800 Reset(); // If you delete this line, Ignore() works as Enable/Disable XKeymacs only on Release build. Why?
\r
1801 return Reset(GOTO_HOOK);
\r
1804 void CCommands::bM_(BOOL b)
\r
1807 CXkeymacsDll::ModifyShell_NotifyIcon(META_ICON, m_bM_);
\r
1810 BOOL CCommands::bM_()
\r
1816 int CCommands::Meta()
\r
1819 return Reset(GOTO_HOOKX);
\r
1823 int CCommands::MetaEscape()
\r
1826 return Reset(GOTO_DO_NOTHING);
\r
1830 int CCommands::MetaAlt()
\r
1832 return Reset(GOTO_DO_NOTHING);
\r
1836 int CCommands::NumericArgument0()
\r
1838 return NumericArgument(0);
\r
1842 int CCommands::NumericArgument1()
\r
1844 return NumericArgument(1);
\r
1848 int CCommands::NumericArgument2()
\r
1850 return NumericArgument(2);
\r
1854 int CCommands::NumericArgument3()
\r
1856 return NumericArgument(3);
\r
1860 int CCommands::NumericArgument4()
\r
1862 return NumericArgument(4);
\r
1866 int CCommands::NumericArgument5()
\r
1868 return NumericArgument(5);
\r
1872 int CCommands::NumericArgument6()
\r
1874 return NumericArgument(6);
\r
1878 int CCommands::NumericArgument7()
\r
1880 return NumericArgument(7);
\r
1884 int CCommands::NumericArgument8()
\r
1886 return NumericArgument(8);
\r
1890 int CCommands::NumericArgument9()
\r
1892 return NumericArgument(9);
\r
1896 int CCommands::NumericArgument(int n)
\r
1898 if (m_bDefaultNumericArgument) {
\r
1899 m_nNumericArgument = n;
\r
1900 m_bDefaultNumericArgument = FALSE;
\r
1902 m_nNumericArgument = m_nNumericArgument * 10 + n;
\r
1904 return Reset(GOTO_HOOK0_9);
\r
1908 int CCommands::NumericArgumentMinus()
\r
1910 m_bNegativeNumericArgument = !m_bNegativeNumericArgument;
\r
1911 return Reset(GOTO_HOOK0_9);
\r
1915 int CCommands::UniversalArgument()
\r
1918 m_nNumericArgument *= 4;
\r
1920 m_nNumericArgument = 4;
\r
1923 return Reset(GOTO_HOOKX);
\r
1926 // change function name and member variable name like bUniversalArgument()
\r
1927 BOOL CCommands::bC_u()
\r
1932 void CCommands::bC_u(BOOL b)
\r
1937 int CCommands::Repeat(BYTE bVk)
\r
1939 if (m_bDefaultNumericArgument) {
\r
1940 return Reset(GOTO_DO_NOTHING);
\r
1942 CXkeymacsDll::Kdu(bVk, m_nNumericArgument);
\r
1943 return Reset(GOTO_HOOK);
\r
1948 int CCommands::Recenter()
\r
1950 if (CUtils::IsBecky()) {
\r
1951 static int nStep = 0;
\r
1952 RECT ClientRect = {'\0'};
\r
1953 GetClientRect(GetFocus(), &ClientRect);
\r
1954 static int gap = INT_MAX;
\r
1956 static POINT CaretPos = {'\0'};
\r
1957 GetCaretPos(&CaretPos);
\r
1961 nStep = 0; // omaginai
\r
1962 if (CaretPos.y < ClientRect.bottom / 2) {
\r
1963 SendMessage(GetFocus(), WM_VSCROLL, SB_LINEUP, NULL);
\r
1964 } else if (ClientRect.bottom / 2 < CaretPos.y) {
\r
1965 SendMessage(GetFocus(), WM_VSCROLL, SB_LINEDOWN, NULL);
\r
1968 return Reset(GOTO_HOOK);
\r
1974 return Reset(GOTO_RECURSIVE);
\r
1978 // When a client screen can display 2n lines, the center line is (n + 1)th line.
\r
1979 int newgap = CaretPos.y - ClientRect.bottom / 2;
\r
1980 if (fabs((double)gap) <= fabs((double)newgap)) {
\r
1981 if ((fabs((double)gap) == fabs((double)newgap)) && (gap != newgap) && newgap < 0) {
\r
1982 SendMessage(GetFocus(), WM_VSCROLL, SB_LINEUP, NULL);
\r
1985 return Reset(GOTO_HOOK);
\r
1990 return Reset(GOTO_RECURSIVE);
\r
1992 } else if (CUtils::IsMicrosoftWord()
\r
1993 || CUtils::IsThunderbird()) {
\r
1994 RECT ClientRect = {'\0'};
\r
1995 GetClientRect(GetFocus(), &ClientRect);
\r
1996 // CUtils::Log(_T("top = %d, bottom = %d, left = %d, right = %d"), ClientRect.top, ClientRect.bottom, ClientRect.left, ClientRect.right);
\r
1998 POINT CaretPos = {'\0'};
\r
1999 GetCaretPos(&CaretPos);
\r
2001 static const int LENGTH_PER_SCROLL = 32;
\r
2003 if (CaretPos.y < ClientRect.bottom / 2) {
\r
2004 VScroll(SB_LINEUP, (ClientRect.bottom / 2 - CaretPos.y) / (LENGTH_PER_SCROLL / 2) + 1);
\r
2005 } else if (ClientRect.bottom / 2 < CaretPos.y) {
\r
2006 VScroll(SB_LINEDOWN, (CaretPos.y - ClientRect.bottom / 2) / (LENGTH_PER_SCROLL / 2));
\r
2009 return Reset(GOTO_HOOK);
\r
2011 RECT ClientRect = {'\0'};
\r
2012 GetClientRect(GetFocus(), &ClientRect);
\r
2013 int gap = INT_MAX;
\r
2015 // CUtils::Log(_T("top = %d, bottom = %d, left = %d, right = %d"), ClientRect.top, ClientRect.bottom, ClientRect.left, ClientRect.right);
\r
2018 POINT CaretPos = {'\0'};
\r
2019 GetCaretPos(&CaretPos);
\r
2021 if (CaretPos.y < ClientRect.bottom / 2) {
\r
2022 VScroll(SB_LINEUP);
\r
2023 } else if (ClientRect.bottom / 2 < CaretPos.y) {
\r
2024 VScroll(SB_LINEDOWN);
\r
2029 // When a client screen can display 2n lines, the center line is (n + 1)th line.
\r
2030 int newgap = CaretPos.y - ClientRect.bottom / 2;
\r
2031 if (fabs((double)gap) <= fabs((double)newgap)) {
\r
2032 if ((fabs((double)gap) == fabs((double)newgap)) && (gap != newgap) && newgap < 0) {
\r
2033 VScroll(SB_LINEUP);
\r
2039 return Reset(GOTO_HOOK);
\r
2041 return Reset(GOTO_HOOK);
\r
2044 // C-t: Shift-Left, Shift-Delete, Right Shift-Insert, if the cursor is not at EOL (is End Of Line)
\r
2045 // Left, Shift-Right, Shift-Delete, Left, Shift-Insert, Right, if the cursor is at EOL
\r
2046 int CCommands::TransposeChars()
\r
2048 ClearNumericArgument(); // tmp
\r
2050 // Do not try to do these command at once.
\r
2051 // Clipboard has old data till you go out this function.
\r
2052 static int nStep = 0;
\r
2054 case 0: // Clear Selection
\r
2056 m_bSetMark = FALSE;
\r
2057 Kdu(VK_RIGHT, VK_LEFT);
\r
2059 return Reset(GOTO_RECURSIVE);
\r
2061 // Do nothing. Go to case 1:
\r
2063 case 1: // Get back character to confirm the cursor is at TOF or not.
\r
2065 CaptureClipboardData();
\r
2068 if (CUtils::IsLotus123()) {
\r
2069 // C-t: Left, Shift-Right, Shift-Delete, Left, Shift-Insert, Right
\r
2071 SdKduSu(VK_RIGHT, VK_DELETE);
\r
2073 SdKduSu(VK_INSERT);
\r
2076 return Reset(GOTO_RECURSIVE);
\r
2079 if (!CopyBackCharacter()) {
\r
2080 return Reset(GOTO_DO_NOTHING);
\r
2084 return Reset(GOTO_RECURSIVE);
\r
2085 case 2: // Get next character to confirm the cursor is at the EOF or not.
\r
2090 if (CUtils::IsTOF()) {
\r
2093 return Reset(GOTO_RECURSIVE);
\r
2096 if (CUtils::IsDirector()) {
\r
2097 // CopyBackCharacter move cursor right
\r
2099 ReleaseKey(VK_CONTROL);
\r
2102 if (CUtils::IsEudora()) {
\r
2103 // CopyBackCharacter move cursor right
\r
2107 if (!CopyNextCharacter()) {
\r
2109 return Reset(GOTO_RECURSIVE);
\r
2112 if (CUtils::IsDirector()) {
\r
2113 DepressKey(VK_CONTROL);
\r
2117 return Reset(GOTO_RECURSIVE);
\r
2119 case 3: // Cut Left Character
\r
2124 CString szClipboardText;
\r
2125 CUtils::GetClipboardText(&szClipboardText);
\r
2126 // CUtils::Log(_T("%x, %d, %s"), szClipboardText.GetAt(0), szClipboardText.GetLength(), szClipboardText);
\r
2128 if (CUtils::IsDirector()
\r
2129 || CUtils::IsEudora()) {
\r
2130 // CopyNextCharacter move cursor left
\r
2134 if (!szClipboardText.IsEmpty()
\r
2135 && szClipboardText.GetAt(0) != VK_RETURN) {
\r
2136 if (CUtils::IseMemoPad()
\r
2137 || CUtils::IsFlash()
\r
2138 || CUtils::IsK2Editor()
\r
2139 || CUtils::IsShuriken()) {
\r
2142 } else if (CUtils::IsDirector()) {
\r
2143 ReleaseKey(VK_CONTROL);
\r
2147 DepressKey(VK_CONTROL);
\r
2149 SdKduSu(VK_LEFT, VK_DELETE);
\r
2152 return Reset(GOTO_RECURSIVE);
\r
2154 if (szClipboardText.IsEmpty()) { // EOF
\r
2155 if (CUtils::IsLotusNotes()
\r
2156 || CUtils::IsLotusWordPro()
\r
2157 || CUtils::IsMicrosoftFrontPage()
\r
2158 || CUtils::IsMicrosoftWord()) {
\r
2159 // These applications say "EOL is EOF".
\r
2168 return Reset(GOTO_RECURSIVE);
\r
2172 return Reset(GOTO_RECURSIVE);
\r
2174 case 4: // Paste the cut character
\r
2178 if (CUtils::IsDirector()
\r
2179 || CUtils::IseMemoPad()
\r
2180 || CUtils::IsFlash()
\r
2181 || CUtils::IsK2Editor()
\r
2182 || CUtils::IsShuriken()) {
\r
2185 SdKduSu(VK_INSERT);
\r
2188 return Reset(GOTO_RECURSIVE);
\r
2189 case 5: // Cut character at the EOF.
\r
2191 if (CUtils::IsDirector()
\r
2192 || CUtils::IseMemoPad()
\r
2193 || CUtils::IsFlash()
\r
2194 || CUtils::IsK2Editor()
\r
2195 || CUtils::IsShuriken()) {
\r
2199 SdKduSu(VK_LEFT, VK_DELETE);
\r
2202 return Reset(GOTO_RECURSIVE);
\r
2203 case 6: // Paste the cut character near the EOF.
\r
2207 if (CUtils::IsDirector()
\r
2208 || CUtils::IseMemoPad()
\r
2209 || CUtils::IsFlash()
\r
2210 || CUtils::IsK2Editor()
\r
2211 || CUtils::IsShuriken()) {
\r
2212 DepressKey(VK_CONTROL); // Why is this code needed?
\r
2215 SdKduSu(VK_INSERT);
\r
2219 return Reset(GOTO_RECURSIVE);
\r
2220 case 7: // Set the original data on the clipboard.
\r
2223 RestoreClipboardData();
\r
2224 return Reset(GOTO_HOOK);
\r
2226 return Reset(GOTO_HOOK);
\r
2229 void CCommands::Cut_()
\r
2234 int CCommands::Cut()
\r
2236 ClearNumericArgument();
\r
2237 m_bSetMark = FALSE;
\r
2239 return Reset(GOTO_HOOK);
\r
2242 void CCommands::Copy_()
\r
2244 if (CUtils::IsConsole()) {
\r
2245 SystemMenuEdit(CMD_COPY);
\r
2246 } else if (CUtils::IsEclipse()
\r
2247 || CUtils::IsStoryEditor()) {
\r
2248 CdKduCu(VK_INSERT);
\r
2254 int CCommands::Copy()
\r
2256 ClearNumericArgument();
\r
2257 m_bSetMark = FALSE;
\r
2259 return Reset(GOTO_HOOK);
\r
2262 // Copy next character of the cursor if the caret is NOT at end of the file
\r
2263 // Move the caret to left if caret is at end of the file
\r
2264 BOOL CCommands::CopyNextCharacter()
\r
2266 if (!CUtils::OpenClipboard()) {
\r
2270 if (!EmptyClipboard()) {
\r
2274 if (!CloseClipboard()) {
\r
2279 SdKduSu(VK_RIGHT);
\r
2286 BOOL CCommands::CopyBackCharacter()
\r
2288 if (!CUtils::OpenClipboard()) {
\r
2292 if (!EmptyClipboard()) {
\r
2296 if (!CloseClipboard()) {
\r
2308 BOOL CCommands::CopyPreviousLine()
\r
2310 if (!CUtils::OpenClipboard()) {
\r
2314 if (!EmptyClipboard()) {
\r
2318 if (!CloseClipboard()) {
\r
2329 BOOL CCommands::CopyCurrentLine()
\r
2331 if (!CUtils::OpenClipboard()) {
\r
2335 if (!EmptyClipboard()) {
\r
2339 if (!CloseClipboard()) {
\r
2350 void CCommands::DecreaseNumericArgument()
\r
2352 if (m_bNegativeNumericArgument) {
\r
2353 ++m_nNumericArgument;
\r
2355 if (m_nNumericArgument == 0) {
\r
2356 ++m_nNumericArgument;
\r
2357 m_bNegativeNumericArgument = TRUE;
\r
2359 --m_nNumericArgument;
\r
2364 void CCommands::ClearNumericArgument()
\r
2366 m_bDefaultNumericArgument = TRUE;
\r
2367 m_nNumericArgument = 1;
\r
2368 m_bNegativeNumericArgument = FALSE;
\r
2371 void CCommands::Reset()
\r
2376 int CCommands::Reset(int rc)
\r
2380 ClearNumericArgument();
\r
2382 case GOTO_HOOK0_9:
\r
2390 case GOTO_RECURSIVE:
\r
2393 case GOTO_DO_NOTHING:
\r
2403 int CCommands::EnableOrDisableXKeymacs()
\r
2407 static int i = 0; // If there is not this 2 line, EnableOrDisableXKeymacs, EnableXKeymacs and DisableXKeymacs has same function pointer.
\r
2409 return Reset(GOTO_HOOK);
\r
2412 int CCommands::EnableXKeymacs()
\r
2418 return Reset(GOTO_HOOK);
\r
2421 int CCommands::DisableXKeymacs()
\r
2427 return Reset(GOTO_HOOK);
\r
2430 int CCommands::GetNumericArgument()
\r
2432 return m_nNumericArgument;
\r
2436 int CCommands::IsearchBackward()
\r
2438 return Search(BACKWARD);
\r
2442 int CCommands::IsearchForward()
\r
2444 return Search(FORWARD);
\r
2447 void CCommands::OpenFindDialog()
\r
2449 if (CUtils::IsAutla()
\r
2450 || CUtils::IsBorlandCppBuilder()
\r
2451 || CUtils::IsCodeWarrior()
\r
2452 || CUtils::IsDana()
\r
2453 || CUtils::IseMemoPad()
\r
2454 || CUtils::IsJmEditor()
\r
2455 || CUtils::IsK2Editor()
\r
2456 || CUtils::IsOedit()
\r
2457 || CUtils::IsOpenJane()
\r
2458 || CUtils::IsPHPEditor()
\r
2459 || CUtils::IsStoryEditor()
\r
2460 || CUtils::IsTeraPad()) {
\r
2461 AdKduAu('S', 'F');
\r
2462 } else if (CUtils::IsConsole()) {
\r
2463 SystemMenuEdit(CMD_FIND);
\r
2464 } else if (CUtils::IsSakuraEditor()) {
\r
2465 AdKduAu('S', VK_RETURN);
\r
2466 } else if (CUtils::IsNami2000()) {
\r
2467 AdKduAu('D', 'F');
\r
2468 } else if (CUtils::IsVisualStudioDotNet()) {
\r
2469 AdKduAu('E', 'F', 'F');
\r
2470 } else if (CUtils::IsDirector()) {
\r
2471 AdKduAu('E', 'F', 'T');
\r
2472 } else if (CUtils::IsAdobeReader()) {
\r
2473 AdKduAu('E', 'S');
\r
2474 } else if (CUtils::IsDWFM()
\r
2475 || CUtils::IsEggExplorer()
\r
2476 || CUtils::IsExplorer()
\r
2477 || CUtils::IsOutlookExpress()) {
\r
2479 } else if (CUtils::IsHidemaru()
\r
2480 || CUtils::IsLunascape()
\r
2481 || CUtils::IsMicrosoftPowerPoint()
\r
2482 || CUtils::IsMozilla()
\r
2483 || CUtils::IsNetscape()
\r
2484 || CUtils::IsOpera()
\r
2485 || CUtils::IsSleipnir()) {
\r
2487 } else if (CUtils::IsDreamweaver()
\r
2488 || CUtils::IsezHTML()
\r
2489 || CUtils::IsFlash()) {
\r
2490 DepressKey(VK_CONTROL); // Why is this coad needed?
\r
2492 } else if (CUtils::IsIPMessenger()) {
\r
2493 DepressKey(VK_CONTROL);
\r
2494 PostMessage(GetFocus(), WM_KEYDOWN, 'F', 0);
\r
2495 PostMessage(GetFocus(), WM_KEYUP, 'F', 0);
\r
2496 ReleaseKey(VK_CONTROL);
\r
2499 AdKduAu('E', 'F');
\r
2502 // Set Direction if Find dialog already exist
\r
2503 if (CUtils::IsDWFM()
\r
2504 || CUtils::IsEggExplorer()
\r
2505 || CUtils::IsExplorer()
\r
2506 || CUtils::IsFirefox()
\r
2507 || CUtils::IsHidemaru()
\r
2508 || CUtils::IsK2Editor()
\r
2509 || CUtils::IsLotusWordPro()
\r
2510 || CUtils::IsMicrosoftPowerPoint()
\r
2511 || CUtils::IsMozilla()
\r
2512 || CUtils::IsMSDN()
\r
2513 || CUtils::IsNetscape()
\r
2514 || CUtils::IsOpera()
\r
2515 || CUtils::IsSakuraEditor()) {
\r
2516 } else if (CUtils::IsInternetExplorer()
\r
2517 || CUtils::IsSleipnir()) {
\r
2518 // I want to set direction but IE does not allow me.
\r
2520 SetSearchDirection();
\r
2524 int CCommands::Search(SEARCH_DIRECTION direction)
\r
2526 // CUtils::Log(_T("%s"), CUtils::GetApplicationName());
\r
2528 if (CUtils::IsIllustrator()
\r
2529 || CUtils::IsPaint()
\r
2530 || CUtils::IsPhotoshop()) {
\r
2531 return Reset(GOTO_DO_NOTHING);
\r
2534 ClearNumericArgument();
\r
2536 if ((direction != FORWARD) && (direction != BACKWARD)) {
\r
2540 if (CUtils::IsVisualCpp()
\r
2541 || CUtils::IsVisualStudioDotNet()) {
\r
2542 switch (direction) {
\r
2553 return Reset(GOTO_HOOK);
\r
2556 if (!CUtils::IsFindDialog()) {
\r
2557 // CUtils::Log(_T("Find Dialog is not."));
\r
2560 if (m_LastCommand == IsearchForward
\r
2561 || m_LastCommand == IsearchBackward) {
\r
2562 if (CUtils::IsBecky()
\r
2563 || CUtils::IsFirefox()
\r
2564 || CUtils::IsHidemaru()
\r
2565 || CUtils::IsPHPEditor()) {
\r
2566 if (m_LastCommand == IsearchForward && direction != FORWARD
\r
2567 || m_LastCommand == IsearchBackward && direction != BACKWARD) {
\r
2569 } else if (direction == FORWARD) {
\r
2571 } else if (direction == BACKWARD) {
\r
2574 return Reset(GOTO_HOOK);
\r
2575 } else if (CUtils::IsBorlandCppBuilder()) {
\r
2576 if (m_LastCommand == IsearchForward && direction != FORWARD
\r
2577 || m_LastCommand == IsearchBackward && direction != BACKWARD) {
\r
2578 AdKduAu('S', 'F');
\r
2579 SetSearchDirection(direction);
\r
2584 return Reset(GOTO_HOOK);
\r
2588 m_SearchDirection = direction;
\r
2591 // CUtils::Log(_T("Find Dialog is opened."));
\r
2593 if (CUtils::IsHidemaru()
\r
2594 || CUtils::IsK2Editor()
\r
2595 || CUtils::IsOedit()
\r
2596 || CUtils::IsSakuraEditor()) {
\r
2597 BYTE bDirection = 0;
\r
2599 if (direction == FORWARD) {
\r
2600 bDirection = GetDirectionForwardKey();
\r
2601 } else if (direction == BACKWARD) {
\r
2602 bDirection = GetDirectionBackwardKey();
\r
2606 AdKduAu(bDirection);
\r
2607 } else if (CUtils::IsBorlandCppBuilder()) {
\r
2608 if (m_SearchDirection != direction) {
\r
2609 SetSearchDirection(direction);
\r
2613 } else if (CUtils::IsJmEditor()
\r
2614 || CUtils::IsPHPEditor()) {
\r
2616 } else if (CUtils::IsAutla()) {
\r
2617 if (direction == FORWARD) {
\r
2619 } else if (direction == BACKWARD) {
\r
2625 if (m_SearchDirection != direction) {
\r
2626 // Set Direction if Find dialog already exist
\r
2627 if (CUtils::IsConsole()) {
\r
2628 SetSearchDirection(BACKWARD); // bad style
\r
2629 m_SearchDirection = direction;
\r
2631 SetSearchDirection(direction);
\r
2633 return Reset(GOTO_HOOK);
\r
2636 // "Find Next(F)" if Find dialog already exist
\r
2637 if (CUtils::IsStoryEditor()) {
\r
2643 // open Find dialog again
\r
2644 CString szDialogTitle;
\r
2645 CUtils::GetFindDialogTitle(&szDialogTitle);
\r
2646 if (CUtils::IsNami2000()) {
\r
2647 AdKduAu('D', 'F');
\r
2648 SetSearchDirection();
\r
2649 } else if (CUtils::IsOutlook()
\r
2650 && szDialogTitle.Compare(_T("
\8c\9f\8dõ"))) {
\r
2651 // Outlook (w/o Japanese version)
\r
2652 AdKduAu('E', 'F');
\r
2653 } else if (CUtils::IsVisualCpp()) {
\r
2655 DepressKey(VK_CONTROL); // Why is this need???
\r
2656 } else if (CUtils::IsCodeWarrior()
\r
2657 || CUtils::IsDana()
\r
2658 || CUtils::IsStoryEditor()
\r
2659 || CUtils::IsTeraPad()) {
\r
2660 AdKduAu('S', 'F');
\r
2661 } else if (CUtils::IsezHTML()) {
\r
2665 // set cursor at end of FindWhat
\r
2666 if (CUtils::IsMozilla()
\r
2667 || CUtils::IsNetscape()) {
\r
2669 } else if (CUtils::IsMicrosoftWord()) {
\r
2670 CUtils::UpdateKeyboardState(VK_CONTROL, 0);
\r
2671 ReleaseKey(VK_CONTROL);
\r
2677 DepressKey(VK_CONTROL);
\r
2678 CUtils::UpdateKeyboardState(VK_CONTROL, 1);
\r
2680 AdKduAu(GetFindWhatKey());
\r
2685 return Reset(GOTO_HOOK);
\r
2688 void CCommands::SetSearchDirection(SEARCH_DIRECTION direction)
\r
2690 // CUtils::Log(_T("SetSearchDirection: %d"), direction);
\r
2691 if ((direction != FORWARD) && (direction != BACKWARD)) {
\r
2695 m_SearchDirection = direction;
\r
2697 if (GetDirectionForwardKey() == 0 && GetDirectionBackwardKey() == 0) {
\r
2700 } else if (CUtils::IsConsole()) {
\r
2701 if (direction == BACKWARD) { // bad style
\r
2702 Kdu(VK_TAB, VK_TAB);
\r
2704 SdKduSu(VK_TAB, VK_TAB);
\r
2706 } else if (CUtils::IsMicrosoftWord()) {
\r
2707 CUtils::UpdateKeyboardState(VK_CONTROL, 0);
\r
2708 ReleaseKey(VK_CONTROL);
\r
2711 AdKduAu(0xBA); // VK_OEM_1 Used for miscellaneous characters; it can vary by keyboard.
\r
2712 // Windows 2000/XP: For the US standard keyboard, the ';:' key
\r
2713 Kdu(VK_UP, VK_UP);
\r
2714 if (direction == BACKWARD) {
\r
2721 DepressKey(VK_CONTROL);
\r
2722 CUtils::UpdateKeyboardState(VK_CONTROL, 1);
\r
2723 } else if (CUtils::IsLotusNotes()) {
\r
2724 BYTE bDirection = 0;
\r
2726 if (direction == FORWARD) {
\r
2727 bDirection = GetDirectionForwardKey();
\r
2728 } else if (direction == BACKWARD) {
\r
2729 bDirection = GetDirectionBackwardKey();
\r
2732 AdKduAu(GetSearchOptionKey(), bDirection, GetSearchOptionKey());
\r
2734 CString szDialogTitle;
\r
2735 CUtils::GetFindDialogTitle(&szDialogTitle);
\r
2737 if (!szDialogTitle.Compare(_T("
\8c\9f\8dõ"))
\r
2738 || !szDialogTitle.Compare(_T("Find"))) {
\r
2741 SdKduSu(VK_TAB, VK_TAB);
\r
2745 } else if (CUtils::IsBecky()) {
\r
2746 AdKduAu(GetDirectionForwardKey());
\r
2747 if (direction == BACKWARD) {
\r
2750 Kdu(VK_TAB, VK_TAB, VK_TAB, VK_TAB);
\r
2752 } else if (CUtils::IsMozilla()
\r
2753 || CUtils::IsNetscape()) {
\r
2754 Kdu(VK_TAB, VK_TAB, VK_TAB, VK_SPACE);
\r
2755 SdKduSu(VK_TAB, VK_TAB, VK_TAB);
\r
2756 } else if (CUtils::IsezHTML()) {
\r
2757 BYTE bDirection = 0;
\r
2759 if (direction == FORWARD) {
\r
2760 bDirection = GetDirectionForwardKey();
\r
2761 } else if (direction == BACKWARD) {
\r
2762 bDirection = GetDirectionBackwardKey();
\r
2765 AdKduAu(bDirection);
\r
2766 SdKduSu(VK_TAB, VK_TAB, VK_TAB, VK_TAB);
\r
2769 BYTE bDirection = 0;
\r
2771 if (direction == FORWARD) {
\r
2772 bDirection = GetDirectionForwardKey();
\r
2773 } else if (direction == BACKWARD) {
\r
2774 bDirection = GetDirectionBackwardKey();
\r
2777 // CUtils::Log(_T("aSetSearchDirection: Direction = %c, FindWhatKey = %c"), bDirection, GetFindWhatKey());
\r
2778 AdKduAu(bDirection, GetFindWhatKey());
\r
2782 // C-x C-j, C-o, C-\, C-BACKSLASH
\r
2783 int CCommands::ToggleInputMethod()
\r
2785 SetInputMethodOpenStatus(TOGGLE_INPUT_METHOD);
\r
2786 return Reset(GOTO_HOOK);
\r
2789 int CCommands::CompleteToggleInputMethod()
\r
2791 SetInputMethodOpenStatus(TOGGLE_INPUT_METHOD, TRUE);
\r
2792 return Reset(GOTO_HOOK);
\r
2795 int CCommands::OpenInputMethod()
\r
2797 SetInputMethodOpenStatus(OPEN_INPUT_METHOD);
\r
2798 return Reset(GOTO_HOOK);
\r
2801 int CCommands::CloseInputMethod()
\r
2803 SetInputMethodOpenStatus(CLOSE_INPUT_METHOD);
\r
2804 return Reset(GOTO_HOOK);
\r
2807 int CCommands::CompleteCloseInputMethod()
\r
2809 SetInputMethodOpenStatus(CLOSE_INPUT_METHOD, TRUE);
\r
2810 return Reset(GOTO_HOOK);
\r
2813 void CCommands::SetInputMethodOpenStatus(INPUT_METHOD_OPEN_STATUS status, BOOL isComplete)
\r
2815 ClearNumericArgument();
\r
2816 HKL hKL = GetKeyboardLayout(0);
\r
2817 if (CUtils::IsConsole()) {
\r
2819 } else if (ImmIsIME(hKL)) {
\r
2821 HWND hWnd = GetFocus();
\r
2822 HIMC hIMC = ImmGetContext(hWnd);
\r
2824 if (isComplete && ImmGetOpenStatus(hIMC)) {
\r
2825 ImmNotifyIME(hIMC, NI_COMPOSITIONSTR, CPS_COMPLETE, 0);
\r
2829 case CLOSE_INPUT_METHOD:
\r
2830 ImmSetOpenStatus(hIMC, FALSE);
\r
2832 case OPEN_INPUT_METHOD:
\r
2833 ImmSetOpenStatus(hIMC, TRUE);
\r
2835 case TOGGLE_INPUT_METHOD:
\r
2836 ImmSetOpenStatus(hIMC, !ImmGetOpenStatus(hIMC));
\r
2843 ImmReleaseContext(hWnd, hIMC);
\r
2850 int CCommands::KillBuffer()
\r
2853 return Reset(GOTO_HOOK);
\r
2856 BOOL CCommands::IsKillCommand(int (*nFunctionPointer)())
\r
2858 for (int nCommandID = 1; nCommandID < MAX_COMMAND; ++nCommandID) {
\r
2859 if (Commands[nCommandID].fCommand == nFunctionPointer) {
\r
2860 return !_tcsncmp(Commands[nCommandID].szCommandName, _T("kill-"), 5);
\r
2866 void CCommands::SetLastCommand(int (__cdecl *LastCommand)(void))
\r
2868 m_LastCommand = LastCommand;
\r
2870 if (IsKillCommand(LastCommand)) {
\r
2871 m_LastKillCommand = LastCommand;
\r
2876 int CCommands::KillWord()
\r
2878 if (CUtils::IsMicrosoftPowerPoint()
\r
2879 || CUtils::IsThunderbird()) {
\r
2880 CdKduCu(VK_DELETE);
\r
2881 return Reset(GOTO_HOOK);
\r
2884 static int nStep = 0;
\r
2885 static CString szClipboardText;
\r
2886 static int nWhiteSpace = 0;
\r
2889 // CUtils::Log(_T("M-d: 0"));
\r
2890 ClearNumericArgument();
\r
2891 szClipboardText.Empty();
\r
2893 CdSdKduSuCu(VK_RIGHT);
\r
2896 return Reset(GOTO_RECURSIVE);
\r
2899 // CUtils::Log(_T("M-d: 1"));
\r
2901 CUtils::GetClipboardText(&szClipboardText);
\r
2902 int nWordEnd = szClipboardText.GetLength();
\r
2903 int nFirstSpace = szClipboardText.Find(_T(' '));
\r
2904 // CUtils::Log(_T("M-d: 1-1 _%s_%c"), szClipboardText, szClipboardText.GetAt(szClipboardText.GetLength() - 1));
\r
2905 if (nFirstSpace == 0) {
\r
2906 // CUtils::Log(_T("M-d: 1-1-1"));
\r
2908 return Reset(GOTO_RECURSIVE);
\r
2909 } else if (0 < nFirstSpace) {
\r
2910 // CUtils::Log(_T("M-d: 1-1-2"));
\r
2911 nWordEnd = nFirstSpace; // (nFirstSpace + 1) - 1
\r
2913 int nFirstTab = szClipboardText.Find(_T('\t'));
\r
2914 if (nFirstTab == 0) {
\r
2915 // CUtils::Log(_T("M-d: 1-2-1"));
\r
2917 return Reset(GOTO_RECURSIVE);
\r
2918 } else if (0 < nFirstTab && nFirstTab < nWordEnd) {
\r
2919 // CUtils::Log(_T("M-d: 1-2-2"));
\r
2920 nWordEnd = nFirstTab; // (nFirstTab + 1) - 1
\r
2922 if (nWordEnd == szClipboardText.GetLength()) {
\r
2923 // CUtils::Log(_T("M-d: 1-3-1"));
\r
2926 // CUtils::Log(_T("M-d: 1-3-2"));
\r
2927 CString szEndWhiteSpace;
\r
2928 nWhiteSpace = szClipboardText.GetLength() - nWordEnd;
\r
2929 szEndWhiteSpace = szClipboardText.Right(nWhiteSpace);
\r
2930 CUtils::SetClipboardText(&szEndWhiteSpace);
\r
2931 szClipboardText = szClipboardText.Left(nWordEnd);
\r
2934 return Reset(GOTO_RECURSIVE);
\r
2937 // CUtils::Log(_T("M-d: 2"));
\r
2941 return Reset(GOTO_RECURSIVE);
\r
2943 // CUtils::Log(_T("M-d: 3"));
\r
2945 m_bDefaultNumericArgument = FALSE;
\r
2946 m_nNumericArgument = nWhiteSpace;
\r
2949 return Reset(GOTO_RECURSIVE);
\r
2951 // CUtils::Log(_T("M-d: 4"));
\r
2953 CUtils::SetClipboardText(&szClipboardText);
\r
2955 return Reset(GOTO_RECURSIVE);
\r
2957 // CUtils::Log(_T("M-d: 5"));
\r
2959 CXkeymacsDll::AddKillRing();
\r
2960 m_bSetMark = FALSE;
\r
2961 return Reset(GOTO_HOOK);
\r
2964 return Reset(GOTO_HOOK);
\r
2968 int CCommands::BackwardKillWord()
\r
2970 CdSdKduSuCu(VK_LEFT);
\r
2972 return Reset(GOTO_HOOK);
\r
2976 int CCommands::SelectAll()
\r
2978 if (CUtils::IsConsole()) {
\r
2979 SystemMenuEdit(CMD_SELECT_ALL);
\r
2983 return Reset(GOTO_HOOK);
\r
2987 int CCommands::StartKbdMacro()
\r
2989 if (CUtils::IsMicrosoftWord()) {
\r
2990 AdKduAu('T', 'M', 'R');
\r
2991 } else if (CUtils::IsHidemaru()) {
\r
2994 CXkeymacsDll::DefiningMacro(TRUE);
\r
2996 return Reset(GOTO_HOOK);
\r
3000 int CCommands::EndKbdMacro()
\r
3002 if (CUtils::IsMicrosoftWord()) {
\r
3003 AdKduAu('T', 'M', 'R');
\r
3004 } else if (CUtils::IsHidemaru()) {
\r
3007 CXkeymacsDll::DefiningMacro(FALSE);
\r
3009 return Reset(GOTO_HOOK);
\r
3013 int CCommands::CallLastKbdMacro()
\r
3015 if (CUtils::IsMicrosoftWord()) {
\r
3016 AdKduAu('T', 'M', 'M');
\r
3017 } else if (CUtils::IsHidemaru()) {
\r
3019 if (!m_bDefaultNumericArgument) {
\r
3020 n = m_nNumericArgument;
\r
3022 ClearNumericArgument();
\r
3024 AdKduAu('M', 'P');
\r
3027 while (m_nNumericArgument--) {
\r
3028 CXkeymacsDll::CallMacro();
\r
3031 return Reset(GOTO_HOOK);
\r
3034 int CCommands::SwitchBetweenInputLocales()
\r
3036 BOOL bIsCtrlDown = CXkeymacsDll::IsDown(VK_CONTROL, FALSE);
\r
3037 BOOL bIsAltDown = CXkeymacsDll::IsDown(VK_MENU, FALSE);
\r
3040 if (bIsCtrlDown) {
\r
3041 ReleaseKey(VK_CONTROL);
\r
3043 DepressKey(VK_MENU); // why?
\r
3044 ReleaseKey(VK_MENU);
\r
3045 DepressKey(VK_MENU);
\r
3046 DepressKey(VK_SHIFT);
\r
3047 ReleaseKey(VK_SHIFT);
\r
3048 if (!bIsAltDown) {
\r
3049 ReleaseKey(VK_MENU);
\r
3051 if (bIsCtrlDown) {
\r
3052 DepressKey(VK_CONTROL);
\r
3055 return Reset(GOTO_HOOK);
\r
3059 int CCommands::SwitchToBuffer()
\r
3061 ClearNumericArgument();
\r
3062 // GetWindowInfo does not get information to find out if the window is MDI or SDI.
\r
3064 return Reset(GOTO_HOOK);
\r
3067 int CCommands::C_()
\r
3069 return Reset(GOTO_HOOKX);
\r
3072 int CCommands::C_Eisu()
\r
3075 return Reset(GOTO_HOOKX);
\r
3078 int CCommands::Escape()
\r
3080 ClearNumericArgument();
\r
3082 return Reset(GOTO_HOOK);
\r
3085 int CCommands::Tilde()
\r
3087 ClearNumericArgument();
\r
3088 if (CXkeymacsDll::Is106Keyboard()) {
\r
3089 SdKduSu(0xDE); // VK_OEM_7 Used for miscellaneous characters; it can vary by keyboard.
\r
3090 Su(); // Windows 2000/XP: For the US standard keyboard, the 'single-quote/double-quote' key
\r
3092 SdKduSu(0xC0); // VK_OEM_3 Used for miscellaneous characters; it can vary by keyboard.
\r
3093 Su(); // Windows 2000/XP: For the US standard keyboard, the '`~' key
\r
3095 return Reset(GOTO_HOOK);
\r
3098 int CCommands::BackQuote()
\r
3100 ClearNumericArgument();
\r
3101 if (CXkeymacsDll::Is106Keyboard()) {
\r
3105 ReleaseKey(VK_SHIFT);
\r
3106 Kdu(0xC0); // VK_OEM_3 Used for miscellaneous characters; it can vary by keyboard.
\r
3107 // Windows 2000/XP: For the US standard keyboard, the '`~' key
\r
3109 return Reset(GOTO_HOOK);
\r
3112 BOOL CCommands::IsSetMark()
\r
3114 return m_bSetMark;
\r
3117 BYTE CCommands::GetFindWhatKey()
\r
3119 BYTE bFindWhat = 'N';
\r
3121 if (CUtils::IsBecky()
\r
3122 || CUtils::IsDana()
\r
3123 || CUtils::IsEclipse()
\r
3124 || CUtils::IsezHTML()
\r
3125 || CUtils::IsLotusNotes()
\r
3126 || CUtils::IsVisualBasicEditor()) {
\r
3128 } else if (CUtils::IseMemoPad()) {
\r
3130 } else if (CUtils::IsHidemaru()
\r
3131 || CUtils::IsJmEditor()) {
\r
3133 } else if (CUtils::IsBorlandCppBuilder()
\r
3134 || CUtils::IsNami2000()
\r
3135 || CUtils::IsStoryEditor()
\r
3136 || CUtils::IsTeraPad()) {
\r
3138 } else if (CUtils::IsAdobeReader()
\r
3139 || CUtils::IsAutla()
\r
3140 || CUtils::IsCodeWarrior()
\r
3141 || CUtils::IsFirefox()
\r
3142 || CUtils::IsFlash()
\r
3143 || CUtils::IsIPMessenger()
\r
3144 || CUtils::IsK2Editor()
\r
3145 || CUtils::IsOedit()
\r
3146 || CUtils::IsOpera()
\r
3147 || CUtils::IsOpenJane()
\r
3148 || CUtils::IsPHPEditor()
\r
3149 || CUtils::IsSakuraEditor()) {
\r
3156 BYTE CCommands::GetSearchOptionKey()
\r
3158 BYTE bSearchOption = 0;
\r
3160 if (CUtils::IsLotusNotes()) {
\r
3161 bSearchOption = 'O';
\r
3164 return bSearchOption;
\r
3167 BYTE CCommands::GetDirectionForwardKey()
\r
3169 BYTE bDirectionForward = 'D';
\r
3170 CString szDialogTitle;
\r
3171 CUtils::GetFindDialogTitle(&szDialogTitle);
\r
3173 if (CUtils::IsAdobeReader()
\r
3174 || CUtils::IsAutla()
\r
3175 || CUtils::IsCodeWarrior()
\r
3176 || CUtils::IsDirector()
\r
3177 || CUtils::IsDreamweaver()
\r
3178 || CUtils::IsExcel()
\r
3179 || CUtils::IsFirefox()
\r
3180 || CUtils::IsFireworks()
\r
3181 || CUtils::IsFlash()
\r
3182 || CUtils::IsIPMessenger()
\r
3183 || CUtils::IsJmEditor()
\r
3184 || CUtils::IsLotus123()
\r
3185 || CUtils::IsMicrosoftPowerPoint()
\r
3186 || CUtils::IsOpera()
\r
3187 || CUtils::IsOpenJane()
\r
3188 || CUtils::IsStoryEditor()
\r
3189 || CUtils::IsVisualBasicEditor()
\r
3190 || CUtils::IsVisualStudioDotNet()
\r
3191 || CUtils::IsWordpad()) {
\r
3192 bDirectionForward = 0;
\r
3193 } else if (CUtils::IsLotusNotes()
\r
3194 || CUtils::IsNami2000()
\r
3195 || CUtils::IsSakuraEditor()) {
\r
3196 bDirectionForward = 'D';
\r
3197 } else if (CUtils::IsOedit()) {
\r
3198 bDirectionForward = 'F';
\r
3199 } else if (CUtils::IsBecky()) {
\r
3200 if (!szDialogTitle.Compare(_T("
\96{
\95¶
\93Ã
\8c\9f\8dõ"))) {
\r
3201 bDirectionForward = 'O';
\r
3203 bDirectionForward = 0;
\r
3205 } else if (CUtils::IsK2Editor()) {
\r
3206 bDirectionForward = 'L';
\r
3207 } else if (CUtils::IseMemoPad()
\r
3208 || CUtils::IsHidemaru()) {
\r
3209 bDirectionForward = 'N';
\r
3210 } else if (CUtils::IsEclipse()) {
\r
3211 bDirectionForward = 'O';
\r
3214 if (CUtils::IsOutlook()
\r
3215 && !szDialogTitle.Compare(_T("Find"))) {
\r
3216 // Outlook (English version)
\r
3217 bDirectionForward = 0;
\r
3220 return bDirectionForward;
\r
3223 BYTE CCommands::GetDirectionBackwardKey()
\r
3225 BYTE bDirectionBackward = 'U';
\r
3226 CString szDialogTitle;
\r
3227 CUtils::GetFindDialogTitle(&szDialogTitle);
\r
3229 if (CUtils::IsAdobeReader()
\r
3230 || CUtils::IsAutla()
\r
3231 || CUtils::IsCodeWarrior()
\r
3232 || CUtils::IsDirector()
\r
3233 || CUtils::IsDreamweaver()
\r
3234 || CUtils::IsExcel()
\r
3235 || CUtils::IsFirefox()
\r
3236 || CUtils::IsFireworks()
\r
3237 || CUtils::IsFlash()
\r
3238 || CUtils::IsIPMessenger()
\r
3239 || CUtils::IsJmEditor()
\r
3240 || CUtils::IsLotus123()
\r
3241 || CUtils::IsMicrosoftPowerPoint()
\r
3242 || CUtils::IsOpera()
\r
3243 || CUtils::IsOpenJane()
\r
3244 || CUtils::IsStoryEditor()
\r
3245 || CUtils::IsVisualBasicEditor()
\r
3246 || CUtils::IsWordpad()) {
\r
3247 bDirectionBackward = 0;
\r
3248 } else if (CUtils::IsBorlandCppBuilder()
\r
3249 || CUtils::IsEclipse()
\r
3250 || CUtils::IseMemoPad()
\r
3251 || CUtils::IsLotusNotes()
\r
3252 || CUtils::IsNami2000()) {
\r
3253 bDirectionBackward = 'B';
\r
3254 } else if (CUtils::IsBecky()) {
\r
3255 if (!szDialogTitle.Compare(_T("
\96{
\95¶
\93Ã
\8c\9f\8dõ"))) {
\r
3256 bDirectionBackward = 'B';
\r
3258 bDirectionBackward = 0;
\r
3260 } else if (CUtils::IsHidemaru()
\r
3261 || CUtils::IsOedit()) {
\r
3262 bDirectionBackward = 'P';
\r
3263 } else if (CUtils::IsK2Editor()
\r
3264 || CUtils::IsSakuraEditor()) {
\r
3265 bDirectionBackward = 'U';
\r
3268 if (CUtils::IsOutlook()
\r
3269 && !szDialogTitle.Compare(_T("Find"))) {
\r
3270 // Outlook (English version)
\r
3271 bDirectionBackward = 0;
\r
3274 return bDirectionBackward;
\r
3277 void CCommands::SetMark(BOOL bSetMark)
\r
3279 m_bSetMark = bSetMark;
\r
3282 GOTO CCommands::MoveCaret(BYTE bVk, BOOL bCtrl)
\r
3304 const DWORD time = GetTickCount();
\r
3305 // CUtils::Log(_T("%d - %d = %d, %d, %d"), time, last.time, time - last.time, CXkeymacsDll::GetMaxKeyInterval(), CXkeymacsDll::GetAccelerate());
\r
3306 if (CXkeymacsDll::GetAccelerate() && bVk == last.bVk && bCtrl == last.bCtrl && time - last.time < CXkeymacsDll::GetMaxKeyInterval()) {
\r
3307 NumericArgument(CXkeymacsDll::GetAccelerate());
\r
3310 last.bCtrl = bCtrl;
\r
3321 if (CUtils::IsShuriken()) {
\r
3322 static BOOL bIsShiftDown = FALSE;
\r
3323 static int nStep = 0;
\r
3327 BOOL bIsCtrlDown = CXkeymacsDll::IsDown(VK_CONTROL, FALSE);
\r
3328 BOOL bIsAltDown = CXkeymacsDll::IsDown(VK_MENU, FALSE);
\r
3329 bIsShiftDown = CXkeymacsDll::IsDown(VK_SHIFT, FALSE);
\r
3331 if (bIsCtrlDown) {
\r
3332 ReleaseKey(VK_CONTROL);
\r
3335 ReleaseKey(VK_MENU);
\r
3337 if (!bIsShiftDown) {
\r
3338 DepressKey(VK_SHIFT);
\r
3341 CXkeymacsDll::Kdu(bVk, m_nNumericArgument);
\r
3344 DepressKey(VK_MENU);
\r
3346 if (bIsCtrlDown) {
\r
3347 DepressKey(VK_CONTROL);
\r
3350 return GOTO_RECURSIVE;
\r
3354 if (!bIsShiftDown) {
\r
3355 ReleaseKey(VK_SHIFT);
\r
3369 int CCommands::PassThrough()
\r
3372 return Reset(GOTO_HOOK);
\r
3375 int CCommands::Redo()
\r
3377 if (CUtils::IsCorelDRAW()) {
\r
3382 return Reset(GOTO_HOOK);
\r
3385 int CCommands::TemporarilyDisableXKeymacs()
\r
3387 // CUtils::Log(_T("SetTemporarilyDisableXKeymacs"));
\r
3388 SetTemporarilyDisableXKeymacs(TRUE);
\r
3390 return Reset(GOTO_HOOK);
\r
3393 BOOL CCommands::IsTemporarilyDisableXKeymacs()
\r
3395 return m_bTemporarilyDisableXKeymacs;
\r
3398 void CCommands::SetTemporarilyDisableXKeymacs(BOOL bTemporarilyDisableXKeymacs)
\r
3400 m_bTemporarilyDisableXKeymacs = bTemporarilyDisableXKeymacs;
\r
3401 CXkeymacsDll::SetKeyboardHookFlag();
\r
3404 int CCommands::New()
\r
3406 ClearNumericArgument();
\r
3407 m_bSetMark = FALSE;
\r
3409 return Reset(GOTO_HOOK);
\r
3412 int CCommands::Print()
\r
3414 ClearNumericArgument();
\r
3415 m_bSetMark = FALSE;
\r
3417 return Reset(GOTO_HOOK);
\r
3420 int CCommands::Find()
\r
3422 ClearNumericArgument();
\r
3423 m_bSetMark = FALSE;
\r
3425 return Reset(GOTO_HOOK);
\r
3428 int CCommands::FindNext()
\r
3430 ClearNumericArgument();
\r
3431 m_bSetMark = FALSE;
\r
3433 return Reset(GOTO_HOOK);
\r
3436 int CCommands::SystemMenu(const CONSOLE_MENU nDown)
\r
3438 // CUtils::Log(_T("SystemMenu"));
\r
3439 if (!CUtils::IsConsole()) {
\r
3440 return ERROR_SUCCESS;
\r
3443 RECT consoleWindowRect = {'\0'};
\r
3444 if (!GetWindowRect(GetForegroundWindow(), &consoleWindowRect)) {
\r
3445 return GetLastError();
\r
3447 // CUtils::Log(_T("t = %d, l = %d"), consoleWindowRect.top, consoleWindowRect.left);
\r
3449 const POINT clickPoint = {consoleWindowRect.left + 5, consoleWindowRect.top + 5};
\r
3450 int rc = Click(&clickPoint);
\r
3451 if (rc != ERROR_SUCCESS) {
\r
3455 if (nDown != CMD_EDIT) {
\r
3456 for (int i = 0; i <= nDown; ++i) {
\r
3462 return ERROR_SUCCESS; // i.e. return 0;
\r
3465 int CCommands::SystemMenuEdit(const CONSOLE_MENU_EDIT nDown)
\r
3467 if (!CUtils::IsConsole()) {
\r
3468 return ERROR_SUCCESS;
\r
3471 SystemMenu(CMD_EDIT);
\r
3472 RECT consoleWindowRect = {'\0'};
\r
3473 if (!GetWindowRect(GetForegroundWindow(), &consoleWindowRect)) {
\r
3474 return GetLastError();
\r
3477 const int y = GetSystemMetrics(SM_CYCAPTION) + GetSystemMetrics(SM_CYMENU) * 6 + 20; // y = A + B * 6 + 20
\r
3478 const POINT clickPoint = {consoleWindowRect.left + 50, consoleWindowRect.top + y}; // 146 <= y <= 161 on W2K (146 + 161 + 1) / 2 = 154 = 19 + 19 x 6 + 21
\r
3479 int rc = Click(&clickPoint); // 157 <= y <= 172 on WXP (157 + 172 + 1) / 2 = 165 = 26 + 20 x 6 + 19
\r
3480 if (rc != ERROR_SUCCESS) {
\r
3484 for (int i = 0; i <= nDown; ++i) {
\r
3487 Kdu(VK_UP); // Why? Because Mark did not work well only one VK_DOWN (or seven VK_DOWNs).
\r
3490 return ERROR_SUCCESS; // i.e. return 0;
\r
3493 int CCommands::Click(const POINT *const pClickPoint)
\r
3495 BOOL bIsAltDown = CXkeymacsDll::IsDown(VK_MENU, FALSE);
\r
3497 POINT CursorPos = {'\0'};
\r
3498 if (!GetCursorPos(&CursorPos)) {
\r
3499 return GetLastError();
\r
3502 if (!SetCursorPos(pClickPoint->x, pClickPoint->y)) {
\r
3503 return GetLastError();
\r
3505 if (CUtils::IsConsole()
\r
3507 ReleaseKey(VK_MENU);
\r
3509 mouse_event(MOUSEEVENTF_LEFTDOWN, 0, 0, 0, GetMessageExtraInfo());
\r
3510 mouse_event(MOUSEEVENTF_LEFTUP, 0, 0, 0, GetMessageExtraInfo());
\r
3511 if (!SetCursorPos(CursorPos.x, CursorPos.y)) {
\r
3512 return GetLastError();
\r
3514 return ERROR_SUCCESS;
\r
3518 int CCommands::TransposeLines()
\r
3520 static int nStep = 0;
\r
3524 // CUtils::Log(_T("C-x C-t: 0"));
\r
3526 CaptureClipboardData();
\r
3528 return Reset(GOTO_RECURSIVE);
\r
3531 // CUtils::Log(_T("C-x C-t: 1"));
\r
3532 if (!CopyNextCharacter()) {
\r
3533 return Reset(GOTO_DO_NOTHING);
\r
3536 return Reset(GOTO_RECURSIVE);
\r
3539 // CUtils::Log(_T("C-x C-t: 2"));
\r
3541 if (CUtils::IsEOF()) {
\r
3542 Kdu(VK_END, VK_RETURN, VK_UP, VK_END);
\r
3546 return Reset(GOTO_RECURSIVE);
\r
3549 // CUtils::Log(_T("C-x C-t: 3"));
\r
3550 if (!CopyBackCharacter()) {
\r
3551 return Reset(GOTO_DO_NOTHING);
\r
3554 return Reset(GOTO_RECURSIVE);
\r
3557 // CUtils::Log(_T("C-x C-t: 4"));
\r
3559 if (CUtils::IsTOF()) { // TOF
\r
3560 Kdu(VK_DOWN, VK_END);
\r
3561 // CUtils::Log(_T("C-x C-t: TOF"));
\r
3566 return Reset(GOTO_RECURSIVE);
\r
3569 // CUtils::Log(_T("C-x C-t: 5"));
\r
3570 if (!CopyNextCharacter()) {
\r
3571 return Reset(GOTO_DO_NOTHING);
\r
3574 return Reset(GOTO_RECURSIVE);
\r
3577 // CUtils::Log(_T("C-x C-t: 6"));
\r
3579 if (CUtils::IsEOF()) {
\r
3580 Kdu(VK_END, VK_RETURN, VK_UP, VK_END);
\r
3581 // CUtils::Log(_T("C-x C-t: EOF2"));
\r
3584 return Reset(GOTO_RECURSIVE);
\r
3587 // CUtils::Log(_T("C-x C-t: 7"));
\r
3588 Kdu(VK_UP, VK_HOME);
\r
3592 return Reset(GOTO_RECURSIVE);
\r
3595 // CUtils::Log(_T("C-x C-t: 8"));
\r
3600 return Reset(GOTO_RECURSIVE);
\r
3603 // CUtils::Log(_T("C-x C-t: 9"));
\r
3604 RestoreClipboardData();
\r
3607 return Reset(GOTO_HOOK);
\r
3610 void CCommands::CaptureClipboardData(const int nID, const BOOL bTextOnly)
\r
3612 // CUtils::Log("CaptureClipboardData: 1");
\r
3614 int nSize = nID + 1;
\r
3615 if (m_oClipboardData.GetSize() < nSize) {
\r
3616 // CUtils::Log("CaptureClipboardData: 2");
\r
3618 m_oClipboardData.SetSize(nSize);
\r
3620 catch (CMemoryException* e) {
\r
3622 // CUtils::Log("CaptureClipboardData: SetSize() threw an exception");
\r
3627 // CUtils::Log("CaptureClipboardData: 3");
\r
3628 if (!m_oClipboardData[nID]) {
\r
3629 // CUtils::Log("CaptureClipboardData: 4");
\r
3631 CClipboardSnap *pSnap = new CClipboardSnap;
\r
3633 // CUtils::Log("CaptureClipboardData: 5");
\r
3636 m_oClipboardData.SetAt(nID, pSnap);
\r
3638 catch (CMemoryException* e) {
\r
3640 // CUtils::Log("CaptureClipboardData: 'new' threw an exception");
\r
3644 // CUtils::Log("CaptureClipboardData: 6: nID=%d, size=%d", nID, m_oClipboardData.GetSize());
\r
3645 BOOL bCapture = m_oClipboardData[nID]->Capture(bTextOnly);
\r
3646 // CUtils::Log("CaptureClipboardData: 7");
\r
3647 Sleep(0); // for OpenOffice
\r
3648 bCapture = m_oClipboardData[nID]->Capture(bTextOnly); // for "office drawing shape format". Can CClipboardSnap care this problem?
\r
3650 // CUtils::Log("CaptureClipboardData: 8");
\r
3652 // CUtils::Log(_T("Can not Capture in CaptureClipboardData"));
\r
3653 delete m_oClipboardData[nID];
\r
3654 // CUtils::Log("CaptureClipboardData: 9");
\r
3655 m_oClipboardData.SetAt(nID, NULL);
\r
3656 // CUtils::Log("CaptureClipboardData: 10");
\r
3660 void CCommands::RestoreClipboardData(const int nID)
\r
3662 if (nID + 1 <= m_oClipboardData.GetSize() && m_oClipboardData[nID]) {
\r
3663 m_oClipboardData[nID]->Restore();
\r
3667 int CCommands::FindReturnFromClipboardData(const int nID)
\r
3669 if (nID + 1 <= m_oClipboardData.GetSize() && m_oClipboardData[nID]) {
\r
3670 return m_oClipboardData[nID]->FindReturn();
\r
3675 BOOL CCommands::IsEmptyClipboardData(const int nID)
\r
3677 if (nID + 1 <= m_oClipboardData.GetSize() && m_oClipboardData[nID]) {
\r
3678 return m_oClipboardData[nID]->IsEmpty();
\r
3683 void CCommands::PrintFunctionName(int (*nFunctionPointer)())
\r
3685 for (int nCommandID = 1; nCommandID < MAX_COMMAND; ++nCommandID) {
\r
3686 if (Commands[nCommandID].fCommand == nFunctionPointer) {
\r
3687 CUtils::Log(_T("m_LastCommand: %s"), Commands[nCommandID].szCommandName);
\r
3692 int CCommands::CapsLock()
\r
3694 ClearNumericArgument();
\r
3696 return Reset(GOTO_HOOK);
\r
3699 int CCommands::Underscore()
\r
3701 ClearNumericArgument();
\r
3702 if (CXkeymacsDll::Is106Keyboard()) {
\r
3703 SdKduSu(0xE2); // VK_OEM_102 Windows 2000/XP: Either the angle bracket key or the backslash key on the RT 102-key keyboard
\r
3706 SdKduSu(0xBD); // VK_OEM_MINUS Windows 2000/XP: For any country/region, the '-' key
\r
3709 return Reset(GOTO_HOOK);
\r
3712 int CCommands::RollUpUnroll()
\r
3714 return Maximize(ROLL_UP_UNROLL);
\r
3717 int CCommands::Retop()
\r
3719 RECT ClientRect = {'\0'};
\r
3720 GetClientRect(GetFocus(), &ClientRect);
\r
3722 for (int i = 0; i < 0x10000; ++i) {
\r
3723 POINT CaretPos = {'\0'};
\r
3724 GetCaretPos(&CaretPos);
\r
3725 if (ClientRect.top + 10 < CaretPos.y) {
\r
3726 SendMessage(GetFocus(), WM_VSCROLL, SB_LINEDOWN, NULL);
\r
3728 return Reset(GOTO_HOOK);
\r
3732 Kdu(VK_UP, VK_DOWN);
\r
3733 return Reset(GOTO_HOOK);
\r
3736 int CCommands::OneShotModifierShift()
\r
3742 return Reset(GOTO_HOOK);
\r
3745 int CCommands::OneShotModifierShiftRepeat()
\r
3751 return Reset(GOTO_HOOK);
\r
3754 int CCommands::OneShotModifierCtrl()
\r
3760 return Reset(GOTO_HOOK);
\r
3763 int CCommands::OneShotModifierCtrlRepeat()
\r
3769 return Reset(GOTO_HOOK);
\r
3772 int CCommands::OneShotModifierAlt()
\r
3778 return Reset(GOTO_HOOK);
\r
3781 int CCommands::OneShotModifierAltRepeat()
\r
3787 return Reset(GOTO_HOOK);
\r
3790 int CCommands::CycleItems()
\r
3792 ClearNumericArgument();
\r
3793 AdKduAu(VK_ESCAPE);
\r
3794 return Reset(GOTO_HOOK);
\r
3797 int CCommands::CycleItemsInversely()
\r
3799 ClearNumericArgument();
\r
3800 AdSdKduSuAu(VK_ESCAPE);
\r
3801 return Reset(GOTO_HOOK);
\r
3805 int CCommands::TransposeWords()
\r
3807 static int nStep = 0;
\r
3811 // CUtils::Log(_T("M-t: 0"));
\r
3813 CaptureClipboardData();
\r
3815 return Reset(GOTO_RECURSIVE);
\r
3818 // CUtils::Log(_T("M-t: 1"));
\r
3819 CdSdKduSuCu(VK_RIGHT);
\r
3822 return Reset(GOTO_RECURSIVE);
\r
3825 // CUtils::Log(_T("M-t: 2"));
\r
3827 CdKduCu(VK_RIGHT);
\r
3831 return Reset(GOTO_RECURSIVE);
\r
3834 // CUtils::Log(_T("M-t: 3"));
\r
3835 RestoreClipboardData();
\r
3838 return Reset(GOTO_HOOK);
\r
3841 LRESULT CCommands::VScroll(UINT nSBCode, const int nTimes)
\r
3843 if (CUtils::IsMicrosoftWord()
\r
3844 || CUtils::IsThunderbird()) {
\r
3845 RECT ClientRect = {'\0'};
\r
3846 GetClientRect(GetFocus(), &ClientRect);
\r
3848 POINT righttop = {ClientRect.right, ClientRect.top};
\r
3849 ClientToScreen(GetFocus(), &righttop);
\r
3850 // CUtils::Log(_T("righttop: x = %d, y = %d"), righttop.x, righttop.y);
\r
3852 POINT rightbottom = {ClientRect.right, ClientRect.bottom};
\r
3853 ClientToScreen(GetFocus(), &rightbottom);
\r
3854 // CUtils::Log(_T("rightbottom: x = %d, y = %d"), rightbottom.x, rightbottom.y);
\r
3856 // POINT CursorPos = {'\0'};
\r
3857 // GetCursorPos(&CursorPos);
\r
3858 // CUtils::Log(_T("VScroll: x = %d, y = %d"), CursorPos.x, CursorPos.y);
\r
3860 POINT scrollpos = {'\0'};
\r
3862 switch (nSBCode) {
\r
3864 if (CUtils::IsMicrosoftWord()) {
\r
3865 scrollpos.x = righttop.x + 8; // 0 to 16
\r
3866 scrollpos.y = righttop.y - 9; // 1 to 17
\r
3867 } else if (CUtils::IsThunderbird()) {
\r
3868 scrollpos.x = righttop.x - 10; // 2 to 18
\r
3869 scrollpos.y = righttop.y + 8; // 0 to 16
\r
3873 if (CUtils::IsMicrosoftWord()) {
\r
3874 scrollpos.x = rightbottom.x + 8; // 0 to 16
\r
3875 scrollpos.y = rightbottom.y - 60; // 52 to 68
\r
3876 } else if (CUtils::IsThunderbird()) {
\r
3877 scrollpos.x = rightbottom.x - 10; // 2 to 18
\r
3878 scrollpos.y = rightbottom.y - 9; // 1 to 17
\r
3886 for (i = 0; i < nTimes; ++i) {
\r
3887 Click(&scrollpos);
\r
3893 return SendMessage(GetFocus(), WM_VSCROLL, nSBCode, NULL);
\r
3897 int CCommands::FillParagraph()
\r
3899 static const int nFillColumn = 70; // tmp
\r
3900 static CString szClipboardText;
\r
3901 static int nOldLineLength = 0;
\r
3903 ClearNumericArgument(); // tmp
\r
3905 static int nStep = 0;
\r
3907 case 0: // Clear Selection
\r
3908 // CUtils::Log(_T("M-q: 0"));
\r
3911 CaptureClipboardData();
\r
3913 m_bSetMark = FALSE;
\r
3916 nOldLineLength = 0;
\r
3919 return Reset(GOTO_RECURSIVE);
\r
3920 case 1: // Copy previous line
\r
3921 // CUtils::Log(_T("M-q: 1"));
\r
3924 if (!CopyPreviousLine()) {
\r
3925 return Reset(GOTO_DO_NOTHING);
\r
3929 return Reset(GOTO_RECURSIVE);
\r
3930 case 2: // Check previous line to find TOP (top of paragraph)
\r
3931 // CUtils::Log(_T("M-q: 2"));
\r
3934 CUtils::GetClipboardText(&szClipboardText);
\r
3935 // CUtils::Log(_T("M-q: 2-1: _%s_"), szClipboardText);
\r
3936 if (szClipboardText.IsEmpty()) {
\r
3938 // CUtils::Log(_T("M-q: 2: TOF"));
\r
3941 } else if (szClipboardText == _T("\r\n")
\r
3942 || szClipboardText == _T("\r")
\r
3943 || szClipboardText == _T("\n")) {
\r
3944 // blank line i.e. top of paragraph
\r
3946 // WINDOWS: CR LF "\r\n"
\r
3948 // CUtils::Log(_T("M-q: 2: TOP"));
\r
3952 // middle of paragraph
\r
3953 // CUtils::Log(_T("M-q: 2: MOP_%d_"), szClipboardText.GetLength());
\r
3954 // CUtils::Log(_T("M-q: 2: MOP_%c(%d)%c(%d)"), szClipboardText.GetAt(0), szClipboardText.GetAt(0), szClipboardText.GetAt(1), szClipboardText.GetAt(1));
\r
3959 return Reset(GOTO_RECURSIVE);
\r
3960 case 3: // Go to EOL to copy a current line at the next step
\r
3961 // CUtils::Log(_T("M-q: 3"));
\r
3967 return Reset(GOTO_RECURSIVE);
\r
3968 case 4: // Copy a current line
\r
3969 // CUtils::Log(_T("M-q: 4"));
\r
3972 if (!CopyCurrentLine()) {
\r
3973 return Reset(GOTO_DO_NOTHING);
\r
3977 return Reset(GOTO_RECURSIVE);
\r
3978 case 5: // Just release shift
\r
3979 // CUtils::Log(_T("M-q: 5"));
\r
3982 ReleaseKey(VK_SHIFT);
\r
3985 return Reset(GOTO_RECURSIVE);
\r
3986 case 6: // Check current line and fill paragraph
\r
3987 // CUtils::Log(_T("M-q: 6"));
\r
3990 CUtils::GetClipboardText(&szClipboardText);
\r
3991 if (szClipboardText.GetLength() == nOldLineLength + 1) {
\r
3992 // CUtils::Log(_T("M-q: 6-1 Finished"));
\r
3993 Kdu(VK_END, VK_BACK, VK_RETURN);
\r
3995 } else if (szClipboardText.GetLength() < nFillColumn) {
\r
3996 // CUtils::Log(_T("M-q: 6-2 This line is too small"));
\r
3997 Kdu(VK_END, VK_SPACE, VK_DELETE, VK_HOME);
\r
4000 // CUtils::Log(_T("M-q: 6-3 %d_%s_%d"), szClipboardText.Left(nFillColumn).GetLength(), szClipboardText.Left(nFillColumn), szClipboardText.Left(nFillColumn).ReverseFind(_T(' ')));
\r
4001 const int offset = szClipboardText.Left(nFillColumn).ReverseFind(_T(' '));
\r
4002 if (offset == 0) {
\r
4003 // CUtils::Log(_T("M-q: 6-3-1 TOL is space"));
\r
4005 } else if (0 < offset) {
\r
4006 // CUtils::Log(_T("M-q: 6-3-2"));
\r
4007 ReleaseKey(VK_MENU); // FIXME
\r
4008 for (int i = 0; i < offset; ++i) {
\r
4012 return Reset(GOTO_RECURSIVE);
\r
4014 // CUtils::Log(_T("M-q: 6-3-3 No space in first fill-column"));
\r
4015 const int offset = szClipboardText.Find(_T(' '));
\r
4017 Kdu(VK_HOME, VK_DOWN);
\r
4019 ReleaseKey(VK_MENU); // FIXME
\r
4020 for (int i = 0; i < offset; ++i) {
\r
4024 return Reset(GOTO_RECURSIVE);
\r
4029 nOldLineLength = szClipboardText.GetLength();
\r
4031 return Reset(GOTO_RECURSIVE);
\r
4032 case 7: // Linefeed
\r
4033 // CUtils::Log(_T("M-q: 7"));
\r
4036 Kdu(VK_RETURN, VK_DELETE);
\r
4039 return Reset(GOTO_RECURSIVE);
\r
4040 case 8: // Restore clipboard data
\r
4041 // CUtils::Log(_T("M-q: 8"));
\r
4044 RestoreClipboardData();
\r
4046 return Reset(GOTO_HOOK);
\r
4048 return Reset(GOTO_HOOK);
\r
4052 int CCommands::DowncaseWord()
\r
4054 return CaseWord(DOWNCASE);
\r
4058 int CCommands::UpcaseWord()
\r
4060 return CaseWord(UPCASE);
\r
4064 int CCommands::CapitalizeWord()
\r
4066 return CaseWord(CAPITALIZE);
\r
4069 int CCommands::CaseWord(CASE_WORD nCase)
\r
4071 ClearNumericArgument(); // tmp
\r
4073 // Do not try to do these command at once.
\r
4074 // Clipboard has old data till you go out this function.
\r
4075 static GOTO nNext = GOTO_HOOK;
\r
4076 static int nStep = 0;
\r
4077 static int nLastWhiteSpace = 0;
\r
4078 static BOOL bFirstCharacter = TRUE;
\r
4080 case 0: // Clear Selection
\r
4081 nLastWhiteSpace = 0;
\r
4084 m_bSetMark = FALSE;
\r
4085 Kdu(VK_RIGHT, VK_LEFT);
\r
4087 return Reset(GOTO_RECURSIVE);
\r
4089 // Do nothing. Go to case 1:
\r
4091 case 1: // Get back character to confirm the cursor is at TOF or not.
\r
4094 CaptureClipboardData();
\r
4096 if (!CutFollowingWord()) {
\r
4097 return Reset(GOTO_DO_NOTHING);
\r
4101 return Reset(GOTO_RECURSIVE);
\r
4106 CString szClipboardText;
\r
4107 CUtils::GetClipboardText(&szClipboardText);
\r
4109 CString szTrimmed = szClipboardText;
\r
4110 szTrimmed.TrimLeft();
\r
4111 if (szClipboardText.IsEmpty()) {
\r
4112 nNext = GOTO_HOOK;
\r
4113 RestoreClipboardData();
\r
4114 return Reset(GOTO_HOOK);
\r
4115 } else if (szTrimmed.IsEmpty()) {
\r
4116 if (nNext == GOTO_HOOK) {
\r
4117 nNext = GOTO_RECURSIVE;
\r
4119 if (CUtils::IsHidemaru()) {
\r
4120 nLastWhiteSpace = 1;
\r
4122 nNext = GOTO_HOOK;
\r
4124 CUtils::SetClipboardText(&szClipboardText);
\r
4126 return Reset(GOTO_RECURSIVE);
\r
4127 } else if (CUtils::IsHidemaru()) {
\r
4128 nNext = GOTO_RECURSIVE;
\r
4130 nNext = GOTO_HOOK;
\r
4135 szClipboardText.MakeLower();
\r
4138 szClipboardText.MakeUpper();
\r
4142 for (int i = 0; i < szClipboardText.GetLength(); ++i) {
\r
4143 if (_istspace(szClipboardText.GetAt(i))) {
\r
4145 } else if (bFirstCharacter) {
\r
4146 bFirstCharacter = FALSE;
\r
4147 if (_istlower(szClipboardText.GetAt(i))) {
\r
4148 szClipboardText.SetAt(i, (TCHAR) toupper(szClipboardText.GetAt(i)));
\r
4151 if (_istupper(szClipboardText.GetAt(i))) {
\r
4152 szClipboardText.SetAt(i, (TCHAR) tolower(szClipboardText.GetAt(i)));
\r
4162 CUtils::SetClipboardText(&szClipboardText);
\r
4164 nLastWhiteSpace = 0;
\r
4165 for (int j = szClipboardText.GetLength() - 1; !szClipboardText.IsEmpty() && 0 <= j; --j) {
\r
4166 if (_istspace(szClipboardText.GetAt(j))) {
\r
4167 ++nLastWhiteSpace;
\r
4174 return Reset(GOTO_RECURSIVE);
\r
4182 for (int i = 0; i < nLastWhiteSpace; ++i) {
\r
4187 return Reset(GOTO_RECURSIVE);
\r
4192 RestoreClipboardData();
\r
4194 if (nNext == GOTO_HOOK) {
\r
4195 bFirstCharacter = TRUE;
\r
4197 return Reset(nNext);
\r
4200 return Reset(GOTO_HOOK);
\r
4203 BOOL CCommands::CutFollowingWord()
\r
4205 if (!CUtils::OpenClipboard()) {
\r
4209 if (!EmptyClipboard()) {
\r
4213 if (!CloseClipboard()) {
\r
4218 if (CUtils::IsHidemaru()) {
\r
4219 // On Hidemaru, Cut_() does not work well after CdSdKduSuCu(). I do not know why.
\r
4220 SdKduSu(VK_RIGHT);
\r
4222 CdSdKduSuCu(VK_RIGHT);
\r
4229 // M-x: execute-extended-command
\r
4230 int CCommands::ExecuteExtendedCommand()
\r
4232 // CUtils::Log(_T("ExecuteExtendedCommand"));
\r
4234 return Reset(GOTO_HOOKX);
\r