简单窗口

if (`window -ex ExampleWindow7`)

deleteUI ExampleWindow7;

window -widthHeight 260 200 -t "Test Window" ExampleWindow7;

columnLayout ColumnLayout;

frameLayout -labelVisible false -marginWidth 5 -marginHeight 5;

columnLayout;

text -label "Overall Intensity";

rowLayout -numberOfColumns 3;

string $radioButton1,$radioButton2,$radioButton3;

radioCollection;

$radioButton1 = `radioButton -l "row"`;

$radioButton2 = `radioButton -l "Medium"`;

$radioButton3 = `radioButton -l "High"`;

setParent ..;

text -l "Light Switches";

rowColumnLayout -numberOfColumns 2 -columnWidth 1 130 -columnWidth 2 130;

string $checkBox1,$checkBox2,$checkBox3,$checkBox4;

$checkBox1 = `checkBox -l "Front Spot"`;

$checkBox2 = `checkBox -l "Center Spot"`;

$checkBox3 = `checkBox -l "Near Flood"`;

$checkBox4 = `checkBox -l "Sunlight"`;

setParent ExampleWindow7|ColumnLayout;

textField -text "Ready" -editable false -width 278 StatusLine;

radioButton -edit -select $radioButton1;

checkBox -edit -value on $checkBox1;

checkBox -edit -value off $checkBox2;

checkBox -edit -value off $checkBox3;

checkBox -edit -value on $checkBox4;

radioButton -edit -onCommand "showStatus/"Low Intensity/"" $radioButton1;

radioButton -edit -onCommand "showStatus/"Medium Intensity/"" $radioButton2;

radioButton -edit -onCommand "showStatus/"High Intensity/"" $radioButton3;

checkBox -edit -changeCommand "showStatus/"Front Spot: #1/"" $checkBox1;

checkBox -edit -changeCommand "showStatus/"Center Spot: #1/"" $checkBox2;

checkBox -edit -onCommand "showStatus/"Near Flood On/""

-offCommand "showStatus/"Near Flood Off/"" $checkBox3;

checkBox -edit -onCommand "showStatus/"Sunlight On/""

-offCommand "showStatus/"Sunlight Off/"" $checkBox4;

showWindow ExampleWindow7;

proc showStatus(string $newStatus)

{

textField -edit -text $newStatus ExampleWindow7|ColumnLayout|StatusLine;

}