You're so dumb
function lookUpBL_ID(%b)
{
if(!isInt(%b))
return;
if(!isObject(RTBCC_Socket))
return;
$RTBWhois::ID[%b]=1;
RTBCC_Socket.getUserInfo(%b);
}
function onRTBWhois(%bl_id,%name,%status,%online)
{
$RTBWhois::ID[%bl_id]=0;
echo(%name@" | "@%bl_id@" | "@%status@" | "@%online);
}
package RTBWhois
{
function RTBCC_Socket::onPlayerInfoResponse(%this,%parser,%packet)
{
%id = %packet.find("id").cData;
%name = %packet.find("name").cData;
%status = %packet.find("status").cData;
%lastOnline = (%packet.find("last_online").cData $= "-1") ? "Unknown" : timeDiffString(%packet.find("last_online").cData,0) SPC "ago";
if(!$RTBWhois::ID[%id])
{
parent::onPlayerInfoResponse(%this,%parser,%packet);
return;
}
switch(%status)
{
case 0:
%textStatus = "Online";
case 1:
%textStatus = "Singleplayer";
case 2:
%textStatus = "Hosting LAN";
case 3:
%textStatus = "Hosting";
case 4:
%textStatus = "Playing LAN";
case 5:
%textStatus = "Playing";
default:
%textStatus = "Offline";
}
onRTBWhois(%id,%name,%textStatus,%lastOnline);
}
};
activatepackage(RTBwhois);
requires RTB, but so much less code ;-;
Also, if you make something like you did, include name history and name lookup