.版本 2.DLL命令 安裝鉤子, 整數(shù)型, , "SetWindowsHookExA"  .參數(shù) ihook, 整數(shù)型  .參數(shù) lpfunc, 子程序指針  .參數(shù) hin, 整數(shù)型  .參數(shù) threadid, 整數(shù)型.DLL命令 卸載鉤子, 整數(shù)型, , "UnhookWindowsHookEx"  .參數(shù) hHook, 整數(shù)型.DLL命令 下一個(gè)鉤子, 整數(shù)型, , "CallNextHookEx"  .參數(shù) hHook, 整數(shù)型  .參數(shù) icode, 整數(shù)型  .參數(shù) wParam, 整數(shù)型  .參數(shù) lParam, 整數(shù)型.DLL命令 CopyMemory, , , "RtlMoveMemory"  .參數(shù) Destination, 按鍵信息, 傳址  .參數(shù) Source, 整數(shù)型  .參數(shù) cbCopy, 整數(shù)型.DLL命令 GetModuleHandleA, 整數(shù)型, , "GetModuleHandleA"  .參數(shù) lpModuleName, 整數(shù)型.DLL命令 SetWindowPos, 整數(shù)型, "user32"  .參數(shù) HWnd, 整數(shù)型  .參數(shù) hWndInsertAfter, 整數(shù)型  .參數(shù) X, 整數(shù)型  .參數(shù) Y, 整數(shù)型  .參數(shù) cx, 整數(shù)型  .參數(shù) cy, 整數(shù)型  .參數(shù) wFlags, 整數(shù)型

.版本 2.數(shù)據(jù)類型 按鍵信息  .成員 虛擬碼, 整數(shù)型  .成員 掃描碼, 整數(shù)型  .成員 標(biāo)記, 整數(shù)型  .成員 時(shí)間, 整數(shù)型  .成員 額外信息, 整數(shù)型

