[DaniloParticipant]

I’m lovin’ it!

[DaniloParticipant]

Random thoughts and ideas – Posting #4

Monkey

[crayon-5cb9b54fdc894167665957 inline="true" ]If [expression] [statements] ElseIf [expression] [statements] Else [statements] EndIf If [expression] Then [statement] If [expression] Then [statement] Else [statement] ' If you want to allow 'Then' for blocks: If [expression] Then [end-of-line] [statements] EndIf ' ' Multiple statements in single-liners (separated by comma)? ' If [expression] Then [statement1], [statement2], [statement3] If [expression] Then [statement1], [statement2], [statement3] Else [statement1], [statement2], [statement3] ' ' multiple [statement] separated by comma is a [statement-list] ' If [expression] Then [statement-list] If [expression] Then [statement-list] Else [statement-list] ' ' Same for For..Next ' For local value:=Eachin values sum+=value Next [opt:var] For local value:=Eachin values Do [statement-list] For local value:=Eachin values Do sum+=value For local value:= 1 To 10 Do sum+=value ' [statement-list] For local value:= 1 To 10 Do sum+=value For local value:= 10 DownTo 1 Do sum+=value ' ' While..Wend ' While [expression] [statements] Wend While [expression] Do [statement] While [expression] Do [statement1], [statement2], [statement3] ' becomes: While [expression] Do [statement-list] While function()=0 Do count+=1 ' ' 'Do' and 'Repeat' ' ' (same thing with different linguistics for supporting differentiated thinking ' and enunciation/phrasing -> freedom of mind to express thoughts in code) ' Do [end-of-line] [statements] While [expression] Do [end-of-line] [statements] Until [expression] Do [end-of-line] [statements] Forever Do [statement] While [expression] Do [statement] Until [expression] Do [statement] Forever Do [statement1], [statement2], [statement3] While [expression] Do [statement1], [statement2], [statement3] Until [expression] Do [statement1], [statement2], [statement3] Forever Do [statement-list] While [expression] Do [statement-list] Until [expression] Do [statement-list] Forever Repeat [end-of-line] [statements] While [expression] Repeat [end-of-line] [statements] Until [expression] Repeat [end-of-line] [statements] Forever Repeat [statement] While [expression] Repeat [statement] Until [expression] Repeat [statement] Forever Repeat [statement1], [statement2], [statement3] While [expression] Repeat [statement1], [statement2], [statement3] Until [expression] Repeat [statement1], [statement2], [statement3] Forever Repeat [statement-list] While [expression] Repeat [statement-list] Until [expression] Repeat [statement-list] Forever

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

[crayon-5cb9b54fdc894167665957 inline="true" ]If [expression]     [statements] ElseIf [expression]     [statements] Else     [statements] EndIf   If [expression] Then [statement]   If [expression] Then [statement] Else [statement]   ' If you want to allow 'Then' for blocks: If [expression] Then [end-of-line]     [statements] EndIf   ' ' Multiple statements in single-liners (separated by comma)? ' If [expression] Then [statement1], [statement2], [statement3]   If [expression] Then [statement1], [statement2], [statement3] Else [statement1], [statement2], [statement3]   ' ' multiple [statement] separated by comma is a [statement-list] ' If [expression] Then [statement-list]   If [expression] Then [statement-list] Else [statement-list]   ' ' Same for For..Next ' For local value:=Eachin values    sum+=value Next [opt:var]   For local value:=Eachin values Do [statement-list] For local value:=Eachin values Do sum+=value   For local value:=  1   To   10  Do  sum+=value  ' [statement-list] For local value:=  1   To   10  Do  sum+=value For local value:= 10 DownTo 1   Do  sum+=value   ' ' While..Wend ' While [expression]     [statements] Wend   While [expression] Do [statement]   While [expression] Do [statement1], [statement2], [statement3] ' becomes: While [expression] Do [statement-list]   While function()=0 Do count+=1   ' ' 'Do' and 'Repeat' ' ' (same thing with different linguistics for supporting differentiated thinking '  and enunciation/phrasing -> freedom of mind to express thoughts in code) ' Do [end-of-line]    [statements] While [expression]   Do [end-of-line]    [statements] Until [expression]   Do [end-of-line]    [statements] Forever   Do [statement] While [expression] Do [statement] Until [expression] Do [statement] Forever   Do [statement1], [statement2], [statement3] While [expression] Do [statement1], [statement2], [statement3] Until [expression] Do [statement1], [statement2], [statement3] Forever   Do [statement-list] While [expression] Do [statement-list] Until [expression] Do [statement-list] Forever   Repeat [end-of-line]    [statements] While [expression]   Repeat [end-of-line]    [statements] Until [expression]   Repeat [end-of-line]    [statements] Forever   Repeat [statement] While [expression] Repeat [statement] Until [expression] Repeat [statement] Forever   Repeat [statement1], [statement2], [statement3] While [expression] Repeat [statement1], [statement2], [statement3] Until [expression] Repeat [statement1], [statement2], [statement3] Forever   Repeat [statement-list] While [expression] Repeat [statement-list] Until [expression] Repeat [statement-list] Forever

