[WIP] Refactor

lib/vim_about.ahk

@@ -0,0 +1,41 @@
+class VimAbout{
+  static Version := "v0.5.0"
+  static Date := "24/Sep/2019"
+  static Author := "rcmdnk"
+  static Description := "Vim emulation with AutoHotkey, everywhere in Windows."
+  static Homepage := "https://github.com/rcmdnk/vim_ahk"
+
+  Menu(){
+    Gui, New, % "+HwndVimGuiAbout +Label" . VimAbout.__Class . ".Menu"
+    VimAbout.VimGuiAbout := VimGuiAbout
+    Gui, %VimGuiAbout%:-MinimizeBox
+    Gui, %VimGuiAbout%:-Resize
+    Gui, %VimGuiAbout%:Add, Text, , % "Vim Ahk (vim_ahk):`n" VimAbout.Description
+    Gui, %VimGuiAbout%:Font, Underline
+    Gui, %VimGuiAbout%:Add, Text, % "Y+0 cBlue g" . VimAbout.__Class . ".OpenHomepage", Homepage
+    Gui, %VimGuiAbout%:Font, Norm
+    Gui, %VimGuiAbout%:Add, Text, , % "Author: " VimAbout.Author
+    Gui, %VimGuiAbout%:Add, Text, , % "Version: " VimAbout.Version
+    Gui, %VimGuiAbout%:Add, Text, Y+0, % "Last update: " VimAbout.Date
+    Gui, %VimGuiAbout%:Add, Text, , Script path:`n%A_LineFile%
+    Gui, %VimGuiAbout%:Add, Text, , % "Setting file:`n" VimIni.Ini
+    Gui, %VimGuiAbout%:Add, Button, +HwndVimGuiAboutOKId X200 W100 Default, &OK
+    VimGuiAboutOK := ObjBindMethod(VimAbout, "MenuOK")
+    GuiControl, +G, % VimGuiAboutOKId, % VimGuiAboutOK
+    Gui, %VimGuiAbout%:Show, W500, Vim Ahk
+  }
+
+  MenuOK(){
+    Gui, % VimAbout.VimGuiAbout . ":Destroy"
+  }
+  MenuClose(){
+    Gui, % VimAbout.VimGuiAbout . ":Destroy"
+  }
+  MenuEscape(){
+    Gui, % VimAbout.VimGuiAbout . ":Destroy"
+  }
+
+  OpenHomepage(){
+    Run % VimAbout.Homepage
+  }
+}

lib/vim_ahk_setting.ahk

@@ -0,0 +1,6 @@
+#UseHook On ; Make it a bit slow, but can avoid infinitude loop
+            ; Same as "$" for each hotkey
+#InstallKeybdHook ; For checking key history
+                  ; Use ~500kB memory?
+#HotkeyInterval 2000 ; Hotkey interval (default 2000 milliseconds).
+#MaxHotkeysPerInterval 70 ; Max hotkeys per interval (default 50).

lib/vim_bind_command.ahk

