var activeX = false;
var swf = false;

function writeFlash(swfFile,altFile,width,height,bgcolor,ver,params,text) {
var s = '';
  if(hasFlash(ver)) {
    if(!activeX) {
    s = '<embed src="'+swfFile+'" quality="high" pluginspage="http://www.macromedia.com/shockwave/download/index.cgi?P1_Prod_Version=ShockwaveFlash" type="application/x-shockwave-flash" width="'+width+'" height="'+height+'" bgcolor="'+bgcolor+'"></embed>\n';
    } else {
    var st = 0;

    s = '<object classid="clsid:D27CDB6E-AE6D-11cf-96B8-444553540000" codebase="http://download.macromedia.com/pub/shockwave/cabs/flash/swflash.cab#version=4,0,2,0" width="'+width+'" height="'+height+'">\n';
    s += '\t<param name="movie" value="'+swfFile+'" />\n';
    s += '\t<param name="quality" value="high" />\n';
    s += '\t<param name="menu" value="false" />\n';
    s += '\t<param name="bgcolor" value="'+bgcolor+'" />\n';

    if (params && params.length>0) {
        while (true) {
            var e = (params.indexOf('&',st)>0)?params.indexOf('&',st):params.length;
            var t = params.substr(st,params.indexOf('=',st));
            var v = params.substr(params.indexOf('=',st)+1,(e-(params.indexOf('=',st)+1)));
            s += '\t<param name="' + t + '" value="' + v + '" />\n';
            if (e >= params.length-1) break;
            params = params.substr(e+1);
        }
    }

    s += '</object>\n\n';
    }
  } else {
    if(altFile.search(/(.gif)|(.jpg)$/gi) != -1) {
    s = '<img src="'+altFile+'" width="'+width+'" height="'+height+'" border="0" alt="" />\n';
    } else {
        if (text) {
            s = text;
        } else {
            window.location.href = altFile;
            return;
        }
    }
  }
  with(document) {
  open('text/html');
  write(s);
  close();
  }
}

function hasFlash(ver) {
if(!window.ua) ua = window;
  if(!ua.ver) {
  var av = navigator.appVersion;
  ua.mac = (av.indexOf("Mac") != -1);
  ua.ie = (av.indexOf("MSIE") != -1);
  }
if(!ver) ver = 0;
  if(!ua.mac && ua.ie) {
    for(var i=ver; i<=ver+1&&i!=1&&swf!=true; i++) {
    execScript('on error resume next: swf=IsObject(CreateObject("ShockwaveFlash.ShockwaveFlash'+((i==0)?'':'.'+i)+'"))','VBScript');
    }
  activeX = swf;
  }
  else if(navigator && navigator.plugins) {
  var n,m,t,d,v;
  n = navigator;
  m = n.mimeTypes;
  t = 'application/x-shockwave-flash';
    if(m && m[t] && m[t].enabledPlugin && m[t].enabledPlugin.description) {
    d = m[t].enabledPlugin.description;
    v = d.charAt(d.indexOf('.')-1);
      if(v >= ver) swf=true;
    }
  }
return swf;
}