Ложный вес (

[Lietman]

Проблема в том что чар не набирает указанный вес tonoz=600; Один раз копнет летит домой выкладывать

Code: Select all

procedure chekves;
var
oldx,oldy: integer;
begin
    if Weight > tonaz then
      Addtosystemjournal('Реколюсь домой.');  
      oldx:=GetX(self); 
      oldy:=GetY(self);
      repeat 
      cast('Recall');
      WaitForTarget(5000);
      if targetpresent then
      begin
      TargetToObject(RunHome);
      wait(5000);
      end;
      CheckLag(40000);
       until (InJournal('fizzle')<>-1)
       Addtosystemjournal('Прилител домой.');
       newMoveXY(1542,1102,true,0,true);
       Check_Hidden;
       Drop;
       Reags;
       Shahta;
       newMoveXY(oldx,oldy,true,0,true);
       Addtosystemjournal('Начинаю копать.');
end;

[MuDaCk]

Code: Select all

 if Weight > tonaz then
      Addtosystemjournal('Реколюсь домой.'); 

Code: Select all

если вес больше чем переменная, то писать в сис журнал.

Мой тебе совет, учись после "then" и "do" всегда ставить бегин. Даже если тебе нужно всего одно действие. Я всегда так ставлю, на всякий случай.
P.S.Бегин подразумевает, что вконце действия будет и енд .


добавленно:

Code: Select all

      repeat 
      cast('Recall');
      WaitForTarget(5000);
      if targetpresent then
      begin
      TargetToObject(RunHome);
      wait(5000);
      end;
      CheckLag(40000);
       until (InJournal('fizzle')<>-1)

С этого Я вообще выпал))))

Code: Select all

повторять каст, пока не появится надпись про физл каста

[Lietman]

ну вот такой я вот про в скриптинге

[Vizit0r]

не можешь правильно сделать скрипт сразу - нарисуй его схему на листе. без шуток. старую-добрую блок-схему.

[MuDaCk]

Он уже разобрался с этим скриптом.

[Vizit0r]

у него такое с каждым вторым скриптом...
лично я думаю, что в каждом первом, просто иногда одни баги компенсируются другими, и устанавливается хрупкое равновесие багов

[Scripts Writer]

у него такое с каждым вторым скриптом...
лично я думаю, что в каждом первом, просто иногда одни баги компенсируются другими, и устанавливается хрупкое равновесие багов

Костыль костылём подпирает.