plugshare.pas

飘飘M2 本人更新加入英雄系统 修正BUG 全套的源码上传 不看要后悔啊！

unit PlugShare;

interface
uses
  Windows, Classes, EngineAPI, EngineType;
type
  TUserCommand = record
    nIndex: Integer;
    sCommandName: string[100];
  end;
  pTUserCommand = ^TUserCommand;

  TFilterMsg = record
    sFilterMsg: string[100];
    sNewMsg: string[100];
  end;
  pTFilterMsg = ^TFilterMsg;

  TCheckItem = record
    szItemName: string[14];
    boCanDrop: Boolean;
    boCanDeal: Boolean;
    boCanStorage: Boolean;
    boCanRepair: Boolean;
  end;
  pTCheckItem = ^TCheckItem;
  
var
  PlugHandle: Integer;

  g_UserCmdList: Classes.TStringList;
  g_CheckItemList: Classes.TList;
  g_MsgFilterList: Classes.TList;
  
implementation

end.