吾爱破解 - 52pojie.cn

 找回密码
 注册[Register]

QQ登录

只需一步,快速开始

查看: 5245|回复: 8
收起左侧

[其他原创] 【E语言】Ntrqq插件、勋章墙、防撤回插件安装器

[复制链接]
zqq200808 发表于 2018-6-30 23:16
本帖最后由 wushaominkk 于 2018-7-2 09:32 编辑

QQ图片20180630214633.png
因为在原创区发布以不符合版规要求被删除了,那就发到这里吧!
第一次发布用易语言写的程序,借鉴了别人的QQ精简脚本 和QQ 9.0.4的勋章墙补丁
易语言编的程序报毒大家应该明白咋回事!代码如下,有能力的自己编译,也分享了成品!
[Asm] 纯文本查看 复制代码
.版本 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

免费评分

参与人数 2吾爱币 -1 热心值 +1 收起 理由
我爱小彤 + 1 这也行?
青鸾火凤 -1 扣分理由,只是一个写入文件壳,那些补丁不是你自己写的

查看全部评分

发帖前要善用论坛搜索功能,那里可能会有你要找的答案或者已经有人发布过相同内容了,请勿重复发帖。

fq645122 发表于 2018-6-30 23:55
可以不错
清华高材生 发表于 2018-7-1 00:11
MrY网络传媒 发表于 2018-7-1 00:53
jjyytt1996 发表于 2018-7-1 01:49
自己写估计是写不出来了,借用成品了谢谢楼主
无飞 发表于 2018-7-1 02:44 来自手机
做什么的
700970 发表于 2018-11-13 17:19
收藏收藏
轻舟自横 发表于 2018-11-19 15:55
可惜了。还是倒了。
摩格格 发表于 2019-11-8 21:09
是不是有毒?
您需要登录后才可以回帖 登录 | 注册[Register]

本版积分规则

返回列表

RSS订阅|小黑屋|处罚记录|联系我们|吾爱破解 - LCG - LSG ( 京ICP备16042023号 | 京公网安备 11010502030087号 )

GMT+8, 2024-11-16 18:00

Powered by Discuz!

Copyright © 2001-2020, Tencent Cloud.

快速回复 返回顶部 返回列表