|
27.08.2007, 14:02
|
#16
|
Модератор
Регистрация: 11.07.2007
Сообщений: 2,910
Написано 686 полезных сообщений (для 1,694 пользователей)
|
Re: Проблема аццкого мегапроЭкта ...
Function UpdateGame ()
;Функция обновления игры
For p.Player=Each player
Updateplayer ( p ) ;обновляем игру
Next
If Time < MilliSecs () Then Time = MilliSecs () + 100 : SendNetMsg 2,PackMsg$(myent),myid,0 : UpdateNetwork() ;обновляем чё то там
;
End Function
Function UpdateNetwork()
While RecvNetMsg()
Select NetMsgType()
Case 100
p.Player=New Player
p\id=NetMsgFrom()
p\name=NetPlayerName(p\id)
p\Model=CreateCube()
Case 101
p.Player=FindPlayer(NetMsgFrom())
FreeEntity p\Model
Delete p
Case 2
p.Player=FindPlayer(NetMsgFrom())
UnpackMsg(p\Model,NetMsgData$())
End Select
Wend
End Function
Function FindPlayer.Player( id )
For p.Player=Each Player
If p\id=id Then Return p
Next
End Function
Function PackMsg$(ent)
Return EntityX(ent)+"|"+EntityY(ent)+"|"+EntityZ(ent)+"|"+EntityYaw(ent)
End Function
Function UnpackMsg(ent,dat$)
xp=Instr(dat$,"|")
x=Float(Left(dat$,xp))
dat$=Right(dat$,Len(dat$)-xp)
yp=Instr(dat$,"|")
y=Float(Left(dat$,yp))
dat$=Right(dat$,Len(dat$)-yp)
zp=Instr(dat$,"|")
z=Float(Left(dat$,zp))
dat$=Right(dat$,Len(dat$)-zp)
yaw=Float(Left(dat$,Len(dat$)))
PositionEntity ent,x,y,z
RotateEntity ent,0,yaw,0
End Function
Вот в общем весь код, относящийся к инету... хз почему так сильно тормозит...
Кто-нибудь знает в чём проблема? Плиз, помогите...
|
(Offline)
|
|
27.08.2007, 20:09
|
#17
|
Модератор
Регистрация: 11.07.2007
Сообщений: 2,910
Написано 686 полезных сообщений (для 1,694 пользователей)
|
Re: Проблема аццкого мегапроЭкта ...
Блин... всё, скорее всего убери игру по инету.. а сделаю обычную рпг.. ((((
|
(Offline)
|
|
27.08.2007, 21:29
|
#18
|
☭
Регистрация: 26.09.2006
Сообщений: 6,035
Написано 1,474 полезных сообщений (для 2,707 пользователей)
|
Re: Проблема аццкого мегапроЭкта ...
Правильно сказал Райтер. ДП негодится для инета.
Причом оченно неплохо подходит для обычной сети.
Tormoz, ета команда передает строку, как не крутись.
SendNetMsg 2,PackMsg$(myent),myid,0
Данил, до боли знакомы текст , а вообще юзай специализированные либы, как то - KNetLib-чтоли.
|
(Offline)
|
|
28.08.2007, 10:34
|
#19
|
Модератор
Регистрация: 11.07.2007
Сообщений: 2,910
Написано 686 полезных сообщений (для 1,694 пользователей)
|
Ужс нах.... извиняюсь...
Но я же видел гаму flyer ... Она вполне работало нормально даже при 4 игроках (2 игрока и два бота) ... И ведь как-то она на ДП сделана...
хм.... текст , конечно, до боли знакомый, ну а зачем придумывать то, что уже кем-то придумано?
А так всё таки я не понимаю, в чём проблема... лана, ща буду дальше думать
|
(Offline)
|
|
28.08.2007, 12:02
|
#20
|
.
Регистрация: 05.08.2006
Сообщений: 10,429
Написано 3,454 полезных сообщений (для 6,863 пользователей)
|
Re: Проблема аццкого мегапроЭкта ...
до боли знакомый, ну а зачем придумывать то, что уже кем-то придумано?
|
Чтобы за себя радость была, чтобы опыта получить, чтобы знать с вой код и общатся с ним на Ты.
|
(Offline)
|
|
28.08.2007, 13:38
|
#21
|
Легенда
Регистрация: 01.10.2006
Сообщений: 3,705
Написано 296 полезных сообщений (для 568 пользователей)
|
Re: Проблема аццкого мегапроЭкта ...
текст, конечно, до боли знакомый, ну а зачем придумывать то, что уже кем-то придумано?
|
Верно
|
(Offline)
|
|
Ваши права в разделе
|
Вы не можете создавать темы
Вы не можете отвечать на сообщения
Вы не можете прикреплять файлы
Вы не можете редактировать сообщения
HTML код Выкл.
|
|
|
Часовой пояс GMT +4, время: 07:02.
|