Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- ;Server
- TCPStartup()
- $MainSocket = TCPListen("127.0.0.1", 25565)
- While 1
- Local $ConnectedSocket = TCPAccept($MainSocket)
- If $ConnectedSocket >= 0 Then
- MsgBox(0, "", "Mein Server - Client verbunden")
- Exit
- EndIf
- WEnd
Add Comment
Please, Sign In to add comment