Просмотр архива Банерная сеть RBAN


<?
include 'dan.php';

/*
        by Dionisij (c) 2006
        dionisij@nm.ru
        Скрипт не предназначен для продажи!
        При распространении необходимо обговорить условия распространения с автором скрипта.
        Нарушение авторских прав преследуется по закону и по понятиям!
*/

include 'ver.php';

$zag="Регистрация";
if($ver=="wml"){include 'wapzag.php';} else{include 'webzag.php';}

include 'arz.php';
$zlogin=trim(htmlspecialchars(stripslashes(str_replace($ztex1, $ztex2, $zlogin))));
$zpas=trim(htmlspecialchars(stripslashes(str_replace($ztex1, $ztex2, $zpas))));
$sex=trim(htmlspecialchars(stripslashes(str_replace($ztex1, $ztex2, $sex))));
$den=trim(htmlspecialchars(stripslashes(str_replace($ztex1, $ztex2, $den))));
$mes=trim(htmlspecialchars(stripslashes(str_replace($ztex1, $ztex2, $mes))));
$yer=trim(htmlspecialchars(stripslashes(str_replace($ztex1, $ztex2, $yer))));
$otkuda=trim(htmlspecialchars(stripslashes(str_replace($ztex1, $ztex2, $otkuda))));
$xobbi=trim(htmlspecialchars(stripslashes(str_replace($ztex1, $ztex2, $xobbi))));
$mesto=trim(htmlspecialchars(stripslashes(str_replace($ztex1, $ztex2, $mesto))));
$osebe=trim(htmlspecialchars(stripslashes(str_replace($ztex1, $ztex2, $osebe))));
$emeil=trim(htmlspecialchars(stripslashes(str_replace($ztex1, $ztex2, $emeil))));
$om=trim(htmlspecialchars(stripslashes(str_replace($ztex1, $ztex2, $om))));
$epod=trim(htmlspecialchars(stripslashes(str_replace($ztex1, $ztex2, $epod))));
$isq=trim(htmlspecialchars(stripslashes(str_replace($ztex1, $ztex2, $isq))));
$site=trim(htmlspecialchars(stripslashes(str_replace($ztex1, $ztex2, $site))));
$vera=trim(htmlspecialchars(stripslashes(str_replace($ztex1, $ztex2, $vera))));


include 'avt.php';


if($status!="ban"){
if($zlogin!="" & $zpas!="" & $den!=""){
if($den>0 & $den<32 & $mes>0 & $mes<13 & $yer>1900 & $yer<2006){
if(@file("$uzer/$zlogin")){print"Этот логин уже занят. Придумайте что-нибудь более оригинальное";} else{

$ar_prov_login1=array('ё' , 'й' , 'ц' , 'у' , 'к' , 'е' , 'н' , 'г' , 'ш' , 'щ' , 'з' , 'х' , 'ъ' , 'ф' , 'ы' , 'в' , 'а' , 'п' , 'р' , 'о' , 'л' , 'д' , 'ж' , 'э' , 'я' , 'ч' , 'с' , 'м' , 'и' , 'т' , 'ь' , 'б' , 'ю' , 'Ё' , 'Й' , 'Ц' , 'У' , 'К' , 'Е' , 'Н' , 'Г' , 'Ш' , 'Щ' , 'З' , 'Х' , 'Ъ' , 'Ф' , 'Ы' , 'В' , 'А' , 'П' , 'Р' , 'О' , 'Л' , 'Д' , 'Ж' , 'Э' , 'Я' , 'Ч' , 'С' , 'М' , 'И' , 'Т' , 'Ь' , 'Б' , 'Ю', '1' , '2' , '3' , '4' , '5' , '6' , '7' , '8' , '9' , '0', ' ', '_', '-');

$ar_prov_login2=array('q' , 'w' , 'e' , 'r' , 't' , 'y' , 'u' , 'i' , 'o' , 'p' , 'a' , 's' , 'd' , 'f' , 'g' , 'h' , 'j' , 'k' , 'l' , 'z' , 'x' , 'c' , 'v' , 'b' , 'n' , 'm' , 'Q' , 'W' , 'E' , 'R' , 'T' , 'Y' , 'U' , 'I' , 'O' , 'P' , 'A' , 'S' , 'D' , 'F' , 'G' , 'H' , 'J' , 'K' , 'L' , 'Z' , 'X' , 'C' , 'V' , 'B' , 'N' , 'M' , '1' , '2' , '3' , '4' , '5' , '6' , '7' , '8' , '9' , '0', ' ', '_', '-');

$p1_zlogin=str_replace($ar_prov_login1, '', $zlogin);
$p2_zlogin=str_replace($ar_prov_login2, '', $zlogin);
if($p1_zlogin!='' & $p2_zlogin!=''){ print 'В имени можно использовать только знаки англиского или русского алфавита!';} else {
$filtr_name=@file("filtr");
foreach ($filtr_name as $key => $value){
$filtr_name[$key]=trim($value);
}
$prov_nik=str_replace($filtr_name, '', strtolower($zlogin));
if(strtolower($prov_nik)!=strtolower($zlogin)){
print 'Придумайте что-нибудь поумнее ;)';
} else {
$zapis="$zpas<br/>$sex<br/>$den<br/>$mes<br/>$yer<br/>$otkuda<br/>$xobbi<br/>$mesto<br/>$osebe<br/>$emeil<br/>$om<br/>$epod<br/>$isq<br/>$site<br/>0<br/>0<br/>rjad<br/>$time<br/>$vera<br/>";

$fp=@fopen("$uzer/$zlogin","w");
@fputs($fp,$zapis);
@fclose($fp);
chmod ("$uzer/$zlogin", 0777);
print"Регистрация прошла успешно.<br/>
Ваш логин: $zlogin <br/>
Ваш пароль: $zpas <br/>
<a href="vxod2.php?ver=$ver&amp;pas=$zpas&amp;login=$zlogin">Войти</a>";


}}}
} else {print"Введите корректную дату!";}
} else{print"Заполните все обязательные поля!";}
} else {print"с вашего ip адреса регистрация закрыта!";}




$link_her="inreg.php?pas=$pas&amp;login=$login";
include 'niz.php';


?>