おもろい、めずらしいアップルスクリプト発表会 6

【前スレ】
おもろい、めずらしいアップルスクリプト発表会 5
http://pc7.2ch.net/test/read.cgi/mac/1067367790/l50
おもろい、めずらしいアップルスクリプト発表会 4
http://pc.2ch.net/test/read.cgi/mac/1026844857/l50
おもろい、めずらしいアップルスクリプト発表会
http://pc.2ch.net/mac/kako/971/971295440.html
おもろい、めずらしいアップルスクリプト発表会
http://mentai.2ch.net/mac/kako/957/957215209.html
面白い＆便利なアップルスクリプト
http://mentai.2ch.net/mac/kako/962/962044994.html

・関連スレ
【標準装備】スクリプトエディタ
http://pc7.2ch.net/test/read.cgi/mac/1111760449/l50
【中の人】Automator【小人】
http://pc7.2ch.net/test/read.cgi/mac/1088457299/l50
Macでシェルスクリプト総合 Part 1
http://pc7.2ch.net/test/read.cgi/mac/1105074933/l50

・関連スクリプトのまとめ
ttp://members.tripod.co.jp/obto/script/script.html

＜ 新製品「OptiPlex GX620/GX520」の特徴 ＞

筐体のデザインを一新。ミニタワー（GX620のみ）／デスクトップ／スモールフォームファクタ／ウルトラスモールフォームファクタ（GX620のみ）の4つの筐体で、お客様の求める拡張性、省スペース性に柔軟に対応
筐体、マザーボード、電源装置はEUが2006年7月より施行するRoHS指令の鉛フリー化に適合
インテル社が提案する新しいデスクトップのインターフェイス仕様「BTX」に準拠したシャーシによる優れた低騒音性、放熱性
最新のインテル® Pentium® 4プロセッサやCeleron® Dプロセッサを搭載、デュアルコア・プロセッサにも対応予定
最新のインテル® GMA950グラフィックボードにより、従来のGX280シリーズに比べ、最大2倍以上に向上したグラフィック性能
筐体前面に4つのLEDで、ハードディスクの動作状態やネットワークの接続状態、16種類の障害状況をLED表示する「ダイレクトディテクトTM 」による高い管理性

【入門サイト】
AppleScript入門教室（掌田津耶乃氏）
ttp://www.h5.dion.ne.jp/~tuyano/AppleScriptTutor/index.html
AppleScript Lab（狩野正嗣氏）
ttp://www.drycarbon.com/applescript/
AppleScript Beginner's（JinJin氏）
ttp://homepage.mac.com/jinjin/applescript/
AppleScript PARK（大串敏史氏）
ttp://homepage1.nifty.com/ton_b/index.html
AppleScriptサンプル（Okamoto氏）
ttp://www.asahi-net.or.jp/~va5n-okmt/factory/applescript/sample_code/index.html
Apple Scriptの覚え書き（水沢和彦氏）
ttp://www.kiwi-us.com/~mizusawa/penguin/html_hint/applescript/script_memo.html

【さらに詳しく】
AppleScript Developers [英語]
http://www.apple.com/applescript/developers/

Xcode Tools(Developer Tools)をインストールしている場合
/Developer/ADC Reference Library/documentation/AppleScript/あたりにドキュメントがあるかもしれません。

生きてるリンクを前スレから拾ってみた。
-------------------------------
AppleScriptリファレンス--古いけどAppleScripterの聖典
ttp://store.sbpnet.jp/isbn/1011/preface.html
ちゃらんぽらん
ttp://www1.odn.ne.jp/~cge02410/index.html
藤棚工房別棟 −徒然−:Unicode textとstringについて
ttp://blogs.dion.ne.jp/fujidana/archives/109436.html

>do shell scriptを使う人は全員ここを読んだ方がいいよ。非常によいドキュメントです。
>というか、読まないとマトモに使えないでしょう。
do shell script in AppleScript
http://developer.apple.com/ja/technotes/tn2065.html
shText Readme.1st(シェルスクリプトのお勉強)
ttp://www.tsden.org/takamiti/shText/

★その他★
・mi　スクリプト書きに便利なエディタ
AppleScript、Perl、C言語、その他色々の言語に便利な機能が付いたエディタ。
ttp://www.mimikaki.net/

・AmScriptsCMX
コンテキストメニューにスクリプトメニューを追加。
ttp://www5.wind.ne.jp/miko/mac_soft/contextual_menu_x/pgs/AmScriptsCMX.html

>AppleScript で日本語（ファイル名とか）を扱うとき
>UnicodeUtils.osax ってのが非常に便利っす。
UnicodeUtils OSAX
ttp://www.bekkoame.ne.jp/~iimori/sw/UnicodeUtilsOSAX.html
-------------------------------
OSAXは使ったことないのでどなたかよろしく。

田中求之先生のサイトにOSAXの情報があります
Web Scripter's Meeting
http://mtlab.ecn.fpu.ac.jp/webcon_resources.html
トップページ
http://mtlab.ecn.fpu.ac.jp/

>>5
あ、どうもありがとうございます。

>>1
乙

>>1
乙
何やら前スレよりもずいぶん情報が増えてるね
miでアップルスクリプト書けるのなんてすっかり忘れてたよ

これもテンプレとして貼っとこうかな。このスレの人には既出かもしれないけど。

スクリプトメニューからスクリプトを実行したときに
最前面(System Eventsの下)のアプリをアクティブにする方法。
ttp://mtlab.ecn.fpu.ac.jp/webcon.mtxt$040606222701.html
ttp://homepage.mac.com/travellers/blog/C746134881/
ttp://homepage.mac.com/kaoru_ari/iblog/C53887262/E235447630/index.html

Safariで保存したwebarchiveからURLを取り出すドロップレット。たぶん10.4以降。

on open dropItems
set urlList to {}
set fileName to {}
repeat with theFile in dropItems
if (theFile as string) ends with "webarchive" then
tell application "System Events" to set webMainResourceRecord to (value of property list item "WebMainResource" of property list file (theFile as string) as record)
set theURL to |WebResourceURL| of webMainResourceRecord
set urlList to urlList & theURL
tell application "Finder" to set fileName to fileName & (name of theFile)
end if
end repeat
if urlList is {} then return
set stringList to (item 1 of urlList) as string
repeat with i from 2 to (number of items of urlList)
set stringList to stringList & return & (item i of urlList) as string
end repeat
tell application "Finder" to display dialog "webarchiveファイルの元URLを取り出しました。" buttons {"cancel", "クリップボードへ", "ブラウザで開く"} default button 3
set buttonReturned to (button returned of result)
if (number of items of urlList) is 1 then
doItRightNow(buttonReturned, urlList)
else
chooseList(buttonReturned, fileName, stringList, urlList)
end if
end open

on doItRightNow(buttonReturned, urlList)
if buttonReturned is "クリップボードへ" then
set the clipboard to (item 1 of urlList)
else
open location (item 1 of urlList)
end if
end doItRightNow

on chooseList(buttonReturned, fileName, stringList, urlList)
tell application "Finder" to choose from list {"すべて"} & fileName default items {"すべて"}
if result is not false then
if (item 1 of result) is "すべて" then
if buttonReturned is "クリップボードへ" then
set the clipboard to stringList
else
repeat with theLoc in urlList
open location theLoc
end repeat
end if
else
set theResult to (item 1 of result)
repeat with i from 1 to (number of items of fileName)
if theResult is (item i of fileName) then
if buttonReturned is "クリップボードへ" then
set the clipboard to (item i of urlList)
else
open location (item i of urlList)
end if
exit repeat
end if
end repeat
end if
end if
end chooseList

あ、URLというのは保存したページの元URLのことです。
Property List Editorでwebarchiveを開いて
Root>WebMainResource>WebResourceURLから
手作業で取り出すこともできます。

乙

彼

特定のフォルダ内にあるテキストファイルをそのたびに違う語句で内容検索してファイルを
選びたい。
Tigerのスマートフォルダで検索条件を保存して、以下のスクリプトを書きました。

tell application "System Events"
open alias "保存された検索条件のパス"

tell process "Finder"
tell window 1
tell group 1 of group 2 of group 1 of splitter group 1
try
click button "編集"
delay 1
tell text field 1 of group 1
-- ？？？
end tell
end try
end tell
end tell
end tell
end tell

これで検索語句の入力欄(text field 1)が表示され、

set value of text field 1 of group 1 to "XYZ"

で、検索語句をスクリプトで直接設定することはできています。が、
text field 1 がタイピングを受け付けるようにフォーカスを移動させ、
古い内容を全選択する方法がわかりません。

set focused of text field of group 1 to true
では駄目だったし。どう書けばいいのでしょうか？

わからんので display dialog で代替とか

>>17
ないのかなあ。結局、iKeyのショートカットを併用する方法に逃げてしまいました、とさ。

小ネタ。サービスメニューが使えないマカー用。などのアプリで、選択したテキストをgooDictに渡す。
tell application "System Events" to set frontApp to (name of (path to frontmost application))
tell application frontApp to activate
delay 1
tell application "System Events" to keystroke "c" using command down
delay 1
tell application "System Events"
if (text of (the clipboard)) is not "" then
set theWord to (text of (the clipboard)) as string
tell application "gooDict" to activate
tell process "gooDict"
set value of combo box 1 of window 1 to theWord
keystroke "e" using command down
(*
EtoJ→ keystroke "e" using command down
Japanese→ keystroke "j" using command down
JtoE→ keystroke "e" using {shift down, command down}
*)
end tell
else
return
end if
end tell

最初にクリップボードの中身を捨てて、
中身が空じゃなくなるまで何回か再試行するって方がいいんでは?
昔、同じようなのを作って動作が不安定だった。

こんな感じですか？

set the clipboard to ""
set x to 0
tell application "System Events"
repeat until ((the clipboard) is not "") or (x = 10)
delay 1
keystroke "c" using command down
set x to (x + 1)
end repeat
end tell
the clipboard

ちなみに
if (text of (the clipboard)) is not "" then
というところは
「クリップボード内容がテキストだった場合のみ以下を実行」
のつもりで書いたんですけど
""でなくて{}と書くべきでした。
さっき気づいたorz。

パスを取得するCM

AmCopyPathCMX
ttp://www5.wind.ne.jp/miko/mac_soft/contextual_menu_x/pgs/AmCopyPathCMX.html

PathSnagger CM
ttp://www.versiontracker.com/dyn/moreinfo/macosx/13672

デスクトップをftpアップロードするスクリプト
on idle
set UserName to "name" ---アカウント名
set UserPassword to "password" ---パスワード
---FTPサーバ名/ユーザ名/リモートディレクトリ、最後に"/"をつける
set FTPaddress to "f999.aaacafe.ne.jp/public_html/"

set thePDFName to "screencapture" & ".pdf"
set thePNGName to "screencapture" & ".png"
do shell script "cd $HOME/Desktop; screencapture " & quoted form of thePDFName
do shell script "cd $HOME/Desktop; sips -s format png " & quoted form of thePDFName & " --out " & quoted form of thePNGName
do shell script "cd $HOME/Desktop; rm -f " & quoted form of thePDFName

tell application "URL Access Scripting"
activate
set fullPath to ((path to desktop) as text) & thePNGName
set FTPURL to ("ftp://" & UserName & ":" & UserPassword & "@" & FTPaddress)
upload file fullPath to FTPURL replacing yes with progress without binhexing
quit
end tell
return 20
end idle

>>24
同じスレを見て、ちょうど同じものを作ってたんですがw
自分は最後のアップロード部分だけcurlで書きました
do shell script ("curl -T " & jpgpath & " -u " & username & ":" & passwrd & " " & ftpaddress)

しかし、何だかキンタマっぽくてアレな感じ

Finderで項目名をコピーしてSafariで検索しようとすると
濁点、半濁点が一文字として数えられてしまう問題で
clipboard as text (as string) とすれば解決できることをさっき知ったので
ついでにそのまま検索できるようにしてみました。

tell application "Finder" to activate
set the clipboard to ""
delay 1
tell application "System Events"
tell process "Finder"
set x to 0
repeat until ((the clipboard) is not "") or (x = 10)
keystroke "c" using command down
set x to (x + 1)
delay 1
end repeat
end tell
end tell

set keyword to (the clipboard) as text
set the clipboard to ""
set the clipboard to keyword as text

tell application "Safari"
activate
open location "http://www.google.com/search?client=safari&rls=ja-jp&q=" & keyword & "&ie=UTF-8&oe=UTF-8"
end tell

>濁点、半濁点が一文字として数えられてしまう問題
これって普通のプログラムでもかなり具合悪い問題なんだよね。
ファイルネームから取り出した文字列を比較したりすると色々と困ったことになる。

>>27
それはプログラムのバグ、Unicodeを勉強しましょう。
Normalizeするか専用APIを使わないとUnicodeは正しく比較検索で
きない。バイナリ比較ではダメ

