# ................................................................................. # # Скрипт: Manlix Randomer, версия: 1.1 # Автор: Manlix (http://manlix.ru) # ................................................................................. if(phpversion()<4.1) exit("Версия PHP интерпретатора должна быть 4.3.0 или выше, но никак не ниже (ваша версия интерпретатора: ".phpversion().")"); function error($error,$file){exit(''.$error.'
['.htmlspecialchars($file).']
');} function CheckConf($conf) { while(list($section,$array)=each($conf)) while(list($key,$value)=each($array)) if(!strlen($value)) error("В файле параметров скрипта, а именно в секции ".$section.", пуст ключ ".$key."",$conf['dir']['inc']."/config.inc.dat"); } $manlix=parse_ini_file("./inc/config.inc.dat",1) or error("не могу загрузить основной файл параметров","./inc/config.inc.dat"); if(!include($manlix['file']['functions'])) error("не найден файл с функциями",$manlix['file']['functions']); CheckConf($manlix); while(list($section,$array)=each($manlix)) while(list($key,$value)=each($array)) $manlix['other'][chr(73).chr(110).chr(105).ucfirst(strtolower($section)).ucfirst(strtolower($key))]=$value; $manlix['result']=null; if(!is_readable($manlix['file']['data'])) error("Нет прав для чтения базы",$manlix['file']['data']); else { $array=manlix_read_file($manlix['file']['data']); if(!$ArrayCount=count($array)) $manlix['result']=$manlix['other']['empty']; else { $TempString=$array[rand(0,($ArrayCount-1))]; list(,$result)=explode("::",$TempString); $manlix['result']=base64_decode($result); } } if(isset($_GET['js'])) printf($manlix['other']['js'],addslashes($manlix['result'])); else echo $manlix['result']; ?>