Page 4 of 5

Posted: 23.10.2008 8:59
by Islam
Еще проблема в том, что иногда чар выходит просто из шахты. И пытается куда то уйти. Я проверил весь скрипт но нашел только две переменные координат. Координаты копки и коордианты чара. А он вообще в противоположную сторону топает. В чем проблема кто нибудь знает?

Мининг

Posted: 07.11.2008 22:44
by Incognitos
Вот смотрю и удевляюсь , вот если ктото хочет научится писать скрипты он не поймёт всего этого , я за то чтоб ктото написал скрипт на мининг такой , чтоб можно было работать над скриптом ... Пускай чар просто встанет в инвиз и будет копать вокруг себя все клетки, когда один цикл пройдёт , т.е. выкопает 25 клеток, чтоб пауза началась ну минуты на 3-4 и заного начал копать пока веса не будет максисум + чтоб конектился при дисконекте ... =) ... давайте Энштейный )

Re: Мининг

Posted: 10.11.2008 1:41
by YogurtST
Incognitos wrote:Вот смотрю и удевляюсь , вот если ктото хочет научится писать скрипты он не поймёт всего этого , я за то чтоб ктото написал скрипт на мининг такой , чтоб можно было работать над скриптом ... Пускай чар просто встанет в инвиз и будет копать вокруг себя все клетки, когда один цикл пройдёт , т.е. выкопает 25 клеток, чтоб пауза началась ну минуты на 3-4 и заного начал копать пока веса не будет максисум + чтоб конектился при дисконекте ... =) ... давайте Энштейный )
:shock:
omg...kill yourself

Posted: 13.11.2009 19:08
by important
Спасибо за скрипт.

У меня такая проблема.
Вроде чар полетел в шахту, всё обкопал, полетел домой выгрузился.
Я отходил от компа, пришёл - чар использовал все 500 зарядов в рунбуке хотя сделал 1 обкоп (максимум 2), в log'e стелса очень много раз виден Kal Ort Por. :)

Что я не правильно делаю?

Posted: 14.11.2009 1:11
by Maruk
Такая же проблема, чар выгружает, летит обратно в шахту и делает постоянный реколл

Posted: 14.11.2009 12:39
by WladL
Шибко смахивает на недовыгруз руды,проверьте вес чара после "выгрузки" и полетом обратно в шахту.
Если действительно недовыгруз, то проверяйте доступность сундука в момент выгрузки, ID сундука, ну и все что с этим связано.

Posted: 14.11.2009 16:40
by important
WladL wrote:Шибко смахивает на недовыгруз руды,проверьте вес чара после "выгрузки" и полетом обратно в шахту.
Если действительно недовыгруз, то проверяйте доступность сундука в момент выгрузки, ID сундука, ну и все что с этим связано.
Выкладывает абсолютно всю руду.
Блин...

Posted: 14.11.2009 17:57
by WladL
тут лежат разные скрипты , какой у Вас?

Posted: 14.11.2009 18:13
by grundick
А мне думается что в вашем скрипте кривоватая функция реколла ).
Больше похоже на идущий один за другим физлы изза недостаточной задержки между кастами. То есть чар катует реколл, не успевая улететь снова кастует, и снова, и снова ... И так пока не кончатся заряды. Хотя я не в курсе как у вас там устроено...

Posted: 14.11.2009 23:30
by Maruk
мининг который в первом посте, один рекол происходит удачно, он летит в пещеру, а затем начинается бесконечный цикл реколов.

Posted: 14.11.2009 23:36
by WladL
Что значит "затем" ? Прилетел в пещеру и продолжает пытаться реколится?
журналы выложи

Posted: 14.11.2009 23:50
by WladL
разбор полетов )

Code: Select all

procedure recal_rb(rune : integer); 
var tmpr : Integer; 
mx, my, k, Res : Integer; 
begin 
repeat 
	Res := 0; 
	CheckDead; 
	AddToSystemJournal('Пытаемся рекольнуться'); 
	tmpr := rune; 
	waitgump(IntToStr(tmpr)); 
	wait(1000) 
	UseObject(runebook); 
	***** 
	  запомнили координаты
	mx := GetX(self); 
	my := GetY(self); 
	k := 0; 
	*****
	  10с. отпущено чару на изменение координат(реколл)
	repeat
		wait(500) 
		k := k + 1; 
	until (mx<>GetX(self)) or (my<>GetY(self)) or Dead or (k = 20)
	*****
	  Если через 10с. чар остался на тех-же координатах, он начнет реколится заново!!!! 
	if (mx<>GetX(self)) or (my<>GetY(self)) then Res := 1;<==Выход из цикла реколов только если именились координаты
until Res = 1; 
end;
Если запустить эту процедуру стоя на точке куда должен будет прилететь чар, то бесконечный цикл обеспечен, потому как координаты не изменятся никогда!!!

Posted: 15.11.2009 22:11
by important
WladL wrote:Что значит "затем" ? Прилетел в пещеру и продолжает пытаться реколится?
журналы выложи
"Затем" значит, что чар первый раз реколится, обкапывает, летит домой. После выгрузки, летит в пещеру и там до бесконечности реколл...

Используем скрипт из первого поста.

Posted: 16.11.2009 1:50
by WladL
Удалите строку в конце скрипта.

Code: Select all

 ...
        until flag1 = true; 
   recal_rb(r_cave); <====================Удалить строку 
      end; 
      CheckDead; 
   until false; 
End.

Posted: 19.11.2009 1:43
by Maruk
Спасибо все работает, единственное не понимаю для чего:

Code: Select all

RuneHome=$4001E531;       // Rune to fast recall
Recall=$1F4C;            // Type Recall scrolls 
Хотелось бы чтобы он просто пил инвизку и по рунбуке портировался

Code: Select all

vxcol=$FFFF;           // Цвет скрола вортекса
vacol=$FFFF;           // Цвет скрола мас диспела 
Тут наверно тип надо указать ?