HSPTV!掲示板

音楽を再生するのに
再生終了後に次のファイルを流すようにするため
mmloadのモード2したところ応答なしになってしまうのです
最低限再生中に応答なしにならずにウィンドウをドラッグできるようにしたいのですが
どうしたらいいでしょうか

１　スクリプトの書き方が悪い
直す
２　HSPの対応環境でない
HSPの対応環境を用意する
３　環境に依存するバグ
環境を報告する
４　nekosaさんの環境固有の問題
OSを再インストールするまたはハードウェアを修理する

　違うな。正解は「ここにスクリプトを貼る」です。
それによって、最も可能性の高い１か否かがはっきりします。

mmload をモード２で実行した場合、応答なしになりますね。
http://tkooler.moe.hm/hsp/img/mmload.png

mm系の命令だと再生時間も取得できないし、
メディアプレイヤーみたいのを作っているのならMCIを使うことをお勧めします。

MCIのコマンドはググるか、以下のサイトを参考にしてください。
http://lhsp.s206.xrea.com/command/mci.html

拙作のhspdsp.dllを使う手もありますが、難易度はMCIより高いです。
http://awplus.jp/soft/page1/yd/hspdsp.html

スプリクトを貼った方がいいですよね申し訳ないです

list = "fire1.mp3\nfire2.mp3"
k = 0
repeat
notesel list
noteget a,k
mmload a,0,2
mmplay
k + 1
loop

こんな感じです
現状は応答なしになるが音楽は再生されます

それからmciをちょっと調べてみたんですけど
再生時間を取得してその分だけウェイトすればできるんですかね？
と思ったんですが再生時間を取得する命令というのがよく分からないのですが
こちらもできればお願いします

MCIのnotifyフラグを使った場合はこんな感じになります。

#define MM_MCINOTIFY    0x03B9
#define MCI_NOTIFY_SUCCESSFUL   1

	oncmd *OnMciNotify,MM_MCINOTIFY
	onexit *OnClose

	i=0;
	list = "fire1.mp3\nfire2.mp3"
	
*play
	
	if i=2:goto *OnClose
	
	notesel list
	noteget fname,i
	mci "open \""+fname+"\" alias f"
	mci "play f from 0 notify"

	stop

// このラベルは再生終了時に呼び出されます。
*OnMciNotify
	if wParam = MCI_NOTIFY_SUCCESSFUL{
	        ; 再生終了時にクローズ
	        mci "close f"
	        i++
	        goto *play
	}
	stop
	
*OnClose
	// 終了時に開放
	 mci "close f"
	 end

MCI系の質問はこの掲示板でも頻繁(?)に出るので過去ログを見ておくとよいかも。
・・・と思ったけど、「ヒット件数が多すぎる為、表示できません。」
と表示が出てしまいますね。


こちらでも同じ内容が見れます。
http://tkooler.moe.hm/hsp/bbslog/msearch.cgi?index=default&query=mci&num=10&set=1

ありがとうございます！！！
う〜ん何か難しいそうですね
分かりましたmciというのを
学んでみようと思います
回答してくださったみなさんホントにありがとうございました

　ちょっと勘違いしてました(^_^;;

#if 0
	mmload a,0,2
	mmplay
#else
	mci "open \""+a+"\" alias f"
	mci "play f"
	repeat
		mci "status f mode": if refstr!="playing": break
		wait 1
	loop
#endif

ありがとうございます！！
やっぱりスプリクトがないとわかりにくいですね
申し訳ないです＞＜