add dignity malus

[erwan-joly]

DignityType.Dreadful => 1.1,
DignityType.Unqualified => 1.2,
DignityType.Failed => 1.5,
DignityType.Useless => 1.5,
_ => 1.0,