--- a/gameServer/CoreTypes.hs	Fri Sep 23 12:47:47 2022 -0400
+++ b/gameServer/CoreTypes.hs	Tue Sep 27 14:59:03 2022 +0300
@@ -46,6 +46,7 @@
 
 data Action =
     AnswerClients ![ClientChan] ![B.ByteString]
+    | AnswerClientsByProto ![(ClientChan, Word16)] !(Word16 -> [B.ByteString])
     | SendServerMessage
     | SendServerVars
     | MoveToRoom RoomIndex