X   Сообщение сайта
(Сообщение закроется через 3 секунды)



 

Здравствуйте, гость (

| Вход | Регистрация )

Открыть тему
Тема закрыта
> Алгоритм очистки ключей с директа
Jeck
Jeck
Topic Starter сообщение 26.5.2008, 1:00; Ответить: Jeck
Сообщение #1


<?
setlocale(LC_ALL,"ru_RU.CP1251");

function isRussian($char) {
    $char = ord(strtolower($char));
    return (($char >= ord('а') &&  $char <= ord('я')) || $char == ord('ё'));
}

function isLatin($char) {
    $char = ord(strtolower($char));
    return ($char >= ord('a') &&  $char <= ord('z'));
}

function isLetter($char) {
    return (isLatin($char) || isRussian($char));
}

function getLang($char) {
    if (isLatin($char)) {
        return 0;
    } else if (isRussian($char)) {
        return 1;
    } else {
        return -1;
    }
}

// Проверяет не шучит ли яндекс. Возвращает true в случае обмана.
function yandexFreak($str) {
    $pLang = -1;
    for ($i=0,$l=strlen($str);$i<$l;++$i) {
        if (isLetter($str{$i})) {
            $cLang = getLang($str{$i});
            if ($pLang != -1) {
                if ($cLang != $pLang) {
                    return true;
                }
            }
            $pLang = $cLang;
        } else {
            $pLang = -1;
        }
    }
    return false;
}

var_dump(yandexFreak("Какой то кейворд")); // true
var_dump(yandexFreak("Какой то нeправильный кейворд")); // false

?>


ну и если надо очистить файл

$input = fopen("keywords.txt","r"); // Файл с ключами для очистки
$output = fopen("keywords_new.txt","w"); // Файл с результатом очистки

while (!feof($input)) {
    $keyword = fgets($input);
    if (!yandexFreak($keyword)) {
        fputs($output,$keyword);
    }
}

fclose($input);
fclose($output);


--------------------
Jeck.ru
0
Вернуться в начало страницы
 
Ответить с цитированием данного сообщения
Jeck
Jeck
Topic Starter сообщение 26.5.2008, 3:01; Ответить: Jeck
Сообщение #2


Вот что отфильтровал из 30,000 кеев

"бассейн сдюcшор приморского района"
"строй-проект ххi века"
"товары ххi века"
1086 cтрелковый полк
18 cтальных колес
4а315 мs4у3 электродвигателей
abb cистема эмиссионных измерений
abuki info aуди
alcоа металлургический завод
angel clubй спорт клуб
animal джaz три полоски
animal джazz три полоски
animal джаz видео три полоски
animal джаz текст двойной ценой
animal джаz три
animal джаz три полоски
animal джаz три полоски mp3
animal джаz три полоски аккорды
animal джаz три полоски видео
animal джаz три полоски клип
animal джаz три полоски слова
animal джаz три полоски текст
animal джаz цоколь
animal джаzz три полоски
animal джаzzzzzzz три полоски
animalджаз три полоски
apeндa дизeльныx гeнepaтopoв
apeнда торговых мест ново переделкино
apxив poccийcкoй пpeccы
apxив poccийcкoй пpeccы 2006
apхитeктypнoe пpoeктиpoвaниe кoттeджeй
armadill дверные ручки oстрана производитель
ashampooв? office 2008
asus являeтcя пocтaвщикoм
atemi am 1200 вибромассажeр
audi 80 техybxtcrbt характеристики
aбис персонал поиск сотрудников
aбсолют банк москва
aбхазия сбитый самолет
aвaнгaрд омск хоккей
aвто продажа нн
aвто рынок челябинск
aвтозапчасти ауди 100 москва
aвтоматы защиты двигателей
aвтомобиль toyota isi
aвтомобильн ый рынок минск
aвтосалон хундай тагаз
aвтосалон хундай тагаз санта фе
aвтосалоны одессы тойота
aвтотюнинг vw touran
aгентство недвижимости черногория
aгентство недвижимости ялта кик
aинструкция audi delta
aккумулятор 12v 7a h
aккумулятор samsung r20
aлтaйский трaктoрный зaвoд aтз
aлттрaк aлтaйский трaктoрный зaвoд
aлттрaк aлтaйский трaктoрный зaвoд aтз
aрeндa дизeль гeнeрaторов
aрeндa элитныx квaртир
aренда звука alto микрофонов пультов
aренда недвижимости без посредников
aренда торговых помещений
aренда эксклюзивных яхт
aренда яхт класса люкс
aренда яхт фрахтовка
aфиша санкт петербурга
baкуумный aнтицeллюлитный мaccaжep
behringer xenнx 1002 цена
best cервер печати
blackdecker aсv1205 автомобильный пылесос цена
blackdecker aсv1205 цена
bluesoleil 1.6 cкачать лицензию
bmw 1 cерии
bmw 3 cерии
bmw 3 cерии e46
bmw 520i тюнинг обвеca
bmw 525iа 2005 года
bodysculptor exсell стоимость
bodysculptor exсell цена
bork сg mmn 9117 si
bosсh стиральная машина
boсsh стиральные машины
btб 24 банк

Всего 84. Ложные срабатывания конечно есть но на 30,000 не так уж и много.

Сообщение отредактировал Jeck - 26.5.2008, 3:01


--------------------
Jeck.ru
Вернуться в начало страницы
 
Ответить с цитированием данного сообщения
poolk
poolk
сообщение 26.5.2008, 12:38; Ответить: poolk
Сообщение #3


странная у тебя репутация)))

Замечание модератора:
Эта тема была закрыта автоматически ввиду отсутствия активности в ней на протяжении 100+ дней.
Если Вы считаете ее актуальной и хотите оставить сообщение, то воспользуйтесь кнопкой
или обратитесь к любому из модераторов.


--------------------
Вернуться в начало страницы
 
Ответить с цитированием данного сообщения
Открыть тему
Тема закрыта
1 чел. читают эту тему (гостей: 1, скрытых пользователей: 0)
Пользователей: 0


Свернуть

> Похожие темы

  Тема Ответов Автор Просмотров Последний ответ
Открытая тема (нет новых ответов) Подкиньте базу ключей тематики wallpaper - Обои для рабочего стола
0 uahomka 865 27.2.2024, 0:38
автор: uahomka
Горячая тема (нет новых ответов) Тема имеет прикрепленные файлыКупоны и аккаунты Google Adwords и купоны Яндекс.Директа
Продаются, покупаются, дарятся и меняются только в этой теме.
970 bum 406793 23.1.2024, 16:17
автор: temych_kbr
Горячая тема (нет новых ответов) Тема имеет прикрепленные файлыПодбор ключей + LSI копирайтинг + Оформление и публикация | Классические копирайтинг и рерайт
Работаем с 2009 года. Гарантия качества.
29 Dr_Tapac 19356 2.12.2023, 22:33
автор: Dr_Tapac
Открытая тема (нет новых ответов) Подбор ключей + LSI копирайтинг + Оформление и публикация | Копирайт и рерайт
19 Dr_Tapac 4178 12.10.2020, 15:38
автор: Dr_Tapac
Открытая тема (нет новых ответов) Тема имеет прикрепленные файлыНужна помощь в поднятии ключей из ТОП 10-20
10 ACTIV1 8916 15.5.2020, 20:45
автор: Wachowski


 



RSS Текстовая версия Сейчас: 19.4.2024, 3:39
Дизайн