.版本 2 .程序集 窗口程序集_启动窗口 .子程序 __启动窗口_创建完毕 .如果真 (是否重复运行 ()) 信息框 (“已经运行了”, 16, “Error”, ) 结束 () .如果真结束 .子程序 取路径, 文本型 .局部变量 路径, 文本型 路径 ＝ 取空白文本 (256) GetModuleFileName (0, 路径, 256) 返回 (路径) .子程序 取特征, 整数型 .参数 数据, 字节集 置入代码 ({ 86, 83, 87, 82, 81, 139, 69, 8, 139, 0, 133, 192, 126, 83, 131, 192, 8, 139, 248, 139, 223, 87, 50, 192, 94, 139, 69, 8, 139, 0, 139, 64, 4, 139, 248, 82, 252, 51, 201, 73, 139, 209, 51, 192, 51, 219, 172, 50, 193, 138, 205, 138, 234, 138, 214, 182, 8, 102, 209, 235, 102, 209, 216, 115, 9, 102, 53, 32, 131, 102, 129, 243, 184, 237, 254, 206, 117, 235, 51, 200, 51, 211, 79, 117, 213, 247, 210, 247, 209, 139, 194, 193, 192, 16, 102, 139, 193, 89, 90, 95, 91, 94, 201, 194, 4, 0 }) 返回 (0) .子程序 读值, 整数型 .参数 指针, 整数型 置入代码 ({ 139, 69, 8, 139, 0, 201, 194, 4, 0 }) 返回 (0) .子程序 写值, 整数型 .参数 指针, 整数型 .参数 数值, 整数型 置入代码 ({ 139, 69, 8, 139, 77, 12, 137, 8, 201, 194, 8, 0 }) 返回 (0) .子程序 是否重复运行, 逻辑型, , QQ:377343266 .局部变量 句柄, 整数型 .局部变量 指针, 整数型 .局部变量 Name, 文本型 Name ＝ 到文本 (取特征 (读入文件 (取路径 ()))) 句柄 ＝ OpenFileMapping (4, 1, Name) .如果真 (句柄 ＞ 0) 指针 ＝ MapViewOfFile (句柄, 4, 0, 0, 0) .如果真 (指针 ＞ 0) 句柄 ＝ 读值 (指针) UnmapViewOfFile (指针) .如果真 (IsWindow (句柄)) SwitchToThisWindow (句柄, 1) 返回 (真) .如果真结束 .如果真结束 CloseHandle (句柄) .如果真结束 句柄 ＝ CreateFileMapping (-1, 0, 4, 0, 4, Name) .如果真 (句柄 ＞ 0) 指针 ＝ MapViewOfFile (句柄, 2, 0, 0, 0) .如果真 (指针 ＞ 0) 写值 (指针, 取窗口句柄 ()) UnmapViewOfFile (指针) 返回 (假) .如果真结束 CloseHandle (句柄) .如果真结束 返回 (假)