My controls change when I rotate my player in my 3D game

[En929Participant]

In my 3D game, I am having problems with my rotation. When I first start the game, the player goes Forward (Z), Backwards (Z); it rotates to the Right(Y) and rotates the Left (Y) normally. However, when I rotate my player 90 degrees. After that, when I press the up button, the up button starts acting like the Right button, etc.  and all of the controls change and they change in every 90 degrees in which my player is rotated. Thus, what do I add to my code to get the controls to go in the way that the player is facing. My code is below. Thanks:

 

Monkey

'Skybox 1015 X 1030 and 2045 X 995 for a 4095 X 3070 sized 'picture Namespace myapp #Import "<std>" #Import "<mojo>" #Import "<mojo3d>" #Import "<mojo3d-loaders>" #Import "Man.b3d" #Import "Man.jpg" #Import "Tower.png" #Import "Maplewood.b3d" Using std.. Using mojo.. Using mojo3d.. Class MyWindow Extends Window 'Initialize everything that you're going to use Field _scene:Scene Global _camera:Camera Field _light:Light Field _ground:Model Field Man:Model Field Jack_in_the_Box: Model Field _animator:Animator Field MoveForwardZ: Float = 0.2 Field MoveBackwardsZ: Float = -0.2 Field ManX:Float = 0 '// x position on the map Field ManY:Float = -40 Field ManZ: Float = -100 Method New( title:String="The World Doesn't Apply to Him",width:Int=800,height:Int=600,flags:WindowFlags=WindowFlags.Resizable ) Super.New( title,width,height,flags ) _scene=New Scene Man=Model.LoadBoned( "asset::Man.b3d" ) Man.Scale=New Vec3f( .1) Man.Position = New Vec3f(0, 30,10) _camera=New Camera( Man) ' _camera.Near= 2 _camera.Far=100000 _camera.Position = New Vec3f(0, 48,-10) 'create light ' _light=New Light _light.Rotate( 75,150,0 ) 'aim directional light 'down' - Pi/2=90 degrees. _light.CastsShadow=True _ground=Model.CreateBox( New Boxf( 0,0,0,0,0,0 ),1,1,1,New PbrMaterial( Color.Green ) ) _ground.CastsShadow=False Jack_in_the_Box =Model.Load( "asset::Maplewood.b3d") _animator=Man.Animator Jack_in_the_Box.Move( 0,40,300) Jack_in_the_Box.Scale = New Vec3f(0.5, 0.5, 0.5) _animator.MasterSpeed=0.5 Local anim2:=_animator.Animations[0].Slice( "Idle",1,1,AnimationMode.Looping ) Local anim1:=_animator.Animations[0].Slice( "Walk",2,30,AnimationMode.Looping ) Local anim3:=_animator.Animations[0].Slice( "Punch",31,99,AnimationMode.OneShot ) _animator.Animations.Add( anim1 ) _animator.Animations.Add( anim2 ) _animator.Animations.Add( anim3 ) End Method OnRender( canvas:Canvas ) Override RequestRender() If _animator.Animating?.Name<>"Punch" If Keyboard.KeyHit( Key.Space ) 'Punch! _animator.Animate( "Punch",.2 ) Else If Keyboard.KeyDown( Key.Up ) 'walk _animator.Animate( "Walk",1) Man.MoveZ(0.2, True) Else If Keyboard.KeyDown( Key.Down ) _animator.Animate( "Walk",1) Man.MoveZ(-0.2, True) 'This is the section that I need help with. When I rotate the man 90 degrees 'the controls change. Else If Keyboard.KeyDown( Key.Right) 'walk _animator.Animate( "Walk",1) Man.RotateY(-1, True) Else If Keyboard.KeyDown( Key.Left ) _animator.Animate( "Walk",1) Man.RotateY(1, True) Else 'idle _animator.Animate( "Idle",.2 ) Endif Endif _scene.Update() _camera.Render( canvas ) canvas.Scale(800,600) End End Function Main() New AppInstance New MyWindow App.Run() End

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 53 54 55 56 57 58 59 60 61 62 63 64 65 66 67 68 69 70 71 72 73 74 75 76 77 78 79 80 81 82 83 84 85 86 87 88 89 90 91 92 93 94 95 96 97 98 99 100 101 102 103 104 105 106 107 108 109 110 111 112 113 114 115 116 117 118 119 120 121 122 123 124 125 126 127 128 129 130 131 132 133 134 135 136 137 138 139 140 141 142 143 144 145 146 147 148 149 150 151

