nav[aria-label="Primary Navigation"] { padding: 0; & ul { list-style: none; width: 100%; display: flex; flex-direction: row; justify-content: start; align-items: start; gap: 30px; padding: 0; & li { margin: 0; } & ul li { list-style: none; } } }

Toggle visibility of major grid lines in Graph Builder via keystroke

BHarris

I'd like to configure an add-in to toggle the visibility of major grid lines in Graph Builder (both X and Y), but I'm struggling with the JSL piece... I have the GB object, and the SendToReport( .. Dispatch... code, but it seems to want the variable name associated with the X and Y axes, and my Add-in won't know what those are.

Is this doable?

Here's what I have so far:

// steps to get last_gb scriptable object...<BR /><BR />// send setting change<BR />last_gb << SendToReport(
  Dispatch(
    {},
    "myXaxis",
    ScaleBox,
    { Label Row (Show Major Grid( not(Label Row (Show Major Grid ) ) ) ) ) }
  ),
  Dispatch(
    {},
    "myXYaxis",
    ScaleBox,
    { Label Row (Show Major Grid( not(Label Row (Show Major Grid ) ) ) ) ) }
  )
)

Accepted answers

BHarris

That did it! Here's the solution for anyone who needs a script to toggle on/off gridlines in all of the plots in Graph Builder:

Names Default To Here( 1 );

win = Get Window List();

//Find graph builder windows
graphs = Filter Each( {w}, win,
	If( Length( w << XPath( "//OutlineBox[@helpKey='Graph Builder']" ) ) > 0,
		1,
		0
	)
);

gb = graphs[N Items( graphs )][Outline Box( "Graph Builder" )] << Get Scriptable Object;
gb_rpt = gb << Report();
gb_axis1 = gb_rpt[AxisBox( 1 )];
axis_script = gb_axis1 << get script();
cur_gridvalue = Try(
	axis_script["Label Row"]["Show Major Grid"], // not found
	Arg( Arg( Get Preference( Major Grid Lines ) ) )
);
axisboxes = gb_rpt << XPath( "//AxisBox" );
For Each( {anAxisBox,anIndex}, axisboxes,
	If( cur_gridValue,
		anAxisBox << Show Major Grid( 0 ),
		anAxisBox << Show Major Grid( 1 )
	)
);

Thanks to Jarmo and Yuichi for their help!

****************************************
ps. I don't understand the "<< Get XML" tip at all -- I tried putting it in 4 different places and never got out any XML with "<AxisBox>" in it (although I did get lots of XML out...). How did you learn to script JSL so well?

All comments

yuichi_katsumur

Hello @BHarris ,

How about using axis box to show major grid?
If you want to use send to report message, one idea is to use get variable message to get variable.

// #1 Example for Axis Box
gb_rpt = gb_ob << Report();
gb_rpt[axis box( 1 )] << Show Major Grid( 1 );
gb_rpt[axis box( 2 )] << Show Major Grid( 1 );

// #2 Example for send to report
var1 = gb_ob << Get Variable( 1 );
var2 = gb_ob << Get Variable( 2 );
Eval(
	Substitute(
			Expr(
				gb_ob << send to report(
					Dispatch(
						{},
						_var_,
						ScaleBox,
						{Label Row( Show Major Grid( 1 ) )}
					)
				)
			),
		Expr( _var_ ), Eval( Char( var1[1] ) )
	)
);

I hope it works for your problem.

BHarris

This is very close! I'd like the script to toggle the grid state on and off whenever it is run, but this is only able to turn the grids on. I just spent about an hour trying to figure out how to read the grid state from an AxisBox, but the documentation gets very sparse when I get down to "Label Row"...

How can I read the current state of the major grid?

jthi

There might be better ways, but one option you could try is to send << get script to axisbox and get the Show Major Grid from that. If that isn't visible there at all, then you should be able to get the value from users properties

axis_script = axisbox << get script();

cur_gridvalue  = Try(
	axis_script["Label Row"]["Show Major Grid"];
	Print("Grid");
, // not found
	Arg(Arg(Get Preference(Major Grid Lines)));
	Print("Preference");
);

BHarris

Much closer! It now turns off gridlines for the first x- and first y-axis box, but not all of the axis boxes on a multi-axis plot:

How can I iterate over all the axis boxes? Here's what I have so far:

Names Default To Here( 1 );

win = Get Window List();

//Find graph builder windows
graphs = Filter Each({w}, win,
	If(Length(w << XPath("//OutlineBox[@helpKey='Graph Builder']")) > 0, 1, 0)
);

gb = graphs[N Items(graphs)][OutlineBox("Graph Builder")] << Get Scriptable Object;
gb_rpt = gb << Report();
gb_axis1 = gb_rpt[AxisBox( 1 )];
gb_axis2 = gb_rpt[AxisBox( 2 )];
axis_script = gb_axis1 << get script();
cur_gridvalue = Try(
	axis_script["Label Row"]["Show Major Grid"], // not found
	Arg( Arg( Get Preference( Major Grid Lines ) ) )
);

If( cur_gridValue,
	gb_axis1 << Show Major Grid( 0 );
	gb_axis2 << Show Major Grid( 0 );
,
	gb_axis1 << Show Major Grid( 1 );
	gb_axis2 << Show Major Grid( 1 );
);

(ps. I would've never figured out the "get script" or "arg( arg(" thing on my own. I feel like I'm a semi-competent 25-years-experience scripter, but I still feel quite lost in JSL -- very hard to tell what it's doing a lot of the time.)