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

Цитата:
Сообщение от PsyR Посмотреть сообщение
Спасибку тыкнул =)

А как это прописать на месте *возврат в город*? =)

Код:
CharStatus(HP,<,1)
{
SAY(Что я тебе сделал? :'()  //бот ЭМО =)
*команда возврат в город* //как её прописать?
}
У меня реализовано так, в основном цикле отлавливаю пакет Die

delphi Код:
//***************************************************************       //пакет Die (моб умер)       //06=Die:h(CharID)d(d)d(HAsHideout)d(HasCastle)d(flags)d(sweepable)d(access)       #$06: begin            if (MyOID=ReadD(2)) then begin               msg.Lines.Add('Нас убили в '+TimeToStr(time));               underattack:=false;               inc(death1);               fishin.enabled:=false;               isFishing:=false; //сейчас не ловим {---->}       RequestRestartPoint; //оживаем после смерти в городе            end;       end;
а сам возврат
delphi Код:
//*************************************************************** procedure RequestRestartPoint; begin   buf:=#$6D;   WriteD(00);   SendToServerEx(Name);   MoveTimer.Interval:=10000; end;

Будет ли возвращаться в город если еще живой не знаю.
NLObP вне форума   Ответить с цитированием
За это сообщение NLObP нажился спасибкой от: