anchor.diff:  
   function TTalents.GetName(I: TTalentEnum): string;
   begin
  -  case I of
  -    tlStrong:
  -      Result := _('Strong');
  -    tlDextrous:
  -      Result := _('Dextrous');
  -    tlMage:
  -      Result := _('Mage');
  -    tlTough:
  -      Result := _('Tough');
  -    tlWealthy:
  -      Result := _('Wealthy');
  -    tlAffWithSwords:
  -      Result := _('Affinity with Swords');
  -    tlAffWithAxes:
  -      Result := _('Affinity with Axes');
  -    tlAffWithPolearms:
  -      Result := _('Affinity with Spears');
  -    tlAffWithMaces:
  -      Result := _('Affinity with Maces');
  -    tlMiser:
  -      Result := _('Miser');
  -    tlCareful:
  -      Result := _('Careful');
  -    tlIronSkin:
  -      Result := _('Iron Skin');
  -    tlHardy:
  -      Result := _('Hardy');
  -    tlCharged:
  -      Result := _('Charged');
  -  else
  -    Result := '-';
  -  end;
  +  Result := FTalentName[I]
   end;
   
   function TTalents.GetTalent(I: Byte): TTalent;
  
positive.code: type
    TTalentEnum = (tlNone, tlStrong {  } , tlDextrous {  } ,
      tlMage {  } , tlTough {  } , tlWealthy {  } ,
      tlAffWithSwords, tlAffWithAxes, tlAffWithPolearms, tlAffWithMaces,
      tlMiser {  }, tlCareful {  }, tlIronSkin {   },
      tlHardy {  }, tlCharged {  } );
  
  type
    TTalentBase = record
      Level: Byte;
      Effects: TEffects;
    end;
  
  const
    TalentBase: array [TTalentEnum] of TTalentBase = (
      // None
      (Level: 0; Effects: [];),
      // Strong
      (Level: 1; Effects: [efPrmAthletics];),
      // Dextrous
      (Level: 1; Effects: [efPrmDodge];),
      // Mage
      (Level: 1; Effects: [efPrmConcentration];),
      // Tough
      (Level: 1; Effects: [efPrmToughness];),
      // Wealthy
      (Level: 1; Effects: [efPrmGold];),
      // Affinity with Swords
      (Level: 3; Effects: [efPrmBlade];),
      // Affinity with Axes
      (Level: 3; Effects: [efPrmAxe];),
      // Affinity with Polearms
      (Level: 3; Effects: [efPrmSpear];),
      // Affinity with Maces
      (Level: 3; Effects: [efPrmMace];),
      // Miser
      (Level: 5; Effects: [ef2xGold];),
      // Careful
      (Level: 5; Effects: [efPrmDV];),
      // Iron Skin
      (Level: 5; Effects: [efPrmPV];),
      // Hardy
      (Level: 5; Effects: [efPrmLife];),
      // Charged
      (Level: 5; Effects: [efPrmMana];));
  
  type
    TTalent = record
  
negative.code: 
  implementation
  
  uses SysUtils, TypInfo, uLanguage, uSkill, uGame, uScenes, uPlayer, uAttribute;
  
  const
    TalentHint: array [TTalentEnum] of string = (
    '', 'Athletics', 'Dodge', 'Concentration', 'Toughness',
    'Gold', 'Blade', 'Axe', 'Spear', 'Mace',
    'x2 to Gold', 'DV', 'PV', 'Life', 'Mana'
    );
  
  { TTalents }
  
  