Там с хайдом и прочим...обкопка вокруг себя...

WladL wrote:Разве? А мне почему-то показалось, что вот эта функция

Code: Select all

function MiningAround : Integer ; 

полный аналог твоего запроса, с небольшими изменениями.

Если ты разбираешься в этом, то помоги пожалуйста, не в службу, а в дружбу...

WladL wrote:Аналоги тут http://stealth.od.ua/forum/viewtopic.php?t=1106

Там огромный скрипт на миненг, с лишними функциями. Мне нужен такой же скрипт. Простой и маленький. Если есть люди которые могут помочь буду признателен

Маленький скриптик sub main() var x,y,z, n VAR LastTimer While true UO.Set('finddistance','2') n=0 z=UO.GetZ("self") for x=-2 to 2 for y=-2 to 2 UO.Print(str(x)+" "+str(y)) Repeat if UO.InJournal('TORMOZ') then pause() endif UO.DeleteJournal() UO.Warmode("0") UO.WaitTar...