Facebook
From Thundering Meerkat, 3 Years ago, written in Autohotkey.
Embed
Download Paste or View Raw
Hits: 172
  1. vk1C::Send, {vk1C}
  2.  
  3. vk1C & a::toggleChange(toggle_a, "AHK") ; ☆
  4. vk1C & e::toggleChange(toggle_e, "Edit")        ; ☆
  5.  
  6. ;==============================
  7.  
  8. ; toggleの真偽を反転
  9. toggleChange(ByRef toggle, name)
  10. {
  11.         toggle := !toggle
  12.         myToolTipFunction("カスタムモード(" . name . "): " . (toggle = true ? "ON" : "OFF"), 1000)
  13.  
  14.         CoordMode, ToolTip, Screen
  15.         ToolTip, % (toggle = true ?  "カスタムモード(" . name . "): ON" : ""), 0, 0, 20
  16.         CoordMode, ToolTip, Relative
  17. }
  18.  
  19. ; ツールチップ周りの処理を効率化
  20. myToolTipFunction(str, delay)
  21. {
  22.         ToolTip, %str%
  23.         SetTimer, RemoveToolTip, -%delay%
  24. }
  25.  
  26. RemoveToolTip:
  27.        ToolTip
  28. Return
  29.  
  30. ;==============================
  31.  
  32. ; AutoHotkey///////////////////
  33. #If, toggle_a = true
  34.  
  35.         ; AHKをリロード
  36.         r::Reload
  37.  
  38.         ; AHKWiki(日本語)を開く
  39.         h::
  40.                 Run, http://ahkwiki.net/Top
  41.                 toggleChange(toggle_a, "AHK")   ; ☆
  42.         Return
  43.    
  44. #If
  45.  
  46. ; Edit/////////////////////////
  47. #If, toggle_e = true
  48.  
  49.         ; 1行削除
  50.         e::
  51.                 Send, {End}+{Home}{Delete}
  52.                 toggleChange(toggle_e, "Edit")  ; ☆
  53.         Return
  54.        
  55.         ; 1行挿入
  56.         l::
  57.                 Send, {Home}{Enter}{Up}
  58.                 toggleChange(toggle_e, "Edit")  ; ☆
  59.         Return
  60.    
  61. #If
  62. ;==============================