How do I stop the remnants in 3D

[En929Participant]

When I play my game, when the player turns, I get this black remnants on screen. Back in BlitzBasic, there used to be a “CLS” function that stopped this. But, I wondering what do I add to my code to stop the black remnants now? A picture below has an arrow pointing to what I am trying to stop. The code is also below! Thanks!

 

 

 

 

Monkey

Namespace myapp #Import "<std>" #Import "<mojo>" #Import "<mojo3d>" #Import "<mojo3d-loaders>" #Import "ManB3DAnim.b3d" #Import "Man_color.jpg" #Import "Tower.png" #Import "Place.b3d" #Import "OfficeBuilding.b3d" 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 Office: 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.LoadBoned( "asset::ManB3DAnim.b3d") Man.Position = New Vec3f(0, 2.5,10) Man.Scale=New Vec3f( .1) _camera=New Camera( Man) _camera.View = Self _camera.Near= 1 _camera.Far=100000 _camera.Position = New Vec3f(0, 35, -20) _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.Load( "asset::Place.b3d") Jack_in_the_Box.Move( 0,2,30) Office = Model.Load("asset::OfficeBuilding.b3d") Office.Position = New Vec3f(0,0,50) _animator=Man.Animator _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.A ) 'Punch! _animator.Animate( "Punch",1 ) Else If Keyboard.KeyDown( Key.Up ) _animator.Animate( "Walk",1) Man.MoveZ( speed, False ) Else If Keyboard.KeyDown( Key.Down ) _animator.Animate( "Walk",1) Man.MoveZ( -speed, False ) Else If Keyboard.KeyDown( Key.Right) _animator.Animate( "Walk",1) Man.RotateY( -turn, False ) Else If Keyboard.KeyDown( Key.Left ) _animator.Animate( "Walk",1) Man.RotateY( turn, False) Else 'idle _animator.Animate( "Idle",.2 ) Endif Endif _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 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

Namespace myapp #Import "<std>" #Import "<mojo>" #Import "<mojo3d>" #Import "<mojo3d-loaders>"   #Import "ManB3DAnim.b3d" #Import "Man_color.jpg" #Import "Tower.png" #Import "Place.b3d" #Import "OfficeBuilding.b3d" 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 Office: 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.LoadBoned( "asset::ManB3DAnim.b3d") Man.Position = New Vec3f(0, 2.5,10) Man.Scale=New Vec3f( .1) _camera=New Camera( Man) _camera.View = Self _camera.Near= 1 _camera.Far=100000 _camera.Position = New Vec3f(0, 35, -20) _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.Load( "asset::Place.b3d") Jack_in_the_Box.Move( 0,2,30) Office = Model.Load("asset::OfficeBuilding.b3d") Office.Position = New Vec3f(0,0,50) _animator=Man.Animator _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.A ) 'Punch! _animator.Animate( "Punch",1 ) Else If Keyboard.KeyDown( Key.Up ) _animator.Animate( "Walk",1) Man.MoveZ( speed, False ) Else If Keyboard.KeyDown( Key.Down ) _animator.Animate( "Walk",1) Man.MoveZ( -speed, False ) Else If Keyboard.KeyDown( Key.Right) _animator.Animate( "Walk",1) Man.RotateY( -turn, False ) Else If Keyboard.KeyDown( Key.Left ) _animator.Animate( "Walk",1) Man.RotateY( turn, False) Else 'idle _animator.Animate( "Idle",.2 ) Endif Endif _scene.Update() _camera.Render( canvas ) End End Function Main() New AppInstance New MyWindow App.Run() End

[EthernautParticipant]

It’s hard to tell from the screen grab. If you could reproduce the problem in an example without loading any assets it would be helpful.

Other than possible asset issues, I don’t see anything the could be wrong at a glance. Maybe driver issues? Windows doesn’t seem to like Open GL sometimes.

[En929Participant]

Ethernaut, I went back and did a bit of experimenting. I found that the type of program that I used to create my models has some influence. For example, I made my models in Paint3D. But, I got the impression that Microsoft don’t like obj; as oddly, the obj format doesn’t exist in Microsoft’s 3d Paint unlike most programs and anything made with Microsoft’s Paint 3D and converted to obj doesn’t work well in ANY program I tried.

This was unlike Tinkercad where I made my model. After making my model in Tinkercad (virtually the same model), I downloaded it in obj format and converted it to .b3d using Fragmotion and I didn’t get the remnant and it worked perfectly. So, I think it goes back to the program that I used. I will keep experimenting to confirm this.

[Author]

Posts