AppleScript アップルスクリプト 質問、発表 2

質問、発表どっちでもスレ。

・前スレ
AppleScript アップルスクリプト 質問、発表
http://pc11.2ch.net/test/read.cgi/mac/1174045850/
・関連旧スレ
【標準装備】スクリプトエディタ
http://pc9.2ch.net/test/read.cgi/mac/1111760449/
おもろい、めずらしいアップルスクリプト発表会 6
http://pc7.2ch.net/test/read.cgi/mac/1117979906/

・参考リンク
AppleScript ヘルプ
help:///Library/Documentation/Help/AppleScript.help
発表まとめ
http://members.at.infoseek.co.jp/obto/script/script.html
MacWiki - AppleScript
http://macwiki.sourceforge.jp/cgi-bin/wiki.cgi?AppleScript
AppleScript PARK
http://www.tonbi.jp/AppleScript/
TN2065: do shell script
http://developer.apple.com/jp/technotes/tn2065.html
http://developer.apple.com/technotes/tn2002/tn2065.html

2ゲットもされないとは

このスレ動くのか？

repeat
　　set 1san to "乙"
end repeat

>>3
ブーーン

フォルダアクション用のスクリプトを作りたいのですが、フォルダAの中に入れられた、
フォルダBの中身をカウントしてパスをとりたいのですが、どうしたらいいでしょう？

アクションのついてるフォルダAの中身やカウントは出来るのですが、その中に入れられた
フォルダの中を見るのが出来なくて．．．．．

>>6
do shell script　 "ls"

>>6
どういう風にできないのか、状況が今一よくわからない。
とりあえずscriptみせてくれ

フォルダアクション以前に、フォルダの中を見ることは出来ているか？
処理を切り出して、スクリプトエディタ上で動作するか？　イベントログを確認したか？

Safari 3.0.4(523.12PPC) Mac OS X 10.4.11
カレントページのリンクを順にTABで開く
(最大5個だけ開く、delay 3 / 重複もマーカーも見境無しに新規TABで開く)
----------------
tell application "Safari"
set theWindow to front window
set theTab to current tab of theWindow
set linkNum to do JavaScript "document.links.length" in theTab

if linkNum > 5 then
set linkNum to 5
end if

repeat with index from 0 to linkNum - 1
set aJSS to ("document.links[" & index as string) & "].href"
set aLink to do JavaScript aJSS in theTab
tell theWindow
make new tab with properties {URL:aLink}
end tell
delay 3
end repeat
end tell
----------------
window に tel l すると make new tab できるんだ

やりたい事は、フォルダAの中にフォルダBが入れられたら、フォルダBの名前を参照して、
別のHDのフォルダBと同名のフォルダに、中身をコピーするといったスクリプトを作りたいんです。

で、入れられたフォルダの名前とかは見れるんですが、その中のファイルをいじれなくて．．．
中身をコピーとか、どう書けばよろしいんでしょうか？

Finderのduplicate命令を調べればいいのかも。

>>10
>window に tel l すると make new tab できるんだ

お、Stand入れてるから気付かなかったよ。

前スレが1000近くだったので，仕事から帰ってきたらdat保存しようと思ってたら，
もう落ちてた……．1000まで行ったのかな？ どなたか，datファイルをアップして
いただけませんか．

>>14
ttp://dat.hitobashira.org/mac/dat/1174045850.dat
どぞ

>>11
知りたかったのはこれか？

on adding folder items to of this_folder after receiving theItems
theNameToDialog(theItems)
end adding folder items to

on theNameToDialog(theList)
repeat with aItem in theList
if character -1 of (aItem as text) is ":" as Unicode text then
tell application "Finder"
set theItems to (items of aItem)
end tell
theNameToDialog(theItems)
end if
display dialog aItem as Unicode text
end repeat
end theNameToDialog

>>6>>11
Automator使ったことはあるか？　アクションがいろいろ用意されてるから、そっちの方が楽だと思うぞ。
フォルダの内容を取得、Finder項目をコピー、とか目的にすぐ適うのもある。

>>17
逆におまえに使ったことがあるのか聞きたい

>>15
ありがとうございます．助かりました！

質問です。

tell application "Mail"
　set aMessages to selected messages of message viewer 1
　set aMessage to reply item 1 of aMessages
　set subject of aMessage to "something"
　set content of aMessage to "some content"
end tell

というテストをしています。
1. Leopardではreplyコマンドでoutgoing messageをもらえるようになったみたいですが、
setしようとするとsubjectの行で
「Mail でエラーが起きました：AppleEvent のハンドラで誤りが起きました。」
と怒られます。
ただしsubject自体は変わってます。
これってやっぱりバグでしょうか？

2.replyするとまず不要な新規メッセージが開いて次に返信のメッセージが開くのですが、
返信だけ表示させるにはどうしたら良いでしょうか？

ショック
前スレ最後のほうdat取得する前に落ちちゃった・・

QuickTimeで参照ムービー形式で保存できない。調べるとバグっぽい。
これってまだ直ってないのかな？
http://blog.so-net.ne.jp/MyCometG3/2005-06-25

バカ発見

>>23
何のことを言っているんだ？

既に開いているTerminal.appのウインドウ上で
シェルコマンドを実行させるにはどうすればよいでしょうか？

tell application "Terminal"
　do shell script "ls"
end tell
ではスクリプトエディタの標準出力に結果が返ってきます。
do script "ls"
とすると、Terminal.app上で実行されますが、
必ず新規のウインドウ上になってしまいます。

tell application "Terminal"
　tell window 0 of application "Terminal"
　do shell script "ls"
　end tell
end tell
のようにしても結果は同じでした。
OSは10.5.1を利用しています。
すみませんがお願いします。

事故解決しました。
tell application "Terminal"
do script "ls" in window frontmost
end tell

>>16
おかげさまで、記述のスクリプトを参考にして出来そうな感じです。
ありがとうございます。

>>17
Automatorは最初に考えましたが、そこまで凝った事はできないですよね？
こちらの設定が悪いからかな．．．

>>27
>>16の記述一カ所間違いを見つけた。気づいとるかもしれんが
if character -1 of (aItem as text) is ":" as Unicode text then 　のところを
if character -1 of (aItem as Unicode text) is ":" as Unicode text then
になおしといてくれ

applescript使って、任意のフォルダを起動しているToastにドラッグする方法ってありますか？あったら書き方を教えて欲しいです。

>>29

set theFolder to choose folder

tell application "Toast Titanium"
set myDisc to make Data disc
add to myDisc items theFolder
end tell

たとえばデータディスクならこんな感じ。

訂正
１行目は
set theFolder to (choose folder as list)
が正しかった（あのままでも暗黙の型変換されて動くけど）

add to という名前とは裏腹に、add toするたびに入れ替わっちゃってるみたいなんで
あらかじめ書き込みたいフォルダ（やファイル）のlistを作っておいて、一気に
add toしないとだめなようです。

訂正の訂正（ごめん）

>add to という名前とは裏腹に、add toするたびに入れ替わっちゃってる
これは嘘でした。
実験用のスクリプトで毎回make Data discしちゃってたミスです。

＿＿＿
←樹海|
￣||￣ ┗(´･ω･` )┓三 ちょっと出かけてくるがな
　 ||　　　 　┏┗　 三

ここに誤爆してたか…すまぬ(´･ω･`)

サンプルにすら入ってるkey up/downがまともに動かないけど、
これはバグなんかな

何故か全部"a"に化ける

>>32
おお！有難う御座いました。早速試してみます。

Leopard発売を記念して、オライリーがAppleScript: The Definitive Guideを
和訳して出版してくれるとありがたいんだが。
これを通読するとスクリプトを書くのに迷いがなくなる。

英語覚えろbyオラオライリー

スクリプトをバックグラウンドで実行したいのですが
どんな命令を書いたらいいでしょうか。

LSBackgroundOnly

Camino1.6用

カレントタブの

タイトル
URL

のようにコピー。

tell application "Camino"
set TandU to title of current tab of window 1
set TandU to TandU & return
set TandU to TandU & URL of current tab of window 1
set the clipboard to TandU
end tell

>>40
ありがとうございます。
これだと、メニューやウインドウが使えないみたいなんですが
自分で自分をバックグラウンドにする命令
ってのはないんでしょうか。

Caminoアルファ版のツールバースクリプトは面白いんだけど12インチ画面だと微妙。

>>42
用語に混乱が見られるんだが、たとえば
set the_app to "Safari" as unicode text
tell application "System Events" to set visible of application process the_app to false
これで、アプリケーションメニューの｢なになにを隠す｣を実行したと同じ操作になる。

いましがたクラッシュレポーター送信したんですが、どうもdisplay alertでgiving upを使い、
かつボタンが１つでそれがキャンセルボタンだと、100％クラッシュするようですね。
display alertっつうぐらいだから、キャンセルボタンをデフォルトボタンにしたいけど、拒否
されるので、キャンセルボタンのみのダイアログを作ったら、この事故に遭遇しました。
検証コード：
-- This works.
--display dialog "cancel button 1 + giving up" buttons {"1"} cancel button 1 giving up after 60

-- This also works.
display alert "cancel button 1 + giving up" buttons {"1", "2"} cancel button 1 giving up after 60
-- 次のダイアログが死亡フラグ
-- But this makes the script editor ***CRASH***.
display alert "cancel button 1 + giving up" buttons {"1"} cancel button 1 giving up after 60

>>45
再現性のある問題コードを洗い出した点は乙。
10.3.9で止まっているので、display alert関連は一切試せないのだが、
「キャンセルボタンの指定がデフォルトボタンの指定無しにできる」って
AppleScriptのひどい仕様だと思うな。

デフォルトボタンもキャンセルボタンも同じにしたければ、次のようなコードに
してはどうだろう。
display dialog のキャンセルボタンはESCキーでキャンセルが反応するから。
ただし、ボタン名が"キャンセル"と"Cancel"の二択になる上、
エラーコードを必ず返すのでtry構文を使う必要が出てくる。
>>45のやりたい事の希望には添えないかもしれん。

display dialog "キャンセルしかできない" buttons {"キャンセル"} default button "キャンセル" with icon stop giving up after 60

確認して無いけど、拒否されるって時点で既にバグじゃないの？

AppleScriptを特定のキーショートカットで実行しようとしています。
(10.5.1, Mail 3.1)

ぐぐって出てきたMail 2.0のHelpによると、
ttp://docs.info.apple.com/jarticle.html?path=Mail/2.0/jp/ml1083.html
たとえばCtrl-Oで起動したければ
"~/Library/Scripts/Mail Scripts"にスクリプトを保存し、
スクリプトのファイル名末尾に「___ctrl-o」を入れて
「スクリプトメニューをアップデート」するとよいように
書いてあります。しかし、Leopardのスクリプトメニューには
そのメニューがありません。
スクリプトメニューから手動で実行するとちゃんと動作するん
ですが、希望するショートカットでは動作しません。
さらに、ぐぐって出てきた他のページでは「___ctrl-」ではなく
「___ctl-」となっているのでそれも試しましたが動作しません。

この仕様はLeopardでは削除されたのでしょうか。

昔はMail.app自身がスクリプトメニュー持ってたけど、その頃の話じゃねえべか？　Tigerでも動かない。

こういうのみつけた。
http://lists.apple.com/archives/applescript-users/2003/Oct/msg00823.html
http://www.sfc.wide.ad.jp/~gen/blog/archives/2006/01/script_menu.html
http://www.microsoft.com/japan/mac/column/contents/98.mspx (*5)の説明のとこ

>>45
スクリプトエディタからの実行ではクラッシュしなかったのだが
やり方が違うのか？

>>49
当方 10.3.9、Mail 1.3.11 の環境ですが、
Mail のメニューバーの巻物印をクリックすると、たしかに
上から２番目に「スクリプトメニューをアップデート」ってのがありますな。

解答になってないけどこんなのもあるよ
ttp://www.red-sweater.com/fastscripts/

>>45
giving up after ...を書かないと

キャンセルボタンをデフォルトのボタンにすることはできません。

というエラーメッセージが出るね。
AppleScriptというよりも>>45をコンパイルできてしまうスクリプトエディタのバグなのでは。
@10.4.11

OSX 10.5.1 Intelでは
display alert "Danger, Will Robinson!" buttons {"OK", "Cancel"} default button 2 cancel button 2
と書けるし
display alert "cancel button 1 + giving up" buttons {"1"} cancel button 1 giving up after 60
もcrashしません。

レパード欲しいのう。。。

http://blackbird.cocolog-nifty.com/progtalk/2007/03/itunes_f4ed.html

このサイトで紹介されている30分後にMacを終了するスクリプトを実行してみたところ
「NOT super user」と表示され、実行されません。権限が無い？とかそういったことかなと
思うのですが、解決方法を分かるかた教えてください。よろしくおねがいします。

書き忘れましたが当方 OS10.5.1です
初心者質問で申し訳ないですがよろしくお願いします。

件のページにそうコメントしてスクリプト直させれw

>>56
管理者権限でないと動作しないスクリプトなんだろうよ。
アカウント設定で管理レベルを上げて使うしかないだろう。

>>59
ありがとうございます。しかし、管理者権限でログオンしても何も変わりませんでした
何か別の手順があるんでしょうか？

>>56

delay 1800
tell application "Finder" to sleep

これでやってみて

do shell script "Sleep 10"--これなら10秒
tell application "Finder" to sleep

こっちはTigerだけど、上の通りで、スクリプトエディタからの実行でも問題なく動いたよ。
内容的にも、通常のユーザー（＝管理者だよね？）で問題ないはずだけど。
LepardではスーパーユーザーじゃないとSleepが使えないのか？
ターミナル起動してSleep 10って入力してリターンで、10秒後に次の行が出るか試してみたら？

ありがとうございます。教えていただいた方法で無事動きました。

自分の書いたスクリプトはこんなかんじだったのですが、shutdownがいけなかったんですね。
ありがとうございました。
do shell script "shutdown 180"
tell application "Finder"
shutdown
end tell

ああ、なるほど。
do shell script "sleep"　の sleep は、Macをスリープさせるのではなく
コマンドの実行をしばらく休むというものでした。だから、ここは書き換えちゃ
ダメだったんです。
（ほんとは、AppleScriptにdelayコマンドがあるんで、それを使えば簡単なんですが）

むしろこんなのをスクリプトメニューから実行した方が邪魔にならなくていいんでは

#!/bin/sh
sleep 10
osascript -e 'tell application "System Events" to shut down'

あと、shut downとかsleepとかのパワー関連はFinderでなくSystem Eventsにtellするのが流行りらしい、というかOS Xでは推奨。

Apple Eventのログ取ると分かるけど、Finderにtellしても
結局System Eventsに下請けに出されてる。プロセス関係もそう。

そのうち
tell application "Finder" to sleep
なんて書いたら

AppleScript エラー
変数 sleep が定義されていません。

て怒られるようになるんだろうか。

そっちのほうがいいなあ

CDを挿入すると自動的にitunesが立ち上がり、ビットレート選択画面が表示され、
選択すると自動的に音楽の読み込みが始まるような動作ってapplescriptでできますか？

知らんけどコンパネの「CDとDVD」の設定で自分で作ったスクリプトでも設定しておけば良いんじゃない？

>>65
スクリプトメニューからシェルスクリプト実行できるの？

iTunesは自動で立ち上がらないか？
自動で読み込むのもiTunesの設定でできるな。
毎回ビットレートを選択したいの？

>>71
うん。
ただしターミナル上で実行される訳じゃない。

>>71
>スクリプトメニュー - route99 の日記
ttp://slashdot.jp/~route99/journal/78037

>>56
このスレはさ、1から作ってくれっていう初心者の質問にも答える人とかいるぐらい
優しい人が多いんだけどさ、それにしても他のサイトにも同じ質問するなんて
たとえ初心者でもルール違反だぜ。

同じ質問するなら、同じ日に書くんじゃなく少し時間をあけて若干質問内容も変えようよな。

1から作ってくれっていう図々しい奴もそうだが、こういうこと平気でやってると
ここのいい人たちも答えることしなくなってスレが枯れてくんんだよ。

はっきり言うけど、マジやめろよな。初心者だからという言い訳はすんなよ。

人間としての初心者だろうから大目に見てやれよ。

ほんとこのスレの連中には驚くというか、呆れるというか。
親切ってよりもASジャンキーで、解決する課題に飢えてるんじゃないかとも思える。

>>76
そういう問題以前の話しだろ。自分で自分の首を締めるつもりか？

大体他のサイトでも同じ質問するなんて、答えてくれた人たちに対して失礼もいいところだ。
まだ1から作ってくれってホザいてる方が、かわいいよ。

まあまあ、もういいじゃないか
こうやってあちこちで嫌われて損するのは本人なんだから

>>72
itunesは立ち上がるんですが、動き方として、
CDを入れるたびにitunesが立ち上がって、それだけでなくビットレートの選択も聞いて欲しいんです
CDごとにビットレートを微妙に変えたくて…
細かい注文ですみません。

>>70
ヒントをありがとうございます。
ここで設定できそうですね。あとはスクリプトを用意すれば…
itunes関連のサイトは多いのですが、ビットレートはなかなか見つかりません。

69はAppleScript書けるの書けないの？
書けるならiTunesがAppleScriptからビットレート変更したりできないの
すぐ分かると思うが。mp3ならiTunes-LAME使ったら？
AACは知らん。ffmpegとかか。

>>82
回答ありがとうございます。itunesから乗り換える気はなかったのであきらめることにします。
asは細かい文法は全く分かってないです。

エンコーダの種類は変えられそうだけど。
ビットレートの変更は，なんとかなんとかでマウスクリックとか制御してやるとできそうじゃんん。
まったく無理じゃないと思う。
面倒だから作らないけど。

>>84
なんとかなんとかって Cliclick のことかなぁ？
>Cliclick
ttp://www.bluem.net/downloads/cliclick-en/

GUI Scripting のことかと思ったら違ったのか。
しかしいろんなソフトがあるもんだなあ。

暮れも押し詰まってきてるというのに，どっぷりAppleScriptにハマってます．

ところで，以下のようなリストあるとします．
{"コスモタイガー2", "コスモゼロ", "ブラックタイガー", "コスモゼロ"}

"コスモゼロ"という項目が重複していますが，リストの一部が重複しているかどうかを
判断させるには，どうしたらいいのでしょうか．containsではその項目が存在している
ことがわかっても，重複まではわからないですよね，たぶん……．

>>87
リストを別のリストにコピーするってのはどうよ
一つずつコピーしていって、その都度コピー先に含まれるかチェックする
入っていたらスキップ、とか

>>88
例えば，"コスモタイガー2"を抜き出し，
{"コスモタイガー2", "", "", ""} ← {"コスモタイガー2", "コスモゼロ", "ブラックタイガー", "コスモゼロ"}
containsを使えばということだと思うんですが，これでは全てが対象になってしまうと思うんです．
実際似たようなこと考えて，元リストから複製リストを作成して一つずつ比較してみてやったりしました．

ということではなく，なにか自分が勘違いしているのかな？

Essential Sub-routines
List Manipulation Routines
http://www.apple.com/applescript/sbrt/sbrt-07.html
COUNTING OCCURRENCES OF AN ITEM IN A LIST

>>90
たぶん重複している項目の数を結果として示すスクリプトだと思うのですが，
英語苦手なのでよく内容はわかりません．該当しそうなものを使ってみましたが，
OSX向けなのでエラーが出てダメでした．

でも，情報ありがとうございました．

>>89
最終的に何がしたい。
リストにダブりがあるかどうか知ることが最終目的ではないだろ

こういう意味ではないのか？

set theSource to {"a", "b", "b", "c"}
set theDest to {}
repeat with theItem in theSource
if theDest does not contain theItem then
set theDest to theDest & theItem
end if
end repeat
theDest

>>93
does not containを使えばいいのかあ，それが >>88 の指してることなわけですね．
なるほどです．あとは，theSourceとtheDestの比較をすれば，そのリストで項目が
重複しているかどうかわかりますね．

ありがとうございます．感謝します．

うちの場合、OS9でなら重複チェック等はTanaka's osaxで簡単に済ましてる

プログラミング初心者ですが、よく理解できない状況を見つけましたので質問させて下さい。
Mac OS X 10.4.11 スクリプトエディタ2.1.1で
set f to resource path of main bundle
としてアプリケーションバンドルとして保存しようとすると、

この identifier の後に property を書くことはできません

と言われ　resource path がハイライトされてsyntax error になります

set f to (resource path of main bundle)

では

“,” があるべきところですが property が見つかりました。

でpathのみのハイライトで、同様にエラーです。

set f to path to me
ならばちゃんと保存も出来てパスも帰ってくるので、
これを使って.app:以降のパスを入れたら目的は果たせそうなのですが、
バンドル内部のパスを取得する方法として、
広範に紹介されているらしい最初の構文がなぜ私の環境で構文エラーになるのか、
気持ちが悪いのでもしどなたか御指導いただけましたら幸いです。

AppleScript Studioで使うものなのでは？
http://developer.apple.com/documentation/AppleScript/Reference/StudioReference/sr1_about/sr_about.html

>>96
set my_path to (path to me)
set scpt_path to (path to resource "main.scpt" in bundle my_path in directory "Scripts") as Unicode text
set icon_path to (path to resource "applet.icns" in bundle (path to me))
display dialog scpt_path with icon icon_path

resource pathなんて聞いたこと無い。
AppleScript Studioで使うやつかな?

かぶったｽﾏｿ

>>97, 98さん。素早い返答ありがとうございます。
なるほど、スクリプトエディタではない別の環境で動く構文なのですね。
この件といいosascriptではまたちょっと違う等、
なかなか複雑という印象ですね。
ひとまずやりたい事は出来そうです。
重ねてお礼申し上げます

アプリやOSAXごとに全然世界が違うし、
バッドノウハウみたいなのもたくさんあるし、
AppleScriptは頭を柔らかくしないと。

昨年もいろいろ皆さんに教えていただいたおかけで，アルゴリズムを考えるための
Scriptを60近く，実用にたえるAppletは，5つほど作成することができました．
心から感謝します．今年もよろしくお願いいたします．

>>95
name containsとか便利ですよね．でも，あまりに便利すぎて
OSXに移行するとき困りそうなので，二の足踏んじゃうんですよ．

Finder でいくつかファイルを選択した状態で

tell app "Finder"
item 1 of selection
end tell

を実行するとエラーになるのは何故なんだぜ？
もしかして俺だけですか？

tell app "Finder"
set a to selection
item 1 of a
end tell

だとうまく行くのに。

>>103
item 1 of (selection as list)

なぜかは聞くな

>>104
な、なるほど・・・？
OS 9 の頃とは細かいところで変わってるんだなあ・・・

AppleScript にだってバージョンがあるんだぜ

文法とかの細かい変更は仕方ないにしても
バージョン上がってもOS9時代よりアレなのもどうかと

tell application "Finder"
display dialog "1: class of selection = " & class of selection
display dialog "2: class of (get selection) = " & class of (get selection)
end tell

こういうマニアックなポイントを覚えとくのがこの言語の「かんどころ」とでもいえるのだろうが、
基本的に仕様ミスだなあ。ちょっとしたファイル操作スクリプト書こうと思ってやってみたのに
こんなんでエラーになってAppleScript投げ出すひとって大勢いそうだし。
レオでもこのままなのか？

今，Jon's CommandsというOSAXでwalk foldersという命令を使っているのですが，
作成したスクリプトを動作させる度に，スクリプトの容量がどんどん増えていくという
とんでもない不具合(?)に悩まされています．

