.版本 2

.支持库 spec

.支持库 shell

.程序集 窗口程序集1

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

.局部变量 目录1, 文本型

.局部变量 目录, 文本型

.局部变量 p, 整数型

_启动窗口.标题 = “逍遥安卓一键多开器”

批量_编辑框_读取配置 (_启动窗口, 取运行目录 () + “\设置.ini”)

目录 = 取目录 ()

调试输出 (目录)

.计次循环首 (100, p)

目录1 = 目录 + “MemuHyperv VMs\MEmu” + “_” + 到文本 (p)

调试输出 (目录1)

.如果 (目录_是否存在 (目录1) = 真)

编辑框_克隆.内容 = 到文本 (p)

.否则

跳出循环 ()

.如果结束

.计次循环尾 ()

.子程序 _按钮_克隆_被单击

.局部变量 目录, 文本型

.局部变量 目录1, 文本型

.局部变量 总数, 整数型

.局部变量 p, 整数型

.如果真 (编辑框_游戏目录.内容 = “”)

信息框 (“请先选择模拟器目录”, 0, )

返回 ()

.如果真结束

目录 = 取目录 ()

' D:\Program Files\Microvirt\MEmu\MemuHyperv VMs

' D:\Program Files\Microvirt\MEmu\MemuHyperv VMs\MEmu_1

总数 = 到数值 (编辑框_克隆.内容)

写到文件 (目录 + “kl.bat”, 到字节集 (“MEmuConsole.exe clone MEmu”))

.计次循环首 (总数, p)

目录1 = 目录 + “MemuHyperv VMs\MEmu” + “_” + 到文本 (p)

调试输出 (目录1)

.如果真 (目录_是否存在 (目录1) = 假)

执行 (4, 目录 + “kl.bat”, , 目录, 1)

_启动窗口.标题 = “克隆中。。。请勿操作”

.循环判断首 ()

程序_延时 (1000)

.循环判断尾 (目录_是否存在 (目录1) = 假)

.如果真结束

_启动窗口.标题 = “已成功克隆” + 到文本 (p) + “个模拟器”

程序_延时 (1000)

.计次循环尾 ()

信息框 (“克隆完成”, 0, , )

_启动窗口.标题 = “逍遥安卓一键多开器”

.子程序 取目录, 文本型

.局部变量 长度, 整数型

.局部变量 左边位置, 整数型

.局部变量 目录, 文本型

.局部变量 左边长度, 整数型

长度 = 取文本长度 (编辑框_游戏目录.内容)

' 调试输出 (长度)

左边位置 = 寻找文本 (编辑框_游戏目录.内容, “MEmu\”, , 假)

' 调试输出 (左边位置)

左边长度 = 取文本长度 (“MEmu”)

' 调试输出 (左边长度)

目录 = 取文本左边 (编辑框_游戏目录.内容, 左边位置 + 左边长度)

调试输出 (目录)

返回 (目录)

.子程序 _按钮_启动_被单击

.局部变量 个数, 整数型

.局部变量 目录, 文本型

.局部变量 目录1, 文本型

.局部变量 p, 整数型

.局部变量 游戏标题, 文本型

.局部变量 目录2, 文本型

.局部变量 o, 整数型, , "0"

.局部变量 n, 整数型

个数 = 到整数 (编辑框_克隆.内容)

目录 = 取目录 ()

.计次循环首 (100, p)

目录1 = 目录 + “MEmuConsole.exe MEmu” + “_” + 到文本 (p)

游戏标题 = “- MEmu” + “_” + 到文本 (p)

' D:\Program Files\Microvirt\MEmu\MemuHyperv VMs\MEmu

目录2 = 目录 + “MemuHyperv VMs\MEmu” + “_” + 到文本 (p)

.如果真 (文件_是否存在 (目录2) = 真)

运行 (目录1, 假, )

.如果真 (窗口_枚举子窗口 (, o, “Qt5QWindowIcon”) ≠ 0)

.计次循环首 (取数组成员数 (o), n)

.如果真 (文本_取右边 (窗口_取标题 (o [n]), “MEmu_”) = 到文本 (p))

跳出循环 ()

.如果真结束

.计次循环尾 ()

.如果真结束

.如果真结束

.计次循环尾 ()

信息框 (“启动完成”, 0, , )

.子程序 __启动窗口_将被销毁

.局部变量 临时文本, 文本型

.局部变量 临时文本1, 文本型

批量_选择框_保存配置 (_启动窗口, 取运行目录 () + “\设置.ini”, )

批量_编辑框_保存配置 (_启动窗口, 取运行目录 () + “\设置.ini”, )

置文件属性 (取运行目录 () + “\设置.ini”, 2)

.子程序 _图片框1_鼠标左键被放开, 逻辑型

.参数 横向位置, 整数型

.参数 纵向位置, 整数型

.参数 功能键状态, 整数型

图片框2.可视 = 假

图片框1.可视 = 真

.子程序 _图片框2_鼠标左键被放开, 逻辑型

.参数 横向位置, 整数型

.参数 纵向位置, 整数型

.参数 功能键状态, 整数型

图片框2.可视 = 假

图片框1.可视 = 真

@清山千山万水

文件下载

解压密码: