SWF

[swf2image]File Juice


File Juicer - Extract images from PDF, PowerPoint, Word, Excel and other Files on Mac OS X

File JuicerはSWFに対応している。
セキュリティ設定が無い場合はswfに埋め込まれている(呼び出しでは無い)場合は
8割程度の確率でかき出し出来た。

|

[swf2img]【OSX10.4】旧環境を使ってiView MediaProでSWFファイルをイメージに変換する

旧環境を持っている人なら
こんな方法もあるよ的なw


Website_image20121223_124931

OSX10.4とQuickTime7.1.2迄の環境が必要です。
(QuickTimeが7.1.3でswfのサポートを止めているので7.1.2まで)

大量にswfファイルがある時はこの方法が一番速い
が!
swfのファイル形式によってはサムネイル画像を生成出来ない物も多いので
swfファイルの作成環境によるのかな
だから
結局
FlashPlayerでキャプチャー撮る方法[LINK]が確実なのかな


なんで
こんな事しているか?って言うと
Adobe Flash CS6は
AppleScriptsのsdefの中身がこれだけなんです

Website_image20121223_133952

前は
もう少し何か?無かったかね?トホホ

|

[swf2img]SWFファイルをイメージファイルに変換する(といってもキャプチャー撮るだけ)

前提にFlashが無い事がありますが
先に記事にした
[swf2pdf]SWFファイルをPDFに変換する(といってもPDFに印刷する感じ)
だと
どうしても
上手くPDFにならない場合があるので
キャプチャー撮る事でイメージに変換する事にしました。

【前提】swfのサイズが縦型のみ(フルスクリーンにした時に高さが画面100%になるような物)

中身を見るだけなら
Adobe Bridge で確認出来ますが
イメージファイルが必要になったので作りました。


1:ファイルを開く
2:フルスクリーンにする
3:キャプチャーを撮る
4:トリミングする

4ステップ


Flash Player archives 版が必要です

Archived Flash Player versions





----------------------------------------------ドロップの始まり
on open DropObj
-----------------------------------------------必要なアプリケーションを起動しておく
tell application "Flash Player"
launch
activate
end tell

tell application "System Events"
launch
activate
end tell

tell application "Image Events"
launch
activate
end tell

tell application "Finder"
------------------------------------------------繰り返しの始まり
repeat with ObjFiles in DropObj
--------------------------------------------------ファイル名を取得
set theName to name of ObjFiles
------------------------------------------------パスを取得
set theAlias to ObjFiles as alias
------------------------------------------------Flash Playerを起動
tell application "Flash Player"
activate
------------------------------------------------まずは普通にファイルを開く
open theAlias
------------------------------------------------開くのを待つ意味の、おまじないの1秒
delay 1
tell window 1
activate
------------------------------------------------普通に開いた時のサイズをリストで受け取り
set theOrgBounds to bounds as list
------------------------------------------------ファイルバーの分
set theOrgBar to item 2 of theOrgBounds as number
------------------------------------------------
set theOrgW to item 3 of theOrgBounds as number
------------------------------------------------高さ
set theOrgH to item 4 of theOrgBounds as number
------------------------------------------------22はメニュー分を引いて縦横比を計算
set theOrgPer to theOrgW / (theOrgH - (theOrgBar + 22)) as number
------------------------------------------------ファイル名を取得
set theFileName to name
------------------------------------------------フルスクリーンにする
tell application "System Events"
keystroke "f" using command down
end tell
------------------------------------------------ここの待ち時間はマシンパワーに依存がある
------------------------------------------------フルスクリーンになってからキャプチャ撮るための待ち時間
delay 2
end tell
end tell

------------------------------------------------保存先を確定
set thePicPath to (theFileName & ".png") as string
------------------------------------------------スクリーンショットを撮影pngファイルにする
do shell script "screencapture " & quoted form of thePicPath
------------------------------------------------jpgが好みな方はこちら
------------------------------------------------保存先を確定
----set thePicPath to (theFileName & ".jpg") as string
------------------------------------------------スクリーンショットを撮影jpgファイルにする
----do shell script "screencapture -tjpg" & quoted form of thePicPath
------------------------------------------------ファイルの書き込み待ちのおまじないの待ち
delay 1
tell application "Flash Player"
activate
tell window 1
------------------------------------------------フルスクリーン時の画面サイズ
set theFullBounds to bounds as list
------------------------------------------------
set theFullW to item 3 of theFullBounds as number
------------------------------------------------高さ
set theFullH to item 4 of theFullBounds as number
------------------------------------------------高さから幅を計算
set theCrapW to (theFullH * theOrgPer) - 2 as integer
------------------------------------------------トリミングサイズを定義{Wpx, H高さPX}
set theCrapBounds to {theCrapW, theFullH} as list
end tell
----------------------------ESCを送ってFlash Playerフルスクリーンを閉じる
tell application "System Events"
keystroke (key code 53)
end tell
end tell
------------------------------------------------画像をトリミングする
tell application "Image Events"
------------------------------------------------スクリーンキャプチャーしたファイルを開く
set theScreenImg to open thePicPath
---------------------------------------画像サイズはSWFをフルスクリーンから左右の余白を削除
crop theScreenImg to dimensions theCrapBounds
------------------------------------------------保存して
save theScreenImg
------------------------------------------------閉じる
close theScreenImg
------------------------------------------------メモリへのおまじないで初期化しておく
set theScreenImg to ""
end tell
----------------------------Flash Playerウィンドを閉じる
tell application "Flash Player"
activate
------------------------------------------------ウィンドを閉じる
close window 1
end tell
------------------------------------------------繰り返しの終了
end repeat
end tell
end open

