「AppleScript,Perl,Shell」OS Xでスクリプトｽﾚ

Mac OS Xでスクリプトな話題を語るスレです。
AppleScript、Perl、シェルスクリプトなどの、発表、質問なんかあったらどうぞ。

関連スレはこちら
MacOS XをUNIXとして使ってる人の為のスレ その４
http://pc.2ch.net/test/read.cgi/mac/1043836633/l50
おもろい、めずらしいアップルスクリプト発表会 4
http://pc.2ch.net/test/read.cgi/mac/1026844857/l50
前ｽﾚ 「ご主人様ご命令を！」OS Xでスクリプトスレ
http://pc.2ch.net/test/read.cgi/mac/1010546884/l50

スクリプトについて概略は >>2-3
参考リンクは >>4-7

スクリプトってのはプログラムの一歩手前みたいなもので、単体では
動作しないアプリケーションと考えてもらってもいいです。ちょっとした
繰り返しの作業を簡単にするために使ったりします。例えば、IEで開いている
ページのURLをコピーして、Terminalを立ち上げて、wgetでJPEGをダウンロード
するといった一連の作業をスクリプトに記述しとけば、そのスクリプトを実行する
ことによって、操作を簡略化することが出来ます。

基本的にOSXではAppleScript（アップル純正のスクリプト環境）、Shell Script、
Perl、その他UNIX系のスクリプト環境があります。

・AppleScript
Apple純正のスクリプティング環境。Script Editorで記述する。
ものすごく高級（人間の言語に近い）なので取っつきやすい。
そのためやや冗長になる。主にアプリケーションを操作して、自動化を行う。
例）tell application "Finder" to empty trash
ごみ箱を空にする。

・Perl
もともとはUNIX用に開発された言語。C言語よりは高級。テキスト処理を最も得意
とする。やる気になれば、モジュールなどを利用してネットワークプログラミング
なんかも出来る。テキストファイルに記述して、シェルから実行できる。
例）
#!/usr/bin/perl
print "Hello World!";

・シェルスクリプト
コマンドを記述して連続して実行できる。いわゆるバッチ処理を行う。
ifなどの制御構文や引数なども利用できる。
例）
#!/bin/csh
echo Omaemona-
banner Omaemona-

適当に書くとこんな感じ

★AppleScirpt参考リンク★

AppleScript リファレンス--古いけどAppleScripterの聖典
ttp://store.sbpnet.jp/isbn/1011/preface.html

AppleScriptタコ入門
ttp://www.macos.com/octopus/

ビブロスのプログラム
ttp://www.dd.iij4u.or.jp/~banban/program/program.html

ちゃらんぽらん
ttp://www1.odn.ne.jp/~cge02410/index.html

鳶嶋工房(Tobishima-Factory)
ttp://homepage1.nifty.com/ton_b/

★Perl参考リンク★
入門・リファレンス
とほほのperl入門
http://tohoho.wakusei.ne.jp/wwwperl.htm
Perlメモ
http://www.din.or.jp/~ohzaki/perl.htm
Perlリファレンス
http://www2u.biglobe.ne.jp/~MAS/perl/ref/

モジュール
CPAN
http://www.cpan.org/
Perlの小技
http://member.nifty.ne.jp/hippo2000/perltips/index.htm

参考書
プログラミングPerl
http://www.oreilly.co.jp/BOOK/pperl3v1/
CGI&Perlポケットリファレンス
http://www.gihyo.co.jp/books/syoseki-contents.php/4-7741-0755-7

★Shell Script参考リンク★
Terminalやコマンドが分からん方へ
Japanese Manual Project for FreeBSD
ttp://www.jp.FreeBSD.org/man-jp/
UNIX 入門
ttp://www.wakhok.ac.jp/~maruyama/Unix92/Unix92.html
UNIXの部屋
ttp://x68000.startshop.co.jp/~68user/unix/

Unix板
便利なシェルスクリプト見せろ
ttp://pc.2ch.net/test/read.cgi/unix/996949546/
シェル、オークの質問コーナー
ttp://pc.2ch.net/test/read.cgi/unix/1000303370/
連番のＨ画像を一気にダウンロードする
ttp://pc.2ch.net/test/read.cgi/unix/979106537/
☆シェルスクリプトを勉強するにあたって☆
ttp://pc.2ch.net/test/read.cgi/unix/989659936/

>>1
氏ね

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

・Script menu
AppleScript、シェルスクリプト、Perlスクリプトをメニューバーから実行できる。
ttp://www.apple.com/applescript/macosx/script_menu/

・System OSAX
シェルコマンドをAppleScirptから実行できるスクリプティング機能拡張。
めちゃくちゃ便利。SAMPLEも勉強になる。
ttp://www.bekkoame.ne.jp/~iimori/sw/systemOSAX.html

Part2とか入れ忘れた・・鬱

＝＝＝＝＝＝＝＝＝＝＝＝　終了　＝＝＝＝＝＝＝＝＝＝＝＝

ほんとに終了で？

age

ID:fwpjjZ4Jは基地外か何かか？

>>1
乙

>>1
乙カレー

＞＞１
乙

Perl、Shell scriptがデフォルトで使えるようになって
Macのスクリプト環境は相当強力になった。ので、
こういうスレ歓迎。もっとも性格の違う三者をいっしょ
のスレで扱うのも難しいかもしれないが・・

とりあえずスクリプトまんせー

ターミナル使いなら簡単なシェルスクリプトは.cshrcに記述できる。
ファイル置き場のことややパーミッションの設定が不要なのでお手軽。
例：
alias hello "echo Hello World!"
と「.cshrc」に書いておけば「hello」を実行できる。

シェルスクリプト・ファイルは「.command」という拡張子を
つければ、ダブルクリックで実行できる。

>>18
出力を伴うコマンドを.cshrcに書くのはいかがなものか。

>>20
失礼。取り消し。alias って書いてあったのですね。
でもそれは最初の２行の「例」という感じではありませんよね。

>>1 乙

おまいら、phpについても語ってください。

インナートリップ、だったっけ？　たしか松下もからんでたような気が...。

>>24
「いんなあとりっぷ」は霊友会だぞ。
PHP研究所には当然松下が絡んでるはずだけど。

つーことでスクリプト言語のPHPについても語り合いましょう。

rubyも入ってるし他にもある？

awk
じみだなぁ

びょそん
てくる

LINGO

せど

↓大小比較

ヒカク＞ﾋｶｸ

age

やっぱりAppleScriptが最強だと思いますね。
あんなわかりやすい構文でプログラミングできる言語なんて他には無いでしょ？

でもScript言語ってほんと楽しいよね。

http://www.apple.com/applescript/script_editor/
b2いつの間に！

クリップボードに現在の時刻をコピーしたいのですが
set the clipboard to current date
だと何もコピーされません。
問題点はどこでしょうか？

set the clipboard to current date as text
では？

>>37
うまく行きました。ありがとうございました。
もっと勉強してきます。

IllustratorのAppleScriptについて、
わかりやすくておすすめなサイトご存知ないでしょうか？

メモさしてください。

AmScriptFileCMX
http://www5.wind.ne.jp/miko/mac_soft/contextual_menu_x/index.html#AmScriptFileCMX
Mac OS X の Script Editor で保存した
「コンパイル済みスクリプト」ファイルを、
Mac OS 9 互換の保存フォーマットに
変換するコンテキストメニュープラグイン

あいや、テキストエディタ mi のツールとしてAppleScript を動かすには
Mac OS X の Script Editor で保存したんじゃダメみたいなんで…。

唐揚げ

前スレで「OS X10.1.5ではcronでosascriptが動かない」というような
書き込みがありましたが回避方法はあるのでしょうか？

やりたいことは
cronとAudio RecorderとAppleScriptを使ったラジオのタイマー録音です．

ターミナルで
% /usr/bin/osascript [AppleScriptファイル]
とすると録音できるのですが
cronで上記コマンドを実行してもAudio Recorderは起動するだけで
録音は始めません．

cron実行後には下記のようなメールが来ます．

## Component Manager: somone is attempting to find symbols in a component alias of type (regR/carP/x!bt)
execution error: Audio Recorder got an error: Application isn't running. (-600)

>>42
スクリプトをアプリケーション形式にして、cronでそのアプリをopenではどうか。

アプリケーション形式で保存してターミナルでopenすると
Script EditortとAudio Recorderが起動しますが録音は始まりません．

cronで実行しても同じ．（エラーのmailは来ません．）

そもそもアプリケーション形式のファイルをダブルクリックしても
Script EditorとAudio Recorderが起動するだけで録音しない．

Script Editorの実行ボタンを押すと録音が始まります．

AppleScriptの挙動が変だと思います．

どんな Script を書いたのか示さずに
AppleScript の挙動が変だと思いますと言われてもなぁ。

>>45
禿堂

スクリプトの内容以前にアプリケーション形式で保存できてないだろ

はい．失礼しました．
スクリプトの内容です．
これはAudio Recorder付属のサンプルスクリプトです

tell application "Audio Recorder"
set output format to MP3
set quality to voice
set next filename to "this is a basic test"
record
if recording then
delay 2
stop
end if
end tell

>>47
インスペクタを表示すると
種類：アプリケーション
になってます．

で、アプリケーション形式で保存したのん？

>>もちろん

適当なスクリプトを書いてアプリケーション形式で保存して、
それをダブルクリックで起動して Script Editor が立ち上がるようなら
AppleScript 側に問題があるかもしれない。

アプリケーションで保存した場合、ターミナルでは
openを使わずに単にフルパスでアプリケーションファイルを指定すれば
正常に実行されました．

で、アプリケーションファイルのフルパスをcronに登録すると
Audio Recorder起動するも録音せず
Script Applicationsは"Application isn't running"と
Dialog（？）を開きました．

>>51
そんな気がします．

AppleのサイトよりAppleScript Updateをダウンロードして
AppleScript 1.8.3 for Mac OS Xを
再インストールしましたが状況は変わりませんでした．

>>42
＞前スレで「OS X10.1.5ではcronでosascriptが動かない」というような
書き込みがありましたが

であなたはOS X いくつなの ?

ｦﾚは10.2.6 だが

#!/bin/sh
/usr/bin/osascript -e 'run script alias ((path to scripts folder from user domain as string) & "Audio Recorder_sample.scpt")'

でできてるよ(もちろん、cron からの発動)。

漏れも以前、OSX鯖10.1.4でcronから起動させたシェルスプリクトから
AppleScriptが動かなくて泣いたよ。
結局解決方法は見つからず。あきらめますた。

俺も試したけど10.26ではcronでopen,直パス,osascript動きました。
>>42
んで、どーしても動かしたいならcronじゃなくてon idleでスクリプト
書けば？時間指定の方法は色々あるけど、例えば何分起きかに時間チェック
させて、希望時間だったら実行にするとか。煩雑だけどね。

>>53
10.1.5です．

シェルスクリプト書いてcronで実行ってことですよね？
やっぱり
execution error: Audio Recorder got an error: Application isn't running. (-600)
ってことで駄目です．

>>55
on idle
なるほど、そういう方法がありましたか！
ならば、delayを使ってスクリプト実行から何時間後に録音ってこともできそうですね．
やってみます．

みなさん、どうもありがとうございます．

■■■■■　　　SuperCollider　　　■■■■■
http://pc.2ch.net/test/read.cgi/mac/1056107326/l50

　Θ　SuperColliderスレです。よろしく。
　　　ずいぶん前にフリーになりました。

tell application "Safari"
set bounds of front window to {15, 22, 815, 722}
end tell

こんなスクリプトを書いてみたのですが、実行してもキーウインドウになってくれません。
キーウインドウ化するにはどのように書いたらよいのでしょうか。

その後
AppleScript Studioでスクリプトをアプリケーション化して
cronでopenしたら録音できました．

Project Builder初めて使った．．．

ウインドウを手前に出すなら

tell application "Safari"
activate
set bounds of front window to {15, 22, 815, 722}
end tell

そういう意味じゃない？

試しに書いてみた。
指定時間に実行するサブルーチン。引き数はdateクラスで実行してみてください。

my appointed_time("2003年 7月 1日 火曜日 11:30:0 PM")
"命令"

on appointed_time(appotime)
set dodate to date appotime
set curdate to current date
set delaytime to dodate - curdate
delay delaytime as number
end appointed_time

>>61
訂正：dateクラスで→date型のテキストで

>>61
>set dodate to date appotime
>set curdate to current date
>set delaytime to dodate - curdate

↑こんなシンプルな書き方できるんですね

自分はdialogで時分秒を入力するのを書きましたが
3回もdialog出てくるのが鬱陶しい．
実行時間が明日以降だと困るんですが．．

--現在の日時
set theDate to current date
set thetime to (time of theDate)

--録音開始時間入力
set hResult to (display dialog "開始時" default answer "" buttons {"OK"} default button 1)
set mResult to (display dialog "開始分" default answer "" buttons {"OK"} default button 1)
set sResult to (display dialog "開始秒" default answer "" buttons {"OK"} default button 1)

--録音開始時間を秒に変換
set startTime to (text returned of hResult) * 3600 + (text returned of mResult) * 60 + (text returned of sResult)

--現在時間の取直し録音開始までの時間の計算
set thetime to (time of (current date))
set remainTime to startTime - thetime

--delay後に実行
delay remainTime
"命令"

リストにある項目が含まれているかどうかを調べるのはどうしたら良いのでしょうか?

特定のファイルタイプのファイルをリストにしたいのですが、

property LstPictureFile : {}
property ListFileType : {"JFIF", "JPEG", "PNGf"}

on open ObjectList
repeat with Object in ObjectList
tell application "Finder"
set TxtFileType to file type of Object as string
end tell
repeat with TxtListedType in ListFileType
if (TxtFileType = (contents of TxtListedType)) then
set LstPictureFile to LstPictureFile & {alias (Object as string)}
end if
end repeat
end repeat
end open

と各項目と比較する方法しか解りません。

>>64
>リストにある項目が含まれているかどうかを調べるのはどうしたら良いのでしょうか?
if ListFileType contains TxtFileType then
say "wow"
end if

いろいろ書き方あるから他にもあるかも

↑だと元と一緒なので意味ないね・・・
リストとリストから一発でゲットしたいってことか・・・

>>66
いや、65でいいんじゃない？

if TxtFileType is in ListFileType then
set end of LstPictureFile to Object
end if

>>65-67
おかげで、望む事ができました。
>>64 のスクリプトでは時々、予期せぬエラーで終了しちゃっていたのですが、
それも解消されたようです。

Illustratorでテキストオブジェクトを
全部選択するAppleScriptなんですけど、
こんな感じのやつを
JavaScriptかVBで書き直せる方いませんか？
Win版でも使いたいのですが...。

property SelectionSet : {}
tell application "Adobe Illustrator 10"
activate
set frontdocument to current document
tell frontdocument
try
set LayerItems to every layer
repeat with klayer in LayerItems
if klayer is not locked then
set ItemList to every text art item of klayer
set SelectionSet to SelectionSet & ItemList
set selection to SelectionSet
end if
end repeat
on error
return
end try
end tell
end tell

perlのスクリプトをアプリケーションにすることはできませんか？

>>70
「こういうことをしたいから」っていうのが見えないと、
答える方も筆が鈍るんだがな。

あんた意地悪っぽいなあ（ｗ

>>69

AppleScriptがアプリケーションの動作を制御できるというのは
AppleScriptだけの特権なのだが。

>73
IllustratorのWin版で提供されているスクリプト実行機能を使いたいのです。
自宅ではMacで、AppleScriptを書けるからいいんですけど、会社には
Macが無いもんで...。

＞＞74
Mac板で聞くことではないのでは。

>>70
>perlのスクリプトをアプリケーションにすることはできませんか？
短いならAppleScriptに埋め込むとか・・・

set theScript to "print \"Halo
\";"
set theResult to do shell script "Perl -e '" & theScript & "'"
display dialog theResult

ちょっと探してみたらDropScript
http://www.versiontracker.com/dyn/moreinfo/macosx/10459
ってのがあるね。
これでできるかな？

>75
JavaScriptで書ける人がいたらMacでも動作するので、いいかなと
思ったのですが...。
自分で勉強します。

>>71
perlのスクリプトをアプリケーションにしたいから。
そのまま鈍っててくれていいです。

>>72
日本語がわからないだけだと思う。

>>76
AppleScriptにインラインするのって魅力的なんだけど
長くなってくると融通効かなそうなイメージがあって… スミマセン。
とりあえずDropPerlerというのもあるみたいなのでDropScriptともども試してみます。
http://www.drumsoft.com/drum/soft.htm

あまり検索しないまま聞いてしまったのに教えてくれてありがとうございます。

>>77
JavaScriptが何だと思っているんだ…勉強しなおしなさいな

>>79
>>77さんを庇護しとくとIllustrator 10からJavaScriptで
制御できるようになったらしいですよ。
Acrobatとかもそんなんじゃないでしたっけ？

>>80
またややこしい話だな…どうせ制御用に拡張命令が満載なんだろうとおもうから
結局Mac板で聞いても仕方ないと思うぞ。

>>81
まあ確かに…
ちろっと調べてみたらtextArtItemsとか初耳なオブジェクトがあるし
web用のJavaScript使ってるのとは感覚違うぽかったです。
Mac板のイラストレータースレでもそれ系の話題は出てないみたいだし
DTP板とかのほうがいいような気はするです。>>77

>>77
イラレ10のCDに「Script」ってフォルダがあって
その中にAppleScript、VB、JavaScriptのリファレンスがあるよ
何故かJavaScriptだけは英語だったけどw
JavaScriptで書けば汎用性あるので
勉強して損はないと思うでつ

AppleScriptはOSAの言語プラグインのひとつに過ぎない。
JavaScriptプラグインもある。
http://www.latenightsw.com/freeware/JavaScriptOSA/index.html

>84
フリーなのがすごいですね！

>84
インストールしてみたけど、実用的な使い方って、どんなでしょ？
ちょっとおもしろいけど...。

ATコマンドでシェルを起動したいんですが、atdのパッケージはどこにありまつか？

/usr/bin/at
では何か不満？

>>88
ATコマンドでキューに仕込むことは出来るんですが、
atdが立ち上がっていないため時間がきても実行されません

とりあえず、シェルを起動させてsleepで眠らせる事にしました。

>>89
crondがatの処理してるんでないの?

>>91
そうなの？知らんかった。。
じゃ、起動されないのは他に原因があるのか。
調べてみまつ

すいません、質問させて下さい。

ファイルとクリエータを変更するスクリプトを書いたのですが、
「何も設定しない」ようにする方法がわかりません。
set文で""を代入してもエラーが出てしまいます。

何か他に方法があるのでしょうか？ (´･ω･｀)

＞ 「何も設定しない」ようにする

クリエイターとファイルタイプには何も設定しないというものがないのでは
ふつうは半角で????とかにする

>>94
レスありがとうございます。
????という手がありましたか。
問題がないようなら、これで逝こうと思います。
普段はCoelaを使ってタイプを消しているので、
それと同じ挙動が出来ないかと思い、質問した次第です。

　__∧＿∧_
　|（　　＾＾ ）|　＜寝るぽ（＾＾）
　|＼⌒⌒⌒＼
　＼ |⌒⌒⌒~|　　　　　　　　　山崎渉
　　 ~￣￣￣￣

OS Xでのタイプ無しってどうなってるんだろうね？
最近俺はAMシリーズ？？かなんかのコンテクストメニュープラグインで
ファイルタイプの変更とかやってるけど。
ちなみに画像ファイルでファイルタイプとか????だとプレビューがつかないけど
タイプクリエータなしで拡張子のみだとちゃんとプレビューが付くみたい。

今まで作ってきた、ファイルタイプを判定して動くスクリプトは、
書き直さないといけませんね...。

　__∧＿∧_
　|（　　＾＾ ）|　＜寝るぽ（＾＾）
　|＼⌒⌒⌒＼
　＼ |⌒⌒⌒~|　　　　　　　　　山崎渉
　　 ~￣￣￣￣

>>95
Coelaに添付されてるサンプルスクリプトを良く見てみれ

>>100
見てみましたが、よくわかりませんでした。(´･ω･｀)
何かヒントがあるのでしょうか？　宜しければ教えて下さい。

>>97さんの言う通り、プレビューがつかないようです。
これでは????を使うのはちょっとはばかられますね……。

試しにPath Finderを使ってみたのですが、これはタイプを消すと「 」、
つまり、半角スペース４に変換してしまい、完全には消せないようです。
見た目はこちらの方がスマートですが、やはりプレビューはつきません。

どうして標準Finderで変更出来ないんだよー ヽ(`Д´)ﾉ

>>101
あんたはアホや

>>101
Strip

出来ますた。(;ﾟДﾟ)

>>103
ヒントありがとうございます。
それっぽいかな、とは思っていたのですが、無関係と踏んでいました。
--そもそもコピペの時点で文字化けするとはどういう事なのかと小一時間（ry

>>102
アホですた（w
返す言葉もありませんです。

レスして下さった皆様、ありがとうございました。

すごくマヌケな質問させて下さい
ProjectBuilderのソース書くペインのフォントサイズはどこで変更すればいいんですか？
字が小さすぎて目が痛くなりまつ

>105
まだみてるか分からんが

環境設定＞構文の色付け＞標準テキスト＞フォント

だな。

set openFile to ":Users:suzuki:Desktop:Label.txt"
open for access openFile
read openFile as text
set readData to result
close access openFile

このスクリプトでテキストファイルを読み込もうとするとOPENの所で
「ファイル名が重複しています」のエラーが出て読み込めません。。
目的のファイルがない場合は、空のファイルが作成されます。
なにがなんだかわかりません……

>>106
そこを変更してるんですけど変わらないんですよね
なんでだろ

>>107
変数 openFile の前に file が必要だと思う。たとえば
open for access file openFile

>>109
通ｯﾀｰ＼（ﾟ∀ﾟ ）

open for access file openFile
read file openFile as text

としたらopenは通りました。

でも、今度はreadで「ファイルの末尾でエラーが起きました」だって(´･ω･`)

