equal
deleted
inserted
replaced
32 procedure InitIPC; |
32 procedure InitIPC; |
33 procedure CloseIPC; |
33 procedure CloseIPC; |
34 procedure NetGetNextCmd; |
34 procedure NetGetNextCmd; |
35 |
35 |
36 implementation |
36 implementation |
37 uses uConsole, uConsts, uWorld, uMisc, uRandom, uLand; |
37 uses uConsole, uConsts, uWorld, uMisc, uLand; |
38 const isPonged: boolean = false; |
38 const isPonged: boolean = false; |
39 var IPCSock: PTCPSocket = nil; |
39 var IPCSock: PTCPSocket = nil; |
40 fds: PSDLNet_SocketSet; |
40 fds: PSDLNet_SocketSet; |
41 |
41 |
42 extcmd: array[word] of packed record |
42 extcmd: array[word] of packed record |