VXVX解除双开限制-小弟写的比较乱，大佬勿喷

勤勤学长

  

子程序名	返回值类型	公开	备 注
多开子程序

变量名	类 型	静态	数组	备 注
取文件路径	文本型
打开文件	文本型
多开次数	整数型
i	整数型
总文本	文本型
单行文本	文本型

如果真 (文件_是否存在 (取运行目录 () ＋ “\route.txt”) ＝ 假)
载入 (窗口_VX目录, , 真)
' 如果有就跳过这行代码
如果真 (文件_是否存在 (取运行目录 () ＋ “\WeChat.bat”) ＝ 假)
打开文件 ＝ 到文本 (读入文件 (取运行目录 () ＋ “\route.txt”))
取文件路径 ＝ 文本_取出中间文本 (打开文件, “路径：”, “结束”, , )
多开次数 ＝ 到整数 (编辑框_次数.内容)
如果真 (多开次数 ＜ 1 或 多开次数 ＞ 5)
信息框 (“请填写您要多开的VX次数，最大限制≤5个”, 0, , )
返回 ()

计次循环首 (多开次数, i)
单行文本 ＝ “start” ＋ “ ” ＋ #引号 ＋ #引号 ＋ “ ” ＋ #引号 ＋ 取文件路径 ＋ #引号
如果真 (i ＞ 0 且 i ≠ 多开次数)
单行文本 ＝ 单行文本 ＋ #换行符
总文本 ＝ 总文本 ＋ 单行文本
计次循环尾 ()
写到文件 (取运行目录 () ＋ “\WeChat.bat”, 到字节集 (总文本))
写到文件 (取运行目录 () ＋ “\order.txt”, 到字节集 (“程序执行：” ＋ 编辑框_次数.内容 ＋ “次” ＋ #换行符 ＋ “如果需要更改次数，请删除WeChat.bat文件”))
运行 (取运行目录 () ＋ “\WeChat.bat”, 假, )
销毁 ()

.版本 2<br /> <br /> .子程序 多开子程序<br /> .局部变量 取文件路径, 文本型<br /> .局部变量 打开文件, 文本型<br /> .局部变量 多开次数, 整数型<br /> .局部变量 i, 整数型<br /> .局部变量 总文本, 文本型<br /> .局部变量 单行文本, 文本型<br /> <br /> .如果真 (文件_是否存在 (取运行目录 () ＋ “\route.txt”) ＝ 假)<br />     载入 (窗口_VX目录, , 真)<br />     ' 如果有就跳过这行代码<br /> .如果真结束<br /> .如果真 (文件_是否存在 (取运行目录 () ＋ “\WeChat.bat”) ＝ 假)<br />     打开文件 ＝ 到文本 (读入文件 (取运行目录 () ＋ “\route.txt”))<br />     取文件路径 ＝ 文本_取出中间文本 (打开文件, “路径：”, “结束”, , )<br /> <br />     多开次数 ＝ 到整数 (编辑框_次数.内容)<br />     .如果真 (多开次数 ＜ 1 或 多开次数 ＞ 5)<br />         信息框 (“请填写您要多开的VX次数，最大限制≤5个”, 0, , )<br />         返回 ()<br />     .如果真结束<br /> <br />     .计次循环首 (多开次数, i)<br />         单行文本 ＝ “start” ＋ “ ” ＋ #引号 ＋ #引号 ＋ “ ” ＋ #引号 ＋ 取文件路径 ＋ #引号<br />         .如果真 (i ＞ 0 且 i ≠ 多开次数)<br />             单行文本 ＝ 单行文本 ＋ #换行符<br />         .如果真结束<br />         总文本 ＝ 总文本 ＋ 单行文本<br />     .计次循环尾 ()<br /> <br />     写到文件 (取运行目录 () ＋ “\WeChat.bat”, 到字节集 (总文本))<br />     写到文件 (取运行目录 () ＋ “\order.txt”, 到字节集 (“程序执行：” ＋ 编辑框_次数.内容 ＋ “次” ＋ #换行符 ＋ “如果需要更改次数，请删除WeChat.bat文件”))<br />     运行 (取运行目录 () ＋ “\WeChat.bat”, 假, )<br /> <br /> .如果真结束<br /> 销毁 ()

bianyuan456

已经顶贴，感谢您对论坛的支持！

胖子葛格

感谢大神分享~！

一指温柔

支持开源~！感谢分享

396384183

感谢楼主分享！

豆豆灰常开心

感谢楼主分享！

查过

下个学习一下

zaozi

开源精神必须支持

sunhechao

大佬非常强大

一指温柔

支持开源~！感谢分享