on listScripts(type)
set menu_name to type & " Script"
tell application "System Events"
tell process "Cheetah3D"
name of every menu item of menu of menu item menu_name of menu of menu item "Script" of menu "Tools" of menu bar 1
end tell
end tell
end listScripts
on runScriptByName(type, name)
tell application "Cheetah3D"
activate
end tell
set menu_name to type & " Script"
tell application "System Events"
tell process "Cheetah3D"
click menu item name of menu of menu item menu_name of menu of menu item "Script" of menu "Tools" of menu bar 1
end tell
end tell
end runScriptByName
runScriptByName("Macro", "Parameter Info.js")
listScripts("Polygon")