 |
Способ попасть в Элизиум/Пандемониум - Баги и читы для Aion - Баги и читы, прочие уязвимости игры Aion |
20.04.2012, 16:06
|
#1
|
|
|
|
Разведчик
|
 Регистрация: 19.04.2012
 Сообщений: 23
 Популярность: 32
 Сказал(а) спасибо: 54
Поблагодарили 11 раз(а) в 7 сообщениях
|
Способ попасть в Элизиум/Пандемониум
Вобщем так нашол способ как попасть в Элизиум или в Пандемониум.
Способ работает ток там где есть локация Сарфан и на серве пашет скрипт на ТП.
Делаем так:
1. Заходим в Сарфан и идем в Камар над Камаром летает 2 кораблика один асмовский другой няховский
2. если ви асм ви смотрите где няхо корабль он слева от асмовсково и юзаем срипт на ТП тоесть вводим в чат .m1 и стоим на месте и клацаем мишкой по няхокорабле клацаем много пока нас туда не тепнет, если не тепает пабегайте чуть смените свайо располажения и апять пробуйте туда тепнутса.
3. Когда попадаем на няхо корабль подхолдим к военному судну юзаем ево и вибираем ТП в Элизиум ) вуаля ми в Элизиуме)
Для нях все так само ток нада тепатса на асмо корабль)
вот сам скрипт на ТП
var
coordinat:array[0..1,0..3] of integer;
xyzh,pak: array[0..3] of integer;
packet,blick_mode,mouse_mode:byte;
blick_start,mouse_start:boolean;
procedure init ;
begin
packet:=0;
end;
procedure blick(mode:integer);
var
i:integer;
begin
if blick_start=true then
begin
xyzh[0]:=readD(6);
xyzh[1]:=readD(10);
xyzh[2]:=readD(14);
xyzh[3]:=readc(18);
if packet=0 then
begin
for i:=0 to 3 do coordinat[0,i]:=xyzh[i];
packet:=1;
end
else
begin
for i:=0 to 3 do coordinat[1,i]:=xyzh[i];
packet:=0;
case blick_mode of
1:
begin
pak[0]:=coordinat[1,0]+((coordinat[1,0]-coordinat[0,0])*10);
pak[1]:=coordinat[1,1]+((coordinat[1,1]-coordinat[0,1])*10);
pak[2]:=coordinat[1,2]+((coordinat[1,2]-coordinat[0,2])*10)+50000;
pak[3]:=coordinat[1,3];
end;
2:
begin
pak[0]:=coordinat[1,0]-((coordinat[1,0]-coordinat[0,0])*10);
pak[1]:=coordinat[1,1]-((coordinat[1,1]-coordinat[0,1])*10);
pak[2]:=coordinat[1,2]-((coordinat[1,2]-coordinat[0,2])*10)+50000;
pak[3]:=coordinat[1,3];
end;
3:
begin
pak[0]:=coordinat[1,0]+((coordinat[1,0]-coordinat[0,0]));
pak[1]:=coordinat[1,1]+((coordinat[1,1]-coordinat[0,1]));
pak[2]:=coordinat[1,2]+((coordinat[1,2]-coordinat[0,2]))+1000000;
pak[3]:=coordinat[1,3];
end;
end;
buf:=hstr('C2 00 57 61 FF 05');
for i:=0 to 2 do writed(pak[i]);
writec(xyzh[3]);
sendtoserver;
buf:='';
blick_start:=false;
blick_mode:=0;
end;
end
else
begin
blick_start:=true;
blick_mode:=mode;
end;
end;
procedure mouse(mode:integer);
var
i:integer;
begin
if mouse_start then
begin
if Length(pck)=31 then
begin
xyzh[0]:=readD(20);
xyzh[1]:=readD(24);
xyzh[2]:=readD(28);
xyzh[3]:=readc(32);
pck:='';
buf:=hstr('C2 00 57 61 FF');
case mouse_mode of
1: writec(4);
2: writec(5);
end;
for i:=0 to 2 do writed(xyzh[i]);
writec(0);
sendtoserver;
buf:='';
mouse_start:=false;
mouse_mode:=0;
end
else
begin
message('Wrong point',8);
mouse_mode:=0;
end;
end
else
begin
mouse_start:=true;
mouse_mode:=mode;
end;
end;
procedure message(msg:string;chatID:byte);
begin
buf:=HStr('16 00 54 D5 FF 00 00 E3 10 37 00 ');
writec(chatID,6);
WriteS('PHX');
WriteS(msg);
SendToClient;
end;
begin
if FromClient then
case pck[1] of
#$9f:
begin
if blick_start then blick(0);
if mouse_start then mouse(0);
end;
#$b2:
case reads(7) of
'.go1': blick(1);
'.go2': blick(2);
'.go3': blick(3);
'.m1': mouse(1);
'.m2': mouse(2);
end;
end;
end.
P.S. сори за карявий руский отпишитесь у каво палучилось )
Последний раз редактировалось Scrambyy; 20.04.2012 в 22:38.
|
|
|
20.04.2012, 16:12
|
#2
|
|
|
|
Рыцарь-лейтенант
|
 Регистрация: 10.06.2011
 Сообщений: 467
 Популярность: 31147
 Сказал(а) спасибо: 231