[/crayon]

[DaniloParticipant]

It would be really nice if we can compile some guidelines when structs are preferred over classes and when not. I’m struggling with that kind of stuff.

For flexibility, you can duplicate everything. CPoint/SPoint, etc.

Sometimes you want to use a specific type as Struct on stack,
other times as garbage-collected Class-Pointer.

[DaniloParticipant]

MX2 classes are always used as/with pointers in C++,
so no struct on stack. And the pointer is added to the Garbage Collector.
Beside that, AFAIK the only difference between struct/class in C++
is the default access specifier (struct is all public by default).

[DaniloParticipant]

Mark Sibly wrote:

You can’t. The render canvas is ‘special’, and I want to make sure it’s state is not changed behind my back, and that I can change it on the fly if necessary (ie: you may not always get the same canvas in ‘OnRender’) for future features.

So, if the canvas doesn’t preserve all states, it would be:

Monkey

Namespace test #Import "<std>" #Import "<mojo>" Using std.. Using mojo.. #Import "assets/sprites.png" #Import "assets/arcade.ttf" Class MyTest Extends Window Field i:Image Field myFont:Font Method New() ' this sets title. no other way to do this. 'Super.New("Test!!!") Title = "Test!!!" ' Title is a property in class Window i = Image.Load("asset::sprites.png") ' Check for Null If i <> Null i.Handle = New Vec2f(0.0, 0.5) Endif 'Later in MX2, the Null-Check would be as easy as that: ' i?.Handle = New Vec2f(0.0, 0.5) ClearColor=New Color( 1,1,0 ) myFont = Font.Load( "asset::arcade.ttf", 10 ) End Method Method OnRender( canvas:Canvas ) Override canvas.Font = myFont App.RequestRender() End Method End Class Function Main:Void() New AppInstance New MyTest 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

Namespace test #Import "<std>" #Import "<mojo>" Using std.. Using mojo..   #Import "assets/sprites.png" #Import "assets/arcade.ttf"   Class MyTest Extends Window       Field i:Image     Field myFont:Font       Method New()           ' this sets title. no other way to do this.         'Super.New("Test!!!")           Title = "Test!!!" ' Title is a property in class Window           i = Image.Load("asset::sprites.png")           ' Check for Null         If i <> Null             i.Handle = New Vec2f(0.0, 0.5)         Endif           'Later in MX2, the Null-Check would be as easy as that:         ' i?.Handle = New Vec2f(0.0, 0.5)           ClearColor=New Color( 1,1,0 )           myFont = Font.Load( "asset::arcade.ttf", 10 )       End Method       Method OnRender( canvas:Canvas ) Override           canvas.Font = myFont           App.RequestRender()       End Method End Class Function Main:Void()     New AppInstance     New MyTest     App.Run() End Function

