Показать сообщение отдельно
Старый 19.03.2007, 22:18   #9
ЛысыЙ_Чук-Иванчук
Дэвелопер
 
Регистрация: 19.03.2006
Сообщений: 1,241
Написано 10 полезных сообщений
(для 17 пользователей)
Re: СЕТЬ...СЕТЬ...СЕТЬ...

Чтото я недогоняю, до того момента как я использую камеру или 3д режим или даже просто пишу
в цикле text 20,20... скорость передаци бешаная(передачи сообщений), как только я их
исползовал ВСЕ тормоза конкретные.
Вот пример:
а=1 создать сервер
а=2 подключить тормозного
а=3 подключить быстрого
PS\ Может это из-за того что я тестю на одном компе?


a=1 ;Тип игры 1-сервер, 2-тормозной клиент, 3-нормальный


If a=1
Geme=HostNetGame("VLAD"); СОЗДАЕМ СЕРВАК
myid=CreateNetPlayer("m01")
While Not KeyDown( 1 )
If KeyDown(57)
time=MilliSecs()
SendNetMsg 2,"ghghghghghgasfasdfasdfasdof[ofj[wnfmqwpofnmweomfqwiojgfsd;hgsdhgh;sdghgh",myid,0,0
EndIf
If RecvNetMsg() And NetMsgType()=2
Print "down_"+ (MilliSecs()-time)
EndIf
If MouseDown(1)
time5=MilliSecs()
SendNetMsg 55,"1",myid,0,0
EndIf
If RecvNetMsg() And NetMsgType()=55
Print "mouse_down_"+ (MilliSecs()-time5)
EndIf
If MouseDown(2)
time5=MilliSecs()
SendNetMsg 66,"",myid,0,0
EndIf
If RecvNetMsg() And NetMsgType()=66
Print "_______"+ (MilliSecs()-time5)
EndIf
Wend
End
ElseIf a=2;000000000000000000000 ЕТО ТОРМОЗНОЙ
netGame=JoinNetGame("VLAD","127.0.0.1")
myid=CreateNetPlayer("m011")
Graphics3D 640,480,32,2
SetBuffer BackBuffer()
cam=CreateCamera()
af$=0
While Not KeyDown( 1 )
If RecvNetMsg() And NetMsgType()=2
SendNetMsg 2,"",myid,0,0
af=NetMsgData()
EndIf
If RecvNetMsg() And NetMsgType()=55 SendNetMsg 55,"1",myid,0,0
If RecvNetMsg() And NetMsgType()=66 SendNetMsg 66,"",myid,0,0

RenderWorld
Text 20,20,"text-"+af
Flip
Wend

ElseIf a=3; жжжжжжжжжжжжжж ЕТО НОРМАЛЬНЫЙ
netGame=JoinNetGame("VLAD","127.0.0.1")
myid=CreateNetPlayer("m011323")
af$=0
While Not KeyDown( 1 )
If RecvNetMsg() And NetMsgType()=2
SendNetMsg 2,"",myid,0,0
af=NetMsgData()
EndIf
If RecvNetMsg() And NetMsgType()=55 SendNetMsg 55,"1",myid,0,0
If RecvNetMsg() And NetMsgType()=66 SendNetMsg 66,"",myid,0,0


;Text 20,20,"text-"+af
Wend

(Offline)
 
Ответить с цитированием