Example:
Code: Select all
ServerID=CreateNetworkServer(#PB_Any,2000)
OtherServerID=CreateNetworkServer(#PB_Any,2001)
Procedure ServerManager(SID)
Repeat
Select NetworkServerEvent(SID)
...
EndSelect
Forever
EndProcedure
CreateThread(@ServerManager(),ServerID) ; This thread process events from first server
CreateThread(@ServerManager(),OtherServerID) ; This thread process events from second server
P.P.S. Sorry for my bad english))