File size: 953B
<?php
// случайное движение
if ($char[10]) $move=explode(":",$char[10]);
if ($char[12]) $steps=explode(":",$char[12]);
$b=0;
if (!$char[10] && $char[12]) {$l_i[$i][$j]["char"]=implode("|",$char); $lt=$steps[count($steps)-1]; $blt=1; if ($j=="n.a.b.jarpt.1") {loadloc($lt); if(count($l_i[$lt])!=0) $blt=0;} if ($blt) {addnpc($j,$i,$lt); $b=1;}}
else if (time()>$move[3]) {
if ($char[12] && count($steps)>=$move[0]) {$b=1; $k=$steps[count($steps)-1];} else {$b=0; $k=$locai[2+2*rand(0,(count($locai)-2)/2-1)+1];}
if (!isset($l_tt[$k]["d"])) loadloc($k);
$loc1=explode("|",$l_tt[$k]["d"]);
if ($locai[1]==$loc1[1] || $b) {
$move[3]=time()+rand($move[1],$move[2]); // след. ход
$char[10]=implode(":",$move);
$l_i[$i][$j]["char"]=implode("|",$char);
$blt=1;
if ($j=="n.a.b.jarpt.1") {loadloc($k); if(count($l_i[$k])!=0) $blt=0;}
if ($blt) {addnpc($j,$i,$k); $b=1;}
}
}