[Cole ChapmanParticipant]

(Debian-Jessie) Ted2 will do the same for me if mx2cc returns an error and then I have to select the window again to regain input.  But what’s worse is if I hit Open.. or Save.. then the requester opens and I get locked out of everything and have to restart my PC.

 

Anyone else have this problem?

[Cole ChapmanParticipant]

If you are looking for a wait function, this is what I use:

Monkey

Local StartTime:Double = Microsecs() Local WaitTime:Double = (1.0/15) * 1000000.0 While (Microsecs() < StartTime + WaitTime) App.UpdateWindows() Wend

1 2 3 4 5

Local StartTime:Double = Microsecs() Local WaitTime:Double = (1.0/15) * 1000000.0 While (Microsecs() < StartTime + WaitTime) App.UpdateWindows() Wend

This executes at 15 hertz.  If you want to set a time, just change WaitTime to however many Microseconds you would like.

I couldn’t find any Delay or Wait function in the docs but I could have overlooked…

[Cole ChapmanParticipant]

Wiebow could you post a tiny game example that uses mojox?  I’m getting some weird errors when I build but I think it’s because I’m not placing things where I should be…

[Cole ChapmanParticipant]

What integers does SwapInterval support?  If i’m not mistaken, it calls to SDL_GL_SetSwapInterval but the documentation on it says 0 for immediate and 1 for vsync.  In Monkey2 however, if you put 2 I get 30fps, 20fps with 3, etc… What’s officially supported and will putting 3 for example, give the same fps across all supported platforms?

[Cole ChapmanParticipant]

Thanks for the information Mark!  Regarding the mojox bug… With the new github module, if you take the code I posted above and remove button’s MaxSize and MinSize, button2’s seems to be ignored and will be set to whatever button is.

Monkey

Method New() Super.New( "Button Demo",640,480,WindowFlags.Resizable ) Local button:=New PushButton( "Click ME! This is testing a longer message and it changes the other button size" ) Local button2:=New PushButton( "Test" ) button.Clicked=Lambda() Alert( "Well done sir!" ) End Local TestView:=New DockingView TestView.Layout = "float" TestView.AddView(button,"top") TestView.AddView(button2,"top") button.TextGravity=New Vec2f( .5,.5 ) button2.MaxSize=New Vec2i( 100,0 ) button2.MinSize=New Vec2i( 75,0 ) button2.TextGravity=New Vec2f( .5,.5 ) ContentView = TestView End

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

Method New() Super.New( "Button Demo",640,480,WindowFlags.Resizable ) Local button:=New PushButton( "Click ME! This is testing a longer message and it changes the other button size" ) Local button2:=New PushButton( "Test" )   button.Clicked=Lambda() Alert( "Well done sir!" ) End Local TestView:=New DockingView TestView.Layout = "float" TestView.AddView(button,"top") TestView.AddView(button2,"top") button.TextGravity=New Vec2f( .5,.5 ) button2.MaxSize=New Vec2i( 100,0 ) button2.MinSize=New Vec2i( 75,0 ) button2.TextGravity=New Vec2f( .5,.5 ) ContentView = TestView End

[Cole ChapmanParticipant]

I added a DockingView but I’m unsure how to properly add gadgets if I only want them displayed in the center.  I ended up adding them to the “Top” view and made the DockingView layout “float” which doesn’t seem correct.

Monkey

#import "<std>" #import "<mojo>" #import "<mojox>" Using std.. Using mojo.. Using mojox.. Class MyWindow Extends Window Method New() Super.New( "Button Demo",640,480,WindowFlags.Resizable ) Local button:=New PushButton( "Click ME! This is testing a longer message" ) Local button2:=New PushButton( "Test" ) button.Clicked=Lambda() Alert( "Well done sir!" ) End Local TestView:=New DockingView TestView.Layout = "float" TestView.AddView(button,"top") 'This seems wrong TestView.AddView(button2,"top") button.MaxSize=New Vec2i( 100,0 ) button.MinSize=New Vec2i( 75,0 ) button.TextGravity=New Vec2f( .5,.5 ) 'This doesn't work button2.MaxSize=New Vec2i( 100,0 ) button2.MinSize=New Vec2i( 75,0 ) button2.TextGravity=New Vec2f( .5,.5 ) 'This doesn't work ContentView = TestView 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

#import "<std>" #import "<mojo>" #import "<mojox>" Using std.. Using mojo.. Using mojox.. Class MyWindow Extends Window Method New() Super.New( "Button Demo",640,480,WindowFlags.Resizable ) Local button:=New PushButton( "Click ME! This is testing a longer message" ) Local button2:=New PushButton( "Test" )   button.Clicked=Lambda() Alert( "Well done sir!" ) End Local TestView:=New DockingView TestView.Layout = "float" TestView.AddView(button,"top") 'This seems wrong TestView.AddView(button2,"top") button.MaxSize=New Vec2i( 100,0 ) button.MinSize=New Vec2i( 75,0 ) button.TextGravity=New Vec2f( .5,.5 ) 'This doesn't work button2.MaxSize=New Vec2i( 100,0 ) button2.MinSize=New Vec2i( 75,0 ) button2.TextGravity=New Vec2f( .5,.5 ) 'This doesn't work ContentView = TestView End End Function Main() New AppInstance New MyWindow App.Run() End

Also I could not figure out how to center-align the text inside the button.

[Cole ChapmanParticipant]

Awesome thanks Mark, I really appreciate the help.  I think I’m going to like this new GUI system once I get the hang of it.

[Cole ChapmanParticipant]

Just became a patreon supporter

[Cole ChapmanParticipant]

I made a github account and i’ll start posting issues there.  I’m also about to become a patreon supporter.  I think you are doing a great job Mark

[Author]

Posts