Ламбер

[drabadan]

выключается совсем? Если так то стоит проверить все Exit; в скрипте в основных циклах.

[Xper1al]

выключается совсем? Если так то стоит проверить все Exit; в скрипте в основных циклах.

Попробовал все удалить, посмотрим.

[Xper1al]

не помогло, всё равно периодически отключается

[drabadan]

не помогло, всё равно периодически отключается

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

[Xper1al]

не помогло, всё равно периодически отключается

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

СОгласен, есть подозрение на остановку, после сейва мира.

[nefor2004]

рублю этим скриптом, немного преукрасил его, но в целом он остался таким же. Ничего не виснет. За неделю беспрерывного кача, ниразу не стопанулся. Чтото вы делаете не так.

Code: Select all

procedure CheckAxe;
begin
while (Count(AxeType) < 4) do
begin
CancelMenu;
if (Count(IngotType) < 4) then
begin
FindType(IngotType,Backpack);
if (FindQuantity < 4) then MoveItem(finditem,4,Sunduk,0,0,0);
wait(1000);
FindType(IngotType,Sunduk);
if (FindQuantity > 4) then MoveItem(finditem,4,Backpack,0,0,0);
wait(500);
 
end;
if (Count(IngotType) >= 4) then
begin
UseObject(FindType(TynkType,Sunduk));
WaitTargetObject(FindType(IngotType,Backpack));
Wait(1000);
AutoMenu('like','Deadly Tools');
AutoMenu('like','Hatchet');
WaitJournalLine(Now, 'You create|make|destroy|Stop|Fail|Success', 30000);
end;
Wait(1000);
end;
Hungry(1,Sunduk);
end;

Вот это чудо зачем ? не проще сразу закинуть в сундук 500 топоров и вписать чтобы просто бегал и брал по 1 ? Зачем усложнять себе жизнь ?
Так же не помешало бы вписать в это чудо чексеив.
А еще у меня такой маленький вопрос, скрипт останавливается не в момент когда топоров в паке у него не остается ?

[Xper1al]

рублю этим скриптом, немного преукрасил его, но в целом он остался таким же. Ничего не виснет. За неделю беспрерывного кача, ниразу не стопанулся. Чтото вы делаете не так.

Code: Select all

procedure CheckAxe;
begin
while (Count(AxeType) < 4) do
begin
CancelMenu;
if (Count(IngotType) < 4) then
begin
FindType(IngotType,Backpack);
if (FindQuantity < 4) then MoveItem(finditem,4,Sunduk,0,0,0);
wait(1000);
FindType(IngotType,Sunduk);
if (FindQuantity > 4) then MoveItem(finditem,4,Backpack,0,0,0);
wait(500);
 
end;
if (Count(IngotType) >= 4) then
begin
UseObject(FindType(TynkType,Sunduk));
WaitTargetObject(FindType(IngotType,Backpack));
Wait(1000);
AutoMenu('like','Deadly Tools');
AutoMenu('like','Hatchet');
WaitJournalLine(Now, 'You create|make|destroy|Stop|Fail|Success', 30000);
end;
Wait(1000);
end;
Hungry(1,Sunduk);
end;

Вот это чудо зачем ? не проще сразу закинуть в сундук 500 топоров и вписать чтобы просто бегал и брал по 1 ? Зачем усложнять себе жизнь ?
Так же не помешало бы вписать в это чудо чексеив.
А еще у меня такой маленький вопрос, скрипт останавливается не в момент когда топоров в паке у него не остается ?

Да нет, в паке есть топоры.

[Xper1al]

00:23:26:501] You see: [SERVER]: Saving in 2 minutes.
[00:25:26:566] You see: [SERVER]: Saving World State.
[00:25:30:729] You see: [SERVER]: World Saved

После этого слетает, что можно исправить?

[nefor2004]

00:23:26:501] You see: [SERVER]: Saving in 2 minutes.
[00:25:26:566] You see: [SERVER]: Saving World State.
[00:25:30:729] You see: [SERVER]: World Saved

После этого слетает, что можно исправить?

checksave вам в помощь