'Skybox 1015 X 1030 and 2045 X 995 for a 4095 X 3070 sized 'picture Namespace myapp   #Import "<std>" #Import "<mojo>" #Import "<mojo3d>" #Import "<mojo3d-loaders>"   #Import "Man.b3d" #Import "Man.jpg" #Import "Tower.png" #Import "Maplewood.b3d"   Using std.. Using mojo.. Using mojo3d..       Class MyWindow Extends Window 'Initialize everything that you're going to use Field _scene:Scene   Global _camera:Camera Field _light:Light Field _ground:Model Field Man:Model   Field Jack_in_the_Box: Model     Field _animator:Animator Field MoveForwardZ: Float = 0.2 Field MoveBackwardsZ: Float = -0.2 Field ManX:Float = 0 '// x position on the map Field ManY:Float = -40 Field ManZ: Float = -100     Method New( title:String="The World Doesn't Apply to Him",width:Int=800,height:Int=600,flags:WindowFlags=WindowFlags.Resizable )   Super.New( title,width,height,flags )   _scene=New Scene   Man=Model.LoadBoned( "asset::Man.b3d" ) Man.Scale=New Vec3f( .1) Man.Position = New Vec3f(0, 30,10) _camera=New Camera( Man) ' _camera.Near= 2 _camera.Far=100000 _camera.Position = New Vec3f(0, 48,-10) 'create light ' _light=New Light _light.Rotate( 75,150,0 ) 'aim directional light 'down' - Pi/2=90 degrees. _light.CastsShadow=True _ground=Model.CreateBox( New Boxf( 0,0,0,0,0,0 ),1,1,1,New PbrMaterial( Color.Green ) ) _ground.CastsShadow=False Jack_in_the_Box =Model.Load( "asset::Maplewood.b3d") _animator=Man.Animator Jack_in_the_Box.Move( 0,40,300) Jack_in_the_Box.Scale = New Vec3f(0.5, 0.5, 0.5)     _animator.MasterSpeed=0.5   Local anim2:=_animator.Animations[0].Slice( "Idle",1,1,AnimationMode.Looping ) Local anim1:=_animator.Animations[0].Slice( "Walk",2,30,AnimationMode.Looping ) Local anim3:=_animator.Animations[0].Slice( "Punch",31,99,AnimationMode.OneShot ) _animator.Animations.Add( anim1 ) _animator.Animations.Add( anim2 ) _animator.Animations.Add( anim3 )   End Method OnRender( canvas:Canvas ) Override RequestRender()   If _animator.Animating?.Name<>"Punch" If Keyboard.KeyHit( Key.Space ) 'Punch! _animator.Animate( "Punch",.2 ) Else If Keyboard.KeyDown( Key.Up ) 'walk _animator.Animate( "Walk",1) Man.MoveZ(0.2, True) Else If Keyboard.KeyDown( Key.Down ) _animator.Animate( "Walk",1) Man.MoveZ(-0.2, True) 'This is the section that I need help with. When I rotate the man 90 degrees 'the controls change. Else If Keyboard.KeyDown( Key.Right) 'walk _animator.Animate( "Walk",1) Man.RotateY(-1, True) Else If Keyboard.KeyDown( Key.Left ) _animator.Animate( "Walk",1) Man.RotateY(1, True) Else 'idle _animator.Animate( "Idle",.2 ) Endif Endif   _scene.Update() _camera.Render( canvas ) canvas.Scale(800,600) End End   Function Main()   New AppInstance New MyWindow App.Run() End

[EthernautParticipant]

Had to modify the code to run without the assets, but it seems that if you change the Move and Rotate commands to be in local space the problem is solved. Works here.

Example:
Man.MoveZ(0.2, False)
Man.RotateY(1, False)
(uses “false” instead of “true”)

As far as I can tell, Mojo3D’s rotation and translation commands’ object space are inverted – True should mean local space, but means world space. If you want the motion to always be relative to where the player is pointing, it need to be in local space (“False”, although it should be “True”).

[EthernautParticipant]

Monkey

