游戏引擎

开发平台：

Delphi

PK_DLooterU.pas：源码内容

							(*
 Dungeon Looter class registering unit
 (C) 2007 George "Mirage" Bakhtadze
 Created: Sep 26, 2007
 Unit contains game-specific classes registration routines
*)
unit PK_DLooterU;
interface
procedure RegisterPackage;
implementation
uses
  TextFile, BaseClasses, BasePlugins, GWorld;
procedure RegisterPackage;
var ClassList: TClassArray;
begin
  if Assigned(PluginSystem) then begin
    ClassList := nil;
    MergeClassLists(ClassList, GWorld.GetUnitClassList);
    PluginSystem.RegisterPlugin('Dungeon Looter', 'Dungeon Looter package', ClassList);
  end else Log.Log('Package "PK_DLooter" initialization: Plugin system is not initialized', lkError);
end;
initialization
  if Assigned(PluginSystem) then RegisterPackage;
end.

						