Показать сообщение отдельно
Старый 02.01.2010, 00:29   #1
KingMaks
Знающий
 
Аватар для KingMaks
 
Регистрация: 26.11.2009
Сообщений: 313
Написано 35 полезных сообщений
(для 95 пользователей)
ограничение мышки по вертикали

Вот зделал управление мышкой, всё работает.
Только вот немогу ограничить камеру, тоесть когда ведеш мышку вперёд
камера крутилась по оси х но не полный круг,а частично,
попытался зделать кое-какое ограничени но оно плохо работает:

Graphics3D 640,480
SetBuffer BackBuffer()

player = CreateSphere(
camera = CreateCamera(player)
PositionEntity camera,0,1.5,0

pol = CreateTerrain(32)
PositionEntity pol,0,-1,0

For x=1 To 10
cub = CreateCube()
PositionEntity cub,Rand(0,32),0,Rand(0,32)
EntityColor cub,Rand(0,255),Rand(0,255),Rand(0,255)
Next

MoveMouse GraphicsWidth()/2,GraphicsHeight()/2

While Not KeyDown(1)

x = MouseXSpeed()
y = MouseYSpeed()

xg = GraphicsWidth()/2
yg = GraphicsHeight()/2

If x<0 Then MoveMouse xg,yg
If x>0 Then MoveMouse xg,yg
If y<0 Then MoveMouse xg,yg
If y>0 Then MoveMouse xg,yg

limit = EntityPitch(camera,True)

TurnEntity player,0,-x,0
If limit > -25 And limit < 70 Then TurnEntity camera,y,0,0
; вот я пытался зделать ограничение
If KeyDown(200) Then MoveEntity player,0,0,0.1
If KeyDown(20 Then MoveEntity player,0,0,-0.1
If KeyDown(203) Then MoveEntity player,-0.1,0,0
If KeyDown(205) Then MoveEntity player,0.1,0,0

UpdateWorld
RenderWorld
Text 10,10,limit
Flip
Wend
End
__________________
StimuL
Maks
(Offline)
 
Ответить с цитированием