Поблагодарили 488 раз(а) в 226 сообщениях
|
Re: Способ попасть в Элизиум/Пандемониум
Глаза режет читать. Исправь.
1. Что такой "Сарфан"
2. Что такое "Камар"
|
|
|
20.04.2012, 16:15
|
#3
|
|
|
|
Разведчик
|
 Регистрация: 19.04.2012
 Сообщений: 23
 Популярность: 32
 Сказал(а) спасибо: 54
Поблагодарили 11 раз(а) в 7 сообщениях
|
Re: Способ попасть в Элизиум/Пандемониум
Сарфан лока из 3.0
Камар столица локи
|
|
|
20.04.2012, 16:27
|
#4
|
|
|
|
Разведчик
|
 Регистрация: 15.04.2012
 Сообщений: 2
 Популярность: 10
 Сказал(а) спасибо: 0
Поблагодарили 0 раз(а) в 0 сообщениях
|
Re: Способ попасть в Элизиум/Пандемониум
 |
Цитата: |
 |
|
|
|
|
|
|
|
|
Вобщем так нашол способ как попасть в Элизиум или в Пандемониум.
Способ работает ток там где есть локация Сарфан и на серве пашет скрипт на ТП.
Делаем так: заходим в Сарфан и идем в Камар над Камаром летает 2 кораблика один асмовский другой няховский, если ви асм ви смотрите где няхо корабль он слева от асмовсково и юзаем срипт на ТП тоесть вводим в чат .m1 и стоим на месте и клацаем мишкой по няхокорабле клацаем много пока нас туда не тепнет, если не тепает пабегайте чуть смените свайо располажения и апять пробуйте туда тепнутса.
Когда попадаем на няхо корабль подхолдим к военному судну юзаем ево и вибираем ТП в Элизиум ) вуаля ми в Элизиуме)
для нях все так само ток нада тепатса на асмо корабль)
вот сам скрипт на ТП
var
coordinat:array[0..1,0..3] of integer;
xyzh,pak: array[0..3] of integer;
packet,blick_mode,mouse_mode:byte;
blick_start,mouse_start:boolean;
procedure init ;
begin
packet:=0;
end;
procedure blick(mode:integer);
var
i:integer;
begin
if blick_start=true then
begin
xyzh[0]:=readD(6);
xyzh[1]:=readD(10);
xyzh[2]:=readD(14);
xyzh[3]:=readc(18);
if packet=0 then
begin
for i:=0 to 3 do coordinat[0,i]:=xyzh[i];
packet:=1;
end
else
begin
for i:=0 to 3 do coordinat[1,i]:=xyzh[i];
packet:=0;
case blick_mode of
1:
begin
pak[0]:=coordinat[1,0]+((coordinat[1,0]-coordinat[0,0])*10);
pak[1]:=coordinat[1,1]+((coordinat[1,1]-coordinat[0,1])*10);
pak[2]:=coordinat[1,2]+((coordinat[1,2]-coordinat[0,2])*10)+50000;
pak[3]:=coordinat[1,3];
end;
2:
begin
pak[0]:=coordinat[1,0]-((coordinat[1,0]-coordinat[0,0])*10);
pak[1]:=coordinat[1,1]-((coordinat[1,1]-coordinat[0,1])*10);
pak[2]:=coordinat[1,2]-((coordinat[1,2]-coordinat[0,2])*10)+50000;
pak[3]:=coordinat[1,3];
end;
3:
begin
pak[0]:=coordinat[1,0]+((coordinat[1,0]-coordinat[0,0]));
pak[1]:=coordinat[1,1]+((coordinat[1,1]-coordinat[0,1]));
pak[2]:=coordinat[1,2]+((coordinat[1,2]-coordinat[0,2]))+1000000;
pak[3]:=coordinat[1,3];
end;
end;
buf:=hstr('C2 00 57 61 FF 05');
for i:=0 to 2 do writed(pak[i]);
writec(xyzh[3]);
sendtoserver;
buf:='';
blick_start:=false;
blick_mode:=0;
end;
end
else
begin
blick_start:=true;
blick_mode:=mode;
end;
end;
procedure mouse(mode:integer);
var
i:integer;
begin
if mouse_start then
begin
if Length(pck)=31 then
begin
xyzh[0]:=readD(20);
xyzh[1]:=readD(24);
xyzh[2]:=readD(28);
xyzh[3]:=readc(32);
pck:='';
buf:=hstr('C2 00 57 61 FF');
case mouse_mode of
1: writec(4);
2: writec(5);
end;
for i:=0 to 2 do writed(xyzh[i]);
writec(0);
sendtoserver;
buf:='';
mouse_start:=false;
mouse_mode:=0;
end
else
begin
message('Wrong point',8);
mouse_mode:=0;
end;
end
else
begin
mouse_start:=true;
mouse_mode:=mode;
end;
end;
procedure message(msg:string;chatID:byte);
begin
buf:=HStr('16 00 54 D5 FF 00 00 E3 10 37 00 ');
writec(chatID,6);
WriteS('PHX');
WriteS(msg);
SendToClient;
end;
begin
if FromClient then
case pck[1] of
#$9f:
begin
if blick_start then blick(0);
if mouse_start then mouse(0);
end;
#$b2:
case reads(7) of
'.go1': blick(1);
'.go2': blick(2);
'.go3': blick(3);
'.m1': mouse(1);
'.m2': mouse(2);
end;
end;
end.
сори за карявий руский отпишитесь у каво палучилось )
|
|
 |
