Interact with the Script Editor

Even the script editor window is a display tree in JMP, which means you can write a JSL script to write and save another JSL script.

There is no New Script() function. Instead, to open a new script window, you use the New Window() function and then send it a message to tell it that it’s a script window:

win = New Window( "title", <<Script, "Initial Contents" );

The last argument is optional. If you include a string, the new script window contains that string.

In the New Window() example above, win is a reference to the display box that is the entire window. To write to a script window, you first need to get a reference to the part of the display box that you can write to, which is called a Script Box():

ed = win[Script Box( 1 )];

Using the reference ed, you can add text, remove text, and get the text that is already there.

ed << Get Text();

"Initial Contents"

Use the Set Text message to set all the text in the script window. The following message clears all text in the Script Window and then adds aaa=3; followed by a return:

ed << Set Text( "aaa=3;\!N" );

Use the Append message to add additional text to the end of the script window.

ed << Append Text( "bbb=1/10;" );

ed << Append Text(" \!Nccc=4/100;" );

Use the Get Line Text message to get the text at the line of a specified line number. Use the Set Line Text message to replace a specified line of text with new text.

ed << Get Line Text( 2 );

ed << Set Line Text( 2, "bbb = 0.1;" );

Use the Get Line Count message to get the total number of lines in the script. The Get Lines message returns a list of each line in the script as a string.

ed << Get Line Count();

ed << Get Lines();

Use the Reformat message to automatically format a script for easier reading.

ed << Reformat();

Use the Save Text File() function to save the script to a text file with a .jsl extension.

Save Text File(

"$DOCUMENTS/Example.jsl",

ed << Get Text()

);

Use the Get Window Title message to get the name of the script. The following example places the script name in the lower left corner of the report.

title = Current Window() << Get Window Title;

dt = Open( "$SAMPLE_DATA/Big Class.jmp" );