とりあえず、いろいろ調べてみます。
ありがとうございました。

set nanika to open for access file openFile
set nakami to read nanika

リファレンス買いなさいよ。

>>112
ありがとう。
それも試してみたけど相変わらず「ファイルの末尾でエラー」になってしまいました。
リファレンス買いたいけど嫁からの許可が出ません・・・

読み込むファイルが
空っぽ、改行が一個も無いとそのエラーがでるみたいね。
テキスト以外でも読み込めるので詳しい条件は知りませんけど。

107です

ご指摘の通り、テキストファイルの中身が空でした。
そうだったのか・・・。
ありがとうございました。

>>19
lynxをlynx.commandにリネームしたらFinderからのダブルクリックで起動するんだけど、
TerminalじゃなくてJTerminalで起動するようにことはできませんですかね。

>>116
できない。
Terminal 側に処理が組み込まれている(他のターミナルソフトにそれはなし)。

>>117
サンクス。Terminalが日本語に対応するの待ちますか。

>>118
??? Terminalは日本語に対応してるけど(10.2 から) ???

>>119
あれで、日本語に対応としたとは言えない。

>>118
JTerminalをちょっといじるだけでできるよ。

>>121
「できる」というのは重要な情報だが、そこまで書くなら弄り方を公開しろﾖ

>>120
どういう面で10.2 Terminal の日本語化が不十分なのかまとめてくれないか ?

- (BOOL)application:(NSApplication *)sender openFile:(NSString *)filename
{
PseudoTerminal *term;
term = [PseudoTerminal newTerminal];
[term startProgram:filename];
}
手抜きだし、これだけじゃドラッグアンドドロップでしかできないが。
あとは自分でがんばれー。

AppleScriptのドロップレットなんですけど、
OS Xだと、ドロップするファイルの名前が長すぎると
エラーになりませんか？
それとも、制限とかあるんですかねぇ...。

Mac OS X で日本語表示できるアプレット作成
http://allabout.co.jp/computer/macos/closeup/CU20030722asc/index.htm

フォルダ内のファイルを全削除するスクリプトを作ったんですが、
フォルダ内ファイル数のちょうど半分を処理する時にエラーが出てしまいます。

エラーメッセージ：
　Finderでエラーが起きました: "file 501 of folder "HD:datas:"を取得できません"

コード：
tell application "Finder"
　　tell folder "HD:datas:"
　　　　set filenum to (count of files) as integer
　　　　repeat with i from 1 to filenum as integer
　　　　　　delete file i
　　　　end repeat
　　end tell
end tell

原因は何でしょうか？教えて下さいお願いします。

最初に作られたファイルのリストと現状が不一致になるから

>>127
ありがとうございます。

削除するファイルの指定を逆にしてみたらうまくいきました
repeat with i from filenum to 1 by -1 as integer
　　delete file i
end repeat

＞128
全部でしょ？　every　はだめなの？

http://homepage.mac.com/hiroyuki44/

>>129
できますた。ありがとうございました。
delete every files

あー、こんな簡単な方法があったなんて。

Mac触って３日目なんでゆるちて。

AppleScriptってすごいでしょ？
ほとんど英語のまんまだし、
むかしは日本語でも書けたんだよ。
以上

いや俺にとってはそれが余計わかりにくいんだが…

正直なところ、あんな不自然な日本語ならいらんかった。

"ひまわり"って知ってる？
最新の日本語プログラミング言語なんだよ。

英語のネイティブスピーカたちは、COBOLとかSQLとかApple Script
あたりの不自然な英語風の構文が気持ち悪くないんだろうか。

やっぱり、AppleScriptなんかは英語圏の方々が見れば、
"ひまわり"みたいに見えるんですよ。きっと。
　　　　以上
　　以上
以上

>>137について
なるほどそうですかとレス
以上

で、2.0b2ってどうよ?

ハムスターが喜びそうだな、ひまわりのたね

アプリケーション「Finder」について
活性化
以上

terminalを終了するシェルを書きたいんですがよくわかりません。
どのように書いたらいいすか？

前略
　アプリケーション「ターミナル」様
　　さようなら
かしこ

ターミナルのプロセスをkillしたら逝ってくれました
みなさん、ありがとう

>>143
あさがおでしたっけ？

あのー、ここは頼んだらソフトを作ってくれるんでしょうか。
os xなんですけど、開いているソフトを一発で全て終了させるスクリプトって
いうんでしょうか、できるでしょうか。無理ならいいのですが、、、

do shellで
"shutdown -h now"

質問させて下さい。
既出だったらすいません。環境はOS Xです。

tell application "Finder"
　　every file of 適当なフォルダ whose "Mac" is in name
end tell

このスクリプトでresultのリストから
ファイルの名前を参照したいのですが、
方法がわかりません。というか出来ません（汗

ひょっとして、無理……なのでしょうか？
出来る方法があれば、良ければ教えて下さい。

tell application "Finder"
　　name of every files of 適当なフォルダ whose "Mac" is in name
end tell

>>148
ｶﾞ━━━━(ﾟДﾟ;)━━━━ﾝ!!
そんなシンプルな方法で良かったのですか……あ、ありがとうございました。

＿|￣|○ ｳﾂﾀﾞｼﾉｳ...

filesのsイラン買った

>>145
QaLLってアプリがある。

>>139
2.0b1以降バックスラッシュの扱いがタコ。

>>139
わたしが困ったのは
"hoge:日本語のファイル名" as alias
でエラーがでるってところ。
文字コードの問題らしいので変換？すれば回避できるがめんどくさい。

>>152
気が付かなかったが
set a to "表示"
でエラーでますね・・・

１バイト文字だけでスクリプト書くなら2.0b2がお勧めかな。
検索／置換は便利だし、辞書を簡単に見られるもいい。
あ、ツールバーから検索できます。
コンテクストメニューでよく使う？スクリプトの
ひな形をペーストできるもの便利そう。

Apple Script Editor 2.0b2
http://www.versiontracker.com/dyn/moreinfo/macosx/17542

いまだに日本語を Shift JIS で扱っているみたい。
ユーザの優先言語が英語になっているとふつうのバックスラッシュが使える。
日本語のユーザではバックスラッシュは option + Y で入力す
¥ を使わなくちゃいけないみたい。

よってタコ > 2.0b2

（＾＾）

唐揚げ

Mac OS X では Python, Ruby, Tclsh も使えるよ。Python は Panther 以降では GUI も
作れるようになるらしい。Ruby も RubyCocoa で Cocoa アプリ作れるし、Tclsh は Tk
を使えば一番簡単に GUI が作れる。今から Python を覚えれば、GUI アプリを配付する
のが楽になって良いと思うよ。コマンドラインアプリのラッパーなど、色々役に立ちそう。

Python, Rubyって広く普及しているインタプリタ型の言語ですよね？
プログラムを実行するときは、なにかSriptEditorみたいな
環境を使うのですか？それともターミナル上とかで実行するのですか？

>>158

フォルダに含まれるエイリアスの内、リンクが切れているエイリアスを
ゴミ箱に捨てるアップルスクリプトを書きたいのですが、どうすれば
エイリアスのリンク切れがわかるのか、わかりません……。

どなたか助言おながいします。(;-人-)

>>160
Finderでオリジナルを探してエラートラップで逝けました。

tell application "Finder"
set afile to choose file
if alias of (info for afile) is true then
try
original item of afile
on error
delete afile
end try
end if
end tell

>158
エディタか端末エミュレータ上で開発。実行は端末エミュレータかファインダでダブルクリック。

>>161
ありがとうございます。
エラートラップという事は、正式な方法はないのですね。
try文はどうにも力押しというイメージで、常用するには
抵抗があるのですが、とりあえずこれで逝ってみます。

>>163
JavaとかRubyとかC++とか, try〜catch的な機構をもっている言語なら、
error trap書きまくり、はい、それからどうした?
的な書きかたをするのはごく普通のこと

AppleScriptにおいてもまったく正式な方法だし、慣れと気分の問題なので
気にしないでつかうがよろし。

OpenSourceじゃないんなら書式の作法なんて気にしない！

on error errStr
って書くとerrStrにエラーの原因が入るようだ。

(ﾟεﾟ)ｷﾆｼﾅｲ!!

>>166
リファレンスを買って、幸せになって下さい。

>>168
同意。

エラートラップ使ってるとOSのバージョン変更で使えなくなったりする事はあるので
それは注意しませう。
まぁそれはエラートラップ以外でも同じ事だけどね。

すみませんが、ちょっと教えて下さい。

フォルダのリストのアイテムが、
フォルダかファイルか判断するスクリプトを
書いたのですが、プロパティのfolderを取る
ところでエラーになってしまいます。

webで調べた限りは、皆さん普通に使っている
みたいのですが、私のスクリプト間違っている
ところがあるのでしょうか。

OSは、10.2.6
AppleScriptは、1.9
エラーは、「実行エラー　"folder of {...}"を取得できません"」

tell application "Finder"
set myFolder to (choose folder with prompt "連続表示させ....")
set fileList to list folder myFolder without invisibles
set myFolderPath to myFolder as string
repeat with aItem in fileList
set filePath to myFolderPath & aItem
set fileinfo to info for file filePath
if folder of fileinfo is true then
display dialog aItem & " is Folder"
else
display dialog aItem & " is File"
end if
end repeat
end tell

>>170
いいたいことはいろいろあるんですが
まず、そのスクリプトはFinderにtellする必要はありません
tell〜とend tellの２行を削除したらエラーは出ません

でもエラーの原因はMac側のバグです
list folder myFolder without invisiblesで不可視ファイルを無視するように
してるにも関わらず不可視ファイル（".FBCIndex"）をカウントしてしまい
そのファイルはFinderからは見えないので
「〜取得できません」とエラーを吐き出したのだと思います
Finder側とOSAX側で不可視ファイルの定義が違うんですかね

ですから
余計なお世話でしょうけど
別の方法でフォルダとファイルを区別した方がいいと思います

すいません、質問させてください。

Perlっていうか、それ以前の問題なのですが、

ホームのSitesフォルダ内でCGIが動かせるようにしようとしているのですが、
いっこうにできません。
(CGI-Executablesフォルダでは実行できます。)

試みたこと
/etc/httpd/httpd.confを変更した。
ScriptAlias /cgi-bin/ "/Library/WebServer/CGI-Executables/"
↓
ScriptAlias /cgi-bin/ "/Users/name/Sites/cgi-bin/"

あと
<Directory "/Library/WebServer/CGI-Executables">
AllowOverride None
Options None
Order allow,deny
Allow from all
</Directory>
というところも同じように変更。
ここのOptionsも変更してみるも、よく分からなかったので現在はnoneにもどしてあるます。

どうしたらいいか教えてください。お願いします。

>170,171
Finderにtellしてることそのものが原因じゃないのか？
「folder of fileinfo」の「folder」がレコードのラベルじゃなくて
Finder定義アイテムのfolderとして扱われるからでわ。

>171,173
どうもありがとうございます。

Finderへのtellを省いたらちゃんと動きました。

ファイルを扱うから、Finderにtellしなきゃならない
と思っていたんで、Finderへのtellを省くなんて
思いつきもしませんでした。

自己解決しました。
ただのスペルミスでした。

>>173
うん、あんたの言うとおりだわね
すまんかった

AS Studioの事で質問させてください（スレ違いでしたらスマソ）。

make new itemでmain menuに項目を追加し、
それを選択した場合に処理をさせたいのです。

追加した項目に処理を付加するにはどうしたら良いのでしょう？
純粋にAppleScriptの質問じゃないのですが、良ければどなたかおながいします。

perlで全角英数を半角英数に変えるにはどうしたらよいのですか？
これだと文字化けしまくりですた。
tr/Ａ-Ｚａ-ｚ０-９/A-Za-z0-9/

全角がデータ的に何だかわかっているなら簡単に分かるだろ。　
あれは1バイト圏的には「一文字」じゃない。

あぼーん

age

>>179
それはわかってるんですが、ユニバーサルな方法がないものかと...

で、以下の方法で解決しますた。
jcode::tr(\$hoge,'Ａ-Ｚａ-ｚ０-９','A-Za-z0-9');

>>182 随分、限定的なユニバーサルだな…

OSX用のMicrosoft WordもAppleScriptに対応して
いることを最近知りました。これを利用して、Wordの
英文文書の単語をダブルクリックするとJammingなど
の辞書引きアプリを起動して、選択された単語を
自動的に調べるようなApple Scriptを作りたいと
考えています。

コピーした英単語を辞書引きアプリに渡すのは次のようにできることは分かります。
tell application "JISHO SOFT"
activate
set tango to the clipboard
LOOK UP tango IN DICTIONARY
end tell

その前の段階のWordの単語をダブルクリックしたときに、
その単語をコピーするApple Script（バックグランドで動か
す）をどう書くのかが分かりません。

アドバイスをいただけると、幸いです。

ASはダブルクリックに反応はできんよ。

スレ違いですみません。MacPerlを最近使いはじめました。
実行専用とドロップレットで、ドラッグしたテキストファイルを
変換してファイルに書き出すアプリを作ったのですが、
複数テキストをたて続けに処理する場合に、一旦アプリを再起動させないと
２回目以降のファイルを読み込めません。
解決策がありましたら教えて下さい。

で、ソースは…？

print while (<>);
とりあえずこれだけで試してます。

>>188
MacPerl::Quit(2);
しちゃったら？
終了させる手間を省くだけだが、最近の機種なら再起動なんて一瞬だろうし。
まともな解決にはなってないかもしれんが。

>>188
<>つかってるんなら、EOFでドロップレットは終了するんじゃないの?
複数ファイルをまとめてドラッグアンドドロップするっていうこと?
もしそうなら、@ARGV見て1ファイルづつopenとcloseすべきでは?
そもそも、どうなったらそのドロップレットは終了するの??

AppleScript初心者ですが、お勧めのサイト教えて下さい。
ソースを見てそこから自分で広げていきたいと思います。

>>191
>>1

＞＞192
＞＞1のリンクに分かりやすいサイトがないんですけど、、、、、

鳶嶋工房を見て分からないというレベルならまず本をかえ。
http://www.amazon.co.jp/exec/obidos/ASIN/4756134785/qid=1061687593/sr=1-3/ref=sr_1_2_3/249-1540342-6545901

>>1の
参考リンクは>>4-7
を見てもないのか？

なぜかこのリンクが抜けてる。
http://www.apple.co.jp/applescript/begin/index.html
http://www.drycarbon.com/applescript/

みなさんありがとう。
たたかれると思ってびくびくしてたのに。
頑張ってみます！

とりあえず、AppleScriptリファレンスは買っておいた方が良い
http://www.amazon.co.jp/exec/obidos/ASIN/4797310111/ref=pd_sim_dp_1/249-0907760-2525134

これ必読。
俺もここで「リファレンス換え」って言われたｱﾌｫなんだが、基本的な文法が理解できて買って良かったと思ってる。

漏れが持ってんのは、ダニーグッドマンのリファレンス。
AppleScriptが出た当初のものだから、まあ、内容的には古いけど、
基本は変わってないから、未だに重宝してまつ。
ｱﾎﾟｰからもリファレンスが出てたよね。
どっちももう廃刊だよね？

>199
おととい、新宿の紀伊国屋にまだあったよ。アポーのreference。
そんな貴重なもんだったのか。買っときゃよかった...。

>>200
アポーのやつも持ってるけど
わざわざ買うほどの価値は無し。
>>198のこばやしゆたか／AppleScriptリファレンス制作委員会著
『AppleScriptリファレンス』は極めて良書。
OS X版はまだぁ？

みなさん、ごめん。ドロップレットじゃなかった。
何故かドロップレットが全く起動できないので実行専用をドロップレット
チックに使ってました。１つ目のファイルをドロップして処理終了した後、
次ぎのファイルをドロップすると、テキストファイルをMacPerlで開こうとして
しまうよう。なので、189さんの方法で随時終了するようにしました。
要するにドロップレットと動作的には同じ風にしました。
取り合えずうまくいってますが、ドロップレットが何故使えないのかお心当たりありましたら
後学のためによろしくです。ドロップしたらドロップレット自体が見つかりませんという
内容のエラーが出ます。

『AppleScriptリファレンス』を買ってもいいけど、
鳶嶋工房の辞書でもけっこう済みません？
http://homepage1.nifty.com/ton_b/AppleScript/bkfr.htm

本読んでる人って案外多いんだね。
漏れなんかはそこらのサイトを逝ったり来たりして
断片的に覚えたから、無駄の多い書き方になってるかも。

>>203
その辞書もいいと思うけど
実際利用するときは「書籍」の方が何かと便利よ

でもアポーのヤツってさ、こんな書き方もあったのかって思う英語風の書き方が
結構あっておもしろいよね。

英語風だから、「こう書いてもいい」ってのが例文がないと気づかないことが多いんだよね。
他の言語だとああいう書き方って絶対しないしね…
なんとか of なんとか of …

質問です

あぁぁ、入力中に書き込んでしまたぁぁぁ。ｽﾏｿ

質問です。
ネットワーク上にあるOS9のマシンを他のマシンからRestartさせる事は可能でしょうか？
OSXなら外からのAppleEventを受け付ける事が出来るとの事なので、
AppleScriptでFinderのRestartを送ればいいと思うんですが。

>>209
http://homepage1.nifty.com/ton_b/AppleScript/Basic/Object/machine.html
さきほど辞書サイトを出したばかりだろ

>>210
サンクスアミーゴ

AppleScript、Unix系ソフト、ShellScriptなど、何でもいいのですが、
mp3ファイルに含まれる、id3タグを読み出したいのですが、何かご存じでしょうか？
曲名、アルバム名、アーティスト名さえ取り出せればいいのですが…

iTunes+AppleScript なら可能だろうと思う。

だろうじゃなくて可能だ

>>213-214
灯台元暗しでした。レスありがとう。

禿

禿

ジャガーに付属のFolder Action Scriptsなんだけど、
add - new item alert.scptってのを少しいじって使ってます。
要は、web共有時にPub＞Drop Boxへファイルが入っても気づかない事があって、
ファイル追加時にアラートが欲しかったわけです。

フォルダを開く前に指定のサウンドを鳴らせないかと思い、ソレは上手く行ったんですよ。
たとえば、自分でファイルをドロップしても反応するし、知人とのテストでも問題無し。
ただ、LAN内のファイル共有だと反応しないんですよ。最近気づいたんですが。
そんなことってあるもんでしょうか。

AppleScript・・・それはAppleの作ったバグとの戦い
と鳶さんも言ってました。フィードバックすれ。

p2の古いデータを消したいのでshellスクリプトで消そうとしています。
それで、「ある特定の日付け以前のファイル」のリストをつくってforループに渡すか
forループの中で「ある特定の日付け以前のファイル」かどうか判定して
古いファイルを消したいのですがこの判定の仕方がよく分かりません

set TMP `ls -lT $f` で得られた日付けと「特定の日付け」との比較で判定しようと
したのですが日時の引き算の方法がよく分かりませんでした。

どうしたらいいんでしょうか？

書き込んで少し考えたらやり方が分かった。
ただ、setの使い方がよく分からん、なんで
set `ls -lT`
の書き方は良くて
set `ls -lT filename.dat`
だとエラーがおきて sh: set: unknown option: w
って怒られるのは何故だろう・・・

>>220
そういうのは大抵、find を使って処理します。man find して例文を見てみて下さい。

Mac OS Xで、〜Mac OS 9時代のAuto Click osaxみたいに、指定の場所をクリック
出来るようなもの無いっすか？
なぜこんなのが必要かというと、ファイルメーカーServerなんすけど、
./fmserverd STARTが効いてくれなくて自動起動できないんです。
英語版やLinux版だと問題ないみたいなんですけど。
だからしょうがなく「サーバーの起動」ボタンをポチッとしなきゃいけなくて。

>>223
http://www.apple.com/applescript/GUI/
でなんとかなるかも、ならないかも

>>223
TidBit Jにユニバーサルアクセスの話があるからそれを読め。

>224
素晴らしい！なんとかなりましたです。
ちなみにこんなスクリプトでOKでした。
tell application "ファイルメーカーServer設定"
activate
end tell

tell application "System Events"
tell process "ファイルメーカーServer設定"
click (the first button of the front window whose title is "サーバーの起動")
end tell
end tell

>224
素晴らしい！なんとかなりました。
ちなみにこんなスクリプトです。
tell application "ファイルメーカーServer設定"
activate
end tell
tell application "System Events"
click button "サーバーの起動" of window "ファイルメーカー Server" of application process "FileMaker Server Config"
end tell

ありゃ、二重投稿になってしまいました。
>226でもいいけど、>227の方がシンプルかなと。

