var _sequence_image_cache = 0;
var _sequence_image_timer = 0;

function _sequence_image_next()
{
    var entries = (new VBArray(_sequence_image_cache.Items())).toArray();
    for (var key in entries)                  // Iterate the dictionary.
    {
        var entry = entries[key];
        var images = entry[1];
        var ordinal = entry[2];
        ++ordinal;
        if (ordinal >= images.length)
            ordinal = 0;
        entry[2] = ordinal;
        _sequence_image_set(entry[0], entry[1], entry[2], entry[3]);
    }
}

function _sequence_image_set(dest, images, ordinal, folderspec)
{
    dest.src = folderspec + "/" + images[ordinal];
}

function sequence_image(dest, list, folderspec, interval)
{
    if (!_sequence_image_cache)
        _sequence_image_cache = new ActiveXObject("Scripting.Dictionary");
    if (_sequence_image_cache.Exists(dest.name))
        _sequence_image_cache.Remove(dest.name);
        
    
    var entry = new Array(dest, list.split(","), 0, folderspec);    
    _sequence_image_set(entry[0], entry[1], entry[2], entry[3]);
    _sequence_image_cache.Add(dest.name, entry);
    
    if (!_sequence_image_timer)
      _sequence_image_timer = window.setInterval(_sequence_image_next, interval, "jscript");
}