我為了 Apple Wireless Keyboard 所改版過的 AutoHotKey

我買了這項物品後，因為不同系統的鍵盤支援度沒有那麼的理想，所以我用AutoHotKey達成Fn及一些其他按鍵的功能。

阿酷在膜拜 apple wireless keyboard

我第一次買給我自己用的 Apple 產品，結果竟是一個無線鍵盤
(因為藍芽的無線鍵盤真的很難找，這是我找到的唯一比較好的 XDDD)

寶寶跟新鍵盤！

雖然上面的配置都是根據 Apple 的。不過普通打字之類的是還可以啦～
只是有關 page up/down，delete/backspace，Home/End等按鍵需要配上一些東西才可以正常使用 Orz。


就是這邊，F3不是Mission Control，F4不是Dashboard。

我比較喜歡新版的，唉。這是舊版的，外加一隻寶寶的手 XDDD。

而我買的時候忘了那件事，就是蘋果的新版 Lion 作業系統的鍵盤上 F3 跟 F4 長相跟前一代的 Snow Leopard 不一樣。其實沒差啦～只是感覺問題而已。

F3 不再調出 Exposé，而是成了 Mission Control 快捷鍵；F4 從 Dashboard 換成了 Launchpad。

而且中文鍵盤雖然很亂很醜，不過平常也不會看鍵盤呀 XD。不過我的桌面突然多出好大的一片空間喔！




所以現在我的鍵盤、滑鼠、耳機都是藍芽的囉！吼吼吼～

P.S. 目前狀態，藍芽滑鼠送修中。


