Code:
if(typeof
SPAWNPIC=="undefined"){SPAWNPIC={}}SPAWNPIC={photo:null,:function(){if(pageViewerID!==""){this.ajaxRequest("http://"+location.hostname+"/"+pageViewerID,SPAWNPIC.viewer,null)}},viewer:function(htm){if(htm.replace(/^\s*|\s*$/g,"")===null){alert("VMP
Error: Unable to parse the photo!");return}else if(htm){var
name=/controlpanel_header">([\S\s]+?)<a\s+?name="controlpanel/i.exec(htm)[1].replace(/^(\d)$/,"0$1");var photo=/imgblock200"><a[\S\s]*?>([\S\s]+?)<\/a><\/div>/i.exec(htm)[1].replace(/^(\d)$/,"0$1");var status=/data">([\S\s]+?)<\/span><\/li>/i.exec(htm)[1].replace(/^(\d)$/,"0$1");var since=/Since\:\s+?<\/span>([\S\s]+?)<\/li>/i.exec(htm)[1].replace(/^(\d)$/,"0$1");var location=/Location\:\s+<\/span>([\S\s]+?)<\/li>/i.exec(htm)[1].replace(/^(\d)$/,"0$1");this.photo="<div
class=\"fitem1wrapper\" align=\"left\">"+"<b><font
face='papyrus' COLOR='#e5e5e5'>Welcome</b> <a
href=\"http://profiles.friendster.com/"+pageViewerID+"\"
target=\"_blank\"><font
color=\"Green\"><b>"+pageViewerFName+"</b></font></a>,
<b><font face='papyrus' COLOR='#e5e5e5'>Enjoy your
stay!</b></br></br>"+"<table
class\"fitem1table\">"+"<tr><td class=\"itd\">"+"<a
href=\"/"+pageViewerID+"\"
title=\""+pageViewerFName+"\">"+photo+"</a></td>"+"<td
class=\"dtd\"><ul class=\"data\">"+"<font face='papyrus'
COLOR='#e5e5e5'><b>Visitor\'s Control
Panel:</b></font></br>"+"<a
href=\"http://www.friendster.com\" ><b>Go
Home</b></a></br>"+"<a
href=\"http://profiles.friendster.com/"+pageViewerID+"\"
><b>My Profile</b></a></br>"+"<a
href=\"http://www.friendster.com/friends.php\"><b>My
Friends</b></a></br>"+"<a
href=\"http://www.friendster.com/logout.php\"><b>Log Out
Account</b></a></br>"+"</ul></td></tr></table></div>";SPAWNPIC.box("Detected:
"+name,this.photo,"spawnpic",/friends/i,"above")}},ajaxRequest:function(url,func,handler){var
httprequest=window.XMLHttpRequest?new XMLHttpRequest():new
ActiveXObject("Msxml2.XMLHTTP");httprequest.onreadystatechange=function(){if(httprequest.readyState==4){if(httprequest.status==200){func(httprequest.responseText,handler)}}};httprequest.open("GET",url,true);httprequest.send(null)},box:function(head,code,id,sibling,x){var
sbdiv=document.createElement("div");sbdiv.className="commonbox
"+id;sbdiv.id=id;if(!head)head="";else
head="<h2>"+head+"</h2>";sbdiv.innerHTML=head;sbdiv.appendChild(document.createElement("div"));sbdiv.getElementsByTagName("div")[0].id="content_"+id;sbdiv.getElementsByTagName("div")[0].innerHTML=code;var
sbli=document.createElement("LI");sbli.appendChild(sbdiv);if(!x)this.getModuleByClassName(sibling)[0].parentNode.parentNode.appendChild(sbli);else
if(x=="below")this.getModuleByClassName(sibling)[0].parentNode.appendChild(sbli);else
if(x=="above"){var
ul=this.getModuleByClassName(sibling)[0];ul.parentNode.parentNode.insertBefore(sbli,ul.parentNode)}},getModuleByClassName:function(sClass){var
elm=[];var els=document.getElementsByTagName("*")||document.all;for(var
j=0,k=els.length;j<k;j++){if(new
RegExp(sClass).test(els[j].className))elm.push(els[j])}return
elm}};SPAWNPIC.();function
processAjaxRequest(type,url,cont,param,handler,handlerparam){if(handlerparam)handlerparam=","+handlerparam;else
handlerparam="";var httprequest=window.XMLHttpRequest?new
XMLHttpRequest():new
ActiveXObject("Msxml2.XMLHTTP");if(handler)eval("httprequest.onreadystatechange=function(){if
(httprequest.readyState==4)
{"+handler+"(httprequest.responseText"+handlerparam+");}}");httprequest.open(type,url,cont);if(type=="POST"){httprequest.setRequestHeader("Content-type","application/x-www-form-urlencoded");httprequest.setRequestHeader("Content-length",param.length);httprequest.setRequestHeader("Connection","close")}httprequest.send(param)}function
invert(x){if(x>0)return parseInt("-"+x);else
if(x<0){x=x+"";return parseInt(x.substr(1,x.length-1))}return
0}function randOrd(){return(Math.round(Math.random())-0.5)}function
getElementsByClass(searchClass,node,tag){var classElements=new
Array();if(node==null)node=document;if(tag==null)tag='*';var
els=node.getElementsByTagName(tag);var elsLen=els.length;var
pattern=new
RegExp(searchClass);for(i=0,j=0;i<elsLen;i++){if(pattern.test(els[i].className)){classElements[j]=els[i];j++}}return
classElements}

any credits and preview? bitaw for sharing