irc list alan bot - IRCForumları - IRC ve mIRC Kullanıcılarının Buluşma Noktası

SaW · 09 Nisan 2010, 23:06

PHP Kod: Kodu kopyalamak için üzerine çift tıklayın!


 <?php 
error_reporting(E_ALL & ~E_NOTICE); 
 
set_time_limit(0); 
 
$info = array( 
//Kullanıcı Rumuzu 
'nick' => 'slive', 
 
//Gerçek Ad 
'realname' => "SohbetLive", 
 
//Bağlanacağınız Sunucunun Adı 
'server' => 'irc.sohbetlive.biz', 
 
//Portu 
'port' => 6667 
); 
 
$scon = fsockopen($info['server'], $info['port']); 
 
fputs($scon, "USER " . $info['nick'] . " 0 0 :" . $info['realname'] . "\r\n"); 
fputs($scon, "NICK ". $info['nick'] . "\r\n"); 
 
$channels = array(); 
 
while ($rawmsg = fgets($scon)) 
{ 
if (preg_match("/PING :([A-Z0-9]{1,})/", $rawmsg, $pingcode)) 
{ 
fputs($scon, "PONG: " . $pingcode[1] . "\r\n"); 
} 
 
if (preg_match("/:([a-zA-Z0-9\^_\-]+) MODE ([a-zA-Z0-9\^_\-]+) :\+(\w+)/i", $rawmsg)) 
{ 
fputs($scon, "list\r\n"); 
} 
if (preg_match("/:([a-zA-Z0-9\._-]+) 322 ([a-zA-Z0-9\^_\-]+) \#(\w+) (\d+)/i", $rawmsg, $fsc)) 
{ 
$channels[$fsc[3]] = $fsc[4]; 
} 
if (preg_match("/:([a-zA-Z0-9\._-]+) 323 ([a-zA-Z0-9\^_\-]+) :End of \/LIST/i", $rawmsg)) 
{ 
break; 
} 
} 
 
fclose($scon); 
 
arsort($channels); 
?> 
<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
style="color: #0000BB"><?php echo $info['server']; ?> Kanal Listesi</td> 
</tr> 
<tr> 
<td class="heading">Kanal</td> 
<td class="heading">Kullanıcı</td> 
</tr> 
<?php 
foreach ($channels AS $chan => $user) 
{ 
?>
<?php if ( $chan != "#kanal1" && $chan != "#kanal2" && $chan != "#kanal3") : ?> 
<tr> 
<td class="data">#<?php echo $chan; ?></td> 
<td class="data"><?php echo $user; ?></td> 
</tr>
<?php endif; ?> 
<?php 
} 
?> 
</table> 
</body> 
</html>

Eklediğim;
<?php if ( $chan != "#kanal1" && $chan != "#kanal2" && $chan != "#kanal3") : ?>
bu satırda, listelenmesini istemediğin kanal isimlerini kendine göre düzenleyebilir, azaltabilir veya çoğaltabilirsin.

Benzer Konular
Konu	Konuyu Başlatan	Forum	Cevaplar	Son Mesaj
Çiçek alan sevgili mi, yoksa kitap alan sevgili mi sizi daha çok önemsiyordur?	vioLeta	IF Soruyor	33	24 Temmuz 2020 22:57
T.C" Alan Adı Kayıtları Başladı T.C alan adı alma Tc alan adı ücreti	Zen	İnternet Dünyasından Haberler	0	07 Aralık 2012 23:27
/ns list * * /cs list * * userlere yasaklamak	GhostLy	Services Hazır Kodlar	0	18 Ağustos 2009 08:22

Konuyu Toplam 1 Üye okuyor. (0 Kayıtlı üye ve 1 Misafir)

Etiketlenen Kullanıcılar
Etiketlemek istediğiniz kullanıcılar arasına virgül koyunuz. Örnek: nokta,sukunet,NucLear

5846 sayılı Fikir ve Sanat Eserleri Kanunu gereğince sitemizde telif hakkı bulunan mp3,video v.b. eserlerin paylaşımı yasaktır. Yasal işlem olması halinde paylaşan kişi yada kişilerin bilgileri gerekli kuruma verilecektir.