[coconParticipant]

Automatic reloading of files when saving with another external editor is now ready.
https://github.com/coconcode/ted2mod/blob/master/documentwatcher.monkey2

[coconParticipant]

Hi, thank for checking the project out.

I have mentioned some of information in the readme file, however my purpose is to make experimentation.

The best feature so far is the ability to configure the hotkeys with a JSON file.
https://github.com/coconcode/ted2mod/blob/master/hotkeyloader.monkey2

Also I did a massive refactoring by redesigning the program (the commands of the IDE) by using a design pattern. I was very skeptic about this, although it makes the code more organized, it makes it over engineered. I am more of a Python-esque style fan, where you create lists at will and put whatever you like there, perhaps later with the reflection capabilities I will try to see this alternative.
https://github.com/coconcode/ted2mod/blob/master/idecommand.monkey2

[coconParticipant]

The ideal lambdas have the function purity concept (that no data modifications are allowed). I don’t know if Monkey uses that design indeed.

What I had more in mind was the C# concept of Action and Func that modify variables. Perhaps C++ as well by using the ampersand operator.

[coconParticipant]

Nice idea for a logo. 
“Ted” and “Monkey”: Action Team Adventure.

[coconParticipant]

Cool, perhaps setting the env variables should be noted on installation instructions, many users will notice this in the future.

[coconParticipant]

Try to make a command line compilation and see if you can spot any errors related to the system or g++ compiler. I had tried this also myself:
http://monkey2.monkey-x.com/forums/topic/small-correction-to-the-mx2cc-documentation/

P.S. The mx2cc is a user environment variable.
D:\Programs\monkey2\bin\mx2cc_windows.exe

[coconParticipant]

I used this version of MinGW:

http://www.monkey-x.com/mak/devtools/i686-5.3.0-posix-dwarf-rt_v4-rev0.exe (noted here: https://github.com/blitz-research/monkey2)

1 2 3

http://www.monkey-x.com/mak/devtools/i686-5.3.0-posix-dwarf-rt_v4-rev0.exe (noted here: https://github.com/blitz-research/monkey2)

 

And extracted it here:

Monkey

D:\Programs\monkey2\devtools>dir /b .gitignore mingw-w64.bat mingw-w64.url mingw32 uninstall.exe uninstall.ini

1 2 3 4 5 6 7

D:\Programs\monkey2\devtools>dir /b .gitignore mingw-w64.bat mingw-w64.url mingw32 uninstall.exe uninstall.ini

Also just for safety I created a user environment variable called PATH and added this line:

Monkey

D:\Programs\monkey2\devtools\mingw32\bin\g++.exe

1 2	D:\Programs\monkey2\devtools\mingw32\bin\g++.exe

I don’t know if the PATH variable is needed for using Ted, but I remember when doing command line compilations it was needed.

[coconParticipant]

I saw that TED has hardcoded keyconfigurations.

Perhaps it might be a good idea to introduce a shortcut manager so these configurations can be loaded from a JSON (or XML) file, parsed, and assigned during startup of the application.

Well, this is just a suggestion, nothing formal yet.

Monkey

#Import "<mojo>" Using std.. Class Shortcut Field Name:String Field Shortcut:String Field HotKey:String '< -- This is will be a Key not a String Field HotKeyModifier:String '<-- This is also Method SetCommand(command:String) If CommandIsValid(command) Name = command End End Method SetShortcut(shortcut:String) Shortcut = shortcut FindHotKey() FindModifier() End Method CommandIsValid:Bool(command:String) If command = "Find" Return True If command = "Debug" Return True If command = "Test" Return True Return False End Method FindHotKey() If Shortcut.Contains("+") Local s := Shortcut.Split("+") HotKey = s[s.Length - 1] Return End HotKey = Shortcut End Method FindModifier() If Shortcut.Contains("Ctrl") HotKeyModifier = "Modifier.Control" End If Shortcut.Contains("Alt") Local hasPrev := "" If HotKeyModifier > 0 hasPrev = "|" HotKeyModifier += hasPrev + "Modifier.Alt" End End End Class ShortcutManager Field ShortcutList:List<Shortcut> Method LoadFromFile() ShortcutList = New List<Shortcut> ' file is opened and in each line a new shortcut is added to the list Local s:Shortcut ' e.g. s = New Shortcut s.SetCommand("Find") s.SetShortcut("Ctrl+F") ShortcutList.AddLast(s) s = New Shortcut s.SetCommand("Debug") s.SetShortcut("F5") ShortcutList.AddLast(s) s = New Shortcut s.SetCommand("Test") s.SetShortcut("Ctrl+Alt+Del") ShortcutList.AddLast(s) End Method GetHotKey:String(action:String) For Local s := Eachin ShortcutList If s.Name = action Return s.HotKey End Next Return "" End Method GetHotkeyModifier:String(action:String) For Local s := Eachin ShortcutList If s.Name = action Return s.HotKeyModifier End Next Return "" End End Function Main() ' The shortcut manager is created Local shotcutManager := New ShortcutManager shotcutManager.LoadFromFile() ' Testing the output Print("Testing Commands") Local commands := New String[] ("Find", "Debug", "Test") For Local c := Eachin commands Print(c) Print(shotcutManager.GetHotKey(c)) Print(shotcutManager.GetHotkeyModifier(c)) Print("") Next ' Example of implementing this in Ted ' at the moment of where the actions are declared '_editFind=New Action("Find") '_editFind.HotKey=shotcutManager.GetHotKey("Find") '_editFind.HotKeyModifiers=shotcutManager.GetHotkeyModifier("Find") '_editFind.Triggered=OnEditFind 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 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

