【E语言】Ntrqq插件、勋章墙、防撤回插件安装器
本帖最后由 wushaominkk 于 2018-7-2 09:32 编辑因为在原创区发布以不符合版规要求被删除了，那就发到这里吧！
第一次发布用易语言写的程序，借鉴了别人的QQ精简脚本 和QQ 9.0.4的勋章墙补丁
易语言编的程序报毒大家应该明白咋回事！代码如下，有能力的自己编译，也分享了成品！
.版本 2
.全局变量 QQ安装路径, 文本型
.全局变量 QQexe路径, 文本型
.全局变量 程序目录, 文本型
.版本 2
.程序集 窗口程序集_启动窗口
.子程序 _按钮1_被单击
文件_下载 (“【官方下载链接】”)
.子程序 __启动窗口_创建完毕
加载皮肤 (13)
QQ安装路径 ＝ 取文本注册项 (3, “Software\Tencent\bugReport\QQ\InstallDir”, ) ＋ “Bin”
QQexe路径 ＝ QQ安装路径 ＋ “Bin\QQ.exe”
编辑框1.内容 ＝ QQ安装路径
.子程序 _按钮3_被单击
QQ安装路径 ＝ 目录_浏览 (“请选择QQ路径”)
编辑框1.内容 ＝ QQ安装路径 ＋ “\Bin”
.判断循环首 (QQ安装路径 ＝ “”)
信息框 (“你未选择或选择错误，请重新选择QQ安装路径”, 0, , )
QQ安装路径 ＝ 目录_浏览 (“请选择QQ路径”)
编辑框1.内容 ＝ QQ安装路径 ＋ “\Bin”
.判断循环尾 ()
.子程序 _按钮2_被单击
复制文件 (取运行目录 () ＋ “\QQ精简脚本.bat”, QQ安装路径 ＋ “\QQ精简脚本.bat”)
运行 (QQ安装路径 ＋ “\QQ精简脚本.bat”, 真, #隐藏窗口)
文件_改名 (QQ安装路径 ＋ “\HummerEngine.dll”, QQ安装路径 ＋ “\HummerEngineBase.dll”)
文件_改名 (QQ安装路径 ＋ “\IM.DLL”, QQ安装路径 ＋ “\IM.DLL.BAK”)
文件_改名 (QQ安装路径 ＋ “\HOPMiscDll.dll”, QQ安装路径 ＋ “\OPMiscDll.dll.BAK”)
复制文件 (取运行目录 () ＋ “\HummerEngine.dll”, QQ安装路径 ＋ “\HummerEngine.dll”)
复制文件 (取运行目录 () ＋ “\IM.DLL”, QQ安装路径 ＋ “\IM.DLL”)
复制文件 (取运行目录 () ＋ “\OPMiscDll.dlll”, QQ安装路径 ＋ “\OPMiscDll.dll”)
目录_复制 (取运行目录 () ＋ “\NtrQQ”, QQ安装路径 ＋ “\NtrQQ”)
' 运行 (QQ安装路径 ＋ “\NtrQQ\ShowIP.exe”, 假, )
删除文件 (QQ安装路径 ＋ “\QQ精简脚本.bat”)
信息框 (“NTRQQ补丁、勋章墙破解补丁、防撤回补丁安装完毕！”, 0, , )
.子程序 _按钮4_被单击
运行控制台程序 (“taskkill /f /im TXP*”, , , )
运行控制台程序 (“taskkill /f /im tad*”, , , )
运行控制台程序 (“taskkill /f /im QQP*”, , , )
运行控制台程序 (“taskkill /f /im QQC*”, , , )
运行控制台程序 (“taskkill /f /im QQ.exe”, , , )
删除目录 (QQ安装路径 ＋ “\NtrQQ”)
删除文件 (QQ安装路径 ＋ “\HummerEngine.dll”)
文件_改名 (QQ安装路径 ＋ “\HummerEngineBase.dll”, QQ安装路径 ＋ “\HummerEngine.dll”)
文件_改名 (QQ安装路径 ＋ “\IM.DLL.BAK”, QQ安装路径 ＋ “\IM.DLL”)
文件_改名 (QQ安装路径 ＋ “\OPMiscDll.dll.BAK”, QQ安装路径 ＋ “\OPMiscDll.dll”)
信息框 (“卸载完毕！如提示损坏请重新安装官方版QQ！”, 0, , )
附：成品和源码下载
链接: https://pan.baidu.com/s/1UsibL5kRg3v3LxVrvKZUZw 密码: 2tg9 可以不错 借用楼主的成品哦感谢 没有用勋章墙 自己写估计是写不出来了，借用成品了谢谢楼主 做什么的 收藏收藏 可惜了。还是倒了。 是不是有毒？
页:
[1]