[swipisParticipant]

thank you Jesse!

[swipisParticipant]

OK now my model is on the screen thank you!

[swipisParticipant]

ohh sorry, here is full code

Monkey

Namespace test3 #Import "<std>" #Import "<mojo>" #Import "<mojo3d>" #Import "assets/" Using std.. Using mojo.. Using mojo3d.. 'The new mojo 3d module. Class MyWindow Extends Window ' What are we going to use. Field myscene:Scene Field mycamera:Camera Field mylight:Light Field ship:Model Field yawEntity:Entity Field pitchEntity:Entity Method New( title:String="Simple mojo app",width:Int=640,height:Int=480,flags:WindowFlags=WindowFlags.Resizable ) Super.New( title,width,height,flags ) ' Get the current scene myscene=Scene.GetCurrent() 'create camera ' mycamera = New Camera mycamera.Viewport=Rect mycamera.Near = 1 '?? mycamera.Far = 1000 'how far should we render mycamera.FOV = 60 'create light ' mylight = New Light mylight.RotateX(Pi/2) 'aim directional light 'down' - Pi/2=90 degrees. ship=Model.Load( "asset::test2.gltf" ) Assert( ship ) ship.Mesh.FitVertices(New Boxf(1,1),False) mycamera.Move(0,10,250) 'move the camera to position x,y,z mycamera.PointAt(ship) 'ship = Model.Load( "asset::test.gltf" ) yawEntity = New Entity pitchEntity = New Entity pitchEntity.Parent = yawEntity mycamera.Parent = pitchEntity 'testing FMOD function (METHOD) End Method ' This method is the main loop. Method OnRender( canvas:Canvas ) Override RequestRender() myscene.Update() UpdateInput() 'mybox.Rotate(3,3,3) 'rotate the box (x,y,z) mycamera.Render( canvas ) 'myscene.Render( canvas,mycamera ) 'render the 3d scene If Keyboard.KeyReleased(Key.Escape) Then App.Terminate() canvas.DrawText("FPS = " + App.FPS,0,0) End Method Method UpdateInput() Local mousePos:Vec2f = Mouse.Location mousePosDelta.x = mousePos.x - previousMousePos.x mousePosDelta.y = mousePos.y - previousMousePos.y previousMousePos = mousePos 'Print mousePosDelta.x + " -- " + mousePos.x If Mouse.ButtonDown(MouseButton.Right) Then 'Local yaw:Float = mousePosDelta.x 'Local pitch:Float = mousePosDelta.y Print mousePosDelta.x 'Mouse.PointerVisible = False mouseX = Mouse.X 'FMOD(pitch - mouseX * 0.3 * 0.05, 360) 'yaw = FMOD(yaw - mouseX * 0.3 * 0.05, 360) 'pitch = pitch * (Pi/180) 'Print FMOD(pitch - Mouse.X * 0.05, 360) + " -- " + RAD2DEG(pitch) yawEntity.Rotate(0,yaw,0) 'pitchEntity.Rotate(-pitch,0,0) mousePosDelta = New Vec2f(0) mouseX = 0 Endif End Method Method FMOD:Float(x:Float, y:Float) Local d:Float d = x / y d = Floor(d) 'd = Round(d) d = d * y d = x - d Return d End Method Method DEG2RAD:Float (r:Float) r = (r * Pi) / 180 Return r End Method Method RAD2DEG:Float (r:Float) r = (r * 180) / Pi Return r End Method End Class Function Main() New AppInstance New MyWindow App.Run() End Function

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

