.版本 2.DLL命令 SetWindowsHookEx, 整數型, , "SetWindowsHookExA", , 建立鉤子  .參數 idHook, 整數型  .參數 lpfn, 子程序指針  .參數 hmod, 整數型  .參數 dwThreadId, 整數型.DLL命令 CopyMemory, , , "RtlMoveMemory"  .參數 Destination, 按鍵信息, 傳址  .參數 Source, 整數型  .參數 Length, 整數型.DLL命令 CallNextHookEx, 整數型, , "CallNextHookEx"  .參數 hhk, 整數型  .參數 nCode, 整數型  .參數 wParam, 整數型  .參數 lParam, 整數型.DLL命令 GetModuleHandle, 整數型, , "GetModuleHandleA"  .參數 lpModuleName, 整數型.DLL命令 UnHookWindowsHookEx, 邏輯型, , "UnhookWindowsHookEx", , 卸載鉤子  .參數 hhk, 整數型

.版本 2.數據類型 按鍵信息  .成員 message, 整數型  .成員 paramL, 整數型  .成員 paramH, 整數型  .成員 time, 整數型  .成員 hwnd, 整數型

.版本 2.支持庫 eAPI.程序集 窗口程序集_啟動窗口.程序集變量 鉤子句柄, 整數型.子程序 __啟動窗口_創建完畢.如果真 (鉤子句柄 ＝ 0)  鉤子句柄 ＝ SetWindowsHookEx (13, &鉤子函數, GetModuleHandle (0), 0)  .如果真 (鉤子句柄 ＝ 0)    輸出調試文本 (“安裝鉤子失敗！”)    返回 ()  .如果真結束.如果真結束.子程序 鉤子函數, 整數型.參數 icode, 整數型.參數 wparam, 整數型.參數 lparam, 整數型.局部變量 按鍵信息, 按鍵信息.局部變量 局部, 整數型, 靜態CopyMemory (按鍵信息, lparam, 28).如果 (按鍵信息.message ＝ #回車鍵) ' 判斷按下的是否回車鍵。  .如果真 (局部 ÷ 2 ＝ 局部 ＼ 2) ' 如果不加這個判斷，每次都會投遞2次文本，因為按下和彈起算2次    文本_投遞 (取鼠標所在窗口句柄 (), 尾巴內容編輯框.內容)  .如果真結束  局部 ＝ 局部 ＋ 1.否則.如果結束返回 (CallNextHookEx (鉤子句柄, icode, wparam, lparam)).子程序 __啟動窗口_將被銷毀UnHookWindowsHookEx (鉤子句柄)