保守しようにもネタがないので
UI Element Inspectorのリンクでも貼っときますね(*´･ω･)(･ω･`*)ﾈｰ
http://www.apple.com/applescript/uiscripting/02.html

ほしゅ

(* クリップボードのテキストの各行をURLとしてブラウザで開くスクリプト *)
on run
set clipTexts to every paragraph of ((the clipboard) as text)
set URLList to {}

repeat with clipParagraph in clipTexts
if (clipParagraph as string) is not equal to ("" as string) then
if clipParagraph starts with "ttp:" then
set clipParagraph to "h" & clipParagraph
else if not (clipParagraph contains "://") then
set clipParagraph to "http://" & clipParagraph
end if
set URLList to URLList & clipParagraph
end if
end repeat

tell application "System Events"
repeat with aURL in URLList
activate
set dialogResult to display dialog "Open as URL..." default answer aURL buttons {"キャンセル", "スキップ", "OK"} default button 3
if button returned of dialogResult is "OK" then
try
open location ((text returned of dialogResult) as string) with error reporting
on error e
beep
display dialog "失敗しました：" & return & return & (e as Unicode text) buttons {"OK"} default button 1 giving up after 3
end try
end if
end repeat
end tell

end run

も一個のスレで書くべきかと思ったんですが。。
GUI Scriptingについて
ある程度詳しく解説したサイトとか本とか無いですか？

スレ趣旨と全然ちがってしまうんですが、現在
「伝言課長」
ttp://homepage.mac.com/yukikun/dengon_kacho/
というスクリーンセーバーを見つけて試行錯誤してます。
geektoolのスクリーンセーバー版、それも、geektoolがシェルスクリプトなのに対して伝言課長はAppleScriptでいろいろなことをするようです。

やりたいことは二つあります。

AppleScriptを介してシェルスクリプトやターミナルコマンドを実行させこれを伝言課長で表示。
もうひとつは、AppleScriptで、指定のテキストファイルを読み、それを伝言課長で表示させる。
どちらにしてもAppleScriptはさっぱりわからんので、
'ここにターミナルのコマンドを書く'
'ここにシェルスクロプとのパスを書く'
'ここに表示させたいテキストファイルへのパスを書く'
っていうのを含め含めた形でtel application 〜のところから教えていただけないでしょうか？

>>34
そのソフトをDLしてみないと細かい事はわかりませんが、
とりあえず下記URLの所を熟読してください。
ttp://developer.apple.com/ja/technotes/tn2065.html

伝言課長のサンプルで「cal」の結果を表示するスクリプトが設定されてますね。
その「cal」の部分を入れ替えるだけでだいたいOKなんじゃないかと思います。
（と確認せず無責任な事を言ってみる）
伝言課長の使い方自体は付属のドキュメントを読んでください。

do shell script "cal"
おわり

>>37
do shell script "top"
みたいにプロンプトが帰らないものは、死ぬね。
システム環境設定のスクリーンセーバー呼び出すだけで固まっちゃうからちょっと焦った。

つかぬ事をお聞きしますが、10.3とか10.4のスクリーンショットのフォーマットってどうなってるの？
10.2でスクリーンショットを日付時刻のファイル名のJPEGに変換するスクリプト作ったんですけど、
実用としてもスクリプトのサンプルとしても、今更需要ないですよね？ｗ

10.3 PDF
10.4 PNG

10.4はPNGかあ。かっこいいですね。でも容量ちょっと大きいですか？
一応載せます。何て事はないOSAX頼りのスクリプトですが。。

--スクリーンショットをファイル名が日付時刻のJPEGに変換するドロップレットです。
--与える画像はQuickTimeで読める形式ならいいみたいです。
--フリーウェアのGraphicsImporter OSAXを使います。
--10.3以降だと純正でImage Eventsというのがついてくるらしいのでそれを使う方がいいかも。
--OS9でも使えると思います。
--sdt(date型データ)はdate型のデータを与えると短い日付文字列を返すサブルーチンです。記載省略。

on open olist
tell application "Finder"
activate
repeat with obj in olist
set obj to (obj as string)
set newNm to (characters 1 thru -((count ((name of file obj) as string)) + 1) of obj as string) & my sdt(creation date of file obj) & "ss.jpg"
giconvert file obj type "JPEG" quality 50 image file newNm
end repeat
delete olist
end tell
end open

プレビューで変換すりゃいいじゃん。

>>42
一個ずつ変換するのが面倒になったもので。。

ちなみに。。
もう一個のスクリプトスレに書いてますが、
最初はプレビューをGUI Scriptingでｺﾝﾄﾛｰﾙしようとしたんですが、
セーブダイアログのシートをどう操作するかわからずあっさり手詰まり。
で、こうなりました。
GUI Scriptingも覚えたいんだけどなー。。けっこう敷き居高いです。

覚えるほどには使わないので必要になったら
いちいち一から調べなおす漏れは負け組

あー。僕も触らない時は全然触らないですし、
いつもAppleScriptリファレンスで調べながらやってますよ。
後、過去の自分のコードが頼りかな。
ゼロからってのはちょっとやってられません。

ただGUI Scriptingについては基本的なやり方自体がまだよくわかってないんですよね。
わかりやすい教科書みたいなものがあるといいんだけどなー・・。
フォーサイトのUI Browserはちょっと高過ぎます。

GUI Scriptingだからって他のAppleScriptの記述とそんなに変わらん気がするけどな

これ↓とSystem Eventsの用語説明のProcesses Suiteの項目見ながら書けば何とかなると思うが
http://www.apple.com/applescript/uiscripting/03.html

はげましtksです。
いじってたら何となくわかってｷﾀ━━━━━━(ﾟ∀ﾟ)━━━━━━ !!

UI Element Inspectorの画面の１番上の
階段状に出てるのが今ポイントしてる部品の親子関係？で、
それをofでつないで行けばその部品を表せるんですね。

そして、１番下のActionの項目がその部品に対して行える事。

ただしUI Element Inspectorの画面で
「PopUpButton」なのがAppleScriptでは「pop up button」だったり、
「press」が「click」になってたりするので注意が要りますね。

UI Element Inspectorでcommand + F10した時に出るもう一つのパレットは何？？
部品に命令を送ってみたりできるのかな？？

名前が付いてなくて番号もわからない部品はどうやって操作したらいいんだろう。
絶対座標でｸﾘｯｸはしょぼいなあ。

普通のスクリプトと違って予想外の事が起きた時などに
スクリプトで拾えるメッセージが返ってこないので
エラー処理が難しそうですね。

例えば、「保存」ボタンを押した後、同名ファイルが存在していて
上書きするか問い掛けるダイアログが出たとしても、
スクリプトから感知できない。
あらかじめ調べておかないといけませんね。

--Finderで選択している複数の画像（ｽｸﾘｰﾝｼｮｯﾄのPDFも含む）を
--プレビューでJPEGに変換するスクリプト。
--Jaguarではベータ版のSystem Eventsが必要。

tell application "Finder"
set olist to selection
end tell

repeat with obj in olist
tell application "Preview"
activate
open obj
end tell

tell application "System Events"
tell application process "Preview"
pick menu item 8 of menu 3 of menu bar 1
tell sheet 1 of window 1
click pop up button 1
pick menu item 3 of menu 1 of pop up button 1
click button "保存"
end tell
pick menu item 5 of menu 3 of menu bar 1
end tell
end tell
end repeat

スレ違いかもしれませんが、
スクリプトつかってiPhotoのアルバムを順番にスライドショーさせることってできないでしょうか？
教えて下さい。

補足です。
複数のアルバムやムービーを順番に繰り返し自動で映してくれるようなスクリプトはどこかにないでしょうか？
「start slideshow」「stop slideshow」を使うとできそうな気がするのですが、スクリプトを書いた事がないのです。
どなたか教えて頂ければ助かります。

全然レスついてないね。。
iPhoto使ってないからよくわからんのだよなー。
画像登録してないし。。

OSXになってからアップルスクリプトを使ってないので
仕様変更についてけません。

itune4.9からファイルタイプがMPEGだと読み込めなくなってMp3に変える必要ができました。
on open AAA
tell application "Finder"
repeat with BBB in AAA
set creator type of BBB to "TVOD"
set file type of BBB to "Mp3"
end repeat
end tell
end open

これだと5行目でエラーと言われるんですがどうすればいいでしょうか。

よーわからんけど、ﾎｹﾞﾎｹﾞタイプって4文字じゃないの？

>>54
MP3のファイルタイプはMPG3。

>>55
という事で久々にファイルタイプとクリエータを調べるスクリプトなんてのを
Xcodeで作って、調べてみた。w

>>54
iTunesで作ったMP3ファイルを調べたら
クリエータが　hook　でファイルタイプは　MPG3　だったよ。

リロードしてなかった・・・。
orz

あれ？iPhotoって完全に市販ソフトになったんだっけ？
試そうかと思ったけど俺のTigerには入ってないや。

>>59
バンドルされてたバージョンなら只
それ以外はiLife買わないとダメ。

>>54
>>55氏の指摘するとおり、最後の一文字の半角スペースが足らない。
「Mp3 」

>>61
>>56,57
？？？

あらほんとだ。ファイル検索したら『Mp3 』のもいくつか出てきた。
全部iTunesじゃないファイル。

"Mp3"→"Mp3 "にしたらできました。ありがとうございました。
ついでにちょこっと修正してみました。

on open AAA
tell application "Finder"
repeat with BBB in AAA
set CCC to name of BBB as string
if (creator type of BBB is "TVOD") or (creator type of BBB is "hook") then
set creator type of BBB to "TVOD"
set file type of BBB to "Mp3 "
else
display dialog "『" & CCC & "』" & "は音声ファイルじゃないかも？" buttons {"無視して変更", "除外して続行"} default button 2
set DDD to button returned of result
if DDD = "無視して変更" then
set creator type of BBB to "TVOD"
set file type of BBB to "Mp3 "
end if
end if
end repeat
end tell
end open

へぼい英語もどきでもいいし、
日本語のローマ字書きでもいいから
変数名、ルーチン名は、意味のある言葉にした方がいいよ。
（ここに掲載するために書き換えたのかもしれないけど）

tell BBS "にちゃんねる"
　　tell board "新・mac"
　　　　tell thread "おもろい、めずらしいアップルスクリプト発表会 6 "
　　　　　　make new response with properties {content:"保守", name:"", mail:"sage"}
　　　　end tell
　　end tell
end tell

擦れ違いですが、適当な場所が見つからないので失礼します。

OS8.6にてスクリプト編集プログラムでスクリプトを保存する際に
「スクリプティングシステムに接続できません。スクリプティングシステムが
正しくインストールされているか確かめて…（略）」の様なアラートが出ます。

ＣＤからアップルスクリプトをカスタムインストールもしたのですが変わらずです。
何が原因なのでしょうか。

クレ厨質問で恐縮ですが、ご指導、ご誘導おねがいします。

よくわからんがOSごと再インストールしてみるのが一番早いのではないかと

>>67
まああれだ。地味に
・機能拡張マネージャや手作業で非標準の機能拡張やコンパネを排除
・デスクトップの再構築
やって、駄目なら

・標準のユーティリティーや市販のソフト（ノートンディスクドクターなど。ただし必ずOSのバージョンに合った物を使う事！）でHDDのメンテ
やって、それでも駄目なら

・システム再インストール
だろうな。

スクリプティング機能拡張など関連ファイルが正しい場所にあるか試したりカスタムインストール時にログ取って確認したりしてもいいけど、面倒なわりに実りは少ないだろう。

旧Mac OSのいいところの一つは健康なシステムのバックアップと
それを再び使用する事が簡単な事。
まっさらなシステムに最低限必要なものをインストールしていって
これなら健康に動くというシステムができたら、
丸ごとCDに焼いたりして保存しとくといいよ。

お手上げ状態なので教えて下さい。OSX環境。

ドロップレットで、
1.フォルダとファイル(混在可、複数可)をドロップすると
2.下の階層も含め、すべてのファイルについて
3.ファイル名の拡張子に応じてタイプ、クリエータを固定値(自分がいつも使うものをスクリプト中に書き込んでおけばよい)に変える
(1)が「複数ファイルをドロップ」のものは作ってある。再帰呼び出しを使うんだろうけど調べてもよく分からない。

その作ってあるものを晒せば手直ししてくれる人がいるかもしらん。

>>68 >>69

結局OS再ｲﾝｽﾄｰﾙで直りました。罵倒されるのも覚悟の上の
質問だったんですが、親切なアドバイスありがとうございました。

>>70
うあー。これまた懐かしいなあ。ｗ

Tigerたんでスレが立っちゃった鳶さんのサイトのAppleScriptのコーナー見てみそ。
再帰関係は詳しいよ。

細かい話だけど。

パンサー以降のバージョンのSafari（Shiiraも同じ）で
AppleScriptからURLを取得するとUnicode？になるらしくて
不都合が出る事がある。
iconvで変換しようかとかいろいろ考えてうまく行かなかったんだけど、
考え改めて「as string」したら解決しました。

同じ事で悩む人が居るかもしれないので書いておきます。

tellする対象がまちまちなので、ハンドラでなく、includeだとかrequireみた
いな感じでスクリプトを展開するだけの記述をしたいのですが、この場合はど
うしたらよいでしょう。

script objectを使うのかと思ったのですが、ほしい効果をもたらしてくれるも
のではなさそうです。呼び出し元のその時点のtell対象に、呼び出したスクリ
プトを機能させたいのですよね。

うーん。。Cとかほとんどわからないのでそっちの概念で書かれてもわからないです。ごめんなさい。

ハンドラでだめな理由がよくわからないです。
具体的にどういう事をやろうとしてるのかもうちょっとわかれば。

今までのものと改変中のものをアップロード。
「wwwwwwwwww.net/」に ファイル 146、パスワード as
わかる人は教えてください。

>>70
entire contents じゃダメなの？

落とすのめんどい。
ここに晒せ。

>>77
てか、〜のサイトを見てみたら？ってレスしたんだから、
見たのかどうかくらい書いてくれるとうれしいんだが。

>>76
ハンドラの中では、再度tellする対象を指定しないといけないじゃないですか。
呼び出し元でtell対象が変化するので、そのときどきのtell対象を継承したい
ということです。ハンドラの引数に、tell対象も入れるようにすればいいわけ
ですけど、面倒なんで。

set i to 1
tell app "bar"
　repeat 10 times
　　tell item i of bb of cc
　　　my hoge(it, foo)
　　end tell
　　set i to i + 1
　end repeat
end tell

on hoge(myit, foo)
　tell myit
　　method foo
　end tell
end hoge

うーん、これでいいのだろうか!?
これでよきゃ、問題無いなあ。(Linux Zaurusからカキコ)

自己レスです。
itを使えば簡単に引き継ぎ可能ですね。
下記は意味の無いサンプルですが。

tell app "Jedit4"
repeat with i in documents
tell i
set bb to my aa(it)
end tell
end repeat

on aa(myit)
tell myit
return name of it
end tell
end aa

言われる前からそこは読んでいた
それでもそこからの変え方が分からなかったんだよね

だから、ここに晒せって。

相手の言うことには答えないくせに
自分の知りたいことだけ教えろ的な態度はよくないよ？

なんか工房臭がぷんぷんするね

実のところ何も出来てない（誰かにほぼ丸ごと作って欲しい）から晒せないんでそ

自分の書いたコードをみんなに批評してもらいたいので書いてみますた（非再帰版）

on open dropped_alias_list
　
　tell application "Finder"
　　
　　set target_refs to {} -- サブフォルダの中身も含むすべてのドロップされた項目のリスト
　　
　　(* ドロップされた項目のリストを作成 *)
　　repeat with an_alias in dropped_alias_list
　　　if the class of the item an_alias is folder then
　　　　set the end of the target_refs to the folder an_alias -- 無駄な処理
　　　　set the target_refs to the target_refs & the entire contents of the folder an_alias -- (A)
　　　else
　　　　set the end of the target_refs to the item an_alias
　　　end if
　　end repeat
　　
　　(* 作成したリストのすべての要素に対してクリエータ設定 *)
　　repeat with an_item in target_refs
　　　if the class of the an_item is not folder then -- (A) でフォルダもリストに入るから...
　　　　(* クリエータを設定する処理（略） *)
　　　end if
　　end repeat
　　
　end tell
　
end open

横入りしてスマソ。

TigerのXcodeでPerlを組み込んだスクリプトを作ってるんだけど、
どうもエスケープがうまくいかないです。
スクリプトエディタ上だとoption + 円マークで出るバックスラッシュでうまくいくんだけど、
Xcodeにそのままコピペしてもおかしくなる、、

と、ここまで書いてて思い出した。
どっかで文字コードいじらないといけないんでしたっけ？

property Str : ""
property adr : ""

display dialog "表示したい場所を入れてください" & return & "例：東京" & return & return & "半角スペースで絞り込み検索が出来ます" default answer Str buttons {"Cancel", "OK"} default button 2
copy the result as list to {Str}

adr = "http://map.hatena.ne.jp/?type=satellite&word=" + Str + "&.submit.x=0&.submit.y=0"

open location adr


単純にope locationを使ってStrに入れた地名をはてなマップで表示するスクリプトを作ったのですが、どうしても
「http://map.hatena.ne.jp/?type=satellite&wordをnumberにできません」
と出てしまいます。
propertyで前と後ろの指定したアドレスを変数に代入して、同じように+で組み合わせても一緒でした。


どうすれば正常に動作するのでしょうか？

文字は&で結合

set c to "a" & "b"

>>90
ありがとうございます。+を&にして、open locationの後を改良したら表示されるようになりました。

スクリプト晒させておいて放置って、
お前らなかなかやるな(w

そもそもここは質問スレではない。

ttp://homepage1.nifty.com/ton_b/tips/Reference/Plural.html

>>92
晒し方もあまりにもアレなんで
いっそ全部作ってからくれてやろうかと思ったが
自分の作業もあるんで後回しになってた。
期待させてもつまらんので何も書かなかった。

ていうかねえ。
OS Xの場合は拡張子に合わせたタイプ・クリエータの変更だったら、
findとSetFileを組み合わせた方が簡単なんだわ。
速いし、再帰なんかも考えなくてもいいしね。
ターミナルからでも短い記述で済むからいいんだけど、
AppleScript StudioでGUIつけてもいいし。

■例
find . -name "*.txt" -print0 | xargs -0 /Developer/Tools/SetFile -c JED3 -t TEXT

説明：カレントディレクトリ以下の「.txt」を含むファイル名のファイルを
クリエータ「JED3」、ファイルタイプ「TEXT」にする。

これをdo shell scriptで呼び出すようにして、
拡張子とクリエータとファイルタイプの部分を変数にすればいいわけやね。

$ zsh
% /Developer/Tools/SetFile -c JED3 -t TEXT */*/*.txt

マニア御用達？zshｷﾀー!!
それって項目数とか階層が増えてもぜんぜん大丈夫ですか？

>>95
一個抜けてた。
AppleScriptに組み込むつもりだったらディレクトリの指定の部分も変数にしないとだめやね。

>>98
多分大丈夫だよ。さいきてきにどんどんいくので。
SetFileはしらなかったよ。

>>99
そうですか。
find xargsを使ったやり方は処理数オーバーになったりするのを
自動的に防止してくれるらしいです。

SetFileは漏れはターミナルコマンドポケットリファレンスとかいう本で知りました。
Developer Tools限定じゃなくて標準搭載にしてほしい便利なアイテムですね。

>>87ありがとう。とりあえず試したけど問題なく行けてる気がする
>>95せっかくだけど今の自分には分からない。でも憶えておくよ。ありがとう。
>>79逆にその気をなくしたよ

87は別の人だったのか。。
よく読んでなかったぽ。
orz

いつの間にかScript Debuggerが3.0.9にアップデートしてるね。
Tiger対応したとある。あと、SpotlightのImporterも出てた。
Script Debuggerのスクリプトをインポートできるプラグイン。

小さくて見えない文字は直ったんだろうか。

いまAutomator AppleScript Actions Tutorialを見てるんですけど、

set number_to_choose to (|numberToChoose| of parameters) as integer

のようにbindingからkeyを取得する書式で、保存する度に"|"の部分が
勝手に消されてしまいます。
変数名に"|"を入れる際には、何か特別な工夫が必要なのでしょうか。

ん、チュートリアルからのコピペで入力するとうまくいく場合もあるようで
…よくわからん

2バイト文字を変数に使うための方法だったと思う

set |あ| to "abc"
display dialog |あ|

ASCII文字だけの場合、確かにコンパイラが消す場合と消さない場合があるようだね

予約語とバッティングするような変数名を使いたい時にも使う。

set |set| to "abc"

すげー懐かしい。

全アプリケーションのウインドウ名を得るにはどうすればいいでしょうか
最前面のアプリのウインドウ(s)は取得できましたが、全アプリとなるとロウレベルな部分へのアクセスが必要なのでしょうか

>>106-107
ありがとうございました。
なんとなくわかったような気がします。

set a to (|numbertochoose| of parameters) as integer　→消える
set a to (|numberToChoose| of parameters) as integer　→消えない
set a to (|NUMBERTOCHOOSE| of parameters) as integer　→消えない

case sensitiveな変数名が外部から渡されるような場合に使うのですね。

>>109
こんなの？

set window_list to {}
tell application "Finder"
set app_list to name of every process whose visible is true
end tell
repeat with theapp in app_list
try
tell application theapp
set theapp_list to (name of every window whose name is not "")
end tell
set window_list to window_list & theapp_list
end try
end repeat
choose from list window_list

>>111
ありがとうございます。このようなものを求めていました。

7/29に、FaceSpanがLate Night Softwareに買収されとった!

http://www.facespan.com/fs4/index.html

Late Night SoftwareからFaceSpanから販売する準備をしてるところだと。

FaceSpanって今でも使ってる人いる？

懐かしいなー。
最近どっかのスレのスクリーンショットであれっぽい菱形（というか角で立った正方形）のアイコンを見てちょっと思い出したところだった。

しかしだ。AppleScript Studioのある今、FaceSpanの存在意義は？

>>115
Classic OSとかかな？
Dialog Dirctorで代用できるかもしれないけど。

AppleScript Studioでは不完全な形でしかできない(少なくとも自分が試した限
りでは)Global Floating Windowが簡単にできることとか。

今後はScript Debuggerとの連携強化によって、生産性が高くなる気がする。
文字さえ大きくなれば!!

いっそのことIDEとして統合を図っていって、「SK8」の復活を目指してほしい。

って「SK8」ってどんな塩梅だったの?

SK8あったねー

新ウインドウ開くタイプのネトゲ等でアドレスバー・ブックマークバー、
ステータスウインドウを無効にされた時アクティヴにするスクリプト

tell application "Safari"
activate
tell application "System Events"
keystroke "l" using command down
keystroke "b" using {command down, shift down}
keystroke "/" using command down
end tell
end tell

へー。スクリプトで隠されてもメニューから復活できるんだ。
そのネトゲがMozilla系でできるかどうかわからないけど、
Firefoxならあらかじめ、JavaScriptでアドレスバーとかステータスバーを隠すのを禁止する事ができるよ。

>>120の一行目の「スクリプト」って、JavaScriptの事です。
どうでもいい書き込みスマソ。

>>120
Win環境のIEとかなら無理だったりするらしい。ソース閲覧不可とかありえませんね。
火狐はｲﾝﾀｰﾌｪｲｽがあまり。。なのでSafariマンセーかな

>>119のはただの低レベルGUIコントロールなのでこのスレ的にはふさわしくありませんが、
まあひな形として

ショートカット入力させるだけでもいろいろ便利になりますね、AppleScript

アプリケーション（例えばiTunes）が現在起動中かを if文 で判別する方法を教えてください

>>123
tell application "Finder"
if "iTunes" is in (name of every process) then
log "Yes."
else
log "No."
end if
end tell

>>123
tell application "System Events"
if (name of processes) contains "iTunes" then
display alert "起動してる"
end if
end tell

>>124-125
ｷﾀ━━━━(ﾟ∀ﾟ)━━━━ｯ!!
thx

近頃、おもしろくも、めずらしくも無いな

子供相手にそうカリカリすんなや。

某所でスリープを感知して動作するスクリプトを見つけたんだが、
どんな仕組みでやってるのかな？
サイトに書いてある事によると、idleハンドラを10秒周期で回して
スリープから復帰する時に背後で行われる作業かなんかを調べてるっぽいんだけど。

AppleScript以外で作られた同様のユーティリティーと比べて
性能とかシステムへの負荷とかどうなんだろう。

あとそのスクリプト、色つきの半透過のウインドウを出すみたいなんだよね。
そのやり方も気になる。display alertって、普通にそんな事できるの？？
フォントもスタイル付きだったし。

>>129
×：スリープを感知
○：スリープ解除を感知

Gなんとかっていうのを入れるんじゃなかったっけ。
要はウインドウを出すだけのソフト。

某所とか言われてもな

>>131
そうなの？
アプリケーションバンドル形式だったからパッケージ開いてみたけど、
それっぽいものが見付からなかったんですよね。
その部分だけCocoaか何かで書いてるのかなあ？？

>>132
情報としては上記の説明で充分と思ったんで晒すのもどうかと思ったんだけど、
別に隠す事でもないか。ぴよまるソフトウェアさん。
要望出そうかと思ったら連絡先がないみたい。

>>133
ども、ダウンロードしてみた

＞色つきの半透過のウインドウ
Okaeriのパッケージ内にnibファイルがあるけど、
普通にCocoaのウィンドウを透過表示してるだけみたい

スリープ感知で一番簡単な方法としては、on idleで10秒毎に時間を記録しておいて
前回の記録との間が10秒より有意に大きければ、途中でスリープした可能性ありと
判断できるかもね（他にも複数の方法を併用してるようだけど）

一見アプリケーション形式のスクリプトに見えるけど
icnsにアプリケーション形式スクリプトのアイコンを使ってるだけであって
実態は普通のAppleScript Studio製Cocoaアプリだと思う

>>134,135
AppleScript Studioで、半透過のウインドウって簡単に作れるんですか？

> 時間を記録しておいて〜
はっはーなるほどー。

Objective-Cのクラスを使う形で実装するようだよ。

call methodですか〜。使えるようになりたいなー。

そういうのに便利なCocoa APIのリファレンス本ていうか、
そういうのないですかね？
・・・日本語で。ｗ

>>136
通常のウィンドウを半透明にするだけなら、単にset alpha valueすればいいんだけど
ウィンドウ枠を持たない、いわゆる不定形ウィンドウはcall methodを使うみたいね
「AppleScript Studioでゼンマイびゅんびゅん!!」に作例が載ってたよ
>>138
oomoriさんとこのCocoa APIリファレンスには
call method用の構文も載ってて便利

ごめん、call methodは使ってないや
IBでウィンドウにCuntom Classを適用するだけでいいようだ

Custom Classね

しかし自分もたいていソース非公開だから言えたもんじゃないが
スリープ解除感知とかいう有用なノウハウは公開して貰えると
とてもうれすぃ。
まあそれ用のハンドラがAppleのほうで用意されるのが一番いいんだろうけど。

>>139-141
情報ありがとうございます。
そうか。ゼンマイびゅんびゅんシリーズは一通り買ってるつもりだったけど、
Studioで〜は買ってなかったかな。買おうかな。
ネット上の掌田さんの記事にもちょこっとそれっぽい事に触れてあるんですけどねー。

>>139
いっそ誰か（どこか）金出して
oomoriさん中心でAppleScriptで使うためのCocoaの本を出してくれたりしないものか。。
AppleScriptリファレンスとかも労力に見合うほど売れてなかったりするのかなー。。

Products　[CD販売中]　AppleScript Studio秘伝書CD v2.0 （ShareWare）
AppleScript Studioでアプリケーション開発を行う際の、さまざまなノウハウをまとめたCDです。

なるほどぴよまるソフトウェアさんはそういうの売ってるのね。
ちゃっかりしてらっしゃる。w
FAQ眺めるとなんかこう、おいしそうなのからえーこれで金取るのってまで混ざってるな。w

けっこー初歩的な質問ですが。。

非公式？だけど便利なハンドラ「on reopen」がありますが、
（既に起動中のアプリのアイコンをドックでクリックした時などに実行）
AppleScript Studioでこれの代わりになるハンドラってなんでしょうか？
File's Ownerのactivated？

>>145
on reopen そのものがどこかにあった気がする。

ほんとですか？
コンパイルは通るんですけどね。。

Mac OS Xになってから、AppleScriptでは金払わないとcgi書けなくなっちゃっ
たんですね。せめてosascriptがユーザwwwでも普通に動くといいんですが。

sudoで動かそうとしたけどパスワード入力で止まっちゃって無理だった。

echo "
" | sudo osascript -e "set aa to 1"

偽RD-Styleを目指してEyeTV 200用のcgi試しに書こうとしたとです。

>>148
そりは困った事ですね。
Web Scripter's Meetingのほうとかでいいアイディアをおもちの方がおられませんかね。

Jon's Commandsって、OSX版が出てたんですねー。
キー入力の検出ができたりするみたい。

ファイル名の中の一文を置き換えるようなスクリプトってどうすればいいでしょうか？
名称未設定OSX.txt→名称未設定OS9.txt

みたいなのを大量に処理したいんですが。

正規表現じゃないならAppleScript's text item delimitersでできそう。

on replaceText(inText, inOld, inNew)
set OriginalDelimiters to AppleScript's text item delimiters
set AppleScript's text item delimiters to {inOld}
set workData to text items of inText
set AppleScript's text item delimiters to {inNew}
set workData to workData as string
set AppleScript's text item delimiters to OriginalDelimiters
return workData
end replaceText
set theText to my replaceText("名称未設定OSX.txt", "OSX", "OS9")

OS XならPerlとか呼び出せばかなり複雑な事もできるね。

>>151
そもそもファイル名の取得と変更の基本的な事はわかってるのかな？
>>152さんのはテキスト置換部分だからそれにちょっと付け足せばいいんだけど。

set 変数 to name of 〜　で現在の名前を取得。
set name of 〜 to 変数　で名前を付ける。

あと複数処理ね。
ドロップレットにするかFinerのselectionで選択対象のリストを得る。
repeat with 変数 in リスト
を使って一個ずつ処理する事になるね。

~~~~~~~~~~~~
結果が欲しいだけならAutomatorでもできるよ。
リネームソフトもあるし。

>>152ありがとうございます。
on replaceText(inText, inOld, inNew)は使い方がよく分からなかったので
（なんかドロップレットの中で使うと？エラーがでます）
↓結局こうなりました。


set kara to text item delimiters of AppleScript
set motonamae to name of hensuu
set text item delimiters of AppleScript to sakujo
set sakujogonamae to (every text item of motonamae)
set text item delimiters of AppleScript to tuika
set name of hensuu to sakujogonamae as string
set text item delimiters of AppleScript to kara

○(外に出す)
------------------------------
on open
end open

on replaceText()
end replaceText

×(ネストしない)
------------------------------
on open
　on replaceText()
　end replaceText
end open

Script Menu.menuというのをクリックすると右上のバーにスクリプト項目が表示されて、
そこからScriptを実行したりできるわけですが、
ドロップレットのかわりに、ファイルを選択してそこから実行するようにするにはどうすればいいでしょうか？

on run
tell application "Finder"
set sentaku to every item of selection

みたいにやってみたんですが、どうもうまくいきません。

>>156

on run
tell application "Finder" to set |Finder選択項目| to selection
tell me to open |Finder選択項目|
end run

on open |開く項目リスト|
repeat with |項目| in |開く項目リスト|
display alert (|項目| as Unicode text)
end repeat
end open

>>157 ふーん、そういう書き方があるのだね。勉強になる!!

--Finderで選択中のファイルをDropStuffで圧縮
--iKeyでキーボードショートカット付けると便利

tell application "Finder"
set myFinderSelection to selection
repeat with I in myFinderSelection
tell application "DropStuff" to stuff (I as alias) format StuffIt to my myGetDesktopFolder()
end repeat
end tell

on myGetDesktopFolder()
tell application "Finder"
return (desktop as alias)
end tell
end myGetDesktopFolder

>>157
日本語変数かよｗ
懐いぜ。

>>158
何でそういうサブルーチン作って分けてるのか
いまいちわからんのだけど。
不必要じゃないか？
むしろリピートの中で一々サブルーチン呼んでたら速度低下とか色々あるでしょ。
デスクトップフォルダの場所が知りたいだけなら
リピートの外で一回実行すればいいだけで、分ける必要もないと思うが。

HDDのスクリプト溜めの中の全然別のスクリプトから切り出してきたのでそうなっ
てんだ。

それにしてもなあ。
切りだし元の書き方に汎用性がないって事にもなるし。
まあ直せるならいいけど。

Finderで複数の項目を選択して、それらのアイコンを削除し、
表示をデフォルトに戻すスクリプトを制作していただけませんか？

大量のjpgファイルにサムネイルがついてしまい、なおかつ、そのサムネイルが汚くて
非常にまいっています。よろしくお願いします。

動かなくてもいいからまず自分で書いてみなよ

>>162
http://www5.wind.ne.jp/miko/mac_soft/automator_actions/pgs/ZapResourceForksAMA.html
http://www5.wind.ne.jp/miko/mac_soft/contextual_menu_x/pgs/AmZapForksCMX.html
では駄目でAppleScriptがいいの？

いいえ、これでもかまいません。ありがとうございましたー
サンプルをちょっといじってみたら、自分の書いた文章がアラートとして表示されました。
軽く感動。スクリプト、ちと勉強してみます。

>>162

on open A
tell application "Finder"
repeat with B in A
set icon of B to {}
end repeat
end tell
end open

こういうこと？

ちょっと質問です。
マイク入力でスリープを解除させるようなスクリプトは可能ですか？

>>167
無理。スリープ状態では普通のｱﾌﾟﾘｹｰｼｮﾝは停止するし。
そういうのはスクリプトの仕事ではない。
（仮に元々そういう設定が隠し設定としてシステムに存在していて
　ｺﾏﾝﾄﾞﾗｲﾝから設定できるとかいう場合ならスクリプトでどうにかなるけど）

>>167 あんたこれ作りなさい。「チャイムコードへ」、とある先にキーボードつなぐ。
CtrlとかCommandとかOptionとか、いつ押しても問題無いキーを押させる。
http://homepage1.nifty.com/ddd/31-chime/31-oto-chime.htm

Wake On LANというセンもあるけど。省エネルギーのオプションを参照。

↓Cで書かれたwolクライアント。玄箱でもMacでもコンパイルできた。
http://www.gcd.org/sengoku/docs/wol.c
↓wol解説
http://www.rtpro.yamaha.co.jp/RT/docs/wol/wol.html

wolだとマジックパケットを送るマシンと、マイクからの入力をあれこれするプ
ログラムが必要になるから本質的な解決にはなってないね。

そうか、スリープしてたら普通アプリはとまってるよね(w
あっはっは。
ハード組んでまでやりたいことじゃないので・・・ちょっとハードはパスだに〜。

サーバーにしてるノートがあって、リビングに鎮座してるので時計でも表示させようかなと。
で、大抵はスリープしてるんで手拍子で時計起動しないかな〜とね。
画面スリープだけなら可能性あるかな？
可能だとしてマイク入力をイベントとして処理できますかね？

スクリーンセーバーみたいなものを起動させておいて
音に反応させるのは可能なのでは？
まあそれもAppleScriptじゃなくて Objective - C でどうぞって雰囲気だけど。

音に反応するアプリとかって昔ありましたよね。
ふーふーすると風車が回るやつとかはけっこう新しいやつでしたっけ。

>>169
チャイムの代わりに簡単な稼働部品をつけて
マウスでもつつかせればスリープは解除できますね。ｗ
こういうの作れる人になりたかったなあ。

>>178 ポーリングして値を見てやらんといかんでしょ。
http://developer.apple.com/documentation/QuickTime/INMAC/SOUND/imsoundinput.19.htm#pgfId=775
QuickTime Audio
　Sound Input Manager Routines
　　SPBGetRecordingStatus
　　　meterLevel: Integer;

Pythonでは/Mac/Modules/sndでいけるっぽい
http://mail.python.org/pipermail/python-checkins/2002-August/028921.html
PerlもMac-Carbon使うといけるみたい
http://search.cpan.org/src/CNANDOR/Mac-Carbon-0.74/Sound/Sound.xs
REALbasicでもSPBAudioLibっての使うといけたらしい
http://support.realsoftware.com/listarchives/realbasic-nug/2000-07/msg02737.html

0-255のintが返ってくるから、閾値を設定して最初のループで認識後、次のルー
プで閾値以下に戻ったのを確認して、さらに次のループで何秒以内にもう一度
入力があったらGO!みたいな感じに処理するといいと思うが。

SpeechRecognitionServerを使う手もあるね。でもこれ日本人にはきつい。
これ使うぐらいならハード作った方がましだと思う。
http://developer.apple.com/ue/speech/applescript.html

>>171 キーを押すということは電気を通すということだから、
この先に電気で動かすスイッチであるSSRとかフォトカプラを置けばいいのよ。
キーボードを改造する必要はあるけど。

ああ昔内蔵マイクに向かって一生懸命
「What time is it now ?（ほったいもいじくるな！）」って言ってたさｗ

>>157
ありがとうございます。でもalertのところで
end of line と書くところに
identifierがあります。
とかいうエラーがでてしまうようです。
そのままでは使えないと言うことでしょうか？

>>174
display alertは10.3からかな？10.4からかな。

alertをdialogに書き換えたらOKのはず。

>>175
できました！ありがとうございます。

擦れ違い（本当はDTP板で聞く話なんだろうけど人少なそうだから）ｽﾏｿ

OSX、インデザインCSでテキストの流し込み作業を行っているオペです。
大量に支給されるテキストファイルの中にwindows由来のものがあり、
改行コード（CR/LF）のLFが邪魔なのですが

「AppleScript's text item delimiters」使ってLFだけ削除することって
可能でしょうか？
選挙の日に初心者質問で申し訳ないですが、アドバイスお願いします。

たとえば「dos mac 改行 変換」でググると幾つか見つかるけど

open for access で delimiterをascii character 12にしてリストとして読み、
as textでテキスト変換するとか。あるいは伝統的手法でAppeScript's text
item delimitersを ascii character 12にするとかやろうとしたけど、これっ
てなんかうまくいかないね。

このスクリプトがまさにそのもの。
http://www.vector.co.jp/soft/mac/util/se183050.html

ソース読んだけど、一つ勉強になりました。
猫は去ってスクリプトを残すか。

{return & "
", return, "
"}

これでCRLF, CR, LFのリストになるなんて仏様でも知りますまい。

>>177
できるよ。
LFはASCII character 10だから頑張ってみて。

おおっ、いきなり回答そのものが！
ＤＴＰのスクリプト初心者には、質問の場が少なくて困ってたのです。

ともあれ
>>178　>>179　>>180
どうもありがとう

AppleScript StudioではCRLFが定義されてるんだけど、
スクリプトエディタでコンパイルし直さないといけない事になったりで、
結局いつも自分で変数crlfStrを定義している漏れ。

ドロップされたファイルの拡張子が「.tar.gz」だった場合に「.tgz」、
「.tar.bz2」だった場合には「.tbz」に変更するスクリプト書いてくれませんか？

>>183
拡張子だけ勝手に書き換えちゃってええのんか？

-->>183
--拡張子を変えるだけなら

on open dropItems
tell application "Finder"
repeat with anItem in dropItems
set theName to name of anItem
if theName ends with ".tar.gz" then
set name of anItem to my replace(theName, ".tar.gz", ".tgz")
else if name of anItem ends with ".tar.bz2" then
set name of anItem to my replace(theName, ".tar.bz2", ".tbz")
end if
end repeat
end tell
end open
to replace(theText, replaceStr1, replaceStr2)
set oldDel to AppleScript's text item delimiters
set AppleScript's text item delimiters to replaceStr1
set theText to every text item of theText
set AppleScript's text item delimiters to replaceStr2
set theText to theText as string
set AppleScript's text item delimiters to oldDel
return theText
end replace

>>183
せっかくだからautomatorかなんかで挑戦してみりゃいいのに。

>>185
おぉ、これで.tarが無駄に出てこなくなる。thx

拡張子によってそんな違いあったっけ？
OSのBOMB？で解凍するとき？
ドラッグ＆ドロップするんだったら直接解凍ソフトにドロップしてもいいよね。

Finderで選択している音楽ファイルを、ファイル名の逆の順番にiTunesに追加するスクリプト書いてもらえませんか？
一度に追加するのはAutomatorでできるんですけど、これだと追加する順番が決められないのです。

>>189
自分で書けよ

一応発表会スレであって
スクリプト書くのが面倒だからヒマな他人にタダで書かせるスレ
じゃないんだが

油断して、初級クレクレ厨の相手をすると
そのうち上級クレクレ厨がきて収拾が付かなくなる恐れがありますので。。

そうはいってもアップルスクリプトなんて今１から勉強するには環境整ってなさ過ぎ。
文法やパラメータまともに解説してるとこなんてないし、
俺も一応簡単なものは書くけど未だに辞書の見方よくわからんぜ。
そういうのを解決するために作ったのがAutomatorだったんだろうが、あれも結局ASに頼り過ぎで
ﾊﾞﾘﾊﾞﾘ使うなら最初からスクリプト書いた方が楽＝誰もアクションなんて作らない

リストを逆順で処理するのは>185の一部をかえる場合次のようにする
repeat with theIndex from (count (dropItems)) to 1 by -1
set anItem to item theIndex of dropItems
display alert anItem
end repeat
あとはiTunesで開けばいいんじゃないかな？

>>192
皮先みたいなﾔｼはそうそう居ないから心配するな。(w
ま、一人でも十分迷惑ではあるが。(w

　

>>194
Finderから渡されるselectionのリストって、ディレクトリエントリ順か、ア
イコンの座標順でなかった? カラムモードだけはファイル名順にならんだっけ
な。だから最初にソートしないといけない。10.4のFinderはsortがあったはず
だけど、それ以下だと自分でソートするハンドラ書かないといけない。

on maxSort(aList)
copy aList to theList
set sum to count theList
repeat with i from 1 to sum - 1
repeat with j from i + 1 to sum
if item i of theList > item j of theList then
set temp to item i of theList
set item i of theList to item j of theList
set item j of theList to temp
end if
end repeat
end repeat
return theList
end maxSort

ソートするハンドラ
藤棚からのｺﾋﾟﾍﾟ

名前順だったらTerminalコマンド使ってのソートもできると思う。
ネットのどっかで拾ったけど、どこだったか忘れた。
ひょっとすると海外か？だとするとこのスレ経由かな？

自分のスクリプトからその部分だけコピペしてみる。
ハンドラとかになってないし、何か自分でもよくわからん事してるけど。。
どうも名前のリストのテキストに対して行のソートの処理をしてるみたい。
変数theListに最初に項目のリストが収まってる。

set oldDelims to AppleScript's text item delimiters
set AppleScript's text item delimiters to {ASCII character 10}
set listString to (theList as string)
set newString to do shell script "echo " & quoted form of listString & " | sort -f"
set newList to (paragraphs of newString)
set AppleScript's text item delimiters to crlfStr
set newString to (newList as string)
set AppleScript's text item delimiters to oldDelims

瑣末な質問ですが・・・

Finderでselectionを使うとき、name of selection ってすると、選択してるファイルの
名前がリストで返ってきますよね?　
でも、selectionを変数に入れて name of my_sel とかってするとエラーが出ます、よね?
あと、name of (item 1 of my_sel)　や、name of (item 1 of selection)　は、両方ちゃんと
ファイル名を取得できますが、name of (every item of my_sel)　は、
name of (every item of selection)　と違って、エラーが出ます・・・よね?

この違いは、どうして出てくるんでしょうか?
使ってて特に問題はないんですが、気になったもので・・・AppleScriptの仕組みを
よく分かってないので、もし「んな初歩的な事も知らんのかｺﾞﾙｧ！」って話だったらｽﾏｿ＆
ご教示おながいしまつ m(_ _)m

アップルスクリプトじゃなくてシェルスクリプトなんだけど
何か一つ手元に参考書が欲しいと思って、本屋に行ったら
入門風の薄い1,800円、翻訳本の2,800円の２冊を除いて
あとの５〜６冊は全てどの本も2,200円。
陰謀のにおいがしました。

漫画しか買ったこと無いの?
技術書としては市場が大きく類書が多いジャンルだから安い方だろ。
大体お前『バガボンド』の総部数と『シェルスクリプト入門』の部数を想像し
てみな。下手すっと4000倍違うぜ。

4000個作る量産品とワンメイクの特注品の価格を想像してみな。

『バガボンド』は読んで何が残る? 宮本武蔵になれるのか? 『シェルスクリプ
ト入門』は、読んだら明日からシェルスクリプトマスターになれるかもしれん
ぜ。お前の将来の職につながる知識になるかもしれん。

俺も昔は金無かったからお前の気持ちは分かるが。
まだ若いなら漫画買う金節約して自分を磨け!

技術書にも糞と名著があるから、Amazonとか関連スレを参考にして買うといい
ぞ。糞に当たると本当に損する。

>>202
そうじゃなくて、「価格が同じ」ことに着目してるんぢゃないのかな？

>>201
それはあれだ。ナンバーズか何かをその番号で買えという虫の知らせだよｗ

シェルスクリプトの本は逆引き500とかいうのがMac OS Xの事も載ってそうだしおもしろそう。
同じシリーズのターミナルコマンドのやつも使えるコマンドあった。

>>200
10.4.2で実験してみたんだが、
そもそも
name of selection
ができなくなってるっぽい。

このへんはAppleScriptの仕様はわりといい加減っぽいので
あまり気にしないほうがええんでないかなあ。。

複数参照形式のなんたらは直接じゃないとだめらしいってのは
AppleScriptリファレンスにも確か書いてあったな。
元ネタは野本夏俊さんだっけ？

一度地元の図書館に行ってみようw
Mac関係はPhotoShop系以外は割と借りやすい。
リクエストしたら購入してくれる所もあるし。
当たり外れが結構あるからなぁ。

>>205
試して頂いてｱﾘｶﾞﾄﾝです。最近は name of selection でもダメなんですね。
ひょっとしたら何か厳密なルールがあるのかと思ってますた・・・
あんま気にせずにやっていきますw
複数参照形式についても参考になりました。リファレンス買おうかな

>>207
とんびさん（TigerたんWidgetの作者の人）のサイトのTipsのとこ見たら何か書いてあったような。

>>208
tips/basic/の「複数参照」のところですね。ｱﾘｶﾞﾄです。(鳶嶋さんのサイト、困った時に
よくお世話になっているんですが、肝心なトコを見落としてました orz)

＞難点らしい難点は(略)、パスによる参照のリストには対応していない場合が多いこと
って部分が、読んでみて正に当てはまってる・・ように思いますた。

>>200で頭をひねってた件って、つまり
・旧Mac OSのFinder等が持ってる「selection」は、単に「パスによる参照のリスト」を返すだけでなく、
　(珍しく?)複数参照が可能なおかげで、「name」などの属性を一括して閲覧・変更することも出来る

・それは「selection」を直接扱う場合のみ可能で、変数に入れると、結果({file"○○"~,file"××"〜}など)
　だけが代入されてしまうために?、「selection」の神通力が失われた、単なる「パスによる参照のリスト」
　になってしまい、複数参照が出来なくなってしまう

・・・みたいな感じ・・でしょうか。

長々と素人勝手な憶測ｽﾏｿです＆情報ｱﾘｶﾞﾄﾝです！

10.4だと

name of (selection as alias)

ってやらないとだめだよね。

複数選択したものを変数に入れるときは

set x to selection
name of ((item 1 of x) as alias)

とか。

>>210
鳶嶋氏の話だと、元々selectionで複数参照できるアプリ自体少ないみたいですし、
10.xになって、Finderもそっちの方へシフトしちゃったんでしょうか。
支障はほとんどないだろうけど、少し不便になってるみたいですね。

あ・・・関係ないですが>>209のやつ、変数に(a reference to selection)を入れれば
(とりあえず旧Mac OSでは)selectionと同等に使えますね orz ｷﾂﾞｲﾃｶﾅｶｯﾀ・・ｱﾎﾀﾞ・・

ん？うちの環境がおかしいのか？

>>210
tell application "Finder"
name of (selection as alias)
end tell

ってやると、「〜をタイプaliasに変換できません」というエラーになるんだが。
10.4.2で、スクリプトエディタ上で実行。

as alias listだと、「name of 〜 を取得できません」となってだめ。

あと>>210の後ろのスクリプトだが、
一個の名前を取り出すだけなら、
tell application "Finder"
set selectionList to selection
name of item 1 of selectionList
end tell

でいいはずだけど？

ドロップレットってコンパイルしなきゃ使えませんか？

OpenOffice.org の開発者の人たちが、 X11 アプリである OpenOffice.org が
書類にアイコンをつかえて、Drag & Drop を受け付けられて、 X11 の
自動起動もできるようなアプリケーションバンドルを作りたいために、
AppleScript で起動スクリプトを書いているのですが、 (なんか変な日本語だな)

Make の中で使っている osacompile が、実行時に WindowServer を必要とするんですよ。
これは ssh などを使ってリモートでビルド作業をするのにちょっと都合が悪いんです。

CVSでソースを管理しているのですが、手元でコンパイルしてバイナリをコミットしておく、
というのも気持ちが悪い。osacompile がリモートでも普通に使えたら最高ですが、
そうでない以上、テキストのままドロップレット的な使い方ができたらいいなあ、と。

このまま質問で終わるとスレタイに反するので、スクリプト (LGPL) をあげときます。
ttp://www.hakusi.com/up/src/up4498.txt

…自分で書いたものでもないのに勝手に発表して、正直すまんす

>>212
name of (selection as alias) で名前が返るのは選択項目が一個だけの場合。
選択項目が複数で変数を使わないときは
name of (item 1 of (selection as list))
かな？

>>213はそれでいけました。

前に試したときはどこか書き間違えてエラーになったんだと思う。すまんです。

>>216
普通は選択項目が１つでも複数でもエラーが出ないような書き方を探すよね？
確かに選択項目が１つなら as alias つけて名前が取得できるけど、
使い道がわからん。

name of item 1 of (selection as list)
で、選択項目が複数でも単数でもOK.
as listを付ける事で１つだけの項目もリスト形式になるからitem 1 ofが使える。

>>213の書き方も選択項目が１つでも複数でもOK.

キーワードが文脈に依存するのが

>>214
書いてあることの90％理解できないんですが、
run script命令を使えばスクリプトの書いてある
テキスト書類を実行することはできます。
ドロップレットからテキストを実行するというのではダメ？
そういうことでないならスマソ

>>214
AppleScriptでやってるところをCocoaアプリで置き換えるとかしないとどうしようもない希ガス。

>>219-220 の両氏、意味不明な質問に的確に答えていただいてありがとうございます。
小さい、テキスト版スクリプトを参照するだけのドロップレットを準備して、
テキスト版をアップデートしていく、というのがいいかも、と思えてきました。

TigerでFinderとDashboard以外の
全てのアプリを一斉終了させるスクリプトを
どなたか作っていただけませんか？

スレタイを読めないのか？

>>190-192

なんだ、役に立たないなコイツら

面白くないから却下

なんだ、無能極まり無いなコイツ

>>222
なんかくれたら作ってやるよ

>>228
俺の愛をあげよう
クロックが10倍になるスクリプト作ってくれ

>>229
repeat 10 times
tell application "Finder" to open "/Library/Widgets/World Clock.wdgt" as POSIX file
end repeat

上手い！

hosyu

AppleScriptでクラシック環境を起動したいのですが
スクリプトエディタで「記録」を押しても反応しません。
辞書にもないし…。無理ってこと？

tell application "Classic Startup" to activate
辺りで起動するようだが？

quitは効かんようだった。

スレタイが一瞬「おもらし、はずかしい」に見えた。

>>235
半角の同好の士の居るスレに逝け

いらっしゃい

Pantherでスマートフォルダのような機能を
実現したいのですが、フォルダアクションで
保存された検索内容に自動的に飛べるように
すれば可能かなと思うのですが、Finderで
検索結果を保存する方法がわかりません。
板の賢人の皆様どうかヒントを宜しくお願いします。

>238
そんな、検索結果を保存する機能なんて Panther にはない。
AppleScript でどうこう以前の問題。あきらめろ。

スポットライト並みのスピードを求めなければ
mgrep osax のような検索出来る OSAX 使えば出来そうな気もするが。

iPhotoからRAWファイル(.nel)をファインダに表示させる。

iPhotoの外部アプリで編集機能は、iPhotoが現像したjpegファイルの方を開いてしまうので，RAWで管理している意味があまり無い。
"Show Image FIle"等，オリジナルファイルをファインダで表示させるスクリプトは、RAWを表示させようとすると、やはりiPhotoが現像したjpegファイルの方を表示させてしまう。
結局チラシの裏にファイル名をメモしながらオリジナルを探すというアナログ回帰な毎日・・・

という訳でShow Image File を改造して、RAWファイル専用機にしてみました。

RAW+JPEG のように同名異拡張子で取り込まれたり、iPhoto内で複製、または重複取り込みで勝手に枝番が付加された場合でもオリジナルのRAWファイルにたどりつきます。

OSX 10.3.9　 iPhoto 5.0.4で動作確認

↓　　↓

"Show Raw File"　01
tell application "iPhoto"
activate
try
copy (my selected_images()) to these_images
if these_images is false or (the count of these_images) is not 1 then error "一個づつしか調べきらんと"
set this_image to item 1 of these_images
set textName to (image filename of this_image) as text
set textName to my replaceW(textName, ".jpg", ".nef")
set textPath to (image path of this_image) as text
set textDate to (date of this_image) as text
set oldDel to AppleScript's text item delimiters
set AppleScript's text item delimiters to " "
set textDate to text item 1 of textDate
set textDate to my replaceW(textDate, "-", "/")
set AppleScript's text item delimiters to "/"
set libraryName to text item ((count text item of textPath) - 4) of textPath
set AppleScript's text item delimiters to libraryName
set textPath to text item 1 of textPath
set AppleScript's text item delimiters to oldDel
set textPath to textPath & libraryName & "/" & textDate & "/Originals/" & textName

--"Show Raw File"02
try
set this_imagefile to ((textPath) as POSIX file) as alias
on error
try
set changePath to text item ((count item of textPath) - 5) of textPath & text item ((count item of textPath) - 4) of textPath & ".nef"
set textPath to my replaceW(textPath, changePath, ".nef")
set this_imagefile to ((textPath) as POSIX file) as alias
on error
display dialog "RAWファイルじゃなかろごたぁ"
end try
end try

on error error_message number error_number
if the error_number is not -128 then
display dialog error_message buttons {"Cancel"} default button 1
end if
end try
end tell

--"Show Raw File"03
tell application "Finder"
activate
set visible of (every process whose visible is true and frontmost is false) to false
reveal this_imagefile
end tell

on selected_images()
tell application "iPhoto"
try
set these_items to the selection
if the class of item 1 of these_items is album then error
return these_items
on error
return false
end try
end tell
end selected_images

on replaceW(src, tg, rp)
set oldDel to AppleScript's text item delimiters
set AppleScript's text item delimiters to tg
set myList to text items of src
set AppleScript's text item delimiters to rp
set myText to myList as string
set AppleScript's text item delimiters to oldDel
return myText
end replaceW

うぅ・・改行が多いと怒られた(T_T)
素人ですみません

>>238
OS 9のSherlockで検索条件の保存ができたけどねえ。
（俺としてはスマートフォルダよりも便利だったｗ）


>>245
乙。ナニゲにエラーメッセージが方言ｗ

ちょっと小ネタ。Mailで選択したメッセージをiCalに登録するという。
スケジュールの連絡ってたいていメールで来るからイベントのURL欄に
メールを登録するスクリプトを書いてみた。

tell application "Mail"
set selectedMails to selection
set msg to item 1 of selectedMails
set subj to subject of msg
set mid to id of msg
end tell

set mailURL to do shell script "mdfind -onlyin ~/Library/Mail 'kMDItemFSName == ¥"" & mid & ".emlx¥"'|head -1"

set mailURL to "file://" & mailURL

tell application "iCal"
activate
tell calendar 1
set theEv to make event at end of every event with properties {summary:subj, start date:current date, end date:(current date) + 3600, url:mailURL}
show theEv
end tell
end tell

おお、これは便利そうだ！さっそく使ってみよう

純正アプリの連携って事ですげーわくわくするが、
問題は俺にはメールが来ないって事だ。
orz

通販サイトとかAppleのニュースメール購読すればいい

say "She Ne"

ログアウトのスクリプトを作りたいと思い丸二日間格闘したんですが、
全然ウマく行かないんです。シャットダウン、スリープ、再起動は簡単にできたんですが…。
どのように記述したら良いのでしょうか？

まるっきりの素人な質問でごめんなさい。

まず、シャットダウン、スリープ、再起動をどう書いたのか聞きたい

>>253
そうですよね。ごめんなさい。
例えば、再起動はスクリプトエディタでこのように書いて、*.scptで保存しました。

tell application "Finder"
restart
end tell

他の２つは二行目が、Shut DownかSleepにしただけです。
問題は、ログアウトの場合に、この二行目をどう書いたら良いのか分からないことです。
大体、「変数***が未定義です」とエラーが返ってきます。
（何て記述すればいいか分からず、いい加減に書いてるから当然ですよね…。）

>>254
スクリプトエディタでSystem Eventsの用語説明を開くと
Power Suiteにlog outがあるね

FinderのはLegacyに分類されてるから
ログアウトや終了関係はSystem Eventsを推奨ってことかな

用語辞書の見方をご存知ないのでしょうか？
スクリプトエディタのファイルメニューから
「用語説明を開く...」を選ぶとアプリケーションのリストが表示されるから、
操作したいアプリケーションを選ぶと用語辞書が出ますよ。
まあわかりにくいと思うけど。

で、Finderの用語辞書で右上の検索欄などを使ってrestartを調べると
レガシー（遺産、遺物）ってとこに分類されてますよね。
そして同じ分類の中にログアウトに関する記述はない。
つまりこれは昔のスクリプトとの互換性を取るために残してある項目だと思われます。

じゃあどのアプリケーションを見ればいいのかって事になりますが、
System Events.appの用語辞書を見ると
log outという命令がある。
だから
tell app "System Events"
log out
end tell
でいいと思います。詳しくは自分で調べてみてください。

かぶった上に無駄に長かった…。

orz ｵﾚﾊﾓｳﾀﾞﾒﾀﾞ

>>257
通りすがりのものですが、丁寧ですごく参考になりました。
applescriptって256に書いてあるようなことがわからなくて
敷居が高い感じがしていました。ありがとう。

>>254-255
なんて厳しくも優しいレスなんだ。
目から汗がとまらん。
ぶわっ！！ってなってるよ、ぶわ！！って。

ちなみに、なんで今更ログアウトのスクリプトかと言いますと、
DashboardのiStarterっていうwidgetをどうしても使いたくて。
でも、持ってるOSは10.3で、konfabulatorしか使えないから作るしかなくて…。
でもおかげで、イメージ通りのやつを作ることができました。
ホント、丁寧に教えて頂きましてありがとうございます。

↑アンカー間違えました。>>255-256です。
駄レススマソ。

すみません、質問です。

HyperTalkで「set cursor to busy」みたいなコマンドがあったじゃないですか。
AppleScriptで、ちょっと時間のかかる操作をするとき、
カーソルをbusyにしたいんですが、どうすればいいのでしょうか？？？

カーソル変える命令はたぶんない。
プログレスバーなら出せると思う。

Jon's Commands X
ttp://www.seanet.com/~jonpugh/
の set cursor to

>>262-263
ありがとごじゃました。

１分置きにチンコと表示出来るスクリプトを作っていただけませんか？大至急お願いします。今月以内で。

>>265
http://aploda.org/dat2/upload48114.zip

(´°∀°）

質問です
MacOS9が単独で立ち上がってる時と
Classic環境として立ち上がっているのを
切り分けるスクリプトって書けますか？

なんに使うかというと、OS9の起動項目に入ってるソフトが
Classic環境の時にエラーを起こすので
それをClassic環境で立ち上がらないようにしたいのですが…

Classic用の環境を作ってそれぞれのイメージを使い分ければ問題ない

すね毛

>>269
そこ以外は9で立ち上げてもClassicでも同じにしときたいんです。
だから「もしOSXが動いていないなら」
tell application ~
て書いて起動項目につっこんどけばいいのかなと。
でもできないのか…

>>268
OS 9環境がないので試してないがこんなんでどうかな

tell application "Finder"
if (version as string) starts with "10." then return
end tell

delayがCPUを食い潰すバグが10.4.3でやっと解消されたという話だ

>>272
tell application "Finder"
if (version as string) starts with "10." then
else
tell application "IP Messenger 1.33r2"
activate
end tell
end if
end tell
起動項目につっこんで上手くいきました
?ｫ！

>>268
set isClassic to false
try
set isClassic to system attribute "bbox" has 1
end try
参照
http://developer.apple.com/ja/qa/ov/ov03.html

すみません、ググり回ったのですが見つからないので質問させて下さい…
date型の日付の書式はOSの日付の書式設定によって変動しますが
（日本語なら2005年11月21日月曜日、英語ならMonday, November 21, 2005といったように）、
OSの日付書式設定が何になっていようと、常にエラーを出さずに指定できる日付の書式というのは
存在するのでしょうか？

某所で「26Oct99」という形式なら大丈夫、という記述を見かけたのですが、
どうも情報が古いようで、実際試してみると言語によってコンパイルエラーが出たり
エラーは出ないものの変な日付に変換されたりで、残念ながら使い物になりません。

出力じゃなくて入力の書式を一つに決めたいの？

情報不足ですみません、入力です。

>>276,278

何をどうしたいのかイマイチよく分からんが、以下のように書いてみた。
1行目のダイアログに「2005.11.22」とか「05 11 22」とか入れたけど、どれでも
以降のdate作成は成功して、3行目のダイアログで「2005年11月22日火曜日 0:00:0」と出たよ。
書式設定は変えてない。こういうことじゃないのかな？

set dateText to text returned of (display dialog "Input date" default answer "2005/11/22")
set theDate to date dateText
display dialog "Date" default answer (theDate as string)

何であれ『AppleScript Language Guide』
http://developer.apple.com/documentation/AppleScript/Conceptual/AppleScriptLangGuide/
http://developer.apple.com/documentation/AppleScript/Conceptual/AppleScriptLangGuide/AppleScriptLanguageGuide.pdf
のdateの箇所(PDFだと62ページあたり)を読んでみるといいんじゃないかと。

>>279
質問者じゃないが、それじゃだめなはず。
問題のひとつは順番で、
アメリカでは月/日/年、ヨーロッパ圏では日/月/年で書くのがデフォルト。
その手の設定になっていると、"2005"が月や日に解釈できずにエラーが起ったり、
"22"が"2022年"と解釈されちゃう。

でも、10.4だと、「カスタム設定はUnicodeアプリだけで…」みたいな注意が、
環境設定で出て、スクリプトだとうまくテストできないなあ(^^;

俺もうまくテストできなかったのでよくわからんが、
例えば「yyyy.mm.dd」っていう風に書式を限定するなら
年、月、日に分解して解釈するようなルーチンが書けないかな？

各国語版を作るほうが簡単な気もするけど。

>>276
OS9だとTanaka's osax使えば簡単だけど、OSXですよね。
それ以前に環境変わるんじゃosax使えないですね。
OSXだとシェルスクリプト?perl?

とりあえず、とんびさんのAppleScript PARK>Tips>Basicに有るこの方法で出来ないでしょうか?
>日付属性の設定方法
>ttp://homepage1.nifty.com/ton_b/tips/Date/SetDate.html
>まとめて属性を設定(その1)
これなら定型日付入力をリストに分解するだけで使えそうです。

最近のバージョンのOSXならISO8601フォーマットが使える。
-- ISO8601 format -> AS date class
"2000-11-16T19:20:00" as <<class isot>> as date
-- AS date class -> ISO8601 format
((current date) as <<class isot>>) as string
http://www.w3.org/TR/NOTE-datetime

おお！ありがとうございます。
最近のバージョンのOSXとの事ですが、これはどのバージョンからかはご存知ないでしょうか？
class isotでググってもたったの4件しか出てこないのでびびりました…

これはAppleEvent Managerの型変換機能を使ってる。OSX10.2のAERegistry.hには
定義があるので少なくとも10.2以降では使えるはず。

簡易ラジオサーバーを作っているのですが、定期再起動の時に再起動後SHOUTCast(UNIX実行ファイル)を実行しようと思い、
tell application "Terminal"
do shell script "cd /volumes/os10.3/library/webserver/shoutcast-1-9-5-macosx/"
do script with command "./sc_serv"
end tell
としても必ず新規窓が作られて一つ目と二つ目のコマンドが別窓で処理されてエラーが返ってきます。
このファイルはただ本体をダブルクリックして実行させても設定データが読み込まれないのでターミナルでの起動をしたいのです。

どうすればiinodesyouka?

つ ttp://developer.apple.com/ja/technotes/tn2065.html

１行で済むな。

ココログのサポートアイコンが酷似している件について

巻き物？っぽいアイコン、けっこう色々使われてるよね。

do shell script "cd パス | コマンド" でいいんじゃないの

>>291
こらこら、ウソを教えるなｗ

|でつなぐのは「パイプ」でしょ。
単に複数の命令を一行で連続して行わせたい時は;でいい。
もう一つ言えばこの場合あらかじめcdで移動する必要もない。
フルパス書いちゃえば済むから。

なるほどorz

>>287のURLを見てみたらセミコロンでつなげられると書いてあったのでやってみたら出来ました。
いろいろとお騒がせしてすみませんでしたorz

今ひとつわかってないみたいね。
・do shell scriptの場合はtell app "Terminal"ではさむ必要はない。

・>>292で書いたように、あらかじめcdで移動せずに
　/Volumes/os10.3/Library/webserver/shoutcast-1-9-5-macosx/sc_serv
　と書けばいいので、１つの命令で済む。セミコロンでつなぐ必要なし。

> do shell scriptの場合はtell app "Terminal"ではさむ必要はない。

そうだったのか！
初めて知った。ありがとう。
いつもターミナルを起動してたよ…

Terminalっていうのは、代替ソフトがある事でもわかるように、
あくまでもシェルとやりとりするための窓口的なソフトなんでない？
do shell scriptの場合直接シェルに働いてもらうわけだ。

do shell script "osascript -e 'tell application ¥"Finder¥" to quit' "

ぎゃは

誰か「無駄無駄無駄無駄」とダイアログが出た後
10秒ほど時計が止まるAppleScriptを作ってくれ。

時計止めるのは無理。だしそういういたずらには加担しないよ。

↑
ユニバーサルアクセスのアレONにして
tell application "System Events"
keystroke "8" using {command down, control down, option down}
end tell
やってもきかないお

読むのめんどいお
ttp://forums.macosxhints.com/archive/index.php/t-37540.html

ほんとだね。コマンド＋シフト＋３もだめみたい。
コマンド＋シフト＋ｓ（別名で保存）は大丈夫。
ひょっとしたら数字キーがテンキーのほうだと判断されてるのかな。
英文は読めない…。

英文は読んでないけどkey code使ったらできた

tell application "System Events"
    tell process "Finder"
        key code 28 using {command down, option down, control down}
    end tell
end tell

set x to NUM
repeat x times
tell application "System Events"
tell process "Finder"
key code 28 using {command down, option down, control down}
end tell
end tell
end repeat

ポケモンショックｗ（やらないように

>>304,305
Finderにtellする必要は無いんじゃないの？
スクリプトエディタ上でしか試してないけど、抜いても動いたよ。

ナ、ナンダッテーな時に実行するといいな

repeat 5 times
tell application "System Events"
key code 20 using {command down, shift down}
end tell
delay 2
end repeat

重い。。(shift+cmd+3)*5

すみません
SILVER KEEPERでバックアップからOSの中身を入れ替えたんですが
だいたいの機能はつかえる(QTproも移植成功）のですが
.Trushが消えてしまいました
つくることはできるんでしょうか
osX 10.3.9です

意味がわかんない。このスレで聞く意味もだけど。

>>309
あるべき場所にフォルダを作って名前を変えてみちゃどうだね。
ちなみにTrushじゃなくてTrashだね。

>>311
ありがとうございました
.Trashの場所か....

場所は知らないのに消えたのがわかるってどういう事だ。
これ以降まだ続くならMac OS X初心者質問スレあたりに移動してね。

すんません
向こうで途中で回答がとぎれたものでして
ゴミ箱に入らずそのままファイルが消えます
「フォルダヘ移動」を教えていただいて
~/.Trashと入力してもでフォルダが見つからないと出たんです

do shell script "mkdir ~/.Trash"

バカか？なら続きを待っとけや。>>314

>>314
俺は移れと言ったぞ。字が読めないのか？
ここに書き込むのはスレ違いなんだよ。スレタイ読めないのか？
迷惑行為やってる事を理解しろ。
とりあえず今すぐ回線切ってケーブルで吊って氏ね。

repeat 100
tell application "Finder"
make new folder
end tell
delay 0.1
end repeat

ライブラリのバックアップをとる簡単なAppleScriptを書いてみた。
tell application "Finder"
activate
make new folder at desktop
set newFolder to result
with timeout of 1200 seconds
set name of newFolder to "Backup"
set targetfile to folder "Library" of home
end timeout
duplicate targetfile to folder "Backup" of desktop
end tell

timeoutの部分を解説していただけるとありがたいです。
何故その部分につけるのでしょうか。

あと、肝腎のコピーの部分ですが、dittoコマンドを使ってうんぬん、
というのがネット上でUsersフォルダのコピー方法としてよく見られるようですが、
Finderでの通常コピーで大丈夫ですか？

dittoもduplicateも「複製」の命令ですが
私の英語力ではduplicateしか思い浮かばなかったので
そう表現しただけです（笑）私も初心者なので。
ただ、duplicate targetfileを使ってLibrary内の
任意のファイルをコピーしようとすると
「アクセス権が云々」とハネられます。
　
私のMacは動作が緩慢なので、ライブラリのコピーに
10分くらいかかります。しかし完了まで時間のかかる
スクリプトは2分でタイムアウトになるので
timeoutで無理矢理20分までタイムアウトのアラートを
出さないようにしてます。使えないことはない
スクリプトですがまだまだ書き直しの余地がありそうです。
もうちょいやってみます。

>何故その部分につけるのでしょうか。

あ、end timeoutはend tellの直前に置いても
良さそう。何故といわれても、それしか思いつかなかったと
言うほかないです（笑

dittoというのはAppleScriptのコマンドではなくて、
Mac OS XのUNIX部分が備えているコマンドです。
Mac OS X用にﾘｿｰｽﾌｫｰｸが扱えるように拡張してあります。
AppleScriptから使うならdo shell scriptで呼び出しですね。
アクセス権の事を考えるとrootログインかsudoで実行したほうがよいのだと思います。

システムバックアップのソフトとして定番のCarbon Copy Clonerというソフトは
AppleScriptからdittoなどを呼び出して実行しているらしいです。

Tigerでrsyncがリソースに対応したとの事なのでrsyncでもいいのかな。
他にもボリューム丸ごとバックアップ用？のasrというコマンドもあるようです。
（ディスクユーティリティーの復元と同等？）

いずれにせようちにはバックアップ用のドライブがないので
今のところ試してませんが。

~/LibraryをFinderでコピーさせるとおそらく不可視ファイルのコピーだとか
アクセス権だとかで不都合が起きるんではないでしょうか。
~/Library/Preferencesや~/Library/Application Supportの
個別のファイル・フォルダをコピーするぶんにはけっこー大丈夫のようですが、
丸ごとバックアップとして後から差し替えて使う、という用途には
Finderでの複製は不安だと思います。

後から差し替えて使うという発想はなかったです。
単に保存できればいいや的な考えでしたから。
dittoはUNIXの単語なんですね。色々勉強になります。

シャットダウンの際、現在ログインしているアカウント以外のアカウントが裏でログインしていたら
管理者権限アカウントならば自分以外のアカウントを強制ログアウトする事ができますが、
AppleScriptからこれをやる方法って無いですかね…
（シェルスクリプトで他アカウントのログインプロセスをsudo killするとか？）

SuperDuper!でFileVaultのかかったアカウントをバックアップする場合、
一旦FVのかかったアカウントから全部ログアウトして、FVのかかっていないアカウントでログインし直し、
そこからバックアップを実行する必要がありますが、
面倒くさくてたまらないのでこれを無理矢理にでも自動化したいのです。

画像圧縮で自分自身のプライオリティー下げたいんですが、 pidが取れません。
しょうがないんで、自分のアプリの名前渡してるんですが、なんとかならないでしょうか？

on renice(theApplicationName, thePriority)
--tell application "Finder" to set theApplicationName to name of current application
tell application "System Events"
--set theApplicationName to name of current application
set i to item 1 of (every process where name is theApplicationName)
display dialog name of i & ":" & (unix id of i) as string
do shell script "renice " & thePriority & " -p " & (unix id of i) as string
end tell
end renice

言ってることがわかんない。pid取れてるじゃん。

自分のアプリの名前渡さずに、って事。

まず日本語で意思の疎通ができるようにしろ。

pidを取るとは何のことかさっぱりわからないから死のうと思う。

>>331
おまいさんは正常だと思うからｲ?｢。

画像圧縮じゃないや、動画圧縮。iPod用とかの。

さてと。次のお題は？

豚トロのおいしい食べ方をAppleScriptを使って示す方法

tell application "豚"

set breed_all to every breed of pig
set tempValue to 0

repeat with theBreed in breed_all
set theUmami to (umami of (toro of theBreed)) as number
if theUmami >= tempValue then
-- set tempValue to theUmami
set niku_best to name of theBreed
end if
end repeat

display dialog "最もトロがおいしい豚は" & niku_best & "です。
購入するお店の名前を入力してください" ﾂ
default answer "××精肉店" buttons {"キャンセル","購入"} default button 2


end tell

...続く...うそw

材料を100通りくらい登録して、ランダムでいくつか選択→それを全て使って料理しなくてはいけないというゲームスクリプト

毎日の献立に悩んでる主婦の方いかがですか

なんでゲームでまで献立に悩まなきゃいけないのかってのが本音だと思うな

ニュートンスクリプトのファイルがいっぱい出てきた

10.4.4でAppleScriptにも何か変更あったらしいんだけど、
詳しい情報がないね。

ほす

質問なんですが
アップルスクリプトで
iTunesなど他のアプリケーションを使わずに
警告音以外の音を出すことはできないのでしょうか？

ピピピと音を出す
say "p p p"

do shell scriptつかってmplayerから

Play Sound - scriptable sound player
http://microcosmsoftware.com/playsound/

tell application "Play Sound"
play 鳴らしたいさうんどふぁいるのpath
quit
end tell

readmeやサンプルも充実している

参考
http://www.remus.dti.ne.jp/~a-satomi/nikki/2003/03a.html#d06n01

↑これはバックグラウンドアプリね

ありがとうございます。
難易度としては
mplayer>>Play sound>=say"p p p"
と言ったところでしょうか。
ためしてみます。

mplayerじゃなくても適当なコマンドライン系のサウンドプレーヤとかさ

>>345おすすめだから使ってみ
mplayerなんて答えはジョーク

標準で採用されれば配布物でも使いやすくなるのになあ。

昨日違うスレで、フォルダの中の変更日より一ヶ月以上経過しているファイルを削除するスクリプトを教えていただきましたが、フォルダの中の一番上層の階層に対しては機能するのですが２番目以降の階層に対しては機能しません。
いろいろ書き換えて試したのですが、うまくいきません。どのように書き直すとうまくいくのでしょうか、勉強不足で申し訳ありませんが教えてください。
昨日教えていただいたところまでのスクリプトは以下です。
on open d_items
del_old(d_items)
end open

on del_old(d_items)
tell application "Finder"
repeat with a_file in d_items
if folder (a_file as string) exists then
set sub_items to every item of folder (a_file as string)
my del_old(sub_items)
else
set cr_date to current date
set md_date to (modification date of a_file)
if (year of md_date) < (year of cr_date) then
move a_file to trash
else if (month of md_date) < ((month of cr_date) - 1) then
move a_file to trash
else if (month of md_date) < (month of cr_date) and (date of md_date) < (date of cr_date) then
move a_file to trash
end if
end if
end repeat
end tell
end del_old

>>351
>if (year of md_date) < (year of cr_date) then
>move a_file to trash
だと年が変わってる場合は一ヶ月経ってなくてもゴミ箱行ってしまう気がする

352さん、
if (year of md_date) < ((year of cr_date) - 1) then
move a_file to trash
else if (year of md_date) = ((year of cr_date) - 1) and ((month of md_date) - 12) < (month of cr_date) then
move a_file to trash
なら年が変わっても大丈夫？

フォルダの中の一番上層の階層に対しては機能するが２番目以降の階層に対しては機能しない問題は未解決のまま、、、。

if (year of md_date) < ((year of cr_date) - 1) then
move a_file to trash
else if (year of md_date) = ((year of cr_date) - 1) and ((month of md_date) - 11) < (month of cr_date) then
move a_file to trash
else if (year of md_date) = ((year of cr_date) - 1) and ((month of md_date) - 11) = (month of cr_date) and (day of md_date) < (day of cr_date) then
move a_file to trash
こうしないとだめですね。

フォルダの中の一番上層の階層に対しては機能するが２番目以降の階層に対しては機能しない問題は未解決のまま、、、。
教えてください。

一ヶ月以上という設定は
if (year of md_date) < ((year of cr_date) - 1) then
move a_file to trash
else if (year of md_date) = ((year of cr_date) - 1) and ((month of md_date) - 11) < (month of cr_date) then
move a_file to trash
else if (year of md_date) = ((year of cr_date) - 1) and ((month of md_date) - 11) = (month of cr_date) and (day of md_date) < (day of cr_date) then
move a_file to trash
else if (year of md_date) = (year of cr_date) and (month of md_date) < ((month of cr_date) - 1) then
move a_file to trash
else if (year of md_date) = (year of cr_date) and (month of md_date) = ((month of cr_date) - 1) and (date of md_date) < (date of cr_date) then
move a_file to trash
ここまでしないとだめですかね？

フォルダの中の一番上層の階層に対しては機能するが２番目以降の階層に対しては機能しない問題は未解決のまま、、、。
教えてください。

単純に date を引き算して差が１ヶ月以上ならとした方が良くないか。

applescript フォルダ 再帰

でググれば幾つか出てくるぞな。それ読め。

set md_date to (modification date of a_file)
set check_date to (current date) - 60 * 60 * 24 * 30
if check_date > md_date then
--move a_file to trash
display alert ("delete" & return & a_file as string)
end if
こうかな。

on open theItemList
tell application "Finder"
my moveToTrash(theItemList)
end tell
end open

on moveToTrash(theItemList)
tell application "Finder"
set theFileList to every file of theItemList
repeat with theFile in theFileList
if ((current date) - (modification date of theFile)) > days * 30 then
move theFile to trash
end if
end repeat
my moveToTrash((every folder of theItemList))
end tell
end moveToTrash

こんな感じかねえ。全然動作確認してないが。

>>359
stack overflowだそうです。

>>358
すばらしい、年が変わっても大丈夫です。

on open d_items
del_old(d_items)
end open
on del_old(d_items)
repeat with a_file in d_items
set theInfo to info for a_file without size
if folder of theInfo then
tell application "Finder"
set checkFiles to entire contents of folder (a_file as string)
end tell
else
tell application "Finder"
set checkFiles to {file (a_file as string)}
end tell
end if
tell application "Finder"
repeat with a_file in checkFiles
if folder is not class of a_file then
set md_date to (modification date of a_file)
set check_date to (current date) - days * 30
if check_date > md_date then
--move a_file to trash
display alert ("delete" & return & a_file as string)
end if
end if
end repeat
end tell
end repeat
end del_old
359のが短くていいけど普通に書いてみた。
daysなんて定数あるんだね。知らんかった

>>362
macのない場所に移動してしまったので明日動作確認させて頂きます。

>>360
あー、my moveToTrash((every folder of theItemList)) の部分は
set theFolderList to every folder of theItemList
repeat with theFolder in theFolderList
my moveToTrash(theFolder)
end repeat
にしないと無限ループに陥ってしまうわ。

Tanaka's osax使えば簡単w

>>362
動作完璧です。
本当にありがとうございました。

とりあえずここの堀江の拳見てみ。まあまあおもろいから。

http://ex13.2ch.net/test/read.cgi/livemarket1/1137564677/1-100

適当に選んだこのスレ、失敗だったな。

自動的に、言語環境をドイツ語に変えてくれるスクリプトを作りたくて
tell application "System Events"
tell application process "System Preferences"
click radio button "言語" of tab group 1 of window "言語環境"
click pop up button 1 of tab group 1 of window "言語環境"
pick menu item "ドイツ語" of menu of
pop up button 1 of tab group 1 of window "言語環境"
end tell
end tell
tell application "System Preferences" to quit
としてみたのですがこれだと並べ替えリストの順序をかえるだけで
だめなのです。。
環境設定の言語環境の言語順の順番をscriptで入れ替えることはできないのでしょうか？

>>342 beep てのがありますよ。

>>327
えらく亀レスですが、echo $$ で自プロセス。echo $PPID で
親プロセスIDがとれるからdo shell scriptで親プロセスを
reniceすれば？

ツンデレ風のAppleスクリプトないかなぁ。
『な、何システム終了なんてしてるのよ!』とか。

>>370
「警告音以外の」って書いてあるやん。

>>371
勝手に作れｗ
あ、そう言えばOS Xにはログイン項目はあるけど、
終了時に特定のアプリを実行するような機能はないのかな。

特定のアプリを実行→システム終了あるいはスリープあるいはログアウトというスクリプトを書いてそれを実行するようにすれば（ry

まあスクリプトに関しちゃそうだけどね。
でもいちいちそれで終了させるのは面倒だぞ。

「スクリプトに関しては」には意味がなかったな。すまん。

スクリプトを常駐させておいて
on quitハンドラで何か処理できんかね

アプリを立ち上げたりするとログアウトがキャンセルさせてしまいそうだが

すいません、スクリプトエディタスレでも質問したのですが
どうも自分の力ではうまくいかないので（向こうのスレの方ゴメンナサイ）
こちらでも質問させてください。

スクリプトエディタでiCalの”データベースのバックアップ…”を
以下の場所に実行させたいのです。

/Volumes/Works/Data(OS9 OSX)/Backup/アップグレード対策1/基本系/iCal

自分では絶対無理っぽいので単刀直入にお願いします。
構文を教えてください！

> すいません、スクリプトエディタスレでも質問したのですが
> どうも自分の力ではうまくいかないので（向こうのスレの方ゴメンナサイ）
> こちらでも質問させてください。

ダメ。不可。レス付いてて進行形だろ。死ね。

ぐゎっ…！
ダメですか……。

「マルチ」でぐぐれ。

つーかそもそもあっちもこっちも同じ人間が見てると思うが？ｗ

ごめんちょっとテストさせて。

まんまバックスラッシュ: �
10進: \
16進: \

まんま円: \
文字: ¥
10進: ¥
16進: ¥

>>369
ドイツ語と日本語を切り替える。

if (do shell script "defaults read .GlobalPreferences AppleLanguages") starts with "(ja" then --先頭がjaならdeに
do shell script "defaults write .GlobalPreferences AppleLanguages '(de, ja, en, fr, es, it, nl, sv, nb, da, fi, pt, \"zh-Hans\", \"zh-Hant\", ko)'" --言語の優先順位
do shell script "defaults write .GlobalPreferences AppleCollationOrder de" --並べ替えリストに使う順序
do shell script "defaults write .GlobalPreferences AppleTextBreakLocale de" --単語区切り
do shell script "defaults write .GlobalPreferences AppleLocale de_DE" --書式タブの日付や通貨など
else --先頭がjaでなければjaに
do shell script "defaults write .GlobalPreferences AppleLanguages '(ja, de, en, fr, es, it, nl, sv, nb, da, fi, pt, \"zh-Hans\", \"zh-Hant\", ko)'" --言語の優先順位
do shell script "defaults write .GlobalPreferences AppleCollationOrder ja" --並べ替えリストに使う順序
do shell script "defaults write .GlobalPreferences AppleTextBreakLocale ja" --単語区切り
do shell script "defaults write .GlobalPreferences AppleLocale ja_JP" --書式タブの日付や通貨など
end if

このやり方で正しいかどうかはわからない。
特に、言語環境パネルの「リストを編集...」で言語を追加したりしている場合は、標準の設定に戻ってしまうと思う。試してないけど。
不可視ファイルに対する変更だし、やるなら ~/Library/Preferences/.GlobalPreferences.plist をバックアップしたうえで自己責任でよろしく。

>>382
何のブラウザで見るかによって結果違うよ？

>>373-377

俺もOS 9の「システム終了項目」みたいなのが欲しかったので作った。
フォルダ　~/Library/ログアウト項目/　を作っておいて、何か入れておく。
下のスクリプトを実行後自動的に終了しないアプリケーションで作成してログイン項目に入れておく。
で、ログアウトする時には、ログアウト項目フォルダに何かあれば開くか聞いてくる。
キャンセルすれば終了してログアウトをキャンセルしない。

on run
return
end run
on idle
return 536870909
end idle
on quit
tell application "Finder"
set itemsAlias to every item of (folder "ログアウト項目" of folder (path to library folder from user domain))
if (count of itemsAlias) is greater than 0 then
try
display dialog "ログアウト項目があります" & return & return & "3秒後に開きます" buttons {"キャンセル", "開く"} default button 1 with icon stop giving up after 3
open itemsAlias
end try
end if
end tell
continue quit
end quit

>>383
本当にありがとうございました！動作ばっちりです〜。

間違えちゃった(ﾉ∀｀)
英語やドイツ語に変更したときは AppleTextBreakLocale を delete するのが正しいみたい。
動作に支障はないみたいだけど>>383は de にしちゃってる。

if (do shell script "defaults read .GlobalPreferences AppleLanguages") starts with "(ja" then --先頭がjaならdeに
do shell script "defaults write .GlobalPreferences AppleLanguages '(de, ja, en, fr, es, it, nl, sv, nb, da, fi, pt, \"zh-Hans\", \"zh-Hant\", ko)'" --言語の優先順位
do shell script "defaults write .GlobalPreferences AppleCollationOrder de" --並べ替えリストに使う順序
do shell script "defaults delete .GlobalPreferences AppleTextBreakLocale" --単語区切り←###訂正箇所###
do shell script "defaults write .GlobalPreferences AppleLocale de_DE" --書式タブの日付や通貨など
else --先頭がjaでなければjaに
do shell script "defaults write .GlobalPreferences AppleLanguages '(ja, de, en, fr, es, it, nl, sv, nb, da, fi, pt, \"zh-Hans\", \"zh-Hant\", ko)'" --言語の優先順位
do shell script "defaults write .GlobalPreferences AppleCollationOrder ja" --並べ替えリストに使う順序
do shell script "defaults write .GlobalPreferences AppleTextBreakLocale ja" --単語区切り
do shell script "defaults write .GlobalPreferences AppleLocale ja_JP" --書式タブの日付や通貨など
end if

実行すると言語の優先順位が「1.日本語 2.ドイツ語」か、「1.ドイツ語 2.日本語」のどちらかに必ずなるので>>369以外で試しに実行してみた人がいたら、手作業で1、2番目の言語を設定し直した方がいいかも。

>>384
円記号かバックスラッシュかどちらかの形で表示されれば
コピペでコンパイルできるはずなのでちょいと試してみたの。
ちなみに383、387はマカエレから円記号をそのまま入力して送信。
Safari、Firefox、IE、BathyScapheからコピペしてみたけど大丈夫っぽい。

ディスプレイだけをスリープさせるスクリプトを作りたいんですけど
コマンドはsleepじゃなく何を指定すれば良いんでしょうか？

ほす

--ディスプレイスリープまでの時間を1分に変更。最後に設定を元に戻す。
set curDRW to paragraph 1 of (do shell script "pmset -g ps")

tell application "Finder"
set plistFile to file "com.apple.PowerManagement.plist" of folder "SystemConfiguration" of folder "Preferences" of (path to library folder)
set plistFile to plistFile as string
end tell

tell application "System Events"
if curDRW ends with "AC Power'" then
set displaySleepTimer to (|Display Sleep Timer| of |AC Power| of ((value of property list item "Custom Profile" of property list file plistFile) as record)) as integer
--↑ここをdefauts readで取得する方法はないですか？
set curOpt to "c"
doPMSet(displaySleepTimer, curOpt) of me
else if curDRW ends with "Battery Power'" then
set displaySleepTimer to (|Display Sleep Timer| of |Battery Power| of ((value of property list item "Custom Profile" of property list file plistFile) as record)) as integer
set curOpt to "b"
doPMSet(displaySleepTimer, curOpt) of me
else
return
end if
end tell

on doPMSet(theTime, theOption)
do shell script "sudo pmset -" & theOption & " displaysleep 1" user name (do shell script "whoami") password "[管理者パスワード]" with administrator privileges
delay 63 --1分3秒待って元の設定に戻す。
do shell script "sudo pmset -" & theOption & " displaysleep " & theTime user name (do shell script "whoami") password "[管理者パスワード]" with administrator privileges
end doPMSet

愚痴っていいか。
on idle
try
tell application "Finder"
set current view of window 1 to column view
end tell
end try
return 1
end idle

こういうon idle系を起動してると、アクティビティモニタが使えなくなるのは
いつになったら直るんだ？

現象をアポーで再現でき、直す必要性を認め、うん、これは直せる、じゃ直そうか、
って思ったすみれの花咲く頃。

>>392
使えなくなるってどうなるの？
試した所特に不具合無さそうだったけど
10.4.4です

>>394
アクティビティモニタのスレッドとかプロセスとかの表示がカラッポになる。
で、そのスクリプトを終了させると即復帰する。

バックグラウンドで回しておきたいようなスクリプトを起動しておいたまま
アクティビティモニタを見ることが出来ないだろう…。

>>395
そうなんだ。
自分の所では表示されてるけどなあ。
見てるとこ違うのかな

>>391
pmset -g disk | grep displaysleep
とかではだめなん?

>>378
これ、どなたか作って頂けませんか？

>398
マルチの人こんばんは。

>>399
こんばんは。
まだ時効になりませんか？

現在進行形で過ちを続けているので時効になるわけないです。

マルチはいかんが、取り組み方も軟弱でいかんと思うなぁ。

せっかくスクリプトを例示してくれたんだから、
> アプリケーション実行専用で保存しようとしたら構文エラーと出ました。
で終わらんでコンパイルか実行してどこでエラーになるか見れよ。

が、ボタンを押すタイミングとかは微妙な加減が要るようで、構文エラー
無くても、100%成功させることもなかなか難しいようだのぉ。

ってことでこれも試せ。
ttp://discussions.apple.com/thread.jspa?messageID=1030720

>>397
十分です！　ありがとうございましたヽ( ﾟ∀ﾟ)ﾉ

>>402
うぉ〜！
これですよ。
パスを書き換えたら望み通りのことができました。
本当にありがとうございます。

>>391

do shell script ("pmset dim 1") password "your_password" ¬
with administrator privileges
delay 90
do shell script ("pmset dim 30") password "your_password" ¬
with administrator privileges

これだけで出来るっぽいけど

>>405
30に設定している環境では30に、
60に設定している環境では60に戻るという感じで、
スクリプトを他人のMacに持って行っても書き換えずに実行できるというのが主旨です。

ちなみに無停電電源は使ったことないので省いてしまいました;;

あ、sudoはいらないとか、pmset dimでいけるという話なら確かにそうみたいですね。
適当にmanしながら書いたので実は良くわかってないですが、
電源アダプタとバッテリが同じ値にセットされてしまうのは場合によっては困るかも。。。

>>351
>フォルダの中の変更日より一ヶ月以上経過しているファイルを削除する

再帰的探索を使わないスマートなやり方

-- 対象フォルダ
set f to choose folder
--３０日前の日付を取得
set d to (current date) - (60 * 60 * 24 * 30)

tell application "Finder"
move (document files of entire contents of f whose modification date < d) to trash
end tell

----------
entire contents でフォルダ内の全ファイルを対象にし、
whose + 範囲限定を使うのがミソ
document files で書類ファイルに限定している

最後に開いたアプリケーションのみ終了させるっていう
スクリプトってできる？アプリケーションの起動ログの
参照先がよく分からない…。

>>408
bravo.
1ヶ月、というのはやはり簡略化出来ないものかな。

>>409
適当に試した所ps -x -wで-psnってのがあるのが普通のアプリっぽいので
それの一番最後のを終了してみるようにしてみた。
古い順に並んでるようなのでソートしてないけど
もしかしたらソートした方がいいかもしれない。
というか根本的に間違ってるかもしれんけど。

編集途中のファイルがあってもいきなり終了。
do shell script "kill `ps -x -w | grep -e '[-]psn_0' | tail -n 1 | perl -ne '/^ *([0-9]+)/; print $1'` "

こっちは確認ダイアログ出る
set theName to do shell script "ps -x -w | grep -e '[-]psn_0' | tail -n 1 | perl -ne '/^ *([0-9]+).*\\/(.*) -psn/; print $2'"
tell application theName to quit

>>408
entire contentsにdocument files ofができるのか。参考になった。

全部 AppleScript で書くと

tell application "Finder"
set theName to name of last item of every process
end tell
tell application theName to quit

こんな感じになるが。
これだと loginwindow とか LAServer といった
終了したら困るものも終了してしまう問題があるかもしれない。

>>412
>every process

every application process whose background only is false

>>412,413
>tell application "Finder"

background only を使うためには
tell application "System Events"
としなければならない（元々 process は Finder ではなく System Events）

ほー、OS 9 以前と同じつもりで Finder を通して process を取得してたが
System Events を通すものなのか。
一度知識を整理し直さなきゃならんな。

>>410
ひと月は30*Daysでいいんじゃないかと。
それよりentire contentsが真っ当に機能するものかどうかが気になる。

>>416
>>362 をよく見たら days 使ってたね

確かに entire contents は項目数が多いと時間を食うし
（今やってみたら 3800 項目で7秒ぐらい ：mac mini 1.4G
>>408 みたいに条件付き検索をするとタイムアウト）
一括動作なので、その間 Finder がビジーになる
OS9 時代は使うのに慎重にならざるを得なかった
（OSX では他のアプリは関係なく作業を続けられる）
それでも再帰ループよりは速いんじゃないかな

>>415
基本であり、既出だろうけど
スクリプトエディタ＞ファイルメニュー＞用語説明を開く…
普通のアプリ以外にも System Events や Standard Addition なんかの
機能も調べられる（テンプレに追加してもいいかも？）

＞確かに entire contents は項目数が多いと時間を食うし
いや、時間じゃなくて取りこぼしがないかどうかという所

俺も取りこぼしが気になる。
再起ループだと項目数増えるとスタックオーバーフローって奴が起きて途中で止まったりしますよね？
entire contentsの場合それはどうでしたっけ？

>>418,419
うふふふ。

何だその笑いｗ

OSXには優秀な日本語解析エンジンがあるみたいですが、
これを利用して漢字の読み仮名を作成する
スクリプトはできないでしょうか？
できれば半角カナで

> スクリプトはできないでしょうか？

知らん。お前が始めろ。

Monzai使ったら？

一応OS9にも日本語解析ライブラリが有りますです。
読み仮名作成できます。
OSAXから利用してます。。

すみません、間違えました。
日本語解析ライブラリじゃなくて言語解析マネージャで
OSAXじゃなくてJLAAというアプリからでした。

ありがとうございます。
monzaiのページを見たら、
アップルサイトに日本語解析の文書があるとのことでした。
英文は見つけたんですが訳文がわからなかったので、
明日探してみます。
ちらっと見たところきっとCarbonLibを叩くんですね・・・

JLAAはOSXでは使えないと思います。
最初に書いてなくてすいません。

スクリプトをファンクションに割り当てるのってiKey使わないと無理っすか？

スクリプトメニューに入れたスクリプトを環境設定＞キーボードの
キーボードショートカットに登録したんですが、
メニューの該当項目の横に「F12」と表示されるものの実行はされませんでした。

ねがわくばiKey無しで実現したいのです。

内蔵HDDの他にiPodのHDDからTigerをブートして
サブっぽく使ってる人向けのスクリプトを作ろうかと思ってる。
要は俺様専用。
　
カレンダー、メール、アドレスブック、ホーム以下を
自動的にそれら２つのHDDで同期する。できたら書き込みまっす。

皮さk（略

>>428
スクリプトメニューの項目は環境設定のキーボードからは設定できないはず。
間違ってたらすまん。

iKeyの何が気に喰わないか知らないが、シェアウェアでやだってんなら
以下で他のソフトを探すがよろし。
http://www.geocities.jp/akamayu2/Pages/mouse.html#keyassign

ディスプレイの解像度を変更するアップルスクリプトを書きたいのですが、
どなたかサンプルをいただけませんでしょうか．．．

CPU切替器を使ってると、起動時やスリープ回復時にディスプレイの自動検出に失敗して
低い解像度にされちゃうことが多いんで、起動項目等に入れて使おうかと．．．

OSのバージョンによって書き方も大分変わると思うが。

最近、自分の環境も書かないﾊﾞｶが多いな。

あ、すみません。Tiger(10.4.4)です。

たとえばこんなん？　AppleScriptユーティリティでGUIスクリプティングを使用可能
にしとく。""の中は日本語環境だと書き換え必要と思う。そこは探ってくり。

tell application "System Preferences"
activate
set current pane to pane "com.apple.preference.displays"
end tell
tell application "System Events"
tell process "System Preferences"
tell tab group 1 of window 1
click radio button "Display"
tell table 1 of scroll area 1 of group 1
select row 9 -- modify this value
end tell
end tell
end tell
end tell
tell application "System Preferences" to quit

動いたけど遅いw そもそも「ディスプレイの自動検出に失敗して」る状況で使えるか
どうかわからん。それ用のユーティリティが無いか探した方が良いような気もする。

>>431
iKeyが嫌っていうか、何も追加せずに実現したかったんですよ。
でも無理っぽいので何か入れてやってみます、ありがとう。

Xkeysは？

>>435
"Display"を"ディスプレイ"に書き換えれば動作した。(MacOS 10.3.9 日本語環境)
2, 3秒画面が水色のまま何も表示されないから、ちょっとビビった。
切り替えつつ、システム環境設定.appを終了させてるからちょっと時間がかかったのかもね。

>>432
AppleScriptで解像度の切り替えを行なう命令は無い。
よって解像度の切り替えは>>435の方法しかない…かも？
Unixコマンドの方で出来るのかもしれないが調べ方がわからず…
>>435の方法はディスプレイの自動検出に失敗していても、
毎回固定の解像度に切り替えるならば、select row 9の値を自分の環境に沿ったものに
変えればいいはず。

長くなったので現在の解像度の取得方法は次に書き込む。

「メニューバーにディスプレイを表示する」でメニュー表示させて
そのメニューを選択させることができるなら
環境設定を起動させなくてもいいので処理が早そうだけど
スクリプトがよくわからん

>>432
現在の解像度を取得するには以下の方法があるようだ。
なお、AppleScriptの特定の命令として大きさを取得する方法はない。

(1) Finderより取得（10.4のみ動作可能）
tell application "Finder" to bounds of the window of the desktop
命令的には、Finderの背景としてあるデスクトップをウインドウとして見て、
そのウインドウの大きさを取得しているらしい。
返り値はFinderと同じ意味の数値のリストらしく、1024x768なら、{0,0,1024,768}となる。
たぶん、432にとっては一番簡単な方法。

(2) サードバーティ製OSAXを使用（未確認）
Jon's CommandのOSAXの中に、ディスプレイの解像度を取得できる方法があるようだ。

(3) 設定ファイルをUnixコマンドで読み出し
do shell script "defaults read com.apple.windowserver"で設定ファイルを読める。
多分、使うのはディスプレイの高さ(Height)、と幅(Width)だけのはず。
高さ(Height)だけが必要なら末尾に追加すればよい。
do shell script "defaults read com.apple.windowserver Height"のように。
文字列内は全角/半角はもちろん、大文字/小文字も別の文字として認識するので注意。
heightと記述して取得できないなー、なんて悩んでしまった…

>>439
GUIスクリプティングでは、メニューバーの右上に並ぶメニューたちの取得／選択はできない…はず。
だからScript Menuとか言語設定のメニューも取得できない。

取得／選択できるメニューは
システムのライブラリ/Scripts/UI Elements Scripts の Probe Menu Bar.applescriptで
取得できる範囲内…と記憶している。
間違ってたらｽﾏｿ

ColorSync Scriptingの辞書の中に
Displayってコマンドがあるんだけど、これは色関係だけなのでしょうか？

>>442
ColorSyncっていうのは画面(モニター)に表示する色を制御する機能。
解像度の変更は出来ない。
その中にあるdisplaysっていうのはコマンドではなくクラス。
このクラスの役割はマルチモニターへの対応。
複数のモニターがある場合に、どのモニターに対して命令を実行させるかを
指定するために存在する。

>>441
＞GUIスクリプティングでは、メニューバーの右上に並ぶメニューたちの取得／選択はできない…はず。
できなくはない。ただ、どれがどのメニューなのか、ほとんどは表示させないと特定は難しい。
以下、ログインウインドウを選択するスクリプト。

tell application "System Events"
tell process "SystemUIServer"
tell first menu bar
set menuExtraList to every menu bar item
repeat with aExtra in menuExtraList
try
tell aExtra
click
try
tell front menu
tell menu item "ログインウインドウ..." to click
return 0
end tell
on error
click
end try
end tell
end try
end repeat
end tell
end tell
beep
end tell

>>444
わはは、このスクリプト派手だねえ。日本語とU.S.のスクリプト切り替えにも
使えて便利だ。ありがとう。

>435さん、>438さん、他みなさん、ありがとうございます。
解像度を直接変更することはできないのですね。
システム環境設定を開いて変更するスクリプトを参考にさせていただきます。

アップルスクリプト、深いですねぇ。これを機にもうちょっと勉強してみよう。
Automatorでは出来ないこと（アクションが提供されてないこと）が多すぎて…

旧OSの時は直接設定をAppleScriptでいじれるコンパネもあったよね。
Mac OS Xでできなくなってるのは
ｾｷｭﾘﾃｨ上の配慮か、技術的困難か、それとも単に担当者の怠慢か…。

ウソ情報を出してしまった441です。
>>444のを試してみたのだが…４番目のevery menu bar itemでエラーに。
バックグラウンドのアプリケーションのメニューを引っ張り出すっていう方法は
すごく参考になったけども、SystemUIServerでevery menu bar の取得が出来てない模様。
（Prove Menu Bar.applescriptのtell processに、"SystemUIServer"を指定して確認）
これ、OSのバージョンの問題かな。10.3.9だからダメなのかも。
>>444が動いた方、環境をぜひ教えて下さいな。

>>448
10.4.4です。動きました。
「ログインウインドウ...」というメニュー項目を含むメニューが無いので
メニューが順番に出て引っ込んだだけですが。

>>444
すごいですね。何でこんな事を思いつく（わかる）んでしょう？

入力メニューだとうまく項目をクリックできないですね。
名前を指定してもmenu item 3とかやっても失敗します。

445です。
OS X 10.4.4、日本語環境で、メニューバー右には
Vidi, QuicKeys, SMARTReporter, XWinder, 音量, ディスプレイ, AppleScript, スクリプト, 時計と
てんこ盛り状態で、444の "ログインウインドウ..." を
"U.S." や "ひらがな" (ことえりでなくEGBridgeを使用している) に書き換えても
正しく動作しました。 QuicKeysより高速でいい感じです。

ことえりのメニューは不完全なメニューを出す時もあるみたいだから、>>444の
tell menu item "ログインウインドウ..." to click
の部分を

tell menu item "ひらがな" to select
keystroke return

としたほうが上手く行くかもしれん

うちはことえりとEGBのメニューが混在していて同名のメニュー項目が２つずつあるので、
そのせいでうまく行かないのかと思いましたが、
clickからselect→returnに変えたらうまく動きました。

10.4.4だけど動かないなぁ、4行目でエラーがでるよ

>>453
/Applications/AppleScript/AppleScript Utility.app
の「GUIスクリプティングを使用可能にする」

>>454
動いた！
ありがとう

通はtryとon errorをｺﾒﾝﾄｱｳﾄ。

そして end try でコンパイルエラーを出して楽しむのですね

on error の後ろにメッセージだけでなく、
number, from, partial result, to
の引数全部入れるのが本当の通

beepを鳴らしてみたり

>458
そんなに色々あったんだ。
番号とメッセージ？しか使った事ないや。

エラーで分岐処理やったりしてたけど、
最近は自分用ばかりだしエラー構文も使わなくなったなぁ。
人に配るにしても、こんなエラーが出たってフィードバックがあったほうが
訂正しやすいし。

フィードバックじゃなくて定常状態でエラー出るのを前提にして条件分岐とか
errorってわざと書いて別の処理に逝くとか

いま邪道コードを見た気がする

半角数字を入力すべきところ（その後入力値で計算する）を全角数字で入力してしまった場合、
エラーとしてreturnしちゃうのは楽だけど、全角を半角に変換してやるにはどうすればいいでしょうか。
OSAXは使わない方向で。

>>463
１文字ずつ取り出して、"１"なら"1"に、それ以外なら……
って置換スクリプトを書けばいいと思う。

>>464　(｀･ω･´)こんな感じでしょうか

set a to text returned of (display dialog "半角数字でも全角数字でも" default answer "")
set b to ""
repeat with x in (text items of a)
if x contains "０" or x contains 0 then set b to b & "0"
if x contains "１" or x contains 1 then set b to b & "1"
if x contains "２" or x contains 2 then set b to b & "2"
if x contains "３" or x contains 3 then set b to b & "3"
if x contains "４" or x contains 4 then set b to b & "4"
if x contains "５" or x contains 5 then set b to b & "5"
if x contains "６" or x contains 6 then set b to b & "6"
if x contains "７" or x contains 7 then set b to b & "7"
if x contains "８" or x contains 8 then set b to b & "8"
if x contains "９" or x contains 9 then set b to b & "9"
if x contains "−" or x contains "-" then set b to b & "-"
if x contains "．" or x contains "." then set b to b & "."
end repeat
set a to b as number

スクリーンショットを撮影して(OSはTigerなので標準仕様のpngで）、
撮影した年月日・時分秒をファイル名としてデスクトップ上に保存する
アップルスクリプトが作りたいのですが、
スクリーンショットを撮影するにはどうすれば良いのでしょうか？
よろしくお願いします。

>>466
do shell script "screencapture ~/Desktop/FileName.png"

やることがそこまで特定されてんなら、Automator使うのもｵﾓﾛｲかも。
4アクション。ｽｸｼｮ撮って固定名でｾｰﾌﾞ、ﾌｧｲﾙ名に年月日付ける、ﾌｧｲﾙ名に時分秒
付ける、ﾌｧｲﾙ名中の固定名を空文字で置換。

実行はあまり早くない、年月日時分秒の区切り文字の自由度は少ない、ものの。

do shell script "date +%Y年%m月%d日%H時%M分%S秒"
とすれば"2006年02月19日09時22分08秒"となる。

do shell script "date +%Y-%m-%d-%H-%M-%S"
とすれば"2006-02-19-09-22-08"となる。

do shell script "date +%Y%m%d%H%M%S"
とすれば"20060219092208"となる。

ちと遅いけど

467-469
ありがとうございました。やってみます。

>>469
おおー、今までcurrent dateでシコシコやってました。

ファストユーザースイッチを自動で切り替えてかつ、切り替え時に
safariを常時あげてくれるスクリプトをがんばって書いてます。
set h to do shell script "whoami"
set newUser to "hogehoge1"
set userName to "hogehoge"
set newUser to do shell script "id -u " & userName
do shell script "/System/Library/CoreServices/Menu＼＼ Extras/User.menu/Contents/Resources/CGSession -switchToUserID " & newUser
do shell script "/System/Library/CoreServices/Menu＼＼ Extras/User.menu/Contents/Resources/CGSession -suspend"

と切り替えだけはうまくいったのですが、、safariをあげれません。。。
ファストユーザースイッチの切り替え時の命令ご存知の方、ぜひご享受ください。

あげる？
起動なら tell application "Safari" to open じゃないの？

切り替え先のアカウントでtellしなきゃいけないってことか

suspendする前にリモートAppleEventを投げたりできんかね

そうなんです。
切り替え先のアカウントでtellなんです。そこで詰まってしまって。

tell application "Safari" of machine "eppc://hogehoge1:[email protected]" to activate

みたいな感じで

出だし、do shell script ばっかだな。もうちっと何とかならんのか。

>>478
OSX の UNIX 機能がいかに強力かが反映されているな
Python とか Perl からアプリの AppleScript 機能を呼び出せれば
AppleScript 要らんかも

XでなくともPerlは使えたような…
以前のOSAXが殆ど使えなくなったのがつらい

旧OSではPerlからAppleEvent呼び出したりもしてたよ。

関係ないが、PerlでもCocoa使えるらしい。

ほんとに関係ないな。ｷｬﾒﾙ何とかってやつだな。

以前のOSAXが使えなくて不便というのは自分は感じてないな。
その程度しかOSAX使ってなかったんだな。
標準の機能としてｺﾝﾊﾟﾈ周りとか触れるようになってないのが不満だが、
具体的に自分がそっち方面をいじりたいわけでもないので
OSAX等の有無も探してないなあ。
昔と違って自分で英語のｻｲﾄ読んで探さないといけないのもたいへんだしｗ
何か面白いOSAXとかある？

>>479
> Python とか Perl からアプリの AppleScript 機能を呼び出せれば
> AppleScript 要らんかも

MacPythonはアプリのAppleScript機能抜き出して Pythonモジュール作るユーティリティがある。

じゃあPythonﾒｲﾝで記述したい人はそれで済ます事もできるわけだ。
Pythonスレ前あったのにね。

アプリが対応しているのはAppleEventね。AppleScriptはそれを便利に使うためのOSA
コンポーネント、他にもOSAコンポーネントはあるし、汎用のスクリプト言語から
AppleEventやOSA経由でアプリ操作もできる。
AppleScript経由すると遅いし、細かい操作ができないから、CでごりごりAppleEvent
処理を書くのもあり。
アプリ側はどんな出自で命令が来てるかは関知しない、従うのみ。

アップルもちょっと本気出して改良してくれれば、まだまだ速くなると思うんだけど。
まあ、OS7や8の時代よりははるかに速くなってるけどさ。
それより先にバグをどうにかしてほしいもんだ。

速くなったのはﾊｰﾄﾞの進化に負う所が大きいんじゃないの？

OSAX使うと割と速かったんだが

お前アホだろ。引っ込んどけ。>>489

質問です。

JeditXで
１：最前面に開いているファイルをPDFで保存し、
２；開いているファイルを保存せずに閉じる
というapplescriptを書きたいのですが、
PDFで保存するという部分が、全くわかりません。

参考書やWEBなどありましたら、教えてもらえないでしょうか？

>>492
10.3以降ならGUIスクリプティングで、
メニューから ファイル → プリント → PDF →
プリントウインドウから PDFで保存... → ファイル保存先を指定
と操作していいんじゃないかな。試してないけど。

GUIスクリプティングについては以下で勉強してみて
http://allabout.co.jp/computer/macos/closeup/CU20031220asc/index.htm

っていうか自分の環境を書いとくれ。
そして出来たらここで発表してね。

保守ついでに、iTunesの今の曲を言うスクリプト

tell application "iTunes"
tell current track
say (artist as string) & ". " & (name as string)
end tell
end tell

>>494
ｵﾓﾛw

>>494

いいな、これ。

数百曲のライブラリをシャッフルで聞いて、「これ、なんて曲だっけ？」
って時にいいな。

property temp : ""
on idle
tell application "iTunes"
tell current track
set newtemp to (artist as string) & ". " & (name as string)
set tempgenre to genre
end tell
end tell
if newtemp is not equal to temp then
if tempgenre is in {"Drum & Bass", "Drum'n'Bass", "Electronic", "Electronica/Dance", "House"} then
set tempvoice to "Zarvox"
else
set tempvoice to "Vicki"
end if
tell application "iTunes"
repeat with i from 0 to 8
set sound volume to sound volume - i
delay 0.1
end repeat
end tell
say newtemp using tempvoice
set temp to newtemp
tell application "iTunes"
repeat with i from 0 to 8
set sound volume to sound volume + i
delay 0.1
end repeat
end tell
end if
return 4
end idle

自動化してみた。これ、イイね!
アプリケーションかつ「実行後、自動的に終了しない」で保存して常駐させて使用。
日本人アーチストはそれっぽく読むように辞書作って置換した方がいいかもね。

日本語はMonzaiに投げればいいんじゃまいか

おおお、これは(･∀･)ｲｲ!!

DJ!

DJ!

DVコーデックの動画(iMovieキャプチャ等)を対象として、
QuickTime Player (Proのみ？)での 「高品質で再生する*」のチェックをオンにする手作業を自動化。
(* ムービー＞ムービーのプロパティを表示＞ビデオトラック＞品質 内)
今日知ったけど HiQualという無料ツールが説明を見る限りほぼ同等。
==============
(規制に掛かったので中心部だけ抜粋)

if ((creator type) of obj is "TVOD") or ((file type) of obj is "dvc!" or "MooV") tell application "QuickTime Player"
activate
set high quality of track "ビデオ トラック" of movie 1 of window 1 to true
end tell
end　if

==============
同様に ビデオの表示サイズを指定の値に変更するツールを作りたいんだけど、分かりますか？

tell application "QuickTime Player"
tell movie 1
set dimensions to {640, 480}
set high quality of tracks to true
set deinterlace fields of tracks to true
end tell
end tell

>>498
曲名喋る前に、
海外の適当なニュースサイトからニュース拾って読ませれば
気分はまさにラジオかも？

んでガレージバンドで適当にジングルつくって　ｳﾊｰ

MP3ﾌﾟﾚｰﾔｰで、ｼﾞﾝｸﾞﾙっぽいのがﾃｷﾄｰに流れるやつあったよね。
AroFMだっけ？

>>503ありがとう
ちなみに 高品質 と インターレース解除 を併せると
少なくともDVコーデックでは両オフと変わらない気が

ScriptDebugger4.0.1出てます。
4.0はMacRoman固定で処理してて全く使い物にならなかったけど、4.0.1はとりあえず
使えそう。エディタビューでダブルクリック選択できない等おかしい所はあるけど実
用上の障害にはならない。

>>508
超ナイス報告。僕も4.0飛び付いてorzになってた。

あれを使うような本格的なｽｸﾘﾌﾟﾀｰさんがけっこう居るって事なのね。
なんかうれしいなあ。

アップルスクリプトを使って現在のIPを確認することはできますか？
synergyを自動化したいんですが。

アクセスするとグローバルIPを表示するようなページがあるから、
そこからデータを引っ張ってくるといいのでは。
そういう仕組みのAppleScript Studio使ったソフトがありましたよ。

少なくとも Tiger には
Standard Addition に system info 命令があって
そこから IPv4 address が取れる。

>>511
Synergyについて検索しましたが、ひょっとしてあなたのやりたい事は、
「Mac miniでリビングPC」というサイトさん（ブログ）の
2005年３月12日の記事に書いてあるやり方でできるのではないですか？

IPはshellでifconfig -aでもわかるが、ルーターをかましてるとそうはいかんよね。

do shell script "curl 'http://taruo.net/e/?'|grep 'host='"

つーか、つまらんことで{"悩むな","悩ませるな"}

ttp://checkip.dyndns.org/だともっとシンプル。

ふと思い立って、以前作ったプロジェクトを
新しいxcodeでユニバーサルとして再度ビルドしてみたけど、エラー出まくり。
新規に作ると大丈夫だけど、めんどくさい。つーか作り方忘れた（＞＜）

つーわけで
do shell script "curl 'http://checkip.dyndns.org/'|sed 's/.*\\ \\([0-9]*\\.[0-9]*\\.[0-9]*\\.[0-9]*\\).*/\\1/'"

全然simpleちゃうやん (自爆する気？！

>>511
do shell script "/path/to/synergys -n $(hostname -s) --config /path/to/synergy.conf"

>>521
do shell script "curl 'http://checkip.dyndns.org/' | tr -Cd '[0-9].'"

Safariでやってみた
tell application "Safari"
make new document with properties {URL:"http://checkip.dyndns.org/"}
set theWin to id of window 1
delay 2--ロード待ち(手抜き)
set myIP to word 4 of text of document of window id theWin
close window id theWin
end tell

よーわからんけど
ipconfig getifaddr en0

>525
ﾌﾟﾗｲﾍﾞｰﾄｱﾄﾞﾚｽが出ました。

とりあえず自分で使っているものを晒しておきます。
・事前にiTunesを開いておいて、top100ソングの曲順を手動で逆順にしておいてください。
・sayの文中は添削した上でお使いください。

tell application "Safari"
open location "http://phobos.apple.com/WebObjects/MZStore.woa/wa/com.apple.jingle.app.store.DirectAction/viewTopSongs/"
delay 5
end tell
say "Welcome to iTunesMusicStore Japan today's top 100."
delay 0.5
say "Okay, now let's start to count down the top 100 songs."
tell application "iTunes"
repeat with i from 100 to 1 by -1
say "today's number" & i
set (sound volume) to 80
play
repeat until (player position ? 27)
delay 1
end repeat
if (i > 1) then
set (sound volume) to 50
say "okay, Let's go to the next tune."
pause
next track
end if
end repeat
end tell

(player position ? 27)
は
(player position >= 27)
でお願いします。

なかなか素晴らしいです。転載していいですか？

あと、ボリューム変更はクロスフェード効果なのせうか。

>>529

エラー対策を全くしていませんが、
それでもよろしければ転載okです。

ボリューム変更についてですが、
変更しないと、sayの声が音楽にかぶってしまうので、
ガレバン3の「ダッキング」エフェクトをパクって
音量を５０と８０で往復させました。

どこに転載するか書かずに転載の許可を願うとは、これいかに。
ﾌﾞﾛｸﾞとか？実はどこかの雑誌の編集さんだったりして…。

確かにどこに転載されるのかは気になる。
本人が転載許可してるみたいだからあまり突っ込まないが。

>>527
すげえええええええええええ

iTunesに直接Todaysトップソングを表示させるスクリプト
tell application "iTunes"
open location "itms://ax.phobos.apple.com.edgesuite.net/WebObjects/MZStore.woa/wa/com.apple.jingle.app.store.DirectAction/viewTopSongs/?ign-mscache=1"
end tell
http://web-sniffer.net/で調べた。
itmsのアドレスが固定かどうかは知らない・・・

>>533
ここに晒している以上、
権利云々も言えたもんじゃありません。www

>>535
ありがとうございます！
早速マージさせていただきました。

このように、他者の力をお借りして、
最終的にはもう少し良くしたい、という思いもあります。

ちなみに、iTMSのtop100画面上で、逆順ソートを自動化する方法が思いつかないので、
feed://phobos.apple.com/WebObjects/MZStore.woa/wpa/MRSS/topsongs/sf=143462/limit=100/rss.xml
から曲リンクを取得して自動再生させるアプローチも探ってみたいな、と。

iTunes for Mac まとめページにあぷして置きました。
http://www3.atwiki.jp/itunes/pages/18.html

ボリューム変更は環境依存が大きいので、ぶち抜きました。
>>535 を採用しました。ただし、535のリンクは英語のページ
みたいなので日本語ページ(itms://ax.phobos.apple.com.edgesuite.net/WebObjects/MZStore.woa/wa/com.apple.jingle.app.store.DirectAction/viewTopSongs?id=1000)へ修正

appで途中で止められるように、quitハンドラを追加しました。

タイトルとアーティストをmonzaiでしゃべるように、cmd+Lと
cmd+cを駆使して努力しましたが、iTunesがフォアになるため
挫折しました。トラック情報くらいとらせてほしい。

転載とはそこのことだったのか。
最近Mac関係の色々なWikiができて情報が蓄積されてますね。
むしろ読むほうが追いつかないというか、読む前に挫折するというか。
すばらしいと思います。

アップルスクリプトで任意のアプリケーションを立ち上げるのに悪戦苦闘中なのですが、

　tell application "アプリケーション名" to activate

これはアプケーションフォルダーにあるアプリが起動可能なのですよね？
任意の場所にあるアプリの指定の仕方がさっぱりわかりませんorz

どうか暇つぶしに教えてくださいませ。

アプリケーション名の代わりにアプリケーションのパス丸ごとで起動するんじゃなかったかな

>>539
任意の場所にあるものがそれで起動するはずだけど？
ただ、バージョン違いの同じ名前のアプリケーションが複数ある場合はややこしい。

>>540-541
レスどーもです。
なんだかよくわかりませんが、アプリ名だけで起動できるようになりました。
Finderを再起動させたんですけどそのせいでしょうか？
開いたばかりのアプリだったせいで認識してなかったということはありますか？

>>542
認識してなかった事はあり得るかもね。
あとは単純にアプリ名を間違ってたとか。

アップルスクリプトで、実行専用アプリで保存するときに
バックグラウンド専用アプリにすることって出来る？

OS X 10.3.9　

バンドル形式で保存してInfo.plistにキーを追加すればなるんでないか。

>>544
plist で LSUIElement の値を 1 に設定する。

Xcodeで作ってごにょごにょすればできると思う。

書く前にリロードすればよかった。orz

iTunesスレだと、スプリクターが居ないのか受けが悪かった。
iTunesで選択した曲を埋め込まれた歌詞をテキストテロップにしてQTPlayerで表示するスクリプト
QTP 7.0がバグだらけで、苦労しました。アートワークをムービに
追加したり、タイムタグに対応したり考えたけど挫折。

on run
tell application "iTunes"
set theTrack to item 1 of selection
if lyrics of theTrack is "" then
beep
return
end if
OpenQtp(location of theTrack, lyrics of theTrack) of me
end tell
end run

on OpenQtp(theFile, theLyrics)
tell application "QuickTime Player"
activate
open theFile
--歌詞埋め込み
set the clipboard to theLyrics as string
select all movie 1
add movie 1 with scaled
set dimensions of last track of movie 1 to {320, 240}
set position of last track of movie 1 to {0, 0}
--TextFrame更新
set scroll of frames of last track of movie 1 to {scroll in, scroll continuous}
--後処理
select none movie 1
rewind movie 1
start movie 1
end tell
end OpenQtp

ずいぶん、改行制限が高いな。

>>549-550
こんな感じになりますた。ｵﾓｼﾛｽ
ttp://amb.sakura.ne.jp/hanyou/img-box/img20060326153223.jpg

曲によってなのか、いきなり最後尾表示になってハングしちゃう事がありました。

>>551
これは、ビジュアル的におもしろいねｗ

>>549
おもしろい事考えますねー。

すげー。AppleScriptってこんなことも出来るんだね。

悪い事にも使えると。

たまに、「○○なアップルスクリプトを作ってください！」とか、全く作らない人が頼んでくる場合、
それはAppleScriptでは無理、っていう物が多い。

ターミナルで、ちょっと通りますよの人が横切るコマンドを
作って下さい。

そんなものにまでわざわざアップルスクリプト使うことないやん。

エスケープシーケンス制御できんのかな。

エスケープシーケンスアニメなんて技術もあったよなぁ……。
アスキーアートはすっかり復権してるけど。

一発でOSXからOS9の起動ディスク指定して再起動するアップルスクリプト作ってください。

>>557
slでできるんじゃないの？

>>558
557は556を受けてのネタのような気が。

>>560
tell application "System Preferences"
activate
reveal anchor 1 of pane id "com.apple.preference.startupdisk"
--reveal anchor 1 of pane "起動ディスク"
end tell

tell application "System Events"
tell process "System Preferences"
repeat until (exists button "Mac OS J1-9.2.2 （Macintosh HD 上）" of radio group 1 of scroll area 1 of group 1 of splitter group 1 of window 1)
delay 1
end repeat
click button "Mac OS J1-9.2.2 （Macintosh HD 上）" of radio group 1 of scroll area 1 of group 1 of splitter group 1 of window 1
delay 1
click button 6 of window 1
-- click button "再起動..." of window 1
repeat until (exists sheet 1 of window 1)
delay 1
end repeat
keystroke return
end tell
end tell

ボタンをクリックしてシステムを選択する部分だけどうしても言語環境に依存せざるを得ませんでした。
OS 9が必ず「button 2」になると決まっていればできなくもないけど。

click item 1 of (every button whose name contains "9.2") of radio group 1 of scroll area 1 of group 1 of splitter group 1 of window 1

というのも考えたけどいまいち。

何かblessとか使ったやつがあるはず。昔作ったし、シェアウェアにしてる人もいるし。

>>560
do shell script "/usr/sbin/bless -folder9 'OS9システムフォルダposixパス' -setBoot" password "うにゃ" with administrator privileges
ignoring application responses
tell application "Finder" to restart
end ignoring

スクリプト書類をひな形にするとアイコンがOS9のになる

ひな形ってOSXでもきちんと動いてたっけ。

>>566
○○のコピーってのが勝手に作られる

ドラッグ＆ドロップ形式で作ったスクリプトで、
選択したファイルのクラスを表示させるとaliasがalisと表示される。

文字列変換されてないんでしょ

display dialog alias
display dialog (alias as string)

あーほんとだ。
docfとかと同じあれか。

フォルダ内のText書類を一括でRTF書類に変換するものを作っていただけませんでしょうか？
一つ一つテキストエディットでRTFにしていってるのですがあまりに大変で...。
余力のある方がいらっしゃいましたら宜しくお願いします。

こんな感じか。前提条件を厳しくしてあるけど。

set theSource to choose folder with prompt "Source:"
set theDestination to choose folder with prompt "Destination:"
tell application "Finder" to set theFiles to every file of folder theSource whose name ends with ".txt"
repeat with aFile in theFiles
set newName to do shell script "echo " & name of aFile & " | sed 's/\\.txt/.rtf/'"
tell application "Finder"
set newFile to (make new file at folder theDestination with properties {name:newName}) as string
open aFile
end tell
tell application "TextEdit"
activate
tell application "System Events"
keystroke "t" using {command down, shift down}
end tell
save front document in newFile as alias
close front document
end tell
end repeat

>>572
本当に助かります。
ありがたく使わせていただきます。
もし宜しければ拡張子がつくようにしてみたいのですがご指導願えますか？理由はWクリックでテキストエディタで開く分には問題ないのですがなぜかアイコンが消えて白紙になってしまいました。

>>573
白紙になるのは再起動すれば直ると思われ

>>572
僭越ながら、５行目をにするとベターかと
set newName to do shell script "echo " & quoted form of a & " | sed 's/¥¥.txt$/.rtf/'"

あ間違えた
set newName to do shell script "echo " & quoted form of name of aFile & " | sed 's/¥¥.txt$/.rtf/'"

>>572さん、576さん
どうもありがとうございます。
今から早速試してみます。お忙しいとこ本当にありがとうございます。
嬉しいです。

特定のフォルダーからファイル名のリストを取得するスクリプトなんですが、
OS10.3から10.4にバージョンを上げたところ
リストがおかしくなってしまいました。
10.3の時は「10001.jpg」
10.4では「1 0 0 0 1 . jpg」
となってしまいます。何が原因か全く検討がつきません。
どなたか、原因の解る方がおられましたらアドバイスいただけないでしょうか。
宜しくお願いします。
copy cell "basepath" of current record to theBasePath
set aPath to theBasePath as string
set aFolderA to (aPath & "gazou:") as alias
set aContA to "" as text
tell application "Finder"
try
move file (aPath & "list_full.txt") to trash
end try
set aListA to (every file of aFolderA)
repeat with aFile in aListA
set My_Name to name of aFile
set aContA to (aContA & My_Name & return)
end repeat
try
set fileNum to open for access file (aPath & "list_full.txt") with write permission
write (aContA) to fileNum
close access fileNum
end try
end tell

>>578
解決策になってないけど、同じことをやる別の手段として
set aContA to do shell script "ls -v フォルダのパス > ~/Desktop/list_full.txt"
これでやってみては？

>>579
早速のレスありがとうございます。
非常に勉強になりました。
>"ls -v フォルダのパス > ~/Desktop/list_full.txt"
この場合のフォルダのパスをアップルスクリプトで取得済みの変数
で処理することはできるのでしょうか。

aFolderAがそのフォルダなら
do shell script "ls -v "& aFolderA &" > ~/Desktop/list_full.txt"
これですむね。基本的にテキスト扱いでOKよ。
> ~/Desktop/list_full.txt
は出力先なので、任意のパスで。

あ、重要なことを忘れてた。
パスはaliasではなくPOSIX pathで。
set aFolderA to POSIX path of ((aPath & "gazou:") as alias)

>>582
びっくりしました。
こんなに早く解決出来るとは・・・
正直気が狂いそうになってました。

感謝の言葉以外にありません。
ありがとうございました。
これからももっと精進いたします。

ふとautomatorで
選択したファインダー項目を取得
↓
フォルダの内容を取得（見つかった各サブフォルダからも取得する）
↓
新規テキストファイル

で作ってみた。内包するフォルダの中身も取れるしドラッグ＆ドロップで
動作してイイ、と思ったが…クソ遅かったです('A`)