@@ -0,0 +1,33 @@
+#If WinActive("ahk_group " . VimConfObj.GroupName) and (VimState.Mode == "Vim_Normal")
+:::VimState.SetMode("Command") ;(:)
+`;::VimState.SetMode("Command") ;(;)
+#If WinActive("ahk_group " . VimConfObj.GroupName) and (VimState.Mode == "Command")
+w::VimState.SetMode("Command_w")
+q::VimState.SetMode("Command_q")
+h::
+  Send, {F1}
+  VimState.SetMode("Vim_Normal")
+Return
+
+#If WinActive("ahk_group " . VimConfObj.GroupName) and (VimState.Mode == "Command_w")
+Return::
+  Send, ^s
+  VimState.SetMode("Vim_Normal")
+Return
+
+q::
+  Send, ^s
+  Send, !{F4}
+  VimState.SetMode("Insert")
+Return
+
+Space::
+  Send, !fa
+  VimState.SetMode("Insert")
+Return
+
+#If WinActive("ahk_group " . VimConfObj.GroupName) and (VimState.Mode == "Command_q")
+Return::
+  Send, !{F4}
+  VimState.SetMode("Insert")
+Return

lib/vim_bind_disable.ahk

@@ -0,0 +1,236 @@
+#If WinActive("ahk_group " . VimConfObj.GroupName) and (VimState.StrIsInCurrentVimMode( "ydc") or VimState.StrIsInCurrentVimMode( "Command") or (VimState.Mode == "Z"))
+*a::
+*b::
+*c::
+*d::
+*e::
+*f::
+*g::
+*h::
+*i::
+*j::
+*k::
+*l::
+*m::
+*n::
+*o::
+*p::
+*q::
+*r::
+*s::
+*t::
+*u::
+*v::
+*w::
+*x::
+*y::
+*z::
+0::
+1::
+2::
+3::
+4::
+5::
+6::
+7::
+8::
+9::
+`::
+~::
+!::
+@::
+#::
+$::
+%::
+^::
+&::
+*::
+(::
+)::
+-::
+_::
+=::
++::
+[::
+{::
+]::
+}::
+\::
+|::
+:::
+`;::
+'::
+"::
+,::
+<::
+.::
+>::
+Space::
+  VimState.SetMode("Vim_Normal")
+Return
+
+#If WinActive("ahk_group " . VimConfObj.GroupName) and VimState.StrIsInCurrentVimMode("Vim_") and (VimConfObj.Conf["VimDisableUnused"]["val"] == 2)
+a::
+b::
+c::
+d::
+e::
+f::
+g::
+h::
+i::
+j::
+k::
+l::
+m::
+n::
+o::
+p::
+q::
+r::
+s::
+t::
+u::
+v::
+w::
+x::
+y::
+z::
++a::
++b::
++c::
++d::
++e::
++f::
++g::
++h::
++i::
++j::
++k::
++l::
++m::
++n::
++o::
++p::
++q::
++r::
++s::
++t::
++u::
++v::
++w::
++x::
++y::
++z::
+0::
+1::
+2::
+3::
+4::
+5::
+6::
+7::
+8::
+9::
+`::
+~::
+!::
+@::
+#::
+$::
+%::
+^::
+&::
+*::
+(::
+)::
+-::
+_::
+=::
++::
+[::
+{::
+]::
+}::
+\::
+|::
+:::
+`;::
+'::
+"::
+,::
+<::
+.::
+>::
+Space::
+Return
+
+#If WinActive("ahk_group " . VimConfObj.GroupName) and VimState.StrIsInCurrentVimMode("Vim_") and (VimConfObj.Conf["VimDisableUnused"]["val"] == 3)
+*a::
+*b::
+*c::
+*d::
+*e::
+*f::
+*g::
+*h::
+*i::
+*j::
+*k::
+*l::
+*m::
+*n::
+*o::
+*p::
+*q::
+*r::
+*s::
+*t::
+*u::
+*v::
+*w::
+*x::
+*y::
+*z::
+0::
+1::
+2::
+3::
+4::
+5::
+6::
+7::
+8::
+9::
+`::
+~::
+!::
+@::
+#::
+$::
+%::
+^::
+&::
+*::
+(::
+)::
+-::
+_::
+=::
++::
+[::
+{::
+]::
+}::
+\::
+|::
+:::
+`;::
+'::
+"::
+,::
+<::
+.::
+>::
+Space::
+Return

lib/vim_bind_enter_insert.ahk

@@ -0,0 +1,27 @@
+#If WinActive("ahk_group " . VimConfObj.GroupName) && (VimState.Mode == "Vim_Normal")
+i::VimState.SetMode("Insert")
+
++i::
+  Send, {Home}
+  VimState.SetMode("Insert")
+Return
+
+a::
+  Send, {Right}
+  VimState.SetMode("Insert")
+Return
+
++a::
+  Send, {End}
+  VimState.SetMode("Insert")
+Return
+
+o::
+  Send,{End}{Enter}
+  VimState.SetMode("Insert")
+Return
+
++o::
+  Send, {Up}{End}{Enter}
+  VimState.SetMode("Insert")
+Return

lib/vim_bind_enter_normal.ahk

@@ -0,0 +1,33 @@
+#If WinActive("ahk_group " . VimConfObj.GroupName)
+Esc:: ; Just send Esc at converting, long press for normal Esc.
+^[:: ; Go to Normal mode (for vim) with IME off even at converting.
+  KeyWait, Esc, T0.5
+  if(ErrorLevel){ ; long press to Esc
+    Send,{Esc}
+    Return
+  }
+  VimState.SetNormal()
+Return
+
+#If WinActive("ahk_group " . VimConfObj.GroupName) and (VimState.StrIsInCurrentVimMode( "Insert")) and (VimConfObj.Conf["VimJJ"]["val"] == 1)
+~j up:: ; jj: go to Normal mode.
+  Input, jout, I T0.1 V L1, j
+  if(ErrorLevel == "EndKey:J"){
+    SendInput, {BackSpace 2}
+    VimState.SetNormal()
+  }
+Return
+
+#If WinActive("ahk_group " . VimConfObj.GroupName) and (VimState.StrIsInCurrentVimMode( "Insert")) and (VimConfObj.Conf["VimJK"]["val"] == 1)
+j & k::
+k & j::
+  SendInput, {BackSpace 1}
+  VimState.SetNormal()
+Return
+
+#If WinActive("ahk_group " . VimConfObj.GroupName) and (VimState.StrIsInCurrentVimMode( "Insert")) and (VimConfObj.Conf["VimSD"]["val"] == 1)
+s & d::
+d & s::
+  SendInput, {BackSpace 1}
+  VimState.SetNormal()
+Return