.版本 2 .程序集 窗口程序集1 .程序集变量 钩子ID, 整数型, , , ' 本源码来自三叶资源网(www.sanye.cx) .程序集变量 键代码, 整数型 .程序集变量 键盘hook, 整数型 .程序集变量 名称, 文本型, , "255" .程序集变量 键名初始化, 逻辑型 .子程序 _按钮1_被单击 钩子ID ＝ 安装钩子 (13, &键盘钩子接口, 取进程句柄 (0), 0) 标签1.标题 ＝ 到文本 (钩子ID) .子程序 键盘钩子接口, 整数型, , 键状态 .参数 参数一, 整数型 .参数 参数二, 整数型, , 256按下257弹起 .参数 参数三, 整数型, , 键代码 键代码 ＝ 取字节集数据 (指针到字节集 (参数三, 1), 3, ) .判断开始 (参数二 ＝ 256) 标签2.标题 ＝ 到文本 (键代码) 标签3.标题 ＝ 取键名 (到数值 (标签2.标题)) .默认 ' 本源码来自三叶资源网(www.sanye.cx) .判断结束 返回 (0) 返回 (调入下一个挂钩 (键盘hook, 参数一, 参数二, 参数三)) .子程序 __启动窗口_将被销毁 卸载钩子 (钩子ID) .子程序 初始键名称 .局部变量 i, 整数型 .局部变量 原文本, 文本型 .局部变量 文本数组, 文本型, , "0" .局部变量 位置值, 整数型 .局部变量 文本值, 整数型 .局部变量 文本, 文本型 .局部变量 值, 整数型 原文本 ＝ “Ctrl键状态 1#Shift键状态 2#Alt键状态 4#键0 48#键1 49#键2 50#键3 51#键4 52#键5 53#键6 54#键7 55#键8 56#键9 57#A键 65#B键 66#C键 67#D键 68#E键 69#F键 70#G键 71#H键 72#I键 73#J键 74#K键 75#L键 76#M键 77#N键 78#O键 79#P键 80#Q键 81#R键 82#S键 83#T键 84#U键 85#V键 86#W键 87#X键 88#Y键 89#Z键 90#键0 96#键1 97#键2 98#键3 99#键4 100#键5 101#键6 102#键7 103#键8 104#键9 105#F1键 112#F2键 113#F3键 114#F4键 115#F5键 116#F6键 117#F7键 118#F8键 119#F9键 120#F10键 121#F11键 122#F12键 123#F13键 124#F14键 125#F15键 126#F16键 127#Break键 3#退格键 8#Tab键 9#回车键 13#Shift键 16#Ctrl键 17#Alt键 18#Pause键 19#CapsLock键 20#NumLock键 144#ScrollLock键 145#Esc键 27#空格键 32#PageUp键 33#PageDown键 34#Home键 36#End键 35#左光标键 37#上光标键 38#右光标键 39#下光标键 40#Ins键 45#Del键 46#分号键 186#等号键 187#逗号键 188#减号键 189#圆点键 190#圆点键 110#除号键 191#反撇号键 192#左中括号键 219#右中括号键 221#斜杠键 220#单引号键 222#加号键 107#减号键 109#乘号键 106#除号键 111#Ctrl键状态 162#Win菜单键 91#Alt键状态 164#Shift键状态 160#Alt键状态 165#Win菜单键 92#菜单键 93#Ctrl键状态 163#Shift键状态 161#” 清除数组 (文本数组) 文本数组 ＝ 分割文本 (原文本, “#”, ) i ＝ 1 ' 本源码来自三叶资源网(www.sanye.cx) .计次循环首 (取数组成员数 (文本数组), i) 位置值 ＝ 寻找文本 (文本数组 [i], “ ”, , 假) 值 ＝ 到数值 (取文本中间 (文本数组 [i], 位置值 ＋ 1, 取文本长度 (文本数组 [i]) － 位置值)) 文本值 ＝ 寻找文本 (文本数组 [i], “ ”, , 假) 文本 ＝ 取文本左边 (文本数组 [i], 文本值 － 1) 名称 [值] ＝ 文本 .计次循环尾 () .子程序 取键名, 文本型, 公开 .参数 键代码, 整数型 .局部变量 键名, 文本型 .如果 (键名初始化 ＝ 假) 初始键名称 () 键名初始化 ＝ 真 键名 ＝ 名称 [键代码] .否则 键名 ＝ 名称 [键代码] .如果结束 ' 本源码来自三叶资源网(www.sanye.cx) 返回 (键名) .子程序 __启动窗口_创建完毕 ' 本源码来自三叶资源网(www.sanye.cx)