walk foldersを利用されている方，どうやってこれを解決されているんでしょうか……．

スクリプト晒さない事にはOSAXのせいかどうかもわからない

109のwalk folders件ですが，いろいろと試行錯誤してはみたものの，
結局Jon's Commandsを使う限り不具合は解消されないようですので，
諦めることにしました．

ここにあるね
ttp://homepage.mac.com/tkurita/scriptfactory/Monologue/ClassicContents/BugsInTheLife/walkfolders.html

それにしても、おまえは自分で組んだscriptを晒さないね

ScriptFactoryさんのことは知っていての質問だったわけですが，
結局そこに書いてある通り，無理だったことが身をもってわかりました．

それから，自分の質問内容が気に入らないであれば，スルーして下さい．

コテを付けてください。

いや、俺は外したままでいてくれた方が落ち着くw

OS9なら普通はTanaka's osaxの MT List Files とか使うから
そんな不具合有るものわざわざ使わないよ。

>>116
OSX移行するとき，MT List Filesが足かせにならないかって心配してまして，
でも，OS9専用ってことで割り切ってTanaka's osaxを利用することにします．
ありがとうございます．

そんな心配は無用です。
OS9>XでAppleScript自体の仕様も相当変わっているので
どのみち書き換えが必要になりますw
Xになってからも、細かく仕様変更がされていてスクリプト変更してるくらいなのでorz

時代とともに言語 / API 仕様がかわるのは当たり前。
Objective-C も Ruby も Java も C も C++ も Fortran も
PHP も Perl も C# も、みんな変わってるじゃないか。

でも、ちゃんとバージョンごとの仕様を明確にしてほしいな。
特に下位互換性がない変更の場合。

今さらですけど，Tanaka's osaxのファイルリストアップは，Jon's Commands
のそれよりも扱いが簡単で，フィルターも強力ですごい便利．もっと早く利用して
おくべきだったと，ちょっと後悔．

OSXで書き換えが必要になった時，Tanaka's osaxに替わるOSAXがあるのかどうか，
激しく心配ですけど，一度便利なものを知ってしまうと，もう後には戻れませんね．

Tanaka's osaxのMac OS X版を作るプロジェクトとか、やればいいのかねえ。

旧板にはAppleScriptのスレは無いのかね？

applescript-usersって公式メーリングリストあるけど、投稿量が多すぎてついていけず
退会したけど、ちょっとのぞいてみりゃあ>>121-122みたいな心配はいらんと知るよ。

OS XではUNIXのツール群が使えるし…
OS9でAppleScript勉強中氏も、そんな埃かむった小道具いじってる時間をbashなり
perlなりを勉強する時間にあててみてはどうかね。

OS9でもJperlやらいろいろ有るけど
アプリ操作やアプリ間連携動作やらが簡単に出来るからAS使ってるわけで
データ処理とかプログラミングがしたいわけではないのでw

偏屈な人だw

いや埃かむった小道具って言ったのは、ASのことではなく、メンテされなくなった
機能拡張とかのことですわ。AppleScriptの中でUNIXのツール群が使える（又はその逆）
ってのは９とXの最大の違いではないか。正規表現使いたければdo shell scriptの中に
ごく普通の言葉（世界標準の書き方）で書けばいいわけですよ。あるいはターミナルでの
ファイル削除でもゴミ箱を経由させるように、シェルスクリプトの中でtell application Finder
したり。

>>126
124さんと同じことをやりたいので，AppleScript．
ちょっと違うのは，AppleScriptに関連するものは何でも興味津々．
PerlもbashもデータベースのFileMakerとかも．OSAXも作ってみたい．

OSXに移行した時にはもう，UNIX三昧しまくりしちゃいますよ．はい．
以上，できるできないは別として，素人のたわ言です．チラ裏終わり．

俺はシェルスクリプトにGUIをかぶせるためにapplescriptをかじった。
applescriptは（もw）ド素人。
でもapplescirptはCUIに拒絶反応ある人にお手製ツールを使ってもらうのにいいよ。

文字コードを気にせずに文字データのやり取りが出来るようにならないかなー。

リストのソートも，命令一つでできるといいのになあ．

osax使えばsort命令一つで出来るぉ

>>131
何のOSAXかは知らないけれど，リストソートできるものがあったなんて．
リファレンスのシェルソートサブーチンを，ずっと使ってましたよ．

AppleScriptでデフォルトWebブラウザを知る方法は無いでしょうか？

>>133
「AppleScriptでデフォルトWebブラウザ」でググったら1件目で出てくるんだぜ

書いてある様にdo shell script "defaults read 〜"するか、
Tiger以降ならproperty list itemでも一応取れるか

最近のgoogleは賢いなあ