Terminal(tcsh)で、スペースを含んだファイル／ディレクトリ名の
扱いにはまってしまいました。
・findで、スペースを含む名称の検索するにはどうすれば・・・？
　find . ' 'やfind . '\ 'ではだめなようです。
・パスの記述で、'\ 'とエスケープする以外に、スペースを表現する
　他の方法はないでしょうか？例えば文字コード参照のような。

スペースを含むんであれば
find . -name "* *"
とか

>230
おお、完璧です！ありがとうございます。

2つ目のエスケープについては、foreachで複数のパスを
連続処理したかったのですが、スペースを含んでいると
そこでパスが分断されてしまうので、どうしたものかと。

find . -print0
と
xargs -0
を調べろ

perlやsh等のスクリプトをドロップレットにする方法ってあります？

perlやsh等のスクリプトをドロップレットにする方法ってあります？

DropPerler

ApplescriptとiTunesでMP3とAIFFの相互変換ってできますか？

できます

できますか？

できます

てきますか？

てまきず

きてます

すきまきてきまきす

てまきずし

画像ファイルをScriptにドラッグ＆ドロップ
↓
JPEGViewが起動
↓
画像をPictureViewer書類からJPEGView書類に変換して上書き保存
↓
終了

…というAppleScriptを作ろうとしたのですが失敗。
どなたか作っては頂けないでしょうか？

クリエーターコードを変えるだけ？

>>245
それを示すと話が早いだろうと思ふ。

>>246
いえ、InternetExplorerからダウンロードした画像（PictureViewer書類）を
JPEGViewで読み込んで、JPEGView書類として保存したいのです。

アイコン表示を「中」にすると、PictureViewer書類は枠の部分が灰色なので
黒にしたいと思いまして。
（JPEGViewで読み込み保存した画像は「中」でも枠の部分が黒）

>>247

tell application "Finder"
activate
select file "JPEGView3.3.1-jp"of folder "アップルメニュー" of folder "システムフォルダ" of startup disk
open selection
end tell
tell application "JPEGView3.3.1-jp"
activate
open {alias "Macintosh HD:Desktop Folder:ダウンロード:***.jpg"}
save document 1 in alias "Macintosh HD:Desktop Folder:ダウンロード:***.jpg" as picture with preview and icons without reduced colors given ﾇclass Jccwﾈ:0
close window 2
end tell

記録機能を利用して、こんな感じで書いてみたのですが…
初心者なのでどこが悪いのか分かりません。

>>245

on open theItemList
tell application "Finder"
repeat with theItem in theItemList
set creator type of theItem to "JVWR"
open theItem
end repeat
end tell
end open

これでどうよ。
動くかどうか試してないけど。

アイコン作成ソフト探したほうが早いんじゃねえの

>>250
わざわざ作ってくれてありがとうございます…でもこれではありません。
書き方が悪かったですね。
ScriptにPictureViewer書類をドラッグ＆ドロップした時に
以下の作業を自動化させたかったんです。

JPEGViewを起動させ、PictureViewer画像を開く
↓
「別名で保存」を選択
↓
「保存」をする
↓
「○○.jpgをいれかえますか？」と出るので『はい』を選択
↓
処理完了

>>252
自動化ツールをact2あたりで買った方が
今後のためにもいいよ。

クイッキーズ、だったかな

>>253
わたしはカスタムアイコンの仕組み、
ファイルのクリエータなどを
勉強した方が今後のためにいいと思う

さっき見たら
http://www.binarysoft.com/kqmac/kqmac.html
がなくなっててショックだった

とりあえず自動化ツール　→AppleScript,Perl,Shell出来たら移行

→AppleScript,Perl,Shellに自動化ツール　ミックス。

初心者には自動化ツール　最強。

　腰抜かす。勝手に作業してくるから。

しかも簡単に。

KeyQuencer無いのか?

>>252
http://www.mac.org/graphics/jpegview/
から落としたパッケージの中にサンプルスクリプトが入ってるよ。
ドンピシャのやつが。

>>258
さっきフォルダを引っかき回してみたら…ありました。
「JPEGView Preview & Icon」っていうスクリプトが。

でもせっかくなのでどういうプログラムで動いているのか勉強します。
自動化ツールも、今後のために探してみます。

最後にみなさま、大変お騒がせいたしました。

ちょっと質問です。
現在AppleScriptStudioでアプリケーションを作ってます。
で、そのアプリケーションの中で、実行ファイルとなっているshellscriptを
起動させたいんですが、出来るんでしょうか？
AppleScriptStudioの中ではdo shell scriptでUNIXのshellを実行出来るようなので、
shellscriptを実行出来るshellコマンドでもいいのですが・・・
もし出来るのであれば、どなたか教えていただけるとありがたいです。

>>260

　出来ます。
　Developer Toolsを入れているなら/<あなたのディスク>/Developer/
Examples/AppleScript Studio/Simple Shellにサンプルがあります。

　ただ、シェルで日本語処理をどうこうしようと思ったら飯森さんの
systemOSAXからシェルを扱った方がいいと思った。随分前に使ったので
何故かは忘れました。

　あ、ファイルの指定方法がキモになるのでしょうか？ASStudioで
やるならそういうGUIを作ってしまうのはどうでしょうか。IBで作る
ものを文章で説明するのは難しいのですが……。

IBで作っておくもの：
ウィンドウ（たいてい1枚あるものです。wndと命名）
テキストフィールド（パスを表示する為に。必要ないかも。scptSrcと命名）
ボタン1（ファイル選択のダイアログを出すためのボタン。scptChooseと命名）
ボタン2（スクリプト実行ボタン。OKと命名）

GUI部品のHandlerを作る：

　ボタンはNSButton Info（Command+Shift+i）のAppleScript(Command+6)で
Action-Clickedを選択し、EditScriptボタンでAction Handlerを生成する。

--------------------
property theScript : "" -- スクリプトファイルのあるパスを保存

on clicked theObject
tell window "wnd"
-- スクリプトファイルを指定する
if theObject = button "scptChoose" then -- 押されたボタンがファイル指定だったら
set contents of text field "scptSrc" to my chooseFile()-- OpenDialogを出す
set theScript to contents of text field "scptSrc" -- パスをtextFieldに表示
-- スクリプト実行ボタン。既にファイルの指定がされていなければならない
else if theObject = button "OK" then
-- do shell scriptを使用するバージョン。shellに"ruby <ScriptFile>"が渡される。
-- 更に続けて処理対象のファイルを引数として渡す場合は"& space & <File>"。
-- 処理対象ファイルの指定方法はスクリプトと同じでそれ用のボタンとtextFieldを
-- 作ること。
set theResult to do shell script("ruby" & space & theScript & space & theText) as string
-- system osaxを使用するバージョン
(*
set theResult to (system ("ruby" & space & theScript & space & theText) with plainTextResult)
*)
-- 結果をTextEditで出してみる
tell application "TextEdit"
activate
set theWnd to make new document at front
set text of theWnd to theResult
end tell
（以下略）

　ちなみにこんなの見つけました。techNoteです。

do shell script in AppleScript
developer.apple.com/technotes/tn2002/tn2065.html

早速のレスありがとうございます。
今回の場合、単純にシェルスクリプトファイルをオプション付で呼び出して行いたいので、
261と264のレスが参考になりそうです。
特に264のサイトは非常に役立ちそうなので早速詳しく見てみたいと思います。
また、262と263は今回直接は使いませんが、
今後AppleScriptStudioを使っていく中で非常に有用な情報となりそうなので
この内容を保存しておきたいと思います。
ちょっと月曜まで手元にマックがない状態なので、
また月曜か火曜にでも結果をお知らせします。
どうもありがとうございます。

拡張子.commandで引数取れればそれでもいいのかも。

返信遅れてごめんなさい。
今日やっとマックを使えたので、早速試してみました。
266でおっしゃる通り、do shell script "コマンド(フルパス) 引数"
といった感じで出来ました。
参考にしたのは、
http://www5.tok2.com/home/twakita/soft/script.html
の一番下にあるUNIXコマンドを利用する例とうものです。
それと、264で教えていただいたサイトですが、
調べてみると日本語版がありました。
http://developer.apple.com/ja/technotes/tn2065.html
おかげさまで助かりました。
どうもありがとうございました。

>>260さん、レス番の前には
↑こんな風に「>>」をつけて書き込んでもらえると
いろいろ助かるんですなこれが。

どなたか、iTunesのアーティストとかアルバム情報の習得する方法教えてください。

たいへん恐縮なのですが
applescriptの実行エラー
「"file specification”にできません。」

とはどんなときにでるのでしょうか？
OSX　10.2.8です。
以下の構文でエラーがでます。

tell application "Finder"
set countFile to document file "count.txt" ﾂ
of folder "aaa" of folder "Desktop" ﾂ
of folder "userName" of folder "Users" of startup disk

end tell
open for access countFile
try
read countFile
set readData to result
on error
close access countFile
display dialog "error"
return
end try

close access countFile

display dialog readData

>>270
tell application "Finder"
set countFile to document file ﾂ
"count.txt" of folder "aaa" of folder ﾂ
"Desktop" of folder "ken" of folder "Users" of startup disk as string

end tell
open for access file countFile
try
read countFile
set readData to result
on error
close access file countFile
display dialog "error"
return
end try

close access countFile

display dialog readData
　
ファイルオープン・クローズは定型文だ。丸暗記しよ

じぶんのユーザー名のまんまになっちゃった。ありがちな名前だけど。

なお

tell application "Finder"
set countFile to document file ﾂ
"users:おまえ様:desktop:aaa:count.txt" of startup disk as string

end tell
　
でもイケるよ

>>271-273
ありがとうございます。
できました。助かりました。

またまた恐縮です。
以下のスクリプトでファイルへの書き込みが
できないのですが（error2になる）
間違いをご指摘いただけないでしょうか
count.txtから数字をよびだして、1プラスして
count.txtに保存したいのです。

tell application "Finder"
set countFile to document file ¬
"count.txt" of folder "aaa" of folder ¬
"Desktop" of folder "userName" of folder "Users" of startup disk as string
end tell
open for access file countFile
try
read file countFile
set readData to result
on error
close access file countFile
display dialog "error1"
return
end try
close access file countFile
次へ

つづき
open for access file countFile with write permission
try
set readData to readData + 1
set saveData to readData
write saveData to file countFile
on error
close access file countFile
display dialog "error2"
return
end try
close access file countFile

ごちゃごちゃやって以下でできました。

open for access file countFile with write permission

set readData to (readData as number)
set saveData to (readData + 1)
display dialog saveData
try
set eof file countFile to 0
write (saveData as text) to file countFile
on error
close access file countFile
display dialog "error2"
return
end try
close access file countFile

>>269
漏れは答えられんけど、iTunes Scripts見ると良いんでね?
http://www.apple.com/applescript/itunes/index.html

Apple Script初心者です。
Jeditで次のようなスクリプトを組みたいのですが、
HELPを見てもわかりませんでした。
どなたか教えていただけると助かります。

下の(1)の状態でマクロを実行すると(2)の状態になるスクリプトを
組みたいのですが、"＞ "を入力した後にカーソルを次行の先頭に
もってくる方法がわかりません。

(1)
Iこんにちは。
今日は良い天気ですね。

(2)
＞ こんにちは
I今日は良い天気ですね。

※"I"はカーソル位置です。

>>279

tell application "Jedit4"
　activate
　tell document 1
　　set selection to "＞ "
　　set selection to before byte 1 of line 2
　end tell
end tell

できれば自分でできたとこまでは書き込んでね。

Mailでメール送信の自動化するScriptできないですか？
定期的にメールを送信するようなScriptで、応用して時刻関係の
ものとくっつけようかと。

>>280

早速の回答ありがとうございます。
でもこのコードだと、カーソルがテキストファイルの
先頭に戻ってしまいます。説明不足で申し訳ないのですが

(1)
こんにちは。
今日は良い天気ですね。

この行はファイルの先頭にあるとは限らないのです。

> できれば自分でできたとこまでは書き込んでね。

そうですよね、すいませんでした。

>>282

tell application "Jedit4"
　activate
　tell document 1
　　set x to line number of selection
　　set selection to "＞ "
　　set selection to before byte 1 of line (x + 1)
　end tell
end tell

279の例文では1行目の句点が消えてるけど、それは無視していいんだよね？
あと、この数日ずっとうちのプロバイダがアク禁になってるため、現在Clie＋
PHSでカキコしてます。あんまりマメにフォローできないので、問題あるようだっ
たら他の方フォローお願いします（申し訳ないっす）。

>>283

バッチリです、ありがとうございました。

> 279の例文では1行目の句点が消えてるけど、それは無視していいんだよね？

はい、入力ミスです。

あのぅ、ネットやっててURLとか画像とかデスクトップにドラドロってすごく便利だけど、
こまめに整理しないとデスクトップがいつのまにか一杯になっちゃうって人、自分の他にも
いると思うんですけど、デスクトップにドラドロしたら、ある特定のフォルダに移動するよ
うなスクリプトできませんかね？
フォルダのエイリアスとか単にアイテムを移動させるドロップレットだとそこにドロップしないといけないけど、デスクトップならどこでもいいから便利な気がするんだけど？

>>285
デスクトップもフォルダなのでフォルダアクションが使えました。
on adding folder items to inFolder after receiving inItems
try
set myDesktopFolder to (path to desktop) as string

tell application "Finder"
set itemCount to number of items in inItems

repeat with i from 1 to itemCount
set theAlias to item i of inItems
set theExtension to name extension of theAlias
if theExtension is "jpg" then
move theAlias to (myDesktopFolder & "jpg") as alias without replacing
end if
end repeat
end tell
end try
end adding folder items to

>>286
早速のレスありがとうです。
でもうまくいかないんですが…

> set myDesktopFolder to (path to desktop) as string
この( )の中が移動先のフォルダのパスですよね？
あと保存はコンバイル済みスクリプト？

>>287
フォルダアクションのスクリプトは
"/Library/Scripts/Folder Action Scripts"
あたりにないと動かない気がする。気のせいかもしれないが。
保存形式はコンパイル済みスクリプト。

フォルダアクションの設定は
http://www.objectivelabs.com/fam.php
http://www.versiontracker.com/dyn/moreinfo/macosx/16132
が便利だと思う。

>> set myDesktopFolder to (path to desktop) as string
>この( )の中が移動先のフォルダのパスですよね？
デスクトップのパスをゲットしてるだけ
(myDesktopFolder & "jpg") as alias
が移動先。デスクトップのjpgってフォルダ。
自分で作っておかないとエラーでます。

>>285のOSはなんなのさ

>>288
遅レスになりましたが動きました！
で、色々応用させようとあれこれやっててレス遅くなりました。

>>286
(･∀･)ｲｲ!仕事してますね。
いただきますた。
これで猥褻画像の保存が楽になります。

AppleScriptについて質問します

以下のコードを実行すると
「Finderでエラーが起きました：testを続けることができません」
というエラーが発生します。

− コード −
tell application "Finder"

end tell

すみません、途中で書き込んでしまいました

− コード −
tell application "Finder"
　　test()
end tell

on test()
　　set a to "xxxx"
end test

tell〜end tellの外でtestをコールするとうまくいくのですが、
原因はなんなんでしょう？

test()
じゃなくて
my test()
は?

>>293
tell されている Finder の test() を呼びに行ってしまうのが原因。
test() の前に my を付けて自分自身の test() を呼ぶように指定すると解決する。

testがApplication Keywordsとして認識されているかも。
これで動いたよ。

tell application "Finder"
　　my ttest()　-- test以外の適当な単語、たとえばttestあたりに変更
　　-- tell文の中でユーザ定義ハンドラを呼び出すときはmyをくっつける
end tell

on ttest()
　　set a to "xxxx"
end ttest

追記
Script Editor 2.0betaだと
my test()だとコンパイルできず、test以外の語に変更しなければならなかった。

動きました。なるほど、myが必要だったんですね。

>>294-29
ありがとうございました。理解出来ました。

testの名前に関してはScriptEditor1.9ではtestのままでうまくいきましたが、
予約語等も考慮して、今後はネーミングも注意したいと思います。

>>297
あれ、そう?　my付けるだけで出来たけど。b2かな、2.0 (v36)になってる。

>299
やばっ、漏れのは2.0 (v20)になってた。
要アップデートやね。thx

質問です、DocknはAppleScriptで制御できないんでしょうか
スクリプトエディタの用語説明で選ぼうとしても選べませんでした。

具体的にはDockの「自動的に隠す機能を入にする」というのを
スクリプトで実行したいのですが。

>>301
お望みのことはショートカットキーでできるので
ショートカットをタイプするスクリプトでできました。
tell application "System Events"
tell process "Finder"
keystroke "d" with command down & option down
end tell
end tell

もしかしたらAppleScriptでGUIやるための
設定をしないといけないかもしれません。
http://www.tidbits.com/tb-issues/lang/jp/TidBITS-jp-670.html#lnk3

ショートカットキーをタイプするってスクリプトが
組めるんですね！　
Dec2002SystemEventsいれて見事に動きました
おかげでPhotoshopを起動する時はDockを隠すって
スクリプトが組めました、ありがとうございました。
ショートカットが入力出来るスクリプトが組めると
僕みたいな素人でも、他に考えてたこと実現出来そうです。

AppleScriptのプログラムで各種設定をplistに持たせて値を読み取るにはどうしたらいいのでしょうか？

user defaultsを使用する事で解決しました
失礼しました

シェルスクリプトからAppleScript利用することってできますか？
iTunesから定期的に曲情報を取得したいんです。

>>306
osascript

>>306
だいたいこんな感じで
osascript -e 'tell application "iTunes"' -e "current stream title" -e "end tell"

>>307-308
ぐは‥‥OS Xに最初から入ってるんですね。
相当検索したつもりなんですがAppleScriptからシェル利用なページばっかで‥‥
ありがとうございました。

Mailでメール送信の自動化するScriptできないですか？
定期的にメールを送信するようなScriptで、応用して時刻関係の
ものとくっつけようかと思いまして。

できるかどうかだったら、できるべさ。それとも作れという命令?

>>310
二度目の書き込みだよね？
もう少し具体的に書かないと、他の人も助けようにも助けらんないと思うよ。

今のAppleScriptって、

何でも起動できるのか？

起動だけならOS9のころから何でも出来ましたが。。

これまで、自動記録されたのを少し書き換えるくらいしか、
使ってこなかったけど、Entourageの自動処理がしたくて、
ｱﾎﾟｰscriptの勉強を始めますた。こんな簡単・強力な言語が搭載されてた
なんてｼﾗﾝｶｯﾀﾖ！VBAよりも手軽な感じで（・∀・）ｲｲﾃﾞﾂ!!

ﾊﾟﾝｻのｱﾎﾟｰｽｸﾘﾌﾟﾄはどんな感じなんだ〜〜？？
表ではかなり賑やかだけど、こっちの方が気になるYo！

パンサー標準のMailで自動的にメールを送信するScriptを探しています。
ググりましたがアウトルック用ばかりでした。目的は受信する側で受信メールを
利用するのですが。ひとまず一定間隔で送り続けるスクリプトは可能でしょうか。
わかる方教えてください。上にも似たような質問がありましたね。

>>317
http://www.apple.com/applescript/uiscripting/
これで送信ボタンとか押させれば？
アイドル状態から時間を判定するスクリプトの書き方は自分で考えられるでしょ。

それは入れた環境でしか動かないので一歩引いてます。
やはりAppleScriptだけによる送信コードは難しいものですかね。。。。

＞入れた環境でしか動かない
　
10.3では標準装備になったよ。
Mac OS X v10.3 includes support for the control of the computer's graphic user interface via AppleScript.

お、ありがとう。もう少し調べてからいろいろ考えてみます。

>>301です
>>302さんに書いてもらったスクリプトが10.3で動かないので
もういちどuiscriptingをインストールしないとだめなのかと
思ってたら、>>320さんによると標準になったとのこと。
スクリプトエディタで開いてみたら
keystroke "d" with command down & option down
の部分が勝手に
keystroke "d" given class with command down & option down
の様に書き変わっていて、もとの
keystroke "d" with command down & option down
に書き直すとコンパイル時に構文エラーが出て

当然into variable name, class name, other parameter name or property があるべきですが application constant または consideration が見つかりました。

と言われます、キーストロークのうちコマンドキーなんかの入力は
書式が変わったのでしょうか？

あ、上の書き込みですがgivenとclassの間とwithとcommandの間に
本来は謎の記号があって、それがあると送信出来なかったので削除してあります。

>>317
自動化ツール。使った方がいいよ。簡単。有料。
とりあえず、自動化ツール。で自動化。簡単自動化。

AppleScript等があったら、後で置き換え。

>>322
http://www.apple.com/applescript/uiscripting/01.html

>>322
tell application "System Events"

tell process "Finder"
keystroke "d" given class:command down & option down
end tell
end tell



動くんだけど、Dockが隠れねえ。
いろいろ構文かわった気がする…　辞書は無いかなあ。

>>322
ｷﾀ━━━━━━(ﾟ∀ﾟ)━━━━━━!!!!

tell application "System Events"

tell process "Finder"
keystroke "d" using {command down, option down}
end tell
end tell


こうだわ。

Pantherで
文字列内の\によるエスケープがうまくいかないんだけど、そんなことはないですか？

set a to "\"A\""