[DaniloParticipant]

Try something like this…

Monkey

Namespace test #Import "<std>" #Import "<mojo>" Using std.. Using mojo.. #Import "assets/sprites.png" #Import "assets/arcade.ttf" Class MyTest Extends Window Field initialized:Bool Field i:Image Method New() ' this sets title. no other way to do this. 'Super.New("Test!!!") Title = "Test!!!" ' Title is a property in class Window i = Image.Load("asset::sprites.png") ' Check for Null If i <> Null i.Handle = New Vec2f(0.0, 0.5) Endif 'Later in MX2, the Null-Check would be as easy as that: ' i?.Handle = New Vec2f(0.0, 0.5) ClearColor=New Color( 1,1,0 ) End Method Method Init(canvas:Canvas) canvas.Font = Font.Load( "asset::arcade.ttf", 10 ) initialized = True End Method Method OnRender( canvas:Canvas ) Override If Not initialized Then Init(canvas) App.RequestRender() End Method End Class Function Main:Void() New AppInstance New MyTest 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

Namespace test #Import "<std>" #Import "<mojo>" Using std.. Using mojo.. #Import "assets/sprites.png" #Import "assets/arcade.ttf"   Class MyTest Extends Window Field initialized:Bool Field i:Image Method New() ' this sets title. no other way to do this. 'Super.New("Test!!!")   Title = "Test!!!" ' Title is a property in class Window i = Image.Load("asset::sprites.png")           ' Check for Null If i <> Null             i.Handle = New Vec2f(0.0, 0.5)         Endif           'Later in MX2, the Null-Check would be as easy as that:         ' i?.Handle = New Vec2f(0.0, 0.5)   ClearColor=New Color( 1,1,0 )          End Method       Method Init(canvas:Canvas) canvas.Font = Font.Load( "asset::arcade.ttf", 10 ) initialized = True     End Method   Method OnRender( canvas:Canvas ) Override       If Not initialized Then Init(canvas)   App.RequestRender()       End Method End Class Function Main:Void() New AppInstance New MyTest App.Run() End Function

 

[DaniloParticipant]

wiebow:
Your ‘Field canvas:Canvas’ is not initialized by using ‘New’
or a getter function/method. Means ‘canvas’ is Null, and you
write to canvas.Font

If ‘i = Image.Load()’ returns Null, accessing ‘i.Handle’ would
also crash (at least if they are Classes, not so with Structs).

[DaniloParticipant]

wiebow:
Mollusk is for Windows and Mac OS X. Don’t know why not Linux.

[DaniloParticipant]

RetroRusty:
Mollusk works with MX2 already.
Debug mode doesn’t work currently, and MX2 debugger is still in development,
but otherwise Mollusk is good for editing and running MX2 codes.
AFAIK grudlux is already working on the next version.

[DaniloParticipant]

What about adding DownTo (additional to ‘Step -1’)?

Monkey

[crayon-5cb9b55004888949510239 inline="true" ]Function Main() For Local x:Int = 5 DownTo 1 Print x Next For Local y:Int = 10 DownTo 0 Step 2 Print y Next End

1 2 3 4 5 6 7 8 9 10 11

[crayon-5cb9b55004888949510239 inline="true" ]Function Main()     For Local x:Int = 5 DownTo 1     Print x   Next     For Local y:Int = 10 DownTo 0 Step 2     Print y   Next   End

[/crayon]

Monkey

[crayon-5cb9b5500488e955523416 inline="true" ]Function Main() Local:Int x,y For x = 5 DownTo 1 Print x Next For y = 10 DownTo 0 Step 2 Print y Next End

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

[crayon-5cb9b5500488e955523416 inline="true" ]Function Main()   Local:Int x,y     For x = 5 DownTo 1     Print x   Next     For y = 10 DownTo 0 Step 2     Print y   Next   End

[/crayon]

[Author]

Posts