传奇3官方1.45引擎源代码 - 小火炬源码

夜游神

传奇3官方1.45引擎源代码 - 小火炬引擎源码

unit comman;
interface
uses Classes, SysConst, SysUtils, tList32, Windows, Hum_Unit_Wide;

var Player:TList_;
implementation
procedure OnLoginProc(PID:Cardinal);
var Hum:HumWide;
begin
  if Player.IndexOf(PID)=-1 then
    begin
      Hum:=HumWide.Create;
      Hum.ID:=PID;
      Player.AddObject(Hum.ID,Hum);
    end;
end;

procedure OnLogOutProc(PID:Cardinal);
var Hum:HumWide;
begin
  if Player.IndexOf(PID)<>-1 then
   begin
     Hum:= Player.IndexOfObject(PID) as HumWide;
     Hum.Free;
     Player.Delete(Player.IndexOf(PID));
   end;
end;

Initialization
Player:=TList_.Create;
end.

分享名称：1.45官方引擎源代码.zip
分享链接：http://pan.zxdll.cn:88/#s/9bcbbA5g
访问密码：

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

MooCa

瞧瞧什么代码

sheyiang

感谢分享

a356789

看看如何。。。

616126447

感谢分享

18190173973

3212321323132