anchor.diff:  //* Version: 5884
   //* Happens when unit is wounded.
   //* Attacker can be a warrior, recruit in tower or unknown (-1).
  +//* aAttacker: Unit who attacked the unit
   procedure TKMScriptEvents.ProcUnitWounded(aUnit, aAttacker: TKMUnit);
   begin
     if MethodAssigned(fProcUnitWounded) then
  
positive.code: //* Happens when a unit is attacked (shot at by archers or hit in melee).
  //* Attacker is always a warrior (could be archer or melee).
  //* This event will occur very frequently during battles.
  procedure TKMScriptEvents.ProcUnitAttacked(aUnit, aAttacker: TKMUnit);
  begin
    if MethodAssigned(fProcUnitAttacked) then
  
negative.code: //* If !DestroyerIndex is the same as the house owner (States.!HouseOwner), the house was demolished by the player who owns it.
  //* Otherwise it was destroyed by an enemy.
  //* Called just before the house is destroyed so HouseID is usable only during this event, and the area occupied by the house is still unusable.
  //* aDestroyerIndex: Index of player who destroyed it
  procedure TKMScriptEvents.ProcHouseDestroyed(aHouse: TKMHouse; aDestroyerIndex: TKMHandIndex);
  begin
    if MethodAssigned(fProcHouseDestroyed) then
  