mojo3d – proper camera class?

[AdamStrangeParticipant]

does anyone have a proper camera with lookAt functions?

[coconParticipant]

I had created a camera class once in OpenTK, if you are interested I can offer the source.

However all of my interest would be to create a “Transform” class first and let the camera have a transform property instead.

[Mark SiblyKeymaster]

I will be adding PointAt, RotateTowards, AlignToVector etc methods to Entity soon.

In the meantime, give this a shot:

Monkey

Function LookAt( src:Entity,dst:Vec3f,up:Vec3f=New Vec3f( 0,1,0 ) ) Local k:=(dst-src.WorldPosition).Normalize() Local i:=up.Cross( k ).Normalize() Local j:=k.Cross( i ) src.WorldBasis=New Mat3f( i,j,k ) End Function LookAt( src:Entity,dst:Entity,up:Vec3f=New Vec3f( 0,1,0 ) ) LookAt( src,dst.WorldPosition,up ) End

1 2 3 4 5 6 7 8 9 10 11

Function LookAt( src:Entity,dst:Vec3f,up:Vec3f=New Vec3f( 0,1,0 ) ) Local k:=(dst-src.WorldPosition).Normalize() Local i:=up.Cross( k ).Normalize() Local j:=k.Cross( i ) src.WorldBasis=New Mat3f( i,j,k ) End   Function LookAt( src:Entity,dst:Entity,up:Vec3f=New Vec3f( 0,1,0 ) ) LookAt( src,dst.WorldPosition,up ) End

[AdamStrangeParticipant]

Brilliant Mark.

Here’s the correct result I was looking for:

Monkey

class Camera2 Extends Camera Method New( parent:Entity = Null ) Super.New( parent ) Viewport = New Recti( 0,0,640,480 ) Fov = 90 Near = 1 Far = 1000 Show() End method Lookat( x:float, y:float, z:float ) Local target:Vec3f = New Vec3f( x, y, -z ) local up:Vec3f = New Vec3f( 0, 1, 0 ) Local k:Vec3f = (target - WorldPosition).Normalize() Local i:Vec3f = up.Cross( k ).Normalize() Local j:Vec3f = k.Cross( i ) WorldBasis = New Mat3f( i, j, k ) End End class

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22

class Camera2 Extends Camera Method New( parent:Entity = Null ) Super.New( parent ) Viewport = New Recti( 0,0,640,480 ) Fov = 90 Near = 1 Far = 1000   Show() End   method Lookat( x:float, y:float, z:float ) Local target:Vec3f = New Vec3f( x, y, -z ) local up:Vec3f = New Vec3f( 0, 1, 0 ) Local k:Vec3f = (target - WorldPosition).Normalize() Local i:Vec3f = up.Cross( k ).Normalize() Local j:Vec3f = k.Cross( i ) WorldBasis = New Mat3f( i, j, k ) End End class

[Author]

Posts