Namespace test3 #Import "<std>" #Import "<mojo>" #Import "<mojo3d>"   #Import "assets/"   Using std.. Using mojo.. Using mojo3d.. 'The new mojo 3d module.   Class MyWindow Extends Window ' What are we going to use. Field myscene:Scene Field mycamera:Camera Field mylight:Light Field ship:Model Field yawEntity:Entity Field pitchEntity:Entity   Method New( title:String="Simple mojo app",width:Int=640,height:Int=480,flags:WindowFlags=WindowFlags.Resizable )   Super.New( title,width,height,flags ) ' Get the current scene myscene=Scene.GetCurrent() 'create camera ' mycamera = New Camera mycamera.Viewport=Rect mycamera.Near = 1 '?? mycamera.Far = 1000 'how far should we render mycamera.FOV = 60 'create light ' mylight = New Light mylight.RotateX(Pi/2) 'aim directional light 'down' - Pi/2=90 degrees.   ship=Model.Load( "asset::test2.gltf" ) Assert( ship ) ship.Mesh.FitVertices(New Boxf(1,1),False) mycamera.Move(0,10,250) 'move the camera to position x,y,z mycamera.PointAt(ship) 'ship = Model.Load( "asset::test.gltf" ) yawEntity = New Entity pitchEntity = New Entity pitchEntity.Parent = yawEntity mycamera.Parent = pitchEntity 'testing FMOD function (METHOD) End Method ' This method is the main loop. Method OnRender( canvas:Canvas ) Override RequestRender() myscene.Update() UpdateInput() 'mybox.Rotate(3,3,3) 'rotate the box (x,y,z) mycamera.Render( canvas ) 'myscene.Render( canvas,mycamera ) 'render the 3d scene If Keyboard.KeyReleased(Key.Escape) Then App.Terminate() canvas.DrawText("FPS = " + App.FPS,0,0) End Method Method UpdateInput() Local mousePos:Vec2f = Mouse.Location mousePosDelta.x = mousePos.x - previousMousePos.x mousePosDelta.y = mousePos.y - previousMousePos.y previousMousePos = mousePos 'Print mousePosDelta.x + " -- " + mousePos.x If Mouse.ButtonDown(MouseButton.Right) Then 'Local yaw:Float = mousePosDelta.x 'Local pitch:Float = mousePosDelta.y Print mousePosDelta.x 'Mouse.PointerVisible = False mouseX = Mouse.X 'FMOD(pitch - mouseX * 0.3 * 0.05, 360) 'yaw = FMOD(yaw - mouseX * 0.3 * 0.05, 360) 'pitch = pitch * (Pi/180) 'Print FMOD(pitch - Mouse.X * 0.05, 360) + " -- " + RAD2DEG(pitch) yawEntity.Rotate(0,yaw,0) 'pitchEntity.Rotate(-pitch,0,0) mousePosDelta = New Vec2f(0) mouseX = 0 Endif End Method Method FMOD:Float(x:Float, y:Float) Local d:Float d = x / y d = Floor(d) 'd = Round(d) d = d * y d = x - d Return d End Method Method DEG2RAD:Float (r:Float) r = (r * Pi) / 180 Return r End Method Method RAD2DEG:Float (r:Float) r = (r * 180) / Pi Return r End Method   End Class   Function Main()   New AppInstance New MyWindow App.Run() End Function

[swipisParticipant]

Hi Mark, Assert(model) did not output anything, anyway here is all code:

Monkey

Namespace test3 #Import "<std>" #Import "<mojo>" #Import "<mojo3d>" #Import "assets/" Using std.. Using mojo.. Using mojo3d.. 'The new mojo 3d module.

1 2 3 4 5 6 7 8 9 10 11

Namespace test3 #Import "<std>" #Import "<mojo>" #Import "<mojo3d>"   #Import "assets/"     Using std.. Using mojo.. Using mojo3d.. 'The new mojo 3d module.

 

 

Monkey

