Forum in READ ONLY mode! All questions and discussions on Discord official server, invite link: https://discord.gg/VxsGzJ7

Помогиет со скриптом

Only working scripts
xam
Neophyte
Neophyte
Posts: 23
Joined: 16.11.2010 21:48

Post by xam »

Ну подскажите как сделать так что бы он шел по очереди а не повторялся(
Fenix
Developer
Developer
Posts: 275
Joined: 24.08.2010 7:20
Location: Ставрополь
Contact:

Post by Fenix »

Подсказываю:

Code: Select all

while GetSkillValue('item identification') < 100 do
Этот кусок заставляет его повторять вложенный код пока чар до ГМа не докачается. Поставь в аналогичных местах не while, а if и всё будет ОК:

Code: Select all

procedure UseHiding;
begin
  if (GetSkillValue('Hiding') < 100)
      and (GetSkillValue('Stealth') < 100) then
  begin
    UseSkill('Hiding');
    Wait(11000);
    CheckLag(15000);
    if Hidden and (GetSkillValue('Hiding') > 80) then
    begin
      UseSkill('Stealth');
      Wait(11000);
      CheckLag(15000);
    end;
  end;
end;
Помните – ничто так не защищает ваши зубы 12 часов днем и 12 часов ночью как уважительное отношение к окружающим.
"Многие из вас знакомы с достоинствами программиста. Их всего три, и разумеется это: лень, нетерпеливость и гордыня"© Larry Wall
xam
Neophyte
Neophyte
Posts: 23
Joined: 16.11.2010 21:48

Post by xam »

спасибо.. Теперь осваиваем масивы. мининг с ламбером) Уже бегаем по координатам.. Спасибо..
xam
Neophyte
Neophyte
Posts: 23
Joined: 16.11.2010 21:48

Post by xam »

Code: Select all

procedure UseDetectHerding ; /////////////////////////////////
begin 
 	if GetSkillValue('Herding') < 100 then
begin 
useobject(PalkaHerding); 
Wait(1000);
WaitTargetObject(Korova1); 
Wait(1000);
WaitTargetObject(self);
Wait(1000);
if TargetPresent then CancelTarget; 
        CheckTargetError(5,2); 
        CheckSave; 
  waitconnection(3000); 
  CheckSave; 
  CheckLag(15000); 
Wait(3000);

end; 
end; 
Хотел сделать что бы он щелкал на стаф на овцу и на себя но пишет вот такую ошибку причем в логах System: Click where you wish the animal to go. Таргет не кидает =( что тут не так?
Post Reply