|
Скрипт на фарм. В чем ошибка? - Общение и обсуждение, архив Lineage 2 - Cобытия, информация, вопросы и ответы по Lineage 2 |
25.03.2012, 21:52
|
#1
|
|
|
|
Разведчик
|
Регистрация: 10.05.2011
Сообщений: 8
Популярность: 667
Сказал(а) спасибо: 1
Поблагодарили 10 раз(а) в 5 сообщениях
|
Скрипт на фарм. В чем ошибка?
Ребят пишу скрипт на фарм на 1 серве
Вот он
Код:
begin
if FromClient and (pck=Hstr('56 18 00 00 00 00 00 00 00 00 ')) then .//Если с клиента приходит действие "Да"
begin
repeat // повторяет
buf:=Hstr(' 39 1E 01 00 00 00 00 00 00 00 '); //Скил агра
delay(50);
buf:=Hstr('39 24 00 00 00 00 00 00 00 00'); //масс атака
delay(50);
buf:=Hstr('9 30 00 00 00 00 00 00 00 00 '); // еще одна
delay(50);
buf:=Hstr('19 98 B7 00 10 00 00 00 00 '); //Юзает банку манны
SendtoServerEx('Farm');
delay(5000);
until FromClient and (pck=Hstr('56 19 00 00 00 00 00 00 00 00 ')); //До нажатия нет
end;
end.
После нажатия дествия Да игра + л2пх вылетает. В чем моя ошибка?
________________
l l0l l
l l l0l
l 0l0l0l
|
|
|
25.03.2012, 22:04
|
#2
|
|
|
|
Разведчик
|
Регистрация: 08.12.2010
Сообщений: 5
Популярность: 14
Сказал(а) спасибо: 0
Поблагодарили 2 раз(а) в 2 сообщениях
|
Re: Скрипт на фарм. В чем ошибка?
buf:=Hstr('19 98 B7 00 10 00 00 00 00'); // Странная!
В след раз хроники напиши хотябы.
Код:
const Char_Name = 'Farm';
begin
if FromClient and (pck=Hstr('56 18 00 00 00 00 00 00 00 00')) then begin
repeat
buf:=Hstr('39 1E 01 00 00 00 00 00 00 00'); SendToServerEx(Char_Name);
delay(50);
buf:=Hstr('39 24 00 00 00 00 00 00 00 00'); SendToServerEx(Char_Name);
delay(50);
buf:=Hstr('39 30 00 00 00 00 00 00 00 00'); SendToServerEx(Char_Name);
delay(50);
buf:=Hstr('19 98 B7 00 10 00 00 00 00'); SendToServerEx(Char_Name);
pck:='';
delay(5000);
until FromClient and (pck=Hstr('56 19 00 00 00 00 00 00 00 00'));
end;
end.
Последний раз редактировалось Gaiola; 25.03.2012 в 22:19.
|
|
|
25.03.2012, 22:31
|
#3
|
|
|
|
Разведчик
|
Регистрация: 10.05.2011
Сообщений: 8
Популярность: 667
Сказал(а) спасибо: 1
Поблагодарили 10 раз(а) в 5 сообщениях
|
Re: Скрипт на фарм. В чем ошибка?
Хроники ГоД
серовно не пашет.
Вот этот пакет, про который ты говоришь , что странный это пакет на исп. итема с панельки. Может надо его делать не через buf:= ?
________________
l l0l l
l l l0l
l 0l0l0l
Последний раз редактировалось DemGod9; 25.03.2012 в 22:35.
Причина: Nope
|
|
|
25.03.2012, 22:53
|
#4
|
|
|
|
Разведчик
|
Регистрация: 08.12.2010
Сообщений: 5
Популярность: 14
Сказал(а) спасибо: 0
Поблагодарили 2 раз(а) в 2 сообщениях
|
Re: Скрипт на фарм. В чем ошибка?
Попробуй как нить вот так:
Код:
const Char_Name = 'Farm';
var mojno_attack:boolean;
procedure Attack; begin
buf:=Hstr('39 1E 01 00 00 00 00 00 00 00'); SendToServerEx(Char_Name);
delay(50);
buf:=Hstr('39 24 00 00 00 00 00 00 00 00'); SendToServerEx(Char_Name);
delay(50);
buf:=Hstr('39 30 00 00 00 00 00 00 00 00'); SendToServerEx(Char_Name);
delay(50);
buf:=Hstr('19 98 B7 00 10 00 00 00 00'); SendToServerEx(Char_Name);
pck:='';
end;
begin
if FromClient and (pck=Hstr('56 18 00 00 00 00 00 00 00 00')) then
mojno_attack:=true
else if FromClient and (pck=Hstr('56 19 00 00 00 00 00 00 00 00')) then begin
mojno_attack:=false;
end;
if mojno_attack then begin
Attack;
delay(5000);
end;
end.
Если фейл попробуй закомментить buf:=Hstr('19 98 B7 00 10 00 00 00 00'); SendToServerEx(Char_Name);
Последний раз редактировалось Gaiola; 25.03.2012 в 22:56.
|
|
|
25.03.2012, 23:07
|
#5
|
|
|
|
Разведчик
|
Регистрация: 10.05.2011
Сообщений: 8
Популярность: 667
Сказал(а) спасибо: 1
Поблагодарили 10 раз(а) в 5 сообщениях
|
Re: Скрипт на фарм. В чем ошибка?
А какже repeat? В твоем скрипте получаеться после каждого нажатия нажимать "да". Может я неправ потому что только паскаль знаю средне...
________________
l l0l l
l l l0l
l 0l0l0l
|
|
|
26.03.2012, 00:18
|
#6
|
|
|
|
Рыцарь
|
Регистрация: 12.04.2009
Сообщений: 394
Популярность: 47903
Сказал(а) спасибо: 515
Поблагодарили 1,124 раз(а) в 430 сообщениях
|
Re: Скрипт на фарм. В чем ошибка?
Во первых, не используйте delay, вашем случаи это не правильно. Эта функция создает задержку в работе скрипта. delay(5000) останавливает скрипт на 5 сек, соответственно целых 5 сек соединение простаивает.
Во вторых, сначала сформируйте алгоритм работы скрипта и только потом беритесь за создание скрипта, потому что в данном скрипте он полностью не верный.
________________
В любом из нас спит гений. И с каждым днем все крепче.
Запомните раз и навсегда:= 'Помочь' <> 'Сделайте за меня';
|
|
|
26.03.2012, 01:59
|
#7
|
|
|
|
Разведчик
|
Регистрация: 10.05.2011
Сообщений: 8
Популярность: 667
Сказал(а) спасибо: 1
Поблагодарили 10 раз(а) в 5 сообщениях
|
Re: Скрипт на фарм. В чем ошибка?
________________
l l0l l
l l l0l
l 0l0l0l
|
|
|
26.03.2012, 12:19
|
#8
|
|
|
|
Разведчик
|
Регистрация: 08.12.2010
Сообщений: 5
Популярность: 14
Сказал(а) спасибо: 0
Поблагодарили 2 раз(а) в 2 сообщениях
|
Re: Скрипт на фарм. В чем ошибка?
|
|
|
26.03.2012, 12:33
|
#9
|
|
|
|
Разведчик
|
Регистрация: 10.05.2011
Сообщений: 8
Популярность: 667
Сказал(а) спасибо: 1
Поблагодарили 10 раз(а) в 5 сообщениях
|
Re: Скрипт на фарм. В чем ошибка?
________________
l l0l l
l l l0l
l 0l0l0l
Последний раз редактировалось DemGod9; 26.03.2012 в 20:35.
Причина: Добавлено сообщение
|
|
|
27.03.2012, 23:47
|
#10
|
|
|
|
Разведчик
|
Регистрация: 08.12.2010
Сообщений: 5
Популярность: 14
Сказал(а) спасибо: 0
Поблагодарили 2 раз(а) в 2 сообщениях
|
Re: Скрипт на фарм. В чем ошибка?
|
|
|
Ваши права в разделе
|
Вы не можете создавать новые темы
Вы не можете отвечать в темах
Вы не можете прикреплять вложения
Вы не можете редактировать свои сообщения
HTML код Выкл.
|
|
|
Заявление об ответственности / Список мошенников
Часовой пояс GMT +4, время: 21:37.
|
|