传奇一条龙,复古传奇,GM基地,传奇服务端

 找回密码
 立即注册

QQ登录

只需一步,快速开始

网友自助信息发布区,请自行甄别

查看: 775|回复: 6

传奇3人寿仁DD145插件源码全套编译通过

[复制链接]

624

帖子

2145

钻石

1359

积分

管理员

Rank: 9Rank: 9Rank: 9

在线时间
114 小时
发表于 2018-12-2 23:34:53 | 显示全部楼层 |阅读模式
传奇3人寿仁DD145插件源码全套编译通过


unit _CheckVer;

interface
uses SysUtils, Classes, Windows, _Const, _Grobal;

implementation
uses _function, PlugStart;
var
  LastCheckTime     : Cardinal;

procedure _CheckClientVer;
var
  I                 : Integer;
  Flag, Flag2       : Boolean; // 这个是按钮
  T1                : Cardinal;
begin
  T1 := GetTickCount;
  if T1 - LastCheckTime > 3 then //2010(3600000)这个是设置判断的时间!如果设置1年就1年后判断
  begin
    LastCheckTime := T1;
    if not IsHacked then
    begin
      //
      Flag := TRUE;// 设置 判断开关!
      Flag2 := TRUE;// 设置 判断开关!
      for I := Low(ServerNameList) to High(ServerNameList) do  //mingzi
      begin
        //TEiFunc.DebugOut(EI.ServerName + '+' + ServerNameList[I]);
        if SameText(EI.ServerName, ServerNameList[I]) then
        begin
          Flag := FALSE; // 设置 判断开关!
          break;
        end;
      end;
      for I := Low(ServerIPList) to High(ServerIPList) do  //ip
      begin
        //TEiFunc.DebugOut(EI.CSetupFile.Info.IP1.IP + '-' + ServerIPList[I]);
        if SameText(EI.CSetupFile.Info.IP1.IP, ServerIPList[I]) then
        begin
          Flag2 := FALSE; // 设置 判断开关!
          break;
        end;
      end;
      //
      Flag := FALSE;// 2010
      Flag2 := FALSE;//  2010
      IsHacked := Flag or Flag2;
      if IsHacked then   //  IsHacked  去找一个    Flag or Flag2;       判断!
      begin
        EI.UserEngine.HackCheckSum := $FFFF; //如果对了就设置
      end; //错了就跳过 .
      //if IsHacked then TEiFunc.DebugOut('TRUE') else TEiFunc.DebugOut('FALSE');
      {if IsHacked then
        TEiFunc.DebugOut('程序编译:传奇3技术研究组')
      else
        TEiFunc.DebugOut(Format('Ver:%s (For:%s)', [EiDllVer, EI.ServerName]));}
    end;
  end;
end;

procedure hkRunTimer;
asm
  pushad
    Call  _CheckClientVer
  popad
  mov  eax,[$53EBB0]
  push $4A978E
  ret
end;
initialization
  TFunc.HookJmp($4A9789, @hkRunTimer);
finalization

end.

游客,如果您要查看本帖隐藏内容请回复

回复

使用道具 举报

13

帖子

11

钻石

35

积分

初级GM

Rank: 1

在线时间
4 小时
发表于 2019-3-18 09:32:38 | 显示全部楼层
好东西顶下楼主啊...
回复

使用道具 举报

22

帖子

2020

钻石

27

积分

初级GM

Rank: 1

在线时间
5 小时
发表于 2019-4-15 16:39:06 | 显示全部楼层

好东西顶下楼主啊...
回复

使用道具 举报

9

帖子

46

钻石

9

积分

初级GM

Rank: 1

在线时间
0 小时
发表于 2020-1-20 08:35:34 | 显示全部楼层
好东西顶下楼主啊...
回复

使用道具 举报

5

帖子

26

钻石

5

积分

初级GM

Rank: 1

在线时间
0 小时
发表于 2020-5-21 22:49:19 | 显示全部楼层
ccccccccccccc
回复

使用道具 举报

19

帖子

52

钻石

19

积分

初级GM

Rank: 1

在线时间
0 小时
发表于 2020-7-15 16:08:20 | 显示全部楼层
插件源码全套编
回复

使用道具 举报

201

帖子

142

钻石

224

积分

中级GM

Rank: 2

在线时间
23 小时
发表于 2020-8-31 08:53:00 | 显示全部楼层
客户端和服务器C++工程使用
回复

使用道具 举报

您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

QQ|Archiver|手机版|小黑屋|八五GM论坛专业的传奇私服GM技术交流基地 ( 粤ICP备11015868号-18 ) 传奇私服 Array7.2 版权所有 © 八五论坛 Comsenz Inc.

|网站地图
快速回复 快速发帖 返回顶部 返回列表