Re: 3D Ball

[Niccolo Zapponi <nicky at nosrelo dot it>]

> Instead of the KeyDown event, use a timer and Keyboard.AsyncKeyDown.
Sorry but I couldn't make it work.
Here is what I wrote in the Timer:



  dim pt as Vector3D

  //this will make the camera move

  pt = new Vector3D(0,200,350)
  if Keyboard.AsyncKeyDown(&h7E) then //forward
    mGroup.MoveForward -75
    mSphere.Pitch -0.4
  elseif Keyboard.AsyncKeyDown(&h7D) then //backwards
    mGroup.MoveForward 75
    mSphere.Pitch 0.4
  elseif Keyboard.AsyncKeyDown(&h7B) then //left
    mGroup.Yaw 0.2
    Rb3DSpace1.Camera.Yaw 0.2
  elseif Keyboard.AsyncKeyDown(&h7C) then //right
    mGroup.Yaw -0.2
    Rb3DSpace1.Camera.Yaw -0.2
  end

  Rb3DSpace1.camera.Position = mGroup.ObjectToWorldTransform(pt) // 
set the camera position
  Rb3DSpace1.Update //draw the new view
  TileTerrain //make sure the terrain is in the right place


what's wrong?
Thanks
NICK
_______________________________________________
Unsubscribe or switch delivery mode:
<http://www.realsoftware.com/support/listmanager/>

Search the archives of this list here:
<http://support.realsoftware.com/listarchives/lists.html>