PDA

Просмотр полной версии : [Скрипт] 2 скрипта для заклинателей


k2_target
08.08.2011, 14:06
Создаём новый макрос.

Заполняем его так: (копируете и в поле нажимаете Shift+Insrert)

Название:

Проклятие

Описание:

Прокляте отчаяния
Откат 3 минуты

Команда макроса:


/смех




И выносите макрос на панель скилов.

и готово. при активации макроса у вас вылетает скил - Проклятие отчаяния I

Сам скрипт:

var

SpeedTable1:array[1..10] of integer;
cSpeed:integer;
rSpeed:single;
vx1:variant;

DangePacket:array[1..10] of string;
//DangePacket1:string;
//DangePacket2:string;

CharID:array[1..4] of integer;
TargetID:integer;

var
msgName:string;

procedure PHX_Message(msg1:string);

begin
buf:=HStr('17 54 D4 07 00 00 00 00 00 ');
msgName:='[Ссылки могут видеть только зарегистрированные и активированные пользователи]';
WriteS(msgName);
WriteS(msg1);
SendToClient;
end;
begin
if FromClient and (ReadC(1)=$C9{select}) then
begin
TargetID:=ReadD(4);
if DangePacket[1]='' then
begin
buf:=HStr('9A 57 59 ');
WriteD(TargetID);
DangePacket[1]:=buf;
PHX_Message(Format('SK-NS',[TargetID]));
end;
if DangePacket[2]='' then
begin
buf:=HStr('9A 57 59 ');
WriteD(TargetID);
DangePacket[2]:=buf;
PHX_Message(Format('- Skript "Skill_2008"',[TargetID]));
end;

end;


