const AGoodNightOut : Array [0..8] of string = ( '.Lager', '.Beer', '.Vodka', '.Pernod', '.Absinth', '.Benadictine', '.Bacardi', '.Kebab', '.Woman' );