あの--スリープに切り替えるのではなくて、imacのような液晶のブライトネスが０にならないものを
0にするようなscriptってありますでしょうか？
PBとかノート型は環境設定の基本設定で０になるんですがIMACとかPB型のものはならなくて。。
必要のないときにバックライトが切れてほしいのです。
ご存知のかたご助言いただければ幸いです。

>>585
「省エネルギー設定」に「ディスプレイをスリープさせるまでの時間」って項目ないの？

#!/bin/csh

touch ./nuko.txt

@ i = 1

while ($i <= 9999 )
　echo 'ぬこかわいいよぬこ' >> ./nuko.txt
　@ i++
end

ワンクリックで一瞬でバックライトをきれればとおもっているのですが。。。
スリープでやってみたのですがと最低でも一分待たないとだめですよね。。

>>588
うーん。AppleScriptの領域じゃないと思うよ。

>>587
最初のtouchは必要？>>でもファイルが無ければ作ったような気が。

ああそうか。touchで、ねこにさわる、という事を表しているのかな。
無駄レスすまん。

AppleScriptでiTunesをコントロールして、

午前中、午後、夕方で、プレイリストを切り替えて、各プレイリストの中でシャッフルプレイする。

...のは、可能でしょうか？
自分で調べたのでは、分かりませんでした。
どうかお願いします。

