alias rettime {
var %dir = C:\program files\mirc3\files\
var %read = $readini(playlist.ini,playlist,playlist)
var %num = $calc($sound($file($gettok($+(%dir,%read),1-2,58)).shortfn).length / 60000)
var %tok = $gettok($round($calc($round(0. $+ $gettok(%num,2,46),2) * 0.6),2),2,46)
var %a = $gettok(%num,1,46)
var %b = $iif(($len(%tok) == 1),$+(%tok,0),%tok)
if ($len(%b) == 0) { var %b = 00 }
return $+($chr(91),%a,:,%b,$chr(93))
}