var trackball="http://igtracking.aol.com/p.gif";

// Check for src
function tk_srcCheck(){
 //var src_tmp="?rec=dhuang&smt=en/coolboy/occasions/belatedbirthday";
 var src_tmp=parent.top.location.search.toString();
 var track_src="";
 if(src_tmp!=null){
  src_tmp=src_tmp.split("&");
  for(var i=0;i<src_tmp.length;i++){
   src_tmp_=src_tmp[i].split("=");
   if(src_tmp_[0]=="smt")track_src=src_tmp_[1];
  }
 }
 return track_src;
}


// Check for app version
function tk_appCheck(){
 var br_aol=((navigator.userAgent.toLowerCase()).indexOf("aol")!=-1);
 return (br_aol)?"aol"+parseInt(((navigator.appVersion.match(/(AOL)\s\d+\.\d+/)).toString()).match(/\d+\.\d+/)):"";
}

// Check for VMP version
document.write("<script LANGUAGE='VBScript'>Dim p_o:Function VwAx(n):VwAx=1:on error resume next:Set p_o=CreateObject(n):if IsObject(p_o)then:VwAx=0:end if:End Function:</SCRIPT>")
function convertBorgToFriendly(borg){
 var friendly="",bytes=new Array(4);
 for(var i=0;i<4;i++){
  bytes[i]=borg%256;
  friendly=bytes[i]+friendly;
  if(i<3)friendly="."+friendly;
  borg>>=8;
 }
 return friendly;
}
function tk_vmpCheck(){
 vet_fully_installed=false;
 if(document.all){
  vet_fully_installed=(VwAx("AxMetaStream.MetaStreamCtl")==0)
  if(vet_fully_installed){
   var x=p_o.PluginCommand("GetVersion(SceneComponent.dll)",0,0)
   if(!(x=="No base control"||x>0))vet_fully_installed=false;
  }
  return (vet_fully_installed)?convertBorgToFriendly(x):"";
 }
}

// Check for ref
function tk_refCheck(){
 return document.referrer;
}

// Construct tacking URL
function igtrack(arg){
 var track_str="";
 switch (track_event){
  case "a1": track_str="event="+track_event+"&vmp=&app="+tk_appCheck()+"&src=&ref="+tk_refCheck(); break;
  case "ss": track_str="event="+track_event+"&vmp=&app=&src="+tk_srcCheck()+"&ref="; break;
  case "na": track_str="event="+track_event+"&vmp=&app=&src=&ref="; break;
  case "nk": track_str="event="+track_event+"&vmp=&app=&src=&ref="; break;
  case "sm": track_str="event="+track_event+"&vmp=&app=&src="+tk_srcCheck()+"&ref="; break;
  case "pv": track_str="event="+track_event+"&vmp="+tk_vmpCheck()+"&app=&src="+tk_srcCheck()+"&ref="; break;
  case "ks": track_str="event="+track_event+"&vmp=&app="+tk_appCheck()+"&src=&ref="; break;
  case "ka": track_str="event="+track_event+"&vmp=&app="+tk_appCheck()+"&src=&ref="; break;
  case "pg": track_str="event="+track_event+"&vmp="+tk_vmpCheck()+"&app="+tk_appCheck()+"&src="+tk_srcCheck()+"&ref="; break;
  case "rg": track_str="event="+track_event+"&vmp=&app=&src=&ref="; break;
  case "ri": track_str="event="+track_event+"&vmp=&app=&src=&ref="; break;
  case "rm": track_str="event="+track_event+"&vmp=&app=&src=&ref="; break;
 }
 arg=(arg!=0)?arg.substr(arg.lastIndexOf("?")+1,arg.length)+"&":"";
 document.getElementById("trackimg").src=trackball+"?"+arg+track_str;
}