перевод чисел во время..

[Pow R. Toc H.]

то есть.. как я понял решение будет таким:

var n:Number = 3673000;
var h:Number ;
var m:Number;
var s:Number;

n = int(n/1000);
h = int(n/3600);
m = int((n%3600)/60);
s = int((n%3600)%60);

trace(h+":"+m+":"+s) 
// Выводит 1:1:13

может у кого будет лучше вариант?