基于易语言，PC端微信多开

.版本 2

.程序集 启动窗口

.子程序 取窗口文本, 文本型, , GetWindowText
.参数 窗口句柄, 整数型
.局部变量 长度
.局部变量 缓冲, 文本型

长度 ＝ 发送消息 (窗口句柄, 14, 0, 0) ＋ 1
缓冲 ＝ 取空白文本 (长度)
发送消息 (窗口句柄, 13, 长度, 缓冲)
返回 (缓冲)

.子程序 __启动窗口_创建完毕

编辑框_微信目录.内容 ＝ 取文本注册项 (#现行用户, “Software\Tencent\WeChat\InstallPath”, )

.子程序 _按钮_启动微信_被单击
.局部变量 Path, 文本型
.局部变量 File, 文本型
.局部变量 lpStartupInfo, STARTUPINFO
.局部变量 lpProcessInformation, PROCESS_INFORMATION
.局部变量 Dll, 文本型

Dll ＝ 取运行目录 () ＋ “\WeChat_More.dll”
.如果真 (文件是否存在 (Dll) ＝ 假)
    写到文件 (Dll, #DLL)
.如果真结束
Path ＝ 编辑框_微信目录.内容
File ＝ Path ＋ “\WeChat.exe”
CreateProcessA (File, File, 0, 0, 0, 4, 0, Path, lpStartupInfo, lpProcessInformation)
.如果真 (lpProcessInformation.dwProcessId ＝ 0)
    返回 ()
.如果真结束
injectDll (lpProcessInformation.hProcess, lpProcessInformation.hThread, Dll)
ZwResumeProcess (lpProcessInformation.hProcess)
CloseHandle (lpProcessInformation.hProcess)
CloseHandle (lpProcessInformation.hThread)

.子程序 injectD