anchor.diff:      (Level: (Min: 7; Max: 15); Price: 2000; Occurence: SmithTypeItems;
       Strength: (Min: 26; Max: 30);),
   
  -    // of_the_Mongoose (Dexterity I)
  +    // of the Mongoose (Dexterity I)
       (Level: (Min: 1; Max: 3); Price: 200; Occurence: SmithTypeItems;
       Dexterity: (Min: 1; Max: 2);),
  -    // of_the_Fox (Dexterity II)
  +    // of the Fox (Dexterity II)
       (Level: (Min: 2; Max: 5); Price: 400; Occurence: SmithTypeItems;
       Dexterity: (Min: 3; Max: 5);),
  -    // of_the_Lynx (Dexterity III)
  +    // of the Lynx (Dexterity III)
       (Level: (Min: 3; Max: 7); Price: 600; Occurence: SmithTypeItems;
       Dexterity: (Min: 6; Max: 9);),
  -    // of_the_Falcon (Dexterity VI)
  +    // of the Falcon (Dexterity IV)
       (Level: (Min: 4; Max: 9); Price: 800; Occurence: SmithTypeItems;
       Dexterity: (Min: 10; Max: 14);),
  -    // of_the_Panther (Dexterity V)
  +    // of the Panther (Dexterity V)
       (Level: (Min: 5; Max: 11); Price: 1000; Occurence: SmithTypeItems;
       Dexterity: (Min: 15; Max: 20);),
  -    // of_the_Leopard (Dexterity VI)
  +    // of the Leopard (Dexterity VI)
       (Level: (Min: 6; Max: 13); Price: 1500; Occurence: SmithTypeItems;
       Dexterity: (Min: 21; Max: 25);),
  -    // of_the_Jaguar (Dexterity VII)
  +    // of the Jaguar (Dexterity VII)
       (Level: (Min: 7; Max: 15); Price: 2000; Occurence: SmithTypeItems;
       Dexterity: (Min: 26; Max: 30);),
   
  
positive.code:     of_Willpower6, of_Willpower7,
      // Perception I - VII
      of_Perception1, of_Perception2, of_Perception3, of_Perception4,
      of_Perception5, of_Perception6, of_Perception7
      //
      //
      );
  
  
negative.code: procedure TAffixes.DoSuffix(var AItem: Item);
  var
    SB: TSuffixBase;
    BT: TBonusType;
    Value: Byte;
  
    procedure SetLife();
  