hedgewars/uFLNetTypes.pas
branchqmlfrontend
changeset 12861 95d903b976d0
parent 12860 1b2b84315d27
child 12862 90f927b4b9e1
--- a/hedgewars/uFLNetTypes.pas	Sun Dec 17 00:09:24 2017 +0100
+++ /dev/null	Thu Jan 01 00:00:00 1970 +0000
@@ -1,57 +0,0 @@
-unit uFLNetTypes;
-interface
-
-type TCmdType = (cmd_ADD_TEAM, cmd_ADD_TEAM_s, cmd_ASKPASSWORD, cmd_BANLIST,
-    cmd_BANLIST_s, cmd_BYE, cmd_CFG_AMMO, cmd_CFG_DRAWNMAP, cmd_CFG_FEATURE_SIZE,
-    cmd_CFG_FULLMAPCONFIG, cmd_CFG_FULLMAPCONFIG_s, cmd_CFG_MAP, cmd_CFG_MAPGEN,
-    cmd_CFG_MAZE_SIZE, cmd_CFG_SCHEME, cmd_CFG_SCHEME_s, cmd_CFG_SCRIPT,
-    cmd_CFG_SEED, cmd_CFG_TEMPLATE, cmd_CFG_THEME, cmd_CHAT, cmd_CLIENT_FLAGS,
-    cmd_CLIENT_FLAGS_s, cmd_CONNECTED, cmd_EM, cmd_EM_s, cmd_ERROR, cmd_HH_NUM,
-    cmd_INFO, cmd_INFO_s, cmd_JOINED, cmd_JOINED_s, cmd_JOINING, cmd_KICKED,
-    cmd_LEFT, cmd_LOBBY_JOINED, cmd_LOBBY_JOINED_s, cmd_LOBBY_LEFT, cmd_NICK,
-    cmd_NOTICE, cmd_PING, cmd_PING_s, cmd_PROTO, cmd_REMOVE_TEAM, cmd_ROOMS,
-    cmd_ROOMS_s, cmd_ROOM_ADD, cmd_ROOM_ADD_s, cmd_ROOM_DEL, cmd_ROOM_UPD,
-    cmd_ROOM_UPD_s, cmd_ROUND_FINISHED, cmd_RUN_GAME, cmd_SERVER_AUTH,
-    cmd_SERVER_MESSAGE, cmd_SERVER_VARS, cmd_TEAM_ACCEPTED, cmd_TEAM_COLOR,
-    cmd_WARNING);
-
-    type TCmdParam = packed record
-        cmd: TCmdType;
-        end;
-    type TCmdParamL = packed record
-        cmd: TCmdType;
-        str1len: Longword;
-        str1: array[word] of char;
-        end;
-    type TCmdParamS = packed record
-        cmd: TCmdType;
-        str1: shortstring;
-        end;
-    type TCmdParamSL = packed record
-        cmd: TCmdType;
-        str1: shortstring;
-        str2len: Longword;
-        str2: array[word] of char;
-        end;
-    type TCmdParamSS = packed record
-        cmd: TCmdType;
-        str1: shortstring;
-        str2: shortstring;
-        end;
-    type TCmdParami = packed record
-        cmd: TCmdType;
-        param1: LongInt;
-        end;
-
-    TCmdData = record
-                   case byte of
-                       0: (cmd: TCmdParam);
-                       1: (cpl: TCmdParamL);
-                       2: (cps: TCmdParamS);
-                       3: (cpsl: TCmdParamSL);
-                       4: (cpi: TCmdParami);
-               end;
-
-implementation
-
-end.