>>134 ｽﾏﾝﾃﾞｽ(´・ω・`)
やはりplistを直接見るしかなさそうですね

やりたかったのはデフォルトブラウザの起動でした
とりあえずこうしました＠OS X 10.4.11

my OpenWithBundleIdentifier(my GetBundleIdentifierForProtocol("http"))
on OpenWithBundleIdentifier(string_identifier)
do shell script "open -b '" & string_identifier & "' > /dev/console"
end OpenWithBundleIdentifier
on GetBundleIdentifierForProtocol(string_protocol)
tell application "System Events"
set plistAlias to (file "com.apple.LaunchServices.plist" of preferences folder) as alias
end tell
set plistPath to (POSIX path of (plistAlias as Unicode text))
tell application "System Events"
set plistFile to (property list file plistPath)
set handlerArray to (value of property list item "LSHandlers" of contents of plistFile) -- record の list になる
repeat with n from 1 to (count of handlerArray)
try
if (|LSHandlerURLScheme| of item n of handlerArray) is equal to string_protocol then
return |LSHandlerRoleAll| of item n of handlerArray
end if
end try
end repeat
end tell
return ""
end GetBundleIdentifierForProtocol

>>131
そのまんまの名前のOSAXがありましたね．これは嬉しい．早速使ってます．

どういう理由かはわからないけど，ドロップしたファイルというのは必ずしも
ファイル名順には変数には読み込まれないようで，処理する時に困ってたんです．
というわけで，助かりました．

>>137
ファイルのリストだったらFinderでソートできますよ。
tell application "Finder"
set theList to selection
sort theList by name
end tell

>>138
Finderのオブジェクトならいけるみたいですね．でも，Finderの悪しき影響を
受けちゃってるみたいで，例えば1,2,10のファイルだと1,10,.2になっちゃいます．
OS9だとそうなるんですけど，OSXでは改善されているのかなあ．

>>139
osxは改善されてる

>>139
その手の問題は、昔からNatural Orderで解決済みです。

>>140
教えていただいて，どうもです．

>>141
Natural Orderは使ってて，確かにFinder上では問題ないです．
ただ，AppleScriptの扱いはNatural Orderのそれに準じないようです．

Finder で sort by name してもダメなんですか？

>>143
ダメですね．今はもうOSXが主流だから事実上問題ないと思いますけど．

>>144
うちのOS9.2.2/AS1.8.3/Natural Order の環境では
OSAX sort でも Finder で sort by name でも問題なくNatural Order で並びます。

>>145
ちょっと確認したいんですが，>>131に書いてある通り，Finder上から見える
ファイル名の並びではなく，ファイルをドロップした変数に読込まれる順番という
ことですよね．

Natural Orderを使えば，1と2と10というファイル名をドロップした時に，
変数の中が，1，10，2　のファイル名にはならないっていうことでいいですか？

うちの環境は，OS9.2.2/AS1.8.3/Natural Order 1.4です．

＞ファイルをドロップした変数に読込まれる順番
ではなくて、変数に読込んだ後script上で

＞Finder で sort by name

>>147
on open dropList
dropHandler(dropList)
display dialog dropList as Unicode text
end open
to dropHandler(dropList)
tell application "Finder"
set dropList to selection
sort dropList by name
end tell
end dropHandler

ということはではなくてですか？

ということはではなくてですか？ じゃなくて，
ということですよね？　ということです．

すいません。流れをぶった切って質問です。

UI Elements Scripting ("System Events")でgetしたstatic textから実際のtextを
得るにはどうすればいいのでしょうか。

具体的にはこのような感じです。
tell application "System Events"
tell process "Safari"
tell UI element 1 of scroll area 1 of group 3 of window 1 set theStr to static text 1 of group 7
end tell
end tell
end tell

このtheStrは
static text "theSampleString" of group 7 of UI element 1 of scroll area 1 of group 3 of window "Connection Status - PPPoE" of application process "Safari" of application "System Events"

の形で得られます。ここから "theSampleString" を得たいのです。
theStr as text, theStr as unicode text, contents of theStr
あるいはcontents of (static text 1 of group 7)、すべてダメです。

@ Mac OS X 10.4.11 , AppleScript 1.10.7 , Safari 3.0.4

value of

うまくいきました。
ありがとうございます。
value of、わすれてました

sortの件，自分のスクリプトの書き方が悪いのか，環境が悪いのか
わかりませんが，いずれにしてもFinderは使わずOSAX利用にします．
OSXが改善されているんであれば，この件はもう問題ないと思いますので．

おまえ　OS9でAppleScript勉強中　だろ
珍しくスクリプトを晒したな、では教えてやる
（OS9でAppleScript勉強中でなかったらすまん）

>>148 のスクリプトは根本的に間違ってるぞ
まず、ハンドラを呼び出しといて返り値を受け取るようになってない
次に、ハンドラに渡した引き数をハンドラ内で上書きして消している
そのまた次ぎに、ハンドラから返り値を戻していない

俺んとこはOS9環境じゃないから最終的にちゃんとソートされるかどうかわからんが
修正してからもう一回やってみな、たぶんできるんじゃなか

他にもハンドラの指定とか色々抜けててコンパイルすら通らなさげ

コンパイルはできるよ、ただ機能してないだけ

機能してないスクリプトを書いた本人です．理解の無さがそのまんま
露呈するカタチになってしまいました．いろいろと指摘して頂いた方，
ありがとうございました．

ハンドラのこといまだによくわかんないですけど，まあいっか．

ハンドラーを理解するのは難しいね

ハンドラ（この場合サブルーチンか）に渡されるのは「値」。
引数に変数を書いても、その変数の中身の値だけがわたされる。
だから、ハンドラ内で変数をいじくっても、それは呼び出した側にはなんの影響も
およぼさない。

set a to 10
my plusone(a)
display dialog a

to plusone(a)
set a to a+1
end
こんなにしてもaは10のまま。

ハンドラから返されるのも値。
ハンドラのなかでいちばん最後に使った値がそのまま返される。
明示的には、return ほぎゃほぎゃ の形で返す。

さっきのは
set a to 10
set a to my plusone(a)
display dialog a

to plusone(a)
return a + 1
end plusone
こうかけばよかった。

以上の話をぶちこわすglobalとかpropertyとかもあるんだけど、それはまたそのうち。

>>156
my指定するか、scriptで囲ってtellなりofなりで指定するかしないとエラー出なかったっけ？
無視されるだけだっけか

手元に無いからわからん

myを使うのは、アプリケーション内での処理から、ハンドラ呼び出すときとかに必要

普通のハンドラ（サブルーチン）はscriptで囲う必要なし
そのルーチン自体にpropertyを埋め込んで何度も使いたい場合なんかに使うかな...
でも、あんまり使ったことはないな

ありゃ、勘違いして憶えてたのかな
指摘サンクス

>>159
サブルーチンで処理した結果が，returnで戻ってセットされた変数に入る
ということなのかな．でもそれを，>>148のdropletにどう生かせばいいのか……．

on open dropList
set dropList to dropHandler(dropList)
display dialog dropList as Unicode text
end open

to dropHandler(dropList)
tell application "Finder"
sort dropList by name
end tell
return dropList
end dropHandler

こうではないんだろうなあ，並び替えられてないし……．

Leoparedです。お聞きしたいです。Spotlightでスクリプトの中身の検索出来ないのでしょうか？
テキスト形式で保存してもヒットしません。昔は出来たような気も（テキストエディタで書いてたのだけだったのかな？）したのですが。
索引作り直してたら（壊れたのかな？と）ねむねむです。やっと終わった。でも作り直してもだめでした。実はARIAを見てただけってのは内緒。


あと、盛り上がっている話題のはこのような書き方でいいのですか？ --横でごめんなさい。しかもここで書いて動かしてない。だったら書くなよ。
...でもせっかく書いたのを消すのも、、、いや、消せよな！！！明日ためそう。ちゃんと全部書いて。

--本当はここに（オープンハンドラの前に）runハンドラを作っておいた方がいいと思う。デバッグの時のために。
on open dropList
　　set dropList to dropHandler(dropList) of me --同じスクリプトの中のをを呼び出す時は一応付けるようにしている of me 解ってないけど。あと返しの受け皿を。
　　　　　　　　　　　　　　　　　　　　　　　-->>161さん　of me　とかの本当の意味をもう少し詳しく教えてほしいです。間違えてつかってた？
　　display dialog dropList as Unicode text --これじゃ見にくいよね、repeeat でまわして item i of dropList & return でlogをとったほうがよいとおもう。
end open

to dropHandler(dropList)
　　tell application "Finder"
　　　　--set dropList to selection --これがいらないっていわれてるやつ。いらないです。
　　　　set dropList to sort dropList by name --ソートしたのをセットしなおさないといけないです。
　　　　--あ、同じ変数じゃだめ？いけるよね？あれ？これってリスト？オブジェクト？
　　end tell
　　return dropList --値を返してあげましょう
end dropHandler

カキコ確認したら>>148さんが...もっとまえからおられたのでしょうが、148から見てた。
ねむねむついでに。おやすみなさい。

on open dropList
　　　　set dropList to dropHandler(dropList) --はい、リターンの受け皿です。ハンドラの戻り値は変数にセットするのです。
　　　　display dialog dropList as Unicode text
end open

to dropHandler(dropList)
　　　　tell application "Finder"
　　　　　　　　--sort dropList by name --ここが間違えています。ソートした受け皿も必要なのです
　　　　　　　　set dropList2 to sort dropList by name --なんかこわいから2をつけました。いや、いらないと思うけど回してないから。
　　　　end tell
　　　　return dropList2 --これでいいです。返して上げたい変数を入れます。2に変えています弱虫です。
end dropHandler

>>164
>>165
眠い中，丁寧な解説ありがとうございました．
レスを参考に書き換えて実行したら，見事にできました．めちゃくちゃ嬉しい．

on open dropList
set dropList to dropHandler(dropList) of me
repeat with i in dropList
display dialog i as string buttons {"OK"} default button 1
end repeat
end open

to dropHandler(dropList)
tell application "Finder"
set dropList to sort dropList by name
end tell
return dropList
end dropHandler

of me は，無くてもよさそうです．レベル1上がったかもしれない．皆さんに感謝です．

ハンドラ of me あるいは my ハンドラは、
tell ナントカの内側で呼び出すときに必要になる。

たとえば、
tell application "Finder"
set theList to every file of (choose folder)
set dropList to dropHandler(theList)
end

to dropHandler(dropList)
--略
end dropList

なんてやるとエラーになる。
呼び出すところを、my dropHandler(theList) あるいはdropHandler(theList) of me
としないといけない。

必要ないときに付けても害にはならないので、
わたしは（>>161とは逆に）、常に付けておく習慣にする派。スクリプトを
デバッグしながら、修正したりするときに、myは付けっぱなしにしておいた方が
いらないエラーに出会わないので。

ハンドラの頭のtoってなんですか。今までonしか見たことがなかったもので。

どっちでもいいです。好きな方を使ってください。

dialogをwindowにattachして表示していて、
表示するdialogによって後処理を変えたい場合はどうやるのがベターなんだろう？
具体的にはこんな感じ↓

--
on clicked theObject
if name of theObject is "btnA" then
display dialog "A" attached to window 1
else if name of theObject is "btnB" then
display dialog "B" attached to window 1
end if
end clicked

on dialog ended theObject with reply withReply
(* "btnA"を押したらdialog"A"を、"btnB"を押したらdialog"B"を表示する *)
(* でもって"A"のOKを押した時と"B"のOKを押した時で違う処理をしたい *)
end dialog ended
--

ボタンだったらInterface Builderで作成する際に名前付けておけば、
on clickedでやってるみたいに区別できるけど、
dialogに名前をつける方法が全く見当付かないんだよね

今のところの代案は2つあって、まずボタンで区別する方法

--
on clicked theObject
if name of theObject is "btnA" then
display dialog "A" buttons {"Cancel", "OK"} attached to window 1
else if name of theObject is "btnB" then
display dialog "B" buttons {" Cancel ", " OK "} attached to window 1
end if
end clicked

on dialog ended theObject with reply withReply
if button returned of withReply is "OK" then
(* AのOKの後処理 *)
else if button returned of withReply is " OK " then
(* BのOKの後処理 *)
end if
end dialog ended
--

簡単だけど全部のボタンを個別に考える事になるので、
数が増えてくるともの凄くわかりづらい感じがする

もう一つ
globalな状態変数を作って、display実行直前にアップデートする方法

--
property lastDialog : ""

on clicked theObject
if name of theObject is "btnA" then
set lastDialog to "A"
display dialog "A" attached to window 1
else if name of theObject is "btnB" then
set lastDialog to "B"
display dialog "B" attached to window 1
end if
end clicked

on dialog ended theObject with reply withReply
if lastDialog is "A" then
(* Aの後処理 *)
else if lastDialog is "B" then
(* Bの後処理 *)
end if
set lastDialog to ""
end dialog ended
--

ダイアログ別に書けるのでわかり易くはあるんだけど、
いまいちスマートな気がしない


もっといい方法があったらご指南下さいませ

とりあえず、いわゆるAppleScript Studioのはなしをするときは、その旨一言断ってもらえると
ありがたい。Xcode入れてない人にとってはなんのこっっちゃわからんから。

で、なんかわかりませんけど、単に行き詰まってるだけでは？「ダイアログのOKを押したとき…」
っていうのを頭から消してみたら？
ダイアログはダイアログであって、それをごちゃごちゃ拡張するぐらいなら、Scriptオブジェクト
でも使って正しく一から機能を定義すべき。

>>174
別に全員が全員のレスを読む義務なんて無いし、わからん人には答えも出せないだろうから、
あまり迷惑はかからないような気がしたんだ
ごめんなさい

で、scriptで分けるのはなるほど合点
ファイル自体分けるのも悪くなさそうですな

AS Studioはほぼ分からないけれど
Cocoaなら、Dialogを表示するためのメソッドを別に起こし、Dialog
から戻ってきたときに実行させるメソッドを指定しておく。
メソッド１：ダイアログA表示
メソッド２：ダイアログA後処理
メソッド３：ダイアログB表示
メソッド４：ダイアログB後処理

ASでも基本的な考え方は同じようでいいのでは。
要は、一つのハンドラで処理しようと考えずに、個々に作るって方法。

文字列の先頭または末尾にあるスペースや改行を削除したいと考えています。
character of theStings で一文字ずつチェックすればいいのはわかるのですが
もっと簡単で速い方法がありそうな気がしています。
Unixのコマンドとかに何かないでしょうか？

>>177
デリミタにして割って戻せば？
但し、先頭と末尾、スペースと改行ってきまってんなら、データによっちゃあ一文字づつ判定した方が早いかもね。
ASの配列の扱いは遅いから。
URL、pathを割るだけならデリミタ使った方が楽にかけるけど。

sed

>>177
php の trim 使えば？

>>177
処理するデータ量によると思うけど、多くの場合は、AppleScript で閉じた方が速度は速いと思う。OSAX 経由による新しいプロセスの起動は馬鹿にならないコストが発生する。書くのはめんどくさいかもしれないけど、使い回せるようにしておけば OK。

また、do shell script では、引数としてデータを渡すか、一時ファイルを経由するか以外にデータを渡す方法は無い。普通は、簡便に引数としてデータを渡すことを想定していると思う。でも、それは避けるべき。なぜなら、引数に与えられるデータは数kB 程度の制限があるから。

そら制限あるに決まってるけど、たまにはドキュメント見直しといたら？

OS9ならTanaka's osaxで簡単にスペースや改行削除、文字列置換出来るんだけど…
普通、こういうのってテキストエディタ使わない？
アプリをAppleScriptで操作するってんなら話もわかるけど。

こんなソフトありませんかスレで質問したものです。
そこでいただいたスクリプトに追加してドロップレットの形にもってこれました。
先ほどはありがとうございました。
なお、エラー処理は入れていません。

代わりにInfo.plist側でfolderのみドロップ可能の制限を付けてます。

on open of target_files
tell application "Finder"
repeat with theFolder in target_files
set theNumber to count items of folder theFolder
set name of theFolder to (name of theFolder) & " (" & theNumber & ")"
end repeat
end tell
end open

>>184
こちらこそ勉強になりました

ありがとうございます。
そうなんですよtrimがやりたいんです。
１行の文字列を想定しているので、do shell scriptで渡せる範囲で十分かな
とは思ったんですが（って、制限があるの知りませんでしたが）。
sed で一発なのかな？
地道に削った方がいいのかな。

あれ。書き込まれていない…ってことはどっかに誤爆したか。

ありがとうございました。
sedも捨てがたい気もしたんですが、一応AppleScriptで書いてみました。
お礼がてら発表。
将来必要な人はご自由にお使いください。

to trimSting(theStr)
set blankcha to {" ", tab, return, ASCII character 10}
repeat with l from 1 to length of theStr
if character l of theStr is not in blankcha then exit repeat
end repeat
if l is length of theStr then -- 空白文字しかない
return ""
else
repeat with r from length of theStr to l by -1
if character r of theStr is not in blankcha then exit repeat
end repeat
return text from l to r of theStr
end if
end trimSting

---
set testStr to " ねこ cat " & return & " "
trimSting(testStr)

普通のフォントだと小文字のlが見づらかったですね、失敗。
左と右でlとrだったんですが。

乙

>>187
バグ見っけ。
" A" みたいな、最後の１文字だけ空白でないとき、結果が""になります。
関数の最初(repeatの前）を以下に修正

to trimSting(theStr)
set keeper to ASCII character 0
set blankcha to {" ", tab, return, ASCII character 10, keeper}
set theStr to theStr & keeper
repeat with l from 1 to length of theStr
（以下同じ）

ここでいいのかどうかわかりませんが。

Word 2004でマクロを使って文字置換をしていたのに、Word 2008ではマクロが使えない（作れない）ので困っています。
カタカナをひらがなに一括変換したり、漢数字をアラビア数字にまとめて直したりするには、Applescriptを使うしかないのでしょうか。参考になりそうなサイトでもあれば教えてください。

2004と2008両方使えば？
VBA使えるならAppleScriptはさして難しくないと思うが、
参考になりそうなサイトはググって出てきたサイトです。

つhttp://www.microsoft.com/mac/developers/default.mspx?CTT=PageView&clr=99-21-0&target=82ecc295-efb1-460d-b51d-15f8f9f08eb31033&srcid=de629b6c-3e96-4511-b2c3-17b76e3bf5c41033&ep=7

今まで使えていたスクリプトが使えなくなりました。
どなたか理由が分かる方いれば教えてください。
内容は最近使った項目を消去するスクリプトです。
ずいぶん前にこんなアプリスレで作ってもらった物なので
自分では原因が分からず、、、です

tell application "Finder"
activate
end tell
tell application "System Events"
click menu item "メニューを消去" of menu "最近使った項目" of menu item "最近使った項目" of menu "Apple" of menu bar 1 of process "Finder"
end tell

>>194
使えなくなったってのはどう使えなくなったのか？
きっかけが何かあるんじゃない？
OS10.5で実行したらちゃんと最近使った項目は全削除出来たよ。

>>195
説明足らずでした
OS10.4.10で、こんなエラーが表示されます
「NSReceiverEvaluationScriptError:4」
特に何かアプリを入れたとか、何かを削除したとかは無いと思います　たぶん、、
調べてみるとこんなページがありました
http://veadardiary.blog29.fc2.com/blog-entry-543.html
当該のアプリは入っていないのですが、他のアプリが悪さしてるんでしょうか？

まさかとは思うが、システム環境設定のユニバーサルアクセスのところの
“補助装置にアクセスできるようにする”のチェックがはずれていたりしないか？

>>197
チェックしてみたら、まさしくそれでした
助かりました　
ありがとうございます

AppleScriptから自分の環境のグローバルIPを知るのはどうすればいいのですか。
Mac OS X 10.4.11です。

これかな？

IPv4 address of (system info)

グローバルIPとは限らんけど、その辺は意味わかってるのかな>>199

>>200
残念ながらローカルIPでした。

>>201
意味わかってないかも。
WebにアクセスしたときにREMOTE_ADDRでみられるあれを知りたいのです。

>>202
ネットワークアダプタが1個だとIPは1つしかないぞ
それがローカルかグローバルかは環境による
両方持ってることなんてあり得ない

多分ネットにはルータ経由で繋いでるんでしょ
だとすると表示されてるリモートアドレスはプロバイダがルータに割り当てたアドレスだから、
AppleScriptでは取り様が無いんじゃないかなぁ
ルータの説明書でも見てくださいな

>>202
do shell script "curl http://www.ip-adress.com/ | perl -ne 'print $1 if /My IP: ([0-9]+\\.[0-9]+\\.[0-9]+\\.[0-9]+)/'"

>>204
内側から取りにくけりゃ外側から取ればいいとこまでは考えていたが、
こんな方法があったとは…

curlもip-adress.comも知らなかったわ

僕はルータの設定ページから
スクレイピングってのをやったことあるぞ。

ありがとうございました。そういう方法しかないんですね。
いわれてみるとたしかにそんな気がします。

#!/usr/local/bin/perl4

print "Content-type: text/html¥n¥n";
print "<HTML>¥n";
print "<HEAD><TITLE>address</TITLE></HEAD>¥n";
print "<BODY>¥n";
print $ENV{'REMOTE_ADDR'};
print "¥n</BODY>¥n";
print "</HTML>¥n";

こんなCGIをつくっておいて
do shell script "curl -s '" & checkURL & "' | grep '¥¥([0-9]¥¥{1,3¥¥}¥¥.¥¥)¥¥{3¥¥}'"
で、拾うことにしました。

grepがエスケープだらけでわけわかんね

うちのはグローバルIPなので確認のしようがないんだけど
dotted decimal form of host of (("http://" & (host name of (system info))) as URL)
これじゃだめだよね...きっと

いろいろ調べているうちに、ひょっとしていけてるんじゃないかという気がしてきた。

すいません、だめだったようです。

>>207
CGIはHTMLつくらなくてもいいんじゃないか？

文字列の置き換えって、結局sedでやった方が楽のような。

ファイル名の置き換えをしようとしているんだけど。
＞【鏡音リン初音ミク】夢みることり【オリジナル】‐ニコニコ動画(RC2).flv
＜【鏡音リン初音ミク】夢みることり【オリジナル】.flv
こんな感じでやれそう。

tell application "Finder"
set theName to name of this_item
set theNewName to my RemoveIt(my GetNFC(theName))
(*
set name of this_item to theNewName
*)
end tell

to GetNFC(theItem)
set theScript to ("echo " & (quoted form of theItem) & "| iconv -f UTF-8-MAC -t UTF-8")
return (do shell script theScript)
end GetNFC
to RemoveIt(theItem)
set theScript to ("echo " & (quoted form of theItem) & "| sed -e 's/‐ニコニコ動画(RC2)//' -e 's/ニコニコ動画(RC2)‐//' ")
return (do shell script theScript)
end RemoveIt

これよりは楽だよね？

to RemoveIt(theItem)
set theCurrent to AppleScript's text item delimiters
set AppleScript's text item delimiters to ("‐" & "ニコニコ動画(RC2)")
set newItem to (text items of theItem)
set AppleScript's text item delimiters to theCurrent
set newItem to newItem as Unicode text
return newItem
endRemoveIt

もっと楽な方法あるかな。

ちょっとした置換はsedのほうが書くのは楽だけど、
大量に処理するときはdelimitersで書いたほうが処理速度がはるかに速い。

>>214
>大量に処理するときはdelimitersで書いたほうが処理速度がはるかに速い。
こういうのは「ノウハウ」という

Mac OS X 付属の Oxford American Dictionary が言うところの
"practical knowledge or skill" ってやつですね

delimiterで区切ったときの項目数が多すぎるとクラッシュする。
テキストサーチでやると若干遅いが潜在的なバグを回避できる。
これもノウハウ。

スクリプティング機能追加に，表現形式という名のフォルダを置いておくと，
AppleScriptの動作が気持ち速くなる for OS9．これもノウハウ．なんちって．

初心者質問スレから来ました。

applescriptを使って環境設定をワンクリックで設定変更できるか教えて欲しい。
具体的にはディスプレイの回転の項目を設定したいんだが、すいませんが回答頼む

tell applic(省略されました。続きを読むには言葉遣いを直すか中学校を卒業してください。

AppleScriptを使用して、環境設定→ディスプレイの中の回転の項目を一発で
設定できる方法を探しています。どなたかご存じの方がおられましたらご教授願います。

>>220
確かに変だし中途半端だよね。すいませんでした。

>>221
ttp://www.macosxhints.com/article.php?story=20071003040156502
ttp://www.gizmometer.com/software/freeware/RotateDisplayScripts.zip

>>222
ありがとうございました。
tell applicationでググってそれっぽいサイトみつけて途中までやったんだけど
すぐに挫折して泣きそうだった。本当に感謝してます

保守ついでに．
OS9からOSXへの環境移行を始めているところなんですが，基本的なところで
迷ってます．TigerではないLeopardのAppleScriptって，イケてます？

>>224
do shell script が使えることがかなりイケてる！

>>225
それは，Tigerでも使えるような……．やっぱり，Leopardにしておきます．

>>224
文字コードがようやくUnicodeになったのが個人的にはイケてるな

>>227
文字の扱いが楽になったっていうことですよね．それはいいかも．

ようやくバグの一つが解決したからといって
それで楽になったと言えるのかどうかorz

>>229
本格的な開発をするわけでないので，多少のことなら目を
つむってって感じなのだけど．肩を落とすほど致命的なバグ？

ttp://www.apple.com/jp/macosx/features/300.html#applescript
この辺

10.5.2でもlengthがNFD:NormalizationForm Dに未対応。
困ってるひと他にもいたらフィードバックしてくれ。

どうせ聞き入れられないに一票w

>>232
set nfd to <<data utxt304B3099304D3099304F3099>> as Unicode text
length of nfd -- 3 on OSX 10.5.2
これじゃいかんの？

>>231
どの辺にそれが書いてあるのかわからないけど，レパにしちゃいます．
どっち使っても不具合があるというなら，新しい方にしようということで．

>>232
日本ユーザーからのフィードバックは少ないから，要望は常に後回しになってる
みたいなこと，どこかのブログで読んだことあります．同じこと何度もしつこく
フィードバックしないとダメみたいですね．

OSX10.5から文字列処理が全部Unicode化したのは良いんだけど、文字列比較は
sorting localeによって動作が違うね。
"た" is "タ"
sorting localeが日本語だとtrueが返るけど、それ以外だとfalseが返る。

true が返るのか・・・

AppleScriptって使えたらすごく便利だとは思うが
アプリケーションごとにどんな命令があるのかとかよく分からなくて
結局使えないって印象。
ここの人たちはどうやって勉強してるの?

おいらにとってはshellscriptの方が
まさにそんな印象なんだが…

アップルストアとかで，講習会とかやってくれたらいいのにねー。有料でも行きたい。

>>238
>ここの人たちはどうやって勉強してるの?
ｵﾚも知りたい、ちゅうかやっぱり英語が堪能でないとﾀﾞﾒ？
>>240
だね。

アプリケーションの用語説明を開いて適当に試してみるしかないんじゃない？

辞書をみて文法に当てはめるだけだよな。

ターミナルとAppleScriptはどう違うの？

質問がおおざっぱすぎる。テレビとラジオは違うものです。
逆にどういう点を同じ、あるいは似ていると思うのかを言うと回答が返ってきやすいだろね。

このスレは優しい人が多いなあ

>>238
本やサイトを最初から読んで……というやり方だと，挫折しやすいかも．

>>241
英語堪能じゃない自分でも，ちょっとしたもの作ってます．慣れです慣れ．

と，初心者の自分が偉そうに書いてみました．

まだ日が浅くてUI Elements主体でやってる俺だが、
適当にtellりつつpropertiesやらUI Elementsやらactionsやら叩いてるだけで、
それなりに何とかなってるな

GUI Scriptingはこれ使うと楽だよ。それなりの値段だけど。
http://prefabsoftware.com/uibrowser/

特定のGUI部品までのパスが一発で取得できる。
JavaScriptやる人ならFirebugみたいって言うと分かるかな。
ま、ちょっと違うけど。

あとScript Debuggerというのも超絶便利。高いけど。
アプリケーションのオブジェクトモデルやプロパティが丸見え。
現在の変数の値とか丸見え。
http://www.latenightsw.com/sd4/

どっちも初心者にこそ使ってもらいたい。
ブレークポイント設定して、そこからステップ実行、変数の中身の
遷移を観察するという手段を知ると、いろんな疑問が氷解すると思うよ。

「高いから自分にはもったいない」じゃなくて、その逆ね。

この二つがあると無いとではAppleScriptの世界は180度違うといえる。

OS9でコンパイルされたTipをOSXで使えるようになりませんか。
ソースはありません。

>>249
お金がなくて買えないけど
すごく良さそうですね
こんな方法もあるんだなー

例えばOSを再インストールしたとき、
システム環境設定やら
Finder環境設定, Finder表示オプションやらを
いちいちいつもの設定にしてやるんだけれど
そういうのをAppleScriptでやってもらえないかと思ったとき
どうやって調べて実装したら良いの?

~/Libraryをコピーする、とか
OSインストール後に初期設定だけ済ませた状態の
HDDのディスクイメージを取っておいてDiskUtilityから復元、とか
そういうので対応可能かもしれないけれど
AppleScriptでやってみたいと思ったら
実現するための情報収集はどうするのかな、と。

>>252
1. 手元にある AppleScript 関係の本を調べる
2. アップルのサイト（開発者向けサイトを含めて）の中を見て回ったり、その中で検索したりする
3. AppleScript の専門サイトの中を見て回ったり、その中で検索したりする
4. google で "AppleScript" "System Preferences" "Finder" あるいは設定名
（"Dock", "Appearance" etc.）などをキーワードに検索する
5. 「システム環境設定」「Finder」それぞれの用語辞書を開いて見てみる

俺が思いつくのはこんなもんかなあ…。
実際やってみると例えばこんなのが見つかる。

AppleScript Tutorial on Scripting System Preferences
ttp://macscripter.net/articles/468_0_10_0_C/
AppleScript: Scriptable System Preferences
ttp://www.apple.com/applescript/features/system-prefs.html
Re: Setting Finder Preferences and Folder Views
ttp://lists.apple.com/archives/Applescript-users/2002/Feb/msg00944.html

>>248
PreFabはデモ版使ったけどなんか合わなかったんだよね
Script Debuggerは良さそうなんだがちょっと躊躇してる

>>252
俺の場合は設定変更前と変更後の両方で、
defaults readを実行したり各種Preferencesフォルダのファイル更新状況を調べたりしてる
後は同じ事をdefaults writeで実行すればいい

あるいはGUI Scripting使うかFull keyboard accessをAll controlにするなりして、
単純に自動操作させたりとか

>>249
うはっwこんなの欲しかった。Thx！

>>253-254
貴重な情報、本当にありがとうございました!
月曜以降になってしまいますが、
ひとつひとつ実践してみます。

>>254
うっわ、自分にレスしてた…
言うまでも無いが、>>248じゃなくて>>249

>>247
>慣れです慣れ
とは言いつつ、英語が多いからなぁ…。（´･ω･`）

>>258
わからない時は，その都度翻訳サイトを利用してますよ．

意味もそうだけど，単語の発音がわからないのも困る．
脳内ではかなりいい加減な『いいまつがい』してましたし．
trueはすぐにわかったけど，falseなんて去年まで変な読み方してた．

ふぁるす乙

英単語の発音を調べるなら、その単語を選択した状態にして
メニュー　→　アプリ名　→　サービス　→　スピーチ　→　テキスト読み上げを開始
とすると簡単です。

スレ違いｽﾏｿ...

>>261
今やってみてちょっと感動．こんなところでOSXのありがたみを実感．ありがとう．
ところで，何度やってもフォースにしか聞こえない．ジェダイの騎士になった気分だ．

>>253
＞ 1. 手元にある AppleScript 関係の本を調べる
元々Macのプログラム本は少ないけど，AppleScript関連はさらに少ないですよね．

OSXのありがたみて、あんた
スピーチなんてずーーーーと昔から有りますがなw

>>263
確かに．ただ昔は，別途インストールしなきゃダメだったじゃないですか．
そういう意味でわずらわしくないと．なにせ時代に取り残された9組だったので，
無線LANのありがたみとか，AppleScriptの開発環境の良さとか，今になって
やっと実感できてるわけです．あ，スレ違いなので，この辺で．

say "false"

(*´д｀*) ふぁるす

phallus　(;´Д｀)ﾊｧﾊｧ

say -v Victoria "vals!" & say -v Alex "vals!"
眼が、眼がぁ〜

Alexさんがいない。

>>268
それ，AppleScriptじゃない。

初心者の質問で申し訳ありません。
MacOSX上にて、
AppleScriptでアプリケーションAdobe Illustrator CS3の
ファイル＞スクリプト＞xxxxx.jsxを実行する記述を、
どなたか教えていただけないでしょうか。
スレ違いでしたら、お許しください。

>>271
GUIスクリプト使うか
目的のスクリプトの中身を読み込んでdo Javascriptで実行くらいしか思いつかないなぁ。
デフォルトで入ってたjsxを読み込んでみたけど頭3バイトにへんなものが。
あとスクリプト内の2バイト文字が文字化けする。

set JS_path to "Macintosh HD:Applications:Adobe Illustrator CS3:Presets.localized:Scripts.localized:ドキュメントを Flash として書き出し.jsx"
set FileHandler to open for access JS_path
try
set JS to read FileHandler from 4
on error
close FileHandler
end try
close FileHandler
tell application "Adobe Illustrator"
do javascript JS
end tell

もっといいやり方がありそうな気がする。

>>>272
271です。
書き込み、ありがとうございます。
さっそく、スクリプト内の2バイト文字を１バイト編集して、
いろいろサンプルをつくりで実験してみます。
272さん、感謝いたします。
ありがとうございました。
早めに、結果報告できればと思います。

>>273
Macで直接作ったJavascriptだったらもしかしたらfrom 4とかいらないかも
下から2行目のdo javascript JSの部分を実行しないようにしておいて最後に

JS

の1行足して実行→結果を見て検証してみて

do javascript内でincludeすればいんじゃね?

#include "../include/lib.jsxinc"

#includepath "include;../include"
#include "file.jsxinc"

CS2はちょっと違って、

@include "file.jsxinc"

だった。

Modular Programming Supportの章参照
http://www.adobe.com/devnet/bridge/pdfs/javascript_tools_guide_cs3.pdf

>>272
>>275
271です。
272さん、275さん
ありがとうございます。
初心者で申し訳ありません。
272さん記述を検証で、実行できました。
ありがとうございました。
275さん、Modular Programming Supportの章参照してみましたが、
初心者でまだ、参照できる身分でないようです。
大変申し訳ありません、
272さん記述の275さん補足の全記述を
書き込んでいただけないでしょうか？
DTP製作担当で勉強中です
宜しくお願い申しします。

>>249
AppleScript、ほぼ初めて位な勢いで組んでみたけど、
ScriptDebuggerのおかげで、楽にできた。Thx
使えるメソッドとかプロパティとかが一覧されるってだけで、
やっぱり相当変わる。

ちなみにFinderの前面windowで選択されているフォルダから、
ユーザからの入力された文字列を含むファイルを一括選択っていう
Path FinderのSelectみたいなヤツを組んでみた。
アプリ形式で起動に3秒かかるのが難点。遅い…

>>276 仕事でそれでお金もうけるんでしょ？もしくは会社の立場？
死ぬほどググるか、お金払って講習行くべきじゃないかな？甘えるなと言いたいけど。私も甘いな。
tell application "Adobe Illustrator"
　　activate
　　do javascript file "MyHD:Applications:Adobe Illustrator CS3:Presets.localized: 改行なし
　　Scripts.localized:ドキュメントを Flash として書き出し.jsx"
end tell

ARIAがなかったら起きてこなかったよ？週一度の楽しみ。

>>272
Illustrator CS3 の do javascript は
do javascript anything : javascript code or file to execute
ってかいてるからファイルを直接指定すれば良いんでないの?
パスを(なんらかの方法で)取得して as alias すれば、
そのまま do javascript で動いたけど? おれなんか勘違いしてる?

あやや

>>280 ♪
>>277 書いたのさらしてみて欲しい。起動で3秒？

>>277
定期的にScriptDebuggerをすすめているんだけど、
実際に試したのはあなたが初めてだね。
Command＋Shift＋DでDebugモードに切り替えて、
ステップ実行してみると真価がわかるよ。

行頭をマウスでクリックしてブレークポイントを仕掛けて、
この状態で保存すると、ドロップレットのようなスクリプトも
デバッガでデバッグできて便利。

Explorer機能も素晴らしく便利。
ターゲットアプリの現在のすべてのプロパティの一覧が階層表示される機能。
重要なのはリロードをかけたときに、
変化があったプロパティが赤く表示されること。
Adobeアプリみたいにプロパティが無数にあって、
どこのプロパティをいじれば目的が達成できるか分からないときに、
アプリの操作の前後でExplorerをリロードしてプロパティの変化を見ると、
一目瞭然でとても楽。

用語辞書の全文検索も便利だし、ほんとに素晴らしいですよ。

>>278
>>279
271です。
278さん、279さん
ありがとうございます。
おかげさまで検証できました。
複雑に考えすぎました。
これを機に少しづつ記述出来るように
がんばります。

IllustratorCS3の質問です。
Illustrator上で使用されている特定色を、スクリプト中で指定した色に置換しようとしています。

tell application "Adobe Illustrator"
tell document 1
set x to count path items
repeat with y from 1 to x
tell path item y
if class of fill color is {class:CMYK color info, cyan:100.0, magenta:0.0, yellow:0.0, black:0.0} then
set fill color to {class:CMYK color info, cyan:100.0, magenta:100.0, yellow:0.0, black:0.0}
end if
if fill color is {class:CMYK color info, cyan:0.0, magenta:100.0, yellow:0.0, black:0.0} then
set fill color to {class:CMYK color info, cyan:100.0, magenta:100.0, yellow:0.0, black:0.0}
end if
if fill color is {class:CMYK color info, cyan:0.0, magenta:0.0, yellow:100.0, black:0.0} then
set fill color to {class:CMYK color info, cyan:100.0, magenta:100.0, yellow:0.0, black:0.0}
end if
if fill color is {class:CMYK color info, cyan:0.0, magenta:0.0, yellow:0.0, black:100.0} then
set fill color to {class:CMYK color info, cyan:100.0, magenta:100.0, yellow:0.0, black:0.0}
end if
end tell
end repeat
end tell
end tell

と、濃度100%のpath itemであれば置き換わるのですが、ここで
if class of fill color is {class:CMYK color info, cyan:10.55, magenta:20.12, yellow:13.2, black50.1} then
のように、濃度指定に小数点が加わったpath itemが置き換わりません。
試しに get fill color of selection で色情報 を取得した結果、
{class:CMYK color info, cyan:10.549998283386, magenta:20.120000839233, yellow:13.199996948242, black:50.09999871254}
をそのまま置換対象に指定してもダメでした。
色の指定方法になにかコツでもあるのでしょうか？ というか、ライブカラーがAppleScriptから使えれば・・・

おかしい……

tell application "Safari" to activate
tell application "System Events"
tell process "Safari"
click menu item "新規タブ" of menu "ファイル" of menu bar 1
end tell
end tell

これが動かない。
"NSReceiverEvaluationScriptError: 4"というのが出てしまう。
同様に以前使えていたこの手のスクリプトが
全部使えなくなってる。。。

Safariを英語で起動して

tell application "Safari" to activate
tell application "System Events"
tell process "Safari"
click menu item "New Tab" of menu "File" of menu bar 1
end tell
end tell

これなら動くんだが。
同じ症状の人いる？
OSは10.4.11っす。

普通に動くぞ。

"新規タブ" as Unicode text

とかやってみるとか？

tell application "Safari"
make new document
tell window 1
make new tab
set myTab to make new tab
set current tab to myTab
end tell
end tell

>>286
不思議だ……
今やったらどれも普通に動いた……

あと、Safariでタブを開くのは
実験しやすい例として挙げただけです。
お騒がせしてすんません。

システムイベントは時として操作不能になったりするよね。不安定だ。

> "NSReceiverEvaluationScriptError: 4"というのが出てしまう。
これって「補助装置を使用可能にする」のチェックを入れてない時に出るエラーと同じだよね
って事は何かの理由でSystem Eventsが死んじまってたのかな

>>288
そうなんだ。。。
今まではそういうことなかったんで焦ってしまった。

>>289
完全に死んでたなら英語版も操作できないはずなんで、、、
直ったときも何か特別なことをしたわけじゃなく
いつの間にか直ってたって感じだし
原因わからん。。。

MacOSX_Adobe Illustrator CS3の
ドキュメント設定の単位をミリメートルに
変更したいのですが、
うまくいきません...

tell application "Adobe Illustrator"
tell document 1
set ruler units of settings to "millimeters"
end tell
end tell

どなたか正解を教えてください。

>>285,289
"NSReceiverEvaluationScriptError: 4"
は叩こうしているオブジェクトが見つからないときに出るエラーだから
UI Scriptingがらみではやたら出てくる（もっとエラーを場合分けして欲しい）。

なんかでフォーカスが外れてたんじゃないかとも思うんだけど、activateしてますねえ。

>>291
こんな感じじゃない。PhotoshopだとこれでOKなんだけど。

tell application "Adobe Illustrator CS3"
set ruler units of settings to mm units
end tell

>>291
document直下のプロパティだから

tell application "Adobe Illustrator"
tell document 1
set ruler units to "millimeters"
end tell
end tell

でいいと思うんだけど
ruler units (centimeters/inches/millimeters/picas/pixels/points/qs/unknown, r/o)
Illustratorの場合は読み込みのみだからできない

>>293
>>294
293さん、294さん、ありがとうございました。
すいません、両記述を検証してみたのですが、
ゴメンナサイ...うまくいきませんでした。
ポイント設定のドキュメントがいっぱいあったら、
あきらめて、ルーラー右クリックでコツコツ切り換えて
いくしかないんでしょうかネ...？
もうちょっと勉強します...。
ありがとうございました。

このスクリプトの使い方を教えて下さい。
スパースディスクイメージのサイズを内容の削除と共に縮小するようにできるらしいのですが。

Sparseimage Compactor
http://www.loukash.com/en/download/sub06.html

>>295
紛らわしい書き方してゴメン。
ruler unitsはr/o（リードオンリー）だからスクリプトで変更できないよ。

>>297
297さん、ありがとうございます。
javaでも変更出来ないんでしょうね。
picasとかpixelsとか結果を返されても...
諦めて、コツコツ切り換えて頑張ります。
ありがとうございました。

>>296
「内容の削除と共に」縮小するんじゃなくて、
内容が削除済みで不要になった部分を縮めてくれるだけなのでは？
それはそれで便利だと思うけど。

OS 10.5使ってる方、Finderに関するスクリプトで、10.4で動いていたものが動かなくなったとか経験ありますか？
移行しようとしてるので何かご存知なら教えて頂きたいです。

質問させてください。
「両両矢印」というスクリプトがwebに載っていたので
Leopardで使おうと思ったのですが、
実行すると「この """ の後に identifier を書くことはできません。」
という構文エラーが出てしまいます。
OS10.5では使えないのでしょうか？？？

tell application "Terminal" to do script with command "defaults write ¥"Apple Global Domain¥" AppleScrollBarVariant DoubleBoth"

￥マークっつーかバックスラッシュがひっかかってると思うので
set backslash to ascii character 128
としておいて￥を変数backslashに置き換える。

10.4同士でも、昔G4で書いたのがMBに持っていったら、
こうなったりしたんだよなあ。

AppleScript使ったことないけど、
\"を\\\"にしてみるとか。

ありがとうございました。
¥記号をバックスラッシュに変えてみましたが
だめでした。

これ（↓）でもやってみましたが、
tell application "Terminal"
do script with command "defaults write ¥"Apple Global Domain¥"　AppleScrollBarVariant DoubleBoth"
end tell

ターミナルに
Rep argument is not a dictionary
Defaults have not been changed.
と言われてしまい、実行できませんでした。
Leopardでは無理なのでしょうか…。

tell application "Terminal"
set a to ASCII character 34
set b to "defaults write " & a & "Apple Global Domain" & a & " AppleScrollBarVariant DoubleBoth"

do script with command b

end tell

AppleScriptの勉強というわけでないなら、
Terminalを立ち上げて、以下をコピペしてreturnした方が早い。
defaults write "Apple Global Domain" AppleScrollBarVariant DoubleBoth
これで同じことになる。

なんでdo shell scriptを使わないんだ。

初回起動時にユーザーに何らかの文字入力をもらって、
それを初期設定として保存。
以後、起動するたびにその初期設定を
自動で参照するというような動作を考えています。

ttp://www.kiwi-us.com/~mizusawa/penguin/html_hint/as_x/index.shtml#handles
を参考にScriptEditorで試してみたところ、
>--初期設定ファイルに保存する
>set contents of default entry thisKey of user defaults to thisContent
のdefault entryの部分で
「このidentifierの後にidentifierを書くことはできません」と表示されます。

>OS XのProject Builder/Xcodeで使うための
とあるところから、Xcodeを使用したAppleScriptApplicationのみ
サポートされた構文（ScriptEditorからは不可）ということなのでしょうか。

>>305
うおお！ できましたあ！
ありがとうござます！ もっと勉強します！

>>307
property使うのじゃ駄目なの？

property userInput : ""

if userInput is "" then
activate
set userInput to text returned of (get display dialog "入力してくらさい" default answer userInput)
end if

log userInput

スクリプトエディタの環境設定→フォーマットの内容ってどこに保持されてるんでしょう？
com.apple.ScriptEditor2.plist ではないようですが・・・

com.apple.applescript.plist でした！死ね俺

>>307
そのサイトの最初に書いてある通り
「特に断わりがない限り、このページ内ではXcodeを使ったAppleScriptの開発のことです。」
ですね。そのあとは断りなしにOS XでのAppleScriptって書いてるから、拾い読みすると勘違いする。

で、Script Editorで作ってるならpropertyは従来通り有効です。

たびたびですいません。

OS 10.4.11(PowerPC)で作成したスクリプト（スクリプトまたはJapanese.lproj含むアプリケーションバンドル形式）を
OS 10.5.2(Intel)のスクリプトエディタで開くと「|」で囲っていた全角変数名、ハンドル名がすべて「||」になってしまっています。

一度10.4.11でテキストで書き出して、10.5.2で再ビルドするしか対応はないのでしょうか？

こんなソフトを探しています Part 30より
画面の選択した部分をフローティングウィンドウのスティッキーズにするスクリプト

57 名前: 名称未設定 Mail: sage 投稿日: 2008/03/14(金) 13:49:25 ID: Z7/qqbMh0
>>41-42
昔作ったやつだwﾅﾂｶｼｽw
てなわけで改良してみた。
do shell script "screencapture -s -i -t png -c"
tell application "Stickies"
activate
end tell
tell application "System Events"
try
set wflag to do shell script "defaults read com.apple.stickies ¥"WindowFlags¥""
on error
set wflag to "0”
end try
keystroke "n" using command down
keystroke "v" using command down
if wflag is "0" or wflag is "4" then
keystroke "f" using {command down, option down}
end if
end tell

>>314訂正
set wflag to "0”←ここのダブルクオーテーション半角にしてください。

OS10.4にてことえり環境設定の「入力方法の設定」(かな入力/ローマ字入力) を
ワンタッチで切り替える方法を探しています

最初にスクリプトエディタの記録ボタンでアクションをレコードする方法を試したんですが
これにはエディタが全く反応せず断念(そんなレベルなんです…ｗ)

スレッドを立てるまでもない質問 Part75 で相談したところ
KotoeriPreferences.appを呼び出して GUI Scriptingで操作すれば出来るかも？
詳しくないので分からんからAppleスクリプトスレで可能かどうかだけでも聞いてみたら？
とアドバイスをもらい誘導されて来ました

上記の考え方でことえり環境設定の操作は出来そうでしょうか？

ターミナルで設定をいじる方法がわかればいいんだが

defaults write com.apple.kotoeri kana "1"
とやって書き換えてみたけど挙動が変わらないだけでなく
ことえり環境設定が落ちるようになった

質問です。
on open(theItemsDropped)
display dialog
end open

この中のdisplay dialogでドロップされた項目を表示させたい場合、
どのように書いたらいいのでしょうか。

ちなみにスクリプトエディタを10.5.2(intel)で使ってます。

>>319
こんなのとか

on open (theItemsDropped)
set theItemsList to ""
repeat with anItem in theItemsDropped
set theItemsList to theItemsList & (anItem as Unicode text) & return
end repeat
display dialog theItemsList
end open

>>320
ありがとうございます！
それです。助かりました。

http://docs.info.apple.com/help/guide.html?path=AppleScript/2.1/jp/
こんなのあったのか

>>322
いいね！
今まで各ページが検索で引っかかることはあったけどトップページが見つからんかった

次スレから>>1に含めておくといいんでないか

>>316
可能っちゃ可能

set startupdisk to (path to startup disk) as Unicode text
set kp to startupdisk & "System:Library:Components:Kotoeri.component:Contents:Support:KotoeriPreferences.app"
activate application kp

tell application "System Events"
tell process "KotoeriPreferences"
repeat while not (exists window 1)
end repeat
click radio button "入力操作" of tab group 1 of window 1
if (value of pop up button 3 of tab group 1 of window 1) is "ローマ字入力" then
click pop up button 3 of tab group 1 of window 1
click menu item "かな入力" of menu 1 of pop up button 3 of tab group 1 of window 1
else
click pop up button 3 of tab group 1 of window 1
click menu item "ローマ字入力" of menu 1 of pop up button 3 of tab group 1 of window 1
end if
delay 1
click button 1 of window 1
end tell
end tell

亀すみません>>316です

>>324
おぉ、ありがとうございます！
で、早速コピペして走らせて見たんですが
ことえり環境設定が開いた時点で止まります…orz
何がイカンのでしょうか

>>317
それが出来ると一番スマートですよね
自分のレベルでは壁が厚いなー

ユニバーサルアクセスの「補助装置にアクセスできるようにする」に
チェックを入れると幸せになれるかもしれない

幸せになれました♪

>>324さん>>326さん
お世話になりました<(_ _)>

これを元に自分なりに研究してみたいと思います
どうもありがとうございました

テキストエディタで幾つかの同じ文字列の色を変えたい時はどうすればいいでしょうか・・・

>>328
あんまり細かいことを考えなければ

tell application "TextEdit"
set thewords to a reference to words of document 1
set cword to "文字列"
repeat with aword in thewords
if aword as Unicode text is cword then set color of aword to {65535, 0, 0}
end repeat
end tell

>>329
文字列を緑に変えたかったらどこをどうすれば<(_ _)>

{0, 65535, 0}にするのさ

[Redの値,Greenの値,Blueの値]ね
ユーティリティフォルダのDigital Color Materあたりを参考にすると良い

set theColor to choose color
でカラーパレット出るよ。

>>329を全くの素人向けに翻訳


> tell application "TextEdit"
アプリケーション「テキストエディット」に命令するぜ！

> set thewords to a reference to words of document 1
文書1（手前の文書）の全ての単語1つずつへの参照を thewords と呼ぶぜ！

> set cword to "文字列"
「文字列」という文字列を cword と呼ぶぜ！

> repeat with aword in thewords
thewords の1個ずつ（＝全単語1つずつ）を順番に aword と呼びつつ繰り返すぜ！

> if aword as Unicode text is cword then set color of aword to {65535, 0, 0}
もし aword が cword と同じだったら、 awordの色を {65535, 0, 0}（＝赤）に変えるぜ！

> end repeat
ここまで繰り返すぜ！

> end tell
ここまで命令するぜ！


書いてから思ったけど>>330はこんな事しなくても理解してそうだな
まぁいいや

いえ、>>316な自分にはとても参考になりました
どうもありがﾄﾝ<(_ _)>

>> ID:DQunLESr0

すいません。これからもちょくちょくお願いします。ものすごく…良いです。

自分が言うのもなんだけど
ちょくちょくお願いするのは…ちょっと…甘え過ぎだと…思う

>>335-336
おや、意外に好評でびっくり
例えば>>334の対応関係をちゃんと理解できれば、

tell 〜
application 〜
set 〜 to 〜
a reference to 〜
words of 〜
document 1
repeat with 〜 in 〜
if 〜 then 〜
〜 is 〜
color of 〜
end repeat
end if

この辺の構文の意味はほぼ掴めるはず
説明してないのって 〜 as Unicode text ぐらい

暇だったらまたやってもいいけど、
人の書いたコードを読み解くのって上達の常套手段だから、
自分で書いてみるのもいいかもね

というかAppleScriptはかなり口語的な言語だから、
この手の変換を逆方向にやってあげればそれだけでコードが書けちゃう

>>338
if~から外れた時はどこに行くの？

>>339
then以降をやらずに次の行に進む、が正解
外れた時だけ何かやりたいなら

if 〜 then
〜
(else if 〜 then)
〜
else
〜
end if

みたいに書く

>>1のリンク読めば大体の事は書いてるんだから、ちょっとは考えてくれよ
1から10まで解説する気はねーぞ、無駄だし

>1から10まで解説する気はねーぞ、無駄だし

了解。
しかし、あれだね。こういう、スクリプトとかプログラムとか何がきっかけで始めたの？
「無いから作る」って事だと思うんだけど、やり始めはやっぱり予備知識0から始めたんでしょ？
すっごいパワーだな。
若くなきゃ出来ないな。

あ、そうだ。
全く初めての人は>1のリンク先に有る

●AppleScript入門教室
http://homepage.mac.com/tuyano/AppleScriptTutor/index.html
がいいかも。

まだ読み始めですが。

このスレはちょっと僕にはハードルが高かったですね。ごめんなさい。
3年くらいROMってます。

>>341
40歳すぎてからプログラムというものをはじめた人も世の中にはいるから、
心配しないで歳を取っても良い。

年取ると覚えたことをすぐ忘れちゃうから大変

同じことで何回も感動できるようになるからお得だぞ

あるじゃーのんにはなたばをあげてください

｡･ﾟ･(ﾉД`)･ﾟ･｡

なんだこの流れw

あるじゃーのんのおはかにはなたばをあげてやてください

って、このセリフだけでうるうるしちゃうよ。

初心者です。
MacOSX、Adobe Illustrator CS3上、

tell application "Adobe Illustrator"
　tell document 1
set NewText to make new text frame at it with properties {contents:"さんぷる", kind:point text, position:{100, 800}}
　end tell
end tell

"さんぷる"の文字色をレジストレーションにしたいのですが、
又は、document 1上既存の　"段落スタイル"　を適用なんて
出来ちゃうんでしょうか？
どなたか教えていただけないでしょうか。

tell application "Adobe Illustrator"
tell document 1
apply paragraph style paragraph style "段落スタイル1" to paragraph 1 of selection with clearing overrides
end tell
end tell

cf. apply, apply paragraph style, apply character style

>>341
俺(>>340)は仕事上の必要に迫られて憶えた、というか勉強中
初めて触れてからまだ1年経ってないよ

元々Cの知識はあったけどかなり忘れてて、
今はそっちもリハビリ中だわ

>>341
若くないけど自分もAppleScriptに挑戦してます．勉強のために作ったもの，
自分が欲しくて作るもの，職場の要望で作ったもの，の三つあります．

寝食忘れて作ることもしょちゅう．
問題が解決できず，ほったらかしにすることもしょっちゅう．

AppleScriptは変なバッドノウハウがたくさんだから、
別なメジャー言語もやっといた方がいいよ

>>351
351さん、ありがとうございました。
記述を参考に色々やってみましたが、
うまくいきませんでした。
コンパイルをクリックに疲れました。
あきらめます。

ちなみにenterキーでコンパイルできる

ありがとうございます。
最近は、祈る気持ちをこめて、
クリックしてます。涙...

いろいろって何をどうしてどうなったんだよ

tell application "Adobe Illustrator"
tell document 1
set NewText to make new text frame at it with properties {contents:"さんぷる", kind:point text, position:{100, 800}}
apply paragraph style paragraph style "標準段落スタイル" to paragraph 1 of NewText with clearing overrides
end tell
end tell

参考: apply, apply paragraph style, apply character style

>>351
>>356
>>358
ありがとうございました。
正常に記述検証出来ると、
感動してます！涙...
selection→NewText なんですね...
感謝いたします。

基本的な事だと思うんですが、お付き合いください。
クイックタイムにmidiファイルを演奏させるにはどうすれば良いのでしょうか。

tell application "QuickTime Player" to play document "/music.mid"

なんてやってるんですけど実行エラーになってしまいます。

>>360
tell application "QuickTime Player"
open alias "music.mid"
play document 1
end tell

alias〜〜の書き方がわからなかったら
open (choose file)

オープンしてから演奏、ですか。
ありがとうございました。

質問です。
あるjpgファイルがディスクに保存してあり、
これをitunesで管理しているあるトラックのartworkにする、
というようなapplescriptは可能でしょうか？

自己レス　可能らしい事は
ttp://clipmarks.com/clipmark/CFF4703C-F2DE-44FE-8711-4E043BCEF85D/
で確認。
これから実装をがんばってみます。
できたら貼るかも。

OS 10.5用
ダウンロードしたファイルを初めて開くときのセキュリティ警告属性をなくすフォルダアクションスクリプト

on adding folder items to action_folder after receiving action_items
repeat with an_item in action_items
tell application "System Events"
set item_name to (display name of an_item)
set item_path to (POSIX path of an_item)
end tell
set attr_list to (do shell script "xattr -l '" & item_path & "'")
if (attr_list as string) contains "com.apple.quarantine" then
do shell script "xattr -d 'com.apple.quarantine' '" & item_path & "'"
--一応通知はしておく
display alert "ファイル「" & item_name & "」のダウンロードファイル属性を除去しました" message "開く時は注意して下さい" buttons {"OK"} default button 1 as warning
end if
end repeat
end adding folder items to

非建設的なことを言おうとしたけどやめた

・・・警告をなくす警告を出したら意味ないんじゃ。

言いやがったッ！

giving up after 1とかすればいいじゃない

しかし本当に文字コード回りは厄介だな。
どうにも理解できん。10.5では動くのに。
10.4ではutf8を引数でosascriptに渡す、色々をiconvで色々に変換する、
utf16テキストファイルを作ってそれを読み込ませる、
等試したが、いまいち動かん。
しかし、他の言語（つってもrubyしか知らない。しかもへっぽこ）で直接叩くスキルもなし
やれやれ。
だいたいunicodeって理念は一つのコードでムニャムニャ…
ここは愚痴は禁止スレだっけ？まあそんなこんなで

>>370
10.5 は知らないけど、10.4 での文字リテラルの文字コードは言語環境で決定される primary encoding だけです。日本語環境の場合はMacJapanese（だいたい Shift-JIS）。

だから、osascript に渡せる文字列の encoding は Shift-JIS だけです。
意地でも UTF-8 を渡したい場合は、AppleScript の中で、AppleScript が Shift-JIS だと勘違いしている文字列を UTF-8 の文字列に型変換してやる必要がある。

AppleScript での強制的型変換は、AppleEventData.osax を使うとできます。
http://www.occn.zaq.ne.jp/ski/lib/indexj.htm

ちなみに、利用例です。
http://homepage.mac.com/tkurita/scriptfactory/Softwares/TheOtherScripts/SmartTitle/index.html

>>371 愚痴に対してサジェスチョンをしていただいてありがとうございます。
ご意見、リファレンスを参考にもう少し頑張ります。

テキストエディタなどで「ﾊﾟ」と打ってデリートを押すと「ﾊﾟ」がいっぺんに消える。
SafariやFinderでは「ﾟ」が消える。
この違いってなんですか？

ひとつは、UnicodeのNFCとNFDの違い。
＋プログラマがいい加減に処理してるかきちんと処理してるかの違い。

だと思う。

http://blog68.fc2.com/n/netamichelin/file/2008040902.jpg

どっちの処理がきちんとしてるんだろう。

DigitalTV Recorderという録画ソフトが終了したら
スリープするというスクリプトを作成したいのですが
以下のようなイメージです。
初スクリプトですが、指導、お願いします。

if
tell application "DigitalTV Recorder"
quit
tell application "Finder"
　　sleep
end tell
end if
end tell

property isRunning : false
set an to "DigitalTV Recorder"
set interval to 10

on idle
if (isRunning and (not my findProcess(an))) then
set isRunning to false
tell application "System Events"
sleep
end tell
end if
if (my findProcess(an)) then
set isRunning to true
end if
return interval
end idle

on findProcess(pname)
tell application "System Events" to return exists (every process whose name is pname)
end findProcess

OS9の頃使ってたスクリプトがスタンドアローン形式なんだけど
10.5.2で再コンパイルしたら書類形式で、なんかいちいちスクリプトエディタが立ち上がるんだけど
スタンドアローン形式にできないの？

>>378
ありがとうございます。構文、勉強になります。
環境は10.4.11です。すいません、書き忘れてました。

質問です。
このスクリプトを使用するタイミングは
予め対象になるアプリケーションを立ち上げて
それからスクリプトを実行、という順序でしょうか？

スクリプトエディタのライブラリに登録できないアプリは
AppleScriptは実行できないのでしょうか？

対象のアプリケーションをmiにして
上記の順番で実行しましたが、10分たってもスリープしません。
…根本的に使い方間違っているのかなorz

>>379
OSXからのユーザなんでスタンドアローンとやらがピンと来ないのだが、
実行形式にしたいだけなら「名前を付けて保存」でアプリケーションか
アプリケーションバンドルを選べばいいのではないかと

>>380
スクリプトを保存するときに「実行後、自動的に終了しない」にチェックを入れて、
アプリケーションかアプリケーションバンドル形式で保存

んで対象アプリの立ち上げ前でも後でもいいので、
スクリプトをアプリケーションとして起動

10秒ごとに"DigitalTV Recorder"が起動してるかをチェックして、
起動を確認した後に終了されてればスリープって感じと思われる

>>377　>378さんでも、>382さんでもなくて、ただの横です。ただの朝帰り、酔っ払い、お邪魔虫です。
何をしたら？って書いたのはだれ？
スタンドアロンのアプリケーションを作るのだけなくて、何らかのアプリケーションのイベントを取得するって言うのがアップルスクリプトの醍醐味。
それやりたかったんでしょ？対象アプリ立ち上げて、まってるだけじゃなにも起きないよ？miを終了してみな？
あと、そのソフトがアップルスクリプト対応じゃなかったら、もち、無理だし。>380 を読むとそれかな？

やりたいことから作り始めるのが、もちろんだよ。でも、少しくらいチュートリアル的なことやってみるべきじゃないんかな？
ネットにサンプルいっぱいあるんだし。一行プログラムのひとつでも書いてみたら？うー、釣られたのかな？かな？でも、レスあるし。

質問少ないし、ま、週一くらいしか見に来ないけど。で、答えたいなっておもっても、めちゃ洗練されたすごい答えする人いっぱい。で、それ見て感動してばっか。
でもって、自分では発表するほどのことはかけない。うーーーん。愚痴でもいいから、たまにはカキコしたかっただけでした。日記でした。お休みなさいませ。

飲み過ぎなのは分かった

ありゃ、
読み飛ばしちゃってたけど

>>対象のアプリケーションをmiにして
この辺意味わからんな
System Eventsの綴りでも間違ってる？

あといつもの
>>197>>326
この辺りもやってなさそうな気が

>>381
アプリケーションバンドルで上手くいった
ありがとう

>>382
保存方法がわかっていませんでした。
ありがとうです。
変数anが定義されていません、というアラートが出てしまいます。
…

>>383,385
ぐだぐだですいません。SAMPLEいじりを始めたばっかりです。

miはAppleScriptに対応しているテキストエディタのことです。
"DigitalTV Recorder"はAppleScriptに対応してないかもしれないので
動作を確認しようと思って。
わかりにくい書き方ですいませんorz

ユニバーサルアクセスはチェックはいってます。

お時間ある方、よろしくお願い致します。

コンパイルしただけで動かしてなかった。
変数のスコープの問題。

property isRunning : false
set an to "DigitalTV Recorder"
set interval to 10

on idle
if (isRunning and (not my findProcess(an of me))) then
set isRunning to false
tell application "System Events"
sleep
end tell
end if
if (my findProcess(an of me)) then
set isRunning to true
end if
return interval of me
end idle

on findProcess(pname)
tell application "System Events" to return exists (every process whose name is pname)
end findProcess

コンパイルすらできない状態でレスしてたり

>>386
合ってたか
それは何より

>>387
"DigitalTV Recorder"とやらの代わりに"mi"で試してみたって事ね、理解した

ちなみに>>378→>>388は別にAppleScriptに対応していなくても、
tell application "System Events" to processes
でプロセスが引っ掛かるアプリならみんな使えると思うよ
例えばプレビューとか

>>388
propertyと暗黙のrunがくっついてるとわかりにくいと思うのだが、
anとintervalはidleに入れるかproperty使った方が良くない？

目的を果たした377はもう居ないんだから
どうでもいいよ

ここは質問と発表のスレだから、話題提供した人がいなくなっても
興味のある人が話し合うのは有意義じゃないか。

まあまてよ。

>>390
おはようございます。います。
時間のずれは許してください。
AppleScriptリファレンス探しが難しいです。

DigitalTV Recorderには「予約録画終了時にPCを休止させる」機能が
あるみたいだけど、わざわざスクリプトにしてるのは例えなの？

>>377さん。
実を言うとわたしもたぶんそれをもってるんよ。週1時間もTV見ないんだけどな。
IOデータの。だろ？でも、そのソフト使ってない。
スクリプタブルのフリーかな？シェアかな？に変えた。めちゃいいのがあるぞ。専用のスレあったよ？確かここにだ。

でも、そか、あれもスクリプタブルだったんか。うん！！！なんでもいいからがんばれ！！！
スクリプト覚えたいなら、応援するぞ！！！応援だけだけどな！！！

>>394,395
はい、そのソフトです。
休止設定はあるんだけど
AppleScriptで制御できそうだな、と、ここ見てて思って。
これを機会にスクリプトでどうにかしてみたい！と
おこがましくも思い立ちました。

他にも終了したらスリープさせたいものもあるので
基本を覚えたいです。

変数 of me
初期に任意に決める変数は、
この書式が基本と覚えていいですか？

短いスクリプトはFlashのスクリプトに似ている感じがします。
読みやすいです。

>>388,389
ありがとうございます！

set 変数 to 任意の値

が基本

ttp://mtlab.ecn.fpu.ac.jp/xnote/070209160623.html
コレをテンプレにいれほしい

以下のスクリプト、display dialogが3回ともtrueになってしまいます。
4行目の {i} を {i as string} とすると false,true,true となってくれます。
これはAppleScriptのバグと考えていいのでしょうか
Mac OS 10.5.2 (Intel)

set searchString to "11"
set loopList to {"11", "22", "33"}
repeat with i in loopList
set strList to {i} as list --4行目
display dialog ((searchString is not in (every item of strList)) as string)
end repeat

補足

5行目
　(every item of strList)
の部分は余計ですね
　strList
とだけ書いても動作は同じです

>set strList to {i} as list

set strList to i as list

文字列の比較はunicode textにキャストしないとうまくいかない@10.4.11
双方明示的にキャストしないとだめなこともあるかもね
10.5では直ってるのかな

set searchString to "11"
set loopList to {"11", "22", "33"}
repeat with i in loopList
display dialog searchString /= (i as Unicode text)
end repeat

>>402
それでも動きますね。
>>403
当方10.5です。まだキャストしないといけないパターンはあるようですね。ちなみに
　(class of searchString) as string
　(class of {item 1 of strList}) as string
はどちらもtextでした。

ちなみに以下の書き方でも false,true,true となってくれました。

set searchString to "11"
set loopList to {"11", "22", "33"}
repeat with i from 1 to (count of loopList) -- repeat with i in loopList から変更
set strList to {item i of loopList} as list
display dialog ((searchString is not in strList) as string)
end repeat

実行環境の内部的な動きを予測するに、repeat with i in loopList だと、
strListに入るのが「"11"の参照の参照」になってしまうからかな、とか思いますが。
一応バグレポートは出してみようと思います。

書き忘れた
>>403 は当方の10.5環境では false,true,true でした。
as Unicode text を除くと true,true,true でした。

>>400
>set strList to {i} as list --4行目
　↓
set strList to contents of {i} as list --4行目
というのが一番本質的な修正だと思います。
元のスクリプトだと、strListに入ってるのは参照で、searchStringは実体なので
型が合わずに比較がfalseになります。
contents of で参照から実体を取り出せます（正確にはcontentsは参照型のプロパティの一つ）。

set theList to {1, 2, 3}
repeat with i in theList
display dialog (i = 2)
end repeat
極端な話、これだけでも、思うようには動きません。
i = 2 を contents of i = 2 にするとうまくいきます。

>>406
おおお、なるほど。

contents of という記述を知りませんでした。調べてみたら reference to なんてのもありますね。
参照とかそういうの意識しなくていい言語かと勝手に思ってましたが、
そういう命令が用意されてるんでしたらそういう訳にはいきませんね。
（ちゃんとLanguage Guide読まにゃ・・・）

set strList to {i}　だと参照のlistになって、
set strList to i as list　だと実体のlistになるってのも微妙な気が・・・

連投ですいませんが、　item 1of strList　が参照かどうかって知る方法はあるんでしょうか？

すみません、質問させてください。
大量のフォルダ整理のため、AppleScriptを勉強をしてまだ2日目の初心者です。

スクリプトを見れば一目瞭然なのですが、ファオルダ名にパスを入れて整理したいのです。

でも何とか自力で下のスクリプトを組んだのですが、ちょっと不具合と改良したい点があるのです。

●複数のフォルダには対応していない。
●階層表示を途中まで消したい。
　（/Users/a/Documents/b/c/d/e/をb/c/d/eに）
●階層表示を「/」から「_」などの害のない文字に変えたい。


私は本当にかじったばっかりで、自力ではここまでが限界です。それこのスクリプトはもしかしたらダメなものかもしれません。凄くいしょぼいものですが、どなたか愛の手をお願いします。


書いたスクリプト
---------------------------
on open (DropItem)
set pPath to POSIX path of (DropItem) as string
set the clipboard to pPath as string

tell application "Finder"
activate
set BB to (DropItem) as string
set name of folder BB to pPath
end tell
end open
---------------------------

>>408
repeat with A in B
set 〜〜〜 A 〜〜〜
end repeat

で複数対応。
あんま焦んないでゆっくり覚えた方がいいさ

on open (DropItem)
repeat with i in DropItem
set pPath to POSIX path of i as string
set the clipboard to pPath as string

tell application "Finder"
set BB to i as string
set newName to my gsub("/", "_", pPath)
set name of folder BB to newName
end tell
end repeat
end open

on gsub(src, dst, txt)
set oldDelimiters to AppleScript's text item delimiters
try
set AppleScript's text item delimiters to my u(src)
set parsedTxt to every text item of my u(txt)
set AppleScript's text item delimiters to my u(dst)
set replacedTxt to parsedTxt as string
set AppleScript's text item delimiters to oldDelimiters
on error
set AppleScript's text item delimiters to oldDelimiters
end try
return replacedTxt
end gsub

on u(str)
return str as Unicode text
end u

>>407
繰り返しの各回最初に set i to item n of theList ではなく、
set i to a ref to (item n of theList) が省略されていると思いねぇ
つまりi には実体の数字ではなく、 item n of {1, 2, 3} という参照が順に設定される
これは「repeat with A in B 〜 end repeat」の仕様だから、
バグレポート出したって意味ないよ

contents of 〜 は参照の実体を返すものだから通るのは当然、
ってかその為に用意されてるんだから

> set strList to {i}　だと参照のlistになって、
> set strList to i as list　だと実体のlistになるってのも微妙な気が・・・

{item 1 of theList} と item 1 of theList as list の違い

> 連投ですいませんが、　item 1of strList　が参照かどうかって知る方法はあるんでしょうか？

class of item 1 of strList is refference でダメだっけ？

>>409、>>410さんありがとうございます。

今>>410さんのスクリプトでやってみたらほとんど完璧でした。
取りあえず作業を終わらします。
そうしたら>>410さんのスクリプトをもう一度見直して勉強します。

BootCampを使っていて、毎回起動ディスクを選択するのが面倒なので
「起動ディスクをWindowsパーティションにして再起動する」
というAppleSctiptを書きたいのですが、どう書いたらいいんでしょうか？
restartを使うのはわかるのですが、
起動ディスク選択をapplescriptで記述する方法がわかりません＞＜

>>413
ttp://nmuta.fri.macserver.jp/unei0804.html#winswitchscript

質問です。
起動したときに特定のアプリケーションを開きたいのですが
こんな考え方でいいんでしょうか？

tell application "System Events"
if application "Finder" is running
tell application "特定のアプリの名前" to run
end tell
end if
end tell

「ログイン時に開く」に登録すると
不具合が出たファイルがあったので
それをAppleScriptで開きたいと思いました。

…書いていて気がついたのですが、
どのみち起動したらAppleScriptを動かさないといけないんですよね。
「ログイン時に開く」と同じような振る舞いは無理なんでしょうか？
よろしくお願いします。

tell app "アプリ" to activate

と書いてアプケーション形式で保存してログイン時に開くに登録

不具合が出るファイルの詳細を出さないと解決しないと思われま

>>415
if文の意図が不明
Finderが起動しているか確認しなきゃならん理由って？

ちなみにrunningはLeopardでしか使えないので注意
更にSystem Eventsを使う意味もない

あと1つ目のend tellは要らん

>>416
ありがとうございます。勉強になります。
>>418
Finderが起動してからアプリが開くイメージがあったので
if文にしてしまいました。

質問です。
ログインで起動させたらアプリを隠したいので

tell application "起動させたいアプリ" to activate
tell application "Finder"
activate
end tell

動作はしましたが、
該当アプリを「ログイン時に開く」に登録したときと
同じ不具合が出ました。
(再起動時にAirMacが切れてしまう)
Finderを手前に持ってくる考え方がまずいでしょうか？

>>419
つうかさ、AppleScript的には何の問題もないというか、
>>417さんが書いてる通りその秘密のアプリの問題だ。

>>420

該当アプリは上の方で出ていたIOデータのTVについてきた
Channel Managerっていう留守録アプリです。

10.3.9まではログイン時に自動で立ち上がってたんだけど
Tiger用にバージョンあげたらログイン時に開かなくなって
手動で登録したら、なんだか不具合が。

削除したら、大丈夫だったんで
ログインに登録しなければ大丈夫かな？と。

377です。
連続でおんぶにだっこなんで、ばつが悪くて
いろいろ秘密にしてました。
すんません。

AirMacの問題はログイン直後でなくちょっと間をおいてから
該当アプリ起動なら大丈夫なのかな？
delay付ければアプリケーション起動するまでの時間を調節できると思うけど。

delay 10
run application "該当アプリ"

>>415
AirMacの問題はOSのアップデートをしていないのでは？
ttp://docs.info.apple.com/article.html?artnum=301530-ja
それから、こういう事はアイ・オーのサポートを受けるべきだよね。

>>423
ありがとうございます。
こういう書き方でもいいんですね。

>>424
OSアップデートはしています。
慌てていたので肝心のサポートへの連絡失念してましたorz
指摘、ごもっともです。メールで連絡しました。
スレ違いすいません。

で、スレ違いついでに、状況変わって、
該当アプリを「ログイン時に開く」に登録しても
AirMacの不具合が今現在はおこらなくなりました。
…原因特定できず、なんだか消化不良です。

AppleScriptって敷居が高かったんですが
これを機会にいろいろ書いて実行してみます。

スクリプトエディタの環境設定の中にプラグインって項目があるけれど、初期だと何も入ってないよね。
あれってどんなのがあるの？

OSXってAppleScript以外にも，いろんなスクリプト言語から使えるから
激しく目移りしちゃいそうになる．ダメだ，誘惑が多すぎる．……チラ裏．

AppleScript以外が候補に上がる処理って
AppleScriptの優位性ないんじゃ…遅いし。

C, Obj-C, pascal, perl, awk, sh, ruby, python, lisp, と色々言語はかじってきた。
ここであえて言う。AppleScriptは糞言語。

そもそもApplescriptは言語というよりアプリ自動操作する為のモノなのでw
あえて比較するなら、HSPとか?

かじり方からすると大学生、または大卒アマグラマだな。

かじって来た、ってんだからアマだろう。
だが大卒というのはなぜに？中高専門専修修士博士ではないのは何だろう。
pascalか?pascalだからだな!?

applescriptはアプリ操作のための物というのはその通りだわ。
どうしようもなく一般的だが、言語は使い道によって使い分ける、
って結論だろうな。

AppleScriptで一点良いところがあるよ

処理時間でタイムアウトを指定できるところ。ブロックでくくって
タイムアウトをかますことで、エラーハンドリングが出来るじゃん。

これって他のモジュールや他のアプリケーション、もちろんScript自体
のエラーで止まってしまっている場合のエラーハンドリングが簡単に
かける。AppleEventって結構すぐ止まったりするから、これがないと
とっても大変。

例外が投げられる言語ならではなので他でもできるっちゃできるけど。
時間切れの処理って意外と扱いにくくて。

QuarkXPress + Applescriptで処理という、懐かしいことをするはめに...。
で、10年ほど前の知識（Mac OS 8あたり？）をもとにスクリプトを書いてみましたが
どうしてもわからないことがでてきました。

画像ボックスの大きさなどをちょっと変更する程度のスクリプトなんですが
昔だと

set {Y1,X1,Y2,X2} to bounds
set {Y1,X1,Y2,X2} to {(Y1 as real),(X1 as real),(Y2 as real),(X2 as real)}

みたいにすれば画像ボックスの座標を数値として取得できたと思うのですが、
これをやると
「data FXVMFFF77EFE をタイプ real に変換できません。」
などと言われます。

テストしたのは、10.4とMacOS9（Classicではなく）のスクリプトエディタからです。
何か変わったんでしょうか？

＃昔はいっぱいあったApplescript関係のWeb、軒並みなくなってんのね......

１）LocationFree Playerを起動
２）コマンド+Fを押す
３）ウィンドウを左に500ピクセルほど移動
４）コマンド+Fを押す
５）コマンド+Sを押す

をApplescriptで実現する場合、どう書くのがよいでしょうか？
３）が分かりません…

tell application "TextEdit"
if (count of windows) > 0 then
set travelDistance to 500
set {a, b, c, d} to bounds of window 1
set bounds of window 1 to {a - travelDistance, b, c - travelDistance, d}
end if
end tell

LocationFree PlayerはScriptableなの？

>>436
ありがとうございます。
それは３の部分のみですよね。
がんばってみます

全部GUI Scriptingでやるならこうかね

tell application "System Events"
tell application process "LocationFree Player"
kestroke "f" using command down
tell window 1
set {x, y} to position as list
set position to {x - 500, y}
end tell
kestroke "f" using command down
kestroke "s" using command down
end tell
end tell

keystrokeの前後は適当にdelay噛ました方が良いかも

s/kestroke/keystroke/g

Illustrator CS3でプリント用にスクリプトを書いているのですが
ページ範囲の指定がわかりません……

print options を見ているのですが、該当項目が見つけられません
copies があるので job option あたりかなぁ〜とは思っているのですが
ご教示お願いします

>>440
訂正サンクス
かっこわるorz

>>441
そもそも、Illustratorにページの概念無くね?

>>443
タイリングで出すときに指定したい時があるんだけど
別のやり方見つけたので自己解決

その自己解決の内容を書けよ。
それがマナーだろ。
じゃないと以後答えないよ。

OS 10.5.2のDVDプレーヤのスクリプティングについて

今、早送り中、巻き戻し中のどちらか、を判断する方法ってないですよね？
dvd state だとどちらも scanning なんですが

my getDVDState()

on getDVDState()
tell application "DVD Player" to set res to dvd state
if (my u(res) is equal to my u("scanning")) then
tell application "System Events"
tell application process "DVD Player"
tell menu 1 of menu bar item "制御" of menu bar 1
set fwd to enabled of menu item "順方向にスキャン"
set rew to enabled of menu item "逆方向にスキャン"
if (fwd and (not rew)) then
return "rewind"
else if (rew and (not fwd)) then
return "forward"
end if
end tell
end tell
end tell
else
return res
end if
end getDVDState

on u(str)
return str as Unicode text
end u

tell application "Finder" は、ドットで始まるフォルダーは
扱えなかったりしますか。

聞くより試した方が早くない？
或いはSystem Eventsで代替できそうならそっちでやるとか

FInderではできない。System Eventsではできる。

tell application "System Events"
set dotfile to folder "Macintosh HD:Users:username:.emacs.d"
creation date of dotfile
end tell

Finderでも不可視ファイルが見える状態ならできそうな気が

AppleScriptの他にシェルスクリプトもカジってみたくなり，書籍購入してきました．
パラ見して取っ付きやすそうなのを二冊ほど．（下の二冊）
www.gcug.net/sample/ss.png

>>447
わざわざ回答を書いて下さってありがとうございます！

最終的にはファイル名の選択した半角カタカナ部分を
全角カタカナに変換したいと思ってあれこれ調べたのですが
うまくできません。ガ行がうまく変換できません。

ファイル名の選択した部分だけの変換、という操作は
可能でしょうか？

アドバイスよろしくお願いします。


set hankatatext to "ｳﾞｶﾞｷﾞｸﾞｹﾞｺﾞｻﾞｼﾞ"----半角カタカナテキスト

set hankatatable to " !?-ｱｲｳｴｵｶｷｸｹｺｻｼｽｾｿﾀﾁﾂﾃﾄﾅﾆﾇﾈﾉﾊﾋﾌﾍﾎﾏﾐﾑﾒﾓﾔﾕﾖﾗﾘﾙﾚﾛﾜｦﾝｧｨｩｪｫｯｬｭｮｳﾞｶﾞｷﾞｸﾞｹﾞｺﾞｻﾞｼﾞｽﾞｾﾞｿﾞﾀﾞﾁﾞﾂﾞﾃﾞﾄﾞﾊﾞﾋﾞﾌﾞﾍﾞﾎﾞﾊﾟﾋﾟﾌﾟﾍﾟﾎﾟ"
set zenkakutable to "　！？−アイウエオカキクケコサシスセソタチツテトナニヌネノハヒフヘホマミムメモヤユヨラリルレロワヲンァィゥェォッャュョヴガギグゲゴザジズゼゾダヂヅデドバビブベボパピプペポ"
set zenkakutext to ""
considering case
repeat with x in hankatatext
set y to 1
set convtext to x as string
if convtext is in hankatatable then
repeat with x in hankatatable
if convtext contains (item y of hankatatable) then
set convtext to (item y of zenkakutable) as string
exit repeat
end if
set y to y + 1
end repeat
end if
set zenkakutext to zenkakutext & convtext
end repeat
end considering
zenkakutext --全角に変換されたテキスト

set hankatatable to "ｳﾞｶﾞｷﾞｸﾞｹﾞｺﾞｻﾞｼﾞｽﾞｾﾞｿﾞﾀﾞﾁﾞﾂﾞﾃﾞﾄﾞﾊﾞﾋﾞﾌﾞﾍﾞﾎﾞﾊﾟﾋﾟﾌﾟﾍﾟﾎﾟ !?-ｱｲｳｴｵｶｷｸｹｺｻｼｽｾｿﾀﾁﾂﾃﾄﾅﾆﾇﾈﾉﾊﾋﾌﾍﾎﾏﾐﾑﾒﾓﾔﾕﾖﾗﾘﾙﾚﾛﾜｦﾝｧｨｩｪｫｯｬｭｮ"
set zenkakutable to "ヴガギグゲゴザジズゼゾダヂヅデドバビブベボパピプペポ　！？?アイウエオカキクケコサシスセソタチツテトナニヌネノハヒフヘホマミムメモヤユヨラリルレロワヲンァィゥェォッャュョ"
set zenkakutext to ""
considering case
repeat with x in hankatatext
set y to 1
set convtext to x as string
if convtext is in hankatatable then
repeat with x in hankatatable
if convtext contains (item y of hankatatable) then
set convtext to (item y of zenkakutable) as string
exit repeat
end if
set y to y + 1
end repeat
end if
set zenkakutext to zenkakutext & convtext
end repeat
end considering

>>454
あのページに書いてあるように、テーブルの内容をリスト形式にするのが手っ取り早いかな。
set hantable to {"ｳﾞ","ｶﾞ","ｷﾞ","ｸﾞ"・・・}
set zentable to {"ヴ","ガ","ギ","グ"・・・}
ってな要領で。めんどくさいけど。

いや、だめだ、ｽﾏｿ

自分だったら置換しちゃうかな


set hankatatext to "ｳﾞｶﾞｷﾞｸﾞｹﾞｺﾞｻﾞｼﾞ" ----半角カタカナテキスト

set hankatatable to " !?-ｱｲｳｴｵｶｷｸｹｺｻｼｽｾｿﾀﾁﾂﾃﾄﾅﾆﾇﾈﾉﾊﾋﾌﾍﾎﾏﾐﾑﾒﾓﾔﾕﾖﾗﾘﾙﾚﾛﾜｦﾝｧｨｩｪｫｯｬｭｮｳﾞｶﾞｷﾞｸﾞｹﾞｺﾞｻﾞｼﾞｽﾞｾﾞｿﾞﾀﾞﾁﾞﾂﾞﾃﾞﾄﾞﾊﾞﾋﾞﾌﾞﾍﾞﾎﾞﾊﾟﾋﾟﾌﾟﾍﾟﾎﾟ"
set zenkakutable to "　！？−アイウエオカキクケコサシスセソタチツテトナニヌネノハヒフヘホマミムメモヤユヨラリルレロワヲンァィゥェォッャュョヴガギグゲゴザジズゼゾダヂヅデドバビブベボパピプペポ"
set zenkakutext to hankatatext
repeat with i from 1 to (count of character of hankatatable)
set zenkakutext to f_Replace(zenkakutext, (character i of hankatatable), (character i of zenkakutable))
end repeat
zenkakutext --全角に変換されたテキスト

on f_Replace(theText, theOldWord, theNewWord)
set theDefDel to AppleScript's text item delimiters

set AppleScript's text item delimiters to theOldWord
set theTextItemList to (every text item of theText) as list

set AppleScript's text item delimiters to theNewWord
set theRes to every item of theTextItemList as text


set AppleScript's text item delimiters to theDefDel

return theRes
end f_Replace

入力元の１文字先を常に見るようにして、
それが濁点や半濁点だったら・・・という対処があるかな。

あれ？
濁点で一文字なのか
コピペしたら変換されちゃったのかな
お恥ずかしい

もしかして10.4と10.5とで半角濁点の扱いが違ってたりしたら・・・

リスト形式にして、濁点文字から先に置換すればいけるかな

set hantext to text returned of (display dialog "半角カナ→全角カナ" default answer "") --テスト用ダイアログ
--set hantext to "半角ﾃｷｽﾄ" --これは例。文字列は任意で。
set hantable to "ｱｲｳｴｵｶｷｸｹｺｻｼｽｾｿﾀﾁﾂﾃﾄﾅﾆﾇﾈﾉﾊﾋﾌﾍﾎﾏﾐﾑﾒﾓﾔﾕﾖﾗﾘﾙﾚﾛﾜｦﾝｧｨｩｪｫｬｭｮｯｰ｡､｢｣"
set hantable2 to "ｳﾞｶﾞｷﾞｸﾞｹﾞｺﾞｻﾞｼﾞｽﾞｾﾞｿﾞﾀﾞﾁﾞﾂﾞﾃﾞﾄﾞﾊﾞﾋﾞﾌﾞﾍﾞﾎﾞﾊﾟﾋﾟﾌﾟﾍﾟﾎﾟ"
set zentable to "アイウエオカキクケコサシスセソタチツテトナニヌネノハヒフヘホマミムメモヤユヨラリルレロワヲンァィゥェォャュョッー。、「」"
set zentable2 to "ヴ　ガ　ギ　グ　ゲ　ゴ　ザ　ジ　ズ　ゼ　ゾ　ダ　ヂ　ヅ　デ　ド　バ　ビ　ブ　ベ　ボ　パ　ピ　プ　ペ　ポ　"
set zentext to ""
set dakusyori to 0
set i to 1
considering case
repeat (count hantext) times
set y to 1
set convtext to item i of hantext as Unicode text

--濁点の処理
if i < (count hantext) then
if (convtext is in hantable) and ((item (i + 1) of hantext) is "ﾞ" or (item (i + 1) of hantext) is "ﾟ") then
repeat with x in hantable2
if convtext contains (item y of hantable2) then
set convtext to (item y of zentable2) as Unicode text
if item (i + 1) of hantext is "ﾟ" then set convtext to (item (y + 10) of zentable2) as Unicode text
set dakusyori to 1
exit repeat
end if
set y to y + 1
end repeat
end if
end if

--濁点が連続したときの処理
if convtext is "ﾞ" or convtext is "ﾟ" then
if dakusyori is 1 then
set convtext to ""
set dakusyori to 0
else
if convtext is "ﾞ" then set convtext to "゛"
if convtext is "ﾟ" then set convtext to "゜"
set dakusyori to 0
end if
end if

--通常
if convtext is in hantable then
repeat with x in hantable
if convtext contains (item y of hantable) then
set convtext to (item y of zentable) as Unicode text
exit repeat
end if
set y to y + 1
end repeat
end if

set zentext to zentext & convtext
set i to i + 1
end repeat
end considering
display dialog "" default answer zentext buttons {"Cancel", "Copy"} default button 2 --全角に変換されたテキスト。

フォルダの中を探したら↑が出てきた
けど、自分でもよく解釈できてない

php使う方法

set hankatatext to "ｳﾞｶﾞｷﾞｸﾞｹﾞｺﾞｻﾞｼﾞ" ----半角カタカナテキスト
set zenkakutext to do shell script "php -r '$text = $argv[1]; $text = mb_convert_kana( $text, \"KV\", \"UTF8\"); print $text;' " & quoted form of hankatatext
log zenkakutext

Transliterate OSAX使えば？

AppleScriptは選択中のテキストを取得して処理する、
は実装してない、と読んだ覚えがあるんですが
ってことは
フォルダの名前の特定の部分だけを選択して
そのままそこだけ変換、って無理なんでしょうか？

>>465
濁点部分もちゃんと変換されてます。
半角カタカナから全角カタカナ、甘く考えてました。

総スルーだけど、 >>455 の修正でできない?
Leopardではできてるよ。

Finderはできないが、テキストを扱うアプリなら大抵選択範囲の中で
処理できるよ。

Finderのselectionはファイルそのものになってしまうんだな。

クリップボードにコピーし、処理後にペーストする、
という流れでならできるけど、編集状態が解けないようにAppleScript
を実行するのが大変だな。

余分なところが変換されないよう、処理内容を見直すのが本道だろう。

>>469
10.4だとできないっす。
10.4だとｶﾞを２文字として扱い、10.5だと１文字として扱うっぽい？

>>454
こんな感じで，うちのLeopardではイケました．

set hankatatext to "ｳﾞｶﾞｷﾞｸﾞｹﾞｺﾞｻﾞｼﾞ"----半角カタカナテキスト

set hankatatable to " !?-ｱｲｳｴｵｶｷｸｹｺｻｼｽｾｿﾀﾁﾂﾃﾄﾅﾆﾇﾈﾉﾊﾋﾌﾍﾎﾏﾐﾑﾒﾓﾔﾕﾖﾗﾘﾙﾚﾛﾜｦﾝｧｨｩｪｫｯｬｭｮｳﾞｶﾞｷﾞｸﾞｹﾞｺﾞｻﾞｼﾞｽﾞｾﾞｿﾞﾀﾞﾁﾞﾂﾞﾃﾞﾄﾞﾊﾞﾋﾞﾌﾞﾍﾞﾎﾞﾊﾟﾋﾟﾌﾟﾍﾟﾎﾟ"
set zenkakutable to "　！？−アイウエオカキクケコサシスセソタチツテトナニヌネノハヒフヘホマミムメモヤユヨラリルレロワヲンァィゥェォッャュョヴガギグゲゴザジズゼゾダヂヅデドバビブベボパピプペポ"
set zenkakutext to ""
considering case
repeat with x in hankatatext
set y to 1
set convtext to x as string
if convtext is in hankatatable then
repeat with x in hankatatable
if convtext is in (item y of hankatatable) then
set convtext to (item y of zenkakutable) as string
exit repeat
end if
set y to y + 1
end repeat
end if
set zenkakutext to zenkakutext & convtext
end repeat
end considering
zenkakutext --全角に変換されたテキスト

>>468
工夫すればできるでしょ。

まさか System Events を使うとかじゃ

>>468
ファイル名とかの場合、スクリプトを動かした時点で
文字の選択範囲が解除されちゃうから無理

iKey等のユーティリティにて、キーボードショートカット
からAppleScriptを実行するようにすれば回避可能。

部分選択文字はクリップボードにコピーして取得するしかないと思うが。
加工したのを戻す際はSystem EventsでCommand+Vだね。
Command+Vするまでに編集状態が解除されないとは限らないのが
GUI Scriptingの弱点。

フォルダ名を取得
選択部分だけ変換
フォルダ名を変更

とやるならペースト動作はしなくてもいいような

色々考えてみたが、選択箇所の取得にコピーする以外の方法が無い事を踏まえると、
ペーストした方が結局は安定するかもしれないな

コピーだと選択している位置までは把握できないのだけど、
offsetとか使っての位置判断では同じ文字列が手前にあった場合に無視できない

ついでにこれはLeopard限定かもしれないが、
1byte文字と2byte文字が混在しているとoffsetの結果が変な事になったりする

AppleScriptでファイル名のUTF-8の処理はNFDとNFCの違いを意識しないといけない
HFS＋のファイル名はNFDらしい。で、Standard Additionの「length」などがNFDを
きちんと処理しないのは10.5.0から。

で、こんなことをする必要があるそうで。
to GetNFC(theItem)
set theScript to ("echo " & (quoted form of theItem) &
" | iconv -f UTF-8-MAC -t UTF-8")
return (do shell script theScript)
end GetNFC

フィードバックしる。

>>478
逆でしょ。10.5になってからきちんとNFDでも１文字として扱う様になった。
http://developer.apple.com/releasenotes/AppleScript/RN-AppleScript/index.html
> character elements of text count a combining character sequence as
> a single character.
あとNFDをNFCに変換するのは解決策にはならんよ。Precomposed formが存在しない
文字はNFCでも複数code pointの組合わせのまま

>>479
characterはNFDを扱うけど、lengthはNFDを扱えないよ
「だ」をテキストエディタに打ち込んだもの
「だ」をファインダのファイル名にうちこんだもの
それぞれをAppleScriptでlengthで評価してみれば一目瞭然。

バグリポーと炭。

> 1byte文字と2byte文字が混在しているとoffsetの結果が変な事になったりする
って昨夜書いたけどこれは間違いって事ですな


offset of "1" in "ダ1"
count of "ダ1"
offset of "1" in "ﾀﾞ1"
count of "ﾀﾞ1"

という様なのを実行すると
10.4.11では全角の場合offset/countとも2、半角だと同じく3になった
10.5.2ではも全角では同じ2なのが、半角だとoffsetが3だけどcountが何故か2
なんだかどっちつかずな結果


同じ事をフォルダ名なんかでやってみると

tell application "Finder"
set fullName to name of item 1 of (selection as list)
set lastLetter to item -1 of fullName
offset of lastLetter in fullName
count of fullName
end tell

10.4ではoffset/countとも濁点付きの字を2文字として処理
10.5はoffsetは2文字、countは1文字として処理
どちらも全半角の差はなし


ってトコまで調べてなんでかなーと悩んでたんだけど、
>>478-480こういう事なのか
…まだよくわかってないけど

>>480
lengthはちゃんと動く。OSX 10.5.2では
length of "だ" -- 1
length of (<<data utxt3060>> as Unicode text) -- 1
length of (<<data utxt305F3099>> as Unicode text) -- 1
offset ofはUTF-16の単位で数えてるから、こっちを言ってるんだと思うけど
マッチ長が判らないから有無の判定位にしか使えないと思う。
細かい処理はどの道characters ofでの分解処理が必要でしょう。

あれID変わっちゃった。>>479＝>>482ね。

前スレの806以降あたりが参考になるんじゃないかと思う，この問題の流れ．

便乗よいでしょうか？以下のようなスクリプトが正常に動かないのもUnicodeの不具合？
タブやリターンをas Unicode text で変数にいれても、アスキーナンバーで設定しても同じ。
データセットやってなかったけど、0の数が違うだけで同じだよね？

choose file with prompt "please select at tab stop Text. with UTF-8 of 16" without invisibles

set myTextFile to open for access file TextFileName
repeat
　　try
　　　　set end of returnTextList to read myTextFile before return using delimiter {",", tab} as Unicode text
　　　　--set end of returnTextList to read (myTextFile as Unicode text) before return using delimiter {",", tab}
　　on error errMsg number errNo
　　　　close access myTextFile
　　　　if errNo is -39 then
　　　　　　set errorFlag to false
　　　　　　exit repeat
　　　　　　--return {returnTextList, TextFileName}
　　　　else
　　　　　　　　set errorFlag to true
　　　　end if
　　　　exit repeat
　　end try
end repeat
log returnTextList
--あきらめてデリミタで処理

>>474-475
この辺の解決策として使えるかな？

まず以下のスクリプトをアプリケーションバンドルとして保存
"初期画面"のチェックは外し、保存場所はユーザスクリプトフォルダにしておく

on run
tell application "System Events" to frontmost of application process "Finder"
if not result then return
tell application "System Events"
keystroke "c" using command down
end tell
set beforeString to the clipboard
if (clipboard info for "class txtn") is {} then return
set afterString to half2full(beforeString)
set the clipboard to afterString
tell application "System Events"
keystroke "v" using command down
keystroke return
end tell
end run

on half2full(beforeString)
return "ガギグゲゴ" --半角⇒全角の変換処理は省略
end half2full

保存したらパッケージの中を開いて、info.plistにNSBGOnly="1"を追加する
テキストエディットの場合はこんな感じで追記

<key>NSBGOnly</key>
<string>1</string>

Finderでフォルダ名の一部分を選択した状態で、
スクリプトメニューから作ったバンドルを実行すれば一丁あがり

思い出しついでに、いろいろ触ってみてましたが...無理。今日はあきらめて寝ます。

>>485 だけだとわかんないですよね。デバッグ用の切り出しのコピ。
英語がめちゃくちゃなのはスルーしてください。ASSでユニコードがデバッグできんのが悪い!!!と言うことで。
try
　　set end of returnTextList to read myTextFile before return using delimiter {",", tab}
on error errMsg number errNo

ここでエラートラップに引っかかったやつを本当はBOMをみて、だったのですが、
不安定なので環境設定（UTF16ON）あたえて

if UTF16ON is 0 then
　　set rerunText to read myTextFile as --《class utf8 --》 -->about FileMaker Pro export UTF-8
else if UTF16ON is 1 then
　　set rerunText to read myTextFile as Unicode text -->about FileMaker export ProUTF-16
end if
で、仕方がないからこうやってテキストで取り込んで、Winの時とLFの時の処理してデリミタです。
今の私ならなんとかなるかな？と思いrun scriptの中身開けていろいろやってみたけど、だめでした。

>>486
文字化けしてた

> if (clipboard info for "class txtn") is {} then return
↓
> if (clipboard info for <<class txtn>>) is {} then

"<<"は option + ] 、">>"は option + shift + ] って事で

>offset ofはUTF-16の単位で数えてるから、こっちを言ってるんだと思うけど

うわ、そうだった、ごめん。はずかし！

>マッチ長が判らないから有無の判定位にしか使えないと思う。
これ、NFDとNFCが同じ文字として判定されていないから、有無の判定にも
使えないってことだと思うんだけど・・・違う？

AppleScriptを突然使わなきゃいけない状態になって
困惑している者です。（ASに関してはほぼ素人です。。）

widget(js)からosascriptでAppleScriptを叩き、
そこからshellコマンドを引数付けて実行しようかと思っています。

on run argv
do shell script "./program" & " " & item 1 of argv & " " & item 2 of argv & " " & item 3 of argv & " " & item 4 of argv
end run

…という感じで書いてまして、引数4つ付けて動作はしています。
こちらを引数の数を不定にするには、どう記述すれば良いのでしょうか？

for文(repeat?)みたいなもので、引数のlength分繰り返して文字列を生成し
do shell scriptで実行、という感じなのかなとは思いますが
記述が分かりませんです。。

>>491
こういう意図かな？

set argvs to ""
repeat with argv in argvlist
set argvs to argvs & " " & (argv as unicode text)
end repeat
do shell script "./program" & " " & argvs

>>492さん

こんな時間にどうもありがとうございます！
なるほど、こういう感じで書くのですね。勉強になります。

他の言語での記述となりますが

var argvs:String="";
for(var i:Number=0;i<argv.length;i++){
argvs=argvs+" "+argv[i] //そしてUnicode変換？
}
//そしてdo shell script実行

みたいな処理が行われていると考えて良いのですよね。
repeatがイマイチピンと来ないのですよね…。
ちょっと勉強してきます。。

どうにか動きました！
そのままのコードでは動かなかったので
こんな感じで。

on run argv
set argvs to ""
repeat with aVal in argv
set argvs to argvs & " " & (aVal as Unicode text)
end repeat
do shell script "./program" & argvs
end run

どうもありがとうございました！

iTunesなんだけど
sound volume (integer) : the sound output volume (0 = minimum, 100 = maximum)
ってなってるけど実際にやってみると

--ここから
set vol to ""
tell application "iTunes"
repeat with i from 0 to 100
set sound volume to i
set temp to sound volume
if not i = temp then
set vol to vol & i & "→" & temp & ", "
end if
end repeat
end tell
display dialog vol
--ここまで

3→2, 4→3, 6→5, 9→8, 10→9, 12→11, 15→14, 16→15, 17→16, 22→21, 23→22, 28→27, 29→28, 34→33, 37→36, 43→42,

となる、これはバグなんだろうか
なんだか気持ち悪い

>>495
毎回同じ結果？

いや、そうじゃなくて
3をsetしてるのに2になったりってこと

うちでも同じ結果だな

あきらめるしかないっぽいなぁ

tell application "iTunes"
set sound volume to 50
end tell

>>497
1,2,5…は合ってて3,4,6…は1少ないって事はわかってるよ
それが毎回同じ結果になるならそういうバグなんだろうなって

もしズレる場所が違ってくるなら時間差みたいなもんかなとか
例えば
set sound volume to i
set temp to sound volume
この間にdelayかければ発生しないのかなってさ

0⇒100じゃなくて100⇒0にしてみるとか、
手元にMacがあれば色々実験してみたいところだ

>>501
delay入れても同じ。
ちなみに3から3.499999は2だけど、3.5から3.9だと3。
小数が何桁まで認識されるかは不明。

内部で処理する数との割り切り方の問題かな。

多分、iTunesのGUIのサウンドコントローラのスライダーの長さが
0〜100まで無くて、>>495 の様に皺寄せされているんだと思うよ。

きちっと狙った値にセットする為にはどうするのがスマートな方法なんだろう
caseでわけるとか配列にしておくとかはちょっとゴリ押しな感じがするし

配列使っても狙った値にセットは不可能では。34とか。

0.1刻みでセットしてみたところ
4, 6, 10, 12, 17, 23, 29, 34, 37, 43
は無理だという事がわかった、あきらめた

>>495のスクリプト自分だったらどう修正するかって考えていたんだけど，
中でset sound volumeの値を無理矢理設定しても設定されないってことなんですね．

そうか，そういうことかあ．

後学のために聞きたいんですが，「caseでわける」というのはif文で分岐，
配列っていうのは，listを使って処理するっていう考え方でいいですか？

repeat with ~ in から要素を取り出し修正スクリプト作ろうと思ったけど，
ループの中のループ処理は，流れが把握しにくいね……．

>>495 の自分的修正スクリプト．
ボリュームの不具合はなおらないけど，処理の考え方の一つとして．

set vol to ""
set correct to {0, 0, 0, 1, 1, 0, 1, 0, 0, 1, 1}
tell application "iTunes"
set StandardVolume to sound volume
repeat with i from 0 to 10
set x to item (i + 1) of correct
set sound volume to i + x
set temp to sound volume
set vol to vol & i & "→" & temp & ", "
end repeat
set sound volume to StandardVolume
end tell
display dialog vol

選んだフォルダのサブフォルダも探したいときってどうするの？
インデザインver2とインデザインCSとCS2とクォークファイルのエイリアスを
任意の場所につくりたいのです。というかファイルの一覧がテキストで欲しいんですけど
サブフォルダで躓きました。再帰とか繰り返しがそれっぽいんですけど
一気に理解できない感じになってしまいました
サブフォルダ含めないまではこうなりました。

set folder1 to alias "任意の場所"
set folder2 to alias choose folder

tell application "Finder"
make new alias file at folder1 to (files of folder2 whose file type = "InDd")
make new alias file at folder1 to (files of folder2 whose file type = "IDd3")
make new alias file at folder1 to (files of folder2 whose file type = "IDd4")
make new alias file at folder1 to (files of folder2 whose file type = "Xdoc")
end tell


このへんをいじいじしていたらできますか？
http://www.tonbi.jp/AppleScript/tips/Reference/Plural.html

>>510
Jon's Commands X の walk folders で簡単に
というのはダメかな

>>510

set folder0 to (choose folder)
my do_something(folder0)

to do_something(thefolder)
tell application "Finder"
set theList to files of thefolder
repeat with aFile in theList -- ファイルに関する処理
--ここに実際の処理がはいる
display dialog (aFile as Unicode text) --サンプル
end repeat
set theList to folders of thefolder
repeat with aFolder in theList -- フォルダに関する処理
my do_something(aFolder) -- 再帰!
end repeat
end tell
end do_something

再帰の骨組みです。
repeatを（folderもfileもその他も一緒にした）itemで回して、その都度folderか否かチェックして
分岐するのでもいいけど、わたしはfilesとfoldersでわけちゃう方が（バグ取りが楽な気がして）好み。

>>510
entire contentsでサブフォルダ内のファイルも取得できる

set theAliasFolder to alias "hoge:hoge"
set theFolder to choose folder
tell application "Finder"
set theFiles to (every file of entire contents of theFolder) whose name ends with ".jpg"
make new alias file at theAliasFolder to theFiles
end tell

>>513
>entire contents
これMac OS 9時代にバグバグだったから、なんか怖くて使えないんだけど
もう平気になってる？　なってるよね。

>>514
そうなんですか。
使い込んでないので自分はわかりません。

ちょっと調べたらバグの情報じゃないけど
http://piyocast.com/as/?cat=6&paged=2
にentire contents の高速化のtipsがあった。

>>512
>>513
ありがとう
>>513の方法でつくってみました

set theAliasFolder to alias "エイリアスを保存するフォルダ:"
set theFolder to choose folder
tell application "Finder"
set theFiles1 to ((every file of entire contents of theFolder) whose file type = "IDd3")
set theFiles2 to ((every file of entire contents of theFolder) whose file type = "IDd4")
set theFiles3 to ((every file of entire contents of theFolder) whose file type = "Xdoc")
set theFiles4 to ((every file of entire contents of theFolder) whose file type = "InDd")
make new alias file at theAliasFolder to theFiles1
make new alias file at theAliasFolder to theFiles2
make new alias file at theAliasFolder to theFiles3
make new alias file at theAliasFolder to theFiles4
end tell

なんとかこれで動いたっす！大量にあるばあいは結構重い！

再帰処理も覚えておくと役に立つかと

はい、再帰は敷居が高い感じがしますが
勉強します

repeat
beep 1
end repeat

escキーを押すことでループから抜け出すようにしたいと思っています．
if文とexit文を使う際のescキー判定方法がわかりません．ヒントいただけませんか．

利用環境 OSX10.5.2 Leopard

>>519
アップルスクリプトではそういう操作はできないです。

>>520
わかりました．ありがとうございます.

上とは関係ないですけど，AppleScriptの命令をたくさん持つアプリに出会うと
ワクワクしますね．この命令使えばあんなことやこんなことできるなあって．

どんな命令が使えるのかわかんなくて嫌になるんだけどな・・・

>>519､521
AppleScriptStudio（Xcode）なら似た様な事は可能な気もする

>>522
今，radioSHARKというアプリの命令の充実ぶりに萌えてハマって，
といういきさつがあってのレスだったんですが，確かに用語集がせめて
日本語だったら……，というのはよく思いますね．

>>523
Xcodeですか．小さなスクリプト組むのにも丸一日かかるくらいですから，敷居が高そう．

>>519
try
display dialog "" giving up after 1
on error
exit repeat
end try

とかを適当なトコに入れ込めば、「escキーで抜ける」って希望については
AppleScriptだけでも何とか叶うかと。禿しくブサイク & 劇遅な方法だけど・・

Jon's Commands Xにkeys pressedってコマンドがあるけど、Intel未対応だったりするんで
あんまりはすすめません。
ttp://www.seanet.com/~jonpugh/

>>525
ダイアログが出てはマズい処理なので，escキーで止まることはできても
やっぱり使えないです．でも，わざわざどうもでした．
エンドレスループでも，command + .　なら終了できますよね
でもソフトの終わらせ方として美しくないのでこれはダメだなって．

>>526
ありがとうございます．OS9の時，使ってました．intel未対応ですか……．
ネット上で配布するScriptなので，それを考慮するとちょっと難しいですかね．

on any key　ってなかったっけ。

>>528
う〜ん，よくわからないです．検索でも6件しかひっかからず．
もうこれは仕方ないと思うので，あきらめます．

昨日一つアプレット作成して，今またもう一つアプレット作成中なんですが，
いやー楽しいです．もちろん簡単には作成できないものの，試行錯誤の中でできた！
っていう実感が，また次のアプレット作成に繋がっていくっていう感じで．

UNIXのcommandでいいから、呼ばれたときに押されてるキーを返すものあればいいのだけど

Safariで現在開いているページのHTMLソースを取り出したいのだけれどうまくいかない。
get source や get document じゃないみたいだ・・・

>>531
get source of document 1

>>531
ここに，そのものズバリのソースがありますよ．
ttp://blog.b-shock.co.jp/pooza/2006/08/jchecker_x.html

JChecker使いには，最高のスクリプトじゃないかな．

tell application "Finder"
get processes
end tell

上で得られる値というのは，Finder形式の参照値ですよね？
これをaliasクラスに変換したいのですが，単にas alias listではダメなようです．
どうやって書いていけばいいのでしょうか．ヒントいただけませんか．

tell application "Finder"
properties of (item 1 of processes)
end tell

とやると中程に答えが

>>532,533
ありがとう、うまくいったよ。

>>535
う〜ん……．教えたいただいたのにもかかわらず結局わからないので，
自分でもう一度いろいろと試してみることにします．ありがとうでした．

答えはfile of (item 1 of processes)だよ

>>538
それをヒントに，以下のようにしたら全プロセス（たぶん）取得できました．
つまり，as alias listしなくてもいいということですよね．

tell application "Finder"
ile of every process
end tell

と，無事これで終わりと思ったら，おかしな問題がでてきました．
mdworkerというアプリだけが， missing valueを返してきます．
このアプリだけ「所在不明だよ〜ん」ってことかな．

なんか変だけど，スルー処理すればいいやってことにしておきます．
ありがとうございました．

間違えたので，訂正．

× ile of every process
○ file of every process

AppleScriptを使用して、
Excelファイルのシート名を変更することは可能ですか？

フロッピーに入ってるExcelファイルのシート名を変更したいのですが、
だいたいこんな感じで動かないものかと書いてみましたが、
ダメです。

tell application "Finder"
set thefile to item 1 in disk "NO NAME"
set the name of thefile to "Book1.xls"
end tell
tell application "Microsoft Excel"
set thesheet to worksheet of thefile
set the name of thesheet of thefile to "Book1"
end tell


どこがいけないでしょうか、
それともシート名の変更は無理ですか？

>>541
2008だけど、これで変えられたよ？
tell application "Microsoft Excel"
tell document 1
set name of active sheet to "test"
end tell
end tell

脊椎反射でカキコしてしまった。もっと手前の状況かな？
まずは、"applescript　アプリケーションを指定してファイルを開く"　とかでぐぐってごらん。
ファイルが開けられるようになったら、次はスクリプトエディタの用語説明でエクセルを指定してsheetで検索。
中にいろんなこと書いてあるから、いろいろ試してみる。

>>542
できました！
ありがとうございます、本当に助かりました！

今度はこのシート名を変更したファイルを保存、閉じる、
というところまで全部スクリプトでやりたいので
ご教示いただいたやり方で検索して自己解決してみます。

本当にありがとうございました。

何度もすみません‥‥‥
ファイルを閉じたいのですが、


tell application "Finder"
set thefile to item "Book1.xls" in disk "NO NAME"
end tell
tell application "Microsoft Excel"
open thefile
set name of active sheet to "Book1"
close thefile saving yes
end tell

とやると

"Book1.xls" of disk "NO NAME" は close メッセージを認識できません。

と言われてしまいます。

何が間違ってるでしょうか？

子供のお迎えに行かなきゃならないので
そろそろ退社いたします。
どなたかご教示いただければ幸いでございます。

closeって、applicationもdocumentもsheetも受け取ってくれないね。用語説明不親切だ。

tell application "Microsoft Excel"
set hoge to properties
set name of active sheet to "test"
save
close active window
end tell

iTunesをストップ状態にしておいて，以下のスクリプトを実行．

tell application "iTunes"
set a to player state
end tell
set a to a as Unicode text
if a = "stopped" then
beep 3
end if

スクリプトエディタ上から実行するとちゃんとBEEP音がするのに，
アプリケーション化して起動させるとBEEP音が出ない……．
アプリ化すると，別な値が返ってくるみたい．for iTunes 7.6.2 (9)

スクリプト作成で疲れた時は，いつもこのアプリを動かして遊んでます．
わかる人にはわかる，FLASH版ぽいゴルゴ．

www.gcug.net/as/golgo.zip

excelって返り値のクラスが謎だらけでスクリプトを組みにくい

>>542
おはようございます、レスありがとうございます。
これから記述してテストしてみるところです。
取り急ぎお礼まで。
本当に助かりました！

>>542
スクリプトを書いてテストしてみました。
見事、思い通りに動かすことができて感激です。
本当に感謝いたします。
ありがとうございました！

おめでとう。
お勉強なら次は、フロッピの中の複数のエクセルファイルを自動で順次開けて、
ファイル名と同じ名前をシートに付けて、ハードディスクの指定フォルダに保存とか。。。なんだろうなんけど。
お仕事だし一回やったら終わりかな？ご苦労様でしたのだ。

送迎はなくなって久しいけど、毎日弁当作成じゃ。こっちのがきついぞ？

これは難問だ。
特に，フロッピの部分は，現行モデルですべて廃止されているだけに超難問だ。

>>553
USB対応のFDドライブつなげるだけやん。

まあ、持ってる人はね。
初めて買った7300には付いてたなあ。

すみません、初心者の質問で恐縮なのですが、
日付の計算はどう書けばよいのですか？
ググったところ、day of ((current date) +100*days)というのはあったのですが、
今日からではなく、例えば6/10の100日後といった場合の書き方がわかりません。
初歩的過ぎて載ってないのだと思いますが、どうぞよろしくお願いいたします。

date "2008年6月10日"

>>557
どうもありがとうございました。
日本語でおkとは思いもよりませんでした。勉強します。

current date
だけ実行すると，きちんとした書式でウインドウの結果タブに表示される。

>>559
目から鱗です。ありがとうございます。

たとえば date "6/10"ってかいてコンパイルすると、いろいろ補われた形になります。

>>561
またもや目から鱗が。ありがとうございます。
昔Appleのサイトにこういう初心者向けのチュートリアルがあったはずなんですが見つからず。。
地道に頑張ってみます。

システム初期設定の日付の書式に依存する，環境依存の書式なので気をつけてね。
実体としての日付オブジェクトは同じなんだけど，コンパイル済みスクリプトを開くと，システムの環境で書式が変わる。

デスクトップ上にフォルダ1というフォルダを作成し，その中にフォルダ2を作ります．
それで以下のスクリプトを実行．

tell application "Finder"
set dPath to (choose folder)
set rPath to (every folder of (dPath)) as alias
end tell

Tiger使ってる方，日本語のフォルダ名が正常に取得できてますか？

>>564
根本的に解ってないし。これバグでしょ？すごいでしょ俺って天才？ってわけ？
なにがTigerなわけ？ま、書き方は機に食わないけど真面目に勉強の人の可能性も0.0001％
まず初心者本読むかググるかしろ。as 消して rPath を class で見てみな。

なんでそんなにつっかかるんだろう？何か悪いことしたかな？
質問気に入らなかったら，ごめんね．スルーして下さいな．

>>564
ごめん。プログラムうまく動かなくて気が立ってた。最低だ。
set rPath to every folder of dPath -->括弧つけ過ぎ、よけいに読みにくいかも。
set hoge to item 1 of rPath as alias
こう書いてみて。一つのオブジェクトでもListだよ？いつからだったかな？Xから？最初から？

>566
遅かった。本当にごめんなさい。

>>564
フォルダ1の中に複数のフォルダがあって
もしその複数のフォルダ全てのパスをリストで一気に取得したかったら
as alias → as alias list
にするといいよ。

ちょっと上で出てるけど

>>568
安易に質問しちゃったのが，間違いでした．すみません．
下のサイトの記事を読んでて，Tigerではそういうこともあるのかな？って普通に疑問でした．
ttp://www.m-m-j.com/2008/06/tiger_applescript/
自分はLeopardなので，確かめようがなくてここにパパッとに書いてしまったのがまずかったですね．

書いていただいたsourceは参考にさせていただきます．ありがとうございました．

>>568
いえいえ，中途半端にわかったつもりでいる自分もかなり痛いです．ほんとすみません．

>>569
はい．いろいろ試してみます．

>>564 許してくれるんか。良いやつだな、ありがとうなのだ。
>570 のリンクは濁点とかの作り方でUnicodeで正規に規定されている2種類で、appleが選んだのが間違いみたく言われてるやつだと思う。*要出典（2chねるは正確な情報を求めています、推測に基づいた記述は.......）
ま、現実今はサポートしてないんだしMSの動きを待つべきだったのかも。

UTF-8以外でも、UTF-16以外のエンコードを間違いなく判断することは、OSやプログラムでは出来ないんよ（私では、だな）
推測してダイアログに表示して、これでいいですか？くらい。読めなかったら変えてくださいよ？って。

エンコーディングはお約束の話題。ここにも過去ログにも話題たっぷり、解決法たっぷり。
LANでWinや9から取ったファイルや、Unarchiveの中身のファイル名。そして、それがFinder上で見た目変じゃなくても。
本当に化けたらどうしようもなくなるんだけど、濁点が離れたくらいなら、iconvしたらよい。ちょい上、もしくは前スレ参照。
うし、休憩終わり。がんばろ。いや、寝るべきか。

何このツンデレな流れw

>>512の文章をそのまま使ってつくってみたのですが再帰処理が無限につづいてしまいます
止めるのはどうすればいいでしょう
選択フォルダ以下のインデザインとクォークファイルのエイリアスを決まったフォルダに作るスクリプトなのです。

set folder0 to (choose folder)

my do_something(folder0)

to do_something(thefolder)
tell application "Finder"
set theList to files of thefolder
repeat with aFile in theList -- ファイルに関する処理
set theAliasFolder to alias "エイリアスを保存するフォルダ:"
make new alias file at theAliasFolder to (files of thefolder whose file type = "InDd")
make new alias file at theAliasFolder to (files of thefolder whose file type = "IDd3")
make new alias file at theAliasFolder to (files of thefolder whose file type = "IDd4")
make new alias file at theAliasFolder to (files of thefolder whose file type = "Xdoc")
end repeat
set theList to folders of thefolder
repeat with aFolder in theList -- フォルダに関する処理
my do_something(aFolder) -- 再帰!
end repeat
end tell
end do_something

>>574
いきなり本番で動かさずに、3階層くらいのフォルダをつくって試してみる。
次に処理したいフォルダをファインダでカラム表示で開けて行き、有限かどうかの確認。
無限ならそのフォルダのシンボリックを切る。
有限なのにループするなら9環境に詳しい人の答えを待つ。

上の弟にツンデレを聞きました。（ある程度解っていたつもり。シャナ1は見てました。2は途中でやめたけど。原作はもち全部持っています。10日は本編じゃなくてS2なんだ。悲しい）
らき☆すた -->touchだと一発変換だと自慢しておりましたが。
漫画と動画かがみん！！！特集（自作）の編集アニメを見さされました。あんなのが友達に居たらプロポーズします。私は可愛くないです。本当に噛み付いただけです。チラ裏終わり。

>>575 の追加（カキコ読み直して心配になりました）
>>510さんだよね？>512 さんがきてくれるのを待つのが一番良いんだろうけど、
もしも、サーバに対してやろうとしてるのなら、で、会社なら。システム管理者さんにまず聞いてからやって。
で、>516 ので出来てるんだったら、今回はお勉強だよね？システム管理者さんに黙って絶対にサーバいじったらだめ。
これだけです。おやすみなさいませ。

510です
環境はOS10.3.8でサー場じゃなくて自分のパソコンの中での処理です
原文をコピーして付け足しただけなので
どの命令がどうなってんのかさっぱりです

>>574
>>512そのままだとどうなりますか？
それも無限ループしているようなら、表示されるダイアログがどうなってるか調べてみて。

MacBook&10.5.3です。
メニューにある
AirMacを入にする／切にする
をスクリプトで制御するにはどうすればいいでしょうか？

>>579
メニューの「ログインウインドウ...」を選択するスクリプト
ヒントになるかと

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

↑って貼ってみたけど、昔に作ったからもっと効率良い方法あるかも

>>579
AirMac AppleScriptでググったら一発目に出てきたぞ。
ちなみに俺は試してないのであしからず。
http://d.hatena.ne.jp/zariganitosh/20080317/1205744874

有益な情報ありがとうございました。
おかげさまで解決しました！

特定のフォルダ（「オリジナル」）の中身（ai、swf、wmp、psdなど）を開いた時、
「これはオリジナルです」
というダイアログを出すにはどうしたら良いでしょうか…？
ついでに、開いた書類の名前をリストにして書き出す…なんて
出来るのでしょうか？

>>584
Finderで開いた時は無理、スクリプトから開いた時なら可能。

またお伺いしました。

>>542
その節は大変お世話になりました。
通りがかりでその後スレも拝見せず失礼いたしました。
あれからシステムはうまく動いて
実際にシステムを使ってる方からも好評をいただきまして
感謝が絶えません。

今日は一般的な質問ですが、
スクリプトエディタの「用語説明を開く…」で
希望のアプリケーションが表示されなかった場合は
そのアプリケーションはAppleScriptを使って動かせない、
という解釈になりますよね？

AppleScriptを使って「StuffIt Deluxe」を動かしたかったのですが、
このメニューで「StuffIt Deluxe」が出てこないので
悲しいです。

「無理」の一言で構いませんので
どなたか教えてくださいませ。

たびたびすみません。
先走って書き込みしてしまいましたが
StuffIt Deluxe のマニュアルを見てみたら
AppleScriptを使えるみたいですね、
もうちょっと勉強してからご質問することにします。
スレ汚し失礼しました。

お弁当毎日は激務ですね。
私も毎年長期休暇（夏休とか）が恐怖です。

三度もすみません。
やっぱりダメでした。

アプリケーションのバージョンも書かずに書き込みしてしまいましたが、
SfuffItのバージョンは8.0.2、
スクリプトメニューから「スクリプト用語説明を開く」をやったら
AppleScriptに「アプリケーションの用語説明がありません」
と言われてしまいました。

見ていたマニュアルはバージョン7.0のものでした。

私がダメでした。

>>588
StuffIt Deluxeは持ってないな。
Expander12.0.1なら用語説明ついてるし、解くのは書いた記憶もある。
たぶんDeluxeでも今のだといけるんじゃ？

Expanderは12.0.2が出ている。

おはようございます。

ずいぶん古いアプリを使っちゃってたみたいです、
上司に相談してアップグレードしてみます。
バージョンがかなり開いちゃったから新規購入かも。

いずれにしても費用対効果がネックになりそうです。
（新しいソフト買ってまで自動化するような作業か？と自問自答）

>>591
StuffIt特有の特別な機能を使っていないならzipを使ったら？
汎用性高いし、標準機能だし、ASとかASS使ってshellscript書いたらお手軽かつ超高機能に変身。
勉強にもなるし、自動化する価値ありだと思うよ？

実はですね、やりたいことが
↓
ファイルメーカーで作った郵便番号のデータベースがある

日本郵便のサイトからCSV形式の郵便番号データをダウンロードできるので、
これをダウンロード
（ダウンロードしたファイルは圧縮ファイル（lzh））

このファイル↑の解凍とファイルメーカーへのインポートを
ファイルメーカーのスクリプトでおこないたい

郵便番号データは適期的にアップデートされるので、
ダウンロード＆解凍＆インポートをファイルメーカーのボタンひとつでやりたい

なんですけど、
つまりダウンロードしたlzhファイルの解凍を
AppleScriptでできるのであれば
ソフトはなんでもいいと思ってます。

連続カキコすみません。
StuffIt Expander 10.0をダウンロードして
用語説明を見てみたら「expand」とあったので、
さっそく試してみました。

tell application "StuffIt Expander"
activate
expand "Macintosh HD/User/hoge/desktop/hoge.lzh" to "Macintosh HD/User/hoge/desktop/hoge.csv"
end tell

とやったのですが
うまく動きません。

つまりデスクトップにダウンロードされた「hoge.lzh」を解凍したいのですが、
なにか文が足りないんでしょうか？

>>594
activateってtellの前に入れるものなんじゃね？

>>594

入れ替えてみました。
StuffIt Expanderに「接続が無効」と言われます。
解凍したいファイル「hoge.lzh」と
解凍した先のファイル「hoge.csv」の
接続「to」のことでしょうか。

作業しながらのカキコで失礼します、
用語説明を見ると
「to」の次に記述するのは「optional destination to expand into」とあるので
解凍したファイルの保存先を書かなきゃいけなかったんでしょうか？？

もうちょっと試行錯誤してみます。

>>596
転記ミスかも知れないがいろいろおかしいぞ。

正解は

tell application "StuffIt Expander"
activate
expand "/Users/hoge/Desktop/hoge.lzh"
end tell

>>591
>いずれにしても費用対効果がネックになりそうです。
ごめん、これじゃ何も書けんわ。じゃ、わたしらなんで無償で答えてるの？？？？
わたしら、あなたにお金請求した？？？

人が無意味に（同じことの繰り返し）の作業してるのなら、
もっとクリエイティブ（言葉にすると笑える）に専念出来るようにがんばってるのに。
それに価値を認められないなら。

経営者云々じゃなく、あなたが思ったんだよね？こっちが道化だな。
ググるスキル無いからここにきたんでしょ？かえれよ！！！！

>>598
どうしたの？
何か仕事でつらいことでもあったの？

>>598
すみません、大変不快な思いをさせてしまいました。
そんなつもりじゃなかったんですが；；


>>597
ありがとうございます。
それですと
The destination "MacOS" is missing or unavailable.
Please select another destination.
と言われてしまうので、
たぶん「to」を使って解凍先を書いてあげないとダメなのかな？って思いました。

aliasパスで書かないとだめなんじゃないの、推測でしかないけど。

まあ541の人は安易に書き込まずに基本から調べて
１日２日じっくり考えてスクリプト書いた方がいいと思うよ。

全然話が違うんですけど、
みなさんはどこでどうやってAppleScriptを習得されてるんですか？

ネットを検索しても日本語のリファレンスというかマニュアルがほとんどないし、
今、手元には「AppleScript Programming for MacOS X」がありますが、
Finderの操作などはこれを見ながら四苦八苦してどうにかやってますが
アプリケーションを動かすとなるともう全然お手上げです。
イベントログで返ってきたエラーの内容もよく理解できなくて。

ちなみに私自身はプログラミングの経験は皆無で
FileMakerをかじってる程度です。

AppleScript PARKのIntroductionを見て、基本を押さえる。
用語説明やサンプルスクリプトを見ながら、自分で試行錯誤してみる。
発表まとめ等を見て、その発想はなかったわと思いながら参考にする。

>>601
そうですね、おっしゃるとおりだと思います。
自身の勉強も含めてもう少し自力で取り組みます。

>>603
テンプレにしっかり目を通してきます！

>>541
tell application "StuffIt Expander"
activate
expand "Macintosh HD:Users:ユーザ名:Desktop:1.lzh"
end tell

expandの後は，圧縮ファイルの場所でいいようです．
ver.7でも最新のver.12でも，書き方が同じなのを確認しました．

＞ 実際にシステムを使ってる方からも好評をいただきまして
感謝されるとやる気がでますね．自分もそれが作成の原動力の一つになってます．

できました。
ディレクトリの区切りを「/」ではなくて「:」にするべきだったみたいです。
「/」ではエラーばっかり返ってきて全然動きませんでした。
ご回答くださった皆様、本当にありがとうございました。

目的の圧縮ファイルをスクリプトエディタのウィンドウにドラッグ＆ドロップすると
勝手にディレクトリが「/」になるので、
もう思い込みで「ここはいじっちゃいけないところだ」
とかたくなに信じて疑いませんでした。
コロンに直して実行したら簡単に動いて涙が出そうでした。

これからも時間がある限りAppleScriptを勉強したいと思います。
自動化できていろいろ楽しいですし。

何度もすみません。

ちょっと疑問に思ったのですが、
OSのバージョンやAppleScriptのバージョンで
パスの区切りは「/」になったり「:」になったりするものなんでしょうか。
ここでも回答くださった方によってパスの区切りの記述が異なってますよね。

当方、
OS10.4.11
スクリプトエディタ2.1.1

で「:」で正常に動作します。

AppleScriptネイティブは":"、"/"はUNIXスタイル。
詳しくは "AppleScript POSIX"でgoogleってみて。

AppleScriptの、てゆうかMacの従来形式やね
"Macintosh HD:Users:hoge:desktop:hoge.lzh"

↑をPOSIX形式で表現するとこうなる
"/Users/hoge/desktop/hoge.lzh"
起動ボリュームではない場合はこんな感じ
"/Volumes/Macintosh HD/Users/hoge/desktop/hoge.lzh"


前者は概ねどんなアプリでも使えるけど、
do shell scriptなど使った場合のシェルコマンドのパラメータには、
そのままだと使えない

後者はSystem Eventsやシェルコマンドにはそのまま使えるけど、
Finderとかではちょっと使い辛い


POSIX path of 〜 とか 〜 as POSIX file 使って相互変換可能なので、
うまく使い分けるのがコツ
ファイルをスクリプトエディタやターミナルにドロップすると、
それぞれの形式でのパスが見れるので参考になるかと

>>609について、具体的な変換方法の記述が分かるページ
Travellers Tale: POSIX 形式の path と Mac 従来の path の変換
http://homepage.mac.com/travellers/blog/C746134881/E613669364/index.html

System EventsやShellはUNIXの仕様なのでPOSIX形式，Finderは旧来のMac形式を使う。

System Eventsは別にUNIX仕様って事でもなくない？
新しいからどちらでも使えるってだけで

UNIXなわけねぇだろ

acrobat professional 7で
get name of every bookmarkを実行すると文字化けするのですが
回避方法はないのでしょうか？

ちょっとわからないので教えていただきたいのですが，

display dialog "＼"アップルスクリプト＼"" --（ここでは＼は全角ですが実際は半角)

\" ではなく ＼ で書かないと，10.5ではエラーになってしまうのですが，
10.4Tigerはこの書き方で問題なく引用府が表示されますでしょうか？

上の記事

＞\" ではなく　を
＞￥" ではなく　に

訂正します．

>>615
問題なく表示される。

もっと詳しく言うと、スクリプトエディタ上で
￥のキーを押下した時の挙動が10.4と10.5で違う。（以下全て全角表記）

10.4で￥キーを押下した時、入力される文字は￥。
ただし、コンパイルを行うと＼に変換される。
10.5で￥キーを押下した時、入力される文字は＼。

実験環境は下記の通り。
10.4.11…PowerBook G4 1GHz Combo（PPC）
10.5.3...MacBook 2.1GHz Combo（Intel）
スクリプトエディタのフォントは両方ともOsaka等幅。

>>617
コンパイルすれば，＼に変換されるということですね．
わかりました．どうもありがとうございました．

AppleScriptはほんと面白いですね．これからもずっとハマりそう．

10.4 intel で
display dialog "￥＼" と書いてすぐに実行すると、
ちゃんと実行されてダイアログに＼と出る。
ところがコンパイルすると、
"""があるべきところですが云々のエラーが出る。

10.4でもppcでコンパイルしたときは大丈夫だったんだがなあ。

Applescript初心者です。
tell application "Finder"
set i to icon of ("/Developer" as POSIX file)
end tell
「Finder でエラーが起きました：&1 を取り出すことはできません。」
とエラーが出てしまうのですが、icon of ではアイコンを取り出すことはできないのでしょうか。

>>620
実装されてないから、取り出すことはできない、らしい。
http://www.tonbi.jp/AppleScript/dic/FinderX/Object/index.html

上記のページがどのバージョンを指すか知らないが、
OSは10.5.3、AppleScriptのバージョンは2.0.1でも無理だった。

漢字Talk7.5の頃はできたとおもうけど。

itemの中にiconがあるな

iTunesスレで紹介されていたものを試してみたのですが
set a to properties of audio CD playlist 1 of (source 1 where kind is audio CD)
としたところディスクリプタ・タイプが一致しませんというエラーが出ました。
OS9での知識ですがproperties ofでたいてい属性が取得できたと記憶していて
試しにFilemakerを対象にset a to (properties of cell 1 of current record)としてみたら
エラーは出ないけど何も帰ってきませんでした。
それぞれname of 等だとちゃんと値が帰ってきます。
どこがいけないのでしょうか。
OS X 10.4.9 / iTunes 7.2

Script Debuggerで見てみると、iTunes7.6.2には
propertiesってpropertyは無いみたいだね。
普通はpropertiesというpropertyがある。
だからじゃないかな。

こういう場合propertyのリストってどうやって取るんだろうね。
every propertyとかはダメ。

>>621
OSはMac OS 10.5.3です。
実装されてないんですか…

>>622
裏覚えですがOS 8ではApplescriptからアイコンいじれてた気がします。

>>623
スクリプトエディタのライブラリ見てみました。
icon family n : (NOT AVAILABLE YET) A family of icons
の「NOT AVAILABLE YET」が、実装されてないという意味なのかな…

>>622,626
名著「AppleScriptリファレンス」を見る限り、確かに使えないようなことは書いてない。
ただAppleScriptリファレンスはMacOS 9までが前提。

ここからは俺の予想なんだが、>>621のページを見るとアイコンだけでなくラベルも
実装されてないことになってる。
これはきっと、OS 9からOS Xへ移行したときに、OS的に扱い方が変わってしまった機能が
FinderのAppleScriptの機能部へ、きちんと実装されなかったんじゃないかな。
ラベルはOS X当初では存在しなかったし、アイコン情報を保持するリソースフォークの
扱いも変わってしまったし。

>>626
ちなみに裏覚えじゃなく、うろ覚えな。
http://www.tt.rim.or.jp/~rudyard/hirago014.html

ユニバーサルアクセスのズームってAppleScriptでどう書くの？

自己レスします。
やり方わかった！
http://lists.apple.com/archives/applescript-users/2008/Jun/msg00089.html

OS10.4.11

デスクトップのサイズを取得したいんですが、
メニューバーとdockの高さを除いたものを得ることは出来ますでしょうか？

tell application "Finder"
bounds of the window of the desktop
end tell

>>630
ウィンドウ最大化ならサンプルありそうだが、探したわけ？
一応メニューバーの高さは22px、dockは人によって違うから自分で計れ。

>>631
ありがとうございます。探したものを使っていたんですが、
FinderだとメニューバーとDockの裏まで潜って最大化されるもので。

tell application "Finder"
set menuHight to 22
set displayBounds to bounds of window of desktop
set displayPosition to {item 1 of displayBounds, (item 2 of displayBounds) + menuHight}
set displaySize to {item 3 of displayBounds, (item 4 of displayBounds) - menuHight}
end tell

メニューバはこれでいいんでしょうか？

Dockなんですがあらかじめサイズを指定しなくても
「現在のＤｏｃｋの高さ」というようなコマンドはないのでしょうか？

ググレカス
http://www.google.com/search?rls=en-us&q=how+to+get+dock+height+applescript

tell application "System Events"
set dockApp to (application process "Dock")
set sizeDock to size of UI element 1 of dockApp
get sizeDock
end tell

さすがグーグル先生だな

>>633
ありがとうございます！
ここまで教えてもらってアレですが僕には無理でした。

本当にありがとうございました。

　　　　　　　　∧∧
　　　　 　　ヽ(･ω･)/　 　ｽﾞｺｰ
　　　　 　＼(.＼ ノ
　　　　､ﾊ,,､　￣

>>635
いつものおまじないが抜けてると見た>>197>>326

>>633の内容は合ってるはず
sizeDock にDockの幅と高さの値がリスト形式で代入される

Dockの位置が左右の場合とか考えると、
もっとややこしくなるけど、それでもやれなくはない

スクリーンショット撮ってphotoshop辺りで計れば良いんじゃないの？

そんな話では無いと思うけど．．．
適当なアプリを起動してWindowのサイズを取得した方が手っ取り早い。
tell application "TextEdit"
set zoomed of front window to true
set theDesktopSize to bounds of front window
quit
end tell
theDesktopSize

諦めてたところ、僕でもいじれそうなサンプル発見しました。
結局こうなっちゃってすいません。
皆さん、そしてAll Aboutの人ありがとう。

全然いらないかもしれませんが、嬉しかったので貼っておきます。
元のウィンドウサイズと切り替えられれば更に嬉しかったんですが、それでもかなり便利になりました。

tell application "System Events"
set frontmost of it to false
set aApp to (name of every process whose frontmost is true) as text
tell process aApp
tell window 1
set position to {0, 22}
set size to {1024, 768}
end tell
end tell
end tell

apple scriptで現在の処理内容をモードレスに通知する方法はありますか？
調べてはみたのですがsayでしゃべらせる位しか思いつかない、、、

具体的には下のスクリプトで使いたいです
iTunesで選択したファイルをライブラリに取り込まずにmp3にしているのですが
エンコードしているファイル名を表示させたいのです


tell application "iTunes"
set seltrack to a reference to selection
repeat with x in seltrack
set theTitle to name of x as text
set thePath to location of x
set posixPath to POSIX path of thePath
do shell script "/opt/local/bin/faad ¥"" & posixPath & "¥" -o ~/tmp.wav"
do shell script "/opt/local/bin/lame ~/tmp.wav ~/Music/mp3/¥"" & theTitle & ".mp3¥""
do shell script "rm ~/tmp.wav"
end repeat
end tell

>>641
自分も昔はsayで通知してたけど最近はGrowl使ってる。

>>642
Growlをインストールして少しいじってみたら
やりたかったことがあっさりできてしまいました！
どうもありがとうございます

なにやったかくらいかいてけよな
ナレッジシェアだぜ

643じゃないけど面白そうなので調べてみた。

GrowlはAppleScriptで操作が可能。
ただし、Growlを使うにはGrowlへの登録が必要。
この登録もAppleScriptで行うことができる。
登録はregisterコマンド、通知はnotifyコマンドで行う。
それぞれのコマンドの説明は、GrowlHelperAppの用語説明を参照。

GrowlってOSXのNotificationを活用してるやつだよね
Growl経由でNotificationを受け取ったり
こっちから送ったり出来るって解釈であってる？

>>641
モードレスの意味を分かってないでしょ。
意味が分かってないなら、処理を止めずにって言えば良いのに。

おそらく>>641はdisplay dialogを使って処理内容を表示すると、
表示している間は処理が止まるから他の方法をさがしているのだと思う。

だが結論から言うと、残念ながらAppleScriptは基本的にアプリケーションモーダルにしか
処理することはできない。
つまり処理の間にsayコマンドを入れても、Macがしゃべっている間は
sayコマンドの後の処理は一切実行されてない。

>>646
AppleScriptでGrowlに対して出来ることは、メッセージの通知のみ。
つまりNotificationを受け取ったりはできない。
要は、display dialogで行っている表示を、Growlの通知ウインドウで表示する、
というような感じだと思う。

display dialogで行っている内容をGrowlで行う利点は、
(1) ダイアログの見栄え
(2) display dialogの場合、表示を行っている間（＝表示が見えている間）は処理が止まる。
　　しかし、Growlなら表示の処理はGrowl自体が行うため、通知処理が終われば
　　すぐに次の処理を実行できる。

そんなのやりかた次第だろ。
display dialog やsayでも，他のアプリにtellでやらせてtimeoutさせれば並行して処理を続けられる。
Growlからのイベントも受け取るようにすることはできるし，そのように設計されているはず。
ハンドラをそのように定義してやればよいだけ。

>>649
>Growlからのイベントも受け取るようにすることはできるし，そのように設計されているはず。
>ハンドラをそのように定義してやればよいだけ。

にわかに信じがたいんだが、よければサンプルソースを提示してくれないだろうか

>>649
>他のアプリにtellでやらせて
並列で処理を走らせるならば、それが正解。
要は複数アプリケーション、別プロセスで行えばいいわけだ。
ただ、それはアプリケーションモーダルとは言わないだろ。
複数のアプリケーションを起動してもできなければ、それはシステムモーダルという言い方を
オレはしているはずだ。そこまでは言ってないだろ？

何故か同じ番号を名乗っている人がいます。間違えたのでしょうか？

>>647
確かにモードレスの意味は十分に理解できていないですね
sayはモーダルな動きをしているのには一応気づいていました
ただ他に要求をみたす方法が思いつかなかったので
AppleScriptがモーダルな動きしかしない話など参考になります。ありがとうございます
Growlからの通知を受け取る方法は是非知りたいので調べてみます

>>644
おっしゃる通りですね。拙いですが一応ソースをのせておきます。

tell application "iTunes"
set seltrack to a reference to selection
repeat with x in seltrack
set theTitle to name of x as text
set thePath to location of x
set thePath to POSIX path of thePath

tell application "GrowlHelperApp"
notify with name "Start encoding" title theTitle description theTitle & "をエンコーディング中" application name "aac2mp3"
end tell

do shell script "/opt/local/bin/faad ¥"" & thePath & "¥" -o ~/tmp.wav"
do shell script "/opt/local/bin/lame ~/tmp.wav ~/Music/mp3/¥"" & theTitle & ".mp3¥""
do shell script "rm ~/tmp.wav"
end repeat
tell application "GrowlHelperApp"
notify with name "End encoding" title "エンコーディング終了" description "エンコーディング終了" application name "aac2mp3"
end tell
end tell

エンコーディング前と後に通知を出しているだけですが

>>644
事前にGrowlに通知を登録しています。これは以下のコード。一度だけ実行すれば登録されます
tell application "GrowlHelperApp"
set the allNotificationsList to {"Start encoding", "End encoding"}

set the enabledNotificationsList to {"Start encoding"}

register as application "aac2pm3" all notifications allNotificationsList default notifications enabledNotificationsList icon of application "Script Editor"
end tell

以下のページを参考にしました
http://growl.info/documentation/applescript-support.php

643ではなくて645だった。
>643、ごめんなさい。

iCal の「読み込み...」メニューに相当するコマンドを探したのですが，見つけられませんでした。
手動だと，ファイルの形式（ical, vcal, entourage）とカレンダーの指定があるので，

import FILE with vcs type into calendar 1

みたいなイメージを持っていたのですが，それらしきものありません。

AppleScript で「読み込み...」をするコマンドを教えて下さい。

iTunes Ver.7.7，残念ながら >>495 のバグは修正されてないようですね．

>>657
バグじゃないと思う。
Logicなんかでもフェーダーの値を指定してもその通りにならなかったりするし、
OSの内部的な仕様なのかも。

>>658
どうやらそうかもしれません.
radioSHARKというアプリもiTunesほどじゃないですけど，一致しない値がありました．

>>656
choose file命令でファイルを選択後に，open命令で指定したファイルを開く．
変換は自動でおこなわれるんじゃないかと思います．検証したわけじゃないので，
間違ってたらスルーして下さい．iCal独自の命令は……，見つけられませんでした．

そういうのは丸め誤差ってやつだと思うよ

内部的に64段階で持っているとか、中の実装がどうなっているかによって
切り捨てとかが行われてずれが出てくる。気にしないでいいかと。

iTunes で現在聞いている曲の情報を取得してテキストで保存したいと思っています。
同様の目的で作られた Now Playing.app というフリーソフトのパッケージの中にあった
applescript で目的の情報が取得できるということは分かったのですが、
それを「テキストで保存する」という部分の処理を、applescript でどう書けばいいのかが分かりません。
上記のスクリプトを少しだけ自分流に書き直したのが以下ですが、
tell application "iTunes"
return (name of current track) & " | " & (album of current track) & " | " & (artist of current track) & " | " & (genre of current track) & " | " & (comment of current track) & " | " & (rating of current track) & " | " as text
end tell
これで、例えば
"If The Moon Turns Green | The Great American Songbook | Carmen McRae | Jazz | | 0 | "
といった結果を得られるんですが、それをテキストデータとして保存したいのです。
どう書けばいいんでしょうか？

tell application "iTunes"
set a to (name of current track) & " | " & (album of current track) & " | " & (artist of current track) & " | " & (genre of current track) & " | " & (comment of current track) & " | " & (rating of current track) & " | " as text
do shell script "echo ¥"" & a & "¥" >> ~/test.txt"
end tell

>>662
quoted form of a
の方が安全かも

>>663
その場合\"は消します。
do shell script "echo " & quoted form of a & " >> ~/test.txt"

>>663,664
指摘Thx。生半可な知識でｽﾏｿ。
これ、改行の"¥¥n"みたいなのもちゃんと解釈してくれるのな。便利。

>>661
クリップボードに入れる。という手段が主流だと思うが。

うーん、>>662-664 で教えていただいた通りに、
出力先を ~/test.txt にしても、ホームディレクトリに test.txt が落ちて来ません。
絶対パスにしないとダメなのかと思って、該当箇所を /Users/ore/test.txt にしてもダメ。
何が違うんでしょうか？

tell application "iTunes"
return (name of current track) & " | " & (album of current track) & " | " & (artist of current track) & " | " & (genre of current track) & " | " & (comment of current track) & " | " & (rating of current track) & " | " as text
do shell script "echo " & quoted form of a & " >> /Users/ore/test.txt"
end tell

>>667
a が定義されてないじゃん。
>>662 をよく見てみなよ。

>>668
return (name of current track) & " | " & (album of current track) & " | " & (artist of current track) & " | " & (genre of current track) & " | " & (comment of current track) & " | " & (rating of current track) & " | " as a
とするといい？　んですかね？

ttp://www.tonbi.jp/AppleScript/intro/basic.html

>>662の2行目の出だし、>>661>>667とじっくり見比べるといい。

>>670-671
うおお出来た。出来ました。どうもありがとうございました。

tell application "iTunes"
set a to (name of current track) & " | " & (album of current track) & " | " & (artist of current track) & " | " & (genre of current track) & " | " & (comment of current track) & " | " & (rating of current track) & " | " as text
do shell script "echo " & quoted form of a & " >> ~/tmp/currentTune.log"
end tell

これ、日本語に訳すと
a を to ( ... ) のテキストとしてセットし、
echo で a の形式を持ったものを quote した形で、
~/tmp/currentTune.log として出力、
を、iTunes に告げよ。
という意味ですよね。違うかな？

大体そんな感じでいいよ。
do shell scriptはiTunesに関係する機能ではないけど。

質問です。
「スリープしますか？」のダイアログを出して、何も操作しなければスリープ
というのを作ってますが、ボタンを押さないとスリープにならないのでご指導ください。

display dialog "スリープしますか?" buttons {"キャンセル", "OK"} default button 2 giving up after 10
if sAns = "OK" then
　　tell application "System Events" to sleep
end if

display dialog "スリープしますか?" buttons {"キャンセル", "OK"} default button 2 giving up after 10
if gave up = true then
　　tell application "System Events" to sleep
end if
if gave up = false then
　　set sAns to button returned of result
　　if sAns = "OK" then
　　　　tell application "System Events" to sleep
　　end if
end if

>>674
ボタンの値を取得せねばならない。
set thebutton to button returned of (displaydialog ...)
とやればthebuttonにボタンがOKかキャンセルかが返る。
それからスリープするかしまいか判断。

set a to button returned of (display dialog "スリープしますか?" buttons {"キャンセル", "スリープしない"} default button 2 giving up after 10)
if a is "スリープしない" then return
tell application "System Events" to sleep

これじゃだめ？

>>675
>>674をコピペする時に、サンプル1で、button returnd of resultの行が抜けていました。
これで、ボタンを押さずに10秒待った時に、スリープに入らないので困ってます。
gave upが値を返すということで、作ったのが>>674サンプル2です。

>>676
普段スリープに入る時に、このスクリプトを使い、ボタンを押してスリープするので。
無動作でスリープさせたい時とは、サブ機の作業中にメイン機をスリープにしておきたい時です。
スクリプトを起動→ハード切替機でメインサブ切り替え→メイン機が勝手にスリープ
こんなかんじで。

別の話ですが、サブ機からメイン機をスリープすることもできると思いますが、
常時共有状態にしていないので、作ってません。

>>677
gave up は button returned と同じく display dialog の結果なので、
gave up of result って書かないと通じない

display dialog "スリープしますか?" buttons {"キャンセル", "OK"} default button 2 giving up after 10

これを単体で実行してボタン押したり10秒待ったりしてみれば、
どんな結果が返るのかわかると思う


とまぁそれはさておき
キャンセル押すとエラー扱いでどっちみち処理が停止するのだから

display dialog "スリープしますか?" default button 2 giving up after 10
tell application "System Events" to sleep

実はこれだけで事足りてる気がする

>>678
それでできました。
また、gave upのof resultを入れてなかったのと、else ifの存在を忘れていたのとで、
サンプル2を改良したらこれもできました。
こちらは後学のため説明欄に入れておきます。ありがとうございました。

set aAns to (display dialog "スリープしますか?" buttons {"キャンセル", "OK"} default button 2 giving up after 10)

if gave up of aAns then
tell application "System Events" to sleep
else if text returned of aAns = "OK" then
tell application "System Events" to sleep
end if

スレ違いだったら，スルーして下さい．
AppleScript Studioをはじめようと思ってますが，一番最初のところでつまずいてます．

MBPのLeopard環境なのですが, インストールDVD内にある Optional Installs.mpkg
そのままをインストールすればいいのか，それとも Xcode Tools フォルダ内にある
XcodeTools.mpkg のみをインストールすればよいのか判断できずに迷ってます．

AppleScript Studioを利用されている方，教えていただけませんか．

わかりました．XcodeTools.mpkgをインストールすればいいみたいですね．
スレ汚しすみませんでした．

>>682
iPhoneSDKを入れるともっと幸せになれるぞ

>>683
今，AppleScript Studioでめちゃめちゃ楽しく遊べているので，
iPhoneSDKが使える人はもっと楽しくてしかたないでしょうね．

以前
Service Scrubber
http://www.manytricks.com/servicescrubber/
で「URLを開く」というサービスメニューにショートカットを割り当てて利用していた。
ICeCoffEEも利用しているが、キーボードだけで選択したURL文字列をデフォルトブラウザで開きたい場面が結構あったので。
ところがLeopardからはService ScrubberではOSビルトインのサービスに触れないようになってしまった。

そこで、
Spark
http://www.shadowlab.org/Software/spark.php
を利用してなんとかならんものか、と。

やりたい事は、任意の最前面のアプリで選択中の文字列を「その時点でのデフォルトブラウザ」に渡す。

任意のアプリで選択されている文字列をサービスの「URLを開く」に渡したのと同じ結果が得られればよい。

以前、似たような事をしようとしてキーストロークでコピペしようとしてどうもクリップボードの扱いや前面アプリの取得とか自分には思いのほか難しくて挫折してしまった。

applescriptでさらっとサービスに渡すような方法ってないものですかね？

>>685
今10.5.3使ってるけどシステム環境設定のキーボードとマウスで
サービスメニューにもショートカットキー付けられたよ。

>>686
サンクス！
灯台下暗しとは。助かりますた！

>>686
追記。
日本のアプリと海外のアプリでは
URL を開く
Open URL
と表記が違うため、どちらでも動かしたいときはどちらも設定しないとダメみたい。

システム環境設定のサウンド設定で
出力先を内部オーディオとUSBとを
トグルで切り替えるアップルスクリプトが作りたいんですが
どうしたらいいでしょう
tell application "System Preferences"
set current pane to pane "サウンド"
tell application "System Events"
tell application process "System Preferences"
set shoOn to checkbox 1 of group 1 of window "サウンド"
if value of shoOn is 1 then click shoOn
end if
end tell
end tell
end tell
で消音をオフにするのはできたんですが
選択のところをどう記述するのかが分からないです

>>689
私は試していないのでよくわかりませんが、こちらのコードを参照されてみてはいかがですか
http://www.oreillynet.com/mac/blog/2006/07/applescript_audio_output_switc.html
http://forums.macosxhints.com/showthread.php?t=45384
http://www.macosxhints.com/article.php?story=20050614171126634

ありがとうございます
いけましたまさに目的のものでした
tell tab group 1 of window "サウンド"
click radio button "出力"
selected of row 2 of table 1 of scroll area 1
こういう記述をするんですね

>>684
そっちの話じゃなく、UTF-8でもデバッガが動くようになる。

>>692
UTF-8にすることのメリットはわかりませんが，ファイルエンコーディングにはバグがあり，
日本語(Mac OS)にしないとダメみたいなことが参照している本に書いありました．

つまり今のXcodeのバージョンでは修正されて問題ないっていう話ですか？

初心者スレより誘導されてきました。

UTF-8-macでURLエンコードされた文字列を含むテキストファイルを、
URLエンコード部分をデコードして別ファイルに保存、
といったことはスクリプトでできますか？


PercentEncodeServiceを使えば、選択範囲のUTF-8-mac URLエンコードをデコードすることができるようです。

　が、テキストファイルを全選択して変換、といったことはできませんので、
一つ一つURLエンコードされた部分を見ながら選択しなくてはなりませんので、数が多い場合手間です。


例えばですが、iTunesのプレイリストの「iTunes Music Library」ってありますよね。
このファイルには大抵、UTF-8-mac URLエンコードされた文字列が複数あります。
これをスクリプトにつっこんだら、変換されたテキストが出力される…という形が理想です。

>>694
できるだろうし、同じ AppleScript を使うにしても、やり方はいくつもあると思う。

例に挙がっている iTunes Music Library の変換程度なら、コマンドライン一発でもできる。
ターミナルを開いて以下を実行（USERNAME は自分のユーザ名に置きかえる）

perl -ne '$_ =~ s/%([0-9A-Fa-f][0-9A-Fa-f])/pack('H2', $1)/eg;print $_' /Users/USERNAME/Music/iTunes/iTunes¥ Music¥ Library.xml > /Users/USERNAME/Desktop/iTunes¥ Music¥ Library.decoded.xml

これでデスクトップに iTunes Music Library.decoded.xml という名前で変換後のファイルが作成される。
（試した環境は OS X 10.4.11, perl 5.8.6）

すまん　こっちのほうがいいかな

perl -ne '$_ =~ s/%([0-9A-Fa-f][0-9A-Fa-f])/pack('H2', $1)/eg;print $_' '/Users/USERNAME/Music/iTunes/iTunes Music Library.xml' > '/Users/USERNAME/Desktop/iTunes Music Library.decoded.xml'

693の件，よくわからないので気にせずやっていきます．

ところで，Leopard(10.5.4)の起動ディスク最上位階層にある etc, tmp, var
三つのエイリアスフォルダ，info forでエイリアスかどうか調べるとfalseの値が
返ってきます．

エイリアスフォルダをデスクトップに持ってきてから調べると，ちゃんとtrueになるという．
よくわからない現象．不思議です……．

>>697
その３つのエイリアス動かしちゃダメだよ

ホントはエイリアスじゃなくてシンボリックリンクな

info forの結果は相変わらず不明ですが，とりあえず動かすなってことですね．
覚えておきます．どうもでした．

>>697
悩ませてすまん。今使っているバージョンでソース内に日本語使ってデバッガが動いているなら忘れてくれ。

>>694
誘導主ですが、ファイル丸ごとだと良く分からないところに
>>695,696助け船ありがとう
ドロップレットにしてみた。
アプリケーション形式で保存してテキストファイルをドラッグ＆ドロップ

on open fileList
tell application "Finder"
repeat with i in fileList
set filePath to quoted form of POSIX path of (i as alias)
set newPath to quoted form of (POSIX path of (desktop as alias) & "decoded-" & name of i)
do shell script "perl -ne '$_ =~ s/%([0-9A-Fa-f][0-9A-Fa-f])/pack('H2', $1)/eg;print $_' " & filePath & " > " & newPath
end repeat
end tell
end open

>>700
いらんお節介かもしれんが info for は使わぬ方が無難

>>701
693のバグの件，「ゼンマイびゅんびゅん」にも書いてありましたので
そのように設定して作ってたんですが，使ってるXcode 3.0ではUTF-8でも
問題なく使えるようです．参考までに．

>>703
ファイルがエイリアスかどうかを調べるには，info for を使う方法しかしらないので，
頼ってしまうんですよね．なぜ使わない方がいいのかその理由はわからないですけど．

694です。お礼が遅くなってすみません。

>>695,696
ありがとうございます！問題なく動作しました。

>>702
誘導、そして回答ありがとうございました。
ファイルの保存形式を「アプリケーション」にしなければいけない事に少々悩みましたが、なんとかいけました。


しかしこのapple script、windowsでいうところのUWSCのようなソフトが標準で搭載されているのですね。
macの使い勝手がいい、と方々で聞いた理由がわかった気がしました。


ただ、教えて頂いた方法で作成したファイルを、保存形式をutf-16にしても
windowsで文字化けするのが痛いところです。
例）コンピレーション→ピの部分が「ヒ」と「。」に分かれる。
共用でなんとかつかえないかなと思っていたのですが。。。

>>705
> ただ、教えて頂いた方法で作成したファイルを、保存形式をutf-16にしても
> windowsで文字化けするのが痛いところです。
> 例）コンピレーション→ピの部分が「ヒ」と「。」に分かれる。
> 共用でなんとかつかえないかなと思っていたのですが。。。

「os x ファイル名 unicode 正規化 nfd nfc」とかでググってみましょう。