Start or stop the mac Classic environment

property Classic_Startup : "Classic Startup"
property Classic_Support : "Classic Support"

try
	(* Check for classic *)
	tell application "System Events" to set currProcesses to get name of every process
	
	(* Display the current status *)
	if currProcesses contains Classic_Support then
		set tmpMsg to "System 9 is Running."
		set tmpButtons to {"Cancel", "Stop"}
	else
		set tmpMsg to "System 9 is Not Running."
		set tmpButtons to {"OK", "Start"}
	end if
	
	set tmpButton to (button returned of (display dialog tmpMsg buttons tmpButtons default button (item -1 of tmpButtons)))
	
	(* Stop/start classic *)
	if tmpButton is "Stop" then
		tell application Classic_Support to quit
	else if tmpButton is "Start" then
		tell application Classic_Startup to activate
	end if
on error errMsg
	display dialog errMsg
end try