View file game/1/f_drop.dat

<?php
$l_i[$loc][$login]["macrol"]="drop|$drop||";
if ($drop) {			//linkБросить

	if ($drop=="f" && $game["floc"]==$loc && $game["fid"]==$login) {addjournal($loc,"all",$metr."<b><small>$char[0] бросил знамя!</small></b>",$login); if($loc=="x1087x543" || $loc=="x1080x539" || $loc=="x1080x532" || $loc=="x1087x528") $loc1="x1095x532"; else $loc1=$loc; $l_i[$loc1]["i.flag"]="знамя войны|1|0"; $game["floc"]=$loc1; $game["fid"]=""; calcparam($loc,$login); msg("<b><small>Вы бросили знамя войны</small></b>");}

	// $drop=id предмета [$num=кол-во]
	if ($char[8]) msg("<p><b><small>Вы призрак и поэтому не можете ничего передать, поднять или бросить, найдите лекаря или камень воскрешения</small></b>");
	$tcount=intval(preg_replace('/.*'.$drop.':(\d+).*/',"\\1",$l_i[$loc][$login]["items"]));
	if ($tcount>0) {
	// бросаем предмет в локацию
	$tdrop=$drop;
	if (strpos($drop,"_")!==false) $drop=substr($drop,0,strpos($drop,"_"));
	if (strpos($drop,"-")!==false) $drop=substr($drop,0,strpos($drop,"-"));
	if (substr($drop,0,5)=="i.rr.") $title_v=explode("|","руна|50"); else if (file_exists("items/".$drop)) $title_v=explode("|",implode("",file("items/".$drop))); else die("err: no items/".$drop);
	// проверим кол-во
	if ($tcount>1 && !$num) {		// запросим кол-во
		$stmp="<p><small><b>Укажите количество:\n<br/><input name=\"num\" format=\"*N\" maxlength=\"7\" value=\"".$tcount."\"/>\n<br/><a href=\"$PHP_SELF?sid=$sid&drop=$tdrop&num=$(num)\">Отправить</a><br/><a href=\"$PHP_SELF?sid=$sid&drop=$tdrop&num=999999999\">бросить все</a></b></small>";
		msg($stmp,"Бросить",1,"","num",$tcount);
		}
	if (!$num || $num<1) $num=1;	// если не указано, то 1 предмет
	if ($num>$tcount) $num=$tcount;	// и максимум берем все что есть
	additem($loc,$login,"loc",$tdrop,$num,"items","items",1,-1,1);
if ($login=='u.qw' || $login=='u.qv' || $login=='u.scream' || $login=='u.kv') {
	$log="|логин: ".$login."|бросил: ".$tdrop." в количестве ".$num."|время: ".date("d/m Y H:i",time())."|юзер: ".getenv('HTTP_USER_AGENT')."|\r\n";
	$file=fopen("z_modlog.dat","a+");@fputs($file,$log);@fclose($file);
}
	}
	}