// sample23.hsp 複数の動画を再生 1.05よりサポート
#include "hspdsp.as"

	dialog "avi",16,"メディアファイル" ; 動画ファイル選択
	sScreenPath = refstr
	dsp_Init
	
	dsp_SetActiveSel 0	// <- 初期値は0が使われますのであえて使う必要なし
	screen 0
	dsp_open sScreenPath, OPEN_VMR7, 0, 1, 2
	dsp_Play hwnd, 0, 0, 480 , 360
	
	dsp_SetActiveSel 1
	screen 1
	dsp_open sScreenPath, OPEN_VMR7, 0, 1, 2
	dsp_Play hwnd, 0, 0, 480 , 360
	
	
	dialog "再生中！"
	
	dsp_SetActiveSel 0
	dsp_Stop
	dsp_Close
	
	dsp_SetActiveSel 1
	dsp_Stop
	dsp_Close

	dsp_Exit
	end