anchor.diff:  interface
   
   type
  -  TSpellEnum = (spHeal, spCurePoison);
  +  TSpellEnum = (spHeal, spCurePoison, spTeleportation);
   
   type
     TSpellBase = record
  
positive.code:       Result := _('Heal');
      spCurePoison:
        Result := _('Cure poison');
    end;
  end;
  
  
negative.code:   // Heal
    (Level: 1; ManaCost: 20;),
    // Cure Poison
    (Level: 2; ManaCost: 30;),
    // Teleportation
    (Level: 3; ManaCost: 40;)
    );
  
  type
  