Вернуться   D3Scene.Ru Софт портал игр | Хаки | Проги | Статьи > Онлайн MMO игры > Другие MMO игры > Rising Force Online
Присоединяйся к нам

Rising Force Online Представляет собой сплав фэнтези и научной фантастики, сюжет завязан на конфликте трёх враждующих рас.



Ответ
 
Опции темы Опции просмотра
Старый 26.02.2011, 10:39   #1
This? On Melancholy Hill




 
Аватар для UnDeaDRoCUser
 
Регистрация: 18.09.2008
Адрес: system32
Сообщений: 5,237
Репутация: 1415
Отправить сообщение для UnDeaDRoCUser с помощью ICQ Отправить сообщение для UnDeaDRoCUser с помощью Skype™
Автор Сообщение

Видим заточку противника


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

Запуск скрипта /PVP START
Останов скрипта /PVP STOP
Вот сам скрипт:
PHP код:
// Скрипт PVPHelper v.1.0  (c) broveymimo
// Запуск              SendPMessage("PVP","START")
// Останов             SendPMessage("PVP","STOP")

var start,stop,name,Charname:string;
    
PID,le,startl,stopl,namel,CharSID:integer;
    
flag:boolean;

Procedure MsgInfo(msg string);
begin
     gSys
.EnSendC(FormatPck('%hcdacha',[$0A02,02,0,'[!]'+FStr(16),Length(msg) + 2,$203A,msg+#0]));
     
gsys.sleep(15);
end;

procedure OnCreate;
begin
     le
:=23;
     
start:='START';
     
startl:=length(start);
     
stop:='STOP';
     
stopl:=length(stop);
     
name:='PVP';
     
namel:=length(name);
     
flag:=false;
end;

BEGIN
     
if length(_gBuff) < 4 then exit;
     
PID := GInt(_gBuff,3,2);

     if 
not (_gFromServthen
     
case PID of
       
$0302begin
                   
if strcmp(copy(_gBuff,5,namel),namethen
                   begin
                        
if strcmp(copy(_gBuff,le,startl),startthen flag:=true;
                        if 
strcmp(copy(_gBuff,le,stopl),stopthen flag:=false;
                        
gBlockPacket;
                   
end;
              
end;

       $
1A0Dbegin
                   CharSID
:=GInt(_gBuff,7,2);
                   
gSys.SendS(FormatPck('%hhh',[$1E03,CharSID,0]));
              
end;
     
end;
     if 
_gFromServ then
     
case PID of
       
$660Dbegin
                   MsgInfo
('Welcome to PVPHelper v.1.0');
                   
MsgInfo('(c) broveymimo, 2010');
                   
MsgInfo('');
                   
MsgInfo('/PVP START для запуска скрипта');
                   
MsgInfo('/PVP STOP для остановки скрипта');
                   
MsgInfo('----------');
              
end;

       $
1F03begin
                   
if flag and (GInt(_gBuff,5,2) = CharSIDthen
                   begin
                        Charname
:=(copy(_gBuff,46,17));
                        
gSys.EnSendC(FormatPck('%hcdacha',[$0A02,02,0,'[!]'+FStr(16),19,$203A,Charname+#0]));
                        
gSys.EnSendC(FormatPck('%hcdachacc',[$0A02,02,0,'[!]'+FStr(16),10,$203A,'куртка +',(GInt(_gBuff,19,1)+48),0]));
                        
gSys.EnSendC(FormatPck('%hcdachacc',[$0A02,02,0,'[!]'+FStr(16),9,$203A,'штаны +',(GInt(_gBuff,22,1)+48),0]));
                        
gSys.EnSendC(FormatPck('%hcdachacc',[$0A02,02,0,'[!]'+FStr(16),12,$203A,'перчатки +',(GInt(_gBuff,25,1)+48),0]));
                        
gSys.EnSendC(FormatPck('%hcdachacc',[$0A02,02,0,'[!]'+FStr(16),11,$203A,'ботинки +',(GInt(_gBuff,28,1)+48),0]));
                        
gSys.EnSendC(FormatPck('%hcdachacc',[$0A02,02,0,'[!]'+FStr(16),9,$203A,'шапка +',(GInt(_gBuff,31,1)+48),0]));
                        
gSys.EnSendC(FormatPck('%hcdachacc',[$0A02,02,0,'[!]'+FStr(16),7,$203A,'щит +',(GInt(_gBuff,34,1)+48),0]));
                        
gSys.EnSendC(FormatPck('%hcdachacc',[$0A02,02,0,'[!]'+FStr(16),10,$203A,'оружие +',(GInt(_gBuff,37,1)+48),0]));
                        
MsgInfo('----------');
                   
end;
              
end;
      
end;
END
__________________
[ [Ссылки скрыты от гостей.] | [Ссылки скрыты от гостей.] | [Ссылки скрыты от гостей.] | [Ссылки скрыты от гостей.] | [Ссылки скрыты от гостей.] | [Ссылки скрыты от гостей.] | [Ссылки скрыты от гостей.] | [Ссылки скрыты от гостей.] | [Ссылки скрыты от гостей.] | ]

[ [Ссылки скрыты от гостей.] ]

  Ответить с цитированием Наверх
Ответ


Здесь присутствуют: 1 (пользователей: 0 , гостей: 1)
 
Опции темы
Опции просмотра

Ваши права в разделе
Вы не можете создавать новые темы
Вы не можете отвечать в темах
Вы не можете прикреплять вложения
Вы не можете редактировать свои сообщения

BB коды Вкл.
Смайлы Вкл.
[IMG] код Вкл.
HTML код Выкл.

Быстрый переход


Powered by vBulletin
Copyright © 2017 vBulletin Solutions, Inc.
Перевод: zCarot | Дизайн: G-A | Верстка: OldEr
Текущее время: 05:02. Часовой пояс GMT +4.