-	script	@info	-1,{
OnInit:
	bindatcmd "info",strnpcinfo(3)+"::OnAtcommand",0,99;
	end;
OnAtcommand:
if (.@atcmd_numparameters <= 0 ) {
		message(strcharinfo(PC_NAME), sprintf(_$("Usage: %s <Name>"), .@atcmd_command$));
		message(strcharinfo(PC_NAME), sprintf(_$("%s failed."), .@atcmd_command$));
		end;
}


.@input$ = .@atcmd_parameters$;
.@input1$[1] = .@atcmd_parameters$[1];
.@users = getusers(1);
.@users1 = getusers(0);

		.@qs = query_sql("SELECT `account_id`, `name`, `char_id`, `sex`, `online`, `base_level` FROM `char` WHERE `name` = '"+escape_sql(.@input$+" "+.@input1$[1])+"' LIMIT 2", .@aids, .@name$, .@cids, .@sex$, .@online, .@baselv);
if(.@qs == 1){
		for(set .@i,0; .@i<1 ; set .@i,.@i+1){
		dispbottom "         [ Info Player ]";
		dispbottom "================";
        dispbottom "Online Server: "+.@users+" Player(s)";
		dispbottom "Name: "+.@name$[.@i]+" || Base Level: "+.@baselv;
		if ( .@online[.@i] == 1 ){ //If online display..
        dispbottom "Status: Online";
		getmapxy(.@map$, .@x, .@y, 0, .@name$[.@i]);
		dispbottom "Map: "+.@map$+","+.@x+","+.@y+"";
		dispbottom "IP address: "+getcharip(.@name$[.@i]);
		}
		else {
		dispbottom "Status: Offline";
		}
		dispbottom "Aid: "+.@aids[.@i];
        dispbottom "Cid: "+.@cids[.@i];
        dispbottom "Sex: "+.@sex$[.@i];
		
	    dispbottom "================";
		if ( .@online[.@i] == 1 ){
		message(.@aids[.@i], "Someone is spying on you..");
		}
		}	
}
else {
message(strcharinfo(PC_NAME), sprintf(_$("Usage: %s <Name>"), .@atcmd_command$));
message(strcharinfo(PC_NAME), sprintf(_$("Player not found."), .@atcmd_command$));

end;
}
}