Просмотр архива Территория Зла


<?php
// карта, передается map=x123x456 и для картики img=1 bw=1|2|3
$tmp=$QUERY_STRING;if($tmp=='') $tmp=$_SERVER["QUERY_STRING"];
$tmp=urldecode($tmp);
parse_str($tmp);

if($info) msg("<p>Ваша позиция обозначена белым квадратиком с черной точкой в центре (или черным квадратиком с белой точкой в центре, в зависимости от фона).<br/>Замки - красные квадратики с белой точкой в центре (только для цветной карты).<br/>В настройках можете поменять тип карты на черно-белую (самое плохое качество), цветную JPEG (среднее качество) или PNG (самое лучшее качество, но не все телефоны поддерживают).");

// >1650
if($loc=="_begin") $loc="x1158x523";
if($loc=="arena") $loc="x1086x501";
if(substr($loc,0,4)=="c.1.") $loc="x1429x168";
if(substr($loc,0,4)=="c.2.") $loc="x781x429";
if(substr($loc,0,4)=="c.3.") $loc="x1129x369";
if(substr($loc,0,4)=="c.4.") $loc="x2320x348";

$tc=explode("x",$loc);
if ($tc[1]>1650) {
    $b=1;
    $tc[1]=round(($tc[1]-450-1200)/15);
    $tc[2]=round($tc[2]/15);
    } else {
        $b=0;
        $tc[1]=round(($tc[1]-450)/12);
        $tc[2]=round($tc[2]/12);
        }

if ($img) {                        // выведем картинку
    if($bw==1) $t="wbmp"; else if ($bw==2) $t="jpg"; else $t="png";
    if($b) $img="map2.".$t; else $img="map1.".$t;
    $size = getimagesize($img);
    if($bw==1) $im = imagecreatefromwbmp($img); else if ($bw==2) $im = imagecreatefromjpeg($img); else $im = imagecreatefrompng($img);
    if(!$im) die("err");
    $col=imagecolorat($im,$tc[1]+1,$tc[2]+1);
    if ($col==0 || $col=="16777180") {$cb=1; $cc=imagecolorallocate($im, 255, 255, 255);} else {$cb=imagecolorallocate($im, 255, 255, 255); $cc=1;}
    imagefilledrectangle($im,$tc[1],$tc[2],$tc[1]+2,$tc[2]+2,$cb);
    imagesetpixel($im,$tc[1]+1,$tc[2]+1,$cc);
    header("Content-type: {$size['mime']}");    //;charset=utf-8
    if($bw==1) imagewbmp($im); else if ($bw==2) imagejpeg($im); else imagepng($im);
    imagedestroy($im);
    die("");
    }//if $img

srand ((float) microtime() * 10000000);
$stmp="<p align="center"><img alt="map" src="f_map.php?loc=$loc&amp;img=1&amp;r=".rand(99,999)."&amp;bw=$bw"/><br/><anchor>[назад]<prev/></anchor></p><p>Вы на ";
if($b) $stmp.=" территории Ансалона."; else $stmp.="основной территории.";
$stmp.="<br/><a href="f_map.php?info=1">Помощь</a>";

msg($stmp);

function msg($s) {
    header ("Expires: Thu, 01 Jan 1970 00:00:01 GMT");
    header ("Last-Modified: " . gmdate("D, d M Y H:i:s") . " GMT");
    header ("Cache-Control: no-cache, no-store, must-revalidate, max-age=0");
    header ("Pragma: no-cache");
    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("&#x0".$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 title_v="Карта">";
echo "
$s
</p>
</card>
</wml>";
    ob_end_flush();
    die("");
    }