function ajaxSend(url,pre) {

	var param = 'data=' + pre ;

	var myAjax = new Ajax.Request(url,
	{
	method : 'post',
	parameters : param,
	onComplete : ajaxReceive
	});
}


function ajaxReceive(orgRequest) {

	var str = orgRequest.responseText;

}






function S4() {
   return (((1+Math.random())*0x10000)|0).toString(16).substring(1);
}

function gui() {

   return (S4()+S4());
}



window.onload = pload;

function pload(){
	
      	fVersion = get_fVer();

	


 
 get_data = ReadCookie("seeid2");

seeid = get_data;

	if(get_data == "") {
	
		var seeid = gui();
	
	
		 WriteCookie("seeid2", seeid, 364);
	
	}


	ref_val = get_ref();
	
	

	sdt = "sid," + seeid +  ",ref,"  + ref_val  + ",fver,"  + fVersion  + ",stat,"  + "top_ol";
	
	ajaxSend('http://www.mikansenka.com/cgi-bin/rec_mail.cgi',sdt);


}//End of pload




function ReadCookie(key) {
     var sCookie = document.cookie;    
     var aData = sCookie.split(";");     
     var oExp = new RegExp(" ", "g");  
     key = key.replace(oExp, "");        

     var i = 0;
     while (aData[i]) {                         
          var aWord = aData[i].split("=");                        
          aWord[0] = aWord[0].replace(oExp, "");              
          if (key == aWord[0]) return unescape(aWord[1]); 
          if (++i >= aData.length) break;                          
     }
     return "";                                   
}






function WriteCookie(key, value, days) {
     var str = key + "=" + escape(value) + ";";         
     if (days != 0) {                                                
          var dt = new Date();                                   
          dt.setDate(dt.getDate() + days);                   
          str += "expires=" + dt.toGMTString() + ";" + "path=/;"; 
     }
     document.cookie = str;                                   
}





window.onunload = function(){
  

	fVersion = get_fVer();


	ref_val = get_ref();


	get_data = ReadCookie("seeid2");

	seeid = get_data;

	if(get_data == "") {

		var seeid = gui();

		WriteCookie("seeid2", seeid, 364);

	}

	sdt = "sid," + seeid +  ",ref,"  + ref_val  + ",fver,"  + fVersion  + ",stat,"  + "top_unl";

	ajaxSend('http://www.mikansenka.com/cgi-bin/rec_mail.cgi',sdt);


}



function get_fVer(){

      
 	var fVersion = new ActiveXObject("ShockwaveFlash.ShockwaveFlash").FlashVersion();
	
	fVersion=Math.floor(fVersion / 0x10000);

     return fVersion;      

}


function get_ref(){

	
	if (document.referrer) {
		
		ref_val = escape(document.referrer);


	}else{
	
		ref_val = " ";
	
	}

    return ref_val;    

}