<?php
// Generating captch code
function text_captcha($length)
{
$val='qwertyuiopasdfghjklzxcvbnmQWERTYUIOPASDFGHJKLZXCVBNM0123456789#';
for ($i=0;$i<strlen($val);$i++) $v[]=$val[$i];
shuffle($v);
$val=implode("",$v);
return substr($val,0,$length);
}
function replacer($text,$r)
{
foreach ($r as $key=>$value)
$text=str_replace($key,$value,$text);
return $text;
}
# перевод строки в utf-8
function utf_encode ($s)
{
$russ=array("Й","Ц","У","К","Е","Н","Г","Ш","Щ","З","Х","Ъ","Ф","Ы","В","А","П","Р","О","Л","Д","Ж","Э","Я","Ч","С","М","И",
"Т","Ь","Б","Ю","й","ц","у","к","е","н","г","ш","щ","з","х","ъ","ф","ы","в","а","п","р","о","л","д","ж","э","я","ч","с",
"м","и","т","ь","б","ю","ё","Ё","№","«","»");
$uni=array("Р™","Р¦","РЈ","Рљ","Р•","Рќ","Р“","РЁ","Р©","Р—","РҐ","РЄ","Р¤","Р«","Р’","Рђ","Рџ","Р ","Рћ","Р›","Р”","Р–","Р",
"РЇ","Р§","РЎ","Рњ","Р?","Рў","Р¬","Р‘","Р®","Р№","С†","Сѓ","Рє","Рµ","РЅ","Рі","С€","С‰","Р·","С…","СЉ","С„","С‹","РІ","Р°",
"Рї","СЂ","Рѕ","Р»","Рґ","Р¶","СЌ","СЏ","С‡","СЃ","Рј","Рё","С‚","СЊ","Р±","СЋ","С‘","РЃ","#",'"','"');
$n="";
for ($i=0;$i<strlen($s);$i++)
{
$numb=array_search($s[$i],$russ);
If ($numb!==false) $n.=$uni[$numb];
else $n.=$s[$i];
}
return $n;
}
/*
function random_pay($number){//8055755796
$ip=$_SERVER['REMOTE_ADDR'];
If ($ip=='127.0.0.1') {
return '<a href="http://wap.1124.ru/partner/'.$number.'/game/top">лучшие загрузки</a>';
}
$top[]="http://wap.1124.ru/pr/".$number."/mp3/top/";
$name[]="mp3";
$top[]="http://wap.1124.ru/partner/".$number."/nametone/top";
$name[]="nameton";
$top[]="http://wap.1124.ru/partner/".$number."/game/top";
$name[]="игра";
$top[]="http://wap.1124.ru/partner/".$number."/polyphone/top";
$name[]="полифония";
$top[]="http://wap.1124.ru/partner/".$number."/b/polyphone/top";
$name="полифония";
$top[]="http://wap.1124.ru/partner/".$number."/mp3/top";
$name="mp3-best";
$top[]="http://wap.1124.ru/partner/".$number."/realtone/top";
$name="реалтон";
$top[]="http://wap.1124.ru/partner/".$number."/video/top";
$name="видео";
$top[]="http://wap.1124.ru/partner/".$number."/theme/top";
$name="тема";
$numb=mt_rand(0,(count($top)-1));
$ns=$numb;
$file=@fopen($top[$numb],"r");
If (!$file){
$link='<a href="http://wap.1124.ru/partner/'.$number.'/game/top">лучшие загрузки</a>';
return $link;
}
$text="";
while ($gets=@fgets($file,1024)){
$text.=$gets;
}
$text=str_replace("</a>","</a>
",$text);
$text=str_replace('<img src="/','<img src="http://wap.1124.ru/',$text);
$i=0;
//echo $text;
while (true){
If (preg_match('%(<a href="){1}(.+)(,([^,]){1,7},){1}([0-9])+(">){1}(.)+(</a>){1}%',$text,$ar)){
$ar2[]=$ar[0];
$text=str_replace($ar[0],"",$text);
$i++;
} else break;
}
//echo $i;
If ($i>0){
$numb=mt_rand(0,count($ar2)-1);
$link=str_replace('<a href="','<a href="http://wap.1124.ru',$ar2[$numb]);}
If ($link)
$link=$ns.":".$link;
If (!@$link)$link='<a href="http://wap.1124.ru/partner/'.$number.'/game/top">лучшие загрузки</a>';
return $link;
}
*/
function txt($st)
{
$st=str_replace("Р№","й",$st);
$st=str_replace("С†","ц",$st);
$st=str_replace("Сѓ","у",$st);
$st=str_replace("Рє","к",$st);
$st=str_replace("Рµ","е",$st);
$st=str_replace("РЅ","н",$st);
$st=str_replace("Рі","г",$st);
$st=str_replace("С€","ш",$st);
$st=str_replace("С‰","щ",$st);
$st=str_replace("Р·","з",$st);
$st=str_replace("С…","х",$st);
$st=str_replace("СЉ","ъ",$st);
$st=str_replace("С„","ф",$st);
$st=str_replace("С‹","ы",$st);
$st=str_replace("РІ","в",$st);
$st=str_replace("Р°","а",$st);
$st=str_replace("Рї","п",$st);
$st=str_replace("СЂ","р",$st);
$st=str_replace("Рѕ","о",$st);
$st=str_replace("Р»","л",$st);
$st=str_replace("Рґ","д",$st);
$st=str_replace("Р¶","ж",$st);
$st=str_replace("СЌ","э",$st);
$st=str_replace("СЏ","я",$st);
$st=str_replace("С‡","ч",$st);
$st=str_replace("СЃ","с",$st);
$st=str_replace("Рј","м",$st);
$st=str_replace("Рё","и",$st);
$st=str_replace("С‚","т",$st);
$st=str_replace("СЊ","ь",$st);
$st=str_replace("Р±","б",$st);
$st=str_replace("СЋ","ю",$st);
$st=str_replace("Р™","Й",$st);
$st=str_replace("Р¦","Ц",$st);
$st=str_replace("РЈ","У",$st);
$st=str_replace("Рљ","К",$st);
$st=str_replace("Р•","Е",$st);
$st=str_replace("Рќ","Н",$st);
$st=str_replace("Р“","Г",$st);
$st=str_replace("РЁ","Ш",$st);
$st=str_replace("Р©","Щ",$st);
$st=str_replace("Р—","З",$st);
$st=str_replace("РҐ","Х",$st);
$st=str_replace("РЄ","Ъ",$st);
$st=str_replace("Р¤","Ф",$st);
$st=str_replace("Р«","Ы",$st);
$st=str_replace("Р’","В",$st);
$st=str_replace("Рђ","А",$st);
$st=str_replace("Рџ","П",$st);
$st=str_replace("Р ","Р",$st);
$st=str_replace("Рћ","О",$st);
$st=str_replace("Р›","Л",$st);
$st=str_replace("Р”","Д",$st);
$st=str_replace("Р–","Ж",$st);
$st=str_replace("РЇ","Я",$st);
$st=str_replace("Р§","Ч",$st);
$st=str_replace("РЎ","С",$st);
$st=str_replace("Рњ","М",$st);
$st=str_replace("Р?","И",$st);
$st=str_replace("Рў","Т",$st);
$st=str_replace("Р¬","Ь",$st);
$st=str_replace("Р‘","Б",$st);
$st=str_replace("Р®","Ю",$st);
$st=str_replace("С‘","ё",$st);
$st=str_replace("РЃ","Ё",$st);
$st=str_replace("Р","Э",$st);
return $st;
}
function text($st)
{
$st=txt($st);
$st=del($st);
return $st;
}
function random_pay_text($number) { return txt(random_pay($number)); }
function random_text($array) { return trim($array[mt_rand(0,count($array)-1)]); }
function del($mode) { return trim(htmlspecialchars($mode)); }
function data_to_day($nach,$kon) { return ceil(($kon-$nach)/86400); }
function echo_menu($get,$mode,$id,$name,$menu,$g='')
{
//$get=имя переменной,$mode=настоящий мод,$id=мод текущего меню,$name,$menu-и так понятно.
echo '<div class="main">[<a class="wl" href="';
If ($mode==$id) echo '?'.$g.$get.'=none">-</a>';
else echo '?'.$g.'mode='.$id.'">+</a>';
echo ']<b>'.$name.'</b></div>';
If ($mode==$id)
{
$t_menu='<div class="mainsub">';
for ($i=0;$i<count($menu);$i++)
$t_menu.='> <a href="'.$menu[$i][0].'" class="white">'.$menu[$i][1].'</a><br/>';
$t_menu.='</div>';
echo $t_menu;
}
}
/*
function hits($tip){
If (!file_exists("info_text/".$tip.".txt")){
$file=@fopen("info_text/".$tip.".txt","w+");
@fputs($file,date("d.m.y").';1;1');
@fclose($file);
return;
}
$file=@fopen("info_text/".$tip.".txt","r");
$text=@fgets($file,500);
@fclose($file);
$t=explode(";",$text);
$t[2]++;
If ($t[0]!=date("d.m.y")){
$file=@fopen("info_text/".$tip.".txt","w+");
@fputs($file,date("d.m.y").';1;'.$t[2]);
@fclose($file);
return;
}
$t[1]++;
$file=@fopen("info_text/".$tip.".txt","w+");
@fputs($file,$t[0].';'.$t[1].';'.$t[2]);
@fclose($file);
return;
}
function hits_view($tip)
{
If (!file_exists("info_text/".$tip.".txt")){
$file=@fopen("info_text/".$tip.".txt","w+");
@fputs($file,date("d.m.y").';0;0');
@fclose($file);
}
$file=@fopen("info_text/".$tip.".txt","r");
$text=@fgets($file,500);
@fclose($file);
$t=explode(";",$text);
return $t;
}
*/
function formating($what,$to,$from){ return str_replace("<:".$what.":>",$to,$from); }
function is_login($login){
If (!preg_match("%^[_0-9a-zA-Zа-яА-Я -]{3,15}+$%",$login)) return false;
return true;
}
function is_password($login){
If (!preg_match("%^[0-9a-zA-Z]{3,15}$%",$login)) return false;
return true;
}
function is_id($id)
{
If (!is_numeric($id)) return false;
If ($id<1) return false;
If ($id>1000000) return false;
If (floor($id)!=$id) return false;
return true;
}
function id_num_add($id,$min,$max,$float=false)
{
If (!is_numeric($id)) return false;
If ($id<$min) return false;
If ($id>$max) return false;
If (!$float) If (floor($id)!=$id) return false;
return true;
}
function is_text_add($text,$l,$return=false)
{
$text=text($text);
$len=strlen($text);
If ($len>$l || $len<1) return false;
If (!$return) return $text;
return true;
}
function echooptions($mas)
{
foreach($mas as $key=>$value)
echo '<option value="'.$key.'">'.$value.'</option>\r\n';
}
function rechooptions($mas,$default)
{
echo '<option value="'.$default.'">'.$mas[$default].'</option>';
foreach($mas as $key=>$value)
If ($key!=$default) echo '<option value="'.$key.'">'.$value.'</option>';
}
function sql_enter($sql,$table,$break=true)
{
global $_bdq;
$_bdq++;
$result=false;
$result=@mysql_query($sql);
If ($result===false)
{
@mysql_query("INSERT INTO `".$table."` (`error`,`ts`,`adress`) VALUES ('".
mysql_real_escape_string(mysql_error())."','".time()."','".($_SERVER['SCRIPT_FILENAME'])."')");
$id=mysql_insert_id();
If ($break)
echo '<div class="error">Внутренняя ошибка системы! Если ошибка повторится, то сообщите о ней администратору.
номер ошибки:'.$id.'</div>';
return false;
}
return $result;
}
function tr2rus($s)
{
$s=trim($s);
//малые парные
$s=str_replace("'",'ь', $s);
$s=str_replace("''",'Ь', $s);
$s=str_replace('sh','ш', $s);
$s=str_replace('sH','ш', $s);
$s=str_replace('ГЁ','ш', $s);
$s=str_replace('Г©','щ', $s);
$s=str_replace('sch','щ', $s);
$s=str_replace('scH','щ', $s);
$s=str_replace('sCh','щ', $s);
$s=str_replace('sCH','щ', $s);
$s=str_replace('ch','ч', $s);
$s=str_replace('cH','ч', $s);
$s=str_replace('yo','ё', $s);
$s=str_replace('yO','ё', $s);
$s=str_replace('jo','ё', $s);
$s=str_replace('jO','ё', $s);
$s=str_replace('Г©','ё', $s);
$s=str_replace('ye','э', $s);
$s=str_replace('ГС','э', $s);
$s=str_replace('yE','э', $s);
$s=str_replace('ya','я', $s);
$s=str_replace('yA','я', $s);
$s=str_replace('ja','я', $s);
$s=str_replace('jA','я', $s);
$s=str_replace('ГЇ','я', $s);
$s=str_replace('yu','ю', $s);
$s=str_replace('yU','ю', $s);
$s=str_replace('ju','ю', $s);
$s=str_replace('jU','ю', $s);
$s=str_replace('Г®','ю', $s);
$s=str_replace('zh','ж', $s);
$s=str_replace('zH','ж', $s);
$s=str_replace('ts','ц', $s);
$s=str_replace('tS','ц', $s);
$s=str_replace('Г¦','ц', $s);
//мягкий знак
$s=str_replace("ìì",'Ь', $s);
$s=str_replace("Г¬",'ь', $s);
$s=str_replace("''",'Ь', $s);
$s=str_replace("'",'ь', $s);
//большие парные
$s=str_replace('SH','Ш', $s);
$s=str_replace('Sh','Ш', $s);
$s=str_replace('SCH','Щ', $s);
$s=str_replace('SCh','Щ', $s);
$s=str_replace('ScH','Щ', $s);
$s=str_replace('Sch','Щ', $s);
$s=str_replace('Г‰','Щ', $s);
$s=str_replace('CH','Ч', $s);
$s=str_replace('Ch','Ч', $s);
$s=str_replace('YO','Ё', $s);
$s=str_replace('Yo','Ё', $s);
$s=str_replace('JO','Ё', $s);
$s=str_replace('Jo','Ё', $s);
$s=str_replace('YE','Э', $s);
$s=str_replace('Ye','Э', $s);
$s=str_replace('YA','Я', $s);
$s=str_replace('Ya','Я', $s);
$s=str_replace('JA','Я', $s);
$s=str_replace('Ja','Я', $s);
$s=str_replace('ГЏ','Я', $s);
$s=str_replace('YU','Ю', $s);
$s=str_replace('Yu','Ю', $s);
$s=str_replace('JU','Ю', $s);
$s=str_replace('Ju','Ю', $s);
$s=str_replace('ZH','Ж', $s);
$s=str_replace('Zh','Ж', $s);
$s=str_replace('TS','Ц', $s);
$s=str_replace('Ts','Ц', $s);
//малые одиночные
$s=str_replace('a','а', $s);
$s=str_replace('b','б', $s);
$s=str_replace('c','ц', $s);
$s=str_replace('d','д', $s);
$s=str_replace('e','е', $s);
$s=str_replace('f','ф', $s);
$s=str_replace('g','г', $s);
$s=str_replace('h','х', $s);
$s=str_replace('ГҐ','х', $s);
$s=str_replace('i','и', $s);
$s=str_replace('j','й', $s);
$s=str_replace('Г™','й', $s);
$s=str_replace('k','к', $s);
$s=str_replace('l','л', $s);
$s=str_replace('m','м', $s);
$s=str_replace('n','н', $s);
$s=str_replace('o','о', $s);
$s=str_replace('p','п', $s);
$s=str_replace('q','ъ', $s);
$s=str_replace('r','р', $s);
$s=str_replace('s','с', $s);
$s=str_replace('t','т', $s);
$s=str_replace('y','ы', $s);
$s=str_replace('Г«','ы', $s);
$s=str_replace('u','у', $s);
$s=str_replace('v','в', $s);
$s=str_replace('w','в', $s);
$s=str_replace('x','х', $s);
$s=str_replace('z','з', $s);
//большие одиночные
$s=str_replace('A','А', $s);
$s=str_replace('B','Б', $s);
$s=str_replace('C','Ц', $s);
$s=str_replace('D','Д', $s);
$s=str_replace('E','Е', $s);
$s=str_replace('F','Ф', $s);
$s=str_replace('G','Г', $s);
$s=str_replace('H','Х', $s);
$s=str_replace('I','И', $s);
$s=str_replace('J','Й', $s);
$s=str_replace('K','К', $s);
$s=str_replace('L','Л', $s);
$s=str_replace('M','М', $s);
$s=str_replace('N','Н', $s);
$s=str_replace('O','О', $s);
$s=str_replace('P','П', $s);
$s=str_replace('Q','Ъ', $s);
$s=str_replace('R','Р', $s);
$s=str_replace('S','С', $s);
$s=str_replace('T','Т', $s);
$s=str_replace('U','У', $s);
$s=str_replace('V','В', $s);
$s=str_replace('W','В', $s);
$s=str_replace('X','Х', $s);
$s=str_replace('Y','Ы', $s);
$s=str_replace('Z','З', $s);
//исключения
$s=str_replace('т.с','Тс', $s);
$s=str_replace('Т.с','Тс', $s);
$s=str_replace('т.С','тС', $s);
$s=str_replace('Т.С','ТС', $s);
$s=str_replace('с.ч','сч', $s);
$s=str_replace('С.ч','Сч', $s);
$s=str_replace('с.Ч','сЧ', $s);
$s=str_replace('С.Ч','СЧ', $s);
$s=str_replace('ы.е','ые', $s);
$s=str_replace('Ы.е','Ые', $s);
$s=str_replace('ы.Е','ыЕ', $s);
$s=str_replace('Ы.Е','ЫЕ', $s);
$s=str_replace('ы.а','ыа', $s);
$s=str_replace('Ы.а','Ыа', $s);
$s=str_replace('ы.А','ыА', $s);
$s=str_replace('Ы.А','ЫА', $s);
$s=str_replace('с.х','сх', $s);
$s=str_replace('С.х','Сх', $s);
$s=str_replace('с.Х','сХ', $s);
$s=str_replace('С.Х','СХ', $s);
$s=str_replace('ц.х','цх', $s);
$s=str_replace('Ц.х','Цх', $s);
$s=str_replace('ц.Х','цХ', $s);
$s=str_replace('Ц.Х','ЦХ', $s);
$s=str_replace('з.х','зх', $s);
$s=str_replace('З.х','Зх', $s);
$s=str_replace('з.Х','зХ', $s);
$s=str_replace('З.Х','ЗХ', $s);
return $s;
}
function rexplode($sep,$which)
{
If (strpos($which,$sep)===false) $a[0]=$which; else $a=explode($sep,$which);
return $a;
}
function rsearch($who,$where,$sep,$sep1,$n)
{
/*
$who-что искать
$where-где
$sep-основной разделитель
$sep1-внутренний разделитель
$n-номер элемента во внутренней подстроке.
пример:
rsearch("hi!","privet,poka;zdarova,hi;hi!,zdarova!",";",",",1);
*/
$res=rexplode($sep,$where);
for ($i=0;$i<count($res);$i++)
{
$r1=rexplode($sep1,$res[$i]);
If ($r1[$i]==$who) return true;
}
return false;
}
function rimplode($sep,$which){
If (!is_array($which) || count($which)<=1) return $which;
else return implode($sep,$which);
}
function num_online($zapros,$online,$time)
{
$sql="SELECT `id` FROM `".prefix."users` WHERE `where` LIKE '".$zapros."' AND `online`>'".($time-$online*60)."'";
$result=sql_enter($sql,prefix."error");
If (!$result) return false;
return mysql_num_rows($result);
}
function rnd_array($shablon,$array)
{
/* Шаблон задаётся в виде: {:Имя эл. массива:}...{:Имя эл. массива:}... */
$rnd=mt_rand(0,count($array)-1);
$result=$shablon;
foreach ($array[$rnd] as $key=>$value) $result=str_replace("{:".$key.":}",$value,$result);
return $result;
}
#(c)Манылов Павел,2006-2007
?>