HSPTV!掲示板

現在、MediaPlayerを作っています。

//--File読込--//
//---準備---_I//
onexit goto *endoption
buffer 2
syscolor 12:boxf
color 0,0,0
mes "*Play"
buffer 3
syscolor 12:boxf
color 0,0,0
mes "*ProgramEnd"
//---準備---_O//
//ラベル設定_I//
*startmenu
//ラベル設定_O//
//---開始---_I//
gsel 0,1
title "Mediaplayer Ver126"
syscolor 15:boxf
pos 50,50
color 100,100,100
font "",30
mes "Media Player Ver 1.2.6"
objimage 2
objsize 100,20
button "",*select_on
objimage 3
objsize 100,20
button "",*endoption
stop
*select_on
goto *plays
	stop
*endoption
dialog "終了しますか？",3,"MediaPlayer"
if stat=6 :end
if stat=7 :stop
stop
*plays
	dialog "",16
	if stat = 0 : stop
	syscolor 15:boxf
	color 100,100,100
	pos 0,0
	mes "Media Player Ver 1.2.6"
	clrobj
	fname=refstr

なのですが、悩みがあるんです。
48行目から、
現在の時間の位置> 00:35/2:00 <全体の時間
このようにしたいんです。
Yahoo!で検索しても
ググっても、でません。
どうすれば、できますか？

//ファイルを開く

dialog "",16
music="\""+refstr+"\""
mci "open "+music+" alias music"

//全体の長さを取得
mci "status music length"
endtimea=stat/1000/60 //分
endtimeb=stat/1000\60 //秒

//再生
mci "play music"


//リピート開始
repeat
redraw 0
color 255,255,255 :boxf

//現在の長さを取得
mci "status music position"
nowtimea=stat/1000/60 //分
nowtimeb=stat/1000\60 //秒

//描画
color 0,0,0 : pos 0,0
mes ""+nowtimea+" ; "+nowtimeb+" / "+endtimea+" ; "+endtimeb

redraw 1
wait 1
loop

とりあえずこんなサンプル作りました
mciのコマンドに曲全体の長さと現在の再生位置を取得するコマンドがあります

http://www.e-douguya.com/eq/tech/mci.shtml
個人的にこのサイトが一番詳しくて分かりやすい…

ありがとうございます！！
解決とさせていただきます！

pumpkinさん、いつもお世話になってます！
:)