>>591
可能。プレイリストにtellしてplayする。
朝昼晩三つのスクリプトを用意するか時間判別するかして
cronで呼び出しでもすればいい。

アップルスクリプトからcrontabを編集するのは無理だよね？

このスクリプトで問題無く書く出せるのですが、
シェルでシンプルにしようと書き出し部分を下記2行のような方法で
行えると思ったんですが、上手く行きません。何がいけないんでしょうか。
どなたかご教授ねがえたらアドバイス願いします。
set A to B
do shell script "cd ~/desktop; echo " & A & " > a.txt"
-------------------------------------------------------------------
set A to readSomeLines(choose file of "", 50)
set aPath to "Macintosh HD:Users:Shared:testdb:"
try
move file (aPath & "list.txt") to trash
end try
try
delete file (aPath & "list.txt")
end try
try
set fileNum to open for access file (aPath & "list.txt") with write permission
write (A) to fileNum
close access fileNum
end try

on readSomeLines(theFile, theLine)
set textData to ""
try
open for access theFile
repeat theLine times
set textData to textData & (read theFile until return)
end repeat
end try
close access theFile
return textData
end readSomeLines

>>594
よく見てないけど、とりあえずお約束として、こうしとく
do shell script "cd ~/desktop; echo " & quoted form of A & " > a.txt"

