Bird-Soft Weblog

今回は、拡張プラグイン（ＤＬＬ）を使って*.oggのファイルを再生する方法のサンプルと、 その解説をしていきます。

サンプルソースはつぎのようになります。
難しそうに見えますが、実は簡単です。
野村XXさんの作ったVox.dllを使用します。
このＤＬＬの説明書にはＨＳＰ2.6用のものしかありません。
そこでここではＨＳＰ3.0で動作するサンプルを紹介いたします。

// Vox.dllの使い方サンプル // HSP3.0用に書き換え // 2006/01/06 // // http://www.bird-soft.net/ // 2006 BIRD onexit goto *owari screen 0,200,100 print "oggファイル再生サンプル" // DLLの関数呼び出しの準備 #uselib "Vox.dll" #func VoxLoad "VoxLoad" sptr //oggファイルのロード関数 #func VoxSetLoop "VoxSetLoop" int,int //ループ回数設定関数 #func VoxPlay "VoxPlay" int //再生関数 #func VoxRelease "VoxRelease" int #func VoxDelete "VoxDelete" int // ファイルの再生 f_name = "song1.ogg" //ここで指定したファイルを再生する pm = varptr (f_name) //ポインタを取得 VoxLoad pm VoxID = stat //VoxLoad関数からの戻り値はstatに返る VoxSetLoop VoxID,10 VoxPlay VoxID stop /////////////////////////////////////////////////////////////////// // 終了時の処理 *owari VoxRelease VoxID //ドライバ解放 VoxDelete VoxID //ドライバ破棄 end

非常にシンプルなサンプルです


で使用するＤＬＬを指定します。今回はVox.dllを使用するのでそのように書きます。
ここではＤＬＬの関数を定義しています。
ここで定義した関数は、以下ＨＳＰの普通の命令のように呼び出して使うことができます。
このようにした場合、VoxSetLoopをVoxSetLoopAと定義しています。
この定義の後で、たとえば、 とすれば、ID1の曲のループ回数を10回にするという設定ができます。
左側がＨＳＰで使用する命令名です。右側がＤＬＬ側の関数名になります。
そのうしろのintなどは関数の引数です。
ＤＬＬのマニュアルなどに書いてあるのでそれを見ながら書きましょう。


※長くなるので2回目へ続きます・・・