|
 |
|
Я не считаю актуальным что ты пишеш коряво, ведь ты писать то умееш нормально просто, Это бред таково писать...
|
|
|
20.04.2012, 17:21
|
#5
|
|
|
|
Разведчик
|
 Регистрация: 30.12.2011
 Сообщений: 49
 Популярность: 73
 Сказал(а) спасибо: 19
Поблагодарили 8 раз(а) в 7 сообщениях
|
Re: Способ попасть в Элизиум/Пандемониум
Я автора темы понял лучше чем тебя, предыдущий пост!
|
|
|
20.04.2012, 17:53
|
#6
|
|
|
|
Сержант
|
 Регистрация: 22.10.2010
 Сообщений: 105
 Популярность: 521
 Сказал(а) спасибо: 40
Поблагодарили 122 раз(а) в 26 сообщениях
|
Re: Способ попасть в Элизиум/Пандемониум
|
|
|
20.04.2012, 22:18
|
#7
|
|
|
|
Рыцарь
|
 Регистрация: 20.10.2011
 Сообщений: 395
 Популярность: 3913
 Сказал(а) спасибо: 253
Поблагодарили 468 раз(а) в 122 сообщениях
|
Re: Способ попасть в Элизиум/Пандемониум
Вобщем так нашол способ как попасть в Элизиум или в Пандемониум.
Способ работает ток там где есть локация Сарфан и на серве пашет скрипт на ТП.
Делаем так:
1. Заходим в Сарфан и идем в Камар над Камаром летает 2 кораблика один асмовский другой няховский
2. если ви асм ви смотрите где няхо корабль он слева от асмовсково и юзаем срипт на ТП тоесть вводим в чат .m1 и стоим на месте и клацаем мишкой по няхокорабле клацаем много пока нас туда не тепнет, если не тепает пабегайте чуть смените свайо располажения и апять пробуйте туда тепнутса.
3. Когда попадаем на няхо корабль подхолдим к военному судну юзаем ево и вибираем ТП в Элизиум ) вуаля ми в Элизиуме)
Для нях все так само ток нада тепатса на асмо корабль)
вот сам скрипт на ТП
PHP код:
var coordinat:array[0..1,0..3] of integer; xyzh,pak: array[0..3] of integer; packet,blick_mode,mouse_mode:byte; blick_start,mouse_start:boolean;
procedure init ; begin packet:=0; end;
procedure blick(mode:integer); var i:integer; begin if blick_start=true then begin xyzh[0]:=readD(6); xyzh[1]:=readD(10); xyzh[2]:=readD(14); xyzh[3]:=readc(18); if packet=0 then begin for i:=0 to 3 do coordinat[0,i]:=xyzh[i]; packet:=1; end else begin for i:=0 to 3 do coordinat[1,i]:=xyzh[i]; packet:=0; case blick_mode of 1: begin pak[0]:=coordinat[1,0]+((coordinat[1,0]-coordinat[0,0])*10); pak[1]:=coordinat[1,1]+((coordinat[1,1]-coordinat[0,1])*10); pak[2]:=coordinat[1,2]+((coordinat[1,2]-coordinat[0,2])*10)+50000; pak[3]:=coordinat[1,3]; end; 2: begin pak[0]:=coordinat[1,0]-((coordinat[1,0]-coordinat[0,0])*10); pak[1]:=coordinat[1,1]-((coordinat[1,1]-coordinat[0,1])*10); pak[2]:=coordinat[1,2]-((coordinat[1,2]-coordinat[0,2])*10)+50000; pak[3]:=coordinat[1,3]; end; 3: begin pak[0]:=coordinat[1,0]+((coordinat[1,0]-coordinat[0,0])); pak[1]:=coordinat[1,1]+((coordinat[1,1]-coordinat[0,1])); pak[2]:=coordinat[1,2]+((coordinat[1,2]-coordinat[0,2]))+1000000; pak[3]:=coordinat[1,3]; end; end; buf:=hstr('C2 00 57 61 FF 05'); for i:=0 to 2 do writed(pak[i]); writec(xyzh[3]); sendtoserver; buf:=''; blick_start:=false; blick_mode:=0; end; end else begin blick_start:=true; blick_mode:=mode; end; end; procedure mouse(mode:integer); var i:integer; begin if mouse_start then begin if Length(pck)=31 then begin xyzh[0]:=readD(20); xyzh[1]:=readD(24); xyzh[2]:=readD(28); xyzh[3]:=readc(32); pck:=''; buf:=hstr('C2 00 57 61 FF'); case mouse_mode of 1: writec(4); 2: writec(5); end; for i:=0 to 2 do writed(xyzh[i]); writec(0); sendtoserver; buf:=''; mouse_start:=false; mouse_mode:=0; end else begin message('Wrong point',8); mouse_mode:=0; end; end else begin mouse_start:=true; mouse_mode:=mode; end; end; procedure message(msg:string;chatID:byte); begin buf:=HStr('16 00 54 D5 FF 00 00 E3 10 37 00 '); writec(chatID,6); WriteS('PHX'); WriteS(msg); SendToClient; end;
begin if FromClient then case pck[1] of #$9f: begin if blick_start then blick(0); if mouse_start then mouse(0); end; #$b2: case reads(7) of '.go1': blick(1); '.go2': blick(2); '.go3': blick(3); '.m1': mouse(1); '.m2': mouse(2); end; end; end.
P.S. сори за карявий руский отпишитесь у каво палучилось )
Добавлено через 2 минуты
Копируй оформление), надеюсь понравится
________________
Для просмотра ссылок или изображений в подписях, у Вас должно быть не менее 10 сообщение(ий). Сейчас у Вас 0 сообщение(ий). Затыкай меня спасибками Для просмотра ссылок или изображений в подписях, у Вас должно быть не менее 10 сообщение(ий). Сейчас у Вас 0 сообщение(ий).
Последний раз редактировалось c-lavr; 20.04.2012 в 22:25.
Причина: Добавлено сообщение
|
|
|
Пользователь сказал cпасибо:
|
|
24.04.2012, 13:54
|
#8
|
|
|
|
Разведчик
|
 Регистрация: 24.03.2012
 Сообщений: 24
 Популярность: 12
 Сказал(а) спасибо: 11
Поблагодарили 1 раз в 1 сообщении
|
Re: Способ попасть в Элизиум/Пандемониум
может что и для 2.7 на тп в столицы найдётся? =)
|
|
|
Ваши права в разделе
|
Вы не можете создавать новые темы
Вы не можете отвечать в темах
Вы не можете прикреплять вложения
Вы не можете редактировать свои сообщения
HTML код Выкл.
|
|
|
Заявление об ответственности / Список мошенников
Часовой пояс GMT +4, время: 07:53.
|
 |