>>595
quoted form of
こんなの全然しりませんでした。すごいですね。ありがとうございました。

とりあえずAppleのdo shell scriptのページは隅から隅まで読んだ？

>>597
そのページの存在すら知りませんでした。

あとシェルで書き出す場合、基本的に既存のファイル名と同じ場合は上書きされるので、
古いファイルをゴミ箱に捨てる作業は不要。

>>599
了解です。
ありがとうございます。

いやAppleScriptでやる場合も既存のファイルをオープンして書けば同じ事のような…。
まあいいか。

>>592
サンクス！！
（お礼が遅くなってスマソ）

>>593
do shell scriptでできるんじゃない？

>>603
do shell script "crontab -e"
ってやると止まっちまう。
ターミナルを立ち上げないとviで編集しようがないから。

ファイル名に.mp3が含まれてる場合だけ
ファイルタイプMPEG、クリエータータイプTVODに変更したいんですが、
名前に〜が含まれる場合というのはどうやればいいでしょうか？

--Finderで選択中の物の中で.mp3で名前が終わるファイルの
--クリエータとファイルタイプを変更するスクリプト
tell application "Finder"
repeat with aFile in (every file of selection whose name ends with ".mp3")
set creator type of aFile to "TVOD"
set file type of aFile to "MPEG"
end repeat
end tell

