Advertisement
Guest User

Untitled

a guest
Sep 22nd, 2017
68
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 1.82 KB | None | 0 0
  1. {
  2. with(Client)
  3. instance_destroy();
  4.  
  5. global.players = ds_list_create();
  6. global.tcpListener = -1;
  7. global.serverSocket = -1;
  8. global.serverName = "Testing Server"
  9.  
  10. global.gamemode = 0
  11.  
  12. global.hostingPort = 8190
  13.  
  14. randomize();
  15. global.randomSeed=random_get_seed();
  16. updatePlayer = 1;
  17.  
  18. frame = 0;
  19. // Player 0 is reserved for the Server.
  20. serverPlayer = instance_create(0,0,Player);
  21. serverPlayer.name = global.playerName;
  22. ds_list_add(global.players, serverPlayer);
  23.  
  24. global.tcpListener = tcp_listen(global.hostingPort);
  25. if(socket_has_error(global.tcpListener))
  26. {
  27. show_message("Unable to host: " + socket_error(global.tcpListener));
  28. instance_destroy();
  29. exit;
  30. }
  31. global.serverSocket = tcp_connect("127.0.0.1", global.hostingPort);
  32. if(socket_has_error(global.serverSocket))
  33. {
  34. show_message("Unable to connect to self.");
  35. instance_destroy();
  36. exit;
  37. }
  38.  
  39. var loopbackStartTime;
  40. loopbackStartTime = current_time;
  41. do {
  42. io_handle()
  43. if(current_time - loopbackStartTime > 2000) // 0.5s should be enough to create a loopback connection...
  44. {
  45. show_message("Unable to host: Maybe the port is already in use.");
  46. instance_destroy();
  47. exit;
  48. }
  49. serverPlayer.socket = socket_accept(global.tcpListener);
  50. io_handle(); // Make sure the game doesn't appear to freeze
  51. } until(serverPlayer.socket>=0);
  52.  
  53. global.playerID = 0;
  54. global.myself = serverPlayer;
  55.  
  56. global.joinedServerName = global.serverName; // so no errors of unknown variable occur when you create a server
  57. global.mapchanging=0;
  58.  
  59. global.difficulty=1
  60. room_goto(TestingRoom1)
  61. }
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement