newGame = StartNetGame()
; Проверим состояние новой игры
If newGame = 0 Then
Print "Нельзя запустить или присоединиться к сетевой игре"
End

ElseIf newGame = 1
Print "Подключились к сетевой игре"
ElseIf newGame = 2
Print "Новая сетевая игра запущена!"
EndIf

; Создаем случайное имя игрока
name$="Player" + Rand(100)

; Получим уникальный номер id для игрока
; и создадим игрока
playerID=CreateNetPlayer(name$)

If playerID = 0 Then
Print "Игрок не может быть создан!"
Else
Print "Игрок   " + name$ + " создан и его номер ID#" + playerID
WaitKey()
; удалим игрока!
DeleteNetPlayer playerID
Print "Игрок удален!"
End If