Просмотр файла dchat/online.php

<?

                    //                                      //////             //                                                //                        //           //
                    //                                      //       //                          //            /////                     /////                 
                    /////    \\        //          //        //         //       //    //        //     //      //     //               //           //
                    //   //     \\     //           //          //       //    //         //      //      //     //      //////     //           // 
                    //   //       \\ //             //        //         //      //    //         //      //     //               //     //           //
                    /////         \//               //////            //         //               //      //     //     /////        //           //  
                                         //                                                                                                                                    /////
                                        //

                  ///////////////////////////      [email protected]      ///////////////////////////////                         

$ttime=time();
$ofti=$ttime-200;
$ss = @file("$rek/online.txt");
$strok = sizeof($ss);
$nko=0;
$tpo=0;
while($nko<=$strok){
$text=@file("$rek/online.txt");
$text=explode(":||:",$text[$nko]);
$tza=trim($text[0]);
$logoni=trim($text[1]);
$meo=trim($text[2]);
$komo=trim($text[3]);
if($tza>$ofti & $logoni!=$login){$zaponp[$tpo]="$tza:||:$logoni:||:$meo:||:$komo\r\n"; $tpo=$tpo+1;}
$nko=$nko+1;}

$zaponp[$tpo]="$ttime:||:$login:||:$lokpo:||:$nr\r\n";


$fp=@fopen("$rek/online.txt","w");
@fputs($fp,"");                                   
@fclose($fp);
@chmod ("$rek/online.txt", 0777);

$nko=0;
while($nko<=$tpo){
$fp=@fopen("$rek/online.txt","a");
@fputs($fp,"$zaponp[$nko]");                                   
@fclose($fp);
$nko=$nko+1;}


?>