「ご主人様ご命令を！」OS Xでスクリプトスレ

>>356
OS X質問スレの人でしょうか？startup disk を変更するってのなら、
以前 >>246にのせたのがあります。ただちょっと長いので、
OS 9が一個しか無く、それで起動出来さえすれば好いならこんなんどうです？
注意点はOS 9のシステムフォルダのパスに日本語が含まれていると駄目なので、
半角英字に変更しておいてください。
------------------------------
property sys9Path : {}
property passwdStr : {}
if (passwdStr is {}) then
display dialog "パスワードを入力" default answer "" buttons {"Ok", "Cancel"} default button 1
set passwdStr to text returned of result as string
if (passwdStr is "") then return
end if
if (sys9Path is {}) then
set sys9Path to POSIX path of (choose folder with prompt "OS9のシステムフォルダを選択")
if (sys9Path is {}) then return
end if
try
set cmdStr to "sudo /usr/sbin/bless -folder9 " & "'" & sys9Path & "'" & " -setOF "
do shell script cmdStr password passwdStr with administrator privileges
end try
display dialog "すぐに再起動しますか？" buttons {"Yes", "Cansel"} default button 1
set rFlag to button returned of result
if rFlag is "Yes" then
tell application "Finder" to restart
else
return
end if