Просмотр файла ascalon/gold.php

<?
$razn=$online-$time; $raz=30-$razn;
if($razn>30){
$pim=7+$craftg; $rand=mt_rand(0,$pim);
if($rand!=0){$echo="$nick добыл $rand золота!";
$money=$money+$rand; $sh=100-(int)$craftg;
if($sh<1) $sh=1; $sh1=mt_rand(1,2000);
if($sh>=$sh1){ $craftg=(int)$craftg+1;
$sh2="<font color=\"#800080\"><br>Копатель+1!</font>";} else $sh2=""; $echo="$echo $sh2";} else $echo="$nick не нашел ничего!"; $time=date("U");
$echo="<div class=artyes>$echo</div>";
} else $echo="<div class=td>$nick, тaймayт добычи $raz ceк.</div>"; $echo="0:||:$echo\r\n"; $mon=@file("room4.dat"); $zis=sizeof($mon); $mon[$zis]=$echo; $o=@implode("",$mon); $n=@fopen("room4.dat","w"); fputs($n,$o); fclose($n);
?>