下面就是現在在用的 AutoHotKey 程式碼了。
#NoEnv ; Recommended for performance and compatibility with future AutoHotkey releases. SendMode Input ; Recommended for new scripts due to its superior speed and reliability. SetWorkingDir %A_ScriptDir% ; Ensures a consistent starting directory. ;#NoTrayIcon ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ; ; DLL registration and readout of keys ; ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ; Set screen title, to set the HWND Gui, Show, x0 y0 h0 w0, FnMapper ; Variable for the modifier key, define it here, just to be sure fnPressed := 0 ; Set the homepath to the relevant dll file HomePath=AutohotkeyRemoteControl.dll ; Load the dll hModule := DllCall("LoadLibrary", "str", HomePath) ; On specific message from the dll, goto this function OnMessage(0x00FF, "InputMsg") ; Register at the dll in order to receive events EditUsage := 1 EditUsagePage := 12 HWND := WinExist("FnMapper") nRC := DllCall("AutohotkeyRemoteControl\RegisterDevice", INT, EditUsage, INT, EditUsagePage, INT, HWND, "Cdecl UInt") WinHide, FnMapper ; This function is called, when a WM_INPUT-msg from a device is received InputMsg(wParam, lParam, msg, hwnd) { DeviceNr = -1 nRC := DllCall("AutohotkeyRemoteControl\GetWM_INPUTDataType", UINT, wParam, UINT, lParam, "INT *", DeviceNr, "Cdecl UInt") if (errorlevel <> 0) || (nRC == 0xFFFFFFFF) { MsgBox GetWM_INPUTHIDData fehlgeschlagen. Errorcode: %errorlevel% goto cleanup } ;Tooltip, %DeviceNr% ifequal, nRC, 2 { ProcessHIDData(wParam, lParam) } else { MsgBox, Error - no HID data } } Return ProcessHIDData(wParam, lParam) { ; Make sure this variable retains its value outside this function global fnPressed DataSize = 5000 VarSetCapacity(RawData, %DataSize%, 0) RawData = 1 nHandle := DllCall("AutohotkeyRemoteControl\GetWM_INPUTHIDData", UINT, wParam, UINT, lParam, "UINT *" , DataSize, "UINT", &RawData, "Cdecl UInt") ; Get the ID of the device ; Use the line below to check where an event was sent from, when using this code for a new HID device ; DeviceNumber := DllCall("AutohotkeyRemoteControl\GetNumberFromHandle", UINT, nHandle, "Cdecl UInt") ;FirstValue := NumGet(RawData, 0,"UChar") ; something to do with the bits, not really relevant here KeyStatus := NumGet(RawData, 1,"UChar") ; Filter the correct bit, so that it corresponds to the key in question ; Add another Transform for a new key ; Filter bit 5 (Fn key) Transform, FnValue, BitAnd, 16, KeyStatus ; Filter bit 4 (Eject key) Transform, EjectValue, BitAnd, 8, KeyStatus if (FnValue = 16) { ; Fn is pressed fnPressed := 1 } else { ; Fn is released fnPressed := 0 } if (EjectValue = 8) { ; Eject is pressed ; Set timeout of 1 second to distinguish delete or eject send {Delete} } } ; END: ProcessHIDData ; If there was an error retrieving the HID data, cleanup cleanup: DllCall("FreeLibrary", "UInt", hModule) ; It is best to unload the DLL after using it (or before the script exits). ExitApp ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ; ; Fn + Backspace = Delete ; ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; $Backspace::hotkeyBS() hotkeyBS() { global fnPressed if (fnPressed = 1) { Send {Delete} } else { Send {Backspace} } } Return ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ; ; Fn modifier: Audio hotkeys, specified for Winamp ; ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; $F3::hotkeyF3() hotkeyF3() { global fnPressed if (fnPressed = 1) { Send {Print Screen} } else { Send {F3} } } Return $F4::hotkeyF4() hotkeyF4() { global fnPressed if (fnPressed = 1) { Run taskmgr } else { Send {F4} } } Return $F10::hotkeyF10() hotkeyF10() { global fnPressed if (fnPressed = 1) { ;Send {Volume_Mute} ; Mute/unmute the master volume. Send { VKADSC120 } } else { Send {F10} } } Return $F11::hotkeyF11() hotkeyF11() { global fnPressed if (fnPressed = 1) { Send {Volume_Down 10} ; Lower the master volume by 1 interval (typically 5%) } else { Send {F11} } } Return $F12::hotkeyF12() hotkeyF12() { global fnPressed if (fnPressed = 1) { Send {Volume_Up 10} ; Raise the master volume by 1 interval (typically 5%). } else { Send {F12} } } Return ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;; ;; My old script ;; ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;; For Apple Wireless Keyboard ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; Rwin::RAlt RAlt::RCtrl ;>!UP::Home ;>!Down::End >#Up::PgUp >#Down::PgDn >#Enter::Send {Alt down}{Enter}{Alt up} ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;; for blog edit: Font & Link ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ::ta::target="_blank" :O:fz::font-size:%;{left 2} :O:cl::color:;{left} ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;; for blog edit: Div Block ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; :O:dcl::<div style="clear:both;"></div> :O:hr::<div style="border-top: 8px dashed maroon;"></div> ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;; for blog edit: Series & Movies ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;stars for music rate :O:str::<img src="https://blogger.googleusercontent.com/img/b/R29vZ2xl/AVvXsEiw7qACSkWXH10uWVTVtqjgM01taQieCyeXbss0MiaUWi8dlleIhplkrz7JgW1boYOW49tmpME1EfEg8eeoJaA1Y_NX9EPn8nY4sKNEyyVpEmtsSLszkJjlsq2w8nF0k2sAywagkca5izc/" widht="20" height="20" /> :O:ss::<div style="border-top: 4px dotted lime;border-left: 4px dotted lime;padding-left:0.5em;font-weight:bold;font-size:150%;">SE<span style="font-weight:normal; float:right; font-size:70%;"></span></div>{left 77} :O:mm::<div style="border-top: 8px dashed lime;"></div>{enter}IMDb: <a href=""></a>{left 4} ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;; facial message ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; :*:ggl::>"< :*:.//::><span style="color:red;">////</span>< :*:=m:: Clipboard = =皿= Send ^v return :*:-m:: Clipboard = =皿= Send ^v return ::cry:: Clipboard = 〒△〒 Send ^v return

上面這個 Textarea 勉強可以用啦 XDD

要把換行 </ br> 換成 &#13;&#10;。
還有 <textarea rows="10" cols="70" onfocus="this.select();"></textarea>，紅色那段的效用就是點那個文字區後會自動全選。

順帶一提，讓滑鼠移到文字區(textarea)上就自動全選要用 onmouseover="this.focus();"。