「swf2img.app.zip」をダウンロード
「swf2img.rtf」をダウンロード


|

[swf2pdf]SWFファイルをPDFに変換する(といってもPDFに印刷する感じ)

前提にFlashが無い事がありますが
SWFファイルをイメージ化する必要があって
まずはPDFにする事を考えました。

が!
複雑な構造のSWFファイルは正しく出力されない事が多い
(私の要件は満たしましたが...汗)

CUPS-PDF[LINK]を使って
PDFへプリントします。

そんなワケで
CUPS-PDFをインストール済みが前提条件です

プリンター設定でデフォルトの用紙サイズ等をあらかじめ設定しておく事が必要です


CUPS-PDF - Download


Flash Player archives 版も必要です

Archived Flash Player versions






----------------------------------------------ドロップの始まり
on open DropObj
-----------------------------------------------必要なアプリケーションを起動しておく
tell application "Flash Player"
launch
activate
delay 2
end tell
tell application "System Events"
launch
activate
end tell
tell application "CUPS-PDF"
launch
activate
end tell

tell application "Finder"
repeat with ObjFiles in DropObj
--------------------------------------------------ファイル名を取得
set theName to name of ObjFiles
------------------------------------------------パスを取得
set theAlias to ObjFiles as alias
------------------------------------------------Flash Playerを起動
tell application "Flash Player"
activate
------------------------------------------------ファイルを開く
open theAlias
------------------------------------------------2秒待つ
delay 2
------------------------------------------------開いたウィンドウ
tell window 1
------------------------------------------------100%表示に変更
tell application "System Events"
keystroke "1" using command down
end tell
------------------------------------------------1秒待つ
delay 1
------------------------------------------------プリントコマンド実行
tell application "System Events"
keystroke "p" using command down
end tell
------------------------------------------------1秒待つ
delay 1
------------------------------------------------リターン押す
tell application "System Events"
keystroke return
end tell
------------------------------------------------1秒待つ
delay 1
------------------------------------------------リターン押す
tell application "System Events"
keystroke return
end tell
------------------------------------------------1秒待つ
delay 1
end tell
------------------------------------------------1秒待つ
delay 1
------------------------------------------------ウィンドウを閉じる
close window 1
------------------------------------------------1秒待つ
delay 1
end tell
end repeat
end tell
end open

「swf2PDF.app.zip」をダウンロード


「swf2PDF.rtf」をダウンロード


|

その他のカテゴリー

Accessibility AccessibilityCheck AccessibilityForm AccessibilityInDesign AccessibilityPDF Acrobat Acrobat Action Acrobat Annotation Acrobat AppleScript Acrobat Layer Acrobat Plug-ins Acrobat Portfolios Acrobat Print AcrobatBarcode AcrobatDialog AcrobatForm AcrobatJS AcrobatMenu AcrobatPDF AcrobatStamp AcrobatYouTube AddressBook Adobe Adobe InDesign AdobeAppleScript AdobeBridge AdobeIllustrator AdobeJSX aed Alfresco Android AnimationGif Apple AppleScript AppleScriptBasics AppleScriptCharacter AppleScriptColor AppleScriptDroplet AppleScriptErrorNum AppleScriptFolder AppleScriptFontBook AppleScriptRename AppleScriptTools AppleSymbols Applications Barcode Barcode2D BarcodePostal BetterHTMLExport Book Browser buzz Certificates CharacterEntity CharacterSets Colors Cool Site CSS Cutting DecoMail DecorationMail Design Desktop Diff DJ dmg DNS Documents Download eBook Editer eMail Envelopes ExifTool Facebook FFmpeg File System Fonts FontsTool FontsWeb FOOD FormPrint ftp Gadget Gif Animation Google HexEditor HTML info iPhoto ISBN ISO iTunes iWork iWorkNumbers iWorkNumbersCalendar iWorkNumbersTimecard iWorkPages JavaScript JeditX JeditX Regexp JeditXAppleScript JIS jquery Letterpress Library logo Mac Admin Mac Archiver Mac Browser Mac Browser Plugin Mac QuickLook Mac Spotlight Mac Video Map Mobby Moto Movies Music Network Basic ntp OCR Office OSX Pantone Paper PDFlib Permission Photo Pictograms Print Public QuickLook QuickTime QuickTimeSetting QuickTimeSound Real Media ReName ResourceFork ruby Screen ScreenCast Search Security SEO Sharing SLAResource Sound Spotlight Stamp SWF Tutorial PSD TV Twitter Typography Unicode Utilities Video WebFont Wedding Windows WindowsMedia XML XMP XPS YouTube YouTube Rss