PDA

Просмотр полной версии : [Помогите!] Сбор


Mr.Phoenix
21.01.2012, 11:30
Здравствуйте, есть рабочии скрипты\читы на прокачку сбора? (Энерго\Эфиро кинезы)

На сервер 2.7.

Если да, то киньте пожалуйста сылку.


С меня спасибка и весы.

god666dead
21.01.2012, 11:40
Здравствуйте, есть рабочии скрипты\читы на прокачку сбора? (Энерго\Эфиро кинезы)

На сервер 2.7.

Если да, то киньте пожалуйста сылку.


С меня спасибка и весы.
[Ссылки могут видеть только зарегистрированные и активированные пользователи]

Mr.Phoenix
21.01.2012, 12:34
[Ссылки могут видеть только зарегистрированные и активированные пользователи]

Сообщение форума
Сообщение не существует или не указан идентификатор (номер). Если вы уверены, что использовали правильную ссылку, свяжитесь с администрацией

Вот это мне выдаёт при переходе по вашей сылки.

happytorn
21.01.2012, 12:45
Здравствуйте, есть рабочии скрипты\читы на прокачку сбора? (Энерго\Эфиро кинезы)

На сервер 2.7.

Если да, то киньте пожалуйста сылку.


С меня спасибка и весы.
Активируется эмоцией улыбка
var
IdRes,i,b:integer;

begin
//проверяем пакет
if FromClient then
case pck[1] of
//узнаем иди ресурса
#$ce:
begin
IdRes:=readD(6);
end;
//ловим пакет на эмоцию улыбка
#$c2:
begin
if pck=HStr('C2 00 57 61 FF 15 1C 00 00 00 00 00') then
begin
b:=IdRes;
//собираем пакет и при каждом повторении к иди ресурса добавляем 1
For i:=1 to 30 do
begin
buf:=hstr('CE 00 57 6D FF');
writed(b);
buf:=buf+#$00;
sendtoserver;
buf:=hstr('BA 00 57 79 FF 00 00 00 00');
sendtoserver;
b:=b+1;
end;

end;

end;


end;
end.

Mr.Phoenix
21.01.2012, 14:39
Активируется эмоцией улыбка
var
IdRes,i,b:integer;

begin
//проверяем пакет
if FromClient then
case pck[1] of
//узнаем иди ресурса
#$ce:
begin
IdRes:=readD(6);
end;
//ловим пакет на эмоцию улыбка
#$c2:
begin
if pck=HStr('C2 00 57 61 FF 15 1C 00 00 00 00 00') then
begin
b:=IdRes;
//собираем пакет и при каждом повторении к иди ресурса добавляем 1
For i:=1 to 30 do
begin
buf:=hstr('CE 00 57 6D FF');
writed(b);
buf:=buf+#$00;
sendtoserver;
buf:=hstr('BA 00 57 79 FF 00 00 00 00');
sendtoserver;
b:=b+1;
end;

end;

end;


end;
end.


Можно по подробней, что он собирает и к какому ресурсу садится и тд?

Я включил его. Подошёл в альтгарде к ресурсу Конидэ, нажал улыбка. 0 реакции.

happytorn
21.01.2012, 18:50
Можно по подробней, что он собирает и к какому ресурсу садится и тд?

Я включил его. Подошёл в альтгарде к ресурсу Конидэ, нажал улыбка. 0 реакции.

Сначала возьми в таргет любой ресурс,а затем уже нажимай эмоцию.

Mr.Phoenix
21.01.2012, 21:07
Сначала возьми в таргет любой ресурс,а затем уже нажимай эмоцию.

Делал так. Взял в таргет Кониде. Нажал эмоцию. В пакетники выскочили пакеты,но сбор не идёт и не прокачивается.

happytorn
21.01.2012, 21:39
Делал так. Взял в таргет Кониде. Нажал эмоцию. В пакетники выскочили пакеты,но сбор не идёт и не прокачивается.

На каком сервере тестил?Уровень мастерства соответствует собираемому ресурсу?Я только что проверял на aion1,собирает без проблем.

Mr.Phoenix
22.01.2012, 14:36
На каком сервере тестил?Уровень мастерства соответствует собираемому ресурсу?Я только что проверял на aion1,собирает без проблем.

Сервер местный(Томский) Фактори, его в ммотопе нету. Сборка там стоит Кнайтов 2.7.

happytorn
22.01.2012, 15:35
Сервер местный(Томский) Фактори, его в ммотопе нету. Сборка там стоит Кнайтов 2.7.

Посмотри в пакетнике какой пакет идет при взятии в таргет(должно начинаться на CE) и пакет на сам сбор(должно начинаться на BA). И напиши сюда оба пакета.

deyvel
15.12.2012, 15:25
anyone know the 3.0 packets for this script?

var
IdRes,i,b:integer;

begin

if FromClient then
case pck[1] of

#$ce:
begin
IdRes:=readD(6);
end;

#$c2:
begin
if pck=HStr('C2 00 57 61 FF 15 1C 00 00 00 00 00') then
begin
b:=IdRes;

For i:=1 to 500 do
begin
buf:=hstr('CE 00 57 6D FF');
writed (b);
buf:=buf+#$00;
sendtoserver;
buf:=hstr('BA 00 57 79 FF 00 00 00 00');
sendtoserver;
b:=b+1;
end;

end;

end;

end;

end.