こんなようなのです。

>>325,326
ああ、ありがとうございます
わざわざ調べて書いてもらうなんて、家に帰ったら早速やってみます

>>328
うちでも同じ現象です。半角円記号だとだめなので、
英語のサイトから半角バックスラッシュをコピペして
回避しました。

>>330
もしかして新しいスクリプトエディタになってるの？
楽しみだなあ。
Cocoaアプリなら英語入力モードで
option + \
で半角バックスラッシュ入力できるよ、たぶん。
ことえりの英数入力モードじゃなくて
ほんとうに英語モードね

>>331
ありがとうございますー。
ちなみにスクリプトエディタのバージョンは2.0 (v43)っす。

command+Zでかなりの回数戻れるんだけどこれって前から？
＞スクリプトエディタ

>>333
2.0から（手許の2.0v36と1.9で確認）。

ところで2.0b2のDLができなくなってますね。公開されたbetaの最終版は
b2（＝v36）ってことでいいのかな？
今も落とせるのは確か1.8.3か1.8.7までだったと思うけど、AppleScript
くらい常に最新版を公開してほしい。開発者に優しくしようよ＞Apple

>>331
opt + ＼ だと 《 になったよ。
opt + y で \ になった。

あら？
opt + \ で 《 になって、
opt + y で ￥（半角の）になった。

前スレの、「禁煙マラソンカウンター 」なんですが、
10.2.8で、スクリプトエディタ1.9で保存して実行すると、
文字化けがひどく、入力も受け付けず強制終了さぜるをえなくなっています。
何故でしょうか？
教えて下さい。お願いします。

>>337
ttp://pc.2ch.net/test/read.cgi/mac/1064714387/636
のスクリプトをSafariからコピペして確認した限りでは
特に問題なく動いてるようですけれども。
当時、他のブラウザでコピペして文字化けに見舞われた記憶があるので
一度Safariでやってみて。

>>338
レス有難う御座います。
ブラウザはsafariを使っていました。それでも駄目で。
試しにネスケもやってみたんですが、これも駄目。
コピペして、保存ーコンパイル済みスクリプトあるいはアプリケーション
で、いいんですよね？
スクリプトエディタから実行する分には文字化けはないのですが。
何か間違ってますか？　指摘してくれれば助かります。

>>339
ありゃ、スクリプトエディタでしか試してなかった。

アプリケーション形式で実行する場合は

to Bigin_No_Smoking()
tell application "Finder"
（中略）
end tell
end Bigin_No_Smoking

to Current_No_Smoking()
tell application "Finder"
（中略）
end tell
end Current_No_Smoking

のようにFinderを通せば文字化けしないよ。

>>340
いや、どうも有難う御座いました！
禁煙頑張ろうと思います。
本当にありがとうございました！

>>330,335,336

OSXならアプリケーション>ユーティリティ＞キー配列（英名Key Caps）を活用のこと。
OS9以下でも確かアップルメニュー直下に同様のアプリがあったはず。お試しあれ。

日本語IMで単語登録とかは

テキストエディットで選択されている範囲の文字数をダイアログ表示
というごく基本的なスクリプトを書こうとしているですが、
エラーが出て動いてくれず、困っています。
（エラー表示「当然 end of line があるべきですがproperty が見つかりました」）
対象アプリケーションを他のテキストエディタ（KEdit）にすると
ちゃんと動いてくれるのですが。

tell document 1 of application "KEdit"
set WordsNum to selection length
end tell

tell me to activate
display dialog WordsNum

これってテキストエディット側の
AppleScript対応の問題なのでしょうか？

>267
> 266でおっしゃる通り、do shell script "コマンド(フルパス) 引数"
AppleScriptからPerlやRubyを呼び出す時に、引数を渡す方法は
分かりましたが、その逆にPerlからAppleScriptを呼び出す時に、
AppleScriptに引数を渡す方法はありますでしょうか？

>344
テキストエディットの用語辞書を見る限り選択範囲も、文字数を得ることも
サポートしてない。

KEditでできるのはKEditが独自にそういう属性をサポートしているから。

>>346
そうでしたか。残念。
ありがとうございました。

>>347
clipboardの文字数なら簡単に数えられるよ

コピーアンドカウントにすればよい！ってことですか。
ヒント、ありがとう。

ってことで、以下のスクリプトをベースに
使いやすくなるように改良してきます。どうも。

set WordsNum to count item of (the clipboard)

tell me to activate
display dialog WordsNum

OS9.2.2のAppleScriptに関する質問です。

SinpleTextにクリップボードの内容をペーストする事って可能なんでしょうか？
tell application "SimpleText"
paste
end tell
…でいけると思ってたらダメだったんで、途方に暮れてマス。

あと、コメントの文章の○行目だけ取り出すにはどうしたらいいのか教えて下さい。
よろしくお願いします。

ちなみに作成中のモノの用途はデータ管理用です。
ウチの会社ではフォルダ名の頭に5桁の数字で受注番号を入れるというルールがあり、
当面はその後ろに顧客名を入れ、コメント欄に何の仕事かを入れて使う物として作りかけなのが以下のスクリプトです。

on open drop_items
tell application "Finder"
activate
repeat with obj in drop_items
set N to name of obj
set A to text from character 1 to character 5 of N
set B to text from character 6 to end of N
set C to comment of obj
set D to modification date of obj
set txtdata to (((("●受注番号：" & (A as string) & return & "●名称：" & C as string) & return & "●得意先：" & B as string) & return & "●最終更新日：" & D as string) & return) as string
set E to txtdata
set txtdata2 to (((((A as string) & tab & C as string) & tab & B as string) & tab & D as string) & return) as string
set F to txtdata2

--続く

--続き

display dialog {"これでOK?" & return & E} buttons {"なんか違う", "OK"} default button "OK"
set ans to result
if button returned of ans is "OK" then
set the clipboard to F
tell application "SimpleText"
activate
※
end tell
end if
if button returned of ans is "なんか違う" then
display dialog "修正してやり直しなはれ" with icon caution buttons "ガッテンだ!" default button "ガッテンだ!"
end if
end repeat
end tell
end open

これの※の部分に入れる文面をどうしたらいいのか教えて下さい。
それではよろしくおねがいします。

>>351
OS9は起動するのも面倒くさいので、予想で書きますが、たしかSimple textは
Applescriptには対応してないです。なんで、ペーストするにはSandi's Additions、
Prefab playerなんかのツールが必要です。健作してね。

>あと、コメントの文章の○行目だけ取り出すにはどうしたらいいのか教えて下さい。
これは無理だからJedit使うのが吉だと思われます。

んで、一応言っておくとｽﾚ違い

>>351
OS9系ならOSAXつかえば出来ます＞ペースト
Menu Eventsでペーストを指定するか
Sigma's Additionsでコマンド+Vを入力することで出来ると思います。

コメントの方は、テキストをデリミタでリストに変換して、
item ○ of 〜　とすれば取れると思いますよ。

テキストエディットを呼び出して「command + C」を実行
→クリップボード内の文字数をカウントしてダイアログ表示
→テキストエディットを呼び出して前面に戻す
って感じで動いてくれました。
次はこれをキーコマンドか何かで呼び出せるようにがんばります。

OS9でのスクリプティングはコチラへどぞー
「おもろい、めずらしいアップルスクリプト発表会」
http://pc.2ch.net/test/read.cgi/mac/1067367790/l20

＞＞354、355
早いレスありがとうございます。
デフォルトじゃ無理ってオチでしたか。
OSAXにデリミタ…勉強してみまつ。

＞＞357
Thanx!
見当たらないと思ってたら5が出来たばっかだったのですね。
次からはそっちで聴く事にします。

あれ？ PantherのRubyって1.6系のまま？
Ruby界隈だと、Pantherに搭載されるように1.8リリース日を早めた
とかいわれてたような気がするんだけど。

$ whereis ruby
/usr/bin/ruby
$ ruby -v
ruby 1.6.8 (2002-12-24) [powerpc-darwin7.0]

>>359
全然間に合ってません。
あと一ヶ月は早く出してください。

同一アプリケーションで複数のファイルを開いている場合、
Menu Eventsを使ってアクティブなウインドウの切替えと言うか
指定をするにはどうしたら良いのでしょうか？

アプリの最前面の２つのウインドウ切り替えスクリプト
スクリプトのせいなのかレスポンスが少し悪い@G3 400MHz。
mi、Safariで動いたみたい
必要なもの：パンサー
ジャガーではココアかカーボンのどっちかで
every windowが順番に並んでないのでちゃんと
動きませんでしたような記憶があります。

前編：最前面のアプリ名をゲット
もっと簡単にできる方法を知ってたら教えてください

set AppleScript's text item delimiters to {":"}
set curAppName to path to frontmost application as string
set pathParts to text items of curAppName
set curAppName to last item of pathParts
if (curAppName is "") then --カーボンアプリ
set curAppName to item ((count pathParts) - 1) of pathParts
end if

--拡張子削除
set AppleScript's text item delimiters to {".app"}
set curAppName to item 1 of text items of curAppName

後編：ウインドウが切り替わるメニュー項目をクリック
ウインドウメニューのメニュー名がわからないので
適当にクリックしまくるようになった・・・

tell application "System Events"
tell process curAppName
try
set theWindowName to name of item 2 of every window
on error
beep
return
end try

tell menu bar 1
try
click menu item theWindowName of menu "ウインドウ"
return
end try
try
click menu item theWindowName of menu "Window"
return
end try

try
click menu item theWindowName of menu "ウィンドウ"
return
end try
beep
end tell
end tell
end tell

>>362は
name of (info for curAppPath)
で短くなるけど重くなるような気がしたので
めんどくさい方法になってます

Sandi's Additionsを使ってダイアログのボタンをクリック
させたいのですが、画面上の座標を調べるにはどうしたら
よいでしょうか？

Developer Tools入れるとPixieで出たりするけど、ダメ?

>>365
UI Inspector

こんなスクリプト希望します。
起動すると小さいスクロールバーのついた文字入力欄がでて、
そこに日記を書いて、「OK」押すともとからあったにテキスト
書類（なかったら作られる）に日記が追加されるというもの。

単純かもしれませんが、言語を1から作る知識はないので、
わかる方がいたら教えてください。なお、テキストのテンプレートは
以下の感じです。

↓その時点の日付を自動取得。　　　　　↓他のファイルにも転用できるようにタブの挿入。

XXXX年XX月XX日X曜日XX時XX分XX秒ここから日記が追加される。
XXXX年XX月XX日X曜日XX時XX分XX秒ここから日記が追加される。
XXXX年XX月XX日X曜日XX時XX分XX秒今日は2chにお世話になりました。
XXXX年XX月XX日X曜日XX時XX分XX秒朝起きて顔を洗って出勤しました。
XXXX年XX月XX日X曜日XX時XX分XX秒2chの優しい人にスクリプトを書いてもらいました。

こんな感じのスクリプトになります。

ココからはこのスレはソフトの発注を請け負うようスレになりました。

すべてを聞くことに抵抗を感じながらも、よろしくお願いしたい次第であります。
それともスレ違いでしょうか？

http://www.applescript.jp/に行って作ってもらえ(w

>>368
Emacs でも vi でもお好きなエディタで出来ますよ。

>>368
起こりうると想定される全ての問題に目を背けるならば、こんな感じ。

set aDate to (current date) as string
set aBody to text returned of (display dialog aDate default answer return & return)
do shell script "echo '" & aDate & "¥t" & aBody & "' >>~/Desktop/Diary.txt"

>>368
君はまだ言語を作る能力は無いようだが
スクリプトを習得するのは比較的容易なようだ。

それだけ仕様を文章として表せられるのだからスクリプトも書けるよ。

