すみません、ちょっと間違えました

間違えた箇所は、

Time++　;←ここ

です。これは、ループの回数を表すものですから、
描画しないで、ループを通る回数が多いほうがTimeのカウントアップが早く回ってしまいますね。

 Time++　

　　↓

 mci "status snds position"

 ms = stat

 Time = stat / (1000/30)

とすればよさそうです。素直に、msで分岐すればいいのですが、waitbyfpsで動かしていたときと
あまり構造を変えたくなかったのです。