begin
if(fromserver)and(pck[1]=#$42) and (ReadH(19)= 1 )then
begin
buf:=hstr('CF 57 6C D8 07 00 00');
writeD(readD(8));
buf:=buf+hstr('EE 02 A5 09 00 00');
sendtoserver;
end;
end;
end.


Скил с помощью макроса

Создаём новый макрос.

Заполняем его так: (копируете и в поле нажимаете Shift+Insrert)

Название:

Проклятие

Описание:

Прокляте отчаяния
Откат 3 минуты

Команда макроса:


/гнев




И выносите макрос на панель скилов.

и готово. при активации макроса у вас вылетает скил - Проклятие отчаяния I

Cам скрипт:

var

SpeedTable1:array[1..10] of integer;
cSpeed:integer;
rSpeed:single;
vx1:variant;

DangePacket:array[1..10] of string;
//DangePacket1:string;
//DangePacket2:string;

CharID:array[1..4] of integer;
TargetID:integer;

var
msgName:string;

procedure PHX_Message(msg1:string);

begin
buf:=HStr('17 54 D4 07 00 00 00 00 00 ');
msgName:='[Ссылки могут видеть только зарегистрированные и активированные пользователи]';
WriteS(msgName);
WriteS(msg1);
SendToClient;
end;
begin
if FromClient and (ReadC(1)=$C9{select}) then
begin
TargetID:=ReadD(4);
if DangePacket[1]='' then
begin
buf:=HStr('9A 57 59 ');
WriteD(TargetID);
DangePacket[1]:=buf;
PHX_Message(Format('SK-NS',[TargetID]));
end;
if DangePacket[2]='' then
begin
buf:=HStr('9A 57 59 ');
WriteD(TargetID);
DangePacket[2]:=buf;
PHX_Message(Format('- Skript "Skill_2002"',[TargetID]));
end;

end;


begin
if(fromserver)and(pck[1]=#$42) and (ReadH(19)= 2 )then
begin
buf:=hstr('CF 57 6C D2 07 00 00');
writeD(readD(8));
buf:=buf+hstr('EE 02 A5 09 00 00');
sendtoserver;
end;
end;
end.


Взял с другова чит портала. Сам в скриптах 0.

Fantme
08.08.2011, 15:04
я нуб в СМах но в чем прикол тупо юзания скила?

k2_target
08.08.2011, 15:16
Эти скилы под снятием шока.
а со скриптами ты можеш их юзать когда угодно. + они хороши (1 фир, и удар на 4к урона_с востановлением)

510145
12.08.2011, 13:42
Aion "свободный" работает
Но 1 минус палевно так как чар при юзе макроса в логе отображется что юз скила в одно и тоже время с юзом эмоции!

k2_target
12.08.2011, 14:03
Aion "свободный" работает
Но 1 минус палевно так как чар при юзе макроса в логе отображется что юз скила в одно и тоже время с юзом эмоции!

1- эмоция не юзается.
2- можно использывать при замесах.
3- Я скрипты дал будеш ты их использовать, не будеш твои проблемы.

badmen
12.08.2011, 14:34
секундочку не понял.
это надо уже быть 44+, что бы скилы были уже активированы?
я не понял что делать со скриптом? макрос то создам, а скрипт куда девать?

k2_target
12.08.2011, 14:46
секундочку не понял.
это надо уже быть 44+, что бы скилы были уже активированы?
я не понял что делать со скриптом? макрос то создам, а скрипт куда девать?

в l2phx конешно.

СТАВИМ СПАСИБО!

vladsab
13.08.2011, 01:05
Спасибо работает,но спалили меня и дали бан =_=,этими скриптами надо пользоватся окуратно)

macsanya
13.08.2011, 04:14
Можно проще.
1. Ловим пакет на одевание левой шмотки шмотки (пример: CC 2D 14 69 15 13 13 15 61 1B A7 15)
2. Ловим пакет скила (пример: CF 2D 13 B4 15 11 13 15 00 0F 1F 15 0D 96 B9 15 0D)

3.Заменяем нужные поля в скрипте.

procedure Init; //Мясникъ production (South580)
begin

end;

procedure Free;
begin

end;

begin
if FromClient and (pck=HStr('CC 2D 14 69 15 13 13 15 61 1B A7 15'))//пакет одевания вещи
then
begin
buf:=HStr('CF 2D 13 B4 15 11 13 15 00 0F 1F 15 0D 96 B9 15 0D');//Пакет скила

SendToServer;
pck:='';
end;


end.


4.Выносим эту вещь на панель, включаем скрипт и радуемся.
_____

Так же можно добавить после 1-ого скила и множество других, но при частом нажатии на вещь на панели, лог античита сервера выдаст множество сообщений такого типа:

[2011-**-** **:**:**] [CHEAT] South580 CM_CASTSPELL packet hack. COOLDOWN AVOID spellid 734 delta -3434

И вы попадёте в бан.

k2_target
13.08.2011, 10:18
А здесь не банят за накрутку спасибок ? Мне интересно за что ghostRecon ставит тебе спасибки в каждом сообщении, имея в наличии всего 9 постов и дата регистрации - 12.08.2011 ?

Я хз кто это такой. Ставят пусть ставят, не ставят бог с ними.
PS сообщению маянкиномПродукту.
Я уже пол года бегаю с этими скриптами. Никто меня не банил, Если их юзать на право и на лево, как ****** последний (ты так наверное и делаеш)
то ясен пень тебя банить будут. Юзать их можно в замесах, и отлично всё.

macsanya
13.08.2011, 14:32
Я хз кто это такой. Ставят пусть ставят, не ставят бог с ними.
PS сообщению маянкиномПродукту.
Я уже пол года бегаю с этими скриптами. Никто меня не банил, Если их юзать на право и на лево, как ****** последний (ты так наверное и делаеш)
то ясен пень тебя банить будут. Юзать их можно в замесах, и отлично всё.

Просто нужно играть на нормальных серверах, где стоит античит система от спама пакетов. В логах античита сообщения показываются если ты не знал, прежде чем читерить надо познать специфику структуры серверов аиона.

k2_target
15.08.2011, 12:00
Просто нужно играть на нормальных серверах, где стоит античит система от спама пакетов. В логах античита сообщения показываются если ты не знал, прежде чем читерить надо познать специфику структуры серверов аиона.

Да я с тобой согласен.
Но я та играю на: AION-FREE и AION UA
Там эти скрипты работают на ура.

badmen
15.08.2011, 23:10
привет. а не подскажешь какие скилы лучше ставить для волшебника чтобы палевно не было? поделись плз мнением

k2_target
15.08.2011, 23:14
привет. а не подскажешь какие скилы лучше ставить для волшебника чтобы палевно не было? поделись плз мнением

Я не знаю, не разу в жизни не играл волшем.
Попробуй те что у тебя под снятием шока.