[Matthew SmithParticipant]

@abakobo
No you don’t need to separate out your update (you can certainly as the above example shows). Put everything into the OnRender as follows:

Monkey

Method OnRender(canvas:Canvas) Override 'Update MyObjects.Update() 'other things you wish to update 'Render App.RequestRender() MyObjects.Render(canvas) 'other things you wish to render 'ie. score End

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

Method OnRender(canvas:Canvas) Override    'Update    MyObjects.Update()    'other things you wish to update    'Render    App.RequestRender()    MyObjects.Render(canvas)    'other things you wish to render    'ie. score End

This way the system handles everything – most of the available samples follow this example. You can create the OnUpdate timer if you want to update more regularly or at a specific rate.

That did catch me out initially trying to work through what was what.

[Matthew SmithParticipant]

Ok – thanks for taking a look Mark!

[Matthew SmithParticipant]

Put a DebugStop() before the area you wish to debug and once it’s hit the debugger becomes active in Ted2. As before best to run in a window.

[Matthew SmithParticipant]

I’ve raised an issue for this:
https://github.com/blitz-research/monkey2/issues/24

[Matthew SmithParticipant]

@pakz
Thanks for checking! Hopefully Mark can determine the problem here.

Also haven’t seen any slow downs like that myself.

[Matthew SmithParticipant]

I believe the ? operator will be added soon which will verify if an object is null before using it:
http://monkey2.monkey-x.com/monkey2-roadmap/

so you could do entity?.Update() in you example.

[Matthew SmithParticipant]

Nice!

[Matthew SmithParticipant]

That may have been fixed:

https://github.com/blitz-research/monkey2/commit/a9ad08504e5a25b0862bafb4005b8475747c864c

[Matthew SmithParticipant]

Monkey

[crayon-5cba8f34f16c5376378986 inline="true" ]'System #Import "<std>" #Import "<mojo>" Using mojo.. Using std.. ' Globals Global window:MainWindow Function Main() New AppInstance() window = New MainWindow("Main Window",1024,768,WindowFlags.Resizable) 'Fullscreen/Resizable App.Run() End Class MainWindow Extends Window Field IsPaused:Bool Field IsSuspended:Bool Field ShowFPS:Bool=True Method New(title:String, width:Int, height:Int, flags:WindowFlags) ' Setup display Super.New(title, width, height, flags) 'Virtual Resolution Layout = "letterbox" MinSize=New Vec2i(640,480) MaxSize=New Vec2i(width,height) ClearColor = Color.Black Mouse.PointerVisible=False End Method Method OnRender(canvas:Canvas) Override 'Render App.RequestRender() 'Message Local message:String="Hello from Monkey2!" canvas.Color=Color.White canvas.DrawText(message,Width/2-Style.DefaultFont.TextWidth(message)/2,Height/2) 'System If (ShowFPS) canvas.DrawText("FPS-" + App.FPS,0,0) End Method Method OnKeyEvent( event:KeyEvent ) Override Select event.Type Case EventType.KeyDown Select event.Key Case Key.F12 Fullscreen = Not Fullscreen Case Key.Escape App.Terminate() Case Key.F ShowFPS=Not ShowFPS End End End Method OnWindowEvent(event:WindowEvent) Override Select event.Type Case EventType.WindowMoved Case EventType.WindowResized App.RequestRender() Case EventType.WindowGainedFocus Self.IsSuspended = False Case EventType.WindowLostFocus Self.IsSuspended = True Default Super.OnWindowEvent(event) End 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 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

[crayon-5cba8f34f16c5376378986 inline="true" ]'System #Import "<std>" #Import "<mojo>"   Using mojo.. Using std..   ' Globals Global window:MainWindow   Function Main() New AppInstance() window = New MainWindow("Main Window",1024,768,WindowFlags.Resizable) 'Fullscreen/Resizable App.Run() End   Class MainWindow Extends Window Field IsPaused:Bool Field IsSuspended:Bool Field ShowFPS:Bool=True   Method New(title:String, width:Int, height:Int, flags:WindowFlags) ' Setup display Super.New(title, width, height, flags) 'Virtual Resolution Layout = "letterbox" MinSize=New Vec2i(640,480) MaxSize=New Vec2i(width,height) ClearColor = Color.Black Mouse.PointerVisible=False End Method Method OnRender(canvas:Canvas) Override 'Render App.RequestRender() 'Message Local message:String="Hello from Monkey2!" canvas.Color=Color.White canvas.DrawText(message,Width/2-Style.DefaultFont.TextWidth(message)/2,Height/2) 'System If (ShowFPS) canvas.DrawText("FPS-" + App.FPS,0,0) End Method Method OnKeyEvent( event:KeyEvent ) Override Select event.Type Case EventType.KeyDown Select event.Key Case Key.F12 Fullscreen = Not Fullscreen Case Key.Escape App.Terminate() Case Key.F ShowFPS=Not ShowFPS End End End Method OnWindowEvent(event:WindowEvent) Override Select event.Type Case EventType.WindowMoved Case EventType.WindowResized App.RequestRender() Case EventType.WindowGainedFocus Self.IsSuspended = False Case EventType.WindowLostFocus Self.IsSuspended = True Default Super.OnWindowEvent(event) End End End Class

[/crayon]

[Matthew SmithParticipant]

Nice – all worked here.

[Matthew SmithParticipant]

Thanks therevills!

Add *.buildv* to your .gitignore file! Easy!

[Matthew SmithParticipant]

Nearly missed it – will check it out Wiebo!

[Matthew SmithParticipant]

the Theme.monkey2 file of Ted2 contains the loader for the config file.  Do you have to load fonts via the #Import feature or can they be loaded directly via the load command? Haven’t tried that as yet.

[Matthew SmithParticipant]

Yeah – the editor definitely needs a mono-spaced font.  I grabbed Consolas (consola.ttf) and renamed it to what the editor is looking for (RobotoMono-Regular.ttf) and it worked fine for now.

[Matthew SmithParticipant]

Great – thanks Mark!

[Author]

Posts