procedure OnMoveEvent(Attacker: TL2Live; var BreakMove: Boolean);
begin
while (Engine.Status <> lsOnline) do Delay(500); // waiting until we come back
if (User.Dead) then begin // if the char is dead
Print('Died!');
// cause actions to be done when dying
end;
if (Attacker <> nil) then begin // if we are attacked
Print('We are attacked while running');
// fighting off
end;
end;
begin
Delay(-1);
end.
- Adrenaline
-
Classes
- 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
- Enums
- Objects
- Methods
- Units
- NexTarget
- TRadar
- Scripts
- Scripts Examples
- Scripts Catalog
- Order a script
- Useful
- Navigation
- Cabinet
- Bot's site
- Buy Adrenaline
- Instructions
- Game IDs DB
- Tech. support