[Скрипт] 2 полезных скрипта...

[фывраль]

1-й скрпит:
Самовоскрешение.
При нажатии на эмоцию улыбка воскрешает
Скрипт_1

procedure Init; //Вызывается при включении скрипта
begin

end;

procedure Free; //Вызывается при выключении скрипта
begin

end;

begin
  if FromClient and (pck=HStr('C9 57 66 15 1C 00 00 00 00 00'))//эмоция улыбка
  then 
       begin
            buf:=HStr('6B 57 08 01');//Воскрешение
                                   
            SendToServer;
            pck:='';  
            
       end;      

     
end.

2-й скрипт:
Назвал это: Призрак
При нажатии на эмоцию Гнев, телепортирует на последнее место нахождение, взято из темы телепорта, но когда рядом враг, нажимаем эмоцию, и начинаем мигать, на вас нельзя навести таргет, можно посидеть, восстановить хп
Скрипт_2

procedure Init; //Вызывается при включении скрипта
begin

end;

procedure Free; //Вызывается при выключении скрипта
begin

end;

begin
if FromClient and (pck=HStr('C9 57 66 15 02 00 00 00 00 00'))//эмоция гнев
  then 
       begin
            buf:=HStr('67 57 04');//Призрак
                                   
            SendToServer;
            pck:='';  
            
       end;      

     
end.

Написано для клиента 2.1
Так же, можно просто открыть в файле:

Спасибо vex2865

[kamix]

молодец) вот только на разных серверах-разные пакеты.

[фывраль]

ну, заменить ведь можно
это именно для 2.1
ПС, на 2.1 эти пакеты, должны подходить под все сервера...

[kamix]

на приватках типа InfiniteAion, другие. Да и походу саморес не пашет ибо даже после отправки правильного пакето ефект 0.

[фывраль]

Цитата: Сообщение от kamix на приватках типа InfiniteAion, другие.

кто захочет, сможет подправить, там не сложно ведь...

Цитата: Сообщение от kamix Да и походу саморес не пашет ибо даже после отправки правильного пакето ефект 0.

ты о сервере?

[kamix]

Цитата: Сообщение от фывраль кто захочет, сможет подправить, там не сложно ведь... ты о сервере?

ну да, решил поофтопить).

[indigo2010]

скрипт на бег (клиент 2.1) активируеться клавишей "ю":

 procedure Init; //Вызывается при включении скрипта
begin

end;

procedure Free; //Вызывается при выключении скрипта
begin

end;

begin
if FromClient and (pck=HStr('C9 57 66 1A'))//ходьба
  then 
       begin
            buf:=HStr('AC 57 4B C9 2C 01 00 AF 68 00 00 07 00 00 00');//Бег
                                   
            SendToServer;
            pck:='';  
            
       end;      

     
end.

для прекращения действия нужно просто подпрыгнуть

[фывраль]

Цитата: Сообщение от indigo2010 скрипт на бег (клиент 2.1) активируеться клавишей "ю":

сам не додумался сделать, так как пакеты эмоций, всего на пару секунд, из за этого он и бежал только секунду быстро здорово придумал на счет хотьбы...

[soglaev]

в чем смылс скрипта на бег что то я н е понял

[braxmaputra]

на планете не работают 2.1.0.7

[фывраль]

Цитата: Сообщение от braxmaputra на планете не работают 2.1.0.7

значит там пакеты другие!

[Femida95]

procedure Init; //Вызывается при включении скрипта
begin

end;

procedure Free; //Вызывается при выключении скрипта
begin

end;

begin
if FromClient and (pck=HStr('CC 57 6B 00 01 00 00 00 3E A4 31 00'))//эмоция улыбка
then
begin
buf:=HStr('6B 57 08 01');//Воскрешение

SendToServer;
pck:='';

end;


end.


лично я сделал так, тут я словил пакет вставки на 2.1 ЮА кинжала разгневаной геры в слот оружия вместо улыбки. Получилось достаточно удобно в том плане, что на ЮА когда лежишь нельзя юзать скилы, а вот снимать и одевать шмот можно, поэтому при одевании ( можно не перетаскивать, а просто жать в инветаре ПКМ ) ты ресаешься, но происходит мгновенная замена кинжала обратно на "прежнее оружие" и ты можешь снова вступить в бой.Что бы сделать тому подобное просто отлавливаем пакет одевания шмотки ( желательно "левой" ) и ставим на место первого пакета в скрипте - перед эмоция улыбка.

[фывраль]

Femida95, Так легче...

[Femida95]

Цитата: Сообщение от фывраль Femida95, Так легче...

Возможно, не пробывал твой скрипт, пользуюсь пока проверенным, потому что юзать можно во многих местах ( не уверен что во всех )

[CyberCrime'r]

Цитата: Сообщение от Defoult а хули я в таргет ни кого взять не могу??

может руки из одного места, читай правила на счет нецензурной лексики на форуме