.版本 2 .程序集 窗口程序集1 .程序集变量 微信模块基址, 整数型 .子程序 _按钮1_被单击 .局部变量 SI, STARTUPINFO .局部变量 CurPath, 文本型 .局部变量 DllPath, 文本型 .局部变量 hProcess, 整数型 .局部变量 PI, PROCESS_INFORMATION CreateProcessA (0, 取文本注册项 (#现行用户, “Software\Tencent\WeChat\InstallPath”, ) ＋ “\WeChat.exe”, 0, 0, 0, 0, 0, 0, SI, PI) 延时 (500) 取基址 (PI.dwProcessId) .判断开始 (微信模块基址 ≠ 0) Patch_OK (PI.hProcess) .默认 信息框 (“多开失败，适用版本: 2.4.1.79 ”, #错误图标, , ) .判断结束 .子程序 Patch_OK .参数 hProcess, 整数型 WriteProcessMemory_字节集 (hProcess, 微信模块基址 ＋ 4962909, { 235, 24 }, 2, 0) .子程序 取基址 .参数 pid, 整数型 .局部变量 hSnapShot, 整数型 .局部变量 End, 整数型 .局部变量 buffer, MODULEENTRY32 hSnapShot ＝ CreateToolhelp32Snapshot (8, pid) buffer.dwSize ＝ 548 End ＝ Module32First (hSnapShot, buffer) .判断循环首 (End ≠ 0) .如果真 (到文本 (buffer.szModule) ＝ “WeChatWin.dll”) 微信模块基址 ＝ buffer.modBaseAddr 跳出循环 () .如果真结束 End ＝ Module32Next (hSnapShot, buffer) .判断循环尾 () CloseHandle (hSnapShot)