几年前用e语言写的一个仿win98时代的一个妖之吻恶作剧小程序。 源码如下： .版本 2 .支持库 eAPI .支持库 shell .支持库 iext .程序集 窗口程序集1 .子程序 钩子函数, 整数型 .参数 icode, 整数型 .参数 wparam, 整数型 .参数 lparam, 整数型 .局部变量 按键信息, 按键信息 钩子句柄 ＝ 安装钩子 (13, &钩子函数, GetModuleHandleA (0), 0) CopyMemory (按键信息, lparam, 28) .如果真 (icode ＝ 0) .如果真 (按键信息.虚