<?php
// инкрустация если есть i.set.shlif
if ($to) {
if (strpos($to,"_")===false) msg("Инкрустировать самоцветы можно только в именные предметы, созданные игроками");
if (strpos($l_i[$loc][$login]["items"],"i.set.shlif:")===false) msg("В вашем рюкзаке должен быть набор ювелира");
if (strpos($to,"_")!==false) $tk=substr($to,0,strpos($to,"_")); else $tk=$to;
if (file_exists("items/".$tk)) {$tirle_z_z=explode("|",implode("",file("items/".$tk))); $tirle_z_z=$tirle_z_z[0];} else die("no items/".$to);
if (intval(preg_replace('/.*'.$to.':(\d+).*/',"\\1",$l_i[$loc][$login]["items"]))<1) msg("У вас нет ".$tirle_z_z);
if (strpos($to,"..".substr($use,4))!==false) msg("Этот самоцвет уже инкрустирован в ".$tirle_z_z);
$xF = preg_match_all("/\.\.(\w+)/",$to,$regF);
if ($xF>2) msg("В один предмет можно инкрустировать не более 3 самоцветов");
$skills=explode("|",$l_i[$loc][$login]["skills"]);
if ($skills[28]>0) {
$char[6]=time()+10;
$l_i[$loc][$login]["char"]=implode("|",$char);
if (rand(0,100)<$skills[28]*10+20) {
additem($loc,$login,"",$use,1);
additem($loc,$login,"",$to,1);
if (rand(0,100)>=(6-$skills[28])*10+$xF*10) {
$to.="..".substr($use,4);
$st=explode("|",$l_i[$loc][$login]["st"]);
$st[7]++; // +1 игрок
$l_i[$loc][$login]["st"]=implode("|",$st);
addjournal($loc,$login,"Вы инкрустировали самоцвет в ".$tirle_z_z);
addjournal($loc,"all",$char[0]. " инкрустировал самоцвет в ".$tirle_z_z,$login);
additem($loc,"",$login,$to,1);
addexp($loc,$login,rand(0,10));
} else {
addjournal($loc,$login,"Вы испортили ".$tirle_z_z);
addjournal($loc,"all",$char[0]. " испортил ".$tirle_z_z,$login);
}
// шлифовалка может сломаться всегда 5%
if (rand(1,100)<=5) {addjournal($loc,$login,"Вы сломали набор ювелира"); addjournal($loc,"all",$char[0]. " сломал набор ювелира",$login); additem($loc,$login,"","i.set.shlif",1);}
} else {addjournal($loc,$login,"Вам не удалось инкрустировать самоцвет, попробуйте еще раз"); addjournal($loc,"all",$char[0]." пытался инкрустировать самоцвет",$login);}
} else addjournal($loc,$login,"Ваш навык ювелира равен 0, вы не умеете инкрустировать самоцветы");
} else $list='all'; // куда инкрустировать