.版本 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.可视 = 真
@清山千山万水
文件下载
解压密码:
来源:三叶资源网,欢迎分享,公众号:iisanye,(三叶资源网⑤群:21414575)