.版本 2.支持庫 eAPI.程序集 窗口程序集1.程序集變量 鉤子句柄, 整數(shù)型.子程序 _編輯框_解鎖密碼框_內(nèi)容被改變標(biāo)簽2.標(biāo)題 ＝ “屏幕鎖定中。。。”標(biāo)簽2.文本顏色 ＝ #銀白.子程序 _窗口1_鎖屏框_創(chuàng)建完畢設(shè)置窗口透明度 (取窗口句柄 (), 250)窗口1_鎖屏框.左邊 ＝ 0窗口1_鎖屏框.頂邊 ＝ 0窗口1_鎖屏框.寬度 ＝ 取屏幕寬度 ()窗口1_鎖屏框.高度 ＝ 取屏幕高度 ()圖片框1.左邊 ＝ 取屏幕寬度 () ÷ 2 － 圖片框1.寬度 ÷ 2圖片框1.頂邊 ＝ 取屏幕高度 () ÷ 2 － 圖片框1.高度 ÷ 2注冊屏蔽 ().子程序 窗口總在最前.參數(shù) 參_窗口句柄, 整數(shù)型SetWindowPos (參_窗口句柄, -1, 0, 0, 0, 0, 位或 (2, 1)).子程序 _圖形按鈕1_被單擊_按鈕1_被單擊 ().子程序 _按鈕1_被單擊.如果 (編輯框_解鎖密碼框.內(nèi)容 ＝ “”)  標(biāo)簽2.標(biāo)題 ＝ “未輸入密碼，請重新輸入！”  標(biāo)簽2.文本顏色 ＝ #紅色.否則  .如果 (編輯框_解鎖密碼框.內(nèi)容 ＝ “123”)    解除屏蔽 ()    結(jié)束 ()  .否則    .如果 (編輯框_解鎖密碼框.內(nèi)容 ≠ _啟動窗口.編輯框_重復(fù)密碼框.內(nèi)容)      標(biāo)簽2.標(biāo)題 ＝ “密碼不正確，請重新輸入！”      標(biāo)簽2.文本顏色 ＝ #紅色    .否則      .如果 (編輯框_解鎖密碼框.內(nèi)容 ＝ _啟動窗口.編輯框_重復(fù)密碼框.內(nèi)容)        解除屏蔽 ()        結(jié)束 ()      .否則      .如果結(jié)束    .如果結(jié)束  .如果結(jié)束.如果結(jié)束.子程序 鉤子函數(shù), 整數(shù)型.參數(shù) icode, 整數(shù)型.參數(shù) wparam, 整數(shù)型.參數(shù) lparam, 整數(shù)型.局部變量 按鍵信息, 按鍵信息CopyMemory (按鍵信息, lparam, 30).如果真 (icode ＝ 0)  .如果真 (按鍵信息.虛擬碼 ＝ 91 或 按鍵信息.虛擬碼 ＝ 92) ' 屏蔽Win鍵    .判斷開始 (wparam ＝ 256)      輸出調(diào)試文本 (“按下Win鍵！”)    .默認(rèn)      輸出調(diào)試文本 (“彈起Win鍵！”)    .判斷結(jié)束    返回 (1)  .如果真結(jié)束  .如果真 (按鍵信息.虛擬碼 ＝ 27 且 按鍵信息.掃描碼 ＝ 1) ' 屏蔽crlt+Esc    返回 (1)  .如果真結(jié)束  .如果真 (按鍵信息.虛擬碼 ＝ 115 且 按鍵信息.掃描碼 ＝ 62) ' 屏蔽alt+f4    返回 (1)  .如果真結(jié)束  .如果真 (按鍵信息.虛擬碼 ＝ 9 且 按鍵信息.掃描碼 ＝ 15) ' 屏蔽alt+TAB    返回 (1)  .如果真結(jié)束  .如果真 (按鍵信息.虛擬碼 ＝ 32 且 按鍵信息.掃描碼 ＝ 57) ' 屏蔽crlt+空格 左邊    返回 (1)  .如果真結(jié)束  .如果真 (按鍵信息.虛擬碼 ＝ 161 且 按鍵信息.掃描碼 ＝ 54) ' 屏蔽crlt+空格 右邊    返回 (1)  .如果真結(jié)束  .如果真 (按鍵信息.虛擬碼 ＝ 160 且 按鍵信息.掃描碼 ＝ 42) ' 屏蔽crlt+SHIFT    返回 (1)  .如果真結(jié)束  .如果真 (按鍵信息.虛擬碼 ＝ 46 且 按鍵信息.掃描碼 ＝ 83) ' 屏蔽CAL_DEL_ALT    返回 (1)  .如果真結(jié)束.如果真結(jié)束返回 (下一個(gè)鉤子 (鉤子句柄, icode, wparam, lparam)).子程序 注冊屏蔽.如果真 (鉤子句柄 ＝ 0)  鉤子句柄 ＝ 安裝鉤子 (13, &鉤子函數(shù), GetModuleHandleA (0), 0)  .如果 (鉤子句柄 ≠ 0)    輸出調(diào)試文本 (“注冊鉤子成功！”)  .否則    輸出調(diào)試文本 (“注冊鉤子失敗！”)  .如果結(jié)束.如果真結(jié)束.子程序 解除屏蔽.如果真 (鉤子句柄 ≠ 0)  .如果 (卸載鉤子 (鉤子句柄) ≠ 0)    輸出調(diào)試文本 (“缷載鉤子成功！”)  .否則    輸出調(diào)試文本 (“缷載鉤子失敗！”)  .如果結(jié)束.如果真結(jié)束.子程序 _時(shí)鐘1_周期事件窗口總在最前 (取窗口句柄 ())

.版本 2.支持庫 eAPI.程序集 窗口程序集2.子程序 __啟動窗口_創(chuàng)建完畢設(shè)置窗口透明度 (取窗口句柄 (), 245).子程序 _圖形按鈕1_被單擊_按鈕1_被單擊 ().子程序 _按鈕1_被單擊.如果 (編輯框_密碼框.內(nèi)容 ≠ 編輯框_重復(fù)密碼框.內(nèi)容)  標(biāo)簽_提示.標(biāo)題 ＝ “密碼不一致，請重新輸入！”  標(biāo)簽_提示.文本顏色 ＝ #紅色.否則  .如果 (編輯框_密碼框.內(nèi)容 ＝ “”)    標(biāo)簽_提示.標(biāo)題 ＝ “未輸入密碼，請重新輸入！”    標(biāo)簽_提示.文本顏色 ＝ #紅色  .否則    _啟動窗口.可視 ＝ 假    載入 (窗口1_鎖屏框, , 真)  .如果結(jié)束.如果結(jié)束.子程序 _編輯框_密碼框_內(nèi)容被改變標(biāo)簽_提示.標(biāo)題 ＝ “請輸入密碼后繼續(xù)：”標(biāo)簽_提示.文本顏色 ＝ #白色.子程序 _編輯框_重復(fù)密碼框_內(nèi)容被改變標(biāo)簽_提示.標(biāo)題 ＝ “請輸入密碼后繼續(xù)：”標(biāo)簽_提示.文本顏色 ＝ #白色.子程序 _圖形按鈕_最小化_被單擊_啟動窗口.位置 ＝ 2.子程序 _圖形按鈕_關(guān)閉_被單擊銷毀 ()