Tekil Mesaj gösterimi
Alt 17 Ağustos 2008, 15:30   #6
Nickolas
Guest
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Yüzdesi:(%)
Cevap: Soket bot info




LyXiRd Nickli Üyeden Alıntı
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
Elimde Şöyle Bir Kod var ama Unix de çalışıyor
PHP Kod:   Kodu kopyalamak için üzerine çift tıklayın!
<?
function phpbot($server$port$user$nick$realname$channel) {
  
$sockname fsockopen($server$port$errno$errstr) or exit("$errno $errstr");
  
$repeat "0";
  while (
$sockread fgets($sockname512)) {
    
$sockread explode(" "$sockread);
    if (!
$repeat) {
      
fputs($sockname"USER $user x x :$realname\n");
      
fputs($sockname"NICK $nick\n");
    }
    if (
$sockread[0] == "PING") {
      
fputs($sockname"PONG :$sockread[1]\n");
    }
    if (
$sockread[1] == "001") {
      
fputs($sockname"JOIN $channel\n");
    }
    if (
fnmatch("43?"$sockread[1])) {
      
fputs($sockname"NICK $nick".str_repeat(mt_rand(09), 3)."\n");
    }
    
$repeat++;
  }
}
?>
<html>
<center>
<input type="button" onclick="<?=phpbot("İRC SERVER ADRESİ","6667","phpbot","phpbot","phpbot","#GİRİLECEK KANAL");?>" value="Connect"/>
</center>
</html>


Newline 'ları (\n) yerine Satır Başı ve Newline yap (\r\n) Windows 'ta da çalışsın.

Yani...

Kod:   Kodu kopyalamak için üzerine çift tıklayın!
<?php $newline = ((substr(PHP_OS, 0, 3) == 'WIN') ? "\r\n" : "\n"); ?>

Sonra da \n yerine $newline yaz..

Kod:   Kodu kopyalamak için üzerine çift tıklayın!
if ($sockread[1] == "001") { fputs($sockname, "JOIN $channel" . $newline); }


 
Alıntı ile Cevapla

IRCForumlari.NET Reklamlar
sohbet odaları eglen sohbet reklamver