/****************************************************************************************** Workin' Man's Mel v1.0 --------------------------- *NOTE* Change the path to your windows directory for the Notepad feature to work. copyright 2004 Jonathan R. Nelson jonathan@jonathanrnelson.com www.jonathanrnelson.com ********************************************************************************************/ //proc to define help button action proc helpButtonAction(){ string $helpThis = `textField -q -text helpThis`; if ($helpThis == "") { showHelp -docs "Commands/index.html"; } else { help -doc $helpThis; } } proc noteMe() { system("start C:/WINDOWS/NOTEPAD.EXE" ); } window -t "Workin' Man's MEL" -wh 175 200; columnLayout; checkBox -onCommand "commandEcho -state on" -offCommand "commandEcho -state off" -label "Make MEL Verbose"; separator -w 150 -h 15; button -l "Clear MEL History" -w 150 -c "scriptEditorInfo -ch"; button -l "Show MEL Windows" -w 150 -c "showWindow $gCommandWindow"; separator -w 150 -h 15; text -l "MEL Help:"; textField -ec helpButtonAction helpThis; button -l "MEL Command Help" -w 150 -c "helpButtonAction()"; separator -w 150 -h 15; button -l "Open Notepad" -w 150 -c "noteMe()"; showWindow;