Changeset 364 for trunk/Direct.pas

Timestamp:

Apr 12, 2021, 11:55:20 PM (3 years ago)

Author:

chronos

Message:

• Added: Partial network game play implementation.
• Modified: Code cleanup.

File:

• trunk/Direct.pas (modified) (2 diffs)

trunk/Direct.pas

@@ -43 +43 @@
 
 uses
-  ScreenTools, Protocol, Start, LocalPlayer, NoTerm, Back, Global;
+  ScreenTools, Protocol, Start, LocalPlayer, NoTerm, Back, Global, UNetworkServer,
+  UNetworkClient;
 
 {$R *.lfm}
@@ -185 +186 @@
   BrainTerm.Client := LocalPlayer.Client;
   BrainTerm.Name := Phrases.Lookup('HUMAN');
+  BrainNetworkServer.Client := UNetworkServer.Client;
+  BrainNetworkServer.Name := Phrases.Lookup('NETWORK_SERVER');
+  BrainNetworkClient.Client := UNetworkClient.Client;
+  BrainNetworkClient.Name := Phrases.Lookup('NETWORK_CLIENT');
   BrainRandom.Name := Phrases.Lookup('RANDOMAI');
   Canvas.Font.Assign(UniFont[ftNormal]);