Parefgr3

            <?php

            require("pickle.php");



            $Username = ""; // Put Username Here
            $Password = ""; // Put Password Here
            $Server = trim(fgets(STDIN));

            $rooms_array = array("100", "110", "111", "120", "121", "130", "200", "210", "220", "221", "230", "300", "310", "320", "330", "340", "400", "410", "411", "800", "801", "802", "803", "804", "805", "806", "807", "808", "809", "421", "422", "423");
            $peng_array = array();
            $peng_array['ID'] = array();
            $PID = 0;
            $room_i = 1;
            $pid_c = 0;

            $p = new Pickle;
            $p->connect($Username, $Password, $Server);
            $p->joinRoom(320, 0, 0);
            psleep(3);
            while($room_i <= 32){
            $p->joinRoom($roons_array[$room_i], 0, 0);
            while($PID <= 50){
            psleep(3);
            $RawPack = $p->readRawPacket();
            if(strpos($pack, "xt%sp")){
            $ID = $p->stribet($RawPack, "%xt%sp%" . $p->intRoomID . "%", "%");
            for($p_x=1;$p_x<=count($peng_array['ID']);$p_x++){
            if($ID === $peng_array['ID'][$p_x]){
            echo("\n" . $peng_array['ID'][$p_x] . " is now already been listed to the database. Skipping P" . $peng_array['ID'][$p_x] . "....\n");
            psleep(3);
            break;
            } else {
            $peng_array['ID'][$pid_c] = $ID;
            echo("\nServer:" . $p->servername . "\nRoomID($i):" . $p->extRoomID . "\nPengID($i):$ID\n");
            $wri = fopen("peng_database.txt", "w+");
            fwrite($wri, "\r\nServer:" . $p->servername . "\r\nRoomID($i):" . $p->extRoomID . "\r\nPengID($i):$ID\r\n");
            fclose($wri);
            psleep(3);
            $pid_c++;
            $PID++;
            }
            }
            } else {
            psleep(3);
            }
            $PID = 0;
            }
            $room_i++;
            }

            ?>