aksdb
/
CentrED
1
0
Fork 0
Code Issues 2 Pull Requests Releases Wiki Activity

- Added more verbose status messages

This commit is contained in:
Andreas Schneider 2008-03-07 18:28:55 +01:00
parent 12773fd63e
commit 15bcaa0686
4 changed files with 1149 additions and 1112 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2212
Server/ULandscape.pas
View File

File diff suppressed because it is too large Load Diff

27
Server/cedserver.lpi
View File

@ -28,7 +28,7 @@
<PackageName Value="lnetbase"/> <PackageName Value="lnetbase"/>
</Item1> </Item1>
</RequiredPackages> </RequiredPackages>
<Units Count="9"> <Units Count="14">
<Unit0> <Unit0>
<Filename Value="cedserver.lpr"/> <Filename Value="cedserver.lpr"/>
<IsPartOfProject Value="True"/> <IsPartOfProject Value="True"/>
@ -74,6 +74,31 @@
<IsPartOfProject Value="True"/> <IsPartOfProject Value="True"/>
<UnitName Value="UInterfaces"/> <UnitName Value="UInterfaces"/>
</Unit8> </Unit8>
<Unit9>
<Filename Value="UPacketHandlers.pas"/>
<IsPartOfProject Value="True"/>
<UnitName Value="UPacketHandlers"/>
</Unit9>
<Unit10>
<Filename Value="ULandscape.pas"/>
<IsPartOfProject Value="True"/>
<UnitName Value="ULandscape"/>
</Unit10>
<Unit11>
<Filename Value="UPackets.pas"/>
<IsPartOfProject Value="True"/>
<UnitName Value="UPackets"/>
</Unit11>
<Unit12>
<Filename Value="UAdminHandling.pas"/>
<IsPartOfProject Value="True"/>
<UnitName Value="UAdminHandling"/>
</Unit12>
<Unit13>
<Filename Value="UClientHandling.pas"/>
<IsPartOfProject Value="True"/>
<UnitName Value="UClientHandling"/>
</Unit13>
</Units> </Units>
</ProjectOptions> </ProjectOptions>
<CompilerOptions> <CompilerOptions>

12
Server/cedserver.lpr
View File

@ -33,11 +33,13 @@ uses
{$ENDIF}{$ENDIF} {$ENDIF}{$ENDIF}
SysUtils, Classes, SysUtils, Classes,
lnetbase, lnetbase,
UConfig, UCEDServer, URadarMap, ULargeScaleOperations; UConfig, UCEDServer, URadarMap, ULargeScaleOperations, UPackets,
UAdminHandling, UClientHandling, ULandscape, UPacketHandlers;
{$I version.inc} {$I version.inc}
begin begin
Writeln('');
Writeln('UO CentrED Server Version ', ProductVersion); Writeln('UO CentrED Server Version ', ProductVersion);
Writeln('Copyright ', Copyright); Writeln('Copyright ', Copyright);
//Writeln('================================'); //Writeln('================================');
@ -59,15 +61,15 @@ begin
end; end;
{$ENDIF} {$ENDIF}
Write(TimeStamp, 'Initializing ... '); Writeln(TimeStamp, 'Initialization started');
Randomize; Randomize;
CEDServerInstance := TCEDServer.Create; CEDServerInstance := TCEDServer.Create;
Writeln('Done'); Writeln(TimeStamp, 'Initialization done');
CEDServerInstance.Run; CEDServerInstance.Run;
Write(TimeStamp, 'Terminating ... '); Write(TimeStamp, 'Shutting down ... ');
FreeAndNil(CEDServerInstance); FreeAndNil(CEDServerInstance);
Config.Flush; Config.Flush;
FreeAndNil(Config); FreeAndNil(Config);
Writeln('Done'); Writeln('done');
end. end.

10
version.inc
View File

@ -1,5 +1,5 @@
const const
ProductVersion = '0.3.6'; ProductVersion = '0.3.6';
ProtocolVersion = 5; ProtocolVersion = 5;
Revision = '41'; Revision = '41';
Copyright = '2007 Andreas Schneider'; Copyright = '2008 Andreas Schneider';