-
Notifications
You must be signed in to change notification settings - Fork 48
/
Copy pathBaseConflict.Globals.Client.pas
92 lines (77 loc) · 2.53 KB
/
BaseConflict.Globals.Client.pas
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
unit BaseConflict.Globals.Client;
interface
uses
// ----------- Delphi --------------
System.Generics.Collections,
Vcl.Taskbar,
// --------- ThirdParty ------------
FMOD.Studio.Classes,
// ----------- Engine --------------
Engine.Input,
Engine.GUI,
Engine.Terrain,
Engine.PostEffects,
{$IFDEF DEBUG}
Engine.GUI.Editor,
Engine.Terrain.Editor,
Engine.PostEffects.Editor,
{$ENDIF}
Engine.Vertex,
// ------------ Game ---------------
BaseConflict.Api.Types,
BaseConflict.Entity,
BaseConflict.Game.Client,
BaseConflict.EntityComponents.Client.Sound,
BaseConflict.Classes.MiniMap,
BaseConflict.Api.Account,
BaseConflict.Api.Chat,
BaseConflict.Api.Game,
BaseConflict.Api.Matchmaking,
BaseConflict.Api.Shop,
BaseConflict.Api.Deckbuilding,
BaseConflict.Map.Client,
BaseConflict.Constants.Client,
BaseConflict.Classes.Client,
BaseConflict.Classes.Gamestates.GUI;
type
EnumInputType = (itKeyboard, itMouse);
SetInputTypes = set of EnumInputType;
/// <summary> Coloring mode of units.
/// ucAlly distinguish between own,ally,enemy and neutral units.
/// ucPlayer colors units related to their owner. </summary>
EnumUnitColoringMode = (ucTeam, ucAlly, ucPlayer);
EnumTaskbarState = (tsNone, tsNormal, tsError, tsPaused, tsIndeterminate);
var
IsStaging : boolean;
GlobalEntity : TEntity;
ClientWindowActive : boolean;
HUD : TIngameHUD;
PostEffects : TPostEffectManager;
GUI : TGUI;
GUIInputUsed : SetInputTypes;
ShowHealthbars : boolean = true;
ShowHitBoxes : boolean = false;
PreventIdle : boolean = false;
KeybindingManager : TKeybindingManager<EnumKeybinding>;
TaskbarManager : TTaskbar;
Appstate : EnumTaskbarState = tsNone;
AppProgress : int64 = 0;
AppProgressMax : int64 = 0;
/// <summary> The current game. Used by the components, so it must be contain the right game. </summary>
ClientGame : TClientGame;
ClientMap : TClientMap;
/// <summary> Currently only ucTeam is implemented. </summary>
UnitColorMode : EnumUnitColoringMode = ucTeam;
/// <summary> Contains the information about the last game played by the player. </summary>
ServerGameData : TGameMetaInfo;
GameServerPort : Word;
SoundSystem : TFMODStudioSystem;
SoundMasterBus : TFMODStudioBus;
SoundMusicBus : TFMODStudioBus;
SoundEffectBus : TFMODStudioBus;
SoundUIBus : TFMODStudioBus;
SoundPingBus : TFMODStudioBus;
SoundManager : TGlobalSoundManagerComponent;
USE_ASSET_PRELOADER_CACHE : boolean = {$IFDEF RELEASE}true{$ELSE}false{$ENDIF};
implementation
end.