Просмотр файла help.php

<?php
include "wml.php";
wmlStart();
/*кхе-кхе, типа облом :P */
function noHelp(){
print win2utf("
Подсказки недоступны!<br/><small>Если Вы считаете, что произошла ошибка,
обратитесь к автору по адресу<br/>wap.viafree.net</small><br/>Администрация wap.viafree.net
<br/><anchor>Назад<prev/></anchor>");
die("</p></card></wml>");}
/*проверяем переданные переменные и наличие нужного файла*/
if(!isset($help) or !file_exists("./name/".$r.".txt")){
print win2utf(cardStart("error","Ошибка")."<p align=\"center\">");
noHelp();}
/*ошибок нет ;) */
else print win2utf(cardStart("help","Подсказка")."<p align=\"center\">");
if(!file_exists("./name/".$r."help.txt")){/*файл для подсказок*/
$new=fopen("./name/".$r."help.txt","w+");
fputs($new,"1::1::1");/*начальные значения, есть все подсказки*/
fclose($new);}
/*забираем ответы на вопрос из файлов*/
$fajl="./name/".$r."help.txt";
$sod=@file_get_contents($fajl);
$pod=explode("::",$sod);
$p=$pod[0];$d=$pod[1];$z=$pod[2];
$ot=@file_get_contents("./name/".$r.".txt");
$otv=explode("::",$ot);
$cool=$otv[4];
for($i=0;$i<=3;$i++){
if($otv[$i]!=$cool)$loo[$i]=$otv[$i];
}
$l=implode("::",$loo);
$loz=explode("::",$l);
$neverno=$loz[mt_rand(0,count($loz)-1)];
/*начало подсказки "50x50"*/
if($help=="50")
{
print win2utf("Подсказка 50х50<br/>");
if($p==1){
print win2utf("<small>Компьютер оставил 2 варианта:</small><br/>");
if($r<=500)print win2utf($neverno."<br/>и<br/>".$cool);
else print win2utf($cool."<br/>и<br/>".$neverno);
print win2utf("<br/><anchor>Назад<prev/></anchor>");
$fpe = @fopen("./name/".$r."help.txt","wb");
@fputs($fpe,"0::".$d."::".$z);
@fclose($fpe);


die("</p></card></wml>");}
/*подсказка использована, пишем "0"*/

//@file_put_contents($fajl,"0::".$d."::".$z);
}
/*else{print win2utf("недоступна ");

}  */

/*начало подсказки "Звонок другу"*/
if($help=="drug")
{
print win2utf("Звонок другу<br/>");
if($d==1){
print win2utf("Номер:<br/><input type=\"tekst\" name=\"vyzov\" format=\"*N\"/>
<br/><a href=\"\">Вызвать</a>");
print win2utf("<br/><anchor>Назад<prev/></anchor><br/>");
$fpe = @fopen("./name/".$r."help.txt","wb");
@fputs($fpe,$p."::0::".$z);
@fclose($fpe);
die("</p></card></wml>");

//@file_put_contents($fajl,$p."::0::".$z);
}
else{print win2utf("недоступен");}

}
/*начало подсказки "Помощь зала"*/
if($help=="zal")
{
print win2utf("Помощь зала<br/>");
if($z==1){
$pr=mt_rand(40,100);
print win2utf($pr."% зала считает, что это:");
if($pr<=55)print win2utf($neverno);
else print win2utf($cool);
print win2utf("<br/><anchor>Назад<prev/></anchor>");
print '</p><br/></card></wml>';
//@file_put_contents($fajl,$p."::".$d."::0");
}
else{print win2utf("недоступна ");
print win2utf("<br/><anchor>Назад<prev/></anchor>");
die("</p></card></wml>");
}

//print win2utf("<br/><anchor>Назад<prev/></anchor>");
$fpe = @fopen("./name/".$r."help.txt","wb");
@fputs($fpe,$p."::".$d."::0");
@fclose($fpe);
//die("</p></card></wml>");
}
/*опять обломище ;D*/
//noHelp();
?>