[Скрипт] 2 скрипта для заклинателей

[k2_target]

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

Заполняем его так: (копируете и в поле нажимаете 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:='www.on-cheat.3dn.ru';
         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:='www.on-cheat.3dn.ru';
         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]

я нуб в СМах но в чем прикол тупо юзания скила?

[k2_target]

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

[510145]

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

[k2_target]

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

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

[badmen]

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

[k2_target]

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

в l2phx конешно.

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

[vladsab]

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

[macsanya]

Можно проще.
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]

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

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

[macsanya]

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

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

[k2_target]

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

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

[badmen]

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

[k2_target]

Цитата: Сообщение от badmen привет. а не подскажешь какие скилы лучше ставить для волшебника чтобы палевно не было? поделись плз мнением

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