JSON module getting started

[wiebowParticipant]

Hi all,

Has anyone tried using the json module? And if yes, can you get me started? I’ve been trying to find example code but cannot find it, and the monkey 1 module is slightly different and examples on the monkey 1 site don’t work.  Any help is appreciated!!

[Mark SiblyKeymaster]

Test…

[wiebowParticipant]

Thanks!

[Mark SiblyKeymaster]

Ha! Just got ‘banned’ from my own site for trying to post some code! They’re fixing it now…

[wiebowParticipant]

Good luck! The site doesn’t run on Monkey 2 code now does it!?  

[wiebowParticipant]

Oh! I found this page on Monkey-X with a post from you Mark about JSON and an example: http://www.monkey-x.com/Community/posts.php?topic=10447

It should be in the bananas folder!

[Mark SiblyKeymaster]

Attempt 2…

Monkey

Method ToJson:JsonValue( rect:Recti ) Return New JsonArray( New JsonValue[]( New JsonNumber( rect.min.x ),New JsonNumber( rect.min.y ),New JsonNumber( rect.max.x ),New JsonNumber( rect.max.y ) ) ) End Method ToRecti:Recti( value:JsonValue ) Local json:=value.ToArray() Return New Recti( json[0].ToNumber(),json[1].ToNumber(),json[2].ToNumber(),json[3].ToNumber() ) End Method LoadState() Local obj:=JsonObject.Load( "bin/ted2.state.json" ) If Not obj Return If obj.Contains( "openDocuments" ) For Local doc:=Eachin obj["openDocuments"].ToArray() OpenDocument( doc.ToString() ) Next Endif If obj.Contains( "recentFiles" ) _recent.Clear() For Local path:=Eachin obj["recentFiles"].ToArray() _recent.Push( path.ToString() ) Next End UpdateRecentFiles() If obj.Contains( "windowRect" ) Frame=ToRecti( obj["windowRect"] ) Endif If obj.Contains( "consoleSize" ) _docker.SetViewSize( _console,obj["consoleSize"].ToNumber() ) Endif If obj.Contains( "browserSize" ) _docker.SetViewSize( _browser,obj["browserSize"].ToNumber() ) Endif If obj.Contains( "helpTreeSize" ) _helpView.SetViewSize( _helpView.HelpTree,obj["helpTreeSize"].ToNumber() ) Endif If obj.Contains( "lockedDocument" ) Local doc:=OpenDocument( obj["lockedDocument"].ToString() ) If doc LockDoc( doc ) Endif End Method SaveState() Local obj:=New JsonObject Local docs:=New JsonArray For Local doc:=Eachin _openDocs docs.Add( New JsonString( doc.Path ) ) Next obj["openDocuments"]=docs Local recent:=New JsonArray For Local path:=Eachin _recent recent.Add( New JsonString( path ) ) End obj["recentFiles"]=recent obj["windowRect"]=ToJson( Frame ) obj["consoleSize"]=New JsonNumber( _docker.GetViewSize( _console ) ) obj["browserSize"]=New JsonNumber( _docker.GetViewSize( _browser ) ) obj["helpTreeSize"]=New JsonNumber( _helpView.GetViewSize( _helpView.HelpTree ) ) If _lockedDoc obj["lockedDocument"]=New JsonString( _lockedDoc.Path ) SaveString( obj.ToJson(),"bin/ted2.state.json" ) 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

Method ToJson:JsonValue( rect:Recti ) Return New JsonArray( New JsonValue[]( New JsonNumber( rect.min.x ),New JsonNumber( rect.min.y ),New JsonNumber( rect.max.x ),New JsonNumber( rect.max.y ) ) ) End Method ToRecti:Recti( value:JsonValue ) Local json:=value.ToArray() Return New Recti( json[0].ToNumber(),json[1].ToNumber(),json[2].ToNumber(),json[3].ToNumber() ) End Method LoadState() Local obj:=JsonObject.Load( "bin/ted2.state.json" ) If Not obj Return If obj.Contains( "openDocuments" ) For Local doc:=Eachin obj["openDocuments"].ToArray() OpenDocument( doc.ToString() ) Next Endif If obj.Contains( "recentFiles" ) _recent.Clear() For Local path:=Eachin obj["recentFiles"].ToArray() _recent.Push( path.ToString() ) Next End UpdateRecentFiles() If obj.Contains( "windowRect" ) Frame=ToRecti( obj["windowRect"] ) Endif If obj.Contains( "consoleSize" ) _docker.SetViewSize( _console,obj["consoleSize"].ToNumber() ) Endif If obj.Contains( "browserSize" ) _docker.SetViewSize( _browser,obj["browserSize"].ToNumber() ) Endif If obj.Contains( "helpTreeSize" ) _helpView.SetViewSize( _helpView.HelpTree,obj["helpTreeSize"].ToNumber() ) Endif If obj.Contains( "lockedDocument" ) Local doc:=OpenDocument( obj["lockedDocument"].ToString() ) If doc LockDoc( doc ) Endif   End Method SaveState() Local obj:=New JsonObject Local docs:=New JsonArray For Local doc:=Eachin _openDocs docs.Add( New JsonString( doc.Path ) ) Next obj["openDocuments"]=docs Local recent:=New JsonArray For Local path:=Eachin _recent recent.Add( New JsonString( path ) ) End obj["recentFiles"]=recent obj["windowRect"]=ToJson( Frame ) obj["consoleSize"]=New JsonNumber( _docker.GetViewSize( _console ) ) obj["browserSize"]=New JsonNumber( _docker.GetViewSize( _browser ) ) obj["helpTreeSize"]=New JsonNumber( _helpView.GetViewSize( _helpView.HelpTree ) ) If _lockedDoc obj["lockedDocument"]=New JsonString( _lockedDoc.Path ) SaveString( obj.ToJson(),"bin/ted2.state.json" ) End

[wiebowParticipant]

Thanks Mark, I’ll give this a shot later today.

[Author]

Posts