Other | 雑スクリプト

OS Xの「サービス」を使用して、WordをTextに変換。

2015年9月4日 tetsu AppleScript, Automator, OS X, Other

【作成方法】

アプリケーション　＞　Automator　＞　サービスを選択。

ライブラリ　＞　AppleScriptを実行をダブルクリック。

画像のように、AppleScriptコードを入力して、

「WordをTextに変換」などの適当な名前で保存。

▼AppleScriptコード

参考にしたサイトは現在、存在しませんが、

そのサイトのコードをほぼそのまま使用させていただいてます。

ありがとうございます。

on run {input, parameters}
		--activate
	--display dialog "Wordの校閲が使用されていないか注意してください。" giving up after 2
	
	repeat with f in input
		set theSuffix to name extension of (info for f)
		if theSuffix contains "doc" then
			my convertDocToText(f)
		end if
	end repeat
	BeepVolume2() of me
	return input
end run

to convertDocToText(f)
	set FilePath to (quoted form of POSIX path of f) as Unicode text
	(*
	ターミナルのコマンドtextutilは文字コード変換もAppleScriptに文字化けしないから便利。
	元のファイルがSJISでもUTF8でも問題ない
	*)
	try
		do shell script "textutil -convert txt " & FilePath
	end try
end convertDocToText

on BeepVolume2()
	set getvolume to get volume settings
	set outVol to output volume of getvolume
	set myVol to outVol / (100 / 7)
	set volume 1 --実際に鳴らす音量　数値：0-7まで
	beep 1
	delay 0.5
	beep 1
	set volume myVol
end BeepVolume2

on run {input, parameters}

--activate

--display dialog "Wordの校閲が使用されていないか注意してください。" giving up after 2

repeat with f in input

set theSuffix to name extension of (info for f)

if theSuffix contains "doc" then

my convertDocToText(f)

end if

end repeat

BeepVolume2() of me

return input

end run

to convertDocToText(f)

set FilePath to (quoted form of POSIX path of f) as Unicode text

ターミナルのコマンドtextutilは文字コード変換もAppleScriptに文字化けしないから便利。

元のファイルがSJISでもUTF8でも問題ない

try

do shell script "textutil -convert txt " & FilePath

end try

end convertDocToText

on BeepVolume2()

set getvolume to get volume settings

set outVol to output volume of getvolume

set myVol to outVol / (100 / 7)

set volume 1 --実際に鳴らす音量　数値：0-7まで

beep 1

delay 0.5

beep 1

set volume myVol

end BeepVolume2

【使い方】

Wordファイルを選択して右クリックして、

作成したサービスを選ぶと、

同階層にテキストが生成されます。

OS Xの「サービス」から、「Yahoo!辞書」を利用。

2015年9月2日 tetsu Automator, OS X, Other

【作成方法】

アプリケーション　＞　Automator　＞　サービスを選択。

ユーティリティ　＞　シェルスクリプトを実行をダブルクリック。

画像のように、コードを入力して、

「Yahoo!辞書」などの適当な名前をつけて保存。

▼シェルスクリプト

open "http://dic.search.yahoo.co.jp/search?p=$*"

1	open "http://dic.search.yahoo.co.jp/search?p=$*"

【使い方】

辞書で調べたいテキストを選択して、右クリック。

作成したサービスを選択すると、

「Yahoo!辞書」で検索結果が表示されます。

ちなみに「Google 翻訳」は、下記サイトにあります。

Automator でテキストを Google 翻訳に送るサービスを作る

文章中の漢字を平仮名に変換する。

2015年8月24日 tetsu OS X, Other

グーグル日本語入力を使用している状態で、

テキストエディットなどで漢字を含む文章を選択して、

「かな」キーを2回押して、「Control」＋「H」を押すと…

たまたま見つけた機能です。

他にも隠し機能があるのかも知れません。

【追加情報】

「かな」キーを2回押して、「esc」キーを押しても変換できます。

こちらは、ことえり(標準)、グーグル日本語入力、どちらも可能です。

たぶん…

▼参考情報

Japanese Input Method: 日本語入力ソース変換用のキーボードショートカット