Кто Можеть дороботать Скрипт?

<?php 
set_time_limit(0); 
$irc["server"] = "galaxy.mobstudio.ru"; //сервер 
$irc["port"] = "6667"; //порт 
$irc["channel"] = "main"; //планета 
$bot["protocol"] = ":ru IDENT 33 -1 4030 :GALA"; 
$bot["user"] = "USER 12345678 password  0"; 
$fsock = fsockopen($irc["server"], $irc["port"]); //коннектимся 
     $no_connect = 1; 
                 { 
                     $str = fread($fsock, 1024); 
                 } 
                 { 
                     $str = fread($fsock, 1024); 
                 } 
     fwrite($fsock,"" .$bot["kod"].$bot["user"]."\r\n"); 
                 { 
                     $str = fread($fsock, 1024); 
                     $str = fread($fsock, 1024); 
                 } 
                 fwrite($fsock, "JOIN ".$irc["channel"]."\r\n"); 
     while (1) 
     { 
         if ($str = fread($fsock, 1024)) 
             { 
                 fwrite($fsock, "PONG ".$irc["channel"]."\r\n"); 
             } 
             elseif (stristr($str,"PONG") && $no_connect == 1) 
             { 
             if (substr($str, 0, 6) == "PING :")  
                 unset($no_connect); 
                 fwrite($fsock, "PING ".time()."\r\n"); 
                 while (!substr($str, 0, 4) == "PONG") 
                 { 
                     $str = fread($fsock, 1024); 
                 }  
             }              
         } 
                 sleep(0); // Время работы скрипта в секундах, если 0 значит безконечно. 
                 fclose($fsock); 
?>