[peterigzParticipant]

Well worth being an early adopter on some of these new crypto’s I think. Lots of scams out there though so you have to be careful, BAT looks ok though and a good idea. Another one I was keeping an eye on is fundrequest (https://fundrequest.io/), which will be a way of being paid to solve issues on github and stack exchange. So if there’s an issue or feature request on monkey2 github then multiple people can raise money to get it implemented if that’s a priority for them. Could be great for open source projects.

[peterigzParticipant]

Patreon’d, keep up the good work

[peterigzParticipant]

This is really cool!

[peterigzParticipant]

I have an issue on MacBook when using a second monitor. The IDE displays fine on the laptop but if I drag the window onto the monitor then it gets clipped (see attachment). I guessing this is something to do with the fact that the displays have different resolutions, the MacBook is retina 2880 x 1800 and the monitor is 2560 x 1440.

Let me know if there’s a specific place in the code I can take a look and help debug if needed.

Attachments:

1. 

   Screen-Shot-2017-11-08-at-15.54.08.png
   

[peterigzParticipant]

That’s really interesting,  something worth bearing in mind when optimising. Here’s a modified version where each bunny image is put into it’s own separate stack and drawn one after the other. I get over 230k before the fps goes lower than 60. Does have the disadvantage in that one type of bunny (red in this case) gets drawn over the top of the others but that’s where you’d switch to an atlas if that was an issue I guess.

Monkey

Namespace bunnies ' Load up the assets #Import "assets/wabbit_alpha.png" #Import "assets/wabbit_alpha2.png" #Import "assets/wabbit_alpha3.png" #Import "assets/wabbit_alpha4.png" ' Load up imports #Import "<std>" #Import "<mojo>" Using std.. Using mojo.. Const VWIDTH:=1024 Const VHEIGHT:=768 Class Bunnymark Extends Window Field frames: Int = 1 Field elapsed: Int = 1 Field bunnies:Stack<Bunny>[] = New Stack<Bunny>[4] Field images:Image[] = New Image[]( Image.Load("asset::wabbit_alpha.png"), Image.Load("asset::wabbit_alpha2.png"), Image.Load("asset::wabbit_alpha3.png"), Image.Load("asset::wabbit_alpha4.png") ) Field lastMilli := Millisecs() Method New() Super.New("Bunnymark", VWIDTH, VHEIGHT, WindowFlags.Resizable ) Local tmpimage:=Floor( random.Rnd( 3 )) For Local i:=0 Until bunnies.Length bunnies[i] = New Stack<Bunny> End End Method OnRender( canvas:Canvas ) Override App.RequestRender() ' Activate this method If Keyboard.KeyReleased(Key.Escape) Then App.Terminate() Local bunnycount:Int For Local s:=Eachin bunnies For Local bunny:=Eachin s bunny.Update() bunny.Draw(canvas) bunnycount+=1 Next Next 'elapsed += Millisecs() - lastMilli 'Local avg := 1000/( ( elapsed /Float(frames)) ) '- not recquired anymore thanks to App.FPS canvas.Color = Color.White canvas.DrawRect( 0, 0, VWIDTH, 25 ) canvas.Color = Color.Black canvas.DrawText("The Bunnymark ( " + bunnycount + " )",0,0) canvas.DrawText(" FPS: " + App.FPS, 300, 0 ) ' App.FPS suggested by abakobo #rem frames += 1 If frames > 100 ' makeshift FPS counter not necessary frames = 1 elapsed = 1 Endif lastMilli = Millisecs() #end End Method Method OnMouseEvent( event:MouseEvent ) Override If event.Type = EventType.MouseDown Local _len := 0 If event.Button = MouseButton.Left _len = 10 Elseif event.Button = MouseButton.Right _len = 10000 Elseif event.Button = MouseButton.Middle _len = -100 End ' Extra functionality ( RightButton / Middle ) added by @therevills Local tmpimage:Int For Local i:=1 Until _len + 1 tmpimage = Floor( random.Rnd( 3 )) bunnies[ tmpimage ].Add( New Bunny( Mouse.X, Mouse.Y, images[ tmpimage ] ) ) End End End Method End Class Bunny Field x: Float Field y: Float Field xspeed: Float Field yspeed: Float Field texture: Image Global gravity := 0.5 Method New( x: Float, y: Float, texture:Image ) Self.x = x Self.y = y Self.texture = texture xspeed = random.Rnd( 10 ) End Method Update:Void( ) yspeed += gravity y += yspeed x += xspeed If y >= VHEIGHT y = VHEIGHT yspeed = -random.Rnd( 35 ) Endif If x < 0 Or x > VWIDTH xspeed *= -1 x = Clamp(x, 0.0, Float(VWIDTH) ) Endif End Method Draw(canvas:Canvas) canvas.DrawImage( texture, x, y ) End End Function Main() New AppInstance New Bunnymark 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

Namespace bunnies   ' Load up the assets   #Import "assets/wabbit_alpha.png" #Import "assets/wabbit_alpha2.png" #Import "assets/wabbit_alpha3.png" #Import "assets/wabbit_alpha4.png"   ' Load up imports #Import "<std>" #Import "<mojo>" Using std.. Using mojo..     Const VWIDTH:=1024 Const VHEIGHT:=768   Class Bunnymark Extends Window Field frames: Int = 1 Field elapsed: Int = 1 Field bunnies:Stack<Bunny>[] = New Stack<Bunny>[4] Field images:Image[] = New Image[]( Image.Load("asset::wabbit_alpha.png"), Image.Load("asset::wabbit_alpha2.png"), Image.Load("asset::wabbit_alpha3.png"), Image.Load("asset::wabbit_alpha4.png") ) Field lastMilli := Millisecs() Method New() Super.New("Bunnymark", VWIDTH, VHEIGHT, WindowFlags.Resizable ) Local tmpimage:=Floor( random.Rnd( 3 )) For Local i:=0 Until bunnies.Length bunnies[i] = New Stack<Bunny> End End Method OnRender( canvas:Canvas ) Override App.RequestRender() ' Activate this method If Keyboard.KeyReleased(Key.Escape) Then App.Terminate() Local bunnycount:Int For Local s:=Eachin bunnies For Local bunny:=Eachin s bunny.Update() bunny.Draw(canvas) bunnycount+=1 Next Next 'elapsed += Millisecs() - lastMilli 'Local avg :=  1000/( ( elapsed /Float(frames)) ) '- not recquired anymore thanks to App.FPS canvas.Color = Color.White canvas.DrawRect( 0, 0, VWIDTH, 25 ) canvas.Color = Color.Black canvas.DrawText("The Bunnymark ( " + bunnycount + " )",0,0) canvas.DrawText(" FPS: " + App.FPS, 300, 0 ) ' App.FPS suggested by abakobo #rem frames += 1 If frames > 100 ' makeshift FPS counter not necessary frames = 1 elapsed = 1 Endif lastMilli = Millisecs() #end End Method Method OnMouseEvent( event:MouseEvent ) Override If event.Type = EventType.MouseDown Local _len := 0 If event.Button = MouseButton.Left _len = 10 Elseif event.Button = MouseButton.Right _len = 10000 Elseif event.Button = MouseButton.Middle _len = -100 End   ' Extra functionality ( RightButton / Middle ) added by @therevills Local tmpimage:Int For Local i:=1 Until _len + 1 tmpimage = Floor( random.Rnd( 3 )) bunnies[ tmpimage ].Add( New Bunny( Mouse.X, Mouse.Y, images[ tmpimage ] ) ) End End End Method   End   Class Bunny Field x: Float Field y: Float Field xspeed: Float Field yspeed: Float Field texture: Image Global  gravity := 0.5 Method New( x: Float, y: Float, texture:Image ) Self.x = x Self.y = y Self.texture = texture xspeed = random.Rnd( 10 ) End Method Update:Void( ) yspeed += gravity y += yspeed x += xspeed If y >= VHEIGHT y = VHEIGHT yspeed = -random.Rnd( 35 ) Endif If x < 0 Or x > VWIDTH xspeed *= -1 x = Clamp(x, 0.0, Float(VWIDTH) ) Endif End Method Draw(canvas:Canvas) canvas.DrawImage( texture, x, y ) End End   Function Main() New AppInstance New Bunnymark App.Run() End Function

[peterigzParticipant]

Hmm, this seems very slow to me. I tried it and it only got to 4-5k before the frame rate started to drop which doesn’t seem right. After a bit of experimenting if I changed it to only draw one type of bunny I got up to 200k at 60fps. Surely something must be amiss here under the hood? Or is it to do with drawing different textures? Maybe try with the bunnies packed into a single sprite sheet. Maybe mojo can be optimised here somehow?

[peterigzParticipant]

Thanks Nerobot/Mark, I guess I should look into doing it via a theme instead then,  that looks like the cleanest way of doing it.

And yes I noticed that F1 doesn’t always show the docs (sometimes it does work though)

[peterigzParticipant]

Thanks nerobot. I was just trying to do this in code like:

Monkey

Local newStyle := filemenu.Style.Copy() newStyle.Font = SCEditor.Roboto filemenu.Style = newStyle

1 2 3

Local newStyle := filemenu.Style.Copy() newStyle.Font = SCEditor.Roboto filemenu.Style = newStyle

Can you do it like that? I tried on the menu and menu bar but nothing changed. I know the font is loaded ok because the same code is working on the render view.

[peterigzParticipant]

Thanks, I had seen that thread but didn’t notice the stuff about layout. So basically use a flag for the initial layout, that’s fair enough.

Still haven’t worked out this though: How do I change the font of the menus? I can change the font of other views ok using styles but the same method doesn’t seem to be working for menus.

[peterigzParticipant]

Is there an event that I can hook into that I can initialise certain things after the width and height of the view has been calculated?

At the moment if I try and set something up where I need to know the calculated width and height of the view I can’t put it in New() because width and height are both 0 at that point. OnLayout seems to be called every frame. I’ll also need something like OnResize for when the window/view is resized. Or is it just a case of checking manually if the width/height have changed?

Edit: sorry might have lot’s of questions about mojox! How do I change the font of the menus? I can change the font of other views ok using styles but the same method doesn’t seem to be working for menus.

[peterigzParticipant]

Thanks Mark, that makes a bit more sense now.

[peterigzParticipant]

After a bit of experimenting, this seemed to work ok:

Monkey

MainView.AddView(WorldDoc, "left", "100%")

1	MainView.AddView(WorldDoc, "left", "100%")

If I used “100%” with “top” then that would work but the height would be set to the height of the window, not the remaining space. Not sure how you get it to set the height to the remaining space only. Not specifying any size at all meant the size was basically 0. Don’t know if that’s correct behaviour or not or if there’s some other things that I’m missing.

[peterigzParticipant]

The font for the 2 was Mr Dafoe from google fonts btw incase you want to use it. For smaller icons I was thinking you could just write m2 as well.

[peterigzParticipant]

That’s really cool that you can embed it like that

Doesn’t slow down here but it would be cool if you could send a sleep mode to it when not in view similar to twitter and video embeds.

[peterigzParticipant]

Only just saw this thread but just thought I’d say I concur!

[Author]

Posts