Class MyWindow Extends Window Field myscene:Scene Field mycamera:Camera Field mylight:Light Field ship:Model Field yawEntity:Entity Field pitchEntity:Entity Method New( title:String="Simple mojo app",width:Int=640,height:Int=480,flags:WindowFlags=WindowFlags.Resizable ) Super.New( title,width,height,flags ) ' Get the current scene myscene=Scene.GetCurrent() 'create camera ' mycamera = New Camera mycamera.Viewport=Rect mycamera.Near = 1 '?? mycamera.Far = 1000 'how far should we render mycamera.FOV = 60 'create light ' mylight = New Light mylight.RotateX(Pi/2) 'aim directional light 'down' - Pi/2=90 degrees. ship=Model.Load( "asset::test2.gltf" ) Assert(ship) ship.Mesh.FitVertices(New Boxf(1,1),False) mycamera.Move(0,10,25) 'move the camera to position x,y,z mycamera.PointAt(ship) 'ship = Model.Load( "asset::test.gltf" ) yawEntity = New Entity pitchEntity = New Entity pitchEntity.Parent = yawEntity mycamera.Parent = pitchEntity End Method ' This method is the main loop. Method OnRender( canvas:Canvas ) Override RequestRender() myscene.Update() UpdateInput() mycamera.Render( canvas ) 'myscene.Render( canvas,mycamera ) 'render the 3d scene If Keyboard.KeyReleased(Key.Escape) Then App.Terminate() canvas.DrawText("FPS = " + App.FPS,0,0) End Method End Class Function Main() New AppInstance New MyWindow App.Run() End Function

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

Class MyWindow Extends Window Field myscene:Scene Field mycamera:Camera Field mylight:Light Field ship:Model Field yawEntity:Entity Field pitchEntity:Entity   Method New( title:String="Simple mojo app",width:Int=640,height:Int=480,flags:WindowFlags=WindowFlags.Resizable )   Super.New( title,width,height,flags ) ' Get the current scene myscene=Scene.GetCurrent() 'create camera ' mycamera = New Camera mycamera.Viewport=Rect mycamera.Near = 1 '?? mycamera.Far = 1000 'how far should we render mycamera.FOV = 60 'create light ' mylight = New Light mylight.RotateX(Pi/2) 'aim directional light 'down' - Pi/2=90 degrees.   ship=Model.Load( "asset::test2.gltf" ) Assert(ship) ship.Mesh.FitVertices(New Boxf(1,1),False) mycamera.Move(0,10,25) 'move the camera to position x,y,z mycamera.PointAt(ship) 'ship = Model.Load( "asset::test.gltf" ) yawEntity = New Entity pitchEntity = New Entity pitchEntity.Parent = yawEntity mycamera.Parent = pitchEntity End Method ' This method is the main loop. Method OnRender( canvas:Canvas ) Override RequestRender() myscene.Update() UpdateInput() mycamera.Render( canvas ) 'myscene.Render( canvas,mycamera ) 'render the 3d scene If Keyboard.KeyReleased(Key.Escape) Then App.Terminate() canvas.DrawText("FPS = " + App.FPS,0,0) End Method   End Class   Function Main()   New AppInstance New MyWindow App.Run() End Function

[swipisParticipant]

OK when I did as you told but still can’t see my model and no errors what so ever… sometimes I getting “Memory access violation” here is code:

Monkey

mycamera.Move(0,10,25) ship=Model.Load( "asset::test2.gltf" ) ship.Mesh.FitVertices(New Boxf(1,1),False) mycamera.PointAt(ship)

1 2 3 4 5 6

mycamera.Move(0,10,25)   ship=Model.Load( "asset::test2.gltf" ) ship.Mesh.FitVertices(New Boxf(1,1),False)   mycamera.PointAt(ship)

Any ideas what is wrong?

[swipisParticipant]

Than you, will look at these examples!

[swipisParticipant]

Thank you for answers

Alpha looks like not working (at least for me, no matter alpha = 0 or =1 result the same).

I loaded GLTF model but still can’t see in my scene… What can be wrong?

[swipisParticipant]

Thank you!

[swipisParticipant]

Thank you again, I trying to rotate parent but parent and child not rotating did something wrong. And about blitz no I did not use, I heard about Monkey2 2 days ago and I like so far!

 

Thank you again!

[swipisParticipant]

Thank you Mark! And how about Parent rotation will it apply to its children automatically?

[Author]

Posts