Namespace myapp #Import "<std>" #Import "<mojo>" #Import "<mojo3d>" Using std.. Using mojo.. Using mojo3d.. Class MyWindow Extends Window Global _camera:Camera Field _scene:Scene Field _light:Light Field _ground:Model Field Man:Model Field Jack_in_the_Box: Model Field _animator:Animator Field speed: Float = 1.0 Field turn: Float = 1.0 Method New( title:String="The World Doesn't Apply to Him",width:Int=800,height:Int=600,flags:WindowFlags=WindowFlags.Resizable ) Super.New( title,width,height,flags ) _scene=New Scene Man=Model.CreateBox( New Boxf(-2.5,-2.5,-2.5, 2.5, 2.5, 2.5 ), 1, 1, 1, New PbrMaterial( Color.Yellow ) ) Man.Position = New Vec3f(0, 2.5,10) _camera=New Camera( Man) _camera.View = Self _camera.Near= 2 _camera.Far=100000 _camera.Position = New Vec3f(0, 25,-10) _camera.PointAt( Man ) ' _light=New Light _light.Rotate( 45,150,0 ) _light.CastsShadow=True _ground=Model.CreateBox( New Boxf( -100,-1,-100,100,0,100 ),1,1,1,New PbrMaterial( Color.Green ) ) _ground.CastsShadow=False Jack_in_the_Box=Model.CreateBox( New Boxf(-2, -2, -2, 2, 2, 2 ), 1, 1, 1, New PbrMaterial( Color.Red ) ) Jack_in_the_Box.Move( 0,2,30) End Method OnRender( canvas:Canvas ) Override RequestRender() If Keyboard.KeyHit( Key.Space ) Else If Keyboard.KeyDown( Key.Up ) Man.MoveZ( speed, False ) Else If Keyboard.KeyDown( Key.Down ) Man.MoveZ( -speed, False ) End If Keyboard.KeyDown( Key.Right) Man.RotateY( -turn, False ) Else If Keyboard.KeyDown( Key.Left ) Man.RotateY( turn, False) End _scene.Update() _camera.Render( canvas ) End End Function Main() New AppInstance New MyWindow App.Run() End

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 53 54 55 56 57 58 59 60 61 62 63 64 65 66 67 68 69 70 71 72 73 74 75 76 77 78 79 80 81

Namespace myapp   #Import "<std>" #Import "<mojo>" #Import "<mojo3d>"   Using std.. Using mojo.. Using mojo3d..   Class MyWindow Extends Window Global _camera:Camera Field _scene:Scene Field _light:Light Field _ground:Model Field Man:Model Field Jack_in_the_Box: Model Field _animator:Animator Field speed: Float = 1.0 Field turn: Float = 1.0   Method New( title:String="The World Doesn't Apply to Him",width:Int=800,height:Int=600,flags:WindowFlags=WindowFlags.Resizable ) Super.New( title,width,height,flags ) _scene=New Scene Man=Model.CreateBox( New Boxf(-2.5,-2.5,-2.5, 2.5, 2.5, 2.5 ), 1, 1, 1, New PbrMaterial( Color.Yellow ) ) Man.Position = New Vec3f(0, 2.5,10) _camera=New Camera( Man) _camera.View = Self _camera.Near= 2 _camera.Far=100000 _camera.Position = New Vec3f(0, 25,-10) _camera.PointAt( Man ) ' _light=New Light _light.Rotate( 45,150,0 ) _light.CastsShadow=True _ground=Model.CreateBox( New Boxf( -100,-1,-100,100,0,100 ),1,1,1,New PbrMaterial( Color.Green ) ) _ground.CastsShadow=False Jack_in_the_Box=Model.CreateBox( New Boxf(-2, -2, -2, 2, 2, 2 ), 1, 1, 1, New PbrMaterial( Color.Red ) ) Jack_in_the_Box.Move( 0,2,30) End Method OnRender( canvas:Canvas ) Override RequestRender() If Keyboard.KeyHit( Key.Space ) Else If Keyboard.KeyDown( Key.Up ) Man.MoveZ( speed, False ) Else If Keyboard.KeyDown( Key.Down ) Man.MoveZ( -speed, False ) End If Keyboard.KeyDown( Key.Right) Man.RotateY( -turn, False ) Else If Keyboard.KeyDown( Key.Left ) Man.RotateY( turn, False) End _scene.Update() _camera.Render( canvas ) End End     Function Main() New AppInstance New MyWindow App.Run() End

[En929Participant]

Ethernaut, that worked. It fixed the problems! Thanks a lot!

[Author]

Posts