Component class with mouse events

[EthernautParticipant]

https://github.com/DoctorWhoof/gui3d

Hi,

I was writing a little framework designed to go “on top” of mojo3d, but things were getting unwieldy and I decided to break it apart into as many separate, simple independent modules as possible.

The first one is a barebones “GuiComponent” class that can handle mouse events like “OnMouseOver”, “OnMouseEnter”, “OnMouseClick( mousebutton )”, etc. The class is abstract, intended to alway be extended. Example:

Monkey

Class MouseTest Extends GuiComponent Global camera:Camera Method New( e:Entity ) Super.New( e ) End Method OnMouseEnter() Override Entity.Color = Color.Black End Method OnMouseLeave() Override Entity.Color = Color.White End Method OnMouseClick( button:MouseButton ) Override Select button Case MouseButton.Left Print "Left button clicked on " + Entity.Name Case MouseButton.Middle Print "Middle button clicked on " + Entity.Name Case MouseButton.Right Print "Right button clicked on " + Entity.Name End End Method OnMouseRelease( button:MouseButton ) Override Select button Case MouseButton.Left Print "Left button released on " + Entity.Name Case MouseButton.Middle Print "Middle button released on " + Entity.Name Case MouseButton.Right Print "Right button released on " + Entity.Name End End Method OnDraw( canvas:Canvas ) Override Local pos := camera.ProjectToViewport( Entity.Position ) canvas.DrawText( Entity.Name, pos.X, pos.Y ) End 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

Class MouseTest Extends GuiComponent Global camera:Camera   Method New( e:Entity ) Super.New( e ) End Method OnMouseEnter() Override Entity.Color = Color.Black End Method OnMouseLeave() Override Entity.Color = Color.White End Method OnMouseClick( button:MouseButton ) Override Select button Case MouseButton.Left Print "Left button clicked on " + Entity.Name Case MouseButton.Middle Print "Middle button clicked on " + Entity.Name Case MouseButton.Right Print "Right button clicked on " + Entity.Name End End Method OnMouseRelease( button:MouseButton ) Override Select button Case MouseButton.Left Print "Left button released on " + Entity.Name Case MouseButton.Middle Print "Middle button released on " + Entity.Name Case MouseButton.Right Print "Right button released on " + Entity.Name End End Method OnDraw( canvas:Canvas ) Override Local pos := camera.ProjectToViewport( Entity.Position ) canvas.DrawText( Entity.Name, pos.X, pos.Y ) End End

 

For it to work, there are a couple extensions for the Scene and Canvas classes that need to be called:

Monkey

scene.UpdateGui3D( camera, Mouse.Location ) canvas.DrawGui3D( scene )

1 2	scene.UpdateGui3D( camera, Mouse.Location ) canvas.DrawGui3D( scene )

 

There’s an example in the “_tests” folder:

I hope to add some more useful methods in the future.
Cheers!

[DruggedBunnyParticipant]

Cool, I’ll hopefully get to try tonight or tomorrow.

[EthernautParticipant]

Updated it, and now in addition to GuiComponents it has an early, largely untested class called GameComponents. It provides collision events like OnCollisionEnter( body ) , OnCollisionStay( body ) and OnCollisionLeave( body ). You need to use the “GameBody” class instead of the regular “RigidBody” to achieve that.

https://github.com/DoctorWhoof/GameComponents

There’s even a… uhh… bananas demo!  It showcases a simple GameComponent:

Monkey

Class CollisionColor Extends GameComponent Method New( e:Entity ) Super.New( e ) End Method OnCollisionEnter( body:RigidBody ) Override Entity.Color = Color.Red End Method OnCollisionLeave( body:RigidBody ) Override Entity.Color = Color.White End End

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15

Class CollisionColor Extends GameComponent Method New( e:Entity ) Super.New( e ) End   Method OnCollisionEnter( body:RigidBody ) Override Entity.Color = Color.Red End Method OnCollisionLeave( body:RigidBody ) Override Entity.Color = Color.White End End

 

And here it is in action:

The repo was renamed GameComponents to reflect the changes. Will probably post it in the Code Library section once I’ve tested it some more. Will also include an “Arcade Physics” style Character Controller (based on Mark’s QCollide demo) that uses the exact same Collision Events as the physics system. Take that, Unity3D!

Cheers.

[Author]

Posts