VBScript版 ＢＧＭ付きスライドショー作成スクリプト

# VBScript版
ＢＧＭ付きスライドショー作成スクリプト

## 準　備

mkalbum.vbsを右クリック「対象をファイルに保存」で持っていってください。
そして、適当なところに置いてください。
（デスクトップに picture というディレクトリを作って、その中に置くなど。）

## 使い方

適当な場所にディレクトリ（以下アルバムディレクトリと呼びます）を作って、そこに画像ファイル（jpg・gif・png）と音楽ファイル(mid・mp3・wma）を集めます。
もともと画像ファイルを集めているディレクトリがあるなら、そこに音楽ファイルをいくつかコピーしてください。
（画像に適した音楽ファイルを選ぶのは、結構楽しいものです）
mkalbum.vbs を起動します。
ディレクトリ選択窓が開くので、アルバムディレクトリを指定してください。
確認のボタンが出ますから、[ OK ] を押してください。
これで、終わりです。あっという間に、アルバムディレクトリに main.html ができあがっています。
main.html をブラウザで開いてください（普通、マウスでクリックするだけで、ブラウザが起動して main.html を読み込むはずです）。
ＢＧＭ付きスライドショーが始まります。自動的に画像が切り替わります。
画像の切り替えは、JavaScript で行っています。音楽ファイルの再生は、MediaPlayer などのプラグインが行っています。
ほとんどの Windows パソコンにＩＥ（インターネットエクスプローラー）やＮＮ（ネットスケープナビゲーター）が動いていますから、アルバムディレクトリをコピーしてあげるだけで、他の人にＢＧＭ付きスライドショー作品を楽しんでもらえます。
WEB page で公開することも可能です。（回線速度が速くないと、見るのが辛いですが）

## ダウンロード

mkalbum.vbs 複数の音楽ファイルを順に再生しながらのスライドショーを作成するスクリプト
mkalbum_order.vbs上のmkalbum.vbsは画面切り替え効果が1種類ですが、画像の順序で画面切り替え効果が変わるスライドショーを作成するスクリプト
mkalbum_random.vbs画面切り替え効果がランダムに変わっていくスライドショーを作成するスクリプト
BGM の音楽ファイルをwebサーバーに置いて公開するときには、songlist.m3uの内容を

VALSE9.mid
chpn-p15_20140.mid
↓
http://www.osaka-kyoiku.ac.jp/~nonami/2004nenga/VALSE9.mid
http://www.osaka-kyoiku.ac.jp/~nonami/2004nenga/chpn-p15_20140.mid

のように変更してから、webサーバーに置いてください。音楽ファイルのURLをすべて書いておかないといけないようなので。
mkalbum1.vbs 単一の音楽ファイルだけを再生しながらのスライドショーを作成するスクリプト
こちらは、このままwebサーバーに置いて、公開すれば、音楽ファイルを再生します。

## カスタマイズ？

写真めくりの時間を調整したいときは、mkalbum.vbs の 82行目か、main.htmlの11行目の

- var delay = 10000;
- の10000を加減してください（10000で10秒です）
写真めくりのスタイルを変えたいときは、mkalbum.vbs の 150行目か、main.htmlの78行目あたり（画像ファイルの数でずれるので）の
- filter: revealTrans(Duration=2.0, Transition=23);
- の「Transition=23」の23を変えてください。23って何？　という方は、ホームページ工房が参考になります。
写真めくりの速さを変えたいときは、同じ行のDuration=2.0,（2秒）を好きな数に変えてください。
mkalbum.vbs の 最後から9行目か、main.htmlの最後から5行目の
- <a href='#modoru' onclick='history.back(); return false;'>戻る</a>

の <href=' 以下を適当なURLに書き換えてください。（トップページなど）
このままでも、link元に戻ります。

mkalbum.vbsを改良した方は、ぜひ、のなみに下さい。(^_^)
と書いていたら、WEB 用サムネイル作成ソフト 「すなねぃる !!」の出力スクリプトを参考にして（実はmkalbum.vbsもすなねいるの出力スクリプトを参考にしている）mkalbum_random.vbsの出力スクリプトにあたるものを「浜松市の舩木」さんが作って送ってくれました。
それを参考にmkalbum_order.vbsをのなみが作りました。といっても、
objFile.WriteLine " tr_num = Math.floor(Math.random()*23);"
を
objFile.WriteLine " tr_num = Math.floor(frame/2) % 23;"
に変えただけですが。２枚ずつ同じスタイルの写真めくりをして、次々と変わっていきます。
objFile.WriteLine " tr_num = Math.floor(frame/2) % 4;"
としたら、最初の4つのスタイルだけを2枚ずつの写真めくりに使う設定にできます。

大阪教育大学
国語教育講座
野浪正隆研究室
↑ページTop
←戻る

mailto: nonami@cc.osaka-kyoiku.ac.jp
Last update: 02/11/10 13:51