>>605
start withとかends withとかcontainsとかis inとかを使う。

>>606の上のスクリプト、動かなかった。ごめん。

結局、10.4.6/AppleScript 1.10.6/スクリプトエディタ 2.1.1の環境では、
下記のような物しか動かないみたいだな。
tell application "Finder"
repeat with aFile in (selection as list)
if name of aFile ends with ".mp3" then
set creator type of aFile to "hook"
set file type of aFile to "MPG3"
end if
end repeat
end tell

>>606-608
即レスありがとうございます。

>start withとかends withとかcontainsとかis inとかを使う。
しかも勉強になりました。

後から気付いたけど、OSXでXcode入ってる環境だったら、
この目的には、do shell scriptでSetFile呼び出したほうが速い。
大量のファイルの処理になるとかなり速度に差が出ると思う。
>>95参照されたし。

レス違いだったら申し訳有りません。
ファイルメーカー用に使用するスクリプととし用意した物なんですが、
(read theFile until return)の部分を受け付けてくれません。
何故受け付けてくれないのかが解りません。
スクリプトエディタ上では問題無く動くんですが・・・。
詳しい方、アドバイスいただけないでしょうか。宜しくお願いします。

set A to readSomeLines(choose file of "", 200)

on readSomeLines(theFile, theLine)
set textData to ""
try
open for access theFile
repeat theLine times
set textData to textData & (read theFile until return)
end repeat
end try
close access theFile
return textData
end readSomeLines

