Размер файла: 1.98Kb
- <?php
-
- ///////////////////////////////////////////////////////////////////////////////////////////
- /////
- ///// ********* MINI WP 1.0 *********
- /////
- ///////////////////////////////////////////////////////////////////////////////////////////
-
- ///////////////////////////////////////////////////////////////////////////////////////////
- /////
- ///// Made by : TRIGER
- ///// E-mail : ama6600@rambler.ru
- ///// Site : http://wup.hoha.ru/web/
- ///// WAP-Site : http://wup.hoha.ru
- ///// ICQ : 252 756 447
- /////
- ///////////////////////////////////////////////////////////////////////////////////////////
-
- ///////////////////////////////////////////////////////////////////////////////////////////
- /////
- ///// ВНИМАНИЕ! ВЫ НЕ ИМЕЕТЕ ПРАВО УДАЛЯТЬ КОПИРАЙТЫ!
- /////
- ///////////////////////////////////////////////////////////////////////////////////////////
-
- function unicode ($s) {
- if ( (ord($s)>=192) & (ord($s)<=255) ) $hexvalue=dechex(ord($s)+848);
- if ($s=="Ё") $hexvalue="401"; if ($s=="ё") $hexvalue="451"; return("�".$hexvalue.";");}
- function utf($s) {return(preg_replace("/[А-яЁё]/e","unicode('\\0')",$s));}
-
- $text = file("img/db.dat");
- $top = rand (0,count($text)-1);
- $out = explode("|",$text[$top]);
-
- $rand1=rand(0,1038);
- $rand2=rand(0,1038);
- $mat=@file("mat/susch.txt");
- $mat1=@file("mat/pril.txt");
-
- header("Content-type:text/vnd.wap.wml");
- header("Cache-control: no-store,no-cache,must-revalidate");
- print "<?xml version=\"1.0\" encoding=\"utf-8\"?>
- <!DOCTYPE wml PUBLIC \"-//WAPFORUM//DTD WML 1.1//EN\" \"http://www.wapforum.org/DTD/wml_1.1.xml\">
- <wml><card id=\"card0\" title=\"You Name Site\"><div align=\"left\">";
-
- include ("header.txt");
-
- include ("text.php");
-
- print utf("<small>Тест...</small><br/>");
-
- include ("foter.txt");
-
- print "</card></wml>";
-
- ?>