Ребята доброго времени суток , подскажите пожалуйста вот простейший мининг , но не могу понять почему он 1 раз обкапывается и скрипт выключается ... Program MiningAround; var k, x, y : Integer; mn1, mf1, mf2, ms1 : Integer; ctime : TDateTime; const Pickaxe1 = $0E85; // Типы кирок Pickaxe2 = $0E86; f...