OSとアプリのバージョンも書いとけよ。

どのみち俺はFM持ってないから試せんが。

>>610
Script Additions の read とFM Proの中のなにかの名前がぶつかってるからだろうな
外部にスクリプトを置くとか、その部分だけ他のアプリ(Finderとか)のtellでくくるとか、
生Apple Event(《event rdwrread》)で呼び出すとか

上は
>>611
だった。すまん

>>612
>>613

即レスありがとうございます。
OS:10.4.6
FM7
です。
>その部分だけ他のアプリ(Finderとか)のtellでくくるとか、
試してみます。

何の用語って明言する構文がなかったっけ？

using terms from

>>617
初めて聞いた用語だ。ｵｸﾌﾞｶｽ
使い方が特殊みたいね。

>>615
解決することができました。皆さんありがとうございました。

>>619
アドバイスを基に修正したのですが、更に上手く行かない箇所があります。
set A to readSomeLines(theBasePath of "", 200)
なんですが、set A to readSomeLines(choose file of "", 200)を基に
別途取得したパスを使って指定のファイルから読み込みしたいのですが、
何が足りないんでしょうか。
へたれですみませんが、アドバイスお願いします。


copy cell "path" of current record to theBasePath

set A to readSomeLines(theBasePath of "", 200)
do shell script "cd ~/desktop/imageget/script; echo " & quoted form of A & " > C.txt"

on readSomeLines(theFile, theLine)
tell application "Finder"
set textData to ""
try
open for access theFile
repeat theLine times
set textData to textData & (read theFile until return)
end repeat
end try
close access theFile
return textData
end tell
end readSomeLines

>>620
自己レス
解決できました。ご迷惑おかけしました。

どこをどう修正したら解決できたかも書いておくと、
君みたいな人が今後助かるという互助主義はいかがかな？

FMの掲示板にもマルチしてるような奴に言っても無駄

日本語のAppleScriptのメーリングリストが、さっぱり投稿が無くなってるみたいですね。
皆それぞれAppleScriptを使ってはいるのだろうか。

>>624
あそこはすでに廃墟になったよ。
今頃購読者数なんて>>624くらいだろ。管理人も失踪したし

みんな次のステップへ巣立っていったんじゃ？

>>622
set aFile to theBasePath as alias
を追加しました。

copy cell "path" of current record to theBasePath
set aFile to theBasePath as alias

これでset A to readSomeLines(theBasePath of "", 200)を実行できるようになりました。


>>623 FMの掲示板にもマルチしてるような奴に言っても無駄
すみません。以後注意します。

URL Access Scriptingのdownloadでファイルを
ダウンロードするものを作ってます。
ダウンロードに時間がかかるのでprogressをyesにして経過を表示させたいのですが
表示されません。
スクリプトは
tell application "URL Access Scripting"
activate
download theURL to file thePath with progress
end
です。どうすれば表示されるのでしょうか？
OS 10.4.6です。

628です。URL Access Scriptingだと進行状況がわからない＆キャンセルできないので
ターミナルでcurl使ってダウンロードすることにしました。
保存するファイル名を指定できるAppleScript対応ダウンローダーってありますかね。
YouTubeからファイル名をタイトルにしてムービフォルダに動画を保存するスクリプト。
日本語ファイル名は試してない。
tell application "Safari"
set theURL to URL of document 1
set theTitle to name of document 1
set theTitle to text 11 thru -1 of theTitle
end tell
if theURL starts with "http://www.youtube.com/watch?v=" then
--動画表示ページからURLを抜き出す
set theFLVURL to do shell script "curl --max-time 30 " & quoted form of theURL & " | perl -e '$data = join(q||,<>); ($tmp, $key) = split( q{player.swf?}, $data ); ($key) = split( q{\"},$key ); print qq{http://www.youtube.com/get_video$key}; '"
--保存フォルダ
tell application "Finder"
set theFolder to (home as string) & "Movies:"
set theSavePath to theFolder & theTitle & ".flv"
set isExist to exists (file theSavePath)
end tell
if isExist then
say "already exists " & theTitle
else
tell application "Terminal"
do script "curl -L -o " & quoted form of POSIX path of theSavePath & " " & quoted form of theFLVURL & "; say finish download"
end tell
end if
end if

すいません。基本的な事ですが、
choose file nameなどを使った時にダイアログが文字化けする問題、
どうやって解決すればいいんでしたっけ？
バンドルアプリケーション形式で保存して、
中のplistをどうにかするか、中にJapanese.projというフォルダを作る？か、
そんな感じだったと思うのですが、思い出せません。

(1) 保存時の「フォーマット」を「アプリケーションバンドル」に。
(2) Finderで「Japanese.lproj」という名前の空フォルダを作っておく。
(3) Finderで(1)で保存したアプリを選択し、
　　情報を見る=>言語=>追加で、(2)のJapanese.lprojを選ぶ。
(4) 情報を見る=>言語で、「Japanese」にチェックがついていることを確認。

>>631
ありがとん。

Unicodeで指定城
choose file name with prompt <<data ut1630D530A130A430EB540DFF1F>>

ほほー。おもしろそうですね。
でもダイアログのタイトルバーが化けちゃうんですよ。

普段こんなのでJapanese.lprojを追加してます。

--Finder 上でアプレットを選択して実行
tell application "Finder"
activate
set applets to {}
set appNames to ""
repeat with j in (selection as list)
tell application "System Events"
set pkBool to package folder of (j as alias)
set creatorType to creator type of (j as alias)
end tell
if (pkBool is true) and (creatorType is "aplt") and (exists folder "Japanese.lproj" of folder "Resources" of folder "Contents" of (j as alias)) is false then
set applets to applets & (j as alias)
set appNames to appNames & (name of (j as alias)) & return
end if
end repeat
if not applets is {} then
display dialog appNames & return & "に Japanese.lproj を追加します。"
repeat with jj in applets
make new folder at folder "Resources" of folder "Contents" of (jj as alias) with properties {name:"Japanese.lproj"}
end repeat
display dialog "完了" buttons {"OK"} default button 1 giving up after 1
else
display dialog "Japanese.lproj を追加する必要がないようです。" buttons {"キャンセル"} default button 1 giving up after 2
end if
end tell

おー。いいですねえ。スクリプト開発のためのツールもスクリプトで。
これぞって感じですね。

if (pkBool is true) and ((creatorType is "aplt") or (creatorType is "dplt")) and (exists folder "Japanese.lproj" of folder "Resources" of folder "Contents" of (j as alias)) is false then

ってしないとドロップレットには使えないことに気付いた。すまんこ。

>>628
試してないけど、iAlertとかGrowlのアラートウインドウを使って

(完了したDL数)/(DLする総数)

みたいな文字列を表示させればいいんじゃまいか。

tell application "Safari" to get source of front document
とすると、htmlのテキストデータを得られるのですが，これと同じ事をFirefoxでもできませんか。

tell application "Firefox" to get source of front documentではもちろんだめでした。
class of pTitやclass of curlなどでは、タイトルとURIしかえられません。

get properties of front windowとしてもそれらしいクラスが無いので，無理なのでしょうか？

>>639
無理

URLが得られれば、URL Accessとかdo shell scriptなんかでwgetとかcurlに渡せばいいんでは。

tell application "Firefox" to set myURL to ↓class curl⊇ of front window
set mySource to do shell script "curl " & myURL

mySourceにページのソース入ってる。

class curlのｶｯｺが凄い事になってるな。
それを避けて扱いやすくする方法がある。
下記の場合、コンパイルする時に、その環境にiCabがｲﾝｽﾄｰﾙされている事が必要。

tell application "Firefox"
using terms from application "iCab"
set urlStr to URL of window 1
end using terms from
end tell
set htmlStr to do shell script "curl -s " & urlStr

>>629
新しいインターフェースに対応したやつに改造したいけどASわからない・・・

>>643
http://pc7.2ch.net/test/read.cgi/mac/1147098915/39
に改善したのをちょうど書いた所です

>>644
ありがとうございます！

はじめまして。
皆様に教えていただきたいのですが・・・。

command keyを押し続けるだけのスクリプトはどうやって書くのでしょうか？

環境を明示しろやﾎﾞｹ

>>647

失礼いたしました。

OS10.4.6をしようしております。

>>646
やりたい事もちゃんと書かないと思った通りに動かないよ。たぶん。

>>649

そうですね。

マイティマウスのボタン４に割り当てをしたいのです。

コマンド＋クリックを割り当てたいわけか。
それは厳しいと思うよ。
それができるマウスドライバを買うか、
ドライバ付きのマウスを買った方がいんじゃないかな？

例えば
３ボタン：コマンド＋A
１ボタン：クリック

で、コマンド＋Aが無効になる場合、コマンド＋クリックがはたらく。

>>651

ボタン４とクリックホイール左右を使用したかったんです・・・。

やっぱり無理ですか・・・。

つか一週間前に買った
マックブック買えばよかった

MacBookに外付けLCDで常用してます
で、たまにMacBookのLCDも使用してます。

で、AppleScriptを使用してMacBook側の液晶の輝度調整を
キーボードショートカットに割り当てることはできないモノでしょうか?
たとえばCtrl+Aで輝度0、Ctrl+Bで輝度50%、Ctrl+Cで輝度100%とか。

無理。
Keyboard Maestroでできるようだ。シェアウェア。
金が惜しいなら自分で探せ。
http://www.keyboardmaestro.com/documentation/2/actions.html#actions_system

なぜ無理?

>>630,631
よくわからんのだが、情報ウインドウの言語に「Japanese」にチェックが
ついていても他人に配布したら文字化けしたって言われることがときどきある

何故なんだ？？

>>658
(1) 保存時の「フォーマット」を「アプリケーションバンドル」に。
(2)Info.plistのCFBundleDevelopmentRegionをjapaneseにしる。

Japanese.lprojは、特に必要ない。

CFBundleDevelopmentRegionがEnglishのままだと、pantherで化ける。

で、最近のScriptEditorか、AppleScriptだと治ってたような気がす。

>>659
Thx
でも CFBundleDevelopmentRegion も japanese にしてあるんだよなー
う〜んう〜ん

あっ Japanese だった。
もしかして小文字じゃないといけないのかな？

Opera 9がAppleScript対応してます。
何か、IEとかiCabとか昔のNetscapeとかの、古めのブラウザの用語をごちゃまぜにしたような
変わった感じの印象を受ける用語辞書だけど、基本的な事はできるようになった模様。

無料になってすぐ落としてみた時は対応してなかったんだけどね。
公式のフォーラムで外国の人が「対応しないの？」って書き込んでるのに対しても
「予定なし」って書いてあったから、対応しないつもりかと思ってた。

そういえば、PagesがAppleScriptに対応したよーという話をあんまり聞かないね。
Operaダウンロード中。

>>663
> Pages
対応したの？というかむしろ、前は対応してなかったの？

してなかった。

