求大神 程序秒退

社区服务
高级搜索
猴岛论坛电脑百科求大神 程序秒退
发帖 回复
倒序阅读 最近浏览的帖子最近浏览的版块
5个回复

求大神 程序秒退

楼层直达
a115005

ZxID:27836155

等级: 大尉
举报 只看楼主 使用道具 楼主   发表于: 2014-02-03 0
.版本 2
.支持库 shell

.程序集 窗口程序集1
.程序集变量 handle, 整数型
.程序集变量 ProcessId, 整数型
.程序集变量 OpenHandle, 整数型
.程序集变量 NumP, 整数型
.程序集变量 进程ID
.程序集变量 blank, 文本型
.程序集变量 基址1
.程序集变量 人物基址, 文本型

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

加载皮肤 (15)
blank = 取空白文本 (255)
人物基址 = “1A583C2”
初始化 ()
进程ID = 取进程ID (“tps.exe”)
时钟1.时钟周期 = 100
启动 ()


.子程序 初始化
.局部变量 内存地址1

基址1 = 取字节集数据 ({ 9.706541108526e+066 }, 1, )
监视热键 (&无限精力, #F1键)
监视热键 (&锁血, #F2键)
监视热键 (&隐身, #F3键)
监视热键 (&武器连发, #F4键)
监视热键 (&aim, #F5键)


.子程序 启动, , 公开, 防止非法
.局部变量 命令串, 文本型
.局部变量 i

命令串 = “reg add ” + #引号 + “HKLM\SOFTWARE\Microsoft\Windows NT\CurrentVersion\tpsgame\” + #引号 + “ /v debugger /t reg_sz /d debugfile /f”


.子程序 _时钟1_周期事件

进程ID = 取进程ID (“tps.exe”)
.如果 (进程ID = 0)
    结束 ()
    信息框 (“请先开游戏”, 0, )
.否则
    基址1 = 取字节集数据 ({ 9.706541108526e+066 }, 1, )
.如果结束


.子程序 无限精力

.如果 (时钟2.时钟周期 = 0)
    时钟2.时钟周期 = 100
    GetWindowThreadProcessId (到整数 (进程ID), ProcessId)
    OpenHandle = OpenProcess (88105923, 假, ProcessId)
    WriteProcessMemory (OpenHandle, 430677258, { 116, 67 }, 2, NumP)
    WriteProcessMemory (OpenHandle, 25682136, { 198, 132 }, 2, NumP)
    WriteProcessMemory (OpenHandle, 37107029, { 146, 133 }, 2, NumP)
    WriteProcessMemory (OpenHandle, 12467128, { 5, 132 }, 2, NumP)
    WriteProcessMemory (OpenHandle, 15851175, { 5, 132 }, 2, NumP)
    WriteProcessMemory (OpenHandle, 347645812, { 5, 133 }, 2, NumP)
    WriteProcessMemory (OpenHandle, 16456868, { 0, 132 }, 2, NumP)
    WriteProcessMemory (OpenHandle, 27687123, { 0, 132 }, 2, NumP)
    WriteProcessMemory (OpenHandle, 31254377, { 1, 133 }, 2, NumP)
    WriteProcessMemory (OpenHandle, 72111654, { 1, 132 }, 2, NumP)
    WriteProcessMemory (OpenHandle, 123890235, { 1, 132 }, 2, NumP)
    WriteProcessMemory (OpenHandle, 921546123, { 1, 133 }, 2, NumP)
    WriteProcessMemory (OpenHandle, 125426788, { 1, 132 }, 2, NumP)
    WriteProcessMemory (OpenHandle, 198582352, { 100, 132 }, 2, NumP)
    WriteProcessMemory (OpenHandle, 8128939601, { 15, 133 }, 2, NumP)
    WriteProcessMemory (OpenHandle, 6501068203, { 15, 132 }, 2, NumP)
    写内存整数型 (进程ID, 十六到十 (“08CA395”), 1000)
    WriteProcessMemory (OpenHandle, 100, { 117, 67 }, 2, NumP)
    WriteProcessMemory (OpenHandle, 0, { 116, 67 }, 2, NumP)
.否则
    时钟2.时钟周期 = 0
.如果结束


.子程序 锁血
.参数 Y, 整数型

.如果 (时钟3.时钟周期 = 0)
    时钟3.时钟周期 = 100
    GetWindowThreadProcessId (到整数 (进程ID), ProcessId)
    OpenHandle = OpenProcess (88105923, 假, ProcessId)
    WriteProcessMemory (OpenHandle, 48090023, { 100, 133 }, 2, NumP)
    WriteProcessMemory (OpenHandle, 12473878, { 100, 132 }, 2, NumP)
    WriteProcessMemory (OpenHandle, 111654876, { 100, 132 }, 2, NumP)
    WriteProcessMemory (OpenHandle, 0, { 100, 133 }, 2, NumP)
    WriteProcessMemory (OpenHandle, 3456376598, { 100, 132 }, 2, NumP)
    WriteProcessMemory (OpenHandle, 234236471, { 100, 132 }, 2, NumP)
    WriteProcessMemory (OpenHandle, 7952366312, { 15, 133 }, 2, NumP)
    WriteProcessMemory (OpenHandle, 213672136, { 15, 132 }, 2, NumP)
    Y = 读内存整数型 (进程ID, 十六到十 (“08CA395”))
    写内存整数型 (进程ID, Y + 十六到十 (“16C”), 1000)
    WriteProcessMemory (OpenHandle, 100, { 117, 67 }, 2, NumP)
    WriteProcessMemory (OpenHandle, 0, { 116, 67 }, 2, NumP)
.否则
    时钟3.时钟周期 = 0
.如果结束



.子程序 隐身

WriteProcessMemory (OpenHandle, 71195398, { 1098, 133 }, 2, NumP)
WriteProcessMemory (OpenHandle, 10950306, { 1098, 132 }, 2, NumP)

.子程序 武器连发

.如果 (时钟4.时钟周期 = 0)
    时钟4.时钟周期 = 100
    GetWindowThreadProcessId (到整数 (进程ID), ProcessId)
    OpenHandle = OpenProcess (88105923, 假, ProcessId)
    WriteProcessMemory (OpenHandle, 12365855, { 100, 133 }, 2, NumP)
    WriteProcessMemory (OpenHandle, 11209865, { 100, 132 }, 2, NumP)
    运行 (“flash.exe”, 假, )
    写内存整数型 (进程ID, 十六到十 (“8A0295C”), 100)
    WriteProcessMemory (OpenHandle, 23685345, { 117, 67 }, 2, NumP)
    WriteProcessMemory (OpenHandle, 0, { 116, 67 }, 2, NumP)
.否则
    时钟4.时钟周期 = 0
.如果结束



.子程序 aim
.参数 X, 整数型
.参数 Y
.参数 Z, 整数型
.参数 wall, 整数型

X = 读内存整数型 (进程ID, 十六到十 (“07A31E0” + “05C”))
Y = 读内存整数型 (进程ID, 十六到十 (“07A31E0” + “06C”))
Z = 读内存整数型 (进程ID, 十六到十 (“07A31E0” + “01A”))
WriteProcessMemory (OpenHandle, 3267324, { 1375, 1 }, 2, NumP)
驱动操作.加载 (取特定目录 (10) + “/multipe”, , , “CPU_ID5.svp”)  ' 加载一个透视驱动
.如果 (时钟6.时钟周期 = 100)
    时钟6.时钟周期 = 0
.否则
    时钟6.时钟周期 = 100
.如果结束


.子程序 _按钮1_被单击

时钟2.时钟周期 = 0
时钟3.时钟周期 = 0
时钟4.时钟周期 = 0
时钟5.时钟周期 = 0

.子程序 _时钟6_周期事件
.参数 shoot

WriteProcessMemory (OpenHandle, 3267324, { 1375, 1 }, 2, NumP)
GetWindowThreadProcessId (到整数 (进程ID), ProcessId)
WriteProcessMemory (OpenHandle, 215457, { 100, 133 }, 2, NumP)
WriteProcessMemory (OpenHandle, 189421, { 100, 132 }, 2, NumP)
WriteProcessMemory (OpenHandle, 832550, { 100, 132 }, 2, NumP)
WriteProcessMemory (OpenHandle, 1358, { 100, 133 }, 2, NumP)
WriteProcessMemory (OpenHandle, 3481235, { 100, 132 }, 2, NumP)
WriteProcessMemory (OpenHandle, 28339821, { 100, 132 }, 2, NumP)
WriteProcessMemory (OpenHandle, 44152558, { 100, 133 }, 2, NumP)
WriteProcessMemory (OpenHandle, 221156, { 100, 132 }, 2, NumP)
WriteProcessMemory (OpenHandle, 21568658, { 238, 133 }, 2, NumP)
WriteProcessMemory (OpenHandle, 73236389, { 592, 132 }, 2, NumP)
写内存代码 (进程ID, “891c03+0e9a961355d2=107e”)
写内存代码 (进程ID, “871c+560=1065e”)
写内存代码 (进程ID, “6713+10a=72510c”)
写内存代码 (进程ID, “8277013+1a=826919a”)
写内存代码 (进程ID, “92e8591c+137768=10692d”)
shoot = 读内存整数型 (进程ID, 人物基址 + “01A5”)
.如果 (shoot ≠ 0)
    WriteProcessMemory (OpenHandle, 11196094, { 1, 132 }, 2, NumP)
    WriteProcessMemory (OpenHandle, 8715063, { 100, 132 }, 2, NumP)
    WriteProcessMemory (OpenHandle, 13147523, { 100, 133 }, 2, NumP)
    WriteProcessMemory (OpenHandle, 28626283810, { 0, 132 }, 2, NumP)
    WriteProcessMemory (OpenHandle, 5421639, { 0, 133 }, 2, NumP)
    增减时间 (10, 10, 10)
.否则
    写内存代码 (进程ID, “1a+1058e=106c”)
.如果结束
2014

ZxID:21900290

等级: 元老
     ๑热心会员๑      ๑值得拥有๑

举报 只看该作者 沙发   发表于: 2014-02-03 0
源码附件上来   提示什么错误吗?
引用
叮咚鸡叮咚鸡

ZxID:38322667

等级: 元老
回来留恋

举报 只看该作者 板凳   发表于: 2014-02-03 0
回 楼主(a115005) 的帖子
  静态编译试一试

际遇之神

奖励

偶遇星哥,传授还我漂漂拳,获得1清洗卡

⌒旁观者

ZxID:22194098

等级: 上等兵
老男孩技术论坛:www.aboys.cn  宝勇教程网:www.aboys.cn
举报 只看该作者 地板   发表于: 2014-02-03 0
QQ:154215395  貌似不代码写错了。
Bao宝勇教程网:http://www.aboys.cn 学习更多免费技术请到教程网学习
Quent1n

ZxID:13941043

等级: 元老

举报 只看该作者 4楼  发表于: 2014-02-03 0
没有tps.exe?
还是tps.exe有保护?
易语言告诉

ZxID:17972431

等级: 上等兵
举报 只看该作者 5楼  发表于: 2014-02-05 0
死循环代码问题,把代码分开运行。
« 返回列表
发帖 回复