on :sockopen:fbid~:{
if ($sockerr) { $2-3 Socket Connection Error! | return }
tokenize 124 $sock($sockname).mark
var %fbid = sockwrite -nt $sockname
%fbid GET $+(/,$1) HTTP/1.1 | %fbid Connection: close
%fbid Host: $+($sock($sockname).addr,$str($crlf,2))
}
on $:text:/^!fbid\s(.)/iS:*:{
if (!$($+(%,control,.,$site,.,#,.,$network),2)) {
inc -u5 $+(%,control,.,$site,.,#,.,$network)
var %1 = $regml(1), %f = $+(fbid~,$ticks)
sockopen %f graph.facebook.com 80
sockmark %f $+($remove(%1,$chr(32)),|,.msg $iif(#,#,$nick),|,$&
FaceBook Info About %1 ->,|, https://apps.facebook.com/inthemafia/track.php?next_controller=stats&next_action=view&next_params={"user"%3A")"}
}
}
on :sockread:fbid~:{
tokenize 124 $sock($sockname).mark | var %link = $4 | sockread &fbsockreader
var %fb = $bvar(&fbsockreader,1-).text | if ($sockerr) { $2-3 Socket Reading Error! | return }
elseif (error isin %fb) { $2-3 There is No Such Facebook User Named $qt($1) Found! }
else { noop $regex(%fb,/"id"(.*)/) | var %fbid. = $regsubex($remove($regml(1),:,$&
$chr(44),$chr(125)),/""|"/g,$chr(32)) | $remove($2-10,%link) ID: $token(%fbid.,1,32) $&
<> $replace($token(%fbid.,2-4,32),name,Full Name:) <> Gender: $&
$iif($regex($token(%fbid.,4-,32),/gender\s(\S+)/),$regsubex($regml(1),/^(.)/,$&
$upper(\1)),None) <> Country: $iif($regex($token(%fbid.,4-,32),/locale\s(\S+)/),$&
$regml(1),None) <> MAfia Wars Link: $+(%link,$token(%fbid.,1,32)) | sockclose $sockname
}
}
jethro i planning to add something more but need your cooperation
:)
jethro 1 thing change "This script below is a FaceBook checker. It performs a basic check on a user you want to obtain his or her identification number, full name, gender, and country location. I hope some people find this snippet useful for their personal use. The command is commonly self-explanatory: !fbid "
with
"This script below is a FaceBook checker. It performs a basic check on a user you want to obtain his or her identification number, full name, gender, and country location. I hope some people find this snippet useful for their personal use. The command is commonly self-explanatory: !fbid <FACEBOOK USERNAME/UID>"
THANX Jhetro :)
@Jethro <+aditya> -check 10201
<~MMC> aditya: Nothing was found on bans list.Facebook ID >> 10201
hiiiiiiiiii Jethro can u help me to make a script like this one . For checking the ban database if the given id is banned or not thankyouverymuch in advance