macを指定時間に起こす方法を調べています。
do shell scriptで以下のスクリプトをadmin権限で実行すれば
いいのは分かったのですが、どうも挙動が変なのです。

pmset schedule wakeorpoweron "mm/dd/yy HH:MM:SS"

登録後にコマンドラインで確認すると、
$ sudo pmset -g sched
Scheduled power events:
[0] wakeorpoweron at 06/04/06 20:45:00
[1] wakeorpoweron at 06/04/06 20:45:00
と言う感じで、なぜか2行出てくるのです。
一応キチンと動くのですが、こういうものなんでしょうか？

よくそんな情報見つけますね。
ttp://www.macosxhints.com/article.php?story=2005122507424492
の最後の書き込みにtwiceがどうのと書いてあるようですが、
解説があるわけじゃないのかな？
pmsetのman見ても何もわからないでしょうか。
ttp://developer.apple.com/documentation/Darwin/Reference/ManPages/man1/pmset.1.html

ターミナルじゃなくシステム環境設定の省エネルギーからスケジュール入れて、
その時にpmset -gでどう表示されるか見てみてはどうですか？
結果が同じように二重ならたぶんOKという感じで。

cronみたいに定期的にスリープから起こしてスクリプト起動ってできないかね。

cronだとスリープしてても起こせるのか。それは便利だね。
OSXになってUNIX系のツールがスクリプトに応用できて
それはそれで便利だが、
そっちがあるからいいだろうみたいな感じで
AppleScriptの手を抜かれるのは困る。
もっとAppleScriptに力を入れてくれ〜。

cronだとわざわざviで入力しなけりゃならんからめんどい

>>670
> わざわざviで入力しなけりゃならん
そうなのか？

>>669
あ、ごめん。cronではできないと思う(実はできる?)。
「cronみたいに」は「定期的に」にかかってます。
>>670
そんなことないっしょ?
crontab -eで起動するエディタは環境変数EDITORで変わるんでないかな。
でも、viも覚えると便利だよ。

>>670
CronniX
ttp://h5197.serverkompetenz.net:9080/abstracture_public/projects-en/cronnix/

>>666
/Library/Preferences/SystemConfiguration/com.apple.AutoWake.plist
をみると、
poweronで一項目、wakeで一項目ってなってるから、
電源OFF、スリープの両方に対応できるようにってことじゃないか？
って、家の設定はeyeTVがやったやつだけど

下記シェルの部分でファイルの一覧は取得、書き出しできるのですが、
フォルダーの一覧の場合に書き出しできません。良い方法があればご教授願えないでしょうか。
宜しくお願いします。

set aPath to (theBasePath & "Image:General:") as string
set aFolderA to POSIX path of ((aPath & "photo:") as alias)
set aFolderB to POSIX path of (aPath as alias)
set aContA to "" as text
set aContA to do shell script "ls -v "& aFolderA &" > "& aFolderB &"/list.txt"
end tell

言ってる意味がわからん。ls -d を使えばええよ、ってこと？

>>1349
>set aContA to do shell script "ls -v "& aFolderA &" > "& aFolderB &"/list.txt"
最後の／が余分でした。失礼しました。

完全に独り言だな…。

1349!!?

質問です。
スクリーンキャプチャを撮影したファイルを直接ある外付けHDに書き込みたいのですが、
do shell script "screencapture /Volumes/hd/desktop/aaa.png"
とやってもSyntax Errorと出て動きません。

どうしたらよろしいのでしょうか？

do shell script "screencapture ~/Desktop/aaa.png"
ウチではちゃんと動きました。

つづり間違いとか半角スペースが抜けてるとか、
ほかの部分に間違いがあるとかじゃないの？>>680

/hd/desktop/がおかしいかな。
デスクトップはユーザー以下だから>>681な書き方かと。
詳しくないから間違ってたらすまんです。

まずTerminalで自分がいじりたいフォルダのパスを確認すべしだね。

USB 1.1の外付け直下にいつのまにか「デスクトップ」ができてたので

screencapture /Volumes/ボリューム名/desktop/aaa.png

ってやってみたけど問題なかったよ。

それ何が作ったフォルダだろうね。
OS9が作るやつは「Desktop Folder」みたいなんだが…。

あとシェルスクリプト使う時は一応大文字小文字は気にしたほうがいいんじゃ…。

--//ゴミ箱の内容を取得
tell application "Finder"
set |項目リスト| to (every item of trash)
set |項目テキスト| to ("" as Unicode text)
repeat with |項目| in |項目リスト|
set |項目テキスト| to |項目テキスト| & return & (POSIX path of (|項目| as alias)) as Unicode text
end repeat
end tell
--//空なら終了
if |項目テキスト| is equal to ("" as Unicode text) then
display alert "ゴミ箱は空です" message "" as informational buttons {"終了"} default button 1 giving up after 3
return 0
end if

--//処理を選択させる
try
display alert "ゴミ箱を空にします！！" message "ゴミ箱の内容：" & (|項目テキスト| as string) as critical buttons {"しない", "ゴミ箱を開く", "OK"} cancel button 1 default button 3
set |選択処理| to (button returned of result)
on error
return 0
end try
--//選択に合わせて処理
if |選択処理| is equal to "OK" then
--//ゴミ箱の内容を削除
set |パスリスト| to every paragraph of |項目テキスト|
repeat with |パス| in |パスリスト|
if (|パス| as Unicode text) is not equal to ("" as Unicode text) then
do shell script "rm -rf '" & |パス| & "'"
end if
end repeat
else
--//ゴミ箱を開く
tell application "Finder"
open trash
end tell
end if

変数が日本語なところがしぶいなｗ

役に立たなさすぎ

？

10.3だから動かなかったとか。

作成目的がわからないという事かな？
ゴミ箱が空にできなくなった時のための物なんじゃないの？
たまにそういう初心者質問あるよね。

「ゴミ箱を空にしています」が終了しないバグが未だにあるからね
あと、空にする前にゴミ箱の内容を確認できるのもいいんでない？
rmで削除したほうが早い場合もあるし

> 終了しない
あれはアップルメニューの「最近使った書類」を停止すれば
出なくなるという噂が。
Finder再起動すれば消せるよ。確か。

↑
噂とか確かとか、あやふやなことばっかだな、おい。
お前の存在自体、罪だ。死ね。

はいはい。

確かに言える事は、俺んとこで
以前は頻繁に出ていた症状が最近は出てない。
で、出なくなった後に、
最近使った〜のメニューと関係があるらしいという話を読んだのだが、
その時点で俺は最近使った書類は使ってなかったので、
やはり関係があるのだろうかと思った。

で、症状が出た時の対処法として、
option押してDockのFinderをクリックした時に出るメニュー
「再度開く」でのFinderの再起動をすれば削除できるようになる、
というのをやってた気がするが、最近は症状が出てないので覚えてない、
という事だ。

688、689をスクリプトエディタに貼付けてそこから実行してみたのですが、
私の環境（OS X 10.4.6）では次のような動きになりました。
私のやり方か環境になにか問題があるのでしょうか。
1. 表示されたゴミ箱の項目が多すぎてボタンが画面の外に。ボタンが押せない
2. たぶんreturnキーを押せばデフォルトのボタンが押されるだろうと思いreturn
3. ガリガリとハードディスクに書き込んでいる音
4. ゴミ箱を開けてみるとまだファイルやフォルダが残っている
5. そういえばさっきたくさん表示された項目はかなり前にとっくに消去したもののような気もするが…気のせい？
6. もう一度実行してみようと思いスクリプトエディタを見るとまだスクリプトを実行中のまま
7. 中止ボタンを押してからもう一度実行ボタンを押す
8. 今度は項目が少ないので直接OKボタンを押せた
9. しかしやはり削除されずまるまる残っている。スクリプトも実行中のまま

俺も試したけど、これシンボリックリンクはリンク先を削除してるね
>>700 はそれじゃない？

エイリアスをas aliasするとエイリアスファイルそのもののaliasが得られるが
シンボリックリンクだとオリジナルのaliasになってしまう模様。
覚えておかないと危険かもしれん。

うーん。そんな事があるのか。
普段、エイリアスだったらどうなるかとかシンボリックリンクだったらとか
考えてなかったけど、やっかいですね。

確認したら確かにシンボリックリンクはオリジナルを削除してます
>>688 の6行目

set |項目テキスト| to |項目テキスト| & return & (POSIX path of (|項目| as alias)) as Unicode text

を

set |項目テキスト| to |項目テキスト| & return & ((POSIX path of (|項目| as Unicode text)) as Unicode text)

に変えるとシンボリックリンクの問題は解決するようです(OS 10.4.6で確認)
>>700 さん。大切なファイル消しちゃってないですか？だとしたら申し訳ないです。

>>704
今のところ大切なファイルを消した様子はないです。
もし消していたとしても自己責任で試しているので問題ないです。
気を使っていただいてすみません。

DVDを挿入したときに風呂が起動するようにしたいんだけど
tell application "Front Row"
activate　または　launch
end tell
これで起動できないなぜ？

バックグラウンドで起動してるから

ひょっとしてAppleScriptじゃFrontRowの起動は無理ですか？

使ってないのでわからないのだが、手で操作する時はどうやって呼び出すの？

キーボードならコマンド＋ESCでメニューが立ち上がります

じゃあescのキーのコード？を調べてGUI Scriptingでそのまま再現してみたらどうでしょう。
それ以前に、DVDの挿入はどうやって検知するの？

システム環境設定の「DVDとCD」で挿入されたときにスクリプトを実行するを選ぶだけです

いつの間にかそんな事ができるように…。

key codeを調べる方法については、もう一方のスクリプトスレに載ってました。
http://pc7.2ch.net/test/read.cgi/mac/1111760449/507-508

thx
てかこのスレは発表用でしたね
移動しますありがとうございました。

>>706
当初ハックされた頃は下記のスクリプトで起動できましたが、
今は動かないような...

tell application "System Events"
tell application "Front Row" to activate
key code 53 using {command down}
delay 0.5
key code 53
end tell

あれ？　ApplescriptでiTunesから情報を取得する構文って最近仕様変わった？

tell application "iTunes"
set hoge to album of current track
end tell

前は↑こういうのでいけてたと思うんだけど、通らない。

問題ありませんが

あれー、おかしいな。なんでだろ。
「end of lineがあるべきところですがidentifierが見つかりました」エラーが
2行目最後のtrackの部分で出る。
OS X 10.4.7
iTunes 6.0.5です

あっそ

何かタイプミスがあって余計な物が入ってたりするんじゃないですか？
それか、長いスクリプトの一部なら、問題はそこじゃなくて、
もっと前にあるとか。

>>721

>>717の内容だけをそのままコピペしても、
いちからタイプし直しても通らなかったです。
が、なぜかMacを再起動させたら、
同じ内容のスクリプトで通るようになりました。謎です。

再起動させる前は、自分で書いたもの以外でも、
ネットから落としてきたiTunesの情報取得系のスクリプト全般が
動きませんでした。

再起動ぐらい聞く前に試せと言いたいけど言わない。

いろいろエラーのあるAppleScriptを試してると、
たまにおかしくなることあるよ。
「AppleScriptのホストが変になる」というのが自分の内部表現(w

>>723
後から考えるとそうだけど、
スクリプトの構文エラーと再起動って、思考が直接的に結びつかなくって。

AppleScript Studio使って作られたソフトとかあるから
そういうの使ってて何かおかしくなったりしたのかもね。

AppleScript StudioはCocoa-Javaのように消えてくだろ

LeopardにはRubyCocoaバンドルらしいので、
そっちに流れていくかもね。

>>722
俺も一部の自作スクリプトがiTunes6.0.5にしたら動かなくなった。
動かないのは、選択したトラックを取得するのに、うっかり
「set 変数 to a reference to selection」にしてなかったやつ。
これを書かないと以前から動いたり動かなかったりしてた。

質問なんですが、AppleScriptで
「アプリケーションのプロセスを待って動作させる」というようなスクリプトは作成できるのでしょうか？
例えば「QuickTimeのエンコード終了を待って次の動作に移る」等。
可能であるならばその方法を教えていただけないでしょうか？
よろしくお願いしますm(_ _)m

on idleのタイミングでエンコード中のダイアログが出てるかUI Scriptingで調べるとか

QuickTimeからresult来るまでウェイト入れた空ループじゃ駄目なの？

皆さんありがとうございます！

＞on idleのタイミングでエンコード中のダイアログが出てるかUI Scriptingで調べるとか

なるほど、、、しかし、書き方がわかりません、、、申し訳ない。



＞QuickTimeからresult来るまでウェイト入れた空ループじゃ駄目なの？

repeat with i from 1 to result
（中身）
end repeat

こういうことですか？

いまはこういう書き方をしてるんですけど、いちいちQuickTimeを終了せねばならず。
そのためフォルダアクションで複数のファイルを処理する時に失敗するんです。
（1つしかエンコードできない）

tell application "Finder"
set applist to (name of application processes)
end tell
if "QuickTime Player" is in applist then

tell application "Finder"
delete file aItem
empty trash
end tell

end if

>>706
もう見てないと思うけどスクリプト動かして起動できたよ。

iTunesの、あるプレイリスト内のムービーの「ビデオの種類」を「ミュージックビデオ」に
変更するスクリプトをどう作ればいいか分かる方はいませんか？

スクリプトエディタのライブラリを見ても、該当するプロパティ？は見つかりませんでした。

使用しているOSは10.4、iTunesは6.0.5です。

もはや発表会とは名ばかりか

質問の発表会。。ヾ(´∇｀)。。

>>562縺ｮ襍ｷ蜍輔ョ繧｣繧ｹ繧ｯ繧貞､峨∴繧九せ繧ｯ繝ｪ繝励ヨ縺後≧縺ｾ縺丞虚縺九↑縺??縺ｧ縺?

repeat until (exists button縲懊?縺ゅ◆繧翫〒豁｢縺ｾ縺｣縺｡繧?≧

迺ｰ蠅??OSX10.4.7縲｀acBook縺ｧ縺吶?√←縺ｪ縺溘°蜉ｩ縺題亜繧偵ｒ繧偵ｒ

>>562の起動ディスクを変えるスクリプトがうまく動きませんです

repeat until (exists button〜のあたりで止まってしまいます

環境はOSX10.4.7、MacBookです、どなたか解決方法を教えてください
文字化けすいません

自己解決

システム環境設定＞ユニバーサルアクセスの「画面表示」タブの一番下にある
「補助装置を使用可能にする」にチェックを入れると動きました

562さんありがとう

bless？使ってもっとシンプルなの作れなかったっけ。
まあいいや。

ほしゅ

OSX10.4で
ttp://homepage1.nifty.com/ton_b/tips/Handler/Recursive.html
ttp://homepage1.nifty.com/ton_b/tips/Reference/Plural.html
みて再帰処理でドロップしたフォルダ内全てのファイルを処理したいんだけど、
サンプルを実行するとエラーがでるんだけど。OSX10.4でなにか変わったのでしょうか？

> OSX10.4でなにか変わったのでしょうか？

リリースノートでも読め。
ttp://developer.apple.com/releasenotes/AppleScript/index.html

このスレかどこかで俺が質問したやりとりがあったような気がしたけど、
do shell scriptでコマンドのfindを使って
フォルダ以下のファイルのリストを出して
ループで順番に処理して行く方法がありますよ。

AppleScript に System Events の menu item 関係の命令で右クリックの命令なんてないよね？？

Ctrl押したまま選択とかじゃね

>>745
今回は、アップルスクリプトだけで処理を書き直してみようと思って挑戦してたのですが、駄目なようですね。
情報ありがとうございました。

pismo400MHzでOS X 10.3.9を使っているんですが、
iTunes でライブラリ中のmp3ファイルをconvert コマンドでAAC に変換しようとすると、
2分くらいでアップルイベントがタイムアウトしてしまい、作成されたファイルの参照を取得できません。
変換自体は最後まで行われますが、作成されたAACファイル(track)の情報を取得するにはどうしたらいいのでしょうか。
まあタグ情報自体は元のファイルから引き継がれるようなので、enable を false に出来ればいいんですが。

こういうこと？

tell application "iTunes"
set curEncoder to (current encoder)
set current encoder to encoder "AAC Encoder"

with timeout of 3600 seconds
set encodedTracks to (convert (selection as list))
end timeout

set current encoder to curEncoder
return encodedTracks
end tell

>752
そういうことです。有り難うございます、勉強になります！

‥‥‥、timeout って汎用的に使えるのか。

ITunesスレでと思ったのですが、こちらの方が詳しい方多そうなので教えてください。

エンコーディングし直すと消えてしまう「最後に再生した日」を
指定して設定するか、もしくは今日に設定するAppleScriptって
どうしたら良いのでしょうか？

ttp://members.at.infoseek.co.jp/obto/script/script3.html#playedcount

再生回数を変更というのは見つかったのですが...。
発表ではないのですが、よろしくお願いします。

そんな君には最後に再生した日にエンコードすることをお勧めする

どうしてもScriptで、と言うならば
>>3
のサイトを回って、Appleのサンプルを見れば、
半日もあれば書けるようになるはずだ。
ぷろぐらみんぐ知識ゼロからでも問題ない（俺）

>>754
無事できました。ありがとうございます。
今は「最後に再生した日」と現在の「再生回数」＋１に同時に処理するのが
できるよう、また勉強します。

>>755
はやっ。すげ。
あなた様の努力を前に、
適当な回答をしたことを後悔しています。

と思った矢先ですが、あいにく
＞「最後に再生した日」と現在の「再生回数」＋１に同時に処理するのが
というのが意味がわからず、今回もまっとうな回答はできません。
ごめんなさい。

>>753
--最後に再生した日を変更
tell application "iTunes"
set seltrack to a reference to selection
repeat with x in seltrack
set pldate to ((played date) of x as string)
if pldate is "missing value" then set pldate to (current date) as string
set newdate to text returned of (display dialog "最後に再生した日を変更" default answer pldate)
set (played date) of x to date newdate
end repeat
end tell

ってことで、そのページにも載せといた

safariで現在のタブから画像ファイルのアドレスを抽出するにはどうしたらいい？

>>758
ウインドウメニュー＞構成ファイル一覧

>>758
do javascript
http://www.apple.com/applescript/safari/jscript.01.html

iChatのメンバーリストの人数を調べるスクリプト
iChatのメンバーリストを前面に持ってきて実行

activate application "iChat"
tell application "System Events"
tell process "iChat"
try
set tbl to table 1 of scroll area 1 of window 1
set tblRow to row of tbl
set num to number of tblRow
display dialog num & "人"
end try
end tell
end tell

ごめん。
display dialog num & "人" as string
としないとエラーになる。

>>758
何したいのかわからんけど、lynx入れて
set imageLinks to do shell script "path/to/lynx -dump -image_links URL"
とかが手っ取り早いんじゃ？

アップルスクリプトでブラウザの
テキストボックスの入力と、ラジオボタンの選択、メニュー項目の選択を
自動で行わせ送信するやり方ってありますか？

あるね

バージョンも書かんと質問する奴ってのは絶えんもんだの。

Script Editor 2.0
Safari 1.3.2

property target_URL : ""

open location target_URL

set textboxvalue to ""
set radioboxvalue to ""
set optionvalue to ""

スクリプトやった事ないのでコレしか分かりません。
ググってもソレらしい関数が見つかりません。
やり方か説明サイト教えてくれませんか？

GUI スクリプティング
UIElementInspector

つttp://www.apple.com/applescript/uiscripting/
っttp://www.prefab.com/uibrowser/

>>768-769
有り難うございます。色々分かりました。
UI Element Inspectorでカーソルの情報を習得し、
apple scriptでウィンドウのカーソルの座標を利用して入力して行く感じですね。
apple scriptの関数はまだ知りませんが、何とかなるでしょう。

実際やるとなるとうまくいかないことが多いんだよね・・・UIって。

>>760
のdo javascriptでもできるんじゃないかな
試しにグーグルで書いてみた
tell application "Safari"
open location "http://www.google.co.jp/"
delay 2

-- 検索ワードに1~5を入力
repeat with i from 1 to 5
do JavaScript "document.f.q.value = " & i & ";" in document 1
delay 1
end repeat

--ウェブ全体から検索 日本語のページを検索のトグル
do JavaScript "document.f.lr[1].checked = true;" in document 1
delay 1
do JavaScript "document.f.lr[0].checked = true;" in document 1
delay 1
do JavaScript "document.f.lr[1].checked = true;" in document 1

--検索実行
do JavaScript "document.f.submit();" in document 1
end tell

Safari 1.3.2でdo JavaScriptができるかは知りませんけど

>>772
もの凄くいいこと聞いた。

>>772
AppleScriptの威力に驚きました！

>do JavaScript "document.f.lr[1].checked = true;" in document 1
このようなコマンドは、Safariのソースを表示して、それを目で読んで、
解析して、Javascriptに手で入力する必要がありますか？

簡単に行う裏技などはございますか？

強いて言えばFirefox/MozillaのDOMインスペクタを使うこととか。

でも、「簡単に」は無いな。
JavaScript DOMでググるといいよ。

iTunesの「ライブラリに追加」をAppleScriptまたはAutomatorから呼び出す方法を教えてください。
ScriptEditorについてる、マニュアルは一通り読んだのですがなさそぅなので。

試してないけどaddコマンドとか

>>776
tell application "iTunes" to open (choose file with multiple selections allowed without invisibles)


# 灯台下暗し

>>776
あるアプリケーションを使うAppleScriptを書きたい時は、
そのアプリケーションをスクリプトエディタで開いてみるといいです。
（アプリケーションのアイコンをスクリプトエディタのアイコンにドラッグ＆ドロップ）

複数のアプリケーションのスクリプト辞書をマージしてひとつの新しい辞書を作る AppleScript を作ってみました。

＊Script Editor が開いたスクリプト辞書の実体は /tmp に作成された sdef ファイルですので、それらを操作します。
　ちなみに辞書ウィンドウのタイトルバーのアイコンをデスクトップにドラッグすれば、/tmp にあるそれらの sdef のエイリアスがデスクトップに作成されます。

＊はじめに、Script Editor で好きなアプリケーションの辞書をいくつか開いてください。
　Macを起動してから既に何度か辞書を開いたことがあるなら、その必要はありません。

＊このスクリプトは、Saveダイアログで指定した名前の sdef ファイルを作成します。ただ、その作成されたファイルは TextEdit か何かの書類アイコンになっています。これを Script Editor で開いて、終了します。
このウィンドウに対して "Save as..." コマンドを実行すれば、正しいアイコンのファイルに置き換えることができます（ダブルクリックで Script Editor が開く。）

＊ マージされた辞書のなかで "Standard Suite" などが重複しないようにしていますが、例えば iTunes ではこの部分の "****" という文字列が "????" になっているので、別のスイートと解釈して重複します。

＊基本的にクソです。