function wcp(){
	
	var agentValue = navigator.userAgent;
	if(agentValue.indexOf("Mac")!=-1 && agentValue.indexOf("IE")!=-1){
			document.write('<tr><td class="tpdate"><p>June 12, 2010</p></td><td><div class="tptitle"><a href="http://www.nobodymag.com/worldcup/2010/">ールドカップ日誌<div align="right">梅本洋一</div></a></div></td></tr>');
		
	}else{
		document.write('<tr><td class="tpdate"><p><span id="WCPdate"></span></p></td><td><div class="tptitle"><a href="http://www.nobodymag.com/worldcup/2010/"><span id="WCPtitle"></span><div align="right">梅本洋一</div></a></div></td></tr>');
        xmlHttpObject = null;
        if(typeof ActiveXObject=="undefined" && typeof XMLHttpRequest!="undefined"){
                xmlHttpObject = new XMLHttpRequest();
				
				    if(xmlHttpObject) xmlHttpObject.onreadystatechange = wcp_ajx;

					if(xmlHttpObject){
						xmlObjGet();
					}

        }else if(window.ActiveXObject){

                try{xmlHttpObject = new ActiveXObject("Msxml2.XMLHTTP");
                }catch(e){
                try{xmlHttpObject = new ActiveXObject("Microsoft.XMLHTTP");
                }catch(e){
                        return null;}
					
               }
			   
			   		if(xmlHttpObject) xmlHttpObject.onreadystatechange = wcp_ajxIE;

					if(xmlHttpObject){
						xmlObjGet();
					}
        }
	}
}


function xmlObjGet(){
		xmlHttpObject.open("GET","/worldcup/2010/atom.xml",true);
		xmlHttpObject.send(null);
}



function wcp_ajx(){
		if((xmlHttpObject.readyState == 4) && (xmlHttpObject.status == 200)){

				resData = xmlHttpObject.responseXML;

				title1 = resData.getElementsByTagName("entry")[0].childNodes[1].childNodes[0].nodeValue;
				
				date1 = resData.getElementsByTagName("entry")[0].childNodes[11].childNodes[0].nodeValue;
				
				wcpwrite(date1,title1);


		}else{
			wcpwriteErr();
		}
}


function wcp_ajxIE(){
		if((xmlHttpObject.readyState == 4) && (xmlHttpObject.status == 200)){

				resData = xmlHttpObject.responseXML;

				title1 = resData.getElementsByTagName("title")[1].childNodes[0].nodeValue;
				
				date1 = resData.getElementsByTagName("created")[0].childNodes[0].nodeValue;
				
				wcpwrite(date1,title1);


		}else{
			wcpwriteErr();
		}
}
		
		
		
function wcpwrite(d,t){
	
		date_ar = d.split("-");
		
		yearSt = date_ar[0];
		
		monthNUM = date_ar[1];
	
		monthSt = "";
		
		switch(monthNUM){
			case "01" :
			monthSt = "January";break;

			case "02" :
			monthSt = "February";break;

			case "03" :
			monthSt = "March";break;

			case "04" :
			monthSt = "Apil";break;
			
			case "05" :
			monthSt = "May";break;
			
			case "06" :
			monthSt = "June";break;
			
			case "07" :
			monthSt = "July";break;
			
			case "08" :
			monthSt = "August";break;
			
			case "09" :
			monthSt = "September";break;
			
			case "10" :
			monthSt = "October";break;
			
			case "11" :
			monthSt = "Nobember";break;
			
			case "12" :
			monthSt = "December";break;
			
		}
		
		var date_ar02 = date_ar[2].split("T",1);
		
		var dateSt = date_ar02[0];
		
		document.getElementById("WCPdate").innerHTML = monthSt + " " + dateSt + ", " + yearSt;
		
		document.getElementById("WCPtitle").innerHTML = "ワールドカップ日誌 " + t;

}

function wcpwriteErr(){
	
		document.getElementById("WCPdate").innerHTML = "June 12, 2010";
		
		document.getElementById("WCPtitle").innerHTML = "ワールドカップ日誌";
}