自分でも分らないくらいの数のスクリプトを書いてから
言語を作ることは始めてごらんよ。
言語の命名はここの人たちが(r

>>368
これを diary.command というファイル名で保存。Terminal を起動して、chmod +x と
書いて、ファイルをドラッグアンドドロップ。リターンを押す。Finder からこのファイル
をダブルクリックして起動。chmod +x の後にスペースを入れるのを忘れないように。
ファイルはプレーンテキストで保存してください。

#! /bin/sh

if [ -f diary.txt ]
then
printf '¥n' >> diary.txt
echo -n `date` >> diary.txt
printf '¥t' >> diary.txt
open ./diary.txt
else
touch diary.txt
echo -n `date` > diary.txt
printf '¥t' >> diary.txt
open ./diary.txt
fi

汚いけど、即席なんで許してちょ。

AppleScriptで変数Xに"あいうえお"、Yに"えお"が入っている場合に
Xから"あいう"を取り出すには、どうすればいいんでしょうか？

>>376
set aiueo to "あいうえお"
set eo to "えお"
set AppleScript's text item delimiters to {eo}
set itemList to text items of aiueo
set aiu to item 1 of itemList


わたしもAppleScriptで一行日記作ってみたけど
追加したprefpaneとかの記録とか
ちょっとしたメモにはいいかもしれないね。

このスレでOS 9の質問出てるから何でやろうと思ったら、
もう一個あったスレ沈んでるじゃん！
保守しとけばよかった。。

>>368
作ってあげるから金暮れ

>>378
>>357

>>373
>set aDate to (current date) as string
>set aBody to text returned of (display dialog aDate default answer return & return)
>do shell script "echo '" & aDate & "¥t" & aBody & "' >>~/Desktop/Diary.txt"

ちゃんと窓がでました!!　ちゃんと記録されています!!
こんな短いスクリプトなのに感激です。いろいろ研究させてもらいます。

>>374
スクリプトは簡単だと思いました。でも、まだソースをコピーして繋げるのが
少しできる程度のレベルなのでまだまだですね。

>>375
こちらも試させていただきました。これはターミナルが起動するのですね。
コレ系ははじめてのスクリプトなので、これから少しずつ始めてみたいと思います。

>>379
もうできたので十分です。


皆さんありがとうございました。このスクリプトを使わせていただきます。
これからもお世話になりながらも、がんばって行きたいと思います。

OSXでPERLを使っているのですが、
WinのMessageBox みたいな、お気楽
メッセージダイアログ表示機能を実現
するとしたら、どのような方法が近道
でしょうか？

ご存知の方いましたらお願いします。

ゴメンなさい。　ログを見ると、
AppleScriptに処理を渡せば
容易にできそうですね。

で、もう一点、ご存知の方が
いれば教えて下さい。

OSX の perl から、ASに処理
を渡す方法は？
・Shellで AppleScriptlet? を起動
・Perl のクラスモジュールに便利なものある？
などが考えられますが・・・・

こちらでも調査できたら報告します。

/usr/bin/osascript でした。

$osa = '/usr/bin/osascript';
$prm = '-e';
$cmd = <<"end-of-script"
xxxx
xxx
xxx
end-of-script

system $osa,$prm,$cmd;

なんてやったらOKでした。ダイアログが
Activateにならなかったり、終了しなかっ
たり、まだまだ悩んでますが、またお知恵
を貸して下さいませ。

スレ汚しメンゴ。

>>384
そうやって調査結果を報告していただけると何かしらの役に立つというもの

>>373
これ便利だな。
漏れもソース盗んだ訳だが、アプリにして保存して実行すると
文字化けるぞ？そして保存されたファイルは.txtのくせにテキストじゃねぇんだよ。
ここ改良してもらえないですか？（おだやか口調w）

ちなみに368ではないが。

>>386
set aDate to (current date) as string
set aBody to text returned of (display dialog aDate default answer return & return)
do shell script "echo '" & aDate & "¥t" & aBody & "'| tr '¥r' ' '|
iconv -f UTF-8 -t SHIFT_JISX0213 >>~/Desktop/Diary.txt"

i昆布って、ｼﾞｬｶﾞﾀﾝにはデフォで入ってないよね？
もしかすて、ﾊﾟﾝｻｰﾀﾝ限定？

>386
アプリに保存して化けるのはPantherのスクリプトエディタが悪い。
1.スクリプトを「アプリケーションバンドル」形式で保存し、
2.できあがったアプリをFinderでControl+クリック。
3.パッケージの内容を表示し…
4.Contents/Resourcesを開きます。
5.新規フォルダを「Resources」フォルダの中に作って、その名前を「Japanese.lproj」とする。
6.ウインドウを閉じる。
7.件のアプリの「情報を見る」。
8.「言語：」を見て、「Japanese」が存在してチェックマークがついてるか確認
9.もう大丈夫。文字化けしないよ。

ついでに俺のごつすぎる改造スクリプト。

on run
set aDate to (current date) as string
set aBody to text returned of (display dialog aDate default answer return & return)
--
-- 日記ファイルを探す
set NoStartCR to false
set DTPathAlias to (path to desktop folder from user domain)
set Diary_As_Path to quoted form of ((POSIX path of DTPathAlias) & "Diary.txt")
set check_ifExist_script to "find " & quoted form of (POSIX path of DTPathAlias) & " -name " & "Diary.txt"
set ifDiaryexist to (do shell script check_ifExist_script) -- "~/DeskTop/Diary.txt"を探す
if (ifDiaryexist is "") then -- 日記ファイルがなかったら
set NoStartCR to true
do shell script "touch " & Diary_As_Path -- 作る
end if
-- ファイルに書き込む
tell application "Finder" to set Diary_As_Alias to file "Diary.txt" of DTPathAlias as alias
set FileRef to (open for access Diary_As_Alias with write permission)
set file_matubi to (get eof of FileRef) + 1 -- ファイルの末尾はどこ
if not NoStartCR then set aDate to return & aDate --改行して書き込むため
write aDate & tab & aBody to FileRef starting at file_matubi
close access FileRef
end run

ちょっと教えて頂きたいのですが。
ある文章の中から、ある特定の文字列を含んだパラグラフを
取得する方法が知りたいのです。
例えばあるサイトの文字列の中から"aiueo"という文字列を含んだ
Paragraphを抜き出す場合、

tell application "safari"
set str1 to text of document 1
で、現在サファリで開いているページの全テキストを取得して、
ここからが分からないのですが、
get paragraph who contains "aiueo" of str1
だとエラーになります。
whoはスクリプトエディター自体で使えないようなことを聞いたのですが、
その場合、whoが使用可能なエディターに一度渡すのでしょうか？
最終的にはそこで得た文字をファイルメーカーの指定フィールドに入れます。
根本的な理解力不足だと思いますが、何卒ご指導の程を。

>>398
意外一番まともに動くぞ？

>>392
ていうかAS自体ってそんな高度なテキストの扱い方は根本的にできない。
＞ その場合、whoが使用可能なエディターに一度渡すのでしょうか？
ですな。

safariからテキストをゲット→そういうのができるテキストエディタなどで開かせる→
そこで処理させる
　

>>394
>ていうかAS自体ってそんな高度なテキストの扱い方は根本的にできない。

そうなんですか・・・。
逆にファイルメーカー自体でテキスト処理させた方がいいですね。
Position関数とかである程度は抜き出せますから。
ただASでスマートに出来るかなと思ったもので。

>>390
(･∀･)nice!

>>395
ASは外部アプリケーションをコントロールするのが本道。
ASだけでなんでもかんでも、という発想をしちゃイカン
また、OSXを使ってるなら、perlに投げると幸せかも

>>397
やっぱperlですか。全く触ったことないのでないので、これを機会に勉強してみます。

>>392
やろうと思えばAppleScriptだけでもできる。

set str1 to "ちょっと教えて頂きたいのですが。
ある文章の中から、ある特定の文字列を含んだパラグラフを
取得する方法が知りたいのです。
例えばあるサイトの文字列の中からという文字列を含んだ
Paragraphを抜き出す場合、"
set AppleScript's text item delimiters to return
set str1 to text items of str1
set paragraph_list to {}
repeat with a_paragraph in str1
set a_paragraph to a_paragraph as text
if a_paragraph contains "文字列" then
set end of paragraph_list to a_paragraph
end if
end repeat
paragraph_list

399氏ありがとうございます。
で、例文そのままやってみたのですが、
全文取得されてしまいます。
試しにサファリでやってみましたが、同じく全文。
しかしなんとなく考え方のヒントになりそうです。

あっそうか。
デリミタを改行にして、分割してやって
一行ずつ含まれているかチェックすればできなくもないか。
　
激しく遅いことこの上なさそうだが、目的は達成できそうであるな
perlなら一瞬で終わるんだが…

>>401
returnをいろいろ変えてやってみたら？
“ASCII character”とか使って

色々ありがとうございます。試してみます。
>perlなら一瞬で終わるんだが…
ほ〜っ。楽しみです。

403氏
ASCII characterを使うとなんとか部分的に
文字列の取得ができました。
しかしパラグラフとしてうまく切り出せません。
spaceでも部分的に取得できるのですが。

しかしいい勉強になりました。
今後使えそうです。ありがとうございます。

って心はperlに走りつつありますが。

テキスト処理だけなら、perlはいいっすよー
そもそもテキスト処理のために開発された言語だしねー

>>392

set findString to "Apple"
tell application "Safari" to set textData to text of document 1
set textList to every paragraph of textData
set foundList to {}
repeat with aParagraph in textList
if aParagraph contains findString then set end of foundList to aParagraph
end repeat
foundList

foundListの中は参照で入っているので「結果」は見づらいけど
その後の処理には何も問題はないはずです。
文字列の比較をする時はUnicode textのままでやるのが鉄則。

>>400 AppleScript's text item delimitersを変えたら
必ず元に戻しておきましょう。

407氏
ありがとうございます。
それでやると、目的の文字列を含むitemの番号が取得できますね。
で、そのスクリプトに続けて、そのitemの番号をテキストとして
取り出すにはどうやるのでしょう？
例えばitem番号が70としたら
get item 70 as text
と続けて書くとエラーになるのですが。

それと教えて頂いたスクリプトの末尾にend tellなくても動くのですね。

>>388
set aDate to (current date) as string
set aBody to text returned of (display dialog aDate default answer return & return)
do shell script "echo '" & aDate & "¥t" & aBody & "'| tr '¥r' ' '|
iconv -f UTF-8 -t SHIFT_JISX0213 >>~/Desktop/Diary.txt"

動かすと
iconv:(stdin): cannot convert
にエラーがでる。

>>388
set aDate to (current date) as string
set aBody to text returned of (display dialog aDate default answer return & return)
do shell script "echo '" & aDate & "¥t" & aBody & "'| tr '¥r' ' '|
iconv -f UTF-8 -t SHIFT_JISX0213 >>~/Desktop/Diary.txt"

iconv:(stdin): cannot convertのエラーがでる。

気付かんかった‥‥‥‥二重カキコすまそ

質問させてください。
ファイルの種類を「UNIX実行ファイル」
（ターミナルの画面のようなアイコン）
にするにはどうしたらよいのでしょうか？
試しにUNIX実行ファイルのクリエータを
creator type で見てみると "missing value" と
表示されてしまいます。
# これはこのファイルに限らず、
# ほとんどのファイルでもそうなのですが。
ファイルの「種類」はクリエータを
見ているわけではないのでしょうか。

内容を取り出すのは
contents of item 70 of foundList
のようにします。
ただ、実際上は必要なときには自動的に変換してくれますので
例えば、
display dialog item 70 of foundList
とかやっても大丈夫です。

それと、スクリプトの中の適当な場所に
log foundList
と書いて
「イベントログ」の「結果を表示」を入にしてスクリプトを実行すれば
リストの中身が「イベントログ」ウインドウにちゃんと表示されると思います。

ついでに書いておくと、
>>407 のようにするとき気をつけなければならないのは
文字列が等しいかどうかを比較するときです。
その場合は
if aParagraph = findString then ...
では素通りしてしまいますので
if contents of aParagraph = findString then ...
とする必要があります。

あっ！
>>413 は、もちろん、 >>408 へのレスです。

407氏
ありがとうございます。
今回はとてもためになりました。聞いてみて良かったです。

>>412
アクセス権で実行可能にすればならない?
Jaguarで白紙だったけどPantherで変わってる。

>>416
ｺﾞﾒｿ、違った。おまけにageちゃった。

>412
UNIX実行ファイルは例えばC言語などのプログラムをコンパイルしたもので
シェルスクリプトの.commandファイルなどとは別物ですじょ？

>418 さん
そうなんですか。
ただ、.commandファイルのアイコンだと
見た目があまりよくなかったので、
どうしたら変えられるのかなっと思っていました。

# 実は、foo.htmlのような Safari で開けるファイルの
# クリエータもほとんど "missing value" とかなってます。
# Safari に限らず他のファイルでも同様です。
# これはどういうことなんでしょうか？
# 逆に言えば、別にクリエータを設定しなくても、
# 起動するアプリケーションが指定できるということでしょうか。

416さん、418さん、ありがとうございました。
どうやら私の知識では無理みたいなので諦めます。

すみません。416さんへの返事が書けてませんね。

>416 さん
そうなんですが、白紙アイコンではなく、
UNIX実行ファイルのアイコンをつけたかったので。

（419につづく）

>419
アイコン「だけ」変えたいならカスタムアイコンを貼ればいいじゃん。

Mac OS Xではファイルタイプ/クリエータがない場合、拡張子を元に判断される。
このご時世、そういうシチュエーションはしばしばある。

多分しょぼすぎる質問なんでしょうがぐぐっても過去ログ漁ってもわからなかったので質問させて下さい。
panther10.3.1使用
applescript studioで
display dailog "日本語"でビルドすると日本語の部分が文字化けしてしまいます。
ぐぐるとダイアログの文字化けというものがでてきたのですが、今、困っているのはビルドする以前、ソースを保存した時点で文字化けしています。
デフォルトのファイルエンコーディングはUTF-8で一応日本語リソースも追加してファイルエコーディングにUTF-8を選択しておきましたが、やはり保存の時点で化けてしまします。
フォントは全てosakaに変更しました。
どなたか解決法が解る方是非教えてください。

>>422
つい最近その話どっかでみたぞと思ったら
>>390じゃないか。
過去ログ見て気がつかなかった？

>422
エンコーディングがUTF-8になっていれば普通化けないハズなんだがなぁ。
つーか、本当にAppleScript Studioが必要なレベルなのか？

スクリプトエディタで対応できる範囲ならその方がいいぞ。

すいません、OSを再起動したら直りました。
>423ビルドして起動の後にダイアログの中が文字化けするのではなく、コードに日本語を書いたときに保存すると文字が化けていました。

>424
はい、スクリプトエディタで問題はないのですが、ワンランク上に興味がわいたので勉強しようと思いまして。

お二人ともありがとうございました。

スクリプトエディタ2で、
￥"
とか、
<=
とか、ちゃんと使えてます？
なんかおかしなことになるんですけど…

Pythonを今勉強してるんですが、
ひょっとしてPantherに付属のPythonって
UTF-8通りませんか？
バックスラッシュをどうも理解してくれないので……。

>>426
使えませんね。
再コンパイル時にいちいち手直ししないといけないです。

>>426
　\"は、ASCII CHARACTERで言い換え、
　<=は、同義語で言い換え
などしてしのいでいますが、めんどうですね。

　バグレポートは出しているんですが、こっちの英語に難があり...。

>>426の件なんだけど、古いスクリプトエディタに戻したら直るのかな？
試せる環境の人いる？

>430
ついこないだ、previous systemに残ってたふるいエディタ捨てちゃった…
アーカイブ及びインストールした人は古いエディタが残ってる可能性大だぞ。

Pantherでスクリプトエディタ1.9なら
大丈夫な模様。

ところでXCodeでAppleScriptを扱っても同じ問題が出るんだよね…

shスクリプトを書いているのですが、ファイル名に半角スペースが
ある場合、うまく扱えません。スクリプト内で半角スペースのある
ファイル名の取り扱いはどのようにすればよいのでしょうか？

半角スペースは区切り文字だからうまく扱えないのは当たり前
もうちょっと頭使いましょう

とりあえずファイル名を""で囲ってみたり半角スペースをエスケープしたりしてみてはいかが？

>>435
例えば、次の例のように変数に"hoge hage"と"age sage"かいう名前のファイルが
あるディレクトリーで次のようなスクリプトを使いたいときには、変数iをどの
ように扱えば、うまく動きますか？

for i in `ls`
do
mv $i $i.txt
done

何故
mv "$i" "$i.txt"
このくらいの事を試さないで質問するのですか？

カレントディレクトリ内の全ファイル対象なら
for i in *
do
mv "$i" "$i.txt"
done
でいいんじゃない？

>>437、438
半角スペースが含まれたファイル名が変数の値だと
変数を""で括ったところでうまくいかないのですが。。。

うまくいかないというのは、どううまくいかないの？
エラーメッセージくらい書いてよ

ちなみに、
mv "hoge hage" "hoge hage.txt"
はうまくいくのか？

forで拾ってるリストは正しく拾えてるの？

昼飯食いに行く＆午後は会議なんで即レス出来ません
申し訳ない

>>440
お仕事中申しわけない。お暇なときにでもお付きあいください。
ターミナルで
mv "hoge hage" "hoge hage.txt"

はうまく通ります。
ただ上記スクリプトではうまく通らず
hogeの所で切れて解釈されているようで

mv: rename hoge to hoge.txt: No such file or directory
hoge

とのエラー・メッセージが出てきます。

完全な解答が与えられるまで、質問を繰り替えしていれば良いと考えているからダメなのでは？
437の回答の意味を理解していないだけでしょ。
なんで”エスケープ〜”の部分を　わ　ざ　と　読み飛ばしているのですか？

mv "hoge hage" "hoge hage.txt"
がうまくいくのに気付いたのであれば
mv ￥"$i￥”　￥”$i.txt￥”
とか色々やってみればいかが？

$i がほんとに有効なパスを拾っているのか標準出力に書き出して調べてみたら？

ゴメン　嘘。
438 なら実行可能だけど、Panther のls　はエスケープされてない。

>>442
達人のコメントはありがたいが、知ったかの人のコメントは正直不愉快。
クオテーション・マークをエスケープしてどうするの？

エスケープしたいのは、シェルの変数に収められた半角スペースなんですけど。

>>他の人
逆ギレすみません。

キレちゃだめだよ。
ひと息入れようよ。

IFSkaitou ni hara wo tateru kurainarahajimekara shitsumon suruna boke!

habe wa breiku kittcut!!

おや
こんな状態に・・・

とりあえず>>443試してみ
ループん中でecho使って

>>449
444で概ね理解できたようです。
`ls`が悪さしていたようですね。
438のように*でやればうまくいきました。
Thx!> all

>>450
原因は for が半角スペースを区切り文字にする事です。あなたが >>441 で書いたエラー
出力を注意深く読めば想像がつくでしょう。基本なので覚えておくと良いと思います。
逆切れは大人のすることではありません。

http://www.google.co.jp/search?q=+%2Bfor+IFS+shell&btnG=Google+%8c%9f%8d%f5

OS Xで、AppleScriptに対応していないアプリケーションにペーストするにはどうしたら良いでしょうか?
具体的には、MSNメッセンジャーに定期的にメッセージを流したいのですが

>>452
http://www.apple.com/applescript/uiscripting/

>>451
だから空白スペースをどうやってエスケープすればよいかという質問をした
までだが。何をいまさら。

だから空白をエスケープするんじゃなくって、デリミタを変えるんだよ。
スカポンタん。

何で教わってる方が怒っているのだ?

>>455
変数に値を`ls`で受けわたした時と、*で受けわたした時に動作が異なること
の理由を説明できていません。だから却下します。

>>456
尊大なコメントは多々でてきたが、まともな回答が一つもなかったからです。
例、442、451、455
以上 終了。

お騒がせして申しわけございませんでした。（454の母より）

勝手に却下しててくれ。




このスレ以外で。

まともな回答が得られる保証なんてどこにもないのに…(´ﾟ c_,ﾟ`)

相手する方も大変だ（w

>>454
あなたが本当に分かっているのなら、こういう初歩的な質問をする必要は無いはずです。
ポインタは示しましたので、後はあなたの興味次第です。リンク先は見て頂けましたか?

また釣りかよ

あのう、何秒おきかに以下のScriptを実行したいんですけれど

tell application "XXXXX"
XXXXXXXXXXXXXXXXXXXXX
end tell

の形で、repeatでくくると実行しすぎるので他のタグを教えてください。

>>463

on idle

tell application "XXXXX"
XXXXXXXXXXXXXXXXXXXXX
end tell

return ○○
end idle

--
○○に秒数が入る

素早いレスありがとうございます！
感動した！

あのう、パンサーですが
反応しません。

ぐふ、すみません。
repeatの後に
delay ○○を入れて解決できました。
もっと勉強してから聞きにきます。

>>466
idleハンドラは、アプリケーション形式で保存しなくちゃ駄目だよ。
あと「実行後、自動的に終了しない」にもチェック。

iTunes Musicの中の全てのファイルを作成日順に並び替えてiTunes
のライブラリーに追加したいのですがどうやれば出来るでしょうか？

1.ターミナルでlsやsortを使って作成日順のファイル名のtxtファイル作る
2.txtファイルを使ってAppleScriptでiTunesのライブラリーに追加する

という方法で出来るかな?と思ったのですがlsだと作成日が表示出来ない？
所でいきなり詰まってます。
iTunes 4 Music Library間違って消しちゃったんですが、ライブラリーの
追加日順を良く使ってたのにランダムになって使えなくなったのをどうにか
したいのです。

同ページ内の画像の更新時間をhtmlに表示するスクリプト教えてください。
ウェブのいいスレ見つかんなかったので、ここで教えてください。

嫌です。帰って下さい。

可愛そうだろ、誰か教えてやれよw

おはようです！

昨夜徹夜して、解決方法がなかったので
御存知な方いらっしゃれば相談に乗って
くれませんか？

延々テストを行っていたのですが、OSX10.3
の open コマンドって、特定のパスにある
.app の起動に失敗するようです。

コマンドラインの応答を見ると、.app の中の
起動バイナリを検索する処理に失敗している
雰囲気でした。ちなみにローカルボリューム
内にある .app の起動は問題ないようです。

そこで、perl なり、c 実装のコマンドを作るなり
して open が行っている .app の起動プロセスを
自力で作ろうと思ったのですが、そのようなこ
とは可能でしょうか？

参考になるページなどあれば教えて貰えない
でしょうか。

os X 10.3.1スクリプトエディタ2.0で
set name "日本語"
というようにファイル名を日本語にしようとした場合文字が化けてくれるんですが、半角英数字以外にはできないんでしょうか？

と、が抜けてませんか？

質問させてください。
パンサー使ってます。
夜寝るときにRealOneのラジオを聞きながら寝てます。
省エネのため、システム環境設定の“省エネルギー”アイコン
叩いてスリープするまでの時間を1分に合わせ、ハードディスクを
スリープさせるにもチェックマーク入れてます。

この省エネ設定をスクリプトでバシッと設定するためには
どのように書けばよろしいのでしょうか？

ヨロシクお願いします。

>476
わざわざアップルスクリプトで設定する理由がよくわからんけど
アイドルとシャットダウンと日付取得つかって書いてみそ。
簡単にいろいろできるから。

ソース全部ここに書けって意味なら
アプリ探したほうが早いね。

>>477
ありがとうございます。
ま、わざわざスクリプトで設定する理由ですが、
「省エネルギー」アイコン（？）がエイリアスにできず、

1.「システム環境設定」叩いて
2.「省エネルギー」叩いて
3.「時間設定」をスライドさせて
4.「ハードディスク休止」にチェックを入れる

という作業をするのが面倒なので、
ダブルクリック（スクリプト起動）一発で設定できたら
いいなぁ、と思ったのでした。

この省エネでのスリープは、レファランスにある
スリープとはタイプが違います。レファランスにある
スリープはリンゴマークのプルダウンにあるスリープのように
アプリまで完全に停止してしまいます。
省エネのスリープは画面が暗くなり、
ハードディスクも止まるのですが、
メモリに読み込んだアプリはそのまま動きます。
RealOneのラジオは朝自分で止めるまでずーと鳴ってます。

シャットダウンはちょっと違うような気がします。
シャットダウンするわけではないので。
>477 のように、「何と何を使え」という指示でイイので、
どなたか親切に教えてください。

>>478
アプリが動いているということは、スリープとは言わないのでは？

省エネのスリープにもあるとおり、静止している時間を設定する訳で、
RealOneがラジオを流している状態は、静止とは違うんじゃないでしょうか？
その処理をするためには、OSも眠れない訳ですし。

HDDが止まるのは、アクセスしなくてもいいからHDDだけが停止している
だけだと思いますが。

多分なんですが、ディスプレイのスリープをチェックしていませんか？

>478
「ディスプレイのみスリープ」を「スリープ」と表現されると紛らわしいです。
>>479さんの言う通りだと思います。

「省エネルギー」アイコンはエイリアスにできます。
/システム/ライブラリ/PreferencesPanes/EnergySaver.prefPane
のエイリアスを作ればよろしい。

つーか、寝る前じゃなくても恒常的にディスプレイのスリープと
ハードディスクを可能な場合にスリープさせる、にチェックしとくのはダメなの？

spam フィルタの spambayes 導入してみたのですが、これをいちいちTerminal
から起動させるのが面倒なので、AppleScriptを起動項目に入れて起動させたい
と思っています。
spambayes自体はPythonで書かれていて、そのディレクトリで sudo python ./sb_server.py
で起動できるのですが、自分の場合は最新版のPythonを新たにインストールしたので、
sudo /usr/local/bin/python ./sb_server.py
で起動させているのですが、これをAppleScriptで起動できないでしょうか?

>>479-480
紛らわしくしたようでごめんなさい。
なるほど、静止させる設定はしているが実際には
静止させていなかった、ということを理解しました。
しかしディスプレイがスリープするということはこちらは
効いているのかな？

また、わたしの質問では常に「省エネルギー」と一緒でしか
スリープという言葉を使っておりませんし、スリープ設定の
仕方を質問したのではなくて、省エネ設定の仕方を質問して
おります（>>476参照）

エイリアスの作り方のご説明ありがとうございました。
とりあえずそれで少し楽になれそうです。

恒常的にハードディスクを可能な場合にスリープさせると、
ちょっと操作を休むといちいちラグが生じて煩わしくなります。

「AppleScriptで省エネ設定を操作するには？」という興味も
質問の動機にありました。

>>482
いまいち理解してもらえてないようですが…。

>なるほど、静止させる設定はしているが実際には
>静止させていなかった、ということを理解しました。
RealOneが処理を続けているから、静止できないことを理解して頂けたのでしょうか？

>しかしディスプレイがスリープするということはこちらは
>効いているのかな？
こちらはというより、RealOneが動いているのでディスプレイしかスリープできません。

>また、わたしの質問では常に「省エネルギー」と一緒でしか
>スリープという言葉を使っておりませんし、スリープ設定の
>仕方を質問したのではなくて、省エネ設定の仕方を質問して
>おります（>>476参照）
>エイリアスの作り方のご説明ありがとうございました。
>とりあえずそれで少し楽になれそうです。
これについては、コンピュータのスリープとディスプレイのスリープが
省エネのタブにあるのに、省エネとスリープだけでは説明不足となりませんか?
それと、省エネで設定してもRealOneが動いてるんですよ？
設定しただけでは、RealOneを終了させないといつまで経っても
あなたの望むコンピュータのスリープは実現しません。
上の四行は書かない方がよかったでしょう。
私だけかもしれませんが、ムカつきましたもん。

RealOneを指定した時間後（眠りにつくまでの時間）に終了
コンピュータをスリープ
これをスクリプトにすればできます。
頑張ってください。

>482
俺もちょっとむかついたｗ
というよりも、省エネのスリープとかアップルメニューのスリープとかって関係ないんでは。

ディスプレイだけのスリープと、コンピュータごとのスリープを理解してないっぽかったから説明してくれてたんだよ。

で、俺も恒常的にでいいと思うんだけど。寝る時にスリープ気にするタイプなら3時間以上の無操作連続起動も気にならないかな？

>>483-484
レスを返して頂いている方々に不快な思いをさせてしまい
申し訳ありませんでした。

>>483のご説明と>>484のご指摘ありがとうございました。
以後気をつけます。

質問を仕切りなおします。

省エネ設定にあるような「ディスプレイのみのスリープ」と
「可能な場合はハードディスクをスリープさせる」を
ON/OFFするコマンドを教えて頂ければ幸いです。

（＊プレファランスファイルのエイリアスは簡単にできなさそう
でした。これについては調べてみますし、わからなかった場合も
スレ違いなので別の場所で質問したいと思います）

>>485
>（＊プレファランスファイルのエイリアスは簡単にできなさそう

簡単に出来るよ。
実体がどこにあるのか探してみよう。

>485
AppleScriptで大切なことは、
「全ての操作に対してコマンドがあるとは限らない」
ことです。

>省エネ設定にあるような「ディスプレイのみのスリープ」と
>「可能な場合はハードディスクをスリープさせる」を
>ON/OFFするコマンド

いずれもAppleScriptでは制御できません。コマンドが用意されてないので。
あとはGUI Scriptingに望みはある？…ちょっとよく知らんので誰かﾌｫﾛｰｷﾎﾞﾝ

（＊/システム/ライブラリ/PreferencesPanes/EnergySaver.prefPane
って書いたんだけど、見つけられませんか。Finderの検索窓に「EnergySaver.prefPane」って
入れて見たらすぐ出てきますよ？）

>>486-487
ご親切にありがとうございます。スレ違いですが少しだけ・・・。
実体ファイルは見つけられました。が、「エイリアスを作る」
がゴースト状態で実行できなかったのでした。
（同フォルダ内にプレファランスファイルのエイリアスが
ありましたので、不可能ではない、ということはわかっており
ます）

>>487
> AppleScriptで大切なことは、
> 「全ての操作に対してコマンドがあるとは限らない」
> ことです。

はい。しかしあと１歩という気がするのです。
RealOne Player稼働中であることを理由にコンピュータ自体の
スリープが効かないとすれば、コンピュータ自体のスリープも
ディスプレイのみのスリープも、ハードディスクのみのスリープ
も区別なく、要点はそのときの動作状況（この場合はRealOne
Player稼働中）に左右される、と解釈できます。つまり
コマンドはsleepだけでよさそうです。

そこで
on idle
tell application "System Events"
sleep
end tell
return 1
end idle
というスクリプトが思いつきます。

ですが、、、動かない・・・。

>488
ひとつだけ。
そうやって情報を後から小出しにすることほど嫌われることはありません。

アクセス権が間違っているか、もしくはあなたにその権限がありません。

>489
結局何がしたいのか？
寝る前にダブルクリック一発掛けたら
一分後にディスプレイのみスリープ＆HD回転停止させたいんですよね？

idleまでもちださなくてもwait 60 secondsでもいいよーなそーでもないよーな。
return 1では一秒おきにスリープしちゃうけどいいのか？
アプリケーションを「実行後、自動的に終了しない」にチェックを入れて作ったか？

…どう動かないのか、これも小出しにせずはじめから書くべきでは。

>>490
すみません。
情報を小出しにしていたわけではなく、まさに今リアルタイムで
試行錯誤しているところでした。

> 結局何がしたいのか？
> 寝る前にダブルクリック一発掛けたら
> 一分後にディスプレイのみスリープ＆HD回転停止させたいんですよね？

その通りです。（一分後はGUI上の制約なので、即反応してもかまわない
のですが）

> idleまでもちださなくてもwait 60 secondsでもいいよーなそーでもないよーな。
> return 1では一秒おきにスリープしちゃうけどいいのか？
> アプリケーションを「実行後、自動的に終了しない」にチェックを入れて作ったか？

動かないと報告した時点ではアプリケーションにする前でした。
「実行後、自動的に終了しない」にチェックを入れてアプリケーションにした
ところ、実行できました。retun 1は確かにまずかったです。
しかしやはり最初に考えたとおり、sleepコマンドはRealOne Playerまで
停止させてしまいました。残念です。

「スクリプトではできない」とあきらめることにします。
みなさん、ありがとうございました。

おい喜べ。できた。
tell application "System Events"
tell application "System Preferences"
activate
set current pane to pane "com.apple.preference.energysaver"
end tell
tell process "System Preferences"
tell window 1
tell group 1
click checkbox "可能な場合はハードディスクをスリープさせる" of tab group 1
end tell
end tell
end tell
end tell

>>492
ありがとうございます！
ご発言に先ほど気がつきまして、取り急ぎお礼を述べさせて
頂きます。
確かに省エネルギー設定のスリープタブが開きまして、
それだけでも感動しました。
ただ、うちの環境のせいかもしれませんが、
「AppleScript エラー
System Events でエラーが起きました：NSReceiverEvaluationScriptError: 4」
というものが出ます。"click checkbox"から４行が反転します。
少し研究してみます。
希望が湧きました。本当にありがとうございました。

>>493
横レスだけど、
click check box 2 of tab group 1
っていうふうに変えても駄目？

ﾌﾟﾚﾌｧﾚﾝｽ

>>493
ユニバーサルアクセスの「補助装置に…」にチェックが入っているか？
それがないと動かないはず

便乗ですが、サウンド環境設定でアウトプットデバイスを
GUI scriptingで設定できますか?

>>497
「作ってもらうスレ」じゃないので、お間違いなきよう
途中まで位は自分で書け

>>497
できるかできないかと言われれば、たぶんできるんじゃないか。
自分で試してみろよ。

>>368は作って貰ってたよな。

>>500
暇なやつが居ればな。ただ「作ってもらう」を標準化しないほうがいい。
クレクレ厨がどんどん集まるからな。

>>492の
click checkbox "可能な場合はハードディスクをスリープさせる" of tab group 1
に相当する部分にはどうかけばいいでしょうか?

UIElementInspectorでみてもサッパリわからなかったので、お願いしまつ。

>502
ttp://www.apple.com/applescript/uiscripting/02.html
↑からUI Element Inspectorをダウンロードして、操作したいオブジェクトをどう指定すればいいか考えろ。
それから、System Eventsの用語説明を熟読。

…ってさっぱりわからなかったのかYO!!

>>503
>>504
http://www.prefab.com/uibrowser/index.html
こっちのほうがいい。つうかUI.EIでは表現が難しすぎ。
体験版が有るし自動でスクリプトを書いてくれる機能もある。
これでわからないなら根本的に知識がなさすぎ。
書いてもらったところで勉強にもならないから
よそで勉強してからまた来いってこった。

はい...。（´･ω･｀）ｼｮﾎﾞｰﾝ

>506
うむ。確かにprefab〜の方が便利なのは同意する。
試用はともかく製品版の値段高いねぇ。

>507
どう書いたらいいのか、暇だから試してたんだけど、
俺、アウトプットデバイスがスピーカ一個しかないから
スクリプトがテストできないんだよな。
>>506の試用版でやってみりゃいいじゃん。なんで(´･ω･｀)なの？

>>508
日本語版の値段がバカ高だよね。
英語版はいまなら$39.95なのにね…
日本語リソースつけるだけで1万円越えるってのはどういう神経だか…

出来ますた！！！ありがとうございますた！！！

tell application "System Events"
tell application "System Preferences"
activate
set current pane to pane "com.apple.preference.sound"
end tell
tell process "System Preferences"
tell window 1
tell tab group 1
tell scroll area 1
tell table 1
select row 2
end tell
end tell
end tell
end tell
end tell
end tell

すみません！！！
ちょっと足りませんですた！！！
最終的にこうなりますた！！！

tell application "System Events"
tell application "System Preferences"
activate
set current pane to pane "com.apple.preference.sound"
end tell
tell process "System Preferences"
tell window 1
click radio button "出力" of tab group 1
select row 2 of table 1 of scroll area 1 of tab group 1
end tell
end tell
tell application "System Preferences"
quit
end tell
end tell

他のマシンのパスワードが設定されていないユーザ（guest等）を利用してmount volumeしたいんですが、
どうしてもパスワード要求画面が表示されてしまいます
ダイアログを出さずに接続する方法はないでしょうか？

今は、こんな感じで書いてます
mount volume "smb://[email protected]/FOLDER1"

パスワード無しを指定する意味で
guest:@192〜
guest:\"\"@192〜
とかを試してみたんですが、パスワード要求ダイアログが出てしまいます

よろしくお願いします

man mount_smbfs

探しまわってしまったので...もっと簡単な方法あります？

FAQ: アプリケーションとして保存すると日本語が使えません
(1) 保存時の「フォーマット」を「アプリケーションバンドル」に。
(2) Finderで「Japanese.proj」という名前の空フォルダを作っておく。
(3) Finderで(1)で保存したアプリを選択し、
　　情報を見る=>言語=>追加で、(2)のJapanese.lprojを選ぶ。

ところで、長いスクリプトを改行する"Option+Return"って使えてます？
10.3.1ですがコンパイルエラーになってしまいます。Option+Lでも同様...

大事な所を間違えました。Japanese.lprojです。

FAQ: アプリケーションに保存すると日本語が使えません
(1) 保存時の「フォーマット」を「アプリケーションバンドル」に。
(2) Finderで「Japanese.lproj」という名前の空フォルダを作っておく。
(3) Finderで(1)で保存したアプリを選択し、
　　情報を見る=>言語=>追加で、(2)のJapanese.lprojを選ぶ。

Opt+Ret、英語環境でもダメかな？

初心者ですがよろしくお願いします。
set AAA to "BBB"　なんですけど、
BBBをダイアログから指定できませんか？
ダイアログで入力した文字をBBBに設定したいのです。
ちなみにこの場合BBBは数字じゃありません。

>>517
set AAA to text returned of (display dialog "入力してちょ" default answer "BBB")

>>518
ありがとうございます。

ターミナルから
osascript -e 'tell application "System Events"' sleep "end tell"
ってやると
32:32: syntax error: Expected end of line but found end of script. (-2741)
ってなります・・・
間違ってますか？

osascript -e 'tell application "System Events"' -e 'sleep' -e 'end tell'
もしくは
osascript -e 'tell application "System Events" to sleep'
かな?

うお、できました。
どうもありがとうございます。

DesktopスレでGeekToolのお天気表示用weather.plが出てたけど、
他にもスクリプト作らない？
というかこれってTxNの中身から代用できたりするのかな。

GeekTool
http://projects.tynsoe.org/en/geektool/

GeekTool 日本語リソース + 説明サイト
http://members.at.infoseek.co.jp/no_no_no/GeekTool/GeekTool.html

HLNとTxN 配布所
http://www.geocities.co.jp/SiliconValley-SanJose/4733/

OS9.1にてX SERVERのボリュームをマウントするAppleScriptを以下の様に作りました
mount volume "afp://user:passwd@xserver/folder"

これを３台のOS9.1マシンで実行すると、２台は正常に動作するのですが、１台だけエラーが発生します

エラー番号は-3170で、リファレンス本によると「AppleShareIPは使えない」という内容なのですが、
セレクタ上でのAppleShare接続は使えていますし、IP指定によるサーバへの接続も出来ております

機能拡張にあるAppleScriptのバージョンは３台ともJ1-1.6、AppleShareはJ1-3.8.8です

３台ともソフト的な環境は同一でして、唯一違うのは正常に動いている２台はPowerMac7600で
エラーが発生する１台はPowerMac9500という事くらいです。３台ともメモリ160MBで仮想メモリは切ってあります

何が原因でエラーが発生するのでしょうか？

MacOS 9.2.2にしていないこと。

>>525
現在、２台のMacOS9.1は動いているのですが、
9.2.2にするとどういった部分が解消されるのですか？

とりあえず、OS再インストールしてみます。

OS（9.1）再インスコでうまくいきますた
お騒がせしました

perlでwebからの情報を表示する際に指定した単語より前の数字を削除するには
どう書けば良いでしょうか？

>>528
質問する前に一般常識を勉強汁

もし、スレ違いだったらごめんなさい。

IEのキャッシュを削除するAppleScriptを作ってみたのですが、
これを実行するとキャッシュのフォルダが開いたままで残ってしまいます。
フォルダを閉じるアクションを加えるにはどうしたらよいでしょうか？

tell application "Finder"
activate
select file "IE Cache.waf" of folder "MS Internet Cache" of folder "Caches" of folder "Library" of folder "xxx" of folder "Users" of disk "HD"
delete selection
end tell

ご教示頂ければ幸いです。

tell application "Finder"
delete ( file "IE Cache.waf" of folder "MS Internet Cache" of folder "Caches" of folder "Library" of folder "xxx" of folder "Users" of disk "HD" )

end tell

>>531
初歩的な質問に答えて頂きありがとうございます。
回りくどいことやっちゃってたんですね。
ほんと感謝です！

というか、パスの表記が以下みたいなのじゃダメなのか？

tell application "Finder"
delete file "HD:Users:xxx:Library:Caches:MS Internet Cache:IE Cache.waf"
end tell

超初心者です。こちらで質問して良いのか分からないのですが。。。
例えば
ある時間になったら指定されたテキスト書類のテキストを選択、コピーして
ブラウザで指定されたURLを開き、指定されたテキストエリアにペーストして掲示板に投稿、
みたいなことはAppleScriptで可能でしょうか？

>指定されたテキストエリアにペーストして掲示板に投稿
の部分ができるか分からなくて。。。

よろしくお願いします。

>>534
多分「書き込み」とかのボタンをおすのが、出来ない気がする。それにそもそもそういう荒し
もしくは広告貼り付けと思われる行為に加担できないな。

>>535さん
ありがとうございます。
やっぱりブラウザのボタンを押す、みたいなことはできないのですね。
できましたらどういった言語が適しているとか教えて頂けると幸いです。

それから、私があげた例はまずかったですね。
そのようにとられても仕方ありません。。。
ですがこれは分かりやすい例としてあげただけで本当にやりたいことは
似たような別のことだと弁明させてください。

>>356
俺なら、PerlでLWP使って直接postするスクリプト書くなぁ。
それをatやcronで実行させりゃいい。まあ他の言語でもいけると思う。勉強しろ。

いくら言っても初めの質問が質問だけに回答は控えます。ご自分でどうぞ。

>>537
いまどき外部からの直接postに反応する弱々しい掲示板ってあるんですかね…まあ初心者な人が
不用意に立てた掲示板ならありそうだけど、有名どころはどこも対策してる気がします。

>>537さん
ありがとうございます。Perl,LWPについて勉強してみようと思います。

>>538さん
申し訳ありませんでした。不適切な発言だったと反省しております。

>>539
refererやcookieくらいなら同じように送ればある程度は…（やったことないのでわからんが

まあ、掲示板じゃなく「似たような別のこと」をする方法として書いたつもりなので。

AppleScript に関する質問です。
display dialog で表示されるウィンドウは
サイズが変えられるんでしょうか？

>>542
いいえ
だがOSXならXCodeを使えば好きなだけ好きな形のウインドウを作れます

それは「できないけど、自分で一からアプリを書けば可能」という無意味回答ですか。

>>544
XCodeには　Applescript Studio　が含まれていて
REALBasicみたいにウインドウを作ってそこにAppleScriptを
書けるのを知らないような人はこのスレを見ないでもらえますか。

>544
XcodeでAppleScript Studioする手もあるよ、ってことでしょ。
どこが無意味なのか理解に苦しむ。むしろ無意味突っかかり。

あとはdialog director OSAX使うとか。

ｹｺｰﾝしちゃった、ｽﾏｿ

>>543
なるほど。
ありがとうございます。
別の手段を考えてみます。

>>544
できないことがわかっただけでも、
無意味ではないですよ。

>>548
書き込む前に一度リロードする癖をつけるようにね

ｽﾏﾇ。Xcodeは毎日使ってるが、それゆえ逆にASStudioは存在自体忘れてた。

あのう、ここ見てて思い付いたけど
Xcodeわかりやすく書いてあるサイトとかありません？
ここで聞いても良いけど、まず初めてなもんで。

新参者です。よろしくお願いします。
Desktop上のHDのアイコンを移動するスクリプトを作りたいのですが、Give-Up寸前です。
OS X 以降のDesktopを理解してないからだと思うのですが・・
OS10.3以降、期待する順番にHDをマウントしてくれないのです。
ヒント、きっかけでも結構です。どうかご教示ください。

>>551
XCodeの操作自体は、各言語を理解していないとまったく理解できない。
もし言語の習得がまったくされていないなら、まずは書籍を買うこと。
AppleScript Studioについては、詳しい本が出てる。
なお、初心者向けに詳しく日本語で書かれたサイトはみたことないなあ。

>>552
マウントの順番のことなのか、単純にアイコンの位置関係のことなのか、はっきりしてくれ

>>554
言葉が足りなくて申し訳有りませんでした。
操作したいのはアイコンの位置です。
内蔵のATAに繋いだHDのパーティション部分より、増設のATAカードのHDの方が上に来てしまいます。
この原因はパーティション部分より先に、増設のATAカードのHDの方がマウントされるからだと想像しました。
この説明が混乱させてしまったようです。すみません。
何卒宜しくお願いいたします。

>>555
http://homepage1.nifty.com/ton_b/AppleScript/Finder/Command/move.html
ここの下の方のRAMディスクのアイコンを動かすやつと同じ方法では駄目なのか？

www.airmac.org/isight/respond_history.html

これも本当にAS??
どうやっているんですか？
私びっくり。

>>556
さっそくのアドバイスありがとうございます。

moveコマンドは、今回の私の目的とは違う用途で使われるコマンドと理解していました。
もう少し研究してみます。

おいおまいら。
漏れはとりあえずなにをすればscriptが書けるでつか。
貧乏人、おしえてください。
金がないからreference買えよっていうのはなしで。。
（あぼーんってなに？）

＞＞559
すみません、喪まいらのまちがいですた

OSXですけど
スクリプトからのOSバージョン取得って出来ますか？
どこかのファイルを調べて‥‥なんていう回りくどい方法でもかまいません。

Darwin のなら uname -r でとれる。

ジャガーならこっち
パンサーならこっち　みたいに振り分けたいんです。

/usr/bin/sw_vers

>>564
へぇ〜、こんなのあったんだ。
10.3.xでは-productVersionオプションが効くけど、10.2.xではダメみたい。
uname -rで<7と>=7で分けるのが一番簡単なのかな?

uname -rで

<7だったら
ここ
>=7だったら
ここ

どのようなスクリプトになるですか。。

tell application "Finder"
do shell script "uname -r"
end tell
else if "7" then＜＜＜＜＜＜＜
処理を分ける部分を教えてください。

do shell script "uname -r"
set vernum to result
if vernum >= 7 then
display dialog "Large"
else
display dialog "Small"
end if

>>567
動きました、勉強になります
thx

set OSversion to do shell script "sw_vers | grep 'ProductVersion:' | awk '{print $2}'"

>>569
なるほど。それならescape使わないから10.2.x/10.3.x両方で使えるね。

よし。じゃぁ、>>568。>>569を使って>>567を書き直して見なさい。

唐揚げ

shell で AppleScript を走らせて、output string を shell に
出力することって可能でしょうか。
GeekToolとAppleScriptを連動させる方法はないものかと・・
もっと具体的にいえば、iTunes の情報をひきだしたいんで、
もし AppleScript 以外に iTunes にコマンドを送る方法が
あればそれでも良いですんですが。

質問ばかりですみません。

>>573
man osascript

>>573
　Perlで出来たような……。

www.oreilly.co.jp/BOOK/mosxhks/contents.htm
28. Perlを使って、iTunesを制御する

　この本は昨日本屋で立ち読みしただけなので、詳しい事は分かりません。
たしかPerlの拡張モジュールを使って制御してたような。

>>575
osascriptでなんとかなります。
試したところGeekToolが日本語が表示できなかったので
http://members.at.infoseek.co.jp/no_no_no/GeekTool/GeekTool.html
のパッチを使いました。作者さん、ありがとう。
Perlのスクリプトは
#!/usr/local/bin/perl
use strict;
use Jcode;
my $message = jcode( "曲名：", "euc" )->utf8;
my $script =<<END_SCRIPT;
tell application "iTunes"
name of current track
end tell
END_SCRIPT
my $curTrachName = `osascript -e '$script'`;
print "$message$curTrachName\n";
こんな感じ。
AppleScriptの返り値の文字コードがutf8で
上のパッチを適用したGeekToolの文字コードもutf8。
Perlをeucで書くなら文字コード変換用にJcodeを
どっかでゲットして入れてください。

AppleScriptを今日使い始めました。
QuickTimeムービーファイル群をドロップすると、
最近の書き出し設定にしたがって別のQuickTimeムービーに
書き出すスクリプトを作りました。
on open FileList
repeat with aFile in FileList
tell application "QuickTime Player"
with timeout of 3600 seconds
activate
open aFile
set newFile to ((aFile as text) & "_mp4.mov")
export movie 1 to file newFile as QuickTime movie using most recent settings
close window 1
end timeout
end tell
end repeat
end open

Q1. hoge.mov に対する保存先のファイル名を hoge.mov_mp4.mov
にしているのですが、これを hoge_mp4.mov にするにはどうしたら
よいでしょうか。
Q2. スクリプト全体に対する添削などありましたらご指摘お願いします。

>>577
Q1: AppleScript's text item delimiters

Panther標準のMailで、「迷惑メールを消去」で消去した
メールだけをサーバから削除するapplescriptは可能なのでしょうか。

>>578
ありがとうございます。こんな感じですかね。
set oldDelim to AppleScript's text item delimiters
set AppleScript's text item delimiters to ".MOV"
set theList to text items of (aFile as string)
set text item delimiters to "_mp4.MOV"
set newFileName to theList as string
set AppleScript's text item delimiters to oldDelim
Perlなら1行でできるものが6行かかるってのはなかなか大変ですが
ドラッグ&ドロップで簡単に動くのは楽しいですね。

>>580
テキスト置換のosax入れておくとなにかと便利
http://www.satimage.fr/software/en/downloads_osaxen.html
http://www.satimage.fr/software/en/dictosaxx.html
のosaxを入れておくと、たぶん
change ".mov$" into "_mp4.mov" in "hoge.mov" with regexp
でＯＫ。

DropPerler
つこーとけ。

スクリプト書いた前スレの371氏
OS Xでの文字化け解消された>>340氏
事後報告で誠に恐縮ですが、「禁煙マラソンカウンター」を
ジオのアカにアップさせてもらっています。
こちらで断りもせず、独断でアップしてしまい申し訳ありません。
ttp://www.geocities.co.jp/SiliconValley-SanJose/8580/
ご確認下さい。また、訂正等ございましたらお知らせ下さい。

漏れはこのカウンターが有ったから禁煙成功しています。
有益なスクリプトをありがとうございます。

mp3 file から 2 秒以上の無音部分を見つけ出し、
その部分で順次分割して書き出して行く様な Script は書けませんか？

具体的に何がしたいかと言うと、
live 365 等の Web Radio で放送されているものを録音したものを、
曲毎に分割書き出し出来たらｲｲﾅｱと思いまして。

やっぱ無理？

大量のPDFファイルからテキストを抜き出して、ファイルに書き出すこスクリプトを
書こうと思ってます。書き出すファイルをdeta.txtとして、複数ファイルをドロップ
またはフォルダをドロップしようとしてます。

on open theList
tell application "Acrobat5.0"
repeat theFile in theList
open file theFile
「テキストを選択してコピー」
end open
end tell
tell application "mi"
open file "HD:User:XXX:Desktop:data.txt"
「ペースト」
「改行」
end open
end tell
end repeat
end open

なんとか自力でこの辺まで考えたんですが、達人様なら2秒なスクリプトですよね、、
助言をお願いします。

お伺いしたいのは、「」の部分と、（ノーアイデアです。ｼｮﾎﾞｰﾝ）
パスの記述等基本的なアルゴリズムです。
repeat,openって、こんな感じですか？

>>584
そもそもそういうソフトがあったような。

>585-586
Acrobat がAppleScriptに対応していないので無理。

>>588さん
がびーーん。そうなんですか。素早いレスありがとうございました。
acrobatスクリプトエディタに放り込んだら、用語解説みたいなのが
出てきたので出来ると思いました。

サンクス。

>589
あ、そなん？俺はReaderだから…
本家Acrobatはできるのかな？
どれくらい用語があった？　open,quit,run,printだけだとムリだが。

>>584
これのことかい？

Muscut
ＭＤ・ラジオなどから録音した音声ファイルの無音部分（曲間）を検知して、曲ごとに分割するアプリケーションです。手動による分割にも対応しています。　(無料)

>>585
それぐらいならGUI Scriptingでいけそうだよ

>>590さん、こんな感じです。

Core suite
close/count/delete/exists/get/make/move/open/quit/save/set/
application/document/window

Acrobat Viewer Suite
bring to front/clear selection/close all docs/create thumbs/delete pages/
delete thumbs/execute/find next note/find text/get info/go backward/
go forward/goto/goto next/goto previous/insert pages/is toolbutton enabled/
maximize/perform/print pages/read page down/read page up/
remove toolbutton/replace pages/scroll/select text/set info/zoom/
PDF Window/page/Plural form/bookmark/Plural form/annotation/Plural form/
Text Annotation/Link Annotation/conversion/Plural form/PostScript Conversion/
EPS Conversion/AVPageView/PDPage/PDBookmark/PDAnnot/PDTextAnnot/
PDLinkAnnot/

miscellaneous standards
do script/menu/menu item/

>>592様
そうなんです！こういうのを探してたんです。ちょこっと出来るやつ。
昔のquickeyとか、keyquencerみたいなの。ありがとうございました。

ちょっと調べたら、、、
10.3以降とあるので、パンサーﾀﾝ買う理由もできたカモ。

>593
けっこうあるんだね。ｽﾏｿ。
Acrobat Viewer Suiteのselect text 命令が使えそうだね。
でもまぁ、GUI Scriptingの方が楽かもしれない。

10.2.xでもSystem Eventsで似たようなことができるはず。

>>587, >591
有り難う。後で詳しく見てみます。

AdobeReaderが駄目ならPreview.appって手はどうよ？

>>585
そもそも著作権保護的な意味合いでテキストにロックかかってるPDFからテキスト抽出はできんかと

ロックかかってないファイル限定なら↓

tell application "System Events"
tell process "Adobe Reader"
click menu item "すべてを選択" of menu "編集" of menu bar item "編集" of menu bar 1
click menu item "コピー" of menu "編集" of menu bar item "編集" of menu bar 1
click menu item "閉じる" of menu "ファイル" of menu bar item "ファイル" of menu bar 1
end tell
end tell

原始的な方法ですな。だけど有効。しかし10.3以降限定。

みなさま、いろいろありがとうございました。
ど素人でも何とかなるのがASのいい所ですね。
perlとは、作法が違うので少し戸惑いましたが、何とか以下で
希望の動作をしてくれました。ﾊﾟﾝｻｰにｳﾌﾟしたくなったッス。
on open theList
repeat with theFile in theList
tell application "System Events"
tell application "Acrobat 5.0"
activate
open theFile
execute menu item 9 of menu 2
execute menu item 5 of menu 2
close document 1
end tell
end tell
tell application "Jedit4"
activate
paste document 1
insert "
" at end of last line of document 1
end tell
end repeat
end open
insertの後は改行を入れたかったのですが、メタキャラクターでなく
まんま「リターン」でないと動きませんでした。

訂正
tell application "System Events"
end tell
は必要ありません。
jeditのファイルはあらかじめ開いておきます。
今回はこれで十分でしたので。

しかし、あの用語解説はもう少し何とかなりませんかねえ、、
一度マスターしてしまえば何のことはないのでしょうけど、
リファレンスが他のスクリプト言語に比べ圧倒的に少ないので
せめて命令毎に例文の一つもあれば劇的に分かりやすくなるんですが。。

今回のようにほんのちょこっとしたことを自動化したいってのが
大概の人のASとの出会いでしょうから、、

これがDTPオペレーターとかなら、数時間X時給が浮くわけですよね。
もっとユーザに優しくして欲しいと思いました。

そういうことをしているサードパーティーは居たけど。
AppleScriptでDTP(というかQuark)の支援をするツールをカスタムで作成しますよ。
という企業。

でもあんまり売り上げあがっていたという話は聞かないな。

俺は一生懸命ASでQuarkの自動化スクリプト組んでたら
それなりに効果が出たよ。作業時間の短縮。
でもまぁ、拒否する人もいるのでDTPとは体質的に職人肌なのかも知れない。

でもまぁ、カスタムで作ってそれを商売にするとなるときついかもなぁ
大学時代プログラム畑にいただけの俺でも、1週間でそれなりの物が出来るのだもの。
簡単なので万歳だけど。

変数だとか条件分岐だとかをややこしいことを考えるよりも。
毎月毎月チクチクチクチクとマウスとショートカットキーでQuarkを操作するのがいいや。
って文房具主義の人は根強くいたなぁ。
もう7年ぐらいそんな状況じゃない?

>>218だった者です。このスレを見失っておりますた。
ジャガーにて、AppleScriptの付属サンプル『add - new item alert.scpt』に
指定のサウンドファイルを鳴らす様に書き加えたところ、
LAN内のファイル共有のみサウンドが鳴らない、という事を書きました。

パンサーで治ってますた。>>219も当時レスサンクス。

AppleScript自分自身の場所を知るのは path to current application ですよね。
AppleScript自分自身が入っているフォルダを知る方法はないでしょうか？
スクリプトと細かなプログラムをいくつか入れたフォルダを作って、プログラム
をターミナルで動かすのにGUIを使えるようにしようとしているのですが、
set theAPPpathold to path to current application
set theAPPpath to POSIX path of theAPPpathold
tell application "Terminal"
do script "cd " & theAPPpath
end tell
とやると、ファイル名なので、ターミナルにフォルダじゃないと怒られます。
文字列を右側から削って行く方法でもけっこうですが、、。

>>608
do script "cd " & "`dirname " & (quoted form of theAPPpath) & "`"

>>609
できました。本当にありがとう。本当に助かりました。

既出かもしれないけど、今売りのMacPeopleでOS X（パンサー？）でのPerlの活用がちょこっと載ってますね。

★

>>611
まじでちょこっとしか載ってない。

特定のアプリが起動しているかどうかって、次のハンドラで分かりますよね？

on RunningProcess(theCreator)
tell application "Finder"
return (every process whose creator type = theCreator) ≠ {}
end tell
end RunningProcess

で、iTunesが起動しているかどうかを知りたいんですが、iTunesのクリエータ
コードがどうしても分かりません。或は、根本的に勘違いしてるんでしょうか…。

>>614
info.plistを覗いて、hookを得る。

>>615
info.plistまでは見たんですが、hookがクリエータコードとは
気付きませぬですた。有り難うございました。

iTunesで再生している曲を早送りするAppleScriptを書きたいのです。

iTunesみたいに（＞＞）のボタンを一回押すと次の曲、１秒ぐらい押し続けると早送りされるようにするにはどうすれば良いですかね？
次の曲にするのは出来たが、早送りするScriptが分からなくて困ってます。

tell application "iTunes"
next track
end tell

こんなのとかは?
tell application "iTunes"
fast forward
delay 3
resume
end tell

THANK YOU！

>>62
かぶったw

>>63
OSXはこちらの方がよいかと
「AppleScript,Perl,Shell」OS Xでスクリプトｽﾚ
http://pc.2ch.net/test/read.cgi/mac/1055091471/l10

たぶんターミナルでサクッと出来ると思うよ

誤爆しますた

止まってるようなので質問させてください。
Finderの他を隠すというのをASで作りたいのですが
コマンド+オプション+Hというキーコードがわかりません；；
もしわかる方おられましたら教えてください。
初心者的質問でｽﾏｿ

on reopen
tell application "System Events"
tell process "Finder"
key code (コマンド+オプション+H)ここがわからない
end tell
end tell
end reopen

on reopen
tell application "System Events"
tell process "Finder"
key code command & option & H　エッチが出ないわね
end tell
end tell
end reopen

>>622
モディファイアキーの記述方法はアップルのサイトの例を見れば書いて有るんだがなあ

ユーザーインターフェースを模擬するスクリプトは信頼性が無い。
tell application "Finder"
　activate
　set visible of processes whose name is not "Finder" to false
end tell

お見事!!!

>>624
なるほど。こっちの方が反応いいね。

これイイね。
http://www.macosxhints.com/article.php?story=20040204170653788

>>628
シンプルで高速でイイですね。
同じ機能を長いスクリプトで作っていたのでめちゃくちゃ役に立ちました。
情報サンクスです。

スタイル付きテキストが無いとエラーがでるようなので自分が使うスクリプトは
try
end try
で囲んでおきました。

保守

ここでは、
AppleScript の作成依頼をしても良いんでしょうか？

>>631
ご予算はいかほどで?

>>632
500 ﾍﾟﾘｶ くらい（ｗ

500 ﾍﾟﾘｶ しか無いんスけど・・・

任意の ﾌｫﾙﾀﾞ を指定。
その ﾌｫﾙﾀﾞ 内にある *.mov と *.aiff を QuickTime Player で開く。
*.mov の方を、全てを選択→ ｺﾋﾟｰ →閉じる。
*.aiff の方に、拡大・縮小して追加→最近使った設定を用いて MPEG-4 ﾋﾞﾃﾞｵ で書き出し。

という作業をやってくれる Script を書いて貰えませんか？

なんか こんなんは作ってみたんですけど、
ぜんぜん駄目で使いにくい上に、
MPEG-4 ﾋﾞﾃﾞｵ で書き出すところまで持って行けませんで・・・

tell application "QuickTime Player"
launch
activate
open (choose file)
tell movie 1
select all
copy
end tell
close movie 1 saving no
open (choose file)
tell movie 1
add with scaled
end tell
export movie 1 as ？？？ using most recent settings
close movie 1 saving no
end tell

tcl/tk関係ですが此処でお尋ねして良いでしょうか？

TclTkAqua-8.4.5.dmg
TclTkAquaBI-8.4.5.0.dmg
TclTkAquaStandalone-8.4.5.dmg

これらの違いはなんでしょうね？

サイトに説明書いとるがな

>>635
自己レス：ここかな？
http://www.maths.mq.edu.au/~steffen/tcltk/TclTkAqua/

on open FILELIST
repeat with A in FILELIST
目的の処理
end repeat
end open

このような処理をしたいんだけど、
FILELISTの順番を例えば名前順とかにする場合は
どうすればいいのでしょか？
AppleScriptにソート機能ってないですよね。
だぶんsortコマンドと組み合わせればいいのだろうけど…
文字コードの関係がいまいち判りません。

http://sourceforge.jp/projects/age/files/
ここのage2ch.plに含まれるsearch.plを使って
2chに書き込みできる串をサーチできるそうですが、
OSXでも使うことができますか？

readmeに書いてある方法をterminalで試してみましたが、
Can't locate LWP/UserAgent.pm in @INC (@INC contains: /System/Library/Perl/5.8.1/
darwin-thread-multi-2level /System/Library/Perl/5.8.1 /Library/Perl/5.8.1/
darwin-thread-multi-2level /Library/Perl/5.8.1 /Library/Perl /Network/Library/Perl/5.8.1/
darwin-thread-multi-2level /Network/Library/Perl/5.8.1 /Network/Library/Perl .) at search.pl line 4.
と出てダメでした。

?@使えるが、お前が厨房すぎるだけ氏ね
?A使えるわけねーだろ
?Bしょーがねーな、教えてやるよ

?@?A?Bのうち、どれでつか？
?Bのばやい、にな川の背中を蹴るように教えてください。

>>639
LWPってモジュールが入ってないのでしょう
http://www.fuji.sakura.ne.jp/~yada/talk2000/perl.shtml
http://member.nifty.ne.jp/hippo2000/perltips/CPAN.htm
に入れ方が書いてあるので読んでいれてください。

>>640
どうもありがとうございます。
まずlynxのインストールから格闘してみます。
順に追っていき、どうしてもわからないことがあれば
またよろしくお願いします。
よし、はじめるか。

>>639 の次の質問の答え
デベロッパーツール(XCode)を入れなさい

やたー、なんとかlynxもインストール出来て、
その後無事にLWPモジュールもｹﾞﾄできたみたいです。
>>640さん、本当にどうもありがとうございました。
それから、>>642 さんもありがとうございました。
lynxのmakeに必要でした。こんなこともあろうかと、XCodeは入れてました。

おそるおそるsearch.plを走らせてみると、ムフフフフ〜動いてます。
All done.となったので、age2chフォルダの中をFinderで見てみると、
日付&時間が名前のフォルダがちゃんとできてるじゃないですか。
で、その中を見てみると、あれ？空っぽ？
おかしいなと、何回も何回もやってみても、やっぱり空っぽ。
むぅ、、、「error.txt」と「okproxy.txt」の2ファイルができてるはずなのに。
合致する串が無かった場合、何もテキストファイルを作らない仕様なのかな。
search.plを開いてみてもperlが記述されていて私には宇宙語に見えて・・・
（ ´Д⊂ヽ ｳﾜｧｧｧﾝ

自己IPの取得法を教えてくらさい
10.3

自己IPの取得法を教えてくらさい
10.3

>>644
これでいけるんでは？
ifconfig en0 | sed -n -e 's/^.*inet ¥([^ ]*¥).*$/¥1/p'

>>628
英語がわかりずらいっす。翻訳してみてこれじゃ(ry
結局、なにができるんですか？教えてください。

己はどこの240だい・・・？
sage忘れてるし、逝ってきます。

An AppleScript to convert clipboard contents to plain text

iTunes Switcherってちょっと使いにくいし、
環境設定はかえられなくて (((´･ω･`)ｶｯｸﾝ…
さて自作でもしますかぁ。

フォルダアクションをONにするとSystem Eventsが動き出すけど、
これってシステム負荷が妙に大きくないですか？

AppleScript に関する質問なんですが、
ファイルへのパスが複数書かれているテキストファイルを読み込んで、
それをリストとして格納するにはどうすればよいでしょうか？

デリミタを改行に。以上。

iTunesをtellせずにｵｰﾃﾞｨｵCDを再生／停止とか次／前トラックへ
移動とかってのは無理でしょうか？　AppleScriptだけで出来ればと
思ったんですが……。環境はOS Xです。

>>653
tellだけしてactivateしなければ前面に来ない

"こんな","かんじで","いいんじゃ","なぁい"

>>654
いえ、出来ればiTunes自体を起動せずにやりたいのです。
OS 9の時にコントロールバーから操作出来たの便利だったので。

>>656
OS9のころはiTunesが発表された以前の
CDプレーヤーアプリケーションがあったからねえ
みかけ上アプリを起動してないようにみえるけど
裏では…。
　
OSXではCDプレーヤに特化したアプリは見たことないけど。
そもそもCD再生ってそんなにCPUパワー喰うかね。

>>657
CPUパワー云々というより、「CDセット→再生」という手順を
シンプル且つ迅速に行えるのが好きだったので。ｳﾜｧｧﾝ!＞裏

確かにiTunesを常時起動しておけば特に問題ないんですけどね。
実際してるわけで……iTunesで頑張ります。レスサンクスでした。

つか、プレビューとかで再生できないもんですかね？>CD

>>659
プレビューってあの画像表示の？

>>660
推測するに、finderでカラム表示にしてファイルを選択すると、
ファイル情報が表示されますよね。
QuickTimeが読めるファイルは単純なプレーヤーがされませんでしたっけ？
そのことを言っているのではないかと思

>>658
メニューバー系とかｺﾝﾌｧﾌﾞ系とかのコントローラーじゃダメなの？

>>661　
そっちね。コマンド＋iでも同じ事だね。

>>652
遅くなりましたが、出来ました、
有り難う御座いました。

>>662
ｺﾝﾌｧﾌﾞは使ってないんですが、メニューバーならOKかと。
AppleScript単独で.aiffファイルを再生出来れば何とか……。
と考えていますが、はてさて。

むりぽ。

……いや本当iTunes常時起動で頑張ろうかと。
常時起動さえしていれば結構手はあるわけで。
Another Launcherでボリュームを表示してみる。
プルダウンして選択すれば再生されるわけです。
再生／停止及び前後の移動はスマートアイテム。

こうなったら起動項目に放り込んだろか＞iTunes

Script Editor v 2.0 では、
Option + Return で改行てのは、
使えないんでしょうか？

>>667
えっと、その質問が多そうなので答えとくね。
Option + Returnで改行しなくても、windowのサイズに合わせて
自動で改行してくれるようになったのよ。
実際のscript的にはOpton + Returnと同じで改行してないよ。

古いスクリプトを開きなおして、ｯを全て削除すれば良いよ。

>>668
有り難う御座いました。最近 AppleScript を使い始めたもので、
知りませんでした。しかし、自分でも改行できる方が
便利だと思うんだけどなあ。



ところで、

　set a to {"1", "2", "3"}
　count text item of a

と書いても、

　set a to {"1", "2", "3"}
　count text items of a（※ item " s " ）

と書いても結果が同じなんスけど・・・
文法的にはどっちでも良いんでしょうか？

>>669
可。

>>669
ASはしょせん英語のふりをしているだけなので
英語的に正しいかどうかはあんまり考えなくて良い

>>670-671
有り難う御座いました。

なんかStuffItのパスワード解読するスクリプトだってさ。
http://www.oomori.com/page/chotto/0000211.html

ﾌﾞﾙｰﾄﾌｫｰｽ か・・・

日本語だったらダメじゃんｗ

かな？

たまにはいんでないの

何年かかるやら。

set AppleScript's text item delimiters to return

この書き方だと、Perl Script が書き出した file の改行部分を認識していない様なので、

set AppleScript's text item delimiters to {"\n"}

と書きました。Script Editor で ｺﾝﾊﾟｲﾙ すると、

set AppleScript's text item delimiters to {"
"}

となってしまいますが、一応、問題なく動いては居ます。
動いてはいるんですが、なんか気持ち悪いんですよ。
こんな書き方で本当に良いんでしょうか？

済みません、阿呆でした。

set AppleScript's text item delimiters to return

ではなく

set AppleScript's text item delimiters to {return}

と書くべきだったんスね。

うーん、やっぱり駄目だ。
>>780 を書いて直ぐ、コレでも駄目だと分かって、
その後いろいろと試してみましたが、やっぱ駄目でした。

もうここは、

set AppleScript's text item delimiters to {"
"}

で行くしかないか。なんか変な感じですけど。

文字コードで指定してやることで解決しました。
スレ汚し申し訳なし。

つうか、returnとかescとかを文字コードで指定するのって、基本だから。

ふふっ

アップルスクリプトは高級言語であるべきでつ

禁煙マラソンカウンターなんですが、

”禁煙時間”の上に”禁煙開始日時”を入れるにはどうすれば良いのでしょうか？
構文は↓です。（OSX用）
http://www.geocities.co.jp/SiliconValley-SanJose/8580/counter_txt/sc_x.html

>>686
眠いので適当だけど。

display dialog App_Name & Dialog_0
　↓
display dialog App_Name & "禁煙開始日時 " & (Bigin_Date as text) & return & Dialog_0

とかでいけるのでは。

うわ……

○Dialog_1
×Dialog_0

>>688
ダメみたいよ。

通りすがりだが、その書き方は何だ！教えを乞う態度じゃねぇな。てめえでやっとけ！

>>687,688,690
何かすいません。>>583です。

>>686
これで逝けません？駄目だったらｽﾏｿ。

to Current_No_Smoking()
tell application "Finder"
set K_Seconds to (current date) - Bigin_Date
set ret to my Make_ymdhm(K_Seconds)
set Dialog_5 to "禁煙開始日時 " & Bigin_Date
set Dialog_1 to "禁煙時間 " & Y of ret & "年 " & mo of ret & "月 " & d of ret & "日 " & h of ret & "時間" & mi of ret & "分"
set Dialog_2 to "吸わなかったタバコ " & K_Seconds div (86400 / Cigarette_Day) & "本"
set Dialog_3 to "浮いたタバコ代 " & (round (K_Seconds div (86400 / Cigarette_Day)) * 12.5) & "円"
set ret2 to my Make_ymdhm(K_Seconds div (86400 / Cigarette_Day) * 330)
set Dialog_4 to "延びた寿命　 " & d of ret2 & "日 " & h of ret2 & "時間" & mi of ret2 & "分"
set Result_1 to button returned of (display dialog App_Name & Dialog_5 & return & Dialog_1 & return & Dialog_2 & return & Dialog_3 & return & Dialog_4 ﾂ
buttons {"禁煙失敗", "OK"} default button 2 with icon 1)
if Result_1 = "禁煙失敗" then
set Delete_Data to button returned of (display dialog App_Name & "禁煙に失敗しましたか？" & return & ﾂ
"残念ですが、今までのデータを消去します。" buttons {"消去しない", "消去する"} default button 1 with icon 1)
if Delete_Data = "消去する" then
set Bigin_Date to ""
set Cigarette_Day to ""
set Cigarette_Price to ""
end if
else
set the clipboard to Dialog_5 & return & Dialog_1 & return & Dialog_2 & return & Dialog_3 & return & Dialog_4
end if
end tell
end Current_No_Smoking

連書きすいません。
>>687,688でちゃんと表示されてますよ。>>686
なので>>691は無駄に長いから無効でm(_ _)m

ありゃりゃ。自分とこでも一応試してから書き込んだんだけど。
>>689
環境はどんな感じですか？　うちは10.3.2＋ScriptEditor2.0(v43)です。
一旦保存したものを再編集するとエラーが出るので（改行コード絡みっぽい？）、
リンク先のスクリプトをScriptEditorにコピペ→>>687→アプレットとして保存、
で行けませんか？

>>687
すんません。生意気なこと言って…。
いけてました。クリップボードへのコピーが>>691さんので
できるのでとりあえず>>691さんのを使わせて頂きます。

ご両人ありがとうございます。

別件なんですが、禁煙マラソンカウンターの"浮いたタバコ代 "の計算て
下を見るとどんな金額で打っても一本12.5円（一箱250円）になりません？
とりあえず、今270円のを吸ってるので13.5に書き換えて試してますが、
一箱いくらのタバコを吸ってますか？の質問て意味在るのでしょうか？

set Dialog_3 to "浮いたタバコ代 " & (round (K_Seconds div (86400 / Cigarette_Day)) * 12.5) & "円"

だめじゃん

>>694
なんか今更恥ずかしいので出にくいけど・・・
ゴメン、なんでそんなことになってるんだろ？
作ってる過程で自分が1箱250円のタバコ吸ってたもんだから
混同してｸﾞﾁｬｸﾞﾁｬになってたんだろな。
ちょっと当時を思い出して解読して直してみまつ。

ちなみに、オイラは禁煙成功してるのでひさしぶりに起動してみました。

禁煙時間 1年 8月 11日 1時間3分
吸わなかったタバコ 12320本
浮いたタバコ代 154000円
延びた寿命 17日 1時間20分

>>694
ありがとうございます。指摘されるまで全く気付いてませんでした！
すげーびっくりしたw
ダイアログ3を下記に修正ですね。
set Dialog_3 to "浮いたタバコ代 " & (round (K_Seconds div (86400 / Cigarette_Day)) * Cigarette_Price / 20) & "円"
HPのカウンター、修正しておきます。

>>694
もしや作者さんですか？
勝手ながらHPにアップさせてもらっています。自分もこのカウンターが
禁煙の励みになっています。ありがとうございます！

>>696
今更ですが、よろしくです。

ところで上のスクリプトで禁煙開始日時を表示すると
下の様にダイアログウインドウが小さいせいか変な所で
改行したみたいになるのはウインドウの大きさを指定し直せば
直りますか？簡単ならやり方教えて下さい。

禁煙開始日時 2004年 2月 26日 木曜日 5:
11:19 PM
禁煙時間 0年 0月 0日 1時間2分
吸わなかったタバコ 1本
浮いたタバコ代 14円
延びた寿命　 0日 0時間5分

すいません。アンカー間違えました。
×>>694
　もしや作者さんですか？
○>>696
　もしや作者さんですか？

連書きばっかりで吸いません。
>>698
申し訳ない。自分の知識ではもういっぱいいっぱいです。

わかる方いらっしゃったらご教授おねがい致します。

>>697
作者なんて大それたﾓﾝじゃないすよ。
AppleScriptリファレンスと睨めっこして格闘した末のモノすよ。
>Cigarette_Price / 20で良いすね。

サイトを拝見させていただきました。
すごくよく纏めてらっしゃる。
禁煙スレのテンプレとか、過去ログとかも。
こちらこそ頭が下がりますよ。
前スレに貼ったのは晒したいのと、先輩からの指摘が欲しいのを兼ねていたので
貼ったスクリプトに対して勝手にとかどうとか言うつもりはないので
存分にやってください。恥ずかしい出来だけど・・・。

>>698
ウインドウの大きさを変えるのは無理だと思うので、
Bigin_Dateをas textした後、曜日から後ろを削っちゃうとか。
年月日だけ表示するのはまずいですか？

>>700
いえいえ、いろいろありがとうございます。
実は本格的に禁煙を決意したので少しでも励みになるように頑張ります。

よく考えると、ウインドウの大きさを変えるのは無理でもないです。
ボタンを横長にすれば、ウインドウも多少大きくなる。
だから、"禁煙失敗" と "OK"にスペースなどを足して、
{"　　　　禁煙失敗　　　　","　　　　　OK　　　　　"}
みたいにして、開始日が1行で表示されるまでスペースを足してみるとか。
不細工になるかもしれませんが・・・
当然、その後に続くif Result_1 =のところも同じ名称にしなくてはなりません。
厨房なので、ボタン名で指定してますので。

>>703
う〜ん、いくらか見やすいです。
これで逝きます。ありがとうございます。

度々で吸いません。

”延びた寿命”なんですが、30日以降0に戻ってしまうのは仕様ですか？
試しに一日に吸う本数を1000000本とかにしてみるとそうなります。

>>687
ちょいとHPを拝見しましたが、アプレットのver.アップ毎にシステムの時計を戻すのもなぁ
……と思ったのでお節介を。

set Bigin_Date to current date
　　↓
set num to text returned of (display dialog App_Name & "何日前から禁煙を始めましたか？ (※半角数字で)" default answer 0)
set Bigin_Date to (current date) - num * days

という感じにされてはいかがでしょうか。簡易的なものなので時間までは指定できませんが。

うわぁ……またやっちまった。

○>>686
×>>687

>>705
バグ出しTHXです。これにも気付きませんでした。
うpしておいてチェックしないなんて、自分は
イイ加減過ぎますね。反省しています。

1ヶ月が30日でいて、1年が365日となってるので、
多少計算が合いませんが(;´Д`)下記に修正で
逝けますでしょうか。

set Dialog_4 to "延びた寿命　 " & (Y of ret2) * 365 + (mo of ret2) * 30 + d of ret2 & "日 " & h of ret2 & "時間" & mi of ret2 & "分"


>>706
あっ。改良ありがとうございます。早速組み込んでみます。

# まぁ、リアル厨房も見てるかも知れないので...

begin

と言ってみるテスト...。(w

>>706
微調整してまとめました。
こんな感じで逝けてますでしょうか。

property App_Name : "■■■ 禁煙マラソンカウンター ■■■" & return & return & return
property Bigin_Date : ""
property Cigarette_Day : ""
property Cigarette_Price : ""

on run
if Bigin_Date = "" then
my Bigin_No_Smoking()
else
my Current_No_Smoking()
end if
end run

>>706
連投引っかかるので下記にあげました。
確認して頂けると助かります。
ttp://www.geocities.co.jp/SiliconValley-SanJose/8580/co.txt

>>709
おいこそがリアル厨房なので、何も判りませんです(;´Д`)

>>711
なんと！わいね！！！
たばこ吸うなよ。(w

>>712
誤謬ありました。自分、中学生ではありません。
中学生のようなモンだと言いたかったのです。

んで、今気付きました。
×Bigin
○Begin

やばっ。知恵熱出たカモ。逝ってきまつ。

禁煙マラソンカウンターですが、たばこ板でこんなのを見つけました。

開始日時 2004年 2月 9日 9時 0分
経過時間 13日 14時間 42分経過
吸わなかった煙草 340本
浮いた煙草代 5100円
（原価 2454円 たばこ税+消費税 2646円）
延びた寿命 1日 4時間 20分

どなたか、”原価＆たばこ税+消費税”をプラスできる方いませんか？
税率は以下の通りです。

http://www.jti.co.jp/JTI/tobaccozei/

さして意味があるとも思えんが

禁断症状か？ｗ

事後報告ですが、>>583にうpデータンあげさせて頂きました。

>>687,696
自分はスクリプトを一から書けない厨です。出来上がってる
モノをちくちく弄くるぐらいしか脳がナイので、また何か
ありましたら今回の様に是非お力をお貸し下さい。
どうもでした。

>>714
もーいっぱいいっぱいです。すんません。
イイ感じに改良できましたら発表おながいします。
(σﾟДﾟ)σコピペして盗みますのでw

>>714
それ、おかしいな。
その貼ってる人のは、2646/5100(円)だから
総税率0.518823529412・・・の計算してるはずだけど、
リンク先の総税率は0.632になってます。

他もいろいろ検索してみたけど、結構誤差があるみたい。
また、地方たばこ税が絡んでくるから、正確にやろうとすると、
最初の質問ダイアログが「あなたのお住まいの地域は？」になるよ（w
それは無理としても、簡単な総税率をかけて計算するだけなら簡単にできると思うよ。

>>718
あ、それで良いです。
原価は無しで総税額（タバコ税＋消費税）0.632のみで是非ともお願いします。
例えばこんな感じで↓

開始日時 -----年 -月 -日 -時 -分
経過時間 --日 --時間 --分経過
吸わなかった煙草 ----本
浮いた煙草代 ------円
(税額 -----円)
延びた寿命 1日 4時間 20分

すいません、やっぱり原価もあった方が分かりやすいかもしれません。

開始日時 -----年 -月 -日 -時 -分
経過時間 --日 --時間 --分経過
吸わなかった煙草 ----本
浮いた煙草代 ------円
(内訳：原価 ----円　税額 -----円)
延びた寿命 1日 4時間 20分

税率が63.2％でよいなら，「set Dialog_3 to」の次の行に
set Dialog_6 to "(内訳：原価 " & (round (K_Seconds div (86400 / Cigarette_Day)) * Cigarette_Price / 20) * 0.368 & "円　" & "税額" & (round (K_Seconds div (86400 / Cigarette_Day)) * Cigarette_Price / 20) * 0.632 & "円)" & return
を挿入して，
set Result_1 to button returned of (display dialog〜〜
のところを
set Result_1 to button returned of (display dialog App_Name & Dialog_5 & return & Dialog_2 & return & Dialog_3 & return & Dialog_6 & return & Dialog_4 buttons {"禁煙失敗", "クリップ"} default button 2 with icon 1)
にすればできると思いますよ。

>>721
おぉー、ありがとうございます。
さっそく、加えて使わさせて頂きます。

一万円を超えると↓な感じになるのは仕方ないのでしょうか？
( 内訳 : 原価 1.1302016E+4円　税額 1.9409984E+4円 )

ああ、もうッ！

set Dialog_6 to〜〜，の部分を

set Dialog_6 to "(内訳：原価 " & ((((round (K_Seconds div (86400 / Cigarette_Day)) * Cigarette_Price / 20) * 0.368) as integer) as text)
& "円　"& "税額" & ((((round (K_Seconds div (86400 / Cigarette_Day)) * Cigarette_Price / 20) * 0.632) as integer) as text) & "円" & return

改行されている部分はつないでください。
にしてみてください。もっと単純な書き方できそうだけど。

あっ，as textはいらないです。

set Dialog_6 to "(内訳：原価 " & ((((round (K_Seconds div (86400 / Cigarette_Day)) * Cigarette_Price / 20) * 0.368) as integer)) &
"円　" & "税額" & ((((round (K_Seconds div (86400 / Cigarette_Day)) * Cigarette_Price / 20) * 0.632) as integer)) & "円" & return

ちょっと酔っぱらいなので，ごめんなさい。

>>725
さすがです。！
禁煙がんばります。
ありがとうございました。

なんかいつからか解らないけど、スクリプトメニューからの実行だと、
propertyでスクリプト属性の値を保持しないようになってないですか？
スクリプトエディタ上だと保持するんだけど、スクリプトとして保存して、
スクリプトメニューから実行するとダメ。

あと、≧と≦がコンパイル時にエラーになる。
>=か<=と書いてコンパイルすると、コンパイル後に≧≦と自動変換してくれるが、
それ以降はエラーが出る。
たぶん>>693の再編集でエラーの件はこれではないかと。

(*
Mac OS X 10.3.2(7D24)
スクリプトエディタ2.0(v43)
AppleScript 1.9.3
*)

あれ？と思ったらやっぱりAirMacスレに誤爆ってた。

開始日時に関しては、作成当初に過去開始も可能にするかどうか迷って、
自分の為だったので初回起動時が禁煙開始時にしました。
やはり過去開始補正はあったほうが良いですね。
で、>>706さんのでもう解決しちゃってるけど、
おいら流の、正確に入力するまでrpeatし続けちゃうぞ攻撃だと、こんな感じですか。
曜日ついては、自動補正するようです。

repeat
set When_Begin to text returned of (display dialog App_Name & "【Q1】" & return & "いつから禁煙を始めましたか？"
& return & "禁煙を開始した日時に変更してください。" & return & "存在しない日付や未来は入力できません。"
& return & "曜日は自動的に補正します。" default answer Begin_Date as text buttons {"OK"} default button 1 with icon 1)
try
set Check_Date to date When_Begin
if Begin_Date - Check_Date >= 0 then
set Begin_Date to Check_Date
exit repeat
end if
end try
end repeat

#いやはや"Bigin"には参った。美人のつもりですよ？って無理あるか・・・

>>714
重箱の隅をつつくようでアレなんだけど、「原価」じゃなく、せめて「定価」にした方が……。

禁煙って大変ですね

定価はたばこ税も含めた値段だろ。

というか税金を別に考えるのは何か意味があるわけ？
「こんなに国に払っちまった」とか？

あの〜、ちょっとお伺いしますけど……
画像ファイルの入ったフォルダーをアプレットにドラックアンドドロップして
プレビュー（マクOS純正ビューワーの）でスライドショーを再生ってことは可能でしょうか？

プレビューでスライドショーできたらイイな〜と思ってるんですけど………
OSはパンサーでつ

可能でしょ。

>>733
ほんとでっか？　作ってくらはい。おながいします。

阿呆か。自分でやれ。

出来たら聞いてないす。おながいしますよ。

プレビューはスクリプタブルぢゃないような。
パンサー標準で入っててスクリプトか考えなくても
普通にスライドショーもできるiPhotoはダメですか。
そうですか。

>>737
やっぱりプレビューでスクリプトは無理すか。
iphotoも読み込みしてからじゃないと無理っぽいんですけど……。
というか、今はグラコンでスクリプトにフォルダーをドラッグアンドドロップでスライドショーしてる
んですけど、グラコンから脱出したくて、というかなんとなくお気に入りになってしまったプレビュー
だけで済ませたいといか……　そんな意図で>>732の質問になりました。
アップル純正だけになんでも出来そうな気がしたんですけど……
仕方ないのであきらめます。ありがとうでつた。

>>738
パソコンはなんでもできる魔法の箱ではない。

そんな大層な話でもない

つうかここはスクリプトの作り方を相談するスレであって、
制作依頼をするスレでわないよ

そんにゃやつはっとととSwiftいけや

上に製作依頼して作ってもらってる人がいるね。
ダブルスタンダード?

そんな厳密に考えんでもいいと思うけど、ここが制作依頼スレじゃないのは確か。
流れだのその時いる住人の性格だのでさくっと作ってくれることもあるけど本来
スレ違いなので依頼しない方が好ましい。
するにしても>>732の態度はひど過ぎ。自分でできるところまでやった上で壁に
ぶつかったんなら住人も好意的に反応してくれると思われ。
自治厨ｽﾏｿ。

MOSA、超初心者向けプログラミングセミナーを開催
http://www.itmedia.co.jp/pcupdate/articles/0403/01/news021.html
http://www.mosa.gr.jp/topics/beginner3.html
3月22日（月）18：30〜22：00だけど。
事務局の女性は笑顔の美人でいい感じです。参加の価値あります。

>>745
ふーん、おもしろそうだけど都内じゃカッペには参加は無理。

>1. プログラミング未経験者
>2. Macのプログラミングに興味のある方
>3. Mac OS Xの基本的な操作が分かる方
>4. Macを愛している方
>※4以外は必須条件です。

>- プログラミングの予備知識は一切不要です。
>- プログラムってどうやって作るの？自分でアプリケーションを作りたい！
>といった興味だけを持ってご参加ください。
>- AppleScriptのテクニックを磨きたいという方には退屈な内容です。
>- AppleScriptの手軽さ、楽しさを実感できます。

だってさ。
オブジェクト指向の考え方をAppleScriptで簡単に勉強するのかな。
ここの住人の方々には退屈かもね。

>笑顔の美人
・・・・

>>746
4のMacへの愛も問題あるよなぁ。MacとMac OSには愛があるが、取り巻くコミュニティーには嫌悪感を持ってる場合どうすればいいのだろうか（w

スレ占領してすいません。>>583です。

>>728 亀レスすいません&改良ありがとうございます。

ただ、当方の環境(OSＸ.2.4 + Script Editor 1.9 + mi 2.1.3)では
正常に働かないようです。
tell application "Finder" しなければ動くのですが、OSＸだと
以前出た問題と同じく文字化けが発生します。
んで、Finderを通すとなぜかBegin_Date as textが表示されず、
自分で打ち込んでもcurrent dateが修正されていないっぽいです。
Finderを通さずに文字化けが直せるならいいのですが。
これって自分の環境の問題なのでしょうか。何か解決する方法って
ありますでしょうか。

下記にテキスト形式で置いておきますので、ご確認頂けたら嬉しです。
（Shift Jis / MacRomanです）

ttp://www.geocities.co.jp/SiliconValley-SanJose/8580/K13.txt

全然関係ないが、「OSＸ.2.4」って珍しい表記の仕方だな。
普通「OS X 10.2.4」って書かないか？

>>628
>>629

#! /bin/sh
pbpaste | pbcopy

jpegファイルが入ってるディレクトリで実行すると，HTMLで写真の一覧ページと詳細ページを作るスクリプトを作りました．
スクリプトを実行する時に適当に引数をつけることで，ページのタイトルとか一覧の行列数とかをコントロールできるようにしました．

引数からタイトルを設定する時に，ターミナルの言語がEUC以外のではスクリプトに正しく日本語のタイトルを渡せません．
ターミナルがShift-JISとかUTF-8の時に，正しくスクリプトに日本語を渡す方法ってありますか？

いや，おいら普段EUCで使ってるから問題ないって言ったら問題ないんだけどね．

はぁ

ひぃ

ふぅ

1024x768の解像度画面で、以下のようなスクリプトを実行しています。
ただ単にターミナル画面を３つ整列させているだけなのですが、
　activate文をいれるとcommand+1,2,3の順番が狂う、
などの問題が発生し、対処法がわかりません。
他のやり方等も含めてアドバイスをお願いします。

tell application "Terminal"
do script ""
do script ""
tell window 1
set number of columns to 80
set number of rows to 24
set position to {503, 386}
end tell
tell window 2
set number of columns to 80
set number of rows to 24
set position to {503, 22}
end tell
tell window 3
set position to {0, 22}
set number of columns to 80
set number of rows to 40
end tell
end tell

＞activate文をいれるとcommand+1,2,3の順番が狂う、
　
よくわかんねえけど
activateは本当に前面にでてほしいタイミングでしか使わないってのは

こんにちは。質問です。よろしくお願いします。

Mac OS X 10.2.8で久しぶりに自作のAppleScriptを動かそうとしたらエラー。
Mac OS 9.2では問題なく動いているスクリプト。
気のせいでなければ以前はMac OS Xでも動かしていたような？

ものは、決まった場所に任意の名前のフォルダを作るという簡単なもの。

例えば
tell application "Finder"
make new folder at disk "Macintosh_HD" with properties {name:"abcde"}
end tell
としても"名称未設定フォルダ"ができるだけ。

そこで
set name of folder "名称未設定フォルダ" of disk "Macintosh_HD" to "abcde"
としても駄目。

これはどうしたらいいんでしょうか。
すいませんが、教えて下さい。

tell application "Finder"
activate
end tell
すらちゃんと動作しないのはいかがなものか。(-_-;

お騒がせしました。
しばらくぶりにOS Xを起動して、ソフトウェアアップデートをかけてから再起動していないのが原因でした。
with propertiesでうまくいきました。activateも問題なし。

>>749
遅レスｽﾏｿ

１、文字化け問題
アプリケーションとして保存した時の文字化けを防ぐには、
「アプリケーション」で保存せずに、「アプリケーションバンドル」で保存します。
その保存したものは、Ctr+クリックでパッケージを開けますので、
Resourcesフォルダの中に空のJapanese.lprojを作ってあげれば文字化けしなくなります。
あ、583さんってScript Editor 1.9ですね。
「アプリケーションバンドル」で保存できなかったっけ？

２、曜日について
曜日を消さないとはじかれますか？
うちでは自動的に補正してるようです。
おそらくこれもOSかAppleScriptのバージョン違いが原因なのかな。

ttp://itools.jp

>>750
(´･ω･`)…

>>760
回答ﾚｽありがとうございます。
> アプリケーションバンドル
1.9には無いようです。残念。
2.0bをあちこち探して、最後はLimeまで導入して探して
みましたが、やっぱり手に入りませんでした。
素直にﾊﾟﾝｻ使え。って言われそう。

曜日の自動補正はウチの環境では効きませんでした。
これもエディタのせいかもしれません。OS9で起動して
チェックしてみた時も同様に自動補正できませんでした。

なので、禁煙スレで「日付け設定がﾏﾝﾄﾞｸｾ」と要望が
あがるようなら改めて使わせて頂きます。

あぁ、なんか不甲斐なくってすいません。

>>762
ttp://www.apple.com/support/downloads/applescripteditor.html

あと言語環境の違いとかは確認済み？

DVDのVIDEO_TSフォルダをDVDプレーヤで開くフォルダアクションを
誰か作って頂けないでしょうか…

>>764
それって具体的にどういう作業をさせたいんですか？