Размер файла: 1.01Kb
- <?php
-
- msg("<p>WapBrouser сжимает WAP страницы в 2..3 раза и работает через gprs-internet (20 центов на 1Мб траффика, а стандартный wap-gprs от 1 до 3 долларов за 1Мб).
- <br/>Должен работать на любых телефонах с J2ME, т.к. использует только стандартные средства.
- <br/><a href=\"WapBrouser.jad\">Скачать WapBrouser 1.0 (12кб)</a>
- <br/><anchor>[Назад]<prev/></anchor>");
- function msg($s) {
- header("Content-type:text/vnd.wap.wml;charset=utf-8");
-
- setlocale (LC_CTYPE, 'ru_RU.CP1251');
- function win2unicode ( $s ) { if ( (ord($s)>=192) & (ord($s)<=255) ) $hexvalue=dechex(ord($s)+848); if ($s=="Ё") $hexvalue="401"; if ($s=="ё") $hexvalue="451"; return("�".$hexvalue.";");}
- function translate($s) {return(preg_replace("/[А-яЁё]/e","win2unicode('\\0')",$s));}
-
- ob_start("translate");
- echo "<?xml version=\"1.0\"?>\n<!DOCTYPE wml PUBLIC \"-//WAPFORUM//DTD WML 1.1//EN\" \"http://www.wapforum.org/DTD/wml_1.1.xml\">";
- echo "
- <wml>
- <card tirle_z=\"WapBrouser 0.1\">";
- echo "
- $s
- </p>
- </card>
- </wml>";
- ob_end_flush();
- die("");
- }