#Import "<mojo>" Using std..   Class Shortcut Field Name:String Field Shortcut:String Field HotKey:String '< -- This is will be a Key not a String Field HotKeyModifier:String '<-- This is also Method SetCommand(command:String) If CommandIsValid(command) Name = command End End   Method SetShortcut(shortcut:String) Shortcut = shortcut FindHotKey() FindModifier() End   Method CommandIsValid:Bool(command:String) If command = "Find" Return True If command = "Debug" Return True If command = "Test" Return True Return False End   Method FindHotKey() If Shortcut.Contains("+") Local s := Shortcut.Split("+") HotKey = s[s.Length - 1] Return End HotKey = Shortcut End Method FindModifier() If Shortcut.Contains("Ctrl") HotKeyModifier = "Modifier.Control" End   If Shortcut.Contains("Alt") Local hasPrev := "" If HotKeyModifier > 0 hasPrev = "|" HotKeyModifier += hasPrev + "Modifier.Alt" End   End End   Class ShortcutManager Field ShortcutList:List<Shortcut>   Method LoadFromFile() ShortcutList = New List<Shortcut>   ' file is opened and in each line a new shortcut is added to the list Local s:Shortcut   ' e.g. s = New Shortcut s.SetCommand("Find") s.SetShortcut("Ctrl+F") ShortcutList.AddLast(s) s = New Shortcut s.SetCommand("Debug") s.SetShortcut("F5") ShortcutList.AddLast(s) s = New Shortcut s.SetCommand("Test") s.SetShortcut("Ctrl+Alt+Del") ShortcutList.AddLast(s) End   Method GetHotKey:String(action:String) For Local s := Eachin ShortcutList If s.Name = action Return s.HotKey End Next Return "" End   Method GetHotkeyModifier:String(action:String) For Local s := Eachin ShortcutList If s.Name = action Return s.HotKeyModifier End Next Return "" End   End   Function Main() ' The shortcut manager is created Local shotcutManager := New ShortcutManager shotcutManager.LoadFromFile()   ' Testing the output Print("Testing Commands") Local commands := New String[] ("Find", "Debug", "Test") For Local c := Eachin commands Print(c) Print(shotcutManager.GetHotKey(c)) Print(shotcutManager.GetHotkeyModifier(c)) Print("") Next     ' Example of implementing this in Ted ' at the moment of where the actions are declared '_editFind=New Action("Find") '_editFind.HotKey=shotcutManager.GetHotKey("Find") '_editFind.HotKeyModifiers=shotcutManager.GetHotkeyModifier("Find") '_editFind.Triggered=OnEditFind End

[coconParticipant]

Perhaps it might be good to switch from “raw presentation” to “formal presentation” just as having two options. But consider this a todo task for sometime in future, no worries.

[coconParticipant]

That’s good, perhaps a patch would be created to fix this if it’s considered as a bug by escaping the white spaces in Unix OSs’.

[coconParticipant]

This is great news  That way it will be developed even more.

[coconParticipant]

As I remember Macs have this console logger and might catch any errors.
https://support.omnigroup.com/console-osx/

Also another case is that by building with terminal to see if everything goes well, because TED will not show any g++ or OS related errors.
D:\Programs\monkey2\scripts

Regarding the permissions: You will need to check the mx2cc application (My is D:\Programs\monkey2\bin\mx2cc_windows.exe), in which user group it belongs? Because this application is responsible for invoking a system process (the game you want to run), you will have to make sure that it has the appropriate permissions to so (perhaps other Mac users could validate this). Also I would be keep an eye if one folder on tree has restricted rights, thus applying restritions to the monkey2 folder as well.

Sorry for the guesswork, I hope that anything of these help.

[coconParticipant]

Superb work, flawless victory!

~ One thing I haven’t seen other editors do is also highlight where about you are in the code (in the code description) as you move around.

I thought of this feature a few times, it would be nice to see it once in an IDE, thankfully now in TED it will be awesome.

[coconParticipant]

Yes, I vote for that. A forum with snippets might be nice.

[coconParticipant]

Hi thanks for the feedback. I did the changes and now it works.

Monkey

Function Main() Theme.Load() New AppInstance New MainWindowInstance() App.Run() End '... Method CreateGUI() _inputTextView = New TextView _outputTextView = New TextView _docker = New DockingView ' I set the initial _docker view to _inputTextView (should fill the all of the screen) _docker.ContentView = _inputTextView ' I create a new bottom split, by default is resizable _docker.AddView(_outputTextView, "bottom", 400) ' The GUI element must be added to the Window Self.AddChild(_docker) 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

Function Main() Theme.Load() New AppInstance New MainWindowInstance() App.Run() End   '...   Method CreateGUI() _inputTextView = New TextView _outputTextView = New TextView _docker = New DockingView ' I set the initial _docker view to _inputTextView (should fill the all of the screen) _docker.ContentView = _inputTextView ' I create a new bottom split, by default is resizable _docker.AddView(_outputTextView, "bottom", 400)   ' The GUI element must be added to the Window Self.AddChild(_docker) End

[Author]

Posts