Показать сообщение отдельно
Старый 03.03.2008, 12:58   #23
Рыцарь
 
Аватар для NLObP
 
Регистрация: 25.02.2008
Адрес: г.Волгоград
Сообщений: 2,009
Сказал Спасибо: 1,285
Имеет 1,458 спасибок в 793 сообщенях
NLObP пока неопределено
По умолчанию Re:

Цитата:
Сообщение от begon
Хочется узнать как изменить его под себя....
Тоесть - что заменить чтоб манорить другого моба и другими семенами? (пример - голденсода и еуесерчер под дионом). И еще если я не туран мне надо бы бафы закоментировать...какую именно часть чтоб ниче лишнего незадеть?
Изменяй константы.
Код:
const
   MOB=1000794; // имя моба  Blade Stakato 41x2 - ID моба+1000000, берем в npcs.ini
   Seed=5221; //Chilly Cobol - семечки, берем в itemsid.ini
   Harvester=5125; //Harvester
   MaxMobCount=2;
   SpiritofOgre='2F 6D 00 00 00 00 00 00 00 00'; //баф
   HealingPotion=1061; //ID бутылки лечения
Измени значения координаты Z при каче на других мобах (не знаю правда почему Z)
Код:
//Если приходит пакет NPCInfo от сервера, то проверяем чтобы это был нужный нам моб и находился в нужной области 
//координат, то запоминаем ИД моба в  массив.
    if FromServer and (pck[1]=#$16) then begin
//Думаю тут надо пояснить что и как. Параметр -7750 и -8184 это координаты по оси Z. 
//Сделано это для того чтобы персонаж не отвлекался на других мобов в округи, а занимался только этими двумя :)
       if (ReadD(6)=MOB) and (ReadD(22)<-7750) and (ReadD(22)>-8184) then begin
          count:=0;
          for i:=1 to MaxMobCount do begin
             if (MobID[i]=ReadD(2)) then count:=i;
          end;
          if (count = 0) then begin
             for i:=1 to MaxMobCount do begin
                if (MobID[i]=0) then begin
                   MobID[i]:=ReadD(2);
                   break;
                end;
             end;
          end;
Закоменти этот кусок, чтобы не бафаться
Код:
//Тут проверяем закончилось ли действие Баффа и если закончилось то еще раз используем
    if FromServer and (pck[1]=#$7F) then begin
       buf:=Hstr(SpiritofOgre);
       SendToServer;
       Attack(MobInWarID,0,0,0);
    end;
__________________
| Для самых ленивый | Телепаты в отпуске |Мы работаем над этим |
Не умеешь - учись, не хочешь учиться - плати © Суровый Закон Жизни


NLObP вне форума   Ответить с цитированием