//v1.0
//Copyright 2006 Adobe Systems, Inc. All rights reserved.
function AC_AddExtension(src, ext)
{
  if (src.indexOf('?') != -1)
    return src.replace(/\?/, ext+'?'); 
  else
    return src + ext;
}

function AC_Generateobj(objAttrs, params, embedAttrs) 
{ 
	str="<object type='application/x-shockwave-flash' id='mapa' ";
  for (var i in objAttrs)
    str += i + '="' + objAttrs[i] + '" ';
  str += '> ';
  for (var i in params)
    str += '<param name="' + i + '" value="' + params[i] + '" /> ';
	str+='<ul><li><a href="/opai.do?id=2">Buenos Aires Trasplante</a></li><li><a href="/opai.do?id=4">CAICA - Catamarca</a></li><li><a href="/opai.do?id=6">CAIPAT - Chubut</a></li><li><a href="/opai.do?id=23">CAISE - Santiago del Estero</a></li><li><a href="/opai.do?id=3">CUCAIBA - Buenos Aires</a></li><li><a href="/opai.do?id=5">CUCAI - Chaco</a></li><li><a href="/opai.do?id=8">CUCAICOR - Corrientes</a></li><li><a href="/opai.do?id=9">CUCAIER - Entre R&iacute;os</a></li><li><a href="/opai.do?id=10">CUCAIFOR - Formosa</a></li><li><a href="/opai.do?id=12">CUCAI - La Pampa</a></li><li><a href="/opai.do?id=13">CUCAILAR - La Rioja</a></li><li><a href="/opai.do?id=15">CUCAIMIS - Misiones</a></li><li><a href="/opai.do?id=16">CUCAI - Neuqu&eacute;n</a></li><li><a href="/opai.do?id=11">CUCAIJUY - Jujuy</a></li><li><a href="/opai.do?id=17">CUCAI - R&iacute;o Negro</a></li><li><a href="/opai.do?id=18">CUCAI - Salta</a></li><li><a href="/opai.do?id=20">CUCAI - San Luis</a></li><li><a href="/opai.do?id=21">CUCAI - Santa Cruz</a></li><li><a href="/opai.do?id=24">CUCAI - Tierra del Fuego</a></li><li><a href="/opai.do?id=25">CUCAITUC - Tucum&aacute;n</a></li><li><a href="/opai.do?id=22">CUDAIO - Santa Fe</a></li><li><a href="/opai.do?id=7">ECODAIC - C&oacute;rdoba</a></li><li><a href="/opai.do?id=19">INAISA - San Juan</a></li><li><a href="/opai.do?id=14">INCAIMEN - Mendoza</a></li></ul>';
	str+='</object>';
  document.write(str);
}

function AC_FL_RunContent(){
  var ret = 
    AC_GetArgs
    (  arguments, ".swf", "movie", "application/x-shockwave-flash");
  AC_Generateobj(ret.objAttrs, ret.params, ret.embedAttrs);
}

function AC_SW_RunContent(){
  var ret = 
    AC_GetArgs
    (  arguments, ".dcr", "src", null
    );
  AC_Generateobj(ret.objAttrs, ret.params, ret.embedAttrs);
}

function AC_GetArgs(args, ext, srcParamName, mimeType){
  var ret = new Object();
  ret.embedAttrs = new Object();
  ret.params = new Object();
  ret.objAttrs = new Object();
  for (var i=0; i < args.length; i=i+2){
    var currArg = args[i].toLowerCase();    

    switch (currArg){	
      case "classid":
        break;
      case "pluginspage":
        ret.embedAttrs[args[i]] = args[i+1];
        break;
      case "src":
      case "movie":	
        args[i+1] = AC_AddExtension(args[i+1], ext);
        ret.embedAttrs["src"] = args[i+1];
        //ret.params[srcParamName] = "http://www.incucai.gov.ar"+args[i+1];
				ret.params[srcParamName] = args[i+1];
        break;
      case "onafterupdate":
      case "onbeforeupdate":
      case "onblur":
      case "oncellchange":
      case "onclick":
      case "ondblClick":
      case "ondrag":
      case "ondragend":
      case "ondragenter":
      case "ondragleave":
      case "ondragover":
      case "ondrop":
      case "onfinish":
      case "onfocus":
      case "onhelp":
      case "onmousedown":
      case "onmouseup":
      case "onmouseover":
      case "onmousemove":
      case "onmouseout":
      case "onkeypress":
      case "onkeydown":
      case "onkeyup":
      case "onload":
      case "onlosecapture":
      case "onpropertychange":
      case "onreadystatechange":
      case "onrowsdelete":
      case "onrowenter":
      case "onrowexit":
      case "onrowsinserted":
      case "onstart":
      case "onscroll":
      case "onbeforeeditfocus":
      case "onactivate":
      case "onbeforedeactivate":
      case "ondeactivate":
      case "type":
        ret.objAttrs[args[i]] = args[i+1];
        break;
			case "codebase":
        ret.objAttrs[args[i]] = args[i+1];
        break;
      case "width":
      case "height":
      case "align":
      case "vspace": 
      case "hspace":
      case "class":
      case "title":
      case "accesskey":
      case "name":
      case "id":
      case "tabindex":
        ret.embedAttrs[args[i]] = ret.objAttrs[args[i]] = args[i+1];
        break;
			case "data":
				//ret.objAttrs[args[i]] = "http://www.incucai.gov.ar"+args[i+1];
				ret.objAttrs[args[i]] = args[i+1];
				break;
      default:
        ret.embedAttrs[args[i]] = ret.params[args[i]] = args[i+1];
    }
  }
  if (mimeType) ret.embedAttrs["type"] = mimeType;
  return ret;
}

