function CheckDeath(Obj: TL2Live = nil): boolean; // проверка смерти для указанного объекта
begin
if (Obj = nil) then Obj:= User; // если объект не указан, то по умолчанию используем юзера
result:= false; // указываем результат по умолчанию
if (Obj.Dead) then begin // если мы мертвы, то
result:= true; // задаем результат функции - истина
Engine.Msg('', 'Умер, воскрешаюсь...', 128); // печатаем инфу в логи
Engine.FaceControl(0, false); // выключаем интерфейс
while (User.Dead) and delay(999) do Engine.GoHome; // пока мы мертвы, раз в 1 секунду пытаемся воскреситься
delay(5555); // ждем дополнительное время для прогрузки (на слабых ПК стоит увеличить)
end;
end;
begin
if CheckDeath() then ...
end.
- Adrenaline
-
Классы
- TL2Control
- TL2Object
- TL2StaticObject
- TL2Spawn
- TL2Live
- TL2Char
- TL2User
- TL2Npc
- TL2Pet
- TL2Drop
- TL2Buff
- TL2Skill
- TLearnItem
- TL2Cast
- TL2Item
- TL2AucItem
- TL2List
- TSpawnList
- TCharList
- TNpcList
- TPetList
- TDropList
- TItemList
- TSkillList
- TBuffList
- TL2Warehouse
- TL2Auction
- TInventory
- TParty
- TConfirmDlg
- TMessages
- TChatMessage
- TBot
- TPaxEngine
- TGps
- TGpsPoint
- TL2Base
- TBaseList
- TBaseObject
- TBaseItem
- TBaseSkill
- TBaseAction
- TBaseNpc
- Перечисления
- Объекты
- Методы
- Модули
- NexTarget
- TRadar
- Скрипты
- Примеры скриптов
- Каталог скриптов
- Заказать скрипт
- Полезное
- Навигация
- Кабинет
- Сайт бота
- Купить Adrenaline
- Инструкции
- База игровых ID
- Тех. поддержка