Просмотр архива Скрипт автообмена ссылками


<?



////////////////////////////////////////////////////////////////////////////

////         Автор скрипта: Трофимов Дмитрий Сергеевич ака dimidrol       // 

////                E-mail: dima@trofimov.com.ru                          //

////            Home pages: http://www.trofimov.com.ru                    //

////        Версия скрипта:  1.3                                          //

////////////////////////////////////////////////////////////////////////////



include ("config.php");



print"

<title>$title</title>

<meta http-equiv=Content-Type content="text/html; charset=windows-1251">

<meta content="$keywords" name=keywords>

<meta content="$description" name=description>

<meta content="Trofimov" name=author>";



switch($trofimov) :

default :

print "

<center>

<table border=0 width=550 valign=top>

<tr>

    <td width=8 rowspan=2 bgColor=#EFEEE8></td>

    <td width=27 rowspan=2 ></td>

    <td width=23  rowspan=2 bgColor=#F7F6F3></td>

    <td width=10 rowspan=2></td>

    <td width=521 height=539 bgColor=#F7F6F3 valign=top>$q

$w

$e

$r

<p><font face="Accord Heavy SF" size="3"><a href="index.php?trofimov=add">$p</a></font></p>

<p>$a

<p><textarea rows="5" name="html" cols="30">$text

</textarea> </td>

    <td width=8 rowspan=2 bgColor=#E76301></td>

    <td width=8 rowspan=2 ></td>

    <td width=33 rowspan=2 bgColor=#EFEEE8></td>

    <td width=31 rowspan=2 bgColor=#E76301></td>

</tr>

<tr>

<td width=521 height=1 bgColor=#F7F6F3><center><p><a href=$testi><font size="1">$co$pyr$ights $cy $qwe </font></p></a></center></td>                                                                                        

</tr>

</table>

</center>

";



break;

case("add") :



print"



<center>

<table border=0 width=550 valign=top>

<tr>

    <td width=8 rowspan=2 bgColor=#EFEEE8></td>

    <td width=27 rowspan=2 ></td>

    <td width=23  rowspan=2 bgColor=#F7F6F3></td>

    <td width=10 rowspan=2></td>

    <td width=521 height=539 valign=top bgColor=#F7F6F3>

<table>

<form method="POST" action="index.php?trofimov=result">

<tr>

<td width="266" height="1">$rt</td>

<td width="274" height="1">

<p><input type="text" name="Url" size="30" value="http://"></p>

</td>

</tr>

<tr>

<td width="266" height="27">$rs</td>

<td width="274" height="27"><input type="text" name="knopa" size="30"></td>

</tr>

<tr>

<td width="266" height="35">$ry</td>

<td width="274" height="35"><input type="text" name="prov" size="30" value="http://"></td>

</tr>

<tr>

<td width="266" height="25"></td>

<td width="274" height="25"><input type="submit" value="Отправить" name="Sub"><input type="reset" value="Сбросить"></p></form></td>

</tr>

</table></td>

    <td width=8 rowspan=2 bgColor=#E76301></td>

    <td width=8 rowspan=2 ></td>

    <td width=33 rowspan=2 bgColor=#EFEEE8></td>

    <td width=31 rowspan=2 bgColor=#E76301></td>

</tr>

<tr>

<td width=521 height=1 bgColor=#F7F6F3><center><p><a href=$testi><font size="1">$co$pyr$ights $cy $qwe </font></p></a></center></td>

</tr>

</table>

</center>

";



break;

case("result") :



if ($Url == "http://") {print "$t"; exit;}

if ($knopa == "") {print "$y"; exit;}

if ($prov == "http://") {print "$u"; exit;}







print "Поиск на правельность размещения ссылки";



$word="trofimov scripts"; 

$file="$prov";



$open=fopen($file,"r");

while(!feof($open)) $search.=fgets($open,1024);

fclose($open);



if(eregi(strtolower($word),strtolower($search)))

 {

 echo "Нажмите кнопку Продолжить - </form> 

<form action=index.php?trofimov=ok method=post>

<input type=hidden name=trof value='$Url'>

<input type=hidden name=trofi value='$knopa'>

<center>

<input type=submit value='         ПРОДОЛЖИТЬ         '>";

 }



 else

 {

 echo "$i";

 }



print "<center><p><a href=$testi><font size="1">$copy</font></p></a></center>";



break;

case("ok") :



$trofi = ereg_replace(":","&#58;",$trofi);

$text = "$trof::$trofi";

$text = htmlspecialchars($text);



print"$o<br><center><p><a href=$testi><font size="1">$copy</font></p></a></center>";



$open=fopen("baza.data","a");

fwrite($open,"$textrn");

fclose($open); 



break;





case("html") :



$xfile = @file("baza.data");

$random_num = rand (0,count($xfile)-1);

$udata = explode("::",$xfile[$random_num]);

print "<a href=$udata[0]>$udata[1]</a>";



break;



case("java") :



$xfile = @file("baza.data");

$random_num = rand (0,count($xfile)-1);

$udata = explode("::",$xfile[$random_num]);

print "document.write('<font size=3><a href=$udata[0] target=_blank>$udata[1]</a></font>');";



break;



endswitch;

                                                                                                                                                                                                                                                

?>