Просмотр файла 1/f_speakbuy.dat

<?php

// время обновления товаров
if (time()>$tchar[11]) {
	$xF = preg_match_all("'((\d+):(\d+):(\d+)=([^:]+):(\d+))'",$loc_i[$loc][$speak]["bank"],$regF);
	for ($i=0;$i<$xF;$i++) {
		if (rand(0,100)>$regF[2][$i]) $tmp=0; else $tmp=rand($regF[3][$i],$regF[4][$i]);
		$loc_i[$loc][$speak]["bank"]=str_replace($regF[1][$i],$regF[2][$i].":".$regF[3][$i].":".$regF[4][$i]."=".$regF[5][$i].":".$tmp,$loc_i[$loc][$speak]["bank"]);
		}
	$tchar[11]=time()+round($trader[1]*(rand(70,130)/100));
	$loc_i[$loc][$speak]["char"]=implode("|",$tchar);
	}

	$stmp="";
	$xF = preg_match_all("'=([^:]+):([^0]\d*)'",$loc_i[$loc][$speak]["bank"],$regF);

	if (!$start) $start=0;
	for ($i=$start;$i<$start+$g_list && $i<$xF;$i++) {
		if (strpos($regF[1][$i],"_")!==false) $ti=substr($regF[1][$i],0,strpos($regF[1][$i],"_")); else $ti=$regF[1][$i];
		if (substr($regF[1][$i],0,5)=="i.rr.") $item=explode("|","руна|50"); else if (file_exists("items/".$ti)) $item=explode("|",implode("",file("items/".$ti))); else die("err: no items/".$ti);
		$tmp=$item[0];
		if (strpos($regF[1][$i],"..")!==false) $tmp.=" *";
		if ($regF[2][$i]>1) $tmp.=" (".$regF[2][$i].")";
		$tmp.=" за ".round($item[1]*$trader[0])." монет";
		$stmp.="\n<br/><anchor>".$tmp."<go href=\"#menu\"><setvar name=\"to\" value=\"".$regF[1][$i]."\"/></go></anchor>";
		}
	if ($stmp) $stmp="<p>Я продаю:".$stmp; else msg("У меня сейчас нет товаров на продажу, все раскупили. Приходи в другой раз.",$tchar[0]);
	if ($start) {$stmp.= "\n<br/><a href=\"$PHP_SELF?sid=$sid&speak=$speak&id=$id\">^ </a>";}
	if ($start+$g_list<$xF-1) {if (!$start) $stmp.="\n<br/>"; $stmp.= "<a href=\"$PHP_SELF?sid=$sid&speak=$speak&id=$id&start=".($start+$g_list)."\">+ (".($xF-$start-$g_list).")</a>";}
	$stmp.="\n</p>\n</card>\n<card id=\"menu\" title=\"Меню\">\n<p>\n<a href=\"$PHP_SELF?sid=$sid&speak=$speak&id=$id&start=$start&to=$(to)\">Купить</a>\n<br/><a href=\"$PHP_SELF?sid=$sid&look=$(to)\">Инфо</a>";
	msg($stmp,$tchar[0]);